Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Conexión con bases de datos (https://www.clubdelphi.com/foros/forumdisplay.php?f=2)
-   -   actualización de base de datos desde script (https://www.clubdelphi.com/foros/showthread.php?t=45034)

dandia28 21-06-2007 00:24:40

actualización de base de datos desde script
 
Hola, estoy intentando hacer una aplicación en delphi 6 para actualizar una base de datos en firebird 2.0. Los scripts los pruebo en EMS manager (la vrs. lite) y funcionan muy bien... pero al ejecutarlo desde un qry en la aplicación en delphi tomando el script desde una archivo de texto falla, todas las ordenes estan en una sola linea y con el terminados ;El script no falla en la creación de tablas o modificación de las mimsa sino en los triggers o procedimientos almacenados.

Alguien que haya hecho algo parecido y me pueda ayudar,

daniel :mad:

FGarcia 21-06-2007 00:43:12

Jeje !! No soy el mas indicado para responderte pues esas preguntas a cada rato las hago! sin embargo puedo recomendarte que pongas un cpoco de tu codigo para que se entienda mejor tu problema y de esa manera se te ayude.

Saludos!!

Mick 21-06-2007 02:01:53

El problema se da porque se produce una confusion con el caracter ";"
cuando se usan procedimientos almacenados. Este caracter se utiliza para indicar que ha finalizado el procedimiento almacenado, pero tambien se utiliza para finalizar cada comando individual que haya dentro del procedimiento. Lo que pasa es que en cuanto aparece el primer ; del primer comando del procedimiento, se entiende que ahi acaba el procedimiento almacenado, ignorandose el rest de comandos..

Asi que hay que usar SET TERM para que se utilize otro terminador en lugar del "punto y coma". Por ejemplo, hacemos que el caracter terminador sea el ^ en lugar del punto y coma, y una vez definido el o los procedimientos almacenados, vovemos a user set term , para que el terminador vuelva a ser el punto y coma :

Código:

SET TERM ^  ; 

CREATE PROCEDURE MI_PROCEDURE AS BEGIN
 
 X= 1;
 Y= 2;
 SUSPEND;

END ^

SET TERM ; ^



La franja horaria es GMT +2. Ahora son las 14:18:14.

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