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