В начало

Выгрузка отчета в ТЗ

 

Листинг. Модуль формы внешней обработки

&НаСервере

Функция ВыгрузитьОтчет_ вТЗ(Знач ДатаНачала, Знач ДатаОкончания)

 

            Отчет = Отчеты.ОтчетСоглашения.Создать();

            СхемаКомпоновкиДанных = Отчет.СхемаКомпоновкиДанных;

            Настройки = Отчет.КомпоновщикНастроек.ПолучитьНастройки();

           

            Настройки.ПараметрыДанных.УстановитьЗначениеПараметра("ДатаНачала", ДатаНачала);

            Настройки.ПараметрыДанных.УстановитьЗначениеПараметра("ДатаОкончания", ДатаОкончания);

           

            КомпоновщикМакета = Новый КомпоновщикМакетаКомпоновкиДанных;

           

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

           

            ПроцессорКомпоновкиДанных = Новый ПроцессорКомпоновкиДанных;

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

           

            ПроцессорВывода = Новый ПроцессорВыводаРезультатаКомпоновкиДанныхВКоллекциюЗначений;

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

            ПроцессорВывода.УстановитьОбъект(ТЗ);

            ПроцессорВывода.Вывести(ПроцессорКомпоновкиДанных, Истина);

 

            Возврат ТЗ;   

КонецФункции