Об = РеквизитФормыВЗначение("Объект");
Схема = Об.ПолучитьМакет("Схема");
НастройкаТекст = Об.ПолучитьМакет("Настройка");
ЧтениеХМЛ = Новый ЧтениеXML;
ЧтениеХМЛ.УстановитьСтроку(НастройкаТекст.ПолучитьТекст());
НовыйСXDTO = Новый СериализаторXDTO(ФабрикаXDTO);
Настройки = НовыйСXDTO.ПрочитатьXML(ЧтениеХМЛ);
КомпоновщикНастроек = Новый КомпоновщикНастроекКомпоновкиДанных;
КомпоновщикНастроек.ЗагрузитьНастройки(Настройки);
Отб = КомпоновщикНастроек.Настройки.Отбор.Элементы[0];
Отб.ПравоеЗначение = Объект.Партнер;
Элем = КомпоновщикНастроек.Настройки.ПараметрыДанных.Элементы.Найти("ПериодОтчета");
Элем.Использование = Истина;
Элем.Значение = Новый СтандартныйПериод(Дата1, Дата2);
КомпоновщикМакета = Новый КомпоновщикМакетаКомпоновкиДанных;
МакетКомпоновки = КомпоновщикМакета.Выполнить(Схема,
КомпоновщикНастроек.Настройки,,,
Тип("ГенераторМакетаКомпоновкиДанныхДляКоллекцииЗначений"));
ПроцессорКомпоновки = Новый ПроцессорКомпоновкиДанных;
ПроцессорКомпоновки.Инициализировать(МакетКомпоновки);
ТабОтвет = Новый ТаблицаЗначений;
ПроцессорВывода = Новый ПроцессорВыводаРезультатаКомпоновкиДанныхВКоллекциюЗначений;
ПроцессорВывода.УстановитьОбъект(ТабОтвет);
ПроцессорВывода.Вывести(ПроцессорКомпоновки, Истина);
Формирование таблицы данных через СКД и Настройки из макета
Добавить комментарий
