Microsoft/bcquality
1
0
Fork 0
mirror of https://github.com/microsoft/BCQuality.git synced 2026-08-07 09:56:52 +01:00
Code Issues Projects Releases Packages Wiki Activity Actions

Transaction and error handling in BC AL - new knowledge articles

Browse source
This commit is contained in:
Volodymyr Dvernytskyi 2026-04-23 20:58:02 +03:00
parent 7dd3f4777d
commit 4ce7d816cc
19 changed files with 415 additions and 10 deletions
Download patch file Download diff file Expand all files Collapse all files

17
microsoft/knowledge/performance/use-tryfunction-for-error-catching-not-rollback.bad.al Normal file
View file

@ -0,0 +1,17 @@
codeunit 50156 "Perf Sample TryFunc Bad"
{
procedure ApplyDiscountAttempt(var Customer: Record Customer)
begin
if not TryApplyDiscount(Customer) then
Message('Discount not applied');
end;
[TryFunction]
local procedure TryApplyDiscount(var Customer: Record Customer)
begin
Customer.Validate("Customer Price Group", 'VIP');
Customer.Modify(true);
if Customer."Credit Limit (LCY)" <= 0 then
Error('Customer %1 not eligible', Customer."No.");
end;
}