with adotable1 doappend; fieldvalues["XXX"]:='NN'; post;
with adotable1 do BEGIN append; fieldvalues["XXX"]:='NN'; post;END;