CONTROL BLOCK NAME = DFHEIUS
DESCRIPTIVE NAME = CICS TS User part of EXEC interface storage
Licensed Materials - Property of IBM
Restricted Materials of IBM
5655-Y04
(C) Copyright IBM Corp. 1990, 2000
FUNCTION =
This is part of the interface between the application
program and CICS. It contains fields whose addresses
are passed to the application or to other products which
invoke the application.
The EIUS is owned by the Execution Interface Component.
There is one EIUS per transaction.
LIFETIME =
The EIUS is created in DFHAPDS and lasts for the life
of the task.
STORAGE CLASS =
The subpool is chosen according to the TASKDATAKEY and
TASKDATALOC options specified for the task.
The possible subpools are :
SUBPOOL TASKDATAKEY TASKDATALOC
USER24 USER BELOW
USER31 USER ANY
CICS24 CICS BELOW
CICS31 CICS ANY
LOCATION =
The EIUS is addressed from the TCA by TCAEIUSA.
INNER CONTROL BLOCKS =
None
NOTES :
DEPENDENCIES = S/370
RESTRICTIONS = None
MODULE TYPE = Control block definition
EXTERNAL REFERENCES =
DATA AREAS =
This control block references no operating system data
areas.
CONTROL BLOCKS =
This control block references no other control blocks.
GLOBAL VARIABLES (Macro pass) =
This control block definition references no global
variables.
Table 1.
Offset Hex |
Type |
Len |
Name (Dim) |
Description |
(0) |
STRUCTURE |
232 |
DFHEIUS |
EXEC Interface User Structure |
(0) |
CHARACTER |
16 |
EIUS_PREFIX |
Standard control block prefix |
(0) |
HALFWORD |
2 |
EIUS_LENGTH |
Length of DFHEIUS |
(2) |
CHARACTER |
1 |
EIUS_ARROW |
'>' |
(3) |
CHARACTER |
3 |
EIUS_DFH |
'DFH' |
(6) |
CHARACTER |
10 |
EIUS_BLOCK_NAME |
'EIUS ' |
(10) |
ADDRESS |
4 |
EIUS_CEE_TWA |
Addr LE/370 Thread w/a |
START OF STACKED STORAGE
The following storage up to EIUS_SUPER_STACK is stacked across
a LINK or XCTL.
It consists of two parts :
1. EIUS_STACK_INIT - reinitialised to X'00'.
2. EIUS_STACK_ASIS - left asis on the stack.
|
(14) |
CHARACTER |
196 |
EIUS_STACK_AREA |
The whole link stack area |
The following storage up to EIUS_STACK_ASIS is
re-initialised to X'00' following a LINK or XCTL
|
(14) |
CHARACTER |
16 |
EIUS_STACK_INIT |
Reinitialised section |
(14) |
CHARACTER |
8 |
EIUS_CEE_RUNUNIT_TK |
CEE rununit token |
(1C) |
ADDRESS |
4 |
* |
Reserved |
(20) |
ADDRESS |
4 |
* |
Reserved |
This is the end of the area initialised to X'00' on LINK or XCTL
The following storage up to EIUS_SUPER_STACK is left asis
following a LINK or XCTL.
|
(24) |
CHARACTER |
180 |
EIUS_STACK_ASIS |
Left asis on the stack |
(24) |
ADDRESS |
4 |
* |
Reserved |
(28) |
ADDRESS |
4 |
* |
Reserved |
(2C) |
CHARACTER |
8 |
EIUS_HLL_RUNUNIT_TK |
High level lang rununit token |
EIUS_EIB_ADDR and EIUS_CURR_COMMA_ADDR must be contiguous
for DFHEIENT macro in EXEC CICS with Assembler.
|
(34) |
ADDRESS |
4 |
EIUS_EIB_ADDR |
EIB address |
EIUS_CURR_COMMA_ADDR is the commarea received by the currently
running program. It may be a copy taken because the program
can not access the original because of its location or key.
If it is a copy then the address of the original is in
EIS_ORIG_COMMA_ADDR.
|
(38) |
ADDRESS |
4 |
EIUS_CURR_COMMA_ADDR |
Current commarea address |
(3C) |
ADDRESS |
4 |
EIUS_RSA_ADDR |
Appl Reg Save Area address |
(40) |
CHARACTER |
144 |
EIUS_RSA |
Reg Save Area for appl use |
(D0) |
ADDRESS |
4 |
* |
Reserved |
(D4) |
ADDRESS |
4 |
* |
Reserved |
END OF STACKED STORAGE
|
SUPERLINK STORAGE
-----------------
The following storage is not stacked by a LINK, however it is
stacked by a resource manager call (SUPERLINK) to allow for
recursion in the event that the invoked res-mgr invokes CICS
via the command level interface ie. EXEC CICS...
The storage is left asis following a SUPERLINK.
|
(D8) |
CHARACTER |
16 |
EIUS_SUPER_STACK |
Start of SUPERLINK storage |
EIUS_EIB_ADDR_PTR and EIUS_COMMA_ADDR_PTR must be contiguous
because an argument list is built here.
|
(D8) |
CHARACTER |
8 |
EIUS_ARG_LIST |
Application argument list |
(D8) |
ADDRESS |
4 |
EIUS_EIB_ADDR_PTR |
Ptr to EIUS_EIB_ADDR |
(DC) |
ADDRESS |
4 |
EIUS_COMMA_ADDR_PTR |
Ptr to EIUS_CURR_ COMMA_ADDR |
(E0) |
ADDRESS |
4 |
* |
Reserved |
(E4) |
ADDRESS |
4 |
* |
Reserved |
(E8) |
CHARACTER |
0 |
EIUS_SUPER_END |
End of SUPERLINK storage |