!*** MODULE $XMDEF ***
!DEC$ OPTIONS/ALIGN=(RECORDS=PACKED,COMMONS=PACKED)/NOWARN
 ! 
 !  DEFINITIONS FOR STATUS, CHARACTERISTICS AND ERRORS FOR DMC-11/DMR-11/DMP-11
 ! 
	STRUCTURE /XMDEV/
	    BYTE      XMDEV$B_P1_CLASS		 !  Device Class
	    BYTE      XMDEV$B_P1_TYPE		 !  Device type
	    INTEGER*2 XMDEV$W_P1_MMS		 !  Maximum message size
	    BYTE      XMDEV$B_P1_CHAR		 !  Unit characteristics
	    BYTE      XMDEV$B_P1_STS		 !  Unit Status
	    BYTE      XMDEV$B_P1_ESUM		 !  Error Summary
	    BYTE      XMDEV$B_P1_TPI		 !  Transmit Pipeline no.
	END STRUCTURE	! XMDEV
	PARAMETER XM$M_CHR_MOP = '00000001'X
	PARAMETER XM$M_CHR_LOOPB = '00000002'X
	PARAMETER XM$M_CHR_HDPLX = '00000004'X
	PARAMETER XM$M_CHR_SLAVE = '00000008'X
	PARAMETER XM$M_CHR_MBX = '00000010'X
	PARAMETER XM$M_CHR_DMC = '00000020'X
	PARAMETER XM$M_CHR_CTRL = '00000040'X
	PARAMETER XM$M_CHR_TRIB = '00000080'X
	PARAMETER XM$M_STS_DCHK = '00000100'X
	PARAMETER XM$M_STS_TIMO = '00000200'X
	PARAMETER XM$M_STS_ORUN = '00000400'X
	PARAMETER XM$M_STS_ACTIVE = '00000800'X
	PARAMETER XM$M_STS_BUFFAIL = '00001000'X
	PARAMETER XM$M_STS_RUNNING = '00002000'X
	PARAMETER XM$M_STS_DISC = '00004000'X
	PARAMETER XM$M_ERR_FATAL = '00010000'X
	PARAMETER XM$M_ERR_MAINT = '00080000'X
	PARAMETER XM$M_ERR_LOST = '00100000'X
	PARAMETER XM$M_ERR_THRESH = '00200000'X
	PARAMETER XM$M_ERR_TRIB = '00400000'X
	PARAMETER XM$M_ERR_START = '00800000'X
	PARAMETER XM$M_MDM_RTSHLD = '00000001'X
	PARAMETER XM$M_MDM_STNDBY = '00000002'X
	PARAMETER XM$M_MDM_MAINT2 = '00000004'X
	PARAMETER XM$M_MDM_MAINT1 = '00000008'X
	PARAMETER XM$M_MDM_FREQ = '00000020'X
	PARAMETER XM$M_MDM_RDY = '00000040'X
	PARAMETER XM$M_MDM_POLL = '00000080'X
	PARAMETER XM$M_MDM_SELM = '00000100'X
	PARAMETER XM$M_MDM_INT = '00000800'X
	PARAMETER XM$M_MDM_V35 = '00001000'X
	PARAMETER XM$M_MDM_RS232 = '00004000'X
	PARAMETER XM$M_MDM_RS422 = '00008000'X
	PARAMETER XM$M_MDM_CARRDET = '00000001'X
	PARAMETER XM$M_MDM_MSTNDBY = '00000002'X
	PARAMETER XM$M_MDM_CTS = '00000004'X
	PARAMETER XM$M_MDM_DSR = '00000008'X
	PARAMETER XM$M_MDM_HDX = '00000010'X
	PARAMETER XM$M_MDM_RTS = '00000020'X
	PARAMETER XM$M_MDM_DTR = '00000040'X
	PARAMETER XM$M_MDM_RING = '00000080'X
	PARAMETER XM$M_MDM_CHRMOD = '00000100'X
	PARAMETER XM$M_MDM_MCLOCK = '00000200'X
	PARAMETER XM$M_MDM_MODTEST = '00000400'X
	PARAMETER XM$M_MDM_SIGQUAL = '00004000'X
	PARAMETER XM$M_MDM_SIGRATE = '00008000'X
	STRUCTURE /XMDEF/
	UNION
	    MAP
	        PARAMETER XM$S_CHR_MOP = 1
	        PARAMETER XM$V_CHR_MOP = 0		 !  MOP MODE 
	        PARAMETER XM$S_CHR_LOOPB = 1
	        PARAMETER XM$V_CHR_LOOPB = 1		 !  LOOP BACK 
	        PARAMETER XM$S_CHR_HDPLX = 1
	        PARAMETER XM$V_CHR_HDPLX = 2		 !  HALF DUPLEX 
	        PARAMETER XM$S_CHR_SLAVE = 1
	        PARAMETER XM$V_CHR_SLAVE = 3		 !  HALF DUPLEX SLAVE STATION 
	        PARAMETER XM$S_CHR_MBX = 1
	        PARAMETER XM$V_CHR_MBX = 4		 !  MAILBOX IS ENABLED 
	        PARAMETER XM$S_CHR_DMC = 1
	        PARAMETER XM$V_CHR_DMC = 5		 !  DMC-11 COMPATABILITY MODE 
	        PARAMETER XM$S_CHR_CTRL = 1
	        PARAMETER XM$V_CHR_CTRL = 6		 !  CONTROL STATION 
	        PARAMETER XM$S_CHR_TRIB = 1
	        PARAMETER XM$V_CHR_TRIB = 7		 !  TRIBUTARY STATION 
	        PARAMETER XM$S_STS_DCHK = 1
	        PARAMETER XM$V_STS_DCHK = 8		 !  DATA CHECK OCCURED 
	        PARAMETER XM$S_STS_TIMO = 1
	        PARAMETER XM$V_STS_TIMO = 9		 !  TIMEOUT OCCURED 
	        PARAMETER XM$S_STS_ORUN = 1
	        PARAMETER XM$V_STS_ORUN = 10		 !  DATA OVER RUN OCCURED 
	        PARAMETER XM$S_STS_ACTIVE = 1
	        PARAMETER XM$V_STS_ACTIVE = 11		 !  ACTIVE UNIT 
	        PARAMETER XM$S_STS_BUFFAIL = 1
	        PARAMETER XM$V_STS_BUFFAIL = 12		 !  BUFFER ALLOCATION FAILURE OCCURED 
	        PARAMETER XM$S_STS_RUNNING = 1
	        PARAMETER XM$V_STS_RUNNING = 13		 !  PROTOCOL RUNNING 
	        PARAMETER XM$S_STS_DISC = 1
	        PARAMETER XM$V_STS_DISC = 14		 !  LINE DISCONNECT OCCURED 
	        PARAMETER XM$S_ERR_FATAL = 1
	        PARAMETER XM$V_ERR_FATAL = 16		 !  HARDWARE ERROR 
	        PARAMETER XM$S_ERR_MAINT = 1
	        PARAMETER XM$V_ERR_MAINT = 19		 !  DDCMP MAINT MESSAGE RECEIVED 
	        PARAMETER XM$S_ERR_LOST = 1
	        PARAMETER XM$V_ERR_LOST = 20		 !  DATA LOST BECAUSE OF BUFFER SIZE MISMATCH 
	        PARAMETER XM$S_ERR_THRESH = 1
	        PARAMETER XM$V_ERR_THRESH = 21		 !  THRESHOLD ERRORS 
	        PARAMETER XM$S_ERR_TRIB = 1
	        PARAMETER XM$V_ERR_TRIB = 22		 !  TRIBUTARY MALFUNCTIONING 
	        PARAMETER XM$S_ERR_START = 1
	        PARAMETER XM$V_ERR_START = 23
	        BYTE %FILL (3)				 !  DDCMP START MESSAGE RECEIVED 
	    END MAP
	    MAP
	        PARAMETER XM$S_MDM_RTSHLD = 1
	        PARAMETER XM$V_MDM_RTSHLD = 0		 !  RTS HOLD 
	        PARAMETER XM$S_MDM_STNDBY = 1
	        PARAMETER XM$V_MDM_STNDBY = 1		 !  SELECT STANDBY 
	        PARAMETER XM$S_MDM_MAINT2 = 1
	        PARAMETER XM$V_MDM_MAINT2 = 2		 !  MAINTENANCE MODE 2 
	        PARAMETER XM$S_MDM_MAINT1 = 1
	        PARAMETER XM$V_MDM_MAINT1 = 3		 !  MAINTENANCE MODE 1 
	        PARAMETER XM$S_MDM_FREQ = 1
	        PARAMETER XM$V_MDM_FREQ = 5		 !  SELECT FREQUENCY 
	        PARAMETER XM$S_MDM_RDY = 1
	        PARAMETER XM$V_MDM_RDY = 6		 !  DATA TERMINAL READY 
	        PARAMETER XM$S_MDM_POLL = 1
	        PARAMETER XM$V_MDM_POLL = 7		 !  SELECT POLLING MODEM MODE 
	        PARAMETER XM$S_MDM_SELM = 1
	        PARAMETER XM$V_MDM_SELM = 8		 !  MODEM INTERFACE PROGRAM SELECTED 
	        PARAMETER XM$S_MDM_INT = 1
	        PARAMETER XM$V_MDM_INT = 11		 !  INTEGRAL MODEM 
	        PARAMETER XM$S_MDM_V35 = 1
	        PARAMETER XM$V_MDM_V35 = 12		 !  V.35 
	        PARAMETER XM$S_MDM_RS232 = 1
	        PARAMETER XM$V_MDM_RS232 = 14		 !  RS-232-C OR RS423 
	        PARAMETER XM$S_MDM_RS422 = 1
	        PARAMETER XM$V_MDM_RS422 = 15
	        BYTE %FILL (2)				 !  RS-422 
	    END MAP
	    MAP
	        PARAMETER XM$S_MDM_CARRDET = 1
	        PARAMETER XM$V_MDM_CARRDET = 0		 !  CARRIER DETECT 
	        PARAMETER XM$S_MDM_MSTNDBY = 1
	        PARAMETER XM$V_MDM_MSTNDBY = 1		 !  MODEM STANDBY 
	        PARAMETER XM$S_MDM_CTS = 1
	        PARAMETER XM$V_MDM_CTS = 2		 !  CLEAR TO SEND 
	        PARAMETER XM$S_MDM_DSR = 1
	        PARAMETER XM$V_MDM_DSR = 3		 !  DATA SET READY 
	        PARAMETER XM$S_MDM_HDX = 1
	        PARAMETER XM$V_MDM_HDX = 4		 !  HALF-DUPLEX 
	        PARAMETER XM$S_MDM_RTS = 1
	        PARAMETER XM$V_MDM_RTS = 5		 !  REQUEST TO SEND 
	        PARAMETER XM$S_MDM_DTR = 1
	        PARAMETER XM$V_MDM_DTR = 6		 !  DATA TERMINAL READY 
	        PARAMETER XM$S_MDM_RING = 1
	        PARAMETER XM$V_MDM_RING = 7		 !  RING 
	        PARAMETER XM$S_MDM_CHRMOD = 1
	        PARAMETER XM$V_MDM_CHRMOD = 8		 !  CHARACTER OR BIT PROTOCOL MODE 
	        PARAMETER XM$S_MDM_MCLOCK = 1
	        PARAMETER XM$V_MDM_MCLOCK = 9		 !  MAINTENANCE CLOCK 
	        PARAMETER XM$S_MDM_MODTEST = 1
	        PARAMETER XM$V_MDM_MODTEST = 10		 !  MODEM TEST MODE 
	        PARAMETER XM$S_MDM_SIGQUAL = 1
	        PARAMETER XM$V_MDM_SIGQUAL = 14		 !  SIGNAL QUALITY 
	        PARAMETER XM$S_MDM_SIGRATE = 1
	        PARAMETER XM$V_MDM_SIGRATE = 15
	        BYTE %FILL (2)				 !  SIGNAL RATE 
	    END MAP
	END UNION
	END STRUCTURE	! XMDEF
!DEC$ END OPTIONS