Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   SQL (https://www.clubdelphi.com/foros/forumdisplay.php?f=6)
-   -   Campo Calculado (https://www.clubdelphi.com/foros/showthread.php?t=74359)

novato_erick 14-06-2011 22:27:18

Campo Calculado
 
Hola Saludos a los que en este preciso momento leen este hilo de consulta a los expertos y novatos con mas experiencia.

Mi consulta es la siguiente:

Estoy realizando un formulario de facturación en la cual necesito en un label agregar la suma de las cantidades de artículos.

Por si acaso utilizo Firebird.

Alguien podría decirme un ejemplo de como realizar esto?


Saludos;

duilioisola 14-06-2011 23:06:02

Podrías ejecutar un query después del post de cada línea, donde se sumaran las cantidades.
Código Delphi [-]
procedure TablaDetalleAfterPost()
var
  Q : TQuery;
begin
  Q := TQuery.Create(nil);
  try
    with Q do
    begin
      //Aqui se deben establecer los datos del Query: Base de Datos, Transaccion, etc.
      ...
      SQL.Text := 'SELECT SUM(CANTIDAD) FROM TABLA_DETALLE WHERE ID_CABECERA=?ID_CABECERA'
      Params.ByName['ID_CABECERA'].AsInteger := TCabeceraID.AsInteger;
      ExecSQL;
      LTotal.Caption := IntToStr(FieldByName('SUM').AsInteger);
    end;
  finally
    Q.Free;
  end;
end;


La franja horaria es GMT +2. Ahora son las 16:49:52.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi