How do I access data in control blocks such as jobname?
- 1 Answers
- 8287 Views
- I also Faced
- E-Mail Answers
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
Please Help Members By Posting Answers For Below Questions
No New Questions to Answer in this Category !! You can
Post New Questions
Answer Questions in Different Category
