zOs/JCL/ICETSOSP

//A540769O  JOB (CP00,KE50)                                             00010001
//*MAIN CLASS=LOG
//*
//*                 use iceTool to split a file
//*                      depending on field values
//*                      into several output files
//*                      and sort the outputfiles
//*
//E02     EXEC PGM=ICETOOL,PARM='SIZE(MAX)'
//IN      DD *
null            xØ
eins            xa
zwei            xb
drei            xc
vier            xd
fuenf           xe
sechs           xf
sieben          xg
acht            xh
neun            xi
zehn            x«
elf             x»
zwölf           xð
dreizehn        xý
vierzehn        xþ
fuenfzehn       x±
sechszehn       x°
siebzehn        xj
achtzehn        xk
neunzehn        xl
zwanzig         xm
//OUT1      DD SYSOUT=*
//OUT2      DD SYSOUT=*
//OUT3      DD SYSOUT=*
//*ORTWK01  DD UNIT=DISK,SPACE=(9076,(9000,9000),,,ROUND)
//*ORTWK02  DD UNIT=DISK,SPACE=(9076,(9000,9000),,,ROUND)
//*ORTWK03  DD UNIT=DISK,SPACE=(9076,(9000,9000),,,ROUND)
//TOOLMSG   DD SYSOUT=*
//DFSMSG   DD SYSOUT=*
//SYSPRINT  DD SYSOUT=*
//SYSOUT    DD SYSOUT=*
//TOOLIN    DD *
 SORT FROM(IN) USING(INTX)
//CHARCNTL DD *
 SORT FIELDS=(1,1,CH,A,2,5,CH,D)
 OUTFIL FNAMES=OUT1,INCLUDE=(1,1,CH,LE,C'f')
 OUTFIL FNAMES=OUT2,INCLUDE=(1,1,CH,GT,C'f',
            AND,1,1,CH,LE,C'n')
 OUTFIL FNAMES=OUT3,INCLUDE=(1,1,CH,GT,C'n')
//INTXCNTL DD *
 SORT FIELDS=(3,1,CH,D,1,2,CH,A)
 OUTFIL FNAMES=OUT1,INCLUDE=(18,1,BI,LE,136)
 OUTFIL FNAMES=OUT2,INCLUDE=(18,1,BI,GT,136,AND,18,1,BI,LE,144)
 OUTFIL FNAMES=OUT3,INCLUDE=(18,1,BI,GT,144)