Re: [delphi-br] Trigger estoque

[Ricardo Rocha]

  Grande Roni Rodrigo, era isto que eu precisava...

Muito obrigado

Re: [delphi-br] Trigger estoque

[Marciano Venter]

Olá Ricardo,

Você pode fazer assim,

update produto set
produto.prod_qtd = (prod_qtd + new.qtd),
*produto.valor = new.valor*
where prod_cod = new.prodcod;

Atenciosamente,

--
 Marciano Venter
Email: venter.marci...@gmail.com
Celular: (51) 9672 6093
venter.marci...@gmail.com
marcianoven...@hotmail.com
[image: Twitter] @ventermarciano
[image: 
Facebook]
Marciano
Venter


Em 13 de agosto de 2010 09:10, Ricardo Rocha
escreveu:

>
>
> Olá a todos,
>
> Tenho uma tabela de produto e um de entrada_produto, fiz um trigger
> (after post) para a tabela entrada_produto para atualizar o estouque,
> está funcionando blz...
> Mas como faço para implementar nesta trigger para atualizar também o
> valor do produto.
>
> segue o script da trigger:
>
> CREATE OR ALTER TRIGGER TG_ENTRADA FOR ENT_PRODUTO
> ACTIVE AFTER INSERT POSITION 0
> AS
> begin
> /* Trigger text */
> update produto
>
> set produto.prod_qtd = (prod_qtd + new.qtd)
> where prod_cod = new.prodcod;
> end
>
> Obrigado a todos
>
>  
>


