147 lines
		
	
	
		
			9.9 KiB
		
	
	
	
		
			Plaintext
		
	
	
	
	
	
			
		
		
	
	
			147 lines
		
	
	
		
			9.9 KiB
		
	
	
	
		
			Plaintext
		
	
	
	
	
	
| compile insert SYSERRORS_1000
 | |
| /*
 | |
|     Copyright (c) 1992-2018 Revelation Software. All rights reserved.
 | |
| 
 | |
|    * This program is proprietary and is not to be used by or disclosed
 | |
|    * to others, nor is it to be copied without written permission from
 | |
|    * Revelation Technologies, Inc.
 | |
| 
 | |
|    Author    : ???
 | |
|    Date      : Before Time Began
 | |
|    Purpose   : "SYS" error series equates
 | |
| 
 | |
| 
 | |
|    Comments
 | |
|    ========
 | |
| 
 | |
| 
 | |
|    Amended  Date        Reason
 | |
|    =======  ====        ======
 | |
|    Mr C     13 Nov 18   Added SYS1250 series.
 | |
|    Mr C     20 Mar 18   Added SYS1005, SYS1011, SYS1012
 | |
|    Mr C     24 Aug 17   Remove insane indents
 | |
|    Mr C     29 Sep 14   Added header guards, cleanup for v10
 | |
|    Mr C     10 Feb 10   Added SYS1107
 | |
|    Mr C     29 Sep 05   Added SYS1104, SYS1105, SYS1106
 | |
| 
 | |
| */
 | |
| ///////////////////////////////////////////////////////////////////////////////
 | |
| ///////////////////////////////////////////////////////////////////////////////
 | |
| #IFNDEF _SYSERRORS_1000_
 | |
| #DEFINE _SYSERRORS_1000_
 | |
| ///////////////////////////////////////////////////////////////////////////////
 | |
| ///////////////////////////////////////////////////////////////////////////////
 | |
| 
 | |
|    equ sys_load_err$                    to "SYS1000" ; * Error loading program "%1%".
 | |
|    equ sys_null_load$                   to "SYS1001" ; * Null loading error.
 | |
|    equ sys_invalid_object$              to "SYS1002" ; * The object code is invalid.
 | |
|    equ sys_load_overflow$               to "SYS1003" ; * The maximum number of programs has been exceeded.
 | |
|    equ sys_dict_load_err$               to "SYS1004" ; * Error loading dictionary item "%1%".
 | |
|    equ sys_symbolic_insert_err$         to "SYS1005" ; * cant do dict insert into symbolic (%1%)
 | |
|    equ SYS_RUNTIME_RESTRICT_ERR$        to "SYS1006" ; * Module "%1%" terminated due to runtime restrictions.
 | |
|    
 | |
|    equ sys_invalid_login_null_user$     to "SYS1008" ; * Invalid login null user name.
 | |
|    equ sys_invalid_login_username$      to "SYS1009" ; * Invalid login user name.
 | |
|    equ sys_invalid_login_passsword$     to "SYS1010" ; * Invalid login password.
 | |
|    equ sys_invalid_login_acc_disabled$  to "SYS1011" ; * Invalid login (Account disabled due to excessive attempts).
 | |
|    equ sys_invalid_login_sys_disabled$  to "SYS1012" ; * Invalid login (Workstation disabled due to excessive attempts).
 | |
|   
 | |
| ///////////////////////////////////////////////////////////////////////////////
 | |
| // compiler preprocessor errors
 | |
| 
 | |
|    equ sys_comp_compile_errors$         to "SYS1100" ; * The "%1%" event for "%2%" contains syntax errors.
 | |
|    equ sys_comp_preproc_err$            to "SYS1101" ; * Compiler error: Preprocessing error.
 | |
|    equ sys_comp_source_oversize$        to "SYS1102" ; * Compiler error: Source code exceeds maximum size for compiler.
 | |
|    equ sys_comp_invalid_insert$         to "SYS1103" ; * Compiler error: Old tablename; record name format is not supported. Invalid $insert.
 | |
|    equ SYS_COMP_INVALID_USES$           to "SYS1104" ; * Compiler error: Module "%1%" Line "%2%" : Invalid $USES entity name[%3%]
 | |
