Различия

Показаны различия между двумя версиями страницы.

--- delivery_designer_utbas_2_4_0_2 [2022/07/06 21:35]
webmaster создано
+++ delivery_designer_utbas_2_4_0_2 [2022/07/26 21:06] (текущий)
webmaster [Редактирование формы документа “Заказ клиента”]
@@ Строка 29: / Строка 29: @@
 Добавляем в конце модуля формы следующий код
 <code>
-//++ eComm Доставка
 &НаКлиенте
-Процедура eComm_ЭкспрессНакладнаяНажатие(Элемент, СтандартнаяОбработка)
+Процедура eComm_ЭкспрессНакладнаяНажатие(Элемент, СтандартнаяОбработка)               	//++ eComm / Службы доставки
-	ЭН = eCommДоставкаСервер.ВернутьЭкспрессНакладную(Объект.Ссылка);
+	Если НЕ ЗначениеЗаполнено(Объект.Ссылка) Тогда
-	ЗначенияЗаполнения = Новый Структура("ДокументОснование", Объект.Ссылка);
+		ПоказатьПредупреждение(, НСтр("ru = 'Данные не записаны.
-	ОткрытьФорму("Документ.eComm_ЭкспрессНакладная.ФормаОбъекта", Новый Структура("Ключ, ЗначенияЗаполнения", ЭН, ЗначенияЗаполнения));
+								|Переход к экспресс-накладной возможен только после сохранения заказа';
+								|
+								|uk = 'Данные не записаны.
+								|Перехід до експрес-накладної можливий лише після збереження замовлення'"));
+		Возврат;
+	КонецЕсли;
+	Если Элемент.Имя = "eComm_ЭкспрессНакладная_Открыть" Тогда
+		// Это открытие списка накладных
+		СписокВыбора 		= eCommДоставкаСервер.СписокЭкспрессНакладных(Объект.Ссылка);
+		Если СписокВыбора.Количество() > 1 Тогда
+			ОповещениеОВыборе 	= Новый ОписаниеОповещения("ВыполнитьПослеВыбораЗначения", ЭтаФорма, Объект.Ссылка);
+			ПоказатьВыборИзМеню(ОповещениеОВыборе, СписокВыбора, Элементы["eComm_ЭкспрессНакладная_Открыть"]);
+		ИначеЕсли СписокВыбора.Количество() = 1 Тогда
+			ВыполнитьПослеВыбораЗначения(СписокВыбора[0], Объект.Ссылка);
+		Иначе
+			// Создадим если ранее накладная не была создана
+			ВыполнитьПослеВыбораЗначения(Новый Структура("Значение", Неопределено), Объект.Ссылка);
+		КонецЕсли;
+	ИначеЕсли Элемент.Имя = "eComm_ЭкспрессНакладная_Создать" Тогда
+		// Это создание новой накладной
+		ВыполнитьПослеВыбораЗначения(Новый Структура("Значение", Неопределено), Объект.Ссылка);
+	КонецЕсли;
+КонецПроцедуры
+&НаКлиенте
+Процедура ВыполнитьПослеВыбораЗначения(ЭлементСпискаВыбора, Заказ) Экспорт            	//++ eComm / Службы доставки
+	Если НЕ ЭлементСпискаВыбора = Неопределено Тогда
+		ЗначенияЗаполнения = Новый Структура("ДокументОснование", Заказ);
+		ОткрытьФорму("Документ.eComm_ЭкспрессНакладная.ФормаОбъекта", Новый Структура("Ключ, ЗначенияЗаполнения", ЭлементСпискаВыбора.Значение, ЗначенияЗаполнения));
+	КонецЕсли;
 КонецПроцедуры
-//--
 </code>
@@ Строка 58: / Строка 90: @@
 	Документ.ЗаказКлиента КАК ДокументЗаказКлиента
 		//++
-		{ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.eComm_СтатусыЭкспрессНакладных КАК eComm_СтатусыЭкспрессНакладных
+		{ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.eComm_ЭкспрессНакладныеСпискаЗаказов КАК eComm_ЭкспрессНакладныеСпискаЗаказов
-		ПО eComm_СтатусыЭкспрессНакладных.ДокументОснование = ДокументЗаказКлиента.Ссылка}
+			ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.eComm_СтатусыЭкспрессНакладных КАК eComm_СтатусыЭкспрессНакладных
+			ПО eComm_ЭкспрессНакладныеСпискаЗаказов.ЭкспрессНакладная = eComm_СтатусыЭкспрессНакладных.ЭкспрессНакладная
+		ПО eComm_ЭкспрессНакладныеСпискаЗаказов.ДокументОснование = ДокументЗаказКлиента.Ссылка}
 		{ЛЕВОЕ СОЕДИНЕНИЕ (ВЫБРАТЬ
 			КОЛИЧЕСТВО(РАЗЛИЧНЫЕ СообщениеSMS.Ссылка) КАК КоличествоSMS,
@@ Строка 76: / Строка 110: @@
 ==== Редактирование роли "Базовые права УТ" ====
-Для роли "Базовые права УТ" добавим право на чтение и просмотр к регистру "eComm_СтатусыЭкспрессНакладных" и документу "eComm_ЭкспрессНакладная
+Для роли "Базовые права УТ" добавим право на чтение и просмотр к:
+  * регистрам "eComm_СтатусыЭкспрессНакладных", "eComm_ЭкспрессНакладныеСпискаЗаказов"
+  * документу "eComm_ЭкспрессНакладная"
 ==== Редактирование формы документа "СообщениеSMS" ====

eComm+

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

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

Различия

Инструменты страницы