First create solution

Nuvolar.Module/BusinessObjects/Financial/FinancialObjects/FinancialTransactions/Reports/DTR/GLReport.vb

@@ -0,0 +1,416 @@
+Imports System
+Imports System.ComponentModel
+Imports DevExpress.Xpo
+Imports DevExpress.Data.Filtering
+
+Imports DevExpress.ExpressApp
+Imports DevExpress.Persistent.Base
+Imports DevExpress.Persistent.BaseImpl
+Imports DevExpress.Persistent.Validation
+Imports DevExpress.Persistent.Base.General
+Imports System.Data.SqlClient
+Imports System.Configuration
+Imports System.Linq
+Imports System.Linq.Expressions
+Imports DevExpress.ExpressApp.ConditionalAppearance
+Imports DevExpress.ExpressApp.Editors
+
+'-- Fõkönyvi kivonat 
+'-- Fõkönyvi kimutatás részletes 2 féle nézettel (Grid, PivotGrid)
+Public Enum eGLReportType
+    GeneralLedger = 0
+    Controlling = 1
+End Enum
+Public Enum eGLReportDashboardType
+    eNoDashboard = 0
+    eDashboard1 = 1
+    eDashboard2 = 2
+    eDashboard3 = 3
+    eDashboard4 = 4
+End Enum
+Public Enum eGLReportOwner
+    ePublic = 0
+    ePrivate = 1
+End Enum
+Public Enum eGLReportState
+    eInProgress
+    eReady
+End Enum
+Public Enum eDateExecutionMode
+    eHeader = 0
+    eRows = 1
+End Enum
+Public Enum eGLReportCustomViewNumber
+    eNotSet = 0
+    e01 = 1
+    e02 = 2
+    e03 = 3
+    e04 = 4
+    e05 = 5
+    e06 = 6
+    e07 = 7
+    e08 = 8
+    e09 = 9
+    e10 = 10
+    e11 = 11
+    e12 = 12
+    e13 = 13
+    e14 = 14
+    e15 = 15
+    e16 = 16
+    e17 = 17
+    e18 = 18
+    e19 = 19
+    e20 = 20
+End Enum
+<DefaultClassOptions()> _
+<NavigationItem(False), CreatableItem(False)> _
+<ImageName("BO_Report")> _
+<DeferredDeletion(False)> _
+<Appearance("Disable UserCreated,ObjectCreated-GLReport",
+                      AppearanceItemType:="ViewItem",
+                      Enabled:=False,
+                      TargetItems:="ObjectCreated;UserCreated;QueryStatistics",
+                      Criteria:="1=1")> _
+<Appearance("Hide properties when ReportType=0",
+                      AppearanceItemType:="ViewItem",
+                      TargetItems:="IsInvoice;IsRegistry;IsContract",
+                      Criteria:="ReportType=0",
+                      visibility:=Editors.ViewItemVisibility.Hide,
+                      context:="DetailView")> _
+<Appearance("Hide GLReportRowsCostHolder",
+                      AppearanceItemType:="ViewItem",
+                      targetitems:="GLReportRowsCostHolder",
+                      criteria:="ReportType='GeneralLedger'",
+                      visibility:=Editors.ViewItemVisibility.Hide,
+                      context:="DetailView")> _
+<Appearance("Hide Criteria",
+                      AppearanceItemType:="ViewItem",
+                      targetitems:="Criteria",
+                      criteria:="ReportType != 'GeneralLedger'",
+                      visibility:=Editors.ViewItemVisibility.Hide,
+                      context:="DetailView")> _
+<Appearance("Hide GLReport CustomersFrom",
+                      AppearanceItemType:="ViewItem",
+                      targetitems:="CustomersFrom",
+                      criteria:="IsCustomersFrom=True",
+                      visibility:=Editors.ViewItemVisibility.Hide,
+                      context:="DetailView")> _
+<Appearance("Hide TabFilter",
+                      AppearanceItemType:="AppearanceItemType.LayoutItem",
+                      targetitems:="@TabFilter",
+                      criteria:="IsPublic=True",
+                      visibility:=Editors.ViewItemVisibility.Hide,
+                      context:="DetailView")> _
+<Appearance("Hide parameters when InPublic",
+                      AppearanceItemType:="ViewItem",
+                      targetitems:="GLReportCustomersFrom;GLReportChartOfAccounts;GLReportUsers;GLReportDateExecutionMode;CustomersFrom;" +
+                                   "GLReportDashboardType;ReportType;GroupName1;GroupName2;ShortName;ObjectCreated;UserCreated;IsInvoice;" +
+                                   "IsRegistry;IsContract;IsCustomersFrom;GLReportState;GLReportOwner", _
+                       criteria:="InPublic=True",
+                       visibility:=Editors.ViewItemVisibility.Hide,
+                       context:="DetailView")> _
+<Appearance("Disable dates when InPublic",
+                       AppearanceItemType:="ViewItem",
+                       Enabled:=False,
+                       TargetItems:="GLReportCustomersFrom;GLReportChartOfAccounts",
+                       Criteria:="InPublic=True")> _
+Public Class GLReport
+    Inherits BaseObject
+
+    Private _GLReportDashboardType As eGLReportDashboardType 'Report milyen mûszerfalra menjen fel
+    Private _ReportType As eGLReportType 'Report tipusa
+    Private _CustomersFrom As CustomersFrom 'Saját cég
+
+    Private _GroupName1 As String 'I. csoportosítás
+    Private _GroupName2 As String ' II. Csoportosítás
+    Private _ShortName As String 'Report megnevezése
+    Private _FromDate As Date 'Dátumtól
+    Private _ToDate As Date 'Dátumig
+    Private _ObjectCreated As Date 'Létrehozva
+    Private _UserCreated As User 'Létrehozta
+
+    Private _IsInvoice As Boolean = True
+    Private _IsRegistry As Boolean = True
+    Private _IsContract As Boolean = True
+
+    Private _IsCustomersFrom As Boolean = False 'True akkor cégfüggetlen lekérdezés
+    Private _GLReportState As eGLReportState = eGLReportState.eInProgress
+    Private _GLReportOwner As eGLReportOwner = eGLReportOwner.ePrivate
+    Private _GLReportDateExecutionMode As eDateExecutionMode = eDateExecutionMode.eHeader
+
+    Private _VariantSelectedItemID As String
+    Private _Criteria As String 'További kritéria
+    Public Sub New(ByVal session As Session)
+        MyBase.New(session)
+    End Sub
+    Public Overrides Sub AfterConstruction()
+        MyBase.AfterConstruction()
+        Me.IsContract = True
+        Me.IsInvoice = True
+        Me.IsRegistry = True
+        Me.FromDate = FirstDayOfYear(GetSQLTime(Session))
+        Me.ToDate = LastDayOfYear(GetSQLTime(Session))
+    End Sub
+    Protected Overrides Sub OnSaving()
+        MyBase.OnSaving()
+        If Session.IsNewObject(Me) Then
+            ObjectCreated = GetSQLTime(Session)
+            UserCreated = Session.GetObjectByKey(Of User)(Session.GetKeyValue(SecuritySystem.CurrentUser))
+        End If
+    End Sub
+    Protected Overrides Sub OnDeleting()
+        MyBase.OnDeleting()
+        Select Case GLOBAL_SQLType
+
+            Case eSQLType.PostgreSQL
+                Session.ExecuteNonQuery("delete from ""GLReportRowsCostHolder"" where ""GLReport""='" & Me.Oid.ToString & "'")
+                Session.ExecuteNonQuery("delete from ""GLReportRows"" where ""GLReport""='" & Me.Oid.ToString & "'")
+                Session.ExecuteNonQuery("delete from ""GLReportCustomersFrom"" where ""GLReport""='" & Me.Oid.ToString & "'")
+                Session.ExecuteNonQuery("delete from ""GLReportChartOfAccounts"" where ""GLReport""='" & Me.Oid.ToString & "'")
+            Case Else
+                Session.ExecuteNonQuery("delete from GLReportRowsCostHolder where GLReport='" & Me.Oid.ToString & "'")
+                Session.ExecuteNonQuery("delete from GLReportRows where GLReport='" & Me.Oid.ToString & "'")
+                Session.ExecuteNonQuery("delete from GLReportCustomersFrom where GLReport='" & Me.Oid.ToString & "'")
+                Session.ExecuteNonQuery("delete from GLReportChartOfAccounts where GLReport='" & Me.Oid.ToString & "'")
+        End Select
+    End Sub
+    Property GLReportDashboardType As eGLReportDashboardType
+        Get
+            Return _GLReportDashboardType
+        End Get
+        Set(value As eGLReportDashboardType)
+            SetPropertyValue("GLReportDashboardType", _GLReportDashboardType, value)
+        End Set
+    End Property
+    <ImmediatePostData()> _
+    Property ReportType As eGLReportType
+        Get
+            Return _ReportType
+        End Get
+        Set(value As eGLReportType)
+            SetPropertyValue("ReportType", _ReportType, value)
+        End Set
+    End Property
+
+    Property GroupName1 As String
+        Get
+            Return _GroupName1
+        End Get
+        Set(value As String)
+            SetPropertyValue("GroupName1", _GroupName1, value)
+        End Set
+    End Property
+    Property GroupName2 As String
+        Get
+            Return _GroupName2
+        End Get
+        Set(value As String)
+            SetPropertyValue("GroupName2", _GroupName2, value)
+        End Set
+    End Property
+    <RuleRequiredField("GLReport-ShortName", DefaultContexts.Save)> _
+    Property ShortName As String
+        Get
+            Return _ShortName
+        End Get
+        Set(ByVal value As String)
+            SetPropertyValue("ShortName", _ShortName, value)
+        End Set
+    End Property
+    Property FromDate As Date
+        Get
+            Return _FromDate
+        End Get
+        Set(value As Date)
+            SetPropertyValue("FromDate", _FromDate, value)
+        End Set
+    End Property
+    Property ToDate As Date
+        Get
+            Return _ToDate
+        End Get
+        Set(value As Date)
+            SetPropertyValue("ToDate", _ToDate, value)
+        End Set
+    End Property
+    Property CustomersFrom As CustomersFrom
+        Get
+            Return _CustomersFrom
+        End Get
+        Set(value As CustomersFrom)
+            SetPropertyValue("CustomersFrom", _CustomersFrom, value)
+        End Set
+    End Property
+    <NonCloneable()> _
+    Property ObjectCreated As Date
+        Get
+            Return _ObjectCreated
+        End Get
+        Set(value As Date)
+            SetPropertyValue("ObjectCreated", _ObjectCreated, value)
+        End Set
+    End Property
+    <NonCloneable()> _
+    Property UserCreated As User
+        Get
+            Return _UserCreated
+        End Get
+        Set(value As User)
+            SetPropertyValue("UserCreated", _UserCreated, value)
+        End Set
+    End Property
+
+    Property IsInvoice As Boolean
+        Get
+            Return _IsInvoice
+        End Get
+        Set(value As Boolean)
+            SetPropertyValue("IsInvoice", _IsInvoice, value)
+        End Set
+    End Property
+    Property IsRegistry As Boolean
+        Get
+            Return _IsRegistry
+        End Get
+        Set(value As Boolean)
+            SetPropertyValue("IsRegistry", _IsRegistry, value)
+        End Set
+    End Property
+    Property IsContract As Boolean
+        Get
+            Return _IsContract
+        End Get
+        Set(value As Boolean)
+            SetPropertyValue("IsContract", _IsContract, value)
+        End Set
+    End Property
+    <ImmediatePostData(True)> _
+    Property IsCustomersFrom As Boolean
+        Get
+            Return _IsCustomersFrom
+        End Get
+        Set(value As Boolean)
+            SetPropertyValue("IsCustomersFrom", _IsCustomersFrom, value)
+        End Set
+    End Property
+
+    <Browsable(False)> _
+    Property VariantSelectedItemID As String
+        Get
+            Return _VariantSelectedItemID
+        End Get
+        Set(value As String)
+            SetPropertyValue("VariantSelectedItemID", _VariantSelectedItemID, value)
+        End Set
+    End Property
+    Property GLReportState As eGLReportState
+        Get
+            Return _GLReportState
+        End Get
+        Set(value As eGLReportState)
+            SetPropertyValue("GLReportState", _GLReportState, value)
+        End Set
+    End Property
+    Property GLReportOwner As eGLReportOwner
+        Get
+            Return _GLReportOwner
+        End Get
+        Set(value As eGLReportOwner)
+            SetPropertyValue("GLReportOwner", _GLReportOwner, value)
+        End Set
+    End Property
+    Property GLReportDateExecutionMode As eDateExecutionMode
+        Get
+            Return _GLReportDateExecutionMode
+        End Get
+        Set(value As eDateExecutionMode)
+            SetPropertyValue("GLReportDateExecutionMode", _GLReportDateExecutionMode, value)
+        End Set
+    End Property
+
+    <CriteriaOptionsAttribute("ObjectType"), Size(-1)> _
+    Property Criteria As String
+        Get
+            Return _Criteria
+        End Get
+        Set(value As String)
+            SetPropertyValue("Criteria", _Criteria, value)
+        End Set
+    End Property
+    <NonPersistent(), MemberDesignTimeVisibility(False)> _
+    Public Property ObjectType() As Type
+        Get
+            Return GetType(GLRows)
+        End Get
+        Set(ByVal value As Type)
+
+        End Set
+    End Property
+    <Browsable(False)> _
+    ReadOnly Property InPublic As Boolean
+        Get
+            If Session.IsNewObject(Me) Then
+                Return False
+            Else
+                Dim _User As User = Session.GetObjectByKey(Of User)(Session.GetKeyValue(SecuritySystem.CurrentUser))
+                Dim _GLReportUsers As GLReportUsers
+                Dim _InPublic As Boolean = True
+                For Each _GLReportUsers In Me.GLReportUsers
+                    If _GLReportUsers.User.Oid = _User.Oid Then
+                        _InPublic = False
+                    End If
+                Next
+                If _UserCreated.Oid = _User.Oid Then
+                    _InPublic = False
+                End If
+                Return _InPublic
+            End If
+        End Get
+    End Property
+
+    '//XPCollections
+    <Association("GLReport-GLReportRows", GetType(GLReportRows)), VisibleInListView(False), VisibleInLookupListView(False)> _
+    ReadOnly Property GLReportRows As XPCollection(Of GLReportRows)
+        Get
+            Return GetCollection(Of GLReportRows)("GLReportRows")
+        End Get
+    End Property
+    <VisibleInListView(False), VisibleInLookupListView(False)> _
+    ReadOnly Property GLReportRowsCostHolder As XPCollection(Of GLReportRowsCostHolder)
+        Get
+            Dim _GLReportRowsCostHolder_Collection As New XPCollection(Of GLReportRowsCostHolder)(Session, CriteriaOperator.Parse("GLReport=?", Me))
+            Return _GLReportRowsCostHolder_Collection
+        End Get
+    End Property
+
+
+    '//Szűrőfeltételek
+    <Association("GLReport-GLReportCustomersFrom", GetType(GLReportCustomersFrom)), VisibleInListView(False), VisibleInLookupListView(False)> _
+    ReadOnly Property GLReportCustomersFrom As XPCollection(Of GLReportCustomersFrom)
+        Get
+            Return GetCollection(Of GLReportCustomersFrom)("GLReportCustomersFrom")
+        End Get
+    End Property
+    <Association("GLReport-GLReportChartOfAccounts", GetType(GLReportChartOfAccounts))> _
+    <VisibleInListView(False), VisibleInLookupListView(False)> _
+    ReadOnly Property GLReportChartOfAccounts As XPCollection(Of GLReportChartOfAccounts)
+        Get
+            Return GetCollection(Of GLReportChartOfAccounts)("GLReportChartOfAccounts")
+        End Get
+    End Property
+    <VisibleInListView(False), VisibleInLookupListView(False)> _
+    ReadOnly Property QueryStatistics As XPCollection(Of QueryStatistics)
+        Get
+            Return New XPCollection(Of QueryStatistics)(Session, CriteriaOperator.Parse("ObjectName=? and ObjectKey=?", "GLReport", Me.Oid))
+        End Get
+    End Property
+    <VisibleInListView(False), VisibleInLookupListView(False)> _
+    <Association("GLReport-GLReportUsers", GetType(GLReportUsers))> _
+    ReadOnly Property GLReportUsers As XPCollection(Of GLReportUsers)
+        Get
+            Return GetCollection(Of GLReportUsers)("GLReportUsers")
+        End Get
+    End Property
+
+End Class

