ICE - Interval Control Element

      CONTROL BLOCK NAME = DFHICEDS
      DESCRIPTIVE NAME = CICS TS Interval Control Element (ICE)
             Licensed Materials - Property of IBM
              Restricted Materials of IBM 
             5655-Y04
             (C) Copyright IBM Corp. 1991, 2016 
      FUNCTION =
             An ICE is created for each time-dependent request
             received by the interval control program. These ICEs are
             logically chained from CSAICEBA in the CSA in expiration
             time-of-day sequence.
      LIFETIME =
             Expiration of a time-ordered request is detected by the
             expired request logic of the interval control program
             running as a CICS system task. The type of service
             represented by the expired ICE is initiated, if all
             resources required for the service are available, and the
             ICE is removed from the chain. If the resources are not
             available, the ICE remains on the chain and another
             attempt to initiate the request service is made the next
             time the expiry logic runs.
      STORAGE CLASS =
      LOCATION =
      INNER CONTROL BLOCKS =
      NOTES :
         DEPENDENCIES = S/370
         MODULE TYPE = Control block definition
      EXTERNAL REFERENCES =
          DATA AREAS =
          CONTROL BLOCKS =
          GLOBAL VARIABLES (Macro pass) =
      The following fields form part of the product sensitive
      programming interface:
      ICECHNAD ICERQID ICETRMID ICETRNID ICEXTOD (Marked #)
Table 1.
Offset Hex Type Len Name (Dim) Description
(0) STRUCTURE 172 DFHICEDS ICE control block
(0) CHARACTER 16 ICEPRFX ICE prefix
(0) UNSIGNED 2 ICELEN ICE length
(2) CHARACTER 6 ICEBLKID Eye-catcher ('>DFHAP')
(8) CHARACTER 8 ICEBLKNM Control block name ('ICE')
(10) CHARACTER 8 ICEBODY ICE body
(10) ADDRESS 4 ICECHNAD #ICE chain address
(14) ADDRESS 4 ICETECAA Timer event area address
(18) ADDRESS 4 ICETCAAD TCA address
(18) CHARACTER 4 ICETRMID #Symbolic terminal id
(1C) CHARACTER 4 ICETRNID #Transaction identification
(20) ADDRESS 4 ICE_ICUS_PTR ICE Security Extension
(24) CHARACTER 9 * Reserved
(2D) CHARACTER 1 ICETYPE Type of ICE
(2E) BIT(8) 1 ICESTATI ICE status indicator
(2E) 1... ....   ICESTNRL Expired normally
(2E) .1.. ....   ICE_BEING_PROCESSED Being processed
(2E) ..1. ....   ICESTXTE Expired on entry
(2E) ...1 ....   ICESTCNL Cancelled by other task
(2E) .... 1...   ICESTXTM Expiration time
(2E) .... .1..   ICESTRES Awaiting DS resume
(2E) .... ..1.   * Reserved
(2E) .... ...1   ICESTCHN On chain
(2F) CHARACTER 1 ICERQCLS Request identification
(30) UNSIGNED 4 ICE_UNIQUE_ID Number used to construct unique request id.
(30) CHARACTER 4 ICEXTOD #Exp'n time of day
(34) CHARACTER 8 ICERQID #Request identification
(3C) CHARACTER 8 ICENETSY Netname/sysid from XICTENF exit
(44) CHARACTER 8 ICEMODEN Mode name
(4C) CHARACTER 1 ICETR Transaction routing indicator
(4D) CHARACTER 1 ICEFS Function shipping indicator
(4E) BIT(8) 1 ICEFLAGS Flags
(4E) 1... ....   ICESZ Startcode SZ for FEPI
(4E) .1.. ....   * Reserved
(4E) ..1. ....   * Reserved
(4E) ...1 ....   ICEDYNTR Transaction dynamic
(4E) .... 1...   * Reserved
(4E) .... .1..   ICE_DATA_RECOVERABLE ICE is associated with a recoverable TS queue
(4E) .... ..1.   ICE_ZERO_INTERVAL Originating request specified an INTERVAL of zero
(4E) .... ...1   ICE_PROTECTED START was protected
(4F) BIT(8) 1 ICEFLAG2 Flags
(4F) 1... ....   ICERTST Routable START
(4F) .1.. ....   ICE_TRACK_OVERRIDE_NO Tracking data for user task not required
(4F) ..1. ....   ICE_TRACK_OVERRIDE_ YES Tracking data for system task is required
(4F) ...1 ....   ICE_TG_ACD_IS_CAC Initial ctx = current
(4F) .... 1...   ICE_SETUP_REQUIRED ICE created by APIC
(4F) .... .1..   * Reserved
(4F) .... ..1.   ICE_TG_ODR_WITH_PTD ODR with PTD
(4F) .... ...1   * Reserved
(50) CHARACTER 4 ICECURTR Current terminal id
(54) CHARACTER 12 ICE_QUALIFIED_ EXPIRY_TIME Expiry time and expiry time qualifier
(54) CHARACTER 8 ICE_EXPIRY_TIMES Absolute expiry times
(54) CHARACTER 8 ICE_EXPIRY_STCK STCK expiry time for an interval ICE
(54) CHARACTER 8 ICE_EXPIRY_DT Date and time of expiry for time ICE
(54) CHARACTER 4 ICE_EXPIRY_DATE ccyyddd+ expiry date for time ICE
(58) CHARACTER 4 ICE_EXPIRY_TIME Timer unit (1/300sec) expiry TOD for time ICE
(5C) CHARACTER 4 ICETIMST Expiry time qualifier
(60) HALFWORD 2 ICE_START_DATA_LEN Length of data
(62) CHARACTER 2 * Reserved
(64) CHARACTER 8 ICE_CREATION_TIME Creation time STCK value
(6C) CHARACTER 8 ICE_TERMINAL_NETNAME Netname of terminal
(74) CHARACTER 4 ICESHSYS Shipped via sysid
(78) CHARACTER 8 ICE_TOR_NETNAME Netname of TOR
(80) ADDRESS 4 ICE_ROUTER_COMM_ADDR Address of commarea for dynamic routing program
(84) HALFWORD 2 ICE_ROUTER_COMM_LEN Length of DYP commarea
(86) CHARACTER 4 ICEDFTRN Transaction id for deferred dynamic start request
(8A) CHARACTER 8 ICEDSRP Router program name - stored here for ICXM processing to reduce SHRTM calls
(92) CHARACTER 2 * RESERVED
(94) UNSIGNED 4 ICE_CHANNEL_TOKEN Channel token for started task
(98) ADDRESS 4 ICE_CORRELATOR_ADDR Address of EWLM correlator
(9C) ADDRESS 4 ICE_TG_ODR_ADDR A(TGRPID & ODR)
(A0) ADDRESS 4 ICE_ADAPTER_ADDR Addr adapter fields
(A4) ADDRESS 4 ICE_TG_ACD_ADDR A(ACD) initial
(A8) ADDRESS 4 ICE_TG_CAC_ADDR A(ACD) current
(AC) CHARACTER 0 * end of ICE

Constants

Table 2.
Len Type Value Name Description
    Length of the ICE control block
4 DECIMAL 172 ICEAD ICE length
    Possible values of ICETYPE
1 HEX 20 ICEWTM
1 HEX 30 ICEPST
1 HEX 40 ICEINT
1 HEX 50 ICEPUT
     Values used in DFHIC get wait requests
1 DECIMAL 0 ICE_GW_DATA Resumed due to new data
1 DECIMAL 4 ICE_GW_SHUTDOWN Resumed due to shutdown