Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > SQL
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 25-07-2007
IVAND IVAND is offline
Miembro
 
Registrado: may 2003
Ubicación: ECUADOR
Posts: 523
Poder: 22
IVAND Va por buen camino
Ya no se que hacer con .0002201010101 de firebird

Hola a todos , estoy trabajando con firebird 1.5 rc4 , tengo una tabla con algunos campos entre ellos debe y haber , para mis diarios debo restar debe-haber y obtener cero , si es cero el estado del diario cambia a 'T=Terminado' , aqui es donde empieza el problemas , los campos debe y haber estan definidos como numeric (15,2) , si vamos al ibexpert y vemos los datos en un lado el del debe se ha grabado un dato como 1.0112219292929 (algunos cosas mas) y el haber como 1 , en otras ocasiones utilizaba cast para restar y el valor era cero pero ahora este valor no es cero el estado no me cambia alguien puede orientarme primero siempre que se ingresa un valor al campo debe nadie lo ingresa con tantos decimales (el campo tiene definido solo dos decimales no esta definido ademas como double precision) , ya no se que hacer me pueden orientar ..... Gracias
__________________
IVAND
Responder Con Cita
  #2  
Antiguo 25-07-2007
Avatar de jhonny
jhonny jhonny is offline
Jhonny Suárez
 
Registrado: may 2003
Ubicación: Colombia
Posts: 7.058
Poder: 30
jhonny Va camino a la famajhonny Va camino a la fama
Yo he tenido exactamente el mismo problema durante bastante tiempo, he investigado por Internet... pero lo único que he encontrado en alguna parte de ibphoenix, es que el problema es por las operaciones matemáticas que tiene que hacer el procesador y no se que mas rollos, lo triste es que la única solución que sugieren es que los datos se pasen a tipo char o varchar y que desde la aplicación se manejen las conversiones pertinentes...
__________________
Lecciones de mi Madre. Tema: modificación del comportamiento, "Pará de actuar como tu padre!"

http://www.purodelphi.com/
http://www.nosolodelphi.com/
Responder Con Cita
  #3  
Antiguo 25-07-2007
IVAND IVAND is offline
Miembro
 