Nuvolar.Module/BusinessObjects/Financial/FinancialObjects/FinancialTransactions/Reports/DTR/GLReportCashflowHeader.vb

@@ -0,0 +1,133 @@
+Imports System
+Imports System.ComponentModel
+
+Imports DevExpress.Xpo
+Imports DevExpress.Data.Filtering
+
+Imports DevExpress.ExpressApp
+Imports DevExpress.Persistent.Base
+Imports DevExpress.Persistent.BaseImpl
+Imports DevExpress.Persistent.Validation
+Imports DevExpress.ExpressApp.ConditionalAppearance
+Imports DevExpress.ExpressApp.Editors
+
+<DefaultClassOptions(), NavigationItem(False), CreatableItem(False)> _
+<Appearance("Hide CustomersFrom if IsCustomersFrom=True", AppearanceItemType:="ViewItem", criteria:="IsCustomersFrom=True", targetitems:="CustomersFrom", visibility:=ViewItemVisibility.Hide)> _
+Public Class GLReportCashflowHeader
+    Inherits BaseObject
+
+    Private _GLReportDashboardType As eGLReportDashboardType
+    Private _CustomersFrom As CustomersFrom
+    Private _ShortName As String
+    Private _FromDate As Date
+    Private _ToDate As Date
+    Private _ObjectCreated As Date
+    Private _UserCreated As User
+    Private _IsCustomersFrom As Boolean = False 'True akkor cégfüggetlen lekérdezés
+
+    Public Sub New(ByVal session As Session)
+        MyBase.New(session)
+        ' This constructor is used when an object is loaded from a persistent storage.
+        ' Do not place any code here or place it only when the IsLoading property is false:
+        ' if (!IsLoading){
+        '   It is now OK to place your initialization code here.
+        ' }
+        ' or as an alternative, move your initialization code into the AfterConstruction method.
+    End Sub
+    Protected Overrides Sub OnSaving()
+        MyBase.OnSaving()
+        MyBase.OnSaving()
+        If Session.IsNewObject(Me) Then
+            ObjectCreated = GetSQLTime(Session)
+            UserCreated = Session.GetObjectByKey(Of User)(Session.GetKeyValue(SecuritySystem.CurrentUser))
+        End If
+    End Sub
+    Public Overrides Sub AfterConstruction()
+        MyBase.AfterConstruction()
+        ' Place here your initialization code.
+        Me.FromDate = FirstDayOfYear(GetSQLTime(Session))
+        Me.ToDate = LastDayOfYear(GetSQLTime(Session))
+    End Sub
+
+    Property GLReportDashboardType As eGLReportDashboardType
+        Get
+            Return _GLReportDashboardType
+        End Get
+        Set(value As eGLReportDashboardType)
+            SetPropertyValue("GLReportDashboardType", _GLReportDashboardType, value)
+        End Set
+    End Property
+    Property CustomersFrom As CustomersFrom
+        Get
+            Return _CustomersFrom
+        End Get
+        Set(value As CustomersFrom)
+            SetPropertyValue("CustomersFrom", _CustomersFrom, value)
+        End Set
+    End Property
+    <RuleRequiredField("GLReportCashflowHeader-ShortName", DefaultContexts.Save)> _
+    Property ShortName As String
+        Get
+            Return _ShortName
+        End Get
+        Set(ByVal value As String)
+            SetPropertyValue("ShortName", _ShortName, value)
+        End Set
+    End Property
+    Property FromDate As Date
+        Get
+            Return _FromDate
+        End Get
+        Set(value As Date)
+            SetPropertyValue("FromDate", _FromDate, value)
+        End Set
+    End Property
+    Property ToDate As Date
+        Get
+            Return _ToDate
+        End Get
+        Set(value As Date)
+            SetPropertyValue("ToDate", _ToDate, value)
+        End Set
+    End Property
+    <NonCloneable> _
+    Property ObjectCreated As Date
+        Get
+            Return _ObjectCreated
+        End Get
+        Set(value As Date)
+            SetPropertyValue("ObjectCreated", _ObjectCreated, value)
+        End Set
+    End Property
+    <NonCloneable> _
+    Property UserCreated As User
+        Get
+            Return _UserCreated
+        End Get
+        Set(value As User)
+            SetPropertyValue("UserCreated", _UserCreated, value)
+        End Set
+    End Property
+    <ImmediatePostData(True)> _
+    Property IsCustomersFrom As Boolean
+        Get
+            Return _IsCustomersFrom
+        End Get
+        Set(value As Boolean)
+            SetPropertyValue("IsCustomersFrom", _IsCustomersFrom, value)
+        End Set
+    End Property
+
+    <Association("GLReportCashflowHeader-GLReportCashflowRows", GetType(GLReportCashflowRows)), VisibleInListView(False), VisibleInLookupListView(False)> _
+    ReadOnly Property GLReportCashflowRows As XPCollection(Of GLReportCashflowRows)
+        Get
+            Return GetCollection(Of GLReportCashflowRows)("GLReportCashflowRows")
+        End Get
+    End Property
+    <VisibleInListView(False), VisibleInLookupListView(False)> _
+    ReadOnly Property QueryStatistics As XPCollection(Of QueryStatistics)
+        Get
+            Return New XPCollection(Of QueryStatistics)(Session, CriteriaOperator.Parse("ObjectName=? and ObjectKey=?", "GLReportCashflowHeader", Me.Oid))
+        End Get
+    End Property
+End Class

Nuvolar.Module/BusinessObjects/Financial/FinancialObjects/FinancialTransactions/Reports/DTR/GLReportCashflowRows.vb

