LightSwitch HTML Client Tutorial - Contoso Moving

This tutorial walks through building out the mobile client used by Contoso Movers’ planning specialists. This sample was created for Visual Studio 2012, but it will also upgrade and run in Visual Studio 2013.

VB.NET (6.3 MB)
 
 
 
 
 
4.5 Star
(13)
16,363 times
Add to favorites
12/6/2013
E-mail Twitter del.icio.us Digg Facebook

Solution explorer

VB.NET

'------------------------------------------------------------------------------
' <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 __Employee = LightSwitchApplication.Employee

Namespace LightSwitchApplication

    #Region "Entities"
    
    ''' <summary>
    ''' No Modeled Description Available
    ''' </summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "11.0.0.0")> _
    Public NotInheritable Partial Class Employee
        Inherits Global.Microsoft.LightSwitch.Framework.Base.EntityObject(Of __Employee, __Employee.DetailsClass)
    
        #Region "Constructors"
    
        ''' <summary>
        ''' Initializes a new instance of the Employee entity.
        ''' </summary>
        <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "11.0.0.0")> _
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
        Public Sub New()
            Me.New(Nothing)
        End Sub
    
        <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "11.0.0.0")> _
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
        Public Sub New(entitySet As Global.Microsoft.LightSwitch.Framework.EntitySet(Of __Employee))
            MyBase.New(entitySet)
            
            __Employee.DetailsClass.Initialize(Me)
        End Sub
    
        <Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
        Private Partial Sub Employee_Created()
        End Sub
        <Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
        Private Partial Sub Employee_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", "11.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", "11.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", "11.0.0.0")> _
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
        Public Property Id As Integer
            Get
                Return __Employee.DetailsClass.GetValue(Me, __Employee.DetailsClass.PropertySetProperties.Id)
            End Get
            Set
                __Employee.DetailsClass.SetValue(Me, __Employee.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.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
        <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "11.0.0.0")> _
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
        Public Property RowVersion As Byte()
            Get
                Return __Employee.DetailsClass.GetValue(Me, __Employee.DetailsClass.PropertySetProperties.RowVersion)
            End Get
            Set
                __Employee.DetailsClass.SetValue(Me, __Employee.DetailsClass.PropertySetProperties.RowVersion, Value)
            End Set
        End Property
        
        <Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
        Private Partial Sub RowVersion_IsReadOnly(ByRef result As Boolean)
        End Sub
        <Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
        Private Partial Sub RowVersion_Validate(ByVal results As Global.Microsoft.LightSwitch.EntityValidationResultsBuilder)
        End Sub
        <Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
        Private Partial Sub RowVersion_Changed()
        End Sub

        ''' <summary>
        ''' No Modeled Description Available
        ''' </summary>
        <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "11.0.0.0")> _
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
        Public Property FirstName As String
            Get
                Return __Employee.DetailsClass.GetValue(Me, __Employee.DetailsClass.PropertySetProperties.FirstName)
            End Get
            Set
                __Employee.DetailsClass.SetValue(Me, __Employee.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", "11.0.0.0")> _
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
        Public Property LastName As String
            Get
                Return __Employee.DetailsClass.GetValue(Me, __Employee.DetailsClass.PropertySetProperties.LastName)
            End Get
            Set
                __Employee.DetailsClass.SetValue(Me, __Employee.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", "11.0.0.0")> _
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
        Public Property UserName As String
            Get
                Return __Employee.DetailsClass.GetValue(Me, __Employee.DetailsClass.PropertySetProperties.UserName)
            End Get
            Set
                __Employee.DetailsClass.SetValue(Me, __Employee.DetailsClass.PropertySetProperties.UserName, Value)
            End Set
        End Property
        
        <Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
        Private Partial Sub UserName_IsReadOnly(ByRef result As Boolean)
        End Sub
        <Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
        Private Partial Sub UserName_Validate(ByVal results As Global.Microsoft.LightSwitch.EntityValidationResultsBuilder)
        End Sub
        <Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
        Private Partial Sub UserName_Changed()
        End Sub

        ''' <summary>
        ''' No Modeled Description Available
        ''' </summary>
        <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "11.0.0.0")> _
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
        Public Property Email As String
            Get
                Return __Employee.DetailsClass.GetValue(Me, __Employee.DetailsClass.PropertySetProperties.Email)
            End Get
            Set
                __Employee.DetailsClass.SetValue(Me, __Employee.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", "11.0.0.0")> _
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
        Public Property Phone As String
            Get
                Return __Employee.DetailsClass.GetValue(Me, __Employee.DetailsClass.PropertySetProperties.Phone)
            End Get
            Set
                __Employee.DetailsClass.SetValue(Me, __Employee.DetailsClass.PropertySetProperties.Phone, Value)
            End Set
        End Property
        
        <Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
        Private Partial Sub Phone_IsReadOnly(ByRef result As Boolean)
        End Sub
        <Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
        Private Partial Sub Phone_Validate(ByVal results As Global.Microsoft.LightSwitch.EntityValidationResultsBuilder)
        End Sub
        <Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
        Private Partial Sub Phone_Changed()
        End Sub

        ''' <summary>
        ''' No Modeled Description Available
        ''' </summary>
        <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "11.0.0.0")> _
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
        Public ReadOnly Property Summary As String
            Get
                Return __Employee.DetailsClass.GetValue(Me, __Employee.DetailsClass.PropertySetProperties.Summary)
            End Get
        End Property
        
        <Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
        Private Partial Sub Summary_Compute(ByRef result As String)
        End Sub
        <Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
        Private Partial Sub Summary_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", "11.0.0.0")> _
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
        Public ReadOnly Property Appointments As Global.Microsoft.LightSwitch.Framework.EntityCollection(Of Global.LightSwitchApplication.Appointment)
            Get
                Return __Employee.DetailsClass.GetValue(Me, __Employee.DetailsClass.PropertySetProperties.Appointments)
            End Get
        End Property
        
        <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "11.0.0.0")> _
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
        Public ReadOnly Property AppointmentsQuery As Microsoft.LightSwitch.IDataServiceQueryable(Of Global.LightSwitchApplication.Appointment)
            Get
                Return __Employee.DetailsClass.GetQuery(Me, __Employee.DetailsClass.PropertySetProperties.Appointments)
            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", "11.0.0.0")> _
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
        Public NotInheritable Class DetailsClass
            Inherits Global.Microsoft.LightSwitch.Details.Framework.Base.EntityDetails(Of _
                __Employee, _
                __Employee.DetailsClass, _
                __Employee.DetailsClass.IImplementation, _
                __Employee.DetailsClass.PropertySet, _
                Global.Microsoft.LightSwitch.Details.Framework.EntityCommandSet(Of __Employee, __Employee.DetailsClass), _
                Global.Microsoft.LightSwitch.Details.Framework.EntityMethodSet(Of __Employee, __Employee.DetailsClass))
    
            Shared Sub New()
                Dim initializeEntry = __Employee.DetailsClass.PropertySetProperties.Id
            End Sub
    
            <Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
            Private Shared ReadOnly __EmployeeEntry As Global.Microsoft.LightSwitch.Details.Framework.Base.EntityDetails(Of __Employee, __Employee.DetailsClass).Entry = _
                New Global.Microsoft.LightSwitch.Details.Framework.Base.EntityDetails(Of __Employee, __Employee.DetailsClass).Entry( _
                    AddressOf __Employee.DetailsClass.__Employee_CreateNew, _
                    AddressOf __Employee.DetailsClass.__Employee_Created, _
                    AddressOf __Employee.DetailsClass.__Employee_AllowSaveWithErrors)
            Private Shared Function __Employee_CreateNew(es As Global.Microsoft.LightSwitch.Framework.EntitySet(Of __Employee)) As __Employee
                Return New __Employee(es)
            End Function
            Private Shared Sub __Employee_Created(e As __Employee)
                e.Employee_Created()
            End Sub
            Private Shared Function __Employee_AllowSaveWithErrors(e As __Employee) As Boolean
                Dim result As Boolean = False
                e.Employee_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 __Employee, __Employee.DetailsClass)
                Get
                    Return MyBase.Commands
                End Get
            End Property
    
            Public ReadOnly Shadows Property Methods As Global.Microsoft.LightSwitch.Details.Framework.EntityMethodSet(Of __Employee, __Employee.DetailsClass)
                Get
                    Return MyBase.Methods
                End Get
            End Property
    
            Public ReadOnly Shadows Property Properties As __Employee.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", "11.0.0.0")> _
            <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
            Public NotInheritable Class PropertySet
                Inherits Global.Microsoft.LightSwitch.Details.Framework.Base.EntityPropertySet(Of __Employee, __Employee.DetailsClass)
    
                Public Sub New()
                    MyBase.New()
                End Sub
    
                Public ReadOnly Property Id As Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Employee, __Employee.DetailsClass, Integer)
                    Get
                        Return TryCast(
                            MyBase.GetItem(__Employee.DetailsClass.PropertySetProperties.Id),
                            Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Employee, __Employee.DetailsClass, Integer))
                    End Get
                End Property
                
                Public ReadOnly Property RowVersion As Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Employee, __Employee.DetailsClass, Byte())
                    Get
                        Return TryCast(
                            MyBase.GetItem(__Employee.DetailsClass.PropertySetProperties.RowVersion),
                            Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Employee, __Employee.DetailsClass, Byte()))
                    End Get
                End Property
                
                Public ReadOnly Property FirstName As Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Employee, __Employee.DetailsClass, String)
                    Get
                        Return TryCast(
                            MyBase.GetItem(__Employee.DetailsClass.PropertySetProperties.FirstName),
                            Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Employee, __Employee.DetailsClass, String))
                    End Get
                End Property
                
                Public ReadOnly Property LastName As Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Employee, __Employee.DetailsClass, String)
                    Get
                        Return TryCast(
                            MyBase.GetItem(__Employee.DetailsClass.PropertySetProperties.LastName),
                            Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Employee, __Employee.DetailsClass, String))
                    End Get
                End Property
                
                Public ReadOnly Property UserName As Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Employee, __Employee.DetailsClass, String)
                    Get
                        Return TryCast(
                            MyBase.GetItem(__Employee.DetailsClass.PropertySetProperties.UserName),
                            Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Employee, __Employee.DetailsClass, String))
                    End Get
                End Property
                
                Public ReadOnly Property Email As Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Employee, __Employee.DetailsClass, String)
                    Get
                        Return TryCast(
                            MyBase.GetItem(__Employee.DetailsClass.PropertySetProperties.Email),
                            Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Employee, __Employee.DetailsClass, String))
                    End Get
                End Property
                
                Public ReadOnly Property Phone As Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Employee, __Employee.DetailsClass, String)
                    Get
                        Return TryCast(
                            MyBase.GetItem(__Employee.DetailsClass.PropertySetProperties.Phone),
                            Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Employee, __Employee.DetailsClass, String))
                    End Get
                End Property
                
                Public ReadOnly Property Summary As Global.Microsoft.LightSwitch.Details.Framework.EntityComputedProperty(Of __Employee, __Employee.DetailsClass, String)
                    Get
                        Return TryCast(
                            MyBase.GetItem(__Employee.DetailsClass.PropertySetProperties.Summary),
                            Global.Microsoft.LightSwitch.Details.Framework.EntityComputedProperty(Of __Employee, __Employee.DetailsClass, String))
                    End Get
                End Property
                
                Public ReadOnly Property Appointments As Global.Microsoft.LightSwitch.Details.Framework.EntityCollectionProperty(Of __Employee, __Employee.DetailsClass, Global.LightSwitchApplication.Appointment)
                    Get
                        Return TryCast(
                            MyBase.GetItem(__Employee.DetailsClass.PropertySetProperties.Appointments),
                            Global.Microsoft.LightSwitch.Details.Framework.EntityCollectionProperty(Of __Employee, __Employee.DetailsClass, Global.LightSwitchApplication.Appointment))
                    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 RowVersion As Byte()
                Shadows Property FirstName As String
                Shadows Property LastName As String
                Shadows Property UserName As String
                Shadows Property Email As String
                Shadows Property Phone As String
                Shadows ReadOnly Property Appointments 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", "11.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 __Employee, __Employee.DetailsClass, Integer).Entry = _
                    New Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Employee, __Employee.DetailsClass, Integer).Entry( _
                        "Id", _
                        AddressOf __Employee.DetailsClass.PropertySetProperties._Id_Stub, _
                        AddressOf __Employee.DetailsClass.PropertySetProperties._Id_ComputeIsReadOnly, _
                        AddressOf __Employee.DetailsClass.PropertySetProperties._Id_Validate, _
                        AddressOf __Employee.DetailsClass.PropertySetProperties._Id_GetImplementationValue, _
                        AddressOf __Employee.DetailsClass.PropertySetProperties._Id_SetImplementationValue, _
                        AddressOf __Employee.DetailsClass.PropertySetProperties._Id_OnValueChanged)
                Private Shared Sub _Id_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __Employee.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Employee, __Employee.DetailsClass, Integer).Data), d As __Employee.DetailsClass, sf As Object)
                    c(d, d._Id, sf)
                End Sub
                Private Shared Function _Id_ComputeIsReadOnly(e As __Employee) As Boolean
                    Dim result As Boolean = False
                    e.Id_IsReadOnly(result)
                    Return result
                End Function
                Private Shared Sub _Id_Validate(e As __Employee, r As Global.Microsoft.LightSwitch.EntityValidationResultsBuilder)
                    e.Id_Validate(r)
                End Sub
                Private Shared Function _Id_GetImplementationValue(d As __Employee.DetailsClass) As Integer
                    Return d.ImplementationEntity.Id
                End Function
                Private Shared Sub _Id_SetImplementationValue(d As __Employee.DetailsClass, v As Integer)
                    d.ImplementationEntity.Id = v
                End Sub
                Private Shared Sub _Id_OnValueChanged(e As __Employee)
                    e.Id_Changed()
                End Sub
    
                <Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
                Public Shared ReadOnly RowVersion As Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Employee, __Employee.DetailsClass, Byte()).Entry = _
                    New Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Employee, __Employee.DetailsClass, Byte()).Entry( _
                        "RowVersion", _
                        AddressOf __Employee.DetailsClass.PropertySetProperties._RowVersion_Stub, _
                        AddressOf __Employee.DetailsClass.PropertySetProperties._RowVersion_ComputeIsReadOnly, _
                        AddressOf __Employee.DetailsClass.PropertySetProperties._RowVersion_Validate, _
                        AddressOf __Employee.DetailsClass.PropertySetProperties._RowVersion_GetImplementationValue, _
                        AddressOf __Employee.DetailsClass.PropertySetProperties._RowVersion_SetImplementationValue, _
                        AddressOf __Employee.DetailsClass.PropertySetProperties._RowVersion_OnValueChanged)
                Private Shared Sub _RowVersion_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __Employee.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Employee, __Employee.DetailsClass, Byte()).Data), d As __Employee.DetailsClass, sf As Object)
                    c(d, d._RowVersion, sf)
                End Sub
                Private Shared Function _RowVersion_ComputeIsReadOnly(e As __Employee) As Boolean
                    Dim result As Boolean = False
                    e.RowVersion_IsReadOnly(result)
                    Return result
                End Function
                Private Shared Sub _RowVersion_Validate(e As __Employee, r As Global.Microsoft.LightSwitch.EntityValidationResultsBuilder)
                    e.RowVersion_Validate(r)
                End Sub
                Private Shared Function _RowVersion_GetImplementationValue(d As __Employee.DetailsClass) As Byte()
                    Return d.ImplementationEntity.RowVersion
                End Function
                Private Shared Sub _RowVersion_SetImplementationValue(d As __Employee.DetailsClass, v As Byte())
                    d.ImplementationEntity.RowVersion = v
                End Sub
                Private Shared Sub _RowVersion_OnValueChanged(e As __Employee)
                    e.RowVersion_Changed()
                End Sub
    
                <Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
                Public Shared ReadOnly FirstName As Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Employee, __Employee.DetailsClass, String).Entry = _
                    New Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Employee, __Employee.DetailsClass, String).Entry( _
                        "FirstName", _
                        AddressOf __Employee.DetailsClass.PropertySetProperties._FirstName_Stub, _
                        AddressOf __Employee.DetailsClass.PropertySetProperties._FirstName_ComputeIsReadOnly, _
                        AddressOf __Employee.DetailsClass.PropertySetProperties._FirstName_Validate, _
                        AddressOf __Employee.DetailsClass.PropertySetProperties._FirstName_GetImplementationValue, _
                        AddressOf __Employee.DetailsClass.PropertySetProperties._FirstName_SetImplementationValue, _
                        AddressOf __Employee.DetailsClass.PropertySetProperties._FirstName_OnValueChanged)
                Private Shared Sub _FirstName_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __Employee.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Employee, __Employee.DetailsClass, String).Data), d As __Employee.DetailsClass, sf As Object)
                    c(d, d._FirstName, sf)
                End Sub
                Private Shared Function _FirstName_ComputeIsReadOnly(e As __Employee) As Boolean
                    Dim result As Boolean = False
                    e.FirstName_IsReadOnly(result)
                    Return result
                End Function
                Private Shared Sub _FirstName_Validate(e As __Employee, r As Global.Microsoft.LightSwitch.EntityValidationResultsBuilder)
                    e.FirstName_Validate(r)
                End Sub
                Private Shared Function _FirstName_GetImplementationValue(d As __Employee.DetailsClass) As String
                    Return d.ImplementationEntity.FirstName
                End Function
                Private Shared Sub _FirstName_SetImplementationValue(d As __Employee.DetailsClass, v As String)
                    d.ImplementationEntity.FirstName = v
                End Sub
                Private Shared Sub _FirstName_OnValueChanged(e As __Employee)
                    e.FirstName_Changed()
                End Sub
    
                <Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
                Public Shared ReadOnly LastName As Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Employee, __Employee.DetailsClass, String).Entry = _
                    New Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Employee, __Employee.DetailsClass, String).Entry( _
                        "LastName", _
                        AddressOf __Employee.DetailsClass.PropertySetProperties._LastName_Stub, _
                        AddressOf __Employee.DetailsClass.PropertySetProperties._LastName_ComputeIsReadOnly, _
                        AddressOf __Employee.DetailsClass.PropertySetProperties._LastName_Validate, _
                        AddressOf __Employee.DetailsClass.PropertySetProperties._LastName_GetImplementationValue, _
                        AddressOf __Employee.DetailsClass.PropertySetProperties._LastName_SetImplementationValue, _
                        AddressOf __Employee.DetailsClass.PropertySetProperties._LastName_OnValueChanged)
                Private Shared Sub _LastName_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __Employee.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Employee, __Employee.DetailsClass, String).Data), d As __Employee.DetailsClass, sf As Object)
                    c(d, d._LastName, sf)
                End Sub
                Private Shared Function _LastName_ComputeIsReadOnly(e As __Employee) As Boolean
                    Dim result As Boolean = False
                    e.LastName_IsReadOnly(result)
                    Return result
                End Function
                Private Shared Sub _LastName_Validate(e As __Employee, r As Global.Microsoft.LightSwitch.EntityValidationResultsBuilder)
                    e.LastName_Validate(r)
                End Sub
                Private Shared Function _LastName_GetImplementationValue(d As __Employee.DetailsClass) As String
                    Return d.ImplementationEntity.LastName
                End Function
                Private Shared Sub _LastName_SetImplementationValue(d As __Employee.DetailsClass, v As String)
                    d.ImplementationEntity.LastName = v
                End Sub
                Private Shared Sub _LastName_OnValueChanged(e As __Employee)
                    e.LastName_Changed()
                End Sub
    
                <Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
                Public Shared ReadOnly UserName As Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Employee, __Employee.DetailsClass, String).Entry = _
                    New Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Employee, __Employee.DetailsClass, String).Entry( _
                        "UserName", _
                        AddressOf __Employee.DetailsClass.PropertySetProperties._UserName_Stub, _
                        AddressOf __Employee.DetailsClass.PropertySetProperties._UserName_ComputeIsReadOnly, _
                        AddressOf __Employee.DetailsClass.PropertySetProperties._UserName_Validate, _
                        AddressOf __Employee.DetailsClass.PropertySetProperties._UserName_GetImplementationValue, _
                        AddressOf __Employee.DetailsClass.PropertySetProperties._UserName_SetImplementationValue, _
                        AddressOf __Employee.DetailsClass.PropertySetProperties._UserName_OnValueChanged)
                Private Shared Sub _UserName_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __Employee.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Employee, __Employee.DetailsClass, String).Data), d As __Employee.DetailsClass, sf As Object)
                    c(d, d._UserName, sf)
                End Sub
                Private Shared Function _UserName_ComputeIsReadOnly(e As __Employee) As Boolean
                    Dim result As Boolean = False
                    e.UserName_IsReadOnly(result)
                    Return result
                End Function
                Private Shared Sub _UserName_Validate(e As __Employee, r As Global.Microsoft.LightSwitch.EntityValidationResultsBuilder)
                    e.UserName_Validate(r)
                End Sub
                Private Shared Function _UserName_GetImplementationValue(d As __Employee.DetailsClass) As String
                    Return d.ImplementationEntity.UserName
                End Function
                Private Shared Sub _UserName_SetImplementationValue(d As __Employee.DetailsClass, v As String)
                    d.ImplementationEntity.UserName = v
                End Sub
                Private Shared Sub _UserName_OnValueChanged(e As __Employee)
                    e.UserName_Changed()
                End Sub
    
                <Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
                Public Shared ReadOnly Email As Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Employee, __Employee.DetailsClass, String).Entry = _
                    New Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Employee, __Employee.DetailsClass, String).Entry( _
                        "Email", _
                        AddressOf __Employee.DetailsClass.PropertySetProperties._Email_Stub, _
                        AddressOf __Employee.DetailsClass.PropertySetProperties._Email_ComputeIsReadOnly, _
                        AddressOf __Employee.DetailsClass.PropertySetProperties._Email_Validate, _
                        AddressOf __Employee.DetailsClass.PropertySetProperties._Email_GetImplementationValue, _
                        AddressOf __Employee.DetailsClass.PropertySetProperties._Email_SetImplementationValue, _
                        AddressOf __Employee.DetailsClass.PropertySetProperties._Email_OnValueChanged)
                Private Shared Sub _Email_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __Employee.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Employee, __Employee.DetailsClass, String).Data), d As __Employee.DetailsClass, sf As Object)
                    c(d, d._Email, sf)
                End Sub
                Private Shared Function _Email_ComputeIsReadOnly(e As __Employee) As Boolean
                    Dim result As Boolean = False
                    e.Email_IsReadOnly(result)
                    Return result
                End Function
                Private Shared Sub _Email_Validate(e As __Employee, r As Global.Microsoft.LightSwitch.EntityValidationResultsBuilder)
                    e.Email_Validate(r)
                End Sub
                Private Shared Function _Email_GetImplementationValue(d As __Employee.DetailsClass) As String
                    Return d.ImplementationEntity.Email
                End Function
                Private Shared Sub _Email_SetImplementationValue(d As __Employee.DetailsClass, v As String)
                    d.ImplementationEntity.Email = v
                End Sub
                Private Shared Sub _Email_OnValueChanged(e As __Employee)
                    e.Email_Changed()
                End Sub
    
                <Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
                Public Shared ReadOnly Phone As Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Employee, __Employee.DetailsClass, String).Entry = _
                    New Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Employee, __Employee.DetailsClass, String).Entry( _
                        "Phone", _
                        AddressOf __Employee.DetailsClass.PropertySetProperties._Phone_Stub, _
                        AddressOf __Employee.DetailsClass.PropertySetProperties._Phone_ComputeIsReadOnly, _
                        AddressOf __Employee.DetailsClass.PropertySetProperties._Phone_Validate, _
                        AddressOf __Employee.DetailsClass.PropertySetProperties._Phone_GetImplementationValue, _
                        AddressOf __Employee.DetailsClass.PropertySetProperties._Phone_SetImplementationValue, _
                        AddressOf __Employee.DetailsClass.PropertySetProperties._Phone_OnValueChanged)
                Private Shared Sub _Phone_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __Employee.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Employee, __Employee.DetailsClass, String).Data), d As __Employee.DetailsClass, sf As Object)
                    c(d, d._Phone, sf)
                End Sub
                Private Shared Function _Phone_ComputeIsReadOnly(e As __Employee) As Boolean
                    Dim result As Boolean = False
                    e.Phone_IsReadOnly(result)
                    Return result
                End Function
                Private Shared Sub _Phone_Validate(e As __Employee, r As Global.Microsoft.LightSwitch.EntityValidationResultsBuilder)
                    e.Phone_Validate(r)
                End Sub
                Private Shared Function _Phone_GetImplementationValue(d As __Employee.DetailsClass) As String
                    Return d.ImplementationEntity.Phone
                End Function
                Private Shared Sub _Phone_SetImplementationValue(d As __Employee.DetailsClass, v As String)
                    d.ImplementationEntity.Phone = v
                End Sub
                Private Shared Sub _Phone_OnValueChanged(e As __Employee)
                    e.Phone_Changed()
                End Sub
    
                <Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
                Public Shared ReadOnly Summary As Global.Microsoft.LightSwitch.Details.Framework.EntityComputedProperty(Of __Employee, __Employee.DetailsClass, String).Entry = _
                    New Global.Microsoft.LightSwitch.Details.Framework.EntityComputedProperty(Of __Employee, __Employee.DetailsClass, String).Entry( _
                        "Summary", _
                        AddressOf __Employee.DetailsClass.PropertySetProperties._Summary_Stub, _
                        AddressOf __Employee.DetailsClass.PropertySetProperties._Summary_Validate, _
                        AddressOf __Employee.DetailsClass.PropertySetProperties._Summary_ComputeValue)
                Private Shared Sub _Summary_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __Employee.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.EntityComputedProperty(Of __Employee, __Employee.DetailsClass, String).Data), d As __Employee.DetailsClass, sf As Object)
                    c(d, d._Summary, sf)
                End Sub
                Private Shared Sub _Summary_Validate(e As __Employee, r As Global.Microsoft.LightSwitch.EntityValidationResultsBuilder)
                    e.Summary_Validate(r)
                End Sub
                Private Shared Function _Summary_ComputeValue(e As __Employee) As String
                    Dim value As String = Nothing
                    e.Summary_Compute(value)
                    Return value
                End Function
    
                <Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
                Public Shared ReadOnly Appointments As Global.Microsoft.LightSwitch.Details.Framework.EntityCollectionProperty(Of __Employee, __Employee.DetailsClass, Global.LightSwitchApplication.Appointment).Entry = _
                    New Global.Microsoft.LightSwitch.Details.Framework.EntityCollectionProperty(Of __Employee, __Employee.DetailsClass, Global.LightSwitchApplication.Appointment).Entry( _
                        "Appointments", _
                        AddressOf __Employee.DetailsClass.PropertySetProperties._Appointments_Stub, _
                        AddressOf __Employee.DetailsClass.PropertySetProperties._Appointments_GetReferencedEntities, _
                        AddressOf __Employee.DetailsClass.PropertySetProperties._Appointments_GetEntityCollection)
                Private Shared Sub _Appointments_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __Employee.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.EntityCollectionProperty(Of __Employee, __Employee.DetailsClass, Global.LightSwitchApplication.Appointment).Data), d As __Employee.DetailsClass, sf As Object)
                    c(d, d._Appointments, sf)
                End Sub
                Private Shared Function _Appointments_GetReferencedEntities(d As __Employee.DetailsClass) As Global.System.Collections.Generic.IEnumerable(Of Global.LightSwitchApplication.Appointment)
                    Return d.GetReferencedEntities(Of Global.LightSwitchApplication.Appointment, Global.LightSwitchApplication.Appointment.DetailsClass)(__Employee.DetailsClass.PropertySetProperties.Appointments, d._Appointments)
                End Function
                Private Shared Function _Appointments_GetEntityCollection(d As __Employee.DetailsClass) As Global.System.Collections.IEnumerable
                    Return d.ImplementationEntity.Appointments
                End Function
    
            End Class
    
            <Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
            Private _Id As Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Employee, __Employee.DetailsClass, Integer).Data
            
            <Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
            Private _RowVersion As Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Employee, __Employee.DetailsClass, Byte()).Data
            
            <Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
            Private _FirstName As Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Employee, __Employee.DetailsClass, String).Data
            
            <Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
            Private _LastName As Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Employee, __Employee.DetailsClass, String).Data
            
            <Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
            Private _UserName As Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Employee, __Employee.DetailsClass, String).Data
            
            <Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
            Private _Email As Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Employee, __Employee.DetailsClass, String).Data
            
            <Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
            Private _Phone As Global.Microsoft.LightSwitch.Details.Framework.EntityStorageProperty(Of __Employee, __Employee.DetailsClass, String).Data
            
            <Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
            Private _Summary As Global.Microsoft.LightSwitch.Details.Framework.EntityComputedProperty(Of __Employee, __Employee.DetailsClass, String).Data
            
            <Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
            Private _Appointments As Global.Microsoft.LightSwitch.Details.Framework.EntityCollectionProperty(Of __Employee, __Employee.DetailsClass, Global.LightSwitchApplication.Appointment).Data
            
        End Class
    
        #End Region
    
    End Class
    
    #End Region
End Namespace