Проблема заключается в следующем... Необходимо добавлять или модифицировать ХП удалённой БД из приложения Delphi (через ADO)... Реализовать это через следующий скрипт не получается...

Query1.Close;
Query1.ParamCheck:=false;
Query1.SQL.LoadFromFile(FileName); //путь к файлу, где находится скрипт ХП
Query1.ExecSQL;

Хотелось бы отметить, что работаю с FB 1.0 ..., что данный скрипт ХП выполняется без ошибок в IB Expert`e...

При выполнении приложения выдаётся системное сообщение:

Prepare:
SQLCODE=-104:
Dynamic SQL Error
SQL Error code=-104
Token unknown - line 11, char 53 ?
IBCODE=isc_dsql_error

Проще говоря ошибка в скрипте на строчке 11...

for SELECT Actnames.Id_actname from Actnames INTO :id_ac do
begin

полагаю, что это из-за переменной, которая объявлена в теле процедуры... и я полагаю, что эту переменную Delphi интерпретирует как параметр запроса... тогда вопрос, как это обойти...

Помогите! Очень горит...

/*скрипт процедуры*/

CREATE PROCEDURE UPDATEACTOINSCOMBOBOXES
RETURNS (
ID_FI INTEGER,
FADDI VARCHAR(20) CHARACTER SET NONE,
I INTEGER)
AS
DECLARE VARIABLE ID_AC INTEGER;
DECLARE VARIABLE FCAP VARCHAR(30) CHARACTER SET NONE;
DECLARE VARIABLE FIELDADDIT VARCHAR(20) CHARACTER SET NONE;
begin
for SELECT Actnames.Id_actname from Actnames INTO :id_ac do
begin
i=1;
fieldaddit='CA'||id_ac;
for SELECT fd.Id_field, fd.Fieldcaption, fd.Additioninfo from Fieldsdefinitions fd
WHERE fd.Additioninfo=RTrim(:fieldaddit) and fd.Tablename='Actions'
INTO :id_fi, :fcap, :faddi do
begin
SUSPEND;
i=i+1;
end
i=1;
fieldaddit='CI'||id_ac;
for SELECT fd.Id_field, fd.Fieldcaption, fd.Additioninfo from Fieldsdefinitions fd
WHERE fd.Additioninfo=RTrim(:fieldaddit) and fd.Tablename='Actions'
INTO :id_fi, :fcap, :faddi do
begin
SUSPEND;
i=i+1;
end
end
end

Нет, проверял и принудительно ставил в false, результат без изменений... не работает...

TADOQuery