@@ -0,0 +1,242 @@
+Imports System
+Imports System.ComponentModel
+
+Imports DevExpress.Xpo
+Imports DevExpress.Data.Filtering
+
+Imports DevExpress.ExpressApp
+Imports DevExpress.Persistent.Base
+Imports DevExpress.Persistent.BaseImpl
+Imports DevExpress.Persistent.Validation
+Imports DevExpress.ExpressApp.ConditionalAppearance
+
+<DefaultClassOptions(), NavigationItem(False), CreatableItem(False)> _
+<Appearance("Color Blue when not from GLRows II", AppearanceItemType:="ViewItem", Fontcolor:="Blue", targetitems:="*", Criteria:="GLReportRowsState in ('eRegistry','eInvoice')")> _
+Public Class GLReportCashflowRows
+    Inherits BaseObject
+    Private _GLReportRowsState As eGLReportRowsState
+    Private _GLReportCashflowHeader As GLReportCashflowHeader
+    Private _ChartOfAccounts As ChartOfAccounts
+    Private _Controlling As Controlling
+    Private _CostHolder As CostHolder
+    Private _CostPlace As CostPlace
+    Private _UniqueObjects As UniqueObjects
+    Private _JobNumberObjects As JobNumberObjects
+    Private _CustomersFrom As CustomersFrom
+    Private _Customers As Customers
+    Private _ConnectInfo As String
+    Private _DateExecution_Y As String
+    Private _DateExecution_Q As String
+    Private _DateExecution_M As String
+    Private _DateExecution_W As String
+    Private _DateExecution As Date
+    Private _LiquidAssets As LiquidAssets
+    Private _AmountHUF_Open As Double
+    Private _AmountDEV_Open As Double
+    Private _InAmountHUF As Double = 0 'Pénztár miatt befizetés
+    Private _OutAmountHUF As Double = 0 'Pénztár miatt kifizetés
+    Private _InAmountDEV As Double = 0 'Pénztár miatt befizetés
+    Private _OutAmountDEV As Double = 0 'Pénztár miatt kifizetés
+
+
+    Public Sub New(ByVal session As Session)
+        MyBase.New(session)
+        ' This constructor is used when an object is loaded from a persistent storage.
+        ' Do not place any code here or place it only when the IsLoading property is false:
+        ' if (!IsLoading){
+        '   It is now OK to place your initialization code here.
+        ' }
+        ' or as an alternative, move your initialization code into the AfterConstruction method.
+    End Sub
+    Public Overrides Sub AfterConstruction()
+        MyBase.AfterConstruction()
+        ' Place here your initialization code.
+    End Sub
+
+    Property GLReportRowsState As eGLReportRowsState
+        Get
+            Return _GLReportRowsState
+        End Get
+        Set(value As eGLReportRowsState)
+            SetPropertyValue("GLReportRowsState", _GLReportRowsState, value)
+        End Set
+    End Property
+    <Association("GLReportCashflowHeader-GLReportCashflowRows", GetType(GLReportCashflowHeader))> _
+    Property GLReportCashflowHeader As GLReportCashflowHeader
+        Get
+            Return _GLReportCashflowHeader
+        End Get
+        Set(value As GLReportCashflowHeader)
+            SetPropertyValue("GLReportCashflowHeader", _GLReportCashflowHeader, value)
+        End Set
+    End Property
+    Property ChartOfAccounts As ChartOfAccounts
+        Get
+            Return _ChartOfAccounts
+        End Get
+        Set(value As ChartOfAccounts)
+            SetPropertyValue("ChartOfAccounts", _ChartOfAccounts, value)
+        End Set
+    End Property
+    <ImmediatePostData(True), DataSourceCriteria("IsParent=False")>
+    Property Controlling As Controlling
+        Get
+            Return _Controlling
+        End Get
+        Set(ByVal value As Controlling)
+            SetPropertyValue("Controlling", _Controlling, value)
+        End Set
+    End Property
+    Property UniqueObjects As UniqueObjects
+        Get
+            Return _UniqueObjects
+        End Get
+        Set(ByVal value As UniqueObjects)
+            SetPropertyValue("UniqueObjects", _UniqueObjects, value)
+        End Set
+    End Property
+    Property CostHolder As CostHolder
+        Get
+            Return _CostHolder
+        End Get
+        Set(ByVal value As CostHolder)
+            SetPropertyValue("CostHolder", _CostHolder, value)
+        End Set
+    End Property
+    Property CostPlace As CostPlace
+        Get
+            Return _CostPlace
+        End Get
+        Set(ByVal value As CostPlace)
+            SetPropertyValue("CostPlace", _CostPlace, value)
+        End Set
+    End Property
+    Property JobNumberObjects As JobNumberObjects
+        Get
+            Return _JobNumberObjects
+        End Get
+        Set(ByVal value As JobNumberObjects)
+            SetPropertyValue("JobNumberObjects", _JobNumberObjects, value)
+        End Set
+    End Property
+    Property CustomersFrom As CustomersFrom
+        Get
+            Return _CustomersFrom
+        End Get
+        Set(value As CustomersFrom)
+            SetPropertyValue("CustomersFrom", _CustomersFrom, value)
+        End Set
+    End Property
+    Property Customers As Customers
+        Get
+            Return _Customers
+        End Get
+        Set(value As Customers)
+            SetPropertyValue("Customers", _Customers, value)
+        End Set
+    End Property
+    Property ConnectInfo As String
+        Get
+            Return _ConnectInfo
+        End Get
+        Set(value As String)
+            SetPropertyValue("ConnectInfo", _ConnectInfo, value)
+        End Set
+    End Property
+    Property DateExecution_Y As String
+        Get
+            Return _DateExecution_Y
+        End Get
+        Set(value As String)
+            SetPropertyValue("DateExecution_Y", _DateExecution_Y, value)
+        End Set
+    End Property
+    Property DateExecution_Q As String
+        Get
+            Return _DateExecution_Q
+        End Get
+        Set(value As String)
+            SetPropertyValue("DateExecution_Q", _DateExecution_Q, value)
+        End Set
+    End Property
+    Property DateExecution_M As String
+        Get
+            Return _DateExecution_M
+        End Get
+        Set(value As String)
+            SetPropertyValue("DateExecution_M", _DateExecution_M, value)
+        End Set
+    End Property
+    Property DateExecution_W As String
+        Get
+            Return _DateExecution_W
+        End Get
+        Set(value As String)
+            SetPropertyValue("DateExecution_W", _DateExecution_W, value)
+        End Set
+    End Property
+    Property DateExecution As Date
+        Get
+            Return _DateExecution
+        End Get
+        Set(value As Date)
+            SetPropertyValue("DateExecution", _DateExecution, value)
+        End Set
+    End Property
+    Property LiquidAssets As LiquidAssets
+        Get
+            Return _LiquidAssets
+        End Get
+        Set(value As LiquidAssets)
+            SetPropertyValue("LiquidAssets", _LiquidAssets, value)
+        End Set
+    End Property
+    Property AmountHUF_Open As Double
+        Get
+            Return _AmountHUF_Open
+        End Get
+        Set(value As Double)
+            SetPropertyValue("AmountHUF_Open", _AmountHUF_Open, value)
+        End Set
+    End Property
+    Property AmountDEV_Open As Double
+        Get
+            Return _AmountDEV_Open
+        End Get
+        Set(value As Double)
+            SetPropertyValue("AmountDEV_Open", _AmountDEV_Open, value)
+        End Set
+    End Property
+    Property InAmountHUF As Double
+        Get
+            Return _InAmountHUF
+        End Get
+        Set(ByVal value As Double)
+            SetPropertyValue("InAmountHUF", _InAmountHUF, value)
+        End Set
+    End Property
+    Property OutAmountHUF As Double
+        Get
+            Return _OutAmountHUF
+        End Get
+        Set(ByVal value As Double)
+            SetPropertyValue("OutAmountHUF", _OutAmountHUF, value)
+        End Set
+    End Property
+    Property InAmountDEV As Double
+        Get
+            Return _InAmountDEV
+        End Get
+        Set(ByVal value As Double)
+            SetPropertyValue("InAmountDEV", _InAmountDEV, Math.Round(value, 4, MidpointRounding.AwayFromZero))
+        End Set
+    End Property
+    Property OutAmountDEV As Double
+        Get
+            Return _OutAmountDEV
+        End Get
+        Set(ByVal value As Double)
+            SetPropertyValue("OutAmountDEV", _OutAmountDEV, Math.Round(value, 4, MidpointRounding.AwayFromZero))
+        End Set
+    End Property
+End Class

Nuvolar.Module/BusinessObjects/Financial/FinancialObjects/FinancialTransactions/Reports/DTR/GLReportCashflowVC.Designer.vb

@@ -0,0 +1,65 @@
+Partial Class GLReportCashflowVC
+
+	<System.Diagnostics.DebuggerNonUserCode()> _
+	Public Sub New(ByVal Container As System.ComponentModel.IContainer)
+		MyClass.New()
+
+		'Required for Windows.Forms Class Composition Designer support
+		Container.Add(Me)
+
+	End Sub
+
+	'Component overrides dispose to clean up the component list.
+	<System.Diagnostics.DebuggerNonUserCode()> _
+	Protected Overrides Sub Dispose(ByVal disposing As Boolean)
+		If disposing AndAlso components IsNot Nothing Then
+			components.Dispose()
+		End If
+		MyBase.Dispose(disposing)
+	End Sub
+
+	'Required by the Component Designer
+	Private components As System.ComponentModel.IContainer
+
+	'NOTE: The following procedure is required by the Component Designer
+	'It can be modified using the Component Designer.
+	'Do not modify it using the code editor.
+	<System.Diagnostics.DebuggerStepThrough()> _
+	Private Sub InitializeComponent()
+        Me.components = New System.ComponentModel.Container()
+        Me.aGenerateGLReportCashflow = New DevExpress.ExpressApp.Actions.SimpleAction(Me.components)
+        Me.aViewAttachments_Cashflow = New DevExpress.ExpressApp.Actions.SimpleAction(Me.components)
+        '
+        'aGenerateGLReportCashflow
+        '
+        Me.aGenerateGLReportCashflow.Caption = "aGenerateGLReportCashflow"
+        Me.aGenerateGLReportCashflow.Category = "View"
+        Me.aGenerateGLReportCashflow.ConfirmationMessage = "Do you want to execute command ?"
+        Me.aGenerateGLReportCashflow.Id = "aGenerateGLReportCashflow"
+        Me.aGenerateGLReportCashflow.ImageName = "stopwatch_run"
+        Me.aGenerateGLReportCashflow.Shortcut = Nothing
+        Me.aGenerateGLReportCashflow.Tag = Nothing
+        Me.aGenerateGLReportCashflow.TargetObjectsCriteria = Nothing
+        Me.aGenerateGLReportCashflow.TargetViewId = ""
+        Me.aGenerateGLReportCashflow.ToolTip = Nothing
+        Me.aGenerateGLReportCashflow.TypeOfView = Nothing
+        '
+        'aViewAttachments_Cashflow
+        '
+        Me.aViewAttachments_Cashflow.Caption = "View attachments"
+        Me.aViewAttachments_Cashflow.ConfirmationMessage = Nothing
+        Me.aViewAttachments_Cashflow.Id = "aViewAttachments_Cashflow"
+        Me.aViewAttachments_Cashflow.ImageName = "printer_view"
+        Me.aViewAttachments_Cashflow.Shortcut = Nothing
+        Me.aViewAttachments_Cashflow.Tag = Nothing
+        Me.aViewAttachments_Cashflow.TargetObjectsCriteria = Nothing
+        Me.aViewAttachments_Cashflow.TargetObjectType = GetType(Nuvolar.[Module].GLReportCashflowRows)
+        Me.aViewAttachments_Cashflow.TargetViewId = ""
+        Me.aViewAttachments_Cashflow.ToolTip = Nothing
+        Me.aViewAttachments_Cashflow.TypeOfView = Nothing
+
+    End Sub
+    Friend WithEvents aGenerateGLReportCashflow As DevExpress.ExpressApp.Actions.SimpleAction
+    Friend WithEvents aViewAttachments_Cashflow As DevExpress.ExpressApp.Actions.SimpleAction
+
+End Class

Nuvolar.Module/BusinessObjects/Financial/FinancialObjects/FinancialTransactions/Reports/DTR/GLReportCashflowVC.resx

@@ -0,0 +1,129 @@
+<?xml version="1.0" encoding="utf-8"?>
+<root>
+  <!-- 
+    Microsoft ResX Schema 
+    
+    Version 2.0
+    
+    The primary goals of this format is to allow a simple XML format 
+    that is mostly human readable. The generation and parsing of the 
+    various data types are done through the TypeConverter classes 
+    associated with the data types.
+    
+    Example:
+    
+    ... ado.net/XML headers & schema ...
+    <resheader name="resmimetype">text/microsoft-resx</resheader>
+    <resheader name="version">2.0</resheader>
+    <resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
+    <resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
+    <data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
+    <data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
+    <data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
+        <value>[base64 mime encoded serialized .NET Framework object]</value>
+    </data>
+    <data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+        <value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
+        <comment>This is a comment</comment>
+    </data>
+                
+    There are any number of "resheader" rows that contain simple 
+    name/value pairs.
+    
+    Each data row contains a name, and value. The row also contains a 
+    type or mimetype. Type corresponds to a .NET class that support 
+    text/value conversion through the TypeConverter architecture. 
+    Classes that don't support this are serialized and stored with the 
+    mimetype set.
+    
+    The mimetype is used for serialized objects, and tells the 
+    ResXResourceReader how to depersist the object. This is currently not 
+    extensible. For a given mimetype the value must be set accordingly:
+    
+    Note - application/x-microsoft.net.object.binary.base64 is the format 
+    that the ResXResourceWriter will generate, however the reader can 
+    read any of the formats listed below.
+    
+    mimetype: application/x-microsoft.net.object.binary.base64
+    value   : The object must be serialized with 
+            : System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
+            : and then encoded with base64 encoding.
+    
+    mimetype: application/x-microsoft.net.object.soap.base64
+    value   : The object must be serialized with 
+            : System.Runtime.Serialization.Formatters.Soap.SoapFormatter
+            : and then encoded with base64 encoding.
+
+    mimetype: application/x-microsoft.net.object.bytearray.base64
+    value   : The object must be serialized into a byte array 
+            : using a System.ComponentModel.TypeConverter
+            : and then encoded with base64 encoding.
+    -->
+  <xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
+    <xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
+    <xsd:element name="root" msdata:IsDataSet="true">
+      <xsd:complexType>
+        <xsd:choice maxOccurs="unbounded">
+          <xsd:element name="metadata">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" />
+              </xsd:sequence>
+              <xsd:attribute name="name" use="required" type="xsd:string" />
+              <xsd:attribute name="type" type="xsd:string" />
+              <xsd:attribute name="mimetype" type="xsd:string" />
+              <xsd:attribute ref="xml:space" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="assembly">
+            <xsd:complexType>
+              <xsd:attribute name="alias" type="xsd:string" />
+              <xsd:attribute name="name" type="xsd:string" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="data">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
+                <xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
+              </xsd:sequence>
+              <xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
+              <xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
+              <xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
+              <xsd:attribute ref="xml:space" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="resheader">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
+              </xsd:sequence>
+              <xsd:attribute name="name" type="xsd:string" use="required" />
+            </xsd:complexType>
+          </xsd:element>
+        </xsd:choice>
+      </xsd:complexType>
+    </xsd:element>
+  </xsd:schema>
+  <resheader name="resmimetype">
+    <value>text/microsoft-resx</value>
+  </resheader>
+  <resheader name="version">
+    <value>2.0</value>
+  </resheader>
+  <resheader name="reader">
+    <value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+  </resheader>
+  <resheader name="writer">
+    <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+  </resheader>
+  <metadata name="aGenerateGLReportCashflow.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>17, 56</value>
+  </metadata>
+  <metadata name="aViewAttachments_Cashflow.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>17, 95</value>
+  </metadata>
+  <metadata name="$this.TrayLargeIcon" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
+    <value>False</value>
+  </metadata>
+</root>

