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

 FIL_LOCK()  Network: Attempts to lock the current shared file

 Syntax....: FIL_LOCK( [secs] )
 Parameters: <expN>: secs = [optional] number of seconds to attempt lock

 Returns...: <expL>: .T. if succeeds, else .F. if fails
 Cautions..: none
 CC Calls..: POPMSG()
 Alias.....: none

 Example...: IF FIL_LOCK(5)
               REPLACE ALL Price WITH Price * 1.1
             ELSE
               ? "File not available"
             ENDIF