Information
Space announcement We are no longer updating this space, and you cannot comment on this space. The RECOVERY PLUS for IMS component is now documented in BMC AMI Backup and Recovery for IMS.

Recovery by using recommended JCL in an IMS managed ACB environment


You can use one of the following methods to run your utility in an IMS managed ACB environment.

Related topics

  • Provide the IMS Catalog user exit routine (DFS3CDX0) in the STEPLIB, JOBLIB or linklist library.
//*-----------------------------------------------------
//*        RECOVERY IN MACB ENVIRONMENT
//*-----------------------------------------------------
//RECOVER  EXEC PGM=RVPUMAIN,REGION=4096K
//STEPLIB  DD DISP=SHR,DSN=BMC.xxx.LOAD      IMS Catalog user exit
//         DD DISP=SHR,DSN=IMS.RESLIB
//DFSRESLB DD DISP=SHR,DSN=IMS.RESLIB
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//RECON1   DD DSN=IMS.RECON1,DISP=SHR
//RECON2   DD DSN=IMS.RECON2,DISP=SHR
//RECON3   DD DSN=IMS.RECON3,DISP=SHR
//RVPSYSIN DD *
GLBL DBRC(Y) ICALLOC(Y) DSALLOC(Y) DBALLOC(Y) -
   ICPREF(userpref) ICUNIT(DASD) ICSPACE(TRK,10,10) -
   SORTWK(4,SYSDA,C,10,5) PCP(Y) PDX(BMC.RVPPDX)
REC DBD(DBD10O) DDN(DB10ODD1) DUMP(*) LOG(*) -
    ACCUM(*) IC(*)
  • Provide a DFSDFxxx Procedure library member. The required member suffix for the PROCLIB is specified using the keyword PARM=’DFSDF=xxx’ on the job step’s EXEC statement and by including a //PROCLIB DD containing the matching parameter member.
//*-----------------------------------------------------
//*        RECOVERY IN MACB ENVIRONMENT
//*-----------------------------------------------------
//RECOVER  EXEC PGM=RVPUMAIN,REGION=4096K,PARM=’DFSDF=xxx’
//STEPLIB  DD DISP=SHR,DSN=BMC.xxx.LOAD
//         DD DISP=SHR,DSN=IMS.RESLIB
//DFSRESLB DD DISP=SHR,DSN=IMS.RESLIB
//PROCLIB   DD DISP=SHR,DSN=IMS.PROCLIB
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//RECON1   DD DSN=IMS.RECON1,DISP=SHR
//RECON2   DD DSN=IMS.RECON2,DISP=SHR
//RECON3   DD DSN=IMS.RECON3,DISP=SHR
//RVPSYSIN DD *
GLBL DBRC(Y) ICALLOC(Y) DSALLOC(Y) DBALLOC(Y) -
   ICPREF(userpref) ICUNIT(DASD) ICSPACE(TRK,10,10) -
   SORTWK(4,SYSDA,C,10,5) PCP(Y) PDX(BMC.RVPPDX)
REC DBD(DBD10O) DDN(DB10ODD1) DUMP(*) LOG(*) -
    ACCUM(*) IC(*)

 

Tip: For faster searching, add an asterisk to the end of your partial query. Example: cert*

RECOVERY PLUS for IMS 5.1