!*** MODULE $PLVDEF ***
CDEC$ OPTIONS /NOALIGN
! +
!  PRIVILEGED LIBRARY VECTOR DEFINITION
! -
	PARAMETER PLV$C_TYP_CMOD = '00000001'X	! CHANGE MODE VECTOR TYPE 
	PARAMETER PLV$C_TYP_MSG = '00000002'X	! MESSAGE VECTOR TYPE 
	STRUCTURE /PLVDEF/
	    INTEGER*4 PLV$L_TYPE			! TYPE CODE FOR VECTOR FORMAT 
! TYPE CODES FOR PRIVILEGE VECTORS 
	    INTEGER*4 PLV$L_VERSION			! SYSTEM VERSION NUMBER 
	    UNION
	        MAP
	        INTEGER*4 PLV$L_KERNEL			! SELF-REL PTR TO KERNEL MODE DISPATCHER 
	        END MAP
	        MAP
	        INTEGER*4 PLV$L_MSGDSP			! SELF-REL PTR TO MESSAGE DISPATCHER 
	        END MAP
	    END UNION
	    INTEGER*4 PLV$L_EXEC			! SELF-REL PTR TO EXEC MODE DISPATCHER 
	    INTEGER*4 PLV$L_USRUNDWN		! SELF-REL PTR TO USER RUNDOWN SERVICE 
	    INTEGER*4 %FILL				! UNUSED, RESERVED FOR FUTURE USE 
	    INTEGER*4 PLV$L_RMS			! SELF-REL PTR TO RMS SERVICES DISPATCHER 
	    INTEGER*4 PLV$L_CHECK			! LONGWORD USED TO CHECK VIRTUAL ADDRESS 
! LOCATION OF VECTOR
	END STRUCTURE	! PLVDEF
CDEC$ END OPTIONS