How to create a shadow copy of your VSAM sphere.
You can set up a shadow forward recovery job to update a shadow copy of your VSAM file. The figure below shows an example of using LOGOFLOGS SCAN to update the RCDS with the latest information from the log of logs and the forward recovery job to update the shadow copy. Run this job regularly so that the shadow is kept as up-to-date as possible.
//SHADEX JOB ACCOUNTING INFORMATION,REGION=0M
//*-------------------------------------------------------------------*/
//* Scan the logoflogs */
//*-------------------------------------------------------------------*/
//SCANLOG EXEC PGM=DWWAR
//STEPLIB DD DSN=DWW.SDWWLOAD,DISP=SHR
// DD DSN=DWW.SDWWLENU,DISP=SHR
//SYSUDUMP DD SYSOUT=*
//DWWDUMP DD SYSOUT=*
//DWWMSG DD SYSOUT=*
//DWWPRINT DD SYSOUT=*
//DWWCON1 DD DSN=DWW.DWWCON1,DISP=SHR
//DWWCON2 DD DSN=DWW.DWWCON2,DISP=SHR
//DWWCON3 DD DSN=DWW.DWWCON3,DISP=SHR
//DWWIN DD *
LOGOFLOGS SCAN RECOVERYREPORT(YES)
/*
//*-------------------------------------------------------------------*/
//* Update the shadow copy */
//*-------------------------------------------------------------------*/
//RECOVER EXEC PGM=DWWCO
//STEPLIB DD DSN=DWW.SDWWLOAD,DISP=SHR
// DD DSN=DWW.SDWWLENU,DISP=SHR
//DWWDMSG DD SYSOUT=*
//DWWPRINT DD SYSOUT=*
//DWWMSG DD SYSOUT=*
//DWWCON1 DD DSN=DWW.DWWCON1,DISP=SHR
//DWWCON2 DD DSN=DWW.DWWCON2,DISP=SHR
//DWWCON3 DD DSN=DWW.DWWCON3,DISP=SHR
//DWWIN DD *
MVSLOG NAME(DWW.SH.FILELOG)
RECOVER SPHERE(R40SH010.BL.ESDS01) -
NEWSPHERE(R40SH010.BL.SHADOW)-
SHADOW
/*