eComm+

Модулі для BAS / 1С* - розроблено в Україні!

Инструменты пользователя

Инструменты сайта


delivery_designer_utp

Это старая версия документа!


Встраивание подсистемы "Новая почта"

1. Объединяем с конфигурацией модуля новой почты

2. Выполняем объединение

3. Пропускаем зависимости

4. Добавим подменю и кнопки действия для открытия форм списка учетных записей и списка экспресс-накладных в необходимом интерфейсе (например интерфейс «Полный»)

Редактирование документа “Заказ покупателя”

Редактирование формы документа “Заказ покупателя”

Добавляем в конце метода “ПередОткрытием” следующий код

	//++ ingenum.com.ua / Торговые площадки
	
	Если ЗначениеЗаполнено(Ссылка) Тогда 
		
		МенеджерЗаписи = РегистрыСведений.eComm_СтатусыЭкспрессНакладных.СоздатьМенеджерЗаписи();
		МенеджерЗаписи.ДокументОснование = Ссылка;
		МенеджерЗаписи.Прочитать();
		Если МенеджерЗаписи.Выбран() 
			И ЗначениеЗаполнено(МенеджерЗаписи.ОписаниеСтатуса) Тогда 
			ЭлементыФормы.eComm_ОписаниеСтатуса.Заголовок = "Статус накладной: " + МенеджерЗаписи.ОписаниеСтатуса;
		Иначе
			ЭлементыФормы.eComm_ОписаниеСтатуса.Заголовок = "Отправить ЭН";
		КонецЕсли;
		
	КонецЕсли;


	//-- ingenum

Добавляем в конце модуля формы следующий код

//++ eComm Доставка
&НаКлиенте
Процедура eComm_ЭкспрессНакладнаяНажатие(Элемент, СтандартнаяОбработка)
	
	Если ЗначениеЗаполнено(Объект.Ссылка) Тогда 
		ЭН = eCommДоставкаСервер.ВернутьЭкспрессНакладную(Объект.Ссылка);
		ЗначенияЗаполнения = Новый Структура("ДокументОснование", Объект.Ссылка);
		ОткрытьФорму("Документ.eComm_ЭкспрессНакладная.ФормаОбъекта", Новый Структура("Ключ, ЗначенияЗаполнения", ЭН, ЗначенияЗаполнения));
	Иначе
		ПоказатьПредупреждение(, "Данные не записаны.
								|Переход к экспресс-накладной возможен только после записи данных");
	КонецЕсли;
	
КонецПроцедуры
//--
delivery_designer_utp.1643657004.txt.gz · Последнее изменение: 2022/02/24 03:40 (внешнее изменение)