Catalog Forward Recovery Steps with ICFRU

Since ICFRU program execution is not very visible in the rather lengthy catalog recovery procedure in the preceding section, this section presents only the steps that involved ICFRU programs.

The jobs below could be run as steps within a single job. There is no harm in executing all of the steps in this way since you can rerun them independently. However, this means that you should not use temporary data sets to pass between the job steps. It is especially important that you save the output data set from CRURRSV if there was a lot of SMF data that had to be read as input. The execution jobs or steps are shown in the following figures.

Figure 1. Executing CRURRSV. Use the skeleton JCL shown here for running Record Selection and Validation The output must next be sorted.

//********************************************************
//* INTEGRATED CATALOG FORWARD RECOVERY UTILITY          *
//* JCL EXAMPLE -                                        *
//* THIS JCL EXECUTES RECORD SELECTION AND VALIDATION.   *
//* MODIFY THE STEPLIB DD STATEMENTS TO POINT TO THE     *
//* INSTALLATION LOAD MODULE LIBRARY CONTAINING CRURRSV. *
//* MODIFY THE SMFIN DD STATEMENT TO POINT TO THE        *
//* SMF INPUT DATA SETS.                                 *
//* MODIFY THE SMFOUT DD STATEMENT TO CONFORM TO YOUR    *
//* INSTALLATION CONVENTIONS.                            *
//* SMFOUT MAY BE PASSED TO THE SORT STEP.               *
//* SPECIFY PARAMETERS APPROPRIATE TO THIS RECOVERY.     *
//********************************************************
//* RUN CRURRSV TO EXTRACT APPROPRIATE DATA.
//********************************************************
//RRSV EXEC PGM=CRURRSV,REGION=1024K,
// PARM=('catalog.name',
//       'mm/dd/yy','hh:mm:ss',
//       'mm/dd/yy','hh:mm:ss',
//       'mmmm',
//       'ssss')
//*PARM=('CATALOG.NAME',
//*      'STARTDATE','STARTTIME',
//*      'STOPDATE','STOPTIME',
//*      'GAPTIME',
//*      'CLOCKDIFFERENCE')
//STEPLIB DD DSN=USER.LOAD,DISP=SHR
//SYSUDUMP DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSLOG DD SYSOUT=*
//SMFIN DD DSN=system1.smfdump(-n),DISP=SHR,DCB=BUFNO=60
//      DD DSN=system1.smfdump(-1),DISP=SHR,DCB=BUFNO=60
//      DD DSN=system1.smfdump(0),DISP=SHR,DCB=BUFNO=60
//      DD DSN=system2.smfdump(-n),DISP=SHR,DCB=BUFNO=60
//      DD DSN=system2.smfdump(-1),DISP=SHR,DCB=BUFNO=60
//      DD DSN=system2.smfdump(0),DISP=SHR,DCB=BUFNO=60
//SMFOUT DD DSN=SMF.CAT.RECS,DISP=(NEW,CATLG),
// UNIT=SYSDA,SPACE=(CYL,(10,1),RLSE),DCB=BUFNO=60

Figure 2. Executing the Sort. Use the skeleton JCL and sort control shown here for sorting the SMF records from CRURRSV. The sorted records will be processed by CRURRAP.

//********************************************************
//* INTEGRATED CATALOG FORWARD RECOVERY UTILITY          *
//* JCL EXAMPLE -                                        *
//* THIS JCL EXECUTES THE NECESSARY SORT STEP.           *
//* THE SORTIN MAY BE PASSED FROM THE CRURRSV STEP.      *
//* MODIFY THE SORTOUT DD STATEMENT TO CONFORM TO YOUR   *
//* INSTALLATION CONVENTIONS.                            *
//* THE SORTOUT MAY BE PASSED TO THE CRURRAP STEP.       *
//* MODIFY THE SORT STEP AS APPROPRIATE, TO INVOKE       *
//* THE SORT PRODUCT AVAILABLE IN YOUR INSTALLATION      *
//* (THIS EXAMPLE INVOKES DFSORT.                        *
//********************************************************
//* SORT THE OUTPUT FROM CRURRSV.
//********************************************************
//SORT     EXEC PGM=ICEMAN
//SYSOUT   DD SYSOUT=*
//SORTIN   DD DSN=SMF.CAT.RECS,DISP=SHR
//*        DD DSN=concatenations if necessary
//SORTOUT  DD DSN=SMF.SORTED.CAT.RECS,DISP=(NEW,CATLG),
// UNIT=SYSDA,SPACE=(CYL,(10,1),RLSE)
//SYSIN    DD *
OPTION DYNALLOC=SYSDA,FILSZ=E10000,EQUALS
 SORT FIELDS=(218,44,CH,A,262,1,BI,A,11,4,PD,D,7,4,BI,D)
/*

Figure 3. Executing CRURRAP. Use the skeleton JCL shown here for running CRURRAP. The data set produced will be used as input to an IDCAMS IMPORT.

//********************************************************
//* INTEGRATED CATALOG FORWARD RECOVERY UTILITY          *
//* JCL EXAMPLE -                                        *
//* THIS JCL EXECUTES RECORD SELECTION AND PROCESSING.   *
//* MODIFY THE STEPLIB DD STATEMENTS TO POINT TO THE     *
//* INSTALLATION LOAD MODULE LIBRARY CONTAINING CRURRAP. *
//* THE SMFIN DD STATEMENT MAY SPECIFY A DATA SET        *
//* PASSED FROM THE SORT STEP.                           *
//* MODIFY THE EXPIN DD STATEMENT TO POINT TO            *
//* THE EXPORT DATA SET TO BE USED AS THE RECOVERY BASE. *
//* MODIFY THE EXPOUT DD STATEMENT TO CONFORM TO YOUR    *
//* INSTALLATION CONVENTIONS.                            *
//* SPECIFY PARAMETERS APPROPRIATE TO THIS RECOVERY:     *
//* THEY SHOULD BE THE SAME AS THE ONES USED IN CRURRSV. *
//********************************************************
//* RUN CRURRAP USING OUTPUT FROM SORT.
//********************************************************
//RRAP EXEC PGM=CRURRAP,REGION=1536K,
// PARM=('catalog.name',
//       'mm/dd/yy','hh:mm:ss',
//       'mm/dd/yy','hh:mm:ss',
//       'mmmm',
//       'ssss')
//*PARM=('CATALOG.NAME',
//*      'STARTDATE','STARTTIME',
//*      'STOPDATE','STOPTIME',
//*      'GAPTIME',
//*      'CLOCKDIFFERENCE')
//STEPLIB DD DSN=USER.LOAD,DISP=SHR
//SYSUDUMP DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSLOG DD SYSOUT=*
//SMFIN    DD DSN=SMF.SORTED.CAT.RECS,DISP=SHR,DCB=BUFNO=60
//EXPIN    DD DSN=Baplicat.CATALOG.BACKUP(0),DISP=SHR,
//            DCB=BUFNO=60
//EXPOUT DD DSN=Baplicat.NEW.CATALOG.EXPORT,DISP=(NEW,CATLG),
//          UNIT=SYSDA,SPACE=(CYL,(10,1),RLSE),DCB=BUFNO=60