![]() |
![]() |
![]() |
|
Редактировать форму Ведомость Доставки | ☑ | ||
---|---|---|---|---|
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
|
Проблему решил, редактировал код не там, всем спасибо!
|
Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |