1С 8.x : Как установить отбор в справочнике «без помеченных на удаление» программным путем?

 Процедура ПриОткрытии()



	// чтобы для выбора справочник открывался в неиерархическом виде (чтобы не нужно было каждый раз "раскрывать" папки в поисках нужного элемента)

	ЭлементыФормы.СправочникСписок.ИерархическийПросмотр = Ложь;



	// можно установить ограничение - для определенной роли

	//Если НЕ РольДоступна("усРазработчик") Тогда



		// установка собственно ограничения видимости помеченных на удаление элементов:

		ЭлементОтбора = СправочникСписок.Отбор.Найти("ПометкаУдаления");

		Если ЭлементОтбора = Неопределено Тогда

			ЭлементОтбора = СправочникСписок.Отбор.Добавить("ПометкаУдаления");

		КонецЕсли;

		ЭлементОтбора.Установить(Ложь);

		// чтобы можно было открыть отбор и вручную сбросить установленные выше флаг отбора:

		ЭлементыФормы.СправочникСписок.НастройкаОтбора.ПометкаУдаления.Доступность = Истина;



		// чтобы папки не отображались:

		ЭлементОтбора = СправочникСписок.Отбор.Найти("ЭтоГруппа");

		Если ЭлементОтбора = Неопределено Тогда

			ЭлементОтбора = СправочникСписок.Отбор.Добавить("ЭтоГруппа");

		КонецЕсли;

		ЭлементОтбора.Установить(Ложь);

		// чтобы можно было открыть отбор и вручную сбросить установленные выше флаг отбора:

		ЭлементыФормы.СправочникСписок.НастройкаОтбора.ЭтоГруппа.Доступность = Истина;



	//КонецЕсли;



КонецПроцедуры