Código Delphi [-] procedure TDmRauch.AgendaAfterPost(DataSet: TDataSet); begin IbTransAgenda.CommitRetaining; end;
procedure TDmRauch.AgendaAfterPost(DataSet: TDataSet); begin IbTransAgenda.CommitRetaining; end;