Ver Mensaje Individual
  #6  
Antiguo 18-05-2006
Avatar de judit25
judit25 judit25 is offline
Miembro
 
Registrado: abr 2006
Ubicación: Bronx, NY
Posts: 122
Reputación: 19
judit25 Va por buen camino
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

Última edición por judit25 fecha: 24-05-2006 a las 22:03:38.
Responder Con Cita