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 lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
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:ibm-m...@bama.ua.edu] För Hans Visser > Skickat: den 16 april 2009 13:58 > Till: IBM-MAIN@bama.ua.edu > Ä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 lists...@bama.ua.edu 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 lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
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:ibm-m...@bama.ua.edu] On Behalf Of
Thomas Berg
Sent: Thursday, April 16, 2009 2:14 PM
To: IBM-MAIN@bama.ua.edu
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:ibm-m...@bama.ua.edu] För Hans Visser
> Skickat: den 16 april 2009 13:58
> Till: IBM-MAIN@bama.ua.edu
> Ä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 lists...@bama.ua.edu 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 lists...@bama.ua.edu 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 lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
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:ibm-m...@bama.ua.edu] För Visser, Hans (PinkRoccade
> Infrastructure Services Technisch Specialist)
> Skickat: den 16 april 2009 15:24
> Till: IBM-MAIN@bama.ua.edu
> Ä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:ibm-m...@bama.ua.edu] On Behalf Of Thomas Berg
> Sent: Thursday, April 16, 2009 2:14 PM
> To: IBM-MAIN@bama.ua.edu
> 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:ibm-m...@bama.ua.edu] För Hans Visser
> > Skickat: den 16 april 2009 13:58
> > Till: IBM-MAIN@bama.ua.edu
> > Ä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 lists...@bama.ua.edu with the
> > message: GET IBM-MAIN INFO Search the archives at
> >
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:ibm-m...@bama.ua.edu] On Behalf Of
Thomas Berg
Sent: Thursday, April 16, 2009 3:44 PM
To: IBM-MAIN@bama.ua.edu
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:ibm-m...@bama.ua.edu] För Visser, Hans (PinkRoccade
> Infrastructure Services Technisch Specialist)
> Skickat: den 16 april 2009 15:24
> Till: IBM-MAIN@bama.ua.edu
> Ä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:ibm-m...@bama.ua.edu] On Behalf Of Thomas Berg
> Sent: Thursday, April 16, 2009 2:14 PM
> To: IBM-MAIN@bama.ua.edu
> 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:ibm-m...@bama.ua.edu] För Hans Visser
> > Skickat: den 16 april 2009 13:58
> > Till: IBM-MAIN@bama.ua.edu
> > Ä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 th
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:ibm-m...@bama.ua.edu] On Behalf Of
Visser, Hans (PinkRoccade Infrastructure Services Technisch Specialist)
Sent: Thursday, April 16, 2009 7:10 AM
To: IBM-MAIN@bama.ua.edu
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:ibm-m...@bama.ua.edu] On Behalf Of
Thomas Berg
Sent: Thursday, April 16, 2009 3:44 PM
To: IBM-MAIN@bama.ua.edu
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:ibm-m...@bama.ua.edu] För Visser, Hans (PinkRoccade
> Infrastructure Services Technisch Specialist)
> Skickat: den 16 april 2009 15:24
> Till: IBM-MAIN@bama.ua.edu
> Ä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:ibm-m...@bama.ua.edu] On Behalf Of Thomas Berg
> Sent: Thursday, April 16, 2009 2:14 PM
> To: IBM-MAIN@bama.ua.edu
> 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:ibm-m...@bama.ua.edu] För
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
isfcols2DDNAME 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
isfrcolsSYSAFF
isfrcols2
But NO pagedef
Regards,
Hans
-Original Message-
From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of
Smith, Sean M
Sent: vrijdag 17 april 2009 0:16
To: IBM-MAIN@bama.ua.edu
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:ibm-m...@bama.ua.edu] On Behalf Of
Visser, Hans (PinkRoccade Infrastructure Services Technisch Specialist)
Sent: Thursday, April 16, 2009 7:10 AM
To: IBM-MAIN@bama.ua.edu
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:ibm-m...@bama.ua.edu] On Behalf Of
Thomas Berg
Sent: Thursday, April 16, 2009 3:44 PM
To: IBM-MAIN@bama.ua.edu
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:ibm-m...@bama.ua.edu] För Visser, Hans (PinkRoccade
> Infrastructure Services Technisch Specialist)
> Skickat: den 16 april 2009 15:24
> Till: IBM-MAIN@bama.ua.edu
> Ä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 <>
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:ibm-m...@bama.ua.edu] För Visser, Hans (PinkRoccade
> Infrastructure Services Technisch Specialist)
> Skickat: den 17 april 2009 10:55
> Till: IBM-MAIN@bama.ua.edu
> Ä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
>
>
>
> isfcols2DDNAME 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
>
>
>
> isfrcolsSYSAFF
>
>
>
> isfrcols2
>
>
> But NO pagedef
>
> Regards,
>
> Hans
>
> -Original Message-----
> From: IBM Mainframe Discussion List
> [mailto:ibm-m...@bama.ua.edu] On Behalf Of Smith, Sean M
> Sent: vrijdag 17 april 2009 0:16
> To: IBM-MAIN@bama.ua.edu
> 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:ibm-m...@bama.ua.edu] On Behalf Of Visser, Hans
> (PinkRoccade Infrastructure Services Technisch Specialist)
> Sent: Thursday, April 16, 2009 7:10 AM
> To: IBM-MAIN@bama.ua.edu
> 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:ibm-m...@bama.ua.edu] On Behalf Of Thomas Berg
> Sent: Thursday, April 16, 2009 3:44 PM
> To: IBM-MAIN@bama.ua.edu
> 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:ibm-m...@bama.ua.edu] För Visser, Hans (PinkRoccade
> > Infrastructure Services Technisch Specialist)
> > Skickat: den 16 april 2009 15:24
> > Till: IBM-MAIN@bama.ua.edu
> > Ämne: Re: SDSF info in Rexx
> >
> >
> > Thomas,
> >
> > I know, but how to GET that info.
> >
> > See REXX below:
> >
> > / REXX
> > /
> > /*
> > */
> > /*TRACE R
> > */
> > /*
> > */
> > rc = ISFCALLS('ON')
> >
> > /*
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:ibm-m...@bama.ua.edu] För Visser, Hans (PinkRoccade > Infrastructure Services Technisch Specialist) > Skickat: den 17 april 2009 12:56 > Till: IBM-MAIN@bama.ua.edu > Ä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:ibm-m...@bama.ua.edu] On Behalf Of Thomas Berg > Sent: vrijdag 17 april 2009 12:14 > To: IBM-MAIN@bama.ua.edu > 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:ibm-m...@bama.ua.edu] För Visser, Hans (PinkRoccade > > Infrastructure Services Technisch Specialist) > > Skickat: den 17 april 2009 10:55 > > Till: IBM-MAIN@bama.ua.edu > > Ä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 > > > > > > > > isfcols2DDNAME 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 > > > > > > > > isfrcolsSYSAFF > > > > > > > > isfrcols2 > > > > > > But NO pagedef > > > > Regards, > > > > Hans > > > > -Original Message- > > From: IBM Mainframe Discussion List > > [mailto:ibm-m...@bama.ua.edu] On Behalf Of Smith, Sean M > > Sent: vrijdag 17 april 2009 0:16 > > To: IBM-MAIN@bama.ua.edu > > 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:ibm-m...@bama.ua.edu] On Behalf Of Visser, Hans > (PinkRoccade > > Infrastructure Services Technisch Specialist) > > Sent: Thursday, April 16, 2009 7:10 AM > > To: IBM-MAIN@bama.ua.edu > > 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:ibm-m...@bama.ua.edu] On Behalf Of Thomas Berg > > Sent: T
Re: SDSF info in Rexx
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:ibm-m...@bama.ua.edu] On Behalf Of Thomas Berg Sent: vrijdag 17 april 2009 13:46 To: IBM-MAIN@bama.ua.edu 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:ibm-m...@bama.ua.edu] För Visser, Hans (PinkRoccade > Infrastructure Services Technisch Specialist) > Skickat: den 17 april 2009 12:56 > Till: IBM-MAIN@bama.ua.edu > Ä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:ibm-m...@bama.ua.edu] On Behalf Of Thomas Berg > Sent: vrijdag 17 april 2009 12:14 > To: IBM-MAIN@bama.ua.edu > 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:ibm-m...@bama.ua.edu] För Visser, Hans (PinkRoccade > > Infrastructure Services Technisch Specialist) > > Skickat: den 17 april 2009 10:55 > > Till: IBM-MAIN@bama.ua.edu > > Ä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 > > > > > > > > isfcols2DDNAME 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 > > > > > > > > isfrcolsSYSAFF > > > > > > > > isfrcols2 > > > > > > But NO pagedef > > > > Regards, > > > > Hans > > > > -Original Message- > > From: IBM Mainframe Discussion List > > [mailto:ibm-m...@bama.ua.edu] On Behalf Of Smith, Sean M > > Sent: vrijdag 17 april 2009 0:16 > > To: IBM-MAIN@bama.ua.edu > > 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:ibm-m...@bama.ua.edu] On Behalf Of Visser, Hans > (PinkRoccade > > Infrastructure Services Technisch Specialist) > > Sent: Thursday, April 16, 2009 7:10 AM > > To: IBM-MAIN@bama.ua.edu > > Subject: Re: SDSF info in Rexx > > > > > > Thomas, > > > > Res
SV: SDSF info in Rexx
Have done a test myself with ST and H panels, with same result as You! It seems that there are a couple of fields that are not returned, among them PAGEDEF and FORMDEF but also ODNAME, ODTITLE, ODADR, etc. All these fields are marked as "new" in the manual as of z/OS 1.10. Though I'm running under 1.10 so... ? Regards, Thomas Berg __ Thomas Berg Specialist IT-U SWEDBANK > -Ursprungligt meddelande- > Från: IBM Mainframe Discussion List > [mailto:ibm-m...@bama.ua.edu] För Visser, Hans (PinkRoccade > Infrastructure Services Technisch Specialist) > Skickat: den 17 april 2009 13:54 > Till: IBM-MAIN@bama.ua.edu > Ämne: Re: SDSF info in Rexx > > > 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:ibm-m...@bama.ua.edu] On Behalf Of Thomas Berg > Sent: vrijdag 17 april 2009 13:46 > To: IBM-MAIN@bama.ua.edu > 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:ibm-m...@bama.ua.edu] För Visser, Hans (PinkRoccade > > Infrastructure Services Technisch Specialist) > > Skickat: den 17 april 2009 12:56 > > Till: IBM-MAIN@bama.ua.edu > > Ä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:ibm-m...@bama.ua.edu] On Behalf Of Thomas Berg > > Sent: vrijdag 17 april 2009 12:14 > > To: IBM-MAIN@bama.ua.edu > > 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:ibm-m...@bama.ua.edu] För Visser, Hans (PinkRoccade > > > Infrastructure Services Technisch Specialist) > > > Skickat: den 17 april 2009 10:55 > > > Till: IBM-MAIN@bama.ua.edu > > > Ä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 > > > > > > > > > > > > isfcols2DDNAME 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 > > > > > > > > > > > > isfrcolsSYSAFF > > > > > >
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:ibm-m...@bama.ua.edu] On Behalf Of
Thomas Berg
Sent: vrijdag 17 april 2009 12:14
To: IBM-MAIN@bama.ua.edu
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:ibm-m...@bama.ua.edu] För Visser, Hans (PinkRoccade
> Infrastructure Services Technisch Specialist)
> Skickat: den 17 april 2009 10:55
> Till: IBM-MAIN@bama.ua.edu
> Ä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
>
>
>
> isfcols2DDNAME 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
>
>
>
> isfrcolsSYSAFF
>
>
>
> isfrcols2
>
>
> But NO pagedef
>
> Regards,
>
> Hans
>
> -Original Message-----
> From: IBM Mainframe Discussion List
> [mailto:ibm-m...@bama.ua.edu] On Behalf Of Smith, Sean M
> Sent: vrijdag 17 april 2009 0:16
> To: IBM-MAIN@bama.ua.edu
> 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:ibm-m...@bama.ua.edu] On Behalf Of Visser, Hans
> (PinkRoccade Infrastructure Services Technisch Specialist)
> Sent: Thursday, April 16, 2009 7:10 AM
> To: IBM-MAIN@bama.ua.edu
> 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:ibm-m...@bama.ua.edu] On Behalf Of Thomas Berg
> Sent: Thursday, April 16, 2009 3:44 PM
> To: IBM-MAIN@bama.ua.edu
> 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:ibm-m...@bama.ua.edu] För Visser, Hans (PinkRoccade
> > Infrastructure Services Technisch Specialist)
> > Skickat: den 16 april 2009 15:24
> > Till: IBM-MAIN@bama.ua.edu
> > Ämne: Re: SDSF info in Rexx
> >
> >
> > Thomas,
> >
> > I know, but how to GET that info.
> >
> > See REXX below:
> >
> > /**
Re: SDSF info in Rexx
I'm looking in the z/OS V1R9.0 SDSF Operation and Customization manual but there are those fields NOT marked as new. Unfortunataly, the response of the list is rather poor. -Original Message- From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of Thomas Berg Sent: vrijdag 17 april 2009 14:34 To: IBM-MAIN@bama.ua.edu Subject: SV: SDSF info in Rexx Have done a test myself with ST and H panels, with same result as You! It seems that there are a couple of fields that are not returned, among them PAGEDEF and FORMDEF but also ODNAME, ODTITLE, ODADR, etc. All these fields are marked as "new" in the manual as of z/OS 1.10. Though I'm running under 1.10 so... ? Regards, Thomas Berg __ Thomas Berg Specialist IT-U SWEDBANK > -Ursprungligt meddelande- > Från: IBM Mainframe Discussion List > [mailto:ibm-m...@bama.ua.edu] För Visser, Hans (PinkRoccade > Infrastructure Services Technisch Specialist) > Skickat: den 17 april 2009 13:54 > Till: IBM-MAIN@bama.ua.edu > Ämne: Re: SDSF info in Rexx > > > 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:ibm-m...@bama.ua.edu] On Behalf Of Thomas Berg > Sent: vrijdag 17 april 2009 13:46 > To: IBM-MAIN@bama.ua.edu > 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:ibm-m...@bama.ua.edu] För Visser, Hans (PinkRoccade > > Infrastructure Services Technisch Specialist) > > Skickat: den 17 april 2009 12:56 > > Till: IBM-MAIN@bama.ua.edu > > Ä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:ibm-m...@bama.ua.edu] On Behalf Of Thomas Berg > > Sent: vrijdag 17 april 2009 12:14 > > To: IBM-MAIN@bama.ua.edu > > 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:ibm-m...@bama.ua.edu] För Visser, Hans (PinkRoccade > > > Infrastructure Services Technisch Specialist) > > > Skickat: den 17 april 2009 10:55 > > > Till: IBM-MAIN@bama.ua.edu > > > Ä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 > > > > > > > > > > > > isfcols2DDNAME 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 > > > > > > > > > > > > isfrcolsSYSAFF > > > > > > > > > > > > isfrcols2 > > > > > > > > > But NO pagedef > > > > > > Regards, > > > > > > Hans > > > > > > -Original Message- > > > From: IBM Mainfr
SV: SDSF info in Rexx
My wrong, they are marked as changed by the information: "(JES2 only)". As I see these columns in "live" it can't be authority problems, I think... Regards, Thomas Berg __ Thomas Berg Specialist IT-U SWEDBANK > -Ursprungligt meddelande- > Från: IBM Mainframe Discussion List > [mailto:ibm-m...@bama.ua.edu] För Visser, Hans (PinkRoccade > Infrastructure Services Technisch Specialist) > Skickat: den 17 april 2009 14:48 > Till: IBM-MAIN@bama.ua.edu > Ämne: Re: SDSF info in Rexx > > > I'm looking in the z/OS V1R9.0 SDSF Operation and > Customization manual but there are those fields NOT marked as new. > > Unfortunataly, the response of the list is rather poor. > > > -Original Message- > From: IBM Mainframe Discussion List > [mailto:ibm-m...@bama.ua.edu] On Behalf Of Thomas Berg > Sent: vrijdag 17 april 2009 14:34 > To: IBM-MAIN@bama.ua.edu > Subject: SV: SDSF info in Rexx > > Have done a test myself with ST and H panels, with same result as You! > > It seems that there are a couple of fields that are not > returned, among them PAGEDEF and FORMDEF but also ODNAME, > ODTITLE, ODADR, etc. > > All these fields are marked as "new" in the manual as of z/OS > 1.10. Though I'm running under 1.10 so... ? > > > > Regards, > Thomas Berg > __ > Thomas Berg Specialist IT-U SWEDBANK > > > > > > > -Ursprungligt meddelande- > > Från: IBM Mainframe Discussion List > > [mailto:ibm-m...@bama.ua.edu] För Visser, Hans (PinkRoccade > > Infrastructure Services Technisch Specialist) > > Skickat: den 17 april 2009 13:54 > > Till: IBM-MAIN@bama.ua.edu > > Ämne: Re: SDSF info in Rexx > > > > > > 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:ibm-m...@bama.ua.edu] On Behalf Of Thomas Berg > > Sent: vrijdag 17 april 2009 13:46 > > To: IBM-MAIN@bama.ua.edu > > 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:ibm-m...@bama.ua.edu] För Visser, Hans (PinkRoccade > > > Infrastructure Services Technisch Specialist) > > > Skickat: den 17 april 2009 12:56 > > > Till: IBM-MAIN@bama.ua.edu > > > Ä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:ibm-m...@bama.ua.edu] On Behalf Of Thomas Berg > > > Sent: vrijdag 17 april 2009 12:14 > > > To: IBM-MAIN@bama.ua.edu > > > 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:ibm-m...@bama.ua.edu] > > > > För Visser, Hans (PinkRoccade Infrastructure Services Technisch > > > > Specialist) > > > > Skickat: den 17 april 2009 10:55 > > > > Till: IBM-MAIN@bama.ua.edu > > > > Ämne: Re: SDSF info in Rexx > > > > > > > > > > > > Sean, > > > > > > > > I check ISFCOLS,ISFCOLS2, ISFDCOLS, ISFDCOLS2, ISFRCOLS > > > and ISFRCOLS2 > > > > with "ISFEXEC ST (DELAYED)" > > > > > > > > DELAYED2 dos not exist.
Re: SDSF info in Rexx
Found!
/ REXX /
/**/
/*TRACE R */
/**/
rc = ISFCALLS('ON')
/**/
isfprefix = 'TC49*'
/**/
ADDRESS SDSF
/**/
"ISFEXEC ST (VERBOSE ALTERNATE DELAYED)"
/**/
DO jidx=1 TO jname.0
IF jname.jidx = 'TC49VISF' THEN
DO
"ISFACT ST TOKEN('"token.jidx"') PARM(NP ?)
(PREFIX j_ ALTERNATE DELAYED DELAYED2)"
<=
/**/
DO didx=1 TO j_ddname.0
SAY LEFT(j_ddname.didx,9) j_pagedef.didx j_formdef.didx
END
END
END
/**/
rc = ISFCALLS('OFF')
/**/
RETURN
/**/
-Original Message-
From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of
Thomas Berg
Sent: vrijdag 17 april 2009 14:54
To: IBM-MAIN@bama.ua.edu
Subject: SV: SDSF info in Rexx
My wrong, they are marked as changed by the
information: "(JES2 only)".
As I see these columns in "live" it can't be
authority problems, I think...
Regards,
Thomas Berg
__
Thomas Berg Specialist IT-U SWEDBANK
> -Ursprungligt meddelande-
> Från: IBM Mainframe Discussion List
> [mailto:ibm-m...@bama.ua.edu] För Visser, Hans (PinkRoccade
> Infrastructure Services Technisch Specialist)
> Skickat: den 17 april 2009 14:48
> Till: IBM-MAIN@bama.ua.edu
> Ämne: Re: SDSF info in Rexx
>
>
> I'm looking in the z/OS V1R9.0 SDSF Operation and
> Customization manual but there are those fields NOT marked as new.
>
> Unfortunataly, the response of the list is rather poor.
>
>
> -Original Message-
> From: IBM Mainframe Discussion List
> [mailto:ibm-m...@bama.ua.edu] On Behalf Of Thomas Berg
> Sent: vrijdag 17 april 2009 14:34
> To: IBM-MAIN@bama.ua.edu
> Subject: SV: SDSF info in Rexx
>
> Have done a test myself with ST and H panels, with same result as You!
>
> It seems that there are a couple of fields that are not
> returned, among them PAGEDEF and FORMDEF but also ODNAME,
> ODTITLE, ODADR, etc.
>
> All these fields are marked as "new" in the manual as of z/OS
> 1.10. Though I'm running under 1.10 so... ?
>
>
>
> Regards,
> Thomas Berg
> __
> Thomas Berg Specialist IT-U SWEDBANK
>
>
>
>
>
> > -Ursprungligt meddelande-
> > Från: IBM Mainframe Discussion List
> > [mailto:ibm-m...@bama.ua.edu] För Visser, Hans (PinkRoccade
> > Infrastructure Services Technisch Specialist)
> > Skickat: den 17 april 2009 13:54
> > Till: IBM-MAIN@bama.ua.edu
> > Ämne: Re: SDSF info in Rexx
> >
> >
> > 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:ibm-m...@bama.ua.edu] On Behalf Of Thomas Berg
> > Sent: vrijdag 17 april 2009 13:46
> > To: IBM-MAIN@bama.ua.edu
> > 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:ibm-m...@bama.ua.edu] För Visser, Hans (PinkRoccade
> > > Infrastructure Services Technisch Specialist)
> > > Skickat: den 17 april 2009 12:56
> > > Till: IBM-MAIN@bama.ua.edu
> > > Ämne: Re: SDSF info in Rexx
> > >
> > >
> > > Thomas,
> > >
> > > Setting a ...COLS variable is not necessary.
> > >
> > >
SV: SDSF info in Rexx
I missed that one!
Thanks for finding that... :)
Regards,
Thomas Berg
__
Thomas Berg Specialist IT-U SWEDBANK
> -Ursprungligt meddelande-
> Från: IBM Mainframe Discussion List
> [mailto:ibm-m...@bama.ua.edu] För Visser, Hans (PinkRoccade
> Infrastructure Services Technisch Specialist)
> Skickat: den 17 april 2009 16:22
> Till: IBM-MAIN@bama.ua.edu
> Ämne: Re: SDSF info in Rexx
>
>
> Found!
>
> / REXX
> /
> /*
> */
> /*TRACE R
> */
> /*
> */
> rc = ISFCALLS('ON')
> /*
> */
> isfprefix = 'TC49*'
> /*
> */
> ADDRESS SDSF
> /*
> */
> "ISFEXEC ST (VERBOSE ALTERNATE DELAYED)"
> /*
> */
> DO jidx=1 TO jname.0
> IF jname.jidx = 'TC49VISF' THEN
> DO
> "ISFACT ST TOKEN('"token.jidx"') PARM(NP ?)
> (PREFIX j_ ALTERNATE DELAYED DELAYED2)"
><=
> /*
> */
> DO didx=1 TO j_ddname.0
> SAY LEFT(j_ddname.didx,9) j_pagedef.didx j_formdef.didx
> END
> END
> END
> /*
> */
> rc = ISFCALLS('OFF')
> /*
> */
> RETURN
> /*
> */
>
> -Original Message-
> From: IBM Mainframe Discussion List
> [mailto:ibm-m...@bama.ua.edu] On Behalf Of Thomas Berg
> Sent: vrijdag 17 april 2009 14:54
> To: IBM-MAIN@bama.ua.edu
> Subject: SV: SDSF info in Rexx
>
> My wrong, they are marked as changed by the
> information: "(JES2 only)".
> As I see these columns in "live" it can't be authority
> problems, I think...
>
>
>
> Regards,
> Thomas Berg
> __
> Thomas Berg Specialist IT-U SWEDBANK
>
>
>
> > -Ursprungligt meddelande-
> > Från: IBM Mainframe Discussion List
> > [mailto:ibm-m...@bama.ua.edu] För Visser, Hans (PinkRoccade
> > Infrastructure Services Technisch Specialist)
> > Skickat: den 17 april 2009 14:48
> > Till: IBM-MAIN@bama.ua.edu
> > Ämne: Re: SDSF info in Rexx
> >
> >
> > I'm looking in the z/OS V1R9.0 SDSF Operation and
> > Customization manual but there are those fields NOT marked as new.
> >
> > Unfortunataly, the response of the list is rather poor.
> >
> >
> > -Original Message-
> > From: IBM Mainframe Discussion List
> > [mailto:ibm-m...@bama.ua.edu] On Behalf Of Thomas Berg
> > Sent: vrijdag 17 april 2009 14:34
> > To: IBM-MAIN@bama.ua.edu
> > Subject: SV: SDSF info in Rexx
> >
> > Have done a test myself with ST and H panels, with same
> result as You!
> >
> > It seems that there are a couple of fields that are not returned,
> > among them PAGEDEF and FORMDEF but also ODNAME, ODTITLE, ODADR, etc.
> >
> > All these fields are marked as "new" in the manual as of
> z/OS 1.10.
> > Though I'm running under 1.10 so... ?
> >
> >
> >
> > Regards,
> > Thomas Berg
> > __
> > Thomas Berg Specialist IT-U SWEDBANK
> >
> >
> >
> >
> >
> > > -Ursprungligt meddelande-
> > > Från: IBM Mainframe Discussion List
> > > [mailto:ibm-m...@bama.ua.edu] För Visser, Hans (PinkRoccade
> > > Infrastructure Services Technisch Specialist)
> > > Skickat: den 17 april 2009 13:54
> > > Till: IBM-MAIN@bama.ua.edu
> > > Ämne: Re: SDSF info in Rexx
> > >
> > >
> > > Yes, with no result.
> > >
> > > I tried everything - 1.
> > >
> > > And I'm looking for just that last 1. ;-)
> > >
> > > -Original Message-
> > > From: IBM Ma
Re: SDSF info in Rexx
And thanks for your help. :-)
All the others are sleeping. ;-)
-Original Message-
From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of
Thomas Berg
Sent: vrijdag 17 april 2009 16:40
To: IBM-MAIN@bama.ua.edu
Subject: SV: SDSF info in Rexx
I missed that one!
Thanks for finding that... :)
Regards,
Thomas Berg
__
Thomas Berg Specialist IT-U SWEDBANK
> -Ursprungligt meddelande-
> Från: IBM Mainframe Discussion List
> [mailto:ibm-m...@bama.ua.edu] För Visser, Hans (PinkRoccade
> Infrastructure Services Technisch Specialist)
> Skickat: den 17 april 2009 16:22
> Till: IBM-MAIN@bama.ua.edu
> Ämne: Re: SDSF info in Rexx
>
>
> Found!
>
> / REXX
> /
> /*
> */
> /*TRACE R
> */
> /*
> */
> rc = ISFCALLS('ON')
> /*
> */
> isfprefix = 'TC49*'
> /*
> */
> ADDRESS SDSF
> /*
> */
> "ISFEXEC ST (VERBOSE ALTERNATE DELAYED)"
> /*
> */
> DO jidx=1 TO jname.0
> IF jname.jidx = 'TC49VISF' THEN
> DO
> "ISFACT ST TOKEN('"token.jidx"') PARM(NP ?)
> (PREFIX j_ ALTERNATE DELAYED DELAYED2)"
><=
> /*
> */
> DO didx=1 TO j_ddname.0
> SAY LEFT(j_ddname.didx,9) j_pagedef.didx j_formdef.didx
> END
> END
> END
> /*
> */
> rc = ISFCALLS('OFF')
> /*
> */
> RETURN
> /*
> */
>
> -Original Message-
> From: IBM Mainframe Discussion List
> [mailto:ibm-m...@bama.ua.edu] On Behalf Of Thomas Berg
> Sent: vrijdag 17 april 2009 14:54
> To: IBM-MAIN@bama.ua.edu
> Subject: SV: SDSF info in Rexx
>
> My wrong, they are marked as changed by the
> information: "(JES2 only)".
> As I see these columns in "live" it can't be authority
> problems, I think...
>
>
>
> Regards,
> Thomas Berg
> __
> Thomas Berg Specialist IT-U SWEDBANK
>
>
>
> > -Ursprungligt meddelande-
> > Från: IBM Mainframe Discussion List
> > [mailto:ibm-m...@bama.ua.edu] För Visser, Hans (PinkRoccade
> > Infrastructure Services Technisch Specialist)
> > Skickat: den 17 april 2009 14:48
> > Till: IBM-MAIN@bama.ua.edu
> > Ämne: Re: SDSF info in Rexx
> >
> >
> > I'm looking in the z/OS V1R9.0 SDSF Operation and
> > Customization manual but there are those fields NOT marked as new.
> >
> > Unfortunataly, the response of the list is rather poor.
> >
> >
> > -Original Message-
> > From: IBM Mainframe Discussion List
> > [mailto:ibm-m...@bama.ua.edu] On Behalf Of Thomas Berg
> > Sent: vrijdag 17 april 2009 14:34
> > To: IBM-MAIN@bama.ua.edu
> > Subject: SV: SDSF info in Rexx
> >
> > Have done a test myself with ST and H panels, with same
> result as You!
> >
> > It seems that there are a couple of fields that are not returned,
> > among them PAGEDEF and FORMDEF but also ODNAME, ODTITLE, ODADR, etc.
> >
> > All these fields are marked as "new" in the manual as of
> z/OS 1.10.
> > Though I'm running under 1.10 so... ?
> >
> >
> >
> > Regards,
> > Thomas Berg
> > __
> > Thomas Berg Specialist IT-U SWEDBANK
> >
> >
> >
> >
> >
> > > -Ursprungligt meddelande-
> > > Från: IBM Mainframe Discussion List
> > > [mailto:ibm-m...@bama.ua.edu] För Visser, Hans (PinkRoccade
> > > Infrastructure Services Technisch Specialist)
> > > Skickat: den 17 april 2009 13:54
> > > Till: IBM-MAIN@bama.ua.edu
> > > Ämne: Re: SDSF info in Rexx
> > >
> > >
> > > 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:ibm-m...@bama.ua.edu] On Behalf Of Thomas Berg
> > > Sent: vrijdag 17 april 2009 13:46
> > > To: IBM-MAIN@bama.ua.edu
> > > Subject: SV: SDSF info in Rexx
> > >
> > > Have You tried *without*:
> > >
> > > "IF j_ddname.didx <> 'SYSUT2' THEN" ?
> > &
Re: SDSF info in Rexx
Guess I should have spelled out what I meant instead of just typing it into a
sentence. "You may need to look at using the DELEAYED or DELAYED2 option on
the ISFEXEC call to get these variables."
Sean
-Original Message-
From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of
Smith, Sean M
Sent: Thursday, April 16, 2009 3:16 PM
To: IBM-MAIN@bama.ua.edu
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:ibm-m...@bama.ua.edu] On Behalf Of
Visser, Hans (PinkRoccade Infrastructure Services Technisch Specialist)
Sent: Thursday, April 16, 2009 7:10 AM
To: IBM-MAIN@bama.ua.edu
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:ibm-m...@bama.ua.edu] On Behalf Of
Thomas Berg
Sent: Thursday, April 16, 2009 3:44 PM
To: IBM-MAIN@bama.ua.edu
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:ibm-m...@bama.ua.edu] För Visser, Hans (PinkRoccade
> Infrastructure Services Technisch Specialist)
> Skickat: den 16 april 2009 15:24
> Till: IBM-MAIN@bama.ua.edu
> Ä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:ibm-m...@bama.ua.edu] On Behalf Of Thomas Berg
> Sent: Thursday, April 16, 2009 2:14 PM
> To: IBM-MAIN@bama.ua.edu
> Subject: SV: SDSF info in Rexx
>
> They
Re: SDSF info in Rexx
Sean,
No, that's wrong.
That's what I thought as well and tested that several times, but it did
not work.
It should not be specified in an ISFEXEC call but in an ISFACT call.
Hans
-Original Message-
From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of
Smith, Sean M
Sent: maandag 20 april 2009 17:00
To: IBM-MAIN@bama.ua.edu
Subject: Re: SDSF info in Rexx
Guess I should have spelled out what I meant instead of just typing it into a
sentence. "You may need to look at using the DELEAYED or DELAYED2 option on
the ISFEXEC call to get these variables."
Sean
-Original Message-
From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of
Smith, Sean M
Sent: Thursday, April 16, 2009 3:16 PM
To: IBM-MAIN@bama.ua.edu
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:ibm-m...@bama.ua.edu] On Behalf Of
Visser, Hans (PinkRoccade Infrastructure Services Technisch Specialist)
Sent: Thursday, April 16, 2009 7:10 AM
To: IBM-MAIN@bama.ua.edu
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:ibm-m...@bama.ua.edu] On Behalf Of
Thomas Berg
Sent: Thursday, April 16, 2009 3:44 PM
To: IBM-MAIN@bama.ua.edu
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:ibm-m...@bama.ua.edu] För Visser, Hans (PinkRoccade
> Infrastructure Services Technisch Specialist)
> Skickat: den 16 april 2009 15:24
> Till: IBM-MAIN@bama.ua.edu
> Ä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
