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