//SHE0008 JOB (BR),'REPORT    ', CLASS=A, MSGCLASS=A, MSGLEVEL=(1,1).
 //NOTIFY=&SYSUID
 //STEP01   EXEC PGM=ICETOOL
 //SYSPRINT DD SYSOUT=*
 //SYSOUT   DD SYSOUT=*
 //INPUT1   DD DSN=SHECICS.ZEUSBANK.BRANCHES,DISP=SHR
 //SYSIN    DD *
   DISPLAY FROM (INPUT1) LIST(REPORT)-
   TITLE('LIST OF ZEUSBANK BRANCHES')-
   HEADER('SORTCODE') ON (8,4,ZD)-
   HEADER('FLAG') ON (12,4,CH)-
   HEADER('BRANCH NAME') (44,4,CH)-
 /*