[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:
delphi-br-ow...@yahoogrupos.com.br
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:
delphi-br-unsubscr...@yahoogrupos.com.br

<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

Re: [delphi-br] Trigger estoque

[Roni Rodrigo]

não seria só adicionar o campo valor no teu update?
update produto set produto.prod_qtd = (prod_qtd + new.qtd)*, 
produto.valor = new.valor*
where prod_cod = new.prodcod;

Em 13/08/2010 09:10, Ricardo Rocha escreveu:
> Olá a todos,
>
> Tenho uma tabela de produto e um de entrada_produto, fiz um trigger
> (after post) para a tabela entrada_produto para atualizar o estouque,
> está funcionando blz...
> Mas como faço para implementar nesta trigger para atualizar também o
> valor do produto.
>
> segue o script da trigger:
>
> CREATE OR ALTER TRIGGER TG_ENTRADA FOR ENT_PRODUTO
> ACTIVE AFTER INSERT POSITION 0
> AS
> begin
> /* Trigger text */
> update produto
>
> set produto.prod_qtd = (prod_qtd + new.qtd)
> where prod_cod = new.prodcod;
> end
>
> Obrigado a todos



[As partes desta mensagem que não continham texto foram removidas]

[delphi-br] Trigger estoque

[Ricardo Rocha]

  Olá a todos,

Tenho uma tabela de produto e um de entrada_produto, fiz um trigger 
(after post) para a tabela entrada_produto para atualizar o estouque, 
está funcionando blz...
Mas como faço para implementar nesta trigger para atualizar também o 
valor do produto.

segue o script da trigger:

CREATE OR ALTER TRIGGER TG_ENTRADA FOR ENT_PRODUTO
ACTIVE AFTER INSERT POSITION 0
AS
begin
   /* Trigger text */
  update produto

 set produto.prod_qtd = (prod_qtd + new.qtd)
 where prod_cod = new.prodcod;
end

Obrigado a todos

Re: [delphi-br] Trigger SQL Server

[Gleidison S. Bertolini]

não, se o documento ficar vazio pega o codigo que é sequencial...

Gleidison
  - Original Message - 
  From: Luiz Eduardo Oliveira Fonseca 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, August 30, 2006 7:28 PM
  Subject: Re: [delphi-br] Trigger SQL Server


  pelo q eu entendi ..

  nao é mais faciul vc setar um valor Default para o campo 

  falow .. me corriga se eu entendi errado ..

  On 8/30/06, Gleidison S. Bertolini <[EMAIL PROTECTED]> wrote:
  >
  > Como faço uma trigger para jogar um valor de um campo no outro caso um
  > estiver vazio??
  >
  > Exemplo: Se o Documento estiver vazio,  Documento recebe Codigo.
  >
  > A trigger tem que ser after insert pois o Codigo é Identy e gera
  > automático.
  >
  >
  > Obrigado
  >
  >
  > Gleidison
  >
  > [As partes desta mensagem que não continham texto foram removidas]
  >
  > 
  >



  -- 



  Atenciosamente, Luiz Eduardo.

  
  >> Desenvolvimento de Sistemas PHP e Delphi

  >> Manutenção em Base de Dados MySQL , Interbase/Firebird e MS Access ...

  Fone: (12) 8143-7191
  email alternativo: [EMAIL PROTECTED]

  


  [As partes desta mensagem que não continham texto foram removidas]

   

[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]
 
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

 

Re: [delphi-br] Trigger SQL Server

[Luiz Eduardo Oliveira Fonseca]

pelo q eu entendi ..

nao é mais faciul vc setar um valor Default para o campo 

falow .. me corriga se eu entendi errado ..

On 8/30/06, Gleidison S. Bertolini <[EMAIL PROTECTED]> wrote:
>
> Como faço uma trigger para jogar um valor de um campo no outro caso um
> estiver vazio??
>
> Exemplo: Se o Documento estiver vazio,  Documento recebe Codigo.
>
> A trigger tem que ser after insert pois o Codigo é Identy e gera
> automático.
>
>
> Obrigado
>
>
> Gleidison
>
> [As partes desta mensagem que não continham texto foram removidas]
>
> 
>



-- 



Atenciosamente, Luiz Eduardo.


>> Desenvolvimento de Sistemas PHP e Delphi

>> Manutenção em Base de Dados MySQL , Interbase/Firebird e MS Access ...

Fone: (12) 8143-7191
email alternativo: [EMAIL PROTECTED]




[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]
 
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

 

[delphi-br] Trigger SQL Server

[Gleidison S. Bertolini]

Como faço uma trigger para jogar um valor de um campo no outro caso um estiver 
vazio??

Exemplo: Se o Documento estiver vazio,  Documento recebe Codigo.

A trigger tem que ser after insert pois o Codigo é Identy e gera automático.


Obrigado


Gleidison

[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]
 
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

 

Re: [delphi-br] Trigger SQL Server

[Gleidison S. Bertolini]

É uma opção, mas tem coisas que não tem jeito, tem que preservar a 
integridade...

Gleidison
  - Original Message - 
  From: Ulisses 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, August 08, 2006 8:05 AM
  Subject: Re: [delphi-br] Trigger SQL Server


  Bom dia!

  Não seria melhor configurar a chave estrangeira em Cascata?

  Boa sorte.

  Ulisses
-Mensagem Original- 
De: Gleidison S. Bertolini 
Para: Grupo Delphi 
Enviada em: segunda-feira, 7 de agosto de 2006 16:53
Assunto: [delphi-br] Trigger SQL Server


Pessoal, estou fazendo uma trigger para deletar registros de uma tabela 
filha, onde eu uso o deleted??? 



CREATE TRIGGER DELETA_GRUPO_PERFIL ON Grupos FOR DELETE AS

BEGIN

Delete From R_Grupo_Perfil

Where a.Cod_Grupo = Old.Cod_Grupo

//FROM deleted OLD

END


[As partes desta mensagem que não continham texto foram removidas]



 

  [As partes desta mensagem que não continham texto foram removidas]

   

[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]
 
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

 

Re: [delphi-br] Trigger SQL Server

[Ulisses]

Bom dia!

Não seria melhor configurar a chave estrangeira em Cascata?

Boa sorte.

Ulisses
  -Mensagem Original- 
  De: Gleidison S. Bertolini 
  Para: Grupo Delphi 
  Enviada em: segunda-feira, 7 de agosto de 2006 16:53
  Assunto: [delphi-br] Trigger SQL Server


  Pessoal, estou fazendo uma trigger para deletar registros de uma tabela 
filha, onde eu uso o deleted??? 



  CREATE TRIGGER DELETA_GRUPO_PERFIL ON Grupos FOR DELETE AS

  BEGIN

  Delete From R_Grupo_Perfil

  Where a.Cod_Grupo = Old.Cod_Grupo

  //FROM deleted OLD

  END


  [As partes desta mensagem que não continham texto foram removidas]



   

[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]
 
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

 

[delphi-br] Trigger SQL Server

[Gleidison S. Bertolini]

Pessoal, estou fazendo uma trigger para deletar registros de uma tabela filha, 
onde eu uso o deleted??? 



CREATE TRIGGER DELETA_GRUPO_PERFIL ON Grupos FOR DELETE AS

BEGIN

Delete From R_Grupo_Perfil

Where a.Cod_Grupo = Old.Cod_Grupo

//FROM deleted OLD

END


[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]
 
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

 

Re: [delphi-br] TRIGGER faz com que Delphi emita Erro, porque?

[Carlos Delfino Carvalho Pinheiro]

Depois de ler boa parte do manual do SQL Server acabei descobrinod o
problema!

Infelizmente esta entre a cadeira e o teclado e SQL Server!

Quando faço um select em qualquer tabela, inclusive a que está sendo
alterada, é perdido o cursor para aquele registro que o delphi está
trabalhando!

 A solução para o problema é colocar o codigo do select e do update dentro
de uma stored procedure!

Assim ele cria um novo cursor para o contexto da Stored Procedure! não
interferindo no cursor da Trigger!


Em 23/02/06, Filipe <[EMAIL PROTECTED]> escreveu:
>
> vá em "Tools / debugger options / Language Exceptions"  e desmarque a
> caixa "Stop on Delphi exceptions".
>
> Não sei o que pode estar causando o erro, mas desta maneira talvez
> resolva, não mostrando a mensagem de erro.
>
>
>
> []'s
>
> Filipe Geyer
>
>
>   - Original Message -
>   From: Carlos Delfino Carvalho Pinheiro
>   To: delphi-br@yahoogrupos.com.br
>   Sent: Thursday, February 23, 2006 8:48 AM
>   Subject: [delphi-br] TRIGGER faz com que Delphi emita Erro, porque?
>
>
>   Pessoal, bons dias!
>
>   Estou com um probleminha aqui me "apurrinhando"!
>
>   Criei uma Trigger para validar a entrada de dados em uma tabela, mas
>   quando ativo esta Stored Procedure, o delphi emite o seguinte erro:
>
>   ---
>   Debugger Exception Notification
>   ---
>   Project GerenteItensDeEstoque.exe raised exception class EOleException
>   with message 'A linha não pode ser localizada para atualização. Alguns
>   valores podem ter sido alterados desde que ela foi lida pela última
>   vez'. Process stopped. Use Step or Run to continue.
>   ---
>   OK   Help
>   ---
>
>   Quando verifico a Tabela ela está integra, os dados foram todos
> armazenado!
>
>   Depois de depurar a aplicação percebi que o o post é feito
>   corretamente, e o problema ocorre quando vou acessar a tabela para
>   leitura. Já tentei fechar e abrir a tabela, mas achei isto muito
>   despendioso e não resouveu o problema pois como perco o registro
>   dentro do delphi não consigo achar a chave primaria!
>
>   abaixo segue a Trigger:
>   CREATE TRIGGER [ValidateItemDeEstoque] ON [siga][dbo].[ItemDeEstoque]
>   FOR INSERT, UPDATE
>   AS
>   BEGIN
> DECLARE @v_Codigo VARCHAR(13)
> -- PROCURA CODIGO EAN REPETIDO APOS A INSERÇÃO,
> -- IGNORANDO OS NULLOS E BRANCOS
> SELECT @v_Codigo = item.CodigoEAN
>   FROM ItemDeEstoque AS Item
>   INNER JOIN  INSERTED
> ON Item.CodigoEAN = inserted.CodigoEAN
> WHERE item.CodigoEAN IS NOT NULL
> AND item.CodigoEAN <> ''
> -- SE OUVER MAIS DE UMA LINHA COM O MESMO CODIGO ELE CANCELA A
> INSERÇÃO.
> IF (@@ROWCOUNT >1)
> BEGIN
>   RAISERROR('Codigo de EAN: %s  já cadastrado!', 11, 1,
> @v_Codigo)
>   ROLLBACK TRANSACTION
> END
> -- CASO NÃO EXISTA, ELE VÁLIDA O CODIGO
> ELSE
> BEGIN
>   -- SE O CODIGO EAN FOR BRANCO ELE DEFINE COMO NULO.
>   UPDATE ItemDeEstoque
> SET CodigoEAN = CASE REPLACE(CodigoEAN, ' ', '')
> WHEN '' THEN NULL
> ELSE CodigoEAN
>   END
> WHERE CodigoEAN IN (SELECT CodigoEAN FROM inserted)
> END
>   END
>
>
>
>
>   --
>   Carlos Delfino
>   Consultoria e Pesquisa
>   Desenvolvimento de Softwares.
>   Sun Certified Associate for Java Platform
>
>
>   --
>   <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
>
>
>
>
>
> Yahoo! Grupos, um serviço oferecido por:
>   PUBLICIDADE
>
>
>
>
>
> --
>   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!.
>
>
>
> [As partes desta mensagem que não continham texto foram removidas]
>
>
>
> --
> <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
>
>
>
>
>
>   *Yahoo! Grupos, um serviço ofereci

Re: [delphi-br] TRIGGER faz com que Delphi emita Erro, porque?

[Filipe]

vá em "Tools / debugger options / Language Exceptions"  e desmarque a caixa 
"Stop on Delphi exceptions".

Não sei o que pode estar causando o erro, mas desta maneira talvez resolva, não 
mostrando a mensagem de erro.



[]'s

Filipe Geyer


  - Original Message - 
  From: Carlos Delfino Carvalho Pinheiro 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, February 23, 2006 8:48 AM
  Subject: [delphi-br] TRIGGER faz com que Delphi emita Erro, porque?


  Pessoal, bons dias!

  Estou com um probleminha aqui me "apurrinhando"!

  Criei uma Trigger para validar a entrada de dados em uma tabela, mas
  quando ativo esta Stored Procedure, o delphi emite o seguinte erro:

  ---
  Debugger Exception Notification
  ---
  Project GerenteItensDeEstoque.exe raised exception class EOleException
  with message 'A linha não pode ser localizada para atualização. Alguns
  valores podem ter sido alterados desde que ela foi lida pela última
  vez'. Process stopped. Use Step or Run to continue.
  ---
  OK   Help
  ---

  Quando verifico a Tabela ela está integra, os dados foram todos armazenado!

  Depois de depurar a aplicação percebi que o o post é feito
  corretamente, e o problema ocorre quando vou acessar a tabela para
  leitura. Já tentei fechar e abrir a tabela, mas achei isto muito
  despendioso e não resouveu o problema pois como perco o registro
  dentro do delphi não consigo achar a chave primaria!

  abaixo segue a Trigger:
  CREATE TRIGGER [ValidateItemDeEstoque] ON [siga][dbo].[ItemDeEstoque]
  FOR INSERT, UPDATE
  AS
  BEGIN
DECLARE @v_Codigo VARCHAR(13)
-- PROCURA CODIGO EAN REPETIDO APOS A INSERÇÃO,
-- IGNORANDO OS NULLOS E BRANCOS
SELECT @v_Codigo = item.CodigoEAN
  FROM ItemDeEstoque AS Item
  INNER JOIN  INSERTED
ON Item.CodigoEAN = inserted.CodigoEAN
WHERE item.CodigoEAN IS NOT NULL
AND item.CodigoEAN <> ''
-- SE OUVER MAIS DE UMA LINHA COM O MESMO CODIGO ELE CANCELA A INSERÇÃO.
IF (@@ROWCOUNT >1)
BEGIN
  RAISERROR('Codigo de EAN: %s  já cadastrado!', 11, 1, @v_Codigo)
  ROLLBACK TRANSACTION
END
-- CASO NÃO EXISTA, ELE VÁLIDA O CODIGO
ELSE
BEGIN
  -- SE O CODIGO EAN FOR BRANCO ELE DEFINE COMO NULO.
  UPDATE ItemDeEstoque
SET CodigoEAN = CASE REPLACE(CodigoEAN, ' ', '')
WHEN '' THEN NULL
ELSE CodigoEAN
  END
WHERE CodigoEAN IN (SELECT CodigoEAN FROM inserted)
END
  END




  --
  Carlos Delfino
  Consultoria e Pesquisa
  Desenvolvimento de Softwares.
  Sun Certified Associate for Java Platform


  -- 
  <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>





Yahoo! Grupos, um serviço oferecido por: 
  PUBLICIDADE

   


--
  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!. 



[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]
 
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

 

[delphi-br] TRIGGER faz com que Delphi emita Erro, porque?

[Carlos Delfino Carvalho Pinheiro]

Pessoal, bons dias!

Estou com um probleminha aqui me "apurrinhando"!

Criei uma Trigger para validar a entrada de dados em uma tabela, mas
quando ativo esta Stored Procedure, o delphi emite o seguinte erro:

---
Debugger Exception Notification
---
Project GerenteItensDeEstoque.exe raised exception class EOleException
with message 'A linha não pode ser localizada para atualização. Alguns
valores podem ter sido alterados desde que ela foi lida pela última
vez'. Process stopped. Use Step or Run to continue.
---
OK   Help
---

Quando verifico a Tabela ela está integra, os dados foram todos armazenado!

Depois de depurar a aplicação percebi que o o post é feito
corretamente, e o problema ocorre quando vou acessar a tabela para
leitura. Já tentei fechar e abrir a tabela, mas achei isto muito
despendioso e não resouveu o problema pois como perco o registro
dentro do delphi não consigo achar a chave primaria!

abaixo segue a Trigger:
CREATE TRIGGER [ValidateItemDeEstoque] ON [siga][dbo].[ItemDeEstoque]
FOR INSERT, UPDATE
AS
BEGIN
DECLARE @v_Codigo VARCHAR(13)
-- PROCURA CODIGO EAN REPETIDO APOS A INSERÇÃO,
-- IGNORANDO OS NULLOS E BRANCOS
SELECT @v_Codigo = item.CodigoEAN
FROM ItemDeEstoque AS Item
INNER JOIN  INSERTED
ON Item.CodigoEAN = inserted.CodigoEAN
WHERE item.CodigoEAN IS NOT NULL
AND item.CodigoEAN <> ''
-- SE OUVER MAIS DE UMA LINHA COM O MESMO CODIGO ELE CANCELA A INSERÇÃO.
IF (@@ROWCOUNT >1)
BEGIN
RAISERROR('Codigo de EAN: %s  já cadastrado!', 11, 1, @v_Codigo)
ROLLBACK TRANSACTION
END
-- CASO NÃO EXISTA, ELE VÁLIDA O CODIGO
ELSE
BEGIN
-- SE O CODIGO EAN FOR BRANCO ELE DEFINE COMO NULO.
UPDATE ItemDeEstoque
SET CodigoEAN = CASE REPLACE(CodigoEAN, ' ', '')
WHEN '' THEN NULL
ELSE CodigoEAN
END
WHERE CodigoEAN IN (SELECT CodigoEAN FROM inserted)
END
END




--
Carlos Delfino
Consultoria e Pesquisa
Desenvolvimento de Softwares.
Sun Certified Associate for Java Platform


-- 
< 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]
 
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

 

