zOs/JCL/DB2TEMPL

//A540769L JOB (CP00,KE50),'DB2 COPY',
//           MSGCLASS=T,TIME=1440,
//           NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG0 SYSTEM=S14
//P02     EXEC PGM=DSNUTILB,
//             PARM='DP4G,A540769F.FULCOPL'
//SYSPRINT  DD SYSOUT=*
//UTPRINT   DD SYSOUT=*
//SYSUDUMP  DD SYSOUT=*
//SYSTEMPL  DD DSN=DP4G.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN     DD *
OPTIONS (PREVIEW)
TEMPLATE TILOC  DSN('&SSID..XXLOC.&UQ..D&DATE..T&TIME.')
                  DATACLAS(ENN35) MGMTCLAS(COM#A041) STORCLAS(FAR$N)
                  SPACE (1,1) TRK
                  TIME LOCAL
TEMPLATE TIUTC  DSN('&SSID..XXUTC.&UQ..D&DATE..T&TIME.')
                  DATACLAS(ENN35) MGMTCLAS(COM#A041) STORCLAS(FAR$N)
                  SPACE (1,1) TRK
                  TIME UTC
LISTDEF LST                                                             00010000
  INCLUDE TABLESPACE DSNDB06.SYSTSUNI  PARTLEVEL                        8620
-- OPTIONS EVENT(ITEMERROR, SKIP)
COPY LIST LST COPYDDN (TILOC, TIUTC)
    PARALLEL
    SHRLEVEL CHANGE