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

Correct security and privacy guidance

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

Copilot-Session: 9c2eebc4-dcd5-4b85-8113-90772d818900
This commit is contained in:
Jesper Schulz-Wedde 2026-07-14 10:45:42 +02:00
parent 7a678d1aff
commit ec8f891954
34 changed files with 189 additions and 150 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;
}