|    equ SYS_COMP_INSERT_ERROR$           to "SYS1105" ; * Compiler error: Module "%1%" Line "%2%" : $INSERT access error [%3%]
 | |
|    equ SYS_COMP_INSERT_CIRCULAR_REF$    to "SYS1106" ; * Compiler error: Module "%1%" Line "%2%" : $INSERT circular reference error [$INSERT %3%]
 | |
|    equ SYS_COMP_UNMATCHED_IFDEF$        to "SYS1107" ; * Compiler error: Module "%1%" Line "%2%" : Unmatched compiler define condition
 | |
| 
 | |
| ///////////////////////////////////////////////////////////////////////////////
 | |
| // Contract processing - very very deprecated and unsupported.
 | |
| 
 | |
|    equ sys_comp_contr_err_base$         to '1110'
 | |
|    equ sys_comp_contr_position$         to "SYS1111" ; * Compiler error: Contract must be before executable code
 | |
|    equ sys_comp_contr_no_begin$         to "SYS1112" ; * Compiler error: Contract BEGIN CONDITION is missing.
 | |
|    equ sys_comp_contr_no_end$           to "SYS1113" ; * Compiler error: Contract END CONDITION is missing.
 | |
|    equ sys_comp_contr_multi_pre$        to "SYS1114" ; * Compiler error: Contract contains multiple PRE: statements.
 | |
|    equ sys_comp_contr_multi_post$       to "SYS1115" ; * Compiler error: Contract contains multiple POST: statements.
 | |
|    equ sys_comp_contr_no_pre$           to "SYS1116" ; * Compiler error: Contract PRE: statement is missing.
 | |
|    equ sys_comp_contr_no_post$          to "SYS1117" ; * Compiler error: Contract POST: statement is missing.
 | |
|    equ sys_comp_generic_error$          to "SYS1119" ; * Compiler error:  ( used by Oproc compile to forward foreign compiler Errors)
 | |
|    equ sys_comp_vnav_warning$           to "SYS1120" ; * Compiler warning: Unassigned Variable "%1% on line: "%2%"
 | |
|    equ sys_comp_elapsed_info$           to "SYS1121" ; * Compiler information:  "%1% elapsed time "%2%" secs
 | |
|    equ sys_comp_var_equatename_warn$    to "SYS1122" ; * Compiler warning: Variable "%1% on line "%2%" ends with "$"
 | |
|    equ sys_comp_equ_noSuffix_warn$      to "SYS1123" ; * Compiler warning: Equate "%1% on line "%2%" does not end with "$"
 | |
|    equ sys_comp_debug_detected_warn$    to "SYS1124" ; * Compiler warning: Debug statement found
 | |
|    equ sys_comp_generic_warn$           to "SYS1125" ; * Compiler warning: %1%  ( used by Oproc compile to forward foreign compiler warnings)
 | |
| 
 | |
|    // More contract processing - conflicts with FORM error codes but shouldn't
 | |
|    // be a problem as contract preprocessing is very very deprecated.
 | |
| 
 | |
|    equ sys_precondition_fail$           to "SYS1500" ; * Contract precondition failure : Module name, condition failed
 | |
|    equ sys_postcondition_fail$          to "SYS1501" ; * Contract postcondition failure : Module name, condition failed
 | |
| 
 | |
| ///////////////////////////////////////////////////////////////////////////////
 | |
| // compiler errors
 | |
| 
 | |
|    equ sys_proc_abort$                  to "SYS1200" ; * The process has been aborted.
 | |
|    equ sys_unsupported$                 to "SYS1201" ; * This feature is not supported.
 | |
| 
 | |
|    equ sys_invalid_proctype$            to "SYS1210" ; * The procedure type is invalid.
 | |
|    equ sys_no_arg_lparen$               to "SYS1211" ; * A left parenthesis is missing.
 | |
|    equ sys_no_arg_rparen$               to "SYS1212" ; * A right parenthesis is missing.
 | |
|    equ sys_invalid_argtype$             to "SYS1213" ; * The argument type is invalid.
 | |
|    equ sys_missing_argid$               to "SYS1214" ; * An argument identifier is missing.
 | |
|    equ sys_compile_fail$                to "SYS1215" ; * The compilation has failed.
 | |
