NQUE - Enq/Deq EXEC Parameter List

      CONTROL BLOCK NAME = DFHNQUEC
      DESCRIPTIVE NAME = CICS TS EXEC argument list for ENQ/DEQ
                                       user exits.
           Licensed Materials - Property of IBM
            Restricted Materials of IBM 
           5655-Y04
           (C) Copyright IBM Corp. 1997 
         Although provided in a general library, DFHNQUED is not
         to be used as a general programming interface. Refer to
         product documentation to determine intended usage.
         The following fields are part of the Product-sensitive
         Programming Interface.
                     NQ_ADDR0
                     NQ_ADDR1
                     NQ_ADDR2
                     NQ_ADDR3
                     NQ_GROUP
                     NQ_FUNCT
                     NQ_BITS1
                     NQ_BITS2
                     NQ_EIDOPT5
                     NQ_EIDOPT6
                     NQ_EIDOPT7
                     NQ_EIDOPT8
                     NQ_ENQ
                     NQ_DEQ
                     NQ_RESOURCE
                     NQ_LENGTH
                     NQ_MAXLIFETIME
         All equates for values of EIBRCODE, EIBRESP and EIBRESP2
         form part of the General-purpose Programming Interface.
         All remaining fields used in defining the Exec Parameter
         List are product sensitive and may vary between CICS
         releases.
      FUNCTION =
           To define the EXEC parameter list for ENQ/DEQ
           requests, for use by global user exit programs at exit
           points XNQEREQ and XNQEREQC.
           On entry to the XNQEREQ and XNQEREQC User Exits, the EXEC
           parameter list is pointed to by UEPCLPS.
           The EXEC parameter list for ENQ/DEQ consists of four
           addresses.
           The four addresses are defined by NQ_ADDR0 to NQ_ADDR3.
           This DSECT defines these addresses and the areas that
           they point to.
           On entry to the XNQEREQ and XNQEREQC User Exits, the copy
           of EIBRCODE is pointed to by UEPRCODE, the copy of EIBRESP
           is pointed to by UEPRESP and the copy of EIBRESP2 is
           pointed to by UEPRESP2.
           This DSECT also contains equates for values of EIBRCODE,
           EIBRESP and EIBRESP2 used by ENQ/DEQ.
      LIFETIME = Lifetime of the NQ command request
      STORAGE CLASS = As the storage being mapped is the translated
                   source in the user's application program, the
                   storage may be either above or below the line.
      LOCATION = (1) EXEC Parameter List is addressed by UEPCLPS.
                   (2) Fields copied from the EIB are addressed by
                       UEPRCODE, UEPRESP and UEPRESP2.
                   (3) The token for use in communicating between
                       XNQEREQ and XNQEREQC is addressed by UEPNQTOK.
      INNER CONTROL BLOCKS =
           NQ_ADDR_LIST declares the EXEC addresses.
           NQ_EID defines the EID pointed to by NQ_ADDR0.
      NOTES :
       DEPENDENCIES = S/370 ESA
       RESTRICTIONS = None
       MODULE TYPE = Control Block definition
     -----------------------------------------------------------------
      EXTERNAL REFERENCES =
            None.
        DATA AREAS =
            None.
        CONTROL BLOCKS =
            None.
        GLOBAL VARIABLES (Macro pass) =
            None.
     -----------------------------------------------------------------
      The command parameter list is a list of addresses
      which reference the argument values for this EXEC CICS
      command. The addresses are only valid if the argument is
      applicable to this command.
      The existence bits in the EID component (NQ_BITS1) specify
      those addresses that are valid, and the flagword bits
      (NQ_EIDOPT5 - NQ_EIDOPT7) specify the keywords that were given
      in the EXEC CICS command.
      Therefore, you can deduce the useage of each address by testing
      these bits in conjunction with the command function(NQ_FUNCT).

      NQ_EID (addressed by NQ_ADDR0) gives the command function, and
      contains the existence and flagword bits.
      Note: Equates for NQ_GROUP, NQ_FUNCT, EIBRCODE, EIBRESP and
      EIBRESP2 values are defined at the end of this data structure.

                                         '06'X for DEQ
   -----------------------------------------------------------------
    The existence bits (NQ_BITS1) specify the parameters that are
    valid for this command.
    For example, NQ_EXIST2 set on indicates that NQ_ADDR2 is valid,
    meaning that it addresses a LENGTH value.
    NQ_ADDR0 is always valid and has no existence bit.
   -----------------------------------------------------------------

   -----------------------------------------------------------------
    The next 3 bytes (NQ_EIDOPT5 - NQ_EIDOPT7) are the flagword
    bits.
    A user exit program at XNQEREQ can set the NQ_NOSUSPEND_X
    bit for an ENQ command.
   -----------------------------------------------------------------

      The following definitions are for the rest of the arguments in
      the EXEC parameter list, addressed by NQ_ADDR1 - NQ_ADDR3 in
      NQ_ADDR_LIST.

    Equate for NQ_GROUP.
    All ENQ/DEQ requests have group code '12'

    Equates for NQ_FUNCT values.

       Start of General Use Programming Interface.
       Equates for EIBRCODE values used by Enq/Deq.

       Equates for EIBRESP values used by Enq/Deq.

       Equates for EIBRESP2 values used by Enq/Deq