Yes, with no result.
I tried everything - 1.
And I'm looking for just that last 1. ;-)
-----Original Message-----
From: IBM Mainframe Discussion List [mailto:[email protected]] On Behalf Of
Thomas Berg
Sent: vrijdag 17 april 2009 13:46
To: [email protected]
Subject: SV: SDSF info in Rexx
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
----------------------------------------------------------------------
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
