Класс для работы с Crystal Reorts 9

Достаточно добавить параметры (как в основной отчет так и в подотчеты) и вызвать на предпросмотр.
Вот пример работы с классом.

[code] CLEAR ALL SET CLASSLIB TO my_crystallrep PUBLIC oCR m.oCR=CREATEOBJECT('My_Crystall') m.oCR.addparam('Subscriber','Subs_Test') m.oCR.addparam('Dogovor','Dog_Test') m.oCR.addparam('@Date_From',CTOT('01.10.05 0:0:0')) m.oCR.addparam('@Date_To',CTOT('31.10.05 23:59:59')) m.oCR.addparam('@Id_Subscriber',0) m.oCR.addparam('@Number','920101') m.oCR.addsubparam('Phones','@Date_From',CTOT('01.10.05 0:0:0')) m.oCR.addsubparam('Phones','@Date_To',CTOT('31.10.05 23:59:59')) m.oCR.addsubparam('Phones','@Id_Subscriber',0) m.oCR.addsubparam('Phones','@Number','920101') m.oCR.previewreport(SYS(5)+SYS(2003)+'Phone.rpt') READ EVENTS[/code]
Как видно достаточно простые операции. Параметры с @ это параметры хранимой процедуры MsSQL...
Синтаксис AddParam(Название параметра,Занчение)
Синтаксис AddSubParam(Название подотчета,Название параметра,Занчение)

Класс простейший и сильно упрощает жизнь. По крайней мере мне. Если не устраивает внешний вид отчета - смотрите процедуру previewreport.

Автор: Андрей

Автор публикации

не в сети 19 лет

Петров Андрей

0
Комментарии: 0Публикации: 14Регистрация: 17-04-2002
0
Вложенные файлы
#
Тип файла
Размер
Название
1 .zip 5,04 КБ 508my_crystall
Оставить комментарий
Авторизация
*
*
Генерация пароля