Error DBCMD/2001
Enviado: 31 Mar 2005 20:31
Estou com o seguinte problema,
quando vou alterar algo na minha base de dados ocorre o seguinte erro:
Error DBCMD/2001 Workarea not in use: BLOQREG
Abro o banco de dados da seguinte forma:
Use CadCli Alias cadcli Shared New
Set Index To CadCli
Set Order To 2
cadcli->(DbGoTop())
e uso a função BLOQREG() para bloquear registros:
Function bloqreg()
While !Rlock()
MsgBox3D("Registro travado por outro usuário, aguarde...")
End While
Return .T.
O que está errado?
Obs.: abro outros .dbf no mesmo sistema e bloqueio registros da mesma forma acima e não tenho problemas, somente no cadastro de clientes que está ocorrendo.
quando vou alterar algo na minha base de dados ocorre o seguinte erro:
Error DBCMD/2001 Workarea not in use: BLOQREG
Abro o banco de dados da seguinte forma:
Use CadCli Alias cadcli Shared New
Set Index To CadCli
Set Order To 2
cadcli->(DbGoTop())
e uso a função BLOQREG() para bloquear registros:
Function bloqreg()
While !Rlock()
MsgBox3D("Registro travado por outro usuário, aguarde...")
End While
Return .T.
O que está errado?
Obs.: abro outros .dbf no mesmo sistema e bloqueio registros da mesma forma acima e não tenho problemas, somente no cadastro de clientes que está ocorrendo.