Codeunit 9020 User Access Update

App
Base Application
Namespace
System.Security.User
Versions
17-28

Versions171819202122232425262728

Source29

Source in 29

src/Layers/W1/BaseApp/Modules/System/PermissionSets/UserAccessUpdate.Codeunit.al18 lines, Copyright (c) Microsoft Corporation. MIT

namespace System.Security.User;

using System.Azure.Identity;
using System.Security.AccessControl;

codeunit 9020 "User Access Update"
{
    InherentEntitlements = X;
    InherentPermissions = X;

    [EventSubscriber(ObjectType::Codeunit, Codeunit::"Azure AD Plan", 'OnUpdateUserAccessForSaaS', '', false, false)]
    local procedure OnUpdateUserAccessForSaaS(UserSecurityID: Guid; var UserGroupsAdded: Boolean);
    var
        PermissionManager: Codeunit "Permission Manager";
    begin
        UserGroupsAdded := PermissionManager.UpdateUserAccessForSaaS(UserSecurityID);
    end;
}