Форум 1С
Программистам, бухгалтерам, администраторам, пользователям
Задай вопрос - получи решение проблемы
17 июн 2024, 14:24

1С УНФ 1.6 (Приложение 4 Печать ТН )

Автор IvanVanko, 29 окт 2019, 13:59

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

IvanVanko

Попросили, что б в поле Адрес выгрузки заполнялся автоматически.
В обработке печать ТН в модуле внес изменения.

&НаСервере
Функция  АдресВыгрузкиПриИзмененииНаСервере()
ДокументОснование   = Объект.Документ;
   
   ГрузоотправительДляПечати   = ДокументОснование.Организация;
   ГрузополучательДляПечати   = ДокументОснование.Контрагент;
   
   СведенияОГрузополучателе   = УправлениеНебольшойФирмойСервер.СведенияОЮрФизЛице(ГрузополучательДляПечати, ДокументОснование.Дата);
   
   
   ЭтоФизЛицо               = (ГрузоотправительДляПечати.ЮридическоеФизическоеЛицо = Перечисления.ЮридическоеФизическоеЛицо.ФизическоеЛицо);
   
   АдресВыгрузки = УправлениеНебольшойФирмойСервер.СведенияОЮрФизЛице(ГрузополучательДляПечати, ДокументОснование.Дата);
      ЭтаФорма[?(ЭтоФизЛицо, "ГрузополучательФЛ", "ГрузополучательЮЛ")]
         = УправлениеНебольшойФирмойСервер.ОписаниеОрганизации(СведенияОГрузополучателе,
                              ?(ЭтоФизЛицо, "ФактическийАдрес",
                                          "ФактическийАдрес"));;
Возврат АдресВыгрузки;
КонецФункции

&НаКлиенте
Процедура АдресВыгрузкиПриИзменении(Элемент)
   АдресВыгрузкиПриИзмененииНаСервере();
КонецПроцедуры

В итоге в поле АдресВыгрузки появляется Структура, что делаю не так куда копать?

IvanVanko


Теги:

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

Рейтинг@Mail.ru

Поиск