Ввод параметров для внутренних IBXQuery

samalex

Уважаемые знатоки!!!
Есть работающий отчет созданный в D6 и QR3 под InterBase6.
Внутри него я создал несколько IBXQuery запускающие хранимые процедуры (select * from "sp_reestr01"(:id_claim)).
То есть, IBXQuery с параметрами. Мне эти параметры из программы нужно устанавливать. Делаю так :

(frx_Reestr01.FindObject('IBXQuery_work') as TfrxIBXQuery).Close;
(frx_Reestr01.FindObject('IBXQuery_work') as TfrxIBXQuery).ParamByName('id_claim').Value:=DataModule1.IBQ_sp_table_claim.FieldByName('id_claim').AsInteger;
(frx_Reestr01.FindObject('IBXQuery_work') as TfrxIBXQuery).Open;
(frx_Reestr01.ShowReport(True);

Что-то не получается. Программа начинает исходники запрашивать и заканчивает с ошибкой. Что я неправильно делаю?

aseroff

Для запроса select * from "sp_reestr01"(:id_claim)
в свойствах query выставьте параметру заранее созданную переменную fastreport'а (fx). А при вызове отчета из программы задавайте значение этой переменной.
Например (целочисленное значение):

   frxReport1->Variables->Items[frxReport1->Variables->IndexOf("parameter")]->Value = 438;
    frxReport1->ShowReport(true);

Так все работает. А, вот, через установку параметра напрямую, не хочет.