Nemtom commit szarság

2018-05-08 15:54:14 +02:00
parent 766436dc59
commit 2698dd20aa
170 changed files with 327 additions and 294 deletions
@@ -1,7 +1,17 @@
 {
  "ExpandedNodes": [
-    ""
+    "",
+    "\\SISBusiness.Module",
+    "\\SISBusiness.Module\\BusinessObjects",
+    "\\SISBusiness.Module\\BusinessObjects\\Business",
+    "\\SISBusiness.Module\\BusinessObjects\\Business\\BusinessTransactions",
+    "\\SISBusiness.Module\\BusinessObjects\\Business\\BusinessTransactions\\Invoice",
+    "\\SISBusiness.Module\\BusinessObjects\\Financial",
+    "\\SISBusiness.Module\\BusinessObjects\\Financial\\FinancialObjects",
+    "\\SISBusiness.Module\\BusinessObjects\\Financial\\FinancialObjects\\FinancialTransactions",
+    "\\SISBusiness.Module\\BusinessObjects\\Financial\\FinancialObjects\\FinancialTransactions\\Reports",
+    "\\SISBusiness.Module\\BusinessObjects\\Financial\\FinancialObjects\\FinancialTransactions\\Reports\\VAT"
  ],
-  "SelectedNode": "\\SISBusiness.Win",
+  "SelectedNode": "\\SISBusiness.Module\\BusinessObjects\\Financial\\FinancialObjects\\FinancialTransactions\\Reports\\VAT\\VATReportVC.vb",
  "PreviewInSolutionExplorer": false
 }
@@ -1 +1 @@
-f53295e70045624c85dea06febdc40b7ebc810dd
+5c094180ea1bb4ff132bf6b3198070800de5cf17
@@ -1 +1 @@
-4288aec33375cd5123b7cccd4cbca6ce75d00911
+cc410708b3f1e383b30f2ba5834af17359a9e723
@@ -1 +1 @@
-56e9020f15b83ace682634e22b9d7c00797daf07
+743be4bc237437fa5abab9c4a0bcdd7f6b095d4e
@@ -1 +1 @@
-95a26e48f2437f21996afa4f61e6a1966a0a9a93
+49e54437514d52c66d0cbd986f5953f444287cdd
@@ -1 +1 @@
-6d3ebd2ac35b954054f2df0e460152e10f5779ea
+598e56abdcf6d6983680a4e0cac963ecc72544ce
@@ -1 +1 @@
-98066d7b5cfe40d8b6546b7f2d49c836a11ba897
+65ad65e605c440bb965eb8e8bfa886d65ebe24fc
@@ -1 +1 @@
-a70743cb496111d1923b63ba6c59c55f9f952c5e
+bc9adeeedf3ed7cff7efb36594c4e05580afb64a
@@ -1 +1 @@
-585c48c6f64fc3930e021ea3ed09e89d90efabcb
+535a9ee50e36d4861f4c88d0e8c54d8e986ee373
@@ -1 +1 @@
-fcd0ed3715827380fc74089de8732323c334609b
+edce244492c41f91a0eb1c32892191441f4d4705
@@ -1 +1 @@
-2a2bdd918ebef40ecbb3637eb81c8f83daccad50
+bfac0fbb209956c38cb397f7e6b2b12fa2012c8f
@@ -1 +1 @@
-34bf3da1eeebde3bedbd2cef52554c20f0ee2094
+5060e5d9d7a84cdb688c2058c167f91783f8a267
@@ -1 +1 @@
-63f4fe0dc8e09d35d0259565e60647ef7d12560a
+734ee84c48bc80cdf5695bc21b86993718d76db2
@@ -1 +1 @@
-c83ca63f875d6bc371b866bed3cdac076dc9e919
+ca77f5bd12cda4866c46563a6c674f3243b3c58f
@@ -23,25 +23,25 @@ End Enum
 '<Appearance("Hide tab page Item2 if header is incomplete-InvoiceHeader", AppearanceItemType.LayoutItem, "IsNull(InvoiceType)=True", TargetItems:="Item2", visibility:=Editors.ViewItemVisibility.Hide)> _
 '<EditorStateRuleAttribute("Disable, som properties when is corrigendum", "CustomersFrom; InvoiceType; Customers; BankInformation; DateCreated; " _
 '    & "PaymentOption; CurrencyName", EditorState.Disabled, "IsNull(InvoiceHeader)=False", ViewType.DetailView)> _
-<NavigationItem("BusinessTransactions")> _
-<Appearance("Disable UserCreated InvoiceHeader", AppearanceItemType.ViewItem, "1=1", TargetItems:="UserCreated", Enabled:=False)> _
-<Appearance("Disable, all properties when IsEditable = False", TargetItems:="*", Criteria:="IsEditable=False", Enabled:=False, Context:="DetailView")> _
-<Appearance("Hide BankInfo when PaymentOption.PayMode = 0", AppearanceItemType.ViewItem, "PaymentOption.PayMode = 0", TargetItems:="BankInformation", visibility:=Editors.ViewItemVisibility.Hide)> _
-<Appearance("Disable InvoiceType when is not empty", TargetItems:="InvoiceType", Criteria:="IsNull(InvoiceType) = False", Enabled:=False, Context:="DetailView")> _
-<Appearance("Disable Customers when is not empty in invoice", TargetItems:="Customers", Criteria:="IsNull(Customers) = False", Enabled:=False, Context:="DetailView")> _
-<Appearance("InvoiceHeader.TotalNettoDEV Hide", AppearanceItemType.ViewItem, "CurrencyName.ShortName = 'HUF'", TargetItems:="row_ListPriceDEV", visibility:=Editors.ViewItemVisibility.Hide)> _
-<Appearance("InvoiceHeader.TotalNettoHUF Hide", AppearanceItemType.ViewItem, "CurrencyName.ShortName != 'HUF'", TargetItems:="row_ListPriceHUF", visibility:=Editors.ViewItemVisibility.Hide)> _
+<NavigationItem("BusinessTransactions")>
+<Appearance("Disable UserCreated InvoiceHeader", AppearanceItemType.ViewItem, "1=1", TargetItems:="UserCreated", Enabled:=False)>
+<Appearance("Disable, all properties when IsEditable = False", TargetItems:="*", Criteria:="IsEditable=False", Enabled:=False, Context:="DetailView")>
+<Appearance("Hide BankInfo when PaymentOption.PayMode = 0", AppearanceItemType.ViewItem, "PaymentOption.PayMode = 0", TargetItems:="BankInformation", Visibility:=Editors.ViewItemVisibility.Hide)>
+<Appearance("Disable InvoiceType when is not empty", TargetItems:="InvoiceType", Criteria:="IsNull(InvoiceType) = False", Enabled:=False, Context:="DetailView")>
+<Appearance("Disable Customers when is not empty in invoice", TargetItems:="Customers", Criteria:="IsNull(Customers) = False", Enabled:=False, Context:="DetailView")>
+<Appearance("InvoiceHeader.TotalNettoDEV Hide", AppearanceItemType.ViewItem, "CurrencyName.ShortName = 'HUF'", TargetItems:="row_ListPriceDEV", Visibility:=Editors.ViewItemVisibility.Hide)>
+<Appearance("InvoiceHeader.TotalNettoHUF Hide", AppearanceItemType.ViewItem, "CurrencyName.ShortName != 'HUF'", TargetItems:="row_ListPriceHUF", Visibility:=Editors.ViewItemVisibility.Hide)>
 <Appearance("Hide row_ info when IsEditable=False", AppearanceItemType.ViewItem, "IsEditable=False", TargetItems:="row_ShortName; row_Description; row_ListPriceHUF; row_ListPriceDEV; row_DiscountPercent;" _
-    & "row_QTT; row_Units; row_VAT; row_QualityOption; row_Controlling; row_UniqueObjects; row_CostHolder; row_CostPlace; row_JobNumberObjects; row_CustomsTariffs; row_InvoicePeriod", visibility:=Editors.ViewItemVisibility.Hide)> _
-<Appearance("Hide CurrencyRate", AppearanceItemType.ViewItem, "CurrencyName.ShortName = 'HUF'", TargetItems:="CurrencyRate", visibility:=Editors.ViewItemVisibility.Hide)> _
-<DefaultProperty("DisplayName")> _
-<RuleCriteria("RuleCriteria InvoiceHeader-Controlling", "aToTable_Invoice_Contexts", _
-    "((row_Controlling.IsParent=False) or (InvoiceType.Rule5DMatrix.RequireControlling=False and isnull(row_Controlling)=True)) or IsCorrigendum=True", _
-    "Gyüjtő kontrollszám nem választható ki!", SkipNullOrEmptyValues:=False)> _
-<RuleCriteria("RuleCriteria InvoiceHeader-DateExecution", "Save", _
-    "IsVATClosed=False", _
-    "ÁFA időszak zárva, nem lehet rögzíteni !", SkipNullOrEmptyValues:=False)> _
-<Appearance("InvoiceHeader - Hide aCreateInvoiceCreditNote", AppearanceItemType.Action, "IsEditable=True OR IsStorno=True OR DocumentNumber=''", TargetItems:="aCreateInvoiceCreditNote", visibility:=Editors.ViewItemVisibility.Hide)> _
+    & "row_QTT; row_Units; row_VAT; row_QualityOption; row_Controlling; row_UniqueObjects; row_CostHolder; row_CostPlace; row_JobNumberObjects; row_CustomsTariffs; row_InvoicePeriod", Visibility:=Editors.ViewItemVisibility.Hide)>
+<Appearance("Hide CurrencyRate", AppearanceItemType.ViewItem, "CurrencyName.ShortName = 'HUF'", TargetItems:="CurrencyRate", Visibility:=Editors.ViewItemVisibility.Hide)>
+<DefaultProperty("DisplayName")>
+<RuleCriteria("RuleCriteria InvoiceHeader-Controlling", "aToTable_Invoice_Contexts",
+    "((row_Controlling.IsParent=False) or (InvoiceType.Rule5DMatrix.RequireControlling=False and isnull(row_Controlling)=True)) or IsCorrigendum=True",
+    "Gyüjtő kontrollszám nem választható ki!", SkipNullOrEmptyValues:=False)>
+<RuleCriteria("RuleCriteria InvoiceHeader-DateExecution", "Save",
+    "IsVATClosed=False",
+    "ÁFA időszak zárva, nem lehet rögzíteni !", SkipNullOrEmptyValues:=False)>
+<Appearance("InvoiceHeader - Hide aCreateInvoiceCreditNote", AppearanceItemType.Action, "IsEditable=True OR IsStorno=True OR DocumentNumber=''", TargetItems:="aCreateInvoiceCreditNote", Visibility:=Editors.ViewItemVisibility.Hide)>
 Public Class InvoiceHeader
    Inherits BaseObject
    Private _InvoiceType As InvoiceType
