Directives
UNLOCK Remove Exclusive Use from File
   
Format UNLOCK (chan[,ERR=stmtref])

Where:

chan Channel or logical file number of the file to be unlocked.
stmtref Program line number or statement label to which to transfer control.
   
Description Use the UNLOCK directive to release a previously locked file. If the given file is not already locked, ProvideX returns Error #14: Invalid I/O request for file state.


*Note* WindX supports the use of this directive for file opened using the [WDX] or [LCL] tag. Prior version 5 you will need to use an EXECUTE command to send the UNLOCK directive to the workstation. See [WDX] Direct Action to Client Machine.


See Also LOCK Reserve File for Exclusive Use.
   
Example 0010 OPEN (30,ERR=0100)"GLFILE"
0020 LOCK (30,ERR=0120)
0030 READ (30,KEY="HEProvideXR")A
0040 IF A>0 THEN GOTO 0100
0050 UNLOCK (30)
0060 PRINT "Nothing on file to process.."
0070 STOP
0100 REM 100 Error handling