The CICS® VR recovery control data set (RCDS) is the repository of recovery data that is used by CICS VR. For every CICS VR problem that you report, create a sequential data set copy of one of the three RCDSs and send it to the IBM® Support Center.
The IBM Support Center prefers you to use the IDCAMS REPRO utility to create a sequential data set copy of an RCDS. Use the sample job shown below as a model to create your own copy. The sample job uses IDCAMS REPRO to copy an RCDS (DWW.DWWCON1) to a new sequential data set (EXAMPLE.REPRO).
Before you begin: Ensure that the record length of the sequential data set is equal to the CI size of the RCDS.
//RCDSJOB JOB ACCOUNTING INFORMATION,REGION=0M 01
//REPRO1 EXEC PGM=IDCAMS 02
//SYSPRINT DD SYSOUT=* 03
//INRCDS DD DSN=DWW.DWWCON1,DISP=SHR 04
//OUTDS DD DSN=EXAMPLE.REPRO, 05
// DISP=(NEW,CATLG),SPACE=(CYL,(5,5)),
// UNIT=SYSDA,
// DCB=(LRECL=4096,RECFM=FB,BLKSIZE=4096)
//SYSIN DD * 06
REPRO INFILE(INRCDS) OUTFILE(OUTDS) 07
/*
//
For more information about IDCAMS REPRO, see z/OS DFSMS Access Method Services and z/OS DFSMS: Using Data Sets.