The CICS® VR RCDS contains recovery information required by the CICS VR panel interface to construct a recovery job.
The information extracted by CICS VR, when the RCDS command with the EXPORT keyword is run, is copied into the SAM data set that is specified on the DWWCOPY1 DD statement. The sample RCDS EXPORT job below creates a SAM data set with recovery information that can be sent to your remote site.
//RCDSEX1 JOB ACCOUNTING INFORMATION,REGION=0M 01
//EXPORT EXEC PGM=DWWGJCDS 02
//STEPLIB DD DSN=DWW.SDWWLOAD,DISP=SHR 03
// DD DSN=DWW.SDWWLENU,DISP=SHR
//DWWCOPY1 DD DSN=USER1.DWWCOPYR, 04
// UNIT=3590,VOL=SER=TAPE04, 05
// LABEL=(1,SL),DISP=(NEW,KEEP) 06
//DWWCON1 DD DSN=DWW.DWWCON1,DISP=SHR 07
//DWWCON2 DD DSN=DWW.DWWCON2,DISP=SHR 08
//DWWCON3 DD DSN=DWW.DWWCON3,DISP=SHR 09
//DWWMSG DD SYSOUT=* 10
//DWWPRINT DD SYSOUT=* 11
//DWWIN DD * 12
RCDS EXPORT 13
/*
//
Here is a description of each of the numbered statements:
The DCB parameters for this data set are RECFM=FBA and LRECL=133. The block size can be provided on the DWWMSG DD statement and must be a multiple of 133. The default is 27930.
The DCB parameters for this data set are RECFM=FBA and LRECL=133. The block size can be provided on the DWWPRINT DD statement and must be a multiple of 133. The default is 27930.