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