Erro de Key Violation

Question

Tenho uma apli��o em delphi com banco firebird usando os componente ib pra acesso... quando esta em rede se duas pessoas ao mesmo tempo mandar incluir um registro da um erro de �Key Violation� mesmo eu usando uma fun��o pra pegar um novo c�digo.
Alguem saberia como resolver eu problema?

Rjun · Answer

Tem certeza q essa fun�ao esta retornando c�digos diferentes para as duas pessoas ?...

Silviogs · Answer

Ol�vc poderia postar a fun��o pra pegar um novo c�digo.Silvio Guedes...

Ariovaldo · Answer

Daniel conforme o Rjun j� informou se vc realmente garante que sua fun��o atribui valores diferente o problema pode estar no Componente Ibtransaction n�o esta configurado corretamente, D� dois cliques neste componente vai aparecer uma janela com 3 radio buton seleciona o Radio do Meio n�o me lembro a descri��o agora.

Daniel.felgar · Answer

N�o.... mas em uma maquina s� sempre retorna..... eu tenho o �ssql� de inclus�o antes de ele executar o sql ele puxa o novo c�digo.......

Daniel.felgar · Answer

o componente j� esta como read-comited......

Rjun · Answer

Em uma maquina ele so vai fazer uma requisi��o. Ai com certeza ele retorna um numero novo. Voc� ta usando trigger ? Sen�o, quando vc pega o novo codigo teria q salvar o codigo novo para que quando a outra maquina pedisse o novo codigo, ele teria o valor correto.

Daniel.felgar · Answer

Tipo eu num usu triger....mas logo ap�s pegar o c�digo ele salva seria tipo asism: novocodigo
salvana tabela

qyGeral.sql.clear;
qyGeral.sql.close;
qyGeral.sql.add(�Select max(�+nomecampo+�) as lastcode�);
qyGeral.sql.add(�from �+nometabela);
qyGeral.Open;
if qyGeral.RecordCount = 0 then
result := 1
else
result := qyGeral.fieldbyname(�lastcode�).asinteger + 1;

Rjun · Answer

Nesse trecho voce esta so pegando o codigo. N�o esta salvando. Ent�o deve ser isso q esta acontecendo. Por que voc� n�o utiliza Stored Procedure ?...

Ariovaldo · Answer

Neste Caso o Registro n�o esta fisico na tabela, ele s� esta l�gico portanto outra requisi��o solicitada n�o pegara o novo, seria interessante usar uma Trigger neste caso...

Daniel.felgar · Answer

num esses trecho � so o do codigo.... depois q vem o �insert into...� num da pra usar....

Daniel.felgar · Answer

depois de executado o sql eu fa�o o   if trFB.InTransaction then     trFB.Commit;...

Ariovaldo · Answer

Quando vc da o Insert vc commita a Tabela? se n�o o registro s� vai estar l�gico l�, e o select n�o pega ele...

Ariovaldo · Answer

Tenta mudar o Comando Para:if trFB.InTransaction then trFB.CommitRetaining;...

Daniel.felgar · Answer

qual a diferen�a entre os dois...

Ariovaldo · Answer

Puts a Diferen�a eu n�o sei, mas tive um problema desses uma vez e s� alterei isso, claro que existe uma propriedade no IBTransaction que vc seta �TaCommit� ou �TaCommitRtaining� muda para este segundo

F�rum Erro de Key Violation #276250