Nuvolar.Module/BusinessObjects/Financial/FinancialObjects/FinancialTransactions/Reports/DTR/GLReportCashflowVC.vb

@@ -0,0 +1,355 @@
+Imports System
+Imports System.ComponentModel
+Imports System.Collections.Generic
+Imports System.Diagnostics
+Imports System.Text
+
+Imports DevExpress.ExpressApp
+Imports DevExpress.ExpressApp.Actions
+Imports DevExpress.Persistent.Base
+Imports DevExpress.Xpo
+Imports DevExpress.Data.Filtering
+Imports DevExpress.ExpressApp.SystemModule
+
+Public Class GLReportCashflowVC
+    Inherits DevExpress.ExpressApp.ViewController
+
+    Public Event InitWork(ByVal _Minimum As Long, ByVal _Step As Long, ByVal _Maximum As Long)
+    Public Event DoWork()
+    Public Event FinalWork
+
+    Public Sub New()
+        MyBase.New()
+
+        'This call is required by the Component Designer.
+        InitializeComponent()
+        RegisterActions(components)
+
+    End Sub
+    Protected Overrides Sub OnActivated()
+        MyBase.OnActivated()
+        Frame.GetController(Of GLReportCashflowVC).aGenerateGLReportCashflow.Active.SetItemValue("", False)
+        If View.Id = "GLReportCashflowHeader_DetailView" Then
+            Frame.GetController(Of GLReportCashflowVC).aGenerateGLReportCashflow.Active.SetItemValue("", True)
+
+        End If
+        If View.Id = "GLReportCashflowHeader_GLReportCashflowRows_ListView_Table" Or _
+            View.Id = "GLReportCashflowHeader_GLReportCashflowRows_ListView_Pivot" Then
+            Frame.GetController(Of GLReportCashflowVC).aGenerateGLReportCashflow.Active.SetItemValue("", True)
+        End If
+    End Sub
+    Protected Overrides Sub OnDeactivated()
+        MyBase.OnDeactivated()
+        If View.Id = "GLReportCashflowHeader_DetailView" Then
+            Frame.GetController(Of GLReportCashflowVC).aGenerateGLReportCashflow.Active.SetItemValue("", False)
+
+        End If
+        If View.Id = "GLReportCashflowHeader_GLReportCashflowRows_ListView_Table" Or _
+            View.Id = "GLReportCashflowHeader_GLReportCashflowRows_ListView_Pivot" Then
+            Frame.GetController(Of GLReportCashflowVC).aGenerateGLReportCashflow.Active.SetItemValue("", False)
+        End If
+    End Sub
+
+    Private Sub aGenerateGLReportCashflow_Execute(sender As System.Object, e As DevExpress.ExpressApp.Actions.SimpleActionExecuteEventArgs) Handles aGenerateGLReportCashflow.Execute
+        Dim _ocur As Xpo.XPObjectSpace = TryCast(View.ObjectSpace, Xpo.XPObjectSpace)
+        Dim _uow As UnitOfWork = New UnitOfWork(_ocur.Session.DataLayer)
+        Dim _uow_stat As UnitOfWork = New UnitOfWork(_ocur.Session.DataLayer)
+        Dim _GLReportCashflowHeader As GLReportCashflowHeader = Nothing
+        Dim _GLReportCashflowRows As GLReportCashflowRows = Nothing
+        Dim _PCIDetailCollection As XPCollection(Of PCIDetail)
+
+
+        If TryCast(View, ListView) IsNot Nothing Then
+            Dim _ListView As ListView = TryCast(View, ListView)
+            Dim _PropertyCollectionSource As PropertyCollectionSource = TryCast(_ListView.CollectionSource, PropertyCollectionSource)
+
+            If _PropertyCollectionSource IsNot Nothing Then
+                _GLReportCashflowHeader = _uow.GetObjectByKey(Of GLReportCashflowHeader)(TryCast(_PropertyCollectionSource.MasterObject, GLReportCashflowHeader).Oid)
+            Else
+                _GLReportCashflowRows = TryCast(_ListView.CollectionSource.List(0), GLReportCashflowRows)
+                If _GLReportCashflowRows IsNot Nothing Then
+                    _GLReportCashflowHeader = _uow.GetObjectByKey(Of GLReportCashflowHeader)(_GLReportCashflowRows.GLReportCashflowHeader.Oid)
+                End If
+            End If
+        ElseIf TryCast(View, DetailView) IsNot Nothing Then
+            _GLReportCashflowHeader = _uow.GetObjectByKey(Of GLReportCashflowHeader)(TryCast(View.SelectedObjects(0), GLReportCashflowHeader).Oid)
+        End If
+
+        If _GLReportCashflowHeader Is Nothing Then Exit Sub
+
+        Dim _QueryStatistics As QueryStatistics = New QueryStatistics(_uow_stat)
+        _QueryStatistics.TimeStart = GetSQLTime(_uow_stat)
+        _QueryStatistics.ObjectKey = _GLReportCashflowHeader.Oid
+        _QueryStatistics.ObjectName = "GLReportCashflowHeader"
+
+        Dim _GLReportCashflowRows_Collection As New XPCollection(Of GLReportCashflowRows)(_uow, CriteriaOperator.Parse("GLReportCashflowHeader.Oid=?", _GLReportCashflowHeader))
+        _uow.Delete(_GLReportCashflowRows_Collection)
+
+        '//Pénzeszközönként fel kell vinni a nyitót ami a FromDate-t megelõzõ idõszak
+
+
+        '// --------------------------------- Most a beérkezett p.ü. teljesítések --------------------------------------------------
+        If _GLReportCashflowHeader.IsCustomersFrom Then
+            _PCIDetailCollection = New XPCollection(Of PCIDetail)(_uow, CriteriaOperator.Parse("GetDate(DateExecution) between (?,?) and GLRows.GLHeader.GLDocumentType in ('eGLBank','eGLCassa','eGLCompensation')", _
+                                    _GLReportCashflowHeader.FromDate.Date, _GLReportCashflowHeader.ToDate.Date))
+        Else
+            _PCIDetailCollection = New XPCollection(Of PCIDetail)(_uow, CriteriaOperator.Parse("CustomersFrom.Oid=? and GetDate(DateExecution) between (?,?) and GLRows.GLHeader.GLDocumentType in ('eGLBank','eGLCassa','eGLCompensation')", _
+                                    _GLReportCashflowHeader.CustomersFrom.Oid, _GLReportCashflowHeader.FromDate.Date, _GLReportCashflowHeader.ToDate.Date))
+        End If
+        Dim _PCIDetail As PCIDetail
+        RaiseEvent InitWork(1, 1, _PCIDetailCollection.Count)
+        _QueryStatistics.RecordNumber = _PCIDetailCollection.Count
+        For Each _PCIDetail In _PCIDetailCollection
+            RaiseEvent DoWork()
+            If _PCIDetail.GLRows.PartnerType = ePartnerType.eNotSet Then
+                '// Normál tétel
+                _GLReportCashflowRows = New GLReportCashflowRows(_uow)
+                _GLReportCashflowRows.GLReportRowsState = eGLReportRowsState.eGLFinal
+                _GLReportCashflowRows.GLReportCashflowHeader = _GLReportCashflowHeader
+
+                _GLReportCashflowRows.CustomersFrom = _PCIDetail.CustomersFrom
+                _GLReportCashflowRows.Customers = _PCIDetail.Customers
+                _GLReportCashflowRows.ConnectInfo = _PCIDetail.ConnectInfo
+
+                _GLReportCashflowRows.LiquidAssets = _PCIDetail.GLRows.LiquidAssets
+                _GLReportCashflowRows.DateExecution = _PCIDetail.GLRows.GLHeader.DateExecution
+
+                _GLReportCashflowRows.DateExecution_Y = AlignStr(DatePart(DateInterval.Year, _GLReportCashflowRows.DateExecution).ToString, eDirection.Left, "0", 4)
+                _GLReportCashflowRows.DateExecution_Q = AlignStr(DatePart(DateInterval.Quarter, _GLReportCashflowRows.DateExecution).ToString, eDirection.Left, "0", 2)
+                _GLReportCashflowRows.DateExecution_M = AlignStr(DatePart(DateInterval.Month, _GLReportCashflowRows.DateExecution).ToString, eDirection.Left, "0", 2)
+                _GLReportCashflowRows.DateExecution_W = AlignStr(DatePart(DateInterval.WeekOfYear, _GLReportCashflowRows.DateExecution).ToString, eDirection.Left, "0", 2)
+
+                _GLReportCashflowRows.InAmountHUF = _PCIDetail.GLRows.InAmountHUF
+                _GLReportCashflowRows.InAmountDEV = _PCIDetail.GLRows.InAmountDEV
+                _GLReportCashflowRows.OutAmountHUF = _PCIDetail.GLRows.OutAmountHUF
+                _GLReportCashflowRows.OutAmountDEV = _PCIDetail.GLRows.OutAmountDEV
+
+                If _PCIDetail.GLRows.DebitChartOfAccounts Is _PCIDetail.GLRows.LiquidAssets.GetChartOfAccounts(_PCIDetail.DateExecution.Year, 0) Then
+                    _GLReportCashflowRows.ChartOfAccounts = _PCIDetail.GLRows.CreditChartOfAccounts
+                Else
+                    _GLReportCashflowRows.ChartOfAccounts = _PCIDetail.GLRows.DebitChartOfAccounts
+                End If
+                _GLReportCashflowRows.Controlling = _PCIDetail.GLRows.Controlling
+                _GLReportCashflowRows.CostHolder = _PCIDetail.GLRows.CostHolder
+                _GLReportCashflowRows.CostPlace = _PCIDetail.GLRows.CostPlace
+                _GLReportCashflowRows.UniqueObjects = _PCIDetail.GLRows.UniqueObjects
+                _GLReportCashflowRows.JobNumberObjects = _PCIDetail.GLRows.JobNumberObjects
+            Else
+                '//GLAccountban keresés
+                Dim _GLAccounts As GLAccounts = _uow.FindObject(Of GLAccounts)(CriteriaOperator.Parse("CustomersFrom=? and Customers=? and PartnerType=? and ConnectInfo=?", _PCIDetail.CustomersFrom, _PCIDetail.Customers, _PCIDetail.PartnerType, _PCIDetail.ConnectInfo))
+
+                If _GLAccounts IsNot Nothing Then
+                    Dim _GLRows As GLRows
+                    Dim _AmountHUFVAT As Double = 0
+                    Dim _AmountDEVVAT As Double = 0
+
+
+                    For Each _GLRows In _GLAccounts.GLRows
+                        If _GLRows.GLRowsTypeVAT = eGLRowsTypeVAT.eVATRow Then
+                            _AmountHUFVAT += _GLRows.AmountHUF
+                            _AmountDEVVAT += _GLRows.AmountDEV
+                        End If
+                    Next
+
+                    Dim _AmountHUFNetto As Double = _GLAccounts.AmountHUFBrutto - _AmountHUFVAT
+                    Dim _AmountDEVNetto As Double = _GLAccounts.AmountDEVBrutto - _AmountDEVVAT
+
+                    For Each _GLRows In _GLAccounts.GLRows
+                        If _GLRows.GLRowsTypeVAT = eGLRowsTypeVAT.eNettoRow Then
+                            _GLReportCashflowRows = New GLReportCashflowRows(_uow)
+                            _GLReportCashflowRows.GLReportRowsState = eGLReportRowsState.eGLFinal
+                            _GLReportCashflowRows.GLReportCashflowHeader = _GLReportCashflowHeader
+
+                            _GLReportCashflowRows.CustomersFrom = _PCIDetail.CustomersFrom
+                            _GLReportCashflowRows.Customers = _PCIDetail.Customers
+                            _GLReportCashflowRows.ConnectInfo = _PCIDetail.ConnectInfo
+
+                            _GLReportCashflowRows.LiquidAssets = _PCIDetail.GLRows.LiquidAssets
+                            _GLReportCashflowRows.DateExecution = _PCIDetail.GLRows.GLHeader.DateExecution
+
+                            _GLReportCashflowRows.DateExecution_Y = AlignStr(DatePart(DateInterval.Year, _GLReportCashflowRows.DateExecution).ToString, eDirection.Left, "0", 4)
+                            _GLReportCashflowRows.DateExecution_Q = AlignStr(DatePart(DateInterval.Quarter, _GLReportCashflowRows.DateExecution).ToString, eDirection.Left, "0", 2)
+                            _GLReportCashflowRows.DateExecution_M = AlignStr(DatePart(DateInterval.Month, _GLReportCashflowRows.DateExecution).ToString, eDirection.Left, "0", 2)
+                            _GLReportCashflowRows.DateExecution_W = AlignStr(DatePart(DateInterval.WeekOfYear, _GLReportCashflowRows.DateExecution).ToString, eDirection.Left, "0", 2)
+
+
+                            If _AmountHUFNetto <> 0 Then
+                                If (_GLRows.AmountHUF / _AmountHUFNetto) <> 0 Then _GLReportCashflowRows.InAmountHUF = Math.Round(_PCIDetail.GLRows.InAmountHUF * (_GLRows.AmountHUF / _AmountHUFNetto), 4, MidpointRounding.AwayFromZero)
+                                If (_GLRows.AmountHUF / _AmountHUFNetto) <> 0 Then _GLReportCashflowRows.OutAmountHUF = Math.Round(_PCIDetail.GLRows.OutAmountHUF * (_GLRows.AmountHUF / _AmountHUFNetto), 4, MidpointRounding.AwayFromZero)
+                            End If
+                            If _AmountDEVNetto <> 0 Then
+                                If (_GLRows.AmountDEV / _AmountDEVNetto) <> 0 Then _GLReportCashflowRows.InAmountDEV = Math.Round(_PCIDetail.GLRows.InAmountDEV * (_GLRows.AmountDEV / _AmountDEVNetto), 4, MidpointRounding.AwayFromZero)
+                                If (_GLRows.AmountDEV / _AmountDEVNetto) <> 0 Then _GLReportCashflowRows.OutAmountDEV = Math.Round(_PCIDetail.GLRows.OutAmountDEV * (_GLRows.AmountDEV / _AmountDEVNetto), 4, MidpointRounding.AwayFromZero)
+                            End If
+
+                            _GLReportCashflowRows.Controlling = _GLRows.Controlling
+                            _GLReportCashflowRows.CostHolder = _GLRows.CostHolder
+                            _GLReportCashflowRows.CostPlace = _GLRows.CostPlace
+                            _GLReportCashflowRows.UniqueObjects = _GLRows.UniqueObjects
+                            _GLReportCashflowRows.JobNumberObjects = _GLRows.JobNumberObjects
+                        End If
+                    Next
+                Else
+                    '//InvoiceHeaderben kersesés
+                    Dim _InvoiceHeader As InvoiceHeader = _uow.FindObject(Of InvoiceHeader)(CriteriaOperator.Parse("CustomersFrom=? and Customers=? and ConnectInfo=? and isnull(GLAccounts)=True", _PCIDetail.CustomersFrom, _PCIDetail.Customers, _PCIDetail.ConnectInfo))
+                    If _InvoiceHeader IsNot Nothing AndAlso _PCIDetail.PartnerType = ePartnerType.eReceivables Then
+                        Dim _InvoiceRows As InvoiceRows
+                        Dim _AmountHUFNetto As Double = 0
+                        Dim _AmountDEVNetto As Double = 0
+                        Dim _InvoiceVATRows As InvoiceVATRows
+
+                        For Each _InvoiceVATRows In _InvoiceHeader.InvoiceVATRows
+                            _AmountDEVNetto += _InvoiceVATRows.AmountNettoDEV
+                            _AmountHUFNetto += _InvoiceVATRows.AmountNettoHUF
+                        Next
+
+                        For Each _InvoiceRows In _InvoiceHeader.InvoiceRows
+                            Dim _FinalPriceHUF As Double = Math.Round((_InvoiceRows.ListPriceHUF - _InvoiceRows.DiscountPriceHUF) * _InvoiceRows.QTT, 0, MidpointRounding.AwayFromZero)
+                            Dim _FinalPriceDEV As Double = Math.Round((_InvoiceRows.ListPriceHUF - _InvoiceRows.DiscountPriceHUF) * _InvoiceRows.QTT, 2, MidpointRounding.AwayFromZero)
+                            _GLReportCashflowRows = New GLReportCashflowRows(_uow)
+                            _GLReportCashflowRows.GLReportRowsState = eGLReportRowsState.eInvoice
+                            _GLReportCashflowRows.GLReportCashflowHeader = _GLReportCashflowHeader
+
+                            _GLReportCashflowRows.CustomersFrom = _PCIDetail.CustomersFrom
+                            _GLReportCashflowRows.Customers = _PCIDetail.Customers
+                            _GLReportCashflowRows.ConnectInfo = _PCIDetail.ConnectInfo
+
+                            _GLReportCashflowRows.LiquidAssets = _PCIDetail.GLRows.LiquidAssets
+                            _GLReportCashflowRows.DateExecution = _PCIDetail.GLRows.GLHeader.DateExecution
+
+                            _GLReportCashflowRows.DateExecution_Y = AlignStr(DatePart(DateInterval.Year, _GLReportCashflowRows.DateExecution).ToString, eDirection.Left, "0", 4)
+                            _GLReportCashflowRows.DateExecution_Q = AlignStr(DatePart(DateInterval.Quarter, _GLReportCashflowRows.DateExecution).ToString, eDirection.Left, "0", 2)
+                            _GLReportCashflowRows.DateExecution_M = AlignStr(DatePart(DateInterval.Month, _GLReportCashflowRows.DateExecution).ToString, eDirection.Left, "0", 2)
+                            _GLReportCashflowRows.DateExecution_W = AlignStr(DatePart(DateInterval.WeekOfYear, _GLReportCashflowRows.DateExecution).ToString, eDirection.Left, "0", 2)
+
+
+                            If _AmountHUFNetto <> 0 Then
+                                If (_FinalPriceHUF / _AmountHUFNetto) <> 0 Then _GLReportCashflowRows.InAmountHUF = Math.Round(_PCIDetail.GLRows.InAmountHUF * (_FinalPriceHUF / _AmountHUFNetto), 4, MidpointRounding.AwayFromZero)
+                                If (_FinalPriceHUF / _AmountHUFNetto) <> 0 Then _GLReportCashflowRows.OutAmountHUF = Math.Round(_PCIDetail.GLRows.OutAmountHUF * (_FinalPriceHUF / _AmountHUFNetto), 4, MidpointRounding.AwayFromZero)
+                            End If
+                            If _AmountDEVNetto <> 0 Then
+                                If (_FinalPriceDEV / _AmountDEVNetto) <> 0 Then _GLReportCashflowRows.InAmountDEV = Math.Round(_PCIDetail.GLRows.InAmountDEV * (_FinalPriceDEV / _AmountDEVNetto), 4, MidpointRounding.AwayFromZero)
+                                If (_FinalPriceDEV / _AmountDEVNetto) <> 0 Then _GLReportCashflowRows.OutAmountDEV = Math.Round(_PCIDetail.GLRows.OutAmountDEV * (_FinalPriceDEV / _AmountDEVNetto), 4, MidpointRounding.AwayFromZero)
+                            End If
+
+                            _GLReportCashflowRows.Controlling = _InvoiceRows.Controlling
+                            _GLReportCashflowRows.CostHolder = _InvoiceRows.CostHolder
+                            _GLReportCashflowRows.CostPlace = _InvoiceRows.CostPlace
+                            _GLReportCashflowRows.UniqueObjects = _InvoiceRows.UniqueObjects
+                            _GLReportCashflowRows.JobNumberObjects = _InvoiceRows.JobNumberObjects
+                        Next
+                    Else
+                        '//RegistryHeaderben keresés
+                        Dim _RegistryHeader As RegistryHeader = _uow.FindObject(Of RegistryHeader)(CriteriaOperator.Parse("CustomersFrom=? and Customers=? and ConnectInfo=? and isnull(F_GLAccounts)=True and RegistryType.RegistryMainType in (0,2,3,4)"))
+                        If _RegistryHeader IsNot Nothing AndAlso _PCIDetail.PartnerType = ePartnerType.ePayabels Then
+                            Dim _RegistryRowsFinancialControlling As RegistryRowsFinancialControlling
+                            Dim _RegistryRowsFinancial As RegistryRowsFinancial
+                            Dim _AmountHUFNetto As Double = 0
+                            Dim _AmountDEVNetto As Double = 0
+                            Dim _AmountHUFVAT As Double = 0
+                            Dim _AmountDEVVAT As Double = 0
+                            For Each _RegistryRowsFinancial In _RegistryHeader.RegistryRowsFinancial
+                                _AmountHUFVAT += _RegistryRowsFinancial.NettoAmount
+                                If _RegistryHeader.F_CurrencyRate <> 0 Then
+                                    _AmountDEVVAT += Math.Round(_RegistryRowsFinancial.NettoAmount / _RegistryHeader.F_CurrencyRate, 2, MidpointRounding.AwayFromZero)
+                                End If
+                            Next
+
+                            _AmountHUFNetto = _RegistryHeader.F_AmountBruttoHUF - _AmountHUFVAT
+                            If _RegistryHeader.F_CurrencyRate <> 0 Then
+                                _AmountDEVNetto = _AmountHUFNetto / _RegistryHeader.F_CurrencyRate
+                            End If
+
+                            For Each _RegistryRowsFinancialControlling In _RegistryHeader.RegistryRowsFinancialControlling
+                                Dim _FinalPriceHUF As Double = _RegistryRowsFinancialControlling.Amount
+                                Dim _FinalPriceDEV As Double = 0
+                                If _RegistryHeader.F_CurrencyRate <> 0 Then
+                                    _FinalPriceDEV = _FinalPriceHUF / _RegistryHeader.F_CurrencyRate
+                                End If
+
+                                _GLReportCashflowRows = New GLReportCashflowRows(_uow)
+                                _GLReportCashflowRows.GLReportRowsState = eGLReportRowsState.eRegistry
+                                _GLReportCashflowRows.GLReportCashflowHeader = _GLReportCashflowHeader
+
+                                _GLReportCashflowRows.CustomersFrom = _PCIDetail.CustomersFrom
+                                _GLReportCashflowRows.Customers = _PCIDetail.Customers
+                                _GLReportCashflowRows.ConnectInfo = _PCIDetail.ConnectInfo
+
+                                _GLReportCashflowRows.LiquidAssets = _PCIDetail.GLRows.LiquidAssets
+                                _GLReportCashflowRows.DateExecution = _PCIDetail.GLRows.GLHeader.DateExecution
+
+                                _GLReportCashflowRows.DateExecution_Y = AlignStr(DatePart(DateInterval.Year, _GLReportCashflowRows.DateExecution).ToString, eDirection.Left, "0", 4)
+                                _GLReportCashflowRows.DateExecution_Q = AlignStr(DatePart(DateInterval.Quarter, _GLReportCashflowRows.DateExecution).ToString, eDirection.Left, "0", 2)
+                                _GLReportCashflowRows.DateExecution_M = AlignStr(DatePart(DateInterval.Month, _GLReportCashflowRows.DateExecution).ToString, eDirection.Left, "0", 2)
+                                _GLReportCashflowRows.DateExecution_W = AlignStr(DatePart(DateInterval.WeekOfYear, _GLReportCashflowRows.DateExecution).ToString, eDirection.Left, "0", 2)
+
+                                If _AmountHUFNetto <> 0 Then
+                                    If (_FinalPriceHUF / _AmountHUFNetto) <> 0 Then _GLReportCashflowRows.InAmountHUF = Math.Round(_PCIDetail.GLRows.InAmountHUF * (_FinalPriceHUF / _AmountHUFNetto), 4, MidpointRounding.AwayFromZero)
+                                    If (_FinalPriceHUF / _AmountHUFNetto) <> 0 Then _GLReportCashflowRows.OutAmountHUF = Math.Round(_PCIDetail.GLRows.OutAmountHUF * (_FinalPriceHUF / _AmountHUFNetto), 4, MidpointRounding.AwayFromZero)
+                                End If
+                                If _AmountDEVNetto <> 0 Then
+                                    If (_FinalPriceDEV / _AmountDEVNetto) <> 0 Then _GLReportCashflowRows.InAmountDEV = Math.Round(_PCIDetail.GLRows.InAmountDEV * (_FinalPriceDEV / _AmountDEVNetto), 4, MidpointRounding.AwayFromZero)
+                                    If (_FinalPriceDEV / _AmountDEVNetto) <> 0 Then _GLReportCashflowRows.OutAmountDEV = Math.Round(_PCIDetail.GLRows.OutAmountDEV * (_FinalPriceDEV / _AmountDEVNetto), 4, MidpointRounding.AwayFromZero)
+                                End If
+
+                                _GLReportCashflowRows.Controlling = _RegistryRowsFinancialControlling.Controlling
+                                _GLReportCashflowRows.CostHolder = _RegistryRowsFinancialControlling.CostHolder
+                                _GLReportCashflowRows.CostPlace = _RegistryRowsFinancialControlling.CostPlace
+                                _GLReportCashflowRows.UniqueObjects = _RegistryRowsFinancialControlling.UniqueObjects
+                                _GLReportCashflowRows.JobNumberObjects = _RegistryRowsFinancialControlling.JobNumberObjects
+                            Next
+                        Else
+                            _GLReportCashflowRows = New GLReportCashflowRows(_uow)
+
+                            _GLReportCashflowRows.GLReportRowsState = eGLReportRowsState.eGLFinal
+                            _GLReportCashflowRows.GLReportCashflowHeader = _GLReportCashflowHeader
+
+                            _GLReportCashflowRows.CustomersFrom = _PCIDetail.CustomersFrom
+                            _GLReportCashflowRows.Customers = _PCIDetail.Customers
+                            _GLReportCashflowRows.ConnectInfo = _PCIDetail.ConnectInfo
+
+                            _GLReportCashflowRows.LiquidAssets = _PCIDetail.GLRows.LiquidAssets
+                            _GLReportCashflowRows.DateExecution = _PCIDetail.GLRows.GLHeader.DateExecution
+
+                            _GLReportCashflowRows.DateExecution_Y = AlignStr(DatePart(DateInterval.Year, _GLReportCashflowRows.DateExecution).ToString, eDirection.Left, "0", 4)
+                            _GLReportCashflowRows.DateExecution_Q = AlignStr(DatePart(DateInterval.Quarter, _GLReportCashflowRows.DateExecution).ToString, eDirection.Left, "0", 2)
+                            _GLReportCashflowRows.DateExecution_M = AlignStr(DatePart(DateInterval.Month, _GLReportCashflowRows.DateExecution).ToString, eDirection.Left, "0", 2)
+                            _GLReportCashflowRows.DateExecution_W = AlignStr(DatePart(DateInterval.WeekOfYear, _GLReportCashflowRows.DateExecution).ToString, eDirection.Left, "0", 2)
+
+                            _GLReportCashflowRows.InAmountHUF = _PCIDetail.GLRows.InAmountHUF
+                            _GLReportCashflowRows.InAmountDEV = _PCIDetail.GLRows.InAmountDEV
+                            _GLReportCashflowRows.OutAmountHUF = _PCIDetail.GLRows.OutAmountHUF
+                            _GLReportCashflowRows.OutAmountDEV = _PCIDetail.GLRows.OutAmountDEV
+                        End If
+                    End If
+                End If
+
+            End If
+            _uow.CommitChanges()
+        Next
+        _uow.CommitChanges()
+        _QueryStatistics.TimeStop = GetSQLTime(_uow_stat)
+        _QueryStatistics.TimeEllapsed = _QueryStatistics.TimeStop - _QueryStatistics.TimeStart
+        _uow_stat.CommitChanges()
+        RaiseEvent FinalWork
+
+        If TryCast(View, DetailView) IsNot Nothing Then
+            If Frame.GetController(Of RefreshController).RefreshAction.Enabled Then
+                Frame.GetController(Of RefreshController).RefreshAction.DoExecute()
+            End If
+        ElseIf TryCast(View, ListView) IsNot Nothing Then
+            TryCast(View, ListView).CollectionSource.Reload()
+        End If
+
+    End Sub
+
+    Private Sub aViewAttachments_Cashflow_Execute(sender As System.Object, e As DevExpress.ExpressApp.Actions.SimpleActionExecuteEventArgs) Handles aViewAttachments_Cashflow.Execute
+        Dim _GLReportCashflowRows As GLReportCashflowRows = TryCast(View.SelectedObjects(0), GLReportCashflowRows)
+        Dim _CustomersFrom As CustomersFrom = _GLReportCashflowRows.CustomersFrom
+        Dim _Customers As Customers = _GLReportCashflowRows.Customers
+        Dim _DocumentNumber As String = _GLReportCashflowRows.ConnectInfo
+
+        ViewAttachments.ViewAttachments(View.ObjectSpace, Frame, _CustomersFrom, _Customers, _DocumentNumber, "")
+    End Sub
+
+End Class

