Динамические колонки в макете отчета

Добрый день коллеги, делаю отчет по расчетам контрагентами, основное все сделал, как мне сделать колонки счетов учета которые идут после поля "Итого с НДС", ниже прикрепил фото доделанный отчет в эксель, код отчета так же выкладываю.

ТабДок = ЭлементыФормы.ТабДок;
ТабДок.Очистить();
ТабДок.АвтоМасштаб = Истина;
ТабДок.ТолькоПросмотр = Истина;

Макет = ПолучитьМакет("Макет");
Шапка = макет.ПолучитьОбласть("Шапка");

Шапка.Параметры.Сформирован = Формат(ТекущаяДатаСеанса(), "dd.MM.yyyy");

СтрокаМОЛ = ?(НеПоказыватьДокументы,макет.ПолучитьОбласть("СтрокаМОЛБез"),макет.ПолучитьОбласть("СтрокаМОЛ"));
СтрокаДокумент = Макет.ПолучитьОбласть("СтрокаДокумент");
СтрокаДокумен = Макет.ПолучитьОбласть("СтрокаДокумен");
Итог = макет.ПолучитьОбласть("Итог");
ТекстОрганизация = "";
Если ЗначениеЗаполнено(Организация) Тогда
ТекстОрганизация = Организация;
КонецЕсли;
ТекстПериод = "";
Если (НачалоПериода>Дата(1,1,1)) И (КонецПериода>Дата(1,1,1)) Тогда
ТекстПериод = " за период с "+Формат(НачалоПериода, "ДФ=dd.MM.yyyy")+" по "+Формат(КонецПериода, "ДФ=dd.MM.yyyy");
КонецЕсли;
Шапка.Параметры.Организация = ТекстОрганизация;
Шапка.Параметры.Период = ТекстПериод;
ТабДок.Вывести(Шапка);
////////////ТУТ ИДЕТ ЗАПРОС К РЕГИСТРУ ХОЗРАСЧЕТНЫЙОСТАТКИИОБОРОТЫ

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


Пока ВыборкаДокумент.Следующий() Цикл
СтрокаДокумент.Параметры.Заполнить(ВыборкаДокумент);
Если ТипЗнч(ВыборкаДокумент.Документ) = Тип("ДокументСсылка.ПриходныйКассовыйОрдер")ИЛИ ТипЗнч(ВыборкаДокумент.Документ) = Тип("ДокументСсылка.РасходныйКассовыйОрдер")ИЛИ ТипЗнч(ВыборкаДокумент.Документ) = Тип("ДокументСсылка.ПлатежноеПоручениеИсходящее") Тогда
СтрокаДокумент.Параметры.СтатьяДДС = ВыборкаДокумент.Документ.РасшифровкаПлатежа[0].СтатьяДвиженияДенежныхСредств;
СтрокаДокумент.Параметры.риход = ВыборкаДокумент.Документ.РасшифровкаПлатежа[0].СуммаПлатежа;
риходИтог = риходИтог + СтрокаДокумент.Параметры.риход;
СтрокаДокумент.Параметры.асход = NULL;
СтрокаДокумент.Параметры.СтатьяЗатрат = NULL;
СтрокаДокумент.Параметры.НДС = NULL;
СтрокаДокумент.Параметры.бНДС = NULL;

КонецЕсли;

Если ТипЗнч(ВыборкаДокумент.Документ) = Тип("ДокументСсылка.ПоступлениеТоваровУслуг") Тогда
СтрокаДокумент.Параметры.СтатьяДДС = NULL;

СтрокаДокумент.Параметры.риход = NULL;
Если ВыборкаДокумент.Документ.Услуги.Количество() > 0 Тогда
СтрокаДокумент.Параметры.СтатьяЗатрат = ВыборкаДокумент.Документ.Услуги[0].СтатьяЗатрат; //Подставляет статью затрат где докумете Услуги
КонецЕсли;
Если ВыборкаДокумент.Документ.Товары.Количество() > 0 Тогда
СтрокаДокумент.Параметры.СтатьяЗатрат = ВыборкаДокумент.Документ.Товары[0].СчетУчетаБУ; //Подставляет счет учета где в документе Товары
КонецЕсли;

Если ВыборкаДокумент.Документ.Товары.Количество() > 0 Тогда
Шапка.Параметры.СтатьяЗатрат = ВыборкаДокумент.Документ.Товары[0].СчетУчетаБУ; //Подставляет счет учета где в документе Товары
КонецЕсли;

КонецЕсли;


СтрокаДокумент.Параметры.Заполнить(ВыборкаДокумент);
СтрокаДокумент.Параметры.Дата = ВыборкаДокумент.Документ.Дата;
ТабДок.Вывести(СтрокаДокумент);

КонецЦикла;