!*** MODULE $DMTDEF ***
!DEC$ OPTIONS/ALIGN=(RECORDS=PACKED,COMMONS=PACKED)/NOWARN
 ! 
 !  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
	PARAMETER DMT$M_MINICOPY_REQUIRED = '00000100'X
	PARAMETER DMT$M_MINICOPY_OPTIONAL = '00000200'X
	PARAMETER DMT$M_FORCE = '00000400'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		 !  CURRENT DISMOUNTER IS REMOTE WITH RESPECT TO ORIGINATOR
	        PARAMETER DMT$S_MINICOPY_REQUIRED = 1
	        PARAMETER DMT$V_MINICOPY_REQUIRED = 8	 !  BITMAP REQUIRED
	        PARAMETER DMT$S_MINICOPY_OPTIONAL = 1
	        PARAMETER DMT$V_MINICOPY_OPTIONAL = 9	 !  BITMAP OPTIONAL
	        PARAMETER DMT$S_FORCE = 1
	        PARAMETER DMT$V_FORCE = 10		 !  FORCE dismount of SSM
	    BYTE %FILL (2)
	    END MAP
	END UNION
	END STRUCTURE	! DMTDEF
!DEC$ END OPTIONS