Наложение фильтров на таблицы в Report-е

[kudrenko]

Коллеги, столкнулся с указанной ниже проблемой – помогите, пожалуйста.
Есть форма, на которой выбирается «Код Склада» и «Номер Товара». При нажатии на соотв. кнопку открывается report, куда необходимо передать эти два параметра, с целью их дальнейшего использования в качестве фильтров по умолчанию по таблицам указанным в отчете.

Report состоит из следующих DataItem:

• Location DataItemIndent = 0, ReqFilterFields = Code – это основная таблица
• Item DataItemIndent = 1, ReqFilterFields = No.,Bin Filter,Date Filter,Resp. Person Dimension Filter - это «подчиненная» таблица.
  

Так вот, для передачи «Кода Склада» я делаю следующие действия на кнопке формы:

Location.SETRANGE(Code, "Location Code");
ReportName.SETTABLEVIEW(Location);
ReportName.RUNMODAL;

А вот установить фильтр по таблице Item не получается.
Пытался в отчете создавать функцию следующего содержания:

SetItemFilter(VAR ItemRec : Record Item)
Item.COPYFILTERS(Item);

Тогда код на кнопке писал следующим образом:

Location.SETRANGE(Code, "Location Code");
Item_на_форме.SETRANGE(“No.”, ‘Номер товара’);
ReportName.SetItemFilter(Item);
ReportName.SETTABLEVIEW(Location);
ReportName.RUNMODAL;

Делал еще кучу всяких манипуляций, но желаемого результата, к сожалению не получил....
Есть у кого какие мысли?

[mira]

Доброго дня всем.
делаю вот так .. (не помню , где подсмотрела )

Во-первых, нужно подготовить отчет, чтобы он мог эти передаваемые параметры принять. Для этого создадим в нем функцию:
SetProperties(lmyParam1 : Boolean; lmyParam2 : Integer)
gmyParam1 := lmyParam1; //присваиваем полученные значения
gmyParam2 := lmyParam2; //глобальным переменным отчета

Потом передадим требуемые параметры в отчет
GReport50055.SetProperties(TRUE,123);

А потом отчет запускаем
GReport50055.RUNMODAL;

Так пробовали?

[.Quattro.]

Цитата:

Сообщение от kudrenko

А вот установить фильтр по таблице Item не получается.
Пытался в отчете создавать функцию следующего содержания:

SetItemFilter(VAR ItemRec : Record Item)
Item.COPYFILTERS(Item);

Тогда код на кнопке писал следующим образом:

Location.SETRANGE(Code, "Location Code");
Item_на_форме.SETRANGE(“No.”, ‘Номер товара’);
ReportName.SetItemFilter(Item);
ReportName.SETTABLEVIEW(Location);
ReportName.RUNMODAL;

Item.COPYFILTERS(Item); - Вы копируете фильтры из текущей переменной в текущую же. Надо копировать из ItemRec


Item_на_форме.SETRANGE(“No.”, ‘Номер товара’);
ReportName.SetItemFilter(Item); - Почему Item? Откуда он взялся? Фильтр наложен же на Item_на_форме, его и передавайте в отчет.

[kudrenko]

Цитата:

Сообщение от .Quattro.

Цитата:

Сообщение от kudrenko

А вот установить фильтр по таблице Item не получается.
Пытался в отчете создавать функцию следующего содержания:

SetItemFilter(VAR ItemRec : Record Item)
Item.COPYFILTERS(Item);

Тогда код на кнопке писал следующим образом:

Location.SETRANGE(Code, "Location Code");
Item_на_форме.SETRANGE(“No.”, ‘Номер товара’);
ReportName.SetItemFilter(Item);
ReportName.SETTABLEVIEW(Location);
ReportName.RUNMODAL;

Item.COPYFILTERS(Item); - Вы копируете фильтры из текущей переменной в текущую же. Надо копировать из ItemRec


Item_на_форме.SETRANGE(“No.”, ‘Номер товара’);
ReportName.SetItemFilter(Item); - Почему Item? Откуда он взялся? Фильтр наложен же на Item_на_форме, его и передавайте в отчет.

.Quattro., вы безусловно правы - это я просто здесь сделал опечатку, в коде было конечно же так (спасибо, что поправили):
На кнопке формы:

Location.SETRANGE(Code, "Location Code");
Item_на_форме.SETRANGE(“No.”, ‘Номер товара’);
ReportName.SetItemFilter(Item_на_форме);
ReportName.SETTABLEVIEW(Location);
ReportName.RUNMODAL;

Функция SetItemFilter Report-a выглядит так:

SetItemFilter(VAR ItemRec : Record Item)
Item.COPYFILTERS(ItemRec);

Более того, если в триггере report-a OnOpenForm() написать:

MESSAGE(Item.GETFILTERS);

то выдает вполне предсказуемый результат Но. "Выбранный Код Товара".
Тем не менее ума не приложу, почему я не наблюдаю "Выбранный Код Товара" на гриде фильтров таблицы Item.

[kudrenko]

Цитата:

Сообщение от mira

Доброго дня всем.
делаю вот так .. (не помню , где подсмотрела )

Во-первых, нужно подготовить отчет, чтобы он мог эти передаваемые параметры принять. Для этого создадим в нем функцию:
SetProperties(lmyParam1 : Boolean; lmyParam2 : Integer)
gmyParam1 := lmyParam1; //присваиваем полученные значения
gmyParam2 := lmyParam2; //глобальным переменным отчета

Потом передадим требуемые параметры в отчет
GReport50055.SetProperties(TRUE,123);

А потом отчет запускаем
GReport50055.RUNMODAL;

Так пробовали?

Да, mira, пробовал...

[alexb_imported]

Всё гораздо проще:
т.к. таблица Item в вашем report'е тоже DataItem (как и Location), то и для неё можно "подсовывать" report'у наложенные фильтры посредством SETTABLEVIEW. Всё прекрасно работает, при старте report'a видны фильтры и на Location, и на Item.
Так что в этом случае можно обойтись и без функции.

Location.SETRANGE(Code,'BLUE');
ReportName.SETTABLEVIEW(Location);

Item.SETRANGE("No.",'1000');
ReportName.SETTABLEVIEW(Item);

ReportName.RUNMODAL;

[kudrenko]

Цитата:

Сообщение от AlexB

Всё гораздо проще:
т.к. таблица Item в вашем report'е тоже DataItem (как и Location), то и для неё можно "подсовывать" report'у наложенные фильтры посредством SETTABLEVIEW. Всё прекрасно работает, при старте report'a видны фильтры и на Location, и на Item.
Так что в этом случае можно обойтись и без функции.

Location.SETRANGE(Code,'BLUE');
ReportName.SETTABLEVIEW(Location);

Item.SETRANGE("No.",'1000');
ReportName.SETTABLEVIEW(Item);

ReportName.RUNMODAL;

AlexB, спасибо Вам огромное - действительно проще и не придумаешь)))) Чего я только не перепробовал (не говоря уже о потерянном времени), а решение было под носом и такое изящное - правду говорят, век живи век учись Спасибо Вам еще раз!!!!!

[Sancho]

Цитата:

Сообщение от AlexB

Всё гораздо проще:
...

это + !!!

[alexb_imported]

Цитата:

Сообщение от kudrenko

спасибо Вам огромное - действительно проще и не придумаешь

Вот за это простоту мне и нравится навижен.

Цитата:

Сообщение от Sancho

это + !!!

Спасибо!