mirror of
https://github.com/microsoft/BCQuality.git
synced 2026-08-08 02:16:52 +01:00
Add testing knowledge: UI handlers, table relations, asserterror, fixtures (P1+P2)
Six BC-specific testing-domain knowledge articles in community/knowledge/testing/, each with .good.al/.bad.al samples: - ui-calls-require-test-handlers - tablerelation-requires-prerequisite-records - handlers-enqueue-never-assert - handlerfunctions-attribute-must-match-ui-path - asserterror-needs-expectederror-and-code - use-library-codeunits-for-test-fixtures Co-authored-by: Copilot <223556219+Copilot@users.noreply.github.com>
This commit is contained in:
parent
24e62f5ec8
commit
6c02d68b4e
18 changed files with 500 additions and 0 deletions
|
|
@ -0,0 +1,32 @@
|
|||
codeunit 50403 "Test Table Relation Bad"
|
||||
{
|
||||
Subtype = Test;
|
||||
|
||||
[Test]
|
||||
procedure SalesLineAcceptsExistingItem()
|
||||
var
|
||||
Customer: Record Customer;
|
||||
SalesHeader: Record "Sales Header";
|
||||
SalesLine: Record "Sales Line";
|
||||
begin
|
||||
LibrarySales.CreateCustomer(Customer);
|
||||
LibrarySales.CreateSalesHeader(SalesHeader, SalesHeader."Document Type"::Order, Customer."No.");
|
||||
|
||||
// No item was created. Validating "No." against a non-existent item
|
||||
// raises a TableRelation error here, aborting the test at runtime
|
||||
// before any assertion runs.
|
||||
SalesLine.Init();
|
||||
SalesLine."Document Type" := SalesHeader."Document Type";
|
||||
SalesLine."Document No." := SalesHeader."No.";
|
||||
SalesLine."Line No." := 10000;
|
||||
SalesLine.Type := SalesLine.Type::Item;
|
||||
SalesLine.Validate("No.", 'GHOST');
|
||||
SalesLine.Insert(true);
|
||||
|
||||
Assert.AreEqual('GHOST', SalesLine."No.", 'Unreachable: validation already failed.');
|
||||
end;
|
||||
|
||||
var
|
||||
Assert: Codeunit "Library Assert";
|
||||
LibrarySales: Codeunit "Library - Sales";
|
||||
}
|
||||
Loading…
Add table
Add a link
Reference in a new issue