Como eu monto um procedure no FireBird que exec Script?

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