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

Namespace LightSwitchApplication.Implementation
    
    #Region "Customer"
    <Global.System.Runtime.Serialization.DataContract(Namespace:="http://schemas.datacontract.org/2004/07/ApplicationData.Implementation")> _
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "11.0.0.0")> _
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
    Public Class Customer
        Implements Global.LightSwitchApplication.Customer.DetailsClass.IImplementation
        Private Sub OnCustomer_StateChanged()
            Me.___OnPropertyChanged("Customer_State")
            Me.___OnPropertyChanged("State")
        End Sub
        
        Private Property _IdImplementation() As Integer Implements Global.LightSwitchApplication.Customer.DetailsClass.IImplementation.Id
            Get
                Return Me.Id
            End Get
            Set(ByVal value As Integer)
                Me.Id = value
            End Set
        End Property
        
        Private Sub OnIdChanged()
            Me.___OnPropertyChanged("Id")
        End Sub
        
        Private Property _RowVersionImplementation() As Byte() Implements Global.LightSwitchApplication.Customer.DetailsClass.IImplementation.RowVersion
            Get
                Return Me.RowVersion
            End Get
            Set(ByVal value As Byte())
                Me.RowVersion = value
            End Set
        End Property
        
        Private Sub OnRowVersionChanged()
            Me.___OnPropertyChanged("RowVersion")
        End Sub
        
        Private Property _LastNameImplementation() As String Implements Global.LightSwitchApplication.Customer.DetailsClass.IImplementation.LastName
            Get
                Return Me.LastName
            End Get
            Set(ByVal value As String)
                Me.LastName = value
            End Set
        End Property
        
        Private Sub OnLastNameChanged()
            Me.___OnPropertyChanged("LastName")
        End Sub
        
        Private Property _FirstNameImplementation() As String Implements Global.LightSwitchApplication.Customer.DetailsClass.IImplementation.FirstName
            Get
                Return Me.FirstName
            End Get
            Set(ByVal value As String)
                Me.FirstName = value
            End Set
        End Property
        
        Private Sub OnFirstNameChanged()
            Me.___OnPropertyChanged("FirstName")
        End Sub
        
        Private Property _PhoneImplementation() As String Implements Global.LightSwitchApplication.Customer.DetailsClass.IImplementation.Phone
            Get
                Return Me.Phone
            End Get
            Set(ByVal value As String)
                Me.Phone = value
            End Set
        End Property
        
        Private Sub OnPhoneChanged()
            Me.___OnPropertyChanged("Phone")
        End Sub
        
        Private Property _EmailImplementation() As String Implements Global.LightSwitchApplication.Customer.DetailsClass.IImplementation.Email
            Get
                Return Me.Email
            End Get
            Set(ByVal value As String)
                Me.Email = value
            End Set
        End Property
        
        Private Sub OnEmailChanged()
            Me.___OnPropertyChanged("Email")
        End Sub
        
        Private Property _StreetImplementation() As String Implements Global.LightSwitchApplication.Customer.DetailsClass.IImplementation.Street
            Get
                Return Me.Street
            End Get
            Set(ByVal value As String)
                Me.Street = value
            End Set
        End Property
        
        Private Sub OnStreetChanged()
            Me.___OnPropertyChanged("Street")
        End Sub
        
        Private Property _StreetLine2Implementation() As String Implements Global.LightSwitchApplication.Customer.DetailsClass.IImplementation.StreetLine2
            Get
                Return Me.StreetLine2
            End Get
            Set(ByVal value As String)
                Me.StreetLine2 = value
            End Set
        End Property
        
        Private Sub OnStreetLine2Changed()
            Me.___OnPropertyChanged("StreetLine2")
        End Sub
        
        Private Property _CityImplementation() As String Implements Global.LightSwitchApplication.Customer.DetailsClass.IImplementation.City
            Get
                Return Me.City
            End Get
            Set(ByVal value As String)
                Me.City = value
            End Set
        End Property
        
        Private Sub OnCityChanged()
            Me.___OnPropertyChanged("City")
        End Sub
        
        Private Property _PostalCodeImplementation() As String Implements Global.LightSwitchApplication.Customer.DetailsClass.IImplementation.PostalCode
            Get
                Return Me.PostalCode
            End Get
            Set(ByVal value As String)
                Me.PostalCode = value
            End Set
        End Property
        
        Private Sub OnPostalCodeChanged()
            Me.___OnPropertyChanged("PostalCode")
        End Sub
        
        Private Property _StateImplementation() As Global.Microsoft.LightSwitch.Internal.IEntityImplementation Implements Global.LightSwitchApplication.Customer.DetailsClass.IImplementation.State
            Get
                Return Me.State
            End Get
            Set(ByVal value As Global.Microsoft.LightSwitch.Internal.IEntityImplementation)
                Me.State = DirectCast(value, Global.LightSwitchApplication.Implementation.State)
            End Set
        End Property
        
        Private ReadOnly Property __State As Global.Microsoft.LightSwitch.ClientGenerated.Implementation.EntityRef(Of Global.LightSwitchApplication.Implementation.State) 
            Get
                If (Me.___State Is Nothing) Then
                    Me.___State = New Global.Microsoft.LightSwitch.ClientGenerated.Implementation.EntityRef(Of Global.LightSwitchApplication.Implementation.State)( _
                        Me, _
                        "State", _
                        New Global.System.String() {"Customer_State"}, _
                        Function(e) Global.System.Object.Equals(e.Id, Me.Customer_State), _
                        Function() Me._State, _
                        Sub(e) Me._State = e)
                End If
                Return Me.___State
            End Get
        End Property
        
        Private ___State As Global.Microsoft.LightSwitch.ClientGenerated.Implementation.EntityRef(Of Global.LightSwitchApplication.Implementation.State)
        
        Private ReadOnly Property _AppointmentsImplementation() As Global.System.Collections.IEnumerable Implements Global.LightSwitchApplication.Customer.DetailsClass.IImplementation.Appointments
            Get
                Return Me.Appointments
            End Get
        End Property
        
        Friend ReadOnly Property __Appointments As Global.Microsoft.LightSwitch.ClientGenerated.Implementation.EntityRefCollection(Of Global.LightSwitchApplication.Implementation.Appointment) 
            Get
                If (Me.___Appointments Is Nothing) Then
                    Me.___Appointments = New Global.Microsoft.LightSwitch.ClientGenerated.Implementation.EntityRefCollection(Of Global.LightSwitchApplication.Implementation.Appointment)( _
                        Me, _
                        "Appointments", _
                        Function() Me._Appointments, _
                        Function(e) Global.System.Object.Equals(e.Appointment_Customer, Me.Id))
                End If
                Return Me.___Appointments
            End Get
        End Property
        
        Private ___Appointments As Global.Microsoft.LightSwitch.ClientGenerated.Implementation.EntityRefCollection(Of Global.LightSwitchApplication.Implementation.Appointment)
        
    End Class
    #End Region
    
    #Region "State"
    <Global.System.Runtime.Serialization.DataContract(Namespace:="http://schemas.datacontract.org/2004/07/ApplicationData.Implementation")> _
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "11.0.0.0")> _
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
    Public Class State
        Implements Global.LightSwitchApplication.State.DetailsClass.IImplementation
        Private Property _IdImplementation() As Integer Implements Global.LightSwitchApplication.State.DetailsClass.IImplementation.Id
            Get
                Return Me.Id
            End Get
            Set(ByVal value As Integer)
                Me.Id = value
            End Set
        End Property
        
        Private Sub OnIdChanged()
            Me.___OnPropertyChanged("Id")
        End Sub
        
        Private Property _RowVersionImplementation() As Byte() Implements Global.LightSwitchApplication.State.DetailsClass.IImplementation.RowVersion
            Get
                Return Me.RowVersion
            End Get
            Set(ByVal value As Byte())
                Me.RowVersion = value
            End Set
        End Property
        
        Private Sub OnRowVersionChanged()
            Me.___OnPropertyChanged("RowVersion")
        End Sub
        
        Private Property _NameImplementation() As String Implements Global.LightSwitchApplication.State.DetailsClass.IImplementation.Name
            Get
                Return Me.Name
            End Get
            Set(ByVal value As String)
                Me.Name = value
            End Set
        End Property
        
        Private Sub OnNameChanged()
            Me.___OnPropertyChanged("Name")
        End Sub
        
        Private Property _AbbreviationImplementation() As String Implements Global.LightSwitchApplication.State.DetailsClass.IImplementation.Abbreviation
            Get
                Return Me.Abbreviation
            End Get
            Set(ByVal value As String)
                Me.Abbreviation = value
            End Set
        End Property
        
        Private Sub OnAbbreviationChanged()
            Me.___OnPropertyChanged("Abbreviation")
        End Sub
        
        Private ReadOnly Property _CustomersImplementation() As Global.System.Collections.IEnumerable Implements Global.LightSwitchApplication.State.DetailsClass.IImplementation.Customers
            Get
                Return Me.Customers
            End Get
        End Property
        
        Friend ReadOnly Property __Customers As Global.Microsoft.LightSwitch.ClientGenerated.Implementation.EntityRefCollection(Of Global.LightSwitchApplication.Implementation.Customer) 
            Get
                If (Me.___Customers Is Nothing) Then
                    Me.___Customers = New Global.Microsoft.LightSwitch.ClientGenerated.Implementation.EntityRefCollection(Of Global.LightSwitchApplication.Implementation.Customer)( _
                        Me, _
                        "Customers", _
                        Function() Me._Customers, _
                        Function(e) Global.System.Object.Equals(e.Customer_State, Me.Id))
                End If
                Return Me.___Customers
            End Get
        End Property
        
        Private ___Customers As Global.Microsoft.LightSwitch.ClientGenerated.Implementation.EntityRefCollection(Of Global.LightSwitchApplication.Implementation.Customer)
        
        Private ReadOnly Property _AppointmentsImplementation() As Global.System.Collections.IEnumerable Implements Global.LightSwitchApplication.State.DetailsClass.IImplementation.Appointments
            Get
                Return Me.Appointments
            End Get
        End Property
        
        Friend ReadOnly Property __Appointments As Global.Microsoft.LightSwitch.ClientGenerated.Implementation.EntityRefCollection(Of Global.LightSwitchApplication.Implementation.Appointment) 
            Get
                If (Me.___Appointments Is Nothing) Then
                    Me.___Appointments = New Global.Microsoft.LightSwitch.ClientGenerated.Implementation.EntityRefCollection(Of Global.LightSwitchApplication.Implementation.Appointment)( _
                        Me, _
                        "Appointments", _
                        Function() Me._Appointments, _
                        Function(e) Global.System.Object.Equals(e.Appointment_State, Me.Id))
                End If
                Return Me.___Appointments
            End Get
        End Property
        
        Private ___Appointments As Global.Microsoft.LightSwitch.ClientGenerated.Implementation.EntityRefCollection(Of Global.LightSwitchApplication.Implementation.Appointment)
        
    End Class
    #End Region
    
    #Region "Appointment"
    <Global.System.Runtime.Serialization.DataContract(Namespace:="http://schemas.datacontract.org/2004/07/ApplicationData.Implementation")> _
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "11.0.0.0")> _
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
    Public Class Appointment
        Implements Global.LightSwitchApplication.Appointment.DetailsClass.IImplementation
        Private Sub OnAppointment_StateChanged()
            Me.___OnPropertyChanged("Appointment_State")
            Me.___OnPropertyChanged("State")
        End Sub
        
        Private Sub OnAppointment_EmployeeChanged()
            Me.___OnPropertyChanged("Appointment_Employee")
            Me.___OnPropertyChanged("Employee")
        End Sub
        
        Private Sub OnAppointment_CustomerChanged()
            Me.___OnPropertyChanged("Appointment_Customer")
            Me.___OnPropertyChanged("Customer")
        End Sub
        
        Private Property _IdImplementation() As Integer Implements Global.LightSwitchApplication.Appointment.DetailsClass.IImplementation.Id
            Get
                Return Me.Id
            End Get
            Set(ByVal value As Integer)
                Me.Id = value
            End Set
        End Property
        
        Private Sub OnIdChanged()
            Me.___OnPropertyChanged("Id")
        End Sub
        
        Private Property _RowVersionImplementation() As Byte() Implements Global.LightSwitchApplication.Appointment.DetailsClass.IImplementation.RowVersion
            Get
                Return Me.RowVersion
            End Get
            Set(ByVal value As Byte())
                Me.RowVersion = value
            End Set
        End Property
        
        Private Sub OnRowVersionChanged()
            Me.___OnPropertyChanged("RowVersion")
        End Sub
        
        Private Property _StartDateImplementation() As Date Implements Global.LightSwitchApplication.Appointment.DetailsClass.IImplementation.StartDate
            Get
                Return Me.StartDate
            End Get
            Set(ByVal value As Date)
                Me.StartDate = value
            End Set
        End Property
        
        Private Sub OnStartDateChanged()
            Me.___OnPropertyChanged("StartDate")
        End Sub
        
        Private Property _EndDateImplementation() As Date Implements Global.LightSwitchApplication.Appointment.DetailsClass.IImplementation.EndDate
            Get
                Return Me.EndDate
            End Get
            Set(ByVal value As Date)
                Me.EndDate = value
            End Set
        End Property
        
        Private Sub OnEndDateChanged()
            Me.___OnPropertyChanged("EndDate")
        End Sub
        
        Private Property _StreetImplementation() As String Implements Global.LightSwitchApplication.Appointment.DetailsClass.IImplementation.Street
            Get
                Return Me.Street
            End Get
            Set(ByVal value As String)
                Me.Street = value
            End Set
        End Property
        
        Private Sub OnStreetChanged()
            Me.___OnPropertyChanged("Street")
        End Sub
        
        Private Property _StreetLine2Implementation() As String Implements Global.LightSwitchApplication.Appointment.DetailsClass.IImplementation.StreetLine2
            Get
                Return Me.StreetLine2
            End Get
            Set(ByVal value As String)
                Me.StreetLine2 = value
            End Set
        End Property
        
        Private Sub OnStreetLine2Changed()
            Me.___OnPropertyChanged("StreetLine2")
        End Sub
        
        Private Property _CityImplementation() As String Implements Global.LightSwitchApplication.Appointment.DetailsClass.IImplementation.City
            Get
                Return Me.City
            End Get
            Set(ByVal value As String)
                Me.City = value
            End Set
        End Property
        
        Private Sub OnCityChanged()
            Me.___OnPropertyChanged("City")
        End Sub
        
        Private Property _PostalCodeImplementation() As String Implements Global.LightSwitchApplication.Appointment.DetailsClass.IImplementation.PostalCode
            Get
                Return Me.PostalCode
            End Get
            Set(ByVal value As String)
                Me.PostalCode = value
            End Set
        End Property
        
        Private Sub OnPostalCodeChanged()
            Me.___OnPropertyChanged("PostalCode")
        End Sub
        
        Private Property _NotesImplementation() As String Implements Global.LightSwitchApplication.Appointment.DetailsClass.IImplementation.Notes
            Get
                Return Me.Notes
            End Get
            Set(ByVal value As String)
                Me.Notes = value
            End Set
        End Property
        
        Private Sub OnNotesChanged()
            Me.___OnPropertyChanged("Notes")
        End Sub
        
        Private Property _MoveTypeImplementation() As String Implements Global.LightSwitchApplication.Appointment.DetailsClass.IImplementation.MoveType
            Get
                Return Me.MoveType
            End Get
            Set(ByVal value As String)
                Me.MoveType = value
            End Set
        End Property
        
        Private Sub OnMoveTypeChanged()
            Me.___OnPropertyChanged("MoveType")
        End Sub
        
        Private Property _StateImplementation() As Global.Microsoft.LightSwitch.Internal.IEntityImplementation Implements Global.LightSwitchApplication.Appointment.DetailsClass.IImplementation.State
            Get
                Return Me.State
            End Get
            Set(ByVal value As Global.Microsoft.LightSwitch.Internal.IEntityImplementation)
                Me.State = DirectCast(value, Global.LightSwitchApplication.Implementation.State)
            End Set
        End Property
        
        Private ReadOnly Property __State As Global.Microsoft.LightSwitch.ClientGenerated.Implementation.EntityRef(Of Global.LightSwitchApplication.Implementation.State) 
            Get
                If (Me.___State Is Nothing) Then
                    Me.___State = New Global.Microsoft.LightSwitch.ClientGenerated.Implementation.EntityRef(Of Global.LightSwitchApplication.Implementation.State)( _
                        Me, _
                        "State", _
                        New Global.System.String() {"Appointment_State"}, _
                        Function(e) Global.System.Object.Equals(e.Id, Me.Appointment_State), _
                        Function() Me._State, _
                        Sub(e) Me._State = e)
                End If
                Return Me.___State
            End Get
        End Property
        
        Private ___State As Global.Microsoft.LightSwitch.ClientGenerated.Implementation.EntityRef(Of Global.LightSwitchApplication.Implementation.State)
        
        Private ReadOnly Property _PhotosImplementation() As Global.System.Collections.IEnumerable Implements Global.LightSwitchApplication.Appointment.DetailsClass.IImplementation.Photos
            Get
                Return Me.Photos
            End Get
        End Property
        
        Friend ReadOnly Property __Photos As Global.Microsoft.LightSwitch.ClientGenerated.Implementation.EntityRefCollection(Of Global.LightSwitchApplication.Implementation.Photo) 
            Get
                If (Me.___Photos Is Nothing) Then
                    Me.___Photos = New Global.Microsoft.LightSwitch.ClientGenerated.Implementation.EntityRefCollection(Of Global.LightSwitchApplication.Implementation.Photo)( _
                        Me, _
                        "Photos", _
                        Function() Me._Photos, _
                        Function(e) Global.System.Object.Equals(e.AppointmentPhoto_Appointment, Me.Id))
                End If
                Return Me.___Photos
            End Get
        End Property
        
        Private ___Photos As Global.Microsoft.LightSwitch.ClientGenerated.Implementation.EntityRefCollection(Of Global.LightSwitchApplication.Implementation.Photo)
        
        Private Property _EmployeeImplementation() As Global.Microsoft.LightSwitch.Internal.IEntityImplementation Implements Global.LightSwitchApplication.Appointment.DetailsClass.IImplementation.Employee
            Get
                Return Me.Employee
            End Get
            Set(ByVal value As Global.Microsoft.LightSwitch.Internal.IEntityImplementation)
                Me.Employee = DirectCast(value, Global.LightSwitchApplication.Implementation.Employee)
            End Set
        End Property
        
        Private ReadOnly Property __Employee As Global.Microsoft.LightSwitch.ClientGenerated.Implementation.EntityRef(Of Global.LightSwitchApplication.Implementation.Employee) 
            Get
                If (Me.___Employee Is Nothing) Then
                    Me.___Employee = New Global.Microsoft.LightSwitch.ClientGenerated.Implementation.EntityRef(Of Global.LightSwitchApplication.Implementation.Employee)( _
                        Me, _
                        "Employee", _
                        New Global.System.String() {"Appointment_Employee"}, _
                        Function(e) Global.System.Object.Equals(e.Id, Me.Appointment_Employee), _
                        Function() Me._Employee, _
                        Sub(e) Me._Employee = e)
                End If
                Return Me.___Employee
            End Get
        End Property
        
        Private ___Employee As Global.Microsoft.LightSwitch.ClientGenerated.Implementation.EntityRef(Of Global.LightSwitchApplication.Implementation.Employee)
        
        Private ReadOnly Property _RoomsImplementation() As Global.System.Collections.IEnumerable Implements Global.LightSwitchApplication.Appointment.DetailsClass.IImplementation.Rooms
            Get
                Return Me.Rooms
            End Get
        End Property
        
        Friend ReadOnly Property __Rooms As Global.Microsoft.LightSwitch.ClientGenerated.Implementation.EntityRefCollection(Of Global.LightSwitchApplication.Implementation.Room) 
            Get
                If (Me.___Rooms Is Nothing) Then
                    Me.___Rooms = New Global.Microsoft.LightSwitch.ClientGenerated.Implementation.EntityRefCollection(Of Global.LightSwitchApplication.Implementation.Room)( _
                        Me, _
                        "Rooms", _
                        Function() Me._Rooms, _
                        Function(e) Global.System.Object.Equals(e.Appointment_Room, Me.Id))
                End If
                Return Me.___Rooms
            End Get
        End Property
        
        Private ___Rooms As Global.Microsoft.LightSwitch.ClientGenerated.Implementation.EntityRefCollection(Of Global.LightSwitchApplication.Implementation.Room)
        
        Private Property _CustomerImplementation() As Global.Microsoft.LightSwitch.Internal.IEntityImplementation Implements Global.LightSwitchApplication.Appointment.DetailsClass.IImplementation.Customer
            Get
                Return Me.Customer
            End Get
            Set(ByVal value As Global.Microsoft.LightSwitch.Internal.IEntityImplementation)
                Me.Customer = DirectCast(value, Global.LightSwitchApplication.Implementation.Customer)
            End Set
        End Property
        
        Private ReadOnly Property __Customer As Global.Microsoft.LightSwitch.ClientGenerated.Implementation.EntityRef(Of Global.LightSwitchApplication.Implementation.Customer) 
            Get
                If (Me.___Customer Is Nothing) Then
                    Me.___Customer = New Global.Microsoft.LightSwitch.ClientGenerated.Implementation.EntityRef(Of Global.LightSwitchApplication.Implementation.Customer)( _
                        Me, _
                        "Customer", _
                        New Global.System.String() {"Appointment_Customer"}, _
                        Function(e) Global.System.Object.Equals(e.Id, Me.Appointment_Customer), _
                        Function() Me._Customer, _
                        Sub(e) Me._Customer = e)
                End If
                Return Me.___Customer
            End Get
        End Property
        
        Private ___Customer As Global.Microsoft.LightSwitch.ClientGenerated.Implementation.EntityRef(Of Global.LightSwitchApplication.Implementation.Customer)
        
    End Class
    #End Region
    
    #Region "Employee"
    <Global.System.Runtime.Serialization.DataContract(Namespace:="http://schemas.datacontract.org/2004/07/ApplicationData.Implementation")> _
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "11.0.0.0")> _
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
    Public Class Employee
        Implements Global.LightSwitchApplication.Employee.DetailsClass.IImplementation
        Private Property _IdImplementation() As Integer Implements Global.LightSwitchApplication.Employee.DetailsClass.IImplementation.Id
            Get
                Return Me.Id
            End Get
            Set(ByVal value As Integer)
                Me.Id = value
            End Set
        End Property
        
        Private Sub OnIdChanged()
            Me.___OnPropertyChanged("Id")
        End Sub
        
        Private Property _RowVersionImplementation() As Byte() Implements Global.LightSwitchApplication.Employee.DetailsClass.IImplementation.RowVersion
            Get
                Return Me.RowVersion
            End Get
            Set(ByVal value As Byte())
                Me.RowVersion = value
            End Set
        End Property
        
        Private Sub OnRowVersionChanged()
            Me.___OnPropertyChanged("RowVersion")
        End Sub
        
        Private Property _FirstNameImplementation() As String Implements Global.LightSwitchApplication.Employee.DetailsClass.IImplementation.FirstName
            Get
                Return Me.FirstName
            End Get
            Set(ByVal value As String)
                Me.FirstName = value
            End Set
        End Property
        
        Private Sub OnFirstNameChanged()
            Me.___OnPropertyChanged("FirstName")
        End Sub
        
        Private Property _LastNameImplementation() As String Implements Global.LightSwitchApplication.Employee.DetailsClass.IImplementation.LastName
            Get
                Return Me.LastName
            End Get
            Set(ByVal value As String)
                Me.LastName = value
            End Set
        End Property
        
        Private Sub OnLastNameChanged()
            Me.___OnPropertyChanged("LastName")
        End Sub
        
        Private Property _UserNameImplementation() As String Implements Global.LightSwitchApplication.Employee.DetailsClass.IImplementation.UserName
            Get
                Return Me.UserName
            End Get
            Set(ByVal value As String)
                Me.UserName = value
            End Set
        End Property
        
        Private Sub OnUserNameChanged()
            Me.___OnPropertyChanged("UserName")
        End Sub
        
        Private Property _EmailImplementation() As String Implements Global.LightSwitchApplication.Employee.DetailsClass.IImplementation.Email
            Get
                Return Me.Email
            End Get
            Set(ByVal value As String)
                Me.Email = value
            End Set
        End Property
        
        Private Sub OnEmailChanged()
            Me.___OnPropertyChanged("Email")
        End Sub
        
        Private Property _PhoneImplementation() As String Implements Global.LightSwitchApplication.Employee.DetailsClass.IImplementation.Phone
            Get
                Return Me.Phone
            End Get
            Set(ByVal value As String)
                Me.Phone = value
            End Set
        End Property
        
        Private Sub OnPhoneChanged()
            Me.___OnPropertyChanged("Phone")
        End Sub
        
        Private ReadOnly Property _AppointmentsImplementation() As Global.System.Collections.IEnumerable Implements Global.LightSwitchApplication.Employee.DetailsClass.IImplementation.Appointments
            Get
                Return Me.Appointments
            End Get
        End Property
        
        Friend ReadOnly Property __Appointments As Global.Microsoft.LightSwitch.ClientGenerated.Implementation.EntityRefCollection(Of Global.LightSwitchApplication.Implementation.Appointment) 
            Get
                If (Me.___Appointments Is Nothing) Then
                    Me.___Appointments = New Global.Microsoft.LightSwitch.ClientGenerated.Implementation.EntityRefCollection(Of Global.LightSwitchApplication.Implementation.Appointment)( _
                        Me, _
                        "Appointments", _
                        Function() Me._Appointments, _
                        Function(e) Global.System.Object.Equals(e.Appointment_Employee, Me.Id))
                End If
                Return Me.___Appointments
            End Get
        End Property
        
        Private ___Appointments As Global.Microsoft.LightSwitch.ClientGenerated.Implementation.EntityRefCollection(Of Global.LightSwitchApplication.Implementation.Appointment)
        
    End Class
    #End Region
    
    #Region "Photo"
    <Global.System.Runtime.Serialization.DataContract(Namespace:="http://schemas.datacontract.org/2004/07/ApplicationData.Implementation")> _
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "11.0.0.0")> _
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
    Public Class Photo
        Implements Global.LightSwitchApplication.Photo.DetailsClass.IImplementation
        Private Sub OnAppointmentPhoto_AppointmentChanged()
            Me.___OnPropertyChanged("AppointmentPhoto_Appointment")
            Me.___OnPropertyChanged("Appointment")
        End Sub
        
        Private Property _IdImplementation() As Integer Implements Global.LightSwitchApplication.Photo.DetailsClass.IImplementation.Id
            Get
                Return Me.Id
            End Get
            Set(ByVal value As Integer)
                Me.Id = value
            End Set
        End Property
        
        Private Sub OnIdChanged()
            Me.___OnPropertyChanged("Id")
        End Sub
        
        Private Property _RowVersionImplementation() As Byte() Implements Global.LightSwitchApplication.Photo.DetailsClass.IImplementation.RowVersion
            Get
                Return Me.RowVersion
            End Get
            Set(ByVal value As Byte())
                Me.RowVersion = value
            End Set
        End Property
        
        Private Sub OnRowVersionChanged()
            Me.___OnPropertyChanged("RowVersion")
        End Sub
        
        Private Property _PictureImplementation() As Byte() Implements Global.LightSwitchApplication.Photo.DetailsClass.IImplementation.Picture
            Get
                Return Me.Picture
            End Get
            Set(ByVal value As Byte())
                Me.Picture = value
            End Set
        End Property
        
        Private Sub OnPictureChanged()
            Me.___OnPropertyChanged("Picture")
        End Sub
        
        Private Property _CaptionImplementation() As String Implements Global.LightSwitchApplication.Photo.DetailsClass.IImplementation.Caption
            Get
                Return Me.Caption
            End Get
            Set(ByVal value As String)
                Me.Caption = value
            End Set
        End Property
        
        Private Sub OnCaptionChanged()
            Me.___OnPropertyChanged("Caption")
        End Sub
        
        Private Property _AppointmentImplementation() As Global.Microsoft.LightSwitch.Internal.IEntityImplementation Implements Global.LightSwitchApplication.Photo.DetailsClass.IImplementation.Appointment
            Get
                Return Me.Appointment
            End Get
            Set(ByVal value As Global.Microsoft.LightSwitch.Internal.IEntityImplementation)
                Me.Appointment = DirectCast(value, Global.LightSwitchApplication.Implementation.Appointment)
            End Set
        End Property
        
        Private ReadOnly Property __Appointment As Global.Microsoft.LightSwitch.ClientGenerated.Implementation.EntityRef(Of Global.LightSwitchApplication.Implementation.Appointment) 
            Get
                If (Me.___Appointment Is Nothing) Then
                    Me.___Appointment = New Global.Microsoft.LightSwitch.ClientGenerated.Implementation.EntityRef(Of Global.LightSwitchApplication.Implementation.Appointment)( _
                        Me, _
                        "Appointment", _
                        New Global.System.String() {"AppointmentPhoto_Appointment"}, _
                        Function(e) Global.System.Object.Equals(e.Id, Me.AppointmentPhoto_Appointment), _
                        Function() Me._Appointment, _
                        Sub(e) Me._Appointment = e)
                End If
                Return Me.___Appointment
            End Get
        End Property
        
        Private ___Appointment As Global.Microsoft.LightSwitch.ClientGenerated.Implementation.EntityRef(Of Global.LightSwitchApplication.Implementation.Appointment)
        
    End Class
    #End Region
    
    #Region "Room"
    <Global.System.Runtime.Serialization.DataContract(Namespace:="http://schemas.datacontract.org/2004/07/ApplicationData.Implementation")> _
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "11.0.0.0")> _
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
    Public Class Room
        Implements Global.LightSwitchApplication.Room.DetailsClass.IImplementation
        Private Sub OnAppointment_RoomChanged()
            Me.___OnPropertyChanged("Appointment_Room")
            Me.___OnPropertyChanged("Appointment")
        End Sub
        
        Private Property _IdImplementation() As Integer Implements Global.LightSwitchApplication.Room.DetailsClass.IImplementation.Id
            Get
                Return Me.Id
            End Get
            Set(ByVal value As Integer)
                Me.Id = value
            End Set
        End Property
        
        Private Sub OnIdChanged()
            Me.___OnPropertyChanged("Id")
        End Sub
        
        Private Property _RowVersionImplementation() As Byte() Implements Global.LightSwitchApplication.Room.DetailsClass.IImplementation.RowVersion
            Get
                Return Me.RowVersion
            End Get
            Set(ByVal value As Byte())
                Me.RowVersion = value
            End Set
        End Property
        
        Private Sub OnRowVersionChanged()
            Me.___OnPropertyChanged("RowVersion")
        End Sub
        
        Private Property _NameImplementation() As String Implements Global.LightSwitchApplication.Room.DetailsClass.IImplementation.Name
            Get
                Return Me.Name
            End Get
            Set(ByVal value As String)
                Me.Name = value
            End Set
        End Property
        
        Private Sub OnNameChanged()
            Me.___OnPropertyChanged("Name")
        End Sub
        
        Private Property _NotesImplementation() As String Implements Global.LightSwitchApplication.Room.DetailsClass.IImplementation.Notes
            Get
                Return Me.Notes
            End Get
            Set(ByVal value As String)
                Me.Notes = value
            End Set
        End Property
        
        Private Sub OnNotesChanged()
            Me.___OnPropertyChanged("Notes")
        End Sub
        
        Private ReadOnly Property _InventoryItemsImplementation() As Global.System.Collections.IEnumerable Implements Global.LightSwitchApplication.Room.DetailsClass.IImplementation.InventoryItems
            Get
                Return Me.InventoryItems
            End Get
        End Property
        
        Friend ReadOnly Property __InventoryItems As Global.Microsoft.LightSwitch.ClientGenerated.Implementation.EntityRefCollection(Of Global.LightSwitchApplication.Implementation.InventoryItem) 
            Get
                If (Me.___InventoryItems Is Nothing) Then
                    Me.___InventoryItems = New Global.Microsoft.LightSwitch.ClientGenerated.Implementation.EntityRefCollection(Of Global.LightSwitchApplication.Implementation.InventoryItem)( _
                        Me, _
                        "InventoryItems", _
                        Function() Me._InventoryItems, _
                        Function(e) Global.System.Object.Equals(e.InventoryItem_Room, Me.Id))
                End If
                Return Me.___InventoryItems
            End Get
        End Property
        
        Private ___InventoryItems As Global.Microsoft.LightSwitch.ClientGenerated.Implementation.EntityRefCollection(Of Global.LightSwitchApplication.Implementation.InventoryItem)
        
        Private Property _AppointmentImplementation() As Global.Microsoft.LightSwitch.Internal.IEntityImplementation Implements Global.LightSwitchApplication.Room.DetailsClass.IImplementation.Appointment
            Get
                Return Me.Appointment
            End Get
            Set(ByVal value As Global.Microsoft.LightSwitch.Internal.IEntityImplementation)
                Me.Appointment = DirectCast(value, Global.LightSwitchApplication.Implementation.Appointment)
            End Set
        End Property
        
        Private ReadOnly Property __Appointment As Global.Microsoft.LightSwitch.ClientGenerated.Implementation.EntityRef(Of Global.LightSwitchApplication.Implementation.Appointment) 
            Get
                If (Me.___Appointment Is Nothing) Then
                    Me.___Appointment = New Global.Microsoft.LightSwitch.ClientGenerated.Implementation.EntityRef(Of Global.LightSwitchApplication.Implementation.Appointment)( _
                        Me, _
                        "Appointment", _
                        New Global.System.String() {"Appointment_Room"}, _
                        Function(e) Global.System.Object.Equals(e.Id, Me.Appointment_Room), _
                        Function() Me._Appointment, _
                        Sub(e) Me._Appointment = e)
                End If
                Return Me.___Appointment
            End Get
        End Property
        
        Private ___Appointment As Global.Microsoft.LightSwitch.ClientGenerated.Implementation.EntityRef(Of Global.LightSwitchApplication.Implementation.Appointment)
        
    End Class
    #End Region
    
    #Region "InventoryItem"
    <Global.System.Runtime.Serialization.DataContract(Namespace:="http://schemas.datacontract.org/2004/07/ApplicationData.Implementation")> _
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "11.0.0.0")> _
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
    Public Class InventoryItem
        Implements Global.LightSwitchApplication.InventoryItem.DetailsClass.IImplementation
        Private Sub OnInventoryItem_RoomChanged()
            Me.___OnPropertyChanged("InventoryItem_Room")
            Me.___OnPropertyChanged("Room")
        End Sub
        
        Private Property _IdImplementation() As Integer Implements Global.LightSwitchApplication.InventoryItem.DetailsClass.IImplementation.Id
            Get
                Return Me.Id
            End Get
            Set(ByVal value As Integer)
                Me.Id = value
            End Set
        End Property
        
        Private Sub OnIdChanged()
            Me.___OnPropertyChanged("Id")
        End Sub
        
        Private Property _RowVersionImplementation() As Byte() Implements Global.LightSwitchApplication.InventoryItem.DetailsClass.IImplementation.RowVersion
            Get
                Return Me.RowVersion
            End Get
            Set(ByVal value As Byte())
                Me.RowVersion = value
            End Set
        End Property
        
        Private Sub OnRowVersionChanged()
            Me.___OnPropertyChanged("RowVersion")
        End Sub
        
        Private Property _NameImplementation() As String Implements Global.LightSwitchApplication.InventoryItem.DetailsClass.IImplementation.Name
            Get
                Return Me.Name
            End Get
            Set(ByVal value As String)
                Me.Name = value
            End Set
        End Property
        
        Private Sub OnNameChanged()
            Me.___OnPropertyChanged("Name")
        End Sub
        
        Private Property _QuantityImplementation() As Integer Implements Global.LightSwitchApplication.InventoryItem.DetailsClass.IImplementation.Quantity
            Get
                Return Me.Quantity
            End Get
            Set(ByVal value As Integer)
                Me.Quantity = value
            End Set
        End Property
        
        Private Sub OnQuantityChanged()
            Me.___OnPropertyChanged("Quantity")
        End Sub
        
        Private Property _RoomImplementation() As Global.Microsoft.LightSwitch.Internal.IEntityImplementation Implements Global.LightSwitchApplication.InventoryItem.DetailsClass.IImplementation.Room
            Get
                Return Me.Room
            End Get
            Set(ByVal value As Global.Microsoft.LightSwitch.Internal.IEntityImplementation)
                Me.Room = DirectCast(value, Global.LightSwitchApplication.Implementation.Room)
            End Set
        End Property
        
        Private ReadOnly Property __Room As Global.Microsoft.LightSwitch.ClientGenerated.Implementation.EntityRef(Of Global.LightSwitchApplication.Implementation.Room) 
            Get
                If (Me.___Room Is Nothing) Then
                    Me.___Room = New Global.Microsoft.LightSwitch.ClientGenerated.Implementation.EntityRef(Of Global.LightSwitchApplication.Implementation.Room)( _
                        Me, _
                        "Room", _
                        New Global.System.String() {"InventoryItem_Room"}, _
                        Function(e) Global.System.Object.Equals(e.Id, Me.InventoryItem_Room), _
                        Function() Me._Room, _
                        Sub(e) Me._Room = e)
                End If
                Return Me.___Room
            End Get
        End Property
        
        Private ___Room As Global.Microsoft.LightSwitch.ClientGenerated.Implementation.EntityRef(Of Global.LightSwitchApplication.Implementation.Room)
        
    End Class
    #End Region
    
    #Region "ApplicationDataObjectContext"
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "11.0.0.0")> _
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
    Public Partial Class ApplicationDataObjectContext
        Protected Overrides Function CreateEntityImplementation(Of T As Global.Microsoft.LightSwitch.IEntityObject)() As Global.Microsoft.LightSwitch.Internal.IEntityImplementation
            If GetType(T).Equals(GetType(Global.LightSwitchApplication.Customer)) Then
                Return New Global.LightSwitchApplication.Implementation.Customer()
            End If
            If GetType(T).Equals(GetType(Global.LightSwitchApplication.State)) Then
                Return New Global.LightSwitchApplication.Implementation.State()
            End If
            If GetType(T).Equals(GetType(Global.LightSwitchApplication.Appointment)) Then
                Return New Global.LightSwitchApplication.Implementation.Appointment()
            End If
            If GetType(T).Equals(GetType(Global.LightSwitchApplication.Employee)) Then
                Return New Global.LightSwitchApplication.Implementation.Employee()
            End If
            If GetType(T).Equals(GetType(Global.LightSwitchApplication.Photo)) Then
                Return New Global.LightSwitchApplication.Implementation.Photo()
            End If
            If GetType(T).Equals(GetType(Global.LightSwitchApplication.Room)) Then
                Return New Global.LightSwitchApplication.Implementation.Room()
            End If
            If GetType(T).Equals(GetType(Global.LightSwitchApplication.InventoryItem)) Then
                Return New Global.LightSwitchApplication.Implementation.InventoryItem()
            End If
            Return Nothing
        End Function
    End Class
    #End Region
    
    #Region "DataServiceImplementationFactory"
    <Global.System.ComponentModel.Composition.PartCreationPolicy(Global.System.ComponentModel.Composition.CreationPolicy.Shared)> _
    <Global.System.ComponentModel.Composition.Export(GetType(Global.Microsoft.LightSwitch.Internal.IDataServiceFactory))> _
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "11.0.0.0")> _
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
    Public Class DataServiceFactory
        Inherits Global.Microsoft.LightSwitch.ClientGenerated.Implementation.DataServiceFactory
    
        Protected Overrides Function CreateDataService(ByVal dataServiceType As Global.System.Type) As Global.Microsoft.LightSwitch.IDataService
            If dataServiceType.Equals(GetType(Global.LightSwitchApplication.ApplicationData)) Then
                Return New Global.LightSwitchApplication.ApplicationData()
            End If
            Return MyBase.CreateDataService(dataServiceType)
        End Function
    
        Protected Overrides Function CreateDataServiceImplementation(Of TDataService As Global.Microsoft.LightSwitch.IDataService)(ByVal dataService As TDataService) As Global.Microsoft.LightSwitch.Internal.IDataServiceImplementation
            If GetType(TDataService).Equals(GetType(Global.LightSwitchApplication.ApplicationData)) Then
                Return New Global.LightSwitchApplication.Implementation.ApplicationDataObjectContext(Global.Microsoft.LightSwitch.ClientGenerated.Implementation.DataServiceContext.CreateServiceUri("../ApplicationData.svc"))
            End If
            Return MyBase.CreateDataServiceImplementation(dataService)
        End Function
    End Class
    #End Region
    
    <Global.System.ComponentModel.Composition.PartCreationPolicy(Global.System.ComponentModel.Composition.CreationPolicy.Shared)> _
    <Global.System.ComponentModel.Composition.Export(GetType(Global.Microsoft.LightSwitch.Internal.ITypeMappingProvider))> _
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "11.0.0.0")> _
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
    Public Class __TypeMapping
        Implements Global.Microsoft.LightSwitch.Internal.ITypeMappingProvider
        Private Function GetImplementationType(ByVal definitionType As Global.System.Type) As Global.System.Type Implements Global.Microsoft.LightSwitch.Internal.ITypeMappingProvider.GetImplementationType
            If GetType(Global.LightSwitchApplication.Customer).Equals(definitionType)
                Return GetType(Global.LightSwitchApplication.Implementation.Customer)
            End If
            If GetType(Global.LightSwitchApplication.State).Equals(definitionType)
                Return GetType(Global.LightSwitchApplication.Implementation.State)
            End If
            If GetType(Global.LightSwitchApplication.Appointment).Equals(definitionType)
                Return GetType(Global.LightSwitchApplication.Implementation.Appointment)
            End If
            If GetType(Global.LightSwitchApplication.Employee).Equals(definitionType)
                Return GetType(Global.LightSwitchApplication.Implementation.Employee)
            End If
            If GetType(Global.LightSwitchApplication.Photo).Equals(definitionType)
                Return GetType(Global.LightSwitchApplication.Implementation.Photo)
            End If
            If GetType(Global.LightSwitchApplication.Room).Equals(definitionType)
                Return GetType(Global.LightSwitchApplication.Implementation.Room)
            End If
            If GetType(Global.LightSwitchApplication.InventoryItem).Equals(definitionType)
                Return GetType(Global.LightSwitchApplication.Implementation.InventoryItem)
            End If
            Return Nothing
        End Function
    End Class
End Namespace