@@ -205,29 +205,29 @@ Public Class InvoiceHeader
    End Sub

    ' --- XPCollections
-    <VisibleInListView(False)> _
-    <Association("InvoiceHeader", GetType(InvoiceRows))> _
+    <VisibleInListView(False)>
+    <Association("InvoiceHeader", GetType(InvoiceRows))>
    Public ReadOnly Property InvoiceRows() As XPCollection(Of InvoiceRows)
        Get
            Return GetCollection(Of InvoiceRows)("InvoiceRows")
        End Get
    End Property
-    <VisibleInListView(False)> _
-    <Association("InvoiceHeader-InvoiceVATRows", GetType(InvoiceVATRows))> _
+    <VisibleInListView(False)>
+    <Association("InvoiceHeader-InvoiceVATRows", GetType(InvoiceVATRows))>
    Public ReadOnly Property InvoiceVATRows() As XPCollection(Of InvoiceVATRows)
        Get
            Return GetCollection(Of InvoiceVATRows)("InvoiceVATRows")
        End Get
    End Property
-    <VisibleInListView(False), VisibleInDetailView(False), VisibleInLookupListView(False)> _
+    <VisibleInListView(False), VisibleInDetailView(False), VisibleInLookupListView(False)>
    ReadOnly Property InvoiceHold As XPCollection(Of InvoiceHold)
        Get
            Return New XPCollection(Of InvoiceHold)(Session, CriteriaOperator.Parse("InvoiceHeader=?", Me))
        End Get
    End Property

-    <DataSourceCriteria("CustomersFrom='@This.CustomersFrom' and InvoiceTypeBase in (2,3)")> _
-    <RuleRequiredField("InvoiceHeader-InvoiceType", DefaultContexts.Save)> _
+    <DataSourceCriteria("CustomersFrom='@This.CustomersFrom' and InvoiceTypeBase in (2,3)")>
+    <RuleRequiredField("InvoiceHeader-InvoiceType", DefaultContexts.Save)>
    Property InvoiceType() As InvoiceType
        Get
            Return _InvoiceType
@@ -244,7 +244,7 @@ Public Class InvoiceHeader
            SetPropertyValue("InvoicePeriod", _InvoicePeriod, value)
        End Set
    End Property
-    <NonCloneable()> _
+    <NonCloneable()>
    Property DocumentNumber() As String
        Get
            Return _DocumentNumber
@@ -253,7 +253,7 @@ Public Class InvoiceHeader
            SetPropertyValue("DocumentNumber", _DocumentNumber, value)
        End Set
    End Property
-    <NonCloneable()> _
+    <NonCloneable()>
    Property DocumentNumberProforma As String
        Get
            Return _DocumentNumberProforma
@@ -262,7 +262,7 @@ Public Class InvoiceHeader
            SetPropertyValue("DocumentNumberProforma", _DocumentNumberProforma, value)
        End Set
    End Property
-    <NonCloneable()> _
+    <NonCloneable()>
    Property ConnectInfo() As String
        Get
            Return _ConnectInfo
@@ -271,7 +271,7 @@ Public Class InvoiceHeader
            SetPropertyValue("ConnectInfo", _ConnectInfo, value)
        End Set
    End Property
-    <RuleRequiredField("InvoiceHeader.CustomersFrom", "aInvoiceFromContractsRows_Context")> _
+    <RuleRequiredField("InvoiceHeader.CustomersFrom", "aInvoiceFromContractsRows_Context")>
    Property CustomersFrom() As CustomersFrom
        Get
            Return _CustomersFrom
@@ -280,7 +280,7 @@ Public Class InvoiceHeader
            SetPropertyValue("CustomersFrom", _CustomersFrom, value)
        End Set
    End Property
-    <RuleRequiredField("InvoiceHeader.Customers", "aInvoiceFromContractsRows_Context")> _
+    <RuleRequiredField("InvoiceHeader.Customers", "aInvoiceFromContractsRows_Context")>
    Property Customers() As Customers
        Get
            Return _Customers
@@ -310,8 +310,8 @@ Public Class InvoiceHeader
            SetPropertyValue("DateCreated", _DateCreated, value)
        End Set
    End Property
-    <ImmediatePostData()> _
-    <RuleRequiredField("InvoiceHeader.DateExecution", "aInvoiceFromContractsRows_Context")> _
+    <ImmediatePostData()>
+    <RuleRequiredField("InvoiceHeader.DateExecution", "aInvoiceFromContractsRows_Context")>
    Property DateExecution() As Date
        Get
            Return _DateExecution
@@ -339,7 +339,7 @@ Public Class InvoiceHeader
            SetPropertyValue("VATAvowalType", _VATAvowalType, value)
        End Set
    End Property
-    <VisibleInDetailView(False), VisibleInListView(False), VisibleInLookupListView(False)> _
+    <VisibleInDetailView(False), VisibleInListView(False), VisibleInLookupListView(False)>
    Property DateExecutionYear As String
        Get
            Return _DateExecutionYear
@@ -348,7 +348,7 @@ Public Class InvoiceHeader
            SetPropertyValue("DateExecutionYear", _DateExecutionYear, value)
        End Set
    End Property
-    <VisibleInDetailView(False), VisibleInListView(False), VisibleInLookupListView(False)> _
+    <VisibleInDetailView(False), VisibleInListView(False), VisibleInLookupListView(False)>
    Property DateExecutionMonth As String
        Get
            Return _DateExecutionMonth
@@ -357,7 +357,7 @@ Public Class InvoiceHeader
            SetPropertyValue("DateExecutionMonth", _DateExecutionMonth, value)
        End Set
    End Property
-    <VisibleInDetailView(False), VisibleInListView(False), VisibleInLookupListView(False)> _
+    <VisibleInDetailView(False), VisibleInListView(False), VisibleInLookupListView(False)>
    Property DateExecutionQuarter As String
        Get
            Return _DateExecutionQuarter
@@ -366,7 +366,7 @@ Public Class InvoiceHeader
            SetPropertyValue("DateExecutionQuarter", _DateExecutionQuarter, value)
        End Set
    End Property
-    <VisibleInDetailView(False), VisibleInListView(False), VisibleInLookupListView(False)> _
+    <VisibleInDetailView(False), VisibleInListView(False), VisibleInLookupListView(False)>
    Property DateExecutionWeek As String
        Get
            Return _DateExecutionWeek
@@ -391,7 +391,7 @@ Public Class InvoiceHeader
            SetPropertyValue("DatePaymentMode", _DatePaymentMode, value)
        End Set
    End Property
-    <Size(-1)> _
+    <Size(-1)>
    Property Description As String
        Get
            Return _Description
@@ -400,7 +400,7 @@ Public Class InvoiceHeader
            SetPropertyValue("Description", _Description, value)
        End Set
    End Property
-    <Size(-1)> _
+    <Size(-1)>
    Property DescriptionHeader As String
        Get
            Return _DescriptionHeader
@@ -409,9 +409,9 @@ Public Class InvoiceHeader
            SetPropertyValue("DescriptionHeader", _DescriptionHeader, value)
        End Set
    End Property
-    <ImmediatePostData()> _
-    <RuleRequiredField("InvoiceHeader-PaymentOption", "aGenerateInvoicefromContractsRows_Context")> _
-    <RuleRequiredField("InvoiceHeader-PaymentOption2", DefaultContexts.Save)> _
+    <ImmediatePostData()>
+    <RuleRequiredField("InvoiceHeader-PaymentOption", "aGenerateInvoicefromContractsRows_Context")>
+    <RuleRequiredField("InvoiceHeader-PaymentOption2", DefaultContexts.Save)>
    Property PaymentOption() As PaymentOption
        Get
            Return _PaymentOption
@@ -452,7 +452,7 @@ Public Class InvoiceHeader
        End Set
    End Property
    <RuleRequiredField("InvoiceHeader.CurrencyName required", DefaultContexts.Save)>
-    <ImmediatePostData(True)> _
+    <ImmediatePostData(True)>
    Property CurrencyName() As CurrencyName
        Get
            Return _CurrencyName
@@ -461,8 +461,8 @@ Public Class InvoiceHeader
            SetPropertyValue("CurrencyName", _CurrencyName, value)
        End Set
    End Property
