!*** MODULE $LNMDEF ***
!DEC$ OPTIONS/ALIGN=(RECORDS=PACKED,COMMONS=PACKED)/NOWARN
	PARAMETER LNM$M_NO_ALIAS = '00000001'X
	PARAMETER LNM$M_CONFINE = '00000002'X
	PARAMETER LNM$M_CRELOG = '00000004'X
	PARAMETER LNM$M_TABLE = '00000008'X
	PARAMETER LNM$M_CONCEALED = '00000100'X
	PARAMETER LNM$M_TERMINAL = '00000200'X
	PARAMETER LNM$M_EXISTS = '00000400'X
	PARAMETER LNM$M_SHAREABLE = '00010000'X
	PARAMETER LNM$M_CLUSTERWIDE = '00020000'X
	PARAMETER LNM$M_DCL_REQUEST = '00040000'X
	PARAMETER LNM$M_CREATE_IF = '01000000'X
	PARAMETER LNM$M_CASE_BLIND = '02000000'X
	PARAMETER LNM$M_INTERLOCKED = '04000000'X
	PARAMETER LNM$M_LOCAL_ACTION = '08000000'X
	STRUCTURE /LNMDEF/
 !  Logical name attributes -- bits 0-7
	    PARAMETER LNM$S_NO_ALIAS = 1
	    PARAMETER LNM$V_NO_ALIAS = 0		 !  Do not allow outer mode alias
	    PARAMETER LNM$S_CONFINE = 1
	    PARAMETER LNM$V_CONFINE = 1		 !  Do not copy into subprocess
	    PARAMETER LNM$S_CRELOG = 1
	    PARAMETER LNM$V_CRELOG = 2		 !  Created with old $CRELOG service
	    PARAMETER LNM$S_TABLE = 1
	    PARAMETER LNM$V_TABLE = 3		 !  This is a table name
 !  Logical name translation attributes -- bits 8-15
	    PARAMETER LNM$S_CONCEALED = 1
	    PARAMETER LNM$V_CONCEALED = 8		 !  Do not display result of translation
	    PARAMETER LNM$S_TERMINAL = 1
	    PARAMETER LNM$V_TERMINAL = 9		 !  Do not retranslate result of translation
	    PARAMETER LNM$S_EXISTS = 1
	    PARAMETER LNM$V_EXISTS = 10		 !  Translation does exist at this index
 !  Logical name table characteristics -- bits 16-23
	    PARAMETER LNM$S_SHAREABLE = 1
	    PARAMETER LNM$V_SHAREABLE = 16		 !  Logical name table is shareable (S0 space)
	    PARAMETER LNM$S_CLUSTERWIDE = 1
	    PARAMETER LNM$V_CLUSTERWIDE = 17	 !  This is a clusterwide table (or name) 
 !    Only supported as returned $TRNLNM attribute
	    PARAMETER LNM$S_DCL_REQUEST = 1
	    PARAMETER LNM$V_DCL_REQUEST = 18	 !  $CRELNM or $CRELNT request made by DCL
 !  System service options -- bits 24-31
	    PARAMETER LNM$S_CREATE_IF = 1
	    PARAMETER LNM$V_CREATE_IF = 24		 !  May map to existing logical name table
	    PARAMETER LNM$S_CASE_BLIND = 1
	    PARAMETER LNM$V_CASE_BLIND = 25		 !  Perform case-insensitive translation
	    PARAMETER LNM$S_INTERLOCKED = 1
	    PARAMETER LNM$V_INTERLOCKED = 26	 !  Translate clusterwide name with LNM$CWLOGICALS locked
	    PARAMETER LNM$S_LOCAL_ACTION = 1
	    PARAMETER LNM$V_LOCAL_ACTION = 27	 !  A local operation on a clusterwide name 
 !   done in response to a request from another node
 !   Only supported from kernel mode
	BYTE %FILL (2)
	END STRUCTURE	! LNMDEF
	PARAMETER LNM$C_TABNAMLEN = '0000001F'X	 !  Maximum length of a name contained within a directory t
	PARAMETER LNM$C_NAMLENGTH = '000000FF'X	 !  Maximum logical name / translation length
	PARAMETER LNM$C_MAXDEPTH = '0000000A'X	 !  Maximum logical name recursion depth
	PARAMETER LNM$_INDEX = '00000001'X	 !  Translation index
	PARAMETER LNM$_STRING = '00000002'X	 !  Translation string
	PARAMETER LNM$_ATTRIBUTES = '00000003'X	 !  Attribute bits
	PARAMETER LNM$_TABLE = '00000004'X	 !  Logical name table name
	PARAMETER LNM$_LENGTH = '00000005'X	 !  Length of translation string
	PARAMETER LNM$_ACMODE = '00000006'X	 !  Access mode of name
	PARAMETER LNM$_MAX_INDEX = '00000007'X	 !  Maximum translation index
	PARAMETER LNM$_PARENT = '00000008'X	 !  Parent logical name table name
	PARAMETER LNM$_LNMB_ADDR = '00000009'X	 !  Return LNM block address
 !   internal use by MTL 
 !   and mailbox UCB
	PARAMETER LNM$_AGENT_ACMODE = '0000000A'X  !  Probes to be done at a different access mode
 !  Define item list codes
	PARAMETER LNM$_CHAIN = -1		 !  Chain to next list
!DEC$ END OPTIONS