Добрый день! Столкнулся с непонятной ситуацией: при доработке через расширение экспортная процедура отрабатывает два раза. Причем первый раз неправильно, а второй - правильно. Код простейший, но понять причину не могу.
&Вместо("ОтправитьПисьмаПоставщикам")
Процедура ОСРассылка_ОтправитьПисьмаПоставщикам(Ссылка, ТабВебСсылок) Экспорт
Если ТабВебСсылок = Неопределено Тогда
ТабВебСсылок = Новый ТаблицаЗначений;
ТабВебСсылок.Колонки.Добавить("ВебСсылка");
ТабВебСсылок.Колонки.Добавить("Поставщик");
КонецЕсли;
Запрос = Новый Запрос;
Запрос.Текст = "ВЫБРАТЬ РАЗЛИЧНЫЕ
| ТендерыУчастники.Поставщик КАК Поставщик,
| ВложенныйЗапрос.Email КАК Email
|ИЗ
| Документ.Тендеры.Участники КАК ТендерыУчастники
| ЛЕВОЕ СОЕДИНЕНИЕ (ВЫБРАТЬ
| КонтрагентыДляЗаказаМатериаловКонтакты.Email КАК Email,
| КонтрагентыДляЗаказаМатериаловКонтакты.ДляТендера КАК ДляТендера,
| КонтрагентыДляЗаказаМатериаловКонтакты.Ссылка КАК Ссылка
| ИЗ
| Справочник.КонтрагентыДляЗаказаМатериалов.Контакты КАК КонтрагентыДляЗаказаМатериаловКонтакты
| ГДЕ
| КонтрагентыДляЗаказаМатериаловКонтакты.ДляТендера = ИСТИНА) КАК ВложенныйЗапрос
| ПО ТендерыУчастники.Поставщик = ВложенныйЗапрос.Ссылка
|ГДЕ
| ТендерыУчастники.Ссылка = &Ссылка";
Запрос.УстановитьПараметр("Ссылка", Ссылка);
Результат = Запрос.Выполнить();
ВыборкаПоставщиков = Результат.Выбрать();
МассивАдресов = Новый Массив;
Пока ВыборкаПоставщиков.Следующий() Цикл
МассивАдресов.Добавить(ВыборкаПоставщиков.Email);
//Тут собирается письмо
Почта.ОтправитьСообщение(ТемаСообщения, ТекстСообщения, МассивАдресов, Ссылка);
КонецЦикла;
ПоказатьПо теме из базы знаний
Найденные решения
Остальные ответы
Подписаться на ответы
Инфостарт бот
Сортировка:
Древо развёрнутое
Свернуть все
Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот