C$RERR

The C$RERR library routine retrieves extended information about the status of a file after an I/O operation.

Syntax:

CALL "C$RERR" USING extendStat                       textMessage

Parameters:

extendStat	any alphanumeric data item	Specifies the extended file status.   In thin client environment, having iscobol.file.lock_manager=com.iscobol.as.locking.InternalLockManager, when a lock timeout error occurs, extendStat is set to a concatenation of the file status and the thread ID of the client holding the lock. Since a thread ID can be up to 10 digits long, it’s suggested to define extendStat as PIC X(12). The thread ID is stored in extendStat(3:). If a "file locked" error occurs during a OPEN I-O WITH LOCK due to another client that opened the file for input, then TID=0 is returned, because the OPEN INPUT doesn’t put a real lock and it's also possible to open for input the same file from many clients, so the runtime doesn’t know which TID to return.
textMessage	any alphanumeric data item	It specifies a text message coming from the host system if available.

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