Форум Программирование Общие вопросы программирования (Dev)

1. user1255844 10.11.19 13:40 Сейчас в теме

Макет печатной формы

Здравствуйте! Подскажите, пожалуйста, как сделать чтобы печатная форма выводила каждую сточку табличной части? В моем примере сколько членов комиссии столько и должно выводить автоматически строчек. Прикрепляю файлы.
Прикрепленные файлы:
+ – Ответить
Найденные решения
4. user856012 8 10.11.19 14:51 Сейчас в теме
(3)
Цикл, который написала, выводит только одну строчку
И в ней - последний член комиссии, да?

Вы ведь просто присваиваете несколько раз одной и той же области макета разные значения должности и ФИО, а потом один раз выводите эту область.

А вам надо в макете выделить строчку с членом комиссии в отдельную область и несколько раз вывести ее, заполняя данными разных сотрудников.
+ – Ответить
5. tolyan_ekb 171 10.11.19 15:28 Сейчас в теме
в цикле получить область - присвоить параметры - вывести область
+ – Ответить
6. buganov 59 10.11.19 17:37 Сейчас в теме
(3)Вам нужно что то вроде: 
Если Объект.ТабличнаяЧасть.Количество()>0 Тогда
Для каждого Стр из Объект.ТабличнаяЧасть Цикл
ОбластьМакетаПодпись = Макет.ПолучитьОбласть("ОбластьМакетаПодпись");
ОбластьМакетаПодпись.Параметры.ДолжностьЧленаКомиссии = Стр.Должность;
Сотрудник = Стр.Сотрудник;
ОбластьМакетаПодпись.Параметры.ФИОЧленаКомиссии = Сотрудник.Фамилия+" "+Лев(Сотрудник.Имя,1)+". "+Лев(Сотрудник.Отчество,1)+".";
ТабличныйДокументРезультат.Вывести(ОбластьМакетаПодпись);
КонецЦикла;
КонецЕсли;
Показать
+ – Ответить
Остальные ответы
Избранное Подписка Сортировка: Древо
2. buganov 59 10.11.19 14:12 Сейчас в теме
Нужно в цикле вывести область с сотрудниками.
Если в подвале помимо сотрудников еще чего то есть, то выделить из подвала отдельную область и запрограммировать вывод:
Подвал -> Сотрудники -> все, что осталось после
+ – Ответить
3. user1255844 10.11.19 14:29 Сейчас в теме
(2) Если Объект.ТабличнаяЧасть.Количество()>0 Тогда
Для каждого Стр из Объект.ТабличнаяЧасть Цикл
ОбластьМакетаПодпись.Параметры.ДолжностьЧленаКомиссии = Стр.Должность;
Сотрудник = Стр.Сотрудник;
ОбластьМакетаПодпись.Параметры.ФИОЧленаКомиссии = Сотрудник.Фамилия+" "+Лев(Сотрудник.Имя,1)+". "+Лев(Сотрудник.Отчество,1)+".";
КонецЦикла;
КонецЕсли;


Я понимаю, что нужен цикл, но не совсем понимаю как правильно его составить (новичок в программировании 1С). Цикл, который написала, выводит только одну строчку
+ – Ответить
4. user856012 8 10.11.19 14:51 Сейчас в теме
(3)
Цикл, который написала, выводит только одну строчку
И в ней - последний член комиссии, да?

Вы ведь просто присваиваете несколько раз одной и той же области макета разные значения должности и ФИО, а потом один раз выводите эту область.

А вам надо в макете выделить строчку с членом комиссии в отдельную область и несколько раз вывести ее, заполняя данными разных сотрудников.
+ – Ответить
6. buganov 59 10.11.19 17:37 Сейчас в теме
(3)Вам нужно что то вроде: 
Если Объект.ТабличнаяЧасть.Количество()>0 Тогда
Для каждого Стр из Объект.ТабличнаяЧасть Цикл
ОбластьМакетаПодпись = Макет.ПолучитьОбласть("ОбластьМакетаПодпись");
ОбластьМакетаПодпись.Параметры.ДолжностьЧленаКомиссии = Стр.Должность;
Сотрудник = Стр.Сотрудник;
ОбластьМакетаПодпись.Параметры.ФИОЧленаКомиссии = Сотрудник.Фамилия+" "+Лев(Сотрудник.Имя,1)+". "+Лев(Сотрудник.Отчество,1)+".";
ТабличныйДокументРезультат.Вывести(ОбластьМакетаПодпись);
КонецЦикла;
КонецЕсли;
Показать
+ – Ответить
7. buganov 59 10.11.19 17:40 Сейчас в теме
(3)
ФИОЧленаКомиссии = Сотрудник.Фамилия+" "+Лев(Сотрудник.Имя,1)+".


Поищите по конфигурации функцию Которая сама сократи имя отчество. Пользуйтесь БСП
+ – Ответить
5. tolyan_ekb 171 10.11.19 15:28 Сейчас в теме
в цикле получить область - присвоить параметры - вывести область
+ – Ответить
Оставьте свое сообщение
Новые вопросы с вознаграждением
Автор темы объявил вознаграждение за найденный ответ, его получит тот, кто первый поможет автору.
КС в РСВ  0.05 $m ЗарплатаЗУП3.x
Посоветуйте удобный тайм-трекер  5 $m Личная эффективность
скрытые "лишние" поля таблицы в MS SQL и PG в документе которых нет в конфигураторе  0.04 $m UpdateCFБП3.0v8ПрограммистВопросИсследование
Как во ВПФ поменять формат даты у строки? (скриншоты) УТ10.3  0.3 $m Dev
MSScriptControl.ScriptControl не работает под другими терминальными пользователями  1 $m Admin
Автоматические скидки в чеках игнорируют ограничения по складам (КА 2.4, УТ 11.4)  1 $m Учет
Не удалось обновить рабочую группу предмета  0.3 $m Dev

Вакансии

Программист 1С
Чебоксары
зарплата от 50 000 руб. до 70 000 руб.
Полный день
Программист 1С
Новосибирск
зарплата от 80 000 руб. до 120 000 руб.
Полный день
Программист 1С
Санкт-Петербург
зарплата от 110 000 руб. до 150 000 руб.
Полный день
Программист 1С
Москва
зарплата до 160 000 руб.
Полный день
Консультант 1С
Москва
зарплата от 100 000 руб. до 140 000 руб.
Временный (на проект)