Ver Mensaje Individual
  #4  
Antiguo 19-02-2008
Avatar de Lepe
[Lepe] Lepe is offline
Miembro Premium
 
Registrado: may 2003
Posts: 7.424
Reputación: 29
Lepe Va por buen camino
Si fuera como dices, el mensaje obetnido sería este:
error '1' is not a valid floating point value
pero el mensaje no usa comillas dobles (tipográficas) sino las comillas simples de delphi con el valor del campo dentro.

El error dice que algun registro está vacío, es decir, no tiene nada, ni siquiera un cero patatero. Es típico cuando dejas el campo "cantidad" sin rellenar y se guarda un valor nulo (null).

La solución según tu código:
Código Delphi [-]
if not IBDSArtFactura2CANTIDAD.IsNull then // solo sumamos si no es nulo
  xx:=xx+IBDSArtFactura2CANTIDAD.AsFloat;


Otra forma de hacerlo:
Código Delphi [-]
ibquery1.sql.text := 'select Sum(cantidad) from tabla where codigo = :codigo and cantidad is not null';
ibquery1.parambyname('codigo').Asxxxx := loque sea;
ibquery.Open;
Resultado := ibquery.Fields[0].AsFloat;

Por supuesto la tabla debe estar guardada (que no esté en edición).
__________________
Si usted entendió mi comentario, contácteme y gustosamente,
se lo volveré a explicar hasta que no lo entienda, Gracias.
Responder Con Cita