!*** MODULE $NAMDEF ***
CDEC$ OPTIONS /NOALIGN
! 
!          name block field definitions
! 
!   the nam block is used to communicate optional
!   filename-related information
! 
	PARAMETER NAM$C_BID = '00000002'X	!  code for nam block 
	PARAMETER NAM$C_MAXRSS = '000000FF'X	!  maximum resultant name string size (network) 
	PARAMETER NAM$C_MAXRSSLCL = '000000FF'X	!  maximum resultant name string size (local) 
	PARAMETER NAM$M_PWD = '00000001'X
	PARAMETER NAM$M_FILL_1 = '00000002'X
	PARAMETER NAM$M_FILL_2 = '00000004'X
	PARAMETER NAM$M_SYNCHK = '00000008'X
	PARAMETER NAM$M_NOCONCEAL = '00000010'X
	PARAMETER NAM$M_SLPARSE = '00000020'X
	PARAMETER NAM$M_SRCHXABS = '00000040'X
	PARAMETER NAM$C_UFS = '00000000'X	!  Unknown file system for remote file access or 
!   not applicable for local file access or
	PARAMETER NAM$C_NO_RFS = '00000000'X	!   task-to-task operation
	PARAMETER NAM$C_RMS11 = '00000001'X	!  RMS-11 
	PARAMETER NAM$C_RMS20 = '00000002'X	!  RMS-20 
	PARAMETER NAM$C_RMS32 = '00000003'X	!  RMS-32 
	PARAMETER NAM$C_FCS11 = '00000004'X	!  FCS-11 
	PARAMETER NAM$C_RT11FS = '00000005'X	!  RT-11 file system 
	PARAMETER NAM$C_TOPS20FS = '00000007'X	!  TOPS-20 file system 
	PARAMETER NAM$C_TOPS10FS = '00000008'X	!  TOPS-10 file system 
	PARAMETER NAM$C_RMS32S = '0000000A'X	!  RMS-32 subset (e.g., VAXELAN)
	PARAMETER NAM$C_CPMFS = '0000000B'X	!  CP/M file system
	PARAMETER NAM$C_MS_DOSFS = '0000000C'X	!  MS/DOS file system
	PARAMETER NAM$C_ULTRIX32_FS = '0000000D'X !  Ultrix-32 file system
	PARAMETER NAM$C_ULTRIX11_FS = '0000000E'X !  Ultrix-11 file system
	PARAMETER DAP$K_SNADTF_FS = '0000000F'X	!  SNADTF compatable FS
! +++++++++++++++++++++++
	PARAMETER NAM$C_DVI = '00000010'X	!  length of dvi field 
