Skip to content

Commit b9f1fc3

Browse files
Merge branch 'releases/28.x' of https://github.com/microsoft/BCApps into bugs/QM-28.x-PreventTellMeForUnauthorizedUsers
2 parents cb056a8 + 75d6b76 commit b9f1fc3

6 files changed

Lines changed: 593 additions & 20 deletions

File tree

build/Packages.json

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -4,7 +4,7 @@
44
"Source": "NuGet.org"
55
},
66
"AppBaselines-BCArtifacts": {
7-
"Version": "28.0.46665.47355",
7+
"Version": "28.0.46665.47932",
88
"Source": "BCArtifacts",
99
"_comment": "Used to fetch app baselines from BC artifacts"
1010
}

src/Apps/W1/Quality Management/app/src/Setup/SetupGuide/QltyManagementSetupGuide.Page.al

Lines changed: 12 additions & 18 deletions
Original file line numberDiff line numberDiff line change
@@ -4,7 +4,6 @@
44
// ------------------------------------------------------------------------------------------------
55
namespace Microsoft.QualityManagement.Setup.SetupGuide;
66

7-
using Microsoft.QualityManagement.RoleCenters;
87
using Microsoft.QualityManagement.Setup;
98
using Microsoft.QualityManagement.Setup.ApplicationAreas;
109
using Microsoft.QualityManagement.Utilities;
@@ -56,22 +55,18 @@ page 20438 "Qlty. Management Setup Guide"
5655
group(LetsGoText)
5756
{
5857
Caption = 'Let''s go!';
59-
InstructionalText = 'Select the link below to open the Quality Manager Role Center in a new browser tab and follow the guided tours.';
58+
InstructionalText = 'Select the link below to open the Quality Manager Role Center and follow the guided tours.';
6059
}
61-
field(LetsGoLink; LetsGoLinkLbl)
60+
field(SettingsLink; SettingsLinkLbl)
6261
{
63-
Caption = 'Open the Quality Manager Role Center';
62+
Caption = 'Open My Settings';
6463
ShowCaption = false;
65-
ToolTip = 'Open Quality Management Role Center and checklist in a new browser tab.';
64+
ToolTip = 'Open My Settings';
6665
Editable = false;
67-
ApplicationArea = QualityManagement;
6866

6967
trigger OnDrillDown()
70-
var
71-
TargetURL: Text;
7268
begin
73-
TargetURL := GetUrl(ClientType::Web, CompanyName, ObjectType::Page, Page::"Qlty. Manager Role Center") + URLProfileLbl;
74-
Hyperlink(TargetURL);
69+
Page.Run(Page::"User Settings");
7570
end;
7671

7772
}
@@ -83,17 +78,17 @@ page 20438 "Qlty. Management Setup Guide"
8378
{
8479
area(Processing)
8580
{
86-
action(Finish)
81+
action(Done)
8782
{
8883
ApplicationArea = QualityManagement;
89-
Caption = 'Finish';
90-
ToolTip = 'Finish';
84+
Caption = 'Done';
85+
ToolTip = 'Done';
9186
InFooterBar = true;
92-
Image = Approve;
87+
Image = Close;
9388

9489
trigger OnAction();
9590
begin
96-
FinishAction();
91+
DoneAction();
9792
end;
9893
}
9994
}
@@ -106,8 +101,7 @@ page 20438 "Qlty. Management Setup Guide"
106101
TopBannerVisible: Boolean;
107102
MainPageVisible: Boolean;
108103
QualityManagementTok: Label 'Quality Management', Locked = true;
109-
LetsGoLinkLbl: Label 'Open the Quality Manager Role Center';
110-
URLProfileLbl: Label '&profile=QLTY.%20MANAGER', Locked = true;
104+
SettingsLinkLbl: Label 'Open My Settings';
111105

112106
trigger OnInit();
113107
begin
@@ -120,7 +114,7 @@ page 20438 "Qlty. Management Setup Guide"
120114
FeatureTelemetry.LogUptake('0000QIC', QualityManagementTok, Enum::"Feature Uptake Status"::Discovered);
121115
end;
122116

123-
local procedure FinishAction();
117+
local procedure DoneAction();
124118
var
125119
GuidedExperience: Codeunit "Guided Experience";
126120
QltyApplicationAreaMgmt: Codeunit "Qlty. Application Area Mgmt.";

src/Apps/W1/QualityManagementContosoCoffeeDemoDataset/DemoData/2.Master Data/CreateQMInspTemplateHdr.Codeunit.al

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -91,6 +91,7 @@ codeunit 5596 "Create QM Insp. Template Hdr"
9191
ProductionFoodTok: Label 'PRODUCTIONFOOD', Locked = true, MaxLength = 20;
9292
ReceiveTok: Label 'RECEIVE', Locked = true, MaxLength = 20;
9393
ScheduleChangeTok: Label 'SCHEDULECHANGE', Locked = true, MaxLength = 20;
94+
BeansTok: Label 'BEANS', Locked = true, MaxLength = 20;
9495

9596
BicycleChecklistDescLbl: Label 'Bicycle Checklist', MaxLength = 100;
9697
CorrectiveActionDescLbl: Label 'Corrective Action', MaxLength = 100;

src/Apps/W1/Subscription Billing/App/Base/Page Extensions/SalesMarketingMgrRC.PageExt.al

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -1,3 +1,4 @@
1+
#pragma warning disable AS0072
12
#if not CLEAN26
23
namespace Microsoft.SubscriptionBilling;
34

src/Apps/W1/Subscription Billing/App/Base/Pages/SubBillingActivities.Page.al

Lines changed: 7 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -1,9 +1,11 @@
11
namespace Microsoft.SubscriptionBilling;
22

3+
#pragma warning disable AS0072
34
#if not CLEAN26
45
using Microsoft.Foundation.Task;
56
using Microsoft.Projects.Project.Job;
67
#endif
8+
#pragma warning restore AS0072
79
using Microsoft.Purchases.Document;
810
using Microsoft.RoleCenters;
911
using Microsoft.Sales.Document;
@@ -23,6 +25,7 @@ page 8085 "Sub. Billing Activities"
2325
{
2426
area(content)
2527
{
28+
#pragma warning disable AS0072
2629
#if not CLEAN26
2730
cuegroup("My User Tasks")
2831
{
@@ -70,6 +73,7 @@ page 8085 "Sub. Billing Activities"
7073
}
7174
}
7275
#endif
76+
#pragma warning restore AS0072
7377

7478
cuegroup("Open Posted Documents Customer")
7579
{
@@ -266,8 +270,10 @@ page 8085 "Sub. Billing Activities"
266270
var
267271
SubBillingActivitiesCue: Codeunit "Sub. Billing Activities Cue";
268272
CuesAndKpisCodeunit: Codeunit "Cues And KPIs";
273+
#pragma warning disable AS0072
269274
#if not CLEAN26
270275
UserTaskManagement: Codeunit "User Task Management";
271276
#endif
277+
#pragma warning restore AS0072
272278
CalcTaskId: Integer;
273-
}
279+
}

0 commit comments

Comments
 (0)