Jelölő adatok IsActive

Mezőgazdaság termeltetés IsActive
Számviteli készletnél szállítólevél DateExecution

Nuvolar.Module/BusinessObjects/Financial/FinancialObjects/Stocks/5D/Controlling.vb

@@ -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