-    <RuleRange("InvoiceHeader-CurrencyRate-aToTable", "aToTable_Invoice_Contexts", 1, Double.MaxValue, TargetCriteria:="CurrencyName.ShortName<>'HUF'")> _
-   <RuleRange("InvoiceHeader-CurrencyRate", DefaultContexts.Save, 1, Double.MaxValue, TargetCriteria:="CurrencyName.ShortName <> 'HUF'")> _
+    <RuleRange("InvoiceHeader-CurrencyRate-aToTable", "aToTable_Invoice_Contexts", 1, Double.MaxValue, TargetCriteria:="CurrencyName.ShortName<>'HUF'")>
+    <RuleRange("InvoiceHeader-CurrencyRate", DefaultContexts.Save, 1, Double.MaxValue, TargetCriteria:="CurrencyName.ShortName <> 'HUF'")>
    Property CurrencyRate() As Double
        Get
            Return _CurrencyRate
@@ -472,7 +472,7 @@ Public Class InvoiceHeader

        End Set
    End Property
-    <NonCloneable()> _
+    <NonCloneable()>
    Property IsEditable() As Boolean
        Get
            Return _IsEditable
@@ -481,7 +481,7 @@ Public Class InvoiceHeader
            SetPropertyValue("IsEditable", _IsEditable, value)
        End Set
    End Property
-    <NonCloneable()> _
+    <NonCloneable()>
    Property IsStorno() As Boolean
        Get
            Return _IsStorno
@@ -490,7 +490,7 @@ Public Class InvoiceHeader
            SetPropertyValue("IsStorno", _IsStorno, value)
        End Set
    End Property
-    <NonCloneable()> _
+    <NonCloneable()>
    Property IsProforma As Boolean
        Get
            Return _IsProforma
@@ -499,7 +499,7 @@ Public Class InvoiceHeader
            SetPropertyValue("IsProforma", _IsProforma, value)
        End Set
    End Property
-    <VisibleInDetailView(False)> _
+    <VisibleInDetailView(False)>
    Property IsCorrigendum As Boolean
        Get
            Return _IsCorrigendum
@@ -508,7 +508,7 @@ Public Class InvoiceHeader
            SetPropertyValue("IsCorrigendum", _IsCorrigendum, value)
        End Set
    End Property
-    <VisibleInDetailView(False)> _
+    <VisibleInDetailView(False)>
    Property IsCreditNote As Boolean
        Get
            Return _IsCreditNote
@@ -517,8 +517,8 @@ Public Class InvoiceHeader
            SetPropertyValue("IsCreditNote", _IsCreditNote, value)
        End Set
    End Property
-    <DataSourceCriteria("LiquidAssests.CustomerFrom = '@This.CustomersFrom'")> _
-    <RuleRequiredField("InvoiceHeader-BankInformation", DefaultContexts.Save, TargetCriteria:="PaymentOption.PayMode = 1 and not (InvoiceType.InvoiceTypeBase in ('eEarnestofTender','eAdvancePayment'))")> _
+    <DataSourceCriteria("LiquidAssests.CustomerFrom = '@This.CustomersFrom'")>
+    <RuleRequiredField("InvoiceHeader-BankInformation", DefaultContexts.Save, TargetCriteria:="PaymentOption.PayMode = 1 and not (InvoiceType.InvoiceTypeBase in ('eEarnestofTender','eAdvancePayment'))")>
    Property BankInformation As BankInformation
        Get
            Return _BankInformation
@@ -527,7 +527,7 @@ Public Class InvoiceHeader
            SetPropertyValue("CustomerBankAccounts", _BankInformation, value)
        End Set
    End Property
-    <NonCloneable()> _
+    <NonCloneable()>
    Property InvoiceHeader As InvoiceHeader
        Get
            Return _InvoiceHeader
@@ -544,7 +544,7 @@ Public Class InvoiceHeader
            SetPropertyValue("LateChargesCountMode", _LateChargesCountMode, value)
        End Set
    End Property
-    <VisibleInDetailView(False), VisibleInLookupListView(False)> _
+    <VisibleInDetailView(False), VisibleInLookupListView(False)>
    Property IsAssetsHandling As Boolean
        Get
            Return _IsAssetsHandling
@@ -553,7 +553,7 @@ Public Class InvoiceHeader
            SetPropertyValue("IsAssetsHandling", _IsAssetsHandling, value)
        End Set
    End Property
-    <Size(-1), VisibleInDetailView(False), VisibleInListView(False), VisibleInLookupListView(False)> _
+    <Size(-1), VisibleInDetailView(False), VisibleInListView(False), VisibleInLookupListView(False)>
    Property AssetsHandling_Note As String
        Get
            Return _AssetsHandling_Note
@@ -570,7 +570,7 @@ Public Class InvoiceHeader
            SetPropertyValue("AssetsHandlingStatus", _AssetsHandlingStatus, value)
        End Set
    End Property
-    <VisibleInDetailView(False)> _
+    <VisibleInDetailView(False)>
    Property AssetsHandling_GLMixed As GLMixed
        Get
            Return _AssetsHandling_GLMixed
@@ -579,7 +579,7 @@ Public Class InvoiceHeader
            SetPropertyValue("AssetsHandling_GLMixed", _AssetsHandling_GLMixed, value)
        End Set
    End Property
-    <VisibleInDetailView(False)> _
+    <VisibleInDetailView(False)>
    Property IsLateCharge As Boolean
        Get
            Return _IsLateCharge
@@ -588,7 +588,7 @@ Public Class InvoiceHeader
            SetPropertyValue("IsLateCharge", _IsLateCharge, value)
        End Set
    End Property
-    <NonCloneable()> _
+    <NonCloneable()>
    Property UserCreated As User
        Get
            Return _UserCreated
@@ -616,7 +616,7 @@ Public Class InvoiceHeader
    End Property

    '-- a számla kiállításakor el kell menteni bizonyos adatokat
-    <NonCloneable()> _
+    <NonCloneable()>
    Property Saved_Customers_Name As String
        Get
            Return _Saved_Customers_Name
@@ -625,7 +625,7 @@ Public Class InvoiceHeader
            SetPropertyValue("Saved_Customers_Name", _Saved_Customers_Name, value)
        End Set
    End Property
-    <NonCloneable()> _
+    <NonCloneable()>
    Property Saved_Customers_Address_Country As String
        Get
            Return _Saved_Customers_Address_Country
@@ -634,7 +634,7 @@ Public Class InvoiceHeader
            SetPropertyValue("Saved_Customers_Address_Country", _Saved_Customers_Address_Country, value)
        End Set
    End Property
-    <NonCloneable()> _
+    <NonCloneable()>
    Property Saved_Customers_Address_ZipPostal As String
        Get
            Return _Saved_Customers_Address_ZipPostal
@@ -643,7 +643,7 @@ Public Class InvoiceHeader
            SetPropertyValue("Saved_Customers_Address_ZipPostal", _Saved_Customers_Address_ZipPostal, value)
        End Set
    End Property
-    <NonCloneable()> _
+    <NonCloneable()>
    Property Saved_Customers_Address_Street As String
        Get
            Return _Saved_Customers_Address_Street
@@ -652,7 +652,7 @@ Public Class InvoiceHeader
            SetPropertyValue("Saved_Customers_Address_Street", _Saved_Customers_Address_Street, value)
        End Set
    End Property
-    <NonCloneable()> _
+    <NonCloneable()>
    Property Saved_Customers_Address_City As String
        Get
            Return _Saved_Customers_Address_City
@@ -661,7 +661,7 @@ Public Class InvoiceHeader
            SetPropertyValue("Saved_Customers_Address_City", _Saved_Customers_Address_City, value)
        End Set
    End Property
-    <NonCloneable()> _
+    <NonCloneable()>
    Property Saved_Customers_Address_StateProvince As String
        Get
            Return _Saved_Customers_Address_StateProvince
@@ -670,7 +670,7 @@ Public Class InvoiceHeader
            SetPropertyValue("Saved_Customers_Address_StateProvince", _Saved_Customers_Address_StateProvince, value)
        End Set
    End Property
-    <NonCloneable()> _
+    <NonCloneable()>
    Property Saved_Customers_VATNumber As String
        Get
            Return _Saved_Customers_VATNumber
@@ -679,7 +679,7 @@ Public Class InvoiceHeader
            SetPropertyValue("Saved_Customers_VATNumber", _Saved_Customers_VATNumber, value)
        End Set
    End Property
-    <NonCloneable()> _
+    <NonCloneable()>
    Property Saved_Customers_VATNumberEU As String
        Get
            Return _Saved_Customers_VATNumberEU
@@ -688,7 +688,7 @@ Public Class InvoiceHeader
            SetPropertyValue("Saved_Customers_VATNumberEU ", _Saved_Customers_VATNumberEU, value)
        End Set
    End Property
-    <NonCloneable()> _
+    <NonCloneable()>
    Property Saved_CustomersFrom_Name As String
        Get
            Return _Saved_CustomersFrom_Name
@@ -697,7 +697,7 @@ Public Class InvoiceHeader
            SetPropertyValue("Saved_CustomersFrom_Name", _Saved_CustomersFrom_Name, value)
        End Set
    End Property
-    <NonCloneable()> _
+    <NonCloneable()>
    Property Saved_CustomersFrom_Address_Country As String
        Get
            Return _Saved_CustomersFrom_Address_Country
