> -----Original Message----- > From: IBM Mainframe Discussion List > [mailto:[EMAIL PROTECTED] On Behalf Of Vernooy, C.P. - SPLXM > Sent: Wednesday, June 13, 2007 8:33 AM > To: [email protected] > Subject: Re: Read JCL Symbols from a program? > > > > > "McKown, John" <[EMAIL PROTECTED]> wrote in message > news:<[EMAIL PROTECTED] > nrh.dom>.. > .. > > > -----Original Message----- > > > From: IBM Mainframe Discussion List > > > [mailto:[EMAIL PROTECTED] On Behalf Of Kirk Wolf > > > Sent: Wednesday, June 13, 2007 8:10 AM > > > To: [email protected] > > > Subject: Re: Read JCL Symbols from a program? > > > > > > > > > > > Example: > > > > > > // SET PARM1=NEW > > > // EXEC PROC=FOO,PARM2=OLD > > > > > > In this example, while executing the FOO proc, you have > JCL symbols > > > PARM1 and PARM2. > > > > > > My question is this: does anyone know a way for a program to > > > read the > > > current JCL symbols? > > > It could be that all of this information is washed away by > > > the converter > > > interpreter.... > > > > > > Kirk Wolf > > > Dovetailed Technologies > > > > I am fairly sure that the information is indeed "washed away" by the > > converter and not kept in any kind of control block that you can > > __easily__ access. If you really wanted to, you might be able to get > > hold of the JESJCL dataset like SDSF does and parse that > out yourself. > > <shiver> I looked and the information is NOT in the $INTTEXT spool > > dataset. > > > > -- > > You can, of course, pass the required symbols as parm to the program: > //PGM EXEC PMG=PROG1,PARM='SYMBOL1=&SYMBOL1,SYMBOL2=&SYMBOL2,...."' > > Kees.
Very true. But I got the idea that the original person may have wanted to write a subroutine or something to find out which "variables" have been "set" and their associated "value". He didn't really say. The other problem could be that old 100 character limit on the length of a PARM. Like passing a UNIX file name into something. UNIX file names can be up to 255 characters in length, assuming that I am remembering correctly. -- John McKown Senior Systems Programmer HealthMarkets Keeping the Promise of Affordable Coverage Administrative Services Group Information Technology The information contained in this e-mail message may be privileged and/or confidential. It is for intended addressee(s) only. If you are not the intended recipient, you are hereby notified that any disclosure, reproduction, distribution or other use of this communication is strictly prohibited and could, in certain circumstances, be a criminal offense. If you have received this e-mail in error, please notify the sender by reply and delete this message without copying or disclosing it. ---------------------------------------------------------------------- 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
