1 input file. Two columns are (11,16) and (28,16). Both columns could contain duplicates.
Code: Select all
000394187 0003 0000 000708 0003 0000 000707
000677514 0006 0000 002350 0006 0000 002915
000694993 0006 0000 002350 0006 0000 009905
Code: Select all
0003 0000 000707
0003 0000 000708
0006 0000 002350
0006 0000 002915
0006 0000 009905
Code: Select all
//TOOLIN DD *
COPY FROM(SORT1) TO(T1) USING(CTL1)
COPY FROM(SORT1) TO(T1) USING(CTL2)
SORT FROM(T1) TO(LIST) USING(CTL3)
/*
//CTL1CNTL DD *
INREC BUILD=(11,16)
/*
//CTL2CNTL DD *
INREC BUILD=(28,16)
/*
//CTL3CNTL DD *
SORT FIELDS=(1,16,CH,A)
/*