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