!*** MODULE $CVTFNMDEF ***
!DEC$ OPTIONS/ALIGN=(RECORDS=PACKED,COMMONS=PACKED)/NOWARN
 ! 
 !    String characteristic flags for SYS$CVT_FILENAME
 ! 
	PARAMETER CVTFNM$M_WORD_CHARS = '00000001'X
	PARAMETER CVTFNM$M_NO_DELIMITERS = '00000002'X
	PARAMETER CVTFNM$M_FORCE_UPCASE = '00000004'X
	STRUCTURE /INOUTFLAGS/
	    PARAMETER CVTFNM$S_WORD_CHARS = 1
	    PARAMETER CVTFNM$V_WORD_CHARS = 0	 !  characters are word-width
	    PARAMETER CVTFNM$S_NO_DELIMITERS = 1
	    PARAMETER CVTFNM$V_NO_DELIMITERS = 1	 !  string does/should contain no fnm delimiters
	    PARAMETER CVTFNM$S_FORCE_UPCASE = 1
	    PARAMETER CVTFNM$V_FORCE_UPCASE = 2	 !  do upcasing (ACPQIO-to-RMS onoly)
	BYTE %FILL (1)
	END STRUCTURE	! INOUTFLAGS
 ! 
 !    Control codes for SYS$CVT_FILENAME
 ! 
	PARAMETER CVTFNM$C_RMS_TO_ACPQIO = '00000001'X
	PARAMETER CVTFNM$C_ACPQIO_TO_RMS = '00000002'X
	PARAMETER CVTFNM$K_RMS_TO_ACPQIO = '00000001'X
	PARAMETER CVTFNM$K_ACPQIO_TO_RMS = '00000002'X
!DEC$ END OPTIONS