[firebase-br] Sobre Trigger...

Roberto - Sui Generis roberto em suigenerisinf.com.br
Ter Ago 16 08:52:54 -03 2005


Tenho a trigger abaixo, para toda vez que Insiro, Atualizo ou deleto um
registro a tabela SALDO_ESTOQUE deve ser atualizada (guardando o saldo por
dia e por item), mas as vezes a trigger não é disparada.... Alguém saberia o
porque ???


CREATE TRIGGER PRODUTOS_AIUD1 FOR PRODUTOS
ACTIVE AFTER INSERT OR UPDATE OR DELETE POSITION 1
AS
declare variable vProduto Varchar(20);
begin
  select ITEM_ID from SALDO_ESTOQUE
  where ((EMPRESA_ID = NEW.EMPRESA_ID) and (DATA = CURRENT_DATE) and
(ITEM_ID = NEW.ITEM_ID))
  into :vPRODUTO;
  if (:vPRODUTO is null) then
    insert into SALDO_ESTOQUE (EMPRESA_ID, DATA, ITEM_ID, SALDO_ATUAL,
SALDO_PEDIDO, SALDO_RESERVADO) values (NEW.EMPRESA_ID, CURRENT_DATE,
NEW.ITEM_ID, NEW.EST_ATUAL, NEW.EST_PEDIDO, NEW.EST_RESERV);
  else
    update SALDO_ESTOQUE set SALDO_ATUAL = NEW.EST_ATUAL, SALDO_PEDIDO =
NEW.EST_PEDIDO, SALDO_RESERVADO = NEW.EST_RESERV where (EMPRESA_ID =
NEW.EMPRESA_ID) and (DATA = CURRENT_DATE) and (ITEM_ID = NEW.ITEM_ID);
end

[]'s
       Roberto Krug
  Sui Generis Informática
Novo Hamburgo - RS - Brasil
roberto em suigenerisinf.com.br
  Interbase / Firebird DBA
    Delphi 7 - IBX 7.08





Mais detalhes sobre a lista de discussão lista