Prepare the JCL for dynamic variable substitution

Learn how to identify and mark parameters for dynamic variable substitution.

About this task

Developer for z/OS® must identify the parameters that must be substituted when the Menu Manager command is processed. You must create a template from the JCL that must be processed so that the commands can be identified. In the template, surround each parameter in the JCL that must be substituted with exclamation marks (!), as shown in the following sample JCL.

This JCL defines a program resource to CICS® that is in ELISEE.TEST.JCL(PROGRDO). It was prepared to mark where the substitution parameters are located. The parameters in this sample JCL that require substitutions are USERID, PROGRAM, GROUP, and LANGUAGE.

//!USERID!C JOB , 
// MSGCLASS=H,TIME=(,4),REGION=28M,COND=(16,LT),NOTIFY=!USERID! 
//************************************************************* 
//* @START_RRS_COPYRIGHT@                                     * 
//* LICENSED MATERIALS - PROPERTY OF IBM                      * 
//*                                                           * 
//* RESTRICTED MATERIALS OF IBM                               * 
//*                                                           * 
//* (C) COPYRIGHT IBM CORP. 2005, 2024                        * 
//*                                                           * 
//* @END_RRS_COPYRIGHT@                                       * 
//************************************************************* 
//************************************************************* 
//*                                                           * 
//* RDO RESOURCE DEFINITIONS                                  * 
//*                                                           * 
//************************************************************* 
//*                                                           * 
//* MODIFY THE FOLLOWING DD CARDS TO MATCH YOUR SITE          * 
//* INFORMATION.                                              * 
//*                                                           * 
//* NAME      PURPOSE                                         * 
//* --------- -------------------------------------           * 
//* STEPLIB   CICS SDFHLOAD AND SDFHAUTH DATASETS             * 
//* DFHCSD CSD DATASET                                        * 
//*                                                           * 
//************************************************************* 
//*                                                           * 
//DEFINE   EXEC PGM=DFHCSDUP,REGION=1024K,PARM='CSD(READWRITE)' 
//STEPLIB  DD DSN=CICSTS.V3R1M0.CICS.SDFHLOAD,DISP=SHR 
//         DD DSN=CICSTS.V3R1M0.CICS.SDFHAUTH,DISP=SHR 
//DFHCSD   DD DSN=CICSTS31.DFHCSD,DISP=SHR 
//SYSPRINT DD SYSOUT=* 
//SYSIN    DD * 
  DEFINE PROGRAM(!PROGRAM!) GROUP(!GROUP!) 
  DESCRIPTION(CICS RDO PROGRAM DEFINITION) 
  LANGUAGE(!LANGUAGE!) CEDF(YES) DATALOCATION(ANY) EXECKEY(USER) 
  STATUS(ENABLED) 
/* 
//