HP 3000 Manuals

List of Messages (0001 - 0120) [ Micro Focus COBOL Error Messages ] MPE/iX 5.0 Documentation


Micro Focus COBOL Error Messages

List of Messages (0001 - 0120) 

0001        Undefined error.  Inform Technical Support 

               *   Your program contains an error which the COBOL system
                   has failed to recognize.

               *   Send Technical Support a copy of your source code to
                   enable them to find the cause of the error.

0002        Unexpected SQL error.  Inform Technical Support 

0003        Illegal format :  Literal 

               *   The sequence of characters forming a literal in your
                   source code does not conform to the rules governing
                   the construction of such names.  A literal can be
                   either nonnumeric or numeric.

                   If numeric it can be up to 18 digits in length, but it
                   must not contain more than one sign character or more
                   than one decimal point.

                   A nonnumeric literal can consist of any allowable
                   character in the computer's character set up to a
                   maximum of 160 characters in the Procedure Division,
                   or 2048 characters in the Data Division.  A nonnumeric
                   literal must be enclosed in quotation marks.

                   If you have used a figurative constant as the literal
                   make sure that it is referenced by an allowable
                   reserved word (such as ZERO) which you have spelled
                   correctly.  A figurative constant and a numeric
                   literal must not be enclosed in quotation marks.

                   You might also have used the wrong class of literal
                   for the context of the sentence.

                   Alternatively, if you have used the figurative
                   constant ALL in your code, you have not coded it in
                   accordance with the rules governing the use of this
                   constant.  ALL must be followed by a nonnumeric
                   literal and not by a numeric one.

               *   Revise your code to comply with the above rules.

                   Further details on the use of figurative constants can
                   be found in the chapter Concepts of the COBOL Language 
                   in your Language Reference.

0004        Illegal character 

               *   Your program contains a character that is not part of
                   the COBOL language set.

               *   Refer to the chapter Concepts of the COBOL Language in
                   your Language Reference for details of permitted
                   characters.  Replace the illegal character with a
                   valid one.

0005        User-name user-name not unique 

               *   You have given the same user-name without
                   qualification to more than one data item or
                   procedure-name in your source code.

               *   You must rename or qualify the duplicated data items
                   or procedure-names to ensure that uniqueness of
                   reference is achieved.

0007        $ specified in column 7 of otherwise blank line 

               *   The indicator area, column 7, contains an illegal
                   character.

               *   Legal characters are *, D, -, / or space.

0008        Unknown COPY file file-name specified 

               *   A file with the name file-name, specified in
                   conjunction with a COPY statement, cannot be found.

               *   Change the file-name, or make the file available to
                   your COBOL system.  See your COBOL System Reference 
                   for details of the .cbl and .cpy extensions.

0009         '.'  missing 

               *   Your code does not contain a period in a place where
                   one is expected by the rules of COBOL syntax.

               *   Insert one at the relevant place.

0010        Word starts or is continued in wrong area of source line 

               *   The word starts either in area A when it should have
                   started in area B, or in area B when it should have
                   started in area A.

0011        Reserved word missing or incorrectly used 

               *   You have either used a reserved word in a place where
                   a user defined word is expected or you have failed to
                   use a reserved word where one is needed.

               *   Alter the reserved word into a user defined one or
                   insert a reserved word according to the context of
                   this message.

0012        Operand data-name is not declared 

               *   You are trying to use a data-name which you have not
                   declared, or which you have misspelled.

               *   This error might not always occur directly below the
                   data item that is not declared.  This is because your
                   COBOL system continues processing through the source
                   code to find out whether the data item is qualified.
                   To find the item in error, work backward through the
                   source to the most recent item.

                   Ensure that the data item is declared.

0013        User-name required 

               *   You have not supplied a user-defined-name at the
                   specified place in your program.

               *   Insert a name ensuring that it conforms to the rules
                   of COBOL syntax and that it is the correct type of
                   name (for example a system-name or a condition-name).

0014        Invalid operand 

               *   The operand you have specified is in some way
                   incorrect, and cannot be processed by your COBOL
                   system.  For example, you might have specified a
                   negative integer where only positive integers are
                   allowed.

               *   Refer to the chapter Program Definition in your
                   Language Reference for details of the operands allowed
                   for this syntax.

