Вот такой примерно код можно использовать для автоматического запуска сопоставления и рассылки его почтой:
О = САП.ДатьВнешнююОбработку("Сопоставление объектов");
Ф = О.ПолучитьФорму();
Ф.Открыть();
О.ИмяФайлаНастроек = "d:\1c\Обработки\Сопоставление баз\Сопоставление объектов в Рознице с УТ.txt";
О.флНастройкиШапка = истина;
Ф.ЗагрузитьСохранитьНастройки(истина); //Загрузка
//О.Дата1 = '00010101'; //с начала времен
О.Дата1 = НачалоДня(ТекущаяДата()) - 3600*24*365; ; //за год
О.Дата2 = НачалоДня(ТекущаяДата()) - 3600*24*2; //минус два дня...
//Ф.Дата1 = Ф.Дата2; //для отладки
Ф.КнопкаВыполнитьНажатие(Неопределено);
ТабДок = Ф.ЭлементыФормы.Результат;
ЗаписьЖурналаРегистрации("Отладка.Сопоставление",,,,"Сформирован отчет по сопоставлению");
ИмяФайла = ПолучитьИмяВременногоФайла("XLS");
ЗаписьЖурналаРегистрации("Отладка.Сопоставление",,,,"Устанавливаем флаг разрешения вывода: " + ТабДок.Вывод);
ТабДок.Вывод = ИспользованиеВывода.Разрешить; //
ЗаписьЖурналаРегистрации("Отладка.Сопоставление",,,,"Установлен флаг разрешения вывода: " + ТабДок.Вывод);
ТабДок.Записать(ИмяФайла, ТипФайлаТабличногоДокумента.XLS);
ИмяАрхива = ПолучитьИмяВременногоФайла("ZIP");
САП.УпаковатьФайлВZIP(ИмяФайла, ИмяАрхива);
Получатели = "1s@domen.ru";
САП.ОтправитьПисьмо(, Получатели, "Сопоставление объектов Розницы и УТ за период с " + Формат(Ф.Дата1, "ДФ=dd.MM.yyyy") + " по " + Формат(Ф.Дата2, "ДФ=dd.MM.yyyy") , "Смотрите отчет в приложенном XLS-файле", ИмяАрхива);
Показать