Команды "Отбор по текущему значению" и "Отключить отбор" для управляемого приложения (Управление торговлей 11, Розница 2, Управление небольшой фирмой и т.д.)

1) Создаем команду с именем: ОтборПоЗначениюВТекущейКолонке

2) Далее настройка параметров команды

Параметр Группа

 Устанавливаем значение Командная панель формы.Важное

Параметр Тип параметра команды

Нажимаем кнопку выбора.

В открывшемся окне раскрываем все папки кроме «ПеречислениеСсылка» и «ТочкаМаршрутаБизнессПроцессаСсылка».

Нажимаем комбнацию «Ctrl + A». Нажимаем «Пробел». Должны появится флажки у выделенных объектов.

Нажимаем ОК.

Параметр Картинка

Выбираем подходящую картинку (можно перенести из библиотеки стандартных картинок 8.1).

Параметр Отображение

Картинка.

3) Добавляем код для нашей команды

 

&НаКлиенте

Процедура ОбработкаКоманды(ПараметрКоманды, ПараметрыВыполненияКоманды)



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

&НаКлиенте
Процедура УстановитьОтборНаКлиенте(Список, ИмяПоля, ЗначениеПоля)

ОбщегоНазначенияКлиентСервер.УстановитьЭлементОтбора(Список.Отбор, ИмяПоля, ЗначениеПоля, , , , РежимОтображенияЭлементаНастройкиКомпоновкиДанных.БыстрыйДоступ);

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

 

4) Добавляем команду ОтключитьОтбор.

Выполняем соответвующие действия 1,2. Код команды:

&НаКлиенте
Процедура ОбработкаКоманды(ПараметрКоманды, ПараметрыВыполненияКоманды)

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

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

Примечание:

Если не подключена БСП, необходимо в общий модуль ОбщегоНазначенияКлиентСервер взять из нее функции для работы с отборами динамических списков.