@@ -706,7 +706,7 @@ Public Class InvoiceHeader
            SetPropertyValue("Saved_CustomersFrom_Address_Country", _Saved_CustomersFrom_Address_Country, value)
        End Set
    End Property
-    <NonCloneable()> _
+    <NonCloneable()>
    Property Saved_CustomersFrom_Address_ZipPostal As String
        Get
            Return _Saved_CustomersFrom_Address_ZipPostal
@@ -715,7 +715,7 @@ Public Class InvoiceHeader
            SetPropertyValue("Saved_CustomersFrom_Address_ZipPostal", _Saved_CustomersFrom_Address_ZipPostal, value)
        End Set
    End Property
-    <NonCloneable()> _
+    <NonCloneable()>
    Property Saved_CustomersFrom_Address_Street As String
        Get
            Return _Saved_CustomersFrom_Address_Street
@@ -724,7 +724,7 @@ Public Class InvoiceHeader
            SetPropertyValue("Saved_CustomersFrom_Address_Street", _Saved_CustomersFrom_Address_Street, value)
        End Set
    End Property
-    <NonCloneable()> _
+    <NonCloneable()>
    Property Saved_CustomersFrom_Address_City As String
        Get
            Return _Saved_CustomersFrom_Address_City
@@ -733,7 +733,7 @@ Public Class InvoiceHeader
            SetPropertyValue("Saved_CustomersFrom_Address_City", _Saved_CustomersFrom_Address_City, value)
        End Set
    End Property
-    <NonCloneable()> _
+    <NonCloneable()>
    Property Saved_CustomersFrom_Address_StateProvince As String
        Get
            Return _Saved_CustomersFrom_Address_StateProvince
@@ -742,7 +742,7 @@ Public Class InvoiceHeader
            SetPropertyValue("Saved_CustomersFrom_Address_StateProvince", _Saved_CustomersFrom_Address_StateProvince, value)
        End Set
    End Property
-    <NonCloneable()> _
+    <NonCloneable()>
    Property Saved_CustomersFrom_VATNumber As String
        Get
            Return _Saved_CustomersFrom_VATNumber
@@ -751,7 +751,7 @@ Public Class InvoiceHeader
            SetPropertyValue("Saved_CustomersFrom_VATNumber", _Saved_CustomersFrom_VATNumber, value)
        End Set
    End Property
-    <NonCloneable()> _
+    <NonCloneable()>
    Property Saved_CustomersFrom_VATNumberEU As String
        Get
            Return _Saved_CustomersFrom_VATNumberEU
@@ -760,7 +760,7 @@ Public Class InvoiceHeader
            SetPropertyValue("Saved_CustomersFrom_VATNumberEU", _Saved_CustomersFrom_VATNumberEU, value)
        End Set
    End Property
-    <NonCloneable()> _
+    <NonCloneable()>
    Property Saved_CustomersFrom_Bank_ShortName As String
        Get
            Return _Saved_CustomersFrom_Bank_ShortName
@@ -769,7 +769,7 @@ Public Class InvoiceHeader
            SetPropertyValue("Saved_CustomersFrom_Bank_ShortName", _Saved_CustomersFrom_Bank_ShortName, value)
        End Set
    End Property
-    <NonCloneable()> _
+    <NonCloneable()>
    Property Saved_CustomersFrom_Bank_IBAN As String
        Get
            Return _Saved_CustomersFrom_Bank_IBAN
@@ -778,7 +778,7 @@ Public Class InvoiceHeader
            SetPropertyValue("Saved_CustomersFrom_Bank_IBAN", _Saved_CustomersFrom_Bank_IBAN, value)
        End Set
    End Property
-    <NonCloneable()> _
+    <NonCloneable()>
    Property Saved_CustomersFrom_Bank_SWIFT As String
        Get
            Return _Saved_CustomersFrom_Bank_SWIFT
@@ -787,7 +787,7 @@ Public Class InvoiceHeader
            SetPropertyValue("Saved_CustomersFrom_Bank_SWIFT", _Saved_CustomersFrom_Bank_SWIFT, value)
        End Set
    End Property
-    <NonCloneable()> _
+    <NonCloneable()>
    Property Saved_CustomersFrom_Bank_AccountNumber As String
        Get
            Return _Saved_CustomersFrom_Bank_AccountNumber
@@ -799,18 +799,18 @@ Public Class InvoiceHeader

    ReadOnly Property Saved_Customers_FullAddress As String
        Get
-            Return Saved_Customers_Address_ZipPostal & " " & Saved_Customers_Address_City & " " & vbCrLf & _
+            Return Saved_Customers_Address_ZipPostal & " " & Saved_Customers_Address_City & " " & vbCrLf &
            Saved_Customers_Address_Street & vbCrLf & Saved_Customers_Address_Country
        End Get
    End Property
    ReadOnly Property Saved_CustomersFrom_FullAddress As String
        Get
-            Return Saved_CustomersFrom_Address_ZipPostal & " " & Saved_CustomersFrom_Address_City & " " & vbCrLf & _
+            Return Saved_CustomersFrom_Address_ZipPostal & " " & Saved_CustomersFrom_Address_City & " " & vbCrLf &
            Saved_CustomersFrom_Address_Street & vbCrLf & Saved_CustomersFrom_Address_Country
        End Get
    End Property

-    <NonCloneable()> _
+    <NonCloneable()>
    Property TotalBruttoHUF As Double
        Get
            Return _TotalBruttoHUF
@@ -836,7 +836,7 @@ Public Class InvoiceHeader
        End Set
    End Property

-    <NonCloneable()> _
+    <NonCloneable()>
    Property TotalBruttoDEV As Double
        Get
            Return _TotalBruttoDEV
@@ -871,8 +871,8 @@ Public Class InvoiceHeader
        End Set
    End Property

-    <Size(255)> _
-    <NonCloneable()> _
+    <Size(255)>
+    <NonCloneable()>
    Property HUNumberToText As String
        Get
            Return _HUNumberToText
@@ -881,7 +881,7 @@ Public Class InvoiceHeader
            SetPropertyValue("HUNumberToText", _HUNumberToText, value)
        End Set
    End Property
-    <NonCloneable()> _
+    <NonCloneable()>
    Property IsImported As Boolean
        Get
            Return _IsImported
@@ -890,7 +890,7 @@ Public Class InvoiceHeader
            SetPropertyValue("IsImported", _IsImported, value)
        End Set
    End Property
-    <NonCloneable()> _
+    <NonCloneable()>
    Property GLAccounts As GLAccounts
        Get
            Return _GLAccounts
@@ -899,8 +899,8 @@ Public Class InvoiceHeader
            SetPropertyValue("GLAccounts", _GLAccounts, value)
        End Set
    End Property
-    <Size(255)> _
-    <NonCloneable()> _
+    <Size(255)>
+    <NonCloneable()>
    Property BookEntryErrorString As String
        Get
            Return _BookEntryErrorString
@@ -909,7 +909,7 @@ Public Class InvoiceHeader
            SetPropertyValue("BookEntryErrorString", _BookEntryErrorString, value)
        End Set
    End Property
-    <NonCloneable()> _
+    <NonCloneable()>
    Property ReadyforBookEntry As Boolean
        Get
            Return _ReadyforBookEntry
@@ -953,7 +953,7 @@ Public Class InvoiceHeader
            End If
        End Get
    End Property
-    <VisibleInDetailView(False)> _
+    <VisibleInDetailView(False)>
    ReadOnly Property DisplayName() As String
        Get
            If Me.CurrencyName IsNot Nothing Then
@@ -963,7 +963,7 @@ Public Class InvoiceHeader
            End If
        End Get
    End Property
-    <VisibleInListView(False), VisibleInDetailView(False), VisibleInLookupListView(False)> _
+    <VisibleInListView(False), VisibleInDetailView(False), VisibleInLookupListView(False)>
    ReadOnly Property Contact_string() As String
        Get
            Dim _Contact As String = ""
@@ -973,7 +973,7 @@ Public Class InvoiceHeader
            Return _Contact
        End Get
    End Property
-    <VisibleInListView(False), VisibleInDetailView(False), VisibleInLookupListView(False)> _
+    <VisibleInListView(False), VisibleInDetailView(False), VisibleInLookupListView(False)>
    ReadOnly Property CustomersRefNumber_string() As String
        Get
            Dim _CustomersRefNumber As String = ""
@@ -1052,8 +1052,8 @@ Public Class InvoiceHeader
        End Set
    End Property
    '-- Nonpersistent property-k a számla sor rögzítéséhez
-    <NonPersistent()> _
-    <VisibleInListView(False)> _
+    <NonPersistent()>
+    <VisibleInListView(False)>
    Property row_CustomsTariffs As CustomsTariffs
        Get
            Return _row_CustomsTariffs
@@ -1062,9 +1062,9 @@ Public Class InvoiceHeader
            SetPropertyValue("row_CustomsTariffs", _row_CustomsTariffs, value)
        End Set
    End Property
-    <RuleRequiredField("InvoiceHeader-row_ShortName", "aToTable_Invoice_Contexts", targetcriteria:="IsCorrigendum=False")> _
-    <NonPersistent()> _
-    <VisibleInListView(False)> _
+    <RuleRequiredField("InvoiceHeader-row_ShortName", "aToTable_Invoice_Contexts", TargetCriteria:="IsCorrigendum=False")>
+    <NonPersistent()>
+    <VisibleInListView(False)>
    Property row_ShortName() As String 'Megnevezés
        Get
            Return _row_ShortName
