How do I access data held on the JES spool?
Answers were Sorted based on User's Feedback
Answer / 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 |
Answer / rainer bartosch
Held output (JES2 or JES3) can be captured by outtrapping
the output of the following command
"OUTPUT jobname PRINT(*) KEEP".
Use command HELP OUTPUT for more information.
Furthermore there are output tools you can buy like SDSF,
IOF, (E)JES, etc. But not all of these have got a rexx
interface.
| Is This Answer Correct ? | 2 Yes | 1 No |
Answer / shakila vinayagam
JES3 sites can extract data off of the JES3 spool using E-
JES.
| Is This Answer Correct ? | 2 Yes | 3 No |
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. e.g - The value of X is Y. Wot is its value? Do u know its value? I want to know its value.
What do unusual return codes such as -3 and 0196 mean?
how long does the install of oorexx take?
Can I cleanly uninstall oorexx?
How do I pass parms to my ISPF Edit macro
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?
can I port my existing applications from the mainframe or os/2? Will there be extensive changes required to do this?
I have one input file and some 40 tables, I want to read input file and compare the input file value with the table value if it is present then we have to update with new value, this should be repeated for all 40 tables and we are reading only one input file, for this is there any REXX program or job or routine to accomplish above requirement. components of the requirements; 1. One input file 2. 40 DB2 tables 3. we have to read from the input file and compare with table value, if present then update with new value (this should be recurssive for all 40 tables for every record of input file). 4. quick help is appreciated.
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?
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?
have you already used rexx - even for limited purposes? Do you need to maintain a high level of productivity during your transition to unix?
how to pass parms to ispf edit macro?