Hola a tod@s !!
... si, si, ya sé .... estoy un poco perdido ... pero siempre os tengo a todos y al foro en general muy presente !
Ahí va un nuevo problemita :
Necesito ejecutar un EXECUTE BLOCK en un TIBScript.
Código Delphi
[-]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;
Me acabo de dar cuenta que al ir terminada cada línea del Execute Block con un carácter ';', pues el IBScript lo toma como líneas independientes a ejecutar.
Cambiar el ';' por otro carácter diferente en IBScript.Terminator sería una solución probablemente, pero ello me llevaría a cambiar MILES de líneas de otros script's diferentes para reemplazar el ';' por cualquier otro carácter.
... y sólo por este dichoso Execute Block.
Cómo se podría enfocar ??
Gracias como siempre por vuestra ayuda.