Código Delphi
[-]SET TERM #;
EXECUTE BLOCK
AS
DECLARE VARIABLE VAR_A BIGINT;
DECLARE VARIABLE VAR_B BIGINT;
BEGIN
For Select VALUEA, VALUEB from TEMP_SCRIPT
into VAR_A, VAR_B
do
Update AVAIL_WEB_XML_UPDATES
Set CHANNELMANAGER_INTNO = :VAR_B
where INTERNALNO = :VAR_A;
END
#
SET TERM ;#
Quitándole los : a las variables Var_A y Var_B en el For .. Select, parece que no da ese error, pero ahora el error es :
Código SQL
[-]Dynamic SQL Error
SQL error code = -901
undefined message number
En todo momento anterior, cualquiera de los Execute Block que he mencionado en este post, funcionan correctamente en el IBExpert al ejecutar el Script.