mirror of
https://github.com/microsoft/BCQuality.git
synced 2026-08-08 18:31:36 +01:00
07140e2223
- Introduced `al-test-writer` to generate AL test codeunits for production objects based on TDD principles. - Added `al-userguide-test-writer` to create test codeunits from user guide steps, mapping actions and assertions. - Implemented `bc-extension-test-guide` to generate a comprehensive TEST_GUIDE.md for Business Central extensions, covering various categories. - Created `bc-webclient-runner` to automate UI testing of the Business Central web client, capturing screenshots and asserting UI states. - Developed `page-scripting-e2e` to produce a recording plan for Page Scripting, ensuring a structured approach to browser-level testing.
36 lines
2.1 KiB
AL
36 lines
2.1 KiB
AL
// Best practice: declare an external business event and fire it from a thin subscriber.
|
|
// The platform owns retry (408/429/5xx, up to ~36h) and backoff; delivery is asynchronous
|
|
// and post-commit, so the notification is sent only if the firing transaction commits.
|
|
|
|
codeunit 50160 "Shipment Events v1"
|
|
{
|
|
// [ExternalBusinessEvent], not [BusinessEvent]: the externally deliverable flavour that
|
|
// external subscribers can register against. Parameters are a minimal DTO of identifiers,
|
|
// never the BC record (see version-business-events-and-keep-payloads-stable).
|
|
[ExternalBusinessEvent('ShipmentReleased', 'Shipment released', 'Raised when a warehouse shipment is posted', EventCategory::Sales)]
|
|
procedure OnShipmentReleased_v1(DocumentNo: Code[20]; ExternalRef: Text[100])
|
|
begin
|
|
// Body is intentionally empty: the platform raises and delivers this; we only declare it.
|
|
end;
|
|
}
|
|
|
|
codeunit 50161 "Shipment Event Firer"
|
|
{
|
|
[EventSubscriber(ObjectType::Codeunit, Codeunit::"Whse.-Post Shipment", 'OnAfterPostWhseShipment', '', false, false)]
|
|
local procedure FireShipmentReleased(var WhseShptHeader: Record "Warehouse Shipment Header")
|
|
var
|
|
Events: Codeunit "Shipment Events v1";
|
|
begin
|
|
// Safe to fire from the posting path, even though an HttpClient.Send here would NOT be:
|
|
// - this is not an HTTP call, so it holds no lock open on a remote round trip;
|
|
// - the platform queues delivery and sends it only AFTER this transaction commits;
|
|
// - if posting rolls back, the event is never sent, so nothing leaks on failure.
|
|
Events.OnShipmentReleased_v1(WhseShptHeader."No.", WhseShptHeader."External Document No.");
|
|
end;
|
|
}
|
|
|
|
// External subscribers register themselves with no AL change, by POSTing to
|
|
// api/microsoft/runtime/v1.0/externaleventsubscriptions
|
|
// with eventName, appId, notificationUrl and clientState. Adding a consumer is configuration,
|
|
// not code. (External business events are available from runtime 11 and still preview; confirm
|
|
// the surface against current docs before relying on it.)
|