Редактировать форму Ведомость Доставки
☑
0
slavrofuser
18.03.22
✎
12:22
Добрый день! Имеется задача - редактировать печатную форму ведомости доставки (встроенная, как я понимаю), таким образом, чтобы ПочтовыйАдрес из шапки дублировался в подвале. Знаний синтаксиса и областей видимости нет никаких, подставление значений, запись в переменную и другие костыли результата не дают.
Функция ПолучитьПечатнуюФормуВедомостиДоставки(Контрагент, МассивДокументов) Экспорт
ТабДок = Новый ТабличныйДокумент;
Макет = ПолучитьМакет("ВедомостьДоставки");
ОбластьШапка = Макет.ПолучитьОбласть("Шапка");
ОбластьШапка.Параметры.ПочтовыйАдрес = ВернутьПочтовыйАдрес(Контрагент);
СведенияКонтрагента = УправлениеКонтактнойИнформацией.СведенияОЮрФизЛице(Контрагент, ДатаЗакрытия);
ОбластьШапка.Параметры.КонтрагентПолнНаименование = СведенияКонтрагента.ПолноеНаименование;
Тел = ВернутьТелефон(Контрагент);
Если Тел = "" Тогда
ОбластьШапка.Параметры.КонтрагентТелефоны = СведенияКонтрагента.Телефоны;
Иначе
ОбластьШапка.Параметры.КонтрагентТелефоны = Тел;
КонецЕсли;
ТабДок.Вывести(ОбластьШапка);
ОбластьСтрока = Макет.ПолучитьОбласть("Документ");
ОбластьПодвал = Макет.ПолучитьОбласть("Подвал");
НомерПП = 0;
ИтогоКоличество = 0;
Для каждого Документ Из МассивДокументов Цикл
НомерПП = НомерПП + 1;
ОбластьСтрока.Параметры.НомерПП = НомерПП;
ОбластьСтрока.Параметры.Документ = Строка(Документ);
Кол = ВернутьКоличествоЭкземпляров(Документ, Истина);
ОбластьСтрока.Параметры.Количество = Кол;
ИтогоКоличество = ИтогоКоличество + Кол;
Если Кол > 1 Тогда
ОбластьСтрока.Параметры.Комментарий = "вернуть подписанный экземпляр";
Иначе
ОбластьСтрока.Параметры.Комментарий = "";
КонецЕсли;
ТабДок.Вывести(ОбластьСтрока);
КонецЦикла;
ОбластьПодвал.Параметры.ИтогоКоличество = ИтогоКоличество;
ОбластьПодвал.Параметры.ПочтовыйАдрес = ВернутьПочтовыйАдрес(Контрагент);
ТабДок.Вывести(ОбластьПодвал);
Возврат ТабДок;
1
vicof
18.03.22
✎
12:32
Как насчет нанять программиста?
2
Fish
гуру
18.03.22
✎
12:33
Что значит, "результата не дают"? Ошибка появляется или что-то ещё?
3
d_monah
18.03.22
✎
12:36
Фотки давай.И не свои,твои не интересны.Мониторные
4
slavrofuser
18.03.22
✎
12:58
Ошибка не появляется, однако Адрес на печать не выводится. Не выводится, причем, именно из Подвала.
5
slavrofuser
18.03.22
✎
13:04
6
slavrofuser
18.03.22
✎
14:06
Проблему решил, редактировал код не там, всем спасибо!
Глупец, лишенный способности посмеяться над собой вместе с другими, не сможет долго выносить программирование. Фредерик Брукс-младший