Leroy,

ISRLOCKED() is of no use to you here - it only checks to see if the process issuning it has the record locked. It does NOT tell you if any OTHER user on some other system has the record locked!

So you should use RLOCK() instead. Note that you will have to change your logic slightly because ISRLOCKED() returns .T. if the record is already locked while RLOCK() returns .T. if it SUCCEEDS in locking the record.

Good luck,

JimN

>>If the button is clicked and it reads 'Edit' then
>>- if I can get a lock on the record then
>>-- perform the button change
>>- else
>>-- tell the user the record is locked
>>- endif
>>else
>>-- It must be a save button, so save the record...
>>-- ...and perform the button change.
>>endif
>
>I tried this:
>

>DO CASE
>   CASE ... = 'EDIT'
>       IF ISRLOCKED()
>           MESSAGEBOX('BLA BLA BLA')
>           RETURN
>       ENDIF
>       *** EDIT STUFF
>   CASE ... = 'SAVE'
>      *** DO THE SAVE STUFF
>ENDCASE
>

>But that is not working either.
>I have this method called set_errors() that is a method of my oApp class.
>But I set it off by saying ON ERROR so I can Get the default Error Message for this segment of code.
>
>I Don't know what to do now.