powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Как установить серверный фильтр подчиненному отчету в runtime
9 сообщений из 9, страница 1 из 1
Как установить серверный фильтр подчиненному отчету в runtime
    #32872445
Привет всем!
Народ подскажите, кто чё знает.
Есть 5 подчиненных отчётов, у каждого серверный фильтр по отдельности устанавливается по событию onOpen. Если смотреть их по отдельности - всё Ок. А если из основного отчёта, то вылазит ошибка: Введенное значение не подходит для данного свойства...

code:
Private Sub Report_Open(Cancel As Integer)
Dim st As String
st = "MonthPer = " & Forms!frmMainMenu!MonthPer & " AND YearPer = " & Forms!frmMainMenu!YearPer
Me.ServerFilter = st '(пробовал и через Reports.[bvz].ServerFilter)
End Sub

Если указать фильтр такой же в свойствах отчёта(вручную естессно), то усе работает.

ХЕЛП pls. /NORD
...
Рейтинг: 0 / 0
Как установить серверный фильтр подчиненному отчету в runtime
    #32873669
Если никто не знает ответа на первый вопрос может знает ответ на второй:
Как тогда другим способом вывести несколько отчётов в одном окне просмотра? (имхо программно)
...
Рейтинг: 0 / 0
Как установить серверный фильтр подчиненному отчету в runtime
    #32873708
Фотография Программист-Любитель
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Связать подчиненные отчеты через LinkMaster/ChildFields с основным.
...
Рейтинг: 0 / 0
Как установить серверный фильтр подчиненному отчету в runtime
    #32873719
всё дело в том что они не связаны, а просто в одном репорте собрана куча других, данные в них разные совпадают только месяц и год. Основной отчёт к данным не привязан вообще.
...
Рейтинг: 0 / 0
Как установить серверный фильтр подчиненному отчету в runtime
    #32874229
Фотография Программист-Любитель
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Все равно связать можно. Заведите поля iYear, iMonth в главном отчете и связывайте с подчиненными на здоровье.
...
Рейтинг: 0 / 0
Как установить серверный фильтр подчиненному отчету в runtime
    #32874366
Hummer
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Как вариант - прокатывает с любой вложенностью.
Назначить источником данных в отчёте процедуру (dbo.MyHP), которая примет параметром строку sql и выполнит её. а в параметрах отчёта написать след:
Входные параметры: @strSQL VARCHAR(1024)=prepare_strSQL(param_value)
Источник записей: dbo.MyHP.
Где prepare_strSQL(param_value) - функция в вба с одним входным параметром (в данном случае для того, чтобы понять, какой подчинённый отчёт требует источник данных - там делаем что-угодно и как угодно программно формируем строку, т.е. можно перед печатью сформировать какие угодно параметры и с уже заданными значениями подать строку на сервер.

CREATE PROCEDURE dbo.MyHP(@strSQL VARCHAR(1024)) AS
EXECUTE(@strSQL)
GO

Функцию prepare_strSQL - пишем сами в зависимости от задачи:)
...
Рейтинг: 0 / 0
Как установить серверный фильтр подчиненному отчету в runtime
    #32874563
2 Hummer
Я понял, спасибо. :)
...
Рейтинг: 0 / 0
Как установить серверный фильтр подчиненному отчету в runtime
    #32874582
2 Программист-Любитель
Это как-то некрасиво, я думал об этом уже. Это глюк и его надо лечить (если внимательно прочесть выше сказанное).
...
Рейтинг: 0 / 0
Как установить серверный фильтр подчиненному отчету в runtime
    #32874595
Фотография Лох Позорный
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
2 Дроздов Павел
Вместо использования серверного фильтра можно источником данных для подчиненного отчета сделать сохраненку с параметрами, а в самих отчетах прописать в св-во InputParameters нужные ссылки на контролы форм.
...
Рейтинг: 0 / 0
9 сообщений из 9, страница 1 из 1
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Как установить серверный фильтр подчиненному отчету в runtime
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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