Examples for recovering databases with DFSURDB0 JCL

Use the following example for running the Recovery function with IMS compatible JCL.

The following figure shows a sample procedure for DFSURDB0.

Figure 1. Sample procedure of the Recovery function

   //        PROC DBTLIB='HPS.SHPSLMD0',       HPIC LOAD LIBRARY
   //        RESLIB='IMSVS.SDFSRESL',          IMS RESLIB
   //        DBDLIB='IMSVS.DBDLIB',            IMS DBD LIBRARY
   //        RECON='IMSVS.RECON'              RECON DATA SET
   //*------------------------------------------------------------------*
   //         EXEC PGM=DFSRRC00,PARM='UDR,DFSURDB0,DD32DB01'
   //STEPLIB  DD DISP=SHR,DSN=&DBTLIB
   //         DD DISP=SHR,DSN=&RESLIB
   //*------------------------------------------------------------------*
   //* FOR IMS DATA SETS
   //*------------------------------------------------------------------*
   //DFSRESLB DD DISP=SHR,DSN=&RESLIB
   //IMS      DD DISP=SHR,DSN=&DBDLIB
   //SYSPRINT DD SYSOUT=A
   //DFSULOG   DD DUMMYVOL=SER=LOG1,LABEL=(,SL)
   //RECON1    DD DSNAME=&RECON.1,DISP=SHR
   //RECON2    DD DSNAME=&RECON.2,DISP=SHR
   //RECON3    DD DSNAME=&RECON.3,DISP=SHR