[W1][Report][7305][Whse.-Source - Create Document] Add Integration Event OnAfterSplitPostedWhseRcptLine in CreatePutAwayFromDiffSource procedure

[mavohra]

Why do you need this change?

After the base case block executes either SplitInternalPutAwayLine or SplitPostedWhseRcptLine, there is no event that allows subscribers to perform additional processing on TempPostedWhseReceiptLine. Container tracking requires a secondary split pass on TempPostedWhseReceiptLine specifically when SourceType = Database::"Posted Whse. Receipt Line" and container tracking is installed. Without an event at this point, this logic must be inserted directly into the base case, requiring a base modification on every upgrade.

Describe the request

Add OnAfterSplitPostedWhseRcptLine immediately after the case block ends, before RemQtyToHandleBase is assigned, so subscribers can perform additional operations on TempPostedWhseReceiptLine for any SourceType.

 procedure CreatePutAwayFromDiffSource(PostedWhseRcptLine: Record "Posted Whse. Receipt Line"; SourceType: Integer)
    var
        TempPostedWhseReceiptLine: Record "Posted Whse. Receipt Line" temporary;
        TempPostedWhseReceiptLine2: Record "Posted Whse. Receipt Line" temporary;
        ItemTrackingMgt: Codeunit "Item Tracking Management";
        RemQtyToHandleBase: Decimal;
        IsHandled: Boolean;
    begin
        case SourceType of
            Database::"Whse. Internal Put-away Line":
                ItemTrackingMgt.SplitInternalPutAwayLine(PostedWhseRcptLine, TempPostedWhseReceiptLine);
            Database::"Posted Whse. Receipt Line":
                ItemTrackingMgt.SplitPostedWhseRcptLine(PostedWhseRcptLine, TempPostedWhseReceiptLine);
        end;
         OnAfterSplitPostedWhseRcptLine(PostedWhseRcptLine, TempPostedWhseReceiptLine, SourceType); 
        RemQtyToHandleBase := PostedWhseRcptLine."Qty. (Base)";
        TempPostedWhseReceiptLine.Reset();
        .....
end;

Event Signature:

[IntegrationEvent(false, false)]
local procedure OnAfterSplitPostedWhseRcptLine(
    var PostedWhseRcptLine: Record "Posted Whse. Receipt Line";
    var TempPostedWhseReceiptLine: Record "Posted Whse. Receipt Line" temporary;
    SourceType: Integer)
begin
end;

Alternatives evaluated:
Inserting the container split directly into the Database::"Posted Whse. Receipt Line" of the base case requires a base modification on every upgrade, causes merge conflicts, and violates the AL extensibility rules. No event currently exists after the case block that exposes both TempPostedWhseReceiptLine and SourceType together, leaving direct base modification as the only available option without this change.
Internal work item: AB#638506

[github-actions]

Hi @mavohra,

Thank you for your extensibility request. To help us process it efficiently, please update the issue to include the required information.

📚 Extensibility Guidelines

Missing Information:

• Why the existing event cannot be used: A nearby existing event, OnCreatePutAwayFromDiffSourceOnBeforeProcessCreatePutAway, already exposes TempPostedWhseReceiptLine in the same procedure. Please explain why that event cannot satisfy your scenario, or what additional context is required from PostedWhseRcptLine and SourceType instead of using or extending the existing publisher.

Please update the issue with the missing details. We'll automatically re-analyze once updated.

Note

Automatically generated by the Triage Agent — advisory only. An engineer will review before any action is taken.

Tip

Not accurate? Reply with /not-accurate (optional: add a short explanation). Your feedback improves future responses.

[mavohra]

Why the existing event cannot be used

