Migrando firebird 2.5 a 3

[IVAND]

Exacto mamcx , el error es de los componentes , quedo muy agradecido de uds voy a intentar seguir averiguando como se soluciiona esto , por el momento creo que comprare los IBDAC , Gracias

[Casimiro Noteví]

IVAND, en ese enlace están usando un TIBStoredProc ¿tú estás usando un TIBStoredProc?
Si es así, simplemente utiliza un TIBDataset y en su sql.text pon "execute procedure ......" y se acabó el problema.
Suponiendo que ese sea el problema, que todavía no lo tengo muy claro.

[IVAND]

Gracias a todos , por su tiempo pero no es problema del sp , es los manejo de errores de los componentes , ya compre los ibdac empezare hacer pruebas , en estos si me sale el mensaje bien

[IVAND]

Hola despues de muchas pruebas y buscar lo poco que hay en internet , pues si es problema de el manejo de errores cuando se dispara un trigger , he echo lo que indicas casimiro pero parece que realmente no es el problema en ejecutar un stored procedure , el verdadero problema es manejar el error que da en el trigger , cuando este tiene alguna validacion en mi caso es cuando no debe permitir colocar una cantidad en valor negativo

Código SQL [-]
CREATE OR ALTER trigger producto_bodega_au0 for producto_bodega
active after update position 0
AS
 declare variable nombre varchar(150);
begin
  /* Trigger text */
 if (new.cantidad<=-1) then
   Begin
     exception bloquear_saldo_bodega ;

  End

end

en firebird 2.5 funciona bien y sale el mensaje muy claro , en firebird 3 sale el mensaje generico que ya les indique ( en este caso el store procedure ejecuta un procedimiento q descuenta el saldo de los inventarios y si un producto se coloca en negativo el error debe enviar la validacion y es ahi donde falla

Como valida estos los companeros que trabajan ya con firebird 3 y los componentes IBX uso delphi 2009

[Casimiro Noteví]

Empezado por IVAND

Como valida estos los companeros que trabajan ya con firebird 3 y los componentes IBX uso delphi 2009

Es que no hay ninguna diferencia, es igual. Yo tengo programas con firebird 3, 4 y 5 y funciona igual, salta el mensaje de excepción que pongas.
Aunque se me está ocurriendo que a partir de cierta versión, que no recuerda cuál, los mensajes tienes que declararlos como excepción para poder llamarlos.
A ver si es eso lo que te está ocurriendo.

Código SQL [-]
 CREATE EXCEPTION ex_cantidad_invalida 'Valor inválido en el campo cantidad.';

Código SQL [-]
CREATE OR ALTER TRIGGER trg_check_cantidad
BEFORE INSERT OR UPDATE
ON tbVentas
AS
BEGIN
  IF (NEW.cantidad <  0) THEN
  BEGIN
    -- Lanza una excepción personalizada
    EXCEPTION ex_cantidad_invalida 'La cantidad debe ser mayor que cero.';
  END
END;

El texto que se define al crear la excepción sirve como un mensaje predeterminado, y el texto que se usa al lanzar la excepción dentro del trigger puede ser un mensaje más específico o detallado para esa situación particular.

[IVAND]

Exactamente asi lo hago , pero sigue el error usando los componentes IBX , pense que algun companero del foro tenia algun problema similar

[Casimiro Noteví]

Creo que lo único que queda por comprobar es la versión de IBX que estás usando.