C$RERRNAME

C$RERRNAME

The C$RERRNAME library routine retrieves the name of the latest file used by a COBOL I/O statement.

Syntax:

CALL "C$RERRNAME" USING fileName

Parameters:

fileName

PIC X(n)

Receives the full pathname of the latest file used by a COBOL I/O statement, followed by its logical name enclosed in parentheses.

Examples:

Example - Display extended information on a file error

*> define crerr-status and rerrname as pic x(n)

display-file-error.

call "C$RERR" using crerr-status

call "C$RERRNAME" using rerrname

display message "Error " file-status crerr-status " on " rerrname