P
PaVaP
Задача :
Дать пользователям возможность выгружать в Эксель данные за выбираемый интервал времени.
Данные должны быть сгруппированы по категориям и содержать по каждой категории количества и проценты.
Как делаю :
Есть Shared, Private On First Use вьюха, содержащая категории, тоталсы и проценты.
По селекту вьюха выводит данные за например столетие.
У пользователя есть кнопка, по которой у него спрашиваются даты начала и окончания отчетного периода,
далее на основе введенных дат формируется новый селект для приватной вьюхи,
далее делаем :
Set viewPrivate = CurrentDB.GetView("PrikazyZaPeriod")
viewPrivate.SelectionFormula = "новый селект..." (у пользователя будет RunOnServer...)
Call viewPrivate.Refresh
Call workspace.Viewrebuild()
Call workspace.Viewrefresh()
Далее пользователю предлагается выгрузить данные в Эксель
или наслаждаться просмотром непосредственно в базе во вьюхе.
Проблема :
Вроде всё работает, но после таких выкрутасов с приватной вьюхой она становится косячной,
а именно она перестает открываться как элемент дизайна в дизайнере
и при попытке её удалить выдается сообщение "Entry not in design list".
Замечено, что косячная вьюха не содержит итем $ViewInheritedFrom,
т.е. свойство notesUIView.ViewInheritedFrom
До изменения view.SelectionFormula скриптом в интерфейсе
с приватной вьюхой было всё нормально.
Идеи, советы? Заранее всем спасибо за участие!
Дать пользователям возможность выгружать в Эксель данные за выбираемый интервал времени.
Данные должны быть сгруппированы по категориям и содержать по каждой категории количества и проценты.
Как делаю :
Есть Shared, Private On First Use вьюха, содержащая категории, тоталсы и проценты.
По селекту вьюха выводит данные за например столетие.
У пользователя есть кнопка, по которой у него спрашиваются даты начала и окончания отчетного периода,
далее на основе введенных дат формируется новый селект для приватной вьюхи,
далее делаем :
Set viewPrivate = CurrentDB.GetView("PrikazyZaPeriod")
viewPrivate.SelectionFormula = "новый селект..." (у пользователя будет RunOnServer...)
Call viewPrivate.Refresh
Call workspace.Viewrebuild()
Call workspace.Viewrefresh()
Далее пользователю предлагается выгрузить данные в Эксель
или наслаждаться просмотром непосредственно в базе во вьюхе.
Проблема :
Вроде всё работает, но после таких выкрутасов с приватной вьюхой она становится косячной,
а именно она перестает открываться как элемент дизайна в дизайнере
и при попытке её удалить выдается сообщение "Entry not in design list".
Замечено, что косячная вьюха не содержит итем $ViewInheritedFrom,
т.е. свойство notesUIView.ViewInheritedFrom
До изменения view.SelectionFormula скриптом в интерфейсе
с приватной вьюхой было всё нормально.
Идеи, советы? Заранее всем спасибо за участие!