Skip to content

Commit f76f52f

Browse files
committed
Add drill-down functionality for Result Code in Quality Inspection page
1 parent 613f564 commit f76f52f

1 file changed

Lines changed: 9 additions & 3 deletions

File tree

src/Apps/W1/Quality Management/app/src/Document/QltyInspection.Page.al

Lines changed: 9 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -9,6 +9,7 @@ using Microsoft.Inventory.Availability;
99
using Microsoft.Inventory.Item;
1010
using Microsoft.Inventory.Tracking;
1111
using Microsoft.QualityManagement.AccessControl;
12+
using Microsoft.QualityManagement.Configuration.Result;
1213
using Microsoft.QualityManagement.Configuration.Template;
1314
using Microsoft.QualityManagement.Dispositions.InventoryAdjustment;
1415
using Microsoft.QualityManagement.Dispositions.ItemTracking;
@@ -110,9 +111,14 @@ page 20406 "Qlty. Inspection"
110111
field("Result Code"; Rec."Result Code")
111112
{
112113
Importance = Additional;
113-
}
114-
field("Result Description"; Rec."Result Description")
115-
{
114+
115+
trigger OnDrillDown()
116+
var
117+
QltyInspectionResult: Record "Qlty. Inspection Result";
118+
begin
119+
QltyInspectionResult.SetRange(Code, Rec."Result Code");
120+
Page.Run(Page::"Qlty. Inspection Result List", QltyInspectionResult);
121+
end;
116122
}
117123
field("Evaluation Sequence"; Rec."Evaluation Sequence")
118124
{

0 commit comments

Comments
 (0)