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