powered by simpleCommunicator - 2.0.59     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Отчетные системы [игнор отключен] [закрыт для гостей] / Хранимые процедуры в FastReport, как вывести в репорт?
1 сообщений из 1, страница 1 из 1
Хранимые процедуры в FastReport, как вывести в репорт?
    #36527095
Вредный
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Здравствуйте все
Немного предисловия:
Сам пишу на Visual Basic 6, базу использую Access. Отчеты всегда писал на Crystal Report.
Решил поискать альтернативу Crystal Report и случайно наткнулся на FRS.
Прочитал мануалы - теперь могу написать все что нужно, однако остался один
вопрос, с которым сам так и не смог разобраться - это вызов хранимых процедур из скрипта в отчете.
В примерах и мануале подробно расписано как сделать параметрический TfrxADOQuery - c ним
вопросов нет - все ясно.
Вижу в классах есть TAdoStoredProc - получается такая возможность теоретически есть, но
как написать это практически на BasicScript|PascalScript - никак не могу разобраться
Можно конечно переписать процедуры в базе в обычные вьюхи и дальше реализовать все
через стандартный TfrxADOQuery, но так не интересно - хочется помучаться для начала
Прорыв форум и мануалы, смог написать следующий код:

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
procedure cmdOKOnClick(Sender: TfrxComponent);
var
sp: TADOStoredProc;
sppar: TParameter;

begin

sp := TADOStoredProc.Create(nil);
sp.Connection := conn.Database;
sp.ProcedureName := 'qOpersN1_Full';
sppar := TParameter.Create;
with sp.Parameters.AddParameter do begin
   Name := 'tod';
   DataType := ftInteger;
   Value := int(DateEdit1.Date);
end;

sp.Open;

end;

Проверил - на выходе открытый рекордсет с моими данными, вроде полдела сделано.
Подскажите плиз - как его теперь "подсунуть" отчету в бенд как источник данных?
...
Рейтинг: 0 / 0
1 сообщений из 1, страница 1 из 1
Форумы / Отчетные системы [игнор отключен] [закрыт для гостей] / Хранимые процедуры в FastReport, как вывести в репорт?
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]