EIUS - EXEC interface user structure

      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.

                      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.

    The following storage up to EIUS_STACK_ASIS is
    re-initialised to X'00' following a LINK or XCTL

    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.

     EIUS_EIB_ADDR and EIUS_CURR_COMMA_ADDR must be contiguous
     for DFHEIENT macro in EXEC CICS with Assembler.

    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.

                        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.

    EIUS_EIB_ADDR_PTR and EIUS_COMMA_ADDR_PTR must be contiguous
    because an argument list is built here.