Shane's handy IEFUJV exit will do this as will other methods discussed
in the archives.
Since you can do it in a standard SMF exit or JES exit I think it would
be a harder case to make for an IBM
distributed USERMOD than the TSO/E updates for BINPSIZE=x'00'.

File # 573 IEFUJV exit for System Symbolic substitution in JCL 

http://www.cbttape.org/ftp/cbt/CBT573.zip

http://www.cbttape.org

IEFUJV   TITLE 'SMF JOB VALIDATION- ALLOW JCL VARIABLES '              
***********************************************************************
*                                                                     *
*             MODULE NAME = IEFUJV                                    *
*                                                                     *
*             FUNCTION =                                              *
*                PROVIDE ACCESS TO SYSTEM SYMBOLS IN JCL              *
*                USE A "// SET " STATEMENT TO ASSIGN SYSTEM SYMBOLS   *
*                TO VARIABLES LOCAL TO THE JOB;                       *
*                E.G. "// SET LPAR=&SYSNAME  " RESOLVES TO            *
*                     "// SET LPAR=PROD      "                        *
*                THIS MAY THEN BE USED IN A DSNAME, SUCH AS ...       *
*                //DD1   DD  DSN=SYS1.&LPAR..MYLIB                    *
*                                                                     *
*              WARNING =                                              *
*                 SYMBOLS ARE RESOLVED AT PRE-CONVERSION.             *
*                                                                     *
*                 THIS IS PARTICULARLY RELEVANT FOR DATE AND TIME     *
*                 WHERE A JOB IS PLACED ON HOLD OR CROSSES A DAY      *
*                 BOUNDARY.                                           *
*                 LIKEWISE THERE ARE JES MAS AND NJE ISSUES           *
*                                                                     *
*                 CAVEAT EMPTOR                                       *
*                                                                     *
*              NOTES =                                                *
*                                                                     *
*                 TRAILING PERIOD ON SYMBOL MAY OR MAY NOT BE         *
*                 INCLUDED - HAS NO EFFECT ON FUNCTIONALITY.          *
*                                                                     *
*                 MULTIPLE SYMBOLS PER CARD IMAGE IS SUPPORTED        *
*                                                                     *
*                 CONTINUATION OF "SET" CARD IMAGE IS *NOT* SUPPORTED *
*                    (USE MULTIPLE "SET" CARDS)                       *
*                                                                     *
*                 BE AWARE OF SYMBOL SUBSTITUTION EXTENDING THE CARD  *
*                 BEYOND COLUMN 72 - THIS WILL BE RETURNED, AND WILL  *
*                 GENERALLY CAUSE A JCL ERROR.                        *
*                                                                     *
*                 EXIT WILL CLEAR THE INPUT AREA TO ACCOMODATE THE    *
*                 SITUATION WHERE THE RESOLVED TEXT IS SHORTER        *
*                                                                     *
*                 EXIT WILL COPY AN EXTRA BYTE FROM THE TARGET TO     *
*                 ENSURE A BLANK AT END. THIS HANDLES THE SCENARIO    *
*                 WHERE THE RESOLVED IS LONGER, AND COMMENTS FOLLOW.  * 

        Best Regards, 

                Sam Knutson, GEICO 
                Performance and Availability Management 
                mailto:[EMAIL PROTECTED] 
                (office)  301.986.3574 

"Think big, act bold, start simple, grow fast..." 

-----Original Message-----
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf Of Schramm, Rob
Sent: Tuesday, April 18, 2006 12:58 PM
To: [email protected]
Subject: Re: Static Symbols in JCL

I wonder if IBM would consider providing a USERMOD that would perform
symbol conversion on the system that the job actually executes (thus
preserving the "just like a started task")

Just a thought. 

-Rob
<snip>


This e-mail transmission contains information that is confidential and
may be privileged.   It is intended only for the addressee(s) named
above. If you receive this e-mail in error, please do not read, copy or
disseminate it in any manner. If you are not the intended recipient, any
disclosure, copying, distribution or use of the contents of this
information is prohibited. Please reply to the message immediately by
informing the sender that the message was misdirected. After replying,
please erase it from your computer system. Your assistance in correcting
this error is appreciated.

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions, send
email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search
the archives at http://bama.ua.edu/archives/ibm-main.html
====================
This email/fax message is for the sole use of the intended
recipient(s) and may contain confidential and privileged information.
Any unauthorized review, use, disclosure or distribution of this
email/fax is prohibited. If you are not the intended recipient, please
destroy all paper and electronic copies of the original message.

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Reply via email to