Форум 1С
Программистам, бухгалтерам, администраторам, пользователям
Задай вопрос - получи решение проблемы
21 авг 2025, 10:50

Переносить физлица на другую страницу в печатной форму

Автор sumsnary, 25 июл 2025, 10:30

0 Пользователей и 1 гость просматривают эту тему.

sumsnary

Как разбить список из 20 ФИО на страницы так, чтобы на каждой странице отображалось не более 8 ФИО? вот цикл

КоличествоФизЛиц = СсылкаНаОбъект.ФизЛица.Количество();
    Область4 = Макет.ПолучитьОбласть("Область4");
   
   
    Для к = 1 По КоличествоФизЛиц Цикл
        Если к > КоличествоФизЛиц Тогда
            ТекФИО = ""; 
        Иначе
            ТекФИО = СсылкаНаОбъект.Рарус_ФизЛица[к-1].ФизическоеЛицо;
        КонецЕсли;
       
        Область4.Параметры.ФИОМОЛ1 = ТекФИО;
        ТабДокумент.Присоединить(Область4);
    КонецЦикла;

antoneus

Для к = 1 По КоличествоФизЛиц Цикл
     ....выводим физлицо....
     Если к % 8 = 0 Тогда
         ТабДокумент.ВывестиГоризонтальныйРазделительСтраниц()
     КонецЕсли;
КонецЦикла;

sumsnary


Теги:

Похожие темы (5)

Рейтинг@Mail.ru

Поиск