ВПФ Печать на разных страницах, отсутствие шапки на четных формах

1С v8

11.01.12

✎

10:07

УПП 8.2 создана ВПФ СправкиАиБ - Раздел Б для реализации товаров и услуг, проблема в том ,что когда в документе несколько наименований, то шапка при печати на разных страницах выводится только на нечетных страницах 1 3 5 и т.д. подскажите пожалуйста как это исправить? что бы шапка выводилась на каждой странице?
http://rghost.ru/35846671 вот сама справка

1 demous

11.01.12

✎

10:38

ни кто не подскажет?

2 ThreeTONE

11.01.12

✎

10:43

ну у тебя же в функции -

Функция ПечатьСправкаБ() Экспорт

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

Макет = ПолучитьМакет("Макет");
ОбластьШапкаБ = Макет.ПолучитьОбласть("ШапкаБсРСТ");
ОбластьШапкаБ.Параметры.К_ТТН = ОбщегоНазначения.ПолучитьНомерНаПечать(СсылкаНаОбъект.Ссылка);

Для каждого СтрокаДок Из СсылкаНаОбъект.Товары Цикл

КратностьСтр = СтрокаДок.НомерСтроки / 2;

Если (КратностьСтр <> Окр(КратностьСтр)) Тогда

Если СтрокаДок.НомерСтроки > 1 Тогда
ТабДокумент.ВывестиГоризонтальныйРазделительСтраниц();
КонецЕсли;

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

КонецЕсли;

ТабДокумент.Вывести(ПечатьРазделБ(СтрокаДок));

КонецЦикла;

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

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

перенеси строку

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

за пределы условия если...тогда

3 demous

11.01.12

✎

10:46

эту функцию я просто брал из типовой справки

4 demous

11.01.12

✎

10:48

только что то я не совсем понял, что мне тут изменить надо?

5 ThreeTONE

11.01.12

✎

10:49

и?
в условии у тебя проверяется чётность, и если номер не чётный, выводится ОбластьШапкаБ.

найди два отличия:

Функция ПечатьСправкаБ() Экспорт

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

Макет = ПолучитьМакет("Макет");
ОбластьШапкаБ = Макет.ПолучитьОбласть("ШапкаБсРСТ");
ОбластьШапкаБ.Параметры.К_ТТН = ОбщегоНазначения.ПолучитьНомерНаПечать(СсылкаНаОбъект.Ссылка);

Для каждого СтрокаДок Из СсылкаНаОбъект.Товары Цикл

КратностьСтр = СтрокаДок.НомерСтроки / 2;

Если (КратностьСтр <> Окр(КратностьСтр)) Тогда

Если СтрокаДок.НомерСтроки > 1 Тогда
ТабДокумент.ВывестиГоризонтальныйРазделительСтраниц();
КонецЕсли;

КонецЕсли;

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

ТабДокумент.Вывести(ПечатьРазделБ(СтрокаДок));

КонецЦикла;

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

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

6 demous

11.01.12

✎

10:50

Все, огромное спасибо за помощь! очень благодарен!!!

7 НЕА123

11.01.12

✎

10:56

в макете повторятьприПечатиСтроки недостаточно
?