!*** MODULE $DMTDEF ***
CDEC$ OPTIONS /NOALIGN
! 
!  FLAG BITS FOR THE $DISMOU (DISMOUNT) SYSTEM SERVICE.
! 
	PARAMETER DMT$M_NOUNLOAD = '00000001'X
	PARAMETER DMT$M_UNIT = '00000002'X
	PARAMETER DMT$M_ABORT = '00000004'X
	PARAMETER DMT$M_CLUSTER = '00000008'X
	PARAMETER DMT$M_UNLOAD = '00000010'X
	PARAMETER DMT$M_OVR_CHECKS = '00000020'X
	PARAMETER DMT$M_CHECK_ONLY = '00000040'X
	PARAMETER DMT$M_REMOTE = '00000080'X
	STRUCTURE /DMTDEF/
	UNION
	    MAP
	        PARAMETER DMT$S_NOUNLOAD = 1
	        PARAMETER DMT$V_NOUNLOAD = 0		!  DO NOT UNLOAD (SPIN DOWN) THE VOLUME 
	        PARAMETER DMT$S_UNIT = 1
	        PARAMETER DMT$V_UNIT = 1		!  DISMOUNT ONLY THE SPECIFIED VOLUME 
	        PARAMETER DMT$S_ABORT = 1
	        PARAMETER DMT$V_ABORT = 2		!  FORCED DISMOUNT	
	        PARAMETER DMT$S_CLUSTER = 1
	        PARAMETER DMT$V_CLUSTER = 3		!  CLUSTER-WIDE DISMOUNT
	        PARAMETER DMT$S_UNLOAD = 1
	        PARAMETER DMT$V_UNLOAD = 4		!  EXPLICIT UNLOAD (OVERRIDE UCB$x_UNLOAD)
	        PARAMETER DMT$S_OVR_CHECKS = 1
	        PARAMETER DMT$V_OVR_CHECKS = 5		!  OVERRIDE OPEN FILE CHECKS
	        PARAMETER DMT$S_CHECK_ONLY = 1
	        PARAMETER DMT$V_CHECK_ONLY = 6		!  CHECK ONLY FOR OPEN FILES - DON'T DISMOUNT
	        PARAMETER DMT$S_REMOTE = 1
	        PARAMETER DMT$V_REMOTE = 7
	        BYTE %FILL (1)				!  CURRENT DISMOUNTER IS REMOTE WITH RESPECT TO ORIGINATOR
	    END MAP
	END UNION
	END STRUCTURE	! DMTDEF
CDEC$ END OPTIONS