* For lock: Select RecNo() As Registro, RLock() As Trava From Tabela Where Codigo = 1 Into Cursor Resultado If Resultado.Trava = .F. MessageBox("Record in use for another user") Return .F. EndIf * For UnLock: UnLock Record Resultado.Registro In TabelaAnd that is all! :) - Someone can see anything wrong in this code?