1 RECORD TYPE=F,LENGTH=12 2 SORT FIELDS=(01,3,CH,A) 3 SUM FIELDS=NONE 4 OUTFIL FILES=1, 5 INCLUDE=(6,1,CH,NE,C'0'), 6 OUTREC=(5,3,4,C'\n') 7 OUTFIL FILES=2, 8 SAVE, 9 OUTREC=(5,3,4,C'\n') 10 11