zOs/TX/WK993UNL

//A540769V JOB (CP00,KE50),
//       'CATALOG',MSGCLASS=T,TIME=1440,
//         NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG0
//UNLOAD EXEC PGM=DSNUTILB,TIME=1440,
//   PARM=(DBAF,'A540769V.UNLOAD'),
//   REGION=0M
//*DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT  DD SYSOUT=*
//SYSOUT   DD SYSOUT=*
//SYSTEMPL  DD DSN=DBAF.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN DD *
     TEMPLATE TUNL     DSN('DSN.TX.ZDAT.WK993.&TS..UNL')
                       DATACLAS (NULL30) MGMTCLAS(COM#A092)
                       SPACE (1,1) TRK
     TEMPLATE TPUN     DSN('DSN.TX.ZDAT.WK993.&TS..PUN')
                       DATACLAS (NULL30) MGMTCLAS(COM#A092)
                       SPACE (1,1) TRK
     LISTDEF LST INCLUDE TABLESPACE DA540769.A993*
     UNLOAD LIST LST
       PUNCHDDN TPUN UNLDDN TUNL
         SHRLEVEL CHANGE