Автоматизация отправки накладной по e-mail

[ena_ax]

Стоит задача автоматизации процесса отправки накладной Торг-12.

Сейчас процесс выглядит следующим образом.
Есть Приемо-сдатчики, которые напрямую работают при отгрузке груза, они же Разносят накладную и формируют пакет документов для водителей (ТТН).

Есть менеждеры, которые работаю с клиентами (формируют заказы, ведут переговоры и тд). Менеджеры отправляют своим клиентам по почте ТОРГ-12. Делают это вручную, импортируют ТОРГ-12 в PDF, потом отправляют вложением.

На эту работу уходит много времени, и автоматизация данного процесса необходима.

Ищу правильное решение, дабы не наломать дров, не изобретать велосипед.
Желательно максимально приближенно к стандартному функционалу.
Прошу совета в каком направлении смотреть?

[lev]

В стандарте когда выводится аксаптовский репорт, его можно не только экспортнуть в файл или отправить на принтер, но и отправить по почте.
Можете написать функцию, которая по определенным параметрам будет отправлять эти накладные на почту клиентов, используя стандартный механизм.

[ena_ax]

Цитата:

Сообщение от lev

В стандарте когда выводится аксаптовский репорт, его можно не только экспортнуть в файл или отправить на принтер, но и отправить по почте.
Можете написать функцию, которая по определенным параметрам будет отправлять эти накладные на почту клиентов, используя стандартный механизм.

На сколько я понял функция должна сгенерировать отчет, затем отправить его на почту?

А как можно программно сгенерировать отчет?
Может есть похожий пример?

[AxaptaUser]

В вашем случае можно доработать обработку накладной по конкретному заказу следующим образом:
- автоматически заполнять емайл клиента и тему письма в настройках печати документа
и при разноске накладной с галочкой "Печать" письмо с накладной должно отправляться клиенту.

[someOne]

Сформировать файл из накладной программно - не сложно.
Какая у вас версия Аксапта ?

Например, для 3-й версии будет работать так (пример)

static void Job1(Args _args)
{
    custInvoiceJour     custInvoiceJour;
    PrintJobSettings    printJobSettings = new PrintJobSettings();
    SalesReport_Invoice_RU SalesReport_Invoice_RU = new SalesReport_Invoice_RU();

    ;
    custInvoiceJour = custInvoiceJour::findRecId(449627);

    printJobSettings.setTarget(PrintMedium::File);
    printJobSettings.format(PrintFormat::RTF);
    printJobSettings.fileName("c:\\invoice.rtf");

    SalesReport_Invoice_RU.setParameters(PrintCopyOriginal::Original, custInvoiceJour);

    if (SalesReport_Invoice_RU.prompt())
    {
        SalesReport_Invoice_RU.printJobSettings().unpackPrintJobSettings(printJobSettings.packPrintJobSettings());
        SalesReport_Invoice_RU.run();
    }
}

А дальше возможны варианты.
Можно отправлять этот файл через почтовый клиент Аксапты (SysMailer), (с сервера пакетной обработки например).

Можно отправить с клиента, открыв оператору его почтовый клиент с вложенным файлом, подготовленным на предыдущем этапе. (ну и конечно, заполненным адресом получателем, темой и текстом сообщения).
Оператору остается лишь нажать кнопку "отправить"

Тут все зависит от типа почтового клиента, который используется в вашей комании
(thebat, Outlook, OutlookExpress и так далее)

Например этот код отправляет письмо открывая почтовый клиент пользователя по умолчанию:

boolean sendMAPI(str _to, str _cc, str _subj, str _text, FileName _attachFileName = "")
{
    #Mapi
    Mapi          mapi  = new Mapi();
    MapiMessage   msg   = new MapiMessage();
    MapiRecipDesc recip = new MapiRecipDesc();
    MapiFileDesc  file  = new MapiFileDesc();
    ;

    recip.Name(_to);
    recip.RecipClass(#MAPI_TO);

    msg.setRecipNo(1, recip);

    if (_cc)
    {
        recip.Name(_cc);
        recip.RecipClass(#MAPI_CC);
        msg.setRecipNo(2, recip);
    }

    msg.subject(_subj);
    msg.text(_text);

    if (_attachFileName)
    {
        file.fileName(_attachFileName);
        msg.setFileNo(1, file);
    }

    mapi.Logon("", "", #MAPI_USE_DEFAULT);
    mapi.SendMail(msg, #MAPI_DIALOG);
    mapi.Logoff();

    return true;
}

Но надежнее использовать com интерфейс почтовой программы.
Если интересно - могу привести код отправки письма с вложением через COM интерфейс Outlook

[BOAL]

Цитата:

Сообщение от someOne

Но надежнее использовать com интерфейс почтовой программы.
Если интересно - могу привести код отправки письма с вложением через COM интерфейс Outlook

Интересно! Конечно, привести, чтоб был полный ассортимент на выбор.

[someOne]

Все просто в общем то...

boolean sendOutlook(str _to, str _cc, str _subj, str _text, FileName _attachFileName = "")
{
    COM     outlook = new COM("Outlook.Application");
    COM     letter = Outlook.CreateItem("");
    COM     attachments;
    ;

    letter.To(_to);
    letter.CC(_cc);
    letter.Subject(_subj);
    letter.Body(_text);

    if (_attachFileName)
    {
        attachments = letter.Attachments();
        attachments.add(_attachFileName);
    }

    letter.display();

    return true;
}

[ena_ax]

У меня Axapta 4.0

Коллеги спасибо за идеи, и особенно за приведенный код. Буду пробовать.

[BokarevSS]

Попробовал воспользоваться примером. Получил "Ошибка времени выполнения. Неправильный тип номера поля". Как мне ее исправить? Искал по форуму решения, и нашел рекомендацию, что какие то связи в DataSource не созданы-не понял что имелось ввиду, или может это не то.
Ax3.0sp5fp2

[Raven Melancholic]

Цитата:

Сообщение от BokarevSS

Попробовал воспользоваться примером. Получил "Ошибка времени выполнения. Неправильный тип номера поля".
Ax3.0sp5fp2

А в каком участке кода эта ошибка возникает?