Отборы СКД на форме УФ

Создание отборов из СКД для таблиц значений.

Описание
Подробнее

Описание

Доброго времени суток. Возникла у меня потребность в динамическом отборе таблицы значений. На не управляемых формах эту функцию использовал очень часто. Но на УФ как то не доводилось. Но понадобилось. И после изучения данного вопроса получился аккуратный шаблон для использования.

Создание динамического отбора для ТЗ

Создаем реквизит с типом «КомпоновщикНастроекКомпоновкиДанных»
Создадим для наглядности два реквизита ДатаНачала и ДатаОкончания
Далее создаем Макет СКД который будит выбирать необходимую таблицу значений.

С одним условием Период ДатаНач и ДатаОкон.

В запросе СКД я выбираю Список документов за период.

Дальше создаем таблицу значений и переходим к формированию формы.

Выносим реквизиты Периода
Потом выносим реквизит на форму для формирования отбора Настройки (это наш КомпоновщикНастроекКомпоновкиДанных )->Настройки->Отбор (Объект.Настройки.Настройки.Отбор)
И ,соответственно, нашу таблицу значений выносим на форму. Также не забываем команду для запуска отбора
Далее переходим в модуль формы
При создании на сервере прописываем такой код. Это необходимо для того чтобы в таблицу подтянулись настройки отборов из СКД

&НаСервере
Процедура ПриСозданииНаСервере(Отказ, СтандартнаяОбработка)
	
	ОО = РеквизитФормыВЗначение("Объект");	
	
	СКД = ОО.ПолучитьМакет("МакетСКД");
	
	URLСКД = ПоместитьВоВременноеХранилище(СКД, Новый УникальныйИдентификатор()); 	
	ОО.Настройки.Инициализировать(Новый ИсточникДоступныхНастроекКомпоновкиДанных(URLСКД));	
	
	НастройкиПоУмолчанию = СКД.НастройкиПоУмолчанию;	
	ОО.Настройки.ЗагрузитьНастройки(НастройкиПоУмолчанию);	
	ЗначениеВРеквизитФормы(ОО, "Объект");
	
КонецПроцедуры

Описываем команду для формирования ТЗ

&НаКлиенте
Процедура Команда1(Команда)	
	Страт();
КонецПроцедуры

&Насервере
Процедура Страт()
	
	// Запуск работы с СКД
	ОО = РеквизитФормыВЗначение("Объект");	
	СхемаКомпоновкиДанных = ОО.ПолучитьМакет("МакетСКД"); 	
	//УстановитьСтруктуруНастроекДляВыводаВТаблицуСКолонкойСсылка(ОО.Настройки.Настройки);	
	// Получение таб значения из СКД
	ТЗВыгрузкаИзСКД = СкомпоноватьВТаблицуЗначений(СхемаКомпоновкиДанных, ОО.Настройки);	
	Для каждого Стр из ТЗВыгрузкаИзСКД цикл
		НС=Объект.ТабличнаяЧасть.Добавить();
		нс.ссылка=Стр.Ссылка;
	КонецЦикла;
	
КонецПроцедуры


&НаСервере
Функция СкомпоноватьВТаблицуЗначений(СхемаКомпоновкиДанных, КомпоновщикНастроек) Экспорт
	
	НастройкиСКД = КомпоновщикНастроек.Настройки;	
	//установка параметров отчета	
	НастройкиСКД.ПараметрыДанных.УстановитьЗначениеПараметра("ДатаНач",Объект.ДатаНачала);
	НастройкиСКД.ПараметрыДанных.УстановитьЗначениеПараметра("ДатаОкон",Объект.ДатаОкончания);
	
	
	//Запускаем компоновку
	
	КомпоновщикМакета = Новый КомпоновщикМакетаКомпоновкиДанных; 	
	МакетКомпоновки = КомпоновщикМакета.Выполнить(СхемаКомпоновкиДанных, КомпоновщикНастроек.Настройки,,,Тип("ГенераторМакетаКомпоновкиДанныхДляКоллекцииЗначений"));	
	//Создаем процессор компоновки	
	ПроцессорКомпоновки = Новый ПроцессорКомпоновкиДанных; 	
	ПроцессорКомпоновки.Инициализировать(МакетКомпоновки);	
	//Выводим в таблицу значений 	
	ПроцессорВывода = Новый ПроцессорВыводаРезультатаКомпоновкиДанныхВКоллекциюЗначений; 	
	ТЗ = ПроцессорВывода.Вывести(ПроцессорКомпоновки, истина); 	
	
	Возврат ТЗ; 	
КонецФункции

Сохраняем и проверяем.

Вот что у нас получилось. Спасибо за внимание .

Тестировалась на платформе 1С:Предприятие 8.3 (8.3.18.1741).

Каталог решений - Отборы СКД на форме УФ