Imports System Imports System.ComponentModel Imports DevExpress.Xpo Imports DevExpress.Data.Filtering Imports DevExpress.ExpressApp Imports DevExpress.Persistent.Base Imports DevExpress.Persistent.BaseImpl Imports DevExpress.Persistent.Validation _ Public Class StorageInRowsLocation Inherits BaseObject Private _StorageInRows As StorageInRows Private _StorageComputedLocations As StorageComputedLocations Private _QTT As Double Public Sub New(ByVal session As Session) MyBase.New(session) End Sub Public Overrides Sub AfterConstruction() MyBase.AfterConstruction() End Sub Property StorageInRows As StorageInRows Get Return _StorageInRows End Get Set(value As StorageInRows) SetPropertyValue("StorageInRows", _StorageInRows, value) End Set End Property Property StorageComputedLocations As StorageComputedLocations Get Return _StorageComputedLocations End Get Set(value As StorageComputedLocations) SetPropertyValue("StorageComputedLocations", _StorageComputedLocations, value) End Set End Property Property QTT As Double Get Return _QTT End Get Set(value As Double) SetPropertyValue("QTT", _QTT, value) End Set End Property End Class