!*** MODULE $XABRDTDEF ***
CDEC$ OPTIONS /NOALIGN
! --
! ++
! 
!         revision date/time xab definitions
!                 $xabrdtdef
	PARAMETER XAB$C_RDT = '0000001E'X	!  xabrdt id code 
	PARAMETER XAB$K_RDTLEN = '00000014'X	!  length of rdt xab 
	PARAMETER XAB$C_RDTLEN = '00000014'X	!  length of rdt xab 
	STRUCTURE /XABRDTDEF/
	    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*2 %FILL				! REVISION !,DEFINED IN $XABDEF,SINCE COMMON TO DAT & RDT 
	    INTEGER*2 %FILL				!  spare 
	    INTEGER*4 %FILL(2)			!  revision date & time,defined in $xabdef 
	END STRUCTURE	! XABRDTDEF
CDEC$ END OPTIONS