@@ -1073,9 +1073,9 @@ Public Class InvoiceHeader
            SetPropertyValue("row_ShortName", _row_ShortName, value)
        End Set
    End Property
-    <NonPersistent()> _
-    <VisibleInListView(False)> _
-    <Size(4000)> _
+    <NonPersistent()>
+    <VisibleInListView(False)>
+    <Size(4000)>
    Property row_Description() As String 'Leírás
        Get
            Return _row_Description
@@ -1084,9 +1084,9 @@ Public Class InvoiceHeader
            SetPropertyValue("row_Description", _row_Description, value)
        End Set
    End Property
-    <RuleRange("InvoiceHeader-row_ListPriceHUF", "aToTable_Invoice_Contexts", 0.00001, Double.MaxValue, TargetCriteria:="CurrencyName.ShortName='HUF'")> _
-    <NonPersistent()> _
-    <VisibleInListView(False)> _
+    <RuleRange("InvoiceHeader-row_ListPriceHUF", "aToTable_Invoice_Contexts", 0.00001, Double.MaxValue, TargetCriteria:="CurrencyName.ShortName='HUF'")>
+    <NonPersistent()>
+    <VisibleInListView(False)>
    Property row_ListPriceHUF() As Double ' Egységár HUF (nettó !)
        Get
            Return _row_ListPriceHUF
@@ -1095,9 +1095,9 @@ Public Class InvoiceHeader
            SetPropertyValue("row_ListPriceHUF", _row_ListPriceHUF, value)
        End Set
    End Property
-    <RuleRange("InvoiceHeader-row_ListPriceDEV", "aToTable_Invoice_Contexts", 0.00001, Double.MaxValue, TargetCriteria:="CurrencyName.ShortName!='HUF' and IsCorrigendum=False")> _
-    <NonPersistent()> _
-    <VisibleInListView(False)> _
+    <RuleRange("InvoiceHeader-row_ListPriceDEV", "aToTable_Invoice_Contexts", 0.00001, Double.MaxValue, TargetCriteria:="CurrencyName.ShortName!='HUF' and IsCorrigendum=False")>
+    <NonPersistent()>
+    <VisibleInListView(False)>
    Property row_ListPriceDEV() As Double ' Egységár DEV (Nettó !)
        Get
            Return _row_ListPriceDEV
@@ -1109,9 +1109,9 @@ Public Class InvoiceHeader
            End If
        End Set
    End Property
-    <RuleRange("InvoiceHeader-row_DiscountPercent", "aToTable_Invoice_Contexts", 0, 99, targetcriteria:="IsCorrigendum=False")> _
-    <NonPersistent()> _
-    <VisibleInListView(False)> _
+    <RuleRange("InvoiceHeader-row_DiscountPercent", "aToTable_Invoice_Contexts", 0, 99, TargetCriteria:="IsCorrigendum=False")>
+    <NonPersistent()>
+    <VisibleInListView(False)>
    Property row_DiscountPercent() As Double 'Kedvezmény mértéke %-ban
        Get
            Return _row_DiscountPercent
@@ -1122,9 +1122,9 @@ Public Class InvoiceHeader
    End Property
    '<RuleValueComparison("RuleValue-PayMode-RegistryHeader", "RegistryNextStep_Context", ValueComparisonType.NotEquals, ePayMode.NotSet, TargetCriteria:="RegistryType.RegistryMainType=0")> _
    '<RuleRange("InvoiceHeader-row_QTT", "aToTable_Invoice_Contexts", 0.00001, Double.MaxValue)> _
-    <RuleValueComparison("InvoiceHeader-row_QTT", "aToTable_Invoice_Contexts", ValueComparisonType.NotEquals, 0)> _
-     <NonPersistent()> _
-    <VisibleInListView(False)> _
+    <RuleValueComparison("InvoiceHeader-row_QTT", "aToTable_Invoice_Contexts", ValueComparisonType.NotEquals, 0)>
+    <NonPersistent()>
+    <VisibleInListView(False)>
    Property row_QTT() As Double 'Mennyiség
        Get
            Return _row_QTT
@@ -1133,9 +1133,9 @@ Public Class InvoiceHeader
            SetPropertyValue("row_QTT", _row_QTT, value)
        End Set
    End Property
-    <RuleRequiredField("InvoiceHeader-row_Units", "aToTable_Invoice_Contexts", targetcriteria:="IsCorrigendum=False")> _
-    <NonPersistent()> _
-    <VisibleInListView(False)> _
+    <RuleRequiredField("InvoiceHeader-row_Units", "aToTable_Invoice_Contexts", TargetCriteria:="IsCorrigendum=False")>
+    <NonPersistent()>
+    <VisibleInListView(False)>
    Property row_Units() As Units ' Mennyiségi egység
        Get
            Return _row_Units
@@ -1144,9 +1144,9 @@ Public Class InvoiceHeader
            SetPropertyValue("row_Units", _row_Units, value)
        End Set
    End Property
-    <RuleRequiredField("InvoiceHeader-row_VAT", "aToTable_Invoice_Contexts", targetcriteria:="IsCorrigendum=False")> _
-    <NonPersistent()> _
-    <VisibleInListView(False)> _
+    <RuleRequiredField("InvoiceHeader-row_VAT", "aToTable_Invoice_Contexts", TargetCriteria:="IsCorrigendum=False")>
+    <NonPersistent()>
+    <VisibleInListView(False)>
    Property row_VAT() As VAT 'ÁFA
        Get
            Return _row_VAT
@@ -1155,8 +1155,8 @@ Public Class InvoiceHeader
            SetPropertyValue("row_VAT", _row_VAT, value)
        End Set
    End Property
-    <NonPersistent()> _
-    <VisibleInListView(False)> _
+    <NonPersistent()>
+    <VisibleInListView(False)>
    Property row_QualityOption() As QualityOption 'Minőségi kondíció
        Get
            Return _row_QualityOption
@@ -1165,9 +1165,9 @@ Public Class InvoiceHeader
            SetPropertyValue("row_QualityOption", _row_QualityOption, value)
        End Set
    End Property
-    <NonPersistent()> _
-    <VisibleInDetailView(False)> _
-    <VisibleInLookupListView(False)> _
+    <NonPersistent()>
+    <VisibleInDetailView(False)>
+    <VisibleInLookupListView(False)>
    Property row_InvoicePeriod As String
        Get
            Return _row_InvoicePeriod
@@ -1176,10 +1176,10 @@ Public Class InvoiceHeader
            SetPropertyValue("row_InvoicePeriod", _row_InvoicePeriod, value)
        End Set
    End Property
-    <NonPersistent()> _
-    <VisibleInDetailView(False)> _
-    <VisibleInListView(False)> _
-    <VisibleInLookupListView(False)> _
+    <NonPersistent()>
+    <VisibleInDetailView(False)>
+    <VisibleInListView(False)>
+    <VisibleInLookupListView(False)>
    Property row_Products As Products
        Get
            Return _row_Products
@@ -1188,10 +1188,10 @@ Public Class InvoiceHeader
            SetPropertyValue("row_Products", _row_Products, value)
        End Set
    End Property
-    <NonPersistent()> _
-    <VisibleInDetailView(False)> _
-    <VisibleInListView(False)> _
-    <VisibleInLookupListView(False)> _
+    <NonPersistent()>
+    <VisibleInDetailView(False)>
+    <VisibleInListView(False)>
+    <VisibleInLookupListView(False)>
    Property row_Services As Services
        Get
            Return _row_Services
@@ -1201,10 +1201,10 @@ Public Class InvoiceHeader
        End Set
    End Property
    'Rule5DMatrix ...
-    <NonPersistent()> _
-    <VisibleInListView(False)> _
-    <RuleRequiredField("InvoiceHeader-row_Controlling", "aToTable_Invoice_Contexts", TargetCriteria:="InvoiceType.Rule5DMatrix.RequireControlling=True and IsCorrigendum=False")> _
-    <DataSourceCriteria("IsAdvancePayment=False")> _
+    <NonPersistent()>
+    <VisibleInListView(False)>
+    <RuleRequiredField("InvoiceHeader-row_Controlling", "aToTable_Invoice_Contexts", TargetCriteria:="InvoiceType.Rule5DMatrix.RequireControlling=True and IsCorrigendum=False")>
+    <DataSourceCriteria("IsAdvancePayment=False")>
    Property row_Controlling() As Controlling '-- Controlling szám
        Get
            Return _row_Controlling
@@ -1213,9 +1213,9 @@ Public Class InvoiceHeader
            SetPropertyValue("row_Controlling", _row_Controlling, value)
        End Set
    End Property
-    <NonPersistent()> _
-    <VisibleInListView(False)> _
-    <RuleRequiredField("InvoiceHeader-row_UniqueObjects", "aToTable_Invoice_Contexts", TargetCriteria:="InvoiceType.Rule5DMatrix.RequireUniqueObjects=True and IsCorrigendum=False")> _
+    <NonPersistent()>
+    <VisibleInListView(False)>
+    <RuleRequiredField("InvoiceHeader-row_UniqueObjects", "aToTable_Invoice_Contexts", TargetCriteria:="InvoiceType.Rule5DMatrix.RequireUniqueObjects=True and IsCorrigendum=False")>
    Property row_UniqueObjects() As UniqueObjects ' -- Egyedi azonosító
        Get
            Return _row_UniqueObjects
@@ -1224,9 +1224,9 @@ Public Class InvoiceHeader
            SetPropertyValue("row_UniqueObjects", _row_UniqueObjects, value)
        End Set
    End Property