0015        Procedure Division too large 

               *   Your program's Procedure Division exceeds the maximum
                   size allowed.

               *   Redesign your program as a set of smaller independent
                   programs that call one another.

0016        Data space too large 

               *   Your program's Data Division exceeds the maximum size
                   allowed.

               *   Redesign your program as a set of independent programs
                   with smaller Data Divisions.

0017        Incorrect use of reserved word word 

0019        BASIS line number sequencing error 

               *   You have made an error in the sequence of line numbers
                   in one of the statements that implement the BASIS
                   mechanism.  For example, the statement DELETE 100-60
                   is incorrect.  (BASIS requires numeric sequence
                   values.)

               *   Correct the sequence error.

0020        Numeric literal expected 

               *   You must specify a numeric literal in this context.

               *   Refer to the chapter Concepts of the COBOL Language in
                   your Language Reference for details on the format of
                   valid numeric literals.  Ensure that your numeric
                   literal complies with the rules.

0021        Too many qualifiers 

               *   You have used too many qualifiers when referring to a
                   qualified data-name, procedure-name or text-name.  See
                   the chapter Concepts of the COBOL Language in your
                   Language Reference for details of how many qualifiers
                   you can specify.

               *   Change the reference in error so that it uses no more
                   than the permitted number of qualifiers.

0022        SKIP1/2/3, EJECT and TITLE must be alone on line 

               *   Source program lines containing these words must not
                   contain any other words.

               *   Edit your program so that these words are on a line of
                   their own.

0023        Nonnumeric literal expected 

               *   You must specify a nonnumeric literal in this context.

               *   Refer to the chapter Concepts of the COBOL Language in
                   your Language Reference for information on nonnumeric
                   literals.  Ensure that the literal you have specified
                   conforms to the rules for nonnumeric literals.

0024        Illegal qualifier 

               *   You have specified a qualified data-name,
                   procedure-name, or text-name incorrectly.

               *   Refer to the chapter Concepts of the COBOL Language in
                   your Language Reference for the correct syntax for
                   qualification.  Correct the qualified reference.

0025        Qualification not permitted 

               *   You cannot qualify a data-name, procedure-name, or
                   text-name in this context.

               *   Make the reference an unqualified reference.

0026        Literal too long 

               *   The literal value you have specified is longer than
                   the maximum literal length permitted.

               *   If your literal is numeric, it can be up to 18 digits
                   in length.  If it is nonnumeric, it can contain up to
                   160 characters in the Procedure Division, or 2048
                   characters in the Data Division.  Ensure that the
                   literal value you have specified in your program is
                   not longer than the maximum length permitted.

0027        Number too large 

               *   You have declared a numeric value that is too large.

               *   Refer to the chapter Concepts of the COBOL Language in
                   your Language Reference for the maximum value.

0028        Data item too long 

               *   You have declared a data item that is too long for the
                   specified data-type.

               *   Refer to the chapter Program Definition in your
                   Language Reference for the maximum sizes of data items
                   of various types.

0029        Not a data-name 

               *   You have specified an operand that is not a data item
                   where a valid data item is expected.  For example, you
                   might have specified an FD-name or a condition-name
                   instead of a data-name.

               *   Ensure that the item that is in error is a data-name,
                   and that it is declared.

0030        Should be a group 

               *   You have specified an elementary item as the sending
                   or receiving field in a MOVE CORRESPONDING statement.

               *   Ensure that both the sending and receiving fields are
                   group items.

0031        Should be elementary 

               *   You have specified the name of a group data item in a
                   context in which an elementary item must be used.

               *   Change the reference so that it is a reference to an
                   elementary item.

0032        Should be unitary 

               *   You have specified a subscripted or indexed data item
                   where one is not allowed.

               *   Change the reference so that it is a reference to a
                   unitary (that is, nonsubscripted and nonindexed) data
                   item.

0033        Should be procedure name 

               *   A procedure-name (that is, a paragraph or
                   section-name) is expected in this context.  You have
                   probably specified a data-name.

               *   Ensure the procedure-name is correct.