Nuvolar.Module/BusinessObjects/Financial/FinancialObjects/FinancialTransactions/Reports/DTR/GLReportChartOfAccounts.vb

@@ -0,0 +1,59 @@
+Imports System
+Imports System.ComponentModel
+
+Imports DevExpress.Xpo
+Imports DevExpress.Data.Filtering
+
+Imports DevExpress.ExpressApp
+Imports DevExpress.Persistent.Base
+Imports DevExpress.Persistent.BaseImpl
+Imports DevExpress.Persistent.Validation
+Imports DevExpress.ExpressApp.ConditionalAppearance
+
+<DefaultClassOptions(), NavigationItem(False), CreatableItem(False), DeferredDeletion(False)> _
+<Appearance("Hide GLReportChartOfAccounts Actions when InPublic", AppearanceItemType:="Action", targetitems:="aSelectChartOfAccounts_DTR", criteria:="GLReport.InPublic=True", visibility:=Editors.ViewItemVisibility.Hide)> _
+Public Class GLReportChartOfAccounts
+    Inherits BaseObject
+    Private _GLReport As GLReport
+    Private _AccountNumber As String
+    Private _ShortName As String
+    Public Sub New(ByVal session As Session)
+        MyBase.New(session)
+        ' This constructor is used when an object is loaded from a persistent storage.
+        ' Do not place any code here or place it only when the IsLoading property is false:
+        ' if (!IsLoading){
+        '   It is now OK to place your initialization code here.
+        ' }
+        ' or as an alternative, move your initialization code into the AfterConstruction method.
+    End Sub
+    Public Overrides Sub AfterConstruction()
+        MyBase.AfterConstruction()
+        ' Place here your initialization code.
+    End Sub
+
+    <Association("GLReport-GLReportChartOfAccounts", GetType(GLReport))> _
+    Property GLReport As GLReport
+        Get
+            Return _GLReport
+        End Get
+        Set(value As GLReport)
+            SetPropertyValue("GLReport", _GLReport, value)
+        End Set
+    End Property
+    Property AccountNumber As String
+        Get
+            Return _AccountNumber
+        End Get
+        Set(value As String)
+            SetPropertyValue("AccountNumber", _AccountNumber, value)
+        End Set
+    End Property
+    Property ShortName As String
+        Get
+            Return _ShortName
+        End Get
+        Set(value As String)
+            SetPropertyValue("ShortName", _ShortName, value)
+        End Set
+    End Property
+End Class