Re: [delphi-br] Trigger e tela

[Jefferson]

O banco é mesmo o Firebird, desculpe não ter mencionado.
Creio que me expressei errado. Assim, imagine um cadastro de clientes, eu 
gostaria que após a gravação do registro, já fosse exibir o número do cadastro, 
de acordo com o generator.

É isso, apresentar o número logo após o Post na base de dados.
  - Original Message - 
  From: Andrei Luís 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Friday, December 02, 2005 10:02 AM
  Subject: Re: [delphi-br] Trigger e tela


  Como você não mencionou o banco, vou considerar o Firebird.

  Você vai ter que fazer um select chamando a função Gen_ID, a mesma que
  é utilizada na trigger, só que não passe 1 como parâmetro, e sim 0.

  Você pode fazer um select assim: Select gen_id(seu_generator, 0) from
  rdb$database

  []
  Andrei

  Em 30/11/05, Jefferson<[EMAIL PROTECTED]> escreveu:
  > Mestres, preciso fazer uma pergunta que me persegue há tempos.
  >
  > Tenho uma base, com trigger e generators. Minha pergunta é: como fazer (da 
maneira mais correta) pra assim que inserir um registro, o número envolvido no 
generator, seja aprensentado na tela?
  >
  > Obrigado e desculpem a inocência da pergunta!
  >


  -- 
  <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>