|    equ sys_arg_overflow$                to "SYS1216" ; * Too many arguments have been passed.
 | |
|    equ sys_missing_rowdef$              to "SYS1217" ; * A ROWDEF is missing in the routine.
 | |
| 
 | |
|    equ sys_obj_missing$                 to "SYS1220" ; * The object code is missing.
 | |
|    equ sys_invalid_arg$                 to "SYS1221" ; * The argument is invalid.
 | |
|    equ sys_putdata_fail$                to "SYS1222" ; * PutData has failed.
 | |
|    equ sys_invalid_procname$            to "SYS1223" ; * The stored procedure name is invalid.
 | |
|    equ sys_protected_proc$              to "SYS1224" ; * The procedure cannot be overwritten - no arguments.
 | |
| 
 | |
|    equ sys_sql_read_err$                to "SYS1230" ; * SQL read error.
 | |
| 
 | |
|    equ sys_missing_comma_quote$         to "SYS1240" ; * A comma or quote is missing in the script.
 | |
|    equ sys_missing_matching_quote$      to "SYS1241" ; * A matching quote is missing in the script.
 | |
|    equ sys_invalid_param$               to "SYS1242" ; * The parameter number in the script is invalid.
 | |
|    equ sys_nesting_too_deep$            to "SYS1243" ; * The list is too deeply nested in brackets.
 | |
|    equ sys_invalid_char$                to "SYS1244" ; * The script contains an invalid character.
 | |
|    equ sys_bracket_mismatch$            to "SYS1245" ; * A matching bracket is missing in the script.
 | |
|    
 | |
|    equ sys_null_prototype$              to "SYS1250" ; * The prototype definition is missing
 | |
|    equ sys_null_ret_type$               to "SYS1251" ; * The prototype return type is missing
 | |
|    equ sys_null_calling_conv$           to "SYS1252" ; * The prototype calling convention is missing
 | |
|    equ sys_null_function_name$          to "SYS1253" ; * The prototype function name is missing
 | |
|    equ sys_invalid_var_type$            to "SYS1254" ; * "%1%" is not a valid variable type
 | |
|    equ sys_invalid_calling_conv$        to "SYS1255" ; * "%1%" is not a valid calling convention
 | |
|    equ sys_invalid_func_pointer$        to "SYS1256" ; * "%1%" is not a valid internal function pointer
 | |
|    equ sys_null_dll_name$               to "SYS1257" ; * The prototype definition is missing
 | |
| 
 | |
| ///////////////////////////////////////////////////////////////////////////////
 | |
| // Volume/Table errors
 | |
| 
 | |
|    equ sys_sysnodetach_err$             to "SYS1300" ; * Cannot detach or redefine table
 | |
|    equ sys_notab_invol_err$             to "SYS1301" ; * Table was not found in volume rec table list
 | |
|    equ sys_volrec_missing_err$          to "SYS1302" ; * Volume record for attached table is missing
 | |
|    equ sys_volrec_synch_err$            to "SYS1303" ; * Table list in the volume record does not synch with the systables record
 | |
| 
 | |
| ///////////////////////////////////////////////////////////////////////////////
 | |
| // Form runtime errors
 | |
| 
 | |
|    equ SYS_FORM_PRILOCK_ERR$		       to "SYS1500" ; * Primary row locked: Table %1%, key %2%
 | |
|    equ SYS_FORM_SUBLOCK_ERR$		       to "SYS1501" ; * Subsidiary row locked:  Table %1% key %2%
 | |
|    equ SYS_FORM_SAVELOCK_ERR$		       to "SYS1502" ; * Lock not held at update time: Table %1%, key %2%, operation %3%
 | |
|    equ SYS_FORM_OPEN_EXPLODE_ERR$	    to "SYS1503" ; * form fetch denormalization beyond 2 levels is not supported
 | |
|    equ SYS_FORM_READLOCKED_STAT$	       to "SYS1510" ; * locked record is read into a form (warning, not an error)
 | |
| 
 | |
| ///////////////////////////////////////////////////////////////////////////////
 | |
| ///////////////////////////////////////////////////////////////////////////////
 | |
| #ENDIF
 | |
| ///////////////////////////////////////////////////////////////////////////////
 | |
| ///////////////////////////////////////////////////////////////////////////////
 |