Nuvolar.Module/BusinessObjects/Financial/FinancialObjects/FinancialTransactions/Reports/DTR/GLReportCustomersFrom.vb

@@ -0,0 +1,52 @@
+Imports System
+Imports System.ComponentModel
+
+Imports DevExpress.Xpo
+Imports DevExpress.Data.Filtering
+
+Imports DevExpress.ExpressApp
+Imports DevExpress.Persistent.Base
+Imports DevExpress.Persistent.BaseImpl
+Imports DevExpress.Persistent.Validation
+Imports DevExpress.ExpressApp.ConditionalAppearance
+
+<DefaultClassOptions(), NavigationItem(False), CreatableItem(False), DeferredDeletion(False)> _
+<Appearance("Hide GLReportCustomersFrom Actions when InPublic", AppearanceItemType:="Action", targetitems:="aSelectCustomersFrom_DTR", criteria:="GLReport.InPublic=True", visibility:=Editors.ViewItemVisibility.Hide)> _
+Public Class GLReportCustomersFrom
+    Inherits BaseObject
+    Private _GLReport As GLReport
+    Private _CustomersFrom As CustomersFrom
+    Public Sub New(ByVal session As Session)
+        MyBase.New(session)
+        ' This constructor is used when an object is loaded from a persistent storage.
+        ' Do not place any code here or place it only when the IsLoading property is false:
+        ' if (!IsLoading){
+        '   It is now OK to place your initialization code here.
+        ' }
+        ' or as an alternative, move your initialization code into the AfterConstruction method.
+    End Sub
+    Public Overrides Sub AfterConstruction()
+        MyBase.AfterConstruction()
+        ' Place here your initialization code.
+    End Sub
+
+    <Association("GLReport-GLReportCustomersFrom", GetType(GLReport))> _
+    Property GLReport As GLReport
+        Get
+            Return _GLReport
+        End Get
+        Set(value As GLReport)
+            SetPropertyValue("GLReport", _GLReport, value)
+        End Set
+    End Property
+
+    Property CustomersFrom As CustomersFrom
+        Get
+            Return _CustomersFrom
+        End Get
+        Set(value As CustomersFrom)
+            SetPropertyValue("CustomersFrom", _CustomersFrom, value)
+        End Set
+    End Property
+
+End Class

Nuvolar.Module/BusinessObjects/Financial/FinancialObjects/FinancialTransactions/Reports/DTR/GLReportRows.vb

