View previous topic :: View next topic
|
Author |
Message |
satish kanamarlapudi
New User
Joined: 23 Jul 2008 Posts: 29 Location: Little Rock - Arkansas
|
|
|
|
Hi,
I have got a requirement where in based on key field i need to search in the file which has got millions of records get it n copy it and also i want to know at what particular row the record is present in the file.
Thx,
Satish |
|
Back to top |
|
|
Skolusu
Senior Member
Joined: 07 Dec 2007 Posts: 2205 Location: San Jose
|
|
|
|
Assuming your input is FB and 80 byte LRECL, the following DFSORT JCL will give you the desired results. The row number is present in bytes 81 thru 88
Code: |
//STEP0100 EXEC PGM=SORT
//SYSOUT DD SYSOUT=*
//SORTIN DD *
ABCD
1111
BLAH
ABCD
//SORTOUT DD SYSOUT=*
//SYSIN DD *
SORT FIELDS=COPY
INREC OVERLAY=(81:SEQNUM,8,ZD)
OUTFIL INCLUDE=(10,4,CH,EQ,C'ABCD')
/* |
|
|
Back to top |
|
|
satish kanamarlapudi
New User
Joined: 23 Jul 2008 Posts: 29 Location: Little Rock - Arkansas
|
|
|
|
thx a lot sri... n sorry i didnot mention the bytes n length of the files... |
|
Back to top |
|
|
|