mirror of
https://github.com/microsoft/BCQuality.git
synced 2026-08-06 09:26:52 +01:00
aca3986fd0
* Correct security and privacy guidance Co-authored-by: Copilot App <223556219+Copilot@users.noreply.github.com> Copilot-Session: 9c2eebc4-dcd5-4b85-8113-90772d818900 * Address security privacy review findings Co-authored-by: Copilot App <223556219+Copilot@users.noreply.github.com> Copilot-Session: 9c2eebc4-dcd5-4b85-8113-90772d818900 --------- Co-authored-by: Jesper Schulz-Wedde <jesper.schulzwedde@microsoft.com>
17 lines
528 B
AL
17 lines
528 B
AL
codeunit 50207 "Privacy Sample StrSubstNo Bad"
|
|
{
|
|
procedure ReportFailure(var Customer: Record Customer)
|
|
var
|
|
CustomerInvalidErr: Label 'Customer %1 has invalid data.', Comment = '%1 = Customer No.';
|
|
begin
|
|
Error(StrSubstNo(CustomerInvalidErr, Customer."No."));
|
|
end;
|
|
|
|
procedure ReportCombinedFailure()
|
|
var
|
|
HeaderErr: Label 'Customer validation failed. ';
|
|
DetailErr: Label 'Correct the customer card and try again.';
|
|
begin
|
|
Error(HeaderErr + DetailErr);
|
|
end;
|
|
}
|