diff --git a/Prototyping/PVSCase.TableExt.al b/Prototyping/PVSCase.TableExt.al
new file mode 100644
index 0000000..c2aa446
--- /dev/null
+++ b/Prototyping/PVSCase.TableExt.al
@@ -0,0 +1,24 @@
+tableextension 50100 "PVS Case Ext. Pricing" extends "PVS Case"
+{
+    fields
+    {
+        field(50100; "Quoted Price"; Decimal)
+        {
+            Caption = 'Quoted Price';
+            Editable = false;
+            FieldClass = FlowField;
+            CalcFormula = sum("PVS Job"."Price" where("Case ID" = field("Case ID"),
+                                                      Active = const(true),
+                                                      Status = const(Quote)));
+        }
+        field(50101; "Ordered Price"; Decimal)
+        {
+            Caption = 'Ordered Price';
+            Editable = false;
+            FieldClass = FlowField;
+            CalcFormula = sum("PVS Job"."Price" where("Case ID" = field("Case ID"),
+                                                      Active = const(true),
+                                                      Status = const(Order)));
+        }
+    }
+}
diff --git a/Prototyping/PVSCaseList.PageExt.al b/Prototyping/PVSCaseList.PageExt.al
new file mode 100644
index 0000000..c9d24fd
--- /dev/null
+++ b/Prototyping/PVSCaseList.PageExt.al
@@ -0,0 +1,19 @@
+pageextension 50101 "PVS Case List Ext. Pricing" extends "PVS Case List"
+{
+    layout
+    {
+        addlast(Content)
+        {
+            field("Quoted Price"; Rec."Quoted Price")
+            {
+                ApplicationArea = All;
+                ToolTip = 'Specifies the sum of active PVS Job prices for this case where the status is Quote.';
+            }
+            field("Ordered Price"; Rec."Ordered Price")
+            {
+                ApplicationArea = All;
+                ToolTip = 'Specifies the sum of active PVS Job prices for this case where the status is Order.';
+            }
+        }
+    }
+}