Golgappa.net | Golgappa.org | BagIndia.net | BodyIndia.Com | CabIndia.net | CarsBikes.net | CarsBikes.org | CashIndia.net | ConsumerIndia.net | CookingIndia.net | DataIndia.net | DealIndia.net | EmailIndia.net | FirstTablet.com | FirstTourist.com | ForsaleIndia.net | IndiaBody.Com | IndiaCab.net | IndiaCash.net | IndiaModel.net | KidForum.net | OfficeIndia.net | PaysIndia.com | RestaurantIndia.net | RestaurantsIndia.net | SaleForum.net | SellForum.net | SoldIndia.com | StarIndia.net | TomatoCab.com | TomatoCabs.com | TownIndia.com
Interested to Buy Any Domain ? << Click Here >> for more details...

How do I access data in control blocks such as jobname?

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

can oorexx run ibm object rexx programs?

956


is oorexx compatible with rexx?

907


I executed one job and I forget to save the final JCL. But took an XDC from SPOOL. Now I want to recover the JCL from XDC dataset. Is there any process to do this?. (Manually it takes a lot of time). Is there

3012


is oorexx compatible with ibm object rexx?

950


what is uni-rexx?

945


can oorexx run normal rexx programs?

967


If I have limited experience with Rexx or it's been a long time since I've used it, what kind of help is available to get me started?

857


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.

5508


I want to open particular list of members inside pds.Let me know whether below code will work.if not tell me how it works INPUT='DDM.DATASET(AAA*)' X = OUTTRAP(MEMS.)

3153


how long does the install of oorexx take?

957


What is the difference between ooRexx and IBM's Object REXX for Windows?

1033


how to access data in control blocks such as jobname?

910


What are the various error conditions seen in rexx?

875


Suppose 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?

918


Is it possible to port existing applications from the mainframe or os/2? Are there major changes required to do this?

864