SharePoint Graph API support

src/System Application/App/MicrosoftGraph/src/GraphRequestHeader.Enum.al

@@ -43,4 +43,12 @@ enum 9353 "Graph Request Header"
     {
         Caption = 'ConsistencyLevel', Locked = true;
     }
+
+    /// <summary>
+    /// Range Request Header
+    /// </summary>
+    value(40; Range)
+    {
+        Caption = 'Range', Locked = true;
+    }
 }

src/System Application/App/SharePoint/app.json

@@ -40,6 +40,12 @@
       "name": "BLOB Storage",
       "publisher": "Microsoft",
       "version": "28.0.0.0"
+    },
+    {
+      "id": "6d72c93d-164a-494c-8d65-24d7f41d7b61",
+      "name": "Microsoft Graph",
+      "publisher": "Microsoft",
+      "version": "28.0.0.0"
     }
   ],
   "screenshots": [],

src/System Application/App/SharePoint/permissions/SharePointApiObjects.PermissionSet.al

@@ -10,5 +10,5 @@ permissionset 9100 "SharePoint API - Objects"
     Access = Internal;
     Assignable = false;
 
-    Permissions = codeunit "SharePoint Client" = X;
+    Permissions = codeunit "SharePoint Client" = X, codeunit "SharePoint Graph Client" = X;
 }

src/System Application/App/SharePoint/src/graph/helpers/SharePointGraphResponse.Codeunit.al

@@ -0,0 +1,88 @@
+// ------------------------------------------------------------------------------------------------
+// Copyright (c) Microsoft Corporation. All rights reserved.
+// Licensed under the MIT License. See License.txt in the project root for license information.
+// ------------------------------------------------------------------------------------------------
+
+namespace System.Integration.Sharepoint;
+
+/// <summary>
+/// Holder object for SharePoint Graph API operation results.
+/// </summary>
+codeunit 9129 "SharePoint Graph Response"
+{
+    Access = Public;
+    InherentEntitlements = X;
+    InherentPermissions = X;
+
+    var
+        SharePointGraphRequestHelper: Codeunit "SharePoint Graph Req. Helper";
+        IsSuccess: Boolean;
+        ErrorMessage: Text;
+        ErrorCallStack: Text;
+
+    /// <summary>
+    /// Checks whether the operation was successful.
+    /// </summary>
+    /// <returns>True if the operation was successful; otherwise - false.</returns>
+    procedure IsSuccessful(): Boolean
+    begin
+        exit(IsSuccess);
+    end;
+
+    /// <summary>
+    /// Gets the error message (if any) of the response.
+    /// </summary>
+    /// <returns>Text representation of the error that occurred during the operation.</returns>
+    procedure GetError(): Text
+    begin
+        exit(ErrorMessage);
+    end;
+
+    /// <summary>
+    /// Gets the call stack at the time of the error.
+    /// </summary>
+    /// <returns>The call stack when the error occurred.</returns>
+    procedure GetErrorCallStack(): Text
+    begin
+        exit(ErrorCallStack);
+    end;
+
+    /// <summary>
+    /// Gets the HTTP diagnostics for the last HTTP request (if any).
+    /// </summary>
+    /// <returns>HTTP diagnostics interface for detailed HTTP response information.</returns>
+    procedure GetHttpDiagnostics(): Interface "HTTP Diagnostics"
+    begin
+        exit(SharePointGraphRequestHelper.GetDiagnostics());
+    end;
+
+    /// <summary>
+    /// Sets the response as successful.
+    /// </summary>
+    internal procedure SetSuccess()
+    begin
+        IsSuccess := true;
+        ErrorMessage := '';
+        ErrorCallStack := '';
+    end;
+
+    /// <summary>
+    /// Sets the response as failed with an error message.
+    /// </summary>
+    /// <param name="NewErrorMessage">The error message to set.</param>
+    internal procedure SetError(NewErrorMessage: Text)
+    begin
+        IsSuccess := false;
+        ErrorMessage := NewErrorMessage;
+        ErrorCallStack := SessionInformation.Callstack();
+    end;
+
+    /// <summary>
+    /// Sets the request helper for HTTP diagnostics access.
+    /// </summary>
+    /// <param name="NewSharePointGraphRequestHelper">The request helper instance.</param>
+    internal procedure SetRequestHelper(var NewSharePointGraphRequestHelper: Codeunit "SharePoint Graph Req. Helper")
+    begin
+        SharePointGraphRequestHelper := NewSharePointGraphRequestHelper;
+    end;
+}