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

RLOCK()

Lock a record in a work area
---------------------------------------------------------------------------------

 Syntax

        RLOCK() --> lSuccess  

 Arguments

        None    

 Returns

        RLOCK()   True (.T.) if record lock is successful; otherwise, 
                  it returns false (.F.).

 Description

      This function returns a logical true (.T.) if an attempt to lock a
      specific record in a selected or designated work area is
      successful.  It will yield a false (.F.) if either the file or the
      desired record  is currently locked.  A record that is locked
      remains locked until another RLOCK() is issued  or until an UNLOCK
      command is executed.  On a Network enviroment the follow command
      need that the record is  locked:

      @...GET

      DELETE (single record)

      RECALL (single record)

      REPLACE (single record)

 Examples

      nId:=10
      USE TestId INDEX TestId NEW
      IF TestId->(DBSEEK(nId))
         IF TestId->(RLOCK())
            DBDELETE()
         ENDIF
      ENDIF
      USE

Status

      Ready

 Compliance

      This function is Ca-Clipper compliant

 Files

      Library is rdd