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