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

Correct security and privacy knowledge guidance (#92)

Browse source 
* 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>
This commit is contained in:
Jesper Schulz-Wedde 2026-07-14 11:25:03 +02:00 • committed by GitHub
parent bfda67a95a
commit aca3986fd0
No known key found for this signature in database
GPG key ID: B5690EEEBB952194
34 changed files with 192 additions and 153 deletions
Download patch file Download diff file Expand all files Collapse all files

16
microsoft/knowledge/privacy/register-integration-in-privacy-notice-registrations.good.al
View file

@ -1,11 +1,17 @@
codeunit 50218 "Privacy Sample Register Integration"
{
[EventSubscriber(ObjectType::Codeunit, Codeunit::"Privacy Notice Registrations", 'OnRegisterPrivacyNotices', '', false, false)]
local procedure OnRegisterPrivacyNotices(var TempPrivacyNotice: Record "Privacy Notice" temporary)
var
PrivacyNotice: Codeunit "Privacy Notice";
ExternalSyncNoticeIdLbl: Label 'CONTOSO-EXTERNAL-SYNC', Locked = true;
ExternalSyncNameLbl: Label 'Contoso External Sync', Locked = true;
PrivacyTermsUrlLbl: Label 'https://contoso.example/privacy', Locked = true;
[EventSubscriber(ObjectType::Codeunit, Codeunit::"Privacy Notice", 'OnRegisterPrivacyNotices', '', false, false)]
local procedure OnRegisterPrivacyNotices(var TempPrivacyNotice: Record "Privacy Notice" temporary)
begin
PrivacyNotice.CreatePrivacyNoticeForIntegration(
'My External Sync', 'External Customer Sync Service');
TempPrivacyNotice.Init();
TempPrivacyNotice.ID := ExternalSyncNoticeIdLbl;
TempPrivacyNotice."Integration Service Name" := ExternalSyncNameLbl;
TempPrivacyNotice.Link := PrivacyTermsUrlLbl;
if not TempPrivacyNotice.Insert() then;
end;
}