-    <NonPersistent()> _
-    <VisibleInListView(False)> _
-    <RuleRequiredField("InvoiceHeader-row_CostHolder", "aToTable_Invoice_Contexts", TargetCriteria:="InvoiceType.Rule5DMatrix.RequireCostHolder=True and IsCorrigendum=False")> _
+    <NonPersistent()>
+    <VisibleInListView(False)>
+    <RuleRequiredField("InvoiceHeader-row_CostHolder", "aToTable_Invoice_Contexts", TargetCriteria:="InvoiceType.Rule5DMatrix.RequireCostHolder=True and IsCorrigendum=False")>
    Property row_CostHolder() As CostHolder ' -- Költség viselő
        Get
            Return _row_CostHolder
@@ -1235,9 +1235,9 @@ Public Class InvoiceHeader
            SetPropertyValue("row_CostHolder", _row_CostHolder, value)
        End Set
    End Property
-    <NonPersistent()> _
-    <VisibleInListView(False)> _
-    <RuleRequiredField("InvoiceHeader-row_CostPlace", "aToTable_Invoice_Contexts", TargetCriteria:="InvoiceType.Rule5DMatrix.RequireCostPlace=True and IsCorrigendum=False")> _
+    <NonPersistent()>
+    <VisibleInListView(False)>
+    <RuleRequiredField("InvoiceHeader-row_CostPlace", "aToTable_Invoice_Contexts", TargetCriteria:="InvoiceType.Rule5DMatrix.RequireCostPlace=True and IsCorrigendum=False")>
    Property row_CostPlace() As CostPlace ' -- Költség viselő
        Get
            Return _row_CostPlace
@@ -1246,9 +1246,9 @@ Public Class InvoiceHeader
            SetPropertyValue("row_CostPlace", _row_CostPlace, value)
        End Set
    End Property
-    <NonPersistent()> _
-    <VisibleInListView(False)> _
-    <RuleRequiredField("InvoiceHeader-row_JobNumberObjects", "aToTable_Invoice_Contexts", TargetCriteria:="InvoiceType.Rule5DMatrix.RequireJobNumberObjects=True and IsCorrigendum=False")> _
+    <NonPersistent()>
+    <VisibleInListView(False)>
+    <RuleRequiredField("InvoiceHeader-row_JobNumberObjects", "aToTable_Invoice_Contexts", TargetCriteria:="InvoiceType.Rule5DMatrix.RequireJobNumberObjects=True and IsCorrigendum=False")>
    Property row_JobNumberObjects() As JobNumberObjects ' -- Project
        Get
            Return _row_JobNumberObjects
@@ -1267,13 +1267,13 @@ Public Class InvoiceHeader

        _ocur.Delete(_InvoiceHeader.InvoiceVATRows)
        Dim invoices = New XPQuery(Of InvoiceRows)(_ocur.Session)
-        Dim query = From invoice In invoices Where invoice.InvoiceHeader.Oid = _InvoiceHeader.Oid _
-            Group invoice By invoice.VAT Into g = Group _
-            Select New With {Key .VAT = VAT, _
-                             Key .AmountNettoHUF = g.Sum(Function(inv) (inv.ListPriceHUF - inv.DiscountPriceHUF) * inv.QTT), _
-                             Key .AmountNettoDEV = g.Sum(Function(inv) (inv.ListPriceDEV - inv.DiscountPriceDEV) * inv.QTT), _
-                             Key .S2 = g.Sum(Function(inv) inv.ListPriceDEV), _
-                             Key .M1 = g.Max(Function(inv) inv.DiscountPriceHUF * inv.QTT)}
+        Dim query = From invoice In invoices Where invoice.InvoiceHeader.Oid = _InvoiceHeader.Oid
+                    Group invoice By invoice.VAT Into g = Group
+                    Select New With {Key .VAT = VAT,
+                                     Key .AmountNettoHUF = g.Sum(Function(inv) (inv.ListPriceHUF - inv.DiscountPriceHUF) * inv.QTT),
+                                     Key .AmountNettoDEV = g.Sum(Function(inv) (inv.ListPriceDEV - inv.DiscountPriceDEV) * inv.QTT),
+                                     Key .S2 = g.Sum(Function(inv) inv.ListPriceDEV),
+                                     Key .M1 = g.Max(Function(inv) inv.DiscountPriceHUF * inv.QTT)}
        For Each item In query
            _InvoiceVATRows = _ocur.CreateObject(Of InvoiceVATRows)()
            _InvoiceVATRows.InvoiceHeader = _InvoiceHeader
@@ -1374,27 +1374,26 @@ Public Class InvoiceHeader
    Sub BookEntry(ByVal _p_BookEntryMode As Long, ByVal _p_InvoiceHeader As InvoiceHeader, ByVal _uow As UnitOfWork, Optional ByVal _WithCommit As Boolean = False)

        '//ÁFA miatt !!!
-        Dim _SQL As String = ""
-        Select Case GLOBAL_SQLType
-            Case eSQLType.MySQL
-                _SQL = " UPDATE InvoiceVATRows t1 JOIN Invoiceheader t2 ON"
-                _SQL += " t1.InvoiceHeader = t2.Oid"
-                _SQL += " SET t1.DateVAT = t2.DateExecution"
-                _SQL += " WHERE t1.DateVAT IS NULL AND t2.GCRecord IS NULL"
-            Case eSQLType.MSSQL
-                _SQL = " UPDATE InvoiceVATRows SET DateVAT=t2.DateExecution"
-                _SQL += " from InvoiceVATRows t1 JOIN Invoiceheader t2 ON"
-                _SQL += " t1.InvoiceHeader = t2.Oid"
-                _SQL += " WHERE t1.DateVAT Is NULL And t2.GCRecord Is NULL"
-            Case eSQLType.PostgreSQL
-                _SQL = "UPDATE ""InvoiceVATRows"" set ""DateVAT""=t2.""DateExecution"""
-                _SQL += " from ""InvoiceVATRows"" t1 JOIN ""InvoiceHeader"" t2 ON"
-                _SQL += " t1.""InvoiceHeader""=t2.""Oid"""
-                _SQL += " WHERE t1.""DateVAT"" IS NULL AND t2.""GCRecord"" IS NULL"
-        End Select
+        'Dim _SQL As String = ""
+        'Select Case GLOBAL_SQLType
+        '    Case eSQLType.MySQL
+        '        _SQL = "UPDATE InvoiceVATRows t1 JOIN InvoiceHeader t2 ON t1.InvoiceHeader = t2.Oid "
+        '        _SQL += " SET t1.DateVAT=t2.DateExecution"
+        '        _SQL += " WHERE t1.DateVAT IS NULL AND t2.GCRecord IS NULL"
+        '    Case eSQLType.MSSQL
+        '        _SQL = " UPDATE InvoiceVATRows SET DateVAT=t2.DateExecution"
+        '        _SQL += " from InvoiceVATRows t1 JOIN InvoiceHeader t2 ON"
+        '        _SQL += " t1.InvoiceHeader = t2.Oid"
+        '        _SQL += " WHERE t1.DateVAT Is NULL And t2.GCRecord Is NULL"
+        '    Case eSQLType.PostgreSQL
+        '        _SQL = "UPDATE ""InvoiceVATRows"" set ""DateVAT""=t2.""DateExecution"""
+        '        _SQL += " from ""InvoiceVATRows"" t1 JOIN ""InvoiceHeader"" t2 ON"
+        '        _SQL += " t1.""InvoiceHeader""=t2.""Oid"""
+        '        _SQL += " WHERE t1.""DateVAT"" IS NULL AND t2.""GCRecord"" IS NULL"
+        'End Select

-        _uow.ExecuteNonQuery(_SQL)
-        _uow.CommitChanges()
+        '_uow.ExecuteNonQuery(_SQL)
+        '_uow.CommitChanges()



@@ -1488,19 +1487,19 @@ Public Class InvoiceHeader
                    _UniqueObjects = _InvoiceRows.UniqueObjects
                End If
                _GLRows.InvoiceRows = _InvoiceRows
