v8: Выбока данных из списка документов

 Процедура Печать()

	

	ТабДок = Новый ТабличныйДокумент;

	

	Макет = Документы.ЛичныйПриказ3.ПолучитьМакет("Макет1");

		

	Запрос = Новый Запрос;

	Запрос.Текст = 

		"ВЫБРАТЬ

		|	ЛичныйПриказ3ТабличнаяЧасть.Документ,

		|	ПРЕДСТАВЛЕНИЕ(ЛичныйПриказ3ТабличнаяЧасть.Документ)

		|ИЗ

		|	Документ.ЛичныйПриказ3.ТабличнаяЧасть КАК ЛичныйПриказ3ТабличнаяЧасть";

	//Запрос.УстановитьПараметр("");

	РезультатЗапроса1 = Запрос.Выполнить().Выгрузить();

	

	ОбластьЗаголовок = Макет.ПолучитьОбласть("Заголовок");

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

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

	ОбластьПодвалТаблицы = Макет.ПолучитьОбласть("ПодвалТаблицы");

	ОбластьДетальныхЗаписей = Макет.ПолучитьОбласть("Детали");



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

	ТабДок.Вывести(ОбластьЗаголовок);

	ТабДок.Вывести(ОбластьШапкаТаблицы);

	ТабДок.НачатьАвтогруппировкуСтрок();



	ВыборкаДетальныеЗаписи = РезультатЗапроса1.Выбрать();



	Пока ВыборкаДетальныеЗаписи.Следующий() Цикл

		ОбластьДетальныхЗаписей.Параметры.Заполнить(ВыборкаДетальныеЗаписи);

		ТабДок.Вывести(ОбластьДетальныхЗаписей, ВыборкаДетальныеЗаписи.Уровень());

	КонецЦикла;



	ТабДок.ЗакончитьАвтогруппировкуСтрок();

	ТабДок.Вывести(ОбластьПодвалТаблицы);

	ТабДок.Вывести(ОбластьПодвал);

	ТабДок.Показать();

	

КонецПроцедуры // Печать()