[firebase-br] travar registro

Rodrigo dominioinf em brturbo.com.br
Sáb Nov 18 10:01:40 -03 2006


Bom dia a todos, primeiramente, agradeço pela preocupação...

Seguindo a orientação dos colegas, alterei para nowait e fiz assim:

     try
     DM.IBClientes.Close;
     DM.IBClientes.SQL.Clear;
     DM.IBClientes.SQL.Add('Select * from Clientes where Nome=:Nome with 
lock');
     DM.IBClientes.ParamByName('Nome').AsString:= ComboBox1.Text;
     DM.IBCLIENTES.Open;
     except
     raise exception.create('Esse registro está sendo usado por outro 
usuario da rede';
     end;

Mas não deu o resultado esperado... Li uns artigos e fiz o seguinte

     try
     DM.IBClientes.Close;
     DM.IBClientes.SQL.Clear;
     DM.IBClientes.SQL.Add('Select * from Clientes where Nome=:Nome for 
update with lock');
     DM.IBClientes.ParamByName('Nome').AsString:= ComboBox1.Text;
     DM.IBCLIENTES.Open;
     except
     raise exception.create('Esse registro está sendo usado por outro 
usuario da rede';
     end;
Mas da uma mensagem de erro a cada vez que abre qualquer registro..

Se alguem puder me ajudar...

Grato
Rodrigo
----- Original Message ----- 
From: "Sandro" <oleber_itajai em yahoo.com.br>
To: "FireBase" <lista em firebase.com.br>
Sent: Monday, November 13, 2006 10:05 AM
Subject: Re: [firebase-br] travar registro


De um select pelo chave primaria usando with lock, e configure o modo de
bloqueio para nowait.. desde modo assim que ele detectar o conflito ele ja
devolve a mensagem para vc manipar do seu mdo..



----- Original Message ----- 
From: "Rodrigo" <dominioinf em brturbo.com.br>
To: "FireBase" <lista em firebase.com.br>
Sent: Saturday, November 11, 2006 9:49 AM
Subject: [firebase-br] travar registro


Bom dia a todos,

Estou precisando travar um registro visualizado pelo mesmo usuario numa
maquina diferente...

Por exemplo, usuario 1 abre venda 1 na maquina 1
                      usuario 2 abre venda 1 na maquina 2

Gostaria que avisasse que a venda 1 ja esta sendo visualizada pelo usuario 1
e que arguardasse pela finalização deste.

Com um IBTable faria
Try
IBTable.Edit
EXCEPT
RAISE.....

Mas uso IBX com IBQuery e não consegui achar material....

Se alguem souber como fazer e me dar uma dica fico agradecido...


Atenciosamente,

Rodrigo



______________________________________________
FireBase-BR (www.firebase.com.br) - Hospedado em www.locador.com.br
Para editar sua configuração na lista, use o endereço
http://mail.firebase.com.br/mailman/listinfo/lista_firebase.com.br
Para consultar mensagens antigas: http://firebase.com.br/pesquisa



_______________________________________________________
Novidade no Yahoo! Mail: receba alertas de novas mensagens no seu celular. 
Registre seu aparelho agora!
http://br.mobile.yahoo.com/mailalertas/




______________________________________________
FireBase-BR (www.firebase.com.br) - Hospedado em www.locador.com.br
Para editar sua configuração na lista, use o endereço 
http://mail.firebase.com.br/mailman/listinfo/lista_firebase.com.br
Para consultar mensagens antigas: http://firebase.com.br/pesquisa 






Mais detalhes sobre a lista de discussão lista