Medio solucionado
Hola a todos,
pues resulta que no cogía la excepción correcta. Con el WHEN ANY DO SUSPEND; me ha funcionado correctamente y ha hecho commit de los inserts anteriores.
El "problema" es que ahora se traga la excepción y no muestra el mensaje de error ya que el código delphi no detecta excepción.
Una pregunta, ¿el insert devuelve alguna variable si se ha insertado correctamente (en el procedure)?
Si fuese así, podría devolver en el procedure una variable que diga si se ha insertado bien el último insert que es el único que provoca la excepción.
|