Here's what I do to pass a DB2 plan name to a subroutine 10 level below the step-level prog:
// SET PLAN=PlanName ... //DB2PLAN DD DISP=(,PASS),SPACE=(0,0),DSN=&&&PLAN The DSN expands into SYSxxxxx.Txxxxxx.RAxxx.xxxxxxxx.PlanName.Hxx, and so the subroutine issues RDJFCB against DD=DB2PLAN to get and parse the DSN. HTH, -Victor- On Wed, 13 Jun 2007 08:09:56 -0500, Kirk Wolf <[EMAIL PROTECTED]> wrote: >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 ---------------------------------------------------------------------- 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