' <fileinfo name="CustomerandSuppliersbyCityRow_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="CustomerandSuppliersbyCityRow"/> that
''' represents a record in the <c>Customer and Suppliers by City</c> view.
''' </summary>
''' <remarks>
''' Do not change this source code manually. Update the <see cref="CustomerandSuppliersbyCityRow"/>
''' class if you need to add or change some functionality.
''' </remarks>
Public MustInherit Class CustomerandSuppliersbyCityRow_Base
Private _city As String
Private _companyName As String
Private _contactName As String
Private _relationship As String
''' <summary>
''' Initializes a new instance of the <see cref="CustomerandSuppliersbyCityRow_Base"/> class.
''' </summary>
Public Sub New()
MyBase.New()
' EMPTY
End Sub
''' <summary>
''' Gets or sets the <c>City</c> column value.
''' This column is nullable.
''' </summary>
''' <value>The <c>City</c> column value.</value>
Public Property City As String
Get
Return _city
End Get
Set
_city = value
End Set
End Property
''' <summary>
''' Gets or sets the <c>CompanyName</c> column value.
''' </summary>
''' <value>The <c>CompanyName</c> column value.</value>
Public Property CompanyName As String
Get
Return _companyName
End Get
Set
_companyName = value
End Set
End Property
''' <summary>
''' Gets or sets the <c>ContactName</c> column value.
''' This column is nullable.
''' </summary>
''' <value>The <c>ContactName</c> column value.</value>
Public Property ContactName As String
Get
Return _contactName
End Get
Set
_contactName = value
End Set
End Property
''' <summary>
''' Gets or sets the <c>Relationship</c> column value.
''' </summary>
''' <value>The <c>Relationship</c> column value.</value>
Public Property Relationship As String
Get
Return _relationship
End Get
Set
_relationship = 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(" City=")
dynStr.Append(Me.City)
dynStr.Append(" CompanyName=")
dynStr.Append(Me.CompanyName)
dynStr.Append(" ContactName=")
dynStr.Append(Me.ContactName)
dynStr.Append(" Relationship=")
dynStr.Append(Me.Relationship)
Return dynStr.ToString()
End Function
End Class