Job customization and generation

After you have selected database components for recovery, you can customize your job by maintaining parameter sets, adding additional JCL to your job, or by specifying other options in IMS Database Recovery Facility Extended Functions.

The job generation panel is displayed after you have chosen database components and recovery times from the RPID ISPF interface with either the RPID report or without the RPID report.

Job customization helps you generate jobs that are specific to your environment.

If you do not want to customize your job, select Generate DRF job to generate a generic job.

Important: You must supply a data set that contains the JCL that is required to execute the recovery utility. The job generation process creates only the ADD statements that are needed for the input to IMS Database Recovery Facility. These input control statements that are generated by the job generation process are appended to the JCL that you supply.

The following figure shows an example of the IMS Database Recovery Facility Job Generation panel. Your recovery selections are shown after the list of options.

Figure 1. Main IMS Database Recovery Facility job generation option display menu

                               DRF Job Generation
Command ===> __________________________________________________________________


  Select option and press ENTER to continue. Press END to exit DRF Generation.

    _   1. Maintain parameter sets
        2. Specify ADD parameters and utilities
        3. Assign START parameters
        4. Supply DRF environmental control statements
        5. Supply execution JCL
        6. Generate DRF job


  Recovery Generation
     RCVTIME. . . . : ('21.338 11:12:50.200000+0000',TSR)
     Time source. . : Selected Recovery Event's timestamp

  Selected Recovery Event
     Event. . . . . : Full-Recovery
     Timestamp. . . : 21.338 11:12:50.200000+0000  Com: Yes
     Database . . . : DBOHIDK5 - HALDB      DDname. . . . . : POHIDKCB
     Area/Part. . . : POHIDKC               OLR Partner . . : POHIDKCN

  Selected common time span
     Start. . . . . : 21.338 11:10:19.946777+0000   Dec 04 2021
     End. . . . . . : 21.364 14:15:40.100000+0000   Dec 30 2021

  Component Recovery Counts
     Full Function           FastPath                HALDB
       By Database. . : 4      By Database. . : 0      By Database. . : 0
       By DDname. . . : 0      By Area. . . . : 4      By Part. . . . : 10
                                                       By DDname. . . : 0

The ISPF interface contains help panels that provide more detailed information about the interface and its options.

You can access help panels by pressing the PF1 key at any time.

IMS Database Recovery Facility job generation options

The DRF Job Generation panel provides the following six options that you can use to customize and generate IMS Database Recovery Facility jobs.

  1. Use the Maintain Parameter Sets option to maintain groups of parameters that might be associated with IMS Database Recovery Facility ADD and START control statement.

    You can define separate parameter sets for Index Builder, Image Copy, Pointer Checker, and START.

  2. Use the Specify ADD Parameters and Utilities option to customize each generated IMS Database Recovery Facility ADD control statement.

    For example, you can set individual ADD parameters, include utilities, and propagate parameter settings among ADD statements.

  3. Use the Assign START Parameters option to customize the generated IMS Database Recovery Facility START control statement by specifying START parameters.
  4. Use the Supply DRF Environmental Control Statements option to specify or override parameters that are contained in the FRXDRFxx control member.
  5. Use the Supply Execution JCL option to include additional JCL that is required for executing the IMS Database Recovery Facility job.
  6. Use the Generate DRF job option to produce output that is based on your recovery selections and customization specifications.

Database component and recovery time re-selection

You can exit the IMS Database Recovery Facility job generation process, re-select the set of database components to be recovered, and then reenter the IMS Database Recovery Facility job generation process. This ability to exit and reenter the job generation process allows you to modify the set of ADD control statements without starting over.

All parameters, except those that are related to ADD statements, are maintained when you exit and reenter the IMS Database Recovery Facility job generation process.

Because exiting and reentering the IMS Database Recovery Facility job generation process can invalidate ADD statement parameter associations, all ADD statement parameters are discarded when you exit IMS Database Recovery Facility job generation.

Generated jobs

Generated jobs incorporate your database component selections, time selection, and parameter specifications.

After you generate a job, the RPID ISPF interface initiates an ISPF/PDF edit session with a temporary data set that contains the generated statements. The interface does not save these statements to a permanent data set or submit the generated job. You use the editor's facilities to perform these functions.

An example of generated output is shown in the following figure. When multiple database components have the same attributes and have been assigned the same parameters, they are grouped into single ADD control statement.

If IMS Database Recovery Facility environment control statements were specified, they are added to the generated IMS Database Recovery Facility control statement.

You must specify the IMS Database Recovery Facility JCL statements to form a complete job. Otherwise, the input control statements will be generated with no execution JCL.

