mirror of
https://github.com/microsoft/BCQuality.git
synced 2026-08-06 17:36:53 +01:00
363f08f47e
* Add P0 extensibility compatibility knowledge Co-authored-by: Copilot App <223556219+Copilot@users.noreply.github.com> Copilot-Session: 645349fd-1892-48f3-8a84-db77d6abd1c3 * Correct event compatibility guidance Co-authored-by: Copilot App <223556219+Copilot@users.noreply.github.com> Copilot-Session: 645349fd-1892-48f3-8a84-db77d6abd1c3 --------- Co-authored-by: Jesper Schulz-Wedde <jesper.schulzwedde@microsoft.com>
21 lines
644 B
AL
21 lines
644 B
AL
// Demonstration-only AL. The Isolated argument requires runtime 9.0 / BC20.
|
|
codeunit 50530 "Shipment Events"
|
|
{
|
|
procedure NotifyShipment(ShipmentNo: Code[20])
|
|
begin
|
|
OnShipmentCreated(ShipmentNo);
|
|
OnShipmentCreatedIsolated(ShipmentNo);
|
|
end;
|
|
|
|
// Preserve the shipped attribute contract.
|
|
[IntegrationEvent(true, true, false)]
|
|
local procedure OnShipmentCreated(ShipmentNo: Code[20])
|
|
begin
|
|
end;
|
|
|
|
// Publish a new event for different isolation and sender semantics.
|
|
[IntegrationEvent(false, false, true)]
|
|
local procedure OnShipmentCreatedIsolated(ShipmentNo: Code[20])
|
|
begin
|
|
end;
|
|
}
|