Разноска накладной

[kalex_a]

Цитата:

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

О том как в этом случае делать я приводил ссылку в самом начале этого же топика.
Разноска накладной

И так как там описано, тоже делал, все равно не разносит

   select * from purchTable
    join purchLine
        where purchTable.PurchId == rDeferralsJournalTrans.PurchId &&
              (purchLine.PurchId == rDeferralsJournalTrans.PurchId);
    purchLine = PurchLine::findRecId(purchLine.RecId,true);
    purchLine.PurchReceivedNow = rDeferralsJournalTrans.Qty;
    purchLine.InventReceivedNow = rDeferralsJournalTrans.Qty;
    purchLine.Dimension = rDeferralsJournalTrans.Dimension;
    purchLine.update();
    purchFormLetter = PurchFormLetter::construct(DocumentStatus::Invoice);
    purchFormLetter.specQty(PurchUpdate::ReceiveNow);
    
    purchParmTable.clear();
    purchFormLetter.createParmTable(purchParmTable,purchTable);
    purchParmTable.TransDate = systemDateGet();
    purchParmTable.DocumentDate = systemDateGet();
    purchParmTable.insert();
 
    purchFormLetter.createParmLine(purchLine);
    purchParmLine.LineAmount=rDeferralsJournalTrans.AmountCur;
    purchParmLine.insert();
    
    purchFormLetter.createParmUpdate();
    purchParmUpdate = purchFormLetter.purchParmUpdate();
    purchFormLetter.purchParmUpdate(purchParmUpdate);
    
 
    purchFormLetter.initParameters(purchParmUpdate,PrintOut::Current,NoYes::No,NoYes::No,NoYes::No);
    purchFormLetter.run();