@@ -0,0 +1,306 @@
+Imports System
+Imports System.ComponentModel
+Imports DevExpress.Xpo
+Imports DevExpress.Data.Filtering
+
+Imports DevExpress.ExpressApp
+Imports DevExpress.Persistent.Base
+Imports DevExpress.Persistent.BaseImpl
+Imports DevExpress.Persistent.Validation
+Imports DevExpress.Persistent.Base.General
+Imports System.Data.SqlClient
+Imports System.Configuration
+Imports System.Linq
+Imports System.Linq.Expressions
+Imports DevExpress.ExpressApp.ConditionalAppearance
+Public Enum eGLReportRowsType
+    eBallance = 0 'Eredmény
+    eIncoming = 1 'Mérleg
+End Enum
+Public Enum eGLReportRowsState
+    eGLFinal = 0 'Végleges fõkönyvbõl
+    eGLEditable = 3 'Szerkeszthetõ fõkönyvbõl
+    eRegistry = 1 'Nem feladott iktatás
+    eInvoice = 2 'Nem feladott számla
+End Enum
+<DefaultClassOptions()> _
+<NavigationItem(False), CreatableItem(False)> _
+<ImageName("BO_Report")> _
+<DeferredDeletion(False)> _
+<Appearance("Color Blue when not from GLRows", AppearanceItemType:="ViewItem", Fontcolor:="Blue", targetitems:="*", Criteria:="isnull(GLRows)=True")> _
+<Appearance("Hide GLReportRows-ChangeVariant Actions when InPublic", AppearanceItemType:="Action", targetitems:="ChangeVariant", criteria:="GLReport.InPublic=True", visibility:=Editors.ViewItemVisibility.Hide)> _
+Public Class GLReportRows
+    Inherits BaseObject
+    Private _GLReport As GLReport
+    Private _GLReportRowsType As eGLReportRowsType
+    Private _GLReportRowsState As eGLReportRowsState
+    Private _GLRows As GLRows
+    Private _DebitAmount As Double
+    Private _CreditAmount As Double
+    Private _BallanceAmount As Double
+    Private _ChartOfAccounts As ChartOfAccounts
+    Private _Controlling As Controlling
+    Private _CostHolder As CostHolder
+    Private _CostPlace As CostPlace
+    Private _UniqueObjects As UniqueObjects
+    Private _JobNumberObjects As JobNumberObjects
+    Private _CustomersFrom As CustomersFrom
+    Private _Customers As Customers
+    Private _ConnectInfo As String
+    Private _DateExecution_Y As String
+    Private _DateExecution_Q As String
+    Private _DateExecution_M As String
+    Private _DateExecution_W As String
+    Private _DateExecution As Date
+    Private _RegistryHeader As RegistryHeader
+    Private _InvoiceHeader As InvoiceHeader
+    Private _InvoiceRows As InvoiceRows
+    Private _RegistryRowsFinancialControlling As RegistryRowsFinancialControlling
+
+    Private _CurrencyName As CurrencyName
+    Private _DebitAmountDEV As Double = 0
+    Private _CreditAmountDEV As Double = 0
+    Private _BallanceAmountDEV As Double = 0
+    Public Sub New(ByVal session As Session)
+        MyBase.New(session)
+    End Sub
+    
+    <Association("GLReport-GLReportRows", GetType(GLReport))> _
+    Property GLReport As GLReport
+        Get
+            Return _GLReport
+        End Get
+        Set(value As GLReport)
+            SetPropertyValue("GLReport", _GLReport, value)
+        End Set
+    End Property
+    
+    Property GLReportRowsType As eGLReportRowsType
+        Get
+            Return _GLReportRowsType
+        End Get
+        Set(value As eGLReportRowsType)
+            SetPropertyValue("GLReportRowsType", _GLReportRowsType, value)
+        End Set
+    End Property
+    Property GLReportRowsState As eGLReportRowsState
+        Get
+            Return _GLReportRowsState
+        End Get
+        Set(value As eGLReportRowsState)
+            SetPropertyValue("GLReportRowsState", _GLReportRowsState, value)
+        End Set
+    End Property
+    Property GLRows As GLRows
+        Get
+            Return _GLRows
+        End Get
+        Set(value As GLRows)
+            SetPropertyValue("GLRows", _GLRows, value)
+        End Set
+    End Property
+    Property DebitAmount As Double
+        Get
+            Return _DebitAmount
+        End Get
+        Set(value As Double)
+            SetPropertyValue("DebitAmount", _DebitAmount, value)
+        End Set
+    End Property
+    Property CreditAmount As Double
+        Get
+            Return _CreditAmount
+        End Get
+        Set(value As Double)
+            SetPropertyValue("CreditAmount", _CreditAmount, value)
+        End Set
+    End Property
+    Property BallanceAmount As Double
+        Get
+            Return _BallanceAmount
+        End Get
+        Set(value As Double)
+            SetPropertyValue("BallanceAmount", _BallanceAmount, value)
+        End Set
+    End Property
+    <ImmediatePostData(True), DataSourceCriteria("IsParent=False")>
+    Property ChartOfAccounts As ChartOfAccounts
+        Get
+            Return _ChartOfAccounts
+        End Get
+        Set(value As ChartOfAccounts)
+            SetPropertyValue("ChartOfAccounts", _ChartOfAccounts, value)
+        End Set
+    End Property
+    <ImmediatePostData(True), DataSourceCriteria("IsParent=False")>
+    Property Controlling As Controlling
+        Get
+            Return _Controlling
+        End Get
+        Set(ByVal value As Controlling)
+            SetPropertyValue("Controlling", _Controlling, value)
+        End Set
+    End Property
+    Property UniqueObjects As UniqueObjects
+        Get
+            Return _UniqueObjects
+        End Get
+        Set(ByVal value As UniqueObjects)
+            SetPropertyValue("UniqueObjects", _UniqueObjects, value)
+        End Set
+    End Property
+    Property CostHolder As CostHolder
+        Get
+            Return _CostHolder
+        End Get
+        Set(ByVal value As CostHolder)
+            SetPropertyValue("CostHolder", _CostHolder, value)
+        End Set
+    End Property
+    Property CostPlace As CostPlace
+        Get
+            Return _CostPlace
+        End Get
+        Set(ByVal value As CostPlace)
+            SetPropertyValue("CostPlace", _CostPlace, value)
+        End Set
+    End Property
+    Property JobNumberObjects As JobNumberObjects
+        Get
+            Return _JobNumberObjects
+        End Get
+        Set(ByVal value As JobNumberObjects)
+            SetPropertyValue("JobNumberObjects", _JobNumberObjects, value)
+        End Set
+    End Property
+    Property CustomersFrom As CustomersFrom
+        Get
+            Return _CustomersFrom
+        End Get
+        Set(value As CustomersFrom)
+            SetPropertyValue("CustomersFrom", _CustomersFrom, value)
+        End Set
+    End Property
+    Property Customers As Customers
+        Get
+            Return _Customers
+        End Get
+        Set(value As Customers)
+            SetPropertyValue("Customers", _Customers, value)
+        End Set
+    End Property
+    Property ConnectInfo As String
+        Get
+            Return _ConnectInfo
+        End Get
+        Set(value As String)
+            SetPropertyValue("ConnectInfo", _ConnectInfo, value)
+        End Set
+    End Property
+    Property DateExecution_Y As String
+        Get
+            Return _DateExecution_Y
+        End Get
+        Set(value As String)
+            SetPropertyValue("DateExecution_Y", _DateExecution_Y, value)
+        End Set
+    End Property
+    Property DateExecution_Q As String
+        Get
+            Return _DateExecution_Q
+        End Get
+        Set(value As String)
+            SetPropertyValue("DateExecution_Q", _DateExecution_Q, value)
+        End Set
+    End Property
+    Property DateExecution_M As String
+        Get
+            Return _DateExecution_M
+        End Get
+        Set(value As String)
+            SetPropertyValue("DateExecution_M", _DateExecution_M, value)
+        End Set
+    End Property
+    Property DateExecution_W As String
+        Get
+            Return _DateExecution_W
+        End Get
+        Set(value As String)
+            SetPropertyValue("DateExecution_W", _DateExecution_W, value)
+        End Set
+    End Property
+    Property DateExecution As Date
+        Get
+            Return _DateExecution
+        End Get
+        Set(value As Date)
+            SetPropertyValue("DateExecution", _DateExecution, value)
+        End Set
+    End Property
+    Property RegistryHeader As RegistryHeader
+        Get
+            Return _RegistryHeader
+        End Get
+        Set(value As RegistryHeader)
+            SetPropertyValue("RegistryHeader", _RegistryHeader, value)
+        End Set
+    End Property
+    Property InvoiceHeader As InvoiceHeader
+        Get
+            Return _InvoiceHeader
+        End Get
+        Set(value As InvoiceHeader)
+            SetPropertyValue("InvoiceHeader", _InvoiceHeader, value)
+        End Set
+    End Property
+    Property InvoiceRows As InvoiceRows
+        Get
+            Return _InvoiceRows
+        End Get
+        Set(value As InvoiceRows)
+            SetPropertyValue("InvoiceRows", _InvoiceRows, value)
+        End Set
+    End Property
+    Property RegistryRowsFinancialControlling As RegistryRowsFinancialControlling
+        Get
+            Return _RegistryRowsFinancialControlling
+        End Get
+        Set(value As RegistryRowsFinancialControlling)
+            SetPropertyValue("RegistryRowsFinancialControlling", _RegistryRowsFinancialControlling, value)
+        End Set
+    End Property
+
+    Property CurrencyName As CurrencyName
+        Get
+            Return _CurrencyName
+        End Get
+        Set(value As CurrencyName)
+            SetPropertyValue("CurrencyName", _CurrencyName, value)
+        End Set
+    End Property
+    Property DebitAmountDEV As Double
+        Get
+            Return _DebitAmountDEV
+        End Get
+        Set(value As Double)
+            SetPropertyValue("DebitAmountDEV", _DebitAmountDEV, value)
+        End Set
+    End Property
+    Property CreditAmountDEV As Double
+        Get
+            Return _CreditAmountDEV
+        End Get
+        Set(value As Double)
+            SetPropertyValue("CreditAmountDEV", _CreditAmountDEV, value)
+        End Set
+    End Property
+    Property BallanceAmountDEV As Double
+        Get
+            Return _BallanceAmountDEV
+        End Get
+        Set(value As Double)
+            SetPropertyValue("BallanceAmountDEV", _BallanceAmountDEV, value)
+        End Set
+    End Property
+
+End Class

Nuvolar.Module/BusinessObjects/Financial/FinancialObjects/FinancialTransactions/Reports/DTR/GLReportRowsCostHolder.vb

@@ -0,0 +1,80 @@
+Imports System
+Imports System.ComponentModel
+
+Imports DevExpress.Xpo
+Imports DevExpress.Data.Filtering
+
+Imports DevExpress.ExpressApp
+Imports DevExpress.Persistent.Base
+Imports DevExpress.Persistent.BaseImpl
+Imports DevExpress.Persistent.Validation
+
+<DefaultClassOptions(), NavigationItem(False), CreatableItem(False), DeferredDeletion(False)> _
+Public Class GLReportRowsCostHolder
+    Inherits BaseObject
+
+    Private _GLReport As GLReport
+    Private _GLReportRows As GLReportRows
+    Private _CostHolder As CostHolder
+    Private _HRPerson As HRPerson
+    Private _FixedAssets As FixedAssets
+    Private _BallanceAmount As Double
+
+    Public Sub New(ByVal session As Session)
+        MyBase.New(session)
+    End Sub
+    Public Overrides Sub AfterConstruction()
+        MyBase.AfterConstruction()
+    End Sub
+
+    Property GLReport As GLReport
+        Get
+            Return _GLReport
+        End Get
+        Set(value As GLReport)
+            SetPropertyValue("GLReport", _GLReport, value)
+        End Set
+    End Property
+    Property GLReportRows As GLReportRows
+        Get
+            Return _GLReportRows
+        End Get
+        Set(value As GLReportRows)
+            SetPropertyValue("GLReportRows", _GLReportRows, value)
+        End Set
+    End Property
+    Property CostHolder As CostHolder
+        Get
+            Return _CostHolder
+        End Get
+        Set(value As CostHolder)
+            SetPropertyValue("CostHolder", _CostHolder, value)
+        End Set
+    End Property
+    Property HRPerson As HRPerson
+        Get
+            Return _HRPerson
+        End Get
+        Set(value As HRPerson)
+            SetPropertyValue("HRPerson", _HRPerson, value)
+        End Set
+    End Property
+    Property FixedAssets As FixedAssets
+        Get
+            Return _FixedAssets
+        End Get
+        Set(value As FixedAssets)
+            SetPropertyValue("FixedAssets", _FixedAssets, value)
+        End Set
+    End Property
+    Property BallanceAmount As Double
+        Get
+            Return _BallanceAmount
+        End Get
+        Set(value As Double)
+            SetPropertyValue("BallanceAmount", _BallanceAmount, value)
+        End Set
+    End Property
+
+    '---------------------Subs----------------------
+End Class

Nuvolar.Module/BusinessObjects/Financial/FinancialObjects/FinancialTransactions/Reports/DTR/GLReportUsers.vb

@@ -0,0 +1,48 @@
+Imports System
+Imports System.ComponentModel
+
+Imports DevExpress.Xpo
+Imports DevExpress.Data.Filtering
+
+Imports DevExpress.ExpressApp
+Imports DevExpress.Persistent.Base
+Imports DevExpress.Persistent.BaseImpl
+Imports DevExpress.Persistent.Validation
+
+<DefaultClassOptions(), NavigationItem(False), CreatableItem(False)> _
+Public Class GLReportUsers
+    Inherits BaseObject
+    Private _GLReport As GLReport
+    Private _User As User
+    Public Sub New(ByVal session As Session)
+        MyBase.New(session)
+        ' This constructor is used when an object is loaded from a persistent storage.
+        ' Do not place any code here or place it only when the IsLoading property is false:
+        ' if (!IsLoading){
+        '   It is now OK to place your initialization code here.
+        ' }
+        ' or as an alternative, move your initialization code into the AfterConstruction method.
+    End Sub
+    Public Overrides Sub AfterConstruction()
+        MyBase.AfterConstruction()
+        ' Place here your initialization code.
+    End Sub
+
+    <Association("GLReport-GLReportUsers", GetType(GLReport))> _
+    Property GLReport As GLReport
+        Get
+            Return _GLReport
+        End Get
+        Set(value As GLReport)
+            SetPropertyValue("GLReport", _GLReport, value)
+        End Set
+    End Property
+    Property User As User
+        Get
+            Return _User
+        End Get
+        Set(value As User)
+            SetPropertyValue("User", _User, value)
+        End Set
+    End Property
+End Class

Nuvolar.Module/BusinessObjects/Financial/FinancialObjects/FinancialTransactions/Reports/DTR/GLReportXML.vb

@@ -0,0 +1,60 @@
+Imports System
+Imports System.ComponentModel
+
+Imports DevExpress.Xpo
+Imports DevExpress.Data.Filtering
+
+Imports DevExpress.ExpressApp
+Imports DevExpress.Persistent.Base
+Imports DevExpress.Persistent.BaseImpl
+Imports DevExpress.Persistent.Validation
+
+<DefaultClassOptions(), NavigationItem(False), CreatableItem(False)> _
+Public Class GLReportXML
+    Inherits BaseObject
+
+    Private _GLReport As GLReport
+    Private _ViewID As String
+    Private _XMLInfo As String
+
+    Public Sub New(ByVal session As Session)
+        MyBase.New(session)
+        ' This constructor is used when an object is loaded from a persistent storage.
+        ' Do not place any code here or place it only when the IsLoading property is false:
+        ' if (!IsLoading){
+        '   It is now OK to place your initialization code here.
+        ' }
+        ' or as an alternative, move your initialization code into the AfterConstruction method.
+    End Sub
+    Public Overrides Sub AfterConstruction()
+        MyBase.AfterConstruction()
+        ' Place here your initialization code.
+    End Sub
+
+    Property GLReport As GLReport
+        Get
+            Return _GLReport
+        End Get
+        Set(value As GLReport)
+            SetPropertyValue("GLReport", _GLReport, value)
+        End Set
+    End Property
+    <Size(-1)> _
+    Property ViewID As String
+        Get
+            Return _ViewID
+        End Get
+        Set(value As String)
+            SetPropertyValue("ViewID", _ViewID, value)
+        End Set
+    End Property
+    <Size(-1)> _
+    Property XMLInfo As String
+        Get
+            Return _XMLInfo
+        End Get
+        Set(value As String)
+            SetPropertyValue("XMLInfo", _XMLInfo, value)
+        End Set
+    End Property
+End Class

Nuvolar.Module/BusinessObjects/Financial/FinancialObjects/FinancialTransactions/Reports/DTR/GLRowsVC.Designer.vb

