Это старая версия документа!
1. Объединяем с конфигурацией модуля новой почты
2. Выполняем объединение
3. Пропускаем зависимости
4. Добавим подменю и кнопки действия для открытия форм списка учетных записей и списка экспресс-накладных в необходимом интерфейсе (например интерфейс «Полный»)
Добавляем в конце метода “ПередОткрытием” следующий код
//++ ingenum.com.ua / Торговые площадки Если ЗначениеЗаполнено(Ссылка) Тогда МенеджерЗаписи = РегистрыСведений.eComm_СтатусыЭкспрессНакладных.СоздатьМенеджерЗаписи(); МенеджерЗаписи.ДокументОснование = Ссылка; МенеджерЗаписи.Прочитать(); Если МенеджерЗаписи.Выбран() И ЗначениеЗаполнено(МенеджерЗаписи.ОписаниеСтатуса) Тогда ЭлементыФормы.eComm_ОписаниеСтатуса.Заголовок = "Статус накладной: " + МенеджерЗаписи.ОписаниеСтатуса; Иначе ЭлементыФормы.eComm_ОписаниеСтатуса.Заголовок = "Отправить ЭН"; КонецЕсли; КонецЕсли; //-- ingenum
Добавляем в конце модуля формы следующий код
//++ eComm Доставка
&НаКлиенте
Процедура eComm_ЭкспрессНакладнаяНажатие(Элемент, СтандартнаяОбработка)
Если ЗначениеЗаполнено(Объект.Ссылка) Тогда
ЭН = eCommДоставкаСервер.ВернутьЭкспрессНакладную(Объект.Ссылка);
ЗначенияЗаполнения = Новый Структура("ДокументОснование", Объект.Ссылка);
ОткрытьФорму("Документ.eComm_ЭкспрессНакладная.ФормаОбъекта", Новый Структура("Ключ, ЗначенияЗаполнения", ЭН, ЗначенияЗаполнения));
Иначе
ПоказатьПредупреждение(, "Данные не записаны.
|Переход к экспресс-накладной возможен только после записи данных");
КонецЕсли;
КонецПроцедуры
//--