;
; SINGLE MESSAGE ID LIST HEAD STRUCTURE
;
; 
;		INLAND STEEL
;		PROCESS AUTOMATION DEPT.
;		3210 WATLING ST. MS 2-465
;		EAST CHICAGO, IN   46312
;		
; DATE OF LAST UPDATE: 13-OCT-86
;
	.MACRO	MIDDEF
	.ASECT
.=0
M.IDSIZ	= 16.			; SIZE OF A SINGLE MESSAGE ID
M.MID:	.BLKB	M.IDSIZ		; ASCII MESSAGE ID
M.FLK:	.BLKW	1		; FORWARD LINK TO FIRST BLOCK OF FIRST
				;  MESSAGE IN QUEUE THIS ID
M.BLK:	.BLKW	1		; BACKWARD LINK TO LAST BLOCK OF LAST
				;  MESSAGE IN QUEUE THIS ID
M.RNA:	.BLKW	1		; READ BUT NOT ACK.MESG. FIRST BLOCK LINK
M.BNA:	.BLKW	1		; READ BUT NOT ACK. MESG. LAST BLOCK LINK
M.MAX:	.BLKW	1		; MAXIMUM NUMBER OF MESSAGES ALLOWED THIS ID
M.CNT:	.BLKW	1		; CURRENT NUMBER IN QUEUE THIS MESSAGE ID
M.QSEQ:	.BLKW	1		; CURRENT ON QUEUE SEQUNECE NUMBER
M.R50:	.BLKW	2		; RAD 50 CONNECTED TASK NAME
M.TCB:	.BLKW	1		; TCB ADDRESS OF CONNECTED TASK NAME
M.EFN:	.BLKW	1		; READER'S EFN TO SET IF M.CNT GOES NON-ZERO
M.NVC:	.BLKW	1		; NUMBER of non-volatile message
M.NVL:	.BLKW	1		; LINK TO LAST SCANNED NON VOLATILE MESSAGE
M.LST:	.BLKW	1		; LAST BLOCK NBR OF MESSAGE LINKED TO LAST 
				;  SCANNED
M.LEN=.
.=0
	.ENDM