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
