Microsoft/bcquality
1
0
Fork 0
mirror of https://github.com/microsoft/BCQuality.git synced 2026-08-06 17:36:53 +01:00
Code Issues Projects Releases Packages Wiki Activity Actions

Fix lifecycle compatibility guidance

Browse source 
Correct high-confidence Business Central guidance and samples for upgrade tags, collectible errors, trigger semantics, obsoletion, events, interfaces, API contracts, and test transactions.

Co-authored-by: Copilot App <223556219+Copilot@users.noreply.github.com>

Copilot-Session: e05a43e7-6448-4d67-9c73-798523f5d945
This commit is contained in:
Jesper Schulz-Wedde 2026-07-14 10:51:12 +02:00
parent 7a678d1aff
commit bc8686d871
31 changed files with 199 additions and 103 deletions
Download patch file Download diff file Expand all files Collapse all files

12
microsoft/knowledge/error-handling/collect-validation-errors-with-errorbehavior.good.al
View file

@ -15,10 +15,12 @@ codeunit 50185 "Collect Errors Good Sample"
until Item.Next() = 0;
if HasCollectedErrors() then begin
CollectedErrors := GetCollectedErrors();
// The default is false; true retrieves and clears the collection.
CollectedErrors := GetCollectedErrors(true);
foreach CollectedError in CollectedErrors do
ErrorText += CollectedError.Message() + '\';
Message('The following must be fixed before posting:\%1', ErrorText);
Error(ErrorInfo.Create(
StrSubstNo('The following must be fixed before posting:\%1', ErrorText), false));
end;
end;
}
@ -30,8 +32,10 @@ codeunit 50186 "Collect Errors Item Check"
trigger OnRun()
begin
if Rec.Description = '' then
Error('Item %1 has no description.', Rec."No.");
Error(ErrorInfo.Create(
StrSubstNo('Item %1 has no description.', Rec."No."), true, Rec, Rec.FieldNo(Description)));
if Rec."Unit Cost" <= 0 then
Error('Item %1 must have a positive unit cost.', Rec."No.");
Error(ErrorInfo.Create(
StrSubstNo('Item %1 must have a positive unit cost.', Rec."No."), true, Rec, Rec.FieldNo("Unit Cost")));
end;
}