Answer Posted / ed
Use the new JES/SDSF interface:
/* REXX */
IsfRC = isfcalls( "ON" )
if IsfRC <> 0
then do
say "RC" IsfRC "returned from isfcalls( ON )"
exit IsfRC
end
isfprefix = '*'
isfowner = 'BCA0I53'
isfcols = 'jobid tgnum tgpct pname'
isfsort = 'tgnum d'
address SDSF "ISFEXEC ST (ALTERNATE DELAYED"
say rc isfmsg
say isfmsg2.0
say isfmsg2.1
say isfmsg2.2
say isfmsg2.3
say isfmsg2.4
say isfmsg2.5
say isfrows 'rows returned from SDSF STATUS'
SAY isfcols
do i = 1 to 10
say i '-' jname.i'/'jobid.i tgnum.i tgpct.i pname.i
end
IsfRC = isfcalls( "OFF" )
exit
| Is This Answer Correct ? | 5 Yes | 0 No |
Post New Answer View All Answers
what is uni-rexx?
can oorexx run normal rexx programs?
How to find or access the current level of a gdg?
can oorexx run ibm object rexx programs?
How to code the db2 queries using rexx, and also plz send some link and examples using db2 queries?
Suppose if there are a set of statements and each has a word “value” in it, if I want to display all these statements so that the word “value” is aligned, then how do I code this in rexx?
how long does the install of oorexx take?
What is the use of uni-rexx?
How to run my rexx exec?
i want new rexx tool which will perform jcl chk without submitting it
Is it possible to port existing applications from the mainframe or os/2? Are there major changes required to do this?
What are various loop types supported by rexx?
I just know the Panvalet dataset name, i would like to search all the members of that dataset for particular keyword through Rexx. how to achive? please suggest. Is it possible to open panvalet member in browse mode using Rexx? Your help would be appreciated very much. Thanks in advance.
what if I need to have the same application running on multiple platforms, such as unix and the mainframe? Does that mean I have to maintain two separate sources?
have you already used rexx - even for limited purposes? Do you need to maintain a high level of productivity during your transition to unix?