[Event Request] Codeunit 1303 "Correct Posted Sales Invoice"

[NilsKagel]

Describe the request

Could you please add the following event to Codeunit 1303 "Correct Posted Sales Invoice" at Function "UpdateSalesOrderLinesFromCancelledInvoice":

        IsHandled := false;
        OnBeforeUpdateSalesOrderLineIfExist(Rec, IsHandled);
        if IsHandled then
            exit;

Example (new code with >>><<<):

local procedure UpdateSalesOrderLinesFromCancelledInvoice(SalesInvoiceHeaderNo: Code[20])
var
	TempItemLedgerEntry: Record "Item Ledger Entry" temporary;
	SalesLine: Record "Sales Line";
	SalesInvoiceLine: Record "Sales Invoice Line";
	UndoPostingManagement: Codeunit "Undo Posting Management";
begin
>>>	
	IsHandled := false;
	OnBeforeUpdateSalesOrderLinesFromCancelledInvoice(SalesInvoiceHeaderNo, IsHandled);
	if IsHandled then
                exit;
<<<
	SalesInvoiceLine.SetRange("Document No.", SalesInvoiceHeaderNo);
	if SalesInvoiceLine.FindSet() then
		repeat
			TempItemLedgerEntry.Reset();
			TempItemLedgerEntry.DeleteAll();
			SalesInvoiceLine.GetItemLedgEntries(TempItemLedgerEntry, false);
			if SalesLine.Get(SalesLine."Document Type"::Order, SalesInvoiceLine."Order No.", SalesInvoiceLine."Order Line No.") then begin
				UpdateSalesOrderLineInvoicedQuantity(SalesLine, SalesInvoiceLine.Quantity, SalesInvoiceLine."Quantity (Base)");
				UpdateSalesOrderLinePrepmtAmount(SalesInvoiceLine);
				if SalesLine."Qty. to Ship" = 0 then
					UpdateWhseRequest(Database::"Sales Line", SalesLine."Document Type".AsInteger(), SalesLine."Document No.", SalesLine."Location Code");
				TempItemLedgerEntry.SetFilter("Item Tracking", '<>%1', TempItemLedgerEntry."Item Tracking"::None.AsInteger());
				UndoPostingManagement.RevertPostedItemTracking(TempItemLedgerEntry, SalesInvoiceLine."Shipment Date", true);
			end;
		until SalesInvoiceLine.Next() = 0;
end;

Additional context

We need this event to create a save way to integrate our own function to correct invoices.
Internal work item: AB#538570

[JesperSchulz]

Thanks for reporting this. We agree, and we’ll publish a fix asap, either in an update for the current version or in the next major release. Please do not reply to this, as we do not monitor closed issues. If you have follow-up questions or requests, please create a new issue where you reference this one.

Build ID: 21022.