View previous topic :: View next topic
|
Author |
Message |
mchanapa
New User
Joined: 17 Nov 2011 Posts: 36 Location: India
|
|
|
|
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 |
|
|
Robert Sample
Global Moderator
Joined: 06 Jun 2008 Posts: 8696 Location: Dubuque, Iowa, USA
|
|
|
|
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 |
|
|
enrico-sorichetti
Superior Member
Joined: 14 Mar 2007 Posts: 10872 Location: italy
|
|
|
|
Quote: |
Quick help is appreciated |
this kind of remark is not appreciated
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 |
|
Back to top |
|
|
dbzTHEdinosauer
Global Moderator
Joined: 20 Oct 2006 Posts: 6966 Location: porcelain throne
|
|
|
|
what value is contained in eibtrmid when you batch link from pgm a to pgm b? |
|
Back to top |
|
|
Bill O'Boyle
CICS Moderator
Joined: 14 Jan 2008 Posts: 2501 Location: Atlanta, Georgia, USA
|
|
|
|
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 |
|
|
Eshwar CICS
New User
Joined: 18 May 2011 Posts: 47 Location: India
|
|
|
|
"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 |
|
|
|