Click above to get retro games delivered to your door ever month!

 unlock              Release a lock in the current work area
------------------------------------------------------------------------------
 Syntax
   [!sAlias] unlock

 Arguments
   sAlias is the database to operate on.

 Description
   The unlock command releases a file or record lock in the current or
   specified alias.

   unlock removes all locks in the work area, regardless of whether
   the active lock is a file lock or a record lock.

 Example
   #define EXAMPLE_DATABASE
   #include example.hdr

   proc Test_unlock
   open sTest shared
   // unlock a database file after it has been indexed
   if flock()
      ? "Indexing..."
      index sIdxLn
      unlock
   else
      ? "File could not be lockled"
   endif
   endproc

   proc main
   Test_unlock()
   endproc