ivanszabo
dd449f32d7
Mezőgazdaság termeltetés IsActive Számviteli készletnél szállítólevél DateExecution
35 lines
2.2 KiB
VB.net
35 lines
2.2 KiB
VB.net
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
|