Ver Mensaje Individual
  #3  
Antiguo 12-04-2012
Neeruu Neeruu is offline
Miembro
 
Registrado: oct 2007
Posts: 485
Reputación: 17
Neeruu Va por buen camino
Cool

Hola..... Si estamos hablando de Firebird....

El ejemplo que pones compila... No he Probado si anda.... pero compila....

El problema se me da cuando tengo esta situación:

/* Excepcion para generar un mensaje de error */
create exception err_breakpoint 'Error';

Código Delphi [-]
/* Procedimiento o trigger donde debe capturarse la excepcion */
trigger/store procedure
begin
   descripcion = 'ALTER TABLE TTT ADD CAMPO2 INTEGER';
   execute statemente descripcion;
   /* Capturo la excepcion */
   /* ANY es cualquier excepcion */
   /* Tambien se pueden poner los valores de cada excepcion individual */
   when any do
   begin
      exception err_breakpoint 'Ha ocurrido un error al ejecutar ' || descripcion
   end;

   Suspend; //Y ACA ES DONDE ME DICE " parsing error - suspend."
end

Porque? no se... me gustaría saber, si alguien me pudiera explicar.... agredecido estare....

Saluda atte Neeruu!!!
__________________
Saluda Atte Neeruu!!! :)
Responder Con Cita