zOs/TX/WK600COF

//A540769C JOB (CP00,KE50),
//       'CATALOG',MSGCLASS=T,TIME=1440,
//         NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG0 SYSTEM=S13
//*
//P02     EXEC PGM=DSNUTILB,
//             PARM='DBAF,A540769C.FULCOPL'
//SYSPRINT  DD SYSOUT=*
//UTPRINT   DD SYSOUT=*
//SYSUDUMP  DD SYSOUT=*
//SYSTEMPL  DD DSN=DSN.MAREC.TX(WK600TMP),DISP=SHR
//SYSIN     DD *
OPTIONS EVENT(ITEMERROR, SKIP)
LISTDEF C#LIST                                                          00010000
  INCLUDE TABLESPACE DA540769.A600A04* PARTLEVEL                        8620
--INCLUDE TABLESPACE DA540769.A600A001 PARTLEVEL                        8620
--INCLUDE TABLESPACE DA540769.A600A02* PARTLEVEL                        8620
--INCLUDE TABLESPACE DA540769.A600A03* PARTLEVEL                        8620
--INCLUDE TABLESPACE DA540769.A600A04* PARTLEVEL                        8620
--INCLUDE TABLESPACE DA540769.A601A18* PARTLEVEL                        8620
--INCLUDE TABLESPACE DA540769.A600A009  PARTLEVEL                       8620
--INCLUDE TABLESPACE DA540769.A600A010  PARTLEVEL                       8620
COPY LIST C#LIST COPYDDN(TCOPYD8)
          PARALLEL
    FULL YES
    SHRLEVEL CHANGE