OnCreatePutAwayFromDiffSourceOnBeforeProcessCreatePutAway fires after RemQtyToHandleBase is assigned and inside the TempPostedWhseRcptLine iteration loop, not immediately after the split case block. By that point, the split has already occurred and the quantity has been computed. The container split logic must run right after SplitPostedWhseRcptLine populates TempPostedWhseRcptLine but before RemQtyToHandleBase is assigned, because the container split may add or modify lines in the temporary recordset that affect the remaining quantity calculation. Additionally, SourceType is required to branch correctly: the container split applies only to Database::"Posted Whse. Receipt Line", not to internal put-away lines. The existing event does not expose PostedWhseRcptLine or SourceType, so a subscriber cannot determine which source type triggered the split or access the original receipt line's line number needed for container line correlation.

[github-actions]

Hi @mavohra,

Thank you for your extensibility request. To help us process it efficiently, please update the issue to include the required information.

📚 Extensibility Guidelines

Missing Information:

• Why the existing event cannot be used: Codeunit "Item Tracking Management" already publishes OnAfterSplitPostedWhseReceiptLine(PostedWhseRcptLine, var TempPostedWhseRcptLine), which fires after SplitPostedWhseRcptLine and before RemQtyToHandleBase is calculated in CreatePutAwayFromDiffSource. Please explain why this existing event is insufficient for your scenario before a new report event is added.

Please update the issue with the missing details. We'll automatically re-analyze once updated.

Note

Automatically generated by the Triage Agent — advisory only. An engineer will review before any action is taken.

Tip

Not accurate? Reply with /not-accurate (optional: add a short explanation). Your feedback improves future responses.

[mavohra]

Container tracking allows a single posted warehouse receipt line to represent multiple physical containers, each with its own item and quantity. After the standard item tracking split divides receipt lines by lot/serial number, a secondary container split must further divide those lines by container ID so each container is put away independently. This split needs the original receipt line number for correlation and must only run for posted receipt sources, not internal put-away lines.

OnAfterSplitPostedWhseReceiptLine fires inside SplitPostedWhseRcptLine in Codeunit "Item Tracking Management", which is called from many callers across the application. The container split must only execute in the CreatePutAwayFromDiffSource context within Report 7305, where SourceType and PostedWhseRcptLine."Line No." are available for container line correlation. Subscribing to the existing event would trigger the container split on every call to SplitPostedWhseRcptLine across all posting paths, including purchase receipt posting and transfer receipt posting where container tracking does not apply. The proposed event fires precisely at the report-level split point, with SourceType as a discriminator so the subscriber can scope its logic to Database::"Posted Whse. Receipt Line" only, and with access to PostedWhseRcptLine."Line No." for correlating container lines to the correct receipt line.

[github-actions]

✅ Analysis complete - ready for further processing

---

Implementation:

Add a new integration event in CreatePutAwayFromDiffSource of Report 7305 Whse.-Source - Create Document immediately after the case SourceType of block and before RemQtyToHandleBase is assigned.

Location in CreatePutAwayFromDiffSource procedure:

        case SourceType of
            Database::"Whse. Internal Put-away Line":
                ItemTrackingMgt.SplitInternalPutAwayLine(PostedWhseRcptLine, TempPostedWhseReceiptLine);
            Database::"Posted Whse. Receipt Line":
                ItemTrackingMgt.SplitPostedWhseRcptLine(PostedWhseRcptLine, TempPostedWhseReceiptLine);
        end;
        OnCreatePutAwayFromDiffSourceOnAfterSplitSourceLine(PostedWhseRcptLine, TempPostedWhseReceiptLine, SourceType);
        RemQtyToHandleBase := PostedWhseRcptLine."Qty. (Base)";

Event Publisher (add at the end of the codeunit with other events):

[IntegrationEvent(false, false)]
local procedure OnCreatePutAwayFromDiffSourceOnAfterSplitSourceLine(var PostedWhseReceiptLine: Record "Posted Whse. Receipt Line"; var TempPostedWhseReceiptLine: Record "Posted Whse. Receipt Line" temporary; SourceType: Integer)
begin
end;

---

File: WhseSourceCreateDocument.Report.al

Note

Automatically generated by the Triage Agent — advisory only. An engineer will review before any action is taken.

Tip

Not accurate? Reply with /not-accurate (optional: add a short explanation). Your feedback improves future responses.