Add Quoted Price and Ordered Price FlowFields to PVS Case List

Prototyping/PVSCaseExt.TableExt.al

@@ -0,0 +1,22 @@
+tableextension 50100 "PVS Case Ext" extends "PVS Case"
+{
+    fields
+    {
+        field(50100; "Quoted Price"; Decimal)
+        {
+            FieldClass = FlowField;
+            CalcFormula = sum("PVS Job"."Quoted Price" where(ID = field(ID),
+                                                             Status = const(Quote),
+                                                             Active = const(true)));
+            Editable = false;
+        }
+        field(50101; "Ordered Price"; Decimal)
+        {
+            FieldClass = FlowField;
+            CalcFormula = sum("PVS Job"."Quoted Price" where(ID = field(ID),
+                                                             Status = const(Order),
+                                                             Active = const(true)));
+            Editable = false;
+        }
+    }
+}

Prototyping/PVSCaseListExt.PageExt.al

@@ -0,0 +1,19 @@
+pageextension 50101 "PVS Case List Ext" extends "PVS Case List"
+{
+    layout
+    {
+        addlast(content)
+        {
+            field("Quoted Price"; Rec."Quoted Price")
+            {
+                ApplicationArea = All;
+                ToolTip = 'Specifies the total quoted price of all active job lines with status Quote.';
+            }
+            field("Ordered Price"; Rec."Ordered Price")
+            {
+                ApplicationArea = All;
+                ToolTip = 'Specifies the total ordered price of all active job lines with status Order.';
+            }
+        }
+    }
+}