Disaster recovery simulation JCL

//ARMJ001 JOB PARM,'RMGR/DB2.J0001',CLASS=A,MSGCLASS=X,
//        NOTIFY=RDAXXX
//* *************************************************************** *//
//*
//* DOC:  GENERATED BY RDAXXX  ON 2015/01/03 AT 08:51
//*
//*
//* *************************************************************** *//
//* *************************************************************** *//
//* *************************************************************** *//
//*          RECOVERY MANAGER - V11.2.00 - BMC SOFTWARE, INC.        *//
//* *************************************************************** *//
//*      ISSUE ARCHIVE LOG COMMAND AND WAIT FOR COMPLETION          *//
//*      DEFAULT: 5 RETRIES, 3 MINUTE WAIT BETWEEN EACH RETRY       *//
//* *************************************************************** *//
//* *************************************************************** *//
//ARM0001 EXEC PGM=ARMBLOG,
//             PARM='DEDL,5,180',
//             REGION=4M
//STEPLIB   DD DISP=SHR,DSN=PRODUCT.LOAD.LIBS
//          DD DISP=SHR,DSN=DSNEXIT
//          DD DISP=SHR,DSN=DSNLOAD
//ARMMSGS   DD DISP=SHR,DSN=PRODUCT.CNTL.LIBS(ARMMSGS)
//ARMOPTS   DD DISP=SHR,DSN=PRODUCT.CNTL.LIBS(ARM$OPTS)
//ARMPRINT  DD SYSOUT=*
//ARMERROR  DD SYSOUT=*
//* *************************************************************** *//
//* *************************************************************** *//
//*          RECOVERY MANAGER - V11.2.00 - BMC SOFTWARE, INC.        *//
//* *************************************************************** *//
//*                      ARCHIVE LOG COPY USING                     *//
//*                            ARMBARC                              *//
//* *************************************************************** *//
//* *************************************************************** *//
//ARM0002 EXEC PGM=ARMBARC,PARM='DEDL',
//             REGION=4M,COND=(4,LT)
//STEPLIB   DD DISP=SHR,DSN=PRODUCT.LOAD.LIBS
//          DD DISP=SHR,DSN=DSNEXIT
//          DD DISP=SHR,DSN=DSNLOAD
//ARMMSGS   DD DISP=SHR,DSN=PRODUCT.CNTL.LIBS(ARMMSGS)
//ARMOPTS   DD DISP=SHR,DSN=PRODUCT.CNTL.LIBS(ARM$OPTS)
//ARMPRINT  DD SYSOUT=*
//BMCERROR  DD SYSOUT=*
//ARMIN    DD *
 ARCHIVE3 PREFIX DD
    TAPE UNIT 22
    STACK YES
//* *************************************************************** *//
//* *************************************************************** *//
//*          RECOVERY MANAGER - V11.2.00 - BMC SOFTWARE, INC.        *//
//* *************************************************************** *//
//*                   DISASTER RECOVERY - SYSTEM                    *//
//*                       RESOURCES RECOVERY                        *//
//* *************************************************************** *//
//* *************************************************************** *//
//ARM0003 EXEC PGM=ARMBSRR,PARM='DEDL',
//             REGION=4M,COND=(4,LT)
//STEPLIB   DD DISP=SHR,DSN=PRODUCT.LOAD.LIBS
//          DD DISP=SHR,DSN=DSNEXIT
//          DD DISP=SHR,DSN=DSNLOAD
//ARMMSGS   DD DISP=SHR,DSN=PRODUCT.CNTL.LIBS(ARMMSGS)
//ARMOPTS   DD DISP=SHR,DSN=PRODUCT.CNTL.LIBS(ARM$OPTS)
//ARMPRINT  DD SYSOUT=*
//ARMERROR  DD SYSOUT=*
//ARMJCIN  DD DISP=SHR,DSN=RDAXXX.BMCARM.JCL(TEST01)
//ARMJCL   DD DSN=RDAXXX.BSRRJCL.SIM(+1),
//            DISP=(NEW,CATLG),UNIT=AAA,
//            SPACE=(CYL,(1,1)),
//            DCB=(RDAXXX.BMCARM,
//            RECFM=FB,LRECL=80,BLKSIZE=3120)
//ARMLOAD  DD DISP=SHR,DSN=BMCRMD.V101TEST.DBLINK
//ARMPICK  DD SYSOUT=*
//ARMVRPT  DD SYSOUT=*
//ARMIN    DD *
 SET OPTIONS
    JCLTYPE DR
 ;
 RESTORE
    PACLOG NO
    ARCHIVE1
    DISK UNIT SYSALLDA
    COMPRESS NO
 LIMIT LOGS 1
 RECOVER REPOSITORY
 RECOVER CHGACCUM
 OFFSITE NO ARCHIVE2
 MAXCATJOBS 1
 MAXLOGJOBS 1
 MISSINGCOPIES FAIL
 COPYTYPE   LP
 SIMULATE YES
 DCTOKEN DRECOVER
 ;