Yahoo! Grupos, um serviço oferecido por: 
  PUBLICIDADE

   


--
  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!. 



[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]
 
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

 

Re: [delphi-br] Trigger e tela

[Vitor Luiz Redes]

Você deve recuperar o registro do banco de dados novamente. Ou usando um 
Refresh, ou apontando no último registro da tabela em questão... de qualquer 
forma, utilizar triggers para auto-incremento quando o mesmo deve sr 
visualizado não é uma boa idéia... nestes casos, pq não tenta uitilizar um MAX 
no campo desejado, ou uma tabela de incrementos a parte ?
Se vc utilizar um MAX por ex: Depis de inserir o registro, vc pode fazer um 
select na tabela em questão...

SELECT MAX( CAMPO ) + 1 FROM TABELA

E mostrar o código para o usuário... e no final, talvez fazer outro MAX 
para verificar se outro registro foi inserido ou não... ou... fazer um select 
somente antes de gravar, mostrando o código ao usuário depois da gravação do 
registro...

Com uma tabela a parte, ficaria mais ou menos parecido...

Vitor.

  - Original Message - 
  From: Jefferson 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, November 30, 2005 2:50 PM
  Subject: [delphi-br] Trigger e tela


  Mestres, preciso fazer uma pergunta que me persegue há tempos.

  Tenho uma base, com trigger e generators. Minha pergunta é: como fazer (da 
maneira mais correta) pra assim que inserir um registro, o número envolvido no 
generator, seja aprensentado na tela?

  Obrigado e desculpem a inocência da pergunta!

  [As partes desta mensagem que não continham texto foram removidas]





  -- 
  <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>





Yahoo! Grupos, um serviço oferecido por: 
  PUBLICIDADE

   


--
  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!. 



[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]
 
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

 

Re: [delphi-br] Trigger e tela

[Andrei Luís]

Aí eu não sei.

:-(
Andrei

Em 02/12/05, Gabriel Filho<[EMAIL PROTECTED]> escreveu:
> Andrei, aproveitanto a pergunta, tem algo parecido com SQL SERVER2000 ?
>
> Em 02/12/05, Andrei Luís <[EMAIL PROTECTED]> escreveu:
> >
> > Como você não mencionou o banco, vou considerar o Firebird.
> >
> > Você vai ter que fazer um select chamando a função Gen_ID, a mesma que
> > é utilizada na trigger, só que não passe 1 como parâmetro, e sim 0.
> >
> > Você pode fazer um select assim: Select gen_id(seu_generator, 0) from
> > rdb$database
> >
> > []
> > Andrei
> >
> > Em 30/11/05, Jefferson<[EMAIL PROTECTED]> escreveu:
> > > Mestres, preciso fazer uma pergunta que me persegue há tempos.
> > >
> > > Tenho uma base, com trigger e generators. Minha pergunta é: como fazer
> > (da maneira mais correta) pra assim que inserir um registro, o número
> > envolvido no generator, seja aprensentado na tela?
> > >
> > > Obrigado e desculpem a inocência da pergunta!
> > >
> >


-- 
< 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]
 
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

 

Re: [delphi-br] Trigger e tela

[Gabriel Filho]

Andrei, aproveitanto a pergunta, tem algo parecido com SQL SERVER2000 ?

