Имя: Пароль:
1C
1С v8
Отправка письма в 1С
0 alexsandrinia
 
28.11.11
13:50
Сделал внешний отчёт "Анализ заказов покупателей". Там в форме документа разместил кнопку "Отправить по электронной почте", в настройках указываю контрагента и мне выводит список по нему. Теперь как сделать, чтобы при отправке письма в документе "Электронное письмо..." в поле "Кому" автоматически вносился адрес того самого контрагента?
1 Wobland
 
28.11.11
13:52
создать документ, заполнить реквизит
2 alexsandrinia
 
28.11.11
13:54
(1) какой документ создать?
3 Смешной 1С
 
28.11.11
14:00
в карточке контрагента e-mail указать
4 alexsandrinia
 
28.11.11
14:01
(3) указан
5 Смешной 1С
 
28.11.11
14:03
Откуда берется документ Электронное письмо? Программно создается? если да, то как (1) сказал.
6 Wobland
 
28.11.11
14:04
(2) а какие собственно варианты? ;)
7 alexsandrinia
 
28.11.11
14:07
в общем, при нажатии кнопки "Отправить по электронной почте" открывается процедура

Процедура КоманднаяПанельФормыОтправитьПоПочте(Кнопка)
   УправлениеОтчетами.ОтправитьДокументПоЭлектроннойПочте(ЭлементыФормы.ПолеТабличногоДокументаРезультат, Заголовок);
КонецПроцедуры

далее открывается окно документа "Электронное письмо..."где адрес отправителя уже указан, хотелось бы, чтобы был указан и адрес контрагента сразу.
(6) нет вариантов...)
8 Wobland
 
28.11.11
14:09
(7) сходи туда и посмотри, где адрес отправителя выставляется. чуть-чуть допилить останется
9 alexsandrinia
 
28.11.11
14:25
(8) там процедура


Процедура ОтправитьДокументПоЭлектроннойПочте(Документ, ИмяФайлаВложения = "") Экспорт

   Если НЕ Константы.ИспользованиеВстроенногоПочтовогоКлиента.Получить() Тогда
       ОбщегоНазначения.СообщитьОбОшибке("Отправлять документы по электронной почте можно только из встроенного почтового клиента.
                        |В настоящее время в настройках параметров учета установлено использование основного почтового клиента операционной системы.");
       Предупреждение("Операция не выполнена");
       Возврат;
   КонецЕсли;
   
   ФормаОтправкиДокумента = ПолучитьОбщуюФорму("НастройкаОтправкиОтчета");
   ФормаОтправкиДокумента.Отчет            = Документ;
   ФормаОтправкиДокумента.ИмяФайлаВложения = СтрЗаменить(ИмяФайлаВложения, ".", " ");
   ФормаОтправкиДокумента.ТемаСообщения    = ИмяФайлаВложения;
   ФормаОтправкиДокумента.ОткрытьМодально();

КонецПроцедуры

но тут нет ничего, где указывается адрес...
10 alexsandrinia
 
28.11.11
14:35
где ещё поискать?
11 Wobland
 
28.11.11
14:38
>Там в форме документа разместил кнопку
только сейчас заметил. а что в кнопке?
12 Смешной 1С
 
28.11.11
14:39
Тебе нужно дальше провалиться, дойдешь до ОбщийМодуль.УправлениеЭлектроннойПочтой: Функция НаписатьПисьмо
13 Смешной 1С
 
28.11.11
14:40
В ней есть такая строка:

Письмо = Документы.ЭлектронноеПисьмо.СоздатьДокумент();

Вот потом пишешь:

Письмо.Кому = Адрес твоего контрагента
14 alexsandrinia
 
28.11.11
14:40
(11) в кнопке стоит процедура (7)
15 alexsandrinia
 
28.11.11
14:42
(13) получается, конфу менять надо?
16 alexsandrinia
 
28.11.11
14:42
снимать с поддержки?
17 Смешной 1С
 
28.11.11
14:43
(14) В кнопке этой формы: ФормаОтправкиДокумента = ПолучитьОбщуюФорму("НастройкаОтправкиОтчета");
18 alexsandrinia
 
28.11.11
14:45
(17)да, есть там такое, по ней надо переходить и менять,правильно я понял?
19 Смешной 1С
 
28.11.11
14:46
(18) Да, то что я указал в (13)

Но у меня такое подозрение, что там должно это быть, ты посмотри отладчиком что там есть что при создании этого документа
20 alexsandrinia
 
28.11.11
14:47
(19)я там всё нашёл, не хотелось бы снимать с поддержки. попробую ОбщуюФорму("НастройкаОтправкиОтчета") вставить в свой внешний отчёт и в нём уже всё менять.
21 Смешной 1С
 
28.11.11
14:48
(18) У тебя же УПП? Вот посмотри документ Счет на оплату, выведи печатную форму счета, и вот если там нажать: отправить по электронной почте, то там адрес контрагента подставляется вроде насколько я помню.
22 alexsandrinia
 
28.11.11
14:49
(21) УТ 10.3
23 Смешной 1С
 
28.11.11
14:49
(22) Там возможно тоже есть, глянь какой там механизм
24 alexsandrinia
 
28.11.11
14:51
(23)да, нашёл, спасиб!