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=*
//*

 

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

MAXM Reorg for IMS 5.0 and MAXM Reorg for IMS with Online/Defrag Feature 5.0