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