Codeunit 7108 O365 Graph Authentication

App
Base Application
Namespace
Microsoft.CRM.Outlook
Versions
28

Procedures, 2

Versions171819202122232425262728

Source29

Source in 29

src/Layers/W1/BaseApp/CRM/Outlook/O365GraphAuthentication.Codeunit.al23 lines, Copyright (c) Microsoft Corporation. MIT

namespace microsoft.CRM.Outlook;
using System.Azure.Identity;

codeunit 7108 "O365 Graph Authentication"
{
    internal procedure GetAccessToken(var AccessToken: SecretText)
    var
        AzureADMgt: Codeunit "Azure AD Mgt.";
    begin
        AccessToken := AzureADMgt.GetAccessTokenAsSecretText(GetURL(), AzureADMgt.GetO365ResourceName(), false);
    end;

    internal procedure GetURLForGraph(): Text
    begin
        exit(GetURL());
    end;

    local procedure GetURL(): Text
    begin
        exit('https://graph.microsoft.com');
    end;
}