Campo Calculado!!!

[Ledian_Fdez]

Holas amigos:

Programo en Delphi7 y me conecto con ADO a una Base de datos en Access. Mi inquietud es la siguiente:

Tengo un ADOTable (TblAnalisis) con los campos:

NoFact (integer)
Fecha (Date)
ImpInv (Currency)
ImpAlim (Currency)
ImpOGast(Currency)

Total (campo calculado)

procedure TblAnalisisCalcFields(DataSet: TDataSet);
begin
TblAnalisisTotal.AsCurrency := DM.TblAnalisisImpInv.AsCurrency + TblAnalisisImpAlim.AsCurrency + TblAnalisisImpOGast.AsCurrency;
end;

y quisiera crear otro campo calculado ImporteTotal (que me diera la suma de todos los Totales)

ejemplo:
--------------------------------------------------------
NoFact Fecha ImpInv ImpAlim ImpOGast Total
--------------------------------------------------------
1 01/10/07 80.00$ 0.00$ 10.00$ 90.00$
2 02/10/07 0.00$ 10.00$ 0.00$ 10.00$
3 03/10/07 30.15$ 0.00$ 40.05$ 70.20$
--------------------------------------------------------

ImporteTotal 170.20$

nota: Que a medida que se vallan insertando nuevas facturas el me valla calculando el ImporteTotal.

¿Saben como pudiera hacer eso?
¿Alguien tiene otra idea?

Muchas grasias de antemano!!!
Salu2
Ledian

[BlueSteel]

y quisiera crear otro campo calculado ImporteTotal (que me diera la suma de todos los Totales)

nota: Que a medida que se vallan insertando nuevas facturas el me valla calculando el ImporteTotal.

¿Saben como pudiera hacer eso? ¿Alguien tiene otra idea?


Hola Ledian...

bueno, no se si sea necesario crear ese campo calculado,,, ya que con una consulta SQL, te bastaría para sumar el total de las facturas...

el problema es que no dices donde quires mostrar ese campo que sume el total de las facturas...

para sumar las facturas, tienes algunos filtros como rango de fechas, proveedor, cliente...

necesitas que se muestre en un reporte, en pantalla, en un edit...

la sgte consulta te sumaria el total de las facturas... y seria algo asi

Select Sum(Total) As Total_Facturas From TblAnalisis

pero si quieres agregar que sea con rango de fechas,, deberás completar la sentencia con un Where.. y todas las condiciones necesarias...

espero te sirva:p