Porting fix to 25.0

src/System Application/App/AI/src/Azure OpenAI/AzureOpenAI.Codeunit.al

@@ -43,6 +43,22 @@ codeunit 7771 "Azure OpenAI"
         exit(AzureOpenAIImpl.IsEnabled(CopilotCapability, Silent, CallerModuleInfo));
     end;
 
+    /// <summary>
+    /// Checks if the Azure OpenAI API is enabled for the environment and if the capability is active on the environment.
+    /// </summary>
+    /// <param name="CopilotCapability">The copilot capability to check.</param>
+    /// <param name="Silent">If true, no error message will be shown if API is not enabled.</param>
+    /// <param name="AppId">The id of the app, which registered the copilot capability.</param>
+    /// <returns>True if API and capability is enabled for environment.</returns>
+    procedure IsEnabled(CopilotCapability: Enum "Copilot Capability"; Silent: Boolean; AppId: Guid): Boolean
+    var
+        AppModuleInfo: ModuleInfo;
+    begin
+        if not NavApp.GetModuleInfo(AppId, AppModuleInfo) then
+            exit(false);
+        exit(AzureOpenAIImpl.IsEnabled(CopilotCapability, Silent, AppModuleInfo));
+    end;
+
     /// <summary>
     /// Checks if the Azure OpenAI API authorization is configured for the environment.
     /// </summary>

src/System Application/App/AI/src/Copilot/CopilotCapabilityImpl.Codeunit.al

@@ -269,17 +269,12 @@ codeunit 7774 "Copilot Capability Impl"
     end;
 
     [EventSubscriber(ObjectType::Codeunit, Codeunit::"System Action Triggers", 'GetCopilotCapabilityStatus', '', false, false)]
-    local procedure GetCopilotCapabilityStatus(Capability: Integer; var IsEnabled: Boolean)
-    var
+    local procedure GetCopilotCapabilityStatus(Capability: Integer; var IsEnabled: Boolean; AppId: Guid; Silent: Boolean)
+5a    var
         AzureOpenAI: Codeunit "Azure OpenAI";
         CopilotCapability: Enum "Copilot Capability";
-        Silent: Boolean;
     begin
         CopilotCapability := Enum::"Copilot Capability".FromInteger(Capability);
-
-        if CopilotCapability = Enum::"Copilot Capability"::Chat then
-            Silent := true;
-
-        IsEnabled := AzureOpenAI.IsEnabled(CopilotCapability, Silent);
+        IsEnabled := AzureOpenAI.IsEnabled(CopilotCapability, Silent, AppId);
     end;
 }