Ver Mensaje Individual
  #4  
Antiguo 15-03-2015
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Reputación: 36
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
Hola mramos65.

Tal como lo planteaste, para obtener la sumatoria de la columna ENTRADAS resultante de la relacion master-detail, vas a necesitar un query adicional para obtener ese resultado.

Suponiendo que tus queries se llamen "qyProduccion" y "qyEntregas", tendrías que hacer algo similar a este ejemplo:
Código Delphi [-]
procedure TForm1.qyEntregasAfterScroll(DataSet: TDataSet);
begin
  with TQuery.Create(nil) do
  try
    DataBaseName:= 'TU_ALIAS_O_RUTA_A_BD'; // (ruta o alias a tu base de datos)
    SQL.Text:= 'SELECT SUM(ENTRADAS)AS SUMA FROM ENTREGAS WHERE OP = :OP';
    ParamByName('OP').Value:= qyEntregas.FieldByName('OP').Value;
    Open;
    if not IsEmpty then
      Edit1.Text:= FieldByName('SUMA').AsString;
    Close;
  finally
    Free;
  end;
end;

Saludos
__________________
Daniel Didriksen

Guía de estilo - Uso de las etiquetas - La otra guía de estilo ....
Responder Con Cita