! +++++*****
	PARAMETER NAM$M_IFI = '00010000'X
	PARAMETER NAM$M_SRCHNMF = '40000000'X
	PARAMETER NAM$M_SVCTX = '80000000'X
	PARAMETER NAM$K_BLN_V2 = '00000038'X	!  Version 2 name block length 
	PARAMETER NAM$C_BLN_V2 = '00000038'X	!  Version 2 name block length 
	PARAMETER NAM$M_EXP_VER = '00000001'X
	PARAMETER NAM$M_EXP_TYPE = '00000002'X
	PARAMETER NAM$M_EXP_NAME = '00000004'X
	PARAMETER NAM$M_WILD_VER = '00000008'X
	PARAMETER NAM$M_WILD_TYPE = '00000010'X
	PARAMETER NAM$M_WILD_NAME = '00000020'X
	PARAMETER NAM$M_EXP_DIR = '00000040'X
	PARAMETER NAM$M_EXP_DEV = '00000080'X
	PARAMETER NAM$M_WILDCARD = '00000100'X
	PARAMETER NAM$M_SEARCH_LIST = '00000800'X
	PARAMETER NAM$M_CNCL_DEV = '00001000'X
	PARAMETER NAM$M_ROOT_DIR = '00002000'X
	PARAMETER NAM$M_LOWVER = '00004000'X
	PARAMETER NAM$M_HIGHVER = '00008000'X
	PARAMETER NAM$M_PPF = '00010000'X
	PARAMETER NAM$M_NODE = '00020000'X
	PARAMETER NAM$M_QUOTED = '00040000'X
	PARAMETER NAM$M_GRP_MBR = '00080000'X
	PARAMETER NAM$M_WILD_DIR = '00100000'X
	PARAMETER NAM$M_DIR_LVLS = '00E00000'X
	PARAMETER NAM$M_WILD_UFD = '01000000'X
	PARAMETER NAM$M_WILD_SFD1 = '02000000'X
	PARAMETER NAM$M_WILD_SFD2 = '04000000'X
	PARAMETER NAM$M_WILD_SFD3 = '08000000'X
	PARAMETER NAM$M_WILD_SFD4 = '10000000'X
	PARAMETER NAM$M_WILD_SFD5 = '20000000'X
	PARAMETER NAM$M_WILD_SFD6 = '40000000'X
	PARAMETER NAM$M_WILD_SFD7 = '80000000'X
	PARAMETER NAM$M_WILD_GRP = '01000000'X
	PARAMETER NAM$M_WILD_MBR = '02000000'X
	PARAMETER NAM$K_BLN_DIRWC = '00000060'X	!  Not documented optional length 
	PARAMETER NAM$C_BLN_DIRWC = '00000060'X	!  Not documented optional length 
	PARAMETER NAM$K_BLN = '00000060'X	!  Name block length 
	PARAMETER NAM$C_BLN = '00000060'X	!  Name block length 
	STRUCTURE /NAMDEF/
	    BYTE      NAM$B_BID			!  block id 
	    BYTE      NAM$B_BLN			!  block length 
! +++++++++++++++++++++++
!   the following 3 fields must not be rearranged relative to each other
! 
	    BYTE      NAM$B_RSS			!  resultant string area size 
	    BYTE      NAM$B_RSL			!  resultant string length 
	    INTEGER*4 NAM$L_RSA			!  resultant string area address 
! -----------------------
	    UNION
	        MAP
	        BYTE      NAM$B_NOP			!  Name options
	        END MAP
	        MAP
	            PARAMETER NAM$S_PWD = 1
	            PARAMETER NAM$V_PWD = 0			!  Return password if present in nodespec string and any
!  other task-specific data of the form /netacp_data"
!   (default is to mask out password from expanded and
!   resultant name strings and to create a logical name
!   whose equivalence string is the unaltered nodespec)
	            PARAMETER NAM$S_FILL_1 = 1
	            PARAMETER NAM$V_FILL_1 = 1		!  unused.  (used to be undocumented ROD)
	            PARAMETER NAM$S_FILL_2 = 1
	            PARAMETER NAM$V_FILL_2 = 2		!  unused.  (used to be undocumented SOD)
	            PARAMETER NAM$S_SYNCHK = 1
	            PARAMETER NAM$V_SYNCHK = 3		!  Only do syntax check on $parse operation
	            PARAMETER NAM$S_NOCONCEAL = 1
	            PARAMETER NAM$V_NOCONCEAL = 4		!  Do not conceal device/root directory
	            PARAMETER NAM$S_SLPARSE = 1
	            PARAMETER NAM$V_SLPARSE = 5		!  Parse search list (not documented) -- used by BACKUP.
	            PARAMETER NAM$S_SRCHXABS = 1
	            PARAMETER NAM$V_SRCHXABS = 6		!  Fill in attached XABS on $SEARCH operations over the
!   network (not documented) -- used by directory.
	        BYTE %FILL (1)
	        END MAP
	    END UNION
	    BYTE      NAM$B_RFS			!  Remote file system type (currently not documented) 
!  Note: This field is reserved for use by Digital
!   the following 3 fields must not be rearranged relative to each other
! 
	    BYTE      NAM$B_ESS			!  espanded string area size 
	    BYTE      NAM$B_ESL			!  expanded string length 
	    INTEGER*4 NAM$L_ESA			!  expanded string area address 
! -----------------------
	    INTEGER*4 NAM$L_RLF			!  related file nam block addr 
	    CHARACTER*16 NAM$T_DVI			!  device id 
