tableextension 50000 "Purchase Header RA" extends "Purchase Header"
{
fields
{
field(50000; "Need Approval"; Boolean)
{
Caption = 'Need Approval';
InitValue = true;
DataClassification = CustomerContent;
}
}
}
[EventSubscriber(ObjectType::Codeunit, Codeunit::"Purch.-Get Receipt", OnAfterCreateInvLines, '', false, false)]
local procedure OnAfterCreateInvLines(var PurchaseHeader: Record "Purchase Header"; var PurchaseLine: Record "Purchase Line")
begin
PurchaseHeader."Need Approval" := false;
PurchaseHeader.Modify(false);
end;
Stay up to date on forum activity by subscribing. You can also customize your in-app and email Notification settings across all subscriptions.
André Arnaud de Cal... 290,961 Super User 2024 Season 2
Martin Dráb 229,443 Most Valuable Professional
nmaenpaa 101,156