CREATE Table Test FREE (A1 N(5))
FOR asd = 1 TO 50
    INSERT INTO Test VALUES (asd)
NEXT

USE
***** Open new VFP Session and do:
USE Test SHARED
RLOCK()

*** Now back to the first session
SET REPROCESS TO 1
USE Test Shared
SET MULTILOCKS ON
FOR asd = 1 TO 50
    IF asd % 2 == 0
       RLOCK()
    ENDIF
NEXT
SELECT * FROM Test WHERE RLOCK()
*** The result is all records but first
*** Veery slow :-)