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
- 11024 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
What do you understand by the term job time – out and how can you overcome that?
What is the function of //jcllib statement?
Is acct parameter mandatory?
Explain the purpose of dd * statement in jcl?
Explain how can the disposition of sysout datasets be set for an entire jobstream?
Explain the jcl exec statement?
Name the statement which can be used to send data to another mvs jes3 node?
what is use of space parameter in dd statement?
How can an in-stream dataset be terminated?
What are the parameters that are used in creating a gdg?
what is use of disp parameter in dd statement?
What is the format of comment statement?
Is condition checking possible in jcl?
Does jcl support automatic restart?
Explain the function of the steplib dd statement?
