!*** MODULE $XABTRMDEF ***
CDEC$ OPTIONS /NOALIGN
! --
! ++
! 
!         terminal control xab field definitions
!                 $xabtrmdef
! 
! 
! 
	PARAMETER XAB$C_TRM = '0000001F'X	! XABTRM ID CODE 
	PARAMETER XAB$K_TRMLEN = '00000024'X	!  length of xab of type terminal control 
	PARAMETER XAB$C_TRMLEN = '00000024'X	!  length of xab of type terminal control 
	STRUCTURE /XABTRMDEF/
	    BYTE      %FILL
	    BYTE      %FILL
	    INTEGER*2 %FILL
	    INTEGER*4 %FILL				! HAS SAME COD, BLN, SPARE AND NXT FIELD 
! THESE 4 FIELDS ARE COMMON TO ALL XABS AND
! HAVE BEEN DEFINED BY $XABDEF
	    INTEGER*4 XAB$L_ITMLST			!  item list address
	    INTEGER*2 XAB$W_ITMLST_LEN		!  item list length
	    INTEGER*2 %FILL				!  spare
	    INTEGER*4 %FILL				!  spare
	    INTEGER*4 %FILL				!  spare
	    INTEGER*4 %FILL				!  spare
	    INTEGER*4 %FILL				!  spare
	    INTEGER*4 %FILL				!  spare
	END STRUCTURE	! XABTRMDEF
CDEC$ END OPTIONS