TREN - Trace entry

     ==================================================================
      CONTROL BLOCK NAME = DFHTREN
      NAME OF MATCHING ASM CONTROL BLOCK = DFHTREN
      DESCRIPTIVE NAME = CICS trace entry
           PID 5655-YA1
           Copyright IBM Corp. 1986, 2023
      FUNCTION = Description of header of CICS trace entry.
      LIFETIME = Created by DFHTRPT in the internal trace table for
                 each TRACE_PUT. Destroyed when overwritten after
                 the next trace table wrap. Trace entries are also
                 held on auxiliary trace datasets and GTF datasets.
      STORAGE CLASS = Held in the internal trace table in MVS storage.
      LOCATION = Each trace table block contains a block header
                 followed by as many entries contiguously as will
                 fit in the rest of the block.
      INNER CONTROL BLOCKS = None
      NOTES :
         DEPENDENCIES = S/370
         RESTRICTIONS = None
         MODULE TYPE = Control block definition
     ------------------------------------------------------------------
      EXTERNAL REFERENCES = None
          DATA AREAS = None
          CONTROL BLOCKS = None
          GLOBAL VARIABLES (Macro pass) = None
     ------------------------------------------------------------------
           Change the following line for co-req dummy changes
           B3170 750 231102 HDPFRJM : Dummy change for co-req
     ==================================================================

   ==================================================================
     Tren type constants.
     The Top Bits of TREN_TYPE will be used for the release.
             X'3?' equals R750
             X'2?' equals R740
             X'1?' equals R730
             X'0?' equals R720
             X'F?' equals R710
             X'E?' equals R700
             X'D?' equals R690
             X'C?' equals R680
             X'B?' equals R670
             X'A?' equals R660
             X'9?' equals R650
             X'8?' equals R640
             X'7?' equals R630
             X'6?' equals R620
             X'5?' equals R610
     These values are now being reused by the later releases and so
     are commented out below and are left here for future reference
             X'4?' equals R530
             X'3?' equals R520
             X'2?' equals R510
             X'1?' equals R410
             X'0?' equals R330 and below
     The Bottom Bits of TREN_TYPE will be used for the trace type.
     The types below will need to be updated for release.
     For example, the release after 5.1.0 will have the top bits
     set like this '2?'X.
     A new release field will also be added to the bottom.
     If a new TREN_TYPE is added, be sure to change GTF_TYPE_NUM
     in DFHTRFCA.
   ==================================================================