::Универсальный фильтр по справочникам:.

Как заставить работать универсальный фильтр?

• 1.Скачать и разархивировать Filtr.zip .
• 2.Обработку Фильтр.ert сохранить в каталог ExtForms рабочей базы.
• 3.В форму списка справочника нужно вставить кнопку кнФильтр с именем "Фильтр" и привесить к ней обработчик нажатия.

Процедура УстФильтр())
    Конт=Вид();
    //ОткрытьФормуМодально("Обработка.Фильтр",Конт);
    ОткрытьФормуМодально("Отчет",Конт,КаталогИБ()+
 	"ExtForms\Фильтр.ert");
    Если Конт=Вид() Тогда
	Возврат;
    Иначе
      Если Конт.РазмерСписка()=0 Тогда
	Форма.кнФильтр.Заголовок("Фильтр");
	ИерархическийСписок(1,1);
	ИспользоватьСписокЭлементов();
      Иначе
	Форма.кнФильтр.Заголовок("Фильтр включен");
	ИерархическийСписок(0,0);
	ИспользоватьСписокЭлементов(Конт);
      КонецЕсли;
    КонецЕсли;
КонецПроцедуры

• 4.Все. Запускайте 1С Предприятие, заходите в справочник и формируйте фильтр.
• 5.Вопросы, предложения и пожелания автору на galeonXXI@narod.ru.