zOs/JCL/FRANZLS2

//F54076$j  JOB (CP00,KE50),                                            00010001
//         MSGCLASS=T,TIME=1440,
//         NOTIFY=A540769
//*MAIN CLASS=LOG
//S1       EXEC PGM=DSNUTILB,PARM='DBAF,A540769L.LOAD$j'                00020001
//SYSMAP   DD SYSOUT=*
//SYSUT1   DD DISP=(,PASS),UNIT=DISK,SPACE=(CYL,(2000,3000)),
//            DATACLAS=NULL30
//SORTOUT  DD DISP=(,PASS),UNIT=DISK,SPACE=(CYL,(2000,3000)),
//            DATACLAS=NULL30
//SYSERR   DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//         SET OLDPREF='SHR21.DIV.P021.A540769.NZ242.P'
//         SET OLDSUF='.UNL5'
//SYSTEMPL  DD DSN=DBAF.DBAA.LISTDEF(TEMPL),DISP=SHR
$r
//SYSIN    DD *
$l