Em 02/12/05, Andrei Luís <[EMAIL PROTECTED]> escreveu:
>
> Como você não mencionou o banco, vou considerar o Firebird.
>
> Você vai ter que fazer um select chamando a função Gen_ID, a mesma que
> é utilizada na trigger, só que não passe 1 como parâmetro, e sim 0.
>
> Você pode fazer um select assim: Select gen_id(seu_generator, 0) from
> rdb$database
>
> []
> Andrei
>
> Em 30/11/05, Jefferson<[EMAIL PROTECTED]> escreveu:
> > Mestres, preciso fazer uma pergunta que me persegue há tempos.
> >
> > Tenho uma base, com trigger e generators. Minha pergunta é: como fazer
> (da maneira mais correta) pra assim que inserir um registro, o número
> envolvido no generator, seja aprensentado na tela?
> >
> > Obrigado e desculpem a inocência da pergunta!
> >
>
>
> --
> < FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >
>
>
>
> Links do Yahoo! Grupos
>
>
>
>
>
>
>
>


[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]
 
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

 

Re: [delphi-br] Trigger e tela

[Andrei Luís]

Como você não mencionou o banco, vou considerar o Firebird.

Você vai ter que fazer um select chamando a função Gen_ID, a mesma que
é utilizada na trigger, só que não passe 1 como parâmetro, e sim 0.

Você pode fazer um select assim: Select gen_id(seu_generator, 0) from
rdb$database

[]
Andrei

Em 30/11/05, Jefferson<[EMAIL PROTECTED]> escreveu:
> Mestres, preciso fazer uma pergunta que me persegue há tempos.
>
> Tenho uma base, com trigger e generators. Minha pergunta é: como fazer (da 
> maneira mais correta) pra assim que inserir um registro, o número envolvido 
> no generator, seja aprensentado na tela?
>
> Obrigado e desculpem a inocência da pergunta!
>


-- 
< 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]
 
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

 

[delphi-br] Trigger e tela

[Jefferson]

Mestres, preciso fazer uma pergunta que me persegue há tempos.

Tenho uma base, com trigger e generators. Minha pergunta é: como fazer (da 
maneira mais correta) pra assim que inserir um registro, o número envolvido no 
generator, seja aprensentado na tela?

Obrigado e desculpem a inocência da pergunta!

[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]
 
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

 

Re: RES: [delphi-br] Trigger no Firebird nao dispara

[Celio Ricardo]

Na mosca, Madsom...
Era isso mesmo =)

Elazar, obrigado pela forca, ja funcionou =}



--- Em delphi-br@yahoogrupos.com.br, " Madsom Silva"
<[EMAIL PROTECTED]> escreveu
> Celio,
> tem duas alterações :
> AFTER por BEFORE e
> 10 por 0
> a alteração está sendo feita depois da gravação o certo seria antes.
> Sem mais.
> Madsom.
>   -Mensagem original-
>   De: delphi-br@yahoogrupos.com.br
[mailto:[EMAIL PROTECTED]
> nome de Celio Ricardo
>   Enviada em: segunda-feira, 10 de outubro de 2005 18:00
>   Para: delphi-br@yahoogrupos.com.br
>   Assunto: [delphi-br] Trigger no Firebird nao dispara
> 
> 
>   Estou tentando criar triggers no FB, sem sucesso.
>   Estou utilizando o EMS IBMANAGER para cria-los.
> 
>   Fiz esse trigger, que é o único no evento afterinsert da tabela
>   ISaida, onde ele verifica se o campo USARCOMNEG esta T ou F, e,
>   dependendo da condicao insere um valor total no campo VLCOMISSAONEG.
>   Os campos VLCOMISSAO e VLCOMISSAONEG sao da propria tabela tambem.
> 
>   CREATE TRIGGER VERIFICA_COMISSAO_USADA FOR ISAIDA ACTIVE
>   AFTER INSERT POSITION 10
>   AS
>   BEGIN
> new.vlcomissaovenda = 0;
> if (new.usarcomneg = 'T') then
>   new.vlcomissaovenda = new.vlcomissaoneg;
> else
>   new.vlcomissaovenda = new.vlcomissao;
>   END
> 
>   Alguem poderia me ajudar, estou pirando =)
> 
> 
> 
> 
>   --
>   <<<<< 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 outgoing message.
> Checked by AVG Anti-Virus.
> Version: 7.0.344 / Virus Database: 267.11.14/128 - Release Date:
10/10/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

 

RES: [delphi-br] Trigger no Firebird nao dispara

[Madsom Silva]

Na própria tabela, sem dar update de forma explícita ?
Blza então, pois no meu não funcionou.
Inclusive no Oracle da erro na criação da trigger, ele nem deixa criar pois
não faz sentido alterar o conteudo do atributo depois do registro gravado.
Queria ter ajudado.
Madsom.


 -Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
nome de Elazar
Enviada em: terça-feira, 11 de outubro de 2005 08:38
Para: delphi-br@yahoogrupos.com.br
Assunto: RES: [delphi-br] Trigger no Firebird nao dispara


  ja fiz muita trigger com alteracao depois e funcionou

  -Mensagem original-
  De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
  Em nome de Madsom Silva
  Enviada em: segunda-feira, 10 de outubro de 2005 19:15
  Para: delphi-br@yahoogrupos.com.br
  Assunto: RES: [delphi-br] Trigger no Firebird nao dispar a


  Celio,
  tem duas alterações :
  AFTER por BEFORE e
  10 por 0
  a alteração está sendo feita depois da gravação o certo seria antes.
  Sem mais.
  Madsom.
-Mensagem original-
De: delphi-br@yahoogrupos.com.br
  [mailto:[EMAIL PROTECTED]
  nome de Celio Ricardo
Enviada em: segunda-feira, 10 de outubro de 2005 18:00
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Trigger no Firebird nao dispara


Estou tentando criar triggers no FB, sem sucesso.
Estou utilizando o EMS IBMANAGER para cria-los.

Fiz esse trigger, que é o único no evento afterinsert da tabela
ISaida, onde ele verifica se o campo USARCOMNEG esta T ou F, e,
dependendo da condicao insere um valor total no campo VLCOMISSAONEG.
Os campos VLCOMISSAO e VLCOMISSAONEG sao da propria tabela tambem.

CREATE TRIGGER VERIFICA_COMISSAO_USADA FOR ISAIDA ACTIVE
AFTER INSERT POSITION 10
AS
BEGIN
  new.vlcomissaovenda = 0;
  if (new.usarcomneg = 'T') then
new.vlcomissaovenda = new.vlcomissaoneg;
  else
new.vlcomissaovenda = new.vlcomissao;
END

Alguem poderia me ajudar, estou pirando =)




