Exception en Procedimiento Almacenado

[Casimiro Noteví]

Ese suspend creo que no sirve para nada

[Neeruu]

En mi caso si sirve.... aparte después del execute sigo haciendo cosas.... y me da error de compilación....

Alguna idea de porque es así?

Saludos Atte Neeruu!!!

[[duilioisola]]

El problema es que todo el bloque que "puede fallar" debe ir entre un begin y un end.
Tiene que ver con las trasacciones.
No recuerdo donde lo lei, pero parece ser que lo que va entre en un bloque, se realiza en una transacción y asi pueden capturarse.

Esto si funciona, (lo he probado, FB 1.5):

Código SQL [-]
create procedure AAA_PRUEBA
returns (errores integer)
as
declare variable instruccion varchar(100);
begin
   /* Cantidad de errores */
   errores = 0;

   /* SQL a ejecutar */
   begin
       instruccion = 'ALTER TABLE TTT ADD CAMPO2 INTEGER';
       execute statement instruccion ;
       /* Capturo la excepcion */
       /* ANY es cualquier excepcion */
       /* Tambien se pueden poner los valores de cada excepcion individual */
       when any do
       begin
           errores = errores + 1;
           exception err_breakpoint 'Hubo un error haciendo ' || instruccion ;
       end
   end

   /* Hago mas cosas si no huno errores */
   if (errores = 0) then
   begin
       instruccion = 'UPDATE TTT SET CAMPO2=0';
       execute statement instruccion ;
       /* Capturo la excepcion nuevamente */
       when any do
       begin
           errores = errores + 1;
           exception err_breakpoint 'Hubo un error haciendo ' || instruccion ;
       end
   end

   suspend;
end