Search found 33 matches

by Magesh_j
Mon Oct 24, 2016 9:25 pm
Forum: IBM DFSort, ICETOOL, ICEMAN, ICEGENER.
Topic: OPTION EQUALS in SORT.
Replies: 2
Views: 3510

Re: OPTION EQUALS in SORT.

EQUALS specifies that the sequence of equal collating records is to be preserved from the input to output,

No way related to SORT FIELDS=COPY.

Whenever you sort a file, if you have the same key, the input sequence/order is preserved.
by Magesh_j
Mon Oct 03, 2016 9:21 pm
Forum: IBM DFSort, ICETOOL, ICEMAN, ICEGENER.
Topic: Convert COBOL input to different format.
Replies: 3
Views: 588

Re: Convert COBOL input to different format.

Rahul Mahajan,

If you catalog a dataset with FB 300 and allow the external server to transfer data into it, then it would be in fixed.

Any file you are transferring without providing the format to mainframe will get cataloged as VB.

Thanks
Magesh
by Magesh_j
Tue Sep 20, 2016 8:14 pm
Forum: IBM DFSort, ICETOOL, ICEMAN, ICEGENER.
Topic: Create an empty file using SORT.
Replies: 4
Views: 3000

Re: Create an empty file using SORT.

By empty I mean is it should have any data, I assume it should NOT if in the input file if we have a string "FORO" somewhere in the record, output file should be empty else it should end with RC=8? Please help how I can do this. If input has "FORO", output file should be empty w...
by Magesh_j
Wed Sep 14, 2016 6:47 pm
Forum: IBM DFSort, ICETOOL, ICEMAN, ICEGENER.
Topic: SORT help needed for date manipulation.
Replies: 2
Views: 546

Re: SORT help needed for date manipulation.

Screen shot show date starts from 14th position, but you gave screen shot Date(13-20). =COLS> ----+----1----+----2-- 000006 ZHEDRFGG6500 YYYYMMDD if the date starts @ 14th column, use below code. Assuming LRECL=80 INREC IFTHEN=(WHEN=(2,4,CH,EQ,C'HEDR'), OVERLAY=(81:20,2,18,2,14,4, 14:81,08)), IFOUTL...
by Magesh_j
Wed Sep 14, 2016 5:36 pm
Forum: IBM DFSort, ICETOOL, ICEMAN, ICEGENER.
Topic: Learning Sort.
Replies: 4
Views: 729

Re: Learning Sort.

Yes..all of them.

Read dfsort getting started.

Thanks
Magesh
by Magesh_j
Wed Sep 14, 2016 4:53 pm
Forum: IBM DFSort, ICETOOL, ICEMAN, ICEGENER.
Topic: Change Output FB instead of FBA in SORT.
Replies: 2
Views: 2685

Re: Change Output FB instead of FBA in SORT.

add REMOVECC.

check the dfsort getting started book for details

Thanks
Magesh

[ Post made via Samsung Galaxy S5 ] Image
by Magesh_j
Wed Sep 14, 2016 3:36 am
Forum: IBM DFSort, ICETOOL, ICEMAN, ICEGENER.
Topic: Sort the output again using sort.
Replies: 1
Views: 355

Re: Sort the output again using sort.

Can be done without sorting twice, but cant be done in single pass. To find a count of a state, if it is already in sorted order by state, then you need not require a sort or sumfield untested code OPTION COPY OUTFIL SECTIONS=(150,2,TRAILER3=(150,2,C' - ',COUNT=(EDIT=(TTTTTT)))),REMOVECC,NODETAIL An...
by Magesh_j
Mon Sep 12, 2016 10:08 pm
Forum: IBM DFSort, ICETOOL, ICEMAN, ICEGENER.
Topic: Write output on a condition in SORT.
Replies: 2
Views: 415

Re: Write output on a condition in SORT.

Is there is a possibility where you have more than one record having description ? Dept1 Dept1 Dept1 descripti1 Dept1 descripti2 Dept1 If yes what should be the output ? Here is the code for you. Assuming 1,5 is dept and 7,10 is description and you have only one or no description for a dept INREC IF...
by Magesh_j
Mon Sep 12, 2016 11:01 am
Forum: TSO, ISPF & REXX (Do you still do CLIST?!).
Topic: interesting link for Rexx
Replies: 6
Views: 906

Re: interesting link for Rexx

enrico-sorichetti,

the Links are really useful, thanks for posting it

Regards,
Magesh
by Magesh_j
Mon Sep 12, 2016 10:57 am
Forum: IBM COBOL, GnuCOBOL (OpenCOBOL), OOCobol.
Topic: Retrieve last 100 records from a dataset in COBOL.
Replies: 10
Views: 1637

Re: Retrieve last 100 records from a dataset in COBOL.

Yeah, missed to use the right terms, yes tables :)

thanks
Magesh
by Magesh_j
Sun Sep 11, 2016 1:13 am
Forum: IBM COBOL, GnuCOBOL (OpenCOBOL), OOCobol.
Topic: Retrieve last 100 records from a dataset in COBOL.
Replies: 10
Views: 1637

