Disaster recovery simulation JCL
//ARMJ001 JOB PARM,'RMGR/DB2.J0001',CLASS=A,MSGCLASS=X,
// NOTIFY=RDAXXX
//* *************************************************************** *//
//*
//* DOC: GENERATED BY RDAXXX ON 2022/01/03 AT 08:51
//*
//*
//* ******************************************************************** *//
//* ******************************************************************** *//
//* ******************************************************************** *//
//* BMC AMI Recovery Manager for Db2 V13.01.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=*
//* ********************************************************************** *//
//* ********************************************************************** *//
//* BMC AMI Recovery Manager for Db2 V13.01.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
//* *********************************************************************** *//
//* *********************************************************************** *//
//* BMC AMI Recovery Manager for Db2 V13.01.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)
//* *********************************************************************** *//
//* *********************************************************************** *//
//* BMC AMI Recovery Manager for Db2 V13.01.00 - BMC SOFTWARE, INC. *//
//* *********************************************************************** *//
//* *********************************************************************** *//
//* ***SIMULATION***SIMULATION***SIMULATION*** *//
//* *********************************************************************** *//
//* *********************************************************************** *//
//* *********************************************************************** *//
//* *********************************************************************** *//
//* BMC AMI Recovery Manager for Db2 V13.01.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
// NOTIFY=RDAXXX
//* *************************************************************** *//
//*
//* DOC: GENERATED BY RDAXXX ON 2022/01/03 AT 08:51
//*
//*
//* ******************************************************************** *//
//* ******************************************************************** *//
//* ******************************************************************** *//
//* BMC AMI Recovery Manager for Db2 V13.01.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=*
//* ********************************************************************** *//
//* ********************************************************************** *//
//* BMC AMI Recovery Manager for Db2 V13.01.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
//* *********************************************************************** *//
//* *********************************************************************** *//
//* BMC AMI Recovery Manager for Db2 V13.01.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)
//* *********************************************************************** *//
//* *********************************************************************** *//
//* BMC AMI Recovery Manager for Db2 V13.01.00 - BMC SOFTWARE, INC. *//
//* *********************************************************************** *//
//* *********************************************************************** *//
//* ***SIMULATION***SIMULATION***SIMULATION*** *//
//* *********************************************************************** *//
//* *********************************************************************** *//
//* *********************************************************************** *//
//* *********************************************************************** *//
//* BMC AMI Recovery Manager for Db2 V13.01.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
Tip: For faster searching, add an asterisk to the end of your partial query. Example: cert*