Jelölő adatok IsActive

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

Nuvolar.Module/BusinessObjects/Business/Products/Products.vb

@@ -97,6 +97,8 @@ Public Class Products
 
     Private _CustomersOrder01 As CustomersOrder '1. beszállító
     Private _CustomersOrder02 As CustomersOrder '2. beszállító
+
+    Private _IsActive As Boolean
     Public Sub New(ByVal session As Session)
         MyBase.New(session)
     End Sub
@@ -123,6 +125,18 @@ Public Class Products
             End If
         End If
     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
     Property ProductType As eProductType
         Get
             Return _ProductType