Figure 2. Sample Generated Output (Part 1 of 2)
//EXAMPLE  JOB (&SYSUID),'&SYSUID',
//         CLASS=A,MSGCLASS=H,MSGLEVEL=(1,1), 
//         REGION=6M,NOTIFY=&SYSUID,USER=&SYSUID 
//* 
//*------------------------------------------------------------------* 
//*  EXECUTE FRXJCLDF PROC FOR DATABASE RECOVERY FACILITY (DRF)      * 
//*------------------------------------------------------------------* 
//* 
// JCLLIB ORDER=(IMSTESTG.PROCLIB) 
//* 
//        EXEC FRXJCLDF,RGN=0M, 
//             SOUT='*', 
//             VCAT=VCATQAV, 
//             DELTA01='IMSTESTG.DELTALIB', 
//             DELTA02='IMSTESTG.DELTALIB', 
//             DELTA03='IMSTESTG.DELTALIB', 
//             RESLIB='IMSBLD.P21RTS16.DRF.SFRXRESL', 
//             NODE=I91RTS16, 
//             DRFMBR=01, 
//             BPECFG=BPEDRFCG, 
//             DRFPROC=DRFS, 
//             GSGNAME=, 
//             PLEXNAME= 
//* 
//* 
//*------------------------------------------------------------------*/ 
//*                                                                  */ 
//*  Selected Recovery Time:                                         */ 
//*     Event......... Full-Recovery                                 */ 
//*     Time stamp.... 21.338 11:12:50.200000+0000  Com: Yes         */ 
//*     Database...... DBOHIDK5                                      */ 
//*     Area/Part..... POHIDKC                                       */ 
//*     DDname........ POHIDKCB                                      */ 
//*                                                                  */ 
//*------------------------------------------------------------------*/ 
//SYSIN    DD  *
  DRFIAX(DRFL)
  REPORT(RPTTYPE=SEP,DRFUNIT=SYSDA,DRFHLQ=DRBX10)
  UTILGBL(COMP=Y,DSN(&ICHLQ..&DBD..&DDN.),UNIT(3390),-
          ICBUF(15),VOLSER(333333),COMPRTN(FABJCMP3))
  OUTPUT(PRO)
  DBDSL101(DISP(NEW))

    /*---------------------------------------------------------------*/
    /*  Fast-Path  Recover Area(s)                                   */
    /*             IC:SOME PARMS                                     */
    /*---------------------------------------------------------------*/
ADD AREA(DEDBDD01 DD01AR0,                                       -
         DEDBJN24 DB24A000,                                      -
         DEDBJN24 DB24A001,                                      -
         DEDBJN24 DB24A239)                                      -
         DBATRB(DBDSL(001),DBDSN(003))                           -
      IC(COMP(Y),                                                -
         COMPRTN(FABJCMP3),                                      -
         DSNTYPE(BASIC),                                         -
         EXPDT(99000),                                           -
         ICBUF(15),                                              -
         ICCAT(Y),                                               -
         ICHLQ(TEST.IC.PRIMARY,                                  -
               TEST.IC.SECOND),                                  -
         ICNMRULE(N),                                            -
         MGMTCLAS(STANDARD),                                     -
         SPACE(CYL,50,75,RLSE),                                  -
         STORCLAS(STORE#IC))
Figure 3. Sample Generated Output (Part 2 of 2)
    /*---------------------------------------------------------------*/
    /*  Full-Func  Recover Database(s)                               */
    /*             IB:TEST         IC:SOME PARMS   PC:FEW REPORTS    */
    /*---------------------------------------------------------------*/
ADD   DB(DBOVLFPC,                                               -
         DHVNTZ02,                                               -
         DIVNTZ02,                                               -
         DXVNTZ02)                                               -
      IB(ICNDX(YES),                                             -
         NDXIOBUF(DATA(128),INDEX(128)),                         -
         SORTE35(YES),                                           -
         SORTID(E),                                              -
         SORTOUT(COPY),                                          -
         SORTSTAT(YES))                                          -
      IC(COMP(Y),                                                -
         COMPRTN(FABJCMP3),                                      -
         DSNTYPE(BASIC),                                         -
         EXPDT(99000),                                           -
         ICBUF(15),                                              -
         ICCAT(Y),                                               -
         ICHLQ(TEST.IC.PRIMARY,                                  -
               TEST.IC.SECOND),                                  -
         ICNMRULE(N),                                            -
         MGMTCLAS(STANDARD),                                     -
         SPACE(CYL,50,75,RLSE),                                  -
         STORCLAS(STORE#IC))                                     -
      PC(BITMAP(NO),                                             -
         DIAG(YES),                                              -
         DUMPFORM(FORMAT),                                       -
         FABASNAP(NO),                                           -
         FSEMAP(YES),                                            -
         INTERVAL(BLOCK(05)),                                    -
         INTFS(YES),                                             -
         INTST(YES),                                             -
         MAXFSD(NO),                                             -
         PRINTDATA(YES),                                         -
         RUNTM(NO),                                              -
         T2CHK(0,7))

    /*---------------------------------------------------------------*/
    /*  HALDB      Recover Partition(s)                              */
    /*---------------------------------------------------------------*/
ADD   DB(POHIDKA,                  /* MASTER DB=DBOHIDK5 */      -
         POHIDKB,                  /* MASTER DB=DBOHIDK5 */      -
         POHIDKC,                  /* MASTER DB=DBOHIDK5 */      -
         POHIDKD,                  /* MASTER DB=DBOHIDK5 */      -
         PVHDJ5A,                  /* MASTER DB=DBVHDJ05 */      -
         PVHDJ5B,                  /* MASTER DB=DBVHDJ05 */      -
         PVHDJ5C,                  /* MASTER DB=DBVHDJ05 */      -
         PVHDJ5D,                  /* MASTER DB=DBVHDJ05 */      -
         P2XHDJA,                  /* MASTER DB=D2XHDJ05 */      -
         P2XIDKA)                  /* MASTER DB=D2XHIDK5 */

      /*-------------------------------------------------------------*/
START RCVTIME('21.338 11:12:50.200000+0000',CHECK)   /*TSR*/     -
         VERIFY(LIST)                                            -
         ERROR(STOP)
/*