Actualizar tabla buscando desde un dbgrid

[judit25]

gracias Lepe por la respuesta, pero creo que se cruzaron los temas, jeje, no veo la relación de mi problema con eso? o si?

Gracias

[ronimaxh]

bueno como que no esta muy claro lo que quieres hacer, pero seria mejor que comenzaras y dices que db usas, y para rebajar el inventario lo puedes hacer desde el id de la misma factura que generas, asi atrapas el detalle y puedes controlar que articulos se afectaron con la venta.....

[judit25]

Gracias ronimaxh por tu respuesta

estoy utilizando Access conectado con odbc y he podido solucionar parte de mi problema, lo único es que el último registro no me lo actualiza en el inventario, todos menos el último me lo actualiza y no se porque, el código que estoy empleando es el siguiente:

Código Delphi [-]
CDS2.First;
while not CDS2.Eof do
begin
if DM.TInventario.Locate('Cod_prod', CDS2Cod_Prod.Value, []) then
begin
DM.TInventario.Edit;
DM.TInventarioCant_Salida.Value := DM.TInventarioCant_Salida.Value + CDS2Cantidad.Value;
DM.TInventarioCant_Actual.Value := DM.TInventarioCant_Actual.Value - CDS2Cantidad.Value;
DM.TInventario.UpdateRecord;
end;
CDS2.Next;
end;

Este código lo he puesto en el evento BeforeApplyUpdates de CDS2 (que es el clientDataSet del detalle).

Gracias

[[Lepe]]

UpdateRecord no es para grabar los cambios, por tanto no se guardan JAMÁS.

... Claro... tú dirás pues los cambios si se guardan en todos los registros menos en el último.... Pues sí, porque internamente la VCL cuando realizas un Tdataset.Next mira si hay modificaciones en el registro actual y los guarda automáticamente. Pero en el último registro no se puede hacer un .Next porque se ha llegado al final, por tanto, no se guarda.

Sustituye el "UpdateRecord" por "Post"

Siempre que se haga un Edit / Insert / Append debe llevar asociado un Post / Cancel para evitar este tipo de fallos que lo vuelven a uno loco .

Saludos

[judit25]

Muchas gracias Lepe deja hacerlo con post a ver como me va

Gracias