Sample JCL for using the RESTART command
The following figure shows sample JCL for the Restart process (RESTART command). This sample is also included in member RESTART1 of the sample library.
Figure 1. Restart process (RESTART command) sample JCL
//JOBCARD JOB (acct),'RESTART POST',MSGCLASS=X,MSGLEVEL=(2,0),
// CLASS=A,NOTIFY=uid
/*JOBPARM K=110
//**********************************************************************
//* REORG FUNCTION RESTART PROCESS USING EXISTING REORG JCL
//* - DOES THE IDCAMS ALTER(S) & DBRC NOTIFICATION
//* AND/OR THE IC/RESTORE THAT WAS NOT COMPLETED IN THE REORG
//*
//* NOTE: THE PREVIOUS REORG MUST HAVE BEEN IN THE POST-PROCESSING
//* PHASE FOR THIS STEP TO BE SUCCESSFUL. IT ALSO MUST USE
//* THE AMSOUT DATASET CREATED IN THE REORG.
//**********************************************************************
//*
//REORGJCL EXEC PGM=DFSRRC00,PARM='ULU,DFSURGL0,dbdName',REGION=0M
//STEPLIB DD DISP=SHR,DSN=bmc.xxx.load
// DD DISP=SHR,DSN=IMSVS.RESLIB
//DFSRESLB DD DISP=SHR,DSN=IMSVS.RESLIB
//IMS DD DISP=SHR,DSN=IMSVS.DBDLIB
//OLD IMS DD DISP-SHR,DSN-IMSVS.DBDOLD <===if DBD changes
//*------------------------------------------------------------------
//* REMOVE ALL INPUT/OUTPUT DATASETS EXCEPT FOR AMSOUT
//*
//*obdname dd disp=shr,dsn=your.original.database <===remove
//*dbdname dd disp=shr,dsn=your.shadow.database <===remove
//*ic1 dd disp=shr,dsn=your.imageCopy.dataSet <===remove
//*
//*------------------------------------------------------------------
//PLUSIN DD *
RESTART PART(partName) <=== replace REORG command
/*
//AMSOUT DD DISP=SHR,DSN=your.restart.info.dataSet <===required
//BMCMSG DD SYSOUT=*
//BMCPRINT DD SYSOUT=*
//BMCTRACE DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//*
// CLASS=A,NOTIFY=uid
/*JOBPARM K=110
//**********************************************************************
//* REORG FUNCTION RESTART PROCESS USING EXISTING REORG JCL
//* - DOES THE IDCAMS ALTER(S) & DBRC NOTIFICATION
//* AND/OR THE IC/RESTORE THAT WAS NOT COMPLETED IN THE REORG
//*
//* NOTE: THE PREVIOUS REORG MUST HAVE BEEN IN THE POST-PROCESSING
//* PHASE FOR THIS STEP TO BE SUCCESSFUL. IT ALSO MUST USE
//* THE AMSOUT DATASET CREATED IN THE REORG.
//**********************************************************************
//*
//REORGJCL EXEC PGM=DFSRRC00,PARM='ULU,DFSURGL0,dbdName',REGION=0M
//STEPLIB DD DISP=SHR,DSN=bmc.xxx.load
// DD DISP=SHR,DSN=IMSVS.RESLIB
//DFSRESLB DD DISP=SHR,DSN=IMSVS.RESLIB
//IMS DD DISP=SHR,DSN=IMSVS.DBDLIB
//OLD IMS DD DISP-SHR,DSN-IMSVS.DBDOLD <===if DBD changes
//*------------------------------------------------------------------
//* REMOVE ALL INPUT/OUTPUT DATASETS EXCEPT FOR AMSOUT
//*
//*obdname dd disp=shr,dsn=your.original.database <===remove
//*dbdname dd disp=shr,dsn=your.shadow.database <===remove
//*ic1 dd disp=shr,dsn=your.imageCopy.dataSet <===remove
//*
//*------------------------------------------------------------------
//PLUSIN DD *
RESTART PART(partName) <=== replace REORG command
/*
//AMSOUT DD DISP=SHR,DSN=your.restart.info.dataSet <===required
//BMCMSG DD SYSOUT=*
//BMCPRINT DD SYSOUT=*
//BMCTRACE DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//*
Tip: For faster searching, add an asterisk to the end of your partial query. Example: cert*