Вывод колонтитула или логотипа внизу страницы, вне зависимости от количества строк в печатной форме.

Вывод колонтитула или логотипа вниз страницы, вне зависимости от количества строк в печатной форме.

Была форма счета сделанная в excel и она была утверждена в валютном контроле… ее нужно было реализовать в 1с.

Казалось бы чего проще, но столкнулся с проблемой, внизу формы находились реквизиты и подпись… и при выводе печатной формы счета «Подвал» должен всегда находиться внизу страницы, вне зависимости от того сколько строчек номенклатуры выводится, одна или 10-15. Когда выводилось мало строчек, подвал счета естесственно перемещался вверх поближе к строчкам номенклатуры.

Долго думал, читал в интернет и делюсь опытом….

 

Вот пример кода, ниже поясню смысл.

ОбластьМакета = Макет.ПолучитьОбласть(«Пропуск»); //// В макете создаем область которая содержит просто не заполненную строку, она будет нужна для того,чтобы заполнить пустоту между строчками и подвалом.
ТабДокумент.Вывести(ОбластьМакета);

// Проставляем пустые строчки, так чтобы подвал всегда находился внизу страницы.

ПоследняяОбласть = Макет.ПолучитьОбласть(«ПодвалСчета»);
ПустаяОбласть = Макет.ПолучитьОбласть(«Пустая»);
Итого = Макет.ПолучитьОбласть(«Итого»);
ИтогоНДС = Макет.ПолучитьОбласть(«ИтогоНДС»);
// СуммаПрописью = Макет.ПолучитьОбласть(«СуммаПрописью»);
КурсИтого = Макет.ПолучитьОбласть(«КурсИтого»);                              /// Получаем се области которые нужно сдвигать в самый низ страницы.

 

Массив = Новый Массив;                                                     /// Создаем Массив из областей которые нужно располагать внизу страницы, также                          добавляем в массив область с пустой строкой…

Массив.Добавить(ПустаяОбласть);
Массив.Добавить(Итого);
Массив.Добавить(ИтогоНДС);
Массив.Добавить(КурсИтого);
Массив.Добавить(ПоследняяОбласть);

Пока ТабДокумент.ПроверитьВывод(Массив) Цикл              /// Далее следует простая проверка на возможность уместить массив из областей на листе.
ТабДокумент.Вывести(ПустаяОбласть);    
КонецЦикла;

///// Логика такая, если массив умещается на листе, тогда выводим пустую область тем, самым оставляем меньше места на листе (сдвигаем Массив областей вниз) как только массив перестает влезать на лист выводится массив областей, тем самым мы каждый раз получаем его внизу страницы. 

// Проставляем пустые строчки, так чтобы подвал всегда находился внизу страницы.

Будут вопросы — пишите, чем смогу — помогу.

Всем удачи!

16 Comments

  1. blinoff71

    Спасибо за статью, очень помогла, все получилось, как и хотел.

    Reply
  2. mcbase

    (1) Пожалуйста, я рад, что вам она оказалась полезной)

    Reply
  3. pavell2009

    Спасибо за статью, пытаюсь реализовать как вы написали, но не получается……

    У меня в макете есть область «Подписи» которую нужно выводить всегда в конце страницы

    Я создал две пустых области «Пустая» и «Пропуск» — они находятся над областью пропуск и далее по вашему коду:

    Не совсем понял когда выводится область «Подписи» — в конце выводится только ТабДокумент.Вывести(ПустаяОбласть);

    Не могли бы вы пояснить, начинающему программисту как все таки, реализовать

    ОбластьМакета = Макет.ПолучитьОбласть(«Пропуск»); //// В макете создаем область которая содержит просто не заполненную строку, она будет нужна для того,чтобы заполнить пустоту между строчками и подвалом.

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

    // Проставляем пустые строчки, так чтобы подвал всегда находился внизу страницы.

    ПоследняяОбласть = Макет.ПолучитьОбласть(«Подписи»);

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

    /// Получаем се области которые нужно сдвигать в самый низ страницы.

    Массив = Новый Массив; /// Создаем Массив из областей которые нужно располагать внизу страницы, также добавляем в массив область с пустой строкой…

    Массив.Добавить(ПустаяОбласть);

    Массив.Добавить(ПоследняяОбласть);

    Пока ТабДокумент.ПроверитьВывод(Массив) Цикл /// Далее следует простая проверка на возможность уместить массив из областей на листе.

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

    КонецЦикла;

    ///// Логика такая, если массив умещается на листе, тогда выводим пустую область тем, самым оставляем меньше места на листе (сдвигаем Массив областей вниз) как только массив перестает влезать на лист выводится массив областей, тем самым мы каждый раз получаем его внизу страницы.

    // Проставляем пустые строчки, так чтобы подвал всегда находился внизу страницы.

    Reply
  4. mcbase

    Добрый вечер, пришлите мне файл с вашей печатной формой я его посмотрю и скажу где, что не так.

    Reply
  5. pavell2009

    Вот такая печатная форма

    Reply
  6. mcbase

    (5) pavell2009, Вы пришлите все вместе с кодом который у вас получился и не работает, я его посмотрю и подскажу что не так.

    Reply
  7. pavell2009

    Внешняя обработка с макетом + код, посмотрите пожалуйста

    Reply
  8. aakiseleva92

    У меня делает отступы, но все равно выводит область посередине страницы, а не внизу.

    Reply
  9. weissfeuer

    Дельный лайфхак ) спасибо!

    Reply
  10. ZSeryoga

    \r

    Reply
  11. Silverghoust

    Спасибо, очень пригодилось — конечно тут и от принтера зависит. У меня вначале не вышло — (в параметрах страницы было указан масштаб по ширине). Помогло установить табличному документу свойство Автомасштаб = Истина.

    Reply
  12. dara1989

    Спасибо! Помогло.

    Reply
  13. bvs_dd

    Спасибо за статью! Дельный совет.

    Reply
  14. Гость

    ну ты гений

    Reply
  15. zlexuzz

    Отлично! Просто, работоспособоно!

    Reply
  16. alexandr_astafiev

    Большое спасибо все работоспособно. Я использовал данную идею для вывода многостраничного договора. Где мне нужно было выводить подписи в конце каждой четной страницы. А на последней странице договора соответственно достаточно тех подписей которые в конце текста и вообще ничего не нужно «лишнего» выводить. Вот такие они бухгалтера «затейники» и тут вылезло большое НО:

    Перед тем как выполнять проверку ТабДокумент.ПроверитьВывод(Массив) нужно ОБЯЗАТЕЛЬНО выставить ориентацию страниц и отступы. Иначе проверка идет по настройкам для принтера по умолчанию. Что может вовсе не соответствовать настройкам печати. В результате подписи оказываются не в конце страницы а в очень неожиданных местах! Например:

    ТабДок.ОриентацияСтраницы = ОриентацияСтраницы.Портрет;

    ТабДок.ПолеСлева = 20;

    ТабДок.ПолеСправа = 20;

    ТабДок.ПолеСверху = 5;

    ТабДок.ПолеСнизу = 5;

    ТабДок.АвтоМасштаб = Истина;

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

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

    ТабДок.ДвусторонняяПечать = ТипДвустороннейПечати.ПереворотВлево;

    //И только потом сама проверка

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

    ….кому что нужно

    КонецЦикла;

    Reply

Leave a Comment

Ваш адрес email не будет опубликован. Обязательные поля помечены *