How do I access data in control blocks such as jobname?
Answer / 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 |
I want to remove a duplicates form a given input field using rexx program. please Any one help me out to solve this ... Thanks in Advance.
can oorexx run normal rexx programs?
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 do I access data held on the JES spool?
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.
How do I Run My Rexx Exec.?
What are various loop types supported by rexx?
How to code the db2 queries using rexx?
How do I access data in control blocks such as jobname?
can oorexx run ibm object rexx programs?
is there an aix version of oorexx?
can I port my existing applications from the mainframe or os/2? Will there be extensive changes required to do this?