*copyc occ$condition_limits
?? NEWTITLE := 'OCDERRR : Object Library Generator : ''OC'' 0 .. 199', EJECT
??
?? FMT (FORMAT := OFF) ??

CONST
  occ$olg_base_exception          = occ$min_ecc + 0,



  oce$e_module_not_found          = occ$olg_base_exception +  0,
                                   {E Module +P not found.}

  oce$e_internal_olg_seg_overflow = occ$olg_base_exception +  1,
                                   {E Internal OLG segment overflow.}

  oce$e_premature_eof_on_file     = occ$olg_base_exception +  2,
                                   {E Premature end of file encountered on file +F.}

  oce$e_module_already_on_library = occ$olg_base_exception +  3,
                                   {E Module +P already on current library.}

  oce$e_too_many_components       = occ$olg_base_exception +  4,
                                   {E Too many components specified.}

  oce$e_xdcl_already_exists       = occ$olg_base_exception +  5,
                                   {E Entry point +P already exists.}

  oce$e_xdcl_doesnt_exist         = occ$olg_base_exception +  6,
                                   {E Entry point +P not found.}

  oce$e_after_in_reorder_list     = occ$olg_base_exception +  7,
                                   {E Module +P specified in both MODULE and LOCATION parameters.}

  oce$e_multiple_ident_rec        = occ$olg_base_exception +  8,
                                   {E Multiple identification records found in module +P.}

  oce$e_invalid_object_rec_kind   = occ$olg_base_exception +  9,
                                   {E Record number +P2 in module +P1 is an unknown record kind.}

  oce$e_no_ident_rec_on_load_mod  = occ$olg_base_exception + 10,
                                   {E Identification record expected on load module +P.}

  oce$e_code_section_not_found    = occ$olg_base_exception + 11,
                                   {E Code section +P not found in module +P.}

  oce$e_empty_object_file         = occ$olg_base_exception + 12,
                                    {E Object file +F is empty.}

  oce$e_invalid_section_ordinal   = occ$olg_base_exception + 13,
                                   {E Unknown section ordinal encountered in module +P.}

  oce$e_duplicate_section_defn    = occ$olg_base_exception + 14,
                                   {E Duplicate section definition encountered in module +P.}

  oce$e_section_not_yet_defined   = occ$olg_base_exception + 15,
                                   {E Missing section definition in module +P.}

  oce$e_reference_outside_section = occ$olg_base_exception + 16,
                                   {E Referencing outside section in module +P.}

  oce$e_section_defn_expected     = occ$olg_base_exception + 17,
                                   {E Section definition expected in module +P.}

  oce$e_missing_code_section_defn = occ$olg_base_exception + 18,
                                   {E Missing code section definition in module +P.}

  oce$e_relocation_rec_expected   = occ$olg_base_exception + 19,
                                   {E Relocation record expected in module +P.}

  oce$e_too_many_relocation_items = occ$olg_base_exception + 20,
                                   {E Too many relocation items encountered in module +P.}

  oce$e_too_many_template_items   = occ$olg_base_exception + 21,
                                   {E Too many template items encountered in module +P.}

  oce$e_too_many_modules_on_lib   = occ$olg_base_exception + 22,
                                   {E Too many modules on library.}

  oce$e_too_many_entry_points     = occ$olg_base_exception + 23,
                                   {E Too many entry points encountered.}

  oce$e_too_many_section_defns    = occ$olg_base_exception + 24,
                                   {E Too many section definitions encountered.}

  oce$e_object_file_must_be_lib   = occ$olg_base_exception + 25,
                                   {E File +F specified is not a library.}

  oce$e_on_off_toggles_overlap    = occ$olg_base_exception + 26,
                                   {E Conflicting on-off toggles specified.}

  oce$e_no_modules_on_current_lib = occ$olg_base_exception + 27,
                                   {E No modules on current library.}

  oce$e_file_name_cannot_be_range = occ$olg_base_exception + 28,
                                   {E File name +F can not be part of a subrange +F .. +P.}

  oce$e_module_not_on_library     = occ$olg_base_exception + 29,
                                   {E Module +P not on current library.}

  oce$e_no_ident_rec_on_obj_file  = occ$olg_base_exception + 30,
                                   {E Identification record expected on object file +F.}

  oce$e_missing_or_empty_file     = occ$olg_base_exception + 31,
                                   {E Empty or missing file +F.}

  oce$e_non_object_file           = occ$olg_base_exception + 32,
                                   {E File +F does not contain object code.}

  oce$e_premature_eof_in_module   = occ$olg_base_exception + 33,
                                   {E Premature end of file encountered in module +P.}

  oce$e_non_object_module_found   = occ$olg_base_exception + 34,
                                   {E Non object module +P cannot be placed on an object file.}

  oce$e_too_many_libraries        = occ$olg_base_exception + 35,
                                   {E Too many libraries encountered. }

  oce$e_container_outside_record  = occ$olg_base_exception + 36,
                                   {E Relocation container goes beyond record area in module +P.}

  oce$e_opcode_not_within_record  = occ$olg_base_exception + 37,
                                   {E Offset for instruction opcode is less than zero in module +P.}

  oce$e_invalid_container_kind    = occ$olg_base_exception + 38,
                                   {E Unknown relocation container kind encountered in module +P.}

  oce$e_sign_bit_set_in_container = occ$olg_base_exception + 39,
                                   {E Sign bit set in relocation container for signed address type }
                                   {in module +P.}

  oce$e_invalid_container_adr_typ = occ$olg_base_exception + 40,
                                   {E Unknown relocation container address type in module +P.}

  oce$e_invalid_template_adr_kind = occ$olg_base_exception + 41,
                                   {E Unknown binding template address kind encountered in module +P.}

  oce$e_relocating_sec_wrong_kind = occ$olg_base_exception + 42,
                                   {E Relocating section is not code or binding in module +P.}

  oce$e_starting_proc_not_in_code = occ$olg_base_exception + 43,
                                   {E Starting procedure +P not located in a code section.}

  oce$e_generate_is_aborting      = occ$olg_base_exception + 44,
                                   {E GENERATE is aborting - no recovery is possible.}

  oce$e_offset_arithmetic_in_bs   = occ$olg_base_exception + 45,
                                   {E Offset arithmetic in bind section of module +P.}

  oce$e_bad_binding_sec_offset    = occ$olg_base_exception + 46,
                                   {E Binding offset has no binding section template with matching offset }
                                   {in module +P.}

  oce$e_invalid_address_kind      = occ$olg_base_exception + 47,
                                   {E Unknown binding template address kind encountered.}

  oce$e_no_modules_on_library     = occ$olg_base_exception + 48,
                                   {E No modules on library +F.}

  oce$e_invalid_module_kind       = occ$olg_base_exception + 49,
                                   {E Incompatible library module kind for module +P.}

  oce$e_too_many_modules_on_file  = occ$olg_base_exception + 50,
                                   {E Too many modules on file +F.}

  oce$e_conflicting_map_options   = occ$olg_base_exception + 51,
                                   {E Map option parameter NONE used with other specifications.}

  oce$e_file_opened_as_object     = occ$olg_base_exception + 52,
                                   {E File +F previously opened as an object file.}

  oce$e_eof_on_generated_file     = occ$olg_base_exception + 53,
                                   {E End of file encountered on generated library.}

  oce$e_module_not_bindable       = occ$olg_base_exception + 54,
                                   {E Module +P being bound is type nonbindable.}

  oce$e_duplicate_global_ept      = occ$olg_base_exception + 55,
                                   {E Duplicate entry point +P found on libraries.}

  oce$e_bnd_sec_ext_not_found     = occ$olg_base_exception + 56,
                                   {E External linkage record not found for binding section in module +P.}

  oce$e_invalid_library_version   = occ$olg_base_exception + 57,
                                   {E Incompatible object library version +P on library +F.}

  oce$e_invalid_obj_text_version  = occ$olg_base_exception + 58,
                                   {E Incompatible object text version +P in module +P.}

  oce$e_invalid_scl_proc          = occ$olg_base_exception + 59,
                                   {E SCL procedure number +P2 on file +F1 is incorrect or..
{ the file attribute(s) are incompatible.}

  oce$w_module_not_found          = occ$olg_base_exception + 60,
                                   {E Module +P not found - module ignored.}

  oce$w_subrange_module_not_found = occ$olg_base_exception + 61,
                                   {E Module +P not found - Module subrange +P .. +P ignored.}

  oce$w_same_module_quoted_twice  = occ$olg_base_exception + 62,
                                   {E Duplicate module +P specified - second occurrence ignored.}

  oce$w_module_already_on_library = occ$olg_base_exception + 63,
                                   {E Module +P already on current library - module ignored.}

  oce$w_module_not_on_library     = occ$olg_base_exception + 64,
                                   {E Module +P not on current library - module ignored.}

  oce$w_subrange_not_found_on_lib = occ$olg_base_exception + 65,
                                   {E Module +P not on current library - module subrange +P .. +P ignored.}

  oce$w_duplicate_module_on_file  = occ$olg_base_exception + 66,
                                   {W Duplicate module +P on file +F.}

  oce$w_library_not_generated     = occ$olg_base_exception + 67,
                                   {W Exiting library generator without generating current library.}

  oce$w_no_modules_on_current_lib = occ$olg_base_exception + 68,
                                   {E No modules on current library.}

  oce$w_new_file_is_on_file       = occ$olg_base_exception + 69,
                                   {E Due to errors the generated +P was placed on +F.}

  oce$w_new_file_not_generated    = occ$olg_base_exception + 70,
                                   {E New file was not generated due to errors encountered.}

  oce$w_xdcl_already_exists       = occ$olg_base_exception + 71,
                                   {E Entry point +P already exists - entry point ignored.}

  oce$w_xdcl_doesnt_exist         = occ$olg_base_exception + 72,
                                   {E Entry point +P not found - entry point ignored.}

  oce$w_external_not_satisfied    = occ$olg_base_exception + 73,
                                   {W External reference +P not satisfied.}

  oce$e_multiple_binding_sections = occ$olg_base_exception + 74,
                                   {E Module +P has multiple binding sections.}

  oce$w_conflicting_common_length = occ$olg_base_exception + 75,
                                   {W Conflicting length for common block +P.}

  oce$w_conflicting_com_attribute = occ$olg_base_exception + 76,
                                   {W Conflicting attributes for common block +P.}

  oce$e_bad_symbol_table          = occ$olg_base_exception + 77,
                                   {E Bad debug symbol table in module +P - symbol number +P.}

  oce$e_bad_line_table            = occ$olg_base_exception + 78,
                                   {E Bad line table in module +P.}

  oce$e_zero_allocation_align     = occ$olg_base_exception + 79,
                                   {E Zero section alignment in module +P.}

  oce$w_library_not_found         = occ$olg_base_exception + 80,
                                   {W Library +P not found.}

  oce$e_fatal_error               = occ$olg_base_exception + 81,
                                   {E Fatal error in library_generator.}

  oce$e_insufficient_memory       = occ$olg_base_exception + 82,
                                   {E Insufficient memory for completion of library generation.}

  oce$e_cant_compare_file_and_lib = occ$olg_base_exception + 83,
                                   {E Can not compare an object file and an object library.}

  oce$e_generate_terminated       = occ$olg_base_exception + 84,
                                   {E Command terminated - new library not generated.}

  oce$e_module_is_not_an_scl_proc = occ$olg_base_exception + 85,
                                    {E Module +P is not an scl procedure.}

  oce$e_no_unique_file_name       = occ$olg_base_exception + 86,
                                   {E Unable to generate a unique local file name.}

  oce$e_some_modules_not          = occ$olg_base_exception + 87,
                                   {E Some of the modules specified could not be +P.}

  oce$e_some_attributes_not       = occ$olg_base_exception + 88,
                                   {E Some of the attributes specified could not be changed.}


  oce$w_error_in_command          = occ$olg_base_exception + 89,
                                   {E Command completed - Non fatal errors encountered.}

  oce$i_display_toggle            = occ$olg_base_exception + 90,
                                   {I +P}

  oce$e_range_module_2_not_found  = occ$olg_base_exception + 91,
                                   {E Module +P not found after module +P - Subrange ignored.}

  oce$e_bad_otd_size              = occ$olg_base_exception + 92,
                                   {E Invalid size encountered on object text descriptor in module +P.}

  oce$w_dup_ent_pnt_on_lib        = occ$olg_base_exception + 93,
                                   {W Duplicate entry point +P in library may cause unpredictable results.}

  oce$relocation_value_not_found  = occ$olg_base_exception + 94,
                                   {E Relocation value not found in module +P.}

  oce$w_declaration_mismatch      = occ$olg_base_exception + 95,
                                   {W Declaration mismatch on reference to entry point +P1 in }
                                   {module +P2 from module +P3, using source text checking.}

  oce$w_non_fatal_generate_error  = occ$olg_base_exception + 96,
                                   {W WARNING - Nonfatal error(s) encountered during generation }
                                   {of new library.}

  oce$misc_exception              = occ$olg_base_exception + 97,
                                   {I +P}

  oce$container_overflow          = occ$olg_base_exception + 98,
                                   {E The bound module has overflowed a +P.}

  oce$e_cant_change_module_name   = occ$olg_base_exception + 99,
                                   {E Module name can not be changed when multiple modules specified.}

  oce$e_too_many_commands_on_lib  = occ$olg_base_exception + 100,
                                   {E Too many commands on library.}

  oce$e_too_many_functions_on_lib = occ$olg_base_exception + 101,
                                   {E Too many functions on library.}

  oce$e_too_many_help_mods_on_lib = occ$olg_base_exception + 102,
                                   {E Too many help modules on library.}

  oce$e_too_many_msg_mods_on_lib  = occ$olg_base_exception + 103,
                                   {E Too many message modules on library.}

  oce$e_too_many_panels_on_lib    = occ$olg_base_exception + 104,
                                   {E Too many forms on library.}

  oce$w_dup_commands_on_lib       = occ$olg_base_exception + 105,
                                   {W Duplicate command +P in library may cause unpredictable results.}

  oce$w_dup_functions_on_lib      = occ$olg_base_exception + 106,
                                   {W Duplicate function +P in library may cause unpredictable results.}

  oce$w_dup_help_modules_on_lib   = occ$olg_base_exception + 107,
                                   {W Duplicate help modules +P in library may cause unpredictable results.}

  oce$w_dup_msg_modules_on_lib    = occ$olg_base_exception + 108,
                                   {W Duplicate message modules +P in library may cause unpredictable..
{ results.}

  oce$w_dup_panels_on_lib         = occ$olg_base_exception + 109,
                                   {W Duplicate command +P in library may cause unpredictable results.}

  oce$e_option_must_be_used_alone = occ$olg_base_exception + 110,
                                   {E +P must be used alone for parameter +P.}

  oce$invalid_type_matching       = occ$olg_base_exception + 111,
                                    {E Modules +P and +P with parameter number +P..
{ of procedure +P are incompatible types.}

  oce$invalid_kind_matching       = occ$olg_base_exception + 112,
                                    {E Modules +P and +P with parameter number +P..
{ of procedure +P are incompatible kinds.}

  oce$invalid_mode_matching       = occ$olg_base_exception + 113,
                                    {E Modules +P and +P with parameter number +P..
{ of procedure +P are incompatible modes.}

  oce$bad_char_length             = occ$olg_base_exception + 114,
                                    {E +P has character length mismatch on parameter +P, actual length = +P
{ and formal length = +P.}

  oce$actual_less_than_formal     = occ$olg_base_exception + 115,
                                    {E +P parameter number +P actual length of +P less than formal length
{ of +P.}

  oce$unable_to_create_table      = occ$olg_base_exception + 116,
                                    {E Unable to create (+P) container.}

  oce$loader_table_overflow       = occ$olg_base_exception + 117,
                                    {E Overflow of (+P) container.}

  oce$entry_point_mismatch        = occ$olg_base_exception + 118,
                                    {E Parameter mismatch (+P).}

  oce$ext_not_found_for_actual    = occ$olg_base_exception + 119,
                                    {E The external record for +P needed by an actual parameter record..
{ in module +P has not been encountered.}

  oce$invalid_param_for_proc      = occ$olg_base_exception + 120,
                                    {E Procedure +P in modules +P and +P do..
{ not have the same number of parameters.}

  oce$entry_not_found_for_formal  = occ$olg_base_exception + 121,
{E The entry point record for +P needed by a formal parameter record in module..
{ +P has not been encountered.}

  oce$invalid_unalloc_common_bl   = occ$olg_base_exception + 122,
                                    {E Unallocated common block has invalid..
{ section kind in module +P.}

  oce$e_form_def_found_in_module  = occ$olg_base_exception + 123,
                                    {E Form definition found in module +P.}

  oce$e_must_be_file_or_string    = occ$olg_base_exception + 124,
                                    {E Value of parameter +P must be FILE or STRING.}

  oce$not_application_administrtr = occ$olg_base_exception + 125,
                                    {E Only an application administrator may specify an application..
{ identifier.}

  oce$cannot_be_an_application    = occ$olg_base_exception + 126,
                                    {E +P cannot be an application.}

  oce$fortran_array_type_mismatch = occ$olg_base_exception + 127,
                                    {E Call from +P to +P parameter number +P has an array mismatch.}

  oce$e_module_is_not_a_prog_desc = occ$olg_base_exception + 128,
                                    {E Module +P is not a program description.}

  oce$e_bound_module_too_large    = occ$olg_base_exception + 129,
                                    {E The module being generated is too large.  Q field overflow }
                                    {occurred while binding module +P.}

  oce$w_name_not_in_symbol_table  = occ$olg_base_exception + 130,
                                    {W Entry point +P, specified on a DELETE_DECLARATION_MATCHING }
                                    {subcommand, is not in the linked symbol table.}

  oce$w_must_include_symbols      = occ$olg_base_exception + 131,
                                    {W DELETE_DECLARATION_MATCHING cannot be done for entry points that }
                                    {are not included in a segment specified by INCLUDE_LINKED_SYMBOLS.}

  oce$bad_integer_length          = occ$olg_base_exception + 132,
                                    {E Modules +P and +P with parameter number +P of procedure +P are }
{ incompatible integer lengths. }

  oce$w_param_checking_not_cybil  = occ$olg_base_exception + 133,
                                    {W No entry points generated by CYBIL were found in module +P. The }
                                    {value of attribute CYBIL_PARAMETER_CHECKING was not changed.}

  oce$f_declaration_mismatch      = occ$olg_base_exception + 134,
                                    {F Declaration mismatch on reference to entry point +P1 in module +P2 }
                                    {from module +P3, using object text checking. }

  oce$w_decl_mismatch_ext_source  = occ$olg_base_exception + 135,
                                    {W The declaration of the reference to entry point +P1 from module +P2 }
                                    {and the declaration of the reference to the same entry point from }
                                    {module +P3 do not match, using source text checking. }

  oce$w_decl_mismatch_ext_object  = occ$olg_base_exception + 136,
                                    {W The declaration of the reference to entry point +P1 from module +P2 }
                                    {and the declaration of the reference to the same entry point from }
                                    {module +P3 do not match, using object text checking. }

  oce$e_module_not_a_command_desc = occ$olg_base_exception + 137,
                                    {E Module +P is not a command description.}

  oce$e_bad_command_desc_params   = occ$olg_base_exception + 138,
                                    {E When creating or changing a command description, either the }
                                    {STARTING_PROCEDURE or SYSTEM_COMMAND_NAME parameter may be specified }
                                    {but not both. Also, the LIBRARY parameter may only be specified for }
                                    {a command description defined with the STARTING_PROCEDURE parameter.}

  oce$e_module_not_a_func_desc    = occ$olg_base_exception + 139,
                                    {E Module +P is not a function description.}

  oce$e_module_has_null_name      = occ$olg_base_exception + 140,
                                    {E A module on file +F has an invalid name which is all blanks.}

  occ$max_olg_exception           = occ$olg_base_exception + 199;



?? FMT (FORMAT := ON) ??
?? OLDTITLE ??
