Job step 5 (JOB C): Performing backup, migration, and recovery

This FVP JOB and job step (Figure 1) verifies the DFSMShsm backup, migration, and recovery functions.

This job step enables you to perform the following tasks:

Back up a VSAM data set (DATAV7)
Migrate a VSAM data set (DATAV8)
List the contents of the MCDS and BCDS
Recover a VSAM data set (DATAV7)
Recall a VSAM data set (DATAV8)
List the contents of the MCDS and BCDS

Rule: You must define the data set with the name DATAV8 in an ICF catalog. If your system does not have ICF catalog support, remove the commands referring to DATAV8.

Note: You might receive the message FIXCDS COMMAND FAILED with a return code of 0015 if the MCD is not present.

Figure 1. FVP Job That Verifies DFSMShsm Backup, Migration, Recall, and Recovery of VSAM Data Sets

//?AUTHIDC JOB ?JOBPARM,                                               
//    TYPRUN=HOLD                                                      
//*                                                                    
//******************************************************************** 
//*     THIS STEP BACKS UP, RECOVERS, MIGRATES, AND RECALLS          * 
//*     VSAM DATA SETS.                                              * 
//*                                                                  * 
//*     STEP5  - BACKDS A VSAM DATA SET (DATAV7)                     * 
//*            - MIGRATE A VSAM DATA SET (DATAV8)                    * 
//*            - LIST THE CONTENTS OF THE MCDS AND BCDS              * 
//*            - RECOVER A VSAM DATA SET (DATAV7)                    * 
//*            - RECALL A VSAM DATA SET (DATAV8)                     * 
//*            - LIST THE CONTENTS OF THE MCDS AND BCDS              * 
//*                                                                  * 
//*    NOTE    - THIS STEP REQUIRES THE DATA SET WITH THE NAME       * 
//*              DATAV8 TO BE DEFINED IN A DF/EF CATALOG. IF YOUR    * 
//*              SYSTEM DOES NOT HAVE DF/EF CATALOG SUPPORT,         * 
//*              REMOVE THE COMMANDS REFERRING TO DATAV8.            * 
//******************************************************************** 
//*
//STEP5  EXEC PGM=IKJEFT01,REGION=512K
//SYSPRINT DD SYSOUT=*
//SYSTSPRT DD SYSOUT=*
//SYSTSIN DD *
 /* You might receive the message FIXCDS COMMAND FAILED with a */
 /* return code of 0015 or message ARC0195I ERROR = RECORD     */
 /* NOT FOUND or both, if the MCD is not found.                */
HBACKDS '?AUTHID.DATAV7' WAIT
HSEND WAIT FIXCDS D '?AUTHID.DATAV8' PATCH(X'5D' X'88000F')
HMIGRATE '?AUTHID.DATAV8' WAIT
HLIST LEVEL(?AUTHID) BOTH INCLUDEPRIM TERM
HRECOVER '?AUTHID.DATAV7' REPLACE WAIT
HRECALL '?AUTHID.DATAV8' WAIT
HLIST LEVEL(?AUTHID) BOTH INCLUDEPRIM TERM
//*