REXX Utility to Create JCL Job Card.

JCL Job card can be created using the Rexx Utility.

By using the REXX we can automate the process of creating the Job card for the JCL using Macros, by entering the Macro Name the Job card will be created inside the JCL Member.

Step — 1: Create the Macro, Below Snippets to be present inside the Member called ‘JOBCARD’

/*REXX MACRO FOR JOB CARD */

ADDRESS ISREDIT
'MACRO'
"LINE_AFTER 0 = '//"USERID()"A JOB "TEST",'"
"LINE_AFTER 1 = '//            CLASS=M,'"
"LINE_AFTER 2 = '//            NOTIFY="USERID()",'"
"LINE_AFTER 3 = '//            MSGCLASS=X,'"

The above Snippets need to be customized per the Mainframe Shop Requirements i.e. CLASS and MSGCLASS.

Step — 2: For Executing the above Macro the required Dataset needs to be in SYSEXEC or SYSPROC, for Testing purposes we can add it dynamically by executing the below Rexx.

/* REXX */

DNAME = '{PDS}' /* Example - TEST.MACRO.REXX Where 'JOBCARD' Memeber Present */
ADDRESS TSO
"FREE FI(SYSEXEC)"
"ALLOC FI(SYSEXEC) DA(DNAME) SHR

After creating the above steps, open the JCL member where the Job Cards need to be placed — on the Command line enter ‘ JOBCARD’ — this will paste the job card into the member.