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.

Examples (Deleting and redefining VSAM OSAM data sets)


The following example invokes IDCAMS processing during the recovery for a HDAM/VSAM and HDAM/OSAM database where DDN1 and DDN2 are members in the data set defined by the AMSPDS DD statement.

Each member contains appropriate DELETE and DEFINE/ALLOCATE statements, needed for IDCAMS processing.

//AMSPDS DD DSN=BMC.AMSPDS,DISP=SHR
//RVPSYSIN DD *
   GLBL IDCAMS(*) ...
   REC DBD(DBD1) DDN(DDN1) ...
   REC DBD(DBD2) DDN(DDN2) ...
  • The AMSPDS DD member DDN1 is for a VSAM data set:

    DELETE dsname1 CLUSTER PURGE
    IF MAXCC<=8 THEN SET MAXCC=0
    DEFINE CLUSTER(NAME(dsname1))...
  • The AMSPDS DD member DDN2 is for an OSAM data set:

    DELETE 'dsname2' NONVSAM
    IF MAXCC<=8 THEN SET MAXCC=0
    ALLOCATE DATASET(dsname2)...

    The following example invokes IDCAMS processing for a HDAM/OSAM database and the corresponding secondary index during the recovery and uses the IDCPRINT DD statement to direct IDCAMS output processing to a separate data set. The member names passed to IDCAMS are DDN3 and SDDN3. The Recovery utility logically concatenates the corresponding DELPDS DD data set member and AMSPDS DD data set member before IDCAMS processing begins.

    //AMSPDS   DD DSN=BMC.AMSPDS,DISP=SHR
    //DELPDS   DD DSN=BMC.DELPDS,DISP=SHR
    //IDCPRINT DD SYSOUT=*
    //RVPSYSIN DD *   
       GLBL IDCAMS(*)...
       REC DBD(DBD3) BLDINDEX(Y)...
  • The DELPDS DD member DDN3 is for a VSAM data set:

     DELETE dsname3 CLUSTER PURGE
    IF MAXCC<=8 THEN SET MAXCC=0
  • The AMSPDS DD member DDN3 for a VSAM data set:

    DEFINE CLUSTER (NAME(dsname3))...
  • The DELPDS DD member SDDN3 is for a VSAM secondary index data set:

     DELETE sdsname3 CLUSTER PURGE
    IF MAXCC<=8 THEN SET MAXCC=0
  • The AMSPDS DD member SDDN3 is for a VSAM secondary index data set:

    DEFINE CLUSTER (NAME(sdsname3))...

 

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

RECOVERY PLUS for IMS 5.1