!*** MODULE $FORDEF ***
!DEC$ OPTIONS/ALIGN=(RECORDS=PACKED,COMMONS=PACKED)/NOWARN
 ! 
 !  This SDL File Generated by VAX-11 Message V04-00 on 10-FEB-2012 14:37:01.14
 ! 
 !  FILE: FOR_MSG.MSG  
 ! 
 ! **                                                                  *
 ! **  COPYRIGHT 2001 COMPAQ COMPUTER CORPORATION                      *
 ! **                                                                  *
 ! **  COMPAQ AND THE COMPAQ LOGO ARE TRADEMARKS OF COMPAQ INFORMATION *
 ! **  TECHNOLOGIES GROUP, L.P.                                        *
 ! **                                                                  *
 ! **  CONFIDENTIAL COMPUTER SOFTWARE. VALID LICENSE FROM COMPAQ       *
 ! **  REQUIRED FOR POSSESSION, USE OR COPYING. CONSISTENT WITH FAR    *
 ! **  12.211 AND 12.212, COMMERCIAL COMPUTER SOFTWARE, COMPUTER       *
 ! **  SOFTWARE DOCUMENTATION, AND TECHNICAL DATA FOR COMMERCIAL ITEMS *
 ! **  ARE LICENSED TO THE U.S. GOVERNMENT UNDER VENDOR'S STANDARD     *
 ! **  COMMERCIAL LICENSE.                                             *
 ! **                                                                  *
 ! 
 !  1-014 - ADD ERRORS 17-19 FOR NAMELIST.  SBL 10-NOV-1980
 !  1-015 - CORRECT TYPO IN TOOMANVAL.  SBL 15-DEC-1980
 !  1-016 - RESTORE CLOSING BRACKET ON OPEDEFREQ, MYSTERIOUSLY DROPPED IN 1-015.
 ! 	  SBL 6-JAN-1981
 !  2-001 - CONVERT TO MESSAGE UTILITY SOURCE FORMAT.  ADAPTED FROM FORMSG.MDL
 ! 	  VERSION 1-016.  SBL 22-APR-1981
 !  2-002 - ADD UNFIO_FMT, FMTIO_UNF, DIRIO_KEY, SEQIO_DIR, KEYIO_DIR,
 ! 	  IO_NONFOR, INVTXTREC, FLOUNDEXC.  JAW 23-AUG-1981
 !  2-003 - CHANGE INVTXTREC TO INVTEXREC.  JAW 24-AUG-1981
 !  2-004 - ADD INVTEX WHICH DOES NOT REQUIRE A RECORD NUMBER.  THIS IS FOR INDEXED
 ! 	  AND INTERNAL FILES THAT DO NOT HAVE A VALID RECORD NUMBER.  DGP 21-DEC-1981
 !  2-005 - ADD .TITLE.  SBL 28-AUG-1982
 !  2-006 - ADD OPEREQDIS AND OPEREQSEQ.  SBL 2-JUN-1983
 !  2-007 - ADD ULTRIX SPECIFIC ERRORS AND WARNINGS.
 !  2-008 - ADD INVMATKEY.  DJM 14-SEP-1987.
 !  2-009 - ADD FORRTL2 MESSAGES.  CHH 22-SEP-1987
 !  X-4	STEVE LIONEL	16-OCT-1989
 ! 	ADD SUBPRCDEL,UNAWAKSUB.
 !  X-5   
 ! 	A LONG TIME AGO, IN A GALAXY FAR, FAR AWAY ...
 !  X-6	SBL1001	22-OCT-1991	STEVE LIONEL
 ! 	ADD  FOR$_VECALIGNEXC
 !  X-7   EBF1002 08-OCT-1992	ED FLECCHIA
 ! 	ADDED DEC FORTRAN MESSAGES FOR OTHER PLATFORMS.
 !  X-8	ADD FOR$_ENDRECDUR, END OF RECORD DURING READ. CHANGE IDENT TO VM.N-O
 ! 	SYNTAX.  BRR 10-NOV-1993.
 !  X-9	ADD MISSING ALPHA GENTRAP MESSAGES.  TCM 02-JUN-94.
 !  X-10	ADD INVREALLOC.  JDR 11-JUL-1994.
 !  X-11	ADD RESACQFAI.  JDR 23-NOV-1994.
 !  X-12	ADD INVDEALLOC.  TCM 13-MAR-1995.
 !  X-13	MAKE MESSAGE ENDRECDUR, END OF RECORD DURING READ FATAL INSTEAD
 ! 	ERROR, LIKE THE OTHER OPERATING SYSTEMS.  THE STANDARD SAYS FATAL, AND
 ! 	THIS SHOULD FIX BUG DFB2234.	TCM 24-MAR-1995
 !  X-14	ADD POINTERS TO THE MESSAGE TEXT FOR INVDEALLOC.  TCM 19-JUN-1995.
 !  X-15	FIX THE MESSAGE TEXT OF ERROR 69 (SIGINT)
 ! 	INTERRUPT WAS SPELLED WRONG, MISSING AN R. 	TCM 29-MAR-1996
 !  X-16	ADD PRELIMINARY VISUAL FORTRAN SUPPORT.
 ! 	THUS, ADDING ALL OF THE MSF ERROR MESSAGES.
 ! 	NOTE: THESE MESSAGES MUST BE CONTIGUOUS, SO
 ! 		THAT THE MAPPING OF MSF ERRORS TO VISUAL
 ! 		FORTRAN CAN BE DONE WITH EASE.		TCM 26-APR-1996 
 !  X-17	FIX THE MESSAGE TEXT OF MSF ERRORS 6970, 6971.
 ! 	IT SHOULD BE D FIELD NOT M FIELD, ETC.  ALSO
 ! 	FIX F6750-52, REMOVE UNIX IN THE TEXT.	TCM 07-NOV-1996
 !  X-18	ADD INVDEALLOC2.  WCH 15-JUL-1999.
 !  X-19  CHANGE PRODUCT NAME FROM DEC TO COMPAQ PMK 8-NOV-1999
 !  X-20	REPLACE DEC WITH COMPAQ IN RESACQFAI MESSAGE. PMK 9-NOV-1999
 !  X-21  ADD SHORTDATEARG, SHORTTIMEARG, & SHORTZONEARG. PMK 31-JUL-2000
 !  X-22  ADD COUNTING FLTING INEXACTS.  WCH 10-AUG-2000.
 !  X-23  ADD NEW ERRORS FOR COMPILER GENERATED RUNTIME MESSAGES.  WCH 16-AUG-2000.
 !  X-24  ADD A GENERIC DIVIDE BY ZERO MESSAGE FOR CASES WHEN WE CANNOT TELL IF
 ! 	IT WAS A TRUE FLOATING POINT DIV0 OR AN INTEGER DIV0.  AS OF GEM BL46,
 ! 	GEM SOMETIMES DOES INTEGER DIV IN THE FP UNIT ON ALPHA.  WCH 06-OCT-2000.
 !  X-25  ADD A NEW MESSAGE FOR ATTEMPTED ARRAY ALLOCATIONS THAT OVERFLOW MAX
 !        ARRAY SIZE (32/64 BITS).  WCH 13-OCT-2000.
 ! --
 ! +
 !  SYMBOLS ARE DEFINED FOLLOWING THE STANDARD FOR GLOBAL NAMES:
 ! 
 ! 	FOR$_ABCMNOXYZ
 ! 
 !  IN ADDITION, THE LIBRARY STANDARDS SPECIFY THAT THE LETTERS "abc", "mno",
 !  AND "xyz" ARE THE FIRST THREE LETTERS OF THE FIRST THREE WORDS OF THE ERROR
 !  MESSAGE, NOT COUNTING ARTICLES AND PREPOSITIONS.
 ! 
 !  THE NAMES OF ALL PROCEDURES USING EACH ERROR CONDITION VALUE SHOULD APPEAR
 !  IN THE COMMENTS INCLUDED WITH EACH ERROR DEFINITION.
 ! 
 !  MACRO-32 PROGRAMMING:
 ! 
 !  THE MACROS CALL:
 ! 
 ! 	$FORDEF
 ! 
 !  WILL CAUSE ALL SYMBOLS TO BE MADE AVAILABLE TO THE MODULE.
 !  THE STS$V_MSG_ID IS THE FORTRAN ERROR NUMBER (1:94).
 !  THESE SYMBOLS ARE DECLARED EXTERNAL BY THE RUN-TIME LIBRARY,
 !  THE MACROS ARE PROVIDED ONLY FOR THE CONVENIENCE OF THE USER.
 ! -
 ! 			; MAKE ALL ERRORS BE SEVERE (EXCEPT AS NOTED)
 ! 			; SET SUB-SYSTEM SPECIFIC BIT AND MAKE SEVERE
 ! 			; SET LH TO 24 (DECIMAL).
	PARAMETER FOR$_FACILITY = '00000018'X
	PARAMETER FOR$_NOTFORSPE = '0018800C'X
 ! 		; NEVER SIGNALED. USED ONLY AS A FORTRAN ERROR
 ! 		; NUMBER FOR ERRSNS TO MEAN SOME OTHER FACILITY
 ! 		; THAN FOR$ OR MTH$ DETECTED THE ERROR.
	PARAMETER FOR$_NOTIMP = '00188014'X
	PARAMETER FOR$_IGNORED = '00188018'X
	PARAMETER FOR$_IGNNOTDEL = '00188020'X
	PARAMETER FOR$_VERSION = '00188033'X
	PARAMETER FOR$_BUG_CHECK = '00188044'X
	PARAMETER FOR$_PERACCFIL = '0018804C'X
	PARAMETER FOR$_CANOVEEXI = '00188054'X
	PARAMETER FOR$_UNINOTCON = '0018805B'X
	PARAMETER FOR$_SYNERRNAM = '0018808C'X
	PARAMETER FOR$_TOOMANVAL = '00188094'X
	PARAMETER FOR$_INVREFVAR = '0018809C'X
	PARAMETER FOR$_REWERR = '001880A4'X
	PARAMETER FOR$_DUPFILSPE = '001880AC'X
	PARAMETER FOR$_INPRECTOO = '001880B4'X
	PARAMETER FOR$_BACERR = '001880BC'X
	PARAMETER FOR$_ENDDURREA = '001880C4'X
	PARAMETER FOR$_RECNUMOUT = '001880CC'X
	PARAMETER FOR$_OPEDEFREQ = '001880D4'X
	PARAMETER FOR$_TOOMANREC = '001880DC'X
	PARAMETER FOR$_CLOERR = '001880E4'X
	PARAMETER FOR$_FILNOTFOU = '001880EC'X
	PARAMETER FOR$_OPEFAI = '001880F4'X
	PARAMETER FOR$_MIXFILACC = '001880FC'X
	PARAMETER FOR$_INVLOGUNI = '00188104'X
	PARAMETER FOR$_ENDFILERR = '0018810C'X
	PARAMETER FOR$_UNIALROPE = '00188114'X
	PARAMETER FOR$_SEGRECFOR = '0018811C'X
	PARAMETER FOR$_ATTACCNON = '00188124'X
	PARAMETER FOR$_INCRECLEN = '0018812C'X
	PARAMETER FOR$_ERRDURWRI = '00188134'X
	PARAMETER FOR$_ERRDURREA = '0018813C'X
	PARAMETER FOR$_RECIO_OPE = '00188144'X
	PARAMETER FOR$_INSVIRMEM = '0018814C'X
	PARAMETER FOR$_NO_SUCDEV = '00188154'X
	PARAMETER FOR$_FILNAMSPE = '0018815C'X
	PARAMETER FOR$_INCRECTYP = '00188164'X
	PARAMETER FOR$_KEYVALERR = '0018816C'X
	PARAMETER FOR$_INCOPECLO = '00188174'X
	PARAMETER FOR$_WRIREAFIL = '0018817C'X
	PARAMETER FOR$_INVARGFOR = '00188184'X
	PARAMETER FOR$_INVKEYSPE = '0018818C'X
	PARAMETER FOR$_INCKEYCHG = '00188194'X
	PARAMETER FOR$_INCFILORG = '0018819C'X
	PARAMETER FOR$_SPERECLOC = '001881A4'X
	PARAMETER FOR$_NO_CURREC = '001881AC'X
	PARAMETER FOR$_REWRITERR = '001881B4'X
	PARAMETER FOR$_DELERR = '001881BC'X
	PARAMETER FOR$_UNLERR = '001881C4'X
	PARAMETER FOR$_FINERR = '001881CC'X
	PARAMETER FOR$_MORONEREC = '001880DC'X
	PARAMETER FOR$_ATTREANON = '00188124'X
	PARAMETER FOR$_FMTSYN = '001881D3'X
	PARAMETER FOR$_LISIO_SYN = '001881DC'X
	PARAMETER FOR$_INFFORLOO = '001881E4'X
	PARAMETER FOR$_FORVARMIS = '001881EC'X
	PARAMETER FOR$_SYNERRFOR = '001881F4'X
	PARAMETER FOR$_OUTCONERR = '001881FA'X
	PARAMETER FOR$_INPCONERR = '00188204'X
	PARAMETER FOR$_FLTINV = '0018820C'X
	PARAMETER FOR$_OUTSTAOVE = '00188214'X
	PARAMETER FOR$_INPSTAREQ = '0018821C'X
	PARAMETER FOR$_VFEVALERR = '00188224'X
	PARAMETER FOR$_SIGINT = '0018822A'X
	PARAMETER FOR$_INTOVF = '00188234'X
	PARAMETER FOR$_INTDIV = '0018823C'X
	PARAMETER FOR$_FLTOVF = '00188242'X
	PARAMETER FOR$_FLTDIV = '0018824A'X
	PARAMETER FOR$_FLTUND = '00188252'X
	PARAMETER FOR$_SIGFPE = '0018825A'X
	PARAMETER FOR$_SIGIOT = '00188262'X
	PARAMETER FOR$_SUBRNG = '0018826C'X
	PARAMETER FOR$_SIGTERM = '00188272'X
	PARAMETER FOR$_SIGQUIT = '0018827A'X
	PARAMETER FOR$_WRONUMARG = '00188284'X
	PARAMETER FOR$_INVARGMAT = '0018828C'X
	PARAMETER FOR$_UNDEXP = '00188294'X
	PARAMETER FOR$_LOGZERNEG = '0018829C'X
	PARAMETER FOR$_SQUROONEG = '001882A4'X
	PARAMETER FOR$_SIGLOSMAT = '001882BC'X
	PARAMETER FOR$_FLOOVEMAT = '001882C4'X
	PARAMETER FOR$_FLOUNDMAT = '001882CA'X
	PARAMETER FOR$_ADJARRDIM = '001882EC'X
	PARAMETER FOR$_INVMATKEY = '001882F4'X
	PARAMETER FOR$_FLOCONFAI = '001882FA'X
	PARAMETER FOR$_CANSTAFIL = '00188364'X
	PARAMETER FOR$_OPEREQSEE = '001883C4'X
	PARAMETER FOR$_BRK_USERBP = '00188414'X
	PARAMETER FOR$_BRK_KERNELBP = '0018841C'X
	PARAMETER FOR$_BRK_BD_TAKEN = '0018842C'X
	PARAMETER FOR$_BRK_BD_NOTTAKEN = '00188434'X
	PARAMETER FOR$_BRK_SSTEPBP = '0018843C'X
	PARAMETER FOR$_BRK_OVERFLOW = '00188444'X
	PARAMETER FOR$_BRK_DIVZERO = '0018844C'X
	PARAMETER FOR$_BRK_RANGE = '00188454'X
	PARAMETER FOR$_BRK_RANGE2 = '0018845C'X
 !  **********
 !  [X-9] THE FOLLOWING ERRORS REFER TO GENTRAP EXCEPTIONS OR SIGNALS 
 !  AND ARE NOT RETURNED BY IOSTAT.
	PARAMETER FOR$_FLTINE = '00188464'X
	PARAMETER FOR$_DECOVF = '0018846C'X
	PARAMETER FOR$_DECDIV = '00188474'X
	PARAMETER FOR$_DECINV = '0018847C'X
	PARAMETER FOR$_ROPRAND = '00188484'X
	PARAMETER FOR$_ASSERTERR = '0018848C'X
	PARAMETER FOR$_NULPTRERR = '00188494'X
	PARAMETER FOR$_STKOVF = '0018849C'X
	PARAMETER FOR$_STRLENERR = '001884A4'X
	PARAMETER FOR$_SUBSTRERR = '001884AC'X
	PARAMETER FOR$_RANGEERR = '001884B4'X
 !  **********
 !  [X-10] THE FOLLOWING MESSAGE IS FOR FORTRAN 90'S ALLOCATABLE ARRAYS
	PARAMETER FOR$_INVREALLOC = '001884BC'X
 !  **********
 !  [X-11]
	PARAMETER FOR$_RESACQFAI = '001884C4'X
 !  **********
 !  [X-12] THE FOLLOWING MESSAGE IS FOR FORTRAN 90'S ALLOCATABLE ARRAYS
 !  [X-14] THE COMPILER MAY NOW CAUSE THIS MESSAGE TO BE GENERATED FOR POINTERS.
	PARAMETER FOR$_INVDEALLOC = '001884CC'X
 !  **********
 !  [X-18] THE COMPILER MAY NOW CAUSE THIS MESSAGE TO BE GENERATED FOR POINTERS.
	PARAMETER FOR$_INVDEALLOC2 = '0018856C'X
 !  **********
 !  [X-21] NEW ERRORS GENERATED FOR ARGUMENT LENGTHS SHORTER THAN STANDARD SPECIFIES FOR 
 !         INTRINSIC DATE_AND_TIME.
 !  [X-24] NEW ERROR FOR GENERIC DIVIDE BY ZERO.
 !  [X-25] NEW ERROR FOR ARRAY ALLOCATION SIZE OVERFLOW.
	PARAMETER FOR$_SHORTDATEARG = '0018857C'X
	PARAMETER FOR$_SHORTTIMEARG = '00188584'X
	PARAMETER FOR$_SHORTZONEARG = '0018858C'X
	PARAMETER FOR$_DIV = '00188594'X
	PARAMETER FOR$_ARRSIZEOVF = '0018859C'X
 !  **********
 !  THE FOLLOWING MESSAGES ARE SECONDARY MESSAGES, OR ARE USED ONLY IN
 !  EXIT HANDLERS, AND THEREFORE DO NOT NEED TO BE (AND SHOULD NOT BE)
 !  CONTIGUOUS WITH THE MESSAGES ABOVE.
 !  THE NEXT SIX MESSAGES ARE SECONDARY MESSAGES FOR USE WITH MIXFILACC IN
 !  FOR$$IO_BEG AND FOR$$CB.
	PARAMETER FOR$_UNFIO_FMT = '00188804'X
	PARAMETER FOR$_FMTIO_UNF = '0018880C'X
	PARAMETER FOR$_DIRIO_KEY = '00188814'X
	PARAMETER FOR$_SEQIO_DIR = '0018881C'X
	PARAMETER FOR$_KEYIO_DIR = '00188824'X
	PARAMETER FOR$_IO_NONFOR = '0018882C'X
 !  THE NEXT TWO MESSAGES ARE SECONDARY MESSAGES FOR USE WITH INPCONERR IN
 !  FOR$$UDF_WF AND FOR$$UDF_WL.
	PARAMETER FOR$_INVTEXREC = '00188834'X
	PARAMETER FOR$_INVTEX = '0018883C'X
 !  ADDITIONAL SECONDARY MESSAGES
	PARAMETER FOR$_OPEREQDIS = '00188844'X
	PARAMETER FOR$_OPEREQSEQ = '0018884C'X
	PARAMETER FOR$_PROABOUSE = '00188852'X
	PARAMETER FOR$_FLOCONFAIU = '0018885A'X
 !  **********
 !  [X-13] THE FOLLOWING MESSAGE IS A FATAL MESSAGE ACCORDING TO THE F90 STANDARD
	PARAMETER FOR$_ENDRECDUR = '00188864'X
 !  THESE NEXT 4 MESSAGES ARE USED IN THE EXIT HANDLER WHICH IS DECLARED BY FOR$HANDLER.
	PARAMETER FOR$_FLOINEEXC = '00188943'X
	PARAMETER FOR$_FLOINVEXC = '0018894B'X
	PARAMETER FOR$_FLOOVFEXC = '00188953'X
	PARAMETER FOR$_FLODIV0EXC = '0018895B'X
	PARAMETER FOR$_FLOUNDEXC = '00188963'X
	PARAMETER FOR$_VECALIGNEXC = '0018896B'X
 !  END OF SPECIAL MESSAGES
 !  **********
 !  **********
 !  RESERVE A NUMBER FOR A MESSAGE TO REPORT COMPILED CODE GENERATED
 !  RUNTIME ERRORS.
	PARAMETER FOR$_MSGBUFOVF = '00188C7C'X
	PARAMETER FOR$_DIAGNOSTIC = '00188C84'X
 !  **********
 !  THE FOLLOWING MESSAGES ARE MESSAGES ISSUED FROM FORRTL2, THE 
 !  VAX FORTRAN V5.0 PARALLEL PROCESSING RTL SUPPORT. 
 ! 
	PARAMETER FOR$_FATINTERR = '00189004'X
	PARAMETER FOR$_SUBPRCDIED = '0018900C'X
	PARAMETER FOR$_NOTIMPRET = '00189014'X
	PARAMETER FOR$_FAIOWNERID = '0018901C'X
	PARAMETER FOR$_FAIPRCID = '00189024'X
	PARAMETER FOR$_FAIPRCNAME = '0018902C'X
	PARAMETER FOR$_FAIACTCPU = '00189034'X
	PARAMETER FOR$_FAIIDPRC = '0018903C'X
	PARAMETER FOR$_FAIIMAGNAME = '00189044'X
	PARAMETER FOR$_FAIDCLEXIT = '0018904C'X
	PARAMETER FOR$_FAISUBPRC = '00189054'X
	PARAMETER FOR$_INVNUMPRC = '0018905C'X
	PARAMETER FOR$_MEMSHRERR = '00189064'X
	PARAMETER FOR$_LOCALSHRERR = '0018906C'X
	PARAMETER FOR$_LOCALACCESS = '00189074'X
	PARAMETER FOR$_INVLCLADR = '0018907C'X
	PARAMETER FOR$_COMSHRERR = '00189084'X
	PARAMETER FOR$_INVCOMADR = '0018908C'X
	PARAMETER FOR$_PARINITERR = '00189094'X
	PARAMETER FOR$_STACKSHRERR = '0018909C'X
	PARAMETER FOR$_FAISHRSTACK = '001890A4'X
	PARAMETER FOR$_INVUNWIND = '001890AC'X
	PARAMETER FOR$_STKBUFOVR = '001890B4'X
	PARAMETER FOR$_SUBPRCDEL = '001890BC'X
	PARAMETER FOR$_ASSERTFAIL = '001890C4'X	 !  **********
 !  THE FOLLOWING MESSAGES ARE MESSAGES ISSUED FROM MICORSOFT FORTRAN AND NOW
 !  VISUAL FORTRAN.
 ! 
 !  [X-16] THE FOLLOWING ERRORS REFER TO MSF ERROR MESSAGES.
 !  THESE MESSAGES MUST REMAIN IN CONTIGUOUS ORDER SO THAT AN
 !  OFFSET INTO A MAPPING ARRAY CAN BE COMPUTED FROM THE MESSAGE
 !  BASE NUMBER, WHICH IS 540 FOR MSF MESSAGES.  THAT WAY VISUAL
 !  FORTRAN CAN RETURN IOSTAT NUMBERS SIMILAR TO MSF.  ALSO
 !  WE PUT THESE MESSAGES THIS FAR DOWN TO KEEP IN SYNCH WITH 
 !  THE VMS MESSAGE FILE.  IT HAS CONTIGUOUS OPENINGS UP TO 768
 !  IN THIS RANGE. THE NEXT CONTIGUOUS OPENING BEGINS FROM 1024.
	PARAMETER FOR$_F6096 = '001890E4'X
	PARAMETER FOR$_F6097 = '001890EC'X
	PARAMETER FOR$_F6098 = '001890F4'X
	PARAMETER FOR$_F6099 = '001890FC'X
	PARAMETER FOR$_F6100 = '00189104'X
	PARAMETER FOR$_F6101 = '0018910C'X
	PARAMETER FOR$_F6102 = '00189114'X
	PARAMETER FOR$_F6103 = '0018911C'X
	PARAMETER FOR$_F6104 = '00189124'X
	PARAMETER FOR$_F6105 = '0018912C'X
	PARAMETER FOR$_F6106 = '00189134'X
	PARAMETER FOR$_F6200 = '0018913C'X
	PARAMETER FOR$_F6201 = '00189144'X
	PARAMETER FOR$_F6202 = '0018914C'X
	PARAMETER FOR$_F6203 = '00189154'X
	PARAMETER FOR$_F6204 = '0018915C'X
	PARAMETER FOR$_F6205 = '00189164'X
	PARAMETER FOR$_F6206 = '0018916C'X
	PARAMETER FOR$_F6207 = '00189174'X
	PARAMETER FOR$_F6208 = '0018917C'X
	PARAMETER FOR$_F6209 = '00189184'X
	PARAMETER FOR$_F6210 = '0018918C'X
	PARAMETER FOR$_F6211 = '00189194'X
	PARAMETER FOR$_F6212 = '0018919C'X
	PARAMETER FOR$_F6213 = '001891A4'X
	PARAMETER FOR$_F6214 = '001891AC'X
	PARAMETER FOR$_F6300 = '001891B4'X
	PARAMETER FOR$_F6301 = '001891BC'X
	PARAMETER FOR$_F6302 = '001891C4'X
	PARAMETER FOR$_F6303 = '001891CC'X
	PARAMETER FOR$_F6304 = '001891D4'X
	PARAMETER FOR$_F6305 = '001891DC'X
	PARAMETER FOR$_F6306 = '001891E4'X
	PARAMETER FOR$_F6307 = '001891EC'X
	PARAMETER FOR$_F6308 = '001891F4'X
	PARAMETER FOR$_F6309 = '001891FC'X
	PARAMETER FOR$_F6310 = '00189204'X
	PARAMETER FOR$_F6311 = '0018920C'X
	PARAMETER FOR$_F6312 = '00189214'X
	PARAMETER FOR$_F6313 = '0018921C'X
	PARAMETER FOR$_F6314 = '00189224'X
	PARAMETER FOR$_F6315 = '0018922C'X
	PARAMETER FOR$_F6316 = '00189234'X
	PARAMETER FOR$_F6317 = '0018923C'X
	PARAMETER FOR$_F6318 = '00189244'X
	PARAMETER FOR$_F6319 = '0018924C'X
	PARAMETER FOR$_F6400 = '00189254'X
	PARAMETER FOR$_F6401 = '0018925C'X
	PARAMETER FOR$_F6402 = '00189264'X
	PARAMETER FOR$_F6403 = '0018926C'X
	PARAMETER FOR$_F6404 = '00189274'X
	PARAMETER FOR$_F6405 = '0018927C'X
	PARAMETER FOR$_F6406 = '00189284'X
	PARAMETER FOR$_F6407 = '0018928C'X
	PARAMETER FOR$_F6408 = '00189294'X
	PARAMETER FOR$_F6409 = '0018929C'X
	PARAMETER FOR$_F6410 = '001892A4'X
	PARAMETER FOR$_F6411 = '001892AC'X
	PARAMETER FOR$_F6412 = '001892B4'X
	PARAMETER FOR$_F6413 = '001892BC'X
	PARAMETER FOR$_F6414 = '001892C4'X
	PARAMETER FOR$_F6415 = '001892CC'X
	PARAMETER FOR$_F6416 = '001892D4'X
	PARAMETER FOR$_F6417 = '001892DC'X
	PARAMETER FOR$_F6418 = '001892E4'X
	PARAMETER FOR$_F6419 = '001892EC'X
	PARAMETER FOR$_F6420 = '001892F4'X
	PARAMETER FOR$_F6421 = '001892FC'X
	PARAMETER FOR$_F6422 = '00189304'X
	PARAMETER FOR$_F6423 = '0018930C'X
	PARAMETER FOR$_F6424 = '00189314'X
	PARAMETER FOR$_F6425 = '0018931C'X
	PARAMETER FOR$_F6500 = '00189324'X
	PARAMETER FOR$_F6501 = '0018932C'X
	PARAMETER FOR$_F6502 = '00189334'X
	PARAMETER FOR$_F6503 = '0018933C'X
	PARAMETER FOR$_F6504 = '00189344'X
	PARAMETER FOR$_F6505 = '0018934C'X
	PARAMETER FOR$_F6506 = '00189354'X
	PARAMETER FOR$_F6507 = '0018935C'X
	PARAMETER FOR$_F6508 = '00189364'X
	PARAMETER FOR$_F6509 = '0018936C'X
	PARAMETER FOR$_F6510 = '00189374'X
	PARAMETER FOR$_F6511 = '0018937C'X
	PARAMETER FOR$_F6512 = '00189384'X
	PARAMETER FOR$_F6513 = '0018938C'X
	PARAMETER FOR$_F6514 = '00189394'X
	PARAMETER FOR$_F6515 = '0018939C'X
	PARAMETER FOR$_F6516 = '001893A4'X
	PARAMETER FOR$_F6600 = '001893AC'X
	PARAMETER FOR$_F6601 = '001893B4'X
	PARAMETER FOR$_F6602 = '001893BC'X
	PARAMETER FOR$_F6700 = '001893C4'X
	PARAMETER FOR$_F6701 = '001893CC'X
	PARAMETER FOR$_F6970 = '001893D4'X
	PARAMETER FOR$_F6971 = '001893DC'X
	PARAMETER FOR$_F6972 = '001893E4'X
	PARAMETER FOR$_F6980 = '001893EC'X
	PARAMETER FOR$_F6981 = '001893F4'X
	PARAMETER FOR$_F6982 = '001893FC'X
	PARAMETER FOR$_F6983 = '00189404'X
	PARAMETER FOR$_F6984 = '0018940C'X
	PARAMETER FOR$_F6985 = '00189414'X
	PARAMETER FOR$_F6986 = '0018941C'X
	PARAMETER FOR$_F6987 = '00189424'X
	PARAMETER FOR$_F6988 = '0018942C'X
	PARAMETER FOR$_F6989 = '00189434'X
	PARAMETER FOR$_F6990 = '0018943C'X
	PARAMETER FOR$_F6991 = '00189444'X
	PARAMETER FOR$_F6992 = '0018944C'X
	PARAMETER FOR$_F6993 = '00189454'X
	PARAMETER FOR$_F6994 = '0018945C'X
	PARAMETER FOR$_F6995 = '00189464'X
	PARAMETER FOR$_F6996 = '0018946C'X
	PARAMETER FOR$_F6997 = '00189474'X
	PARAMETER FOR$_F6998 = '0018947C'X
	PARAMETER FOR$_F6999 = '00189484'X
	PARAMETER FOR$_F6702 = '0018948C'X
	PARAMETER FOR$_F6703 = '00189494'X
	PARAMETER FOR$_F6704 = '0018949C'X
	PARAMETER FOR$_F6705 = '001894A4'X
	PARAMETER FOR$_F6706 = '001894AC'X
	PARAMETER FOR$_F6707 = '001894B4'X
	PARAMETER FOR$_F6708 = '001894BC'X
	PARAMETER FOR$_F6709 = '001894C4'X
	PARAMETER FOR$_F6710 = '001894CC'X
	PARAMETER FOR$_F6711 = '001894D4'X
	PARAMETER FOR$_F6712 = '001894DC'X
	PARAMETER FOR$_F6713 = '001894E4'X
	PARAMETER FOR$_F6714 = '001894EC'X
	PARAMETER FOR$_F6715 = '001894F4'X
	PARAMETER FOR$_F6716 = '001894FC'X
	PARAMETER FOR$_F6717 = '00189504'X
	PARAMETER FOR$_F6718 = '0018950C'X
	PARAMETER FOR$_F6719 = '00189514'X
	PARAMETER FOR$_F6720 = '0018951C'X
	PARAMETER FOR$_F6721 = '00189524'X
	PARAMETER FOR$_F6722 = '0018952C'X
	PARAMETER FOR$_F6723 = '00189534'X
	PARAMETER FOR$_F6724 = '0018953C'X
	PARAMETER FOR$_F6725 = '00189544'X
	PARAMETER FOR$_F6726 = '0018954C'X
	PARAMETER FOR$_F6727 = '00189554'X
	PARAMETER FOR$_F6728 = '0018955C'X
	PARAMETER FOR$_F6729 = '00189564'X
	PARAMETER FOR$_F6730 = '0018956C'X
	PARAMETER FOR$_F6731 = '00189574'X
	PARAMETER FOR$_F6732 = '0018957C'X
	PARAMETER FOR$_F6733 = '00189584'X
	PARAMETER FOR$_F6734 = '0018958C'X
	PARAMETER FOR$_F6735 = '00189594'X
	PARAMETER FOR$_F6736 = '0018959C'X
	PARAMETER FOR$_F6737 = '001895A4'X
	PARAMETER FOR$_F6738 = '001895AC'X
	PARAMETER FOR$_F6739 = '001895B4'X
	PARAMETER FOR$_F6740 = '001895BC'X
	PARAMETER FOR$_F6741 = '001895C4'X
	PARAMETER FOR$_F6742 = '001895CC'X
	PARAMETER FOR$_F6743 = '001895D4'X
	PARAMETER FOR$_F6744 = '001895DC'X
	PARAMETER FOR$_F6745 = '001895E4'X
	PARAMETER FOR$_F6746 = '001895EC'X
	PARAMETER FOR$_F6747 = '001895F4'X
	PARAMETER FOR$_F6748 = '001895FC'X
	PARAMETER FOR$_F6749 = '00189604'X
	PARAMETER FOR$_F6750 = '0018960C'X
	PARAMETER FOR$_F6751 = '00189614'X
	PARAMETER FOR$_F6752 = '0018961C'X
	PARAMETER FOR$_F6753 = '00189624'X
	PARAMETER FOR$_F6754 = '0018962C'X
	PARAMETER FOR$_F6755 = '00189634'X
	PARAMETER FOR$_F6756 = '0018963C'X
	PARAMETER FOR$_F6757 = '00189644'X
	PARAMETER FOR$_F6758 = '0018964C'X
	PARAMETER FOR$_F6759 = '00189654'X
	PARAMETER FOR$_F6760 = '0018965C'X
	PARAMETER FOR$_F6761 = '00189664'X
	PARAMETER FOR$_F6762 = '0018966C'X
	PARAMETER FOR$_F6763 = '00189674'X
	PARAMETER FOR$_F6764 = '0018967C'X
	PARAMETER FOR$_F6765 = '00189684'X
	PARAMETER FOR$_F6766 = '0018968C'X
	PARAMETER FOR$_F6767 = '00189694'X
	PARAMETER FOR$_F6768 = '0018969C'X
	PARAMETER FOR$_F6769 = '001896A4'X
	PARAMETER FOR$_F6770 = '001896AC'X
	PARAMETER FOR$_F6771 = '001896B4'X
	PARAMETER FOR$_F6772 = '001896BC'X
	PARAMETER FOR$_F6773 = '001896C4'X
	PARAMETER FOR$_F6774 = '001896CC'X
	PARAMETER FOR$_F6775 = '001896D4'X
	PARAMETER FOR$_F6776 = '001896DC'X
	PARAMETER FOR$_F6777 = '001896E4'X
	PARAMETER FOR$_F6778 = '001896EC'X
	PARAMETER FOR$_F6779 = '001896F4'X
	PARAMETER FOR$_F6780 = '001896FC'X
	PARAMETER FOR$_F6781 = '00189704'X
	PARAMETER FOR$_F6782 = '0018970C'X
	PARAMETER FOR$_F6783 = '00189714'X
	PARAMETER FOR$_F6784 = '0018971C'X
	PARAMETER FOR$_F6785 = '00189724'X
	PARAMETER FOR$_F6786 = '0018972C'X
	PARAMETER FOR$_F6787 = '00189734'X
	PARAMETER FOR$_F6788 = '0018973C'X
	PARAMETER FOR$_F6789 = '00189744'X
	PARAMETER FOR$_F6790 = '0018974C'X
	PARAMETER FOR$_F6791 = '00189754'X
	PARAMETER FOR$_F6792 = '0018975C'X
	PARAMETER FOR$_F6793 = '00189764'X
	PARAMETER FOR$_F6794 = '0018976C'X
	PARAMETER FOR$_F6795 = '00189774'X
	PARAMETER FOR$_F6796 = '0018977C'X
	PARAMETER FOR$_F6797 = '00189784'X
	PARAMETER FOR$_F6798 = '0018978C'X
	PARAMETER FOR$_F6799 = '00189794'X
	PARAMETER FOR$_F6800 = '0018979C'X
	PARAMETER FOR$_F6801 = '001897A4'X
	PARAMETER FOR$_F6802 = '001897AC'X
	PARAMETER FOR$_F6803 = '001897B4'X
	PARAMETER FOR$_F6804 = '001897BC'X
 !  END OF SPECIAL MISCROSOFT ERROR MESSAGES
 !  **********
	PARAMETER FOR$_INVLOGNAM = '00189802'X
	PARAMETER FOR$_TOOMANPRC = '0018980A'X
	PARAMETER FOR$_INVDSTRSIZE = '00189812'X
	PARAMETER FOR$_DEFVALUSED = '0018A803'X
	PARAMETER FOR$_UNIPROCESS = '0018A80B'X
	PARAMETER FOR$_NOPARINIT = '0018A813'X
	PARAMETER FOR$_NOTRUNINPP = '0018A81B'X
	PARAMETER FOR$_NESTPPLOOP = '0018A823'X
	PARAMETER FOR$_UNAWAKSUB = '0018A82B'X
 !  END OF FORRTL2 MESSAGES
 !  **********
!DEC$ END OPTIONS