zOs/JCL/ICETSPLI

//A540769O  JOB (CP00,KE50)                                             00010001
//*MAIN CLASS=LOG
//*
//*                 use iceTool to split a file
//*                      depending on field values
//*                      into several output files
//*
//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=*
//SORTWK01  DD UNIT=DISK,SPACE=(9076,(9000,9000),,,ROUND)
//SORTWK02  DD UNIT=DISK,SPACE=(9076,(9000,9000),,,ROUND)
//SORTWK03  DD UNIT=DISK,SPACE=(9076,(9000,9000),,,ROUND)
//TOOLMSG   DD SYSOUT=*
//DFSMSG   DD SYSOUT=*
//SYSPRINT  DD SYSOUT=*
//SYSOUT    DD SYSOUT=*
//TOOLIN    DD *
 COPY FROM(IN) USING(INTX)
//CHARCNTL DD *
 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 *
 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)