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