// DATE 161015 // NOHALT * *** RUN MAINT. * // LOAD $MAINT,F1 // RUN // COPY FROM-READER,TO-F1,RETAIN-R,LIBRARY-S,NAME-@ERM MACRO @ERM &EXP-N .* .* 5703-XM1 GENERAL ERROR MESSAGE EQUATES. .* TEXT PRINT OFF AIF (&EXP EQ 'Y').ON PRINT ON REQUESTED ? AIF (&EXP EQ 'N').OFF PRINT OFF REQUESTED ? .ERR MNOTE 00,'INVALID MACRO OPTION SPECIFIED.' AGO .MEND .ON ANOP PRINT ON .OFF ANOP TITLE '@ERMEQ - GENERAL ERROR MESSAGE EQUATES' ********************************************************************** * ERROR MESSAGES EQUATES * ********************************************************************** @@E100 EQU 0 FIRST CHARACTER NOT * * ALPHABETIC @@E101 EQU @@E100+1 FIRST CHARACTER NOT * * @@E102 EQU @@E101+1 PASSWORD OR FILENAME LONGER * * THEN 8 CHARACTERS @@E103 EQU @@E102+1 LONGER THEN 6 * * CHARACTERS @@E110 EQU @@E103+1 COMMA FOLLOWED BY NOTHING * * @@E112 EQU @@E110+1 CONTAINS * * 2 DECIMAL POINTS @@E113 EQU @@E112+1 DECIMAL POINT WITHOUT * * @@E114 EQU @@E113+1 INCOMPLETE @@E115 EQU @@E114+1 INVALID * * @@E116 EQU @@E115+1 VARIABLE IS NOT FOLLOWED BY A * * COMMA OR EQUAL SIGN @@E117 EQU @@E116+1 INVALID EXPONENT IN CONSTANT * * @@E120 EQU @@E117+1 NON-NUMERIC CHARACTER IN OR INEGER @@E122 EQU @@E120+1 MORE THAN 4 DIGITS IN OR INTEGER @@E123 EQU @@E122+1 UNBALANCED LINE NUMBER SERIES * * @@E124 EQU @@E123+1 LINE NUMBER IS NOT GREATER * * THAN PREVIOUS LINE NUMBER @@E129 EQU @@E124+1 PARAMETER FOUND WHERE NONE * * IS ALLOWED @@E130 EQU @@E129+1 REQUIRED PARAMETER MISSING * * @@E131 EQU @@E130+1 INVALID PARAMETER * * @@E133 EQU @@E131+1 TOO MANY * * @@E134 EQU @@E133+1 DUPLICATE * * @@E135 EQU @@E134+1 INVALID USE OF ONE OR TWO * * STAR FILENAME @@E136 EQU @@E135+1 INVALID COMBINATION OF KEYWORDS * * @@E137 EQU @@E136+1 NO * * SPECIFIED @@E138 EQU @@E137+1 UNBALANCED QUOTES IN * * @@E139 EQU @@E138+1 INVALID * * @@E142 EQU @@E139+1 INCOMPLETE KEYWORD * * MISSING DASH @@E143 EQU @@E142+1 INCOMPLETE KEYWORD * * SECOND WORD UNRECOGNIZABLE @@E150 EQU @@E143+1 INVALID BASIC VARIABLE * * @@E151 EQU @@E150+1 VARIABLE SUBSCRIPT NOT * * AN INTEGER @@E160 EQU @@E151+1 MIXED DATA TYPE IN * * ASSIGNMENT @@E162 EQU @@E160+1 UNBALANCED * * @@E163 EQU @@E162+1 DIFFERENT VARIABLE TYPES * * IN @@E164 EQU @@E163+1 ODD TRACK NUMBER NOT * * ALLOWABLE @@E200 EQU @@E164+1 NO CURRENT OR * * DISK DEFINED @@E205 EQU @@E200+1 HELP TEXT NOT FOUND * * @@E210 EQU @@E205+1 NOT ON SPCIFIED * * DISK @@E211 EQU @@E210+1 SPECIFIED FILE NOT FOUND * * @@E212 EQU @@E211+1 DUPLICATE DISK LABELS * * ON SYSTEM @@E213 EQU @@E212+1 FILE NOT ON SYSTEM * * @@E215 EQU @@E213+1 SPECIFIED FILE PROTECTED * * @@E216 EQU @@E215+1 DISK LABEL NOT ON SPECIFIED * * LOCATION @@E217 EQU @@E216+1 SPECIFIED DISK NOT ON * * SYSTEM @@E220 EQU @@E217+1 NO DEFINED * * . @@E221 EQU @@E220+1 IS PROGRAM * * GENERATED @@E222 EQU @@E221+1 WORK FILE IS PROTECTED * * @@E223 EQU @@E222+1 NO PROGRAM FILE IN * * @@E225 EQU @@E223+1 NO PROGRAM IN PAUSE STATE * * @@E226 EQU @@E225+1 IS EMPTY * * . @@E227 EQU @@E226+1 SPECIFIED FILE NOT * * A PROGRAM FILE @@E228 EQU @@E227+1 ONE-STAR OR TWO-STAR * * FILE PROTECTED @@E229 EQU @@E228+1 DESIRED CONDITION ALREADY * * PRESENT-FUNCTION IGNORED @@E230 EQU @@E229+1 FUNCTION REQUIRES WORK AREA * * @@E232 EQU @@E230+1 FUNCTION INVALID IN * * PAUSE STATE @@E234 EQU @@E232+1 ONLY MOUNT OR INITIALIZE * * COMMAND VALID @@E237 EQU @@E234+1 ORIGINAL MODE OF EXECUTION * * NOT 'TRACE' @@E240 EQU @@E237+1 DATA RECORDER NOT ON SYSTEM * * @@E241 EQU @@E240+1 CRT NOT ON SYSTEM * * @@E242 EQU @@E241+1 DRIVE 2 NOT ON SYSTEM * * @@E248 EQU @@E242+1 CRT SPECIFIED WHEN INPUT IS * * FROM CARDS OR PROCEDURE @@E249 EQU @@E248+1 CARD OUTPUT SPECIFIED WHEN * * INPUT IS FROM CARDS @@E250 EQU @@E249+1 VARIABLE NOT IN PROGRAM * * @@E251 EQU @@E250+1 NOT IN * * RANGE 1E-99 < X < 1E99 @@E252 EQU @@E251+1 SUBSCRIPT EXCEEDS . @@E253 EQU @@E252+1 ARRAY NOT IN PROGRAM. * * @@E254 EQU @@E253+1 NO NON-ARRAY IN * * PROGRAMS @@E255 EQU @@E254+1 NO IN PROGRAM * * @@E256 EQU @@E255+1 INCONSISTENT NUMBER * * OF SUBSCRIPTS @@E300 EQU @@E256+1 REQUIRED * * SPACE NOT AVAILABLE @@E301 EQU @@E300+1 PREVIOUS FILENAME NOT * * ALLOCATED @@E302 EQU @@E301+1 NEW FILENAME ALREADY * * ALLOCATED @@E303 EQU @@E302+1 TWELVE FILES ALREADY ALLOCATED * * FOR WORK FILE PROGRAM @@E304 EQU @@E303+1 'NEW' FILE SPECIFIED ALREADY * * IS IN USER LIBRARY @@E305 EQU @@E304+1 'SPACE' PARAMETER EXECEEDS 256 * * . @@E308 EQU @@E305+1 SPECIFIED * * DOES NOT EXIST @@E310 EQU @@E308+1 USER FILE POOLED * * @@E315 EQU @@E310+1 * * LARGER THEN WORK FILE @@E316 EQU @@E315+1 NO EXECUTED BASIC PROGRAM * * . @@E320 EQU @@E316+1 SCP NOT AVAILABLE ON SYSTEM * * DISK @@E325 EQU @@E320+1 LINE NUMBER LIST TOO LONG * * @@E330 EQU @@E325+1 HELP KEYWORD NOT RECOGNIZED * * @@E335 EQU @@E330+1 LINE NO. LIST SPECIFIED FOR * * @@E338 EQU @@E335+1 INVALID COMBINATION OF * * @@E340 EQU @@E338+1 NO ONE-STAR OR TWO STAR * * LIBRARIES ON SYSTEM @@E350 EQU @@E340+1 83 ALREADY DEFINED * * ON DISK @@E351 EQU @@E350+1 NO ON * * SPECIFIED DISK @@E352 EQU @@E351+1 FILE LIBRARY FRAGMENTED, * * USE PACK COMMAND @@E360 EQU @@E352+1 MERGED FILE WOULD CONTAIN * * MORE THEN 990 LINES @@E361 EQU @@E360+1 INCOMPATIBLE FILE TYPES * * FOR @@E362 EQU @@E361+1 MERGED FILE WOULD EXCEED * * SIZE LIMIT @@E371 EQU @@E362+1 COMMAND NOT * * PREVIOUSLY ISSUED @@E380 EQU @@E371+1 PREVIOUSLY DEFINED * * @@E390 EQU @@E380+1 POOLED FILENAME ALREADY * * DEFINED @@E400 EQU @@E390+1 CURRENT PASSWORD/DISK NOT THE * * SAME AS CREATING USER @@E410 EQU @@E400+1 DISK LABEL NOT SAME AS LAST * * MOUNTED @@E415 EQU @@E410+1 INVALID COMMAND KEY * * @@E417 EQU @@E415+1 INVALID COMMAND SPECIFICATION * * @@E420 EQU @@E417+1 USER FILENAME ALREADY DEFINED * * @@E430 EQU @@E420+1 INVALID PARTIAL * * . @@E432 EQU @@E430+1 MAX WOULD BE * * EXCEEDED IF RENUMBERED @@E433 EQU @@E432+1 IS ZERO * * @@E450 EQU @@E433+1 ANOTHER PROGRAM IS SUSPENSION * * @@E451 EQU @@E450+1 SCRATCH FILE IN USE * * @@E460 EQU @@E451+1 RIGHT MARGIN EXCEEDS * * PRINTER SIZE @@E461 EQU @@E460+1 LESS THAN 18 * * @@E464 EQU @@E461+1 NO SUSPENDED PROGRAM * * @@E465 EQU @@E464+1 MISSING 'OPEN' DISK FILE * * @@E466 EQU @@E465+1 SUSPENDED CONFIGURATION * * DIFFERS FROM CURRENT SYSTEM @@E467 EQU @@E466+1 'OPEN' DISK FILE HAS BEEN * * MODIFIED @@E469 EQU @@E467+1 DISK FOUND DEFECTIVE * * @@E470 EQU @@E469+1 TRACK ALREADY ASSIGNED OR * * NOT AVAILABLE @@E471 EQU @@E470+1 INVALID SECONDARY * * INITIALIZATION @@E473 EQU @@E471+1 DISK ALREADY CONTAINS A * * @@E474 EQU @@E473+1 SPACE NOT AVAILABLE FOR FILE * * @@E475 EQU @@E474+1 NO MORE ALTERNATE TRACKS * * @@E476 EQU @@E475+1 CRT, PROCESSING UNIT, * * COMMAND KEY CONFLICT @@E477 EQU @@E476+1 INVALID KEYBOARD TYPE * * @@E478 EQU @@E477+1 ACTIVE FILE(S) ON DISK * * @@E479 EQU @@E478+1 SPECIFIED FILE NOT ON DISK * * @@E480 EQU @@E479+1 FILES IN AREA TO BE DELETED * * @@E481 EQU @@E480+1 CYLINDER 0 DEFECTIVE * * @@E482 EQU @@E481+1 SPECIFIED EXCEEDS DISK * * CAPACITY @@E483 EQU @@E482+1 VTOC FULL * * @@E484 EQU @@E483+1 SPACE NOT AVAILABLE BEGINNING * * AT SPECIFIED @@E485 EQU @@E484+1 WORK AREA SPACE ALLOCATED FOR * * ANOTHER PURPOSE @@E486 EQU @@E485+1 NOT USABLE * * @@E487 EQU @@E486+1 NUMBER OF TRACKS REQUESTED * * EXCEEDS DISK CAPACITY @@E488 EQU @@E487+1 CONTRACTION PARAMETER EXCEED * * LIBRARY SIZE @@E489 EQU @@E488+1 RELEASE LEVEL ON HELP * * TEXT IS INCORRECT @@E490 EQU @@E489+1 NO SUSPECTED DEFECTIVE * * TRACKS @@E491 EQU @@E490+1 INVALID COMPONENT NAME * * @@E492 EQU @@E491+1 NO 'HDR' OR 'PTF' STATEMENT * * @@E493 EQU @@E492+1 INCORRECT CHECKSUM * * @@E494 EQU @@E493+1 NO 'PTF' FILE ON DISK * * @@E495 EQU @@E494+1 SYSTEM RELEASE LEVEL * * INCORRECT @@E496 EQU @@E495+1 THIS PTF NOT IN 'PTF' * * DISK FILE @@E497 EQU @@E496+1 NO WORKAREA ON 'CURRENT' * * SYSTEM DISK @@E498 EQU @@E497+1 TRACK NOT ASSIGNED * * @@E500 EQU @@E498+1 LINE LENGTH LIMIT EXCEED-1 * * OR MORE LINES TRUNCATED @@E501 EQU @@E500+1 SIZE LIMIT * * EXCEEDED - FILE TRUNCATED @@E530 EQU @@E501+1 SIZE LIMIT * * EXCEEDED @@E531 EQU @@E530+1 SIZE LIMIT * * EXCEEDED @@E535 EQU @@E531+1 WRONG/ NO ON R1 OR F1 * * @@E540 EQU @@E535+1 RIGHT MARGIN EXCEEDED * * LINE IGNORED @@E541 EQU @@E540+1 'CURRENT' PASSOWRD/DISK LABEL * * CANCELLED @@E542 EQU @@E541+1 DISK CYLINDER SIZE DOES NOT * * MATCH MACHINE CAPACITY @@E543 EQU @@E542+1 R1 DISK NOT INITIALIZED * * @@E544 EQU @@E543+1 F1 DISK NOT INITIALIZED * * @@E545 EQU @@E544+1 R2 DISK NOT INITIALIZED * * @@E546 EQU @@E545+1 F2 DISK NOT INITIALIZED * * @@E547 EQU @@E546+1 MINIMUM CONFIGURATION * * RECORD ASSUMED @@E549 EQU @@E547+1 PRINTER UNAVAILABLE DUE TO * * PREVIOUS PRINTER FAILURE @@E550 EQU @@E549+1 TRAGIC DISK ERROR - BAD * * WORK FILE @@E551 EQU @@E550+1 TRAGIC DISK ERROR - BAD * * SAVED FILE @@E552 EQU @@E551+1 TRAGIC DISK ERROR - 'CURRENT' * * PASSWORD NOT FOUND @@E553 EQU @@E552+1 TRAGIC DISK ERROR - POOLED * * FILE NOT IN DIRECTORY @@E554 EQU @@E553+1 TRAGIC DISK ERROR - BAD * * FILENAME IN POOLED DIRECTORY @@E555 EQU @@E554+1 TRAGIC DISK ERROR - 'OPEN' * * DISK FILE GONE @@E556 EQU @@E555+1 TRAGIC DISK ERROR - PARAMETERS * * HAVE BEEN DESTROYED @@E558 EQU @@E556+1 CURRENT SYSTEM PROGRAM FILE * * ON DISK SPECIFIED @@E570 EQU @@E558+1 ONE OR MORE LINES TRUNCATED * * WHEN PUNCHED @@E571 EQU @@E570+1 ONE OR MORE DISABLED LINES * * PUNCHED @@E572 EQU @@E571+1 WRONG OR NO ON F1 * * @@E573 EQU @@E572+1 WRONG OR NO ON R1 * * @@E574 EQU @@E573+1 NEXT AUTOMATIC LINE NUMBER * * WILL EXCEED 9999 @@E578 EQU @@E574+1 RESPONSE NOT ALLOWED WITH * * CARDS OR PROCEDURE INPUT @@E585 EQU @@E578+1 REQUESTED TRACK SPACE EXCEEDS * * DISK CONFIGURATION @@E600 EQU @@E585+1 DIM ARRAY NAME PREVIOUSLY * * DEFINED @@E601 EQU @@E600+1 REFERENCED MATRIX NOT * * PREVIOUSLY DEFINED. @@E602 EQU @@E601+1 MATRIX REFERENCED AS VECTOR * * @@E603 EQU @@E602+1 VECTOR REFERENCED AS MATRIX * * @@E604 EQU @@E603+1 DUPLICATE DEFINITION OF USER * * FUNCTION @@E606 EQU @@E604+1 STATEMENT OUT OF * * SEQUENCE @@E607 EQU @@E606+1 /NEXT NESTED INCORRECTLY * * @@E608 EQU @@E607+1 MORE THAN 9 NESTED /NEXT * * LOOPS @@E609 EQU @@E608+1 /NEXT LOOP INCOMPLETE * * @@E610 EQU @@E609+1 COMPILED PROGRAM TOO LARGE * * @@E611 EQU @@E610+1 TOO MANY ARRAY ELEMENTS * * @@E612 EQU @@E611+1 TOO MANY LINE NUMBER * * REFERENCES @@E613 EQU @@E612+1 STORAGE SPACE REQUIRED FOR * * FILES TOO LARGE @@E614 EQU @@E613+1 FILE LINE PREVIOUSLY TRUNCATED * * @@E700 EQU @@E614+1 NON-EXISTENT LINE NUMBER * * REFERENCED @@E701 EQU @@E700+1 NON-EXISTENT USER FUNCTION * * REFERENCED @@E710 EQU @@E701+1 REQUIRED FILE NOT ALLOCATED * * @@E712 EQU @@E710+1 INCONSISTENT INPUT/OUTPUT FILE * * USAGE @@E713 EQU @@E712+1 ALLOCATED FILE NOT A DATA FILE * * @@E714 EQU @@E713+1 INSUFFICIENT DATA FOR * * @@E715 EQU @@E714+1 OUTPUT FILE EXCEEDED * * @@E716 EQU @@E715+1 NO SPACE FOR ALLOCATED SCRATCH * * FILE @@E717 EQU @@E716+1 ALLOCATED DEVICE NOT ON SYSTEM * * @@E718 EQU @@E717+1 INVALID DATA ITEM FROM CARD * * FILE @@E720 EQU @@E718+1 NO SPECIFIED * * @@E721 EQU @@E720+1 INSUFFICIENT DATA FOR READ * * @@E723 EQU @@E721+1 INVALID LOOP EXECUTION * * @@E724 EQU @@E723+1 NO PRINT IMAGE IN 0,01;E * * STATEMENT, @@E725 EQU @@E724+1 REFERENCED STATEMENT NOT AN * * IMAGE @@E726 EQU @@E725+1 EXECUTED WITHOUT * * ACTIVE @@E727 EQU @@E726+1 INVALID VARIABLE ASSIGNED * * @@E728 EQU @@E727+1 RECURSIVE FUNCTION REFERENCE * * @@E729 EQU @@E728+1 STATEMENT BRANCHES TO ITSELF * * @@E730 EQU @@E729+1 EXPRESSION TOO COMPLEX TO * * EXECUTE @@E732 EQU @@E730+1 MORE THAN 10 ACTIVE USER * * FUNCTIONS @@E752 EQU @@E732+1 ASSIGNED MATRIX NOT * * 2-DIMENSIONAL @@E753 EQU @@E752+1 MATRIX MULTIPLIER NOT * * 2-DIMENSIONAL @@E754 EQU @@E753+1 MATRIX FUNCTION ARGUMENT NOT * * 2-DIMENSIONAL @@E755 EQU @@E754+1 ASSIGNED MATRIX DIMS NOT SAME * * AS EXPR @@E756 EQU @@E755+1 MATRIX DIMENSIONS NOT REVERSED * * @@E757 EQU @@E756+1 ASSIGNED MATRIX DIMS NOT SAYE • * * AS INV ARG @@E758 EQU @@E757+1 MATRIX EXPR DIMENSIONS NOT * * CONFORMABLE @@E759 EQU @@E758+1 ATTEMPTED MATRIX * * MULTIPLICATION IN PLACE @@E760 EQU @@E759+1 SUBSCRIPT OUT OF @@E761 EQU @@E760+1 DIMENSIONED OUTSIDE MAX @@E762 EQU @@E761+1 MATRIX EXPRESSION DIMENSIONS * * NOT IDENTICAL @@E763 EQU @@E762+1 NEARLY SINGULAR MATRIX * * @@E764 EQU @@E763+1 MATRIX TOO LARGE TO INVERT * * @@E765 EQU @@E764+1 ATTEMPTED MATRIX INVERSION IN * * PLACE @@E766 EQU @@E765+1 MATRIX NOT SQUARE * * @@E767 EQU @@E766+1 ATTEMPTED MATRIX TRANSPOSITION * * IN PLACE @@E768 EQU @@E767+1 SEC FUNCTION ARGUMENT > 1E6 * * @@E769 EQU @@E768+1 CSC FUNCTION ARGUMENT > 1E6 * * @@E770 EQU @@E769+1 SIN FUNCTION ARGUMENT > 1E6 * * @@E771 EQU @@E770+1 COS FUNCTION ARGUMENT > 1E6 * * @@E772 EQU @@E771+1 TAN FUNCTION ARGUMENT > 1E6 * * @@E773 EQU @@E772+1 COT FUNCTION ARGUMENT > 1E6 * * @@E774 EQU @@E773+1 EXPONENTIATION ERROR * * @@E775 EQU @@E774+1 SOR FUNCTION ARGUMENT < ZERO * * @@E776 EQU @@E775+1 EXP FUNCTION ARGUMENT > 227.96 * * @@E777 EQU @@E776+1 LOG FUNCTION ARGUMENT 0 OR * * NEGATIVE @@E778 EQU @@E777+1 LSI FUNCTION ARGUMENT 0 OR * * NEGATIVE @@E779 EQU @@E778+1 LTW FUNCTION ARGUMENT 0 OR * * NEGATIVE @@E780 EQU @@E779+1 COT FUNCTION RESULT GOES TO * * INFINITY @@E781 EQU @@E780+1 SEC FUNCTION RESULT GOES TO * * INFINITY @@E782 EQU @@E781+1 CSC FUNCTION RESULT GOES TO * * INFINITY @@E783 EQU @@E782+1 ASN FUNCTION ARG NOT IN RANGE * * -1 < X < 1 @@E784 EQU @@E783+1 ACS FUNCTION ARC NOT IN RANGE * * -1 < X < 1 @@E785 EQU @@E784+1 HSN FUNCTION--ARGUMENT > 225 * * @@E786 EQU @@E785+1 HCS FUNCTION--ARGUMENT > 225 * * @@E790 EQU @@E786+1 DIVISION BY ZERO * * @@E791 EQU @@E790+1 OVERFLOW - VALUE NOT LESS THAN * * 1E99 @@E792 EQU @@E791+1 UNDERFLOW - VALUE LESS THAN * * 1E-99 @@E793 EQU @@E792+1 TAN FUNCTION ARGUMENT > 100 * * @@E794 EQU @@E793+1 COT FUNCTION ARGUMENT > 100 * * @@E795 EQU @@E794+1 SIN FUNCTION ARGUMENT > 100 * * @@E796 EQU @@E795+1 COS FUNCTION ARGUMENT > 100 * * @@E797 EQU @@E796+1 SEC FUNCTION ARGUMENT > 100 * * @@E798 EQU @@E797+1 CSC FUNCTION ARGUMENT > 100 * * @@E900 EQU @@E798+1 INVALID FUNCTION IN PROCEDURE * * STEP @@E901 EQU @@E900+1 PROCEDURE ALREADY DEFINED * * @@E902 EQU @@E901+1 PROCEDURE NOT DEFINED * * @@E903 EQU @@E902+1 PROCEDURE > 512 CHARACTERS * * @@E905 EQU @@E903+1 DESK CALCULATOR REQUIRES WITDH * * > 63 @@E906 EQU @@E905+1 INVALID CHARACTER IN PROCEDURE * * DEFINITION @@E910 EQU @@E906+1 INVALID OPERATION * * @@E548 EQU -1 PRINTER FAILLQE, OUTPUT * * @@E575 EQU -1 CHANGED LINE EXCEEDS WIDTH OF * * @@E579 EQU -1 VTOC FILES EXIST, RE-IPL, USE * * @@E580 EQU -1 DUPLICATE DISK LABELS - * * @@E595 EQU -1 INVALID RESPONSE - TYPE ALPHA * * @@E597 EQU -1 LLLLLL NOT ON UU * * @@E598 EQU -1 DATA ON ABOVE TRACK * * @@E800 EQU -1 INVALID INPUT DATA-NUMERIC * * @@E801 EQU -1 INVALID INPUT DATA--CHARACTER * * @@E802 EQU -1 TOO MANY INPUT DATA ELEMENTS * * @@E803 EQU -1 NOT ENOUGH DATA ELEMENTS * * @@E804 EQU -1 NOT ENOUGH ARRAY ROW ELEMENTS * * @@E001 EQU 0 MISSING @@E003 EQU @@E001+1 UNBALANCED * * @@E004 EQU @@E003+1 CONTAINS * * 2 DECIMAL POINTS @@E005 EQU @@E004+1 DECIMAL POINT WITHOUT * * @@E006 EQU @@E005+1 INCOMPLETE @@E007 EQU @@E006+1 INVALID CHARACTER FOLLOWING * * @@E008 EQU @@E007+1 IN * * @@E009 EQU @@E008+1 INVALID EXPRESSION FIRST * * CHARACTER @@E010 EQU @@E009+1 INVALID * * @@E011 EQU @@E010+1 COMMA NOT FOLLOWING LINE * * NUMBER @@E012 EQU @@E011+1 INVALID * * @@E013 EQU @@E012+1 INCOMPLETE @@E014 EQU @@E013+1 INVALID FILE SPECIFICATION * * @@E015 EQU @@E014+1 VARIABLE NOT PRESENT IN INPUT * * LIST @@E016 EQU @@E015+1 INVALID VARIABLE * * @@E017 EQU @@E016+1 INVALID EXPONENT IN CONSTANT * * @@E018 EQU @@E017+1 WITHOUT VALID * * PRECEDING OPERAND @@E019 EQU @@E018+1 REQUIRED BTWN LAST * * 2 CHARACTERS CHECKED @@E020 EQU @@E019+1 INVALID CONSTANT * * @@E021 EQU @@E020+1 TOO LONG * * @@E023 EQU @@E021+1 INVALID * * @@E024 EQU @@E023+1 INVALID OR MISSING @@E025 EQU @@E024+1 INVALID * * @@E026 EQU @@E025+1 NO EQUAL SIGN AFTER * * @@E027 EQU @@E026+1 INVALID SIMPLE @@E028 EQU @@E027+1 INVALID * * CHARACTER @@E029 EQU @@E028+1 MISSING * * @@E030 EQU @@E029+1 INVALID OR MISSING @@E031 EQU @@E030+1 INVALID FUNCTION * * DEFINITION @@E032 EQU @@E031+1 NO EQUAL SIGN AFTER VALID * * FUNCTION DEFINITION @@E035 EQU @@E032+1 INVALID CHARACTER AFTER VALID * * STATEMENT @@E036 EQU @@E035+1 VARIABLE IS NOT FOLLOWED BY A * * COMMA OR EQUAL SIGN @@E037 EQU @@E036+1 CHARACTER AND ARITHMETIC * * INTERmIxED @@E038 EQU @@E037+1 INVALID * * @@E039 EQU @@E038+1 INVALID * * @@E040 EQU @@E039+1 INVALID DIMENSION * * @@E041 EQU @@E040+1 INVALID AFTER * * VALID ARRAY DEFINITION @@E042 EQU @@E041+1 INVALID MATRIX EXPRESSION ON * * RIGHT OF EQUAL SIGN @@E043 EQU @@E042+1 INVALID NAME, * * @@E044 EQU @@E043+1 MISSING MULTIPLICATION * * @@E045 EQU @@E044+1 STATEMENT TERMINATED * * PREMATURELY @@E046 EQU @@E045+1 NOT IN * * RANGE 1E-99 < X < 1E99 @@E060 EQU @@E046+1 EXPRESSION TOO COMPLEX * * @@E080 EQU @@E060+1 DATA FILE LINE TOO LONG * END OF ERROR MESSAGES EQUATES .* END OF MACRO; RESTORE PRINT ON. .MEND ANOP PRINT ON MEND // CEND // END * // READER CONSOLE