The question is how important is to get the data from JCL symbolic variables and not from a parm field. If it SO importand, and there is no "prety" way to do this (although I think there is by jes subsystem calls to read the original job jcl), I would consider one of the following: 1. The "bed" way, Ask the submiter of the job to specify the original library(member) on an agreed ddname and read the JCL from there. The procedures then can be read from Jes proclib concatanation. 2. The ugly way is within your program to call to TSOLNK with a rexx name. Now you can read the sysout with SDSF batch, and analyze the output. There are many ways to get jobname & number from Cobol & rexx.
My two cents... Itschak -----Original Message----- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of GAVIN Darren * OPS EAS Sent: Wednesday, June 13, 2007 5:48 PM To: IBM-MAIN@BAMA.UA.EDU Subject: Re: Read JCL Symbols from a program? The user defined symbols in JCL are handled by the JES (or equivalent) facilities. There is no information I could find on how to access these, other them passing them on a PARM= statement. I suspect there is some callable JES service for it, however it's probably 1. an Authorized Program so application programs wouldn't be able to access it. And 2. Proprietary information, which means IBM hasn't published how to use it, meaning one would need to contact IBM for the information on it. -----Original Message----- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Kirk Wolf Sent: Tuesday, June 12, 2007 1:18 PM To: IBM-MAIN@BAMA.UA.EDU Subject: Read JCL Symbols from a program? Does anyone know how to read the current JCL symbols from a program? ASASYMB apparently won't do it. Its frustrating, since you might be able to use for some interesting things. Thanks for any help, Kirk Wolf Dovetailed Technologies ---------------------------------------------------------------------- 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 ---------------------------------------------------------------------- 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 No virus found in this incoming message. Checked by AVG Free Edition. Version: 7.5.472 / Virus Database: 269.8.13/844 - Release Date: 11/06/2007 17:10 No virus found in this outgoing message. Checked by AVG Free Edition. Version: 7.5.472 / Virus Database: 269.8.13/844 - Release Date: 11/06/2007 17:10 ---------------------------------------------------------------------- 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