File tree Expand file tree Collapse file tree
src/Apps/W1/Quality Management/app/src/Document Expand file tree Collapse file tree Original file line number Diff line number Diff line change @@ -9,6 +9,7 @@ using Microsoft.Inventory.Availability;
99using Microsoft. Inventory. Item;
1010using Microsoft. Inventory. Tracking;
1111using Microsoft. QualityManagement. AccessControl;
12+ using Microsoft. QualityManagement. Configuration. Result;
1213using Microsoft. QualityManagement. Configuration. Template;
1314using Microsoft. QualityManagement. Dispositions. InventoryAdjustment;
1415using 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 {
You can’t perform that action at this time.
0 commit comments