mirror of
https://github.com/microsoft/BCQuality.git
synced 2026-08-06 09:26:52 +01:00
23af51e02d
Co-authored-by: Copilot App <223556219+Copilot@users.noreply.github.com> Copilot-Session: 645349fd-1892-48f3-8a84-db77d6abd1c3
16 lines
432 B
AL
16 lines
432 B
AL
// Demonstration-only AL. Version 1 shipped with only CalculateAmount().
|
|
interface "I Shipping Quote Bad"
|
|
{
|
|
procedure CalculateAmount(): Decimal;
|
|
|
|
// Added in version 2: every existing implementer now fails to compile.
|
|
procedure CalculateDeliveryDate(): Date;
|
|
}
|
|
|
|
codeunit 50511 "Existing Shipping Quote" implements "I Shipping Quote Bad"
|
|
{
|
|
procedure CalculateAmount(): Decimal
|
|
begin
|
|
exit(10);
|
|
end;
|
|
}
|