zOs/TX/QBXC5COP

//A540769O JOB (CP00,KE50),'DB2 co',
//             MSGCLASS=T,TIME=1440,SCHENV=DP4G,
//             NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//*
//* ux utility generator co
//*           who RZ4 DP4G A540769 2
//*           05.05.14 15:56:34 A540769O 05
//*
//STEP1    EXEC PGM=DSNUTILB,TIME=1440,
//             PARM=(DP4G,'A540769O.UXUTIL'),
//             REGION=0M
//SYSPRINT   DD SYSOUT=*
//*YSPRINT   DD DSN=DSN.JOBRUN.A540769O.STEP1.#DT#,
//*            DISP=(NEW,CATLG,CATLG),MGMTCLAS=BAT#NW,DSNTYPE=LARGE,
//*            DCB=(RECFM=FB,LRECL=132,DSORG=PS),SPACE=(CYL,(1,1000))
//SYSUDUMP   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DISP=SHR,DSN=DP4G.DBAA.LISTDEF(TEMPL)
//INDUMMY    DD DUMMY
//SYSIN      DD *
  LISTDEF TPLIST
    INCLUDE TABLESPACE QTXDBY.QBXC5 PARTLEVEL
---- copy --------------------------------------------------------------
  COPY LIST TPLIST COPYDDN(TCOPYD)
    FULL NO
    PARALLEL
    SHRLEVEL CHANGE