&НаСервере
Функция
бит_ПриОткрытииПослеНаСервере()
Для Каждого Эл Из ЭтаФорма.Список.Отбор.Элементы Цикл
Если Эл.Представление = "Слава КПСС" Тогда
ЭтаФорма.Список.Отбор.Элементы.Удалить(Эл);
КонецЕсли;
КонецЦикла;
Если НЕ СлаваКПСС.ДоступнаРоль("АдминистраторСистемы") Тогда
Список.КомпоновщикНастроек.Настройки.Отбор.Элементы.Очистить();
СписокОбъектовОграничения
= СлаваКПСС.ПолучитьОбъектыПоАвторуИИсполнителю(Пользователи.АвторизованныйПользователь());
ЭлементОтбора
=
Список.Отбор.Элементы.Добавить(Тип("ЭлементОтбораКомпоновкиДанных"));
ЭлементОтбора.ЛевоеЗначение
= Новый ПолеКомпоновкиДанных("Ссылка");
ЭлементОтбора.ВидСравнения
= ВидСравненияКомпоновкиДанных.ВСписке;
ЭлементОтбора.Использование
= Истина;
ЭлементОтбора.Представление
= "Слава КПСС";
ЭлементОтбора.ПравоеЗначение
= СписокОбъектовОграничения;
КонецЕсли;
КонецФункции
|