diff --git a/Prototyping/PVSCaseExt.TableExt.al b/Prototyping/PVSCaseExt.TableExt.al
new file mode 100644
index 0000000..022c91c
--- /dev/null
+++ b/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;
+        }
+    }
+}
diff --git a/Prototyping/PVSCaseListExt.PageExt.al b/Prototyping/PVSCaseListExt.PageExt.al
new file mode 100644
index 0000000..8e51a6a
--- /dev/null
+++ b/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.';
+            }
+        }
+    }
+}