Creating Change Accumulation in IMS-managed ACB environment

You can use one of the below 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.

//ICP      EXEC PGM=ICPUMAIN,REGION=4096K
//STEPLIB DD DSN=product.LOAD,DISP=SHR      IMS Catalog user exit
//         DD DSN=IMS.RESLIB,DISP=SHR
//         DD DSN=IMS.MDALIB,DISP=SHR
//DFSRESLB DD DSN=IMS.RESLIB,DISP=SHR
//SYSPRINT DD SYSOUT=*
//SYSOUT   DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//IMAGOUT1 DD DSN=DBICM02.DSG1.COPY1,
//             DISP=(,CATLG,CATLG),UNIT=SYSDA,
//             SPACE=(CYL,(60,10),RLSE)
//ICPSYSIN DD *
  IC DBD(DBICM02) DDN(DBICM021) IC(IMAGOUT1) -
      DBALLOC(Y)
/*

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.

//ICP      EXEC PGM=ICPUMAIN,REGION=4096K,PARM=’DFSDF=xxx’
//STEPLIB DD DSN=product.LOAD,DISP=SHR
//         DD DSN=IMS.RESLIB,DISP=SHR
//         DD DSN=IMS.MDALIB,DISP=SHR
//DFSRESLB DD DSN=IMS.RESLIB,DISP=SHR
//PROCLIB DD DSN=IMS.PROCLIB,DISP=SHR
//SYSPRINT DD SYSOUT=*
//SYSOUT   DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//IMAGOUT1 DD DSN=DBICM02.DSG1.COPY1,
//             DISP=(,CATLG,CATLG),UNIT=SYSDA,
//             SPACE=(CYL,(60,10),RLSE)
//ICPSYSIN DD *
  IC DBD(DBICM02) DDN(DBICM021) IC(IMAGOUT1) -
      DBALLOC(Y)
/*

Creating Change Accumulation in IMS-managed ACB environment

BMC AMI Backup and Recovery for IMS 5.1

On this page