Example 2: Sample Batch Backout skeleton JCL


The following figure provides a sample of batch backout skeleton JCL.

//RCFBBO  JOB  . . . . . .
//*
//**************************
//** RCFBBO SAMPLE JCL    **
//**************************
//*
//RCFBBO   PROC PSB='?',BBODYTM='?',
//            RCF2PRM='?',
//            SOUT='?',IMSID='?',
//            BBOLOGP='..........',
//            BBOLOGS='..........',
//            RGN=512K,BUF=8,SPIE=0,TEST=0,EXCPVR=0,RST=0,
//            LOGT=TAPE,PRLD=,SRCH=0,CKPTID=,MON=N,LOGA=0,
//            FMTO=T,SWAP=,DBRC=Y,IRLM=,IRLMNM=,BKO=N
//*
//BBO      EXEC    PGM=DFSRRC00,REGION=&RGN,
//           PARM=(DBB,DFSBBO00,&PSB,&BUF,
//           &SPIE&TEST&EXCPVR&RST,&PRLD,
//           &SRCH,&CKPTID,&MON,&LOGA,&FMTO,
//           &IMSID,&SWAP,&DBRC,&IRLM,&IRLMNM,&BKO)
//*********************************
//** EXECUTE BATCH BACKOUT       **
//*********************************
//STEPLIB  DD DSN=IMSVS.RESLIB,DISP=SHR
//DFSRESLB DD DSN=IMSVS.RESLIB,DISP=SHR
//IMSACB   DD DSN=IMSVS.ACBLIB,DISP=SHR
//IMSACBA  DD DSN=IMSVS.ACBLIBA,DISP=SHR
//IMSACBB  DD DSN=IMSVS.ACBLIBB,DISP=SHR
//MODSTAT  DD DSN=IMSVS.MODSTAT,DISP=SHR
//PROCLIB  DD DSN=IMSVS.PROCLIB,DISP=SHR
//DFSVSAMP DD DSN=IMSVS.PROCLIB(DFSVSMxx),DISP=SHR
//IEFRDER  DD DSN=&BBOLOGP..&PSB..&BBODYTM,
//            DISP=(NEW,KEEP),VOL=(,,,99),UNIT=(&LOGT,,DEFER),
//            DCB=(RECFM=VB,BLKSIZE=1920,LRECL=1916)
//IEFRDER2 DD DSN=&BBOLOGS..&PSB..&BBODYTM,
//            DISP=(NEW,KEEP),VOL=(,,,99),UNIT=(&LOGT,,DEFER),
//            DCB=(RECFM=VB,BLKSIZE=1920,LRECL=1916)
//IMSUDUMP DD SYSOUT=&SOUT
//SYSUDUMP DD SYSOUT=&SOUT
//*
//**>> DD STATEMENTS FOR FULL-FUNCTION DATABASES
//**>>       (IF USING IMS/VS 1.3)
//*
//TSSRCF2  EXEC    PGM=TSSRCF2,COND=(0,NE,BBO),
//           PARM='&RCF2PRM'
//*****************
//** NOTIFY RCF  **
//*****************
//STEPLIB  DD DSN=BMC.RCF.FPSLIB,DISP=SHR
//*
// PEND
//*

This section contains the following topic:

 

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

BMC AMI Fast Path Restart for IMS 7.1