Fórum Como eu monto um procedure no FireBird que exec Script? #44776

Bom dia pessoal, estou tentando fazer um procedure que execute um ScriptSQL que eu irei passar como parametro.

Essa procedure ira executa Scripts contento instrucoes que ira munipular o banco de dados Ex:

sScript := ´Update CadPro Set cDes = ´´Tes1´´ where iID = 1;´ + #1013 +
´Update CadPro Set cDes = ´´Tes2´´ where iID = 2;´ + 1013 +
´Update CadPro Set cDes = ´´Tes3´´ where iID = 3;´ + 1013 +
´Update CadPro Set cDes = ´´Tes4´´ where iID = 4;´ + 1013 +
´Update CadPro Set cDes = ´´Tes5´´ where iID = 5;´

IBQuery.Close;
IBQuery.SQL.Clear;
IBQuery.SQL.Add(´execute procedure SP_ScriptSQL (´ + sScript + ´)´);
IBQuery.ExecSQL;

Utilizo Banco de Dados FireBird WI-V1.5.0.4306.

Atenciosamente

Rodrigo Ferreira