--
<<<<< 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 outgoing message.
  Checked by AVG Anti-Virus.
  Version: 7.0.344 / Virus Database: 267.11.14/128 - Release Date:
  10/10/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]




  Yahoo! Grupos, um serviço oferecido por:

  <http://br.i1.yimg.com/br.yimg.com/i/071005_324418_pop_ps2_celv550.gif>


_

  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]
  <mailto:[EMAIL PROTECTED]>


  *  O uso que você faz do Yahoo! Grupos está sujeito aos Termos do
  Serviço do Yahoo! <http://br.yahoo.com/info/utos.html> .




  [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]



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 outgoing message.
Checked by AVG Anti-Virus.
Version: 7.0.344 / Virus Database: 267.11.14/129 - Release Date: 11/10/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, ac

RES: RES: [delphi-br] Trigger no Firebird nao dispara

[Elazar]

Cara, me passa o create da tabela que eu te ajudo!

-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
Em nome de Celio Ricardo
Enviada em: segunda-feira, 10 de outubro de 2005 18:27
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: RES: [delphi-br] Trigger no Firebird nao dispara


Elazar, obrigado por responder.

Eu mudei o position para ver se funcionava. 
Nao funciona de forma nenhuma, estou desconfiado que, talvez,
meu FB precise de alguma configuracao de acesso para poder executar
triggers (os campos que sao autocalculados funcionam).

Se puder ajudar, agradeco...


--- Em delphi-br@yahoogrupos.com.br, "Elazar" <[EMAIL PROTECTED]> escreveu

> nao chegeui a testar, mas tente deixar o POSITION  em 0





-- 
<<<<< 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:
 
<http://br.i1.yimg.com/br.yimg.com/i/071005_324418_pop_notebooks_c.gif>


  _  

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]
<mailto:[EMAIL PROTECTED]> 
  

*   O uso que você faz do Yahoo! Grupos está sujeito aos Termos do
Serviço do Yahoo! <http://br.yahoo.com/info/utos.html> . 




[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

 

RES: [delphi-br] Trigger no Firebird nao dispara

[Elazar]

ja fiz muita trigger com alteracao depois e funcionou

-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
Em nome de Madsom Silva
Enviada em: segunda-feira, 10 de outubro de 2005 19:15
Para: delphi-br@yahoogrupos.com.br
Assunto: RES: [delphi-br] Trigger no Firebird nao dispara


Celio,
tem duas alterações :
AFTER por BEFORE e
10 por 0
a alteração está sendo feita depois da gravação o certo seria antes.
Sem mais.
Madsom.
  -Mensagem original-
  De: delphi-br@yahoogrupos.com.br
[mailto:[EMAIL PROTECTED]
nome de Celio Ricardo
  Enviada em: segunda-feira, 10 de outubro de 2005 18:00
  Para: delphi-br@yahoogrupos.com.br
  Assunto: [delphi-br] Trigger no Firebird nao dispara


  Estou tentando criar triggers no FB, sem sucesso.
  Estou utilizando o EMS IBMANAGER para cria-los.

  Fiz esse trigger, que é o único no evento afterinsert da tabela
  ISaida, onde ele verifica se o campo USARCOMNEG esta T ou F, e,
  dependendo da condicao insere um valor total no campo VLCOMISSAONEG.
  Os campos VLCOMISSAO e VLCOMISSAONEG sao da propria tabela tambem.

  CREATE TRIGGER VERIFICA_COMISSAO_USADA FOR ISAIDA ACTIVE
  AFTER INSERT POSITION 10
  AS
  BEGIN
new.vlcomissaovenda = 0;
if (new.usarcomneg = 'T') then
  new.vlcomissaovenda = new.vlcomissaoneg;
else
  new.vlcomissaovenda = new.vlcomissao;
  END

  Alguem poderia me ajudar, estou pirando =)




  --
  <<<<< 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 outgoing message.
Checked by AVG Anti-Virus.
Version: 7.0.344 / Virus Database: 267.11.14/128 - Release Date:
10/10/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]




Yahoo! Grupos, um serviço oferecido por:
 
<http://br.i1.yimg.com/br.yimg.com/i/071005_324418_pop_ps2_celv550.gif>


  _  

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]
<mailto:[EMAIL PROTECTED]> 
  

*   O uso que você faz do Yahoo! Grupos está sujeito aos Termos do
Serviço do Yahoo! <http://br.yahoo.com/info/utos.html> . 




[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

 

RES: [delphi-br] Trigger no Firebird nao dispara

[Madsom Silva]

Celio,
tem duas alterações :
AFTER por BEFORE e
10 por 0
a alteração está sendo feita depois da gravação o certo seria antes.
Sem mais.
Madsom.
  -Mensagem original-
  De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
nome de Celio Ricardo
  Enviada em: segunda-feira, 10 de outubro de 2005 18:00
  Para: delphi-br@yahoogrupos.com.br
  Assunto: [delphi-br] Trigger no Firebird nao dispara


  Estou tentando criar triggers no FB, sem sucesso.
  Estou utilizando o EMS IBMANAGER para cria-los.

  Fiz esse trigger, que é o único no evento afterinsert da tabela
  ISaida, onde ele verifica se o campo USARCOMNEG esta T ou F, e,
  dependendo da condicao insere um valor total no campo VLCOMISSAONEG.
  Os campos VLCOMISSAO e VLCOMISSAONEG sao da propria tabela tambem.

  CREATE TRIGGER VERIFICA_COMISSAO_USADA FOR ISAIDA ACTIVE
  AFTER INSERT POSITION 10
  AS
  BEGIN
new.vlcomissaovenda = 0;
if (new.usarcomneg = 'T') then
  new.vlcomissaovenda = new.vlcomissaoneg;
else
  new.vlcomissaovenda = new.vlcomissao;
  END

  Alguem poderia me ajudar, estou pirando =)




  --
  <<<<< 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 outgoing message.
Checked by AVG Anti-Virus.
Version: 7.0.344 / Virus Database: 267.11.14/128 - Release Date: 10/10/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

 

Re: RES: [delphi-br] Trigger no Firebird nao dispara

