Mainframe, MVS and zOS Discussion

CODE

//SUR0008 JOB 'BYTELLER'
//TOOLRUN EXEC PGM=ICETOOL
//TOOLMSG DD SYSOUT=A
//DFSMSG DD SYSOUT=A
//TOOLIN DD *

SORT FROM(TXNOFFLD) TO(SORTTEMP) USING(CTL1)
DISPLAY FROM(SORTTEMP) LIST(REPORT) -
TITLE('PAYMENTS BY TELLER') -
BTITLE('TRANSFER TYPE') BREAK(71,2,CH) -
HEADER('TELLER ...