Controle de Estoque Delphi Siscom trigger

[Daiana]

ola estou no modulo de controle de estoque
na hora de criar a trigger no firebird para d_NFE e D_Compra esta dando erro no after update

AS
begin
if (new.produto_codigo <> old.produto_codigo) then
begin
update produto
set ESTOQUEatual = (ESTOQUEatual - old.Quantidade)
where CODIGO = old.produto_codigo;

update produto
set ESTOQUEatual = (ESTOQUEatual + new.Quantidade)
where CODIGO = new.produto_codigo;
end
else
if (new.Quantidade <> old.Quantidade) then
begin
update produto
set ESTOQUE= (ESTOQUE - old.Quantidade),
ESTOQUE = (ESTOQUE + new.Quantidade)
where CODIGO = old.produto_codigo;
end
end

O erro e o seguinte:
Column does not belong to referenced table.
Dynamic SQL Error.
SQL error code = -206.
Column PRODUTO.ESTOQUE cannot be repeated in UPDATE statement.
At line 20, column 8.

Quem puder me ajudar eu agradeço

[akio]

oi Daiane,

acho q o erro está em
....
update produto
set ESTOQUE= (ESTOQUE - old.Quantidade),
ESTOQUE = (ESTOQUE + new.Quantidade)
where CODIGO = old.produto_codigo;
......

que deve ficar assim: update produto set estoque = (estoque - old.quantidade + new.quantidade) where.....

me responda a que tabela essa trigger está referenciando pois parece que existe outro erro "Column does not belong to referenced table."
o que respondi acima corresponde ao erro "Column PRODUTO.ESTOQUE cannot be repeated in UPDATE statement."

atte

Akio