From 7dd95c7f68b7d4283afd988e920a6d705449eed7 Mon Sep 17 00:00:00 2001 From: attilatoury Date: Mon, 2 Mar 2026 15:41:34 +0100 Subject: [PATCH 1/3] Change the link displayed on the QM setup guide to open the user settings --- .../QltyManagementSetupGuide.Page.al | 29 +++++++------------ 1 file changed, 11 insertions(+), 18 deletions(-) diff --git a/src/Apps/W1/Quality Management/app/src/Setup/SetupGuide/QltyManagementSetupGuide.Page.al b/src/Apps/W1/Quality Management/app/src/Setup/SetupGuide/QltyManagementSetupGuide.Page.al index 43cac6e6d9..acd1874545 100644 --- a/src/Apps/W1/Quality Management/app/src/Setup/SetupGuide/QltyManagementSetupGuide.Page.al +++ b/src/Apps/W1/Quality Management/app/src/Setup/SetupGuide/QltyManagementSetupGuide.Page.al @@ -4,7 +4,6 @@ // ------------------------------------------------------------------------------------------------ namespace Microsoft.QualityManagement.Setup.SetupGuide; -using Microsoft.QualityManagement.RoleCenters; using Microsoft.QualityManagement.Setup.ApplicationAreas; using Microsoft.QualityManagement.Utilities; using System.Environment; @@ -54,22 +53,18 @@ page 20438 "Qlty. Management Setup Guide" group(LetsGoText) { Caption = 'Let''s go!'; - InstructionalText = 'Select the link below to open the Quality Manager Role Center in a new browser tab and follow the guided tours.'; + InstructionalText = 'Go to My Settings to choose the Quality Manager role and follow the guided tours.'; } - field(LetsGoLink; LetsGoLinkLbl) + field(SettingsLink; SettingsLinkLbl) { - Caption = 'Open the Quality Manager Role Center'; + Caption = 'Open My Settings'; ShowCaption = false; - ToolTip = 'Open Quality Management Role Center and checklist in a new browser tab.'; + ToolTip = 'Open My Settings'; Editable = false; - ApplicationArea = QualityManagement; trigger OnDrillDown() - var - TargetURL: Text; begin - TargetURL := GetUrl(ClientType::Web, CompanyName, ObjectType::Page, Page::"Qlty. Manager Role Center") + URLProfileLbl; - Hyperlink(TargetURL); + Page.Run(Page::"User Settings"); end; } @@ -81,17 +76,16 @@ page 20438 "Qlty. Management Setup Guide" { area(Processing) { - action(Finish) + action(Done) { ApplicationArea = QualityManagement; - Caption = 'Finish'; - ToolTip = 'Finish'; + Caption = 'Done'; + ToolTip = 'Done'; InFooterBar = true; - Image = Approve; trigger OnAction(); begin - FinishAction(); + DoneAction(); end; } } @@ -104,8 +98,7 @@ page 20438 "Qlty. Management Setup Guide" TopBannerVisible: Boolean; MainPageVisible: Boolean; QualityManagementTok: Label 'Quality Management', Locked = true; - LetsGoLinkLbl: Label 'Open the Quality Manager Role Center'; - URLProfileLbl: Label '&profile=QLTY.%20MANAGER', Locked = true; + SettingsLinkLbl: Label 'Open My Settings'; trigger OnInit(); begin @@ -118,7 +111,7 @@ page 20438 "Qlty. Management Setup Guide" FeatureTelemetry.LogUptake('0000QIC', QualityManagementTok, Enum::"Feature Uptake Status"::Discovered); end; - local procedure FinishAction(); + local procedure DoneAction(); var GuidedExperience: Codeunit "Guided Experience"; QltyApplicationAreaMgmt: Codeunit "Qlty. Application Area Mgmt."; From 592e8afdd193ca085cb5aa8fb01d685c5133c7a2 Mon Sep 17 00:00:00 2001 From: attilatoury Date: Mon, 2 Mar 2026 16:00:56 +0100 Subject: [PATCH 2/3] adjust the text so it can reuse existing translations --- .../app/src/Setup/SetupGuide/QltyManagementSetupGuide.Page.al | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/Apps/W1/Quality Management/app/src/Setup/SetupGuide/QltyManagementSetupGuide.Page.al b/src/Apps/W1/Quality Management/app/src/Setup/SetupGuide/QltyManagementSetupGuide.Page.al index acd1874545..8ce7a0f191 100644 --- a/src/Apps/W1/Quality Management/app/src/Setup/SetupGuide/QltyManagementSetupGuide.Page.al +++ b/src/Apps/W1/Quality Management/app/src/Setup/SetupGuide/QltyManagementSetupGuide.Page.al @@ -53,7 +53,7 @@ page 20438 "Qlty. Management Setup Guide" group(LetsGoText) { Caption = 'Let''s go!'; - InstructionalText = 'Go to My Settings to choose the Quality Manager role and follow the guided tours.'; + InstructionalText = 'Select the link below to open the Quality Manager Role Center and follow the guided tours.'; } field(SettingsLink; SettingsLinkLbl) { From 733142f2b08df37693ce8d3390ce68db4af35023 Mon Sep 17 00:00:00 2001 From: attilatoury Date: Tue, 3 Mar 2026 09:36:20 +0100 Subject: [PATCH 3/3] missing action for the Done action --- .../app/src/Setup/SetupGuide/QltyManagementSetupGuide.Page.al | 1 + 1 file changed, 1 insertion(+) diff --git a/src/Apps/W1/Quality Management/app/src/Setup/SetupGuide/QltyManagementSetupGuide.Page.al b/src/Apps/W1/Quality Management/app/src/Setup/SetupGuide/QltyManagementSetupGuide.Page.al index 8ce7a0f191..8c50d72941 100644 --- a/src/Apps/W1/Quality Management/app/src/Setup/SetupGuide/QltyManagementSetupGuide.Page.al +++ b/src/Apps/W1/Quality Management/app/src/Setup/SetupGuide/QltyManagementSetupGuide.Page.al @@ -82,6 +82,7 @@ page 20438 "Qlty. Management Setup Guide" Caption = 'Done'; ToolTip = 'Done'; InFooterBar = true; + Image = Close; trigger OnAction(); begin