-                _GLRows.AddGLRows(TryCast(_GLAccounts, GLHeader), _DebitChartOfAccounts, _CreditChartOfAccounts, _InvoiceRows.SumPriceDEV, _
-                                   _InvoiceRows.SumPriceHUF, Nothing, _InvoiceHeader.Customers, _InvoiceHeader.DateExecution.Date, _InvoiceRows.VAT, _
-                                   _InvoiceRows.Description, _UniqueObjects, _Controlling, _JobNumberObjects, _
-                                    _CostPlace, _CostHolder, _InvoiceHeader.ConnectInfo, eGLRowsTypeVAT.eNettoRow, _
+                _GLRows.AddGLRows(TryCast(_GLAccounts, GLHeader), _DebitChartOfAccounts, _CreditChartOfAccounts, _InvoiceRows.SumPriceDEV,
+                                   _InvoiceRows.SumPriceHUF, Nothing, _InvoiceHeader.Customers, _InvoiceHeader.DateExecution.Date, _InvoiceRows.VAT,
+                                   _InvoiceRows.Description, _UniqueObjects, _Controlling, _JobNumberObjects,
+                                    _CostPlace, _CostHolder, _InvoiceHeader.ConnectInfo, eGLRowsTypeVAT.eNettoRow,
                                    _GUID, eTransactionType.eNotSet, eCashType.ePartner, ePartnerType.eReceivables)
                _NettoNotRounded += _InvoiceRows.SumPriceHUF
            Next
            For Each _InvoiceVATRows In _InvoiceHeader.InvoiceVATRows
                _GLRows = New GLRows(_uow)
-                _GLRows.AddGLRows(TryCast(_GLAccounts, GLHeader), _DebitChartOfAccounts, _InvoiceVATRows.VAT.GetChartOfAccounts(_InvoiceHeader.DateExecution.Year, eVATMode.eOut), _InvoiceVATRows.AmountVATDEV, _
-                                   _InvoiceVATRows.AmountVATHUF, Nothing, _InvoiceHeader.Customers, _InvoiceVATRows.DateVAT.Date, _InvoiceVATRows.VAT, _
-                                   "", Nothing, Nothing, Nothing, _
-                                    Nothing, Nothing, _InvoiceHeader.ConnectInfo, eGLRowsTypeVAT.eVATRow, _
+                _GLRows.AddGLRows(TryCast(_GLAccounts, GLHeader), _DebitChartOfAccounts, _InvoiceVATRows.VAT.GetChartOfAccounts(_InvoiceHeader.DateExecution.Year, eVATMode.eOut), _InvoiceVATRows.AmountVATDEV,
+                                   _InvoiceVATRows.AmountVATHUF, Nothing, _InvoiceHeader.Customers, _InvoiceVATRows.DateVAT.Date, _InvoiceVATRows.VAT,
+                                   "", Nothing, Nothing, Nothing,
+                                    Nothing, Nothing, _InvoiceHeader.ConnectInfo, eGLRowsTypeVAT.eVATRow,
                                    _GUID, eTransactionType.eNotSet, eCashType.ePartner, ePartnerType.eReceivables)

                _NettoRounded += _InvoiceVATRows.AmountBruttoHUF - _InvoiceVATRows.AmountVATHUF
@@ -1657,7 +1656,7 @@ Public Class InvoiceHeader

    '-- Számla információk (XPCollection)
    '// Kapcsolódó bejövő megrendelések
-    <VisibleInListView(False), VisibleInDetailView(False), VisibleInLookupListView(False)> _
+    <VisibleInListView(False), VisibleInDetailView(False), VisibleInLookupListView(False)>
    ReadOnly Property OrderInHeader_Collection As XPCollection(Of OrderInHeader)
        Get
            Dim _OrderInHeader_Collection As XPCollection(Of OrderInHeader)
@@ -1692,7 +1691,7 @@ Public Class InvoiceHeader
        End Get
    End Property
    '// Kapcsolódó munkalapok
-    <VisibleInListView(False), VisibleInDetailView(False), VisibleInLookupListView(False)> _
+    <VisibleInListView(False), VisibleInDetailView(False), VisibleInLookupListView(False)>
    ReadOnly Property WorkSheet_Header_Collection As XPCollection(Of WorkSheet_Header)
        Get
            Dim _WorkSheet_Header_Collection As XPCollection(Of WorkSheet_Header)
@@ -1720,7 +1719,7 @@ Public Class InvoiceHeader
        End Get
    End Property
    '// Kapcsolódó szerződések
-    <VisibleInListView(False), VisibleInDetailView(False), VisibleInLookupListView(False)> _
+    <VisibleInListView(False), VisibleInDetailView(False), VisibleInLookupListView(False)>
    ReadOnly Property Contracts_Collection As XPCollection(Of Contracts)
        Get
            Dim _Contracts_Collection As XPCollection(Of Contracts)
@@ -1748,14 +1747,14 @@ Public Class InvoiceHeader
        End Get
    End Property

-    <VisibleInListView(False), VisibleInLookupListView(False), VisibleInDetailView(False)> _
+    <VisibleInListView(False), VisibleInLookupListView(False), VisibleInDetailView(False)>
    ReadOnly Property IsVATClosed As Boolean
        Get
            Dim _Closed As Boolean = False
            If Me.CustomersFrom IsNot Nothing Then
                If Me.IsEditable = False Then
                    Dim _VATReport As VATReport = Session.FindObject(Of VATReport) _
-                            (CriteriaOperator.Parse("GetDate(DateFrom)<=? and GetDate(DateTo)>=? and CustomersFrom=? and Closed=True", _
+                            (CriteriaOperator.Parse("GetDate(DateFrom)<=? and GetDate(DateTo)>=? and CustomersFrom=? and Closed=True",
                            Me.DateExecution.Date, Me.DateExecution.Date, Me.CustomersFrom))
                    If _VATReport IsNot Nothing Then
                        _Closed = _VATReport.Closed
@@ -156,26 +156,25 @@ Public Class VATReportVC
        _uow.Delete(_VATReportGroupCustomers2M_Collection)


-        Select Case GLOBAL_SQLType
-            Case eSQLType.MySQL
-                _SQL = " UPDATE InvoiceVATRows t1 JOIN Invoiceheader t2 ON"
-                _SQL += " t1.InvoiceHeader = t2.Oid"
-                _SQL += " SET t1.DateVAT = t2.DateExecution"
-                _SQL += " WHERE t1.DateVAT IS NULL AND t2.GCRecord IS NULL"
-            Case eSQLType.MSSQL
-                _SQL = " UPDATE InvoiceVATRows SET DateVAT=t2.DateExecution"
-                _SQL += " from InvoiceVATRows t1 JOIN Invoiceheader t2 ON"
-                _SQL += " t1.InvoiceHeader = t2.Oid"
-                _SQL += " WHERE t1.DateVAT Is NULL And t2.GCRecord Is NULL"
-            Case eSQLType.PostgreSQL
-                _SQL = "UPDATE ""InvoiceVATRows"" set ""DateVAT""=t2.""DateExecution"""
-                _SQL += " from ""InvoiceVATRows"" t1 JOIN ""InvoiceHeader"" t2 ON"
-                _SQL += " t1.""InvoiceHeader""=t2.""Oid"""
-                _SQL += " WHERE t1.""DateVAT"" IS NULL AND t2.""GCRecord"" IS NULL"
-        End Select
+        'Select Case GLOBAL_SQLType
+        '    Case eSQLType.MySQL
+        '        _SQL = "UPDATE InvoiceVATRows t1 JOIN InvoiceHeader t2 ON t1.InvoiceHeader = t2.Oid "
+        '        _SQL += " SET t1.DateVAT=t2.DateExecution"
+        '        _SQL += " WHERE t1.DateVAT IS NULL AND t2.GCRecord IS NULL"
+        '    Case eSQLType.MSSQL
+        '        _SQL = " UPDATE InvoiceVATRows SET DateVAT=t2.DateExecution"
+        '        _SQL += " from InvoiceVATRows t1 JOIN InvoiceHeader t2 ON"
+        '        _SQL += " t1.InvoiceHeader = t2.Oid"
+        '        _SQL += " WHERE t1.DateVAT Is NULL And t2.GCRecord Is NULL"
+        '    Case eSQLType.PostgreSQL
+        '        _SQL = "UPDATE ""InvoiceVATRows"" set ""DateVAT""=t2.""DateExecution"""
+        '        _SQL += " from ""InvoiceVATRows"" t1 JOIN ""InvoiceHeader"" t2 ON"
+        '        _SQL += " t1.""InvoiceHeader""=t2.""Oid"""
+        '        _SQL += " WHERE t1.""DateVAT"" IS NULL AND t2.""GCRecord"" IS NULL"
+        'End Select

-        _uow.ExecuteNonQuery(_SQL)
-        _uow.CommitChanges()
+        '_uow.ExecuteNonQuery(_SQL)
+        '_uow.CommitChanges()

        'ÁFA P.Ü. szemlélet ellenõrzése -----------------------------------------
        Me.CheckVATAvowalType(_ocur, _VATReport.DateFrom, _VATReport.DateTo)
@@ -0,0 +1 @@
+DevExpress.ExpressApp.ViewController, DevExpress.ExpressApp.v17.2, Version=17.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
@@ -1 +1 @@
-80ff8871ff5eb6e89369078f4109f338a8cde906
+9f864e7bb72e496deb289933318a09f2bcc38a5c
@@ -1 +1 @@
-80ff8871ff5eb6e89369078f4109f338a8cde906
+4fa2326e2fefaef81c04a14bb4873400406a9991
@@ -1 +1 @@
-80ff8871ff5eb6e89369078f4109f338a8cde906
+4fa2326e2fefaef81c04a14bb4873400406a9991
@@ -1 +1 @@
-80ff8871ff5eb6e89369078f4109f338a8cde906
+4fa2326e2fefaef81c04a14bb4873400406a9991
@@ -1 +1 @@
-80ff8871ff5eb6e89369078f4109f338a8cde906
+9f864e7bb72e496deb289933318a09f2bcc38a5c
@@ -441,7 +441,6 @@ C:\SIS-Business-GIT\SISBusiness.Module\bin\Release\de\DevExpress.ExpressApp.Win.
 C:\SIS-Business-GIT\SISBusiness.Module\bin\Release\es\DevExpress.ExpressApp.Win.v17.2.resources.dll
 C:\SIS-Business-GIT\SISBusiness.Module\bin\Release\ja\DevExpress.ExpressApp.Win.v17.2.resources.dll
 C:\SIS-Business-GIT\SISBusiness.Module\bin\Release\ru\DevExpress.ExpressApp.Win.v17.2.resources.dll
-C:\SIS-Business-GIT\SISBusiness.Module\obj\Release\SISBusiness.Module.vbprojResolveAssemblyReference.cache
 C:\SIS-Business-GIT\SISBusiness.Module\obj\Release\SISBusiness.Module.APCSheetReviewHeader_VC.resources
 C:\SIS-Business-GIT\SISBusiness.Module\obj\Release\SISBusiness.Module.APCSheetReview_VC.resources
 C:\SIS-Business-GIT\SISBusiness.Module\obj\Release\SISBusiness.Module.APCSheetVC.resources
@@ -591,3 +590,4 @@ C:\SIS-Business-GIT\SISBusiness.Module\obj\Release\SISBusiness.Module.vbproj.Cor
 C:\SIS-Business-GIT\SISBusiness.Module\obj\Release\hu\SISBusiness.Module.resources.dll
 C:\SIS-Business-GIT\SISBusiness.Module\obj\Release\SISBusiness.Module.vbproj.CopyComplete
 C:\SIS-Business-GIT\SISBusiness.Module\obj\Release\SISBusiness.Module.dll
+C:\SIS-Business-GIT\SISBusiness.Module\obj\Release\SISBusiness.Module.vbprojResolveAssemblyReference.cache
@@ -1 +1 @@
-e8ec443c624a07aa1308868599316ca5565a1de3
+60bf07a750a04751f3fa8d985acbe30472132e77
@@ -1 +1 @@
-bcf361a07959a7dbcbaf83529f16cc633cc1a861
+90e580eda478fa1e157d4fa78e37895495e10325
@@ -1 +1 @@
-3ed84b595c4db63c2284491550bc6e42d23c59ea
+2304dec9d6b7b979490e07157b6727ed930b58e6
@@ -921,3 +921,15 @@ C:\SIS-Business-GIT\SISBusiness.WIN.Company\obj\Debug\SISBusiness.Win.Company.vb
 C:\SIS-Business-GIT\SISBusiness.WIN.Company\obj\Debug\SISBusiness.Win.Company.vbproj.CopyComplete
 C:\SIS-Business-GIT\SISBusiness.WIN.Company\obj\Debug\SISBusiness.Win.exe
 C:\SIS-Business-GIT\SISBusiness.WIN.Company\obj\Debug\SISBusiness.Win.pdb
+C:\SIS-Business-GIT\SISBusiness.WIN.Company\bin\Debug\Microsoft.VisualStudio.Shell.Interop.dll
+C:\SIS-Business-GIT\SISBusiness.WIN.Company\bin\Debug\Microsoft.VisualStudio.Shell.Interop.8.0.dll
+C:\SIS-Business-GIT\SISBusiness.WIN.Company\bin\Debug\Microsoft.VisualStudio.OLE.Interop.dll
+C:\SIS-Business-GIT\SISBusiness.WIN.Company\bin\Debug\Microsoft.VisualStudio.TextManager.Interop.dll
+C:\SIS-Business-GIT\SISBusiness.WIN.Company\bin\Debug\Microsoft.VisualStudio.Designer.Interfaces.dll
+C:\SIS-Business-GIT\SISBusiness.WIN.Company\bin\Debug\Microsoft.VisualStudio.TextManager.Interop.8.0.dll
+C:\SIS-Business-GIT\SISBusiness.WIN.Company\bin\Debug\Microsoft.VisualStudio.Shell.Interop.xml
+C:\SIS-Business-GIT\SISBusiness.WIN.Company\bin\Debug\Microsoft.VisualStudio.Shell.Interop.8.0.xml
+C:\SIS-Business-GIT\SISBusiness.WIN.Company\bin\Debug\Microsoft.VisualStudio.OLE.Interop.xml
+C:\SIS-Business-GIT\SISBusiness.WIN.Company\bin\Debug\Microsoft.VisualStudio.TextManager.Interop.xml
+C:\SIS-Business-GIT\SISBusiness.WIN.Company\bin\Debug\Microsoft.VisualStudio.Designer.Interfaces.xml
+C:\SIS-Business-GIT\SISBusiness.WIN.Company\bin\Debug\Microsoft.VisualStudio.TextManager.Interop.8.0.xml
@@ -1 +1 @@
-c7dc89f64c26c5c54159c5970bc44ca5132b72ad
+53c80d0af80a20e7c4f7213b690ef964b7b5b3f5
@@ -1 +1 @@
-0d4d40c82caeb9153e67bc1682a16260b038e0de
+c475dc5bb8c509e3dac4685107d1d3b5e9dea14d
@@ -1 +1 @@
-6256442466e98b67294f97eccdc0d1ca2b0b8b36
+b66a17c061fa5c1044a30345366c30ff09d53b4c
@@ -910,3 +910,15 @@ C:\SIS-Business-GIT\SISBusiness.WIN.Company\obj\Release\SISBusiness.Win.exe.lice
 C:\SIS-Business-GIT\SISBusiness.WIN.Company\obj\Release\SISBusiness.Win.Company.vbproj.CoreCompileInputs.cache
 C:\SIS-Business-GIT\SISBusiness.WIN.Company\obj\Release\SISBusiness.Win.Company.vbproj.CopyComplete
 C:\SIS-Business-GIT\SISBusiness.WIN.Company\obj\Release\SISBusiness.Win.exe
+C:\SIS-Business-GIT\SISBusiness.WIN.Company\bin\Release\Microsoft.VisualStudio.Shell.Interop.dll
+C:\SIS-Business-GIT\SISBusiness.WIN.Company\bin\Release\Microsoft.VisualStudio.Shell.Interop.8.0.dll
+C:\SIS-Business-GIT\SISBusiness.WIN.Company\bin\Release\Microsoft.VisualStudio.OLE.Interop.dll
+C:\SIS-Business-GIT\SISBusiness.WIN.Company\bin\Release\Microsoft.VisualStudio.TextManager.Interop.dll
+C:\SIS-Business-GIT\SISBusiness.WIN.Company\bin\Release\Microsoft.VisualStudio.Designer.Interfaces.dll
+C:\SIS-Business-GIT\SISBusiness.WIN.Company\bin\Release\Microsoft.VisualStudio.TextManager.Interop.8.0.dll
+C:\SIS-Business-GIT\SISBusiness.WIN.Company\bin\Release\Microsoft.VisualStudio.Shell.Interop.xml
+C:\SIS-Business-GIT\SISBusiness.WIN.Company\bin\Release\Microsoft.VisualStudio.Shell.Interop.8.0.xml
+C:\SIS-Business-GIT\SISBusiness.WIN.Company\bin\Release\Microsoft.VisualStudio.OLE.Interop.xml
+C:\SIS-Business-GIT\SISBusiness.WIN.Company\bin\Release\Microsoft.VisualStudio.TextManager.Interop.xml
+C:\SIS-Business-GIT\SISBusiness.WIN.Company\bin\Release\Microsoft.VisualStudio.Designer.Interfaces.xml
+C:\SIS-Business-GIT\SISBusiness.WIN.Company\bin\Release\Microsoft.VisualStudio.TextManager.Interop.8.0.xml
@@ -1 +1 @@
-15fdea1c65862e1d2a5d9e355d3bcd0310810f86
+06a3300638193bd360738df8d01fb59b6b7d1a71
@@ -1 +1 @@
-046392a40e6bc4d0db998e4343f48af4dc0f78dc
+e72047c7910d9de9a8f55a3bcf5967305815f1db
@@ -1 +1 @@
-86ec421d1cd0a97000bfa16940137a13ed8f7832
+0a97ce923327cfc127887cac114cd13d24c2a964
@@ -1 +1 @@
-1d86177b4f4921dbef5c94381ebd6f31cdea325e
+30a8a57e4dd3b14964fa9d0f2c3e2eb9f6c26666
@@ -1 +1 @@
-bdc1c724f9330cdb2fc71fac73f1d0c4900afbfc
+e901ee7811df4fb598b7ea295209c672699ef456
@@ -1 +1 @@
-9260eec7487ece10a1d067ada3bb4d2a9ce5879a
+b7ddc0df248dccb7a0d9795fb519adfb7f08b8af
@@ -1 +1 @@
-791f4805b38b7fd065b58d8dd85522f0c21c98a6
+3a303bbc627931f9484c8a95b863a03b86f218bd
@@ -1 +1 @@
-d4d612cd1e4978fbd58e64518f05a5e0e17d257d
+dffd15ccacd0d91a272e40bd6c725ef96b6e936e
@@ -1 +1 @@
-0d54de3245707800ba0249c7ca344fe300ef9ccc
+b167f9b4fcc3ffa16996dedd466b5321fc5cb742
@@ -1 +1 @@
-c3f5fdfa027d3a4582eb439d31c4007ab60d5e93
+0988b3459e806358887b7177e39353dd665112d6
@@ -1 +1 @@
-70ec39d536b89fe736028e6b23186e497d2c2253
+004c01c7ef89a224e9701f04e20a4cab0901032f
@@ -1 +1 @@
-08a3b498d4a6bd25d41b2cff1a5cb386f7593cb5
+95d30ce48902d9196580d94fcd00b6d8e5c599ae
@@ -1 +1 @@
-19f6a9a15186a692e132a042b6a54e4134ae6822
+02c0e40b1fae1b898e371510cd82cf94f15eb431
@@ -1 +1 @@
-73aafb4549972cd5a5c596e684b7822f5fc72fcc
+25785f647255b2a8fce20da192cb5461e9ab91f4
@@ -1 +1 @@
-45f6835803b272b1c85e242fd175e17c7fb90486
+29d215f282c740b22da6262278b5eb32d0a7f42d
--- a/Show More
+++ b/Show More
				`@@ -0,0 +1 @@`
				`DevExpress.ExpressApp.ViewController, DevExpress.ExpressApp.v17.2, Version=17.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a`