I want to post invoice only whatever dispatch today

(6) Share

Report

Posted on by faiz7049

2,382

Hi Experts,

Customer requirement is to post invoice whatever dispatch today only consider Order Type = Sales order

Below is incomplete code. Could anyone please me on this.

final class SFA_PostInvoicesForTodayShipDate
{
    public static void main(Args _args)
    {
        SFA_PostInvoicesForTodayShipDate::run();
    }

    public static void run()
    {
        SalesTable              salesTable;
        SalesParmUpdate         salesParmUpdate;
        SalesFormLetter         salesFormLetter;
        SalesParmLine           salesParmLine;
        SalesLine               salesLine;
        SalesParmSubLine        salesParmSubLine;
        SalesParmTable          salesParmTable;
        SalesId                 salesId;
        CustPackingSlipJour     custPackingSlipJour; // Packing slip journal
        CustPackingSlipTrans    custPackingSlipTrans; // Packing slip transactions
        TransDate               today = today();
        boolean                 invoicePosted;

        // Select packing slips with delivery date = today
        while select custPackingSlipJour
            where custPackingSlipJour.DeliveryDate == today // Use DeliveryDate
            join custPackingSlipTrans
            where custPackingSlipTrans.PackingSlipId == custPackingSlipJour.PackingSlipId
            join salesLine
            where salesLine.InventTransId == custPackingSlipTrans.InventTransId
            join salesTable
            where salesTable.SalesId == salesLine.SalesId
               && salesTable.SalesType == SalesType::Sales // Filter for Sales Orders
        {
            salesId = salesTable.SalesId;

            // Initialize the sales form letter for invoice posting
            salesFormLetter = SalesFormLetter::construct(DocumentStatus::Invoice);

      
            salesFormLetter.initParmSalesTable(salesTable);
            salesParmUpdate = salesFormLetter.salesParmUpdate();

            
           
            salesFormLetter.salesParmUpdate(salesParmUpdate);
           
            
            salesParmTable.initFromSalesTable(salesTable);

            //Initialize the sales parm line
            salesParmLine.initFromSalesLine(salesLine);
            salesParmLine.ParmId = salesParmTable.ParmId;

            // Post the invoice
            try
            {
                salesFormLetter.run();
                info(strFmt("Invoice posted for Sales Order: %1", salesId));
                invoicePosted = true;
            }
            catch (Exception::Error)
            {
                error(strFmt("Error posting invoice for Sales Order: %1", salesId));
                invoicePosted = false;
            }
        }

        if (!invoicePosted)
        {
            warning("No invoices were posted.");
        }
    }

}

Categories:

Dynamics 365 Supply Chain Management

I have the same question (0)

All responses (10)

Answers (1)

faiz7049 2,382 on at

Like (0)

Report
Copy link

Link copied!

Hi Experts,

I debug the code and getting sales order Id based on delivery date but invoices not posted.

Thanks,

Faiz

Was this reply helpful? Yes No
Suggested answer

Aymen CHELBI 578 on at

Like (0)

Report
Copy link

Link copied!

Hello,

I suggest you test this version :

final class SFA_PostInvoicesForTodayShipDate
{
public static void main(Args _args)
{
SFA_PostInvoicesForTodayShipDate::run();
}

public static void run()
{
SalesTable salesTable;
SalesFormLetter salesFormLetter;
SalesLine salesLine;
CustPackingSlipJour custPackingSlipJour; // Packing slip journal
CustPackingSlipTrans custPackingSlipTrans; // Packing slip transactions
TransDate today = today();
boolean invoicePosted = false;

// Select packing slips with delivery date = today and Sales order type
while select custPackingSlipJour
where custPackingSlipJour.DeliveryDate == today // Use DeliveryDate
join custPackingSlipTrans
where custPackingSlipTrans.PackingSlipId == custPackingSlipJour.PackingSlipId
join salesLine
where salesLine.InventTransId == custPackingSlipTrans.InventTransId
join salesTable
where salesTable.SalesId == salesLine.SalesId
&& salesTable.SalesType == SalesType::Sales // Filter for Sales Orders
{
try
{
// Initialize the sales form letter for invoice posting
salesFormLetter = SalesFormLetter::construct(DocumentStatus::Invoice);

// Initialize the sales form letter with the sales order
salesFormLetter.initParmSalesTable(salesTable);

// Post the invoice
salesFormLetter.run();

// If invoice posted successfully, log it
info(strFmt("Invoice posted for Sales Order: %1", salesTable.SalesId));
invoicePosted = true;
}
catch (Exception::Error)
{
// Handle any error during posting
error(strFmt("Error posting invoice for Sales Order: %1", salesTable.SalesId));
}
}

// If no invoices were posted, give a warning
if (!invoicePosted)
{
warning("No invoices were posted.");
}
}
}

