HP 3000 Manuals HP 3000 Manuals
List of Messages (0336 - 0539)
0336 Variable length group not allowed
* You cannot INITIALIZE a variable-length item.
* Delete the item-name from the INITIALIZE statement.
0337 Cannot repeat same category
* You have repeated the same data class in the REPLACING
phrase of an INITIALIZE statement.
* Delete the repeated class from the INITIALIZE
statement.
0338 REPORT not specified in an FD
* You have referred to a report for which no FD entry
exists in the Report Section. You might have
forgotten to specify the report entry, or you might
have misspelled a correct report-name.
* Correct the report-name or add the necessary report
definition to the Report Section.
0339 Not allowed with SEQUENTIAL files
* You have specified an operation that cannot be
performed on a file opened in sequential access mode.
* Refer to the chapter Program Definition in your
Language Reference for details of the operations you
can perform on sequential files.
0340 Not allowed with RANDOM ACCESS files
* You have specified an operation that cannot be
performed on a file opened in random access mode.
* Refer to the chapter Program Definition in your
Language Reference for details of the operations you
can perform on random access (relative or indexed
sequential) files.
0341 Not allowed with LINE SEQUENTIAL files
* You have specified an operation that cannot be
performed on a line sequential file.
* Refer to the chapter Program Definition in your
Language Reference for details of the operations you
can perform on line sequential files.
0342 Not allowed with LINAGE files
* You have performed an illegal operation on a file
defined with a LINAGE clause (for example, WRITE AFTER
CO1).
* Delete the illegal operation or redefine the file
without a LINAGE clause.
0343 Can only be used in inline PERFORM
0344 Should be level 01 or 77
* You have specified a data item that is not a level 01
or level 77 data item where your COBOL system is
expecting the data item to be either one of these
levels.
* Redefine the data item to be level 01 or level 77.
0345 USING parameter used twice in parameter list
* You have specified the same data item-name twice in
the USING phrase of the Procedure Division header.
All the names in the USING phrase must be different.
* Delete the extra reference.
0346 Only one WHEN phrase allowed with SEARCH ALL
* You have specified two WHEN phrases in a SEARCH
statement using the ALL option. You can specify only
one WHEN phrase in this context.
* Delete the extra WHEN phrase.
0347 MERGE needs at least two USING files
* You have specified fewer than two file-names in the
USING phrase of a MERGE statement.
* Ensure that you specify at least two file-names in the
USING phrase of the MERGE statement.
0348 Procedure name procedure-name undeclared, first used on line
line-number
* You have referred to a nonexistent paragraph or
section. You have probably misspelled a valid
procedure-name.
* Ensure that the procedure you have referred to exists
and that you have spelled it correctly.
0349 "LOCK" clause expected
* You have not specified the LOCK phrase with a READ
statement.
* Insert a LOCK phrase in the READ statement.
0350 Illegal use of "NO LOCK"
* You have used a READ statement with the NO LOCK phrase
on a file for which no record locking is required.
* Delete the NO LOCK phrase.
0351 "LOCK" clause specified for "EXCLUSIVE" file
* You have specified a LOCK clause in a READ statement
for a file that you have already locked with an
EXCLUSIVE lock (in the FILE-CONTROL paragraph of your
code).
* Record locking is impossible on a file which your run
unit has already locked with an EXCLUSIVE lock. To
ensure that the two LOCK entries are compatible, you
should either delete the LOCK entry in the relevant
READ statement, or alter the LOCK MODE IS entry in the
FILE-CONTROL paragraph.
0352 " KEPT" specified for file with single record locking
* This message applies only to multi-user syntax. You
have specified a WITH KEPT LOCK phrase in a READ
statement which accesses a file that does not support
multiple record locking.
* Either change the filetype or delete the WITH KEPT
LOCK phrase to ensure compatibility between the two
entries.
0353 Cannot reference a Report Section item that is not a
sum-counter
0354 Multiple receiving fields in MOVE CORRESPONDING
0355 Only "=" and "NOT =" allowed for pointer data items
* You can use the operators = and NOT = only in
comparisons involving pointer data items.
* Correct the comparison.
0356 Not allowed with REPORT files
* You have tried to perform a file operation (READ,
WRITE, REWRITE) on a file whose FD entry indicates
that it is a report.
* Delete the input-output statement.
0357 Screen is display-only
* You have named a screen in an ACCEPT statement that
contains only display fields.
* Make sure that you have named the correct screen.
0358 Missing comma
* COBOL syntax expects a comma at this point. Refer to
the chapter Concepts of the COBOL Language in your
Language Reference for the correct syntax.
* Add the missing comma.
0359 Mismatch of table dimensions
* A data item in an ACCEPT/DISPLAY statement has a
different number of dimensions from the corresponding
Screen Section item.
Alternatively, the Screen Section item has a different
number of dimensions from the corresponding data item
appearing in the USING or TO clause.
* Make the two item definitions consistent.
0360 File must have ACCESS DYNAMIC
* You have specified an operation on a file that can be
performed only if the file has access mode DYNAMIC.
* Change the file control entry for the file so that it
has access mode DYNAMIC.
0361 Operation exceeds COMP subset
* Your program contains a statement that cannot be
compiled to comp subset instructions.
0362 data-name not declared for file or wrong type for CODE-SET
* The data-names you have specified in the CODE-SET
clause do not belong to a record in the file.
* Edit your source code so that the data-names in the
CODE-SET clause refer to a record in the file.
0363 data-name not in same record as first item in CODE-SET clause
* You have specified data-names in the CODE-SET clause
that belong to more than one record. All data-names
specified in this clause must belong to a single
record in the file.
* Edit your source code to delete one or more of the
CODE-SET data-names to ensure that all data-names
belong to only one record.
0364 data-name overlaps another item in CODE-SET
* One or more of the data-names specified in the
CODE-SET clause is redefined, or you might have
specified the whole record, rather than individual
data-names contained in that record, in the CODE-SET
clause.
* Edit your source code so that the data-names in the
record are specified only once.
0365 Variable size table not last in group or subsidiary to OCCURS
* OCCURS DEPENDING ON item must be last item in a group.
* Restructure your data items so that the OCCURS
DEPENDING ON item is the last item in the group.
0366 Variable length delimiter not allowed
* You cannot use a reference modified item or a group
containing an OCCURS... DEPENDING ON clause in this
context.
* Replace the reference modified item, or specify a
valid item in the OCCURS DEPENDING ON clause.
0367 Description of operand does not contain the INDEXED BY clause
* A SEARCH is not possible as the description of the
operand does not contain the INDEXED BY clause.
* Include an INDEXED BY clause in your operand
description.
0368 Exception phrase inappropriate
* The specified exception is not appropriate with this
statement in the specified access mode. For example
an AT END has been specified with random access, or
INVALID KEY with sequential access.
0369 OPEN EXTEND on file with LINAGE clause
* OPEN EXTEND is not allowed on a file defined with a
LINAGE clause.
0370 Operand must be a table
* The operand used in this situation can only be a
table.
* Revise your code so that the operand is a table.
0371 Data size is too large
* Your program's data size exceeds the maximum size
permitted.
* Redesign your program to include less data.
0372 Illegal use of SORT file
* You have specified a SORT file incorrectly.
* Refer to the chapter Program Definition in your
Language Reference for the correct syntax.
0373 PICTURE string contains more than 18 numeric positions
* Your PICTURE string can contain a maximum of 18
numeric positions.
* Change your PICTURE string so that it contains no more
than 18 numeric positions.
0374 Illegal use of floating-point item
* You have specified a floating-point item incorrectly.
* Do not use a floating-point item in this context.
0375 Literal includes repeated characters
0376 Table superordinate to operand is not indexed
0377 SORT table does not support complex OCCURS DEPENDING ON
tables
0378 More than seven AFTER phrases
* You can include a maximum of seven AFTER phrases in a
PERFORM statement.
* Delete any extra AFTER phrases.
0379 Non-DISPLAY numeric data cannot be compared with alphanumeric
literal
0380 Parameter count in CALL different from that in PROCEDURE
DIVISION header
0381 TALLYING option has ALL etc. distributed over multiple
identifiers
0382 Only one Procedure-name in GO TO ... DEPENDING
0383 Missing ALSO
* You have omitted the word ALSO.
* Add the word ALSO.
0384 NEXT SENTENCE does not follow ON, IF, ELSE or SEARCH WHEN
* NEXT SENTENCE should be used only in either branch of
an IF statement or the WHEN branch of a SEARCH
statement.
* Revise your code to ensure that you have obeyed these
rules.
0385 Order of initialization changed
0386 No section or paragraph at start of Procedure Division
0387 AFTER and BEFORE options used together
0388 Key is right hand side of condition
0389 EXIT not in separate paragraph
0390 OPEN EXTEND on non-sequential file
0391 MF format Accept/Display
0392 More than two AFTER phrases
* You have included more than the maximum of two AFTER
phrases in your program.
* Delete any extra AFTER phrases.
0393 Inline PERFORM
0394 No section header after END DECLARATIVES
0395 FROM literal
0396 No suitable conditional phrase and no applicable declarative
0397 No preceding section
0398 Offset only allowed with Index-names
0399 Index-name data-name belongs to different table
0400 Cannot use index data item as subscript
* You have used an index data item as a subscript in
your program.
0401 Limit exceeded--number of source statements > limit
0402 Limit exceeded--number of files > limit
0404 Limit exceeded--number of pairs of REPLACING operands >
limit
0406 Limit exceeded--length of file/copy/library name > limit
0409 Limit exceeded--number of SELECT filenames > limit
0410 Limit exceeded--number of SAME RECORD AREA clauses > limit
0411 Limit exceeded--number of MULTIPLE FILE filenames > limit
0412 Limit exceeded--number of ALTERNATE RECORD KEY clauses in a
file > limit
0413 Limit exceeded--length of RECORD KEY > limit characters
0414 Limit exceeded--length of Data Division > limit
0415 Limit exceeded--length of data Section > limit
0419 Limit exceeded--BLOCK size > limit characters
0420 Limit exceeded--RECORD length > limit characters
0421 Limit exceeded--number of FD filenames > limit
0422 Limit exceeded--number of SD filenames > limit
0424 Limit exceeded--number of 01 & 77 items in Linkage Section >
limit
0425 Limit exceeded--length of File Section group item > limit
characters
0426 Limit exceeded--length of group item > limit characters
0427 Limit exceeded--length of data item > limit characters
0428 Limit exceeded--length of edited item > limit characters
0429 Limit exceeded--length of variable length table > limit
characters
0430 Total length of VALUE literals > limit --possible problem on
mainframe
0431 Limit exceeded--length of PICTURE string > limit characters
0432 Limit exceeded--length of PICTURE replication > limit
0433 Limit exceeded--length of sort record > limit characters
0434 Limit exceeded--length of table > limit characters
0435 Limit exceeded--length of table element > limit characters
0436 Limit exceeded--number of ASC/DESC KEY clauses > limit
0437 Limit exceeded at data-name --length of ASC/DESC KEYs > limit
characters
0438 Limit exceeded--number of INDEXED BY clauses > limit
0440 Limit exceeded--number of paragraph labels > limit
0441 Limit exceeded--number of PERFORMs > limit
0442 Limit exceeded--OCCURS nesting > limit
0443 Limit exceeded--number of GO TO DEPENDING ON names > limit
0444 Limit exceeded--number of IF nesting levels > limit
0445 Limit exceeded--number of CALL parameters > limit
0446 Limit exceeded--number of SORT/MERGE input files > limit
0447 Limit exceeded--number of SORT/MERGE keys > limit
0448 Limit exceeded--number of conditions in a SEARCH ALL > limit
0449 Limit exceeded--number of UNSTRING delimiters > limit
0450 Limit exceeded--number of operands in INSPECT
TALLYING/REPLACING > limit
0451 Limit exceeded--length of SORT/MERGE keys > limit characters
0452 Limit exceeded--number of PROCEDURE DIVISION USING parameters
> limit
0453 Limit exceeded--number of ENTRY USING parameters > limit
0460 Previous item crosses 64K boundary. Segment checking code
produced
0461 Table crosses 64K boundary. Segment checking code produced
0462 Parameter crosses 64K boundary. Use NOSMALLDD when compiling
subprogram
0463 Parameter to call-by-number routine not contained in first
64K of WS
* Parameters for call-by-number routines must be defined
in the first 64K of Working-Storage if the CHIP "16"
directive is set. See your COBOL System Reference for
details.
0465 File Section exceeds 64K. Recompile with CALLFH directive
0499 DISPLAY ALL figurative constant syntax used
* You have used the syntax "DISPLAY ALL figurative
constant" which is not conformant with your selected
flagging dialect.
0500 DISPLAY ALL literal syntax used
* You have used the syntax "DISPLAY ALL literal" which
is not conformant with your selected flagging dialect.
0501 Feature is part of an optional module--module-name
0502 This entire section is part of an optional module--
module-name
0503 USAGE COMP used at other than 01 level
0504 ORGANIZATION clause in SELECT statement of sort file
0505 VALUE OF clause in SD or CD
0506 REDEFINES does not immediately follow data-name
* The REDEFINES clause does not immediately follow
data-name in your program.
* Revise your program so that REDEFINES immediately
follows data-name.
0507 Numeric literal VALUE on edited item
0508 NEXT used in READ of sequential file
0509 SET operation on non-index data item
0510 ZEROS or ZEROES in BLANK WHEN clause. Treated as ZERO
0511 FILE STATUS data-name is not alphanumeric
* You have specified a nonalphanumeric data item in your
FILE STATUS.
* Amend your code to make the data item alphanumeric.
0512 Data-name is qualified
0513 Flag refers to entire section
0514 " CHANGED" and/or " NAMED" missing
* You have omitted at least one of CHANGED or NAMED.
* Add CHANGED and/or NAMED to your program.
0515 Phrases repeated
0516 Only 1 file specified in SAME AREA clause
0517 Jump out of inline PERFORM
0518 > or << followed by THAN or THEN, or = followed by TO
* You have included the noise words THAN and TO
unnecessarily in your code.
* Delete these words.
0519 More than 5 levels of qualification
0520 "INVALID KEY" phrase used with sequential file
0521 USING literal/LENGTH OF identifier. (BY CONTENT implied for
this item)
0522 BY CONTENT literal/LENGTH OF identifier
0523 Declarative Section without USE statement
0524 ALPHABET IS ASCII
0525 EOP or END-OF-PAGE used on file which has no LINAGE
* You have specified EOP, which is invalid for a file
which has no LINAGE.
* Delete EOP.
0526 Phrases are not in the correct order
0527 REDEFINES at 01 in File Section
0528 Data-name data-name in ASC/DESC key clause is not uniquely
identified
0529 Clause treated as documentary
0530 Data item used as index file key is not alphanumeric
* The data item you have specified as an index file key
is not alphanumeric.
* Revise your code to make the data item alphanumeric.
0531 Too many subscripts
0532 INTO data-name is group item
0533 START ... LESS/NOT GREATER THAN ...
0534 Entry treated as documentary
0535 ALPHABET is EBCDIC
0536 CICS LINKAGE items generated
0537 BASIS mechanism (BASIS, DELETE or INSERT)
0538 Picture string is continued
0539 This item is obsolete in 1985 standard
* The syntax you have used is not supported under
ANSI'85.
* Delete this syntax.