update dificil de sair...

Olá amigos, é o seguinte, não estou conseguindo alterar os dados de um banco interbase. Tenho o form de entradas que armazena as entradas no clientedataset, até ai tudo bem, quando confirmo a entrada ele lanã tudo na tabela entradas de nf, o problema é quando vou atualizar os estoques, estou usando o seguinte código:

cliente.First; //clientdataset
while not cliente.Eof do
begin
dm.qprodutos.Close; //query
dm.qprodutos.SQL.Clear;
dm.qprodutos.sql.add(´update PRODUTOS set ESTOQUE = :ESTOQUE, CUSTO = :CUSTO where Descricao = :OLD_Descricao´); dm.qprodutos.ParamByName´estoque´).asinteger:=clientequantidade.value + dm.qprodutosESTOQUE.Value;
dm.qprodutos.ParamByName(´custo´).asfloat:=clientecusto.value;
dm.qprodutos.ExecSQL;
cliente.Next;
end;
dm.IBTransaction1.CommitRetaining;

executo esse código, não gera erro algum mas não acontece nada com a minha tabela. Qualquer ajuda é bem vinda

Sanses