mirror of
https://github.com/microsoft/BCQuality.git
synced 2026-10-05 14:46:55 +01:00
Second contribution from CURABIS ApS, generalized from patterns observed across real AppSource/PTE development. Cross-checked against the current microsoft/knowledge corpus before opening; several originally-drafted candidates were dropped as duplicates of existing files.
24 lines
652 B
AL
24 lines
652 B
AL
codeunit 50104 "Item Price Testing"
|
|
{
|
|
Subtype = Test;
|
|
|
|
[Test]
|
|
procedure GetPrice_LogicTest()
|
|
var
|
|
Customer: Record Customer;
|
|
Item: Record Item;
|
|
UnitPrice, LineDiscPct: Decimal;
|
|
begin
|
|
// logic test — fine on its own, but not paired with a UI test below
|
|
ItemPriceMgt.GetSalesPrice(Customer."No.", Item."No.", '', UnitPrice, LineDiscPct);
|
|
end;
|
|
|
|
[Test]
|
|
procedure Page_ShowsPrice_UT()
|
|
var
|
|
ItemPricePage: TestPage "Item Price";
|
|
begin
|
|
// UI test mixed into a logic-test codeunit, and the codeunit lacks the _UT suffix
|
|
ItemPricePage.OpenNew();
|
|
end;
|
|
}
|