Это старая версия документа.
Синтаксис: Выполнить()
Возвращаемый результат: Система.Список (см. Класс "Система.Список")
Метод запускает фильтр на выполнение, в результате возвращает список элементов класса.
Пример кода. См. код в методе «СоздатьФильтр» (Mетод создатьфильтр).
Свойство: Условия.Параметры.<ИмяПараметра>
Тип параметра: Система.ПараметрФильтра (см. Класс "Система.ПараметрФильтра")
Обращение к параметру фильтра осуществляется по имени параметра из Объектной модели Business Studio.
Внимание: Рекомендуется задавать условия только по хранимым параметрам класса. Возможность построения фильтра по нехранимым параметрам можно проверить, открыв окно фильтра по соответствующему классу в Business Studio.
Пример кода. См. код в методе «СоздатьФильтр» (Mетод создатьфильтр).
Свойство: ВключатьПодгруппы
Тип параметра: Bool (True, False).
Свойство указывает, будут ли в результат выполнения фильтра включены подгруппы класса, по которому выполняется фильтр. Соответствует выбору кнопки «Смотреть в подгруппах» на панели инструментов фильтра.
Значение по умолчанию True.
Пример кода. См. код в свойстве «РезультатВключает» (Cвойство результат включает).
Свойство: ВключатьГруппуФильтра
Тип параметра: Bool (True, False).
Свойство указывает, будет ли в результат выполнения фильтра включена группа, по которой выполняется фильтр. Соответствует выбору кнопки «Включать группу фильтра» на панели инструментов окна фильтра.
Значение по умолчанию False.
Пример кода. См. код в свойстве «РезультатВключает» (Cвойство результат включает).
Свойство: РезультатВключает
Тип параметра: Int (целое число)
Свойство задает условия вхождения полученных данных в результат выполнения фильтра. Соответствует выбору кнопок панели инструментов окна фильтра: «Включать подгруппы», «Включать конечные объекты», «Показать удаленные», «Показать неудаленные».
Свойство может принимать следующие значения:
1 – Группы,
2 – Конечные объекты,
4 – Удаленные,
8 – НеУдаленные.
Для выбора нескольких значений необходимо брать их сумму. Например, 11 - это 1 + 2 + + 8, т.е. выбрать все неудаленные, 7 – это 1 + 2 + 4, т.е. включаем удаленные группы и конечные объекты.
Значение по умолчанию – 11.
Пример кода.
Задача: определить, есть ли удаленные объекты в базе.
Sub ПримерOLE_НаличиеУдаленныхОбъектов()
'
' Задание необходимых параметров перед запуском
'БД и редакция Business Studio, с которыми будем работать
СерверБД = "ИмяСервера"
База = "ИмяБазы"
РедакцияBS = "Enterprise"
'
'Запуск Business Studio
'Получение объекта приложения
Set oleapp = CreateObject("ByteEnterprise.OleApplication")
'Запустить Business Studio в редакции и базой на сервере, указанными ранее.
'В Диспетчере задач появится Business Studio. В панели задач приложения не будет видно.
Set client_app = oleapp.ЗапуститьКлиентскоеПриложение(СерверБД, База, РедакцияBS)
'В панели задач появится приложение
oleapp.ПоказатьКлиентскоеПриложение
'Создаем фильтр по всем Справочникам
SetВсеСправочники = oleapp.ПолучитьКорневуюГруппуКласса("База.Справочники")
'Определяем количество удаленных объектов
Set ФильтрУдаленных = ВсеСправочники.СоздатьФильтр
ФильтрУдаленных.ВключатьПодгруппы = True
ФильтрУдаленных.ВключатьГруппуФильтра = True
ФильтрУдаленных.РезультатВключает = 7 'Включаем удаленные группы и конечные объекты
SetСписокУдаленных = ФильтрУдаленных.Выполнить
КолвоУдаленных = СписокУдаленных.КоличествоЭлементов
'Готовимся к выводу результатов
IfКолвоУдаленных = 0 Then
РезультатУдаленных = "В базе нет удаленных объектов."
Else
РезультатУдаленных = "В базе есть удаленные объекты."
End If
'Вывод сообщения о результатах
MsgBox"Проверка удаленных: " + РезультатУдаленных
End Sub