z/OS MVS JCL Reference
Previous topic | Next topic | Contents | Contact z/OS | Library | PDF


Alternative 2 - Add the job JCL to the existing procedure

z/OS MVS JCL Reference
SA23-1385-00

If you do not plan to define an IEFJOBS concatenation in MSTJCLxx and the procedure DUMPCHK is already defined in SYS1.PROCLIB or one of the other data sets in the IEFPDSI concatenation of MSTJCLxx, use a JOB statement in the DUMPCHK member that formerly contained only the procedure, along with an EXEC statement that will run the existing procedure, and convert the existing procedure to an in-stream procedure by adding PROC and PEND statements, if they are not already present. For example:
//DUMPCHK  JOB  'accounting_info',MSGLEVEL=(1,1)
//DUMPCHK  PROC
//DUMPCHK  EXEC PGM=DMPCHKO,REGION=5M,PARM='/&SG,&JDATE,&DAY'
//STEPLIB  DD   DSN=JCR.PGM.LOAD,DISP=SHR
//CDS      DD   DSN=DATAMGT.CDS,DISP=SHR
//         DD   DSN=DATAMGT.CDS.CLEAR,DISP=SHR
//         DD   DSN=DATAMGT.CDS.Y43DUMPS,DISP=SHR
//LOG      DD   DSN=SYS1.TSODUMP.LOG,DISP=SHR
//SYSPRINT DD   SYSOUT=*
//         PEND
//         EXEC DUMPCHK
When the START command is issued, MVS™ inserts a JCL SET statement after the JOB statement, resulting in the following JCL:
//DUMPCHK  JOB  'accounting_info',MSGLEVEL=(1,1)
//         SET  SG=ALL,JDATE=93119,DAY=THURSDAY
//DUMPCHK  PROC
//DUMPCHK  EXEC PGM=DMPCHKO,REGION=5M,PARM='/&SG,&JDATE,&DAY'
//STEPLIB  DD   DSN=JCR.PGM.LOAD,DISP=SHR
//CDS      DD   DSN=DATAMGT.CDS,DISP=SHR
//         DD   DSN=DATAMGT.CDS.CLEAR,DISP=SHR
//         DD   DSN=DATAMGT.CDS.Y43DUMPS,DISP=SHR
//LOG      DD   DSN=SYS1.TSODUMP.LOG,DISP=SHR
//SYSPRINT DD   SYSOUT=*
//         PEND
//         EXEC DUMPCHK
Note: This alternative will not work for converting procedures to jobs when the job will run under the MASTER subsystem (SUB=MSTR either explicitly specified on the START command or defaulted to).

Go to the previous page Go to the next page




Copyright IBM Corporation 1990, 2014