Have You tried *without*: "IF j_ddname.didx <> 'SYSUT2' THEN" ?
Regards, Thomas Berg __________________________________________ Thomas Berg Specialist IT-U SWEDBANK > -----Ursprungligt meddelande----- > Från: IBM Mainframe Discussion List > [mailto:[email protected]] För Visser, Hans (PinkRoccade > Infrastructure Services Technisch Specialist) > Skickat: den 17 april 2009 12:56 > Till: [email protected] > Ämne: Re: SDSF info in Rexx > > > Thomas, > > Setting a ...COLS variable is not necessary. > > If you don't set that variable, you get ALL the columns. > > My problem is that I get no columns at all. > > Regards, > > Hans > > -----Original Message----- > From: IBM Mainframe Discussion List > [mailto:[email protected]] On Behalf Of Thomas Berg > Sent: vrijdag 17 april 2009 12:14 > To: [email protected] > Subject: SV: SDSF info in Rexx > > Yes, isfdcols is probably the right variable to set FORMDEF > and PAGEDEF in. > > > > Regards, > Thomas Berg > __________________________________________ > Thomas Berg Specialist IT-U SWEDBANK > > > > > > -----Ursprungligt meddelande----- > > Från: IBM Mainframe Discussion List > > [mailto:[email protected]] För Visser, Hans (PinkRoccade > > Infrastructure Services Technisch Specialist) > > Skickat: den 17 april 2009 10:55 > > Till: [email protected] > > Ämne: Re: SDSF info in Rexx > > > > > > Sean, > > > > I check ISFCOLS,ISFCOLS2, ISFDCOLS, ISFDCOLS2, ISFRCOLS > and ISFRCOLS2 > > with "ISFEXEC ST (DELAYED)" > > > > DELAYED2 dos not exist. > > > > This is what I get: > > > > isfcols JNAME TOKEN JOBID OWNERID JPRIO QUEUE JCLASS POS > > SYSAFF ACTSYS STATUS > > PRTDEST SECLABEL TGNUM TGPCT ORIGNODE EXECNODE > DEVID OFFDEVS RETCODE > > SRVCLS > > WLMPOS SCHENV DELAY SSMODE SPIN > > > > > > > > isfcols2 DDNAME TOKEN STEPN PROCS DSID OWNERID OCLASS > > DESTN RECCNT PAGECNT > > BYTECNT COPYCNT DEST NODE OGNAME SECLABEL > PRMODE BURST DSDATE FORMS > > FCBID UCSID > > WTRID FLASHID FLASHC SEGID DSNAME CHARS CPYMOD > > CPYMODFT > > > > > > isfdcols > > > > > > > > isfdcols2 > > > > > > > > isfrcols SYSAFF > > > > > > > > isfrcols2 > > > > > > But NO pagedef > > > > Regards, > > > > Hans > > > > -----Original Message----- > > From: IBM Mainframe Discussion List > > [mailto:[email protected]] On Behalf Of Smith, Sean M > > Sent: vrijdag 17 april 2009 0:16 > > To: [email protected] > > Subject: Re: SDSF info in Rexx > > > > You may need to look at using the DELEAYED or DELAYED2 > option on the > > ISFEXEC call to get these variables. Check the ISFCOLS and > ISFCOLS2 > > variable on return to see what variables are there for your > choosing. > > > > Sean > > > > -----Original Message----- > > From: IBM Mainframe Discussion List > > [mailto:[email protected]] On Behalf Of Visser, Hans > (PinkRoccade > > Infrastructure Services Technisch Specialist) > > Sent: Thursday, April 16, 2009 7:10 AM > > To: [email protected] > > Subject: Re: SDSF info in Rexx > > > > > > Thomas, > > > > Result: > > > > SAY j_ddname.didx pagedef pagedef.didx j_pagedef j_pagedef.didx > > > > SYSUT2 PAGEDEF PAGEDEF.4 J_PAGEDEF J_PAGEDEF.4 > > > > > > > > > > -----Original Message----- > > From: IBM Mainframe Discussion List > > [mailto:[email protected]] On Behalf Of Thomas Berg > > Sent: Thursday, April 16, 2009 3:44 PM > > To: [email protected] > > Subject: SV: SDSF info in Rexx > > > > Initiate variable isfcols with (at least) pagedef and formdef, e g: > > > > isfcols = 'DDNAME STEPN PROCS PAGEDEF FORMDEF' > > > > immediately before: > > > > "ISFACT ST TOKEN('"token.jidx"') PARM(NP ?) (PREFIX J_" > > > > > > > > Regards, > > Thomas Berg > > __________________________________________ > > Thomas Berg Specialist IT-U SWEDBANK > > > > > > > > > > > > > -----Ursprungligt meddelande----- > > > Från: IBM Mainframe Discussion List > > > [mailto:[email protected]] För Visser, Hans (PinkRoccade > > > Infrastructure Services Technisch Specialist) > > > Skickat: den 16 april 2009 15:24 > > > Till: [email protected] > > > Ämne: Re: SDSF info in Rexx > > > > > > > > > Thomas, > > > > > > I know, but how to GET that info. > > > > > > See REXX below: > > > > > > /******************************** REXX > > > ********************************/ > > > /* > > > */ > > > /*TRACE R > > > */ > > > /* > > > */ > > > rc = ISFCALLS('ON') > > > > > > /* > > > */ > > > isfprefix = 'TC49*' > > > > > > /* > > > */ > > > ADDRESS SDSF > > > > > > /* > > > */ > > > "ISFEXEC ST (VERBOSE DELAYED)" > > > > > > /* > > > */ > > > DO jidx=1 TO jname.0 > > > > > > IF jname.jidx = 'TC49VISF' THEN > > > > > > DO > > > > > > "ISFACT ST TOKEN('"token.jidx"') PARM(NP ?) (PREFIX > > > J_" > > > /* > > > */ > > > DO didx=1 TO j_ddname.0 > > > > > > IF j_ddname.didx <> 'SYSUT2' THEN > > > > > > ITERATE > > > > > > /* > > > */ > > > SAY j_ddname.didx pagedef pagedef.didx j_pagedef > > > j_pagedef.didx > > > END > > > > > > END > > > > > > END > > > > > > /* > > > */ > > > rc = ISFCALLS('OFF') > > > > > > /* > > > */ > > > RETURN > > > > > > /* > > > */ > > > > > > Regards, Hans > > > > > > > > > -----Original Message----- > > > From: IBM Mainframe Discussion List > > > [mailto:[email protected]] On Behalf Of Thomas Berg > > > Sent: Thursday, April 16, 2009 2:14 PM > > > To: [email protected] > > > Subject: SV: SDSF info in Rexx > > > > > > They are found in the JDS (Job Data Set) panel, with column names > > > PAGEDEF and FORMDEF. > > > (And OD panel.) > > > > > > > > > > > > Regards, > > > Thomas Berg > > > __________________________________________ > > > Thomas Berg Specialist IT-U SWEDBANK > > > > > > > > > > > > > > > > > > > -----Ursprungligt meddelande----- > > > > Från: IBM Mainframe Discussion List > [mailto:[email protected]] > > > > För Hans Visser > > > > Skickat: den 16 april 2009 13:58 > > > > Till: [email protected] > > > > Ämne: SDSF info in Rexx > > > > > > > > Hi listers, > > > > > > > > I want to extract column information from > > SDSF in a > > > > REXX. > > > > > > > > F.i. pagedef and formdef. > > > > > > > > I can get and see a lot of data and > > columns but NOT > > > > pagedef and formdef. > > > > > > > > How can this be done? > > > > > > > > Regards, Hans > > > > > > > > > > > > > > ---------------------------------------------------------------------- > > > > 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 > > > > > > > > > ---------------------------------------------------------------------- > > > 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 > > > > > ---------------------------------------------------------------------- > > 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 > > > > > ---------------------------------------------------------------------- > > 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 > > ---------------------------------------------------------------------- > 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