[Celio Ricardo]

Elazar, obrigado por responder.

Eu mudei o position para ver se funcionava. 
Nao funciona de forma nenhuma, estou desconfiado que, talvez,
meu FB precise de alguma configuracao de acesso para poder executar
triggers (os campos que sao autocalculados funcionam).

Se puder ajudar, agradeco...


--- Em delphi-br@yahoogrupos.com.br, "Elazar" <[EMAIL PROTECTED]> escreveu

> nao chegeui a testar, mas tente deixar o POSITION  em 0





-- 
< 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

 

RES: [delphi-br] Trigger no Firebird nao dispara

[Elazar]

nao chegeui a testar, mas tente deixar o POSITION  em 0
 -Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
Em nome de Celio Ricardo
Enviada em: segunda-feira, 10 de outubro de 2005 18:00
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Trigger no Firebird nao dispara


Estou tentando criar triggers no FB, sem sucesso.
Estou utilizando o EMS IBMANAGER para cria-los.

Fiz esse trigger, que é o único no evento afterinsert da tabela
ISaida, onde ele verifica se o campo USARCOMNEG esta T ou F, e,
dependendo da condicao insere um valor total no campo VLCOMISSAONEG.
Os campos VLCOMISSAO e VLCOMISSAONEG sao da propria tabela tambem.

CREATE TRIGGER VERIFICA_COMISSAO_USADA FOR ISAIDA ACTIVE
AFTER INSERT POSITION 10
AS
BEGIN
  new.vlcomissaovenda = 0;
  if (new.usarcomneg = 'T') then
new.vlcomissaovenda = new.vlcomissaoneg;
  else
new.vlcomissaovenda = new.vlcomissao;
END

Alguem poderia me ajudar, estou pirando =)




-- 
<<<<< 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:
 
<http://br.i1.yimg.com/br.yimg.com/i/071005_324418_pop_ps2_celv550.gif>


  _  

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]
<mailto:[EMAIL PROTECTED]> 
  

*   O uso que você faz do Yahoo! Grupos está sujeito aos Termos do
Serviço do Yahoo! <http://br.yahoo.com/info/utos.html> . 




[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

 

[delphi-br] Trigger no Firebird nao dispara

[Celio Ricardo]

Estou tentando criar triggers no FB, sem sucesso.
Estou utilizando o EMS IBMANAGER para cria-los.

Fiz esse trigger, que é o único no evento afterinsert da tabela
ISaida, onde ele verifica se o campo USARCOMNEG esta T ou F, e,
dependendo da condicao insere um valor total no campo VLCOMISSAONEG.
Os campos VLCOMISSAO e VLCOMISSAONEG sao da propria tabela tambem.

CREATE TRIGGER VERIFICA_COMISSAO_USADA FOR ISAIDA ACTIVE
AFTER INSERT POSITION 10
AS
BEGIN
  new.vlcomissaovenda = 0;
  if (new.usarcomneg = 'T') then
new.vlcomissaovenda = new.vlcomissaoneg;
  else
new.vlcomissaovenda = new.vlcomissao;
END

Alguem poderia me ajudar, estou pirando =)




-- 
< 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

 

Re: [delphi-br] Trigger (Iniciante)

[Renato Yahoo]

Blz Cristianao!

Eu uso uma trigger para inserir os dados na tabela
assim:

Create Trigger TInsertNomedatabela
On Nomedatabela
For Insert
As
  Update Nomedatabela
  Set nomedatabela.codigo = IsNull((Select Max(codigo) From nomedatabela),0)+1
  Where nomedatabela.codigo = (Select codigo From Inserted)


  - Original Message - 
  From: Cristiano Rodrigo Gomes 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, August 25, 2005 9:46 AM
  Subject: [delphi-br] Trigger (Iniciante)


  Bom dia a todos, se alguém puder me ajudar.

  Tenho as seguintes tabelas com os seguintes campos:

  TABELA NOTACOMPRA

  CODIGO
  NUMERONOTA
  DATANOTA
  VALORNOTA

  TABELA ITENSCOMPRA

  CODIGO
  NUMERONOTA
  CODIGOPRODUTO
  QUANTIADADEVALOR

  O que gostaria de fazer é o seguinte. Quando cadastrar o tem gostaria de 
  criar uma trigger para que ela de entrada no estoque na tabela de produtos.

  TABELA PRODUTOS

  CODIGO
  DESCRIÇÃO
  QUANTIDADE


  Se alguém puder me ajudar

  Utilizo o firebird 1.5 e Delphi 7

  Cristiano.

  _
  MSN Hotmail, o maior webmail do Brasil. http://www.hotmail.com



  -- 
  <<<<< 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!. 