//ARM0004 EXEC PGM=IEFBR14,COND=(12,GT)
//DELUT1  DD DSN=*.ARM0003.ARMJCL,DISP=(OLD,DELETE)
//* *************************************************************** *//
//* *************************************************************** *//
//*          RECOVERY MANAGER - V11.2.00 - BMC SOFTWARE, INC.        *//
//* *************************************************************** *//
//* *************************************************************** *//
//* ***SIMULATION***SIMULATION***SIMULATION***                      *//
//* *************************************************************** *//
//* *************************************************************** *//
//* *************************************************************** *//
//* *************************************************************** *//
//*          RECOVERY MANAGER - V11.2.00 - BMC SOFTWARE, INC.        *//
//* *************************************************************** *//
//*             CREATE TEMP DATA SET FOR FILE TAILORING             *//
//* *************************************************************** *//
//ARM0006 EXEC PGM=IEFBR14,COND=(4,LT)
//TEMP1     DD DISP=(MOD,DELETE),
//             DSN=BMCRMD.QA.MAXVL17.TMPISPF.D110103.T085106,
//             UNIT=WORK,SPACE=(CYL,(10,5)),
//             DCB=(RECFM=FB,LRECL=80,BLKSIZE=3120,DSORG=PS)
//ARM0007 EXEC PGM=IEBGENER,COND=(4,LT)
//SYSPRINT  DD SYSOUT=*
//SYSIN     DD DUMMY
//SYSUT1    DD DUMMY,
//             DCB=(RECFM=FB,LRECL=80,BLKSIZE=3120,DSORG=PS)
//SYSUT2    DD DISP=(NEW,CATLG,DELETE),
//             DSN=BMCRMD.QA.MAXVL17.TMPISPF.D110103.T085106,
//             UNIT=WORK,SPACE=(CYL,(10,5)),
//             DCB=(RECFM=FB,LRECL=80,BLKSIZE=3120,DSORG=PS)
//* *************************************************************** *//
//*                      BATCH JCL GENERATION                       *//
//*                      FOR SELECTED GROUPS                        *//
//* *************************************************************** *//
//ARM0008 EXEC PGM=IKJEFT1B,DYNAMNBR=250,
//             PARM='ISPSTART PGM(ARMBGEN) PARM(DEDL)',
//             REGION=4M,COND=(4,LT)
//STEPLIB   DD DISP=SHR,DSN=PRODUCT.LOAD.LIBS
//          DD DISP=SHR,DSN=DSNEXIT
//          DD DISP=SHR,DSN=DSNLOAD
//ARMMSGS   DD DISP=SHR,DSN=PRODUCT.CNTL.LIBS(ARMMSGS)
//ARMOPTS   DD DISP=SHR,DSN=PRODUCT.CNTL.LIBS(ARM$OPTS)
//ARMPRINT  DD SYSOUT=*
//ARMERROR  DD SYSOUT=*
//ARMLOAD   DD DISP=SHR,DSN=BMCRMD.V101TEST.DBLINK
//ARMIN     DD *
 SET CURRENT SQLID = RDAXXX ;
 SET OPTIONS SIMULATE YES ;
 SET OPTIONS DCTOKEN DRECOVER ;
 SET OPTIONS SITETYPE RECOVERY
             BACKOUT NO
             JCLTYPE DR
 ;
   GENJCL
      RECOVER
         TORESTARTRBA
            GROUP RDAXXX.BGPS??
 ;
