HP 3000 Manuals HP 3000 Manuals
List of Messages 0001 - 0109
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.
0003 Illegal format : Literal
* The sequence of characters forming a literal within 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 may 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 your Language Reference.
0004 Illegal character
* Your program contains a character that is not part of the
COBOL language set.
* Check 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 attempting to use a data-name which you have not
declared, or which you have misspelled.
* This error may 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 backwards 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 may have specified a negative integer where
only positive integers are allowed.
* Refer to 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.
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.
(Note that BASIS requires numeric sequence values.)
* Correct the sequence error.
0020 Numeric literal expected
* You must specify a numeric literal in this context.
* Refer to 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
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 Non-numeric literal expected
* You must specify a non-numeric literal in this context.
* Refer to your Language Reference for information on
non-numeric literals. Ensure that the literal you have
specified conforms to the rules for non-numeric literals.
0024 Illegal qualifier
* You have specified a qualified data name, procedure name,
or text name incorrectly.
* Check 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.
* Check 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.
* Check 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
may 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 item name.
* Ensure the procedure name is correct.
0034 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 may 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 may 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 non-zero
* The numeric value you specify here must be non-zero.
* Specify a non-zero 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).
* Check 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.
* Check 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 there is 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. Check 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.
* Check 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
* 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 may 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 your Language Reference.
0056 COPY is recursive
* You have either:
attempted to COPY a file that you have already started
copying, or:
incorrectly spelled the name of either the file you have
previously started to COPY, or the file you currently
wish to copy.
* Revise your program so that the file you have already
started to COPY is copied completely before you attempt
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.
* Check your Language Reference 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.
* Check your Language Reference 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 in REPLACE or vice versa
* It is not possible to specify text replacement when text
replacement is already active.
* Change your program.
0063 Cannot be used in nested program
* An entry point is not valid in a nested program.
* Check 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.
* Change your program.
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 (check 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.
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 wish 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 there is 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
0092 Literal used as TEXT name
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.
* Check your Language Reference for the list of reserved
words 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.
* Change your program.
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 is 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.
* Check your Language Reference for the correct format of
program names.
0107 Second status area
0108 OPTIONAL not permitted on non-sequential file
0109 Paragraphs or phrases in non-standard order or repeated
* You have either specified paragraphs in the wrong order,
or a paragraph twice, or SPECIAL-NAMES clauses in a non
standard order.
* Check your Language Reference for the correct order of
paragraphs, phrases and SPECIAL-NAMES clauses. If you
have repeated any of these, delete the repetition.