mirror of
https://github.com/microsoft/BCQuality.git
synced 2026-10-07 15:46:55 +01:00
Add 18 more community AL/BC patterns across appsource, data-modeling, error-handling, security, style, testing, ui, upgrade, and web-services
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.
This commit is contained in:
parent
07e324ddbc
commit
a4d85c3e9e
50 changed files with 1262 additions and 0 deletions
|
|
@ -0,0 +1,26 @@
|
|||
codeunit 50100 "Sample Error Log Writer"
|
||||
{
|
||||
// Started via Session.StartSession so its commit is independent of the
|
||||
// caller's transaction. Does one thing: insert the log entry, commit.
|
||||
trigger OnRun()
|
||||
var
|
||||
ErrorLogEntry: Record "Sample Error Log";
|
||||
begin
|
||||
ErrorLogEntry.Init();
|
||||
ErrorLogEntry."Call Duration (ms)" := CallDurationMs;
|
||||
ErrorLogEntry."Error Message" :=
|
||||
CopyStr(ErrorMessageText, 1, MaxStrLen(ErrorLogEntry."Error Message"));
|
||||
ErrorLogEntry.Insert(true);
|
||||
Commit();
|
||||
end;
|
||||
|
||||
procedure SetParameters(Duration: Integer; ErrorText: Text)
|
||||
begin
|
||||
CallDurationMs := Duration;
|
||||
ErrorMessageText := ErrorText;
|
||||
end;
|
||||
|
||||
var
|
||||
CallDurationMs: Integer;
|
||||
ErrorMessageText: Text;
|
||||
}
|
||||
Loading…
Add table
Add a link
Reference in a new issue