0034        Operand operand should be numeric 

               *   A numeric value is required in this context, and you
                   have specified a nonnumeric value.

               *   Make the value numeric.

0035        Integer required 

               *   An integer value is required in this context, and you
                   have specified a noninteger value.

               *   Make the value an integer value.

0036        Should be alphanumeric 

               *   An alphanumeric value is required in this context, and
                   you have specified a numeric value.

               *   Make the value an alphanumeric value.

0037        Should have USAGE DISPLAY 

               *   The data item should have USAGE DISPLAY.

               *   Change the data item's USAGE to DISPLAY.

0038        Paragraph or phrase repeated illegally 

               *   You have specified a paragraph or phrase more than
                   once, when you might specify it only once.

               *   Delete the repeated paragraph or phrase.

0039        Too many COPY...REPLACING statements 

               *   The program contains more than 255 COPY...REPLACING
                   statements.

               *   Correct your program so that it contains fewer than
                   255 COPY...REPLACING statements.

0040        Missing or illegal file name 

               *   The file-name you have specified either does not
                   conform to COBOL rules for file-names, or has not been
                   declared in the FILE-CONTROL paragraph.  This might be
                   due to a misspelled valid file-name.

               *   Correct the file-name (or, if necessary, add a file
                   description entry to the FILE-CONTROL paragraph).

0042        Must be nonzero 

               *   The numeric value you specify here must be nonzero.

               *   Specify a nonzero value.

0043        Literal or figurative constant expected 

               *   You must specify a literal value or a figurative
                   constant here.

               *   Alter the value you have specified to be a literal or
                   a figurative constant.

0044        Literal expected 

               *   You must specify a literal value here.

               *   Alter the value you have specified to be a literal
                   value.

0045        Operand data-name has wrong size 

               *   The operand in this statement is the wrong length (for
                   example, you have specified a prompt character more
                   than one character long).

               *   Refer to the chapter Program Definition in your
                   Language Reference for the correct length of the
                   operand.

0046        Alphabet name required 

               *   You must specify the name of a user-defined collating
                   sequence here.

               *   The name of the alphabet that you have defined in the
                   SPECIAL-NAMES paragraph should be specified.

0047        Numeric literal or ZERO expected 

               *   You must specify a numeric literal or the figurative
                   constant ZERO here.

               *   Refer to the chapter Concepts of the COBOL Language in
                   your Language Reference for details of numeric
                   literals and the figurative constant ZERO. Specify a
                   numeric literal or ZERO.

0048        Missing or extra right parenthesis 

               *   The number of left and right parentheses in an
                   arithmetic expression is not the same.

               *   Check the format of the arithmetic expression and
                   ensure that you have a matching right parenthesis for
                   each left parenthesis.

0049        Illegal use of Index-name or Index Data item 

               *   You have used an item with USAGE INDEX in a context
                   where it is not allowed.  Refer to the chapter Program 
                   Definition in your Language Reference for details of
                   where you can use such items.

               *   Change the USAGE of the item, or use an item that does
                   not have USAGE INDEX.

0050        Illegal use of POINTER data item, ADDRESS OF or NULL 

               *   You have tried to perform an illegal operation on a
                   data item with USAGE POINTER. Alternatively, you have
                   tried to apply the ADDRESS OF phrase to an item that
                   is not an 01 or 77 level item in the Working-Storage
                   or Linkage Section.

               *   Refer to the chapter Program Definition in your
                   Language Reference for details of the operations you
                   can perform on pointer items.

0051        Not a report name 

               *   You must use a report-name in this context.  You have
                   probably misspelled a valid report-name.

               *   Correct the reference.

0052        Only allowed with SEQUENTIAL files 

               *   You have performed an operation that is permitted only
                   if the file has SEQUENTIAL organization (for example,
                   CLOSE REEL/UNIT).

               *   Change the file organization to SEQUENTIAL.