@@ -0,0 +1,131 @@
+Partial Class GLRowsVC
+
+    <System.Diagnostics.DebuggerNonUserCode()> _
+    Public Sub New(ByVal Container As System.ComponentModel.IContainer)
+        MyClass.New()
+
+        'Required for Windows.Forms Class Composition Designer support
+        Container.Add(Me)
+
+    End Sub
+
+    'Component overrides dispose to clean up the component list.
+    <System.Diagnostics.DebuggerNonUserCode()> _
+    Protected Overrides Sub Dispose(ByVal disposing As Boolean)
+        If disposing AndAlso components IsNot Nothing Then
+            components.Dispose()
+        End If
+        MyBase.Dispose(disposing)
+    End Sub
+
+    'Required by the Component Designer
+    Private components As System.ComponentModel.IContainer
+
+    'NOTE: The following procedure is required by the Component Designer
+    'It can be modified using the Component Designer.
+    'Do not modify it using the code editor.
+    <System.Diagnostics.DebuggerStepThrough()> _
+    Private Sub InitializeComponent()
+        Me.components = New System.ComponentModel.Container()
+        Me.aGenerateGLReport = New DevExpress.ExpressApp.Actions.SimpleAction(Me.components)
+        Me.aViewAttachments_DTR = New DevExpress.ExpressApp.Actions.SimpleAction(Me.components)
+        Me.aViewRegistry_DTR = New DevExpress.ExpressApp.Actions.SimpleAction(Me.components)
+        Me.aGLDTRChangeParam = New DevExpress.ExpressApp.Actions.PopupWindowShowAction(Me.components)
+        Me.aSelectCustomersFrom_DTR = New DevExpress.ExpressApp.Actions.PopupWindowShowAction(Me.components)
+        Me.aSelectChartOfAccounts_DTR = New DevExpress.ExpressApp.Actions.PopupWindowShowAction(Me.components)
+        '
+        'aGenerateGLReport
+        '
+        Me.aGenerateGLReport.Caption = "Generate GL report"
+        Me.aGenerateGLReport.ConfirmationMessage = "Do you want to execute command ?"
+        Me.aGenerateGLReport.Id = "aGenerateGLReport"
+        Me.aGenerateGLReport.ImageName = "stopwatch_run"
+        Me.aGenerateGLReport.Shortcut = Nothing
+        Me.aGenerateGLReport.Tag = Nothing
+        Me.aGenerateGLReport.TargetObjectsCriteria = Nothing
+        Me.aGenerateGLReport.TargetViewId = ""
+        Me.aGenerateGLReport.ToolTip = Nothing
+        Me.aGenerateGLReport.TypeOfView = Nothing
+        '
+        'aViewAttachments_DTR
+        '
+        Me.aViewAttachments_DTR.Caption = "View attachments"
+        Me.aViewAttachments_DTR.ConfirmationMessage = Nothing
+        Me.aViewAttachments_DTR.Id = "aViewAttachments_DTR"
+        Me.aViewAttachments_DTR.ImageName = "printer_view"
+        Me.aViewAttachments_DTR.Shortcut = Nothing
+        Me.aViewAttachments_DTR.Tag = Nothing
+        Me.aViewAttachments_DTR.TargetObjectsCriteria = Nothing
+        Me.aViewAttachments_DTR.TargetViewId = "GLReport_GLReportRows_ListView"
+        Me.aViewAttachments_DTR.ToolTip = Nothing
+        Me.aViewAttachments_DTR.TypeOfView = Nothing
+        '
+        'aViewRegistry_DTR
+        '
+        Me.aViewRegistry_DTR.Caption = "View registry"
+        Me.aViewRegistry_DTR.ConfirmationMessage = Nothing
+        Me.aViewRegistry_DTR.Id = "aViewRegistry_DTR"
+        Me.aViewRegistry_DTR.ImageName = "document_pinned"
+        Me.aViewRegistry_DTR.Shortcut = Nothing
+        Me.aViewRegistry_DTR.Tag = Nothing
+        Me.aViewRegistry_DTR.TargetObjectsCriteria = Nothing
+        Me.aViewRegistry_DTR.TargetViewId = "GLReport_GLReportRows_ListView"
+        Me.aViewRegistry_DTR.ToolTip = Nothing
+        Me.aViewRegistry_DTR.TypeOfView = Nothing
+        '
+        'aGLDTRChangeParam
+        '
+        Me.aGLDTRChangeParam.AcceptButtonCaption = Nothing
+        Me.aGLDTRChangeParam.CancelButtonCaption = Nothing
+        Me.aGLDTRChangeParam.Caption = "Change parameters"
+        Me.aGLDTRChangeParam.ConfirmationMessage = Nothing
+        Me.aGLDTRChangeParam.Id = "aGLDTRChangeParam"
+        Me.aGLDTRChangeParam.ImageName = "index_preferences"
+        Me.aGLDTRChangeParam.Shortcut = Nothing
+        Me.aGLDTRChangeParam.Tag = Nothing
+        Me.aGLDTRChangeParam.TargetObjectsCriteria = Nothing
+        Me.aGLDTRChangeParam.TargetViewId = "GLReport_GLReportRows_ListView"
+        Me.aGLDTRChangeParam.ToolTip = Nothing
+        Me.aGLDTRChangeParam.TypeOfView = Nothing
+        '
+        'aSelectCustomersFrom_DTR
+        '
+        Me.aSelectCustomersFrom_DTR.AcceptButtonCaption = Nothing
+        Me.aSelectCustomersFrom_DTR.CancelButtonCaption = Nothing
+        Me.aSelectCustomersFrom_DTR.Caption = "aSelectCustomersFrom_DTR"
+        Me.aSelectCustomersFrom_DTR.ConfirmationMessage = Nothing
+        Me.aSelectCustomersFrom_DTR.Id = "aSelectCustomersFrom_DTR"
+        Me.aSelectCustomersFrom_DTR.ImageName = Nothing
+        Me.aSelectCustomersFrom_DTR.Shortcut = Nothing
+        Me.aSelectCustomersFrom_DTR.Tag = Nothing
+        Me.aSelectCustomersFrom_DTR.TargetObjectsCriteria = Nothing
+        Me.aSelectCustomersFrom_DTR.TargetObjectType = GetType(Nuvolar.[Module].GLReportCustomersFrom)
+        Me.aSelectCustomersFrom_DTR.TargetViewId = Nothing
+        Me.aSelectCustomersFrom_DTR.ToolTip = Nothing
+        Me.aSelectCustomersFrom_DTR.TypeOfView = Nothing
+        '
+        'aSelectChartOfAccounts_DTR
+        '
+        Me.aSelectChartOfAccounts_DTR.AcceptButtonCaption = Nothing
+        Me.aSelectChartOfAccounts_DTR.CancelButtonCaption = Nothing
+        Me.aSelectChartOfAccounts_DTR.Caption = "aSelectChartOfAccounts_DTR"
+        Me.aSelectChartOfAccounts_DTR.ConfirmationMessage = Nothing
+        Me.aSelectChartOfAccounts_DTR.Id = "aSelectChartOfAccounts_DTR"
+        Me.aSelectChartOfAccounts_DTR.ImageName = Nothing
+        Me.aSelectChartOfAccounts_DTR.Shortcut = Nothing
+        Me.aSelectChartOfAccounts_DTR.Tag = Nothing
+        Me.aSelectChartOfAccounts_DTR.TargetObjectsCriteria = Nothing
+        Me.aSelectChartOfAccounts_DTR.TargetObjectType = GetType(Nuvolar.[Module].GLReportChartOfAccounts)
+        Me.aSelectChartOfAccounts_DTR.TargetViewId = Nothing
+        Me.aSelectChartOfAccounts_DTR.ToolTip = Nothing
+        Me.aSelectChartOfAccounts_DTR.TypeOfView = Nothing
+
+    End Sub
+    Friend WithEvents aGenerateGLReport As DevExpress.ExpressApp.Actions.SimpleAction
+    Friend WithEvents aViewAttachments_DTR As DevExpress.ExpressApp.Actions.SimpleAction
+    Friend WithEvents aViewRegistry_DTR As DevExpress.ExpressApp.Actions.SimpleAction
+    Friend WithEvents aGLDTRChangeParam As DevExpress.ExpressApp.Actions.PopupWindowShowAction
+    Friend WithEvents aSelectCustomersFrom_DTR As DevExpress.ExpressApp.Actions.PopupWindowShowAction
+    Friend WithEvents aSelectChartOfAccounts_DTR As DevExpress.ExpressApp.Actions.PopupWindowShowAction
+
+End Class

Nuvolar.Module/BusinessObjects/Financial/FinancialObjects/FinancialTransactions/Reports/DTR/GLRowsVC.resx

@@ -0,0 +1,141 @@
+<?xml version="1.0" encoding="utf-8"?>
+<root>
+  <!-- 
+    Microsoft ResX Schema 
+    
+    Version 2.0
+    
+    The primary goals of this format is to allow a simple XML format 
+    that is mostly human readable. The generation and parsing of the 
+    various data types are done through the TypeConverter classes 
+    associated with the data types.
+    
+    Example:
+    
+    ... ado.net/XML headers & schema ...
+    <resheader name="resmimetype">text/microsoft-resx</resheader>
+    <resheader name="version">2.0</resheader>
+    <resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
+    <resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
+    <data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
+    <data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
+    <data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
+        <value>[base64 mime encoded serialized .NET Framework object]</value>
+    </data>
+    <data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+        <value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
+        <comment>This is a comment</comment>
+    </data>
+                
+    There are any number of "resheader" rows that contain simple 
+    name/value pairs.
+    
+    Each data row contains a name, and value. The row also contains a 
+    type or mimetype. Type corresponds to a .NET class that support 
+    text/value conversion through the TypeConverter architecture. 
+    Classes that don't support this are serialized and stored with the 
+    mimetype set.
+    
+    The mimetype is used for serialized objects, and tells the 
+    ResXResourceReader how to depersist the object. This is currently not 
+    extensible. For a given mimetype the value must be set accordingly:
+    
+    Note - application/x-microsoft.net.object.binary.base64 is the format 
+    that the ResXResourceWriter will generate, however the reader can 
+    read any of the formats listed below.
+    
+    mimetype: application/x-microsoft.net.object.binary.base64
+    value   : The object must be serialized with 
+            : System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
+            : and then encoded with base64 encoding.
+    
+    mimetype: application/x-microsoft.net.object.soap.base64
+    value   : The object must be serialized with 
+            : System.Runtime.Serialization.Formatters.Soap.SoapFormatter
+            : and then encoded with base64 encoding.
+
+    mimetype: application/x-microsoft.net.object.bytearray.base64
+    value   : The object must be serialized into a byte array 
+            : using a System.ComponentModel.TypeConverter
+            : and then encoded with base64 encoding.
+    -->
+  <xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
+    <xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
+    <xsd:element name="root" msdata:IsDataSet="true">
+      <xsd:complexType>
+        <xsd:choice maxOccurs="unbounded">
+          <xsd:element name="metadata">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" />
+              </xsd:sequence>
+              <xsd:attribute name="name" use="required" type="xsd:string" />
+              <xsd:attribute name="type" type="xsd:string" />
+              <xsd:attribute name="mimetype" type="xsd:string" />
+              <xsd:attribute ref="xml:space" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="assembly">
+            <xsd:complexType>
+              <xsd:attribute name="alias" type="xsd:string" />
+              <xsd:attribute name="name" type="xsd:string" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="data">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
+                <xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
+              </xsd:sequence>
+              <xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
+              <xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
+              <xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
+              <xsd:attribute ref="xml:space" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="resheader">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
+              </xsd:sequence>
+              <xsd:attribute name="name" type="xsd:string" use="required" />
+            </xsd:complexType>
+          </xsd:element>
+        </xsd:choice>
+      </xsd:complexType>
+    </xsd:element>
+  </xsd:schema>
+  <resheader name="resmimetype">
+    <value>text/microsoft-resx</value>
+  </resheader>
+  <resheader name="version">
+    <value>2.0</value>
+  </resheader>
+  <resheader name="reader">
+    <value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+  </resheader>
+  <resheader name="writer">
+    <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+  </resheader>
+  <metadata name="aGenerateGLReport.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>17, 56</value>
+  </metadata>
+  <metadata name="aViewAttachments_DTR.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>17, 134</value>
+  </metadata>
+  <metadata name="aViewRegistry_DTR.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>17, 212</value>
+  </metadata>
+  <metadata name="aGLDTRChangeParam.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>17, 95</value>
+  </metadata>
+  <metadata name="aSelectCustomersFrom_DTR.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>17, 173</value>
+  </metadata>
+  <metadata name="aSelectChartOfAccounts_DTR.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>401, 134</value>
+  </metadata>
+  <metadata name="$this.TrayLargeIcon" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
+    <value>False</value>
+  </metadata>
+</root>