Hola.
No sé si será esto pero fijate el comentario sobre esta parte de tu código:
Código Delphi
[-]
procedure TF_ModulDades.Camions_AuxAfterPost(DataSet: TDataSet);
var Pos:TBookmark;
begin
Pos := Camions_Aux.GetBookmark;
IBTBombers.CommitRetaining;
Camions_Aux.Close;
Camions_Aux.Open;
Camions_Aux.GotoBookmark(Pos);
with Camions_Aux do
begin
Prior; Edit;
Camions_AuxACTUAL.Value:= 'N'; Post;
end;
Camions_Aux.FreeBookmark(Pos);
end;
Según te había entendido querías que el anteúltimo tuviera la letra 'S'.
Los bookmarks los podés evitar si despues de post hacés
Next, retrocedemos un paso con
Prior y volvemos a darlo con
Next.
Código Delphi
[-]
procedure TF_ModulDades.Camions_AuxAfterPost(DataSet: TDataSet);
begin
with Camions_Aux do
begin
Close;
Open;
Prior; Edit;
Camions_AuxACTUAL.Value:= 'S';
Post;
Next; end;
end;
Saludos.