[Event request] Codeunit 1018 "Purchase Doc. From Job" - procedure CreatePurchaseOrder

[tkroes]

Why do you need this change?

I want to be able to act on the created purchase order by copying some data from the job to the purchase order in my extension. Currently the only events that exist in this process lie within the handling of the underlying requisition lines, but those don't provide an easy job-to-order link as far as I can see.

Describe the request

I would like to see an event after the check on the empty NoFilter that exposes this filter alongside the job parameter of the function, to allow finding the orders created from the job and allow copying data from the job to the relevant purchase headers.

            until TempDocumentEntry.Next() = 0;

        if NoFilter = '' then
            Error(NoPurchaseOrdersCreatedErr);

+       OnAfterBuildNoFilter(Job, NoFilter);

        PurchaseHeader.SetFilter("No.", NoFilter);
        PurchaseHeader.SetRange("Document Type", PurchaseHeader."Document Type"::Order);

        case PurchaseHeader.Count of

Internal work item: AB#621171

[AleksandricMarko]

Hi @tkroes,

Thanks for submitting this extensibility request. To help us process it efficiently, please update the issue to include the required information.

📚 Extensibility Guidelines

Missing Information:

• Proposed Code Change: Please provide an exact code snippet showing the event addition with surrounding context (5-10 lines). While the description mentions placing "an event after the check on the empty NoFilter that exposes this filter alongside the job parameter", the actual code implementation showing the event signature, parameters, and surrounding context is not included. Please provide a code snippet in AL format showing exactly where and how the event should be added to procedure CreatePurchaseOrder in Codeunit 1018 "Purchase Doc. From Job".

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

[tkroes]

Hi @AleksandricMarko, I have updated the original request with a code snippet highlighting the requested change.

[AleksandricMarko]

✅ Analysis complete - approved for implementation

---

Implementation:

Add a new integration event in the CreatePurchaseOrder procedure of Codeunit 1018 "Purchase Doc. From Job" immediately after the NoFilter error check. This will allow extensions to copy data from the job to the created purchase orders.

Location in CreatePurchaseOrder procedure (after line 54):

if NoFilter = '' then
    Error(NoPurchaseOrdersCreatedErr);

OnCreatePurchaseOrderOnAfterBuildNoFilter(Job, NoFilter);

PurchaseHeader.SetFilter("No.", NoFilter);
PurchaseHeader.SetRange("Document Type", PurchaseHeader."Document Type"::Order);

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

[IntegrationEvent(false, false)]
local procedure OnCreatePurchaseOrderOnAfterBuildNoFilter(Job: Record Job; NoFilter: Text)
begin
end;

---

File: PurchaseDocFromJob.Codeunit.al

📝 Note: This procedure may be called from multiple places in the codebase. If you need your event subscriber to fire only in specific scenarios, consider using Manual Event Subscription Binding.