Имя: Пароль:
1C
1С v8
УПП где есть настройка АвтосохранениеПисем кроме как в учетке почты ?
0 smaharbA
 
11.10.13
08:11
В свойствах Справочники.УчетныеЗаписиЭлектроннойПочты...АвтоСохранениеПисем = Ложь;

От чего при создании письма из обработки печати оно (письмо) "самопроизвольно" сохраняется ?
1 smaharbA
 
11.10.13
09:35
знатные адинеснеги подскажите, что вам жалко что ли ?
2 eklmn
 
гуру
11.10.13
09:38
смотря че за обработка
3 eklmn
 
гуру
11.10.13
09:39
письмо это всего-навсего документ, может в обработке создается
4 smaharbA
 
11.10.13
09:43
(2)(3) в штатной - которая по кнопке печати документов выходит - жму на ней собаку - сперва настройка письма выходит с запросом текст или хтмл и прочей ерундой, после по нажатию ок выходит форма документа ЭлектронныеПисьма, заполненная адресатами и вложением - и вот тут оно на глазах сохраняется, хотя автосохранение отключено на всех учетках
5 eklmn
 
гуру
11.10.13
10:07
хз что за обработка, но в типовой УПП вызывается процедура общего модуля "ПолучениеОтправкаПисем" и никаких "АвтосохранениеПисем" там даже не проверяется
6 smaharbA
 
11.10.13
10:11
(5)
в форме печати

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

в общем модуле

// Процедура инициализирует отправку печатного документа по электронной почте
//
// Параметры:
//  Документ - табличный документ
//  ОбъектПечати - ДокументСсылка, СправочникСсылка, СписокЗначений - объекты из которых вызвана печать. Параметр тип список значений содержит объекты печати.
//
// Возвращаемое значение:
//  Нет.
//
Процедура ОтправитьДокументПоЭлектроннойПочте(Документ, ИмяФайлаВложения = "", ОбъектПечати = Неопределено) Экспорт

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

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

в форме настройки

    Если ТипЗнч(СтруктураСозданногоПисьма) = Тип("Структура") Тогда
        СтруктураСозданногоПисьма.Форма.Открыть();
    КонецЕсли;


в документе электронныеписьма (приоткрытии)

    Если УчетнаяЗапись.АвтосохранениеПисем Тогда
        ПодключитьОбработчикОжидания("АвтосохранениеПисьма", УчетнаяЗапись.ИнтервалАвтосохраненияПисем);
    КонецЕсли;
7 smaharbA
 
11.10.13
10:12
или у Вас другое УПП ?
8 eklmn
 
гуру
11.10.13
10:18
АвтосохранениеПисем нужно для автосохранения уже созданного документа с определенным интервалом.
В процедуре (5) документ уже записан.
нет такого функционала проверки сохранять/не сохранять письмо
9 smaharbA
 
11.10.13
10:36
Где и когда он уже записан ?
10 smaharbA
 
11.10.13
10:58
Да вот тут из-за последнего параметра записывается (
А есть ли настройки, что бы не записывалось автоматом ?

    СтруктураСозданногоПисьма = УправлениеЭлектроннойПочтой.НаписатьПисьмо(глЗначениеПеременной("глТекущийПользователь"),СтруктураНовогоПисьма,,,,,, Истина, Ложь);
    
    ЭтаФорма.Закрыть();
    
    Если ТипЗнч(СтруктураСозданногоПисьма) = Тип("Структура") Тогда
        СтруктураСозданногоПисьма.Форма.Открыть();
    КонецЕсли;
11 smaharbA
 
11.10.13
11:00
Нужно, что бы записывалось только при отправке или если пользователь сам решит записать (без изменения конфигурации)
Я не хочу быть самым богатым человеком на кладбище. Засыпать с чувством, что за день я сделал какую-нибудь потрясающую вещь — вот что меня интересует. Стив Джобс