[firebase-br] RES: Travamento Pessimista

[Kléber Caneva]

acho que faltou a função "h39(wcod)"

[]´s

Kléber Caneva

----- Original Message ----- 
From: "marcelo luiz stefaniak - teflamar" <marcelo em teflamar.com.br>
To: "FireBase" <lista em firebase.com.br>
Sent: Wednesday, April 05, 2006 10:04 AM
Subject: Re: [firebase-br] RES: Travamento Pessimista


pega aí um exemplo:

//para testar se está travado, e/ou travar:

    if not dmrod.testa_travamento('DIVMAR01',edcod.text) then begin
edcod.setfocus;exit;end;

function tdmrod.testa_travamento(wtabela,wcod:string):boolean;
begin
result:=false;
while true do
begin
try
    dmrod.trava.StartTransaction;
    // Executando comandos SQL, que irão travar o registro cuja chave
    // esta armazenada em COD.
    dmrod.sqltrava.sql.text:='UPDATE '+wtabela+' SET COD = COD WHERE COD =
'+h39(wcod);
    dmrod.sqltrava.Prepare;
    dmrod.sqltrava.ExecQuery;
    result:= True;
    Except
        // Se executou uma exceção, então o registro já está travado por
outro usuário.
        dmrod.trava.Rollback;
        if application.MessageBox('O Registro está sendo alterado por outro
usuário. Tentar novamente ?',
'Atenção',mb_yesno+mb_iconquestion+mb_defbutton1) = mryes then
        Continue
        else break;
    end;
    break;
end;
end;

----- Original Message ----- 
From: "Adriano Wolff" <adriano em sinprod.com.br>
To: "'FireBase'" <lista em firebase.com.br>
Sent: Wednesday, April 05, 2006 9:05 AM
Subject: [firebase-br] RES: Travamento Pessimista


E qual foi a forma de fazer isto?'
É possível usar isto com a aplicação usando BDE?

Adriano

-----Mensagem original-----
De: lista-bounces em firebase.com.br [mailto:lista-bounces em firebase.com.br] Em
nome de marcelo - teflamar
Enviada em: terça-feira, 4 de abril de 2006 16:38
Para: FireBase
Assunto: Re: [firebase-br] Travamento Pessimista

sim
sem problemas!

----- Original Message ----- 
From: "Adriano Wolff" <adriano em sinprod.com.br>
To: "'FireBase'" <lista em firebase.com.br>
Sent: Tuesday, April 04, 2006 2:11 PM
Subject: [firebase-br] Travamento Pessimista


Alo Pessoal,



Alguém da lista trabalha com o Travamento Pessimista do registro?



Adriano Wolff

ADML Software

______________________________________________
FireBase-BR (www.firebase.com.br) - Hospedado em www.bavs.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


-- 
No virus found in this incoming message.
Checked by AVG Free Edition.
Version: 7.1.385 / Virus Database: 268.3.5/301 - Release Date: 04/04/2006



______________________________________________
FireBase-BR (www.firebase.com.br) - Hospedado em www.bavs.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


______________________________________________
FireBase-BR (www.firebase.com.br) - Hospedado em www.bavs.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


-- 
No virus found in this incoming message.
Checked by AVG Free Edition.
Version: 7.1.385 / Virus Database: 268.3.5/300 - Release Date: 03/04/2006



______________________________________________
FireBase-BR (www.firebase.com.br) - Hospedado em www.bavs.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

E-mail classificado pelo Identificador de Spam Inteligente Terra.
Para alterar a categoria classificada, visite
http://mail.terra.com.br/protected_email/imail/imail.cgi?+_u=kdcc&_l=1,1144242430.223895.24179.almora.terra.com.br,6642,Des15,Des15

Esta mensagem foi verificada pelo E-mail Protegido Terra.
Scan engine: McAfee VirusScan / Atualizado em 04/04/2006 / Versão: 
4.4.00/4733
Proteja o seu e-mail Terra: http://mail.terra.com.br/