В процессе автоматизации бизнес-процессов часто возникает необходимость автоматизировать рутинные операции, такие как отправка счетов, актов или заказов клиентам напрямую из системы 1С. В данной статье мы подробно проанализируем процесс программного формирования печатной формы, её конвертации в универсальный формат PDF и последующей отправки через электронную почту. Мы разберем каждый этап: от подготовки табличного документа до работы с почтовым протоколом SMTP.
Прежде чем отправить документ, его необходимо сформировать в памяти сервера. Как правило, для этого используются экспортные функции менеджеров объектов (документов или справочников), которые возвращают объект типа ТабличныйДокумент. Рассмотрим типичный пример получения печатной формы счета на оплату.
Проанализируем следующий фрагмент кода, где мы получаем макет и заполняем его данными:
Функция СформироватьПечатнуюФормуСчета(СсылкаНаДокумент)
Менеджер = Документы.СчетНаОплатуПокупателю;
ТабДок = Менеджер.Печать(СсылкаНаДокумент);
Возврат ТабДок;
КонецФункции
Важно помнить, что при формировании табличного документа для отправки по почте, нам не нужно выводить его на экран пользователю. Все операции должны выполняться в серверном контексте. Мы используем стандартные механизмы БСП (Библиотеки стандартных подсистем) или методы объекта Печать, если они определены в модуле менеджера.
После того как мы получили заполненный ТабличныйДокумент, его необходимо сохранить во временный файл в формате PDF. Это наиболее востребованный формат для обмена документами, так как он гарантирует неизменность отображения данных на стороне получателя.
Разберем по шагам, как выполнить сохранение во временное хранилище. Для этого мы воспользуемся методом Записать() объекта ТабличныйДокумент. Обратите внимание на использование функции ПолучитьИмяВременногоФайла(), которая позволяет избежать конфликтов имен при одновременной работе нескольких пользователей.
// Определяем путь ко второму временному файлу
ИмяФайла = ПолучитьИмяВременногоФайла("pdf");
// Выполняем сохранение табличного документа
ТабДок.Записать(ИмяФайла, ТипФайлаТабличногоДокумента.PDF);
В данном примере параметр ТипФайлаТабличногоДокумента.PDF указывает системе на необходимость конвертации. Выясним причину, почему стоит использовать именно этот метод: он встроен в платформу начиная с версии 8.2.13 и не требует установки сторонних PDF-принтеров на сервере, что значительно упрощает администрирование системы.
Для отправки письма нам понадобится настроенный объект ИнтернетПочтовыйПрофиль. В нем хранятся параметры подключения к вашему почтовому серверу (SMTP). Рассмотрим, какие свойства являются критически важными для успешного соединения.
Проанализируем настройку профиля для типичного корпоративного сервера с использованием SSL-шифрования:
Профиль = Новый ИнтернетПочтовыйПрофиль;
Профиль.АдресСервераSMTP = "smtp.mail.ru";
Профиль.ПортSMTP = 465;
Профиль.Пользователь = "your_email@mail.ru";
Профиль.Пароль = "your_password";
Профиль.АутентификацияSMTP = СпособSMTPАутентификации.ПовторениеСеансаНТТР;
Профиль.ИспользоватьSSLSMTP = Истина;
Профиль.ТолькоЛокальныйПросмотрСертификатов = Ложь;
Важный момент: если вы используете публичные сервисы (Gmail, Mail.ru, Яндекс), убедитесь, что в настройках почтового ящика разрешен доступ для сторонних приложений и создан специальный "пароль приложения", так как обычный пароль от аккаунта может не подойти из-за требований безопасности.
Теперь, когда у нас есть файл и настроенный профиль, перейдем к сборке самого сообщения. Мы будем использовать объект ИнтернетПочтовоеСообщение и метод Вложения.Добавить() для прикрепления нашего PDF-файла.
Рассмотрим совместную работу этих объектов в коде:
Почта = Новый ИнтернетПочта;
Сообщение = Новый ИнтернетПочтовоеСообщение;
// Заполняем основные поля письма
Сообщение.Отправитель.Адрес = "your_email@mail.ru";
Сообщение.Отправитель.ОтображаемоеИмя = "Ваша Организация";
Сообщение.Тема = "Счет на оплату по заказу";
Сообщение.Тексты.Добавить("Добрый день! Во вложении ваш счет.", ТипТекстаПочтовогоСообщения.ПростойТекст);
// Добавляем получателя
Получатель = Сообщение.Получатели.Добавить();
Получатель.Адрес = "client@example.com";
// Прикрепляем сформированный ранее PDF-файл
Сообщение.Вложения.Добавить(ИмяФайла, "Invoice.pdf");
Попытка
Почта.Подключиться(Профиль);
Почта.Послать(Сообщение);
Почта.Отключиться();
Сообщить("Письмо успешно отправлено!");
Исключение
Сообщить("Ошибка при отправке почты: " + ОписаниеОшибки());
КонецПопытки;
Посмотрим на структуру блока Попытка...Исключение. Отправка почты — это операция, зависящая от внешних факторов (качество связи, доступность сервера, блокировки антивирусом). Поэтому всегда необходимо обрабатывать исключения, чтобы программа не завершалась аварийно.
После завершения операции крайне важно удалить временный файл с диска сервера. Выясним причину: при массовой рассылке сотни временных файлов могут быстро забить свободное место на диске, что приведет к сбоям в работе операционной системы.
Разберем, как правильно завершить процедуру:
// Удаляем временный файл после отправки
Попытка
УдалитьФайлы(ИмяФайла);
Исключение
// Файл может быть занят другим процессом, просто игнорируем или пишем в лог
КонецПопытки;
Также, если вы работаете в современной конфигурации на базе БСП, рекомендуется использовать встроенный механизм РаботаСПочтовымиСообщениями.ОтправитьПочту(). Это позволит не прописывать настройки профиля вручную в коде, а брать их из предопределенных настроек системы, которые может редактировать администратор через пользовательский интерфейс.
Мы детально разобрали процесс программной отправки документов. Подводя итоги, выделим основные правила эффективной работы:
ТипФайлаТабличногоДокумента.PDF).Используя приведенные выше примеры, вы сможете настроить надежную систему уведомлений и обмена документами в любой конфигурации на платформе 1С:Предприятие 8.3.