Example 28: Creating a file for the Copy Migration feature

 //ACPEX28  JOB (PACP),'EXAMPLE 28',CLASS=Q,MSGCLASS=X,NOTIFY=&SYSUID        
//**********************************************************************    
//*                                                                         
//* Use EXPORT to create a migration file to be used as input to            
//* the Recover IMPORT command.                                             
//*                                                                         
//* The OUTPUT descriptor referred to by EXPORTDDN in the EXPORT            
//* command must include EXPOUT YES.                                        
//*                                                                         
//* The EXPORT command captures catalog data for the table spaces           
//* and indexes that are referenced in the command, and writes that         
//* data to the migration file that is referenced by EXPORTDDN.             
//*                                                                         
//* HIDDEN ONLY is specified so that the EXPORT command will only           
//* look for image copies that were created using FULL YES HIDDEN.          
//*                                                                         
//**********************************************************************    
//BMCCOPY  EXEC PGM=ACPMAIN,REGION=0M,                                      
//            PARM='DEJM,ACPEX28,NEW/RESET,MSGLEVEL(1)'                     
//STEPLIB  DD DISP=SHR,DSN=product.libraries
//         DD DISP=SHR,DSN=DB2.DSNEXIT
//         DD DISP=SHR,DSN=DB2.DSNLOAD                          
//         DD DSN=CSG.DEJM.DSNEXIT,DISP=SHR                                 
//         DD DSN=CSGI.DB2V12M.DSNLOAD,DISP=SHR                             
//ACPERROR DD SYSOUT=*                                                      
//SYSPRINT DD SYSOUT=*                                                      
//ACPGDG   DD *                                                             
 DEFINE GDG (NAME(&BASE) LIMIT(30) SCR)                                     
//SYSIN    DD *                                                             
                                                                           
  OUTPUT EXPORT  UNIT SYSDA                                                 
    STORCLAS DEVSMS                                                         
    DSNAME RDAWXP.&JOBNAME.MIGRATE(+1)                                      
    EXPOUT YES                                                              
                                                                           
  EXPORT TABLESPACE ACPEXDB1.*                                              
    INDEXES YES          
  EXPORTDDN EXPORT   
  ATRBA LASTFULLCOPY
  HIDDEN ONLY