DB2: Sample image copy JCL

Sample image copy job is below. This job image copies an entire database. If you want to image copy a specific table space, then you have to change the LISTDEF accordingly.

//STEP10    EXEC PGM=DSNUTILB,REGION=0M,                              

//         PARM='DB0T,D9331AA2.COPY'                                 

//STEPLIB  DD  DISP=SHR,DSN=DB2.DBXT.SDSNEXIT                

//         DD  DISP=SHR,DSN=DB2.DBXT.SDSNLOAD                

//SYSPRINT DD SYSOUT=*                                               

//SYSUDUMP DD SYSOUT=*                                                

//UTPRINT  DD SYSOUT=*                                               

//SYSIN    DD  *                                                     

  LISTDEF LIST1 INCLUDE TABLESPACE TESTTS.*        PARTLEVEL       

  LISTDEF LIST2 INCLUDE TABLESPACE TESTTS.*                        

 TEMPLATE COPYTEMP                                                   

           UNIT TAPE90                                               

           DSN (MYDSN.&DB..&TS..FC&PART..D&JDAY.&HO.&MI.)           

           DISP (NEW,CATLG,DELETE)                                   

           RETPD 15                                                  

           STACK YES                                                 

 COPY LIST LIST1                                                      

       COPYDDN (COPYTEMP)                                            

       FULL YES SHRLEVEL CHANGE                                      

       PARALLEL 10 TAPEUNITS 10                                      

                                                  

 MODIFY RECOVERY LIST LIST2 DELETE AGE 15         

 QUIESCE LIST LIST2                               

//*