WMT - XRF message manager message

      CONTROL BLOCK NAME = DFHWMTPS
      DESCRIPTIVE NAME = CICS TS (XRF) Message manager message
                             transmission control.
           Licensed Materials - Property of IBM
            Restricted Materials of IBM 
           5655-Y04
           (C) Copyright IBM Corp. 1985 
      FUNCTION =
           Contains an RPL for issuing VSAM requests against a
           particular CI buffer, and data representing the state
           of that buffer.
           XRF message management builds these blocks to control the
           reading and writing of CIs in the message dataset.
           Each instance represents a single buffer. At present,
           with single buffering, only a single instance each exists
           for the PUTMSG and GETMSG processes.
      LIFETIME =
           Created by DFHWMMT when called during the initialization
           of the GETMSG or PUTMSG process. Lasts for the lifetime
           of the process.
      STORAGE CLASS =
           Non-CICS storage. MVS GETMAIN above 16M line.
      LOCATION =
           Addressed by WMTPCCCA or WMTGCCA.
      INNER CONTROL BLOCKS =
           WMTP PUTMSG transmission control area. Addressed by
                   WMGPMTA. Contains data controlling the position
                   reached in writing to the message dataset.
           WMTG GETMSG transmission control area. Addressed by
                   WMGGMTA. Contains data controlling the position
                   reached in reading the message dataset.
      NOTES :
       DEPENDENCIES = S/370
       RESTRICTIONS =
             None
       MODULE TYPE = Control block definition
     ------------------------------------------------------------------
      EXTERNAL REFERENCES =
        DATA AREAS =
            None
        CONTROL BLOCKS =
            None
        GLOBAL VARIABLES (Macro pass) =
            None
     ------------------------------------------------------------------
      CI Control Area

Table 1.
Offset Hex	Type	Len	Name (Dim)	Description
(0)	STRUCTURE	168	DFHWMTPS
(0)	ADDRESS	4	*	Reserved for chain ptr
(4)	BIT(8)	1	WMTCFLGS	Flags
(4)	1... ....		WMTCFCHG	CI has been changed
(4)	.1.. ....		WMTCFSAF	CI can be written without impacting any backup.
(4)	..1. ....		WMTCFUWM	CI contains unwritten complete messages.
(5)	CHARACTER	3	WMTCFDBK	VSAM feedback data copied from RPL.
(5)	UNSIGNED	1	WMTCRTNC	VSAM return code
(6)	UNSIGNED	1	*	VSAM component code
(7)	UNSIGNED	1	WMTCRSNC	VSAM reason code
(8)	ADDRESS	4	WMTCBUFA	Address of CI buffer
(C)	ADDRESS	4	WMTCIDFA	Address of CIDF in buffer
(10)	ADDRESS	4	WMTCECB	ECB for VSAM to post
(14)	UNSIGNED	4	WMTCRBA	RBA argument for VSAM requests.
(18)	ADDRESS	4	WMTCWQEF	Address of queue element of most recent record in CI which specifed FORCE
(18)	ADDRESS	4	WMTCRDFA	Address of last used RDF
(1C)	HALFWORD	2	WMTCOFF	Offset of end of last complete message record in CI - 0 if none.
(1E)	HALFWORD	2	WMTCICL	Length of CI control area
(20)	FULLWORD	4	WMTCCNO	Cycle to which CI belongs
(24)	CHARACTER	128	WMTCMSGA	VSAM request message area
(A8)	CHARACTER	0	WMTCRPL	End of fixed part. Start of associated RPL.

      PUTMSG Transmission control data

Table 2.
Offset Hex	Type	Len	Name (Dim)	Description
(0)	STRUCTURE	24	WMTP
(0)	CHARACTER	8	WMTPAWC	Active write cursor of end of latest complete message
(0)	FULLWORD	4	WMTPWCNO	Active write cycle number
(4)	UNSIGNED	4	WMTPWRBA	Active write RBA
(8)	FULLWORD	4	WMTPSEQN	Message sequence number
(C)	ADDRESS	4	WMTPCCCA	Current CI control area
(10)	FULLWORD	4	WMTPCCNO	Current write cycle number
(14)	BIT(16)	2	WMTPFLGS
(14)	1... ....		WMTPFMOV	Moving user data
(14)	.1.. ....		WMTPFMDS	'Multiple discard' - the previous non-crucial msg was also discarded.
(14)	BIT(14) POS(3)	2	*	Reserved
(16)	HALFWORD	2	WMTPMAXL	Maximum record length
(18)	CHARACTER	0	WMTPEND

      GETMSG Transmission control data

Table 3.
Offset Hex	Type	Len	Name (Dim)	Description
(0)	STRUCTURE	28	WMTG
(0)	CHARACTER	8	WMTGBRC	Backup read cursor
(0)	FULLWORD	4	WMTGRCNO	Backup read cycle number
(4)	UNSIGNED	4	WMTGRRBA	Backup read RBA
(8)	CHARACTER	8	WMTGAWC	Active write cursor when current CI was read.
(8)	FULLWORD	4	WMTGWCNO	Active write cycle number
(C)	UNSIGNED	4	WMTGWRBA	Active write RBA
(10)	FULLWORD	4	WMTGSEQN	Message sequence number
(14)	ADDRESS	4	WMTGCCCA	Current CI control area
(18)	BIT(16)	2	WMTGFLGS
(18)	1... ....		WMTGFMOV	Moving user data
(18)	.1.. ....		WMTGFFMR	First message received
(18)	BIT(14) POS(3)	2	*	Reserved
(1A)	HALFWORD	2	*	Reserved
(1C)	CHARACTER	0	WMTGEND