ivanszabo/Nuvolar
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Jelölő adatok IsActive

Browse Source 
Mezőgazdaság termeltetés IsActive
Számviteli készletnél szállítólevél DateExecution
This commit is contained in:
ivanszabo
2018-03-12 10:53:58 +01:00
parent 50a572daf3
commit dd449f32d7
74 changed files with 355 additions and 202 deletions
Download Patch File Download Diff File Expand all files Collapse all files
Nuvolar.Module/BusinessObjects/Financial/FinancialObjects/FinancialTransactions/Base/GLHeader.vb
+5 -1
View File
@@ -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
Nuvolar.Module/BusinessObjects/Financial/FinancialObjects/FinancialTransactions/Base/GLRows.vb
+9 -5
View File
@@ -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
Nuvolar.Module/BusinessObjects/Financial/FinancialObjects/FinancialTransactions/Base/Popup/GLRowsDivideH.vb
+16 -12
View File
@@ -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
Nuvolar.Module/BusinessObjects/Financial/FinancialObjects/FinancialTransactions/Base/Popup/GLRowsDivideR.vb
+1
View File
@@ -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
Nuvolar.Module/BusinessObjects/Financial/FinancialObjects/FinancialTransactions/BookEntry/BookEntryCheck.vb
+11 -11
View File
@@ -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
Nuvolar.Module/BusinessObjects/Financial/FinancialObjects/FinancialTransactions/BookEntry/GLAccountRowsforBookEntry.vb
+5 -5
View File
@@ -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
Nuvolar.Module/BusinessObjects/Financial/FinancialObjects/FinancialTransactions/Fixed Assets/FixedAssets.vb
+3 -1
View File
@@ -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
Nuvolar.Module/BusinessObjects/Financial/FinancialObjects/FinancialTransactions/Fixed Assets/FixedAssetsCard.vb
+2 -1
View File
@@ -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
Nuvolar.Module/BusinessObjects/Financial/FinancialObjects/FinancialTransactions/Fixed Assets/FixedAssetsUsingHeader.vb
+1
View File
@@ -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
Nuvolar.Module/BusinessObjects/Financial/FinancialObjects/FinancialTransactions/Popup/GLRowsCheck.vb
+7 -7
View File
@@ -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
Nuvolar.Module/BusinessObjects/Financial/FinancialObjects/FinancialTransactions/Reports/Card/GLCardsRows.vb
+2
View File
@@ -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
Nuvolar.Module/BusinessObjects/Financial/FinancialObjects/FinancialTransactions/Reports/DTR/GLReportCashflowRows.vb
+7 -3
View File
@@ -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
Nuvolar.Module/BusinessObjects/Financial/FinancialObjects/FinancialTransactions/Reports/DTR/GLReportRows.vb
+4
View File
@@ -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
Nuvolar.Module/BusinessObjects/Financial/FinancialObjects/ProjectPlan/ProjectPlanRows.vb
+4
View File
@@ -57,6 +57,7 @@ Public Class ProjectPlanRows
SetPropertyValue("Controlling", _Controlling, value)
End Set
End Property
<DataSourceCriteria("IsActive != False")>
Property CostHolder As CostHolder
Get
Return _CostHolder
@@ -65,6 +66,7 @@ Public Class ProjectPlanRows
SetPropertyValue("CostHolder", _CostHolder, value)
End Set
End Property
<DataSourceCriteria("IsActive != False")>
Property CostPlace As CostPlace
Get
Return _CostPlace
@@ -73,6 +75,7 @@ Public Class ProjectPlanRows
SetPropertyValue("CostPlace", _CostPlace, value)
End Set
End Property
<DataSourceCriteria("IsActive != False")>
Property UniqueObjects As UniqueObjects
Get
Return _UniqueObjects
@@ -81,6 +84,7 @@ Public Class ProjectPlanRows
SetPropertyValue("UniqueObjects", _UniqueObjects, value)
End Set
End Property
<DataSourceCriteria("IsActive != False")>
Property JobNumberObjects As JobNumberObjects
Get
Return _JobNumberObjects
Nuvolar.Module/BusinessObjects/Financial/FinancialObjects/Registry/Popup/RegistryRowsFinancialControllingPopupWindow.vb
+3
View File
@@ -49,6 +49,7 @@ Public Class RegistryRowsFinancialControllingPopupWindow 'Popup a csoportos dolg
SetPropertyValue("Controlling", _Controlling, value)
End Set
End Property
<DataSourceCriteria("IsActive != False")>
Property UniqueObjects As UniqueObjects
Get
Return _UniqueObjects
@@ -57,6 +58,7 @@ Public Class RegistryRowsFinancialControllingPopupWindow 'Popup a csoportos dolg
SetPropertyValue("UniqueObjects", _UniqueObjects, value)
End Set
End Property
<DataSourceCriteria("IsActive != False")>
Property CostHolder As CostHolder
Get
Return _CostHolder
@@ -65,6 +67,7 @@ Public Class RegistryRowsFinancialControllingPopupWindow 'Popup a csoportos dolg
SetPropertyValue("CostHolder", _CostHolder, value)
End Set
End Property
<DataSourceCriteria("IsActive != False")>
Property CostPlace As CostPlace
Get
Return _CostPlace
Nuvolar.Module/BusinessObjects/Financial/FinancialObjects/Registry/Popup/RegistryRowsFinancialControlling_ReInvoicePopupWindow.vb
+8 -4
View File
@@ -92,7 +92,8 @@ Public Class RegistryRowsFinancialControlling_ReInvoicePopupWindow
Return Me.RegistryRowsFinancialControlling.ReInvoiceReason
End Get
End Property
<RuleRequiredField("RegistryRowsFinancialControlling_ReInvoicePopupWindow.CostHolder", "Reinvoice_ok", TargetCriteria:="ContractTemplate.Rule5DMatrix.RequireCostHolder=True")> _
<RuleRequiredField("RegistryRowsFinancialControlling_ReInvoicePopupWindow.CostHolder", "Reinvoice_ok", TargetCriteria:="ContractTemplate.Rule5DMatrix.RequireCostHolder=True")>
<DataSourceCriteria("IsActive != False")>
Property CostHolder As CostHolder
Get
Return _CostHolder
@@ -101,7 +102,8 @@ Public Class RegistryRowsFinancialControlling_ReInvoicePopupWindow
SetPropertyValue("CostHolder", _CostHolder, value)
End Set
End Property
<RuleRequiredField("RegistryRowsFinancialControlling_ReInvoicePopupWindow.CostPlace", "Reinvoice_ok", TargetCriteria:="ContractTemplate.Rule5DMatrix.RequireCostPlace=True")> _
<RuleRequiredField("RegistryRowsFinancialControlling_ReInvoicePopupWindow.CostPlace", "Reinvoice_ok", TargetCriteria:="ContractTemplate.Rule5DMatrix.RequireCostPlace=True")>
<DataSourceCriteria("IsActive != False")>
Property CostPlace As CostPlace
Get
Return _CostPlace
@@ -110,7 +112,8 @@ Public Class RegistryRowsFinancialControlling_ReInvoicePopupWindow
SetPropertyValue("CostPlace", _CostPlace, value)
End Set
End Property
<RuleRequiredField("RegistryRowsFinancialControlling_ReInvoicePopupWindow.JobNumberObjects", "Reinvoice_ok", TargetCriteria:="ContractTemplate.Rule5DMatrix.RequireJobNumberObjects=True")> _
<RuleRequiredField("RegistryRowsFinancialControlling_ReInvoicePopupWindow.JobNumberObjects", "Reinvoice_ok", TargetCriteria:="ContractTemplate.Rule5DMatrix.RequireJobNumberObjects=True")>
<DataSourceCriteria("IsActive != False")>
Property JobNumberObjects As JobNumberObjects
Get
Return _JobNumberObjects
@@ -119,7 +122,8 @@ Public Class RegistryRowsFinancialControlling_ReInvoicePopupWindow
SetPropertyValue("JobNumberObjects", _JobNumberObjects, value)
End Set
End Property
<RuleRequiredField("RegistryRowsFinancialControlling_ReInvoicePopupWindow.UniqueObjects", "Reinvoice_ok", TargetCriteria:="ContractTemplate.Rule5DMatrix.RequireUniqueObjects=True")> _
<RuleRequiredField("RegistryRowsFinancialControlling_ReInvoicePopupWindow.UniqueObjects", "Reinvoice_ok", TargetCriteria:="ContractTemplate.Rule5DMatrix.RequireUniqueObjects=True")>
<DataSourceCriteria("IsActive != False")>
Property UniqueObjects As UniqueObjects
Get
Return _UniqueObjects
Nuvolar.Module/BusinessObjects/Financial/FinancialObjects/Registry/Popup/RegistryTaskGoToNewtStepWithGLAccount.vb
+9 -9
View File
@@ -10,8 +10,8 @@ Imports DevExpress.Persistent.BaseImpl
Imports DevExpress.Persistent.Validation
Imports DevExpress.ExpressApp.ConditionalAppearance
<DefaultClassOptions(), NonPersistent, CreatableItem(False), NavigationItem(False)> _
<Appearance("Hide ReInvoice_Customers if IsReinvoice is false", AppearanceItemType.ViewItem, "IsReinvoice=False", TargetItems:="ReInvoice_Customers", visibility:=Editors.ViewItemVisibility.Hide)> _
<DefaultClassOptions(), NonPersistent, CreatableItem(False), NavigationItem(False)>
<Appearance("Hide ReInvoice_Customers if IsReinvoice is false", AppearanceItemType.ViewItem, "IsReinvoice=False", TargetItems:="ReInvoice_Customers", Visibility:=Editors.ViewItemVisibility.Hide)>
Public Class RegistryTaskGoToNewtStepWithGLAccount
Inherits BaseObject
Public Sub New(ByVal session As Session)
@@ -21,18 +21,18 @@ Public Class RegistryTaskGoToNewtStepWithGLAccount
MyBase.AfterConstruction()
End Sub
<Browsable(False)> _
<Browsable(False)>
Property CustomersFrom As CustomersFrom
Property Controlling As Controlling
Property UniqueObjects As UniqueObjects
Property JobNumberObjects As JobNumberObjects
Property CostHolder As CostHolder
Property CostPlace As CostPlace
<ImmediatePostData()> _
<DataSourceCriteria("IsActive != False")> Property UniqueObjects As UniqueObjects
<DataSourceCriteria("IsActive != False")> Property JobNumberObjects As JobNumberObjects
<DataSourceCriteria("IsActive != False")> Property CostHolder As CostHolder
<DataSourceCriteria("IsActive != False")> Property CostPlace As CostPlace
<ImmediatePostData()>
Property IsReinvoice As Boolean = False
<VisibleInListView(False), VisibleInDetailView(False), VisibleInLookupListView(False)> _
<VisibleInListView(False), VisibleInDetailView(False), VisibleInLookupListView(False)>
Property SelectedTasks As ArrayList
End Class
Nuvolar.Module/BusinessObjects/Financial/FinancialObjects/Registry/RegistryHeader.vb
+6
View File
@@ -383,6 +383,7 @@ Public Class RegistryHeader '-- iktatórendszer
SetPropertyValue("RegistryNumber", _RegistryNumber, value)
End Set
End Property
<DataSourceCriteria("IsActive != False")>
Property JobNumberObjects() As JobNumberObjects
Get
Return _JobNumberObjects
@@ -391,6 +392,7 @@ Public Class RegistryHeader '-- iktatórendszer
SetPropertyValue("JobNumberObjects", _JobNumberObjects, value)
End Set
End Property
<DataSourceCriteria("IsActive != False")>
Property UniqueObjects() As UniqueObjects
Get
Return _UniqueObjects
@@ -895,6 +897,7 @@ Public Class RegistryHeader '-- iktatórendszer
<NonPersistent(), VisibleInListView(False), VisibleInLookupListView(False)>
<RuleRequiredField("RegistryHeader-row_RRFC_CostPlace", "aToTable_RRFC_Contexts", TargetCriteria:="RegistryType.Rule5DMatrix.RequireCostPlace")>
<RuleRequiredField("RegistryHeader-row_RRFC_CostPlace_T", "aToTable_RRFC_With_TContract_Contexts", TargetCriteria:="RegistryType.Rule5DMatrix.RequireCostPlace")>
<DataSourceCriteria("IsActive != False")>
Property row_RRFC_CostPlace As CostPlace
Get
Return _row_RRFC_CostPlace
@@ -906,6 +909,7 @@ Public Class RegistryHeader '-- iktatórendszer
<NonPersistent(), VisibleInListView(False), VisibleInLookupListView(False)>
<RuleRequiredField("RegistryHeader-row_RRFC_CostHolder", "aToTable_RRFC_Contexts", TargetCriteria:="RegistryType.Rule5DMatrix.RequireCostHolder")>
<RuleRequiredField("RegistryHeader-row_RRFC_CostHolder_T", "aToTable_RRFC_With_TContract_Contexts", TargetCriteria:="RegistryType.Rule5DMatrix.RequireCostHolder")>
<DataSourceCriteria("IsActive != False")>
Property row_RRFC_CostHolder As CostHolder
Get
Return _row_RRFC_CostHolder
@@ -917,6 +921,7 @@ Public Class RegistryHeader '-- iktatórendszer
<NonPersistent(), VisibleInListView(False), VisibleInLookupListView(False)>
<RuleRequiredField("RegistryHeader-row_RRFC_JobNumberObjects", "aToTable_RRFC_RegistryTask_Contexts", TargetCriteria:="RegistryType.Rule5DMatrix.RequireJobNumberObjects")>
<RuleRequiredField("RegistryHeader-row_RRFC_JobNumberObjects_T", "aToTable_RRFC_With_TContract_RegistryTask_Contexts", TargetCriteria:="RegistryType.Rule5DMatrix.RequireJobNumberObjects")>
<DataSourceCriteria("IsActive != False")>
Property row_RRFC_JobNumberObjects As JobNumberObjects
Get
Return _row_RRFC_JobNumberObjects
@@ -928,6 +933,7 @@ Public Class RegistryHeader '-- iktatórendszer
<NonPersistent(), VisibleInListView(False), VisibleInLookupListView(False)>
<RuleRequiredField("RegistryHeader-row_RRFC_UniqueObjects", "aToTable_RRFC_RegistryTask_Contexts", TargetCriteria:="RegistryType.Rule5DMatrix.RequireUniqueObjects")>
<RuleRequiredField("RegistryHeader-row_RRFC_UniqueObjects_T", "aToTable_RRFC_With_TContract_RegistryTask_Contexts", TargetCriteria:="RegistryType.Rule5DMatrix.RequireUniqueObjects")>
<DataSourceCriteria("IsActive != False")>
Property row_RRFC_UniqueObjects As UniqueObjects
Get
Return _row_RRFC_UniqueObjects
Nuvolar.Module/BusinessObjects/Financial/FinancialObjects/Registry/RegistryRowsFinancialControlling/RegistryRowsFinancialControlling.vb
+8 -4
View File
@@ -188,7 +188,8 @@ Public Class RegistryRowsFinancialControlling
End If
End Set
End Property
<RuleRequiredField("RegistryRowsFinancialControlling-CostHolder", "aCreateContractsRowsfromControllingRows", targetcriteria:="RegistryHeader.RegistryType.Rule5DMatrix.RequireCostHolder")> _
<RuleRequiredField("RegistryRowsFinancialControlling-CostHolder", "aCreateContractsRowsfromControllingRows", TargetCriteria:="RegistryHeader.RegistryType.Rule5DMatrix.RequireCostHolder")>
<DataSourceCriteria("IsActive != False")>
Property CostHolder As CostHolder
Get
Return _CostHolder
@@ -203,7 +204,8 @@ Public Class RegistryRowsFinancialControlling
End If
End Set
End Property
<RuleRequiredField("RegistryRowsFinancialControlling-CostPlace", "aCreateContractsRowsfromControllingRows", targetcriteria:="RegistryHeader.RegistryType.Rule5DMatrix.RequireCostPlace")> _
<RuleRequiredField("RegistryRowsFinancialControlling-CostPlace", "aCreateContractsRowsfromControllingRows", TargetCriteria:="RegistryHeader.RegistryType.Rule5DMatrix.RequireCostPlace")>
<DataSourceCriteria("IsActive != False")>
Property CostPlace As CostPlace
Get
Return _CostPlace
@@ -212,7 +214,8 @@ Public Class RegistryRowsFinancialControlling
SetPropertyValue("CostPlace", _CostPlace, value)
End Set
End Property
<RuleRequiredField("RegistryRowsFinancialControlling-UniqueObjects", "aCreateContractsRowsfromControllingRows", targetcriteria:="RegistryHeader.RegistryType.Rule5DMatrix.RequireUniqueObjects")> _
<RuleRequiredField("RegistryRowsFinancialControlling-UniqueObjects", "aCreateContractsRowsfromControllingRows", TargetCriteria:="RegistryHeader.RegistryType.Rule5DMatrix.RequireUniqueObjects")>
<DataSourceCriteria("IsActive != False")>
Property UniqueObjects As UniqueObjects
Get
Return _UniqueObjects
@@ -227,7 +230,8 @@ Public Class RegistryRowsFinancialControlling
End If
End Set
End Property
<RuleRequiredField("RegistryRowsFinancialControlling-JobNumberObjects", "aCreateContractsRowsfromControllingRows", targetcriteria:="RegistryHeader.RegistryType.Rule5DMatrix.RequireJobNumberObjects")> _
<RuleRequiredField("RegistryRowsFinancialControlling-JobNumberObjects", "aCreateContractsRowsfromControllingRows", TargetCriteria:="RegistryHeader.RegistryType.Rule5DMatrix.RequireJobNumberObjects")>
<DataSourceCriteria("IsActive != False")>
Property JobNumberObjects As JobNumberObjects
Get
Return _JobNumberObjects
Nuvolar.Module/BusinessObjects/Financial/FinancialObjects/Registry/RegistryTasks.vb
+6 -3
View File
@@ -156,9 +156,10 @@ Public Class RegistryTasks '-- Registryhez task a feladatokhoz
SetPropertyValue("row_RRFC_Controlling", _row_RRFC_Controlling, value)
End Set
End Property
<NonPersistent(), VisibleInListView(False), VisibleInLookupListView(False)> _
<RuleRequiredField("RegistryTask-row_RRFC_CostPlace", "aToTable_RRFC_RegistryTask_Contexts", targetcriteria:="RegistryHeader.RegistryType.Rule5DMatrix.RequireCostPlace")> _
<RuleRequiredField("RegistryTask-row_RRFC_CostPlace_T", "aToTable_RRFC_With_TContract_RegistryTask_Contexts", targetcriteria:="RegistryHeader.RegistryType.Rule5DMatrix.RequireCostPlace")> _
<NonPersistent(), VisibleInListView(False), VisibleInLookupListView(False)>
<RuleRequiredField("RegistryTask-row_RRFC_CostPlace", "aToTable_RRFC_RegistryTask_Contexts", TargetCriteria:="RegistryHeader.RegistryType.Rule5DMatrix.RequireCostPlace")>
<RuleRequiredField("RegistryTask-row_RRFC_CostPlace_T", "aToTable_RRFC_With_TContract_RegistryTask_Contexts", TargetCriteria:="RegistryHeader.RegistryType.Rule5DMatrix.RequireCostPlace")>
<DataSourceCriteria("IsActive != False")>
Property row_RRFC_CostPlace As CostPlace
Get
Return _row_RRFC_CostPlace
@@ -237,6 +238,7 @@ Public Class RegistryTasks '-- Registryhez task a feladatokhoz
<NonPersistent(), VisibleInListView(False), VisibleInLookupListView(False)>
<RuleRequiredField("RegistryTask-row_RRFC_JobNumberObjects", "aToTable_RRFC_RegistryTask_Contexts", TargetCriteria:="RegistryHeader.RegistryType.Rule5DMatrix.RequireJobNumberObjects")>
<RuleRequiredField("RegistryTask-row_RRFC_JobNumberObjects_T", "aToTable_RRFC_With_TContract_RegistryTask_Contexts", TargetCriteria:="RegistryHeader.RegistryType.Rule5DMatrix.RequireJobNumberObjects")>
<DataSourceCriteria("IsActive != False")>
Property row_RRFC_JobNumberObjects As JobNumberObjects
Get
Return _row_RRFC_JobNumberObjects
@@ -248,6 +250,7 @@ Public Class RegistryTasks '-- Registryhez task a feladatokhoz
<NonPersistent(), VisibleInListView(False), VisibleInLookupListView(False)>
<RuleRequiredField("RegistryTask-row_RRFC_UniqueObjects", "aToTable_RRFC_RegistryTask_Contexts", TargetCriteria:="RegistryHeader.RegistryType.Rule5DMatrix.RequireUniqueObjects")>
<RuleRequiredField("RegistryTask-row_RRFC_UniqueObjects_T", "aToTable_RRFC_With_TContract_RegistryTask_Contexts", TargetCriteria:="RegistryHeader.RegistryType.Rule5DMatrix.RequireUniqueObjects")>
<DataSourceCriteria("IsActive != False")>
Property row_RRFC_UniqueObjects As UniqueObjects
Get
Return _row_RRFC_UniqueObjects
Nuvolar.Module/BusinessObjects/Financial/FinancialObjects/Registry/Telephone/RegistryTelephone.vb
+1
View File
@@ -68,6 +68,7 @@ Public Class RegistryTelephone
SetPropertyValue("RegistryTelephoneParameters", _RegistryTelephoneParameters, value)
End Set
End Property
<DataSourceCriteria("IsActive != False")>
Property UniqueObjects As UniqueObjects
Get
Return _UniqueObjects
Nuvolar.Module/BusinessObjects/Financial/FinancialObjects/Stocks/5D/Controlling.vb
+13 -2
View File
@@ -39,7 +39,7 @@ Public Class Controlling
Private _RequireCars As Boolean = False
Private _RequireHRPerson As Boolean
Private _RequirePhones As Boolean = False
Private _IsActive As Boolean
Public Sub New(ByVal session As Session)
MyBase.New(session)
If session.IsObjectsLoading = False And session.IsObjectsSaving = False Then
@@ -78,7 +78,18 @@ Public Class Controlling
Next
Me.ReconfigureGroup(Nothing, Me, False)
End Sub
''' <summary>
''' Használatban van ?
''' </summary>
''' <returns></returns>
Property IsActive As Boolean
Get
Return _IsActive
End Get
Set(value As Boolean)
SetPropertyValue("IsActive", _IsActive, value)
End Set
End Property
<ImmediatePostData(True), DataSourceProperty("CollectionOfControlling")>
<NonPersistent>
Property ParentObject As Controlling
Nuvolar.Module/BusinessObjects/Financial/FinancialObjects/Stocks/5D/CostHolder.vb
+13 -1
View File
@@ -13,11 +13,23 @@ Imports DevExpress.Persistent.Validation
<NavigationItem("FinancialStock")> _
Public Class CostHolder
Inherits HCategory
Private _IsActive As Boolean
Public Sub New(ByVal session As Session)
MyBase.New(session)
End Sub
''' <summary>
''' Használatban van ?
''' </summary>
''' <returns></returns>
Property IsActive As Boolean
Get
Return _IsActive
End Get
Set(value As Boolean)
SetPropertyValue("IsActive", _IsActive, value)
End Set
End Property
<VisibleInListView(False), VisibleInLookupListView(False)> _
ReadOnly Property HRPersonCostHolder As XPCollection(Of HRPersonCostHolder)
Get
Nuvolar.Module/BusinessObjects/Financial/FinancialObjects/Stocks/5D/CostPlace.vb
+13
View File
@@ -13,9 +13,22 @@ Imports DevExpress.Persistent.Validation
<NavigationItem("FinancialStock")> _
Public Class CostPlace
Inherits HCategory
Private _IsActive As Boolean
Public Sub New(ByVal session As Session)
MyBase.New(session)
End Sub
''' <summary>
''' Használatban van ?
''' </summary>
''' <returns></returns>
Property IsActive As Boolean
Get
Return _IsActive
End Get
Set(value As Boolean)
SetPropertyValue("IsActive", _IsActive, value)
End Set
End Property
<NonPersistent>
<ImmediatePostData(True), DataSourceProperty("CollectionOfCostPlace")>
Property ParentObject As CostPlace
Nuvolar.Module/BusinessObjects/Financial/FinancialObjects/Stocks/5D/JobNumberObjects.vb
+9 -1
View File
@@ -13,10 +13,18 @@ Imports DevExpress.Persistent.Validation
<NavigationItem("FinancialStock")> _
Public Class JobNumberObjects
Inherits HCategory
Private _IsActive As Boolean
Public Sub New(ByVal session As Session)
MyBase.New(session)
End Sub
Property IsActive As Boolean
Get
Return _IsActive
End Get
Set(value As Boolean)
SetPropertyValue("IsActive", _IsActive, value)
End Set
End Property
<NonPersistent>
<ImmediatePostData(True), DataSourceProperty("CollectionOfJobNumberObjects")>
Property ParentObject As JobNumberObjects
Nuvolar.Module/BusinessObjects/Financial/FinancialObjects/Stocks/5D/UniqueObjects.vb
+21 -9
View File
@@ -9,20 +9,21 @@ Imports DevExpress.Persistent.Base
Imports DevExpress.Persistent.BaseImpl
Imports DevExpress.Persistent.Validation
<DefaultClassOptions()> _
<NavigationItem("FinancialStock")> _
<DefaultClassOptions()>
<NavigationItem("FinancialStock")>
Public Class UniqueObjects
Inherits HCategory
Private _Cars As Cars
Private _Phones As Phones
Private _HRPerson As HRPerson
Private _IsActive As Boolean
Public Sub New(ByVal session As Session)
MyBase.New(session)
End Sub
<Browsable(False)> _
<Browsable(False)>
Property Cars As Cars
Get
Return _Cars
@@ -31,7 +32,7 @@ Public Class UniqueObjects
SetPropertyValue("Cars", _Cars, value)
End Set
End Property
<Browsable(False)> _
<Browsable(False)>
Property Phones As Phones
Get
Return _Phones
@@ -40,7 +41,7 @@ Public Class UniqueObjects
SetPropertyValue("Phones", _Phones, value)
End Set
End Property
<Browsable(False)> _
<Browsable(False)>
Property HRPerson As HRPerson
Get
Return _HRPerson
@@ -49,7 +50,18 @@ Public Class UniqueObjects
SetPropertyValue("HRPerson", _HRPerson, value)
End Set
End Property
''' <summary>
''' Használatban van ?
''' </summary>
''' <returns></returns>
Property IsActive As Boolean
Get
Return _IsActive
End Get
Set(value As Boolean)
SetPropertyValue("IsActive", _IsActive, value)
End Set
End Property
<NonPersistent>
<ImmediatePostData(True), DataSourceProperty("CollectionOfUniqueObjects")>
Property ParentObject As UniqueObjects
@@ -60,9 +72,9 @@ Public Class UniqueObjects
MyBase.Parent = value
End Set
End Property
<VisibleInListView(False), VisibleInDetailView(False), VisibleInLookupListView(False)> _
<Browsable(False)> _
<NonPersistent()> _
<VisibleInListView(False), VisibleInDetailView(False), VisibleInLookupListView(False)>
<Browsable(False)>
<NonPersistent()>
Private ReadOnly Property CollectionOfUniqueObjects As XPCollection(Of UniqueObjects)
Get
Dim _CollectionOfUniqueObjects As New XPCollection(Of UniqueObjects)(Session, CriteriaOperator.Parse("Oid != ?", Me.Oid))