Skolusu
Senior Member
Joined: 07 Dec 2007 Posts: 2205 Location: San Jose
|
|
|
|
selva,
The following DFSORT JCL will give you the desired results.
Code: |
//STEP0100 EXEC PGM=SORT
//SYSOUT DD SYSOUT=*
//SORTIN DD *
----+----1----+----2----+----3----+----4----+----5--
10 15
15 13
25 35
45 45
//SORTOUT DD SYSOUT=*
//SYSIN DD *
SORT FIELDS=COPY
INREC OVERLAY=(81:1,2,ZD,ADD,4,2,ZD,M11,LENGTH=3)
OUTFIL BUILD=(1,80),INCLUDE=(81,3,ZD,GT,50)
//* |
|
|