Interested to Buy Any Domain ? << Click Here >> for more details...
How to get the last but one duplicate record of the file
using Sort?
- 2 Answers
- 11063 Views
- Fidelity, I also Faced
- E-Mail Answers
Answer Posted / anju
//step1 exec pgm=sort
//sortin dd dsn=file1,disp=shr
//sortout dd dsn=file2,disp=(new,catlg,delete),
// unit=disk,space=(cyl(20,10),rlse)
// dcb=(recfm=fb,lrecl=80,blksize=800)
//sortxsum dd dsn=file3,disp=(new,catlg,delete),
// unit=disk,space=(cyl(20,10),rlse)
// dcb=(recfm=fb,lrecl=80,blksize=800)
//sysin dd *
sortfields=none,xsum
/*
//step2 exec pgm=sort
//sortin dd dsn=*.step1.sortxsum
//sortof01 dd dsn=file4,disp=(new,catlg,delete),
// unit=disk,space=(cyl(20,10),rlse)
// dcb=(recfm=fb,lrecl=80,blksize=800)
//sortof02 dd dsn=file5,disp=(new,catlg,delete),
// unit=disk,space=(cyl(20,10),rlse)
// dcb=(recfm=fb,lrecl=80,blksize=800)
sysin dd *
sortfields=copy
outfil files=01,startrec=2,endrec=2
outfil files=02,startrec=3,ENDREC=5
/*
I did not test this. Hope this will work and file4 will give
the last but 1 duplicate record.
| Is This Answer Correct ? | 1 Yes | 2 No |
Post New Answer View All Answers
Is their any set of rules for dd? Explain.
How to run cobol program using jcl?
When The Define Jcl Is Not Available, How Can You Get Information About A Vsam File's Organisation ?
What do you understand by the term notcat 2 – gs?
what is the purpose of coding class parameter in job statement?
What statement can be used to send data to another mvs jes3 node?
whats the diff bw the evaluate also and and?
What does a disposition of (new,catlg,keep) for a dsn mean?
How to resolve the error "WER488A JOIN CAPACITY EXCEEDED" I am using SYNCSORT with JOINKEYS to compare 2 files. I am Getting error - > WER488A JOIN CAPACITY EXCEEDED There are 2 files to be compared with about 2 million records each. LRECL is 3665. Can somebody give a pointer as to how to resolve this problem? I am using SYNCSORT with JOINKEYS to compare 2 files. I am Getting error - > WER488A JOIN CAPACITY EXCEEDED There are 2 files to be compared with about 2 million records each. LRECL is 3665. Can somebody give a pointer as to how to resolve this problem?
What is the format of comment statement?
which utility is used to run a cobol-db2 program?
Explain in DD statement what is the use of DCB parameter?
If a (+1) generation dataset is created in the first step of a job, how can it be referenced in later steps of the same job for input?
Explain how can values be passed from the job stream to an executable program?
how would you create a temporary dataset? And where will you use them?
