No hay forma humana de seguir con esto, cada hora que pasa estoy mas perdido, me llegan errores por todos los lados y ya no se por donde tirar.
Pese al esfuerzo de ayer que hizo Ena0 que dedico parte de la tarde en echarme una mano no hay forma de conseguir calcular el total de los importes.
Os cuento exactamente lo que me pasa para ver si alguien fuese tan amable de ayudarme.
Sigo atascado en el FAlbaran, el tema es que necesito meter la suma del campo ImporteLineal (de DesgloseAlbaran) en el campo Base (tabla Albaranes).
Con este código consigo que se sume y lo lleve a la pantalla, que no es poco, pero me da un error en cuanto uso "SUM" despues de select. (Para no liarme de momento todo esto está en el evento click del Button2, ya lo cambiare cuando funcione).
Código Delphi
[-]
procedure TFAlbaranes.Button2Click(Sender: TObject);
var
b : double;
begin
ADOQAlbaran.Close;
ADOQAlbaran.Sql.add ('Select sum([Desglose_Albaran].ImporteLineal) AS BaseImp');
ADOQAlbaran.Sql.add ('From Desglose_Albaran');
ADOQAlbaran.Sql.add ('Where Num_Albaran = 8');
ADOQAlbaran.Open;
B:= ADOQAlbaran.FieldByName ('BaseImp').asFloat;
ShowMessage('El importe total es ' + FloatToStr(B));
end;
He hecho pruebas quitandolo y deja de darlo, pero claro, no suma nada. El error que da es:
http://cjoint.com/data/kFrMbPX0o5.htm
Aqui os subo todo actualizado pero con ese error
Gracias a los que podais echarme una mano, no pienso tirar la toalla pero la verdad es que cuando se queda uno así sin saber por donde continuar es un poco duro.