COBOL Manual for TNS/E Programs (H06.08+, J06.03+)
613 (Warning)
Directives: directive-1;directive-2 Duplicate setting, previous setting
ignored
Cause
The compilation unit contains incompatible directives; for example, CALL-SHARED and
NON-SHARED.
614 (Warning)
Cannot use file specified in CONSULT or SEARCH directive filename
Cause
A CONSULT or SEARCH directive references a file that is either nonexistent, corrupt, or not a
TNS/E object file compiled with debugging symbols.
615 (Error)
Length of combined keys exceeds 2046 characters for indexed organization
Cause
In an indexed file-control entry with multiple keys, the sum of the lengths of the keys exceeds
2046 characters.
700 (Warning)
Reserved word in next standard
Cause
The MIGRATION-CHECK and STANDARD 1985 directives are in effect, and the indicated word
is a reserved word when the STANDARD 2002 directive is in effect.
701 (Error)
BASED clause not permitted on a redefinition
Cause
The data item has both the BASED and REDEFINES clause specified.
702 (Error)
BASED clause not permitted for external data item
Cause
The data item has both the BASED and EXTERNAL clauses specified.
703 (Error)
Operand must not be BASED
Cause
One of:
• The USING phrase of the Procedure Division header specifies a BASED data item.
• A CHECKPOINT statement specifies a BASED data item.
704 (Error)
Expected level 01 or level 77 BASED data item
Cause
The data item must be a level-01 or level-77 item with the BASED clause.
1176 Compiler Diagnostic Messages










