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 ChartOfAccounts when IsManagerCheck=True", AppearanceItemType.ViewItem, "IsManagerCheck=True", TargetItems:="ChartOfAccounts", visibility:=DevExpress.ExpressApp.Editors.ViewItemVisibility.Hide)> _
<Appearance("Hide DateExecution when IsDateExecution=False", AppearanceItemType.ViewItem, "IsDateExecution=False", TargetItems:="DateExecution", visibility:=DevExpress.ExpressApp.Editors.ViewItemVisibility.Hide)> _
<RuleCriteria("RuleCriteria BookEntryCheck-Controlling", "*", "Controlling.Children.Count=0", "Csak gyermek objektum választható ki!", SkipNullOrEmptyValues:=False)> _
Public Class BookEntryCheck 'Popup a csoportos módosításhoz, és könyvelhetőség beállításához
    Inherits BaseObject
    Public Sub New(ByVal session As Session)
        MyBase.New(session)
    End Sub
    <NonPersistent()> Public Property ChartOfAccountsYear As ChartOfAccountsYear
    <NonPersistent()> <DataSourceCriteria("IsParent=False")> Public Property ChartOfAccounts As ChartOfAccounts
    <NonPersistent()> Public Property JobNumberObjects As JobNumberObjects
    <NonPersistent()> Public Property CostHolder As CostHolder
    <NonPersistent()> Public Property CostPlace As CostPlace
    <NonPersistent()> Public Property UniqueObjects As UniqueObjects
    <NonPersistent()> Public Property Controlling As Controlling
    <NonPersistent(), Browsable(False), ImmediatePostData()> Public Property IsManagerCheck As Boolean = False
    <NonPersistent(), ImmediatePostData()> Public Property IsDateExecution As Boolean = False
    <NonPersistent()> Public Property DateExecution As Date
End Class
