Программная разноска накладной для заказа на покупку на основе отборочной накладной.

[Sada]

static void autoCreateInvoice(PurchTable _purchTable, PurchUpdate _purchUpdate, InvoiceDate _invoiceDate = systemDateGet(), boolean _storno = false, InvoiceId  _invoiceId = "")
{
    PurchFormLetter_Invoice     purchFormLetter;
    PurchParmUpdate             purchParmUpdate;
    ;
    purchFormLetter = purchFormLetter::construct(DocumentStatus::Invoice);
    purchFormLetter.createParmUpdate();
    purchParmUpdate = purchFormLetter.purchParmUpdate();
    purchParmUpdate.selectForUpdate(true);
    purchParmUpdate.Storno = _storno;
    purchParmUpdate.doUpdate();
    purchFormLetter.purchParmUpdate(purchParmUpdate);
    purchFormLetter.parmCallerTable(_purchTable);
    purchFormLetter.initParmPurchTable(_purchTable);
    purchFormLetter.specQty(_purchUpdate);
    purchFormLetter.transDate(_invoiceDate);
    if (_invoiceId)
        purchFormLetter.parmParmTableNum(_invoiceId);
    purchFormLetter.initLinesQuery();
    purchFormLetter.run();
}

если суда PurchUpdate::PackingSlip интересно заработает или нет)

[alexkrut]

Цитата:

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

static void autoCreateInvoice(PurchTable _purchTable, PurchUpdate _purchUpdate, InvoiceDate _invoiceDate = systemDateGet(), boolean _storno = false, InvoiceId  _invoiceId = "")
{
    PurchFormLetter_Invoice     purchFormLetter;
    PurchParmUpdate             purchParmUpdate;
    ;
    purchFormLetter = purchFormLetter::construct(DocumentStatus::Invoice);
    purchFormLetter.createParmUpdate();
    purchParmUpdate = purchFormLetter.purchParmUpdate();
    purchParmUpdate.selectForUpdate(true);
    purchParmUpdate.Storno = _storno;
    purchParmUpdate.doUpdate();
    purchFormLetter.purchParmUpdate(purchParmUpdate);
    purchFormLetter.parmCallerTable(_purchTable);
    purchFormLetter.initParmPurchTable(_purchTable);
    purchFormLetter.specQty(_purchUpdate);
    purchFormLetter.transDate(_invoiceDate);
    if (_invoiceId)
        purchFormLetter.parmParmTableNum(_invoiceId);
    purchFormLetter.initLinesQuery();
    purchFormLetter.run();
}

если суда PurchUpdate::PackingSlip интересно заработает или нет)

а у вас какая версия аксапты?