Dynamics Community Forum Thread Details

Create One Pending Invoice for Multiple Packing Slip & Purchase Order

Hi, I want to create one pending invoice for multiple Purchase Order & Product Receipt. I have called reArrange from PurchFormLetter with SumBy based on Invoice Account, but the invoices are still separated based on Purchase Order.

Purchformletter_invoice         Purchformletter;
vendPackingSlipJour             vendPackingSlipJour;
TmpFrmVirtual                   tmpFrmVirtual;
ParmId                          parmId;
VendInvoiceInfoTable            vendinvoiceinfoTable;
vendInvoiceInfoLine             vendInvoiceInfoLine;
List                            selectedList = new List(Types::Record);

while (productReceiptEnum.moveNext())
{
    tmpFrmVirtual.setTmp();
            
    // Add the packing slips into tmpFrmVirtual
    select firstonly vendpackingslipjour
        where vendpackingslipjour.RecId == productReceiptEnum.current()
        && vendPackingSlipJour.InvoiceAccount == _parm.parmVendAccount();

    tmpFrmVirtual.clear();
    tmpFrmVirtual.TableNum  = vendpackingslipjour.TableId;
    tmpFrmVirtual.RecordNo  = vendpackingslipjour.RecId;
    tmpFrmVirtual.NoYes     = NoYes::Yes;
    tmpFrmVirtual.Id        = vendpackingslipjour.PurchId;
    
    tmpFrmVirtual.insert();

    if (tmpFrmVirtual)
    {
        selectedList.addEnd(tmpFrmVirtual);
    }
}
        
// Construct form letter
Purchformletter = purchformletter::construct(DocumentStatus::Invoice);
        
// Add the packing slips to the purch form letter
Purchformletter.selectFromJournal(selectedList.pack());

purchformletter.parmNumber(_parm.parmInvoiceNum());
purchformletter.specQty(purchupdate::ReceiveNow);
purchformletter.sumBy(AccountOrder::Account);
purchformletter.reArrangeNow(true);
purchformletter.reArrange();

parmId = purchformletter.parmId();
        
//Edit the vendInvoiceInfo table if you need it , otherwise this code is not needed.
while select forupdate vendInvoiceInfoTable
    where vendinvoiceinfoTable.ParmId == parmId
{
    vendinvoiceinfoTable.Num = _parm.parmInvoiceNum();
    vendinvoiceinfoTable.VendInvoiceSaveStatus = VendInvoiceSaveStatus::Pending;
    vendInvoiceInfoTable.update();
}

Categories:

Dynamics 365 Finance

Microsoft Dynamics AX

Quick Links