[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