' <fileinfo name="RegionRow_Base.vb">
' <copyright>
' All rights reserved.
' </copyright>
' <remarks>
' Do not change this source code manually. Changes to this file may
' cause incorrect behavior and will be lost if the code is regenerated.
' </remarks>
' <generator rewritefile="True" infourl="http://www.SharpPower.com">RapTier</generator>
' </fileinfo>
Option Strict Off
Option Explicit On
Imports System
''' <summary>
''' The base class for <see cref="RegionRow"/> that
''' represents a record in the <c>Region</c> table.
''' </summary>
''' <remarks>
''' Do not change this source code manually. Update the <see cref="RegionRow"/>
''' class if you need to add or change some functionality.
''' </remarks>
Public MustInherit Class RegionRow_Base
Private _regionID As Integer
Private _regionDescription As String
''' <summary>
''' Initializes a new instance of the <see cref="RegionRow_Base"/> class.
''' </summary>
Public Sub New()
MyBase.New()
' EMPTY
End Sub
''' <summary>
''' Gets or sets the <c>RegionID</c> column value.
''' </summary>
''' <value>The <c>RegionID</c> column value.</value>
Public Property RegionID As Integer
Get
Return _regionID
End Get
Set
_regionID = value
End Set
End Property
''' <summary>
''' Gets or sets the <c>RegionDescription</c> column value.
''' </summary>
''' <value>The <c>RegionDescription</c> column value.</value>
Public Property RegionDescription As String
Get
Return _regionDescription
End Get
Set
_regionDescription = value
End Set
End Property
''' <summary>
''' Returns the string representation of this instance.
''' </summary>
''' <returns>The string representation of this instance.</returns>
Public Overrides Function ToString() As String
Dim dynStr As System.Text.StringBuilder = New System.Text.StringBuilder(Me.GetType().Name)
dynStr.Append(":")
dynStr.Append(" RegionID=")
dynStr.Append(Me.RegionID)
dynStr.Append(" RegionDescription=")
dynStr.Append(Me.RegionDescription)
Return dynStr.ToString()
End Function
End Class