есть процедура в упрвеление автотранспортом такая штука, что при записи , отправляет данные контрагенту, обращаясь открыть форму отправки и от туда отправляется. Мне нужно добавить адрес дополнительный в который всегда будет дополнительно отправляться данные помимо контраагента всегда на эту почту . в форме документе есть эти процедура , правильно же я понял, что в нее нужно вставлять.
&НаКлиенте
Процедура АдресОтправкиНачалоВыбора(Элемент, ДанныеВыбора, СтандартнаяОбработка)
ПараметрыОткрытия = Новый Структура;
СтандартнаяОбработка = Ложь;
// Откроем диалог редактирования КИ
ПараметрыОткрытия.Вставить("ВидКонтактнойИнформации", ПредопределенноеЗначение("Справочник.ВидыКонтактнойИнформации.ФактАдресКонтрагента"));
ПараметрыОткрытия.Вставить("ЗначенияПолей", Объект.АдресОтправкиЗначенияПолей);
ПараметрыОткрытия.Вставить("Представление", Объект.АдресОтправки);
ПараметрыОткрытия.Вставить("Значение", Объект.АдресОтправкиЗначение);
ДополнительныеПараметры = Новый Структура;
ДополнительныеПараметры.Вставить("Объект", Объект);
ДополнительныеПараметры.Вставить("ИмяРеквизитаАдреса", "АдресОтправки");
ДополнительныеПараметры.Вставить("ИмяРеквизитаАдресЗначенияПолей", "АдресОтправкиЗначенияПолей");
ДополнительныеПараметры.Вставить("ИмяРеквизитаАдресЗначение", "АдресОтправкиЗначение");
Оповещение = Новый ОписаниеОповещения("АдресВыборЗавершение", ЭтаФорма, ДополнительныеПараметры);
УправлениеКонтактнойИнформациейКлиент.ОткрытьФормуКонтактнойИнформации(ПараметрыОткрытия,, Оповещение);
КонецПроцедуры
&НаКлиенте
Процедура АдресВыборЗавершение(Результат, ДопИнфо) Экспорт
Если ТипЗнч(Результат) Тип("Структура") Тогда
Возврат;
КонецЕсли;
Результат.Свойство("КонтактнаяИнформация", Объект[ДопИнфо.ИмяРеквизитаАдресЗначенияПолей]);
Результат.Свойство("Представление", Объект[ДопИнфо.ИмяРеквизитаАдреса]);
Результат.Свойство("Значение", Объект[ДопИнфо.ИмяРеквизитаАдресЗначение]);
ПроверитьАдресНаСервере(Объект[ДопИнфо.ИмяРеквизитаАдресЗначенияПолей]);
РасчётТарифа();
КонецПроцедуры
Для добавления дополнительного адреса, на который всегда будут отправляться данные, вам нужно внести изменения в процедуру отправки данных в управлении автотранспортом. Ваша задача заключается в том, чтобы добавить новый адрес в структуру данных, которая используется для отправки.
Вот пример того, как вы можете это сделать:
1. **Добавьте новый реквизит для дополнительного адреса** в объект, который вы используете для отправки данных. Например, добавьте реквизит `ДополнительныйАдрес`.
2. **Измените процедуру отправки**, чтобы она включала новый адрес. Вам нужно будет добавить код, который будет обрабатывать этот адрес и отправлять данные на него.
Пример кода, который вы можете использовать для добавления дополнительного адреса:
1C
&НаКлиенте
Процедура ОтправитьДанные() Экспорт
// Получаем адреса для отправки
АдресКонтрагента = Объект.Контрагент.Адрес;
ДополнительныйАдрес = Объект.ДополнительныйАдрес; // Новый реквизит
// Логика отправки данных на адрес контрагента
Если Не ПустаяСтрока(АдресКонтрагента) Тогда
ОтправитьНаАдрес(АдресКонтрагента);
КонецЕсли;
// Логика отправки данных на дополнительный адрес
Если Не ПустаяСтрока(ДополнительныйАдрес) Тогда
ОтправитьНаАдрес(ДополнительныйАдрес);
КонецЕсли;
КонецПроцедуры
Процедура ОтправитьНаАдрес(Адрес) Экспорт
// Здесь реализуйте логику отправки данных на указанный адрес
// Например, формирование и отправка сообщения
КонецПроцедуры
3. **Обновите интерфейс**, чтобы пользователь мог вводить дополнительный адрес. Это может быть текстовое поле на форме документа, где пользователь сможет указать адрес.
4. **Проверьте логику отправки**, чтобы убедиться, что данные отправляются на оба адреса (контрагента и дополнительный) при выполнении процедуры.
Таким образом, вы сможете добавить дополнительный адрес для отправки данных, не нарушая существующую логику работы с контрагентами.