Rational Developer for System z


Prepare the JCLs for dynamic variable substitution

This lesson describes how to identify and mark parameters for dynamic variable substitution.
Rational® Developer for System z® needs to identify the parameters that need to be substituted when the Menu Manager command is processed. You need to create a template from the JCLs that need to be processed so that the commands can be identified. In the template, surround each parameter in the JCL that needs to be substituted with exclamation marks (!), as shown in the following example JCL.

This JCL defines a program resource to CICS® that is located in ELISEE.TEST.JCL(PROGRDO). It has been 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                              * 
//*                                                           * 
//* @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) 
/* 
//

Terms of use | Feedback



This information center is powered by Eclipse technology. (http://www.eclipse.org)