названиеорганизации » Поиск

Результаты по ключевому слову: названиеорганизации

Как при печати выводить шапку на каждой странице (ПовторятьПриПечатиСтроки)?

Необходимо при печати, если происходит переход на следующую страницу таблицы, выводить шапку таблицы вверху на новой странице.

для печати шапки на каждой странице в языке программирования есть специальный метод - ПовторятьПриПечатиСтроки

Примеры его использования:

Код 1C v 8.х

 ТабДок.ПовторятьПриПечатиСтроки = ТабДок.Область(1, , 2, );

ЭлементыФормы.Поле_ТД.ПовторятьПриПечатиСтроки = Макет.Область("Шапка_Спецификации"); //или так  

ЭлементыФормы.Поле_ТД.ПовторятьПриПечатиСтроки = Макет.Область("R777:R778");

Полный код вывода табличного документа с повторением шапки на каждой странице:

Код 1C v 8.х

 Функция ПечатьПриказаТ11а()



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

	ТабДокумент.ИмяПараметровПечати = "ПАРАМЕТРЫ_ПЕЧАТИ_ПечатнаяФорма_МатериальнаяПомощь_Т11а";

	ТабДокумент.ПовторятьПриПечатиСтроки = ТабДокумент.Область("R21:R22");

	

	Макет 		= ПолучитьМакет("Т11а");

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

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

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

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





	ВыборкаДляШапкиДокумента = СформироватьЗапросДляШапкиДокумента().Выбрать();

	ВыборкаРаботники = СформироватьЗапросДляТабличнойЧасти(1).Выбрать();  		// ТЧ "Начисления"

	Если ВыборкаРаботники.Количество() = 0 Тогда

		ВыборкаРаботники = СформироватьЗапросДляТабличнойЧасти(2).Выбрать();	// ТЧ "Доп.Начисления"

	КонецЕсли;		

	

	// Массив с двумя строками - для разбиения на страницы

	ВыводимыеОбласти = Новый Массив();

	ВыводимыеОбласти.Добавить(ОбластьМакетаСтрока);

	

	// Вывод шапки документа

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

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

 		ОбластьМакетаШапкаДокумента.Параметры.НазваниеОрганизации = СокрЛП(ОбластьМакетаШапкаДокумента.Параметры.НазваниеОрганизации);

	КонецЦикла;

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

	ном=0;

	Пока ВыборкаРаботники.Следующий() Цикл

		ОбластьМакетаСтрока.Параметры.Заполнить(ВыборкаРаботники);

		ном=ном+1;

		ОбластьМакетаСтрока.Параметры.ПодразделениеОрганизации	= ВыборкаРаботники.ПодразделениеОрганизации.ПолноеНаименование();		

		ОбластьМакетаСтрока.Параметры.ном=ном;

		ТабДокумент.Вывести(ОбластьМакетаСтрока);

	КонецЦикла;

	

	ОбластьМакетаПодвал.Параметры.Заполнить(ВыборкаДляШапкиДокумента); // Из запроса шапка документа.

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





	Если ТабДокумент.ВысотаТаблицы > 0 Тогда

		Возврат УниверсальныеМеханизмы.НапечататьДокумент(ТабДокумент, 1, Ложь, ОбщегоНазначения.СформироватьЗаголовокДокумента(СсылкаНаОбъект,"Приказ о поощрении работника "));

	КонецЕсли;

	//Возврат ТабДокумент;



КонецФункции

Категория: Табличный документ

Шаблон кода для вывода данных в табличный документ

Часто при разработке необходимо вывести данные в печатную форму, ниже шаблон вывода в табличный документ

Пример процедуры Вывода на печать

Код 1C v 8.х

 Процедура Печать(ТабДок) Экспорт



//создание нового  табличного   документа 

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



//получение макета для печати расходной накладной

Макет = Документы.РасходнаяНакладная.ПолучитьМакет("Основной");



//получим область "Заголовок" как новый  табличный   документ  (!)

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



//укажем параметры области

Область.Параметры.НомерДокумента = Номер;

Область.Параметры.От = Дата;

Область.Параметры.Кому = Контрагент;



//выведем заполненную область "Заголовок"  в   табличный   документ 

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



//выведем область "Шапка"  в   табличный   документ 

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



//получение области "Строка"

//обратите внимание, что это можно сделать до цикла по строкам

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



// вывод  строк  документа  в печатную форму

Для Каждого СтрСостава Из Состав Цикл 

          //заполнение параметров области из строки  табличной  части 

     Область.Параметры.Заполнить(СтрСостава);



     // вывод  сформированной области  в   табличный   документ 

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



КонецЦикла;



// вывод  области "Подвал"

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

Область.Параметры.ИтогоКоличество = Состав.Итог("Количество");

Область.Параметры.ИтогоСумма = Состав.Итог("Сумма");

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



//установим параметры отображения  табличного   документа 

ТабДок.ТолькоПросмотр = Истина;

ТабДок.ОтображатьЗаголовки = Истина;

ТабДок.ОтображатьСетку = Ложь;



//покажем  табличный   документ  на экране 

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



КонецПроцедуры<br>

Пример функции формирующей печатную форму Счета по Ссылке на документ:

Код 1C v 8.х

 Функция СформироватьПечатнуюФорму(СсылкаНаДокумент, ОбъектыПечати)



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

ТабличныйДокумент.ИмяПараметровПечати = "ПАРАМЕТРЫ_ПЕЧАТИ_СчетНаОплату";



МакетОбработки = ПолучитьМакет("Счет");



//заполняем шапку

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

ОбластьШапка.Параметры.НомерДокумента = СсылкаНаДокумент.Номер;

ОбластьШапка.Параметры.ДатаДокумента = СсылкаНаДокумент.Дата;

ОбластьШапка.Параметры.НазваниеОрганизации = СсылкаНаДокумент.Организация.Наименование;

//выводим шапку в табличный документ

ТабличныйДокумент.Вывести(ОбластьШапка);



//заполняем строки ТЧ

ОбластьСтроки = МакетОбработки.ПолучитьОбласть("СтрокаТЧ");



// Перебор строк документа

Для Каждого ТекущаяСтрока Из СсылкаНаДокумент.Товары Цикл

ЗаполнитьЗначенияСвойств(ОбластьСтроки.Параметры, ТекущаяСтрока);

ТабличныйДокумент.Вывести(ОбластьСтроки);

КонецЦикла;



//заполняем подвал

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

ОбластьПодвал.Параметры.КоличествоИтог = СсылкаНаДокумент.Товары.Итог("Количество");

ОбластьПодвал.Параметры.СуммаИтог = СсылкаНаДокумент.Товары.Итог("Сумма");

ОбластьПодвал.Параметры.ИмяОтветственного = СсылкаНаДокумент.Менеджер.Наименование;

//выводим подвал в табличный документ

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



// Установим настройки выводимого документа

ТабличныйДокумент.АвтоМасштаб = Истина;



Возврат ТабличныйДокумент;

КонецФункции

Категория: Табличный документ