!   the location of the following fields must not
!   be changed due to their commonality with the fib
	    UNION
	        MAP
	        INTEGER*2 NAM$W_FID(1:3)		!  file id 
	        END MAP
	        MAP
	            INTEGER*2 NAM$W_FID_NUM			!  file number 
	            INTEGER*2 NAM$W_FID_SEQ			!  sequence number 
	            UNION
	                MAP
	                INTEGER*2 NAM$W_FID_RVN			!  relative volume number 
	                END MAP
	                MAP
	                    BYTE      NAM$B_FID_RVN			!  alternate format RVN 
	                    BYTE      NAM$B_FID_NMX			!  alternate format file number extension 
	                END MAP
	            END UNION
	        END MAP
	    END UNION
	    UNION
	        MAP
	        INTEGER*2 NAM$W_DID(1:3)		!  directory id 
	        END MAP
	        MAP
	            INTEGER*2 NAM$W_DID_NUM			!  file number 
	            INTEGER*2 NAM$W_DID_SEQ			!  sequence number 
	            UNION
	                MAP
	                INTEGER*2 NAM$W_DID_RVN			!  relative volume number 
	                END MAP
	                MAP
	                    BYTE      NAM$B_DID_RVN			!  alternate format RVN 
	                    BYTE      NAM$B_DID_NMX			!  alternate format file number extension 
	                END MAP
	            END UNION
	        END MAP
	    END UNION
	    UNION
	        MAP
	        INTEGER*4 NAM$L_WCC			!  wild card context 
	        END MAP
	        MAP
	            PARAMETER NAM$S_IFI = 1
	            PARAMETER NAM$V_IFI = 16		!  the first word contains an IFI 
	            PARAMETER NAM$S_SRCHNMF = 1
	            PARAMETER NAM$V_SRCHNMF = 30		!  no-more-files has been encountered on a search 
	            PARAMETER NAM$S_SVCTX = 1
	            PARAMETER NAM$V_SVCTX = 31
	            BYTE %FILL (1)				!  save context across search calls 
	        END MAP
	    END UNION
	    UNION
	        MAP
	        INTEGER*4 NAM$L_FNB			!  file name status bits 
	        END MAP
	        MAP
	            PARAMETER NAM$S_EXP_VER = 1
	            PARAMETER NAM$V_EXP_VER = 0		!  version was explicit 
	            PARAMETER NAM$S_EXP_TYPE = 1
	            PARAMETER NAM$V_EXP_TYPE = 1		!  type was explicit 
	            PARAMETER NAM$S_EXP_NAME = 1
	            PARAMETER NAM$V_EXP_NAME = 2		!  name was explicit 
	            PARAMETER NAM$S_WILD_VER = 1
	            PARAMETER NAM$V_WILD_VER = 3		!  version contained a wild card 
	            PARAMETER NAM$S_WILD_TYPE = 1
	            PARAMETER NAM$V_WILD_TYPE = 4		!  type contained a wild card 
	            PARAMETER NAM$S_WILD_NAME = 1
	            PARAMETER NAM$V_WILD_NAME = 5		!  name contained a wild card 
	            PARAMETER NAM$S_EXP_DIR = 1
	            PARAMETER NAM$V_EXP_DIR = 6		!  directory was explicit 
	            PARAMETER NAM$S_EXP_DEV = 1
	            PARAMETER NAM$V_EXP_DEV = 7		!  device was explicit 
	            PARAMETER NAM$S_WILDCARD = 1
	            PARAMETER NAM$V_WILDCARD = 8		!  filename string included a wild card 
!  (inclusive or of other wild card bits)
	            PARAMETER NAM$S_SEARCH_LIST = 1
	            PARAMETER NAM$V_SEARCH_LIST = 11	!  search list present 
	            PARAMETER NAM$S_CNCL_DEV = 1
	            PARAMETER NAM$V_CNCL_DEV = 12		!  concealed device present 
	            PARAMETER NAM$S_ROOT_DIR = 1
	            PARAMETER NAM$V_ROOT_DIR = 13		!  root directory present 
	            PARAMETER NAM$S_LOWVER = 1
	            PARAMETER NAM$V_LOWVER = 14		!  lower numbered version(s) of file exist(s) 
	            PARAMETER NAM$S_HIGHVER = 1
	            PARAMETER NAM$V_HIGHVER = 15		!  higher " 
