[firebase-br] Trigger + ClientDataSet

Leonardo leomarcsys em mcnet.inf.br
Sex Dez 3 15:02:47 -03 2004


Sua dica funcionou, com um adendo

Francisco Thiago Almeida wrote:

>Então tá, vamos descobrir onde está o erro:
> 
>Crie uma nova tabela e um novo Form, e faça o acesso a essa nova tabela, não escrevendo código algum.
> 
>Escreva a Trigger conforme eu te instrui a pouco (e o generato também);
> 
>...
> 
> if (new.campo is null) or (new.campo = -1) then
>  new.campo = gen_id(gernerator,1)
> 
>...
> 
>Configure os componentes como de praxe. Neste caso, não será necessário setar o required para false...
> 
>no before post do ClientDataSet escreva:
> 
>If DataSet.FindField('Campo') <> Nil Then
>  DataSet.FieldByName('Campo').AsInteger := -1
> 
>onde "Campo" é o campo "auto incremento"
> 
>coloque os campos no form... tudo como de praxe... adicione o dbnavigator e um outro componente button.
>Neste componente Button, escreva o seguinte código:
> 
>ClientDataSet1.ApplyUpdates(0);
>  
>
CLIENTDATASET1.REFRESH;

> 
>E no evento OnReconcileError do ClientDataSet escreva o seguinte:
> 
>ShowMessage(E.Message) // este código é para você ver a mensagem de erro)
> 
>execute a aplicação e faça os testes. Se você fizer exclusivamente desta forma, deve funcionar corretamente.
> 
>Espero que tenha ajudado
> 
>Thiago
>
>  
>
Obrigado a todos, vou realizar mais alguns teste!!!


Cordialmente,


Leonardo Marcelino
Corpo de Bombeiros Militares - Divinópolis/MG




Mais detalhes sobre a lista de discussão lista