[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

 

[delphi-br] Trigger (Iniciante)

[Cristiano Rodrigo Gomes]

Bom dia a todos, se alguém puder me ajudar.

Tenho as seguintes tabelas com os seguintes campos:

TABELA NOTACOMPRA

CODIGO
NUMERONOTA
DATANOTA
VALORNOTA

TABELA ITENSCOMPRA

CODIGO
NUMERONOTA
CODIGOPRODUTO
QUANTIADADEVALOR

O que gostaria de fazer é o seguinte. Quando cadastrar o tem gostaria de 
criar uma trigger para que ela de entrada no estoque na tabela de produtos.

TABELA PRODUTOS

CODIGO
DESCRIÇÃO
QUANTIDADE


Se alguém puder me ajudar

Utilizo o firebird 1.5 e Delphi 7

Cristiano.

_
MSN Hotmail, o maior webmail do Brasil. http://www.hotmail.com



-- 
< 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

 

[delphi-br] Trigger FireBird 1.5

[Gabriel Ferrarini]

Olá.

Preciso de uma ajuda com um trigger.
É o seguinte:

Tenho 3 tabelas (os campos com * são as chaves estrangeiras).

PRODUTO {
CODIGO,
DESCRICAO,
*GRUPO,
*MARCA
}

ITEM_PRODUTO {
*CODIGO (Código do produto),
ITEM,
*UNIDADE,
*TAMANHO,
*COR
}

ATUALIZACAO_PRECO {
CODIGO,
*GRUPO,
*MARCA,
*UNIDADE,
*TAMANHO,
*ITEM,
PERCENTUAL
}

Tenho um programa que gera uma insersão na tabela ATUALIZACAO_PRECO. Nesse 
programa informo o Grupo, a marca, unidade, tamanho e cor para os quais desejo 
que o preço seja atualizado. Quero que no After Insert desa tabela um trigger 
seja disparado alterando apenas os registros que coincidam com os campos 
informados com um detalhe: caso um campo esteja em branco, TODOS os registro 
serão alterados, independente daquele campo, ou seja, será como um TRAGA TODOS 
SE ESTIVER EM BRANCO.

Obrigado.
Gabriel.

[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

 

Re: [delphi-br] Trigger Sql-Server -> Firebird

[Artur Anjos]

Carlos Eduardo L. de Souza wrote:
> 
> Olá a todos,
> Tenho um Sistema usando Firebird que precisa se comunicar com um
> sistema em Sql-Server. Eu preciso que Ao incluir/Alterar/Deletar
> qualquer registro na tabela de clientes no Sql-server dispare uma
> Trigger que inclua/altere/delete o registro correspondente no Firebird.
> Alguém sabe por onde devo começar? Eu preferia ter um executável em
> Delphi rodando no servidor que capturasse a execução de uma trigger no
> sql-server e fizesse as atualizações no Firebird. Ou talvez usando o
> recurso DTS do Sql-server (que eu acabei de ler no help que acho que
> serve para isso).
> Se alguém tiver sugestões eu agradeço (qualquer que seja).
> Eduardo

Olá Eduardo,

Penso que você não vai ter muitas mais hipóteses do que construir esse 
seu executável...
O que o aconselho a fazer é uma solução 'mista': altere as triggers do 
SQL server para construir uma tabela temporária de modificações. O seu 
executável deverá ler dessa tabela sequencialmente e aplicar as 
alterações no Firebird. Pode não ser tão simples como isto, 
principalmente se você precisar de alguma validação.

Artur



-- 
< 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

 

Re: [delphi-br] Trigger

[Daniel Bastos]

SET TERM ^ ;

CREATE TRIGGER  FOR Viagem
ACTIVE AFTER UPDATE POSITION 0
AS
begin
   update Historico_Viagem HV set
 HV.dt_Inicio = new.dt_inicio,
 HV.dt_Fim= new.dt_fim,
 HV.horario   = new.horario
   where
 HV.Cod   = Old.cod
end
^
SET TERM ; ^

Isto supondo que o "COD" seja sua chave primÃria e que seja igual para as  
duas tabelas.

Triggers sÃo acionadas automaticamente(caso esteja ativa) apÃs um evento  
ocorrido com a tabela que està relacionada.

No exemplo acima por exemplo, ela ser ativada DEPOIS que a tabela "Viagem"  
for ALTERADA.
Consequentemente nÃo ha necessidade de ser ativada pelo delphi.

Obs:
   1 ) - A criaÃÃo da trigger foi feita para o Firebird/Interbase. Se vc  
usa outro banco, a sitaxe pode ser diferente.
   2 ) - Se eu estiver errado, alguem me corrige pq faz um tempo que eu num  
crio uma trigger.

Valeu

---
   Daniel A. Bastos /:,]

Em Wed, 06 Oct 2004 20:05:12 -, er83pet04 <[EMAIL PROTECTED]> escreveu:

>
>
> Pessoal,
>
> Estou com um problema, alguÃm pode me ajudar???
>
> Tenho a tabela:
>
> VIAGEM(COD, DT_INICIO, DT_FIM, HORARIO, ...)
>
> e uma outra tabela chamada:
>
> HISTORICO_VIAGEM(COD, DT_INICIO, DT_FIM, HORARIO, ...)
>
> A tabela HISTORICO_VIAGEM deve guardar todas as movimentaÃÃes
> (alteraÃÃes e/ou exclusÃes) que forem feitas na tabela VIAGEM.
> Ou seja quando o usuÃrio tentar alterar o valor do campo DT_INICIO
> ou de qualquer outra o trigger deve ser disparado.
> Tentei criar um trigger para ser disparado ao deletar ou alterar um
> dado na tabela viagem mas nÃo està dando certo.
> Como deve ser esse trigger? Ele deve copiar os campos da tabela
> viagem para o histÃrico? Como?
> Como disparo ele na minha aplicaÃÃo, pelo Delphi?



-- 
< 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

 

[delphi-br] Trigger

[er83pet04]

Pessoal,

Estou com um problema, alguém pode me ajudar???

Tenho a tabela:

VIAGEM(COD, DT_INICIO, DT_FIM, HORARIO, ...)

e uma outra tabela chamada:

HISTORICO_VIAGEM(COD, DT_INICIO, DT_FIM, HORARIO, ...) 

A tabela HISTORICO_VIAGEM deve guardar todas as movimentações 
(alterações e/ou exclusões) que forem feitas na tabela VIAGEM.
Ou seja quando o usuário tentar alterar o valor do campo DT_INICIO 
ou de qualquer outra o trigger deve ser disparado. 
Tentei criar um trigger para ser disparado ao deletar ou alterar um 
dado na tabela viagem mas não está dando certo.
Como deve ser esse trigger? Ele deve copiar os campos da tabela 
viagem para o histórico? Como?
Como disparo ele na minha aplicação, pelo Delphi?





-- 
< 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

 

[delphi-br] Trigger Sql-Server -> Firebird

[Carlos Eduardo L. de Souza]

Olá a todos,
Tenho um Sistema usando Firebird que precisa se comunicar com um
sistema em Sql-Server. Eu preciso que Ao incluir/Alterar/Deletar
qualquer registro na tabela de clientes no Sql-server dispare uma
Trigger que inclua/altere/delete o registro correspondente no Firebird.
Alguém sabe por onde devo começar? Eu preferia ter um executável em
Delphi rodando no servidor que capturasse a execução de uma trigger no
sql-server e fizesse as atualizações no Firebird. Ou talvez usando o
recurso DTS do Sql-server (que eu acabei de ler no help que acho que
serve para isso).
Se alguém tiver sugestões eu agradeço (qualquer que seja).
Eduardo





-- 
< 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