!*** MODULE $FALDEF ***
!DEC$ OPTIONS/ALIGN=(RECORDS=PACKED,COMMONS=PACKED)/NOWARN
 ! 
 !  This SDL File Generated by VAX-11 Message V04-00 on 28-AUG-2007 13:32:47.03
 ! 
 ! 
 !  VERSION:	'X-1'
 ! 
 ! *									    *
 ! *  COPYRIGHT (C) 1978, 1980, 1982, 1984 BY				    *
 ! *  DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS.		    *
 ! *  ALL RIGHTS RESERVED.						    *
 ! * 									    *
 ! *  THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND COPIED   *
 ! *  ONLY IN  ACCORDANCE WITH  THE  TERMS  OF  SUCH  LICENSE  AND WITH THE   *
 ! *  INCLUSION OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR  ANY  OTHER   *
 ! *  COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY   *
 ! *  OTHER PERSON.  NO TITLE TO AND OWNERSHIP OF  THE  SOFTWARE IS  HEREBY   *
 ! *  TRANSFERRED.							    *
 ! * 									    *
 ! *  THE INFORMATION IN THIS SOFTWARE IS  SUBJECT TO CHANGE WITHOUT NOTICE   *
 ! *  AND  SHOULD  NOT  BE  CONSTRUED AS  A COMMITMENT BY DIGITAL EQUIPMENT   *
 ! *  CORPORATION.							    *
 ! * 									    *
 ! *  DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE  OR  RELIABILITY OF ITS   *
 ! *  SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL.		    *
 ! * 									    *
 ! *									    *
 ! 
 ! ++
 !  FACILITY:
 ! 
 ! 	MESSAGES ARE FOR THE FAL (DECNET FILE ACCESS LISTENER) FACILITY, BUT
 ! 	ARE GENERATED ON BEHALF OF FAL BY RMS.
 ! 
 !  ABSTRACT:
 ! 
 ! 	THIS MODULE DEFINES FAL STATUS CODE SYMBOLS AND CORRESPONDING MESSAGE
 ! 	TEXT. NOTE THAT THIS MESSAGE FILE IS MAINTAINED BY THE RMS FACILITY,
 ! 	NOT THE FAL FACILITY, BECAUSE RMS DOES THE TRANSLATION OF DAP STATUS
 ! 	INTO FAL STATUS CODES WHICH ARE REPORTED AS SECONDARY STATUS INFORMATION
 ! 	TO THE RMS$_NETFAIL AND RMS$_SUPPORT COMPLETION CODES ON BEHALF OF FAL.
 ! 
 !  ENVIRONMENT: VAX/VMS
 ! 
 !  AUTHOR: JAMES A. KRYCKA,	CREATION DATE:	15-JAN-1982
 ! 
 !  MODIFIED BY:
 ! 
 ! 	X-1	RAB		RICHARD A. BISHOP	24-JUN-1991
 ! 		MOVED TO [STARLET] FACILITY
 ! 
 ! 	==================================
 ! 	OLD AUDIT TRAIL FOLLOWS:
 ! 
 ! 	X-3	SAD009		STUART A. DAVIDSON	06-OCT-1986
 ! 		ADD STATUS CODES FOR SNADTF.
 ! 
 ! 	X-2	DAS		DAVID A. SOLOMON	01-AUG-1986
 ! 		REMOVE /MACRO= ON .FACILITY SO THE PROPER MACROS WILL
 ! 		BE GENERATED IN THE SDL FILE.
 ! 
 ! 	V03-001	JAK0147		J A KRYCKA	09-JUL-1984
 ! 		ADD ERROR CODES THAT CORRESPOND TO DAP MICCODES 416 TO 470
 ! 		(OCTAL) FOR MACCODES 4 THROUGH 7 DEFINED IN THE DAP V7.0
 ! 		SPECIFICATION.
 ! 
 ! --
 ! ++
 !  DEFINE FAL STATUS CODES FOR USE BY RMS AS SECONDARY STATUS CODES.
 ! 
 !  LAYOUT OF MESSAGE SPACE:
 ! 
 ! 	MSG NUMBERS	MSG NUMBERS	MSG CODES	DESCRIPTION
 ! 	(DECIMAL)	(HEXADECIMAL)	(HEXADECIMAL)
 ! 
 ! 	   0 - 1023	0000 - 03FF	8000 - 9FFF	UNUSED
 ! 	1024 - 2047	0400 - 07FF	A000 - BFFF	FOR RMS$_NETFAIL
 ! 	2048 - 4095	0800 - 0FFF	C000 - FFFF	FOR RMS$_SUPPORT
 ! --
	PARAMETER FAL$_FACILITY = '000001F7'X
 ! +
 !  DEFINE FAL STATUS CODES THAT ARE ASSOCIATED WITH THE RMS$_NETFAIL COMPLETION
 !  CODE AND RETURNED IN THE STV FIELD OF THE FAB OR RAB.
 ! 
 !  USE THE FOLLOWING FORMULA TO MAP A DAP STATUS CODE (STSCODE FIELD WITH
 !  MACCODE = 4 THRU 7) INTO A CORRESPONDING FAL MESSAGE CODE (LOWER 16 BITS):
 ! 
 ! 	MESSAGE-CODE = (2**15 + ((MICCODE + 1024) * 8) + SEVERITY-LEVEL)
 ! 
 !  NOTE:	THE FIRST THREE CHARACTERS OF THE MESSAGE IDENTIFICATION MNEMONIC
 ! 	FOR EACH MESSAGE CODE IN THIS SET INDICATES ITS ORIGIN AS FOLLOWS:
 ! 
 ! 	RMS ---	THE CODE IS DEFINED FOR RMS-11 OR RMS-20, BUT NOT FOR RMS-32.
 ! 		(RMS-32 COMPLETION CODES ARE DEFINED IN RMSDEF.MDL.)
 ! 	FCS --- THE CODE IS DEFINED FOR THE FCS-11 ENVIRONMENT.
 ! 	TEN --- THE CODE IS DEFINED FOR THE TOPS-10 ENVIRONMENT.
 ! 	DAP --- ORIGIN IN THE DAP SPECIFICATION IS UNKNOWN.
 ! -
	PARAMETER FAL$_OFFSET_A = '00000400'X
 !  MICCODE = 0000 (OCTAL)
	PARAMETER FAL$_DAPFAIL = '01F7A004'X
	PARAMETER FAL$_RMSABO = '01F7A00C'X
 !  MICCODE = 0011 (OCTAL)
	PARAMETER FAL$_RMSAST = '01F7A04C'X
	PARAMETER FAL$_RMSBPA = '01F7A054'X
	PARAMETER FAL$_RMSBPS = '01F7A05C'X
 !  MICCODE = 0026 (OCTAL)
	PARAMETER FAL$_RMSCLS = '01F7A0B4'X
 !  MICCODE = 0056 (OCTAL)
	PARAMETER FAL$_RMSFID = '01F7A174'X
 !  MICCODE = 0071 (OCTAL)
	PARAMETER FAL$_RMSINI = '01F7A1CC'X
 !  MICCODE = 0102 (OCTAL)
	PARAMETER FAL$_RMSLBL = '01F7A214'X
	PARAMETER FAL$_RMSLBY = '01F7A21C'X
	PARAMETER FAL$_RMSLCH = '01F7A224'X
 !  MICCODE = 0106 (OCTAL)
	PARAMETER FAL$_RMSLOC = '01F7A234'X
	PARAMETER FAL$_RMSMAP = '01F7A23C'X
 !  MICCODE = 0115 (OCTAL)
	PARAMETER FAL$_RMSNID = '01F7A26C'X
 !  MICCODE = 0117 (OCTAL)
	PARAMETER FAL$_RMSOPN = '01F7A27C'X
 !  MICCIDE = 0124 (OCTAL)
	PARAMETER FAL$_RMSPRM = '01F7A2A4'X
 !  MICCODE = 0153 (OCTAL)
	PARAMETER FAL$_RMSSTK = '01F7A35C'X
 !  MICCODE = 0162 (OCTAL)
	PARAMETER FAL$_RMSVOL = '01F7A394'X
 !  MICCODE = 0170 (OCTAL)
	PARAMETER FAL$_RMSCAA = '01F7A3C4'X
 !  MICCODE = 0231 (OCTAL)
	PARAMETER FAL$_RMSBLK = '01F7A4CC'X
	PARAMETER FAL$_RMSBSZ = '01F7A4D4'X
	PARAMETER FAL$_RMSCDR = '01F7A4DC'X
	PARAMETER FAL$_RMSCGJ = '01F7A4E4'X
	PARAMETER FAL$_RMSCOF = '01F7A4EC'X
	PARAMETER FAL$_RMSJFN = '01F7A4F4'X
	PARAMETER FAL$_RMSPEF = '01F7A4FC'X
	PARAMETER FAL$_RMSTRU = '01F7A504'X
	PARAMETER FAL$_RMSUDF = '01F7A50C'X
	PARAMETER FAL$_RMSXCL = '01F7A514'X
	PARAMETER FAL$_DAPDIRFUL = '01F7A51C'X
	PARAMETER FAL$_FCSHWR = '01F7A524'X
	PARAMETER FAL$_FCSFHE = '01F7A52C'X
	PARAMETER FAL$_DAPWRTEOF = '01F7A534'X
	PARAMETER FAL$_FCSONP = '01F7A53C'X
	PARAMETER FAL$_FCSDNA = '01F7A544'X
	PARAMETER FAL$_FCSDAA = '01F7A54C'X
	PARAMETER FAL$_FCSDUN = '01F7A554'X
	PARAMETER FAL$_FCSRSU = '01F7A55C'X
	PARAMETER FAL$_FCSOVR = '01F7A564'X
	PARAMETER FAL$_FCSBCC = '01F7A56C'X
	PARAMETER FAL$_FCSNOD = '01F7A574'X
	PARAMETER FAL$_FCSIFU = '01F7A57C'X
	PARAMETER FAL$_FCSHFU = '01F7A584'X
	PARAMETER FAL$_FCSWAC = '01F7A58C'X
	PARAMETER FAL$_FCSCKS = '01F7A594'X
	PARAMETER FAL$_FCSWAT = '01F7A59C'X
	PARAMETER FAL$_FCSALN = '01F7A5A4'X
	PARAMETER FAL$_FCSBTF = '01F7A5AC'X
	PARAMETER FAL$_FCSILL = '01F7A5B4'X
	PARAMETER FAL$_FCS2DV = '01F7A5BC'X
	PARAMETER FAL$_FCSFEX = '01F7A5C4'X
	PARAMETER FAL$_FCSRNM = '01F7A5CC'X
	PARAMETER FAL$_FCSFOP = '01F7A5D4'X
	PARAMETER FAL$_FCSVER = '01F7A5DC'X
	PARAMETER FAL$_FCSEOV = '01F7A5E4'X
	PARAMETER FAL$_FCSDAO = '01F7A5EC'X
	PARAMETER FAL$_FCSBBE = '01F7A5F4'X
	PARAMETER FAL$_FCSEOT = '01F7A5FC'X
	PARAMETER FAL$_FCSNBF = '01F7A604'X
	PARAMETER FAL$_FCSNBK = '01F7A60C'X
	PARAMETER FAL$_FCSNST = '01F7A614'X
	PARAMETER FAL$_FCSULK = '01F7A61C'X
	PARAMETER FAL$_FCSNLN = '01F7A624'X
	PARAMETER FAL$_FCSSRE = '01F7A62C'X
 !  MICCODE = 0311 (OCTAL)
	PARAMETER FAL$_DAPQUOEXC = '01F7A64C'X
 !  MICCODE = 0346 (OCTAL)
	PARAMETER FAL$_DAPDIRCAF = '01F7A734'X
	PARAMETER FAL$_DAPDIRCRA = '01F7A73C'X
	PARAMETER FAL$_DAPDIRPRO = '01F7A744'X
	PARAMETER FAL$_DAPDIRPRA = '01F7A74C'X
	PARAMETER FAL$_DAPDIRNFA = '01F7A754'X
	PARAMETER FAL$_DAPDIRCON = '01F7A75C'X
 !  MICCODE = 0416 (OCTAL)
	PARAMETER FAL$_TENFILMOD = '01F7A874'X
	PARAMETER FAL$_TENDEVNA = '01F7A87C'X
	PARAMETER FAL$_TENDEVNF = '01F7A884'X
	PARAMETER FAL$_TENPARALL = '01F7A88C'X
	PARAMETER FAL$_TENBNFREE = '01F7A894'X
	PARAMETER FAL$_TENCSDF = '01F7A89C'X
	PARAMETER FAL$_TENCDDF = '01F7A8A4'X
	PARAMETER FAL$_TENSFDNF = '01F7A8AC'X
	PARAMETER FAL$_TENSLE = '01F7A8B4'X
	PARAMETER FAL$_TENSFDCNT = '01F7A8BC'X
	PARAMETER FAL$_TENNCESL = '01F7A8C4'X
	PARAMETER FAL$_TENCUPFIL = '01F7A8CC'X
	PARAMETER FAL$_TENNETCAP = '01F7A8D4'X
	PARAMETER FAL$_TENTSKNA = '01F7A8DC'X
	PARAMETER FAL$_TENNODNF = '01F7A8E4'X
	PARAMETER FAL$_TENSFDREN = '01F7A8EC'X
	PARAMETER FAL$_TENCDFNDR = '01F7A8F4'X
	PARAMETER FAL$_TENJCREAD = '01F7A8FC'X
	PARAMETER FAL$_TENRENSFD = '01F7A904'X
	PARAMETER FAL$_TENDEVDWN = '01F7A90C'X
	PARAMETER FAL$_TENDEVRES = '01F7A914'X
	PARAMETER FAL$_TENDEVMDA = '01F7A91C'X
	PARAMETER FAL$_TENDEVALL = '01F7A924'X
	PARAMETER FAL$_TENILLDM = '01F7A92C'X
	PARAMETER FAL$_TENLPTPAG = '01F7A934'X
	PARAMETER FAL$_TENLPTVFU = '01F7A93C'X
	PARAMETER FAL$_TENLPTCHR = '01F7A944'X
	PARAMETER FAL$_TENLPTRAM = '01F7A94C'X
	PARAMETER FAL$_TENFILSPC = '01F7A954'X
 !  MICCODE = 0453 (OCTAL)
	PARAMETER FAL$_TENNSNOD = '01F7A95C'X
	PARAMETER FAL$_TENANODI = '01F7A964'X
	PARAMETER FAL$_TENSNODI = '01F7A96C'X
	PARAMETER FAL$_TENNSDEV = '01F7A974'X
	PARAMETER FAL$_TENADEVI = '01F7A97C'X
	PARAMETER FAL$_TENSDEVI = '01F7A984'X
	PARAMETER FAL$_TENNSDIR = '01F7A98C'X
	PARAMETER FAL$_TENADIRI = '01F7A994'X
	PARAMETER FAL$_TENSDIRI = '01F7A99C'X
	PARAMETER FAL$_TENNSFIL = '01F7A9A4'X
	PARAMETER FAL$_TENAFILI = '01F7A9AC'X
	PARAMETER FAL$_TENSFILI = '01F7A9B4'X
	PARAMETER FAL$_TENAFILR = '01F7A9BC'X
	PARAMETER FAL$_TENSFILR = '01F7A9C4'X
 !  MICCODE = 475 (OCTAL)
	PARAMETER FAL$_DTFFALSHT = '01F7A9EC'X
	PARAMETER FAL$_DTFNOFIL = '01F7A9F4'X
	PARAMETER FAL$_DTFNOREC = '01F7A9FC'X
	PARAMETER FAL$_DTFNOTREG = '01F7AA04'X
	PARAMETER FAL$_DTFOPRABO = '01F7AA0C'X
 !  MICCODE = 504 (OCTAL)
	PARAMETER FAL$_DTFRDCKP = '01F7AA24'X
 ! +
 !  DEFINE FAL STATUS CODES THAT ARE ASSOCIATED WITH THE RMS$_SUPPORT COMPLETION
 !  CODE AND RETURNED IN THE STV FIELD OF THE FAB OR RAB.
 ! 
 !  USE THE FOLLOWING FORMULA TO MAP A DAP STATUS CODE (STSCODE FIELD WITH
 !  MACCODE = 2) INTO A CORRESPONDING FAL MESSAGE CODE (LOWER 16 BITS):
 ! 
 ! 	MESSAGE-CODE = (2**15 + ((MICCODE + 2048) * 8) + SEVERITY-LEVEL)
 ! 
 !  NOTE:	THE INTENT IN THIS SECTION IS TO DEFINE FAL STATUS CODES ONLY FOR DAP
 ! 	FIELDS THAT CORRESPOND DIRECTLY TO RMS CONTROL BLOCK FIELDS USED FOR
 ! 	INPUT. FOR OTHER DAP FIELDS THAT MAY BE REJECTED BY THE REMOTE FAL AS
 ! 	BEING UNSUPPORTED, THE RMS$_SUP COMPLETION CODE IS RETURNED IN THE STS
 ! 	FIELD OF THE FAB OR RAB WITH AN ASSOCIATED DAP CODE IN THE STV FIELD.
 ! -
	PARAMETER FAL$_OFFSET_B = '00000800'X
 !  MICCODE = 0222 (OCTAL)
	PARAMETER FAL$_ORG = '01F7C494'X
	PARAMETER FAL$_RFM = '01F7C49C'X
	PARAMETER FAL$_RAT = '01F7C4A4'X
	PARAMETER FAL$_BLS = '01F7C4AC'X
	PARAMETER FAL$_MRS = '01F7C4B4'X
	PARAMETER FAL$_ALQ1 = '01F7C4BC'X
	PARAMETER FAL$_BKS = '01F7C4C4'X
	PARAMETER FAL$_FSZ = '01F7C4CC'X
	PARAMETER FAL$_MRN = '01F7C4D4'X
 !  MICCODE = 0234 (OCTAL)
	PARAMETER FAL$_DEQ1 = '01F7C4E4'X
	PARAMETER FAL$_FOP1 = '01F7C4EC'X
 !  MICCODE = 0241 (OCTAL)
	PARAMETER FAL$_LRL = '01F7C50C'X
 !  MICCODE = 0320 (OCTAL)
	PARAMETER FAL$_ACCFUNC = '01F7C684'X
 !  MICCODE = 0323 (OCTAL)
	PARAMETER FAL$_FAC = '01F7C69C'X
	PARAMETER FAL$_SHR = '01F7C6A4'X
 !  MICCODE = 0420 (OCTAL)
	PARAMETER FAL$_CTLFUNC = '01F7C884'X
 !  MICCODE = 0422 (OCTAL)
	PARAMETER FAL$_RAC = '01F7C894'X
	PARAMETER FAL$_KEY = '01F7C89C'X
	PARAMETER FAL$_KRF = '01F7C8A4'X
	PARAMETER FAL$_ROP = '01F7C8AC'X
 !  MICCODE = 0520 (OCTAL)
	PARAMETER FAL$_CONFUNC = '01F7CA84'X
 !  MICCODE = 0720 (OCTAL)
	PARAMETER FAL$_CMPFUNC = '01F7CE84'X
	PARAMETER FAL$_FOP2 = '01F7CE8C'X
 !  MICCODE = 1221 (OCTAL)
	PARAMETER FAL$_FLG = '01F7D48C'X
	PARAMETER FAL$_DFL = '01F7D494'X
	PARAMETER FAL$_IFL = '01F7D49C'X
 !  MICCODE = 1225 (OCTAL)
	PARAMETER FAL$_POS = '01F7D4AC'X
	PARAMETER FAL$_SIZ = '01F7D4B4'X
	PARAMETER FAL$_REF = '01F7D4BC'X
	PARAMETER FAL$_KNM = '01F7D4C4'X
	PARAMETER FAL$_NUL = '01F7D4CC'X
	PARAMETER FAL$_IAN = '01F7D4D4'X
	PARAMETER FAL$_LAN = '01F7D4DC'X
	PARAMETER FAL$_DAN = '01F7D4E4'X
	PARAMETER FAL$_DTP = '01F7D4EC'X
 !  MICCODE = 1321 (OCTAL)
	PARAMETER FAL$_VOL = '01F7D68C'X
	PARAMETER FAL$_ALN = '01F7D694'X
	PARAMETER FAL$_AOP = '01F7D69C'X
	PARAMETER FAL$_LOC = '01F7D6A4'X
 !  MICCODE = 1326 (OCTAL)
	PARAMETER FAL$_ALQ2 = '01F7D6B4'X
	PARAMETER FAL$_AID = '01F7D6BC'X
	PARAMETER FAL$_BKZ = '01F7D6C4'X
	PARAMETER FAL$_DEQ2 = '01F7D6CC'X
 !  MICCODE = 1521 (OCTAL)
	PARAMETER FAL$_CDT = '01F7DA8C'X
	PARAMETER FAL$_RDT = '01F7DA94'X
	PARAMETER FAL$_EDT = '01F7DA9C'X
	PARAMETER FAL$_RVN = '01F7DAA4'X
 !  MICCODE = 1621 (OCTAL)
	PARAMETER FAL$_OWNER = '01F7DC8C'X
	PARAMETER FAL$_PROTSYS = '01F7DC94'X
	PARAMETER FAL$_PROTOWN = '01F7DC9C'X
	PARAMETER FAL$_PROTGRP = '01F7DCA4'X
	PARAMETER FAL$_PROTWLD = '01F7DCAC'X
!DEC$ END OPTIONS