Delphi Mysql - Problemas ao atualizar dados

tenho um código para atualizar dados. uma parte atualiza através de sql, outra parte atualiza direto na tabela.
Segue o código:

if fin>grfin then
begin
with dm.upquery do
begin
close;
sql.Clear;
sql.add(´update tb_pklist set gross_final = gross, ´);
sql.add(´net_final = net where cod_idacon = :OLD_cod_pklist´);
Params[0].Value := dm.tb_pklistcod_idacon.AsInteger;
execsql;
end;
end;

Depois da atualização acima, o código de baixo não está postando os dados, sempre diz que o usuario alterou os dados e trava:

for i:=1 to dif do
begin
dm.tb_pklist.Active:=true;
dm.tb_pklist.Edit;
dm.tb_pklistgross_final.AsFloat := dm.tb_pklistgross.AsFloat - 1;
dm.tb_pklistnet_final.AsFloat := dm.tb_pklistnet.AsFloat - 1;
dm.tb_pklist.Post;
dm.tb_pklist.Next;
end;

SE ALGUEM SOUBER PORQUE NÄO ESTOU CONSEGUINDO DAR O POST NA TABELA DEPOIS DE TER USADO UM UPDATE SQL