0053        Invalid directive, or directive not allowed here 

               *   You have either specified a COBOL system directive in
                   the wrong place or specified an invalid COBOL system
                   directive in a $SET statement in your program.  Check
                   your COBOL System Reference for the correct form of
                   COBOL system directives.

               *   For example, you can specify a $SET LIST anywhere, a
                   $SET OSVS only before COBOL, and a $SET PREPROCESS
                   only on the first line.

0054        Class name required 

               *   You have failed to define the class-name in the
                   SPECIAL-NAMES paragraph, or you have misspelled a
                   COBOL class-name.

               *   Either define the condition-name in the SPECIAL-NAMES
                   paragraph, or use one of the COBOL class-names as
                   specified in the chapter Concepts of the COBOL 
                   Language in your Language Reference.

0055        Index-name set to value greater than table size 

               *   A SET index-name TO literal statement has been used to
                   try to set an index name to a value greater than the
                   number in the OCCURS clause for which that index name
                   belongs.

                   This message is produced when compiling programs with
                   the directive FLAG(VSC2) or similar.

0056        COPY is recursive 

               *   One of the following:

                      *   You have tried to COPY a file that you have
                          already started copying.

                      *   You have incorrectly spelled the name of either
                          the file you have previously started to COPY,
                          or the file you currently want to copy.

               *   Revise your program so that the file you have already
                   started to COPY is copied completely before you try to
                   COPY the same file again.

                   Correct the spelling error.

0057        Not a report group 

               *   You must use a report group in this context.  You have
                   probably misspelled a valid report group-name.

               *   Correct the reference.

0058        Not a report name or a report group 

               *   You have specified neither a valid report-name nor a
                   valid report group in a GENERATE statement.  You have
                   probably misspelled the report-name or the report
                   group.

               *   Refer to the chapter Report Writer in your Language 
                   Reference--Additional Topics for details of the syntax
                   allowed for the GENERATE statement.  Correct your
                   reference to the report-name or to the report group.

0059        Cannot GENERATE this report name 

               *   The report-name that you have specified should contain
                   all of the following:

                      *   A CONTROL clause

                      *   Only one DETAIL report group

                      *   At least one body group.

               *   Refer to the chapter Report Writer in your Language 
                   Reference--Additional Topics for details of the
                   contents you require for a report-name when it is used
                   in a GENERATE statement.

0060        Not a detail group 

               *   You have specified a report group that is not of TYPE
                   DETAIL.

               *   Revise your program so that the report group is of
                   TYPE DETAIL.

0061        Pseudo text incorrectly specified 

               *   A two-character delimiter for pseudotext is missing
                   from either a REPLACE or COPY REPLACING statement.

               *   Insert the missing pseudotext delimiter (that is, ==)
                   at the appropriate point in your program.

0062        Cannot have COPY REPLACING within REPLACE or vice versa 

               *   You cannot specify text replacement when text
                   replacement is already active.

0063        Cannot be used in nested program 

               *   Your program contains a statement or clause that is
                   not valid in a nested program.

               *   Refer to the chapter Program Definition in your
                   Language Reference for the valid structure of a nested
                   program.

0064        If file is EXTERNAL, then PADDING CHARACTER must be also 

               *   If a file is defined as EXTERNAL then the data item
                   specified in the associated PADDING CHARACTER clause
                   must also be defined as EXTERNAL.

0065        Unsigned integer required 

               *   An unsigned integer was expected but not supplied.

               *   Specify an unsigned integer.

0066        Data item must have fixed location 

               *   An item which is part of an OCCURS...DEPENDING ON
                   (ODO) table entry is being used as a subscript to the
                   table, or to another ODO table earlier in the group.
                   This is not allowed.

               *   Move the item to a location outside the ODO and use
                   that item in this statement.

0067        Please recompile using a larger value for the LINKCOUNT 
            directive

               *   The number of Linkage Section items required by your
                   program exceeds the default limit.

               *   Use the LINKCOUNT directive (see your COBOL System 
                   Reference for details) to increase this limit.

0068        SQL error 

               *   The compiler detected the error shown on your screen
                   in your SQL syntax.

               *   Refer to your SQL documentation for details of valid
                   SQL syntax.

