Формирование таблицы данных через СКД и Настройки из макета

Об = РеквизитФормыВЗначение("Объект");

Схема = Об.ПолучитьМакет("Схема");
НастройкаТекст = Об.ПолучитьМакет("Настройка");

ЧтениеХМЛ = Новый ЧтениеXML;
ЧтениеХМЛ.УстановитьСтроку(НастройкаТекст.ПолучитьТекст());

НовыйСXDTO = Новый СериализаторXDTO(ФабрикаXDTO);
Настройки = НовыйСXDTO.ПрочитатьXML(ЧтениеХМЛ);

КомпоновщикНастроек = Новый КомпоновщикНастроекКомпоновкиДанных;
КомпоновщикНастроек.ЗагрузитьНастройки(Настройки);

Отб = КомпоновщикНастроек.Настройки.Отбор.Элементы[0];
Отб.ПравоеЗначение = Объект.Партнер;

Элем = КомпоновщикНастроек.Настройки.ПараметрыДанных.Элементы.Найти("ПериодОтчета");
Элем.Использование = Истина;
Элем.Значение = Новый СтандартныйПериод(Дата1, Дата2);

КомпоновщикМакета = Новый КомпоновщикМакетаКомпоновкиДанных;
МакетКомпоновки = КомпоновщикМакета.Выполнить(Схема,
    КомпоновщикНастроек.Настройки,,,
    Тип("ГенераторМакетаКомпоновкиДанныхДляКоллекцииЗначений"));

ПроцессорКомпоновки = Новый ПроцессорКомпоновкиДанных;
ПроцессорКомпоновки.Инициализировать(МакетКомпоновки);

ТабОтвет = Новый ТаблицаЗначений;

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

Добавить комментарий