ONSUBCODE Function

Purpose

Returns an integer value that gives additional information about certain I/O errors.

Syntax

ONSUBCODE

Description

ONSUBCODE returns a FIXED BINARY(31,0) value that gives more information about an I/O error that occurred.

Find information on error code values in the range of 9001 - 9999 in the Micro Focus documentation help topic Run-time System Error Messages. 9000-level error messages are COBOL RTS error messages. The last three digits of the error number indicate the specific RTS error. For example, the COBOL RTS error message 9/013 displays as 9013. In the Run-time System Error Messages topic, the three-digit indicator is in the COBOL run-time message code. For example, COBOL RTS error message 9/013 corresponds to COBRT013.

See the topic File Status Codes for information on error code values 1-99. For example, 35 indicates that a file opened input was not found.

Restrictions

None.