Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
Passing data to EIBTRMID

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> CICS
View previous topic :: :: View next topic  
Author Message
mchanapa

New User


Joined: 17 Nov 2011
Posts: 36
Location: India

PostPosted: Tue Mar 13, 2012 8:38 pm    Post subject: Passing data to EIBTRMID
Reply with quote

1. Batch Program A -> LINKING to CICS Program B --> XCTL to CICS
Program C.
2. Program C will execute LOGIC-1 para if EIBTRMID is LOWVALUES and
will execute LOGIC-2 para if EIBTRMID is not equal to LOWVALUES.

Query: We want to pass LOWVALUES to EIBTRMID from Program B to Program C. So when Program C is triggered, it should always execute LOGIC-1 Para. Is there any way we can pass LOWVALUES to EIBTRMID from Program B to Program C ?

Note: Due to Architectural reasons, we can not modify/touch the logic based on EIBTRMID in Program C. Hence, we are looking alternate ways to control EIBTRMID from Program B.

Quick help is appreciated.[/u]
Back to top
View user's profile Send private message

Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 8165
Location: East Dubuque, Illinois, USA

PostPosted: Tue Mar 13, 2012 8:47 pm    Post subject:
Reply with quote

From the CICS Programming Reference manual, available from the link at the top of this page:
Quote:
A.0 Appendix A. EXEC interface block



This appendix contains a description of the EXEC interface block (EIB). An application program can read all the fields in the EIB of the associated task by name, but must not change the contents of any of them other than through an EXEC CICS command.
Back to top
View user's profile Send private message
enrico-sorichetti

Global Moderator


Joined: 14 Mar 2007
Posts: 10327
Location: italy

PostPosted: Tue Mar 13, 2012 9:02 pm    Post subject: Reply to: Passing data to EIBTRMID
Reply with quote

Quote:
Quick help is appreciated

this kind of remark is not appreciated icon_evil.gif

we reply on our own time and free of charge
so we are entitled to reply when and if we feel like

if You have time constraint hire a paid consultant who for the proper
fee will be glad to carry on the contract according to Your time schedule

and tell us for what effing reason anybody here should proivide free consultancy services to Capgemini
OK so that they can resell with a huge gain what they paid nothing for icon_cool.gif
Back to top
View user's profile Send private message
dbzTHEdinosauer

Global Moderator


Joined: 20 Oct 2006
Posts: 6968
Location: porcelain throne

PostPosted: Tue Mar 13, 2012 9:09 pm    Post subject:
Reply with quote

what value is contained in eibtrmid when you batch link from pgm a to pgm b?
Back to top
View user's profile Send private message
Bill O'Boyle

CICS Moderator


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

PostPosted: Tue Mar 13, 2012 9:56 pm    Post subject: Reply to: Passing data to EIBTRMID
Reply with quote

If you're using EXCI/DPL to the target Server region, EIBTRMID will contain the value associated with the EXCI defined session as soon as control is received by DFHMIRS.

In a Batch EXCI/DPL program, there isn't any addressability nor is there a DFHEIBLK that's accessable.

Why not add some intelligence to the EXCI/DPL commarea passed to the server program or issue an ASSIGN STARTCODE API in the server program and check for the 1st-byte equal to "D" or define the server transid explicitly (no CPMI default, but must be defined to DFHMIRS in the PCT) and that could be another way to determine that EXCI/DPL is involved. You have many choices and sometimes, these choices must be implemented, regardless as to what others say that you can't do.

Depending on your SIT parm (Storage Protect) setting, altering your EIBTRMID (in fact, altering any EIB field), will raise a SOC4 if Storage Protect is turned on.

Because EIB alteration had been widely used by application programs for decades, the Hursley folks added a SYSEIB when they released CICS/ESA, so at least the original EIB values were retained and could be found in a transaction dump.
Back to top
View user's profile Send private message
Eshwar CICS

New User


Joined: 18 May 2011
Posts: 47
Location: India

PostPosted: Wed Mar 14, 2012 1:19 pm    Post subject: Reply to: Passing data to EIBTRMID
Reply with quote

"what value is contained in eibtrmid when you batch link from pgm a to pgm b?" Check this if it is already populating low-values.

In CICS, if you update EIBTRMID in Prg B and then XCTL to Prg C, the value of EIBTRMID in Prg C will be the same value being updated in to it by Prg B.

As you can't modify Prg C. Make changes in Prg B as per the application requirements.

Also ensure that updating EIBTRMID does not have any other impacts.
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 Copy 4 byte of data from the last rec... arunsoods DFSORT/ICETOOL 9 Fri Oct 06, 2017 12:15 pm
No new posts opening a dataset after reading it fr... arunsoods DFSORT/ICETOOL 5 Wed Oct 04, 2017 3:54 pm
This topic is locked: you cannot edit posts or make replies. PS file data should be passed as symb... d_sarlie JCL & VSAM 15 Tue Oct 03, 2017 5:18 am
No new posts File Aid tool to compare numeric data balaji81_k Compuware & Other Tools 2 Tue Sep 26, 2017 3:35 am
No new posts Question related to Data dictionary f... rexx77 SYNCSORT 3 Thu Aug 31, 2017 7:23 am

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us