'------------------------------------------------------------------------------
' <auto-generated>
' This code was generated by a tool.
'
' Changes to this file may cause incorrect behavior and will be lost if
' the code is regenerated.
' </auto-generated>
'------------------------------------------------------------------------------
Option Strict On
Option Explicit On
Imports __Person = LightSwitchApplication.Person
Imports __MailCode = LightSwitchApplication.MailCode
Namespace LightSwitchApplication
#Region "Entities"
''' <summary>
''' No Modeled Description Available
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
Public NotInheritable Partial Class Person
Inherits Global.Microsoft.LightSwitch.Framework.Base.EntityObject(Of __Person, __Person.DetailsClass)
#Region "Constructors"
''' <summary>
''' Initializes a new instance of the Person entity.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Sub New()
Me.New(Nothing)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Sub New(entitySet As Global.Microsoft.LightSwitch.Framework.EntitySet(Of __Person))
MyBase.New(entitySet)
__Person.DetailsClass.Initialize(Me)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Person_Created()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Person_AllowSaveWithErrors(ByRef result As Boolean)
End Sub
#End Region
#Region "Private Properties"
''' <summary>
''' Gets the Application object for this application. The Application object provides access to active screens, methods to open screens and access to the current user.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private ReadOnly Property Application As Global.Microsoft.LightSwitch.IApplication(Of Global.LightSwitchApplication.DataWorkspace)
Get
Return Global.LightSwitchApplication.Application.Current
End Get
End Property
''' <summary>
''' Gets the containing data workspace. The data workspace provides access to all data sources in the application.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private ReadOnly Property DataWorkspace As Global.LightSwitchApplication.DataWorkspace
Get
Return DirectCast(Me.Details.EntitySet.Details.DataService.Details.DataWorkspace, Global.LightSwitchApplication.DataWorkspace)
End Get
End Property
#End Region
#Region "Public Properties"
''' <summary>
''' No Modeled Description Available
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Property Id As Integer
Get
Return __Person.DetailsClass.GetValue(Me, __Person.DetailsClass.PropertySetProperties.Id)
End Get
Set
__Person.DetailsClass.SetValue(Me, __Person.DetailsClass.PropertySetProperties.Id, Value)
End Set
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Id_IsReadOnly(ByRef result As Boolean)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Id_Validate(ByVal results As Global.Microsoft.LightSwitch.EntityValidationResultsBuilder)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Id_Changed()
End Sub
''' <summary>
''' No Modeled Description Available
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Property LastName As String
Get
Return __Person.DetailsClass.GetValue(Me, __Person.DetailsClass.PropertySetProperties.LastName)
End Get
Set
__Person.DetailsClass.SetValue(Me, __Person.DetailsClass.PropertySetProperties.LastName, Value)
End Set
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub LastName_IsReadOnly(ByRef result As Boolean)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub LastName_Validate(ByVal results As Global.Microsoft.LightSwitch.EntityValidationResultsBuilder)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub LastName_Changed()
End Sub
''' <summary>
''' No Modeled Description Available
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Property FirstName As String
Get
Return __Person.DetailsClass.GetValue(Me, __Person.DetailsClass.PropertySetProperties.FirstName)
End Get
Set
__Person.DetailsClass.SetValue(Me, __Person.DetailsClass.PropertySetProperties.FirstName, Value)
End Set
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub FirstName_IsReadOnly(ByRef result As Boolean)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub FirstName_Validate(ByVal results As Global.Microsoft.LightSwitch.EntityValidationResultsBuilder)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub FirstName_Changed()
End Sub
''' <summary>
''' No Modeled Description Available
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Property Salutation As String
Get
Return __Person.DetailsClass.GetValue(Me, __Person.DetailsClass.PropertySetProperties.Salutation)
End Get
Set
__Person.DetailsClass.SetValue(Me, __Person.DetailsClass.PropertySetProperties.Salutation, Value)
End Set
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Salutation_IsReadOnly(ByRef result As Boolean)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Salutation_Validate(ByVal results As Global.Microsoft.LightSwitch.EntityValidationResultsBuilder)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Salutation_Changed()
End Sub
''' <summary>
''' No Modeled Description Available
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Property NameSuffix As String
Get
Return __Person.DetailsClass.GetValue(Me, __Person.DetailsClass.PropertySetProperties.NameSuffix)
End Get
Set
__Person.DetailsClass.SetValue(Me, __Person.DetailsClass.PropertySetProperties.NameSuffix, Value)
End Set
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub NameSuffix_IsReadOnly(ByRef result As Boolean)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub NameSuffix_Validate(ByVal results As Global.Microsoft.LightSwitch.EntityValidationResultsBuilder)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub NameSuffix_Changed()
End Sub
''' <summary>
''' No Modeled Description Available
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Property Address1 As String
Get
Return __Person.DetailsClass.GetValue(Me, __Person.DetailsClass.PropertySetProperties.Address1)
End Get
Set
__Person.DetailsClass.SetValue(Me, __Person.DetailsClass.PropertySetProperties.Address1, Value)
End Set
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Address1_IsReadOnly(ByRef result As Boolean)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Address1_Validate(ByVal results As Global.Microsoft.LightSwitch.EntityValidationResultsBuilder)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Address1_Changed()
End Sub
''' <summary>
''' No Modeled Description Available
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Property Address2 As String
Get
Return __Person.DetailsClass.GetValue(Me, __Person.DetailsClass.PropertySetProperties.Address2)
End Get
Set
__Person.DetailsClass.SetValue(Me, __Person.DetailsClass.PropertySetProperties.Address2, Value)
End Set
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Address2_IsReadOnly(ByRef result As Boolean)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Address2_Validate(ByVal results As Global.Microsoft.LightSwitch.EntityValidationResultsBuilder)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Address2_Changed()
End Sub
''' <summary>
''' No Modeled Description Available
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Property City As String
Get
Return __Person.DetailsClass.GetValue(Me, __Person.DetailsClass.PropertySetProperties.City)
End Get
Set
__Person.DetailsClass.SetValue(Me, __Person.DetailsClass.PropertySetProperties.City, Value)
End Set
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub City_IsReadOnly(ByRef result As Boolean)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub City_Validate(ByVal results As Global.Microsoft.LightSwitch.EntityValidationResultsBuilder)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub City_Changed()
End Sub
''' <summary>
''' No Modeled Description Available
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Property State As String
Get
Return __Person.DetailsClass.GetValue(Me, __Person.DetailsClass.PropertySetProperties.State)
End Get
Set
__Person.DetailsClass.SetValue(Me, __Person.DetailsClass.PropertySetProperties.State, Value)
End Set
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub State_IsReadOnly(ByRef result As Boolean)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub State_Validate(ByVal results As Global.Microsoft.LightSwitch.EntityValidationResultsBuilder)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub State_Changed()
End Sub
''' <summary>
''' No Modeled Description Available
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Property Zip As String
Get
Return __Person.DetailsClass.GetValue(Me, __Person.DetailsClass.PropertySetProperties.Zip)
End Get
Set
__Person.DetailsClass.SetValue(Me, __Person.DetailsClass.PropertySetProperties.Zip, Value)
End Set
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Zip_IsReadOnly(ByRef result As Boolean)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Zip_Validate(ByVal results As Global.Microsoft.LightSwitch.EntityValidationResultsBuilder)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Zip_Changed()
End Sub
''' <summary>
''' No Modeled Description Available
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Property Email As String
Get
Return __Person.DetailsClass.GetValue(Me, __Person.DetailsClass.PropertySetProperties.Email)
End Get
Set
__Person.DetailsClass.SetValue(Me, __Person.DetailsClass.PropertySetProperties.Email, Value)
End Set
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Email_IsReadOnly(ByRef result As Boolean)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Email_Validate(ByVal results As Global.Microsoft.LightSwitch.EntityValidationResultsBuilder)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Email_Changed()
End Sub
''' <summary>
''' No Modeled Description Available
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Property SecondaryContactFlag As Boolean
Get
Return __Person.DetailsClass.GetValue(Me, __Person.DetailsClass.PropertySetProperties.SecondaryContactFlag)
End Get
Set
__Person.DetailsClass.SetValue(Me, __Person.DetailsClass.PropertySetProperties.SecondaryContactFlag, Value)
End Set
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub SecondaryContactFlag_IsReadOnly(ByRef result As Boolean)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub SecondaryContactFlag_Validate(ByVal results As Global.Microsoft.LightSwitch.EntityValidationResultsBuilder)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub SecondaryContactFlag_Changed()
End Sub
''' <summary>
''' No Modeled Description Available
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Property HomePhone As String
Get
Return __Person.DetailsClass.GetValue(Me, __Person.DetailsClass.PropertySetProperties.HomePhone)
End Get
Set
__Person.DetailsClass.SetValue(Me, __Person.DetailsClass.PropertySetProperties.HomePhone, Value)
End Set
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub HomePhone_IsReadOnly(ByRef result As Boolean)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub HomePhone_Validate(ByVal results As Global.Microsoft.LightSwitch.EntityValidationResultsBuilder)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub HomePhone_Changed()
End Sub
''' <summary>
''' No Modeled Description Available
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Property MobilPhone As String
Get
Return __Person.DetailsClass.GetValue(Me, __Person.DetailsClass.PropertySetProperties.MobilPhone)
End Get
Set
__Person.DetailsClass.SetValue(Me, __Person.DetailsClass.PropertySetProperties.MobilPhone, Value)
End Set
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub MobilPhone_IsReadOnly(ByRef result As Boolean)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub MobilPhone_Validate(ByVal results As Global.Microsoft.LightSwitch.EntityValidationResultsBuilder)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub MobilPhone_Changed()
End Sub
''' <summary>
''' No Modeled Description Available
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Property BusinessPhone As String
Get
Return __Person.DetailsClass.GetValue(Me, __Person.DetailsClass.PropertySetProperties.BusinessPhone)
End Get
Set
__Person.DetailsClass.SetValue(Me, __Person.DetailsClass.PropertySetProperties.BusinessPhone, Value)
End Set
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub BusinessPhone_IsReadOnly(ByRef result As Boolean)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub BusinessPhone_Validate(ByVal results As Global.Microsoft.LightSwitch.EntityValidationResultsBuilder)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub BusinessPhone_Changed()
End Sub
''' <summary>
''' No Modeled Description Available
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Property Company As String
Get
Return __Person.DetailsClass.GetValue(Me, __Person.DetailsClass.PropertySetProperties.Company)
End Get
Set
__Person.DetailsClass.SetValue(Me, __Person.DetailsClass.PropertySetProperties.Company, Value)
End Set
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Company_IsReadOnly(ByRef result As Boolean)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Company_Validate(ByVal results As Global.Microsoft.LightSwitch.EntityValidationResultsBuilder)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Company_Changed()
End Sub
''' <summary>
''' No Modeled Description Available
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Property RefNumber As Global.System.Nullable(Of Integer)
Get
Return __Person.DetailsClass.GetValue(Me, __Person.DetailsClass.PropertySetProperties.RefNumber)
End Get
Set
__Person.DetailsClass.SetValue(Me, __Person.DetailsClass.PropertySetProperties.RefNumber, Value)
End Set
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub RefNumber_IsReadOnly(ByRef result As Boolean)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub RefNumber_Validate(ByVal results As Global.Microsoft.LightSwitch.EntityValidationResultsBuilder)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub RefNumber_Changed()
End Sub
''' <summary>
''' No Modeled Description Available
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property FullName As String
Get
Return __Person.DetailsClass.GetValue(Me, __Person.DetailsClass.PropertySetProperties.FullName)
End Get
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub FullName_Compute(ByRef result As String)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub FullName_Validate(ByVal results As Global.Microsoft.LightSwitch.EntityValidationResultsBuilder)
End Sub
''' <summary>
''' No Modeled Description Available
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property LastNameSoundex As String
Get
Return __Person.DetailsClass.GetValue(Me, __Person.DetailsClass.PropertySetProperties.LastNameSoundex)
End Get
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub LastNameSoundex_Compute(ByRef result As String)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub LastNameSoundex_Validate(ByVal results As Global.Microsoft.LightSwitch.EntityValidationResultsBuilder)
End Sub
''' <summary>
''' No Modeled Description Available
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Property MailCode As Global.LightSwitchApplication.MailCode
Get
Return __Person.DetailsClass.GetValue(Me, __Person.DetailsClass.PropertySetProperties.MailCode)
End Get
Set
__Person.DetailsClass.SetValue(Me, __Person.DetailsClass.PropertySetProperties.MailCode, Value)
End Set
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub MailCode_IsReadOnly(ByRef result As Boolean)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub MailCode_Validate(ByVal results As Global.Microsoft.LightSwitch.EntityValidationResultsBuilder)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub MailCode_Changed()
End Sub
''' <summary>
''' No Modeled Description Available
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property Subscriptions As Global.Microsoft.LightSwitch.Framework.EntityCollection(Of Global.LightSwitchApplication.Subscription)
Get
Return __Person.DetailsClass.GetValue(Me, __Person.DetailsClass.PropertySetProperties.Subscriptions)
End Get
End Property
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property SubscriptionsQuery As Microsoft.LightSwitch.IDataServiceQueryable(Of Global.LightSwitchApplication.Subscription)
Get
Return __Person.DetailsClass.GetQuery(Me, __Person.DetailsClass.PropertySetProperties.Subscriptions)
End Get
End Property
''' <summary>
''' No Modeled Description Available
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property Activities As Global.Microsoft.LightSwitch.Framework.EntityCollection(Of Global.LightSwitchApplication.Activity)
Get
Return __Person.DetailsClass.GetValue(Me, __Person.DetailsClass.PropertySetProperties.Activities)
End Get
End Property
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property ActivitiesQuery As Microsoft.LightSwitch.IDataServiceQueryable(Of Global.LightSwitchApplication.Activity)
Get
Return __Person.DetailsClass.GetQuery(Me, __Person.DetailsClass.PropertySetProperties.Activities)
End Get
End Property
''' <summary>
''' No Modeled Description Available
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property Donations As Global.Microsoft.LightSwitch.Framework.EntityCollection(Of Global.LightSwitchApplication.Donation)
Get
Return __Person.DetailsClass.GetValue(Me, __Person.DetailsClass.PropertySetProperties.Donations)
End Get
End Property
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property DonationsQuery As Microsoft.LightSwitch.IDataServiceQueryable(Of Global.LightSwitchApplication.Donation)
Get
Return __Person.DetailsClass.GetQuery(Me, __Person.DetailsClass.PropertySetProperties.Donations)
End Get
End Property
''' <summary>
''' No Modeled Description Available
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property Programs As Global.Microsoft.LightSwitch.Framework.EntityCollection(Of Global.LightSwitchApplication.Program)
Get
Return __Person.DetailsClass.GetValue(Me, __Person.DetailsClass.PropertySetProperties.Programs)
End Get
End Property
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property ProgramsQuery As Microsoft.LightSwitch.IDataServiceQueryable(Of Global.LightSwitchApplication.Program)
Get
Return __Person.DetailsClass.GetQuery(Me, __Person.DetailsClass.PropertySetProperties.Programs)
End Get
End Property
#End Region
#Region "Details Class"
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.Diagnostics.CodeAnalysis.SuppressMessage("Microsoft.Design", "CA1034:NestedTypesShouldNotBeVisible")> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class DetailsClass
Inherits Global.Microsoft.LightSwitch.Details.Framework.Base.EntityDetails(Of _
__Person, _
__Person.DetailsClass, _
__Person.DetailsClass.IImplementation, _
__Person.DetailsClass.PropertySet, _
Global.Microsoft.LightSwitch.Details.Framework.EntityCommandSet(Of __Person, __Person.DetailsClass), _
Global.Microsoft.LightSwitch.Details.Framework.EntityMethodSet(Of __Person, __Person.DetailsClass))
Shared Sub New()
Dim initializeEntry = __Person.DetailsClass.PropertySetProperties.Id
End Sub
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Private Shared ReadOnly __PersonEntry As Global.Microsoft.LightSwitch.Details.Framework.Base.EntityDetails(Of __Person, __Person.DetailsClass).Entry = _
New Global.Microsoft.LightSwitch.Details.Framework.Base.EntityDetails(Of __Person, __Person.DetailsClass).Entry( _
AddressOf __Person.DetailsClass.__Person_CreateNew, _
AddressOf __Person.DetailsClass.__Person_Created, _
AddressOf __Person.DetailsClass.__Person_AllowSaveWithErrors)
Private Shared Function __Person_CreateNew(es As Global.Microsoft.LightSwitch.Framework.EntitySet(Of __Person)) As __Person
Return New __Person(es)
End Function
Private Shared Sub __Person_Created(e As __Person)
e.Person_Created()
End Sub
Private Shared Function __Person_AllowSaveWithErrors(e As __Person) As Boolean
Dim result As Boolean = False
e.Person_AllowSaveWithErrors(result)
Return result
End Function
Public Sub New()
MyBase.New()
End Sub
Public ReadOnly Shadows Property Commands As Global.Microsoft.LightSwitch.Details.Framework.EntityCommandSet(Of __Person, __Person.DetailsClass)
Get
Return MyBase.Commands
End Get
End Property
Public ReadOnly Shadows Property Methods As Global.Microsoft.LightSwitch.Details.Framework.EntityMethodSet(Of __Person, __Person.DetailsClass)
Get
Return MyBase.Methods
End Get
End Property
Public ReadOnly Shadows Property Properties As __Person.DetailsClass.PropertySet
Get
Return MyBase.Properties
End Get
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.Diagnostics.CodeAnalysis.SuppressMessage("Microsoft.Design", "CA1034:NestedTypesShouldNotBeVisible")> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class PropertySet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Base.EntityPropertySet(Of __Person, __Person.DetailsClass)
Public Sub New()
MyBase.New()
End Sub
Public ReadOnly Property Id As Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, Integer)
Get
Return TryCast(
MyBase.GetItem(__Person.DetailsClass.PropertySetProperties.Id),
Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, Integer))
End Get
End Property
Public ReadOnly Property LastName As Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String)
Get
Return TryCast(
MyBase.GetItem(__Person.DetailsClass.PropertySetProperties.LastName),
Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String))
End Get
End Property
Public ReadOnly Property FirstName As Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String)
Get
Return TryCast(
MyBase.GetItem(__Person.DetailsClass.PropertySetProperties.FirstName),
Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String))
End Get
End Property
Public ReadOnly Property Salutation As Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String)
Get
Return TryCast(
MyBase.GetItem(__Person.DetailsClass.PropertySetProperties.Salutation),
Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String))
End Get
End Property
Public ReadOnly Property NameSuffix As Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String)
Get
Return TryCast(
MyBase.GetItem(__Person.DetailsClass.PropertySetProperties.NameSuffix),
Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String))
End Get
End Property
Public ReadOnly Property Address1 As Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String)
Get
Return TryCast(
MyBase.GetItem(__Person.DetailsClass.PropertySetProperties.Address1),
Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String))
End Get
End Property
Public ReadOnly Property Address2 As Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String)
Get
Return TryCast(
MyBase.GetItem(__Person.DetailsClass.PropertySetProperties.Address2),
Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String))
End Get
End Property
Public ReadOnly Property City As Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String)
Get
Return TryCast(
MyBase.GetItem(__Person.DetailsClass.PropertySetProperties.City),
Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String))
End Get
End Property
Public ReadOnly Property State As Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String)
Get
Return TryCast(
MyBase.GetItem(__Person.DetailsClass.PropertySetProperties.State),
Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String))
End Get
End Property
Public ReadOnly Property Zip As Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String)
Get
Return TryCast(
MyBase.GetItem(__Person.DetailsClass.PropertySetProperties.Zip),
Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String))
End Get
End Property
Public ReadOnly Property Email As Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String)
Get
Return TryCast(
MyBase.GetItem(__Person.DetailsClass.PropertySetProperties.Email),
Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String))
End Get
End Property
Public ReadOnly Property SecondaryContactFlag As Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, Boolean)
Get
Return TryCast(
MyBase.GetItem(__Person.DetailsClass.PropertySetProperties.SecondaryContactFlag),
Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, Boolean))
End Get
End Property
Public ReadOnly Property HomePhone As Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String)
Get
Return TryCast(
MyBase.GetItem(__Person.DetailsClass.PropertySetProperties.HomePhone),
Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String))
End Get
End Property
Public ReadOnly Property MobilPhone As Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String)
Get
Return TryCast(
MyBase.GetItem(__Person.DetailsClass.PropertySetProperties.MobilPhone),
Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String))
End Get
End Property
Public ReadOnly Property BusinessPhone As Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String)
Get
Return TryCast(
MyBase.GetItem(__Person.DetailsClass.PropertySetProperties.BusinessPhone),
Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String))
End Get
End Property
Public ReadOnly Property Company As Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String)
Get
Return TryCast(
MyBase.GetItem(__Person.DetailsClass.PropertySetProperties.Company),
Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String))
End Get
End Property
Public ReadOnly Property RefNumber As Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, Global.System.Nullable(Of Integer))
Get
Return TryCast(
MyBase.GetItem(__Person.DetailsClass.PropertySetProperties.RefNumber),
Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, Global.System.Nullable(Of Integer)))
End Get
End Property
Public ReadOnly Property FullName As Global.Microsoft.LightSwitch.Details.Framework.EntityComputedProperty(Of __Person, __Person.DetailsClass, String)
Get
Return TryCast(
MyBase.GetItem(__Person.DetailsClass.PropertySetProperties.FullName),
Global.Microsoft.LightSwitch.Details.Framework.EntityComputedProperty(Of __Person, __Person.DetailsClass, String))
End Get
End Property
Public ReadOnly Property LastNameSoundex As Global.Microsoft.LightSwitch.Details.Framework.EntityComputedProperty(Of __Person, __Person.DetailsClass, String)
Get
Return TryCast(
MyBase.GetItem(__Person.DetailsClass.PropertySetProperties.LastNameSoundex),
Global.Microsoft.LightSwitch.Details.Framework.EntityComputedProperty(Of __Person, __Person.DetailsClass, String))
End Get
End Property
Public ReadOnly Property MailCode As Global.Microsoft.LightSwitch.Details.Framework.EntityReferenceProperty(Of __Person, __Person.DetailsClass, Global.LightSwitchApplication.MailCode)
Get
Return TryCast(
MyBase.GetItem(__Person.DetailsClass.PropertySetProperties.MailCode),
Global.Microsoft.LightSwitch.Details.Framework.EntityReferenceProperty(Of __Person, __Person.DetailsClass, Global.LightSwitchApplication.MailCode))
End Get
End Property
Public ReadOnly Property Subscriptions As Global.Microsoft.LightSwitch.Details.Framework.EntityCollectionProperty(Of __Person, __Person.DetailsClass, Global.LightSwitchApplication.Subscription)
Get
Return TryCast(
MyBase.GetItem(__Person.DetailsClass.PropertySetProperties.Subscriptions),
Global.Microsoft.LightSwitch.Details.Framework.EntityCollectionProperty(Of __Person, __Person.DetailsClass, Global.LightSwitchApplication.Subscription))
End Get
End Property
Public ReadOnly Property Activities As Global.Microsoft.LightSwitch.Details.Framework.EntityCollectionProperty(Of __Person, __Person.DetailsClass, Global.LightSwitchApplication.Activity)
Get
Return TryCast(
MyBase.GetItem(__Person.DetailsClass.PropertySetProperties.Activities),
Global.Microsoft.LightSwitch.Details.Framework.EntityCollectionProperty(Of __Person, __Person.DetailsClass, Global.LightSwitchApplication.Activity))
End Get
End Property
Public ReadOnly Property Donations As Global.Microsoft.LightSwitch.Details.Framework.EntityCollectionProperty(Of __Person, __Person.DetailsClass, Global.LightSwitchApplication.Donation)
Get
Return TryCast(
MyBase.GetItem(__Person.DetailsClass.PropertySetProperties.Donations),
Global.Microsoft.LightSwitch.Details.Framework.EntityCollectionProperty(Of __Person, __Person.DetailsClass, Global.LightSwitchApplication.Donation))
End Get
End Property
Public ReadOnly Property Programs As Global.Microsoft.LightSwitch.Details.Framework.EntityCollectionProperty(Of __Person, __Person.DetailsClass, Global.LightSwitchApplication.Program)
Get
Return TryCast(
MyBase.GetItem(__Person.DetailsClass.PropertySetProperties.Programs),
Global.Microsoft.LightSwitch.Details.Framework.EntityCollectionProperty(Of __Person, __Person.DetailsClass, Global.LightSwitchApplication.Program))
End Get
End Property
End Class
<Global.System.Diagnostics.CodeAnalysis.SuppressMessage("Microsoft.Design", "CA1034:NestedTypesShouldNotBeVisible")> _
Public Interface IImplementation
Inherits Global.Microsoft.LightSwitch.Internal.IEntityImplementation
Shadows Property Id As Integer
Shadows Property LastName As String
Shadows Property FirstName As String
Shadows Property Salutation As String
Shadows Property NameSuffix As String
Shadows Property Address1 As String
Shadows Property Address2 As String
Shadows Property City As String
Shadows Property State As String
Shadows Property Zip As String
Shadows Property Email As String
Shadows Property SecondaryContactFlag As Boolean
Shadows Property HomePhone As String
Shadows Property MobilPhone As String
Shadows Property BusinessPhone As String
Shadows Property Company As String
Shadows Property RefNumber As Global.System.Nullable(Of Integer)
Shadows Property MailCode As Global.Microsoft.LightSwitch.Internal.IEntityImplementation
Shadows ReadOnly Property Subscriptions As Global.System.Collections.IEnumerable
Shadows ReadOnly Property Activities As Global.System.Collections.IEnumerable
Shadows ReadOnly Property Donations As Global.System.Collections.IEnumerable
Shadows ReadOnly Property Programs As Global.System.Collections.IEnumerable
End Interface
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend Class PropertySetProperties
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Public Shared ReadOnly Id As Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, Integer).Entry = _
New Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, Integer).Entry( _
"Id", _
AddressOf __Person.DetailsClass.PropertySetProperties._Id_Stub, _
AddressOf __Person.DetailsClass.PropertySetProperties._Id_ComputeIsReadOnly, _
AddressOf __Person.DetailsClass.PropertySetProperties._Id_Validate, _
AddressOf __Person.DetailsClass.PropertySetProperties._Id_GetImplementationValue, _
AddressOf __Person.DetailsClass.PropertySetProperties._Id_SetImplementationValue, _
AddressOf __Person.DetailsClass.PropertySetProperties._Id_OnValueChanged)
Private Shared Sub _Id_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __Person.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, Integer).Data), d As __Person.DetailsClass, sf As Object)
c(d, d._Id, sf)
End Sub
Private Shared Function _Id_ComputeIsReadOnly(e As __Person) As Boolean
Dim result As Boolean = False
e.Id_IsReadOnly(result)
Return result
End Function
Private Shared Sub _Id_Validate(e As __Person, r As Global.Microsoft.LightSwitch.EntityValidationResultsBuilder)
e.Id_Validate(r)
End Sub
Private Shared Function _Id_GetImplementationValue(d As __Person.DetailsClass) As Integer
Return d.ImplementationEntity.Id
End Function
Private Shared Sub _Id_SetImplementationValue(d As __Person.DetailsClass, v As Integer)
d.ImplementationEntity.Id = v
End Sub
Private Shared Sub _Id_OnValueChanged(e As __Person)
e.Id_Changed()
End Sub
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Public Shared ReadOnly LastName As Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String).Entry = _
New Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String).Entry( _
"LastName", _
AddressOf __Person.DetailsClass.PropertySetProperties._LastName_Stub, _
AddressOf __Person.DetailsClass.PropertySetProperties._LastName_ComputeIsReadOnly, _
AddressOf __Person.DetailsClass.PropertySetProperties._LastName_Validate, _
AddressOf __Person.DetailsClass.PropertySetProperties._LastName_GetImplementationValue, _
AddressOf __Person.DetailsClass.PropertySetProperties._LastName_SetImplementationValue, _
AddressOf __Person.DetailsClass.PropertySetProperties._LastName_OnValueChanged)
Private Shared Sub _LastName_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __Person.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String).Data), d As __Person.DetailsClass, sf As Object)
c(d, d._LastName, sf)
End Sub
Private Shared Function _LastName_ComputeIsReadOnly(e As __Person) As Boolean
Dim result As Boolean = False
e.LastName_IsReadOnly(result)
Return result
End Function
Private Shared Sub _LastName_Validate(e As __Person, r As Global.Microsoft.LightSwitch.EntityValidationResultsBuilder)
e.LastName_Validate(r)
End Sub
Private Shared Function _LastName_GetImplementationValue(d As __Person.DetailsClass) As String
Return d.ImplementationEntity.LastName
End Function
Private Shared Sub _LastName_SetImplementationValue(d As __Person.DetailsClass, v As String)
d.ImplementationEntity.LastName = v
End Sub
Private Shared Sub _LastName_OnValueChanged(e As __Person)
e.LastName_Changed()
End Sub
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Public Shared ReadOnly FirstName As Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String).Entry = _
New Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String).Entry( _
"FirstName", _
AddressOf __Person.DetailsClass.PropertySetProperties._FirstName_Stub, _
AddressOf __Person.DetailsClass.PropertySetProperties._FirstName_ComputeIsReadOnly, _
AddressOf __Person.DetailsClass.PropertySetProperties._FirstName_Validate, _
AddressOf __Person.DetailsClass.PropertySetProperties._FirstName_GetImplementationValue, _
AddressOf __Person.DetailsClass.PropertySetProperties._FirstName_SetImplementationValue, _
AddressOf __Person.DetailsClass.PropertySetProperties._FirstName_OnValueChanged)
Private Shared Sub _FirstName_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __Person.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String).Data), d As __Person.DetailsClass, sf As Object)
c(d, d._FirstName, sf)
End Sub
Private Shared Function _FirstName_ComputeIsReadOnly(e As __Person) As Boolean
Dim result As Boolean = False
e.FirstName_IsReadOnly(result)
Return result
End Function
Private Shared Sub _FirstName_Validate(e As __Person, r As Global.Microsoft.LightSwitch.EntityValidationResultsBuilder)
e.FirstName_Validate(r)
End Sub
Private Shared Function _FirstName_GetImplementationValue(d As __Person.DetailsClass) As String
Return d.ImplementationEntity.FirstName
End Function
Private Shared Sub _FirstName_SetImplementationValue(d As __Person.DetailsClass, v As String)
d.ImplementationEntity.FirstName = v
End Sub
Private Shared Sub _FirstName_OnValueChanged(e As __Person)
e.FirstName_Changed()
End Sub
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Public Shared ReadOnly Salutation As Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String).Entry = _
New Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String).Entry( _
"Salutation", _
AddressOf __Person.DetailsClass.PropertySetProperties._Salutation_Stub, _
AddressOf __Person.DetailsClass.PropertySetProperties._Salutation_ComputeIsReadOnly, _
AddressOf __Person.DetailsClass.PropertySetProperties._Salutation_Validate, _
AddressOf __Person.DetailsClass.PropertySetProperties._Salutation_GetImplementationValue, _
AddressOf __Person.DetailsClass.PropertySetProperties._Salutation_SetImplementationValue, _
AddressOf __Person.DetailsClass.PropertySetProperties._Salutation_OnValueChanged)
Private Shared Sub _Salutation_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __Person.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String).Data), d As __Person.DetailsClass, sf As Object)
c(d, d._Salutation, sf)
End Sub
Private Shared Function _Salutation_ComputeIsReadOnly(e As __Person) As Boolean
Dim result As Boolean = False
e.Salutation_IsReadOnly(result)
Return result
End Function
Private Shared Sub _Salutation_Validate(e As __Person, r As Global.Microsoft.LightSwitch.EntityValidationResultsBuilder)
e.Salutation_Validate(r)
End Sub
Private Shared Function _Salutation_GetImplementationValue(d As __Person.DetailsClass) As String
Return d.ImplementationEntity.Salutation
End Function
Private Shared Sub _Salutation_SetImplementationValue(d As __Person.DetailsClass, v As String)
d.ImplementationEntity.Salutation = v
End Sub
Private Shared Sub _Salutation_OnValueChanged(e As __Person)
e.Salutation_Changed()
End Sub
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Public Shared ReadOnly NameSuffix As Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String).Entry = _
New Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String).Entry( _
"NameSuffix", _
AddressOf __Person.DetailsClass.PropertySetProperties._NameSuffix_Stub, _
AddressOf __Person.DetailsClass.PropertySetProperties._NameSuffix_ComputeIsReadOnly, _
AddressOf __Person.DetailsClass.PropertySetProperties._NameSuffix_Validate, _
AddressOf __Person.DetailsClass.PropertySetProperties._NameSuffix_GetImplementationValue, _
AddressOf __Person.DetailsClass.PropertySetProperties._NameSuffix_SetImplementationValue, _
AddressOf __Person.DetailsClass.PropertySetProperties._NameSuffix_OnValueChanged)
Private Shared Sub _NameSuffix_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __Person.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String).Data), d As __Person.DetailsClass, sf As Object)
c(d, d._NameSuffix, sf)
End Sub
Private Shared Function _NameSuffix_ComputeIsReadOnly(e As __Person) As Boolean
Dim result As Boolean = False
e.NameSuffix_IsReadOnly(result)
Return result
End Function
Private Shared Sub _NameSuffix_Validate(e As __Person, r As Global.Microsoft.LightSwitch.EntityValidationResultsBuilder)
e.NameSuffix_Validate(r)
End Sub
Private Shared Function _NameSuffix_GetImplementationValue(d As __Person.DetailsClass) As String
Return d.ImplementationEntity.NameSuffix
End Function
Private Shared Sub _NameSuffix_SetImplementationValue(d As __Person.DetailsClass, v As String)
d.ImplementationEntity.NameSuffix = v
End Sub
Private Shared Sub _NameSuffix_OnValueChanged(e As __Person)
e.NameSuffix_Changed()
End Sub
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Public Shared ReadOnly Address1 As Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String).Entry = _
New Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String).Entry( _
"Address1", _
AddressOf __Person.DetailsClass.PropertySetProperties._Address1_Stub, _
AddressOf __Person.DetailsClass.PropertySetProperties._Address1_ComputeIsReadOnly, _
AddressOf __Person.DetailsClass.PropertySetProperties._Address1_Validate, _
AddressOf __Person.DetailsClass.PropertySetProperties._Address1_GetImplementationValue, _
AddressOf __Person.DetailsClass.PropertySetProperties._Address1_SetImplementationValue, _
AddressOf __Person.DetailsClass.PropertySetProperties._Address1_OnValueChanged)
Private Shared Sub _Address1_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __Person.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String).Data), d As __Person.DetailsClass, sf As Object)
c(d, d._Address1, sf)
End Sub
Private Shared Function _Address1_ComputeIsReadOnly(e As __Person) As Boolean
Dim result As Boolean = False
e.Address1_IsReadOnly(result)
Return result
End Function
Private Shared Sub _Address1_Validate(e As __Person, r As Global.Microsoft.LightSwitch.EntityValidationResultsBuilder)
e.Address1_Validate(r)
End Sub
Private Shared Function _Address1_GetImplementationValue(d As __Person.DetailsClass) As String
Return d.ImplementationEntity.Address1
End Function
Private Shared Sub _Address1_SetImplementationValue(d As __Person.DetailsClass, v As String)
d.ImplementationEntity.Address1 = v
End Sub
Private Shared Sub _Address1_OnValueChanged(e As __Person)
e.Address1_Changed()
End Sub
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Public Shared ReadOnly Address2 As Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String).Entry = _
New Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String).Entry( _
"Address2", _
AddressOf __Person.DetailsClass.PropertySetProperties._Address2_Stub, _
AddressOf __Person.DetailsClass.PropertySetProperties._Address2_ComputeIsReadOnly, _
AddressOf __Person.DetailsClass.PropertySetProperties._Address2_Validate, _
AddressOf __Person.DetailsClass.PropertySetProperties._Address2_GetImplementationValue, _
AddressOf __Person.DetailsClass.PropertySetProperties._Address2_SetImplementationValue, _
AddressOf __Person.DetailsClass.PropertySetProperties._Address2_OnValueChanged)
Private Shared Sub _Address2_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __Person.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String).Data), d As __Person.DetailsClass, sf As Object)
c(d, d._Address2, sf)
End Sub
Private Shared Function _Address2_ComputeIsReadOnly(e As __Person) As Boolean
Dim result As Boolean = False
e.Address2_IsReadOnly(result)
Return result
End Function
Private Shared Sub _Address2_Validate(e As __Person, r As Global.Microsoft.LightSwitch.EntityValidationResultsBuilder)
e.Address2_Validate(r)
End Sub
Private Shared Function _Address2_GetImplementationValue(d As __Person.DetailsClass) As String
Return d.ImplementationEntity.Address2
End Function
Private Shared Sub _Address2_SetImplementationValue(d As __Person.DetailsClass, v As String)
d.ImplementationEntity.Address2 = v
End Sub
Private Shared Sub _Address2_OnValueChanged(e As __Person)
e.Address2_Changed()
End Sub
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Public Shared ReadOnly City As Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String).Entry = _
New Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String).Entry( _
"City", _
AddressOf __Person.DetailsClass.PropertySetProperties._City_Stub, _
AddressOf __Person.DetailsClass.PropertySetProperties._City_ComputeIsReadOnly, _
AddressOf __Person.DetailsClass.PropertySetProperties._City_Validate, _
AddressOf __Person.DetailsClass.PropertySetProperties._City_GetImplementationValue, _
AddressOf __Person.DetailsClass.PropertySetProperties._City_SetImplementationValue, _
AddressOf __Person.DetailsClass.PropertySetProperties._City_OnValueChanged)
Private Shared Sub _City_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __Person.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String).Data), d As __Person.DetailsClass, sf As Object)
c(d, d._City, sf)
End Sub
Private Shared Function _City_ComputeIsReadOnly(e As __Person) As Boolean
Dim result As Boolean = False
e.City_IsReadOnly(result)
Return result
End Function
Private Shared Sub _City_Validate(e As __Person, r As Global.Microsoft.LightSwitch.EntityValidationResultsBuilder)
e.City_Validate(r)
End Sub
Private Shared Function _City_GetImplementationValue(d As __Person.DetailsClass) As String
Return d.ImplementationEntity.City
End Function
Private Shared Sub _City_SetImplementationValue(d As __Person.DetailsClass, v As String)
d.ImplementationEntity.City = v
End Sub
Private Shared Sub _City_OnValueChanged(e As __Person)
e.City_Changed()
End Sub
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Public Shared ReadOnly State As Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String).Entry = _
New Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String).Entry( _
"State", _
AddressOf __Person.DetailsClass.PropertySetProperties._State_Stub, _
AddressOf __Person.DetailsClass.PropertySetProperties._State_ComputeIsReadOnly, _
AddressOf __Person.DetailsClass.PropertySetProperties._State_Validate, _
AddressOf __Person.DetailsClass.PropertySetProperties._State_GetImplementationValue, _
AddressOf __Person.DetailsClass.PropertySetProperties._State_SetImplementationValue, _
AddressOf __Person.DetailsClass.PropertySetProperties._State_OnValueChanged)
Private Shared Sub _State_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __Person.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String).Data), d As __Person.DetailsClass, sf As Object)
c(d, d._State, sf)
End Sub
Private Shared Function _State_ComputeIsReadOnly(e As __Person) As Boolean
Dim result As Boolean = False
e.State_IsReadOnly(result)
Return result
End Function
Private Shared Sub _State_Validate(e As __Person, r As Global.Microsoft.LightSwitch.EntityValidationResultsBuilder)
e.State_Validate(r)
End Sub
Private Shared Function _State_GetImplementationValue(d As __Person.DetailsClass) As String
Return d.ImplementationEntity.State
End Function
Private Shared Sub _State_SetImplementationValue(d As __Person.DetailsClass, v As String)
d.ImplementationEntity.State = v
End Sub
Private Shared Sub _State_OnValueChanged(e As __Person)
e.State_Changed()
End Sub
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Public Shared ReadOnly Zip As Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String).Entry = _
New Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String).Entry( _
"Zip", _
AddressOf __Person.DetailsClass.PropertySetProperties._Zip_Stub, _
AddressOf __Person.DetailsClass.PropertySetProperties._Zip_ComputeIsReadOnly, _
AddressOf __Person.DetailsClass.PropertySetProperties._Zip_Validate, _
AddressOf __Person.DetailsClass.PropertySetProperties._Zip_GetImplementationValue, _
AddressOf __Person.DetailsClass.PropertySetProperties._Zip_SetImplementationValue, _
AddressOf __Person.DetailsClass.PropertySetProperties._Zip_OnValueChanged)
Private Shared Sub _Zip_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __Person.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String).Data), d As __Person.DetailsClass, sf As Object)
c(d, d._Zip, sf)
End Sub
Private Shared Function _Zip_ComputeIsReadOnly(e As __Person) As Boolean
Dim result As Boolean = False
e.Zip_IsReadOnly(result)
Return result
End Function
Private Shared Sub _Zip_Validate(e As __Person, r As Global.Microsoft.LightSwitch.EntityValidationResultsBuilder)
e.Zip_Validate(r)
End Sub
Private Shared Function _Zip_GetImplementationValue(d As __Person.DetailsClass) As String
Return d.ImplementationEntity.Zip
End Function
Private Shared Sub _Zip_SetImplementationValue(d As __Person.DetailsClass, v As String)
d.ImplementationEntity.Zip = v
End Sub
Private Shared Sub _Zip_OnValueChanged(e As __Person)
e.Zip_Changed()
End Sub
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Public Shared ReadOnly Email As Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String).Entry = _
New Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String).Entry( _
"Email", _
AddressOf __Person.DetailsClass.PropertySetProperties._Email_Stub, _
AddressOf __Person.DetailsClass.PropertySetProperties._Email_ComputeIsReadOnly, _
AddressOf __Person.DetailsClass.PropertySetProperties._Email_Validate, _
AddressOf __Person.DetailsClass.PropertySetProperties._Email_GetImplementationValue, _
AddressOf __Person.DetailsClass.PropertySetProperties._Email_SetImplementationValue, _
AddressOf __Person.DetailsClass.PropertySetProperties._Email_OnValueChanged)
Private Shared Sub _Email_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __Person.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String).Data), d As __Person.DetailsClass, sf As Object)
c(d, d._Email, sf)
End Sub
Private Shared Function _Email_ComputeIsReadOnly(e As __Person) As Boolean
Dim result As Boolean = False
e.Email_IsReadOnly(result)
Return result
End Function
Private Shared Sub _Email_Validate(e As __Person, r As Global.Microsoft.LightSwitch.EntityValidationResultsBuilder)
e.Email_Validate(r)
End Sub
Private Shared Function _Email_GetImplementationValue(d As __Person.DetailsClass) As String
Return d.ImplementationEntity.Email
End Function
Private Shared Sub _Email_SetImplementationValue(d As __Person.DetailsClass, v As String)
d.ImplementationEntity.Email = v
End Sub
Private Shared Sub _Email_OnValueChanged(e As __Person)
e.Email_Changed()
End Sub
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Public Shared ReadOnly SecondaryContactFlag As Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, Boolean).Entry = _
New Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, Boolean).Entry( _
"SecondaryContactFlag", _
AddressOf __Person.DetailsClass.PropertySetProperties._SecondaryContactFlag_Stub, _
AddressOf __Person.DetailsClass.PropertySetProperties._SecondaryContactFlag_ComputeIsReadOnly, _
AddressOf __Person.DetailsClass.PropertySetProperties._SecondaryContactFlag_Validate, _
AddressOf __Person.DetailsClass.PropertySetProperties._SecondaryContactFlag_GetImplementationValue, _
AddressOf __Person.DetailsClass.PropertySetProperties._SecondaryContactFlag_SetImplementationValue, _
AddressOf __Person.DetailsClass.PropertySetProperties._SecondaryContactFlag_OnValueChanged)
Private Shared Sub _SecondaryContactFlag_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __Person.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, Boolean).Data), d As __Person.DetailsClass, sf As Object)
c(d, d._SecondaryContactFlag, sf)
End Sub
Private Shared Function _SecondaryContactFlag_ComputeIsReadOnly(e As __Person) As Boolean
Dim result As Boolean = False
e.SecondaryContactFlag_IsReadOnly(result)
Return result
End Function
Private Shared Sub _SecondaryContactFlag_Validate(e As __Person, r As Global.Microsoft.LightSwitch.EntityValidationResultsBuilder)
e.SecondaryContactFlag_Validate(r)
End Sub
Private Shared Function _SecondaryContactFlag_GetImplementationValue(d As __Person.DetailsClass) As Boolean
Return d.ImplementationEntity.SecondaryContactFlag
End Function
Private Shared Sub _SecondaryContactFlag_SetImplementationValue(d As __Person.DetailsClass, v As Boolean)
d.ImplementationEntity.SecondaryContactFlag = v
End Sub
Private Shared Sub _SecondaryContactFlag_OnValueChanged(e As __Person)
e.SecondaryContactFlag_Changed()
End Sub
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Public Shared ReadOnly HomePhone As Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String).Entry = _
New Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String).Entry( _
"HomePhone", _
AddressOf __Person.DetailsClass.PropertySetProperties._HomePhone_Stub, _
AddressOf __Person.DetailsClass.PropertySetProperties._HomePhone_ComputeIsReadOnly, _
AddressOf __Person.DetailsClass.PropertySetProperties._HomePhone_Validate, _
AddressOf __Person.DetailsClass.PropertySetProperties._HomePhone_GetImplementationValue, _
AddressOf __Person.DetailsClass.PropertySetProperties._HomePhone_SetImplementationValue, _
AddressOf __Person.DetailsClass.PropertySetProperties._HomePhone_OnValueChanged)
Private Shared Sub _HomePhone_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __Person.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String).Data), d As __Person.DetailsClass, sf As Object)
c(d, d._HomePhone, sf)
End Sub
Private Shared Function _HomePhone_ComputeIsReadOnly(e As __Person) As Boolean
Dim result As Boolean = False
e.HomePhone_IsReadOnly(result)
Return result
End Function
Private Shared Sub _HomePhone_Validate(e As __Person, r As Global.Microsoft.LightSwitch.EntityValidationResultsBuilder)
e.HomePhone_Validate(r)
End Sub
Private Shared Function _HomePhone_GetImplementationValue(d As __Person.DetailsClass) As String
Return d.ImplementationEntity.HomePhone
End Function
Private Shared Sub _HomePhone_SetImplementationValue(d As __Person.DetailsClass, v As String)
d.ImplementationEntity.HomePhone = v
End Sub
Private Shared Sub _HomePhone_OnValueChanged(e As __Person)
e.HomePhone_Changed()
End Sub
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Public Shared ReadOnly MobilPhone As Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String).Entry = _
New Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String).Entry( _
"MobilPhone", _
AddressOf __Person.DetailsClass.PropertySetProperties._MobilPhone_Stub, _
AddressOf __Person.DetailsClass.PropertySetProperties._MobilPhone_ComputeIsReadOnly, _
AddressOf __Person.DetailsClass.PropertySetProperties._MobilPhone_Validate, _
AddressOf __Person.DetailsClass.PropertySetProperties._MobilPhone_GetImplementationValue, _
AddressOf __Person.DetailsClass.PropertySetProperties._MobilPhone_SetImplementationValue, _
AddressOf __Person.DetailsClass.PropertySetProperties._MobilPhone_OnValueChanged)
Private Shared Sub _MobilPhone_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __Person.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String).Data), d As __Person.DetailsClass, sf As Object)
c(d, d._MobilPhone, sf)
End Sub
Private Shared Function _MobilPhone_ComputeIsReadOnly(e As __Person) As Boolean
Dim result As Boolean = False
e.MobilPhone_IsReadOnly(result)
Return result
End Function
Private Shared Sub _MobilPhone_Validate(e As __Person, r As Global.Microsoft.LightSwitch.EntityValidationResultsBuilder)
e.MobilPhone_Validate(r)
End Sub
Private Shared Function _MobilPhone_GetImplementationValue(d As __Person.DetailsClass) As String
Return d.ImplementationEntity.MobilPhone
End Function
Private Shared Sub _MobilPhone_SetImplementationValue(d As __Person.DetailsClass, v As String)
d.ImplementationEntity.MobilPhone = v
End Sub
Private Shared Sub _MobilPhone_OnValueChanged(e As __Person)
e.MobilPhone_Changed()
End Sub
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Public Shared ReadOnly BusinessPhone As Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String).Entry = _
New Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String).Entry( _
"BusinessPhone", _
AddressOf __Person.DetailsClass.PropertySetProperties._BusinessPhone_Stub, _
AddressOf __Person.DetailsClass.PropertySetProperties._BusinessPhone_ComputeIsReadOnly, _
AddressOf __Person.DetailsClass.PropertySetProperties._BusinessPhone_Validate, _
AddressOf __Person.DetailsClass.PropertySetProperties._BusinessPhone_GetImplementationValue, _
AddressOf __Person.DetailsClass.PropertySetProperties._BusinessPhone_SetImplementationValue, _
AddressOf __Person.DetailsClass.PropertySetProperties._BusinessPhone_OnValueChanged)
Private Shared Sub _BusinessPhone_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __Person.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String).Data), d As __Person.DetailsClass, sf As Object)
c(d, d._BusinessPhone, sf)
End Sub
Private Shared Function _BusinessPhone_ComputeIsReadOnly(e As __Person) As Boolean
Dim result As Boolean = False
e.BusinessPhone_IsReadOnly(result)
Return result
End Function
Private Shared Sub _BusinessPhone_Validate(e As __Person, r As Global.Microsoft.LightSwitch.EntityValidationResultsBuilder)
e.BusinessPhone_Validate(r)
End Sub
Private Shared Function _BusinessPhone_GetImplementationValue(d As __Person.DetailsClass) As String
Return d.ImplementationEntity.BusinessPhone
End Function
Private Shared Sub _BusinessPhone_SetImplementationValue(d As __Person.DetailsClass, v As String)
d.ImplementationEntity.BusinessPhone = v
End Sub
Private Shared Sub _BusinessPhone_OnValueChanged(e As __Person)
e.BusinessPhone_Changed()
End Sub
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Public Shared ReadOnly Company As Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String).Entry = _
New Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String).Entry( _
"Company", _
AddressOf __Person.DetailsClass.PropertySetProperties._Company_Stub, _
AddressOf __Person.DetailsClass.PropertySetProperties._Company_ComputeIsReadOnly, _
AddressOf __Person.DetailsClass.PropertySetProperties._Company_Validate, _
AddressOf __Person.DetailsClass.PropertySetProperties._Company_GetImplementationValue, _
AddressOf __Person.DetailsClass.PropertySetProperties._Company_SetImplementationValue, _
AddressOf __Person.DetailsClass.PropertySetProperties._Company_OnValueChanged)
Private Shared Sub _Company_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __Person.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String).Data), d As __Person.DetailsClass, sf As Object)
c(d, d._Company, sf)
End Sub
Private Shared Function _Company_ComputeIsReadOnly(e As __Person) As Boolean
Dim result As Boolean = False
e.Company_IsReadOnly(result)
Return result
End Function
Private Shared Sub _Company_Validate(e As __Person, r As Global.Microsoft.LightSwitch.EntityValidationResultsBuilder)
e.Company_Validate(r)
End Sub
Private Shared Function _Company_GetImplementationValue(d As __Person.DetailsClass) As String
Return d.ImplementationEntity.Company
End Function
Private Shared Sub _Company_SetImplementationValue(d As __Person.DetailsClass, v As String)
d.ImplementationEntity.Company = v
End Sub
Private Shared Sub _Company_OnValueChanged(e As __Person)
e.Company_Changed()
End Sub
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Public Shared ReadOnly RefNumber As Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, Global.System.Nullable(Of Integer)).Entry = _
New Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, Global.System.Nullable(Of Integer)).Entry( _
"RefNumber", _
AddressOf __Person.DetailsClass.PropertySetProperties._RefNumber_Stub, _
AddressOf __Person.DetailsClass.PropertySetProperties._RefNumber_ComputeIsReadOnly, _
AddressOf __Person.DetailsClass.PropertySetProperties._RefNumber_Validate, _
AddressOf __Person.DetailsClass.PropertySetProperties._RefNumber_GetImplementationValue, _
AddressOf __Person.DetailsClass.PropertySetProperties._RefNumber_SetImplementationValue, _
AddressOf __Person.DetailsClass.PropertySetProperties._RefNumber_OnValueChanged)
Private Shared Sub _RefNumber_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __Person.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, Global.System.Nullable(Of Integer)).Data), d As __Person.DetailsClass, sf As Object)
c(d, d._RefNumber, sf)
End Sub
Private Shared Function _RefNumber_ComputeIsReadOnly(e As __Person) As Boolean
Dim result As Boolean = False
e.RefNumber_IsReadOnly(result)
Return result
End Function
Private Shared Sub _RefNumber_Validate(e As __Person, r As Global.Microsoft.LightSwitch.EntityValidationResultsBuilder)
e.RefNumber_Validate(r)
End Sub
Private Shared Function _RefNumber_GetImplementationValue(d As __Person.DetailsClass) As Global.System.Nullable(Of Integer)
Return d.ImplementationEntity.RefNumber
End Function
Private Shared Sub _RefNumber_SetImplementationValue(d As __Person.DetailsClass, v As Global.System.Nullable(Of Integer))
d.ImplementationEntity.RefNumber = v
End Sub
Private Shared Sub _RefNumber_OnValueChanged(e As __Person)
e.RefNumber_Changed()
End Sub
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Public Shared ReadOnly FullName As Global.Microsoft.LightSwitch.Details.Framework.EntityComputedProperty(Of __Person, __Person.DetailsClass, String).Entry = _
New Global.Microsoft.LightSwitch.Details.Framework.EntityComputedProperty(Of __Person, __Person.DetailsClass, String).Entry( _
"FullName", _
AddressOf __Person.DetailsClass.PropertySetProperties._FullName_Stub, _
AddressOf __Person.DetailsClass.PropertySetProperties._FullName_Validate, _
AddressOf __Person.DetailsClass.PropertySetProperties._FullName_ComputeValue)
Private Shared Sub _FullName_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __Person.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.EntityComputedProperty(Of __Person, __Person.DetailsClass, String).Data), d As __Person.DetailsClass, sf As Object)
c(d, d._FullName, sf)
End Sub
Private Shared Sub _FullName_Validate(e As __Person, r As Global.Microsoft.LightSwitch.EntityValidationResultsBuilder)
e.FullName_Validate(r)
End Sub
Private Shared Function _FullName_ComputeValue(e As __Person) As String
Dim value As String = Nothing
e.FullName_Compute(value)
Return value
End Function
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Public Shared ReadOnly LastNameSoundex As Global.Microsoft.LightSwitch.Details.Framework.EntityComputedProperty(Of __Person, __Person.DetailsClass, String).Entry = _
New Global.Microsoft.LightSwitch.Details.Framework.EntityComputedProperty(Of __Person, __Person.DetailsClass, String).Entry( _
"LastNameSoundex", _
AddressOf __Person.DetailsClass.PropertySetProperties._LastNameSoundex_Stub, _
AddressOf __Person.DetailsClass.PropertySetProperties._LastNameSoundex_Validate, _
AddressOf __Person.DetailsClass.PropertySetProperties._LastNameSoundex_ComputeValue)
Private Shared Sub _LastNameSoundex_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __Person.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.EntityComputedProperty(Of __Person, __Person.DetailsClass, String).Data), d As __Person.DetailsClass, sf As Object)
c(d, d._LastNameSoundex, sf)
End Sub
Private Shared Sub _LastNameSoundex_Validate(e As __Person, r As Global.Microsoft.LightSwitch.EntityValidationResultsBuilder)
e.LastNameSoundex_Validate(r)
End Sub
Private Shared Function _LastNameSoundex_ComputeValue(e As __Person) As String
Dim value As String = Nothing
e.LastNameSoundex_Compute(value)
Return value
End Function
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Public Shared ReadOnly MailCode As Global.Microsoft.LightSwitch.Details.Framework.EntityReferenceProperty(Of __Person, __Person.DetailsClass, Global.LightSwitchApplication.MailCode).Entry = _
New Global.Microsoft.LightSwitch.Details.Framework.EntityReferenceProperty(Of __Person, __Person.DetailsClass, Global.LightSwitchApplication.MailCode).Entry( _
"MailCode", _
AddressOf __Person.DetailsClass.PropertySetProperties._MailCode_Stub, _
AddressOf __Person.DetailsClass.PropertySetProperties._MailCode_ComputeIsReadOnly, _
AddressOf __Person.DetailsClass.PropertySetProperties._MailCode_Validate, _
AddressOf __Person.DetailsClass.PropertySetProperties._MailCode_GetCoreImplementationValue, _
AddressOf __Person.DetailsClass.PropertySetProperties._MailCode_GetImplementationValue, _
AddressOf __Person.DetailsClass.PropertySetProperties._MailCode_SetImplementationValue, _
AddressOf __Person.DetailsClass.PropertySetProperties._MailCode_Refresh, _
AddressOf __Person.DetailsClass.PropertySetProperties._MailCode_OnValueChanged)
Private Shared Sub _MailCode_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __Person.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.EntityReferenceProperty(Of __Person, __Person.DetailsClass, Global.LightSwitchApplication.MailCode).Data), d As __Person.DetailsClass, sf As Object)
c(d, d._MailCode, sf)
End Sub
Private Shared Function _MailCode_ComputeIsReadOnly(e As __Person) As Boolean
Dim result As Boolean = False
e.MailCode_IsReadOnly(result)
Return result
End Function
Private Shared Sub _MailCode_Validate(e As __Person, r As Global.Microsoft.LightSwitch.EntityValidationResultsBuilder)
e.MailCode_Validate(r)
End Sub
Private Shared Function _MailCode_GetCoreImplementationValue(d as __Person.DetailsClass) As Global.Microsoft.LightSwitch.Internal.IEntityImplementation
Return d.ImplementationEntity.MailCode
End Function
Private Shared Function _MailCode_GetImplementationValue(d as __Person.DetailsClass) As Global.LightSwitchApplication.MailCode
Return d.GetImplementationValue(Of Global.LightSwitchApplication.MailCode, Global.LightSwitchApplication.MailCode.DetailsClass)(__Person.DetailsClass.PropertySetProperties.MailCode, d._MailCode)
End Function
Private Shared Sub _MailCode_SetImplementationValue(d As __Person.DetailsClass, v As Global.LightSwitchApplication.MailCode)
d.SetImplementationValue(__Person.DetailsClass.PropertySetProperties.MailCode, d._MailCode, Sub(i, ev) i.MailCode = ev, v)
End Sub
Private Shared Sub _MailCode_Refresh(d As __Person.DetailsClass)
d.RefreshNavigationProperty(__Person.DetailsClass.PropertySetProperties.MailCode, d._MailCode)
End Sub
Private Shared Sub _MailCode_OnValueChanged(e As __Person)
e.MailCode_Changed()
End Sub
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Public Shared ReadOnly Subscriptions As Global.Microsoft.LightSwitch.Details.Framework.EntityCollectionProperty(Of __Person, __Person.DetailsClass, Global.LightSwitchApplication.Subscription).Entry = _
New Global.Microsoft.LightSwitch.Details.Framework.EntityCollectionProperty(Of __Person, __Person.DetailsClass, Global.LightSwitchApplication.Subscription).Entry( _
"Subscriptions", _
AddressOf __Person.DetailsClass.PropertySetProperties._Subscriptions_Stub, _
AddressOf __Person.DetailsClass.PropertySetProperties._Subscriptions_GetReferencedEntities, _
AddressOf __Person.DetailsClass.PropertySetProperties._Subscriptions_GetEntityCollection)
Private Shared Sub _Subscriptions_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __Person.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.EntityCollectionProperty(Of __Person, __Person.DetailsClass, Global.LightSwitchApplication.Subscription).Data), d As __Person.DetailsClass, sf As Object)
c(d, d._Subscriptions, sf)
End Sub
Private Shared Function _Subscriptions_GetReferencedEntities(d As __Person.DetailsClass) As Global.System.Collections.Generic.IEnumerable(Of Global.LightSwitchApplication.Subscription)
Return d.GetReferencedEntities(Of Global.LightSwitchApplication.Subscription, Global.LightSwitchApplication.Subscription.DetailsClass)(__Person.DetailsClass.PropertySetProperties.Subscriptions, d._Subscriptions)
End Function
Private Shared Function _Subscriptions_GetEntityCollection(d As __Person.DetailsClass) As Global.System.Collections.IEnumerable
Return d.ImplementationEntity.Subscriptions
End Function
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Public Shared ReadOnly Activities As Global.Microsoft.LightSwitch.Details.Framework.EntityCollectionProperty(Of __Person, __Person.DetailsClass, Global.LightSwitchApplication.Activity).Entry = _
New Global.Microsoft.LightSwitch.Details.Framework.EntityCollectionProperty(Of __Person, __Person.DetailsClass, Global.LightSwitchApplication.Activity).Entry( _
"Activities", _
AddressOf __Person.DetailsClass.PropertySetProperties._Activities_Stub, _
AddressOf __Person.DetailsClass.PropertySetProperties._Activities_GetReferencedEntities, _
AddressOf __Person.DetailsClass.PropertySetProperties._Activities_GetEntityCollection)
Private Shared Sub _Activities_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __Person.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.EntityCollectionProperty(Of __Person, __Person.DetailsClass, Global.LightSwitchApplication.Activity).Data), d As __Person.DetailsClass, sf As Object)
c(d, d._Activities, sf)
End Sub
Private Shared Function _Activities_GetReferencedEntities(d As __Person.DetailsClass) As Global.System.Collections.Generic.IEnumerable(Of Global.LightSwitchApplication.Activity)
Return d.GetReferencedEntities(Of Global.LightSwitchApplication.Activity, Global.LightSwitchApplication.Activity.DetailsClass)(__Person.DetailsClass.PropertySetProperties.Activities, d._Activities)
End Function
Private Shared Function _Activities_GetEntityCollection(d As __Person.DetailsClass) As Global.System.Collections.IEnumerable
Return d.ImplementationEntity.Activities
End Function
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Public Shared ReadOnly Donations As Global.Microsoft.LightSwitch.Details.Framework.EntityCollectionProperty(Of __Person, __Person.DetailsClass, Global.LightSwitchApplication.Donation).Entry = _
New Global.Microsoft.LightSwitch.Details.Framework.EntityCollectionProperty(Of __Person, __Person.DetailsClass, Global.LightSwitchApplication.Donation).Entry( _
"Donations", _
AddressOf __Person.DetailsClass.PropertySetProperties._Donations_Stub, _
AddressOf __Person.DetailsClass.PropertySetProperties._Donations_GetReferencedEntities, _
AddressOf __Person.DetailsClass.PropertySetProperties._Donations_GetEntityCollection)
Private Shared Sub _Donations_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __Person.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.EntityCollectionProperty(Of __Person, __Person.DetailsClass, Global.LightSwitchApplication.Donation).Data), d As __Person.DetailsClass, sf As Object)
c(d, d._Donations, sf)
End Sub
Private Shared Function _Donations_GetReferencedEntities(d As __Person.DetailsClass) As Global.System.Collections.Generic.IEnumerable(Of Global.LightSwitchApplication.Donation)
Return d.GetReferencedEntities(Of Global.LightSwitchApplication.Donation, Global.LightSwitchApplication.Donation.DetailsClass)(__Person.DetailsClass.PropertySetProperties.Donations, d._Donations)
End Function
Private Shared Function _Donations_GetEntityCollection(d As __Person.DetailsClass) As Global.System.Collections.IEnumerable
Return d.ImplementationEntity.Donations
End Function
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Public Shared ReadOnly Programs As Global.Microsoft.LightSwitch.Details.Framework.EntityCollectionProperty(Of __Person, __Person.DetailsClass, Global.LightSwitchApplication.Program).Entry = _
New Global.Microsoft.LightSwitch.Details.Framework.EntityCollectionProperty(Of __Person, __Person.DetailsClass, Global.LightSwitchApplication.Program).Entry( _
"Programs", _
AddressOf __Person.DetailsClass.PropertySetProperties._Programs_Stub, _
AddressOf __Person.DetailsClass.PropertySetProperties._Programs_GetReferencedEntities, _
AddressOf __Person.DetailsClass.PropertySetProperties._Programs_GetEntityCollection)
Private Shared Sub _Programs_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __Person.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.EntityCollectionProperty(Of __Person, __Person.DetailsClass, Global.LightSwitchApplication.Program).Data), d As __Person.DetailsClass, sf As Object)
c(d, d._Programs, sf)
End Sub
Private Shared Function _Programs_GetReferencedEntities(d As __Person.DetailsClass) As Global.System.Collections.Generic.IEnumerable(Of Global.LightSwitchApplication.Program)
Return d.GetReferencedEntities(Of Global.LightSwitchApplication.Program, Global.LightSwitchApplication.Program.DetailsClass)(__Person.DetailsClass.PropertySetProperties.Programs, d._Programs)
End Function
Private Shared Function _Programs_GetEntityCollection(d As __Person.DetailsClass) As Global.System.Collections.IEnumerable
Return d.ImplementationEntity.Programs
End Function
End Class
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Private _Id As Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, Integer).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Private _LastName As Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Private _FirstName As Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Private _Salutation As Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Private _NameSuffix As Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Private _Address1 As Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Private _Address2 As Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Private _City As Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Private _State As Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Private _Zip As Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Private _Email As Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Private _SecondaryContactFlag As Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, Boolean).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Private _HomePhone As Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Private _MobilPhone As Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Private _BusinessPhone As Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Private _Company As Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, String).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Private _RefNumber As Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Person, __Person.DetailsClass, Global.System.Nullable(Of Integer)).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Private _FullName As Global.Microsoft.LightSwitch.Details.Framework.EntityComputedProperty(Of __Person, __Person.DetailsClass, String).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Private _LastNameSoundex As Global.Microsoft.LightSwitch.Details.Framework.EntityComputedProperty(Of __Person, __Person.DetailsClass, String).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Private _MailCode As Global.Microsoft.LightSwitch.Details.Framework.EntityReferenceProperty(Of __Person, __Person.DetailsClass, Global.LightSwitchApplication.MailCode).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Private _Subscriptions As Global.Microsoft.LightSwitch.Details.Framework.EntityCollectionProperty(Of __Person, __Person.DetailsClass, Global.LightSwitchApplication.Subscription).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Private _Activities As Global.Microsoft.LightSwitch.Details.Framework.EntityCollectionProperty(Of __Person, __Person.DetailsClass, Global.LightSwitchApplication.Activity).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Private _Donations As Global.Microsoft.LightSwitch.Details.Framework.EntityCollectionProperty(Of __Person, __Person.DetailsClass, Global.LightSwitchApplication.Donation).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Private _Programs As Global.Microsoft.LightSwitch.Details.Framework.EntityCollectionProperty(Of __Person, __Person.DetailsClass, Global.LightSwitchApplication.Program).Data
End Class
#End Region
End Class
''' <summary>
''' No Modeled Description Available
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
Public NotInheritable Partial Class MailCode
Inherits Global.Microsoft.LightSwitch.Framework.Base.EntityObject(Of __MailCode, __MailCode.DetailsClass)
#Region "Constructors"
''' <summary>
''' Initializes a new instance of the MailCode entity.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Sub New()
Me.New(Nothing)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Sub New(entitySet As Global.Microsoft.LightSwitch.Framework.EntitySet(Of __MailCode))
MyBase.New(entitySet)
__MailCode.DetailsClass.Initialize(Me)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub MailCode_Created()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub MailCode_AllowSaveWithErrors(ByRef result As Boolean)
End Sub
#End Region
#Region "Private Properties"
''' <summary>
''' Gets the Application object for this application. The Application object provides access to active screens, methods to open screens and access to the current user.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private ReadOnly Property Application As Global.Microsoft.LightSwitch.IApplication(Of Global.LightSwitchApplication.DataWorkspace)
Get
Return Global.LightSwitchApplication.Application.Current
End Get
End Property
''' <summary>
''' Gets the containing data workspace. The data workspace provides access to all data sources in the application.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private ReadOnly Property DataWorkspace As Global.LightSwitchApplication.DataWorkspace
Get
Return DirectCast(Me.Details.EntitySet.Details.DataService.Details.DataWorkspace, Global.LightSwitchApplication.DataWorkspace)
End Get
End Property
#End Region
#Region "Public Properties"
''' <summary>
''' No Modeled Description Available
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Property Id As Integer
Get
Return __MailCode.DetailsClass.GetValue(Me, __MailCode.DetailsClass.PropertySetProperties.Id)
End Get
Set
__MailCode.DetailsClass.SetValue(Me, __MailCode.DetailsClass.PropertySetProperties.Id, Value)
End Set
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Id_IsReadOnly(ByRef result As Boolean)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Id_Validate(ByVal results As Global.Microsoft.LightSwitch.EntityValidationResultsBuilder)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Id_Changed()
End Sub
''' <summary>
''' No Modeled Description Available
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Property MailCodeName As String
Get
Return __MailCode.DetailsClass.GetValue(Me, __MailCode.DetailsClass.PropertySetProperties.MailCodeName)
End Get
Set
__MailCode.DetailsClass.SetValue(Me, __MailCode.DetailsClass.PropertySetProperties.MailCodeName, Value)
End Set
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub MailCodeName_IsReadOnly(ByRef result As Boolean)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub MailCodeName_Validate(ByVal results As Global.Microsoft.LightSwitch.EntityValidationResultsBuilder)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub MailCodeName_Changed()
End Sub
''' <summary>
''' No Modeled Description Available
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Property IsDefault As Global.System.Nullable(Of Boolean)
Get
Return __MailCode.DetailsClass.GetValue(Me, __MailCode.DetailsClass.PropertySetProperties.IsDefault)
End Get
Set
__MailCode.DetailsClass.SetValue(Me, __MailCode.DetailsClass.PropertySetProperties.IsDefault, Value)
End Set
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub IsDefault_IsReadOnly(ByRef result As Boolean)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub IsDefault_Validate(ByVal results As Global.Microsoft.LightSwitch.EntityValidationResultsBuilder)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub IsDefault_Changed()
End Sub
''' <summary>
''' No Modeled Description Available
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property People As Global.Microsoft.LightSwitch.Framework.EntityCollection(Of Global.LightSwitchApplication.Person)
Get
Return __MailCode.DetailsClass.GetValue(Me, __MailCode.DetailsClass.PropertySetProperties.People)
End Get
End Property
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property PeopleQuery As Microsoft.LightSwitch.IDataServiceQueryable(Of Global.LightSwitchApplication.Person)
Get
Return __MailCode.DetailsClass.GetQuery(Me, __MailCode.DetailsClass.PropertySetProperties.People)
End Get
End Property
''' <summary>
''' No Modeled Description Available
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property MailListCodes As Global.Microsoft.LightSwitch.Framework.EntityCollection(Of Global.LightSwitchApplication.MailListCode)
Get
Return __MailCode.DetailsClass.GetValue(Me, __MailCode.DetailsClass.PropertySetProperties.MailListCodes)
End Get
End Property
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property MailListCodesQuery As Microsoft.LightSwitch.IDataServiceQueryable(Of Global.LightSwitchApplication.MailListCode)
Get
Return __MailCode.DetailsClass.GetQuery(Me, __MailCode.DetailsClass.PropertySetProperties.MailListCodes)
End Get
End Property
''' <summary>
''' No Modeled Description Available
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property ImportPersons As Global.Microsoft.LightSwitch.Framework.EntityCollection(Of Global.LightSwitchApplication.ImportPerson)
Get
Return __MailCode.DetailsClass.GetValue(Me, __MailCode.DetailsClass.PropertySetProperties.ImportPersons)
End Get
End Property
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property ImportPersonsQuery As Microsoft.LightSwitch.IDataServiceQueryable(Of Global.LightSwitchApplication.ImportPerson)
Get
Return __MailCode.DetailsClass.GetQuery(Me, __MailCode.DetailsClass.PropertySetProperties.ImportPersons)
End Get
End Property
#End Region
#Region "Details Class"
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.Diagnostics.CodeAnalysis.SuppressMessage("Microsoft.Design", "CA1034:NestedTypesShouldNotBeVisible")> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class DetailsClass
Inherits Global.Microsoft.LightSwitch.Details.Framework.Base.EntityDetails(Of _
__MailCode, _
__MailCode.DetailsClass, _
__MailCode.DetailsClass.IImplementation, _
__MailCode.DetailsClass.PropertySet, _
Global.Microsoft.LightSwitch.Details.Framework.EntityCommandSet(Of __MailCode, __MailCode.DetailsClass), _
Global.Microsoft.LightSwitch.Details.Framework.EntityMethodSet(Of __MailCode, __MailCode.DetailsClass))
Shared Sub New()
Dim initializeEntry = __MailCode.DetailsClass.PropertySetProperties.Id
End Sub
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Private Shared ReadOnly __MailCodeEntry As Global.Microsoft.LightSwitch.Details.Framework.Base.EntityDetails(Of __MailCode, __MailCode.DetailsClass).Entry = _
New Global.Microsoft.LightSwitch.Details.Framework.Base.EntityDetails(Of __MailCode, __MailCode.DetailsClass).Entry( _
AddressOf __MailCode.DetailsClass.__MailCode_CreateNew, _
AddressOf __MailCode.DetailsClass.__MailCode_Created, _
AddressOf __MailCode.DetailsClass.__MailCode_AllowSaveWithErrors)
Private Shared Function __MailCode_CreateNew(es As Global.Microsoft.LightSwitch.Framework.EntitySet(Of __MailCode)) As __MailCode
Return New __MailCode(es)
End Function
Private Shared Sub __MailCode_Created(e As __MailCode)
e.MailCode_Created()
End Sub
Private Shared Function __MailCode_AllowSaveWithErrors(e As __MailCode) As Boolean
Dim result As Boolean = False
e.MailCode_AllowSaveWithErrors(result)
Return result
End Function
Public Sub New()
MyBase.New()
End Sub
Public ReadOnly Shadows Property Commands As Global.Microsoft.LightSwitch.Details.Framework.EntityCommandSet(Of __MailCode, __MailCode.DetailsClass)
Get
Return MyBase.Commands
End Get
End Property
Public ReadOnly Shadows Property Methods As Global.Microsoft.LightSwitch.Details.Framework.EntityMethodSet(Of __MailCode, __MailCode.DetailsClass)
Get
Return MyBase.Methods
End Get
End Property
Public ReadOnly Shadows Property Properties As __MailCode.DetailsClass.PropertySet
Get
Return MyBase.Properties
End Get
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.Diagnostics.CodeAnalysis.SuppressMessage("Microsoft.Design", "CA1034:NestedTypesShouldNotBeVisible")> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class PropertySet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Base.EntityPropertySet(Of __MailCode, __MailCode.DetailsClass)
Public Sub New()
MyBase.New()
End Sub
Public ReadOnly Property Id As Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __MailCode, __MailCode.DetailsClass, Integer)
Get
Return TryCast(
MyBase.GetItem(__MailCode.DetailsClass.PropertySetProperties.Id),
Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __MailCode, __MailCode.DetailsClass, Integer))
End Get
End Property
Public ReadOnly Property MailCodeName As Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __MailCode, __MailCode.DetailsClass, String)
Get
Return TryCast(
MyBase.GetItem(__MailCode.DetailsClass.PropertySetProperties.MailCodeName),
Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __MailCode, __MailCode.DetailsClass, String))
End Get
End Property
Public ReadOnly Property IsDefault As Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __MailCode, __MailCode.DetailsClass, Global.System.Nullable(Of Boolean))
Get
Return TryCast(
MyBase.GetItem(__MailCode.DetailsClass.PropertySetProperties.IsDefault),
Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __MailCode, __MailCode.DetailsClass, Global.System.Nullable(Of Boolean)))
End Get
End Property
Public ReadOnly Property People As Global.Microsoft.LightSwitch.Details.Framework.EntityCollectionProperty(Of __MailCode, __MailCode.DetailsClass, Global.LightSwitchApplication.Person)
Get
Return TryCast(
MyBase.GetItem(__MailCode.DetailsClass.PropertySetProperties.People),
Global.Microsoft.LightSwitch.Details.Framework.EntityCollectionProperty(Of __MailCode, __MailCode.DetailsClass, Global.LightSwitchApplication.Person))
End Get
End Property
Public ReadOnly Property MailListCodes As Global.Microsoft.LightSwitch.Details.Framework.EntityCollectionProperty(Of __MailCode, __MailCode.DetailsClass, Global.LightSwitchApplication.MailListCode)
Get
Return TryCast(
MyBase.GetItem(__MailCode.DetailsClass.PropertySetProperties.MailListCodes),
Global.Microsoft.LightSwitch.Details.Framework.EntityCollectionProperty(Of __MailCode, __MailCode.DetailsClass, Global.LightSwitchApplication.MailListCode))
End Get
End Property
Public ReadOnly Property ImportPersons As Global.Microsoft.LightSwitch.Details.Framework.EntityCollectionProperty(Of __MailCode, __MailCode.DetailsClass, Global.LightSwitchApplication.ImportPerson)
Get
Return TryCast(
MyBase.GetItem(__MailCode.DetailsClass.PropertySetProperties.ImportPersons),
Global.Microsoft.LightSwitch.Details.Framework.EntityCollectionProperty(Of __MailCode, __MailCode.DetailsClass, Global.LightSwitchApplication.ImportPerson))
End Get
End Property
End Class
<Global.System.Diagnostics.CodeAnalysis.SuppressMessage("Microsoft.Design", "CA1034:NestedTypesShouldNotBeVisible")> _
Public Interface IImplementation
Inherits Global.Microsoft.LightSwitch.Internal.IEntityImplementation
Shadows Property Id As Integer
Shadows Property MailCodeName As String
Shadows Property IsDefault As Global.System.Nullable(Of Boolean)
Shadows ReadOnly Property People As Global.System.Collections.IEnumerable
Shadows ReadOnly Property MailListCodes As Global.System.Collections.IEnumerable
Shadows ReadOnly Property ImportPersons As Global.System.Collections.IEnumerable
End Interface
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend Class PropertySetProperties
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Public Shared ReadOnly Id As Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __MailCode, __MailCode.DetailsClass, Integer).Entry = _
New Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __MailCode, __MailCode.DetailsClass, Integer).Entry( _
"Id", _
AddressOf __MailCode.DetailsClass.PropertySetProperties._Id_Stub, _
AddressOf __MailCode.DetailsClass.PropertySetProperties._Id_ComputeIsReadOnly, _
AddressOf __MailCode.DetailsClass.PropertySetProperties._Id_Validate, _
AddressOf __MailCode.DetailsClass.PropertySetProperties._Id_GetImplementationValue, _
AddressOf __MailCode.DetailsClass.PropertySetProperties._Id_SetImplementationValue, _
AddressOf __MailCode.DetailsClass.PropertySetProperties._Id_OnValueChanged)
Private Shared Sub _Id_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __MailCode.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __MailCode, __MailCode.DetailsClass, Integer).Data), d As __MailCode.DetailsClass, sf As Object)
c(d, d._Id, sf)
End Sub
Private Shared Function _Id_ComputeIsReadOnly(e As __MailCode) As Boolean
Dim result As Boolean = False
e.Id_IsReadOnly(result)
Return result
End Function
Private Shared Sub _Id_Validate(e As __MailCode, r As Global.Microsoft.LightSwitch.EntityValidationResultsBuilder)
e.Id_Validate(r)
End Sub
Private Shared Function _Id_GetImplementationValue(d As __MailCode.DetailsClass) As Integer
Return d.ImplementationEntity.Id
End Function
Private Shared Sub _Id_SetImplementationValue(d As __MailCode.DetailsClass, v As Integer)
d.ImplementationEntity.Id = v
End Sub
Private Shared Sub _Id_OnValueChanged(e As __MailCode)
e.Id_Changed()
End Sub
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Public Shared ReadOnly MailCodeName As Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __MailCode, __MailCode.DetailsClass, String).Entry = _
New Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __MailCode, __MailCode.DetailsClass, String).Entry( _
"MailCodeName", _
AddressOf __MailCode.DetailsClass.PropertySetProperties._MailCodeName_Stub, _
AddressOf __MailCode.DetailsClass.PropertySetProperties._MailCodeName_ComputeIsReadOnly, _
AddressOf __MailCode.DetailsClass.PropertySetProperties._MailCodeName_Validate, _
AddressOf __MailCode.DetailsClass.PropertySetProperties._MailCodeName_GetImplementationValue, _
AddressOf __MailCode.DetailsClass.PropertySetProperties._MailCodeName_SetImplementationValue, _
AddressOf __MailCode.DetailsClass.PropertySetProperties._MailCodeName_OnValueChanged)
Private Shared Sub _MailCodeName_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __MailCode.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __MailCode, __MailCode.DetailsClass, String).Data), d As __MailCode.DetailsClass, sf As Object)
c(d, d._MailCodeName, sf)
End Sub
Private Shared Function _MailCodeName_ComputeIsReadOnly(e As __MailCode) As Boolean
Dim result As Boolean = False
e.MailCodeName_IsReadOnly(result)
Return result
End Function
Private Shared Sub _MailCodeName_Validate(e As __MailCode, r As Global.Microsoft.LightSwitch.EntityValidationResultsBuilder)
e.MailCodeName_Validate(r)
End Sub
Private Shared Function _MailCodeName_GetImplementationValue(d As __MailCode.DetailsClass) As String
Return d.ImplementationEntity.MailCodeName
End Function
Private Shared Sub _MailCodeName_SetImplementationValue(d As __MailCode.DetailsClass, v As String)
d.ImplementationEntity.MailCodeName = v
End Sub
Private Shared Sub _MailCodeName_OnValueChanged(e As __MailCode)
e.MailCodeName_Changed()
End Sub
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Public Shared ReadOnly IsDefault As Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __MailCode, __MailCode.DetailsClass, Global.System.Nullable(Of Boolean)).Entry = _
New Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __MailCode, __MailCode.DetailsClass, Global.System.Nullable(Of Boolean)).Entry( _
"IsDefault", _
AddressOf __MailCode.DetailsClass.PropertySetProperties._IsDefault_Stub, _
AddressOf __MailCode.DetailsClass.PropertySetProperties._IsDefault_ComputeIsReadOnly, _
AddressOf __MailCode.DetailsClass.PropertySetProperties._IsDefault_Validate, _
AddressOf __MailCode.DetailsClass.PropertySetProperties._IsDefault_GetImplementationValue, _
AddressOf __MailCode.DetailsClass.PropertySetProperties._IsDefault_SetImplementationValue, _
AddressOf __MailCode.DetailsClass.PropertySetProperties._IsDefault_OnValueChanged)
Private Shared Sub _IsDefault_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __MailCode.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __MailCode, __MailCode.DetailsClass, Global.System.Nullable(Of Boolean)).Data), d As __MailCode.DetailsClass, sf As Object)
c(d, d._IsDefault, sf)
End Sub
Private Shared Function _IsDefault_ComputeIsReadOnly(e As __MailCode) As Boolean
Dim result As Boolean = False
e.IsDefault_IsReadOnly(result)
Return result
End Function
Private Shared Sub _IsDefault_Validate(e As __MailCode, r As Global.Microsoft.LightSwitch.EntityValidationResultsBuilder)
e.IsDefault_Validate(r)
End Sub
Private Shared Function _IsDefault_GetImplementationValue(d As __MailCode.DetailsClass) As Global.System.Nullable(Of Boolean)
Return d.ImplementationEntity.IsDefault
End Function
Private Shared Sub _IsDefault_SetImplementationValue(d As __MailCode.DetailsClass, v As Global.System.Nullable(Of Boolean))
d.ImplementationEntity.IsDefault = v
End Sub
Private Shared Sub _IsDefault_OnValueChanged(e As __MailCode)
e.IsDefault_Changed()
End Sub
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Public Shared ReadOnly People As Global.Microsoft.LightSwitch.Details.Framework.EntityCollectionProperty(Of __MailCode, __MailCode.DetailsClass, Global.LightSwitchApplication.Person).Entry = _
New Global.Microsoft.LightSwitch.Details.Framework.EntityCollectionProperty(Of __MailCode, __MailCode.DetailsClass, Global.LightSwitchApplication.Person).Entry( _
"People", _
AddressOf __MailCode.DetailsClass.PropertySetProperties._People_Stub, _
AddressOf __MailCode.DetailsClass.PropertySetProperties._People_GetReferencedEntities, _
AddressOf __MailCode.DetailsClass.PropertySetProperties._People_GetEntityCollection)
Private Shared Sub _People_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __MailCode.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.EntityCollectionProperty(Of __MailCode, __MailCode.DetailsClass, Global.LightSwitchApplication.Person).Data), d As __MailCode.DetailsClass, sf As Object)
c(d, d._People, sf)
End Sub
Private Shared Function _People_GetReferencedEntities(d As __MailCode.DetailsClass) As Global.System.Collections.Generic.IEnumerable(Of Global.LightSwitchApplication.Person)
Return d.GetReferencedEntities(Of Global.LightSwitchApplication.Person, Global.LightSwitchApplication.Person.DetailsClass)(__MailCode.DetailsClass.PropertySetProperties.People, d._People)
End Function
Private Shared Function _People_GetEntityCollection(d As __MailCode.DetailsClass) As Global.System.Collections.IEnumerable
Return d.ImplementationEntity.People
End Function
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Public Shared ReadOnly MailListCodes As Global.Microsoft.LightSwitch.Details.Framework.EntityCollectionProperty(Of __MailCode, __MailCode.DetailsClass, Global.LightSwitchApplication.MailListCode).Entry = _
New Global.Microsoft.LightSwitch.Details.Framework.EntityCollectionProperty(Of __MailCode, __MailCode.DetailsClass, Global.LightSwitchApplication.MailListCode).Entry( _
"MailListCodes", _
AddressOf __MailCode.DetailsClass.PropertySetProperties._MailListCodes_Stub, _
AddressOf __MailCode.DetailsClass.PropertySetProperties._MailListCodes_GetReferencedEntities, _
AddressOf __MailCode.DetailsClass.PropertySetProperties._MailListCodes_GetEntityCollection)
Private Shared Sub _MailListCodes_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __MailCode.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.EntityCollectionProperty(Of __MailCode, __MailCode.DetailsClass, Global.LightSwitchApplication.MailListCode).Data), d As __MailCode.DetailsClass, sf As Object)
c(d, d._MailListCodes, sf)
End Sub
Private Shared Function _MailListCodes_GetReferencedEntities(d As __MailCode.DetailsClass) As Global.System.Collections.Generic.IEnumerable(Of Global.LightSwitchApplication.MailListCode)
Return d.GetReferencedEntities(Of Global.LightSwitchApplication.MailListCode, Global.LightSwitchApplication.MailListCode.DetailsClass)(__MailCode.DetailsClass.PropertySetProperties.MailListCodes, d._MailListCodes)
End Function
Private Shared Function _MailListCodes_GetEntityCollection(d As __MailCode.DetailsClass) As Global.System.Collections.IEnumerable
Return d.ImplementationEntity.MailListCodes
End Function
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Public Shared ReadOnly ImportPersons As Global.Microsoft.LightSwitch.Details.Framework.EntityCollectionProperty(Of __MailCode, __MailCode.DetailsClass, Global.LightSwitchApplication.ImportPerson).Entry = _
New Global.Microsoft.LightSwitch.Details.Framework.EntityCollectionProperty(Of __MailCode, __MailCode.DetailsClass, Global.LightSwitchApplication.ImportPerson).Entry( _
"ImportPersons", _
AddressOf __MailCode.DetailsClass.PropertySetProperties._ImportPersons_Stub, _
AddressOf __MailCode.DetailsClass.PropertySetProperties._ImportPersons_GetReferencedEntities, _
AddressOf __MailCode.DetailsClass.PropertySetProperties._ImportPersons_GetEntityCollection)
Private Shared Sub _ImportPersons_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __MailCode.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.EntityCollectionProperty(Of __MailCode, __MailCode.DetailsClass, Global.LightSwitchApplication.ImportPerson).Data), d As __MailCode.DetailsClass, sf As Object)
c(d, d._ImportPersons, sf)
End Sub
Private Shared Function _ImportPersons_GetReferencedEntities(d As __MailCode.DetailsClass) As Global.System.Collections.Generic.IEnumerable(Of Global.LightSwitchApplication.ImportPerson)
Return d.GetReferencedEntities(Of Global.LightSwitchApplication.ImportPerson, Global.LightSwitchApplication.ImportPerson.DetailsClass)(__MailCode.DetailsClass.PropertySetProperties.ImportPersons, d._ImportPersons)
End Function
Private Shared Function _ImportPersons_GetEntityCollection(d As __MailCode.DetailsClass) As Global.System.Collections.IEnumerable
Return d.ImplementationEntity.ImportPersons
End Function
End Class
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Private _Id As Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __MailCode, __MailCode.DetailsClass, Integer).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Private _MailCodeName As Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __MailCode, __MailCode.DetailsClass, String).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Private _IsDefault As Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __MailCode, __MailCode.DetailsClass, Global.System.Nullable(Of Boolean)).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Private _People As Global.Microsoft.LightSwitch.Details.Framework.EntityCollectionProperty(Of __MailCode, __MailCode.DetailsClass, Global.LightSwitchApplication.Person).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Private _MailListCodes As Global.Microsoft.LightSwitch.Details.Framework.EntityCollectionProperty(Of __MailCode, __MailCode.DetailsClass, Global.LightSwitchApplication.MailListCode).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Private _ImportPersons As Global.Microsoft.LightSwitch.Details.Framework.EntityCollectionProperty(Of __MailCode, __MailCode.DetailsClass, Global.LightSwitchApplication.ImportPerson).Data
End Class
#End Region
End Class
#End Region
End Namespace