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 |
how long does the install of oorexx take?
Can anyone provide me the source code for LOC(lines of code) counter written in REXX language which can run on IBM mainframe z/OS V1R4. The LOC counter should be able to count the comments,lines of code,blank lines in a COBOL program and JCL's
how to access data in control blocks such as jobname?
I am new to rexx db2 ,can anyone help me by expalinin how to code the db2 queries using rexx,and also plz send some link and examples using db2 queries.
Can I cleanly uninstall oorexx?
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.
can oorexx run ibm object rexx programs?
What is the difference between ooRexx and IBM's Object REXX for Windows?
How to find or access the current level of a gdg?
I am tryin to select one records(SQL) using Rexx.Here is the code ADDRESS DSNREXX "EXECSQL FETCH C1 USING DESCRIPTOR :TBSQLDA" IF SQLCODE = 0 THEN DO LINE = '' DO I = 1 TO TBSQLDA.SQLD LINE = LINE TBSQLDA.I.SQLDATA END I SAY LINE END ADDRESS DSNREXX "EXECSQL CLOSE C1" ADDRESS DSNREXX 'DISCONNECT' i am getting the following errors and also i dont know wr to see the ouput.Can anyone please hlep me in solving this? 28 +++ ADDRESS DSNREXX 'DISCONNECT' Error running DB2REXX, line 28: Incomplete DO/SELECT/IF
How to run my rexx exec?
I want to open particular list of members inside pds.Let me know whether below code will work.if not tell me how it works INPUT='DDM.DATASET(AAA*)' X = OUTTRAP(MEMS.)