0069        Error code val during SQL Remote Precompile.  Cannot continue 

               *   The SQLRPC module detected an error when connecting an
                   SQL program on a remote server.

               *   See your COBOL User Guide for a description of the
                   SQLRPC module.

0070        Invalid argument 

               *   You have either specified a COBOL system directive
                   with an invalid argument in a $SET statement in your
                   program or you have specified an incorrect argument
                   type for an intrinsic function.

               *   Check your COBOL System Reference for the valid
                   arguments for this directive.

0071        PROCEDURE DIVISION missing or unknown statement 

               *   You have omitted the PROCEDURE DIVISION header, and
                   have then started without a verb.

0072        Invalid FUNCTION name 

               *   The name specified after the word FUNCTION is not a
                   recognized function-name.  It is possible you are
                   using the word "function" as a data-name.  This word
                   is a reserved word.

               *   If you require an intrinsic function, ensure the name
                   you have used is correct.  If you want to use function
                   as a data-name, resubmit your program with the
                   directive REMOVE"FUNCTION" to remove the word FUNCTION
                   from the reserved word list.

0073        Missing left parenthesis 

               *   You have specified an intrinsic function which
                   requires parameters, but have not preceded the
                   parameter list with a left parenthesis.

               *   Check the format of the intrinsic function and ensure
                   that you have a matching left parenthesis for each
                   right parenthesis.

0074        Numeric argument expected 

               *   You have specified a nonnumeric argument with an
                   intrinsic function which is expecting a numeric
                   argument.

               *   Make the argument numeric.

0075        Alphanumeric argument expected 

               *   You have specified a numeric argument with an
                   intrinsic function where an alphanumeric argument was
                   expected.

               *   Make the argument alphanumeric.

0076        Illegal combination of argument types 

               *   The set of arguments you have specified with an
                   intrinsic function do not match the types required for
                   that function.

               *   Revise your code to comply with the rules governing
                   the construction of argument types.

0077        Unexpected end of source within EXEC 

               *   The end of a program source was encountered in an EXEC
                   statement.  This probably indicates that an END-EXEC
                   has been omitted earlier in the program.

               *   Ensure that each EXEC has a matching END-EXEC.

0078        Numeric function not allowed 

               *   You have specified an intrinsic function that returns
                   a numeric value in a position where a numeric value is
                   not allowed.

               *   Make the intrinsic function nonnumeric.

0079        Argument must have length 1 

               *   The argument you have specified does not have a length
                   of 1.

               *   Change your argument, specifying length 1.

0080        Prompt character incompatible for ACCEPT 

0081        Please recompile using a larger value for LOCALCOUNT 
            directive 

0082        COBOL Division or Section header encountered in incorrect 
            order 

               *   A COBOL Division or Section header was encountered in
                   the wrong order in the source.  For example, LINKAGE
                   SECTION was encountered after SCREEN SECTION had
                   already been read.

0083        Reserved word missing-- word expected 

               *   The reserved word word was expected but not found.

0084        SQL statement only allowed in the Procedure Division 

0085        SQL statement only allowed in the Data Division 

0086        Constant-name data-name same as reserved word 

0087        SIZE must be a positive integer 

               *   You have use the syntax CALL BY VALUE SIZE size with
                   an invalid size.

               *   Recode with a valid positive integer.

0090        Too many errors 

               *   The number of messages produced has reached the limit
                   specified by the MAXERROR directive.

0093        User-name not unique.  Assumed qualified by current 01 level 
            record 

               *   The specified user-name is not unique, but has been
                   qualified by the current 01 level item.

0094        Name is not a COBOL word 

               *   The name you have specified is not a reserved word in
                   COBOL.

               *   Refer to the appendix Reserved Words in your Language 
                   Reference and change the name accordingly.

0095        Literal used as COPY name 

0096        Lower case used (future occurrences not flagged)  

               *   You have used lower case where upper case was
                   expected.

0097        Both single and double quotes used (future occurrences not 
            flagged)  

0098        Single quotes (apostrophe) used (future occurrences not 
            flagged)  

0099        Nested COPY file 

0100        Sequence number out of order 

               *   One or more numbers in your source code are out of
                   sequence.

               *   Check that all sequence numbers are specified in
                   correct numeric order.

