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 |
can oorexx run ibm object rexx programs?
Suppose I want to code a rexx program in order to get the inputfile and output files of jcl. I want code snippet or the coding for this?
I'm new to rexx. How to code rexx in jcl to read in a lpar cpu usage file and select 1. date, time 2. some system names 3. cpu usage for each system. The input file has hourly reporting. The output file (CSV)is for excel use. Run in batch mode. Output in FB.
can I port my existing applications from the mainframe or os/2? Will there be extensive changes required to do this?
why is there no os/2 (ecs) port of oorexx?
Enlist the features of rexx as a programming language.
can oorexx run normal rexx programs?
How do I access data in control blocks such as jobname?
for which platforms is uni-rexx available?
how long does the install of oorexx take?
Can anyone provide me the source code for LOC(lines of code) counter written in REXX language which can run on IBM mainframe z/OS V1R4. The LOC counter should be able to count the comments,lines of code,blank lines in a COBOL program and JCL's
how to access data in control blocks such as jobname?