Re: Retrieve last 100 records from a dataset in COBOL.

Have two arays of 100 say array1 and array2 1.Clear array1 and load 100 record 2.after 100 record clear array2 load 100 Perform step1 and stpe2 as a loop untIl you reach eof Once you reach eof, used the last index value fetch record from other index You will know from which index you need to move fr...
by Magesh_j
Sat Sep 10, 2016 11:44 pm
Forum: IBM DFSort, ICETOOL, ICEMAN, ICEGENER.
Topic: SORT two files in a single step.
Replies: 2
Views: 531

Re: SORT two files in a single step.

KevalS, You cant concatenate two different file attribute with dfsort. As enrico mentioned not sure why you need it in one step solution Here is the one step solution. Note : though you see only one step, internally it is consider as two step only. This solution is not at all recommended, if second...
by Magesh_j
Sat Sep 10, 2016 11:14 pm
Forum: IBM DFSort, ICETOOL, ICEMAN, ICEGENER.
Topic: Checking for numeric fieds in DFSort.
Replies: 1
Views: 308

Re: Checking for numeric fieds in DFSort.

Yes, you can do it by checking condition NUM

Code: Select all

INCLUDE COND=(1,6,FS,EQ,NUM)
this will include records have numeric value in 1,6 position

If you want exclude records having numeric then use OMIT COND

Thanks
Magesh
by Magesh_j
Sat Sep 10, 2016 10:47 pm
Forum: IBM DFSort, ICETOOL, ICEMAN, ICEGENER.
Topic: Pick the latest record using SORT.
Replies: 3
Views: 474

Re: Pick the latest record using SORT.

Chandan Yadav, We dont need group, sort, sequence number. Assuming input is already sorted in 1,4 here is the optimal solution. //SYSIN DD * OPTION COPY OUTFIL NODETAIL,REMOVECC, SECTIONS=(01,04,TRAILER3=(1,11)) Thanks Magesh
by Magesh_j
Thu Sep 08, 2016 9:30 pm
Forum: IBM DFSort, ICETOOL, ICEMAN, ICEGENER.
Topic: Joining two files with SORT.
Replies: 13
Views: 4792

Re: Joining two files with SORT.

zprogrammer,

Because three pass is unnecessary, where something can be achieved in two pass which would be an optimal solution.

thanks
Magesh
by Magesh_j
Thu Sep 08, 2016 8:57 pm
Forum: IBM DFSort, ICETOOL, ICEMAN, ICEGENER.
Topic: Joining two files with SORT.
Replies: 13
Views: 4792

Re: Joining two files with SORT.

zprogrammer , Check the spool for Joinkey, you will see three outputs. SYSOUT JNF1JMSG JNF2JMSG JNF1 => 1 Pass. JNF2 => 1 Pass. After Join => 1 pass. ideally any DFSORT Joinkey will have three pass irrespective of JNF1CNTL/JNF2CNTL statements. Also test my solution and you will see only one SYSOUT(...
by Magesh_j
Thu Sep 08, 2016 8:13 pm
Forum: IBM DFSort, ICETOOL, ICEMAN, ICEGENER.
Topic: Joining two files with SORT.
Replies: 13
Views: 4792

Re: Joining two files with SORT.

10747 Roohi, I would suggest : Overlay sequence numbers in both files and then do a join keys Joinkey consumes three pass. where the solution which i have provided consume only two pass. For this situation join key is not at all recommended. Roohi N. For VB yes, you should use 1,4 (RDW), Also you n...
by Magesh_j
Wed Sep 07, 2016 9:51 pm
Forum: IBM DFSort, ICETOOL, ICEMAN, ICEGENER.
Topic: Merge records from two file, one by one.
Replies: 14
Views: 1174

Re: Merge records from two file, one by one.

10715 Not sure If I am missing anything here., correct me if I am wrong With this solution will we have sequence number populated for first file because my grouping will being when I find a record with BEGIN As per my understanding only second file will have the sequence number populated and out pu...
by Magesh_j
Wed Sep 07, 2016 3:16 am
Forum: IBM DFSort, ICETOOL, ICEMAN, ICEGENER.
Topic: Merge records from two file, one by one.
Replies: 14
Views: 1174

Re: Merge records from two file, one by one.

Imran Lamba, I think You missed my second solution. I would prefer second solution because it just do a copy and no sorting. Still if you prefer my first solution, On sort fields, please add EQUALS to preserve the order of the same key, because DFSORT comes with EQUALS=NO by default. SORT FIELDS=(8...
by Magesh_j
Wed Sep 07, 2016 12:13 am
Forum: Suggestions & Feedback : About the website.
Topic: Login for viewing post
Replies: 6
Views: 2190

Login for viewing post

Hi,

Please advise, why should we login to view a post.
If some one search in google, this website may not be picked up.

I think post should be visible to all( Just a suggestion)

Thanks
Magesh

Go to advanced search