Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Conexión con bases de datos (https://www.clubdelphi.com/foros/forumdisplay.php?f=2)
-   -   Falla en dbExpress de Delphi 2007 con Firebird para campos BCD (https://www.clubdelphi.com/foros/showthread.php?t=67043)

rolandoj 25-03-2010 13:12:04

Falla en dbExpress de Delphi 2007 con Firebird para campos BCD
 
Hola,

Tengo un problema con dbExpress, Firebird y Delphi 2007:

Resulta que al usar Sum() en un Select, si la expresión dentro del Sum contiene un valor de Doble Precisión multiplicado por uno BCD, el dbExpress está reconociendolo como un campo Float; en lugar de un campo FmtBcd, que sería lo lógico dado que es el valor más grande.

Por ejemplo, si tengo esto:

Código SQL [-]
Select Sum(UNDOBLE * UNOBCD) LASUMA From TABLAC

Donde UNDOBLE es DOUBLE PRECISION y UNOBCD es DECIMAL(18,2) , dbExpress me identifica el campo LASUMA como un DOUBLE PRECISION, o sea un TFloatField cuando debía ponerlo como un TFMTBCDField.
Es de anotar que si uso Sum() sobre un campo BCD, dbExpress trabaja bien; es decir, en el ejemplo, si uso SUM(UNOBCD) si se genera en Delphi 2007 un TFMTBCDField (aunque, al igual que en campos simples) hay que ajustarle luego manualmente la propiedad Precision a 18).

Dos preguntas :

1. De quién es la falla ?. De el dbExpress como tal ?. Del driver dbExpress que estoy usando para Firebird ?, o del propio Firebird ?. Pensaría que es el driver ya que el que uso es el que viene con Delphi y ese no está certificado; pero, no estoy seguro.

2. Que puede hacerse ?. Tengo la opción de cambiar el algoritmo; pero, sería ineficiente y además muy problemático porque ese tipo de situaciones me son comunes en el desarrollo que estoy haciendo.

Casimiro Noteví 25-03-2010 13:52:11

¿Has probado haciendo un 'cast'?
Código:

Select cast( Sum(UNDOBLE * UNOBCD) as tipoquequieras) LASUMA From TABLAC

rolandoj 26-03-2010 14:48:16

Muchas Gracias. Funciona; pero ..
 
Hola Casimiro,

Muchas gracias por la sugerencia.

La probé y efectivamente funciona; pero, hay dos puntos que me preocupan.

1. Sigue la duda de donde está el error, o la deficiencia. Ya que un CAST no debería ser necesario. Lo lógico es convertir automáticamente a la precisión más alta soportada.

2. Me preocupa un poco el tema de la portabilidad. El CAST está incluído en el SQL Standard; así que por ese lado no debería haber problemas. El DECIMAL también está en el standard; pero, la implementación es la que me preocupa, ya que no sé si en otros motores un BCD de 18 dígitos con 2 decimales es implementado con el tipo DECIMAL. Me explico mejor:

El comando, para mis propósitos queda:

SELECT CAST (Sum(UNDOBLE * UNOBCD) AS DECIMAL(18,2)) FROM MITABLA

El caso es que mi estrategia de portabilidad siempre opera con la premisa de que mi programa corre con cualquier motor SQL sin necesidad de hacer cambios en el mismo, tan solo en el script de creación de la Base de Datos; o a lo sumo, en situaciones muy especiales, con algún cambio mínimo al programa.

Si el tipo de dato en el CAST toca cambiarlo, dado que hay muchos queries de ese estilo, enfrentaría un cambio mayor que para mis propósitos es inaceptable.

Casimiro Noteví 26-03-2010 14:53:13

La verdad es que en eso no puedo ayudarte, creo que deberías echar un vistazo a las especificaciones de cada uno de los motores sql que piensas usar para comprobarlo.

rolandoj 26-03-2010 16:08:58

Gracias. POdría ser cualquie SQL-92
 
Cita:

Empezado por Casimiro Notevi (Mensaje 358458)
La verdad es que en eso no puedo ayudarte, creo que deberías echar un vistazo a las especificaciones de cada uno de los motores sql que piensas usar para comprobarlo.

Hola,

De todas formas muchas gracias.

El problema es que no se que motores se usarán en algún momento. La idea es que teoricamente pueda ser cualquier motor que soporte SQL-92


La franja horaria es GMT +2. Ahora son las 22:35:06.

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