InterviewSolution
Saved Bookmarks
InterviewSolution
| 1. |
How To Access Data In Control Blocks Such As Jobname? |
|
Answer» 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 */Use the Storage() function to extract the data from control blocks. |
|