Caso Raro de Decimales en campo de tipo Flotante

[AGAG4]

Gracias Lepe, funcionó a la perfección, pero ya recorde porque los tenía de tipo flotante, antes los tenia de tipo Numeric, pero los deje de tipo flotante porque uso para imprimir el ZReport y si cambio de Flotante a Numeric ya no muestra los datos de los campos donde hice dicha modificación y si cambio de Numeric a Flotante dentro del ibExpert refresco la tabla para que tome los tipos de datos nuevos y al mandar a imprimir por pantalla ya me aparece los datos, ese fue el motivo del cambio....

Agradezco algun comentario al respecto.

[[Lepe]]

intenta engañar a ZReport.

Abres una consulta con los campos, ahora recorres FieldDefs y cambia el tipo de cada campo a Float (Fieldtype a ftFloat), por último intenta asociarlo al ZReport.

Esto se llama jugar sucio... pero ojalá dé resultados .

Saludos

[AGAG4]

Gracias Lepe, me funciono con cambiarle al tipo de dato DOUBLE PRECISION el problema es que la BD se inchará mas rápido, voy a probar tu consejo....
Que tengas buen día.

[AGAG4]

Empezado por Lepe

intenta engañar a ZReport.

Abres una consulta con los campos, ahora recorres FieldDefs y cambia el tipo de cada campo a Float (Fieldtype a ftFloat), por último intenta asociarlo al ZReport.

Esto se llama jugar sucio... pero ojalá dé resultados .

Saludos

Ya hize pruebas a como me explica:

Código Delphi [-]
   //Caso 1
    zrReport.DataSet := Nil;
    for x:=0 to Query.FieldCount - 1 do
      if (Query.Fields.Fields[x].DataType = ftFMTBcd) then
        Query.FieldDefs[x].DataType := ftFloat;

    zrReport.DataSet := ibQuery;
   

   //Caso 2
    zrReport.DataSet := Nil;
    for x:=0 to Query.FieldCount - 1 do
      if (Query.Fields.Fields[x].DataType = ftFMTBcd) then
        Query.FieldDefs[x].DataType := ftBCD;
 
    zrReport.DataSet := ibQuery;

En ninguno de los 2 casos funciono....