ARMBGEN sample JCL


The following is the ARMBGEN sample JCL that recovers to a restart RBA:

//ARMJCL1 JOB 5220,ARMQA
//*
//* *************************************************************** *//
//*
//* DOC:  OBJECTSET  ARMQA SAMPLE
//*       GENERATED BY RDAJBM  ON 2/08/22   AT 10:20
//*
//*
//* **************************************************************************** *//
//* **************************************************************************** *//
//* **************************************************************************** *//
//*          BMC AMI Recovery Manager for Db2 - V13.01.00 - BMC SOFTWARE, INC.   *//
//* **************************************************************************** *//
//* **************************************************************************** *//
//*                      BATCH JCL GENERATION                                    *//
//*                      FOR SELECTED OBJECTSETS                                 *//
//* **************************************************************************** *//
//ARM0003 EXEC PGM=IKJEFT1B,DYNAMNBR=250,
//             PARM='ISPSTART PGM(ARMBGEN) PARM(DEC2,ARMOPTS=ARM$OPTS)',
//             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)
//ARMPRINT  DD SYSOUT=*
//ARMERROR  DD SYSOUT=*
//ARMHELP   DD SYSOUT=*
//ARMIN     DD *
 SET CURRENT SQLID = ARMQA
 ;
 SET OPTIONS
SITETYPE LOCAL
    BACKOUT NO
    JCLTYPE LOCAL
 ;
   GENJCL
      RECOVER
         TORESTARTRBA
            OBJECTSET 'ARMQA'.'SAMPLE'
   ;
/*
//ISPFILE   DD DSN=&&XARMTMP,
//          DISP=(MOD,PASS),
SPACE-(CYL,(10,5),RLSE),UNIT=WORK,
DCB-(LRECL=80,BLKSIZE=3120,RECFM=FB,DSORG=PS)
//ISPSLIB   DD DISP=SHR,DSN=RMD.TEST.DBSLIB
//ISPTABL   DD DISP=SHR,DSN=RMD.TEST.DBTLIB
//ISPMLIB   DD DISP=SHR,DSN=RMD.TEST.DBMLIB
//          DD DISP=SHR,DSN=SYS1.PROD.ISPMLIB
//ISPTLIB   DD DISP=(,DELETE),UNIT=WORK,SPACE=(CYL,(1,1,2)),
//             DCB=RMD.TEST1110.DBTLIB
//          DD DISP=SHR,DSN=RMD.TEST.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=VB,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              *//
//* *************************************************************** *//
//ARM0004  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)
//ARMPRINT  DD SYSOUT=*
//ARMERROR  DD SYSOUT=*
//SYSUT1    DD DISP=(OLD,DELETE,DELETE),
//             DSN=&&XARMTMP
//SYSUT2 DD DISP=SHR,DSN=RDAJBM.ARM111.JCL(SAMPLE4)

The following is a sample of ARMBGEN JCL that recovers to the last image copy:

//* *********************************************************************** *//
//*    BMC AMI Recovery Manager for Db2 - V13.01.00 - BMC SOFTWARE, INC.    *//
//* *********************************************************************** *//
//* *********************************************************************** *//
//*                      BATCH JCL GENERATION                               *//
//*                      FOR SELECTED OBJECTSETS                            *//
//* *********************************************************************** *//
//ARM0003 EXEC PGM=IKJEFT1B,DYNAMNBR=250,
//             PARM='ISPSTART PGM(ARMBGEN) PARM(DEC2,ARMOPTS=ARM$OPTS)',
//             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)
//ARMPRINT  DD SYSOUT=*
//ARMERROR  DD SYSOUT=*
//ARMHELP   DD SYSOUT=*
//ARMIN     DD *
 SET CURRENT SQLID = RDAJBM
 ;
 SET OPTIONS SITETYPE LOCAL
             BACKOUT NO
             JCLTYPE LOCAL
 ;
   GENJCL
      RECOVER
         TOCOPY MINUS 0
            OBJECTSET 'ARMQA'.'SAMPLE'
   UPDATE RECOVER_OPTIONS
      RECOVER_UTILITY AFRMAIN
       COPY_AFTER_LP YES
       COPY_AFTER_LB NO
       COPY_AFTER_RP YES
       COPY_AFTER_RB NO
   ;
