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

what is uni-rexx?

1040

---

How to code the db2 queries using rexx, and also plz send some link and examples using db2 queries?

961

---

can I port my existing applications from the mainframe or os/2? Will there be extensive changes required to do this?

1027

---

how to access data in control blocks such as jobname?

1004

---

When will a port of ooRexx to "XYZ" be available?

927

---

If I have limited experience with Rexx or it's been a long time since I've used it, what kind of help is available to get me started?

945

---

What does the sample library of uni-rexx consist of?

1124

---

for which platforms is uni-rexx available?

1028

---

Can I combine uni-REXX with a compiled language in my application? What application programming interfaces are available? For example, can I share variables between uni-REXX and a compiled language?

957

---

how long does the install of oorexx take?

1057

---

Is it possible to combine uni-rexx with a compiled language in any application? What applications interfaces are there?

980

---

is there an aix version of oorexx?

1036

---

what would I use uni-rexx for?

1010

---

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?

1015

---

What are the various error conditions seen in rexx?

978

---