Ver Mensaje Individual
  #1  
Antiguo 02-08-2011
Avatar de jafera
jafera jafera is offline
Miembro
 
Registrado: may 2007
Ubicación: Llagostera (Girona)
Posts: 582
Reputación: 18
jafera Va por buen camino
Script para crear tablas

Hola a todos.

He creado un IBScript para crear unas tablas que no existe en mi aplicacion y para agrgar unos campos nuevos en tablas existentes.

Código SQL [-]
 
CREATE TABLE "RE0012"
(
  "ID_USUARI" INTEGER NOT NULL,
  "USUARI" VARCHAR(15) CHARACTER SET ISO8859_1 COLLATE ES_ES,
  "PASWORD" VARCHAR(15) CHARACTER SET ISO8859_1 COLLATE ES_ES
);
CREATE TABLE "RE0006TOTAL"
(
  "ID_REBUT" INTEGER NOT NULL,
  "DATA" DATE,
  "TITOL" VARCHAR(50) CHARACTER SET ISO8859_1 COLLATE ES_ES,
  "C_POSTAL" INTEGER,
  "CODI_CLUB" INTEGER,
  "ARBITRES" INTEGER,
  "MATERIAL" NUMERIC(9, 2),
  "I1" VARCHAR(1),
  "I2" VARCHAR(1),
  "I3" VARCHAR(1),
  "I4" VARCHAR(1),
  "I5" VARCHAR(1),
  "TI1" NUMERIC(9, 2),
  "TI2" NUMERIC(9, 2),
  "TI3" NUMERIC(9, 2),
  "TI4" NUMERIC(9, 2),
  "TI5" NUMERIC(9, 2),
  "TOTAL_REBUT" NUMERIC(9, 2),
  "IMPORT" NUMERIC(9, 2),
  "TEXTE" VARCHAR(50) CHARACTER SET ISO8859_1 COLLATE ES_ES,
  "SUSPENSIO" VARCHAR(1),
  "KM_TOTALS" INTEGER,
  "ASPIRANT" VARCHAR(1),
  "HORA_CONS" TIME,
  "HORA_SORT" TIME,
  "NUM_CORREDORS" INTEGER,
  "ID_ARBITRE" INTEGER,
  "ID_METGE" INTEGER,
  "DIR_CURSA" VARCHAR(50) CHARACTER SET ISO8859_1 COLLATE ES_ES,
  "CATEGORIA" VARCHAR(50) CHARACTER SET ISO8859_1 COLLATE ES_ES,
  "ZONA" INTEGER,
  "KM_CURSA" NUMERIC(9, 2),
  "TRANSP" VARCHAR(1),
  "GRAVAT" VARCHAR(1),
  "ACUMULAT" VARCHAR(1),
  "PREU_FIX" VARCHAR(1),
  "ID_USUARI" INTEGER
);
ALTER TABLE RE0006 ADD PREU_FIX VARCHAR(1);
ALTER TABLE RE0006 ADD ID_USUARI INTEGER;
ALTER TABLE RE0006FP ADD SUSPENSIO VARCHAR(1);
ALTER TABLE RE0006FP ADD I10 VARCHAR(1);
ALTER TABLE RE0006FP ADD TI10 NUMERIC(9, 2);
ALTER TABLE RE0006FP ADD TI11 NUMERIC(9, 2);
UPDATE RE0006 SET PREU_FIX = 'N';

El script se ejecuta perfectamente pero cuando abro la aplicación, parece que no se ha refrescado la base de datos y me da un error de tabla no existe o campo no existe y no me ejecuta el Update.

Si salgo y vuelvo a entrar, las tablas estan ahí sin mayor problema.

En la accion básica de la Transaction tengo TACommit, he probado con TACommitRetaining y tampoco se actualiza.

Alguien me puede ayudar para hacer que se refresquen los datos en la base de datos?

Si ejecuto el script desde IBConsole, no da ningun error pero las tablas tampoco se actualizan al momento tengo que salir y entrar.

Saludos
Responder Con Cita