Interested to Buy Any Domain ? << Click Here >> for more details...
How do I access data held on the JES spool?
- 3 Answers
- 19155 Views
- TCS, I also Faced
- E-Mail Answers
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 |
I want to set position for a particular text in a certain position in several of my cics maps.Please provide me with a solution. Ex: If "F1-Help" has to be set to pos(4,27) always in all the maps within a PDS.
can oorexx run ibm object rexx programs?
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.
have you already used rexx - even for limited purposes? Do you need to maintain a high level of productivity during your transition to unix?
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
What are various loop types supported by rexx?
Suppose I want to code a rexx program in order to get the inputfile and output files of jcl. I want code snippet or the coding for this?
How do I pass parms to my ISPF Edit macro
i'm getting error while editing macro, its not even entering into the macro, getting error like 31 *-* "EDIT DATASET('"DSN"("MEM")') MACRO("CHGLINE")" +++ RC(-3) +++ ? any idea why?
How do I access data held on the JES spool?
Is it possible to port existing applications from the mainframe or os/2? Are there major changes required to do this?
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?
COBOL 