/*
//ISPFILE   DD DISP=(MOD,KEEP),
//             DSN=BMCRMD.QA.MAXVL17.TMPISPF.D110103.T085106
//ISPSLIB   DD DISP=SHR,DSN=BMCRMD.V101TEST.DBSLIB
//ISPTABL   DD DISP=SHR,DSN=BMCRMD.V101TEST.DBTLIB
//ISPMLIB   DD DISP=SHR,DSN=BMCRMD.V101TEST.DBMLIB
//          DD DISP=SHR,DSN=SYS1.PROD.ISPMLIB
//ISPTLIB   DD DISP=(,DELETE),UNIT=WORK,SPACE=(CYL,(1,1,2)),
//             DCB=BMCRMD.V101TEST.DBTLIB
//          DD DISP=SHR,DSN=BMCRMD.V101TEST.DBTLIB
//          DD DISP=SHR,DSN=SYS1.PROD.ISPTLIB
//ISPPLIB   DD DISP=(NEW,DELETE),UNIT=WORK,SPACE=(TRK,(1,1,2)),
//             DCB=(RECFM=FB,LRECL=80,BLKSIZE=3120,DSORG=PO)
//ISPPROF   DD DISP=(,DELETE),UNIT=WORK,SPACE=(TRK,(1,1,2)),
//             DCB=(RECFM=FB,LRECL=80,BLKSIZE=3120,DSORG=PO)
//ISPCTL0   DD DISP=(,DELETE),UNIT=WORK,SPACE=(CYL,(1,1)),
//             DCB=(RECFM=FB,LRECL=80,BLKSIZE=3120,DSORG=PS)
//ISPCTL1   DD DISP=(,DELETE),UNIT=WORK,SPACE=(CYL,(1,1)),
//             DCB=(RECFM=FB,LRECL=80,BLKSIZE=3120,DSORG=PS)
//ISPLOG    DD DISP=(,DELETE),UNIT=WORK,SPACE=(CYL,(1,1)),
//             DCB=(LRECL=125,RECFM=VBA,BLKSIZE=3000,DSORG=PS),
//             DSN=&&LOG
//SYSTSIN   DD DUMMY
//SYSTSPRT  DD SYSOUT=*
//SYSTERM   DD SYSOUT=*
//ISPLIST   DD SYSOUT=*
//* *************************************************************** *//
//*              COPY TEMP DATA SET TO TARGET DATA SET              *//
//* *************************************************************** *//
//ARM0009  EXEC PGM=ARMBGNR,COND=(4,LT),REGION=4M
//STEPLIB   DD DISP=SHR,DSN=PRODUCT.LOAD.LIBS
//          DD DISP=SHR,DSN=DSNEXIT
//          DD DISP=SHR,DSN=DSNLOAD
//ARMMSGS   DD DISP=SHR,DSN=PRODUCT.CNTL.LIBS(ARMMSGS)
//ARMOPTS   DD DISP=SHR,DSN=PRODUCT.CNTL.LIBS(ARM$OPTS)
//ARMPRINT  DD SYSOUT=*
//ARMERROR  DD SYSOUT=*
//SYSUT1    DD DISP=(OLD,DELETE,KEEP),
//             DSN=BMCRMD.QA.MAXVL17.TMPISPF.D110103.T085106
//SYSUT2    DD DSN=RDAXXX.BMCARM,
//             DISP=OLD