Escapa
Senior Member
Joined: 16 Feb 2007 Posts: 1399 Location: IL, USA
|
|
|
|
Below step will give you desired result
Code: |
//S1 EXEC PGM=SORT
//SYSOUT DD SYSOUT=*
//SORTIN DD *
DUMMY RECORD
//SORTOUT DD DSN=output dataset
//SYSIN DD *
SORT FIELDS=COPY
OUTFIL REPEAT=99999,BUILD=(SEQNUM,5,ZD)
//*
|
|
|