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

	Запрос.Параметры.Вставить("Ссылка", Ссылка);
	Выборка = Запрос.Выполнить().Выбрать();
	
	Шапка = Макет.ПолучитьОбласть("Шапка");
	ОбластьТабличнаяЧасть1 = Макет.ПолучитьОбласть("ТабличнаяЧасть1");
	Подвал = Макет.ПолучитьОбласть("Подвал");

	ТабДок.Очистить();

	ВставлятьРазделительСтраниц = Ложь;
	Пока Выборка.Следующий() Цикл
		Если ВставлятьРазделительСтраниц Тогда
			ТабДок.ВывестиГоризонтальныйРазделительСтраниц();
		КонецЕсли;

																	  
																	  
		Шапка.Параметры.Заполнить(Выборка);
		Шапка.Параметры.ПериодУчёта = Формат(Выборка.ПериодУчёта, "ДФ='ММММ yyyy'");      
		ТабДок.Вывести(Шапка, Выборка.Уровень());

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

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

		ВставлятьРазделительСтраниц = Истина;
	КонецЦикла;
	//}}
КонецПроцедуры

{"contextData":{"NaN":{}},"contextMarkers":[]}