Driver dbExpress para db2 falla al leer valores BCD de campos DECIMAL

[rolandoj]

Hola a todos,

Tengo el siguiente problema.

Mi aplicación maneja valores de 18 dígitos de precisión con 2 decimales (definidos como campos DECIMAL(18,2)).

El driver dbExpress de Delphi 2007 para DB2 graba correctamente en la Base de Datos estos valores (lo verifiqué usando el centro de control de DB2).

Sin embargo, cuando los lee, ignora los dígitos decimales. Por ejemplo, digamos que grabamos el valor 10.08 ; cuando lo lee, lo lee como si fuera 1008.

Por lo dicho antes, es claro que el problema no es de DB2. Ahí le llega bien el 10.08. Tampoco son las rutinas de conversión ya que con Firebird, funciona bien.

Hice depuración y el problema es cuando obtiene el formato nativo BCD.

Ese formato es un registro TBCD el cual tiene 3 campos : Precision, que indica los dígitos significativos; SignSpecialPlaces, que sirve para el signo y la cantidad de decimales; y Fraction, un arreglo de bytes con los valores en sí

Por alguna razón, el campo Fraction llega escalado. En esas circunstancias, dado que no tengo forma de saber cuando hay, o no hay, realmente decimales, no puedo arreglar el problema usando mis propias rutinas de conversión. Así pués no se me ocurre una solución distinta a conseguir otro driver.

Como referencia, estoy con Delphi 2007, el driver dbExpress es dbxdb230.dll, el cliente db2 es db2cli.dll y la versión de db2 es la 9.7.

En cierta forma, ya tengo un driver; es un driver ODBC que viene con DB2; pero, como se usa un driver ODBC en dbExpress ?. No he consguído documentación y en el fondo es el mismo problema que mencioné, para el caso Firebird, en esta otra nota :

http://www.clubdelphi.com/foros/showthread.php?t=68936

Alguién puede orientarme.? Agradezco cualquier ayuda