Uptaking the refactored Power BI synch engine for the OOB apps (#6763)

#### Summary

- Introduce the `PBI Report Setup` enum and interface to represent Power
BI report app configurations, replacing raw field IDs with
strongly-typed enum values
- Refactor all embedded report pages (~120) to use the new
`OpenPowerBIEmbeddedReportPageValidation` procedure, which consolidates
`EnsureUserAcceptedPowerBITerms` + `GetReportIdAndEnsureSetup` +
deployment-in-progress prompts into a single call
- Adds a new wizard experience for deploying reports when selecting an
unconfigured embedded report page (for evaluation companies)
- Add `FindReportSetup` to resolve a `Deployable Report` type back to
its `PBI Report Setup` interface, eliminating repeated ordinal iteration
in subscribers and the deployments page extension
- Fix a pre-existing bug where the ABC Analysis page (Inventory) was
incorrectly referencing the Sales report ID

#### Work Item(s)

Fixes
[AB#600448](https://dynamicssmb2.visualstudio.com/1fcb79e7-ab07-432a-a3c6-6cf5a88ba4a5/_workitems/edit/600448)

---------

Co-authored-by: Joshua Martínez Pineda <diegojoshuam@microsoft.com>
Co-authored-by: Claude Opus 4.6 (1M context) <noreply@anthropic.com>
Co-authored-by: Copilot <198982749+Copilot@users.noreply.github.com>

Author: 4 people

…er BI Files/Finance app/Finance app.pbix …IReports/App/.resources/Finance app.pbixsrc/Apps/W1/PowerBIReports/Power BI Files/Finance app/Finance app.pbix renamed to src/Apps/W1/PowerBIReports/App/.resources/Finance app.pbix src/Apps/W1/PowerBIReports/Power BI Files/Finance app/Finance app.pbix renamed to src/Apps/W1/PowerBIReports/App/.resources/Finance app.pbix

@@ -25,9 +25,11 @@ codeunit 36951 Initialization
         DimensionSetEntriesJobQueueDescriptionLbl: Label 'Update Power BI Dimension Set Entries';
 
     procedure SetupDefaultsForPowerBIReportsIfNotInitialized()
+    var
+        PBISetup: Record "PowerBI Reports Setup";
     begin
         InsertGuidedExperience();
-        InitializePBISetup();
+        PBISetup.GetOrCreate();
         InitializePBIWorkingDays();
         InitializeStartingEndingDates();
         InitializeDimensionSetEntryCollectionJobQueueEntry();
@@ -59,16 +61,6 @@ codeunit 36951 Initialization
         FinanceInstallationHandler.SetupDefaultsForPowerBIReportsIfNotInitialized();
     end;
 
-    local procedure InitializePBISetup()
-    var
-        PBISetup: Record "PowerBI Reports Setup";
-    begin
-        if not PBISetup.Get() then begin
-            PBISetup.Init();
-            PBISetup.Insert();
-        end;
-    end;
-
     local procedure InitializeStartingEndingDates()
     var
         AccountingPeriod: Record "Accounting Period";

…luation app/Inventory Valuation app.pbix …/.resources/Inventory Valuation app.pbixsrc/Apps/W1/PowerBIReports/Power BI Files/Inventory Valuation app/Inventory Valuation app.pbix renamed to src/Apps/W1/PowerBIReports/App/.resources/Inventory Valuation app.pbix src/Apps/W1/PowerBIReports/Power BI Files/Inventory Valuation app/Inventory Valuation app.pbix renamed to src/Apps/W1/PowerBIReports/App/.resources/Inventory Valuation app.pbix

@@ -7,6 +7,7 @@ namespace Microsoft.PowerBIReports;
 using System.Environment.Configuration;
 using System.Globalization;
 using System.Integration.PowerBI;
+using System.Utilities;
 
 codeunit 36962 "Power BI Report Setup"
 {
@@ -26,6 +27,47 @@ codeunit 36962 "Power BI Report Setup"
         end;
     end;
 
+    /// <summary>
+    /// Ensures that everything related to the specified Power BI report setup is properly configured, or directs to the appropriate setup pages. It errors if after the different prompts the report is not set up or in the process of being deployed. Typically used as a validation step before opening an embedded Power BI report page.
+    /// </summary>
+    /// <param name="PBIReportSetup">The Power BI report setup to validate.</param>
+    /// <returns>The GUID of the Power BI report as configured in the setup.</returns>
+    procedure OpenPowerBIEmbeddedReportPageValidation(PBIReportSetup: Enum "PBI Report Setup"): Guid
+    var
+        PowerBIAssistedSetup: Page "PowerBI Assisted Setup";
+        DeploySelectionPage: Page "PBI Report Deploy. Selection";
+        ConfiguredReportId: Guid;
+        ReportNotSetupErr: Label 'Your report has not been setup in PowerBI Reports Setup. You need to set up this report in order to view it.', Comment = '%1 = report name';
+    begin
+        EnsureUserAcceptedPowerBITerms();
+        ConfiguredReportId := GetConfiguredReportId(PBIReportSetup);
+        if not IsNullGuid(ConfiguredReportId) then
+            exit(ConfiguredReportId);
+        PromptOpeningReportDeploymentsWhenInProgress(PBIReportSetup);
+        if PowerBIAssistedSetup.RunModal() = Action::OK then
+            if PowerBIAssistedSetup.IsDeployOOBReportsSelected() then
+                DeploySelectionPage.RunModal();
+        ConfiguredReportId := GetConfiguredReportId(PBIReportSetup);
+        if not IsNullGuid(ConfiguredReportId) then
+            exit(ConfiguredReportId);
+        PromptOpeningReportDeploymentsWhenInProgress(PBIReportSetup);
+        Error(ReportNotSetupErr)
+    end;
+
+    local procedure GetConfiguredReportId(PBIReportSetup: Enum "PBI Report Setup"): Guid
+    var
+        PowerBIReportsSetup: Record "PowerBI Reports Setup";
+        RecRef: RecordRef;
+        ReportSetup: Interface "PBI Report Setup";
+        ConfiguredReportId: Guid;
+    begin
+        PowerBIReportsSetup.GetOrCreate();
+        RecRef.GetTable(PowerBIReportsSetup);
+        ReportSetup := PBIReportSetup;
+        ConfiguredReportId := RecRef.Field(ReportSetup.GetSetupReportIdFieldNo()).Value();
+        exit(ConfiguredReportId)
+    end;
+
     procedure GetReportIdAndEnsureSetup(ReportName: Text; FieldId: Integer) ReportId: Guid
     var
         AssistedSetup: Page "PowerBI Assisted Setup";
@@ -40,6 +82,47 @@ codeunit 36962 "Power BI Report Setup"
         end;
     end;
 
+    procedure FindReportSetup(DeployableReportType: Enum "Power BI Deployable Report"; var ReportSetup: Interface "PBI Report Setup"): Boolean
+    var
+        Ordinal: Integer;
+    begin
+        foreach Ordinal in Enum::"PBI Report Setup".Ordinals() do begin
+            ReportSetup := Enum::"PBI Report Setup".FromInteger(Ordinal);
+            if ReportSetup.GetDeployableReportType() = DeployableReportType then
+                exit(true);
+        end;
+        Clear(ReportSetup);
+        exit(false);
+    end;
+
+    local procedure IsReportBeingDeployed(ReportSetup: Interface "PBI Report Setup"): Boolean
+    var
+        PowerBIDeployment: Record "Power BI Deployment";
+    begin
+        if not PowerBIDeployment.Get(ReportSetup.GetDeployableReportType()) then
+            exit(false);
+        PowerBIDeployment.GetUploadStatus();
+        exit(not (PowerBIDeployment.GetUploadStatus() in [
+            Enum::"Power BI Upload Status"::Completed,
+            Enum::"Power BI Upload Status"::Failed,
+            Enum::"Power BI Upload Status"::Skipped,
+            Enum::"Power BI Upload Status"::PendingDeletion]));
+    end;
+
+    local procedure PromptOpeningReportDeploymentsWhenInProgress(ReportSetup: Interface "PBI Report Setup"): Boolean
+    var
+        ConfirmMgt: Codeunit "Confirm Management";
+        ReportDeployingQst: Label 'Your %1 report is being deployed to Power BI. Would you like to open the Power BI Report Deployments page to track the status?', Comment = '%1 = report name';
+        DeployableReport: Interface "Power BI Deployable Report";
+    begin
+        DeployableReport := ReportSetup.GetDeployableReportType();
+        if IsReportBeingDeployed(ReportSetup) then begin
+            if ConfirmMgt.GetResponse(StrSubstNo(ReportDeployingQst, DeployableReport.GetReportName())) then
+                Page.Run(Page::"Power BI Report Deployments");
+            Error('');
+        end;
+    end;
+
     local procedure GetReportId(FieldId: Integer): Guid
     var
         PowerBiReportsSetup: Record "PowerBI Reports Setup";