COBOL Manual for TNS and TNS/R Programs

Compiler Diagnostic Messages
HP COBOL Manual for TNS and TNS/R Programs—522555-006
47-73
Message List
372 (Error)
Cause. The actual parameter of an ENTER statement is a file name (FD or SD), but it
does not correspond to a formal parameter that expects a 2-byte address (for the
COBOL85 compiler) or a struct (for the NMCOBOL compiler).
373 (Warning)
Cause. The compiler cannot determine if a problem exists. Verify that the correct
address is passed to the routine.
Most COBOL data items are referenced internally by byte addresses. When one of
these appears as the actual parameter corresponding to the formal parameter of a
routine that expects a 2-byte address, the compiler must convert the item’s byte
address to a 2-byte address. If the data item begins on an odd-byte boundary, that
information is lost by the conversion operation (thus the value space of the item
appears, to the called routine, to begin one byte before it actually does). If the data
item begins on an even-byte boundary, there is no problem.
374 (Error)
Cause. OMITTED appears as an actual parameter, but the called routine does not
have the EXTENSIBLE or VARIABLE attribute.
375 (Error)
Cause. An ENTER statement includes the GIVING phrase, but the called routine is
not a function (that is, it does not return a value).
COBOL85 Compiler:
Formal parameter for file name must have word address
NMCOBOL Compiler:
Actual parameter is a file, so formal parameter must be a
struct
Potential odd byte address converted to even byte address
OMITTED permitted only for extensible or variable routine
GIVING phrase permitted only for function routine