! 
	            PARAMETER NAM$S_PPF = 1
	            PARAMETER NAM$V_PPF = 16		!  process-permanent file referenced indirectly 
	            PARAMETER NAM$S_NODE = 1
	            PARAMETER NAM$V_NODE = 17		!  filename specification included a nodename 
	            PARAMETER NAM$S_QUOTED = 1
	            PARAMETER NAM$V_QUOTED = 18		!  filename spec included a quoted string 
	            PARAMETER NAM$S_GRP_MBR = 1
	            PARAMETER NAM$V_GRP_MBR = 19		!  directory spec was of group-member format 
	            PARAMETER NAM$S_WILD_DIR = 1
	            PARAMETER NAM$V_WILD_DIR = 20		!  directory spec included a wild card 
	            PARAMETER NAM$S_DIR_LVLS = 3
	            PARAMETER NAM$V_DIR_LVLS = 21
	            BYTE %FILL (3)				!  number of directory levels (0=ufd only) 
	        END MAP
	        MAP
	            PARAMETER NAM$S_WILD_UFD = 1
	            PARAMETER NAM$V_WILD_UFD = 24		!  ufd included a wild card 
	            PARAMETER NAM$S_WILD_SFD1 = 1
	            PARAMETER NAM$V_WILD_SFD1 = 25		!  sfd1 included a wild card 
	            PARAMETER NAM$S_WILD_SFD2 = 1
	            PARAMETER NAM$V_WILD_SFD2 = 26		!  sfd2 included a wild card 
	            PARAMETER NAM$S_WILD_SFD3 = 1
	            PARAMETER NAM$V_WILD_SFD3 = 27		!  sfd3 included a wild card 
	            PARAMETER NAM$S_WILD_SFD4 = 1
	            PARAMETER NAM$V_WILD_SFD4 = 28		!  sfd4 included a wild card 
	            PARAMETER NAM$S_WILD_SFD5 = 1
	            PARAMETER NAM$V_WILD_SFD5 = 29		!  sfd5 included a wild card 
	            PARAMETER NAM$S_WILD_SFD6 = 1
	            PARAMETER NAM$V_WILD_SFD6 = 30		!  sfd6 included a wild card 
	            PARAMETER NAM$S_WILD_SFD7 = 1
	            PARAMETER NAM$V_WILD_SFD7 = 31
	            BYTE %FILL (1)				!  sfd7 included a wild card 
	        END MAP
	        MAP
	            PARAMETER NAM$S_WILD_GRP = 1
	            PARAMETER NAM$V_WILD_GRP = 24		!  group contained a wild card 
	            PARAMETER NAM$S_WILD_MBR = 1
	            PARAMETER NAM$V_WILD_MBR = 25		!  member contained a wild card 
	        BYTE %FILL (1)
	        END MAP
! -----*****
!  (prior to 40 byte extension)
! 
!  Extend the NAM block by 40 bytes.
! 
	    END UNION
	    BYTE      NAM$B_NODE			!  Nodespec length 
	    BYTE      NAM$B_DEV			!  Device length 
	    BYTE      NAM$B_DIR			!  Directory length 
	    BYTE      NAM$B_NAME			!  Filename length 
	    BYTE      NAM$B_TYPE			!  Filetype length 
	    BYTE      NAM$B_VER			!  Version number length 
	    BYTE      %FILL(1:2)			!  Currently unused 
	    INTEGER*4 NAM$L_NODE			!  Nodespec address 
	    INTEGER*4 NAM$L_DEV			!  Device address 
	    INTEGER*4 NAM$L_DIR			!  Directory address 
	    INTEGER*4 NAM$L_NAME			!  Filename address 
	    INTEGER*4 NAM$L_TYPE			!  Filetype address 
	    INTEGER*4 NAM$L_VER			!  Version number address 
	    INTEGER*4 %FILL(1:2)			!  Currently unused 
	END STRUCTURE	! NAMDEF
CDEC$ END OPTIONS