|
|
'------------------------------------------------------------------------------
' <auto-generated>
' This code was generated from a template.
'
' Manual changes to this file may cause unexpected behavior in your application.
' Manual changes to this file will be overwritten if the code is regenerated.
' </auto-generated>
'------------------------------------------------------------------------------
Imports System
Imports System.Data.Objects
Imports System.Data.Objects.DataClasses
Imports System.Data.EntityClient
Imports System.ComponentModel
Imports System.Xml.Serialization
Imports System.Runtime.Serialization
<Assembly: EdmSchemaAttribute("298a74d8-31b8-4135-9993-9db906d1832e")>
Namespace WCF_RIA_ServiceData.Implementation
#Region "Contexts"
''' <summary>
''' No Metadata Documentation available.
''' </summary>
Public Partial Class WCF_RIA_ServiceDataObjectContext
Inherits ObjectContext
#Region "Constructors"
''' <summary>
''' Initializes a new WCF_RIA_ServiceDataObjectContext object using the connection string found in the 'WCF_RIA_ServiceDataObjectContext' section of the application configuration file.
''' </summary>
Public Sub New()
MyBase.New("name=WCF_RIA_ServiceDataObjectContext", "WCF_RIA_ServiceDataObjectContext")
OnContextCreated()
End Sub
''' <summary>
''' Initialize a new WCF_RIA_ServiceDataObjectContext object.
''' </summary>
Public Sub New(ByVal connectionString As String)
MyBase.New(connectionString, "WCF_RIA_ServiceDataObjectContext")
OnContextCreated()
End Sub
''' <summary>
''' Initialize a new WCF_RIA_ServiceDataObjectContext object.
''' </summary>
Public Sub New(ByVal connection As EntityConnection)
MyBase.New(connection, "WCF_RIA_ServiceDataObjectContext")
OnContextCreated()
End Sub
#End Region
#Region "Partial Methods"
Partial Private Sub OnContextCreated()
End Sub
#End Region
#Region "ObjectSet Properties"
''' <summary>
''' No Metadata Documentation available.
''' </summary>
Public ReadOnly Property PeopleCountByMailcodes() As ObjectSet(Of PeopleCountByMailcode)
Get
If (_PeopleCountByMailcodes Is Nothing) Then
_PeopleCountByMailcodes = MyBase.CreateObjectSet(Of PeopleCountByMailcode)("PeopleCountByMailcodes")
End If
Return _PeopleCountByMailcodes
End Get
End Property
Private _PeopleCountByMailcodes As ObjectSet(Of PeopleCountByMailcode)
''' <summary>
''' No Metadata Documentation available.
''' </summary>
Public ReadOnly Property PeopleCountByZips() As ObjectSet(Of PeopleCountByZip)
Get
If (_PeopleCountByZips Is Nothing) Then
_PeopleCountByZips = MyBase.CreateObjectSet(Of PeopleCountByZip)("PeopleCountByZips")
End If
Return _PeopleCountByZips
End Get
End Property
Private _PeopleCountByZips As ObjectSet(Of PeopleCountByZip)
''' <summary>
''' No Metadata Documentation available.
''' </summary>
Public ReadOnly Property MatchResults() As ObjectSet(Of MatchResult)
Get
If (_MatchResults Is Nothing) Then
_MatchResults = MyBase.CreateObjectSet(Of MatchResult)("MatchResults")
End If
Return _MatchResults
End Get
End Property
Private _MatchResults As ObjectSet(Of MatchResult)
''' <summary>
''' No Metadata Documentation available.
''' </summary>
Public ReadOnly Property UpdateResults() As ObjectSet(Of UpdateResult)
Get
If (_UpdateResults Is Nothing) Then
_UpdateResults = MyBase.CreateObjectSet(Of UpdateResult)("UpdateResults")
End If
Return _UpdateResults
End Get
End Property
Private _UpdateResults As ObjectSet(Of UpdateResult)
''' <summary>
''' No Metadata Documentation available.
''' </summary>
Public ReadOnly Property PeopleToMails() As ObjectSet(Of PeopleToMail1)
Get
If (_PeopleToMails Is Nothing) Then
_PeopleToMails = MyBase.CreateObjectSet(Of PeopleToMail1)("PeopleToMails")
End If
Return _PeopleToMails
End Get
End Property
Private _PeopleToMails As ObjectSet(Of PeopleToMail1)
#End Region
#Region "AddTo Methods"
''' <summary>
''' Deprecated Method for adding a new object to the PeopleCountByMailcodes EntitySet. Consider using the .Add method of the associated ObjectSet(Of T) property instead.
''' </summary>
Public Sub AddToPeopleCountByMailcodes(ByVal peopleCountByMailcode As PeopleCountByMailcode)
MyBase.AddObject("PeopleCountByMailcodes", peopleCountByMailcode)
End Sub
''' <summary>
''' Deprecated Method for adding a new object to the PeopleCountByZips EntitySet. Consider using the .Add method of the associated ObjectSet(Of T) property instead.
''' </summary>
Public Sub AddToPeopleCountByZips(ByVal peopleCountByZip As PeopleCountByZip)
MyBase.AddObject("PeopleCountByZips", peopleCountByZip)
End Sub
''' <summary>
''' Deprecated Method for adding a new object to the MatchResults EntitySet. Consider using the .Add method of the associated ObjectSet(Of T) property instead.
''' </summary>
Public Sub AddToMatchResults(ByVal matchResult As MatchResult)
MyBase.AddObject("MatchResults", matchResult)
End Sub
''' <summary>
''' Deprecated Method for adding a new object to the UpdateResults EntitySet. Consider using the .Add method of the associated ObjectSet(Of T) property instead.
''' </summary>
Public Sub AddToUpdateResults(ByVal updateResult As UpdateResult)
MyBase.AddObject("UpdateResults", updateResult)
End Sub
''' <summary>
''' Deprecated Method for adding a new object to the PeopleToMails EntitySet. Consider using the .Add method of the associated ObjectSet(Of T) property instead.
''' </summary>
Public Sub AddToPeopleToMails(ByVal peopleToMail1 As PeopleToMail1)
MyBase.AddObject("PeopleToMails", peopleToMail1)
End Sub
#End Region
End Class
#End Region
#Region "Entities"
''' <summary>
''' No Metadata Documentation available.
''' </summary>
<EdmEntityTypeAttribute(NamespaceName:="WCF_RIA_ServiceData", Name:="MatchResult")>
<Serializable()>
<DataContractAttribute(IsReference:=True)>
Public Partial Class MatchResult
Inherits EntityObject
#Region "Factory Method"
''' <summary>
''' Create a new MatchResult object.
''' </summary>
''' <param name="id">Initial value of the ID property.</param>
''' <param name="count">Initial value of the Count property.</param>
Public Shared Function CreateMatchResult(id As Global.System.Int32, count As Global.System.Int32) As MatchResult
Dim matchResult as MatchResult = New MatchResult
matchResult.ID = id
matchResult.Count = count
Return matchResult
End Function
#End Region
#Region "Primitive Properties"
''' <summary>
''' No Metadata Documentation available.
''' </summary>
<EdmScalarPropertyAttribute(EntityKeyProperty:=true, IsNullable:=false)>
<DataMemberAttribute()>
Public Property ID() As Global.System.Int32
Get
Return _ID
End Get
Set
If (_ID <> Value) Then
OnIDChanging(value)
ReportPropertyChanging("ID")
_ID = value
ReportPropertyChanged("ID")
OnIDChanged()
End If
End Set
End Property
Private _ID As Global.System.Int32
Private Partial Sub OnIDChanging(value As Global.System.Int32)
End Sub
Private Partial Sub OnIDChanged()
End Sub
''' <summary>
''' No Metadata Documentation available.
''' </summary>
<EdmScalarPropertyAttribute(EntityKeyProperty:=false, IsNullable:=true)>
<DataMemberAttribute()>
Public Property MatchResult1() As Global.System.String
Get
Return _MatchResult1
End Get
Set
OnMatchResult1Changing(value)
ReportPropertyChanging("MatchResult1")
_MatchResult1 = value
ReportPropertyChanged("MatchResult1")
OnMatchResult1Changed()
End Set
End Property
Private _MatchResult1 As Global.System.String
Private Partial Sub OnMatchResult1Changing(value As Global.System.String)
End Sub
Private Partial Sub OnMatchResult1Changed()
End Sub
''' <summary>
''' No Metadata Documentation available.
''' </summary>
<EdmScalarPropertyAttribute(EntityKeyProperty:=false, IsNullable:=false)>
<DataMemberAttribute()>
Public Property Count() As Global.System.Int32
Get
Return _Count
End Get
Set
OnCountChanging(value)
ReportPropertyChanging("Count")
_Count = value
ReportPropertyChanged("Count")
OnCountChanged()
End Set
End Property
Private _Count As Global.System.Int32
Private Partial Sub OnCountChanging(value As Global.System.Int32)
End Sub
Private Partial Sub OnCountChanged()
End Sub
#End Region
End Class
''' <summary>
''' No Metadata Documentation available.
''' </summary>
<EdmEntityTypeAttribute(NamespaceName:="WCF_RIA_ServiceData", Name:="PeopleCountByMailcode")>
<Serializable()>
<DataContractAttribute(IsReference:=True)>
Public Partial Class PeopleCountByMailcode
Inherits EntityObject
#Region "Factory Method"
''' <summary>
''' Create a new PeopleCountByMailcode object.
''' </summary>
''' <param name="id">Initial value of the ID property.</param>
''' <param name="mailCode">Initial value of the MailCode property.</param>
''' <param name="peopleCount">Initial value of the PeopleCount property.</param>
Public Shared Function CreatePeopleCountByMailcode(id As Global.System.Int32, mailCode As Global.System.Int32, peopleCount As Global.System.Int32) As PeopleCountByMailcode
Dim peopleCountByMailcode as PeopleCountByMailcode = New PeopleCountByMailcode
peopleCountByMailcode.ID = id
peopleCountByMailcode.MailCode = mailCode
peopleCountByMailcode.PeopleCount = peopleCount
Return peopleCountByMailcode
End Function
#End Region
#Region "Primitive Properties"
''' <summary>
''' No Metadata Documentation available.
''' </summary>
<EdmScalarPropertyAttribute(EntityKeyProperty:=true, IsNullable:=false)>
<DataMemberAttribute()>
Public Property ID() As Global.System.Int32
Get
Return _ID
End Get
Set
If (_ID <> Value) Then
OnIDChanging(value)
ReportPropertyChanging("ID")
_ID = value
ReportPropertyChanged("ID")
OnIDChanged()
End If
End Set
End Property
Private _ID As Global.System.Int32
Private Partial Sub OnIDChanging(value As Global.System.Int32)
End Sub
Private Partial Sub OnIDChanged()
End Sub
''' <summary>
''' No Metadata Documentation available.
''' </summary>
<EdmScalarPropertyAttribute(EntityKeyProperty:=false, IsNullable:=true)>
<DataMemberAttribute()>
Public Property MailCodeName() As Global.System.String
Get
Return _MailCodeName
End Get
Set
OnMailCodeNameChanging(value)
ReportPropertyChanging("MailCodeName")
_MailCodeName = value
ReportPropertyChanged("MailCodeName")
OnMailCodeNameChanged()
End Set
End Property
Private _MailCodeName As Global.System.String
Private Partial Sub OnMailCodeNameChanging(value As Global.System.String)
End Sub
Private Partial Sub OnMailCodeNameChanged()
End Sub
''' <summary>
''' No Metadata Documentation available.
''' </summary>
<EdmScalarPropertyAttribute(EntityKeyProperty:=false, IsNullable:=false)>
<DataMemberAttribute()>
Public Property MailCode() As Global.System.Int32
Get
Return _MailCode
End Get
Set
OnMailCodeChanging(value)
ReportPropertyChanging("MailCode")
_MailCode = value
ReportPropertyChanged("MailCode")
OnMailCodeChanged()
End Set
End Property
Private _MailCode As Global.System.Int32
Private Partial Sub OnMailCodeChanging(value As Global.System.Int32)
End Sub
Private Partial Sub OnMailCodeChanged()
End Sub
''' <summary>
''' No Metadata Documentation available.
''' </summary>
<EdmScalarPropertyAttribute(EntityKeyProperty:=false, IsNullable:=false)>
<DataMemberAttribute()>
Public Property PeopleCount() As Global.System.Int32
Get
Return _PeopleCount
End Get
Set
OnPeopleCountChanging(value)
ReportPropertyChanging("PeopleCount")
_PeopleCount = value
ReportPropertyChanged("PeopleCount")
OnPeopleCountChanged()
End Set
End Property
Private _PeopleCount As Global.System.Int32
Private Partial Sub OnPeopleCountChanging(value As Global.System.Int32)
End Sub
Private Partial Sub OnPeopleCountChanged()
End Sub
#End Region
End Class
''' <summary>
''' No Metadata Documentation available.
''' </summary>
<EdmEntityTypeAttribute(NamespaceName:="WCF_RIA_ServiceData", Name:="PeopleCountByZip")>
<Serializable()>
<DataContractAttribute(IsReference:=True)>
Public Partial Class PeopleCountByZip
Inherits EntityObject
#Region "Factory Method"
''' <summary>
''' Create a new PeopleCountByZip object.
''' </summary>
''' <param name="id">Initial value of the ID property.</param>
''' <param name="peopleCount">Initial value of the PeopleCount property.</param>
Public Shared Function CreatePeopleCountByZip(id As Global.System.Int32, peopleCount As Global.System.Int32) As PeopleCountByZip
Dim peopleCountByZip as PeopleCountByZip = New PeopleCountByZip
peopleCountByZip.ID = id
peopleCountByZip.PeopleCount = peopleCount
Return peopleCountByZip
End Function
#End Region
#Region "Primitive Properties"
''' <summary>
''' No Metadata Documentation available.
''' </summary>
<EdmScalarPropertyAttribute(EntityKeyProperty:=true, IsNullable:=false)>
<DataMemberAttribute()>
Public Property ID() As Global.System.Int32
Get
Return _ID
End Get
Set
If (_ID <> Value) Then
OnIDChanging(value)
ReportPropertyChanging("ID")
_ID = value
ReportPropertyChanged("ID")
OnIDChanged()
End If
End Set
End Property
Private _ID As Global.System.Int32
Private Partial Sub OnIDChanging(value As Global.System.Int32)
End Sub
Private Partial Sub OnIDChanged()
End Sub
''' <summary>
''' No Metadata Documentation available.
''' </summary>
<EdmScalarPropertyAttribute(EntityKeyProperty:=false, IsNullable:=true)>
<DataMemberAttribute()>
Public Property ZipCode() As Global.System.String
Get
Return _ZipCode
End Get
Set
OnZipCodeChanging(value)
ReportPropertyChanging("ZipCode")
_ZipCode = value
ReportPropertyChanged("ZipCode")
OnZipCodeChanged()
End Set
End Property
Private _ZipCode As Global.System.String
Private Partial Sub OnZipCodeChanging(value As Global.System.String)
End Sub
Private Partial Sub OnZipCodeChanged()
End Sub
''' <summary>
''' No Metadata Documentation available.
''' </summary>
<EdmScalarPropertyAttribute(EntityKeyProperty:=false, IsNullable:=false)>
<DataMemberAttribute()>
Public Property PeopleCount() As Global.System.Int32
Get
Return _PeopleCount
End Get
Set
OnPeopleCountChanging(value)
ReportPropertyChanging("PeopleCount")
_PeopleCount = value
ReportPropertyChanged("PeopleCount")
OnPeopleCountChanged()
End Set
End Property
Private _PeopleCount As Global.System.Int32
Private Partial Sub OnPeopleCountChanging(value As Global.System.Int32)
End Sub
Private Partial Sub OnPeopleCountChanged()
End Sub
#End Region
End Class
''' <summary>
''' No Metadata Documentation available.
''' </summary>
<EdmEntityTypeAttribute(NamespaceName:="WCF_RIA_ServiceData", Name:="PeopleToMail1")>
<Serializable()>
<DataContractAttribute(IsReference:=True)>
Public Partial Class PeopleToMail1
Inherits EntityObject
#Region "Factory Method"
''' <summary>
''' Create a new PeopleToMail1 object.
''' </summary>
''' <param name="id">Initial value of the ID property.</param>
''' <param name="isSecondary">Initial value of the IsSecondary property.</param>
Public Shared Function CreatePeopleToMail1(id As Global.System.Int32, isSecondary As Global.System.Boolean) As PeopleToMail1
Dim peopleToMail1 as PeopleToMail1 = New PeopleToMail1
peopleToMail1.ID = id
peopleToMail1.IsSecondary = isSecondary
Return peopleToMail1
End Function
#End Region
#Region "Primitive Properties"
''' <summary>
''' No Metadata Documentation available.
''' </summary>
<EdmScalarPropertyAttribute(EntityKeyProperty:=true, IsNullable:=false)>
<DataMemberAttribute()>
Public Property ID() As Global.System.Int32
Get
Return _ID
End Get
Set
If (_ID <> Value) Then
OnIDChanging(value)
ReportPropertyChanging("ID")
_ID = value
ReportPropertyChanged("ID")
OnIDChanged()
End If
End Set
End Property
Private _ID As Global.System.Int32
Private Partial Sub OnIDChanging(value As Global.System.Int32)
End Sub
Private Partial Sub OnIDChanged()
End Sub
''' <summary>
''' No Metadata Documentation available.
''' </summary>
<EdmScalarPropertyAttribute(EntityKeyProperty:=false, IsNullable:=true)>
<DataMemberAttribute()>
Public Property Salutation() As Global.System.String
Get
Return _Salutation
End Get
Set
OnSalutationChanging(value)
ReportPropertyChanging("Salutation")
_Salutation = value
ReportPropertyChanged("Salutation")
OnSalutationChanged()
End Set
End Property
Private _Salutation As Global.System.String
Private Partial Sub OnSalutationChanging(value As Global.System.String)
End Sub
Private Partial Sub OnSalutationChanged()
End Sub
''' <summary>
''' No Metadata Documentation available.
''' </summary>
<EdmScalarPropertyAttribute(EntityKeyProperty:=false, IsNullable:=true)>
<DataMemberAttribute()>
Public Property FirstName() As Global.System.String
Get
Return _FirstName
End Get
Set
OnFirstNameChanging(value)
ReportPropertyChanging("FirstName")
_FirstName = value
ReportPropertyChanged("FirstName")
OnFirstNameChanged()
End Set
End Property
Private _FirstName As Global.System.String
Private Partial Sub OnFirstNameChanging(value As Global.System.String)
End Sub
Private Partial Sub OnFirstNameChanged()
End Sub
''' <summary>
''' No Metadata Documentation available.
''' </summary>
<EdmScalarPropertyAttribute(EntityKeyProperty:=false, IsNullable:=true)>
<DataMemberAttribute()>
Public Property LastName() As Global.System.String
Get
Return _LastName
End Get
Set
OnLastNameChanging(value)
ReportPropertyChanging("LastName")
_LastName = value
ReportPropertyChanged("LastName")
OnLastNameChanged()
End Set
End Property
Private _LastName As Global.System.String
Private Partial Sub OnLastNameChanging(value As Global.System.String)
End Sub
Private Partial Sub OnLastNameChanged()
End Sub
''' <summary>
''' No Metadata Documentation available.
''' </summary>
<EdmScalarPropertyAttribute(EntityKeyProperty:=false, IsNullable:=true)>
<DataMemberAttribute()>
Public Property NameSuffix() As Global.System.String
Get
Return _NameSuffix
End Get
Set
OnNameSuffixChanging(value)
ReportPropertyChanging("NameSuffix")
_NameSuffix = value
ReportPropertyChanged("NameSuffix")
OnNameSuffixChanged()
End Set
End Property
Private _NameSuffix As Global.System.String
Private Partial Sub OnNameSuffixChanging(value As Global.System.String)
End Sub
Private Partial Sub OnNameSuffixChanged()
End Sub
''' <summary>
''' No Metadata Documentation available.
''' </summary>
<EdmScalarPropertyAttribute(EntityKeyProperty:=false, IsNullable:=true)>
<DataMemberAttribute()>
Public Property Company() As Global.System.String
Get
Return _Company
End Get
Set
OnCompanyChanging(value)
ReportPropertyChanging("Company")
_Company = value
ReportPropertyChanged("Company")
OnCompanyChanged()
End Set
End Property
Private _Company As Global.System.String
Private Partial Sub OnCompanyChanging(value As Global.System.String)
End Sub
Private Partial Sub OnCompanyChanged()
End Sub
''' <summary>
''' No Metadata Documentation available.
''' </summary>
<EdmScalarPropertyAttribute(EntityKeyProperty:=false, IsNullable:=true)>
<DataMemberAttribute()>
Public Property Address1() As Global.System.String
Get
Return _Address1
End Get
Set
OnAddress1Changing(value)
ReportPropertyChanging("Address1")
_Address1 = value
ReportPropertyChanged("Address1")
OnAddress1Changed()
End Set
End Property
Private _Address1 As Global.System.String
Private Partial Sub OnAddress1Changing(value As Global.System.String)
End Sub
Private Partial Sub OnAddress1Changed()
End Sub
''' <summary>
''' No Metadata Documentation available.
''' </summary>
<EdmScalarPropertyAttribute(EntityKeyProperty:=false, IsNullable:=true)>
<DataMemberAttribute()>
Public Property Address2() As Global.System.String
Get
Return _Address2
End Get
Set
OnAddress2Changing(value)
ReportPropertyChanging("Address2")
_Address2 = value
ReportPropertyChanged("Address2")
OnAddress2Changed()
End Set
End Property
Private _Address2 As Global.System.String
Private Partial Sub OnAddress2Changing(value As Global.System.String)
End Sub
Private Partial Sub OnAddress2Changed()
End Sub
''' <summary>
''' No Metadata Documentation available.
''' </summary>
<EdmScalarPropertyAttribute(EntityKeyProperty:=false, IsNullable:=true)>
<DataMemberAttribute()>
Public Property State() As Global.System.String
Get
Return _State
End Get
Set
OnStateChanging(value)
ReportPropertyChanging("State")
_State = value
ReportPropertyChanged("State")
OnStateChanged()
End Set
End Property
Private _State As Global.System.String
Private Partial Sub OnStateChanging(value As Global.System.String)
End Sub
Private Partial Sub OnStateChanged()
End Sub
''' <summary>
''' No Metadata Documentation available.
''' </summary>
<EdmScalarPropertyAttribute(EntityKeyProperty:=false, IsNullable:=true)>
<DataMemberAttribute()>
Public Property Zip() As Global.System.String
Get
Return _Zip
End Get
Set
OnZipChanging(value)
ReportPropertyChanging("Zip")
_Zip = value
ReportPropertyChanged("Zip")
OnZipChanged()
End Set
End Property
Private _Zip As Global.System.String
Private Partial Sub OnZipChanging(value As Global.System.String)
End Sub
Private Partial Sub OnZipChanged()
End Sub
''' <summary>
''' No Metadata Documentation available.
''' </summary>
<EdmScalarPropertyAttribute(EntityKeyProperty:=false, IsNullable:=true)>
<DataMemberAttribute()>
Public Property MailListName() As Global.System.String
Get
Return _MailListName
End Get
Set
OnMailListNameChanging(value)
ReportPropertyChanging("MailListName")
_MailListName = value
ReportPropertyChanged("MailListName")
OnMailListNameChanged()
End Set
End Property
Private _MailListName As Global.System.String
Private Partial Sub OnMailListNameChanging(value As Global.System.String)
End Sub
Private Partial Sub OnMailListNameChanged()
End Sub
''' <summary>
''' No Metadata Documentation available.
''' </summary>
<EdmScalarPropertyAttribute(EntityKeyProperty:=false, IsNullable:=true)>
<DataMemberAttribute()>
Public Property MailCodeName() As Global.System.String
Get
Return _MailCodeName
End Get
Set
OnMailCodeNameChanging(value)
ReportPropertyChanging("MailCodeName")
_MailCodeName = value
ReportPropertyChanged("MailCodeName")
OnMailCodeNameChanged()
End Set
End Property
Private _MailCodeName As Global.System.String
Private Partial Sub OnMailCodeNameChanging(value As Global.System.String)
End Sub
Private Partial Sub OnMailCodeNameChanged()
End Sub
''' <summary>
''' No Metadata Documentation available.
''' </summary>
<EdmScalarPropertyAttribute(EntityKeyProperty:=false, IsNullable:=false)>
<DataMemberAttribute()>
Public Property IsSecondary() As Global.System.Boolean
Get
Return _IsSecondary
End Get
Set
OnIsSecondaryChanging(value)
ReportPropertyChanging("IsSecondary")
_IsSecondary = value
ReportPropertyChanged("IsSecondary")
OnIsSecondaryChanged()
End Set
End Property
Private _IsSecondary As Global.System.Boolean
Private Partial Sub OnIsSecondaryChanging(value As Global.System.Boolean)
End Sub
Private Partial Sub OnIsSecondaryChanged()
End Sub
#End Region
End Class
''' <summary>
''' No Metadata Documentation available.
''' </summary>
<EdmEntityTypeAttribute(NamespaceName:="WCF_RIA_ServiceData", Name:="UpdateResult")>
<Serializable()>
<DataContractAttribute(IsReference:=True)>
Public Partial Class UpdateResult
Inherits EntityObject
#Region "Factory Method"
''' <summary>
''' Create a new UpdateResult object.
''' </summary>
''' <param name="id">Initial value of the ID property.</param>
''' <param name="startTime">Initial value of the StartTime property.</param>
''' <param name="endTime">Initial value of the EndTime property.</param>
Public Shared Function CreateUpdateResult(id As Global.System.Int32, startTime As Global.System.DateTime, endTime As Global.System.DateTime) As UpdateResult
Dim updateResult as UpdateResult = New UpdateResult
updateResult.ID = id
updateResult.StartTime = startTime
updateResult.EndTime = endTime
Return updateResult
End Function
#End Region
#Region "Primitive Properties"
''' <summary>
''' No Metadata Documentation available.
''' </summary>
<EdmScalarPropertyAttribute(EntityKeyProperty:=true, IsNullable:=false)>
<DataMemberAttribute()>
Public Property ID() As Global.System.Int32
Get
Return _ID
End Get
Set
If (_ID <> Value) Then
OnIDChanging(value)
ReportPropertyChanging("ID")
_ID = value
ReportPropertyChanged("ID")
OnIDChanged()
End If
End Set
End Property
Private _ID As Global.System.Int32
Private Partial Sub OnIDChanging(value As Global.System.Int32)
End Sub
Private Partial Sub OnIDChanged()
End Sub
''' <summary>
''' No Metadata Documentation available.
''' </summary>
<EdmScalarPropertyAttribute(EntityKeyProperty:=false, IsNullable:=false)>
<DataMemberAttribute()>
Public Property StartTime() As Global.System.DateTime
Get
Return _StartTime
End Get
Set
OnStartTimeChanging(value)
ReportPropertyChanging("StartTime")
_StartTime = value
ReportPropertyChanged("StartTime")
OnStartTimeChanged()
End Set
End Property
Private _StartTime As Global.System.DateTime
Private Partial Sub OnStartTimeChanging(value As Global.System.DateTime)
End Sub
Private Partial Sub OnStartTimeChanged()
End Sub
''' <summary>
''' No Metadata Documentation available.
''' </summary>
<EdmScalarPropertyAttribute(EntityKeyProperty:=false, IsNullable:=false)>
<DataMemberAttribute()>
Public Property EndTime() As Global.System.DateTime
Get
Return _EndTime
End Get
Set
OnEndTimeChanging(value)
ReportPropertyChanging("EndTime")
_EndTime = value
ReportPropertyChanged("EndTime")
OnEndTimeChanged()
End Set
End Property
Private _EndTime As Global.System.DateTime
Private Partial Sub OnEndTimeChanging(value As Global.System.DateTime)
End Sub
Private Partial Sub OnEndTimeChanged()
End Sub
''' <summary>
''' No Metadata Documentation available.
''' </summary>
<EdmScalarPropertyAttribute(EntityKeyProperty:=false, IsNullable:=true)>
<DataMemberAttribute()>
Public Property Result() As Global.System.String
Get
Return _Result
End Get
Set
OnResultChanging(value)
ReportPropertyChanging("Result")
_Result = value
ReportPropertyChanged("Result")
OnResultChanged()
End Set
End Property
Private _Result As Global.System.String
Private Partial Sub OnResultChanging(value As Global.System.String)
End Sub
Private Partial Sub OnResultChanged()
End Sub
#End Region
End Class
#End Region
End Namespace
|
By viewing downloads associated with this article you agree to the Terms of Service and the article's licence.
If a file you wish to view isn't highlighted, and is a text file (not binary), please
let us know and we'll add colourisation support for it.
This member has not yet provided a Biography. Assume it's interesting and varied, and probably something to do with programming.
Submit an article or tip