Skolusu
Senior Member
Joined: 07 Dec 2007 Posts: 2205 Location: San Jose
|
|
|
|
bbharathiraj,
The following DFSORT JCL will give you the desired results
Code: |
//STEP0100 EXEC PGM=ICEMAN
//SYSOUT DD SYSOUT=*
//SORTIN DD *
HDR 20081206
200KUMARKHKA
200MALATHIIJ
200SHRIDULLA
444MALATHIFA
444IJLJLKJLK
TRL 00000007
//OUT1 DD SYSOUT=*
//OUT2 DD SYSOUT=*
//SYSIN DD *
SORT FIELDS=COPY
OUTFIL FNAMES=OUT1,REMOVECC,
INCLUDE=(1,3,SS,EQ,C'HDR,200'),
TRAILER1=('TRL ',COUNT+1=(M11,LENGTH=8))
OUTFIL FNAMES=OUT2,REMOVECC,
INCLUDE=(1,3,SS,EQ,C'HDR,444'),
TRAILER1=('TRL ',COUNT+1=(M11,LENGTH=8))
//* |
|
|