"Вот процедура печати<br> <br>ПечатаемыйДокумент = СсылкаНаОбъект;<br> Ведомости = СсылкаНаОбъект;<br> ФИОСокращенно = Ложь;<br> ТабДокумент = Новый ТабличныйДокумент;<br> ТабДокумент.ПолеСлева = 0;<br> ТабДокумент.ПолеСправа = 0;<br> ТабДокумент.ИмяПараметровПечати = "ПАРАМЕТРЫ_ПЕЧАТИ_СписокПеречислений";<br> <br> Макет = ПолучитьОбщийМакет("СписокПеречисленийЗарплатыВБанк4");<br> <br> // получаем данные для печати<br> ВыборкаДляШапки = СформироватьЗапросПоДокументу(ПечатаемыйДокумент).Выбрать();<br> ВыборкаРаботники = СформироватьЗапросДляПечатиПеречняПеречислений(ПечатаемыйДокумент, Ведомости, ФИОСокращенно).Выбрать();<br> <br> // подсчитываем количество страниц документа - для корректного разбиения на страницы<br> ВсегоСтрокДокумента = ВыборкаРаботники.Количество();<br><br> ОбластьМакетаШапкаДокумента = Макет.ПолучитьОбласть("ШапкаДокумента");<br> ОбластьМакетаШапка = Макет.ПолучитьОбласть("Шапка");<br> ОбластьМакетаСтрока = Макет.ПолучитьОбласть("Строка");<br>// ОбластьМакетаИтогПоСтранице = Макет.ПолучитьОбласть("ИтогПоЛисту");<br> ОбластьМакетаПодвал = Макет.ПолучитьОбласть("Подвал");<br> <br> // массив с двумя строками - для разбиения на страницы<br> ВыводимыеОбласти = Новый Массив();<br> ВыводимыеОбласти.Добавить(ОбластьМакетаСтрока);<br>// ВыводимыеОбласти.Добавить(ОбластьМакетаИтогПоСтранице);<br> <br> // выводим данные о руководителях организации<br> Пока ВыборкаДляШапки.Следующий() Цикл<br> ОбластьМакетаШапкаДокумента.Параметры.Заполнить(ВыборкаДляШапки); // Шапка документа.<br> ОбластьМакетаШапкаДокумента.Параметры.НазваниеОрганизации = СокрЛП(ОбластьМакетаШапкаДокумента.Параметры.НазваниеОрганизации);<br> ОбластьМакетаСтрока.Параметры.Заполнить(ВыборкаДляШапки);<br> ОбластьМакетаПодвал.Параметры.Заполнить(ВыборкаДляШапки); // подписи<br> КонецЦикла;<br> <br> ТабДокумент.Вывести(ОбластьМакетаШапкаДокумента);<br> ТабДокумент.Вывести(ОбластьМакетаШапка);<br> <br> ВыведеноСтраниц = 1; ВыведеноСтрок = 0; Итого = 0;<br> // выводим данные по строкам документа.<br> Пока ВыборкаРаботники.Следующий() Цикл<br> <br> // разбиение на страницы<br> ВыведеноСтрок = ВыведеноСтрок + 1;<br> <br> ОбластьМакетаСтрока.Параметры.Заполнить(ВыборкаРаботники);<br> ОбластьМакетаСтрока.Параметры.НомерСтроки = ВыведеноСтрок;<br> ОбластьМакетаСтрока.Параметры.НомерЛицевогоСчета = ВыборкаРаботники.ФизЛицоСсылка.ЛицевойСчет1;<br> <br> // Проверим, уместится ли строка на странице или надо открывать новую страницу<br> ВывестиПодвалЛиста = Не ФормированиеПечатныхФорм.ПроверитьВыводТабличногоДокумента(ТабДокумент, ВыводимыеОбласти);<br> Если Не ВывестиПодвалЛиста и ВыведеноСтрок = ВсегоСтрокДокумента Тогда<br> ВыводимыеОбласти.Добавить(ОбластьМакетаПодвал);<br> ВывестиПодвалЛиста = Не ФормированиеПечатныхФорм.ПроверитьВыводТабличногоДокумента(ТабДокумент, ВыводимыеОбласти);<br> КонецЕсли;<br> Если ВывестиПодвалЛиста Тогда<br> <br> // ОбластьМакетаИтогПоСтранице.Параметры.ИтогоНаСтранице = ИтогоНаСтранице;<br> // ТабДокумент.Вывести(ОбластьМакетаИтогПоСтранице);<br> ТабДокумент.ВывестиГоризонтальныйРазделительСтраниц();<br> ТабДокумент.Вывести(ОбластьМакетаШапка);<br> ВыведеноСтраниц = ВыведеноСтраниц + 1;<br> // ИтогоНаСтранице = 0;<br> <br> КонецЕсли;<br> <br> ТабДокумент.Вывести(ОбластьМакетаСтрока);<br> // ИтогоНаСтранице = ИтогоНаСтранице + ВыборкаРаботники.Сумма;<br> Итого = Итого + ВыборкаРаботники.Сумма;<br><br> КонецЦикла;<br><br>// Если ВыведеноСтрок > 0 Тогда <br>// ОбластьМакетаИтогПоСтранице.Параметры.ИтогоНаСтранице = ИтогоНаСтранице;<br>// КонецЕсли;<br> <br> ВыводимыеОбласти = Новый Массив();<br> ВыводимыеОбласти.Добавить(ОбластьМакетаСтрока);<br>// ВыводимыеОбласти.Добавить(ОбластьМакетаИтогПоСтранице);<br> ВыводимыеОбласти.Добавить(ОбластьМакетаПодвал);<br> Для Сч = 1 По ОбластьМакетаСтрока.Параметры.Количество() Цикл<br> ОбластьМакетаСтрока.Параметры.Установить(Сч - 1,""""); <br> КонецЦикла;<br> ОбластьМакетаСтрока.Параметры.Физлицо = " " + Символы.ПС + " ";<br> Пока ФормированиеПечатныхФорм.ПроверитьВыводТабличногоДокумента(ТабДокумент, ВыводимыеОбласти, Ложь) Цикл<br> ТабДокумент.Вывести(ОбластьМакетаСтрока);<br> КонецЦикла;<br> <br>// ТабДокумент.Вывести(ОбластьМакетаИтогПоСтранице);<br> ОбластьМакетаПодвал.Параметры.Итого = Итого;<br> ОбластьМакетаПодвал.Параметры.колпер = ВыведеноСтрок;<br> ОбластьМакетаПодвал.Параметры.колраб = ВыведеноСтрок;<br> ТабДокумент.Вывести(ОбластьМакетаПодвал);<br> <br> колпер = ВыведеноСтрок;<br> колраб = ВыведеноСтрок;<br><br> Возврат ТабДокумент;<br> <br>КонецФункции //"