Célio, creio qie a trigger está correta, pois quando efetuo salvamento
diretamente dentro do banco de dados ela funciona perfeitamente, mas quando
efetuo o salvamento dentro do Delphi já retorna erro, não gerando o código do
cliente. Abaixo está o código que gerou a trigger:
CREATE TRIGGER CLIENTE_BI FOR CLIENTE
ACTIVE BEFORE INSERT POSITION 0
AS
BEGIN
IF (NEW.CODIGO IS NULL) THEN
NEW.CODIGO = GEN_ID(GEN_CLIENTE_ID,1);
END
Para eu poder ter certeza, você poderia me confirmar os componentes de acesso
ao FB 1.5, talvez pode ser isso.
----- Original Message -----
From: Celio Ricardo
To: delphi-br@yahoogrupos.com.br
Sent: Saturday, October 01, 2005 8:00 AM
Subject: [delphi-br] Re: Salvamento em FB
Os comandos do dataset estao corretos, talvez seja no comando do
trigger que esteja faltando algo.
Veja esse, e muitos outros, exemplos em
http://www.firebird.com.br/articles.php?id=17
Ha um exemplo de um Trigger (gatilho) para ser executado ANTES de uma
inserção ao FB.
Antes de fazer/adaptar seu novo programa, de uma lida neste site, tem
um material excelente
--- Em delphi-br@yahoogrupos.com.br, "Wilson Valdevite"
<[EMAIL PROTECTED]> escreveu
> Ai vai.............
>
> Quando adiciono algum cadastro em minha tabela de clientes, o campo
código, que é adiconado através de uma trigger, não adiciona o código.
> Estou utilizando os componentes DataSetProvider, ClienteDataSet e
SQLDataSet da paleta DBExpress.
> Para salvar os dados utilizo os comandos:
> cdsCliente.Post;
> cdsCliente.ApplyUpdates(0);
> O que eu preciso saber é o que eu tenho que fazer para que a trigger
seja disparada gerando o código e o adicionando ao campo correto da
tabela Clientes, já que ela funciona perfeitamente quando a inserção é
efetuada pelo IBExpert.
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]
Yahoo! Grupos, um serviço oferecido por:
------------------------------------------------------------------------------
Links do Yahoo! Grupos
a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço
do Yahoo!.
------------------------------------------------------------------------------
No virus found in this incoming message.
Checked by AVG Anti-Virus.
Version: 7.0.344 / Virus Database: 267.11.9/115 - Release Date: 29/09/2005
[As partes desta mensagem que não continham texto foram removidas]
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]
Links do Yahoo! Grupos
<*> Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
<*> Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html
