Interested to Buy Any Domain ? << Click Here >> for more details...
How do I access data in control blocks such as jobname?
- 1 Answers
- 8048 Views
- I also Faced
- E-Mail Answers
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 |
What does the sample library of uni-rexx consist of?
How to find or access the current level of a gdg?
What are various loop types supported by rexx?
I just know the Panvalet dataset name, i would like to search all the members of that dataset for particular keyword through Rexx. how to achive? please suggest. Is it possible to open panvalet member in browse mode using Rexx? Your help would be appreciated very much. Thanks in advance.
how to access data held on the jes spool?
is oorexx compatible with rexx?
Can I cleanly uninstall oorexx?
what would I use uni-rexx for?
How do I access data held on the JES spool?
i want new rexx tool which will perform jcl chk without submitting it
How do I find or access the current level of a GDG?
I have one input file and some 40 tables, I want to read input file and compare the input file value with the table value if it is present then we have to update with new value, this should be repeated for all 40 tables and we are reading only one input file, for this is there any REXX program or job or routine to accomplish above requirement. components of the requirements; 1. One input file 2. 40 DB2 tables 3. we have to read from the input file and compare with table value, if present then update with new value (this should be recurssive for all 40 tables for every record of input file). 4. quick help is appreciated.
COBOL 
