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()> <ImmediatePostData(True), DataSourceCriteria("IsParent=False")> Public Property ChartOfAccounts As ChartOfAccounts
    <NonPersistent()> <DataSourceCriteria("IsActive != False")> Public Property JobNumberObjects As JobNumberObjects
    <NonPersistent()> <DataSourceCriteria("IsActive != False")> Public Property CostHolder As CostHolder
    <NonPersistent()> <DataSourceCriteria("IsActive != False")> Public Property CostPlace As CostPlace
    <NonPersistent()> <DataSourceCriteria("IsActive != False")> Public Property UniqueObjects As UniqueObjects
    <NonPersistent()> <DataSourceCriteria("IsActive != False")> 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