Best regards,

Was this reply helpful? Yes No
faiz7049 2,382 on at

Like (0)

Report
Copy link

Link copied!

Hi Aymen,

Thank you for your code. In debugging, getting below information. Still invoice is not posted.

Name Value Type

◢ salesLine Cannot evaluate expression since the function evaluation requires all threads to run. Dynamics.AX.Application.SalesLine

Was this reply helpful? Yes No
faiz7049 2,382 on at

Like (0)

Report
Copy link

Link copied!
Hi Experts,

I have updated the below code now only check packingslip which is not invoiced but still not updating invoices.

final class SFA_PostInvoicesForTodayShipDate { public static void main(Args _args) { SFA_PostInvoicesForTodayShipDate::run(); } public static void run() { SalesTable salesTable; SalesParmUpdate salesParmUpdate; SalesFormLetter salesFormLetter; SalesParmLine salesParmLine; SalesLine salesLine; SalesParmSubLine salesParmSubLine; SalesParmTable salesParmTable; SalesId salesId; InventTrans inventTrans; CustPackingSlipJour custPackingSlipJour; // Packing slip journal CustPackingSlipTrans custPackingSlipTrans; // Packing slip transactions TransDate today = str2Date("19/12/2024",123);//today(); boolean invoicePosted; // Select packing slips with delivery date = today while select custPackingSlipJour where custPackingSlipJour.DeliveryDate == today // Use DeliveryDate exists join inventTrans where inventTrans.InvoiceId=="" && inventTrans.PackingSlipId == custPackingSlipJour.PackingSlipId join custPackingSlipTrans where custPackingSlipTrans.PackingSlipId == custPackingSlipJour.PackingSlipId join salesLine where salesLine.InventTransId == custPackingSlipTrans.InventTransId join salesTable where salesTable.SalesId == salesLine.SalesId && salesTable.SalesType == SalesType::Sales // Filter for Sales Orders { try { // Initialize the sales form letter for invoice posting salesFormLetter = SalesFormLetter::construct(DocumentStatus::Invoice); // Initialize the sales form letter with the sales order salesFormLetter.initParmSalesTable(salesTable); // Post the invoice salesFormLetter.run(); // If invoice posted successfully, log it info(strFmt("Invoice posted for Sales Order: %1", salesTable.SalesId)); invoicePosted = true; } catch (Exception::Error) { // Handle any error during posting error(strFmt("Error posting invoice for Sales Order: %1", salesTable.SalesId)); } } if (!invoicePosted) { warning("No invoices were posted."); } } }

Thank you,

Faiz

Was this reply helpful? Yes No
Suggested answer

P Jackson 1,614 on at

Like (0)

Report
Copy link

Link copied!

There's a standard Batch job for sales invoice posting and you could use the parameter for 'Quantity' [Delivery note]. You could also use the 'Select' criteria for the order type, if necessary.

Was this reply helpful? Yes No
faiz7049 2,382 on at

Like (0)

Report
Copy link

Link copied!

Hi Jackson,

Thank for reply, How can apply filter on Invoice Batch process . Requirement is to post invoices against all PackingSlip whatever dispatch today and consider Order Type “Sales Order”. I want to use standard one but I cannot filter on Batch.

Thanks,

Faiz

Was this reply helpful? Yes No
faiz7049 2,382 on at

Like (0)

Report
Copy link

Link copied!
Hi Experts,

I have update my code and now invoice is generating. Problem is it's also including return order. But I filter salesTable.SalesType == SalesType::Sales.

Could you please help me. I do not want to post return order.

final class SFA_PostInvoicesForTodayShipDate { public static void main(Args _args) { SFA_PostInvoicesForTodayShipDate::run(); } public static void run() { SalesTable salesTable; SalesParmUpdate salesParmUpdate; SalesFormLetter salesFormLetter; SalesParmLine salesParmLine; SalesLine salesLine; SalesParmSubLine salesParmSubLine; SalesParmTable salesParmTable; SalesId salesId; InventTrans inventTrans; CustPackingSlipJour custPackingSlipJour; // Packing slip journal CustPackingSlipTrans custPackingSlipTrans; // Packing slip transactions TransDate today = str2Date("19/12/2024",123);//today(); boolean invoicePosted; // Select packing slips with delivery date = today while select custPackingSlipJour //where custPackingSlipJour.DeliveryDate == today // Use DeliveryDate exists join inventTrans where inventTrans.InvoiceId=="" && inventTrans.PackingSlipId == custPackingSlipJour.PackingSlipId join custPackingSlipTrans where custPackingSlipTrans.PackingSlipId == custPackingSlipJour.PackingSlipId join salesLine where salesLine.InventTransId == custPackingSlipTrans.InventTransId join salesTable where salesTable.SalesId == salesLine.SalesId && salesTable.SalesType == SalesType::Sales { try { // Initialize the sales form letter for invoice posting salesFormLetter = SalesFormLetter::construct(DocumentStatus::Invoice); // Initialize the sales form letter with the sales order salesFormLetter.initParmSalesTable(salesTable); // Post the invoice salesFormLetter.update(salesTable,systemDateGet(),SalesUpdate::PackingSlip); // If invoice posted successfully, log it info(strFmt("Invoice posted for Sales Order: %1", salesTable.SalesId)); invoicePosted = true; } catch (Exception::Error) { // Handle any error during posting error(strFmt("Error posting invoice for Sales Order: %1", salesTable.SalesId)); } } if (!invoicePosted) { warning("No invoices were posted."); } } }

Thanks,

Faiz

Was this reply helpful? Yes No
faiz7049 2,382 on at

Like (0)

Report
Copy link

Link copied!
Hi Experts,

When I use salesFormLetter.update() method invoice is posting but while loop filter is not working
salesFormLetter.update(salesTable,systemDateGet(),SalesUpdate::PackingSlip);

If I use salesFormLetter.run() method while filter is working but no invoice posting.

Please help me.

Thanks,

Faiz

Was this reply helpful? Yes No
Verified answer

faiz7049 2,382 on at

Like (1)

Report
Copy link

Link copied!
Hi Experts,

Now codes are working.

while select salesTable where salesTable.SalesType == SalesType::Sales exists join custPackingSlipJour where custPackingSlipJour.DeliveryDate == today && custPackingSlipJour.SalesId == salesTable.SalesId { try { // Initialize the sales form letter for invoice posting salesFormLetter = SalesFormLetter::construct(DocumentStatus::Invoice); // Initialize the sales form letter with the sales order salesFormLetter.initParmSalesTable(salesTable); // Post the invoice salesFormLetter.update(salesTable,systemDateGet(),SalesUpdate::PackingSlip); // If invoice posted successfully, log it info(strFmt("Invoice posted for Sales Order: %1", salesTable.SalesId)); invoicePosted = true; } catch (Exception::Error) { // Handle any error during posting error(strFmt("Error posting invoice for Sales Order: %1", salesTable.SalesId)); } } if (!invoicePosted) { warning("No invoices were posted."); }

Was this reply helpful? Yes No
Suggested answer

P Jackson 1,614 on at

Like (0)

Report
Copy link

Link copied!

Use the 'Select' option:

Was this reply helpful? Yes No