[Ace of Database]

Что-то в этом роде:

PHP код:

ProdJournalId createProdJournal(ProdId _prodId, Qty _qty)
{
    ProdTable                   prodTable;
    ProdParmReportFinished      prodParmReportFinished;
    ProdMultiReportFinished     prodMultiReportFinished = new ProdMultiReportFinished();
    RunBaseMultiParm            runBaseMultiParm;
    ProdUpdReportFinished       prodUpdReportFinished;
    ;
    //ttsbegin;
    runBaseMultiParm::initParm(prodMultiReportFinished);
    prodTable = ProdTable::find(_prodId);
    prodMultiReportFinished.insert(prodTable, prodParmReportFinished);
    //
    // Меняем количество и просим создать отгрузочную накладную
    //
    prodParmReportFinished.QtyGood = _qty;
    prodParmreportFinished.TransDate = systemDateGet();
    prodParmReportFinished.BOMAutoConsump = BOMAutoConsump::Always;
    prodParmReportFinished.update();
    prodUpdReportFinished = ProdUpdReportFinished::newParmBuffer(prodParmReportFinished);

    prodUpdReportFinished.run();
    //ttscommit;
    return prodUpdReportFinished.parmProdJournalId();
}