actualización de base de datos desde script

[dandia28]

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

[[FGarcia]]

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]

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 :

SET TERM ^  ;  

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

END ^

SET TERM ; ^