Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

CICS and LE "Thread" Question

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> CICS
View previous topic :: :: View next topic  
Author Message
Bill O'Boyle

CICS Moderator


Joined: 14 Jan 2008
Posts: 2502
Location: Atlanta, Georgia, USA

PostPosted: Wed Feb 11, 2015 10:56 pm    Post subject: CICS and LE "Thread" Question
Reply with quote

Greetings,

I've got a CICS COBOL Program "A", which calls (not links) to a CICS/Assembler sub-program. In this sub-program, I'm addressing the LE "CAA" (R12-Based --- Common Anchor Area), which is created by the LE-compliant COBOL program and within this DSECT, there's a User-Label "CEECAA_USER_WORD" (a fullword), which IBM has designated for "User" use. The Assembler sub-program is issuing a CICS GETMAIN and I'm stashing this address in this above fullword and then returning to the Calling COBOL program.

Now my "LE" question. After control is returned from the Assembler sub-program, this same CICS/COBOL program calls (not links) to another CICS/COBOL program, who in turn calls this CICS/Assembler sub-program, will this create a new "CAA" or will it be the same one?

I'm hoping it's a new one but I'm afraid that it will be the same one. icon_sad.gif

Fingers tightly crossed.

Regards,
Back to top
View user's profile Send private message

Mickeydusaor

Active User


Joined: 24 May 2006
Posts: 258
Location: Salem, Oregon

PostPosted: Thu Feb 12, 2015 1:08 am    Post subject:
Reply with quote

When the application ends, the final value in CEECAA_USER_WORD is not copied back into the area associated with the environment token. When the next application is started using a function such as (call_main), (call_sub), or(call_sub_addr), the user word value last established by (set_user_word) is used again.
•The user word associated with the environment token is initialized to 0 when (init_main), (init_main_dp), (init_sub), or (init_sub_dp) is done. The CAA for the initial process thread is initialized with 0 if no (set_user_word) function call has been done before the application is started.
Back to top
View user's profile Send private message
Bill Woodger

DFSORT Moderator


Joined: 09 Mar 2011
Posts: 7223

PostPosted: Thu Feb 12, 2015 1:28 pm    Post subject: Reply to: CICS and LE "Thread" Question
Reply with quote

Hi Bill,

CAA is for each thread at most.

What are you trying to do by this, in case anyone has alternate suggestions?
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> CICS All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts How does a called pgm know if its cal... Graeme Westerman COBOL Programming 4 Tue Nov 29, 2016 9:25 pm
No new posts CICS Roll back partially - Need to re... dwijadas CICS 4 Wed Nov 16, 2016 4:30 pm
No new posts CICS NEW SIT PARAMETERS CICS BEHAVIOR... Kyle Carroll CICS 0 Fri Nov 04, 2016 11:55 pm
No new posts Amount field is getting corrupted whe... thesumitk SYNCSORT 5 Tue Oct 18, 2016 8:20 pm
No new posts Single COPY CICS TS datasets and when... Kyle Carroll CICS 2 Tue Oct 11, 2016 9:47 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us