Abort naum quer abortar

Delphi

28/04/2005

Pessoal estou passando por uma situação estranha:
procedure TfrmCadNotaFiscalEntrada.Gravar;
begin
  {atualiza informações do item}
  AtualizaItem;
  {checa total da Nota fiscal}
  ChecaTotalNF;
  inherited;
  DmNfEntrada.tNfEntrada.CommitRetaining;
end;

{****************************************************************************}

procedure TfrmCadNotaFiscalEntrada.cdsCadastroReconcileError(
  DataSet: TCustomClientDataSet; E: EReconcileError;
  UpdateKind: TUpdateKind; var Action: TReconcileAction);
begin
  DmNfEntrada.tNfEntrada.RollbackRetaining;
  inherited;
  Abort;
end;


quando dou applyupdate em um clientdataset(isso ocorre no inherited da primeira procedure) e caso gere um erro ele vai pra segunda procedure
e ao passar pelo abort ,ao inves de parar o codigo ele está voltando para a primeira procedure, é como se o abort estivesse dando um exit.
Alguém já passou por isso ?
estou usando delphi 7.


Alexandre_sbo

Alexandre_sbo

Curtidas 0

Respostas

Alexandre_sbo

Alexandre_sbo

28/04/2005

pessoal realmente o abort naum funciona no ReconcileError

entaum a solução foi fazer o seguinte :
  if TClientDataSet(dsCadastro.DataSet).ApplyUpdates(0) > 0 then
    Abort;



GOSTEI 0
POSTAR