Release an exclusive lock.
long UNLOCK_cobfa ( unsigned long *errcode /* error code */ );
Description
Release the exclusive lock of the file accessed by the COBOL runtime system.
When the return value of this function is -1, the Windows system error code is set in error code <*errcode>. If NULL has been specified for <errcode>, no value is returned for <*errcode>. The value is unpredictable when the return value of this function is not -1.
Execution Conditions
Always accessible.
Return Values
0: Successful | Exclusive unlock of a COBOL file is successful |
-1: Failed | System error occurred. Windows system error code is set in <*errcode>. |