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.
//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=0The 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=0The AMSPDS DD member SDDN3 is for a VSAM secondary index data set:
DEFINE CLUSTER (NAME(sdsname3))...
Related topic