Вывод результат отчета валовой прибыли в ТЗ

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

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