Ya no se que hacer con .0002201010101 de firebird

[Kipow]

Bueno al final termine mi migracion casi 1 mes de trabajo pero ya estoy sobre Firebird 2.1.1 Dialect 3 y solo he encontrado un par de situaciones donde aun estoy investigando.

Primero que todo yo tambien cree hace muchos años mi UDF Redondear jeje, y no he tenido problemas de redondeos desde entonces.

Ahora bien lo que me paso esta vez fue lo siguiente:

Código SQL [-]
  
declare variable porcentaje numeric(15,2);    
declare variable valor numeric(15,2);    
declare  variable nuevo_valor numeric(15,2); 
BEGIN     
     nuevo_valor = valor * (porcentaje / 100);

la situacion es que si lo coloco asi me redondea al entero mas cercano teniendo, pero si declaro la variable porcentaje como numeric(15,4) todo funciona bien.

[IVAND]

Hola a todos , un gusto saludarles y desearles anticipadamente feliz navidad, pues bien una pregunta

voy a tener que migraar la base de datos firebird 1.5 de dialect 1 al 3 , veo que ya se han dado muchos casos asi que aqui creo la experiencia sobra asi que necesito sus buenos consejos ... por ejemplo un companero en el foro indica que creo una base en blanco y luego traspaso los valore de una base a la otra fueras tan amable en indicarme conque herramientas ases eso o asesorme en pasar los datos

Gracias a todos por sus buenos comentarios

Nota : El la mi aplicacion tambien hay muchos campos persistentes como han solucionado ese inconveniente

[[Lepe]]

IB Expert versión personal (la gratuita), tienes un botón en la barra de herramientas "extract metadata":
- extraes solo los metadatos con la opción de CREATE DATABASE activada (estructura de tablas, SP, Triggers, etc)
- te saldrá una ventana de texto con ese script:

- lo modificas para añadir el dialecto,
- el character set y el collate (que muy posiblemente no los tengas),
- el nombre de la base de datos (para no sobreescribir el archivo
- ten en cuenta los campos de moneda que deberían ser NUMERIC(9,2) (9 como mínimo)
- los campos date, revisa el release notes que tengas o algún libro de migración, ya que DATE no guarda la hora en dialecto 3, para eso tienes TIMESTAMP
- creo que ya está

- Ejecutas ese script y creará la nueva base de datos. guarda ese script por si olvidas algo, poder volver a ejecutar ese script con pequeñas modificaciones.
- Registras en IB Expert la nueva Base de datos.

- Cierras la ventana y vuelves a tu base de datos a la misma opción "extract metadata", pero esta vez sólo extraes los registros. Volverá a crear un fichero de texto con todas las inserciones de esos registros.

- tendrás que modificar los datos, por ejemplo, si tenías un campo DATE, en la inserción incluirá la hora, ahora tienes que borrar esa parte si en dialecto 3 es un DATE.

- En esa misma ventana que te muestra todas las inserciones, tienes la posibilidad de cambiar de "conexión a la base de datos" (despliega ese icono que parece el compilar de delphi), eliges la nueva base de datos y ejecutas el script.
- Hecho, todo insertado.

Ten cuidado con mi alzheimer

Saludos

[Casimiro Noteví]

También puedes usar utilidades como ibdatapump
http://www.clevercomponents.com/prod...ibdatapump.asp
Creo que tienen una versión "free".

[[Al González]]

¡Hola!

Empezado por IVAND

...voy a tener que migraar la base de datos firebird 1.5 de dialect 1 al 3...

Resulta curiosa la frescura con que comentas eso después de 16 meses.

Empezado por IVAND

...Nota : El la mi aplicacion tambien hay muchos campos persistentes como han solucionado ese inconveniente

Hace muchos años que llevo conmigo el programa GReplace. Lo utilizo cada vez que me encuentro en la necesidad de hacer cambios masivos dentro de archivos .pas o .dfm. Podría serte de utilidad a ti también.

En cuanto al redondeo, podrías echar un vistazo a un tema que va relacionado: http://www.clubdelphi.com/foros/showthread.php?t=38102

Debido a lo ahí descubierto, por ahora no hago divisiones o multiplicaciones con números fraccionarios (o fraccionables) a nivel de base de datos que requieran un redondeo diferente al convencional (hacia el infinito). En esos casos hago el redondeo en Delphi, empleando la variable GHNumericRounding y la función ghRound de GH Freebrary (mi biblioteca de funciones) antes de enviar el dato al servidor.

Confieso que la manera en que trabaja esa función no es muy elegante, pero me ha resultado efectiva. Quizá después haga una versión más optimizada de la misma como para incorporarla en Firebird a manera de UDF, y con ello poder hacer las multiplicaciones y divisiones a nivel base de datos sin problemas de pérdida o ganancia inesperada de decimales y para convenciones contables de distintos países.

De hecho, el motivo para crear esta función (y la variable de configuración GHNumericRounding) hace ya varios años, fue el reclamo de una empresa que notaba como el importe total de ciertas facturas generadas por una de mis aplicaciones difería de aquel que venía en las órdenes de compra de sus clientes. Estaba utilizando el tipo de redondeo predeterminado de Delphi (imparcial o mejor conocido como Del Banquero), cuando la empresa quería que usara el de aproximación a cero, por algún supuesto reglamento fiscal (si alguien pudiera confirmarme lo que conoce al respecto en las normas mexicanas, se lo agradecería ).

Algunos se preguntarán por qué no me apoyé en funciones nativas como Set8087CW, SetRoundMode y RoundTo. En primer lugar porque todavía no existían éstas, y posteriormente por este desconcierto: http://www.clubdelphi.com/foros/show...573#post170573

Saludos.

Al González.

[IVAND]

Bueno ahi vamos otra vez

A todos los compañeros mil disculpas por molestar pero , hace un tiempo estoy tratando de cambiar el dialect a mi base de datos ahora ya tengo la metadata de la base lista y las insert tambien lo he pasado y todo esta bien los numeric 15(2) ya funcionan como tienen que ser , pero ahora el problema es la aplicacion gracias a AL Gonzales que me indico una herramienta Greplace v2 ya puede cambiar el tipo de dato de Tfloatfield aTIBBCDField o algo asi (si no es el tipo de campo me disculpan estoy fuera de mi trabajo) , pero al querer abrir mi base me indica que un campo se ha definido TfloatField pero es TIBBCDField , el problema se debe a que son campos persistentes y debo borrarlo y volver a insertarlo ahi es donde solo cambia el tipo de precision de 15 a 18 , hay acaso alguna manera de forma masiva hacer ese cambio

Trabajo con delphi 6 y Ibx


Gracias creo que ya estamos casi listos para la migracion definitiva