Problema IBDataSet quer atualizar registros

Delphi

11/06/2004

No meu programa de impressão de promissórias
utilizo o codigo abaixo para, caso haja necessidade,
alterar a data de vencimento. Caso seja alterada,
as próximas tbm são alteradas com o acrescimo de
um mês.

for i := p to t do begin
   Edit;
   FieldByName(´Vencimento´).AsDateTime := data.Date;
   data.Date := IncMonth(data.Date,1);
   Post;
   Next;
end;
ApplyUpdates;


O problema acontece que essas alterações são são efetuadas.
Utilizo o 
IBTransaction1.CommitRetaining;

mas as datas permanecem sem a alteração.

[b:bfc7ec1ca6]O que está acontecendo???[/b:bfc7ec1ca6]

Lembrando que os scripts SQL estão montados
corretamente...!
T+


Eniorm

Eniorm

Curtidas 0

Respostas

Marcelo.c

Marcelo.c

11/06/2004

Experimente colocar o ApplyUpdates dentro do laço for, logo após o Post.


GOSTEI 0
Eniorm

Eniorm

11/06/2004

Ainda não resolveu o problema :cry:


GOSTEI 0
POSTAR