/*
ISPFILE   DD DSN=&&XARMTMP,
//          DISP=(MOD,PASS),
SPACE-(CYL,(10,5),RLSE),UNIT=WORK,
DCB-(LRECL=80,BLKSIZE=3120,RECFM=FB,DSORG=PS)
//ISPSLIB   DD DISP=SHR,DSN=BMCARM.TEST.DBSLIB
//ISPTABL   DD DISP=SHR,DSN=BMCARM.TEST.DBTLIB
//ISPMLIB   DD DISP=SHR,DSN=BMCARM.TEST.DBMLIB
//          DD DISP=SHR,DSN=SYS1.PROD.ISPMLIB
//ISPTLIB   DD DISP=(,DELETE),UNIT=WORK,SPACE=(TRK,(1,1,2)),
//             DCB=BMCARM.VTEST.DBTLIB
//          DD DISP=SHR,DSN=BMCARM.VTEST.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=VB,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              *//
//* *************************************************************** *//
//ARM0004  EXEC PGM=ARMBGNR,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)
//ARMPRINT  DD SYSOUT=*
//ARMERROR  DD SYSOUT=*
//SYSUT1    DD DISP=(OLD,DELETE,DELETE),
//             DSN=&&XARMTMP
//SYSUT2 DD DISP=SHR,DSN=BMCARM.QA.REGR.JCLLIB(SAMPOUT)

The following is a sample report backup time objective in ARMPRINT DD:

BACKUP TIME OBJECTIVE: 24 MINUTES
                                 

BACKUP TIME ESTIMATE:             

STANDARD  00:08:33                

SNAPSHOT  00:10:55                

CABINET   00:02:33       

The following is a sample report recover time objective in ARMPRINT DD:

RECOVER TIME OBJECTIVE: NOT SET                                   

RECOVER TIME ESTIMATE:                                                        
BACKOUT NO   00:00:00 NO ESTIMATE - NO USABLE COPY FOR ONE OR MORE OBJECTS    
BACKOUT YES  00:00:00 NO ESTIMATE - BACKOUT NOT VALID FOR ONE OR MORE OBJECTS
BACKOUT AUTO 00:59:40 CATALOG STATS NEED TO BE UPDATED                      
RECOVER TIME OBJECTIVE: 39 MINUTES                                             

RECOVER TIME ESTIMATE:                                                         
BACKOUT NO   00:00:00 NO ESTIMATE - NO USABLE COPY FOR ONE OR MORE OBJECTS     
BACKOUT YES  00:00:00 NO ESTIMATE - BACKOUT NOT VALID FOR ONE OR MORE OBJECTS  
BACKOUT AUTO 00:59:40 CATALOG STATS NEED TO BE UPDATED   

The following is a sample JCL generated for ARMBGEN GENJCL MODIFY command:

Warning

Important

ARMBGEN MODIFY syntax has the same validation as panel ARMGM001


//************************************************************************ *//

//*   BMC AMI Recovery Manager for Db2 - V13.01.00 - BMC SOFTWARE, INC.   *//
//*                  SLIB MEMBER = ARMBGENZ                                *//
//************************************************************************ *//
//*                  BATCH JCL GENERATION                                  *//
//*                  FOR SELECTED OBJECTSETS                               *//
//************************************************************************ *//

