CREATE TABLE desde Delphi

[[egostar]]

Empezado por basti

El tipo memo de Paradox se corresponde con blob sub_type 1 en firebird, el resto de los tipos blob (Graphic, OLE, etc.) son blob sub_type 0.

Muchas gracias basti, ahora mismo lo pruebo.

Salud OS.

[[egostar]]

Ya he conseguido incluir las mejoras que amablemente me han dejado saber.

Ahora y tomandole la palabra a Neftali, quiero subir el programa al FTP de Club Delphi, pero tengo una pregunta, como es un programa que aún creo le faltan muchas mejoras, al subirlo al FTP, ¿puedo sobreescribirlo con las últimos cambios posteriormente? o se agrega uno cada vez que lo subo (por supuesto que lo haría con el mismo nombre).

Salud OS y gracias.

[[egostar]]

Bueno, pues he alojado el programa en el FTP de Club Delphi.

[Herramienta] Migrar estructura de bases Paradox a Firebird Pdox2FB.zip

• Se agregó llaves primarias e indices secundarios y se cambio el tipo moneda de DOUBLE PRECISION a NUMERIC(10,2) (gracias al aporte de Lepe)
• Se agregó la creación de la llave primaria con CONSTRAINT .... PRIMARY KEY (gracias al TIP de Manuel)
• Se agregaron otros tipos de datos (gracias al aporte de basti)
• Gracias a Neftali por su atención y ofrecimiento del FTP Público

Espero sea de utilidad y serán bienvenidos todos los comentarios y criticas al mismo.

Salud OS.

[[egostar]]

Hola amigos

Antes que nada, agradezco a todos los que han leido este hilo.

Y pues yo sigo con mi "juguete" de migrar tablas Paradox a Firebird y la intención de este nuevo mensaje es la de dejarles saber que además de la estructura de la base de datos ya he podido migrar los datos de las tablas Paradox a Firebird.

Se que aún quedan muchas cosas por hacer y algunos problemas de casting pero mi pobre conocimiento me limita a hacerlo muy lentamente.

Se que hay herramientas poderosas que hacen esto mismo, pero como les digo, es un juguete que se me ocurrio desarrollar y que me ha evitado algunos minutos de trabajo extra al estar migrando mis sistemas a Firebird.

Ya he subido al FTP del Club la nueva versión y espero que les agrade, si fuera posible me gustaría que me retroalimentaran con sus comentarios, criticas y sugerencias.

Aqui pueden bajar este pequeño aporte de mi parte, no tiene restricción alguna, asi que no le he puesto licencia de ningún tipo.

[Herramienta] Migrar Tablas Paradox a Firebird Pdox2FB.zip

Saludos y gracias por leerme.

Sinceramente

Eliseo.

[[Héctor Randolph]]

Hola Eliseo!

Antes que nada quisiera felicitarte por tu trabajo, me parece una genial idea esta herramienta para automatizar la conversión entre bases de datos.

Esperé hasta llegar a mi casa para poder descargarlo y probarlo con calma, me gustaría hacerte algunas observaciones de lo que me he encontrado hasta ahora.

En primer lugar yo tengo Delphi 7 y veo que tu usas una versión más reciente, mi pregunta es ¿puedo utilizar Turbo Delphi Explorer para compilarlo?.

Con respecto a la aplicación, mi primera prueba fue la siguiente:

Tomé el Alias que viene incluido al instalar las bases de datos Demo de Delphi 7, es decir DBDEMOS, la aplicación llena la lista con todas las tablas que encuentra la ruta, sin embargo no todas las tablas tienen la extensión *.db algunas son *.dbf. Como consecuencia al intentar crear el script para la primera tabla que es Animals.DBF me genera el siguiente error:



Mi segunda prueba fue abrir un Alias con unas tablas de paradox que tenía guardadas, el problema según veo es que coloqué acentos en los nombres de las tablas.

Me genera el script para crear las tablas, pero los acentos son permitidos en Paradox y no en Firebird, por lo tanto me envía un error al crear la base de datos.



Por último me gustaría hacer una sugerencia, sería excelente poder guardar una copia de los scripts que se hayan creado con tu aplicación, incluyendo la sentencias que crean la base de datos y los INSERT para la migración de datos. Esto en ocasiones es útil ya que me puedo llevar estos archivos para ejecutarlos desde la consola o en IBExpert y así me das la oportunidad de agregarle o quitarle líneas para afinar detalles antes de crear la base de datos.

Algo así como esto:

Código SQL [-]
/*************************************************************************/
/**** Generado por "Migración de Tablas Paradox a Firebird" 13/04/2007 ***/
/*************************************************************************/

SET SQL DIALECT 3;

CREATE DATABASE 'PRUEBAS'
USER 'SYSDBA' PASSWORD 'masterkey'
PAGE_SIZE 1024
DEFAULT CHARACTER SET NONE;

CREATE TABLE ASEGURADOS
(
 Nombre VARCHAR(50),
 Calle VARCHAR(50),
 Numero VARCHAR(10),
 Colonia VARCHAR(40),
 CP VARCHAR(5),
 Entidad_Federativa VARCHAR(40),
 Ciudad VARCHAR(40),
 Delegacion VARCHAR(40),
 RFC VARCHAR(16),
 Telefono VARCHAR(11),
 Fax VARCHAR(11),
 Correo_Electronico VARCHAR(30),
 CONSTRAINT PK_Asegurados PRIMARY KEY (No_Asegurado)
);

CREATE INDEX Asegurados_IDX1 ON Asegurados (Nombre);

Bueno, por el momento es todo y quedo en espera de que me indiques como lo puedo compilar para colaborar en algo.

Saludos

[[egostar]]

Muchas gracias por tu interes Hector.

Si efectivamente no me ha funcionado mas que para base de datos del tipo Paradox (db), seguiré investigando para que lo haga con las DBF.

También agregaré la parte de quitar acentos, muchas gracias por la nota, yo nunca he utilizado acentos por lo que no visualice esté punto.

Por la parte de crear el archivo, agregaré esa opción muchas gracias por el apunte también.

Te agradezco mucho tus comentarios.

Salud OS.

[[egostar]]

Empezado por Héctor Randolph

Bueno, por el momento es todo y quedo en espera de que me indiques como lo puedo compilar para colaborar en algo.

Lo hice con Turbo Delphi, no recuerdo si Turbo Explorer tiene los controles de Interbase, que es lo único que requiere, todo lo demás son controles estandar.

Muchas gracias.

[[egostar]]

Hola amigos,

Pues nada, he realizado algunos cambios al codigo de mi "juguetito" en base a los comentarios de Héctor Randolph (muchas gracias) y bueno ya he subido la nueva versión al FTP del Club.

[Herramienta] Migrar Tablas Paradox a Firebird v1.zip

Salud OS.