COBOL Manual for TNS/E Programs (H06.03+)

Program Compilation
HP COBOL Manual for TNS/E Programs—520347-003
11-45
DIAGNOSE-74 and NODIAGNOSE-74
If more than one CONSULT is present, the object names are appended to the list in the
order they are read; however, if any object name specified is already in the list, it
retains its current position in the list.
DIAGNOSE-74 and NODIAGNOSE-74
DIAGNOSE-74
causes the compiler to issue warnings when it encounters source constructs that
could cause the program to produce different results than it would if it were
compiled with the HP COBOL 74 compiler.
NODIAGNOSE-74
prevents the compiler from issuing warnings when it encounters source constructs
that could cause the program to produce different results than it would if it were
compiled with the HP COBOL 74 compiler.
The warning messages issued begin with:
Logic may differ from COBOL 74 -
The possible suffixes, explained in Usage Considerations:, are:
•
Size of index data item
•
Implied value of Figurative Constant
•
Precision of division operation
•
Action when program not found
•
Search algorithm
•
Size of receiving operand
•
Identification of statement operand
•
Assignment order of PERFORM operands
•
Alphanumeric sender
Default: NOCONSULT
Placement: Anywhere
Dependencies: None
Default: NODIAGNOSE-74
Placement: Anywhere
Scope: Applies until its opposite overrides it
Dependencies: None
DIAGNOSE-74
NODIAGNOSE-74
VST277.vsd