zOs/JCL/DB2UNIQ

//QGS400AP JOB (CP00,KE50),
//       'CATALOG',MSGCLASS=T,TIME=1440,LINES=(999999,WARNING),
//         NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG,SYSTEM=S14
//*
//P02     EXEC PGM=DSNUTILB,
//             PARM='DBAF,A540769F.FULCOPY'
//SYSPRINT  DD SYSOUT=*
//UTPRINT   DD SYSOUT=*
//SYSUDUMP  DD SYSOUT=*
//*SYSTEMPL  DD DSN=DBAF.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN     DD *
TEMPLATE TUNI   DSN('A540769.UNIQ.D&DATE..T&TIME..&UNIQ.')
                  MGMTCLAS(COM#A092)
TEMPLATE TDEF  DSN('&SSID..&DB..&TS..P&PA..&UNIQ.')
LISTDEF C#LIST                                                          00010000
                    INCLUDE TABLESPACE  DB2DUMMY.* PARTLEVEL
COPY LIST C#LIST COPYDDN(TUNI)                                          00040000
             SHRLEVEL CHANGE                                            00080004
COPY LIST C#LIST COPYDDN(TDEF)                                          00040000
             SHRLEVEL CHANGE                                            00080004
COPY LIST C#LIST COPYDDN(TUNI)                                          00040000
             SHRLEVEL CHANGE                                            00080004
COPY LIST C#LIST COPYDDN(TDEF)                                          00040000
             SHRLEVEL CHANGE                                            00080004
 -- QUIESCE LIST C#LIST                                                 00040000

//*