Вывод итого в печати документа

Question

Очень долго пытаюсь решить проблему, есть документ сборка изделий и есть печать этого документа, в табличной части документа есть подвал с выводом итогов и нужно этот итог вывести в печатную форму снизу(Фото, где должен находиться итог)



Прикрепляю код:
[1C-CODE]Процедура Печать(ТабДок, Ссылка) Экспорт
	//{{_КОНСТРУКТОР_ПЕЧАТИ(Печать)
	Макет = Документы.СборкаИзделий.ПолучитьМакет("Печать");
	Запрос = Новый Запрос;
	Запрос.Текст =
	"ВЫБРАТЬ
	|	СборкаИзделий.Дата,
	|	СборкаИзделий.МастерСборщик,
	|	СборкаИзделий.Номер,
	|	СборкаИзделий.ТабличнаяЧасть1.(
	|		НомерСтроки,
	|		Этаж,
	|		Квартира,
	|		Изделие,
	|		ВидРаботы,
	|		Количество,
	|		Цена,
	|		Всего
	|	)
	|ИЗ
	|	Документ.СборкаИзделий КАК СборкаИзделий
	|ГДЕ
	|	СборкаИзделий.Ссылка В (&Ссылка)";
	Запрос.Параметры.Вставить("Ссылка", Ссылка);
	Выборка = Запрос.Выполнить().Выбрать();

	ОбластьЗаголовок = Макет.ПолучитьОбласть("Заголовок");
	Шапка = Макет.ПолучитьОбласть("Шапка");
	ОбластьТабличнаяЧасть1Шапка = Макет.ПолучитьОбласть("ТабличнаяЧасть1Шапка");
	ОбластьТабличнаяЧасть1 = Макет.ПолучитьОбласть("ТабличнаяЧасть1");
	Подвал = Макет.ПолучитьОбласть("Подвал");

	ТабДок.Очистить();

	ВставлятьРазделительСтраниц = Ложь;
	Пока Выборка.Следующий() Цикл
		Если ВставлятьРазделительСтраниц Тогда
			ТабДок.ВывестиГоризонтальныйРазделительСтраниц();
		КонецЕсли;

		ТабДок.Вывести(ОбластьЗаголовок);

		Шапка.Параметры.Заполнить(Выборка);
		ТабДок.Вывести(Шапка, Выборка.Уровень());

		ТабДок.Вывести(ОбластьТабличнаяЧасть1Шапка);
		ВыборкаТабличнаяЧасть1 = Выборка.ТабличнаяЧасть1.Выбрать();
			Пока ВыборкаТабличнаяЧасть1.Следующий() Цикл
			ОбластьТабличнаяЧасть1.Параметры.Заполнить(ВыборкаТабличнаяЧасть1);
			ТабДок.Вывести(ОбластьТабличнаяЧасть1, ВыборкаТабличнаяЧасть1.Уровень());
		КонецЦикла;
		
		Подвал.Параметры.Заполнить(Выборка);
		Подвал.Параметры.Итого = Ссылка.ТабличнаяЧасть1.Итог("Всего");
		ТабДок.Вывести(Подвал);

		ВставлятьРазделительСтраниц = Истина;
	КонецЦикла;
	//}}   
	
	
КонецПроцедуры[/1C-CODE]

Accepted Answer

(1)
[CODE]
CуммаИтого = 0;
ТабДок.Вывести(ОбластьТабличнаяЧасть1Шапка);
ВыборкаТабличнаяЧасть1 = Выборка.ТабличнаяЧасть1.Выбрать();
Пока ВыборкаТабличнаяЧасть1.Следующий() Цикл
ОбластьТабличнаяЧасть1.Параметры.Заполнить(ВыборкаТабличнаяЧасть1);
ТабДок.Вывести(ОбластьТабличнаяЧасть1, ВыборкаТабличнаяЧасть1.Уровень());

CуммаИтого = CуммаИтого+ВыборкаТабличнаяЧасть1.Всего;

КонецЦикла;

Подвал.Параметры.Заполнить(Выборка);
//Подвал.Параметры.Итого = Ссылка.ТабличнаяЧасть1.Итог("Всего");

Подвал.Параметры.Итого   = CуммаИтого;

ТабДок.Вывести(Подвал);[/CODE]