0101        Assignment-name is data-name 

0102        RELATIVE KEY clause should immediately follow ACCESS clause 

0103        RECORD missing 

               *   You have omitted the word RECORD.

               *   Add the word RECORD.

0104        IDENTIFICATION missing 

0105        PROGRAM-ID missing 

               *   You have omitted the word PROGRAM-ID from the
                   PROGRAM-ID paragraph.

               *   Add the word PROGRAM-ID to the PROGRAM-ID paragraph.

0106        PROGRAM-ID has illegal format 

               *   You have specified an invalid program-name in the
                   PROGRAM-ID paragraph.

               *   Refer to the chapter Program Definition in your
                   Language Reference for the correct format of
                   program-names.

0107        Second status area 

               *   You cannot have more than one identifier after the
                   FILE STATUS clause.

0108        OPTIONAL not permitted on non-sequential file 

0109        Paragraphs or phrases in nonstandard order or repeated 

               *   You have either specified paragraphs in the wrong
                   order, or a paragraph twice, or SPECIAL-NAMES clauses
                   in a nonstandard order.

               *   Refer to the chapter Program Definition in your
                   Language Reference for the correct order of
                   paragraphs, phrases and SPECIAL-NAMES clauses.  If you
                   have repeated any of these, delete the repetition.

0110        ENVIRONMENT missing 

               *   You have omitted the word ENVIRONMENT.

               *   Add the word ENVIRONMENT.

0111        CONFIGURATION missing 

               *   You have omitted the word CONFIGURATION.

               *   Add the word CONFIGURATION.

0112        SOURCE-COMPUTER missing 

               *   You have omitted the words SOURCE-COMPUTER.

               *   Add the words SOURCE-COMPUTER.

0113        SPECIAL-NAMES clause error 

               *   You have not specified the SPECIAL-NAMES paragraph
                   correctly.

               *   Refer to the chapter Program Definition in your
                   Language Reference for the correct format of the
                   SPECIAL-NAMES paragraph.

0114        OBJECT-COMPUTER missing 

               *   You have omitted the words OBJECT-COMPUTER.

               *   Add the words OBJECT-COMPUTER.

0115        OBJECT-COMPUTER clause not recognized 

               *   You have specified the OBJECT-COMPUTER paragraph
                   incorrectly.

               *   Refer to the chapter Program Definition in your
                   Language Reference for the correct format of the
                   OBJECT-COMPUTER paragraph.

0116        Character specified twice in alphabet 

               *   You have specified at least one character twice in the
                   ALPHABET clause.  For example, you might have included
                   a character in a range and also specified it as a
                   literal.

               *   Edit your source code so that the characters specified
                   in the ALPHABET clause are referenced only once.

0117        SWITCH clause error or system name/mnemonic name error 

               *   An error exists in the coding of the SWITCH clause of
                   the SPECIAL-NAMES paragraph in the Environment
                   Division of your program.

               *   Refer to the chapter Program Definition in your
                   Language Reference for details of the correct syntax
                   for this clause and revise your program accordingly.
                   Ensure that each condition named in this clause is
                   declared in the Data Division.

0118        COMMA expected 

               *   You have omitted the word COMMA from the DECIMAL-POINT
                   clause.

               *   Add the word COMMA.

0119        CRT expected 

               *   You have used a COBOL word or user-defined word where
                   your COBOL system expected the reserved word CRT.

               *   Edit your code so that the reserved word CRT is used.

0120        Illegal currency symbol 

               *   The literal which you have specified in the CURRENCY
                   SIGN IS clause in the SPECIAL-NAMES paragraph of your
                   program is not one of those permitted under the rules
                   of COBOL syntax, or if it is then you have failed to
                   enclose it in quotation marks.  The literal must be a
                   single character, not a digit, and cannot be any of
                   the following, A B C D L P S V X Z * + - , .  ; ( ) "
                   / = or space (except in ANS85 and VSC2 where L is
                   valid).

               *   Change the literal to a permitted character and ensure
                   that it is enclosed in quotation marks.



MPE/iX 5.0 Documentation