//ARM0000 EXEC PGM=IKJEFT1B,DYNAMNBR=250,                       
//  PARM='ISPSTART PGM(ARMBGEN)PARM(DEJM,ARMOPTS=JLW$OPTS)',          
//  REGION=0M,COND=(4,LT)                                              
//STEPLIB   DD DISP=SHR,DSN=SCC.WJLW1211.LOAD                          
//          DD DISP=SHR,DSN=SCC.PTFS1210.BMCLINK
//          DD DISP=SHR,DSN=ARM.WJLW1216.LOAD                          
//          DD DISP=SHR,DSN=CSG.DEJM.DSNEXIT                           
//          DD DISP=SHR,DSN=CSGI.DB2V12M.DSNLOAD                       
//          DD DISP=SHR,DSN=RMD.INST1210.BMCPSWD.ACP                   
//ARMMSGS   DD DISP=SHR,                                               
//          DSN=ARM.WJLW1216.CNTL(ARMMSGS)                             
//ARMPRINT  DD SYSOUT=*                                               
//ARMERROR  DD SYSOUT=*             
//ARMIN     DD *                    
 SET CURRENT SQLID = RDAJLW2 ;      
 GENJCL                             
    MODIFY                          
      OBJECTSET PUBLIC.MODIFY       
        CLONE NO                    
        DELETE                      
          DSNOTFOUND YES            
          DATE 200103               
          MAXCOPIES 14              
          MAXFULLCOPIES 7           
          MAXRECDAYS 14             
          MAXSNAPS 7                
        ICFDELETE YES               
        NOCOPYPEND NO               
        SYSLGRNX YES                
        ANALYZE YES                 
        COMMIT 100                  
        ON_ERROR_BADSTATUS END      
        ON_ERROR_NOTSUPPORTED END
 ;                                 
/* 

The following is a sample of ARMBGEN Recover JCL generation:

//ARMIN     DD *      
  SET OPTIONS         
    INDEP OUTSPACE YES
      MODEL vcat.BMCDBC.databaseName.objectName.p00001
  TO_SSID DB2
;       
  RECOVER
    OBJECTSET objectsetOwner.objectsetName  
      TOCURRENT
/* 

The following is a sample of ARMBGEN Recover JCL generation for LISTDEFDD: 

//ARMIN     DD *      
SET OPTIONS                            
    LISTDEFDD                          
      DSN PDS(MEMBER)                  
      LIST_NAME MYLIST                 
;                                      
  GENJCL                                
     RECOVER                           
        TOLOGPOINT 00000000047813000000
           OBJECTSET "MVSIBA"."IX_TS"  
  ;
/*                            

The following is a sample of ARMBGEN Backup JCL generation for LISTDEFDD, TEMPLATEDD, and COPYTOCOPY: 

//ARMIN     DD *      
SET OPTIONS                           
    LISTDEFDD                         
      LISTDEF.PDS.NAME(MEMBER1)                
      LIST_NAME MYLIST                
    TEMPLATEDD                        
      TEMPLATE.PDS.NAME(MEMBER2)                
      TEMPLATE_NAME MYTMPLAT          
;                                     
  GENJCL                              
     GENJCL                             
     BACKUP
       COPYTOCOPY
        FROMLASTCOPY                          
           OBJECTSET "BMCOBJ"."IX_TS"
  ;                            
/*                            

The following is a sample of ARMPRINT that calculates the timestamp for CURRENT_MINUS: 

GENJCL                                                              
      RECOVER                                                          
         TOTIMESTAMP CURRENT_MINUS_HOURS 34                            
            OBJECTSET "PUBLIC"."BYPART"                                
   ;                                                                   
BMC81059I DATA COLLECTION TURNED OFF: DATACOLLECTION=NO IN OPTIONS FILE
                                                                      
BMC80799I RECOVERY TIMESTAMP IS 2022-03-25-02.48.50.000000             
                                                                      
BMC80526I PROCESSING - OBJECTSET PUBLIC.BYPART                             

 

Tip: For faster searching, add an asterisk to the end of your partial query. Example: cert*

BMC AMI Recovery Manager for Db2 13.1