Alta en registro de la fecha altual

[perillan]

Si que tengo hecha la insercion, así es como esta completo
Un saludo
procedure TForm1.......
var
fecha,:string;
begin
dmmain.IBDataSetBajas.active:=TRUE;
dmmain.IBDataSetBajas.append;
fecha:=DateToStr(now);
dmmain.IBDataSetBajasFECHADEBAJA.AsString:= fecha;
dmmain.IBDataSetBajas.Post;
dmmain.IBTransBajas.COMMIT;
end;