Running the Create Image Copy function

You can run the Create Image Copy function by invoking the FABJMAIN program.

1. In FABJMAIN JCL, code the EXEC statement as follows:

   //      EXEC PGM=FABJMAIN,REGION=nM,IMSPLEX=plex-name,DBRCGRP=dbrcgrp

   Where:

   IMSPLEX

   If you need to start IMSplex through the IMS HP Image Copy job, specify the IMSPLEX parameter.

   DBRCGRP

   If you use the DBRCGRP keyword of IMS, you must specify the DBRCGRP parameter.

2. Code the appropriate DD statements. For a list of DD statements, see DD statements for the Create Image Copy function.

   JCL examples are provided in Examples for the Create Image Copy function.

3. Code the corresponding control statement in the ICEIN data set.

   To invoke the Image Copy function, you must specify the CRC statement.

   For ICEIN control statements, see ICEIN control statements. For a list of control statement keywords, see Control statement keywords for the Create Image Copy function.

4. Submit the JCL.

//CRCOPY  EXEC PGM=FABJMAIN,REGION=nM
//STEPLIB  DD  DISP=SHR,DSN=&HPSLIB
//         DD  DISP=SHR,DSN=&IMSRES
//DFSRESLB DD  DISP=SHR,DSN=&IMSRES
//IMS      DD  DISP=SHR,DSN=&DBDLIB
//IMSDALIB DD  DISP=SHR,DSN=&MDALIB
//SYSPRINT DD  SYSOUT=* 
//ICEPRINT DD  SYSOUT=* 
//DFSPRINT DD  SYSOUT=* 
//ICERPRT  DD  SYSOUT=* 
//FABJSTAT DD  SYSOUT=* 
//ICEIN    DD  *  
  GLOBAL    CRCTYPE=P,
            DBRC=Y,
            NOTIFY=Y,
            DSN=&ICHLQ..&DBD..&DDN..CRC1,
            DSN2=&ICHLQ..&DBD..&DDN..CRC2,
            ICHLQ=TEMPDS.RGV11040,
            ICOUT=(*,*),
            SPACE=(TRK,20,1,RLSE) 
* 
* HDAM 
* 
  CRC      DBD=DBHDAM50,DDN=HDAMDD51
  CRC      DBD=DBHDAM50,DDN=HDAMDD52
/*