Posting of invoice + Attach report to DocuRef as PDF

[DSPIC]

Коллеги, кто-нибудь вспомнит, если ли готовый пример, когда постится что-то из *FormLetter*, а результирующий отчет автоматом цепляется к DocuRef (в виде PDF например). Либо просто печать журнала с автоматическим аттачем к DocuRef.
Лениво писать самому, хочется содрать готовый отлаженный код.

[gl00mie]

Цитата:

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

Коллеги, кто-нибудь вспомнит, если ли готовый пример, когда постится что-то из *FormLetter*, а результирующий отчет автоматом цепляется к DocuRef (в виде PDF например).

Засада в том, что штатный механизм прикрепления файлов (Docu) местами - сугубо клиентский, что не очень гармонирует с серверной бизнес-логикой разносок и способностью работать в пакетном режиме. Вкратце проблема затрагивалась в теме Олицетворенный на сервере (RunAs) сеанс попытался вызвать метод, который доступен только на клиенте.

Цитата:

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

Лениво писать самому, хочется содрать готовый отлаженный код.

[DSPIC]

Цитата:

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

Лениво писать самому, хочется содрать готовый отлаженный код.

Таки пришлось немного потрудиться.

public static void printPackingSlipArchive(VendPackingSlipJour _vendPackingSlipJour)
{
    Args                        args;
    SrsReportDataContract       contract;
    SrsReportRunImpl            reportRun;
    SRSPrintDestinationSettings printSettings;
    PrintJobHeader              printJobHeader;
    DocuRef                     docuRefArchive;

    if (!_vendPackingSlipJour)
    {
        return;
    }

    args = new Args();
    args.record(_vendPackingSlipJour);

    contract = PurchPackingSlipController::newDataContract(args);

    reportRun = new SrsReportRunImpl(contract.parmReportName());
    reportRun.parmReportContract(contract);
    reportRun.parmReportContract().parmReportExecutionInfo(new SRSReportExecutionInfo());

    printSettings = reportRun.parmReportContract().parmPrintSettings();
    printSettings.printMediumType(SRSPrintMediumType::Archive);
    printSettings.fileFormat(SRSReportFileFormat::PDF);
    reportRun.runReport();

    if (contract.parmWCIPrintJobHeaderRecId())
    {
        select firstOnly printJobHeader
          where printJobHeader.RecId == contract.parmPrintJobHeaderRecId();

        if (printJobHeader)
        {
            Docu::copy(printJobHeader, _vendPackingSlipJour);
        }
    }
}

метод contract.parmPrintJobHeaderRecId() - кастомный, пришлось протянуть RecId из \Classes\SRSPrintArchiveContract\createPrintJobHeader