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
@@ -66,7 +66,8 @@ Public Class InvoiceCreditNoteHeader
SetPropertyValue("Customers", _Customers, value)
End Set
End Property
<RuleRequiredField("InvoiceCreditNoteHeader - Storage", DefaultContexts.Save)> _
<RuleRequiredField("InvoiceCreditNoteHeader - Storage", DefaultContexts.Save)>
<DataSourceCriteria("IsActive != False")>
Property Storage As Storage
Get
Return _Storage
@@ -1260,6 +1260,7 @@ Public Class InvoiceHeader
<NonPersistent()>
<VisibleInListView(False)>
<RuleRequiredField("InvoiceHeader-row_UniqueObjects", "aToTable_Invoice_Contexts", TargetCriteria:="InvoiceType.Rule5DMatrix.RequireUniqueObjects=True and IsCorrigendum=False")>
<DataSourceCriteria("IsActive != False")>
Property row_UniqueObjects() As UniqueObjects ' -- Egyedi azonosító
Get
Return _row_UniqueObjects
@@ -1282,6 +1283,7 @@ Public Class InvoiceHeader
<NonPersistent()>
<VisibleInListView(False)>
<RuleRequiredField("InvoiceHeader-row_CostPlace", "aToTable_Invoice_Contexts", TargetCriteria:="InvoiceType.Rule5DMatrix.RequireCostPlace=True and IsCorrigendum=False")>
<DataSourceCriteria("IsActive != False")>
Property row_CostPlace() As CostPlace ' -- Költség viselő
Get
Return _row_CostPlace
@@ -627,7 +627,8 @@ Public Class InvoiceRows
SetPropertyValue("ChartOfAccounts", _ChartOfAccounts, value)
End Set
End Property
<RuleRequiredField("InvoiceRows-UniqueObjects", DefaultContexts.Save, TargetCriteria:="InvoiceHeader.InvoiceType.Rule5DMatrix.RequireUniqueObjects=True")> _
<RuleRequiredField("InvoiceRows-UniqueObjects", DefaultContexts.Save, TargetCriteria:="InvoiceHeader.InvoiceType.Rule5DMatrix.RequireUniqueObjects=True")>
<DataSourceCriteria("IsActive != False")>
Property UniqueObjects As UniqueObjects
Get
Return _UniqueObjects
@@ -645,6 +646,7 @@ Public Class InvoiceRows
SetPropertyValue("CostHolder", _CostHolder, value)
End Set
End Property
<DataSourceCriteria("IsActive != False")>
Property CostPlace As CostPlace
Get
Return _CostPlace
@@ -176,6 +176,7 @@ Public Class InvoiceAdvancePopup 'Előlegszámla készítő, ez csinál InvoiceH
End Set
End Property
<RuleRequiredField("InvoiceAdvancePopup-CostPlace", DefaultContexts.Save, TargetCriteria:="InvoiceType.Rule5DMatrix.RequireCostPlace=True")>
<DataSourceCriteria("IsActive != False")>
Property CostPlace As CostPlace
Get
Return _CostPlace
@@ -185,6 +186,7 @@ Public Class InvoiceAdvancePopup 'Előlegszámla készítő, ez csinál InvoiceH
End Set
End Property
<RuleRequiredField("InvoiceAdvancePopup-UniqueObjects", DefaultContexts.Save, TargetCriteria:="InvoiceType.Rule5DMatrix.RequireUniqueObjects=True")>
<DataSourceCriteria("IsActive != False")>
Property UniqueObjects As UniqueObjects
Get
Return _UniqueObjects
@@ -9,7 +9,7 @@ Imports DevExpress.Persistent.Base
Imports DevExpress.Persistent.BaseImpl
Imports DevExpress.Persistent.Validation
<DefaultClassOptions(), NavigationItem(False), CreatableItem(False), NonPersistent> _
<DefaultClassOptions(), NavigationItem(False), CreatableItem(False), NonPersistent>
Public Class InvoiceRows_Changer_Popup
Inherits BaseObject
Public Sub New(ByVal session As Session)
@@ -27,10 +27,10 @@ Public Class InvoiceRows_Changer_Popup
End Sub
Property DateExecution As Date
Property Controlling As Controlling
Property CostPlace As CostPlace
Property CostHolder As CostHolder
Property UniqueObjects As UniqueObjects
Property JobNumberObjects As JobNumberObjects
<DataSourceCriteria("IsActive != False")> Property Controlling As Controlling
<DataSourceCriteria("IsActive != False")> Property CostPlace As CostPlace
<DataSourceCriteria("IsActive != False")> Property CostHolder As CostHolder
<DataSourceCriteria("IsActive != False")> Property UniqueObjects As UniqueObjects
<DataSourceCriteria("IsActive != False")> Property JobNumberObjects As JobNumberObjects
End Class