Here is a simple example (a test rexx I started with),
I think You can change the "?" to desired actionchar,
(but do check the manual:
http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/ISF4CS80/12.5?DT=20080605143940
):
/* REXX */ Trace N
x = Isfcalls('ON')
isfprefix = 'S000TBE7'
isfcols = 'JNAME JOBID OWNERID JCLASS POS STATUS' ,
'SYSNAME WORKLOAD CPU TRANACT SRVCLS SRVCLASS ACTSYS' ,
'SYSAFF TOKEN PRTDEST'
Address SDSF 'ISFEXEC ST (ALTERNATE PREFIX SDSF_ST_)'
isfcols2 = ,
'DDNAME STEPN PROCS DSID OCLASS RECCNT BYTECNT DSNAME'
Do i = 1 To isfrows
Address SDSF "ISFACT ST TOKEN('"sdsf_ST_token.i"')" ,
'PARM(NP ?) (PREFIX SDSF_ST_Q_)'
Say rc
Say isfmsg
Do j = 1 To isfmsg2.0
Say isfmsg2.j
End
DO J = 1 TO SDSF_ST_Q_DDNAME.0
SAY SDSF_ST_Q_DDNAME.J
End
End
x = Isfcalls('OFF')
Exit 0
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 Dr. Stephen Fedtke
> Skickat: den 27 december 2008 12:12
> Till: IBM-MAIN@bama.ua.edu
> Ämne: SDSF and REXX support
>
> hi,
>
> does anybody know on how to change spool file attribute, such
> as the msgclass, inside a "SDSF & REXX" environment? I.e. on
> how to change corresponding table columns, causing system
> commands being issued by SDSF.
> maybe, it is impossible.
>
> best
> stephen
>
>
> ---
> Dr. Stephen Fedtke
> Enterprise-IT-Security.com
>
> Seestrasse 3a
> CH-6300 Zug
> Switzerland
> Tel. ++41-(0)41-710-4005
> www.enterprise-it-security.com
> Meet your "MAX Z Compliance Protector" at Share, Austin,
> March 1-6, 2009.
>
> --
> 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
