zOs/JCL/DB2UTPDR

//A540769D JOB (CP00,KE50),
//       'CATALOG',MSGCLASS=T,TIME=1440,
//         NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//*
//***************************************************
//*  CREATED BY :  A540769
//*  TIMESTAMP  :  05/12/2006.13.25.38
//*  ENVIRONMENT:  ISPF 5.6MVS     TSO
//*  RELEASE    :  V7.4.02 08/31/2004
//*  DB2 VERSION:  810
//***************************************************
//STEP1 EXEC PGM=DSNUTILB,TIME=1440,
//   PARM=(DVTB,'A540769D'),
//   REGION=0M
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT  DD SYSOUT=*
//SYSOUT   DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVTB.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
      LISTDEF C#LIST
       INCLUDE TABLESPACE  DB2RTS.A010A
       INCLUDE TABLESPACE  DB2RTS.A011A
     QUIESCE  LIST C#LIST

     MODIFY RECOVERY
       LIST C#LIST
         DELETE AGE (*)
     COPY
       LIST C#LIST
         COPYDDN(TCOPYD)  FULL YES
         PARALLEL(6)