How do I access data in control blocks such as jobname?
Answer Posted / shakila vinayagam
Use the Storage() function to extract the data from control
blocks.
/* REXX Get taskname from TCB */
cvt = storage(10,4) /* FLCCVT-PSA data area */
tcbp = storage(d2x(c2d(cvt)),4) /* CVTTCBP */
tcb = storage(d2x(c2d(tcbp)+4),4)
tiot = storage(d2x(c2d(tcb)+12),4) /* TCBTIO */
say strip(storage(d2x(c2d(tiot)),8)) /* TIOCNJOB */
Is This Answer Correct ? | 1 Yes | 1 No |
Post New Answer View All Answers
does uni-rexx give me any capabilities designed specifically for the unix environment?
is oorexx compatible with ibm object rexx?
What are various loop types supported by rexx?
I executed one job and I forget to save the final JCL. But took an XDC from SPOOL. Now I want to recover the JCL from XDC dataset. Is there any process to do this?. (Manually it takes a lot of time). Is there
why is there no os/2 (ecs) port of oorexx?
can oorexx run normal rexx programs?
What is the difference between ooRexx and IBM's Object REXX for Windows?
Can I cleanly uninstall oorexx?
How to code the db2 queries using rexx?
Is it possible to port existing applications from the mainframe or os/2? Are there major changes required to do this?
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?
What does the sample library of uni-rexx consist of?
i want new rexx tool which will perform jcl chk without submitting it
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?
how to access data held on the jes spool?