mirror of
https://github.com/microsoft/BCQuality.git
synced 2026-08-06 09:26:52 +01:00
Co-authored-by: Copilot App <223556219+Copilot@users.noreply.github.com> Copilot-Session: 645349fd-1892-48f3-8a84-db77d6abd1c3
20 lines
755 B
AL
20 lines
755 B
AL
// Demonstration-only AL. Not compiled by CI; illustrates the article.
|
|
codeunit 50250 "Param Append Good Sample"
|
|
{
|
|
procedure PostDocument(var SalesHeader: Record "Sales Header"; CalledFromBatch: Boolean)
|
|
var
|
|
IsHandled: Boolean;
|
|
begin
|
|
IsHandled := false;
|
|
// This local event can gain an optional trailing subscriber parameter.
|
|
OnBeforePostDocument(SalesHeader, IsHandled, CalledFromBatch);
|
|
if IsHandled then
|
|
exit;
|
|
end;
|
|
|
|
// Public events cannot use this evolution: dependent apps may raise them.
|
|
[IntegrationEvent(false, false)]
|
|
local procedure OnBeforePostDocument(var SalesHeader: Record "Sales Header"; var IsHandled: Boolean; CalledFromBatch: Boolean)
|
|
begin
|
|
end;
|
|
}
|