Registrado: may 2003
Ubicación: ECUADOR
Posts: 523
Poder: 22
IVAND Va por buen camino
Gracias jhonny por tu interes, que pena que una base tan prometedora tenga estos pequenos y grandes problemas a la vez imaginate esto en un banco seria un desastre .... :-( mis proximos proyectos seran dirigidos a otra base de datos , si la solucion es la que tu propones tendria que cambiar todo el sistema desde sus raices eso significaria muchos años de trabajo

Sabes lo que no entiendo es que de cien lineas que grabo solo una presenta este problemas en el diario especifico

Espero exista otra solucion que no sea tan dura de realizar sera que se puede hacer alguna funcion para borrar estos valores o redondear

__________________
IVAND
Responder Con Cita
  #4  
Antiguo 25-07-2007
Avatar de jhonny
jhonny jhonny is offline
Jhonny Suárez
 
Registrado: may 2003
Ubicación: Colombia
Posts: 7.058
Poder: 30
jhonny Va camino a la famajhonny Va camino a la fama
Cita:
Empezado por IVAND
si la solucion es la que tu propones tendria que cambiar todo el sistema desde sus raices eso significaria muchos años de trabajo
Eso lo leí en IBPhoenix.

Cita:
Empezado por IVAND
Espero exista otra solucion que no sea tan dura de realizar sera que se puede hacer alguna funcion para borrar estos valores o redondear
Pues creeme que yo también, guardo la esperanza de que alguien tenga una buena solución al respecto y que además la comparta .

En cuanto a lo del redondeo pues te cuento que personalmente hice una UDF que lo único que hace, es usar la función RoundTo del mismo Delphi, pero la verdad es que aun asi sigue presentando problemas, sobre todo cuando tengo que hacer sum(debe), sum(haber) y al final sum(dede-haber), eso por ejemplo me puede dar, por el debe 42.12510 y por el haber 42.12410 y el saldo me quedaría 0.01, cuando voy a revisar los documentos descuadrados, la consulta me devuelve NULL, de manera pues que ese 0.01 se produce al sumar todos esos fraccionarios que se "inventa" el FireBird.

Ojala este equivocado y exista una solución real a este problema
__________________
Lecciones de mi Madre. Tema: modificación del comportamiento, "Pará de actuar como tu padre!"

http://www.purodelphi.com/
http://www.nosolodelphi.com/
Responder Con Cita
  #5  
Antiguo 26-07-2007
IVAND IVAND is offline
Miembro
 
Registrado: may 2003
Ubicación: ECUADOR
Posts: 523
Poder: 22
IVAND Va por buen camino
Ahora si que estamos fritos , como le dices aun contador que el ingreso y te lo muestra 1-1 y el asiento no cuadra que duro , que pena que ese problemas aun bases de escritorios lo tienen bien controlados y no esta potente base de datos , pero hay que seguir ... Gracias por tu tiempo cualquier cosa espero avisarte o que me avises
__________________
IVAND
Responder Con Cita
  #6  
Antiguo 26-07-2007
Avatar de Casimiro Notevi
Casimiro Notevi Casimiro Notevi is offline
Moderador
 
Registrado: sep 2004
Ubicación: En algún lugar.
Posts: 32.044
Poder: 10
Casimiro Notevi Tiene un aura espectacularCasimiro Notevi Tiene un aura espectacular
Si no necesitas más de 2 decimales, entonces puedes guardar los datos redondeados a esos 2 decimales.
Responder Con Cita
  #7  
Antiguo 26-07-2007
Avatar de Ivanzinho
[Ivanzinho] Ivanzinho is offline
Miembro Premium
 
Registrado: ene 2005
Ubicación: Galicia
Posts: 595
Poder: 20
Ivanzinho Va por buen camino
Cita:
Empezado por Casimiro Notevi
Si no necesitas más de 2 decimales, entonces puedes guardar los datos redondeados a esos 2 decimales.
Es lo que hago yo y me funciona perfectamente.

Creé una UDF a la que le pasa un valor y el número de decimales a los que quieres que redondee.

Para tu caso la cosa quedaría así :
Código SQL [-]
Diferencia = Redondear(Debe - Haber, 2)

No tendrías que modificar ningún tipo de campo, sólo introducir la función en los cálculos criticos.

Un saúdo.
__________________
Si no lees esto no vivirás tranquilo
Non lle poñades chatas â obra namentras non se remata. O que pense que vai mal que traballe n’ela; hai sitio para todos. (Castelao)
Responder Con Cita
  #8  
Antiguo 26-07-2007
identsoft identsoft is offline
Miembro
 
Registrado: abr 2006
Posts: 282
Poder: 19
identsoft Va por buen camino
creo que la solucion está en guardar el debe y el haber ya redondeados a 2 decimales, no redodndear la diferencia.
Es decir
Diferencia = debe - haber
previamente :
debe = redondeo(Debe,2)
haber = redondeo(Haber,2)
La diferencia nunca puede tener más de dos decimales si previamente el debe y el haber tienen 2 decomales.
Responder Con Cita
  #9  
Antiguo 26-07-2007
Avatar de Ivanzinho
[Ivanzinho] Ivanzinho is offline
Miembro Premium
 
Registrado: ene 2005
Ubicación: Galicia
Posts: 595
Poder: 20
Ivanzinho Va por buen camino
Cita:
Empezado por identsoft
creo que la solucion está en guardar el debe y el haber ya redondeados a 2 decimales, no redodndear la diferencia.
Es decir
Diferencia = debe - haber
previamente :
debe = redondeo(Debe,2)
haber = redondeo(Haber,2)
La diferencia nunca puede tener más de dos decimales si previamente el debe y el haber tienen 2 decomales.
No llega con eso, ya que la ristra de decimales la introduce al realizar operaciones con los campos numéricos.

Un saúdo.
__________________
Si no lees esto no vivirás tranquilo
Non lle poñades chatas â obra namentras non se remata. O que pense que vai mal que traballe n’ela; hai sitio para todos. (Castelao)
Responder Con Cita
  #10  
Antiguo 26-07-2007
Avatar de jhonny
jhonny jhonny is offline
Jhonny Suárez
 
Registrado: may 2003
Ubicación: Colombia
Posts: 7.058
Poder: 30
jhonny Va camino a la famajhonny Va camino a la fama
Cita:
Empezado por Casimiro
Si no necesitas más de 2 decimales, entonces puedes guardar los datos redondeados a esos 2 decimales.
Yo también trato de hacer eso con la UDF que les mostré, pero asi le diga de antemano que guarde redondeado, al caer a la BD esta se "inventa" el resto de decimales, es mas hice una prueba, si voy por el ibexpert y le escribo los datos en dicho campo manualmente y redondeados, me sucede lo mismo (Luego aparecen los demás datos que nunca le he digitado).
__________________
Lecciones de mi Madre. Tema: modificación del comportamiento, "Pará de actuar como tu padre!"

http://www.purodelphi.com/
http://www.nosolodelphi.com/
Responder Con Cita
  #11  
Antiguo 26-07-2007
IVAND IVAND is offline
Miembro
 
Registrado: may 2003
Ubicación: ECUADOR
Posts: 523
Poder: 22
IVAND Va por buen camino
Me uno a lo de Jhonny aunque los guardes como los guardes es mas si haces una funcion en deplhi que sume debe-haber este arroja cero , pero el proceso de cuadre del diario esta en un SP , la base se "Inventa" esa manada de numeros raros ...... Trabajando juntos seguro encontramos una buena solucion o abra que manipular los fuentes ?
__________________
IVAND
Responder Con Cita
  #12  
Antiguo 26-07-2007
Avatar de Ivanzinho
[Ivanzinho] Ivanzinho is offline
Miembro Premium
 
Registrado: ene 2005
Ubicación: Galicia
Posts: 595
Poder: 20
Ivanzinho Va por buen camino
Para mi esto nunca fué un problema. Tanto a la hora de guardar como de leer lo hago siempre aplicando la función Redondear que comenté anteriormente. La utilizo en varias aplicaciones, entre ellas un gestor de imovilizado y una aplicación de contabilidad y nunca tuve problemas con los descuadres.

Un saúdo.
__________________
Si no lees esto no vivirás tranquilo
Non lle poñades chatas â obra namentras non se remata. O que pense que vai mal que traballe n’ela; hai sitio para todos. (Castelao)
Responder Con Cita
  #13  
Antiguo 26-07-2007
Avatar de Casimiro Notevi
Casimiro Notevi Casimiro Notevi is offline
Moderador
 
Registrado: sep 2004
Ubicación: En algún lugar.
Posts: 32.044
Poder: 10
Casimiro Notevi Tiene un aura espectacularCasimiro Notevi Tiene un aura espectacular
Seguramente el problema viene porque en algún momento trates los datos con alguna variable o tipo de campo "float"
Responder Con Cita
  #14  
Antiguo 26-07-2007
Avatar de jhonny
jhonny jhonny is offline
Jhonny Suárez
 
Registrado: may 2003
Ubicación: Colombia
Posts: 7.058
Poder: 30
jhonny Va camino a la famajhonny Va camino a la fama
Cita:
Empezado por Casimiro Notevi
Seguramente el problema viene porque en algún momento trates los datos con alguna variable o tipo de campo "float"
En mi caso particular uso Numeric(15,2), tanto para variables en los procedures, como en las tablas.
__________________
Lecciones de mi Madre. Tema: modificación del comportamiento, "Pará de actuar como tu padre!"

http://www.purodelphi.com/
http://www.nosolodelphi.com/
Responder Con Cita
  #15  
Antiguo 26-07-2007
Avatar de Casimiro Notevi
Casimiro Notevi Casimiro Notevi is offline
Moderador
 
Registrado: sep 2004
Ubicación: En algún lugar.
Posts: 32.044
Poder: 10
Casimiro Notevi Tiene un aura espectacularCasimiro Notevi Tiene un aura espectacular
Cuento "mi historia": empecé a usar interbase 5 en 1998, luego interbase 6 (que era libre), luego firebird 1, firebird 1.5 y todavía no hemos pasado a nuestros clientes a firebird 2, pero pronto será.
Pues bien, desde hace ya casi 10 años, todos los valores numéricos, importes, cálculos, etc. lo guardamos siempre como tipo "double". Si son valores monetarios entonces lo guardamos redondeados a 2 decimales (desde que tenemos el euro).
Nunca hemos tenido esos problemas de decimales, tan sólo nos puede ocurrir si guardamos valores como float.

Cita:
Empezado por jhonny
En mi caso particular uso Numeric(15,2), tanto para variables en los procedures, como en las tablas.
Creo que ese tipo no debe tener ningún problema con los decimales.
Responder Con Cita
  #16  
Antiguo 26-07-2007
Avatar de jhonny
jhonny jhonny is offline
Jhonny Suárez
 
Registrado: may 2003
Ubicación: Colombia
Posts: 7.058
Poder: 30
jhonny Va camino a la famajhonny Va camino a la fama
Cita:
Creo que ese tipo no debe tener ningún problema con los decimales.
Exacto, se supone que un Numeric(15,2) es como un Double precision, pero ¿Entonces porque a IVAND y a mi nos sucede esto?, incluso IVAND también a dicho que el declara dichos campos como Numeric(15,2).
__________________
Lecciones de mi Madre. Tema: modificación del comportamiento, "Pará de actuar como tu padre!"

http://www.purodelphi.com/
http://www.nosolodelphi.com/
Responder Con Cita
  #17  
Antiguo 26-07-2007
Avatar de jhonny
jhonny jhonny is offline
Jhonny Suárez
 
Registrado: may 2003
Ubicación: Colombia
Posts: 7.058
Poder: 30
jhonny Va camino a la famajhonny Va camino a la fama
Que tal si leemos el siguiente articulo, http://www.ibphoenix.com/main.nfs?a=...ibp_data_types especialmente donde hablan de

How do I work with money ?
__________________
Lecciones de mi Madre. Tema: modificación del comportamiento, "Pará de actuar como tu padre!"

http://www.purodelphi.com/
http://www.nosolodelphi.com/
Responder Con Cita
  #18  
Antiguo 26-07-2007
Avatar de jhonny
jhonny jhonny is offline
Jhonny Suárez
 
Registrado: may 2003
Ubicación: Colombia
Posts: 7.058
Poder: 30
jhonny Va camino a la famajhonny Va camino a la fama
A ver, no soy muy bueno para el ingles pero esta tablita explica que el problema de precisión que estamos viendo en este momento se debe a que la BD debe estar en dialecto 1 o ¿Me equivoco?
http://www.firebirdsql.org/index.php?op=faq#q0000.dat
__________________
Lecciones de mi Madre. Tema: modificación del comportamiento, "Pará de actuar como tu padre!"

http://www.purodelphi.com/
http://www.nosolodelphi.com/
Responder Con Cita
  #19  
Antiguo 27-07-2007
Avatar de Casimiro Notevi
Casimiro Notevi Casimiro Notevi is offline
Moderador
 
Registrado: sep 2004
Ubicación: En algún lugar.
Posts: 32.044
Poder: 10
Casimiro Notevi Tiene un aura espectacularCasimiro Notevi Tiene un aura espectacular
Mi inglés es peor, pero parece ser que numeric(xx,x) en dialecto 3 es un entero de 64 bits y en dialecto 1 es un double precision.
Pueden venir los "tiros" por ahí. Yo siempre he usado y sigo usando dialecto 1.
Responder Con Cita
  #20  
Antiguo 07-08-2007
Delfino Delfino is offline
Miembro
 
Registrado: jul 2003
Ubicación: Madrid
Posts: 974
Poder: 21
Delfino Va por buen camino
Cita:
Pueden venir los "tiros" por ahí.
Pueden no, seguro q se debe a eso,
cambiar el dialecto del 1 al 3 y postear aqui los resultados ..
__________________
¿Microsoft? No, gracias..
Responder Con Cita
Respuesta



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
No puedo hacer restore de una bdd firebird en delphi Gaby123 Conexión con bases de datos 2 30-01-2007 21:30:57
Problema en memoria al hacer restore en firebird garza Firebird e Interbase 0 20-09-2006 21:23:58
Hacer query con dos DB en FireBird El_Raso Firebird e Interbase 9 20-10-2005 17:19:37
como puedo hacer esto con mi FireBird 1.5 ELINK Firebird e Interbase 6 13-04-2005 20:30:46
Quisiera hacer mi propia instalacion de Firebird 1.0.3.972 christian Firebird e Interbase 1 06-07-2003 12:03:28


La franja horaria es GMT +2. Ahora son las 16:26:22.


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