2.1 KiB
2.1 KiB
title, slug
title | slug |
---|---|
Параметры выбора программно | 1с-1-общие-управляемые-формы/параметры-выбора-программно |
#Область ОбработчикиСобытийФормы
&НаСервере
Процедура ПриСозданииНаСервере(Отказ, СтандартнаяОбработка)
УстановитьПараметрВыбораПоляВидОбъекта();
КонецПроцедуры
#КонецОбласти
#Область СлужебныеПроцедурыИФункции
&НаСервере
Процедура УстановитьПараметрВыбораПоляВидОбъекта()
Запрос = Новый Запрос;
Запрос.Текст =
"ВЫБРАТЬ
| УДК_ВидыОбъектовМетаданных.Ссылка КАК Ссылка
|ИЗ
| Справочник.УДК_ВидыОбъектовМетаданных КАК УДК_ВидыОбъектовМетаданных
|ГДЕ
| УДК_ВидыОбъектовМетаданных.Ссылка <> ЗНАЧЕНИЕ(Справочник.УДК_ВидыОбъектовМетаданных.Подсистема)
| И НЕ УДК_ВидыОбъектовМетаданных.ЭтоГруппа";
МассивДопустимыхВидов = Запрос.Выполнить().Выгрузить().ВыгрузитьКолонку("Ссылка");
ФиксированныйМассив = Новый ФиксированныйМассив(МассивДопустимыхВидов);
НовыйПараметр = Новый ПараметрВыбора("Отбор.Ссылка", ФиксированныйМассив);
МассивПараметров = Новый Массив;
МассивПараметров.Добавить(НовыйПараметр);
НовыеПараметры = Новый ФиксированныйМассив(МассивПараметров);
Элементы.ВидОбъекта.ПараметрыВыбора = НовыеПараметры;
КонецПроцедуры
#КонецОбласти