Jelölő adatok IsActive

Mezőgazdaság termeltetés IsActive
Számviteli készletnél szállítólevél DateExecution
This commit is contained in:
2018-03-12 10:53:58 +01:00
parent 50a572daf3
commit dd449f32d7
74 changed files with 355 additions and 202 deletions
@@ -518,7 +518,8 @@ Public Class GLHeader
<NonPersistent()>
<VisibleInListView(False)>
<RuleRequiredField("GLHeader-row_CostPlace-aToTable_GLAccounts_Contexts", "aToTable_GLAccounts_Contexts", TargetCriteria:="Rule5DMatrix.RequireCostPlace=True")>
Property row_CostPlace() As CostPlace
<DataSourceCriteria("IsActive != False")>
Property row_CostPlace As CostPlace
Get
Return _row_CostPlace
End Get
@@ -529,6 +530,7 @@ Public Class GLHeader
<NonPersistent()>
<VisibleInListView(False)>
<RuleRequiredField("GLHeader-row_CostHolder-aToTable_GLAccounts_Contexts", "aToTable_GLAccounts_Contexts", TargetCriteria:="Rule5DMatrix.RequireCostHolder=True")>
<DataSourceCriteria("IsActive != False")>
Property row_CostHolder() As CostHolder
Get
Return _row_CostHolder
@@ -540,6 +542,7 @@ Public Class GLHeader
<NonPersistent()>
<VisibleInListView(False)>
<RuleRequiredField("GLHeader-row_UniqueObjects-aToTable_GLAccounts_Contexts", "aToTable_GLAccounts_Contexts", TargetCriteria:="Rule5DMatrix.RequireUniqueObjects=True")>
<DataSourceCriteria("IsActive != False")>
Property row_UniqueObjects() As UniqueObjects
Get
Return _row_UniqueObjects
@@ -551,6 +554,7 @@ Public Class GLHeader
<NonPersistent()>
<VisibleInListView(False)>
<RuleRequiredField("GLHeader-row_JobNumberObjects-aToTable_GLAccounts_Contexts", "aToTable_GLAccounts_Contexts", TargetCriteria:="Rule5DMatrix.RequireJobNumberObjects=True")>
<DataSourceCriteria("IsActive != False")>
Property row_JobNumberObjects() As JobNumberObjects
Get
Return _row_JobNumberObjects
@@ -294,7 +294,8 @@ Public Class GLRows
End If
End Set
End Property
<RuleRequiredField("GLRows-JobNumberObjects", DefaultContexts.Save, TargetCriteria:="Rule5DMatrix.RequireJobNumberObjects=True and Require5DValidation=True")> _
<RuleRequiredField("GLRows-JobNumberObjects", DefaultContexts.Save, TargetCriteria:="Rule5DMatrix.RequireJobNumberObjects=True and Require5DValidation=True")>
<DataSourceCriteria("IsActive != False")>
Property JobNumberObjects() As JobNumberObjects
Get
Return _JobNumberObjects
@@ -303,7 +304,8 @@ Public Class GLRows
SetPropertyValue("JobNumberObjects", _JobNumberObjects, value)
End Set
End Property
<RuleRequiredField("GLRows-UniqueObjects", DefaultContexts.Save, TargetCriteria:="Rule5DMatrix.RequireUniqueObjects=True and Require5DValidation=True")> _
<RuleRequiredField("GLRows-UniqueObjects", DefaultContexts.Save, TargetCriteria:="Rule5DMatrix.RequireUniqueObjects=True and Require5DValidation=True")>
<DataSourceCriteria("IsActive != False")>
Property UniqueObjects() As UniqueObjects
Get
Return _UniqueObjects
@@ -312,8 +314,9 @@ Public Class GLRows
SetPropertyValue("UniqueObjects", _UniqueObjects, value)
End Set
End Property
<RuleRequiredField("GLRows-CostPlace", DefaultContexts.Save, TargetCriteria:="Rule5DMatrix.RequireCostPlace=True and Require5DValidation=True")> _
Property CostPlace() As CostPlace
<RuleRequiredField("GLRows-CostPlace", DefaultContexts.Save, TargetCriteria:="Rule5DMatrix.RequireCostPlace=True and Require5DValidation=True")>
<DataSourceCriteria("IsActive != False")>
Property CostPlace As CostPlace
Get
Return _CostPlace
End Get
@@ -321,7 +324,8 @@ Public Class GLRows
SetPropertyValue("CostPlace", _CostPlace, value)
End Set
End Property
<RuleRequiredField("GLRows-CostHolder", DefaultContexts.Save, TargetCriteria:="Rule5DMatrix.RequireCostHolder=True and Require5DValidation=True")> _
<RuleRequiredField("GLRows-CostHolder", DefaultContexts.Save, TargetCriteria:="Rule5DMatrix.RequireCostHolder=True and Require5DValidation=True")>
<DataSourceCriteria("IsActive != False")>
Property CostHolder() As CostHolder
Get
Return _CostHolder
@@ -227,9 +227,10 @@ Public Class GLRowsDivideH
SetPropertyValue("row_Controlling", _row_Controlling, value)
End Set
End Property
<NonPersistent()> _
<ImmediatePostData(True)> _
<VisibleInListView(False)> _
<NonPersistent()>
<ImmediatePostData(True)>
<VisibleInListView(False)>
<DataSourceCriteria("IsActive != False")>
Property row_CostHolder As CostHolder
Get
Return _row_CostHolder
@@ -238,9 +239,10 @@ Public Class GLRowsDivideH
SetPropertyValue("row_CostHolder", _row_CostHolder, value)
End Set
End Property
<NonPersistent()> _
<ImmediatePostData(True)> _
<VisibleInListView(False)> _
<NonPersistent()>
<ImmediatePostData(True)>
<VisibleInListView(False)>
<DataSourceCriteria("IsActive != False")>
Property row_CostPlace As CostPlace
Get
Return _row_CostPlace
@@ -249,9 +251,10 @@ Public Class GLRowsDivideH
SetPropertyValue("row_CostPlace", _row_CostPlace, value)
End Set
End Property
<NonPersistent()> _
<ImmediatePostData(True)> _
<VisibleInListView(False)> _
<NonPersistent()>
<ImmediatePostData(True)>
<VisibleInListView(False)>
<DataSourceCriteria("IsActive != False")>
Property row_JobNumberObjects As JobNumberObjects
Get
Return _row_JobNumberObjects
@@ -260,9 +263,10 @@ Public Class GLRowsDivideH
SetPropertyValue("row_JobNumberObjects", _row_JobNumberObjects, value)
End Set
End Property
<NonPersistent()> _
<ImmediatePostData(True)> _
<VisibleInListView(False)> _
<NonPersistent()>
<ImmediatePostData(True)>
<VisibleInListView(False)>
<DataSourceCriteria("IsActive != False")>
Property row_UniqueObjects As UniqueObjects
Get
Return _row_UniqueObjects
@@ -123,6 +123,7 @@ Public Class GLRowsDivideR
SetPropertyValue("CostHolder", _CostHolder, value)
End Set
End Property
<DataSourceCriteria("IsActive != False")>
Property CostPlace As CostPlace
Get
Return _CostPlace
@@ -10,12 +10,12 @@ 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)> _
<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)
@@ -23,11 +23,11 @@ Public Class BookEntryCheck 'Popup a csoportos m
End Sub
<NonPersistent()> Public Property ChartOfAccountsYear As ChartOfAccountsYear
<NonPersistent()> <ImmediatePostData(True), 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()> <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
@@ -14,10 +14,10 @@ Imports System.Linq
Imports System.Linq.Expressions
Imports DevExpress.ExpressApp.ConditionalAppearance
<DefaultClassOptions()> _
<NavigationItem(False), CreatableItem(False)> _
<Persistent("vv_GLAccountRowsforBookEntry")> _
<ImageName("BO_Report")> _
<DefaultClassOptions()>
<NavigationItem(False), CreatableItem(False)>
<Persistent("vv_GLAccountRowsforBookEntry")>
<ImageName("BO_Report")>
Public Class GLAccountRowsforBookEntry 'Fõkönyvi feladáshoz lista, ami alaplyán a könyvelõ tud ellenõrizni
Inherits XPLiteObject
Public Sub New(ByVal session As Session)
@@ -51,7 +51,7 @@ Public Class GLAccountRowsforBookEntry 'F
<Persistent("InvoiceHeader")> Public InvoiceHeader As InvoiceHeader
<Persistent("WorkflowSystemSteps")> Public WorkflowSystemSteps As WorkflowSystemSteps
<Persistent("WorkflowMessage")> Public WorkflowMessage As String
Public Sub findrows()
Dim _RegistryTasks_coll As New XPCollection(GetType(RegistryTasks), CriteriaOperator.Parse("CurrentWorkflowSystemSteps.StepFinancialType=4 AND Status=0"))
Dim _RegistryHeader_Oid_array As New ArrayList
@@ -65,7 +65,8 @@ Public Class FixedAssets
End Set
End Property
'<RuleUniqueValue("FixedAssets-UniqueObjects", DefaultContexts.Save, criteriaevaluationbehavior:=PersistentCriteriaEvaluationBehavior.BeforeTransaction, targetcriteria:="")> _
<ImmediatePostData(True)> _
<ImmediatePostData(True)>
<DataSourceCriteria("IsActive != False")>
Property UniqueObjects As UniqueObjects
Get
Return _UniqueObjects
@@ -157,6 +158,7 @@ Public Class FixedAssets
SetPropertyValue("CostHolder_Using", _CostHolder_Using, value)
End Set
End Property
<DataSourceCriteria("IsActive != False")>
Property CostPlace_Using As CostPlace
Get
Return _CostPlace_Using
@@ -112,7 +112,8 @@ Public Class FixedAssetsCard
SetPropertyValue("Description", _Description, value)
End Set
End Property
<NonCloneable()> _
<NonCloneable()>
<DataSourceCriteria("IsActive != False")>
Property UniqueObjects As UniqueObjects
Get
Return _UniqueObjects
@@ -106,6 +106,7 @@ Public Class FixedAssetsUsingHeader
SetPropertyValue("CostHolder", _CostHolder, value)
End Set
End Property
<DataSourceCriteria("IsActive != False")>
Property CostPalce As CostPlace
Get
Return _CostPlace
@@ -12,12 +12,12 @@ Imports System.Data.SqlClient
Imports System.Configuration
Imports System.Linq
Imports System.Linq.Expressions
<DefaultClassOptions()> _
<NavigationItem(False), CreatableItem(False)> _
<DeferredDeletion(False)> _
<RuleCriteria("RuleCriteria GLRowsCheck-Controlling", "*", "Controlling.Children.Count=0", "Csak gyermek objektum választható ki! (Controlling) ", SkipNullOrEmptyValues:=False)> _
<RuleCriteria("RuleCriteria GLRowsCheck-DebitChartOfAccounts", "*", "DebitChartOfAccounts.Children.Count=0", "Csak gyermek objektum választható ki! (DebitChartOfAccounts) ", SkipNullOrEmptyValues:=False)> _
<RuleCriteria("RuleCriteria GLRowsCheck-CreditChartOfAccounts", "*", "CreditChartOfAccounts.Children.Count=0", "Csak gyermek objektum választható ki! (CreditChartOfAccounts) ", SkipNullOrEmptyValues:=False)> _
<DefaultClassOptions()>
<NavigationItem(False), CreatableItem(False)>
<DeferredDeletion(False)>
<RuleCriteria("RuleCriteria GLRowsCheck-Controlling", "*", "Controlling.Children.Count=0", "Csak gyermek objektum választható ki! (Controlling) ", SkipNullOrEmptyValues:=False)>
<RuleCriteria("RuleCriteria GLRowsCheck-DebitChartOfAccounts", "*", "DebitChartOfAccounts.Children.Count=0", "Csak gyermek objektum választható ki! (DebitChartOfAccounts) ", SkipNullOrEmptyValues:=False)>
<RuleCriteria("RuleCriteria GLRowsCheck-CreditChartOfAccounts", "*", "CreditChartOfAccounts.Children.Count=0", "Csak gyermek objektum választható ki! (CreditChartOfAccounts) ", SkipNullOrEmptyValues:=False)>
Public Class GLRowsCheck 'Popup a csoportos módosításhoz
Inherits BaseObject
@@ -28,7 +28,7 @@ Public Class GLRowsCheck 'Popup a csoportos módosításhoz
<NonPersistent()> Public Property Controlling As Controlling
<NonPersistent()> Public Property JobNumberObjects As JobNumberObjects
<NonPersistent()> Public Property CostHolder As CostHolder
<NonPersistent()> Public Property CostPlace As CostPlace
<NonPersistent()> <DataSourceCriteria("IsActive != False")> Public Property CostPlace As CostPlace
<NonPersistent()> Public Property UniqueObjects As UniqueObjects
<NonPersistent()> <ImmediatePostData(True), DataSourceCriteria("AccountYear='@This.ChartOfAccountsYear.AccountYear'")> Public Property DebitChartOfAccounts As ChartOfAccounts
<NonPersistent()> <ImmediatePostData(True), DataSourceCriteria("AccountYear='@This.ChartOfAccountsYear.AccountYear'")> Public Property CreditChartOfAccounts As ChartOfAccounts
@@ -217,6 +217,7 @@ Public Class GLCardsRows
SetPropertyValue("ShortName", _ShortNameTo, value)
End Set
End Property
<DataSourceCriteria("IsActive != False")>
Property UniqueObjects As UniqueObjects
Get
Return _UniqueObjects
@@ -242,6 +243,7 @@ Public Class GLCardsRows
SetPropertyValue("JobNumberObjects", _JobNumberObjects, value)
End Set
End Property
<DataSourceCriteria("IsActive != False")>
Property CostPlace As CostPlace
Get
Return _CostPlace
@@ -10,8 +10,8 @@ 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')")> _
<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
@@ -61,7 +61,7 @@ Public Class GLReportCashflowRows
SetPropertyValue("GLReportRowsState", _GLReportRowsState, value)
End Set
End Property
<Association("GLReportCashflowHeader-GLReportCashflowRows", GetType(GLReportCashflowHeader))> _
<Association("GLReportCashflowHeader-GLReportCashflowRows", GetType(GLReportCashflowHeader))>
Property GLReportCashflowHeader As GLReportCashflowHeader
Get
Return _GLReportCashflowHeader
@@ -87,6 +87,7 @@ Public Class GLReportCashflowRows
SetPropertyValue("Controlling", _Controlling, value)
End Set
End Property
<DataSourceCriteria("IsActive != False")>
Property UniqueObjects As UniqueObjects
Get
Return _UniqueObjects
@@ -95,6 +96,7 @@ Public Class GLReportCashflowRows
SetPropertyValue("UniqueObjects", _UniqueObjects, value)
End Set
End Property
<DataSourceCriteria("IsActive != False")>
Property CostHolder As CostHolder
Get
Return _CostHolder
@@ -103,6 +105,7 @@ Public Class GLReportCashflowRows
SetPropertyValue("CostHolder", _CostHolder, value)
End Set
End Property
<DataSourceCriteria("IsActive != False")>
Property CostPlace As CostPlace
Get
Return _CostPlace
@@ -111,6 +114,7 @@ Public Class GLReportCashflowRows
SetPropertyValue("CostPlace", _CostPlace, value)
End Set
End Property
<DataSourceCriteria("IsActive != False")>
Property JobNumberObjects As JobNumberObjects
Get
Return _JobNumberObjects
@@ -141,6 +141,7 @@ Public Class GLReportRows
SetPropertyValue("Controlling", _Controlling, value)
End Set
End Property
<DataSourceCriteria("IsActive != False")>
Property UniqueObjects As UniqueObjects
Get
Return _UniqueObjects
@@ -149,6 +150,7 @@ Public Class GLReportRows
SetPropertyValue("UniqueObjects", _UniqueObjects, value)
End Set
End Property
<DataSourceCriteria("IsActive != False")>
Property CostHolder As CostHolder
Get
Return _CostHolder
@@ -157,6 +159,7 @@ Public Class GLReportRows
SetPropertyValue("CostHolder", _CostHolder, value)
End Set
End Property
<DataSourceCriteria("IsActive != False")>
Property CostPlace As CostPlace
Get
Return _CostPlace
@@ -165,6 +168,7 @@ Public Class GLReportRows
SetPropertyValue("CostPlace", _CostPlace, value)
End Set
End Property
<DataSourceCriteria("IsActive != False")>
Property JobNumberObjects As JobNumberObjects
Get
Return _JobNumberObjects