[Dead_Gigabit]

Всем доброе, вот такой вопрос пишу вот такую штуку Update полей

Код:

  dm.Arh.Active:=false;
    dm.Arh.SQL.clear;
    dm.Arh.SQL.Add('update "TREB2" "SKLAD"');
    dm.Arh.SQL.Add('SET sklad.kol=sklad.KOL-treb2.KOL, sklad.SUMMA=sklad.SUMMA-Treb2.SUMMA');
    dm.Arh.SQL.Add('where TREB2.LINKID=sklad.ID');
    dm.Arh.ExecSQL;
    dm.Arh.SQL.Text:='select * from "TREB2" where flag=7';
    dm.Arh.Active:=True;

после чего изменений нет нечего не ошибок просто нечего....
Подскажите кто сталкивался? в чем проблема???