PRB: ISRLOCKED() and ISFLOCKED() Return Incorrect Values

MORE INFORMATION

Steps to Reproduce Behavior

1. Save the following code in a program and run the program:

         *-- Code begins here.
         CREATE TABLE locktest (field1 C(10))
         CLOSE DATA
         USE locktest SHARED
         INSERT INTO locktest (field1) VALUES ("A test")
         GOTO 1
         =RLOCK()
         *-- Code ends here.

2. On another computer or in another instance of Visual FoxPro, save the following code in a program and run the program:

         *-- Code begins here.
         USE locktest SHARED
         GOTO 1
         IF ISRLOCKED()
             WAIT WINDOW "Record is locked."
         ELSE
             WAIT WINDOW "Record is not locked."
             =RLOCK() && Should get the "Attempting to lock..." in status bar
         ENDIF
         *-- Code ends here.
   						

   If you run the program from another computer, please map a drive to the first computer containing the Locktest table.