'------------------------------------------------------------------------------
' <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 __SearchPeople = LightSwitchApplication.SearchPeople
Imports __EditSeasons = LightSwitchApplication.EditSeasons
Imports __EditMailCodes = LightSwitchApplication.EditMailCodes
Imports __EditSubscriptionTypes = LightSwitchApplication.EditSubscriptionTypes
Imports __ListActiveSeasons = LightSwitchApplication.ListActiveSeasons
Imports __AddAndEditPerson = LightSwitchApplication.AddAndEditPerson
Imports __CreateAndEditSubscription = LightSwitchApplication.CreateAndEditSubscription
Imports __ListMailLists = LightSwitchApplication.ListMailLists
Imports __PeopleForMailing = LightSwitchApplication.PeopleForMailing
Imports __EditPrograms = LightSwitchApplication.EditPrograms
Imports __EditProgramActivities = LightSwitchApplication.EditProgramActivities
Imports __CreateAndEditProgamActivity = LightSwitchApplication.CreateAndEditProgamActivity
Imports __ProgramDetail = LightSwitchApplication.ProgramDetail
Imports __Home = LightSwitchApplication.Home
Imports __GetExternalMailList = LightSwitchApplication.GetExternalMailList
Imports __EditLookupTables = LightSwitchApplication.EditLookupTables
Imports __XXLoadTestData = LightSwitchApplication.XXLoadTestData
Imports __GetImportPeopleList = LightSwitchApplication.GetImportPeopleList
Imports __ReviewImportedMatches = LightSwitchApplication.ReviewImportedMatches
Imports __XXListAllPeopleAllFields = LightSwitchApplication.XXListAllPeopleAllFields
Imports __ReviewExternalMailMatches = LightSwitchApplication.ReviewExternalMailMatches
Imports __SelectPeopleToMail = LightSwitchApplication.SelectPeopleToMail
Imports __EditMailListCodes = LightSwitchApplication.EditMailListCodes
Imports __EditMailLists = LightSwitchApplication.EditMailLists
Imports __ListMailCodes = LightSwitchApplication.ListMailCodes
Imports __ListMailListsOnly = LightSwitchApplication.ListMailListsOnly
Imports __ListMailListCodes = LightSwitchApplication.ListMailListCodes
Namespace LightSwitchApplication
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
Partial Public NotInheritable Class SearchPeople
Inherits Global.Microsoft.LightSwitch.Framework.Client.ScreenObject(Of __SearchPeople, __SearchPeople.DetailsClass)
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private Sub New()
MyBase.New("LightSwitchApplication:SearchPeople")
__SearchPeople.DetailsClass.Initialize(Me)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
Public Shared Function CreateInstance() As SearchPeople
Return New __SearchPeople( _
)
End Function
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub SearchPeople_InitializeDataWorkspace(ByVal saveChangesTo As Global.System.Collections.Generic.List(Of Global.Microsoft.LightSwitch.IDataService))
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub SearchPeople_Created()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub SearchPeople_Activated()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub SearchPeople_Saving(ByRef handled As Boolean)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub SearchPeople_Saved()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub SearchPeople_Closing(ByRef cancel As Boolean)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub SearchPeople_SaveError(ByVal exception As Global.System.Exception, ByRef handled As Boolean)
End Sub
#Region "Private Properties"
''' <summary>
''' Gets the Application object for this application. The Application object provides access to active screens, methods to open screens and access to the current user.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private ReadOnly Property Application As Global.LightSwitchApplication.Application
Get
Return Global.LightSwitchApplication.Application.Current
End Get
End Property
''' <summary>
''' Gets the containing data workspace. The data workspace provides access to all data sources in the application.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private ReadOnly Property DataWorkspace As Global.LightSwitchApplication.DataWorkspace
Get
Return DirectCast(DirectCast(Me.Details, Global.Microsoft.LightSwitch.Details.Client.IScreenDetails).DataWorkspace, Global.LightSwitchApplication.DataWorkspace)
End Get
End Property
#End Region
Partial Private Sub People_SelectionChanged()
End Sub
Partial Private Sub People_Changed(ByVal e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub People_Loaded(ByVal succeeded As Boolean)
End Sub
''' <summary>
''' Gets the People visual collection. The collection contains all records currently shown on the respective list or grid control.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property People As Global.Microsoft.LightSwitch.Framework.Client.VisualCollection(Of Global.LightSwitchApplication.Person)
Get
Return __SearchPeople.DetailsClass.GetValue(Me, __SearchPeople.DetailsClass.PropertySetProperties.People)
End Get
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub People_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
''' <summary>
''' Calls the gridAddAndEditNew screen method.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Sub gridAddAndEditNew()
Me.Details.Methods.gridAddAndEditNew.CreateInvocation().Execute()
End Sub
Partial Private Sub gridAddAndEditNew_CanExecute(ByRef result As Boolean)
End Sub
Partial Private Sub gridAddAndEditNew_Execute()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class DetailsClass
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenDetails(Of __SearchPeople, __SearchPeople.DetailsClass, __SearchPeople.DetailsClass.PropertySet, __SearchPeople.DetailsClass.CommandSet, __SearchPeople.DetailsClass.MethodSet)
Shared Sub New()
Dim initializePropertyEntry = __SearchPeople.DetailsClass.PropertySetProperties.People
Dim initializeCommandEntry = __SearchPeople.DetailsClass.CommandSetProperties.gridAddAndEditNew
Dim initializeMethodEntry = __SearchPeople.DetailsClass.MethodSetProperties.gridAddAndEditNew
End Sub
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Private Shared ReadOnly __SearchPeopleEntry As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenDetails(Of __SearchPeople, __SearchPeople.DetailsClass).Entry = _
New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenDetails(Of __SearchPeople, __SearchPeople.DetailsClass).Entry( _
AddressOf __SearchPeople.DetailsClass.__SearchPeople_InvokeInitializeDataWorkspace,
AddressOf __SearchPeople.DetailsClass.__SearchPeople_InvokeSavingEvent,
AddressOf __SearchPeople.DetailsClass.__SearchPeople_InvokeSavedEvent,
AddressOf __SearchPeople.DetailsClass.__SearchPeople_InvokeClosingEvent,
AddressOf __SearchPeople.DetailsClass.__SearchPeople_InvokeCreated,
AddressOf __SearchPeople.DetailsClass.__SearchPeople_InvokeActivated,
AddressOf __SearchPeople.DetailsClass.__SearchPeople_InvokeSaveErrorEvent)
Private Shared Sub __SearchPeople_InvokeInitializeDataWorkspace(s As __SearchPeople, saveChangesTo As Global.System.Collections.Generic.List(Of Global.Microsoft.LightSwitch.IDataService))
s.SearchPeople_InitializeDataWorkspace(saveChangesTo)
End Sub
Private Shared Function __SearchPeople_InvokeSavingEvent(s As __SearchPeople) As Boolean
Dim handled = False
s.SearchPeople_Saving(handled)
Return handled
End Function
Private Shared Sub __SearchPeople_InvokeSavedEvent(s As __SearchPeople)
s.SearchPeople_Saved()
End Sub
Private Shared Function __SearchPeople_InvokeClosingEvent(s As __SearchPeople) As Boolean
Dim cancel = False
s.SearchPeople_Closing(cancel)
Return cancel
End Function
Private Shared Sub __SearchPeople_InvokeCreated(s As __SearchPeople)
s.SearchPeople_Created()
End Sub
Private Shared Sub __SearchPeople_InvokeActivated(s As __SearchPeople)
s.SearchPeople_Activated()
End Sub
Private Shared Function __SearchPeople_InvokeSaveErrorEvent(s As __SearchPeople, ex As Global.System.Exception) As Boolean
Dim handled = False
s.SearchPeople_SaveError(ex, handled)
Return handled
End Function
Public Sub New()
MyBase.New()
End Sub
Public Shadows ReadOnly Property Properties As __SearchPeople.DetailsClass.PropertySet
Get
Return MyBase.Properties
End Get
End Property
Public Shadows ReadOnly Property Commands As __SearchPeople.DetailsClass.CommandSet
Get
Return MyBase.Commands
End Get
End Property
Public Shadows ReadOnly Property Methods As __SearchPeople.DetailsClass.MethodSet
Get
Return MyBase.Methods
End Get
End Property
Private Function PeopleQuery() As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return Global.Microsoft.LightSwitch.DataServiceQueryable.Include(
Global.Microsoft.LightSwitch.DataServiceQueryable.ThenBy( _
Global.Microsoft.LightSwitch.DataServiceQueryable.OrderBy( _
Me.Screen.DataWorkspace.ApplicationData.People, _
Function(p) p.LastName), _
Function(p) p.FirstName),
"MailCode")
End Function
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _People As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __SearchPeople, __SearchPeople.DetailsClass, Global.LightSwitchApplication.Person).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _gridAddAndEditNewCommand As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __SearchPeople, __SearchPeople.DetailsClass).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _gridAddAndEditNewMethod As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __SearchPeople, __SearchPeople.DetailsClass).Data
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class PropertySet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenPropertySet(Of __SearchPeople, __SearchPeople.DetailsClass)
Public ReadOnly Property People As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __SearchPeople, __SearchPeople.DetailsClass, Global.LightSwitchApplication.Person)
Get
Return DirectCast(MyBase.GetItem(__SearchPeople.DetailsClass.PropertySetProperties.People), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __SearchPeople, __SearchPeople.DetailsClass, Global.LightSwitchApplication.Person))
End Get
End Property
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class CommandSet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommandSet(Of __SearchPeople, __SearchPeople.DetailsClass)
Public ReadOnly Property gridAddAndEditNew As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __SearchPeople, __SearchPeople.DetailsClass)
Get
Return DirectCast(MyBase.GetItem(__SearchPeople.DetailsClass.CommandSetProperties.gridAddAndEditNew), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __SearchPeople, __SearchPeople.DetailsClass))
End Get
End Property
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class MethodSet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethodSet(Of __SearchPeople, __SearchPeople.DetailsClass)
Public ReadOnly Property gridAddAndEditNew As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __SearchPeople, __SearchPeople.DetailsClass)
Get
Return DirectCast(MyBase.GetItem(__SearchPeople.DetailsClass.MethodSetProperties.gridAddAndEditNew), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __SearchPeople, __SearchPeople.DetailsClass))
End Get
End Property
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend NotInheritable Class PropertySetProperties
Public Shared ReadOnly People As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __SearchPeople, __SearchPeople.DetailsClass, Global.LightSwitchApplication.Person).Entry( _
"People",
AddressOf __SearchPeople.DetailsClass.PropertySetProperties._People_Stub,
AddressOf __SearchPeople.DetailsClass.PropertySetProperties._People_Validate,
AddressOf __SearchPeople.DetailsClass.PropertySetProperties._People_CreateQuery,
AddressOf __SearchPeople.DetailsClass.PropertySetProperties._People_SelectionChanged,
AddressOf __SearchPeople.DetailsClass.PropertySetProperties._People_OnCollectionChanged,
AddressOf __SearchPeople.DetailsClass.PropertySetProperties._People_OnLoaded)
Private Shared Sub _People_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __SearchPeople.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __SearchPeople, __SearchPeople.DetailsClass, Global.LightSwitchApplication.Person).Data), d As __SearchPeople.DetailsClass, sf As Object)
c(d, d._People, sf)
End Sub
Private Shared Sub _People_Validate(s As __SearchPeople, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.People_Validate(r)
End Sub
Private Shared Function _People_CreateQuery(d As __SearchPeople.DetailsClass, args As Object()) As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return d.PeopleQuery()
End Function
Private Shared Sub _People_SelectionChanged(s As __SearchPeople)
s.People_SelectionChanged()
End Sub
Private Shared Sub _People_OnCollectionChanged(s As __SearchPeople, e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
s.People_Changed(e)
End Sub
Private Shared Sub _People_OnLoaded(s As __SearchPeople, succeeded As Boolean)
s.People_Loaded(succeeded)
End Sub
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend NotInheritable Class CommandSetProperties
Public Shared ReadOnly gridAddAndEditNew As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __SearchPeople, __SearchPeople.DetailsClass).Entry( _
"gridAddAndEditNew",
AddressOf __SearchPeople.DetailsClass.CommandSetProperties._gridAddAndEditNew_Stub,
AddressOf __SearchPeople.DetailsClass.CommandSetProperties._gridAddAndEditNew_CreateExecutableObject)
Private Shared Sub _gridAddAndEditNew_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __SearchPeople.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __SearchPeople, __SearchPeople.DetailsClass).Data), d As __SearchPeople.DetailsClass, sf As Object)
c(d, d._gridAddAndEditNewCommand, sf)
End Sub
Private Shared Function _gridAddAndEditNew_CreateExecutableObject(d As __SearchPeople.DetailsClass) As Global.Microsoft.LightSwitch.IExecutable
Return DirectCast(d, __SearchPeople.DetailsClass).Methods.gridAddAndEditNew.CreateInvocation()
End Function
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend NotInheritable Class MethodSetProperties
Public Shared ReadOnly gridAddAndEditNew As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __SearchPeople, __SearchPeople.DetailsClass).Entry( _
"gridAddAndEditNew",
AddressOf __SearchPeople.DetailsClass.MethodSetProperties._gridAddAndEditNew_Stub,
AddressOf __SearchPeople.DetailsClass.MethodSetProperties._gridAddAndEditNew_CanInvoke,
AddressOf __SearchPeople.DetailsClass.MethodSetProperties._gridAddAndEditNew_InvokeMethod)
Private Shared Sub _gridAddAndEditNew_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __SearchPeople.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __SearchPeople, __SearchPeople.DetailsClass).Data), d As __SearchPeople.DetailsClass, sf As Object)
c(d, d._gridAddAndEditNewMethod, sf)
End Sub
Private Shared Function _gridAddAndEditNew_CanInvoke(d As __SearchPeople.DetailsClass, args As Global.System.Collections.ObjectModel.ReadOnlyCollection(Of Object), ex As Global.System.Exception) As Global.System.Exception
Dim result = True
d.Screen.gridAddAndEditNew_CanExecute(result)
Return If(result, Nothing, ex)
End Function
Private Shared Sub _gridAddAndEditNew_InvokeMethod(d As __SearchPeople.DetailsClass, args As Global.System.Collections.ObjectModel.ReadOnlyCollection(Of Object))
d.Screen.gridAddAndEditNew_Execute()
End Sub
End Class
End Class
End Class
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
Partial Public NotInheritable Class EditSeasons
Inherits Global.Microsoft.LightSwitch.Framework.Client.ScreenObject(Of __EditSeasons, __EditSeasons.DetailsClass)
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private Sub New()
MyBase.New("LightSwitchApplication:EditSeasons")
__EditSeasons.DetailsClass.Initialize(Me)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
Public Shared Function CreateInstance() As EditSeasons
Return New __EditSeasons( _
)
End Function
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub EditSeasons_InitializeDataWorkspace(ByVal saveChangesTo As Global.System.Collections.Generic.List(Of Global.Microsoft.LightSwitch.IDataService))
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub EditSeasons_Created()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub EditSeasons_Activated()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub EditSeasons_Saving(ByRef handled As Boolean)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub EditSeasons_Saved()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub EditSeasons_Closing(ByRef cancel As Boolean)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub EditSeasons_SaveError(ByVal exception As Global.System.Exception, ByRef handled As Boolean)
End Sub
#Region "Private Properties"
''' <summary>
''' Gets the Application object for this application. The Application object provides access to active screens, methods to open screens and access to the current user.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private ReadOnly Property Application As Global.LightSwitchApplication.Application
Get
Return Global.LightSwitchApplication.Application.Current
End Get
End Property
''' <summary>
''' Gets the containing data workspace. The data workspace provides access to all data sources in the application.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private ReadOnly Property DataWorkspace As Global.LightSwitchApplication.DataWorkspace
Get
Return DirectCast(DirectCast(Me.Details, Global.Microsoft.LightSwitch.Details.Client.IScreenDetails).DataWorkspace, Global.LightSwitchApplication.DataWorkspace)
End Get
End Property
#End Region
Partial Private Sub SeasonsSorted_SelectionChanged()
End Sub
Partial Private Sub SeasonsSorted_Changed(ByVal e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub SeasonsSorted_Loaded(ByVal succeeded As Boolean)
End Sub
''' <summary>
''' Gets the SeasonsSorted visual collection. The collection contains all records currently shown on the respective list or grid control.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property SeasonsSorted As Global.Microsoft.LightSwitch.Framework.Client.VisualCollection(Of Global.LightSwitchApplication.Season)
Get
Return __EditSeasons.DetailsClass.GetValue(Me, __EditSeasons.DetailsClass.PropertySetProperties.SeasonsSorted)
End Get
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub SeasonsSorted_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class DetailsClass
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenDetails(Of __EditSeasons, __EditSeasons.DetailsClass, __EditSeasons.DetailsClass.PropertySet, __EditSeasons.DetailsClass.CommandSet, __EditSeasons.DetailsClass.MethodSet)
Shared Sub New()
Dim initializePropertyEntry = __EditSeasons.DetailsClass.PropertySetProperties.SeasonsSorted
End Sub
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Private Shared ReadOnly __EditSeasonsEntry As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenDetails(Of __EditSeasons, __EditSeasons.DetailsClass).Entry = _
New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenDetails(Of __EditSeasons, __EditSeasons.DetailsClass).Entry( _
AddressOf __EditSeasons.DetailsClass.__EditSeasons_InvokeInitializeDataWorkspace,
AddressOf __EditSeasons.DetailsClass.__EditSeasons_InvokeSavingEvent,
AddressOf __EditSeasons.DetailsClass.__EditSeasons_InvokeSavedEvent,
AddressOf __EditSeasons.DetailsClass.__EditSeasons_InvokeClosingEvent,
AddressOf __EditSeasons.DetailsClass.__EditSeasons_InvokeCreated,
AddressOf __EditSeasons.DetailsClass.__EditSeasons_InvokeActivated,
AddressOf __EditSeasons.DetailsClass.__EditSeasons_InvokeSaveErrorEvent)
Private Shared Sub __EditSeasons_InvokeInitializeDataWorkspace(s As __EditSeasons, saveChangesTo As Global.System.Collections.Generic.List(Of Global.Microsoft.LightSwitch.IDataService))
s.EditSeasons_InitializeDataWorkspace(saveChangesTo)
End Sub
Private Shared Function __EditSeasons_InvokeSavingEvent(s As __EditSeasons) As Boolean
Dim handled = False
s.EditSeasons_Saving(handled)
Return handled
End Function
Private Shared Sub __EditSeasons_InvokeSavedEvent(s As __EditSeasons)
s.EditSeasons_Saved()
End Sub
Private Shared Function __EditSeasons_InvokeClosingEvent(s As __EditSeasons) As Boolean
Dim cancel = False
s.EditSeasons_Closing(cancel)
Return cancel
End Function
Private Shared Sub __EditSeasons_InvokeCreated(s As __EditSeasons)
s.EditSeasons_Created()
End Sub
Private Shared Sub __EditSeasons_InvokeActivated(s As __EditSeasons)
s.EditSeasons_Activated()
End Sub
Private Shared Function __EditSeasons_InvokeSaveErrorEvent(s As __EditSeasons, ex As Global.System.Exception) As Boolean
Dim handled = False
s.EditSeasons_SaveError(ex, handled)
Return handled
End Function
Public Sub New()
MyBase.New()
End Sub
Public Shadows ReadOnly Property Properties As __EditSeasons.DetailsClass.PropertySet
Get
Return MyBase.Properties
End Get
End Property
Public Shadows ReadOnly Property Commands As __EditSeasons.DetailsClass.CommandSet
Get
Return MyBase.Commands
End Get
End Property
Public Shadows ReadOnly Property Methods As __EditSeasons.DetailsClass.MethodSet
Get
Return MyBase.Methods
End Get
End Property
Private Function SeasonsSortedQuery() As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return Me.Screen.DataWorkspace.ApplicationData.SeasonsSorted()
End Function
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _SeasonsSorted As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __EditSeasons, __EditSeasons.DetailsClass, Global.LightSwitchApplication.Season).Data
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class PropertySet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenPropertySet(Of __EditSeasons, __EditSeasons.DetailsClass)
Public ReadOnly Property SeasonsSorted As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __EditSeasons, __EditSeasons.DetailsClass, Global.LightSwitchApplication.Season)
Get
Return DirectCast(MyBase.GetItem(__EditSeasons.DetailsClass.PropertySetProperties.SeasonsSorted), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __EditSeasons, __EditSeasons.DetailsClass, Global.LightSwitchApplication.Season))
End Get
End Property
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class CommandSet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommandSet(Of __EditSeasons, __EditSeasons.DetailsClass)
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class MethodSet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethodSet(Of __EditSeasons, __EditSeasons.DetailsClass)
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend NotInheritable Class PropertySetProperties
Public Shared ReadOnly SeasonsSorted As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __EditSeasons, __EditSeasons.DetailsClass, Global.LightSwitchApplication.Season).Entry( _
"SeasonsSorted",
AddressOf __EditSeasons.DetailsClass.PropertySetProperties._SeasonsSorted_Stub,
AddressOf __EditSeasons.DetailsClass.PropertySetProperties._SeasonsSorted_Validate,
AddressOf __EditSeasons.DetailsClass.PropertySetProperties._SeasonsSorted_CreateQuery,
AddressOf __EditSeasons.DetailsClass.PropertySetProperties._SeasonsSorted_SelectionChanged,
AddressOf __EditSeasons.DetailsClass.PropertySetProperties._SeasonsSorted_OnCollectionChanged,
AddressOf __EditSeasons.DetailsClass.PropertySetProperties._SeasonsSorted_OnLoaded)
Private Shared Sub _SeasonsSorted_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __EditSeasons.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __EditSeasons, __EditSeasons.DetailsClass, Global.LightSwitchApplication.Season).Data), d As __EditSeasons.DetailsClass, sf As Object)
c(d, d._SeasonsSorted, sf)
End Sub
Private Shared Sub _SeasonsSorted_Validate(s As __EditSeasons, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.SeasonsSorted_Validate(r)
End Sub
Private Shared Function _SeasonsSorted_CreateQuery(d As __EditSeasons.DetailsClass, args As Object()) As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return d.SeasonsSortedQuery()
End Function
Private Shared Sub _SeasonsSorted_SelectionChanged(s As __EditSeasons)
s.SeasonsSorted_SelectionChanged()
End Sub
Private Shared Sub _SeasonsSorted_OnCollectionChanged(s As __EditSeasons, e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
s.SeasonsSorted_Changed(e)
End Sub
Private Shared Sub _SeasonsSorted_OnLoaded(s As __EditSeasons, succeeded As Boolean)
s.SeasonsSorted_Loaded(succeeded)
End Sub
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend NotInheritable Class CommandSetProperties
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend NotInheritable Class MethodSetProperties
End Class
End Class
End Class
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
Partial Public NotInheritable Class EditMailCodes
Inherits Global.Microsoft.LightSwitch.Framework.Client.ScreenObject(Of __EditMailCodes, __EditMailCodes.DetailsClass)
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private Sub New()
MyBase.New("LightSwitchApplication:EditMailCodes")
__EditMailCodes.DetailsClass.Initialize(Me)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
Public Shared Function CreateInstance() As EditMailCodes
Return New __EditMailCodes( _
)
End Function
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub EditMailCodes_InitializeDataWorkspace(ByVal saveChangesTo As Global.System.Collections.Generic.List(Of Global.Microsoft.LightSwitch.IDataService))
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub EditMailCodes_Created()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub EditMailCodes_Activated()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub EditMailCodes_Saving(ByRef handled As Boolean)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub EditMailCodes_Saved()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub EditMailCodes_Closing(ByRef cancel As Boolean)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub EditMailCodes_SaveError(ByVal exception As Global.System.Exception, ByRef handled As Boolean)
End Sub
#Region "Private Properties"
''' <summary>
''' Gets the Application object for this application. The Application object provides access to active screens, methods to open screens and access to the current user.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private ReadOnly Property Application As Global.LightSwitchApplication.Application
Get
Return Global.LightSwitchApplication.Application.Current
End Get
End Property
''' <summary>
''' Gets the containing data workspace. The data workspace provides access to all data sources in the application.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private ReadOnly Property DataWorkspace As Global.LightSwitchApplication.DataWorkspace
Get
Return DirectCast(DirectCast(Me.Details, Global.Microsoft.LightSwitch.Details.Client.IScreenDetails).DataWorkspace, Global.LightSwitchApplication.DataWorkspace)
End Get
End Property
#End Region
Partial Private Sub MailCodesSorted_SelectionChanged()
End Sub
Partial Private Sub MailCodesSorted_Changed(ByVal e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub MailCodesSorted_Loaded(ByVal succeeded As Boolean)
End Sub
''' <summary>
''' Gets the MailCodesSorted visual collection. The collection contains all records currently shown on the respective list or grid control.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property MailCodesSorted As Global.Microsoft.LightSwitch.Framework.Client.VisualCollection(Of Global.LightSwitchApplication.MailCode)
Get
Return __EditMailCodes.DetailsClass.GetValue(Me, __EditMailCodes.DetailsClass.PropertySetProperties.MailCodesSorted)
End Get
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub MailCodesSorted_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class DetailsClass
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenDetails(Of __EditMailCodes, __EditMailCodes.DetailsClass, __EditMailCodes.DetailsClass.PropertySet, __EditMailCodes.DetailsClass.CommandSet, __EditMailCodes.DetailsClass.MethodSet)
Shared Sub New()
Dim initializePropertyEntry = __EditMailCodes.DetailsClass.PropertySetProperties.MailCodesSorted
End Sub
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Private Shared ReadOnly __EditMailCodesEntry As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenDetails(Of __EditMailCodes, __EditMailCodes.DetailsClass).Entry = _
New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenDetails(Of __EditMailCodes, __EditMailCodes.DetailsClass).Entry( _
AddressOf __EditMailCodes.DetailsClass.__EditMailCodes_InvokeInitializeDataWorkspace,
AddressOf __EditMailCodes.DetailsClass.__EditMailCodes_InvokeSavingEvent,
AddressOf __EditMailCodes.DetailsClass.__EditMailCodes_InvokeSavedEvent,
AddressOf __EditMailCodes.DetailsClass.__EditMailCodes_InvokeClosingEvent,
AddressOf __EditMailCodes.DetailsClass.__EditMailCodes_InvokeCreated,
AddressOf __EditMailCodes.DetailsClass.__EditMailCodes_InvokeActivated,
AddressOf __EditMailCodes.DetailsClass.__EditMailCodes_InvokeSaveErrorEvent)
Private Shared Sub __EditMailCodes_InvokeInitializeDataWorkspace(s As __EditMailCodes, saveChangesTo As Global.System.Collections.Generic.List(Of Global.Microsoft.LightSwitch.IDataService))
s.EditMailCodes_InitializeDataWorkspace(saveChangesTo)
End Sub
Private Shared Function __EditMailCodes_InvokeSavingEvent(s As __EditMailCodes) As Boolean
Dim handled = False
s.EditMailCodes_Saving(handled)
Return handled
End Function
Private Shared Sub __EditMailCodes_InvokeSavedEvent(s As __EditMailCodes)
s.EditMailCodes_Saved()
End Sub
Private Shared Function __EditMailCodes_InvokeClosingEvent(s As __EditMailCodes) As Boolean
Dim cancel = False
s.EditMailCodes_Closing(cancel)
Return cancel
End Function
Private Shared Sub __EditMailCodes_InvokeCreated(s As __EditMailCodes)
s.EditMailCodes_Created()
End Sub
Private Shared Sub __EditMailCodes_InvokeActivated(s As __EditMailCodes)
s.EditMailCodes_Activated()
End Sub
Private Shared Function __EditMailCodes_InvokeSaveErrorEvent(s As __EditMailCodes, ex As Global.System.Exception) As Boolean
Dim handled = False
s.EditMailCodes_SaveError(ex, handled)
Return handled
End Function
Public Sub New()
MyBase.New()
End Sub
Public Shadows ReadOnly Property Properties As __EditMailCodes.DetailsClass.PropertySet
Get
Return MyBase.Properties
End Get
End Property
Public Shadows ReadOnly Property Commands As __EditMailCodes.DetailsClass.CommandSet
Get
Return MyBase.Commands
End Get
End Property
Public Shadows ReadOnly Property Methods As __EditMailCodes.DetailsClass.MethodSet
Get
Return MyBase.Methods
End Get
End Property
Private Function MailCodesSortedQuery() As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return Me.Screen.DataWorkspace.ApplicationData.MailCodesSorted()
End Function
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _MailCodesSorted As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __EditMailCodes, __EditMailCodes.DetailsClass, Global.LightSwitchApplication.MailCode).Data
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class PropertySet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenPropertySet(Of __EditMailCodes, __EditMailCodes.DetailsClass)
Public ReadOnly Property MailCodesSorted As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __EditMailCodes, __EditMailCodes.DetailsClass, Global.LightSwitchApplication.MailCode)
Get
Return DirectCast(MyBase.GetItem(__EditMailCodes.DetailsClass.PropertySetProperties.MailCodesSorted), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __EditMailCodes, __EditMailCodes.DetailsClass, Global.LightSwitchApplication.MailCode))
End Get
End Property
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class CommandSet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommandSet(Of __EditMailCodes, __EditMailCodes.DetailsClass)
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class MethodSet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethodSet(Of __EditMailCodes, __EditMailCodes.DetailsClass)
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend NotInheritable Class PropertySetProperties
Public Shared ReadOnly MailCodesSorted As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __EditMailCodes, __EditMailCodes.DetailsClass, Global.LightSwitchApplication.MailCode).Entry( _
"MailCodesSorted",
AddressOf __EditMailCodes.DetailsClass.PropertySetProperties._MailCodesSorted_Stub,
AddressOf __EditMailCodes.DetailsClass.PropertySetProperties._MailCodesSorted_Validate,
AddressOf __EditMailCodes.DetailsClass.PropertySetProperties._MailCodesSorted_CreateQuery,
AddressOf __EditMailCodes.DetailsClass.PropertySetProperties._MailCodesSorted_SelectionChanged,
AddressOf __EditMailCodes.DetailsClass.PropertySetProperties._MailCodesSorted_OnCollectionChanged,
AddressOf __EditMailCodes.DetailsClass.PropertySetProperties._MailCodesSorted_OnLoaded)
Private Shared Sub _MailCodesSorted_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __EditMailCodes.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __EditMailCodes, __EditMailCodes.DetailsClass, Global.LightSwitchApplication.MailCode).Data), d As __EditMailCodes.DetailsClass, sf As Object)
c(d, d._MailCodesSorted, sf)
End Sub
Private Shared Sub _MailCodesSorted_Validate(s As __EditMailCodes, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.MailCodesSorted_Validate(r)
End Sub
Private Shared Function _MailCodesSorted_CreateQuery(d As __EditMailCodes.DetailsClass, args As Object()) As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return d.MailCodesSortedQuery()
End Function
Private Shared Sub _MailCodesSorted_SelectionChanged(s As __EditMailCodes)
s.MailCodesSorted_SelectionChanged()
End Sub
Private Shared Sub _MailCodesSorted_OnCollectionChanged(s As __EditMailCodes, e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
s.MailCodesSorted_Changed(e)
End Sub
Private Shared Sub _MailCodesSorted_OnLoaded(s As __EditMailCodes, succeeded As Boolean)
s.MailCodesSorted_Loaded(succeeded)
End Sub
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend NotInheritable Class CommandSetProperties
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend NotInheritable Class MethodSetProperties
End Class
End Class
End Class
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
Partial Public NotInheritable Class EditSubscriptionTypes
Inherits Global.Microsoft.LightSwitch.Framework.Client.ScreenObject(Of __EditSubscriptionTypes, __EditSubscriptionTypes.DetailsClass)
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private Sub New()
MyBase.New("LightSwitchApplication:EditSubscriptionTypes")
__EditSubscriptionTypes.DetailsClass.Initialize(Me)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
Public Shared Function CreateInstance() As EditSubscriptionTypes
Return New __EditSubscriptionTypes( _
)
End Function
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub EditSubscriptionTypes_InitializeDataWorkspace(ByVal saveChangesTo As Global.System.Collections.Generic.List(Of Global.Microsoft.LightSwitch.IDataService))
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub EditSubscriptionTypes_Created()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub EditSubscriptionTypes_Activated()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub EditSubscriptionTypes_Saving(ByRef handled As Boolean)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub EditSubscriptionTypes_Saved()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub EditSubscriptionTypes_Closing(ByRef cancel As Boolean)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub EditSubscriptionTypes_SaveError(ByVal exception As Global.System.Exception, ByRef handled As Boolean)
End Sub
#Region "Private Properties"
''' <summary>
''' Gets the Application object for this application. The Application object provides access to active screens, methods to open screens and access to the current user.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private ReadOnly Property Application As Global.LightSwitchApplication.Application
Get
Return Global.LightSwitchApplication.Application.Current
End Get
End Property
''' <summary>
''' Gets the containing data workspace. The data workspace provides access to all data sources in the application.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private ReadOnly Property DataWorkspace As Global.LightSwitchApplication.DataWorkspace
Get
Return DirectCast(DirectCast(Me.Details, Global.Microsoft.LightSwitch.Details.Client.IScreenDetails).DataWorkspace, Global.LightSwitchApplication.DataWorkspace)
End Get
End Property
#End Region
Partial Private Sub SubscriptionTypes_SelectionChanged()
End Sub
Partial Private Sub SubscriptionTypes_Changed(ByVal e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub SubscriptionTypes_Loaded(ByVal succeeded As Boolean)
End Sub
''' <summary>
''' Gets the SubscriptionTypes visual collection. The collection contains all records currently shown on the respective list or grid control.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property SubscriptionTypes As Global.Microsoft.LightSwitch.Framework.Client.VisualCollection(Of Global.LightSwitchApplication.SubscriptionType)
Get
Return __EditSubscriptionTypes.DetailsClass.GetValue(Me, __EditSubscriptionTypes.DetailsClass.PropertySetProperties.SubscriptionTypes)
End Get
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub SubscriptionTypes_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class DetailsClass
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenDetails(Of __EditSubscriptionTypes, __EditSubscriptionTypes.DetailsClass, __EditSubscriptionTypes.DetailsClass.PropertySet, __EditSubscriptionTypes.DetailsClass.CommandSet, __EditSubscriptionTypes.DetailsClass.MethodSet)
Shared Sub New()
Dim initializePropertyEntry = __EditSubscriptionTypes.DetailsClass.PropertySetProperties.SubscriptionTypes
End Sub
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Private Shared ReadOnly __EditSubscriptionTypesEntry As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenDetails(Of __EditSubscriptionTypes, __EditSubscriptionTypes.DetailsClass).Entry = _
New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenDetails(Of __EditSubscriptionTypes, __EditSubscriptionTypes.DetailsClass).Entry( _
AddressOf __EditSubscriptionTypes.DetailsClass.__EditSubscriptionTypes_InvokeInitializeDataWorkspace,
AddressOf __EditSubscriptionTypes.DetailsClass.__EditSubscriptionTypes_InvokeSavingEvent,
AddressOf __EditSubscriptionTypes.DetailsClass.__EditSubscriptionTypes_InvokeSavedEvent,
AddressOf __EditSubscriptionTypes.DetailsClass.__EditSubscriptionTypes_InvokeClosingEvent,
AddressOf __EditSubscriptionTypes.DetailsClass.__EditSubscriptionTypes_InvokeCreated,
AddressOf __EditSubscriptionTypes.DetailsClass.__EditSubscriptionTypes_InvokeActivated,
AddressOf __EditSubscriptionTypes.DetailsClass.__EditSubscriptionTypes_InvokeSaveErrorEvent)
Private Shared Sub __EditSubscriptionTypes_InvokeInitializeDataWorkspace(s As __EditSubscriptionTypes, saveChangesTo As Global.System.Collections.Generic.List(Of Global.Microsoft.LightSwitch.IDataService))
s.EditSubscriptionTypes_InitializeDataWorkspace(saveChangesTo)
End Sub
Private Shared Function __EditSubscriptionTypes_InvokeSavingEvent(s As __EditSubscriptionTypes) As Boolean
Dim handled = False
s.EditSubscriptionTypes_Saving(handled)
Return handled
End Function
Private Shared Sub __EditSubscriptionTypes_InvokeSavedEvent(s As __EditSubscriptionTypes)
s.EditSubscriptionTypes_Saved()
End Sub
Private Shared Function __EditSubscriptionTypes_InvokeClosingEvent(s As __EditSubscriptionTypes) As Boolean
Dim cancel = False
s.EditSubscriptionTypes_Closing(cancel)
Return cancel
End Function
Private Shared Sub __EditSubscriptionTypes_InvokeCreated(s As __EditSubscriptionTypes)
s.EditSubscriptionTypes_Created()
End Sub
Private Shared Sub __EditSubscriptionTypes_InvokeActivated(s As __EditSubscriptionTypes)
s.EditSubscriptionTypes_Activated()
End Sub
Private Shared Function __EditSubscriptionTypes_InvokeSaveErrorEvent(s As __EditSubscriptionTypes, ex As Global.System.Exception) As Boolean
Dim handled = False
s.EditSubscriptionTypes_SaveError(ex, handled)
Return handled
End Function
Public Sub New()
MyBase.New()
End Sub
Public Shadows ReadOnly Property Properties As __EditSubscriptionTypes.DetailsClass.PropertySet
Get
Return MyBase.Properties
End Get
End Property
Public Shadows ReadOnly Property Commands As __EditSubscriptionTypes.DetailsClass.CommandSet
Get
Return MyBase.Commands
End Get
End Property
Public Shadows ReadOnly Property Methods As __EditSubscriptionTypes.DetailsClass.MethodSet
Get
Return MyBase.Methods
End Get
End Property
Private Function SubscriptionTypesQuery() As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return Me.Screen.DataWorkspace.ApplicationData.SubscriptionTypes
End Function
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _SubscriptionTypes As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __EditSubscriptionTypes, __EditSubscriptionTypes.DetailsClass, Global.LightSwitchApplication.SubscriptionType).Data
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class PropertySet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenPropertySet(Of __EditSubscriptionTypes, __EditSubscriptionTypes.DetailsClass)
Public ReadOnly Property SubscriptionTypes As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __EditSubscriptionTypes, __EditSubscriptionTypes.DetailsClass, Global.LightSwitchApplication.SubscriptionType)
Get
Return DirectCast(MyBase.GetItem(__EditSubscriptionTypes.DetailsClass.PropertySetProperties.SubscriptionTypes), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __EditSubscriptionTypes, __EditSubscriptionTypes.DetailsClass, Global.LightSwitchApplication.SubscriptionType))
End Get
End Property
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class CommandSet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommandSet(Of __EditSubscriptionTypes, __EditSubscriptionTypes.DetailsClass)
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class MethodSet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethodSet(Of __EditSubscriptionTypes, __EditSubscriptionTypes.DetailsClass)
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend NotInheritable Class PropertySetProperties
Public Shared ReadOnly SubscriptionTypes As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __EditSubscriptionTypes, __EditSubscriptionTypes.DetailsClass, Global.LightSwitchApplication.SubscriptionType).Entry( _
"SubscriptionTypes",
AddressOf __EditSubscriptionTypes.DetailsClass.PropertySetProperties._SubscriptionTypes_Stub,
AddressOf __EditSubscriptionTypes.DetailsClass.PropertySetProperties._SubscriptionTypes_Validate,
AddressOf __EditSubscriptionTypes.DetailsClass.PropertySetProperties._SubscriptionTypes_CreateQuery,
AddressOf __EditSubscriptionTypes.DetailsClass.PropertySetProperties._SubscriptionTypes_SelectionChanged,
AddressOf __EditSubscriptionTypes.DetailsClass.PropertySetProperties._SubscriptionTypes_OnCollectionChanged,
AddressOf __EditSubscriptionTypes.DetailsClass.PropertySetProperties._SubscriptionTypes_OnLoaded)
Private Shared Sub _SubscriptionTypes_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __EditSubscriptionTypes.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __EditSubscriptionTypes, __EditSubscriptionTypes.DetailsClass, Global.LightSwitchApplication.SubscriptionType).Data), d As __EditSubscriptionTypes.DetailsClass, sf As Object)
c(d, d._SubscriptionTypes, sf)
End Sub
Private Shared Sub _SubscriptionTypes_Validate(s As __EditSubscriptionTypes, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.SubscriptionTypes_Validate(r)
End Sub
Private Shared Function _SubscriptionTypes_CreateQuery(d As __EditSubscriptionTypes.DetailsClass, args As Object()) As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return d.SubscriptionTypesQuery()
End Function
Private Shared Sub _SubscriptionTypes_SelectionChanged(s As __EditSubscriptionTypes)
s.SubscriptionTypes_SelectionChanged()
End Sub
Private Shared Sub _SubscriptionTypes_OnCollectionChanged(s As __EditSubscriptionTypes, e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
s.SubscriptionTypes_Changed(e)
End Sub
Private Shared Sub _SubscriptionTypes_OnLoaded(s As __EditSubscriptionTypes, succeeded As Boolean)
s.SubscriptionTypes_Loaded(succeeded)
End Sub
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend NotInheritable Class CommandSetProperties
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend NotInheritable Class MethodSetProperties
End Class
End Class
End Class
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
Partial Public NotInheritable Class ListActiveSeasons
Inherits Global.Microsoft.LightSwitch.Framework.Client.ScreenObject(Of __ListActiveSeasons, __ListActiveSeasons.DetailsClass)
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private Sub New()
MyBase.New("LightSwitchApplication:ListActiveSeasons")
__ListActiveSeasons.DetailsClass.Initialize(Me)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
Public Shared Function CreateInstance() As ListActiveSeasons
Return New __ListActiveSeasons( _
)
End Function
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ListActiveSeasons_InitializeDataWorkspace(ByVal saveChangesTo As Global.System.Collections.Generic.List(Of Global.Microsoft.LightSwitch.IDataService))
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ListActiveSeasons_Created()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ListActiveSeasons_Activated()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ListActiveSeasons_Saving(ByRef handled As Boolean)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ListActiveSeasons_Saved()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ListActiveSeasons_Closing(ByRef cancel As Boolean)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ListActiveSeasons_SaveError(ByVal exception As Global.System.Exception, ByRef handled As Boolean)
End Sub
#Region "Private Properties"
''' <summary>
''' Gets the Application object for this application. The Application object provides access to active screens, methods to open screens and access to the current user.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private ReadOnly Property Application As Global.LightSwitchApplication.Application
Get
Return Global.LightSwitchApplication.Application.Current
End Get
End Property
''' <summary>
''' Gets the containing data workspace. The data workspace provides access to all data sources in the application.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private ReadOnly Property DataWorkspace As Global.LightSwitchApplication.DataWorkspace
Get
Return DirectCast(DirectCast(Me.Details, Global.Microsoft.LightSwitch.Details.Client.IScreenDetails).DataWorkspace, Global.LightSwitchApplication.DataWorkspace)
End Get
End Property
#End Region
Partial Private Sub ActiveSeasons_SelectionChanged()
End Sub
Partial Private Sub ActiveSeasons_Changed(ByVal e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ActiveSeasons_Loaded(ByVal succeeded As Boolean)
End Sub
''' <summary>
''' Gets the ActiveSeasons visual collection. The collection contains all records currently shown on the respective list or grid control.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property ActiveSeasons As Global.Microsoft.LightSwitch.Framework.Client.VisualCollection(Of Global.LightSwitchApplication.Season)
Get
Return __ListActiveSeasons.DetailsClass.GetValue(Me, __ListActiveSeasons.DetailsClass.PropertySetProperties.ActiveSeasons)
End Get
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ActiveSeasons_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class DetailsClass
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenDetails(Of __ListActiveSeasons, __ListActiveSeasons.DetailsClass, __ListActiveSeasons.DetailsClass.PropertySet, __ListActiveSeasons.DetailsClass.CommandSet, __ListActiveSeasons.DetailsClass.MethodSet)
Shared Sub New()
Dim initializePropertyEntry = __ListActiveSeasons.DetailsClass.PropertySetProperties.ActiveSeasons
End Sub
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Private Shared ReadOnly __ListActiveSeasonsEntry As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenDetails(Of __ListActiveSeasons, __ListActiveSeasons.DetailsClass).Entry = _
New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenDetails(Of __ListActiveSeasons, __ListActiveSeasons.DetailsClass).Entry( _
AddressOf __ListActiveSeasons.DetailsClass.__ListActiveSeasons_InvokeInitializeDataWorkspace,
AddressOf __ListActiveSeasons.DetailsClass.__ListActiveSeasons_InvokeSavingEvent,
AddressOf __ListActiveSeasons.DetailsClass.__ListActiveSeasons_InvokeSavedEvent,
AddressOf __ListActiveSeasons.DetailsClass.__ListActiveSeasons_InvokeClosingEvent,
AddressOf __ListActiveSeasons.DetailsClass.__ListActiveSeasons_InvokeCreated,
AddressOf __ListActiveSeasons.DetailsClass.__ListActiveSeasons_InvokeActivated,
AddressOf __ListActiveSeasons.DetailsClass.__ListActiveSeasons_InvokeSaveErrorEvent)
Private Shared Sub __ListActiveSeasons_InvokeInitializeDataWorkspace(s As __ListActiveSeasons, saveChangesTo As Global.System.Collections.Generic.List(Of Global.Microsoft.LightSwitch.IDataService))
s.ListActiveSeasons_InitializeDataWorkspace(saveChangesTo)
End Sub
Private Shared Function __ListActiveSeasons_InvokeSavingEvent(s As __ListActiveSeasons) As Boolean
Dim handled = False
s.ListActiveSeasons_Saving(handled)
Return handled
End Function
Private Shared Sub __ListActiveSeasons_InvokeSavedEvent(s As __ListActiveSeasons)
s.ListActiveSeasons_Saved()
End Sub
Private Shared Function __ListActiveSeasons_InvokeClosingEvent(s As __ListActiveSeasons) As Boolean
Dim cancel = False
s.ListActiveSeasons_Closing(cancel)
Return cancel
End Function
Private Shared Sub __ListActiveSeasons_InvokeCreated(s As __ListActiveSeasons)
s.ListActiveSeasons_Created()
End Sub
Private Shared Sub __ListActiveSeasons_InvokeActivated(s As __ListActiveSeasons)
s.ListActiveSeasons_Activated()
End Sub
Private Shared Function __ListActiveSeasons_InvokeSaveErrorEvent(s As __ListActiveSeasons, ex As Global.System.Exception) As Boolean
Dim handled = False
s.ListActiveSeasons_SaveError(ex, handled)
Return handled
End Function
Public Sub New()
MyBase.New()
End Sub
Public Shadows ReadOnly Property Properties As __ListActiveSeasons.DetailsClass.PropertySet
Get
Return MyBase.Properties
End Get
End Property
Public Shadows ReadOnly Property Commands As __ListActiveSeasons.DetailsClass.CommandSet
Get
Return MyBase.Commands
End Get
End Property
Public Shadows ReadOnly Property Methods As __ListActiveSeasons.DetailsClass.MethodSet
Get
Return MyBase.Methods
End Get
End Property
Private Function ActiveSeasonsQuery() As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return Me.Screen.DataWorkspace.ApplicationData.ActiveSeasons()
End Function
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _ActiveSeasons As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __ListActiveSeasons, __ListActiveSeasons.DetailsClass, Global.LightSwitchApplication.Season).Data
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class PropertySet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenPropertySet(Of __ListActiveSeasons, __ListActiveSeasons.DetailsClass)
Public ReadOnly Property ActiveSeasons As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __ListActiveSeasons, __ListActiveSeasons.DetailsClass, Global.LightSwitchApplication.Season)
Get
Return DirectCast(MyBase.GetItem(__ListActiveSeasons.DetailsClass.PropertySetProperties.ActiveSeasons), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __ListActiveSeasons, __ListActiveSeasons.DetailsClass, Global.LightSwitchApplication.Season))
End Get
End Property
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class CommandSet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommandSet(Of __ListActiveSeasons, __ListActiveSeasons.DetailsClass)
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class MethodSet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethodSet(Of __ListActiveSeasons, __ListActiveSeasons.DetailsClass)
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend NotInheritable Class PropertySetProperties
Public Shared ReadOnly ActiveSeasons As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __ListActiveSeasons, __ListActiveSeasons.DetailsClass, Global.LightSwitchApplication.Season).Entry( _
"ActiveSeasons",
AddressOf __ListActiveSeasons.DetailsClass.PropertySetProperties._ActiveSeasons_Stub,
AddressOf __ListActiveSeasons.DetailsClass.PropertySetProperties._ActiveSeasons_Validate,
AddressOf __ListActiveSeasons.DetailsClass.PropertySetProperties._ActiveSeasons_CreateQuery,
AddressOf __ListActiveSeasons.DetailsClass.PropertySetProperties._ActiveSeasons_SelectionChanged,
AddressOf __ListActiveSeasons.DetailsClass.PropertySetProperties._ActiveSeasons_OnCollectionChanged,
AddressOf __ListActiveSeasons.DetailsClass.PropertySetProperties._ActiveSeasons_OnLoaded)
Private Shared Sub _ActiveSeasons_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __ListActiveSeasons.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __ListActiveSeasons, __ListActiveSeasons.DetailsClass, Global.LightSwitchApplication.Season).Data), d As __ListActiveSeasons.DetailsClass, sf As Object)
c(d, d._ActiveSeasons, sf)
End Sub
Private Shared Sub _ActiveSeasons_Validate(s As __ListActiveSeasons, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.ActiveSeasons_Validate(r)
End Sub
Private Shared Function _ActiveSeasons_CreateQuery(d As __ListActiveSeasons.DetailsClass, args As Object()) As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return d.ActiveSeasonsQuery()
End Function
Private Shared Sub _ActiveSeasons_SelectionChanged(s As __ListActiveSeasons)
s.ActiveSeasons_SelectionChanged()
End Sub
Private Shared Sub _ActiveSeasons_OnCollectionChanged(s As __ListActiveSeasons, e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
s.ActiveSeasons_Changed(e)
End Sub
Private Shared Sub _ActiveSeasons_OnLoaded(s As __ListActiveSeasons, succeeded As Boolean)
s.ActiveSeasons_Loaded(succeeded)
End Sub
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend NotInheritable Class CommandSetProperties
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend NotInheritable Class MethodSetProperties
End Class
End Class
End Class
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
Partial Public NotInheritable Class AddAndEditPerson
Inherits Global.Microsoft.LightSwitch.Framework.Client.ScreenObject(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass)
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private Sub New(ByVal ptyPersonID As Global.System.Nullable(Of Integer))
MyBase.New("LightSwitchApplication:AddAndEditPerson")
Me.ptyPersonID = ptyPersonID
__AddAndEditPerson.DetailsClass.Initialize(Me)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
Public Shared Function CreateInstance(ByVal ptyPersonID As Global.System.Nullable(Of Integer)) As AddAndEditPerson
Return New __AddAndEditPerson( _
ptyPersonID _
)
End Function
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub AddAndEditPerson_InitializeDataWorkspace(ByVal saveChangesTo As Global.System.Collections.Generic.List(Of Global.Microsoft.LightSwitch.IDataService))
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub AddAndEditPerson_Created()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub AddAndEditPerson_Activated()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub AddAndEditPerson_Saving(ByRef handled As Boolean)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub AddAndEditPerson_Saved()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub AddAndEditPerson_Closing(ByRef cancel As Boolean)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub AddAndEditPerson_SaveError(ByVal exception As Global.System.Exception, ByRef handled As Boolean)
End Sub
#Region "Private Properties"
''' <summary>
''' Gets the Application object for this application. The Application object provides access to active screens, methods to open screens and access to the current user.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private ReadOnly Property Application As Global.LightSwitchApplication.Application
Get
Return Global.LightSwitchApplication.Application.Current
End Get
End Property
''' <summary>
''' Gets the containing data workspace. The data workspace provides access to all data sources in the application.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private ReadOnly Property DataWorkspace As Global.LightSwitchApplication.DataWorkspace
Get
Return DirectCast(DirectCast(Me.Details, Global.Microsoft.LightSwitch.Details.Client.IScreenDetails).DataWorkspace, Global.LightSwitchApplication.DataWorkspace)
End Get
End Property
#End Region
Partial Private Sub PersonProperty_Changed()
End Sub
Partial Private Sub Subscriptions_SelectionChanged()
End Sub
Partial Private Sub Subscriptions_Changed(ByVal e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Subscriptions_Loaded(ByVal succeeded As Boolean)
End Sub
Partial Private Sub Activities_SelectionChanged()
End Sub
Partial Private Sub Activities_Changed(ByVal e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Activities_Loaded(ByVal succeeded As Boolean)
End Sub
Partial Private Sub Donations_SelectionChanged()
End Sub
Partial Private Sub Donations_Changed(ByVal e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Donations_Loaded(ByVal succeeded As Boolean)
End Sub
Partial Private Sub ptyPersonID_Changed()
End Sub
Partial Private Sub Person_Changed()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Person_Loaded(ByVal succeeded As Boolean)
End Sub
Partial Private Sub Programs_SelectionChanged()
End Sub
Partial Private Sub Programs_Changed(ByVal e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Programs_Loaded(ByVal succeeded As Boolean)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Property PersonProperty As Global.LightSwitchApplication.Person
Get
Return __AddAndEditPerson.DetailsClass.GetValue(Me, __AddAndEditPerson.DetailsClass.PropertySetProperties.PersonProperty)
End Get
Set(ByVal value As Global.LightSwitchApplication.Person)
__AddAndEditPerson.DetailsClass.SetValue(Me, __AddAndEditPerson.DetailsClass.PropertySetProperties.PersonProperty, value)
End Set
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub PersonProperty_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
''' <summary>
''' Gets the Subscriptions visual collection. The collection contains all records currently shown on the respective list or grid control.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property Subscriptions As Global.Microsoft.LightSwitch.Framework.Client.VisualCollection(Of Global.LightSwitchApplication.Subscription)
Get
Return __AddAndEditPerson.DetailsClass.GetValue(Me, __AddAndEditPerson.DetailsClass.PropertySetProperties.Subscriptions)
End Get
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Subscriptions_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
''' <summary>
''' Gets the Activities visual collection. The collection contains all records currently shown on the respective list or grid control.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property Activities As Global.Microsoft.LightSwitch.Framework.Client.VisualCollection(Of Global.LightSwitchApplication.Activity)
Get
Return __AddAndEditPerson.DetailsClass.GetValue(Me, __AddAndEditPerson.DetailsClass.PropertySetProperties.Activities)
End Get
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Activities_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
''' <summary>
''' Gets the Donations visual collection. The collection contains all records currently shown on the respective list or grid control.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property Donations As Global.Microsoft.LightSwitch.Framework.Client.VisualCollection(Of Global.LightSwitchApplication.Donation)
Get
Return __AddAndEditPerson.DetailsClass.GetValue(Me, __AddAndEditPerson.DetailsClass.PropertySetProperties.Donations)
End Get
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Donations_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Property ptyPersonID As Global.System.Nullable(Of Integer)
Get
Return __AddAndEditPerson.DetailsClass.GetValue(Me, __AddAndEditPerson.DetailsClass.PropertySetProperties.ptyPersonID)
End Get
Set(ByVal value As Global.System.Nullable(Of Integer))
__AddAndEditPerson.DetailsClass.SetValue(Me, __AddAndEditPerson.DetailsClass.PropertySetProperties.ptyPersonID, value)
End Set
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ptyPersonID_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property Person As Global.LightSwitchApplication.Person
Get
Return __AddAndEditPerson.DetailsClass.GetValue(Me, __AddAndEditPerson.DetailsClass.PropertySetProperties.Person)
End Get
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Person_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
''' <summary>
''' Gets the Programs visual collection. The collection contains all records currently shown on the respective list or grid control.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property Programs As Global.Microsoft.LightSwitch.Framework.Client.VisualCollection(Of Global.LightSwitchApplication.Program)
Get
Return __AddAndEditPerson.DetailsClass.GetValue(Me, __AddAndEditPerson.DetailsClass.PropertySetProperties.Programs)
End Get
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Programs_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
''' <summary>
''' Calls the SubscriptionsAddAndEditNew screen method.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Sub SubscriptionsAddAndEditNew()
Me.Details.Methods.SubscriptionsAddAndEditNew.CreateInvocation().Execute()
End Sub
Partial Private Sub SubscriptionsAddAndEditNew_CanExecute(ByRef result As Boolean)
End Sub
Partial Private Sub SubscriptionsAddAndEditNew_Execute()
End Sub
''' <summary>
''' Calls the SubscriptionsAddNew screen method.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Sub SubscriptionsAddNew()
Me.Details.Methods.SubscriptionsAddNew.CreateInvocation().Execute()
End Sub
Partial Private Sub SubscriptionsAddNew_CanExecute(ByRef result As Boolean)
End Sub
Partial Private Sub SubscriptionsAddNew_Execute()
End Sub
''' <summary>
''' Calls the SubscriptionsEditSelected screen method.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Sub SubscriptionsEditSelected()
Me.Details.Methods.SubscriptionsEditSelected.CreateInvocation().Execute()
End Sub
Partial Private Sub SubscriptionsEditSelected_CanExecute(ByRef result As Boolean)
End Sub
Partial Private Sub SubscriptionsEditSelected_Execute()
End Sub
''' <summary>
''' Calls the ProgramsAddAndEditNew screen method.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Sub ProgramsAddAndEditNew()
Me.Details.Methods.ProgramsAddAndEditNew.CreateInvocation().Execute()
End Sub
Partial Private Sub ProgramsAddAndEditNew_CanExecute(ByRef result As Boolean)
End Sub
Partial Private Sub ProgramsAddAndEditNew_Execute()
End Sub
''' <summary>
''' Calls the ProgramsAddNew screen method.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Sub ProgramsAddNew()
Me.Details.Methods.ProgramsAddNew.CreateInvocation().Execute()
End Sub
Partial Private Sub ProgramsAddNew_CanExecute(ByRef result As Boolean)
End Sub
Partial Private Sub ProgramsAddNew_Execute()
End Sub
''' <summary>
''' Calls the ProgramsEditSelected screen method.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Sub ProgramsEditSelected()
Me.Details.Methods.ProgramsEditSelected.CreateInvocation().Execute()
End Sub
Partial Private Sub ProgramsEditSelected_CanExecute(ByRef result As Boolean)
End Sub
Partial Private Sub ProgramsEditSelected_Execute()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class DetailsClass
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenDetails(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass, __AddAndEditPerson.DetailsClass.PropertySet, __AddAndEditPerson.DetailsClass.CommandSet, __AddAndEditPerson.DetailsClass.MethodSet)
Shared Sub New()
Dim initializePropertyEntry = __AddAndEditPerson.DetailsClass.PropertySetProperties.PersonProperty
Dim initializeCommandEntry = __AddAndEditPerson.DetailsClass.CommandSetProperties.SubscriptionsAddAndEditNew
Dim initializeMethodEntry = __AddAndEditPerson.DetailsClass.MethodSetProperties.SubscriptionsAddAndEditNew
End Sub
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Private Shared ReadOnly __AddAndEditPersonEntry As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenDetails(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass).Entry = _
New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenDetails(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass).Entry( _
AddressOf __AddAndEditPerson.DetailsClass.__AddAndEditPerson_InvokeInitializeDataWorkspace,
AddressOf __AddAndEditPerson.DetailsClass.__AddAndEditPerson_InvokeSavingEvent,
AddressOf __AddAndEditPerson.DetailsClass.__AddAndEditPerson_InvokeSavedEvent,
AddressOf __AddAndEditPerson.DetailsClass.__AddAndEditPerson_InvokeClosingEvent,
AddressOf __AddAndEditPerson.DetailsClass.__AddAndEditPerson_InvokeCreated,
AddressOf __AddAndEditPerson.DetailsClass.__AddAndEditPerson_InvokeActivated,
AddressOf __AddAndEditPerson.DetailsClass.__AddAndEditPerson_InvokeSaveErrorEvent)
Private Shared Sub __AddAndEditPerson_InvokeInitializeDataWorkspace(s As __AddAndEditPerson, saveChangesTo As Global.System.Collections.Generic.List(Of Global.Microsoft.LightSwitch.IDataService))
s.AddAndEditPerson_InitializeDataWorkspace(saveChangesTo)
End Sub
Private Shared Function __AddAndEditPerson_InvokeSavingEvent(s As __AddAndEditPerson) As Boolean
Dim handled = False
s.AddAndEditPerson_Saving(handled)
Return handled
End Function
Private Shared Sub __AddAndEditPerson_InvokeSavedEvent(s As __AddAndEditPerson)
s.AddAndEditPerson_Saved()
End Sub
Private Shared Function __AddAndEditPerson_InvokeClosingEvent(s As __AddAndEditPerson) As Boolean
Dim cancel = False
s.AddAndEditPerson_Closing(cancel)
Return cancel
End Function
Private Shared Sub __AddAndEditPerson_InvokeCreated(s As __AddAndEditPerson)
s.AddAndEditPerson_Created()
End Sub
Private Shared Sub __AddAndEditPerson_InvokeActivated(s As __AddAndEditPerson)
s.AddAndEditPerson_Activated()
End Sub
Private Shared Function __AddAndEditPerson_InvokeSaveErrorEvent(s As __AddAndEditPerson, ex As Global.System.Exception) As Boolean
Dim handled = False
s.AddAndEditPerson_SaveError(ex, handled)
Return handled
End Function
Public Sub New()
MyBase.New()
End Sub
Public Shadows ReadOnly Property Properties As __AddAndEditPerson.DetailsClass.PropertySet
Get
Return MyBase.Properties
End Get
End Property
Public Shadows ReadOnly Property Commands As __AddAndEditPerson.DetailsClass.CommandSet
Get
Return MyBase.Commands
End Get
End Property
Public Shadows ReadOnly Property Methods As __AddAndEditPerson.DetailsClass.MethodSet
Get
Return MyBase.Methods
End Get
End Property
Private Function SubscriptionsQuery() As Global.Microsoft.LightSwitch.IDataServiceQueryable
If Me.Screen.PersonProperty Is Nothing Then
Return Nothing
End If
Dim loader As Global.Microsoft.LightSwitch.IDataServiceQueryable(Of Global.LightSwitchApplication.Subscription) = _
DirectCast(DirectCast(Me.Screen.PersonProperty.Details.Properties.Subscriptions, Global.Microsoft.LightSwitch.Details.ILoadableProperty).Loader, Global.Microsoft.LightSwitch.IDataServiceQueryable(Of Global.LightSwitchApplication.Subscription))
If loader Is Nothing Then
Return Nothing
End If
Return Global.Microsoft.LightSwitch.DataServiceQueryable.Include(
loader,
"Season")
End Function
Private Function ActivitiesQuery() As Global.Microsoft.LightSwitch.IDataServiceQueryable
If Me.Screen.PersonProperty Is Nothing Then
Return Nothing
End If
Dim loader As Global.Microsoft.LightSwitch.IDataServiceQueryable(Of Global.LightSwitchApplication.Activity) = _
DirectCast(DirectCast(Me.Screen.PersonProperty.Details.Properties.Activities, Global.Microsoft.LightSwitch.Details.ILoadableProperty).Loader, Global.Microsoft.LightSwitch.IDataServiceQueryable(Of Global.LightSwitchApplication.Activity))
If loader Is Nothing Then
Return Nothing
End If
Return Global.Microsoft.LightSwitch.DataServiceQueryable.Include(
Global.Microsoft.LightSwitch.DataServiceQueryable.Include(
loader,
"ActivityName"),
"Season")
End Function
Private Function DonationsQuery() As Global.Microsoft.LightSwitch.IDataServiceQueryable
If Me.Screen.PersonProperty Is Nothing Then
Return Nothing
End If
Dim loader As Global.Microsoft.LightSwitch.IDataServiceQueryable(Of Global.LightSwitchApplication.Donation) = _
DirectCast(DirectCast(Me.Screen.PersonProperty.Details.Properties.Donations, Global.Microsoft.LightSwitch.Details.ILoadableProperty).Loader, Global.Microsoft.LightSwitch.IDataServiceQueryable(Of Global.LightSwitchApplication.Donation))
If loader Is Nothing Then
Return Nothing
End If
Return Global.Microsoft.LightSwitch.DataServiceQueryable.Include(
loader,
"Season")
End Function
Private Function ProgramsQuery() As Global.Microsoft.LightSwitch.IDataServiceQueryable
If Me.Screen.PersonProperty Is Nothing Then
Return Nothing
End If
Dim loader As Global.Microsoft.LightSwitch.IDataServiceQueryable(Of Global.LightSwitchApplication.Program) = _
DirectCast(DirectCast(Me.Screen.PersonProperty.Details.Properties.Programs, Global.Microsoft.LightSwitch.Details.ILoadableProperty).Loader, Global.Microsoft.LightSwitch.IDataServiceQueryable(Of Global.LightSwitchApplication.Program))
If loader Is Nothing Then
Return Nothing
End If
Return Global.Microsoft.LightSwitch.DataServiceQueryable.Include(
Global.Microsoft.LightSwitch.DataServiceQueryable.Include(
loader,
"Person"),
"ProgramName")
End Function
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _PersonProperty As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass, Global.LightSwitchApplication.Person).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _Subscriptions As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass, Global.LightSwitchApplication.Subscription).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _Activities As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass, Global.LightSwitchApplication.Activity).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _Donations As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass, Global.LightSwitchApplication.Donation).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _ptyPersonID As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass, Global.System.Nullable(Of Integer)).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _Person As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenReferenceProperty(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass, Global.LightSwitchApplication.Person).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _Programs As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass, Global.LightSwitchApplication.Program).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _SubscriptionsAddAndEditNewCommand As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _SubscriptionsAddNewCommand As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _SubscriptionsEditSelectedCommand As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _ProgramsAddAndEditNewCommand As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _ProgramsAddNewCommand As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _ProgramsEditSelectedCommand As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _SubscriptionsAddAndEditNewMethod As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _SubscriptionsAddNewMethod As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _SubscriptionsEditSelectedMethod As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _ProgramsAddAndEditNewMethod As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _ProgramsAddNewMethod As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _ProgramsEditSelectedMethod As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass).Data
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class PropertySet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenPropertySet(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass)
Public ReadOnly Property PersonProperty As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass, Global.LightSwitchApplication.Person)
Get
Return DirectCast(MyBase.GetItem(__AddAndEditPerson.DetailsClass.PropertySetProperties.PersonProperty), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass, Global.LightSwitchApplication.Person))
End Get
End Property
Public ReadOnly Property Subscriptions As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass, Global.LightSwitchApplication.Subscription)
Get
Return DirectCast(MyBase.GetItem(__AddAndEditPerson.DetailsClass.PropertySetProperties.Subscriptions), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass, Global.LightSwitchApplication.Subscription))
End Get
End Property
Public ReadOnly Property Activities As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass, Global.LightSwitchApplication.Activity)
Get
Return DirectCast(MyBase.GetItem(__AddAndEditPerson.DetailsClass.PropertySetProperties.Activities), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass, Global.LightSwitchApplication.Activity))
End Get
End Property
Public ReadOnly Property Donations As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass, Global.LightSwitchApplication.Donation)
Get
Return DirectCast(MyBase.GetItem(__AddAndEditPerson.DetailsClass.PropertySetProperties.Donations), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass, Global.LightSwitchApplication.Donation))
End Get
End Property
Public ReadOnly Property ptyPersonID As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass, Global.System.Nullable(Of Integer))
Get
Return DirectCast(MyBase.GetItem(__AddAndEditPerson.DetailsClass.PropertySetProperties.ptyPersonID), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass, Global.System.Nullable(Of Integer)))
End Get
End Property
Public ReadOnly Property Person As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenReferenceProperty(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass, Global.LightSwitchApplication.Person)
Get
Return DirectCast(MyBase.GetItem(__AddAndEditPerson.DetailsClass.PropertySetProperties.Person), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenReferenceProperty(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass, Global.LightSwitchApplication.Person))
End Get
End Property
Public ReadOnly Property Programs As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass, Global.LightSwitchApplication.Program)
Get
Return DirectCast(MyBase.GetItem(__AddAndEditPerson.DetailsClass.PropertySetProperties.Programs), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass, Global.LightSwitchApplication.Program))
End Get
End Property
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class CommandSet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommandSet(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass)
Public ReadOnly Property SubscriptionsAddAndEditNew As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass)
Get
Return DirectCast(MyBase.GetItem(__AddAndEditPerson.DetailsClass.CommandSetProperties.SubscriptionsAddAndEditNew), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass))
End Get
End Property
Public ReadOnly Property SubscriptionsAddNew As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass)
Get
Return DirectCast(MyBase.GetItem(__AddAndEditPerson.DetailsClass.CommandSetProperties.SubscriptionsAddNew), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass))
End Get
End Property
Public ReadOnly Property SubscriptionsEditSelected As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass)
Get
Return DirectCast(MyBase.GetItem(__AddAndEditPerson.DetailsClass.CommandSetProperties.SubscriptionsEditSelected), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass))
End Get
End Property
Public ReadOnly Property ProgramsAddAndEditNew As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass)
Get
Return DirectCast(MyBase.GetItem(__AddAndEditPerson.DetailsClass.CommandSetProperties.ProgramsAddAndEditNew), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass))
End Get
End Property
Public ReadOnly Property ProgramsAddNew As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass)
Get
Return DirectCast(MyBase.GetItem(__AddAndEditPerson.DetailsClass.CommandSetProperties.ProgramsAddNew), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass))
End Get
End Property
Public ReadOnly Property ProgramsEditSelected As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass)
Get
Return DirectCast(MyBase.GetItem(__AddAndEditPerson.DetailsClass.CommandSetProperties.ProgramsEditSelected), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass))
End Get
End Property
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class MethodSet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethodSet(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass)
Public ReadOnly Property SubscriptionsAddAndEditNew As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass)
Get
Return DirectCast(MyBase.GetItem(__AddAndEditPerson.DetailsClass.MethodSetProperties.SubscriptionsAddAndEditNew), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass))
End Get
End Property
Public ReadOnly Property SubscriptionsAddNew As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass)
Get
Return DirectCast(MyBase.GetItem(__AddAndEditPerson.DetailsClass.MethodSetProperties.SubscriptionsAddNew), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass))
End Get
End Property
Public ReadOnly Property SubscriptionsEditSelected As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass)
Get
Return DirectCast(MyBase.GetItem(__AddAndEditPerson.DetailsClass.MethodSetProperties.SubscriptionsEditSelected), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass))
End Get
End Property
Public ReadOnly Property ProgramsAddAndEditNew As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass)
Get
Return DirectCast(MyBase.GetItem(__AddAndEditPerson.DetailsClass.MethodSetProperties.ProgramsAddAndEditNew), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass))
End Get
End Property
Public ReadOnly Property ProgramsAddNew As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass)
Get
Return DirectCast(MyBase.GetItem(__AddAndEditPerson.DetailsClass.MethodSetProperties.ProgramsAddNew), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass))
End Get
End Property
Public ReadOnly Property ProgramsEditSelected As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass)
Get
Return DirectCast(MyBase.GetItem(__AddAndEditPerson.DetailsClass.MethodSetProperties.ProgramsEditSelected), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass))
End Get
End Property
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend NotInheritable Class PropertySetProperties
Public Shared ReadOnly PersonProperty As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass, Global.LightSwitchApplication.Person).Entry( _
"PersonProperty",
False,
AddressOf __AddAndEditPerson.DetailsClass.PropertySetProperties._PersonProperty_Stub,
AddressOf __AddAndEditPerson.DetailsClass.PropertySetProperties._PersonProperty_Validate,
AddressOf __AddAndEditPerson.DetailsClass.PropertySetProperties._PersonProperty_OnValueChanged)
Private Shared Sub _PersonProperty_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __AddAndEditPerson.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass, Global.LightSwitchApplication.Person).Data), d As __AddAndEditPerson.DetailsClass, sf As Object)
c(d, d._PersonProperty, sf)
End Sub
Private Shared Sub _PersonProperty_Validate(s As __AddAndEditPerson, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.PersonProperty_Validate(r)
End Sub
Private Shared Sub _PersonProperty_OnValueChanged(s As __AddAndEditPerson)
s.PersonProperty_Changed()
End Sub
Public Shared ReadOnly Subscriptions As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass, Global.LightSwitchApplication.Subscription).Entry( _
"Subscriptions",
AddressOf __AddAndEditPerson.DetailsClass.PropertySetProperties._Subscriptions_Stub,
AddressOf __AddAndEditPerson.DetailsClass.PropertySetProperties._Subscriptions_Validate,
AddressOf __AddAndEditPerson.DetailsClass.PropertySetProperties._Subscriptions_CreateQuery,
AddressOf __AddAndEditPerson.DetailsClass.PropertySetProperties._Subscriptions_SelectionChanged,
AddressOf __AddAndEditPerson.DetailsClass.PropertySetProperties._Subscriptions_OnCollectionChanged,
AddressOf __AddAndEditPerson.DetailsClass.PropertySetProperties._Subscriptions_OnLoaded)
Private Shared Sub _Subscriptions_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __AddAndEditPerson.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass, Global.LightSwitchApplication.Subscription).Data), d As __AddAndEditPerson.DetailsClass, sf As Object)
c(d, d._Subscriptions, sf)
End Sub
Private Shared Sub _Subscriptions_Validate(s As __AddAndEditPerson, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.Subscriptions_Validate(r)
End Sub
Private Shared Function _Subscriptions_CreateQuery(d As __AddAndEditPerson.DetailsClass, args As Object()) As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return d.SubscriptionsQuery()
End Function
Private Shared Sub _Subscriptions_SelectionChanged(s As __AddAndEditPerson)
s.Subscriptions_SelectionChanged()
End Sub
Private Shared Sub _Subscriptions_OnCollectionChanged(s As __AddAndEditPerson, e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
s.Subscriptions_Changed(e)
End Sub
Private Shared Sub _Subscriptions_OnLoaded(s As __AddAndEditPerson, succeeded As Boolean)
s.Subscriptions_Loaded(succeeded)
End Sub
Public Shared ReadOnly Activities As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass, Global.LightSwitchApplication.Activity).Entry( _
"Activities",
AddressOf __AddAndEditPerson.DetailsClass.PropertySetProperties._Activities_Stub,
AddressOf __AddAndEditPerson.DetailsClass.PropertySetProperties._Activities_Validate,
AddressOf __AddAndEditPerson.DetailsClass.PropertySetProperties._Activities_CreateQuery,
AddressOf __AddAndEditPerson.DetailsClass.PropertySetProperties._Activities_SelectionChanged,
AddressOf __AddAndEditPerson.DetailsClass.PropertySetProperties._Activities_OnCollectionChanged,
AddressOf __AddAndEditPerson.DetailsClass.PropertySetProperties._Activities_OnLoaded)
Private Shared Sub _Activities_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __AddAndEditPerson.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass, Global.LightSwitchApplication.Activity).Data), d As __AddAndEditPerson.DetailsClass, sf As Object)
c(d, d._Activities, sf)
End Sub
Private Shared Sub _Activities_Validate(s As __AddAndEditPerson, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.Activities_Validate(r)
End Sub
Private Shared Function _Activities_CreateQuery(d As __AddAndEditPerson.DetailsClass, args As Object()) As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return d.ActivitiesQuery()
End Function
Private Shared Sub _Activities_SelectionChanged(s As __AddAndEditPerson)
s.Activities_SelectionChanged()
End Sub
Private Shared Sub _Activities_OnCollectionChanged(s As __AddAndEditPerson, e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
s.Activities_Changed(e)
End Sub
Private Shared Sub _Activities_OnLoaded(s As __AddAndEditPerson, succeeded As Boolean)
s.Activities_Loaded(succeeded)
End Sub
Public Shared ReadOnly Donations As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass, Global.LightSwitchApplication.Donation).Entry( _
"Donations",
AddressOf __AddAndEditPerson.DetailsClass.PropertySetProperties._Donations_Stub,
AddressOf __AddAndEditPerson.DetailsClass.PropertySetProperties._Donations_Validate,
AddressOf __AddAndEditPerson.DetailsClass.PropertySetProperties._Donations_CreateQuery,
AddressOf __AddAndEditPerson.DetailsClass.PropertySetProperties._Donations_SelectionChanged,
AddressOf __AddAndEditPerson.DetailsClass.PropertySetProperties._Donations_OnCollectionChanged,
AddressOf __AddAndEditPerson.DetailsClass.PropertySetProperties._Donations_OnLoaded)
Private Shared Sub _Donations_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __AddAndEditPerson.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass, Global.LightSwitchApplication.Donation).Data), d As __AddAndEditPerson.DetailsClass, sf As Object)
c(d, d._Donations, sf)
End Sub
Private Shared Sub _Donations_Validate(s As __AddAndEditPerson, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.Donations_Validate(r)
End Sub
Private Shared Function _Donations_CreateQuery(d As __AddAndEditPerson.DetailsClass, args As Object()) As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return d.DonationsQuery()
End Function
Private Shared Sub _Donations_SelectionChanged(s As __AddAndEditPerson)
s.Donations_SelectionChanged()
End Sub
Private Shared Sub _Donations_OnCollectionChanged(s As __AddAndEditPerson, e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
s.Donations_Changed(e)
End Sub
Private Shared Sub _Donations_OnLoaded(s As __AddAndEditPerson, succeeded As Boolean)
s.Donations_Loaded(succeeded)
End Sub
Public Shared ReadOnly ptyPersonID As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass, Global.System.Nullable(Of Integer)).Entry( _
"ptyPersonID",
False,
AddressOf __AddAndEditPerson.DetailsClass.PropertySetProperties._ptyPersonID_Stub,
AddressOf __AddAndEditPerson.DetailsClass.PropertySetProperties._ptyPersonID_Validate,
AddressOf __AddAndEditPerson.DetailsClass.PropertySetProperties._ptyPersonID_OnValueChanged)
Private Shared Sub _ptyPersonID_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __AddAndEditPerson.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass, Global.System.Nullable(Of Integer)).Data), d As __AddAndEditPerson.DetailsClass, sf As Object)
c(d, d._ptyPersonID, sf)
End Sub
Private Shared Sub _ptyPersonID_Validate(s As __AddAndEditPerson, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.ptyPersonID_Validate(r)
End Sub
Private Shared Sub _ptyPersonID_OnValueChanged(s As __AddAndEditPerson)
s.ptyPersonID_Changed()
End Sub
Public Shared ReadOnly Person As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenReferenceProperty(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass, Global.LightSwitchApplication.Person).Entry( _
"Person",
AddressOf __AddAndEditPerson.DetailsClass.PropertySetProperties._Person_Stub,
AddressOf __AddAndEditPerson.DetailsClass.PropertySetProperties._Person_Validate,
AddressOf __AddAndEditPerson.DetailsClass.PropertySetProperties._Person_CreateQuery,
AddressOf __AddAndEditPerson.DetailsClass.PropertySetProperties._Person_OnValueChanged,
AddressOf __AddAndEditPerson.DetailsClass.PropertySetProperties._Person_OnLoaded)
Private Shared Sub _Person_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __AddAndEditPerson.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenReferenceProperty(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass, Global.LightSwitchApplication.Person).Data), d As __AddAndEditPerson.DetailsClass, sf As Object)
c(d, d._Person, sf)
End Sub
Private Shared Sub _Person_Validate(s As __AddAndEditPerson, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.Person_Validate(r)
End Sub
Private Shared Function _Person_CreateQuery(d As __AddAndEditPerson.DetailsClass, args As Object()) As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return Nothing
End Function
Private Shared Sub _Person_OnValueChanged(s As __AddAndEditPerson)
s.Person_Changed()
End Sub
Private Shared Sub _Person_OnLoaded(s As __AddAndEditPerson, succeeded As Boolean)
s.Person_Loaded(succeeded)
End Sub
Public Shared ReadOnly Programs As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass, Global.LightSwitchApplication.Program).Entry( _
"Programs",
AddressOf __AddAndEditPerson.DetailsClass.PropertySetProperties._Programs_Stub,
AddressOf __AddAndEditPerson.DetailsClass.PropertySetProperties._Programs_Validate,
AddressOf __AddAndEditPerson.DetailsClass.PropertySetProperties._Programs_CreateQuery,
AddressOf __AddAndEditPerson.DetailsClass.PropertySetProperties._Programs_SelectionChanged,
AddressOf __AddAndEditPerson.DetailsClass.PropertySetProperties._Programs_OnCollectionChanged,
AddressOf __AddAndEditPerson.DetailsClass.PropertySetProperties._Programs_OnLoaded)
Private Shared Sub _Programs_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __AddAndEditPerson.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass, Global.LightSwitchApplication.Program).Data), d As __AddAndEditPerson.DetailsClass, sf As Object)
c(d, d._Programs, sf)
End Sub
Private Shared Sub _Programs_Validate(s As __AddAndEditPerson, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.Programs_Validate(r)
End Sub
Private Shared Function _Programs_CreateQuery(d As __AddAndEditPerson.DetailsClass, args As Object()) As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return d.ProgramsQuery()
End Function
Private Shared Sub _Programs_SelectionChanged(s As __AddAndEditPerson)
s.Programs_SelectionChanged()
End Sub
Private Shared Sub _Programs_OnCollectionChanged(s As __AddAndEditPerson, e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
s.Programs_Changed(e)
End Sub
Private Shared Sub _Programs_OnLoaded(s As __AddAndEditPerson, succeeded As Boolean)
s.Programs_Loaded(succeeded)
End Sub
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend NotInheritable Class CommandSetProperties
Public Shared ReadOnly SubscriptionsAddAndEditNew As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass).Entry( _
"SubscriptionsAddAndEditNew",
AddressOf __AddAndEditPerson.DetailsClass.CommandSetProperties._SubscriptionsAddAndEditNew_Stub,
AddressOf __AddAndEditPerson.DetailsClass.CommandSetProperties._SubscriptionsAddAndEditNew_CreateExecutableObject)
Private Shared Sub _SubscriptionsAddAndEditNew_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __AddAndEditPerson.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass).Data), d As __AddAndEditPerson.DetailsClass, sf As Object)
c(d, d._SubscriptionsAddAndEditNewCommand, sf)
End Sub
Private Shared Function _SubscriptionsAddAndEditNew_CreateExecutableObject(d As __AddAndEditPerson.DetailsClass) As Global.Microsoft.LightSwitch.IExecutable
Return DirectCast(d, __AddAndEditPerson.DetailsClass).Methods.SubscriptionsAddAndEditNew.CreateInvocation()
End Function
Public Shared ReadOnly SubscriptionsAddNew As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass).Entry( _
"SubscriptionsAddNew",
AddressOf __AddAndEditPerson.DetailsClass.CommandSetProperties._SubscriptionsAddNew_Stub,
AddressOf __AddAndEditPerson.DetailsClass.CommandSetProperties._SubscriptionsAddNew_CreateExecutableObject)
Private Shared Sub _SubscriptionsAddNew_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __AddAndEditPerson.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass).Data), d As __AddAndEditPerson.DetailsClass, sf As Object)
c(d, d._SubscriptionsAddNewCommand, sf)
End Sub
Private Shared Function _SubscriptionsAddNew_CreateExecutableObject(d As __AddAndEditPerson.DetailsClass) As Global.Microsoft.LightSwitch.IExecutable
Return DirectCast(d, __AddAndEditPerson.DetailsClass).Methods.SubscriptionsAddNew.CreateInvocation()
End Function
Public Shared ReadOnly SubscriptionsEditSelected As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass).Entry( _
"SubscriptionsEditSelected",
AddressOf __AddAndEditPerson.DetailsClass.CommandSetProperties._SubscriptionsEditSelected_Stub,
AddressOf __AddAndEditPerson.DetailsClass.CommandSetProperties._SubscriptionsEditSelected_CreateExecutableObject)
Private Shared Sub _SubscriptionsEditSelected_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __AddAndEditPerson.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass).Data), d As __AddAndEditPerson.DetailsClass, sf As Object)
c(d, d._SubscriptionsEditSelectedCommand, sf)
End Sub
Private Shared Function _SubscriptionsEditSelected_CreateExecutableObject(d As __AddAndEditPerson.DetailsClass) As Global.Microsoft.LightSwitch.IExecutable
Return DirectCast(d, __AddAndEditPerson.DetailsClass).Methods.SubscriptionsEditSelected.CreateInvocation()
End Function
Public Shared ReadOnly ProgramsAddAndEditNew As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass).Entry( _
"ProgramsAddAndEditNew",
AddressOf __AddAndEditPerson.DetailsClass.CommandSetProperties._ProgramsAddAndEditNew_Stub,
AddressOf __AddAndEditPerson.DetailsClass.CommandSetProperties._ProgramsAddAndEditNew_CreateExecutableObject)
Private Shared Sub _ProgramsAddAndEditNew_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __AddAndEditPerson.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass).Data), d As __AddAndEditPerson.DetailsClass, sf As Object)
c(d, d._ProgramsAddAndEditNewCommand, sf)
End Sub
Private Shared Function _ProgramsAddAndEditNew_CreateExecutableObject(d As __AddAndEditPerson.DetailsClass) As Global.Microsoft.LightSwitch.IExecutable
Return DirectCast(d, __AddAndEditPerson.DetailsClass).Methods.ProgramsAddAndEditNew.CreateInvocation()
End Function
Public Shared ReadOnly ProgramsAddNew As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass).Entry( _
"ProgramsAddNew",
AddressOf __AddAndEditPerson.DetailsClass.CommandSetProperties._ProgramsAddNew_Stub,
AddressOf __AddAndEditPerson.DetailsClass.CommandSetProperties._ProgramsAddNew_CreateExecutableObject)
Private Shared Sub _ProgramsAddNew_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __AddAndEditPerson.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass).Data), d As __AddAndEditPerson.DetailsClass, sf As Object)
c(d, d._ProgramsAddNewCommand, sf)
End Sub
Private Shared Function _ProgramsAddNew_CreateExecutableObject(d As __AddAndEditPerson.DetailsClass) As Global.Microsoft.LightSwitch.IExecutable
Return DirectCast(d, __AddAndEditPerson.DetailsClass).Methods.ProgramsAddNew.CreateInvocation()
End Function
Public Shared ReadOnly ProgramsEditSelected As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass).Entry( _
"ProgramsEditSelected",
AddressOf __AddAndEditPerson.DetailsClass.CommandSetProperties._ProgramsEditSelected_Stub,
AddressOf __AddAndEditPerson.DetailsClass.CommandSetProperties._ProgramsEditSelected_CreateExecutableObject)
Private Shared Sub _ProgramsEditSelected_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __AddAndEditPerson.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass).Data), d As __AddAndEditPerson.DetailsClass, sf As Object)
c(d, d._ProgramsEditSelectedCommand, sf)
End Sub
Private Shared Function _ProgramsEditSelected_CreateExecutableObject(d As __AddAndEditPerson.DetailsClass) As Global.Microsoft.LightSwitch.IExecutable
Return DirectCast(d, __AddAndEditPerson.DetailsClass).Methods.ProgramsEditSelected.CreateInvocation()
End Function
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend NotInheritable Class MethodSetProperties
Public Shared ReadOnly SubscriptionsAddAndEditNew As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass).Entry( _
"SubscriptionsAddAndEditNew",
AddressOf __AddAndEditPerson.DetailsClass.MethodSetProperties._SubscriptionsAddAndEditNew_Stub,
AddressOf __AddAndEditPerson.DetailsClass.MethodSetProperties._SubscriptionsAddAndEditNew_CanInvoke,
AddressOf __AddAndEditPerson.DetailsClass.MethodSetProperties._SubscriptionsAddAndEditNew_InvokeMethod)
Private Shared Sub _SubscriptionsAddAndEditNew_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __AddAndEditPerson.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass).Data), d As __AddAndEditPerson.DetailsClass, sf As Object)
c(d, d._SubscriptionsAddAndEditNewMethod, sf)
End Sub
Private Shared Function _SubscriptionsAddAndEditNew_CanInvoke(d As __AddAndEditPerson.DetailsClass, args As Global.System.Collections.ObjectModel.ReadOnlyCollection(Of Object), ex As Global.System.Exception) As Global.System.Exception
Dim result = True
d.Screen.SubscriptionsAddAndEditNew_CanExecute(result)
Return If(result, Nothing, ex)
End Function
Private Shared Sub _SubscriptionsAddAndEditNew_InvokeMethod(d As __AddAndEditPerson.DetailsClass, args As Global.System.Collections.ObjectModel.ReadOnlyCollection(Of Object))
d.Screen.SubscriptionsAddAndEditNew_Execute()
End Sub
Public Shared ReadOnly SubscriptionsAddNew As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass).Entry( _
"SubscriptionsAddNew",
AddressOf __AddAndEditPerson.DetailsClass.MethodSetProperties._SubscriptionsAddNew_Stub,
AddressOf __AddAndEditPerson.DetailsClass.MethodSetProperties._SubscriptionsAddNew_CanInvoke,
AddressOf __AddAndEditPerson.DetailsClass.MethodSetProperties._SubscriptionsAddNew_InvokeMethod)
Private Shared Sub _SubscriptionsAddNew_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __AddAndEditPerson.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass).Data), d As __AddAndEditPerson.DetailsClass, sf As Object)
c(d, d._SubscriptionsAddNewMethod, sf)
End Sub
Private Shared Function _SubscriptionsAddNew_CanInvoke(d As __AddAndEditPerson.DetailsClass, args As Global.System.Collections.ObjectModel.ReadOnlyCollection(Of Object), ex As Global.System.Exception) As Global.System.Exception
Dim result = True
d.Screen.SubscriptionsAddNew_CanExecute(result)
Return If(result, Nothing, ex)
End Function
Private Shared Sub _SubscriptionsAddNew_InvokeMethod(d As __AddAndEditPerson.DetailsClass, args As Global.System.Collections.ObjectModel.ReadOnlyCollection(Of Object))
d.Screen.SubscriptionsAddNew_Execute()
End Sub
Public Shared ReadOnly SubscriptionsEditSelected As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass).Entry( _
"SubscriptionsEditSelected",
AddressOf __AddAndEditPerson.DetailsClass.MethodSetProperties._SubscriptionsEditSelected_Stub,
AddressOf __AddAndEditPerson.DetailsClass.MethodSetProperties._SubscriptionsEditSelected_CanInvoke,
AddressOf __AddAndEditPerson.DetailsClass.MethodSetProperties._SubscriptionsEditSelected_InvokeMethod)
Private Shared Sub _SubscriptionsEditSelected_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __AddAndEditPerson.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass).Data), d As __AddAndEditPerson.DetailsClass, sf As Object)
c(d, d._SubscriptionsEditSelectedMethod, sf)
End Sub
Private Shared Function _SubscriptionsEditSelected_CanInvoke(d As __AddAndEditPerson.DetailsClass, args As Global.System.Collections.ObjectModel.ReadOnlyCollection(Of Object), ex As Global.System.Exception) As Global.System.Exception
Dim result = True
d.Screen.SubscriptionsEditSelected_CanExecute(result)
Return If(result, Nothing, ex)
End Function
Private Shared Sub _SubscriptionsEditSelected_InvokeMethod(d As __AddAndEditPerson.DetailsClass, args As Global.System.Collections.ObjectModel.ReadOnlyCollection(Of Object))
d.Screen.SubscriptionsEditSelected_Execute()
End Sub
Public Shared ReadOnly ProgramsAddAndEditNew As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass).Entry( _
"ProgramsAddAndEditNew",
AddressOf __AddAndEditPerson.DetailsClass.MethodSetProperties._ProgramsAddAndEditNew_Stub,
AddressOf __AddAndEditPerson.DetailsClass.MethodSetProperties._ProgramsAddAndEditNew_CanInvoke,
AddressOf __AddAndEditPerson.DetailsClass.MethodSetProperties._ProgramsAddAndEditNew_InvokeMethod)
Private Shared Sub _ProgramsAddAndEditNew_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __AddAndEditPerson.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass).Data), d As __AddAndEditPerson.DetailsClass, sf As Object)
c(d, d._ProgramsAddAndEditNewMethod, sf)
End Sub
Private Shared Function _ProgramsAddAndEditNew_CanInvoke(d As __AddAndEditPerson.DetailsClass, args As Global.System.Collections.ObjectModel.ReadOnlyCollection(Of Object), ex As Global.System.Exception) As Global.System.Exception
Dim result = True
d.Screen.ProgramsAddAndEditNew_CanExecute(result)
Return If(result, Nothing, ex)
End Function
Private Shared Sub _ProgramsAddAndEditNew_InvokeMethod(d As __AddAndEditPerson.DetailsClass, args As Global.System.Collections.ObjectModel.ReadOnlyCollection(Of Object))
d.Screen.ProgramsAddAndEditNew_Execute()
End Sub
Public Shared ReadOnly ProgramsAddNew As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass).Entry( _
"ProgramsAddNew",
AddressOf __AddAndEditPerson.DetailsClass.MethodSetProperties._ProgramsAddNew_Stub,
AddressOf __AddAndEditPerson.DetailsClass.MethodSetProperties._ProgramsAddNew_CanInvoke,
AddressOf __AddAndEditPerson.DetailsClass.MethodSetProperties._ProgramsAddNew_InvokeMethod)
Private Shared Sub _ProgramsAddNew_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __AddAndEditPerson.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass).Data), d As __AddAndEditPerson.DetailsClass, sf As Object)
c(d, d._ProgramsAddNewMethod, sf)
End Sub
Private Shared Function _ProgramsAddNew_CanInvoke(d As __AddAndEditPerson.DetailsClass, args As Global.System.Collections.ObjectModel.ReadOnlyCollection(Of Object), ex As Global.System.Exception) As Global.System.Exception
Dim result = True
d.Screen.ProgramsAddNew_CanExecute(result)
Return If(result, Nothing, ex)
End Function
Private Shared Sub _ProgramsAddNew_InvokeMethod(d As __AddAndEditPerson.DetailsClass, args As Global.System.Collections.ObjectModel.ReadOnlyCollection(Of Object))
d.Screen.ProgramsAddNew_Execute()
End Sub
Public Shared ReadOnly ProgramsEditSelected As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass).Entry( _
"ProgramsEditSelected",
AddressOf __AddAndEditPerson.DetailsClass.MethodSetProperties._ProgramsEditSelected_Stub,
AddressOf __AddAndEditPerson.DetailsClass.MethodSetProperties._ProgramsEditSelected_CanInvoke,
AddressOf __AddAndEditPerson.DetailsClass.MethodSetProperties._ProgramsEditSelected_InvokeMethod)
Private Shared Sub _ProgramsEditSelected_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __AddAndEditPerson.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __AddAndEditPerson, __AddAndEditPerson.DetailsClass).Data), d As __AddAndEditPerson.DetailsClass, sf As Object)
c(d, d._ProgramsEditSelectedMethod, sf)
End Sub
Private Shared Function _ProgramsEditSelected_CanInvoke(d As __AddAndEditPerson.DetailsClass, args As Global.System.Collections.ObjectModel.ReadOnlyCollection(Of Object), ex As Global.System.Exception) As Global.System.Exception
Dim result = True
d.Screen.ProgramsEditSelected_CanExecute(result)
Return If(result, Nothing, ex)
End Function
Private Shared Sub _ProgramsEditSelected_InvokeMethod(d As __AddAndEditPerson.DetailsClass, args As Global.System.Collections.ObjectModel.ReadOnlyCollection(Of Object))
d.Screen.ProgramsEditSelected_Execute()
End Sub
End Class
End Class
End Class
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
Partial Public NotInheritable Class CreateAndEditSubscription
Inherits Global.Microsoft.LightSwitch.Framework.Client.ScreenObject(Of __CreateAndEditSubscription, __CreateAndEditSubscription.DetailsClass)
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private Sub New(ByVal ptyPersonID As Integer, ByVal ptySubscriptionID As Global.System.Nullable(Of Integer))
MyBase.New("LightSwitchApplication:CreateAndEditSubscription")
Me.ptyPersonID = ptyPersonID
Me.ptySubscriptionID = ptySubscriptionID
__CreateAndEditSubscription.DetailsClass.Initialize(Me)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
Public Shared Function CreateInstance(ByVal ptyPersonID As Integer, ByVal ptySubscriptionID As Global.System.Nullable(Of Integer)) As CreateAndEditSubscription
Return New __CreateAndEditSubscription( _
ptyPersonID _
,ptySubscriptionID _
)
End Function
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub CreateAndEditSubscription_InitializeDataWorkspace(ByVal saveChangesTo As Global.System.Collections.Generic.List(Of Global.Microsoft.LightSwitch.IDataService))
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub CreateAndEditSubscription_Created()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub CreateAndEditSubscription_Activated()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub CreateAndEditSubscription_Saving(ByRef handled As Boolean)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub CreateAndEditSubscription_Saved()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub CreateAndEditSubscription_Closing(ByRef cancel As Boolean)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub CreateAndEditSubscription_SaveError(ByVal exception As Global.System.Exception, ByRef handled As Boolean)
End Sub
#Region "Private Properties"
''' <summary>
''' Gets the Application object for this application. The Application object provides access to active screens, methods to open screens and access to the current user.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private ReadOnly Property Application As Global.LightSwitchApplication.Application
Get
Return Global.LightSwitchApplication.Application.Current
End Get
End Property
''' <summary>
''' Gets the containing data workspace. The data workspace provides access to all data sources in the application.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private ReadOnly Property DataWorkspace As Global.LightSwitchApplication.DataWorkspace
Get
Return DirectCast(DirectCast(Me.Details, Global.Microsoft.LightSwitch.Details.Client.IScreenDetails).DataWorkspace, Global.LightSwitchApplication.DataWorkspace)
End Get
End Property
#End Region
Partial Private Sub SubscriptionProperty_Changed()
End Sub
Partial Private Sub SubscriptionDetails_SelectionChanged()
End Sub
Partial Private Sub SubscriptionDetails_Changed(ByVal e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub SubscriptionDetails_Loaded(ByVal succeeded As Boolean)
End Sub
Partial Private Sub ptyPersonID_Changed()
End Sub
Partial Private Sub Person_Changed()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Person_Loaded(ByVal succeeded As Boolean)
End Sub
Partial Private Sub ptySubscriptionID_Changed()
End Sub
Partial Private Sub Subscription_Changed()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Subscription_Loaded(ByVal succeeded As Boolean)
End Sub
Partial Private Sub ActiveSeasons_SelectionChanged()
End Sub
Partial Private Sub ActiveSeasons_Changed(ByVal e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ActiveSeasons_Loaded(ByVal succeeded As Boolean)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Property SubscriptionProperty As Global.LightSwitchApplication.Subscription
Get
Return __CreateAndEditSubscription.DetailsClass.GetValue(Me, __CreateAndEditSubscription.DetailsClass.PropertySetProperties.SubscriptionProperty)
End Get
Set(ByVal value As Global.LightSwitchApplication.Subscription)
__CreateAndEditSubscription.DetailsClass.SetValue(Me, __CreateAndEditSubscription.DetailsClass.PropertySetProperties.SubscriptionProperty, value)
End Set
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub SubscriptionProperty_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
''' <summary>
''' Gets the SubscriptionDetails visual collection. The collection contains all records currently shown on the respective list or grid control.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property SubscriptionDetails As Global.Microsoft.LightSwitch.Framework.Client.VisualCollection(Of Global.LightSwitchApplication.SubscriptionDetail)
Get
Return __CreateAndEditSubscription.DetailsClass.GetValue(Me, __CreateAndEditSubscription.DetailsClass.PropertySetProperties.SubscriptionDetails)
End Get
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub SubscriptionDetails_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Property ptyPersonID As Integer
Get
Return __CreateAndEditSubscription.DetailsClass.GetValue(Me, __CreateAndEditSubscription.DetailsClass.PropertySetProperties.ptyPersonID)
End Get
Set(ByVal value As Integer)
__CreateAndEditSubscription.DetailsClass.SetValue(Me, __CreateAndEditSubscription.DetailsClass.PropertySetProperties.ptyPersonID, value)
End Set
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ptyPersonID_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property Person As Global.LightSwitchApplication.Person
Get
Return __CreateAndEditSubscription.DetailsClass.GetValue(Me, __CreateAndEditSubscription.DetailsClass.PropertySetProperties.Person)
End Get
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Person_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Property ptySubscriptionID As Global.System.Nullable(Of Integer)
Get
Return __CreateAndEditSubscription.DetailsClass.GetValue(Me, __CreateAndEditSubscription.DetailsClass.PropertySetProperties.ptySubscriptionID)
End Get
Set(ByVal value As Global.System.Nullable(Of Integer))
__CreateAndEditSubscription.DetailsClass.SetValue(Me, __CreateAndEditSubscription.DetailsClass.PropertySetProperties.ptySubscriptionID, value)
End Set
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ptySubscriptionID_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property Subscription As Global.LightSwitchApplication.Subscription
Get
Return __CreateAndEditSubscription.DetailsClass.GetValue(Me, __CreateAndEditSubscription.DetailsClass.PropertySetProperties.Subscription)
End Get
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Subscription_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
''' <summary>
''' Gets the ActiveSeasons visual collection. The collection contains all records currently shown on the respective list or grid control.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property ActiveSeasons As Global.Microsoft.LightSwitch.Framework.Client.VisualCollection(Of Global.LightSwitchApplication.Season)
Get
Return __CreateAndEditSubscription.DetailsClass.GetValue(Me, __CreateAndEditSubscription.DetailsClass.PropertySetProperties.ActiveSeasons)
End Get
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ActiveSeasons_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class DetailsClass
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenDetails(Of __CreateAndEditSubscription, __CreateAndEditSubscription.DetailsClass, __CreateAndEditSubscription.DetailsClass.PropertySet, __CreateAndEditSubscription.DetailsClass.CommandSet, __CreateAndEditSubscription.DetailsClass.MethodSet)
Shared Sub New()
Dim initializePropertyEntry = __CreateAndEditSubscription.DetailsClass.PropertySetProperties.SubscriptionProperty
End Sub
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Private Shared ReadOnly __CreateAndEditSubscriptionEntry As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenDetails(Of __CreateAndEditSubscription, __CreateAndEditSubscription.DetailsClass).Entry = _
New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenDetails(Of __CreateAndEditSubscription, __CreateAndEditSubscription.DetailsClass).Entry( _
AddressOf __CreateAndEditSubscription.DetailsClass.__CreateAndEditSubscription_InvokeInitializeDataWorkspace,
AddressOf __CreateAndEditSubscription.DetailsClass.__CreateAndEditSubscription_InvokeSavingEvent,
AddressOf __CreateAndEditSubscription.DetailsClass.__CreateAndEditSubscription_InvokeSavedEvent,
AddressOf __CreateAndEditSubscription.DetailsClass.__CreateAndEditSubscription_InvokeClosingEvent,
AddressOf __CreateAndEditSubscription.DetailsClass.__CreateAndEditSubscription_InvokeCreated,
AddressOf __CreateAndEditSubscription.DetailsClass.__CreateAndEditSubscription_InvokeActivated,
AddressOf __CreateAndEditSubscription.DetailsClass.__CreateAndEditSubscription_InvokeSaveErrorEvent)
Private Shared Sub __CreateAndEditSubscription_InvokeInitializeDataWorkspace(s As __CreateAndEditSubscription, saveChangesTo As Global.System.Collections.Generic.List(Of Global.Microsoft.LightSwitch.IDataService))
s.CreateAndEditSubscription_InitializeDataWorkspace(saveChangesTo)
End Sub
Private Shared Function __CreateAndEditSubscription_InvokeSavingEvent(s As __CreateAndEditSubscription) As Boolean
Dim handled = False
s.CreateAndEditSubscription_Saving(handled)
Return handled
End Function
Private Shared Sub __CreateAndEditSubscription_InvokeSavedEvent(s As __CreateAndEditSubscription)
s.CreateAndEditSubscription_Saved()
End Sub
Private Shared Function __CreateAndEditSubscription_InvokeClosingEvent(s As __CreateAndEditSubscription) As Boolean
Dim cancel = False
s.CreateAndEditSubscription_Closing(cancel)
Return cancel
End Function
Private Shared Sub __CreateAndEditSubscription_InvokeCreated(s As __CreateAndEditSubscription)
s.CreateAndEditSubscription_Created()
End Sub
Private Shared Sub __CreateAndEditSubscription_InvokeActivated(s As __CreateAndEditSubscription)
s.CreateAndEditSubscription_Activated()
End Sub
Private Shared Function __CreateAndEditSubscription_InvokeSaveErrorEvent(s As __CreateAndEditSubscription, ex As Global.System.Exception) As Boolean
Dim handled = False
s.CreateAndEditSubscription_SaveError(ex, handled)
Return handled
End Function
Public Sub New()
MyBase.New()
End Sub
Public Shadows ReadOnly Property Properties As __CreateAndEditSubscription.DetailsClass.PropertySet
Get
Return MyBase.Properties
End Get
End Property
Public Shadows ReadOnly Property Commands As __CreateAndEditSubscription.DetailsClass.CommandSet
Get
Return MyBase.Commands
End Get
End Property
Public Shadows ReadOnly Property Methods As __CreateAndEditSubscription.DetailsClass.MethodSet
Get
Return MyBase.Methods
End Get
End Property
Private Function SubscriptionDetailsQuery() As Global.Microsoft.LightSwitch.IDataServiceQueryable
If Me.Screen.SubscriptionProperty Is Nothing Then
Return Nothing
End If
Dim loader As Global.Microsoft.LightSwitch.IDataServiceQueryable(Of Global.LightSwitchApplication.SubscriptionDetail) = _
DirectCast(DirectCast(Me.Screen.SubscriptionProperty.Details.Properties.SubscriptionDetails, Global.Microsoft.LightSwitch.Details.ILoadableProperty).Loader, Global.Microsoft.LightSwitch.IDataServiceQueryable(Of Global.LightSwitchApplication.SubscriptionDetail))
If loader Is Nothing Then
Return Nothing
End If
Return Global.Microsoft.LightSwitch.DataServiceQueryable.Include(
loader,
"SubscriptionType")
End Function
Private Function ActiveSeasonsQuery() As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return Me.Screen.DataWorkspace.ApplicationData.ActiveSeasons()
End Function
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _SubscriptionProperty As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __CreateAndEditSubscription, __CreateAndEditSubscription.DetailsClass, Global.LightSwitchApplication.Subscription).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _SubscriptionDetails As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __CreateAndEditSubscription, __CreateAndEditSubscription.DetailsClass, Global.LightSwitchApplication.SubscriptionDetail).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _ptyPersonID As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __CreateAndEditSubscription, __CreateAndEditSubscription.DetailsClass, Integer).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _Person As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenReferenceProperty(Of __CreateAndEditSubscription, __CreateAndEditSubscription.DetailsClass, Global.LightSwitchApplication.Person).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _ptySubscriptionID As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __CreateAndEditSubscription, __CreateAndEditSubscription.DetailsClass, Global.System.Nullable(Of Integer)).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _Subscription As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenReferenceProperty(Of __CreateAndEditSubscription, __CreateAndEditSubscription.DetailsClass, Global.LightSwitchApplication.Subscription).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _ActiveSeasons As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __CreateAndEditSubscription, __CreateAndEditSubscription.DetailsClass, Global.LightSwitchApplication.Season).Data
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class PropertySet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenPropertySet(Of __CreateAndEditSubscription, __CreateAndEditSubscription.DetailsClass)
Public ReadOnly Property SubscriptionProperty As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __CreateAndEditSubscription, __CreateAndEditSubscription.DetailsClass, Global.LightSwitchApplication.Subscription)
Get
Return DirectCast(MyBase.GetItem(__CreateAndEditSubscription.DetailsClass.PropertySetProperties.SubscriptionProperty), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __CreateAndEditSubscription, __CreateAndEditSubscription.DetailsClass, Global.LightSwitchApplication.Subscription))
End Get
End Property
Public ReadOnly Property SubscriptionDetails As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __CreateAndEditSubscription, __CreateAndEditSubscription.DetailsClass, Global.LightSwitchApplication.SubscriptionDetail)
Get
Return DirectCast(MyBase.GetItem(__CreateAndEditSubscription.DetailsClass.PropertySetProperties.SubscriptionDetails), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __CreateAndEditSubscription, __CreateAndEditSubscription.DetailsClass, Global.LightSwitchApplication.SubscriptionDetail))
End Get
End Property
Public ReadOnly Property ptyPersonID As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __CreateAndEditSubscription, __CreateAndEditSubscription.DetailsClass, Integer)
Get
Return DirectCast(MyBase.GetItem(__CreateAndEditSubscription.DetailsClass.PropertySetProperties.ptyPersonID), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __CreateAndEditSubscription, __CreateAndEditSubscription.DetailsClass, Integer))
End Get
End Property
Public ReadOnly Property Person As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenReferenceProperty(Of __CreateAndEditSubscription, __CreateAndEditSubscription.DetailsClass, Global.LightSwitchApplication.Person)
Get
Return DirectCast(MyBase.GetItem(__CreateAndEditSubscription.DetailsClass.PropertySetProperties.Person), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenReferenceProperty(Of __CreateAndEditSubscription, __CreateAndEditSubscription.DetailsClass, Global.LightSwitchApplication.Person))
End Get
End Property
Public ReadOnly Property ptySubscriptionID As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __CreateAndEditSubscription, __CreateAndEditSubscription.DetailsClass, Global.System.Nullable(Of Integer))
Get
Return DirectCast(MyBase.GetItem(__CreateAndEditSubscription.DetailsClass.PropertySetProperties.ptySubscriptionID), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __CreateAndEditSubscription, __CreateAndEditSubscription.DetailsClass, Global.System.Nullable(Of Integer)))
End Get
End Property
Public ReadOnly Property Subscription As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenReferenceProperty(Of __CreateAndEditSubscription, __CreateAndEditSubscription.DetailsClass, Global.LightSwitchApplication.Subscription)
Get
Return DirectCast(MyBase.GetItem(__CreateAndEditSubscription.DetailsClass.PropertySetProperties.Subscription), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenReferenceProperty(Of __CreateAndEditSubscription, __CreateAndEditSubscription.DetailsClass, Global.LightSwitchApplication.Subscription))
End Get
End Property
Public ReadOnly Property ActiveSeasons As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __CreateAndEditSubscription, __CreateAndEditSubscription.DetailsClass, Global.LightSwitchApplication.Season)
Get
Return DirectCast(MyBase.GetItem(__CreateAndEditSubscription.DetailsClass.PropertySetProperties.ActiveSeasons), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __CreateAndEditSubscription, __CreateAndEditSubscription.DetailsClass, Global.LightSwitchApplication.Season))
End Get
End Property
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class CommandSet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommandSet(Of __CreateAndEditSubscription, __CreateAndEditSubscription.DetailsClass)
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class MethodSet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethodSet(Of __CreateAndEditSubscription, __CreateAndEditSubscription.DetailsClass)
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend NotInheritable Class PropertySetProperties
Public Shared ReadOnly SubscriptionProperty As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __CreateAndEditSubscription, __CreateAndEditSubscription.DetailsClass, Global.LightSwitchApplication.Subscription).Entry( _
"SubscriptionProperty",
False,
AddressOf __CreateAndEditSubscription.DetailsClass.PropertySetProperties._SubscriptionProperty_Stub,
AddressOf __CreateAndEditSubscription.DetailsClass.PropertySetProperties._SubscriptionProperty_Validate,
AddressOf __CreateAndEditSubscription.DetailsClass.PropertySetProperties._SubscriptionProperty_OnValueChanged)
Private Shared Sub _SubscriptionProperty_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __CreateAndEditSubscription.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __CreateAndEditSubscription, __CreateAndEditSubscription.DetailsClass, Global.LightSwitchApplication.Subscription).Data), d As __CreateAndEditSubscription.DetailsClass, sf As Object)
c(d, d._SubscriptionProperty, sf)
End Sub
Private Shared Sub _SubscriptionProperty_Validate(s As __CreateAndEditSubscription, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.SubscriptionProperty_Validate(r)
End Sub
Private Shared Sub _SubscriptionProperty_OnValueChanged(s As __CreateAndEditSubscription)
s.SubscriptionProperty_Changed()
End Sub
Public Shared ReadOnly SubscriptionDetails As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __CreateAndEditSubscription, __CreateAndEditSubscription.DetailsClass, Global.LightSwitchApplication.SubscriptionDetail).Entry( _
"SubscriptionDetails",
AddressOf __CreateAndEditSubscription.DetailsClass.PropertySetProperties._SubscriptionDetails_Stub,
AddressOf __CreateAndEditSubscription.DetailsClass.PropertySetProperties._SubscriptionDetails_Validate,
AddressOf __CreateAndEditSubscription.DetailsClass.PropertySetProperties._SubscriptionDetails_CreateQuery,
AddressOf __CreateAndEditSubscription.DetailsClass.PropertySetProperties._SubscriptionDetails_SelectionChanged,
AddressOf __CreateAndEditSubscription.DetailsClass.PropertySetProperties._SubscriptionDetails_OnCollectionChanged,
AddressOf __CreateAndEditSubscription.DetailsClass.PropertySetProperties._SubscriptionDetails_OnLoaded)
Private Shared Sub _SubscriptionDetails_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __CreateAndEditSubscription.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __CreateAndEditSubscription, __CreateAndEditSubscription.DetailsClass, Global.LightSwitchApplication.SubscriptionDetail).Data), d As __CreateAndEditSubscription.DetailsClass, sf As Object)
c(d, d._SubscriptionDetails, sf)
End Sub
Private Shared Sub _SubscriptionDetails_Validate(s As __CreateAndEditSubscription, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.SubscriptionDetails_Validate(r)
End Sub
Private Shared Function _SubscriptionDetails_CreateQuery(d As __CreateAndEditSubscription.DetailsClass, args As Object()) As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return d.SubscriptionDetailsQuery()
End Function
Private Shared Sub _SubscriptionDetails_SelectionChanged(s As __CreateAndEditSubscription)
s.SubscriptionDetails_SelectionChanged()
End Sub
Private Shared Sub _SubscriptionDetails_OnCollectionChanged(s As __CreateAndEditSubscription, e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
s.SubscriptionDetails_Changed(e)
End Sub
Private Shared Sub _SubscriptionDetails_OnLoaded(s As __CreateAndEditSubscription, succeeded As Boolean)
s.SubscriptionDetails_Loaded(succeeded)
End Sub
Public Shared ReadOnly ptyPersonID As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __CreateAndEditSubscription, __CreateAndEditSubscription.DetailsClass, Integer).Entry( _
"ptyPersonID",
False,
AddressOf __CreateAndEditSubscription.DetailsClass.PropertySetProperties._ptyPersonID_Stub,
AddressOf __CreateAndEditSubscription.DetailsClass.PropertySetProperties._ptyPersonID_Validate,
AddressOf __CreateAndEditSubscription.DetailsClass.PropertySetProperties._ptyPersonID_OnValueChanged)
Private Shared Sub _ptyPersonID_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __CreateAndEditSubscription.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __CreateAndEditSubscription, __CreateAndEditSubscription.DetailsClass, Integer).Data), d As __CreateAndEditSubscription.DetailsClass, sf As Object)
c(d, d._ptyPersonID, sf)
End Sub
Private Shared Sub _ptyPersonID_Validate(s As __CreateAndEditSubscription, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.ptyPersonID_Validate(r)
End Sub
Private Shared Sub _ptyPersonID_OnValueChanged(s As __CreateAndEditSubscription)
s.ptyPersonID_Changed()
End Sub
Public Shared ReadOnly Person As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenReferenceProperty(Of __CreateAndEditSubscription, __CreateAndEditSubscription.DetailsClass, Global.LightSwitchApplication.Person).Entry( _
"Person",
AddressOf __CreateAndEditSubscription.DetailsClass.PropertySetProperties._Person_Stub,
AddressOf __CreateAndEditSubscription.DetailsClass.PropertySetProperties._Person_Validate,
AddressOf __CreateAndEditSubscription.DetailsClass.PropertySetProperties._Person_CreateQuery,
AddressOf __CreateAndEditSubscription.DetailsClass.PropertySetProperties._Person_OnValueChanged,
AddressOf __CreateAndEditSubscription.DetailsClass.PropertySetProperties._Person_OnLoaded)
Private Shared Sub _Person_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __CreateAndEditSubscription.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenReferenceProperty(Of __CreateAndEditSubscription, __CreateAndEditSubscription.DetailsClass, Global.LightSwitchApplication.Person).Data), d As __CreateAndEditSubscription.DetailsClass, sf As Object)
c(d, d._Person, sf)
End Sub
Private Shared Sub _Person_Validate(s As __CreateAndEditSubscription, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.Person_Validate(r)
End Sub
Private Shared Function _Person_CreateQuery(d As __CreateAndEditSubscription.DetailsClass, args As Object()) As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return Nothing
End Function
Private Shared Sub _Person_OnValueChanged(s As __CreateAndEditSubscription)
s.Person_Changed()
End Sub
Private Shared Sub _Person_OnLoaded(s As __CreateAndEditSubscription, succeeded As Boolean)
s.Person_Loaded(succeeded)
End Sub
Public Shared ReadOnly ptySubscriptionID As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __CreateAndEditSubscription, __CreateAndEditSubscription.DetailsClass, Global.System.Nullable(Of Integer)).Entry( _
"ptySubscriptionID",
False,
AddressOf __CreateAndEditSubscription.DetailsClass.PropertySetProperties._ptySubscriptionID_Stub,
AddressOf __CreateAndEditSubscription.DetailsClass.PropertySetProperties._ptySubscriptionID_Validate,
AddressOf __CreateAndEditSubscription.DetailsClass.PropertySetProperties._ptySubscriptionID_OnValueChanged)
Private Shared Sub _ptySubscriptionID_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __CreateAndEditSubscription.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __CreateAndEditSubscription, __CreateAndEditSubscription.DetailsClass, Global.System.Nullable(Of Integer)).Data), d As __CreateAndEditSubscription.DetailsClass, sf As Object)
c(d, d._ptySubscriptionID, sf)
End Sub
Private Shared Sub _ptySubscriptionID_Validate(s As __CreateAndEditSubscription, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.ptySubscriptionID_Validate(r)
End Sub
Private Shared Sub _ptySubscriptionID_OnValueChanged(s As __CreateAndEditSubscription)
s.ptySubscriptionID_Changed()
End Sub
Public Shared ReadOnly Subscription As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenReferenceProperty(Of __CreateAndEditSubscription, __CreateAndEditSubscription.DetailsClass, Global.LightSwitchApplication.Subscription).Entry( _
"Subscription",
AddressOf __CreateAndEditSubscription.DetailsClass.PropertySetProperties._Subscription_Stub,
AddressOf __CreateAndEditSubscription.DetailsClass.PropertySetProperties._Subscription_Validate,
AddressOf __CreateAndEditSubscription.DetailsClass.PropertySetProperties._Subscription_CreateQuery,
AddressOf __CreateAndEditSubscription.DetailsClass.PropertySetProperties._Subscription_OnValueChanged,
AddressOf __CreateAndEditSubscription.DetailsClass.PropertySetProperties._Subscription_OnLoaded)
Private Shared Sub _Subscription_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __CreateAndEditSubscription.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenReferenceProperty(Of __CreateAndEditSubscription, __CreateAndEditSubscription.DetailsClass, Global.LightSwitchApplication.Subscription).Data), d As __CreateAndEditSubscription.DetailsClass, sf As Object)
c(d, d._Subscription, sf)
End Sub
Private Shared Sub _Subscription_Validate(s As __CreateAndEditSubscription, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.Subscription_Validate(r)
End Sub
Private Shared Function _Subscription_CreateQuery(d As __CreateAndEditSubscription.DetailsClass, args As Object()) As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return Nothing
End Function
Private Shared Sub _Subscription_OnValueChanged(s As __CreateAndEditSubscription)
s.Subscription_Changed()
End Sub
Private Shared Sub _Subscription_OnLoaded(s As __CreateAndEditSubscription, succeeded As Boolean)
s.Subscription_Loaded(succeeded)
End Sub
Public Shared ReadOnly ActiveSeasons As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __CreateAndEditSubscription, __CreateAndEditSubscription.DetailsClass, Global.LightSwitchApplication.Season).Entry( _
"ActiveSeasons",
AddressOf __CreateAndEditSubscription.DetailsClass.PropertySetProperties._ActiveSeasons_Stub,
AddressOf __CreateAndEditSubscription.DetailsClass.PropertySetProperties._ActiveSeasons_Validate,
AddressOf __CreateAndEditSubscription.DetailsClass.PropertySetProperties._ActiveSeasons_CreateQuery,
AddressOf __CreateAndEditSubscription.DetailsClass.PropertySetProperties._ActiveSeasons_SelectionChanged,
AddressOf __CreateAndEditSubscription.DetailsClass.PropertySetProperties._ActiveSeasons_OnCollectionChanged,
AddressOf __CreateAndEditSubscription.DetailsClass.PropertySetProperties._ActiveSeasons_OnLoaded)
Private Shared Sub _ActiveSeasons_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __CreateAndEditSubscription.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __CreateAndEditSubscription, __CreateAndEditSubscription.DetailsClass, Global.LightSwitchApplication.Season).Data), d As __CreateAndEditSubscription.DetailsClass, sf As Object)
c(d, d._ActiveSeasons, sf)
End Sub
Private Shared Sub _ActiveSeasons_Validate(s As __CreateAndEditSubscription, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.ActiveSeasons_Validate(r)
End Sub
Private Shared Function _ActiveSeasons_CreateQuery(d As __CreateAndEditSubscription.DetailsClass, args As Object()) As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return d.ActiveSeasonsQuery()
End Function
Private Shared Sub _ActiveSeasons_SelectionChanged(s As __CreateAndEditSubscription)
s.ActiveSeasons_SelectionChanged()
End Sub
Private Shared Sub _ActiveSeasons_OnCollectionChanged(s As __CreateAndEditSubscription, e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
s.ActiveSeasons_Changed(e)
End Sub
Private Shared Sub _ActiveSeasons_OnLoaded(s As __CreateAndEditSubscription, succeeded As Boolean)
s.ActiveSeasons_Loaded(succeeded)
End Sub
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend NotInheritable Class CommandSetProperties
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend NotInheritable Class MethodSetProperties
End Class
End Class
End Class
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
Partial Public NotInheritable Class ListMailLists
Inherits Global.Microsoft.LightSwitch.Framework.Client.ScreenObject(Of __ListMailLists, __ListMailLists.DetailsClass)
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private Sub New()
MyBase.New("LightSwitchApplication:ListMailLists")
__ListMailLists.DetailsClass.Initialize(Me)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
Public Shared Function CreateInstance() As ListMailLists
Return New __ListMailLists( _
)
End Function
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ListMailLists_InitializeDataWorkspace(ByVal saveChangesTo As Global.System.Collections.Generic.List(Of Global.Microsoft.LightSwitch.IDataService))
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ListMailLists_Created()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ListMailLists_Activated()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ListMailLists_Saving(ByRef handled As Boolean)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ListMailLists_Saved()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ListMailLists_Closing(ByRef cancel As Boolean)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ListMailLists_SaveError(ByVal exception As Global.System.Exception, ByRef handled As Boolean)
End Sub
#Region "Private Properties"
''' <summary>
''' Gets the Application object for this application. The Application object provides access to active screens, methods to open screens and access to the current user.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private ReadOnly Property Application As Global.LightSwitchApplication.Application
Get
Return Global.LightSwitchApplication.Application.Current
End Get
End Property
''' <summary>
''' Gets the containing data workspace. The data workspace provides access to all data sources in the application.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private ReadOnly Property DataWorkspace As Global.LightSwitchApplication.DataWorkspace
Get
Return DirectCast(DirectCast(Me.Details, Global.Microsoft.LightSwitch.Details.Client.IScreenDetails).DataWorkspace, Global.LightSwitchApplication.DataWorkspace)
End Get
End Property
#End Region
Partial Private Sub MailLists_SelectionChanged()
End Sub
Partial Private Sub MailLists_Changed(ByVal e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub MailLists_Loaded(ByVal succeeded As Boolean)
End Sub
Partial Private Sub MailListCodes_SelectionChanged()
End Sub
Partial Private Sub MailListCodes_Changed(ByVal e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub MailListCodes_Loaded(ByVal succeeded As Boolean)
End Sub
Partial Private Sub IncludeSecondaries_Changed()
End Sub
Partial Private Sub IncludeExternalList_Changed()
End Sub
''' <summary>
''' Gets the MailLists visual collection. The collection contains all records currently shown on the respective list or grid control.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property MailLists As Global.Microsoft.LightSwitch.Framework.Client.VisualCollection(Of Global.LightSwitchApplication.MailList)
Get
Return __ListMailLists.DetailsClass.GetValue(Me, __ListMailLists.DetailsClass.PropertySetProperties.MailLists)
End Get
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub MailLists_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
''' <summary>
''' Gets the MailListCodes visual collection. The collection contains all records currently shown on the respective list or grid control.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property MailListCodes As Global.Microsoft.LightSwitch.Framework.Client.VisualCollection(Of Global.LightSwitchApplication.MailListCode)
Get
Return __ListMailLists.DetailsClass.GetValue(Me, __ListMailLists.DetailsClass.PropertySetProperties.MailListCodes)
End Get
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub MailListCodes_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Property IncludeSecondaries As Boolean
Get
Return __ListMailLists.DetailsClass.GetValue(Me, __ListMailLists.DetailsClass.PropertySetProperties.IncludeSecondaries)
End Get
Set(ByVal value As Boolean)
__ListMailLists.DetailsClass.SetValue(Me, __ListMailLists.DetailsClass.PropertySetProperties.IncludeSecondaries, value)
End Set
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub IncludeSecondaries_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Property IncludeExternalList As Boolean
Get
Return __ListMailLists.DetailsClass.GetValue(Me, __ListMailLists.DetailsClass.PropertySetProperties.IncludeExternalList)
End Get
Set(ByVal value As Boolean)
__ListMailLists.DetailsClass.SetValue(Me, __ListMailLists.DetailsClass.PropertySetProperties.IncludeExternalList, value)
End Set
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub IncludeExternalList_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
''' <summary>
''' Calls the CreateMailList screen method.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Sub CreateMailList()
Me.Details.Methods.CreateMailList.CreateInvocation().Execute()
End Sub
Partial Private Sub CreateMailList_CanExecute(ByRef result As Boolean)
End Sub
Partial Private Sub CreateMailList_Execute()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class DetailsClass
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenDetails(Of __ListMailLists, __ListMailLists.DetailsClass, __ListMailLists.DetailsClass.PropertySet, __ListMailLists.DetailsClass.CommandSet, __ListMailLists.DetailsClass.MethodSet)
Shared Sub New()
Dim initializePropertyEntry = __ListMailLists.DetailsClass.PropertySetProperties.MailLists
Dim initializeCommandEntry = __ListMailLists.DetailsClass.CommandSetProperties.CreateMailList
Dim initializeMethodEntry = __ListMailLists.DetailsClass.MethodSetProperties.CreateMailList
End Sub
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Private Shared ReadOnly __ListMailListsEntry As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenDetails(Of __ListMailLists, __ListMailLists.DetailsClass).Entry = _
New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenDetails(Of __ListMailLists, __ListMailLists.DetailsClass).Entry( _
AddressOf __ListMailLists.DetailsClass.__ListMailLists_InvokeInitializeDataWorkspace,
AddressOf __ListMailLists.DetailsClass.__ListMailLists_InvokeSavingEvent,
AddressOf __ListMailLists.DetailsClass.__ListMailLists_InvokeSavedEvent,
AddressOf __ListMailLists.DetailsClass.__ListMailLists_InvokeClosingEvent,
AddressOf __ListMailLists.DetailsClass.__ListMailLists_InvokeCreated,
AddressOf __ListMailLists.DetailsClass.__ListMailLists_InvokeActivated,
AddressOf __ListMailLists.DetailsClass.__ListMailLists_InvokeSaveErrorEvent)
Private Shared Sub __ListMailLists_InvokeInitializeDataWorkspace(s As __ListMailLists, saveChangesTo As Global.System.Collections.Generic.List(Of Global.Microsoft.LightSwitch.IDataService))
s.ListMailLists_InitializeDataWorkspace(saveChangesTo)
End Sub
Private Shared Function __ListMailLists_InvokeSavingEvent(s As __ListMailLists) As Boolean
Dim handled = False
s.ListMailLists_Saving(handled)
Return handled
End Function
Private Shared Sub __ListMailLists_InvokeSavedEvent(s As __ListMailLists)
s.ListMailLists_Saved()
End Sub
Private Shared Function __ListMailLists_InvokeClosingEvent(s As __ListMailLists) As Boolean
Dim cancel = False
s.ListMailLists_Closing(cancel)
Return cancel
End Function
Private Shared Sub __ListMailLists_InvokeCreated(s As __ListMailLists)
s.ListMailLists_Created()
End Sub
Private Shared Sub __ListMailLists_InvokeActivated(s As __ListMailLists)
s.ListMailLists_Activated()
End Sub
Private Shared Function __ListMailLists_InvokeSaveErrorEvent(s As __ListMailLists, ex As Global.System.Exception) As Boolean
Dim handled = False
s.ListMailLists_SaveError(ex, handled)
Return handled
End Function
Public Sub New()
MyBase.New()
End Sub
Public Shadows ReadOnly Property Properties As __ListMailLists.DetailsClass.PropertySet
Get
Return MyBase.Properties
End Get
End Property
Public Shadows ReadOnly Property Commands As __ListMailLists.DetailsClass.CommandSet
Get
Return MyBase.Commands
End Get
End Property
Public Shadows ReadOnly Property Methods As __ListMailLists.DetailsClass.MethodSet
Get
Return MyBase.Methods
End Get
End Property
Private Function MailListsQuery() As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return Me.Screen.DataWorkspace.ApplicationData.MailLists
End Function
Private Function MailListCodesQuery() As Global.Microsoft.LightSwitch.IDataServiceQueryable
If Me.Screen.MailLists.SelectedItem Is Nothing Then
Return Nothing
End If
Dim loader As Global.Microsoft.LightSwitch.IDataServiceQueryable(Of Global.LightSwitchApplication.MailListCode) = _
DirectCast(DirectCast(Me.Screen.MailLists.SelectedItem.Details.Properties.MailListCodes, Global.Microsoft.LightSwitch.Details.ILoadableProperty).Loader, Global.Microsoft.LightSwitch.IDataServiceQueryable(Of Global.LightSwitchApplication.MailListCode))
If loader Is Nothing Then
Return Nothing
End If
Return Global.Microsoft.LightSwitch.DataServiceQueryable.Include(
loader,
"MailCode")
End Function
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _MailLists As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __ListMailLists, __ListMailLists.DetailsClass, Global.LightSwitchApplication.MailList).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _MailListCodes As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __ListMailLists, __ListMailLists.DetailsClass, Global.LightSwitchApplication.MailListCode).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _IncludeSecondaries As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __ListMailLists, __ListMailLists.DetailsClass, Boolean).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _IncludeExternalList As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __ListMailLists, __ListMailLists.DetailsClass, Boolean).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _CreateMailListCommand As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __ListMailLists, __ListMailLists.DetailsClass).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _CreateMailListMethod As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __ListMailLists, __ListMailLists.DetailsClass).Data
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class PropertySet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenPropertySet(Of __ListMailLists, __ListMailLists.DetailsClass)
Public ReadOnly Property MailLists As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __ListMailLists, __ListMailLists.DetailsClass, Global.LightSwitchApplication.MailList)
Get
Return DirectCast(MyBase.GetItem(__ListMailLists.DetailsClass.PropertySetProperties.MailLists), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __ListMailLists, __ListMailLists.DetailsClass, Global.LightSwitchApplication.MailList))
End Get
End Property
Public ReadOnly Property MailListCodes As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __ListMailLists, __ListMailLists.DetailsClass, Global.LightSwitchApplication.MailListCode)
Get
Return DirectCast(MyBase.GetItem(__ListMailLists.DetailsClass.PropertySetProperties.MailListCodes), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __ListMailLists, __ListMailLists.DetailsClass, Global.LightSwitchApplication.MailListCode))
End Get
End Property
Public ReadOnly Property IncludeSecondaries As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __ListMailLists, __ListMailLists.DetailsClass, Boolean)
Get
Return DirectCast(MyBase.GetItem(__ListMailLists.DetailsClass.PropertySetProperties.IncludeSecondaries), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __ListMailLists, __ListMailLists.DetailsClass, Boolean))
End Get
End Property
Public ReadOnly Property IncludeExternalList As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __ListMailLists, __ListMailLists.DetailsClass, Boolean)
Get
Return DirectCast(MyBase.GetItem(__ListMailLists.DetailsClass.PropertySetProperties.IncludeExternalList), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __ListMailLists, __ListMailLists.DetailsClass, Boolean))
End Get
End Property
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class CommandSet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommandSet(Of __ListMailLists, __ListMailLists.DetailsClass)
Public ReadOnly Property CreateMailList As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __ListMailLists, __ListMailLists.DetailsClass)
Get
Return DirectCast(MyBase.GetItem(__ListMailLists.DetailsClass.CommandSetProperties.CreateMailList), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __ListMailLists, __ListMailLists.DetailsClass))
End Get
End Property
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class MethodSet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethodSet(Of __ListMailLists, __ListMailLists.DetailsClass)
Public ReadOnly Property CreateMailList As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __ListMailLists, __ListMailLists.DetailsClass)
Get
Return DirectCast(MyBase.GetItem(__ListMailLists.DetailsClass.MethodSetProperties.CreateMailList), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __ListMailLists, __ListMailLists.DetailsClass))
End Get
End Property
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend NotInheritable Class PropertySetProperties
Public Shared ReadOnly MailLists As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __ListMailLists, __ListMailLists.DetailsClass, Global.LightSwitchApplication.MailList).Entry( _
"MailLists",
AddressOf __ListMailLists.DetailsClass.PropertySetProperties._MailLists_Stub,
AddressOf __ListMailLists.DetailsClass.PropertySetProperties._MailLists_Validate,
AddressOf __ListMailLists.DetailsClass.PropertySetProperties._MailLists_CreateQuery,
AddressOf __ListMailLists.DetailsClass.PropertySetProperties._MailLists_SelectionChanged,
AddressOf __ListMailLists.DetailsClass.PropertySetProperties._MailLists_OnCollectionChanged,
AddressOf __ListMailLists.DetailsClass.PropertySetProperties._MailLists_OnLoaded)
Private Shared Sub _MailLists_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __ListMailLists.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __ListMailLists, __ListMailLists.DetailsClass, Global.LightSwitchApplication.MailList).Data), d As __ListMailLists.DetailsClass, sf As Object)
c(d, d._MailLists, sf)
End Sub
Private Shared Sub _MailLists_Validate(s As __ListMailLists, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.MailLists_Validate(r)
End Sub
Private Shared Function _MailLists_CreateQuery(d As __ListMailLists.DetailsClass, args As Object()) As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return d.MailListsQuery()
End Function
Private Shared Sub _MailLists_SelectionChanged(s As __ListMailLists)
s.MailLists_SelectionChanged()
End Sub
Private Shared Sub _MailLists_OnCollectionChanged(s As __ListMailLists, e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
s.MailLists_Changed(e)
End Sub
Private Shared Sub _MailLists_OnLoaded(s As __ListMailLists, succeeded As Boolean)
s.MailLists_Loaded(succeeded)
End Sub
Public Shared ReadOnly MailListCodes As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __ListMailLists, __ListMailLists.DetailsClass, Global.LightSwitchApplication.MailListCode).Entry( _
"MailListCodes",
AddressOf __ListMailLists.DetailsClass.PropertySetProperties._MailListCodes_Stub,
AddressOf __ListMailLists.DetailsClass.PropertySetProperties._MailListCodes_Validate,
AddressOf __ListMailLists.DetailsClass.PropertySetProperties._MailListCodes_CreateQuery,
AddressOf __ListMailLists.DetailsClass.PropertySetProperties._MailListCodes_SelectionChanged,
AddressOf __ListMailLists.DetailsClass.PropertySetProperties._MailListCodes_OnCollectionChanged,
AddressOf __ListMailLists.DetailsClass.PropertySetProperties._MailListCodes_OnLoaded)
Private Shared Sub _MailListCodes_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __ListMailLists.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __ListMailLists, __ListMailLists.DetailsClass, Global.LightSwitchApplication.MailListCode).Data), d As __ListMailLists.DetailsClass, sf As Object)
c(d, d._MailListCodes, sf)
End Sub
Private Shared Sub _MailListCodes_Validate(s As __ListMailLists, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.MailListCodes_Validate(r)
End Sub
Private Shared Function _MailListCodes_CreateQuery(d As __ListMailLists.DetailsClass, args As Object()) As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return d.MailListCodesQuery()
End Function
Private Shared Sub _MailListCodes_SelectionChanged(s As __ListMailLists)
s.MailListCodes_SelectionChanged()
End Sub
Private Shared Sub _MailListCodes_OnCollectionChanged(s As __ListMailLists, e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
s.MailListCodes_Changed(e)
End Sub
Private Shared Sub _MailListCodes_OnLoaded(s As __ListMailLists, succeeded As Boolean)
s.MailListCodes_Loaded(succeeded)
End Sub
Public Shared ReadOnly IncludeSecondaries As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __ListMailLists, __ListMailLists.DetailsClass, Boolean).Entry( _
"IncludeSecondaries",
False,
AddressOf __ListMailLists.DetailsClass.PropertySetProperties._IncludeSecondaries_Stub,
AddressOf __ListMailLists.DetailsClass.PropertySetProperties._IncludeSecondaries_Validate,
AddressOf __ListMailLists.DetailsClass.PropertySetProperties._IncludeSecondaries_OnValueChanged)
Private Shared Sub _IncludeSecondaries_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __ListMailLists.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __ListMailLists, __ListMailLists.DetailsClass, Boolean).Data), d As __ListMailLists.DetailsClass, sf As Object)
c(d, d._IncludeSecondaries, sf)
End Sub
Private Shared Sub _IncludeSecondaries_Validate(s As __ListMailLists, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.IncludeSecondaries_Validate(r)
End Sub
Private Shared Sub _IncludeSecondaries_OnValueChanged(s As __ListMailLists)
s.IncludeSecondaries_Changed()
End Sub
Public Shared ReadOnly IncludeExternalList As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __ListMailLists, __ListMailLists.DetailsClass, Boolean).Entry( _
"IncludeExternalList",
False,
AddressOf __ListMailLists.DetailsClass.PropertySetProperties._IncludeExternalList_Stub,
AddressOf __ListMailLists.DetailsClass.PropertySetProperties._IncludeExternalList_Validate,
AddressOf __ListMailLists.DetailsClass.PropertySetProperties._IncludeExternalList_OnValueChanged)
Private Shared Sub _IncludeExternalList_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __ListMailLists.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __ListMailLists, __ListMailLists.DetailsClass, Boolean).Data), d As __ListMailLists.DetailsClass, sf As Object)
c(d, d._IncludeExternalList, sf)
End Sub
Private Shared Sub _IncludeExternalList_Validate(s As __ListMailLists, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.IncludeExternalList_Validate(r)
End Sub
Private Shared Sub _IncludeExternalList_OnValueChanged(s As __ListMailLists)
s.IncludeExternalList_Changed()
End Sub
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend NotInheritable Class CommandSetProperties
Public Shared ReadOnly CreateMailList As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __ListMailLists, __ListMailLists.DetailsClass).Entry( _
"CreateMailList",
AddressOf __ListMailLists.DetailsClass.CommandSetProperties._CreateMailList_Stub,
AddressOf __ListMailLists.DetailsClass.CommandSetProperties._CreateMailList_CreateExecutableObject)
Private Shared Sub _CreateMailList_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __ListMailLists.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __ListMailLists, __ListMailLists.DetailsClass).Data), d As __ListMailLists.DetailsClass, sf As Object)
c(d, d._CreateMailListCommand, sf)
End Sub
Private Shared Function _CreateMailList_CreateExecutableObject(d As __ListMailLists.DetailsClass) As Global.Microsoft.LightSwitch.IExecutable
Return DirectCast(d, __ListMailLists.DetailsClass).Methods.CreateMailList.CreateInvocation()
End Function
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend NotInheritable Class MethodSetProperties
Public Shared ReadOnly CreateMailList As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __ListMailLists, __ListMailLists.DetailsClass).Entry( _
"CreateMailList",
AddressOf __ListMailLists.DetailsClass.MethodSetProperties._CreateMailList_Stub,
AddressOf __ListMailLists.DetailsClass.MethodSetProperties._CreateMailList_CanInvoke,
AddressOf __ListMailLists.DetailsClass.MethodSetProperties._CreateMailList_InvokeMethod)
Private Shared Sub _CreateMailList_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __ListMailLists.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __ListMailLists, __ListMailLists.DetailsClass).Data), d As __ListMailLists.DetailsClass, sf As Object)
c(d, d._CreateMailListMethod, sf)
End Sub
Private Shared Function _CreateMailList_CanInvoke(d As __ListMailLists.DetailsClass, args As Global.System.Collections.ObjectModel.ReadOnlyCollection(Of Object), ex As Global.System.Exception) As Global.System.Exception
Dim result = True
d.Screen.CreateMailList_CanExecute(result)
Return If(result, Nothing, ex)
End Function
Private Shared Sub _CreateMailList_InvokeMethod(d As __ListMailLists.DetailsClass, args As Global.System.Collections.ObjectModel.ReadOnlyCollection(Of Object))
d.Screen.CreateMailList_Execute()
End Sub
End Class
End Class
End Class
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
Partial Public NotInheritable Class PeopleForMailing
Inherits Global.Microsoft.LightSwitch.Framework.Client.ScreenObject(Of __PeopleForMailing, __PeopleForMailing.DetailsClass)
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private Sub New(ByVal ptyMailListID As Integer)
MyBase.New("LightSwitchApplication:PeopleForMailing")
Me.ptyMailListID = ptyMailListID
__PeopleForMailing.DetailsClass.Initialize(Me)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
Public Shared Function CreateInstance(ByVal ptyMailListID As Integer) As PeopleForMailing
Return New __PeopleForMailing( _
ptyMailListID _
)
End Function
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub PeopleForMailing_InitializeDataWorkspace(ByVal saveChangesTo As Global.System.Collections.Generic.List(Of Global.Microsoft.LightSwitch.IDataService))
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub PeopleForMailing_Created()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub PeopleForMailing_Activated()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub PeopleForMailing_Saving(ByRef handled As Boolean)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub PeopleForMailing_Saved()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub PeopleForMailing_Closing(ByRef cancel As Boolean)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub PeopleForMailing_SaveError(ByVal exception As Global.System.Exception, ByRef handled As Boolean)
End Sub
#Region "Private Properties"
''' <summary>
''' Gets the Application object for this application. The Application object provides access to active screens, methods to open screens and access to the current user.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private ReadOnly Property Application As Global.LightSwitchApplication.Application
Get
Return Global.LightSwitchApplication.Application.Current
End Get
End Property
''' <summary>
''' Gets the containing data workspace. The data workspace provides access to all data sources in the application.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private ReadOnly Property DataWorkspace As Global.LightSwitchApplication.DataWorkspace
Get
Return DirectCast(DirectCast(Me.Details, Global.Microsoft.LightSwitch.Details.Client.IScreenDetails).DataWorkspace, Global.LightSwitchApplication.DataWorkspace)
End Get
End Property
#End Region
Partial Private Sub People_SelectionChanged()
End Sub
Partial Private Sub People_Changed(ByVal e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub People_Loaded(ByVal succeeded As Boolean)
End Sub
Partial Private Sub ptyMailListID_Changed()
End Sub
Partial Private Sub SelectMailListCodes_SelectionChanged()
End Sub
Partial Private Sub SelectMailListCodes_Changed(ByVal e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub SelectMailListCodes_Loaded(ByVal succeeded As Boolean)
End Sub
''' <summary>
''' Gets the People visual collection. The collection contains all records currently shown on the respective list or grid control.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property People As Global.Microsoft.LightSwitch.Framework.Client.VisualCollection(Of Global.LightSwitchApplication.Person)
Get
Return __PeopleForMailing.DetailsClass.GetValue(Me, __PeopleForMailing.DetailsClass.PropertySetProperties.People)
End Get
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub People_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Property ptyMailListID As Integer
Get
Return __PeopleForMailing.DetailsClass.GetValue(Me, __PeopleForMailing.DetailsClass.PropertySetProperties.ptyMailListID)
End Get
Set(ByVal value As Integer)
__PeopleForMailing.DetailsClass.SetValue(Me, __PeopleForMailing.DetailsClass.PropertySetProperties.ptyMailListID, value)
End Set
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ptyMailListID_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
''' <summary>
''' Gets the SelectMailListCodes visual collection. The collection contains all records currently shown on the respective list or grid control.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property SelectMailListCodes As Global.Microsoft.LightSwitch.Framework.Client.VisualCollection(Of Global.LightSwitchApplication.MailListCode)
Get
Return __PeopleForMailing.DetailsClass.GetValue(Me, __PeopleForMailing.DetailsClass.PropertySetProperties.SelectMailListCodes)
End Get
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub SelectMailListCodes_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
''' <summary>
''' Calls the Method screen method.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Sub Method()
Me.Details.Methods.Method.CreateInvocation().Execute()
End Sub
Partial Private Sub Method_CanExecute(ByRef result As Boolean)
End Sub
Partial Private Sub Method_Execute()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class DetailsClass
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenDetails(Of __PeopleForMailing, __PeopleForMailing.DetailsClass, __PeopleForMailing.DetailsClass.PropertySet, __PeopleForMailing.DetailsClass.CommandSet, __PeopleForMailing.DetailsClass.MethodSet)
Shared Sub New()
Dim initializePropertyEntry = __PeopleForMailing.DetailsClass.PropertySetProperties.People
Dim initializeCommandEntry = __PeopleForMailing.DetailsClass.CommandSetProperties.Method
Dim initializeMethodEntry = __PeopleForMailing.DetailsClass.MethodSetProperties.Method
End Sub
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Private Shared ReadOnly __PeopleForMailingEntry As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenDetails(Of __PeopleForMailing, __PeopleForMailing.DetailsClass).Entry = _
New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenDetails(Of __PeopleForMailing, __PeopleForMailing.DetailsClass).Entry( _
AddressOf __PeopleForMailing.DetailsClass.__PeopleForMailing_InvokeInitializeDataWorkspace,
AddressOf __PeopleForMailing.DetailsClass.__PeopleForMailing_InvokeSavingEvent,
AddressOf __PeopleForMailing.DetailsClass.__PeopleForMailing_InvokeSavedEvent,
AddressOf __PeopleForMailing.DetailsClass.__PeopleForMailing_InvokeClosingEvent,
AddressOf __PeopleForMailing.DetailsClass.__PeopleForMailing_InvokeCreated,
AddressOf __PeopleForMailing.DetailsClass.__PeopleForMailing_InvokeActivated,
AddressOf __PeopleForMailing.DetailsClass.__PeopleForMailing_InvokeSaveErrorEvent)
Private Shared Sub __PeopleForMailing_InvokeInitializeDataWorkspace(s As __PeopleForMailing, saveChangesTo As Global.System.Collections.Generic.List(Of Global.Microsoft.LightSwitch.IDataService))
s.PeopleForMailing_InitializeDataWorkspace(saveChangesTo)
End Sub
Private Shared Function __PeopleForMailing_InvokeSavingEvent(s As __PeopleForMailing) As Boolean
Dim handled = False
s.PeopleForMailing_Saving(handled)
Return handled
End Function
Private Shared Sub __PeopleForMailing_InvokeSavedEvent(s As __PeopleForMailing)
s.PeopleForMailing_Saved()
End Sub
Private Shared Function __PeopleForMailing_InvokeClosingEvent(s As __PeopleForMailing) As Boolean
Dim cancel = False
s.PeopleForMailing_Closing(cancel)
Return cancel
End Function
Private Shared Sub __PeopleForMailing_InvokeCreated(s As __PeopleForMailing)
s.PeopleForMailing_Created()
End Sub
Private Shared Sub __PeopleForMailing_InvokeActivated(s As __PeopleForMailing)
s.PeopleForMailing_Activated()
End Sub
Private Shared Function __PeopleForMailing_InvokeSaveErrorEvent(s As __PeopleForMailing, ex As Global.System.Exception) As Boolean
Dim handled = False
s.PeopleForMailing_SaveError(ex, handled)
Return handled
End Function
Public Sub New()
MyBase.New()
End Sub
Public Shadows ReadOnly Property Properties As __PeopleForMailing.DetailsClass.PropertySet
Get
Return MyBase.Properties
End Get
End Property
Public Shadows ReadOnly Property Commands As __PeopleForMailing.DetailsClass.CommandSet
Get
Return MyBase.Commands
End Get
End Property
Public Shadows ReadOnly Property Methods As __PeopleForMailing.DetailsClass.MethodSet
Get
Return MyBase.Methods
End Get
End Property
Private Function PeopleQuery() As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return Global.Microsoft.LightSwitch.DataServiceQueryable.Include(
Me.Screen.DataWorkspace.ApplicationData.People,
"MailCode")
End Function
Private Function SelectMailListCodesQuery(ByVal prmMailList As Global.System.Nullable(Of Integer)) As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return Me.Screen.DataWorkspace.ApplicationData.SelectMailListCodes(prmMailList)
End Function
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _People As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __PeopleForMailing, __PeopleForMailing.DetailsClass, Global.LightSwitchApplication.Person).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _ptyMailListID As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __PeopleForMailing, __PeopleForMailing.DetailsClass, Integer).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _SelectMailListCodes As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __PeopleForMailing, __PeopleForMailing.DetailsClass, Global.LightSwitchApplication.MailListCode).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _MethodCommand As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __PeopleForMailing, __PeopleForMailing.DetailsClass).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _MethodMethod As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __PeopleForMailing, __PeopleForMailing.DetailsClass).Data
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class PropertySet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenPropertySet(Of __PeopleForMailing, __PeopleForMailing.DetailsClass)
Public ReadOnly Property People As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __PeopleForMailing, __PeopleForMailing.DetailsClass, Global.LightSwitchApplication.Person)
Get
Return DirectCast(MyBase.GetItem(__PeopleForMailing.DetailsClass.PropertySetProperties.People), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __PeopleForMailing, __PeopleForMailing.DetailsClass, Global.LightSwitchApplication.Person))
End Get
End Property
Public ReadOnly Property ptyMailListID As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __PeopleForMailing, __PeopleForMailing.DetailsClass, Integer)
Get
Return DirectCast(MyBase.GetItem(__PeopleForMailing.DetailsClass.PropertySetProperties.ptyMailListID), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __PeopleForMailing, __PeopleForMailing.DetailsClass, Integer))
End Get
End Property
Public ReadOnly Property SelectMailListCodes As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __PeopleForMailing, __PeopleForMailing.DetailsClass, Global.LightSwitchApplication.MailListCode)
Get
Return DirectCast(MyBase.GetItem(__PeopleForMailing.DetailsClass.PropertySetProperties.SelectMailListCodes), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __PeopleForMailing, __PeopleForMailing.DetailsClass, Global.LightSwitchApplication.MailListCode))
End Get
End Property
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class CommandSet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommandSet(Of __PeopleForMailing, __PeopleForMailing.DetailsClass)
Public ReadOnly Property Method As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __PeopleForMailing, __PeopleForMailing.DetailsClass)
Get
Return DirectCast(MyBase.GetItem(__PeopleForMailing.DetailsClass.CommandSetProperties.Method), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __PeopleForMailing, __PeopleForMailing.DetailsClass))
End Get
End Property
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class MethodSet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethodSet(Of __PeopleForMailing, __PeopleForMailing.DetailsClass)
Public ReadOnly Property Method As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __PeopleForMailing, __PeopleForMailing.DetailsClass)
Get
Return DirectCast(MyBase.GetItem(__PeopleForMailing.DetailsClass.MethodSetProperties.Method), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __PeopleForMailing, __PeopleForMailing.DetailsClass))
End Get
End Property
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend NotInheritable Class PropertySetProperties
Public Shared ReadOnly People As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __PeopleForMailing, __PeopleForMailing.DetailsClass, Global.LightSwitchApplication.Person).Entry( _
"People",
AddressOf __PeopleForMailing.DetailsClass.PropertySetProperties._People_Stub,
AddressOf __PeopleForMailing.DetailsClass.PropertySetProperties._People_Validate,
AddressOf __PeopleForMailing.DetailsClass.PropertySetProperties._People_CreateQuery,
AddressOf __PeopleForMailing.DetailsClass.PropertySetProperties._People_SelectionChanged,
AddressOf __PeopleForMailing.DetailsClass.PropertySetProperties._People_OnCollectionChanged,
AddressOf __PeopleForMailing.DetailsClass.PropertySetProperties._People_OnLoaded)
Private Shared Sub _People_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __PeopleForMailing.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __PeopleForMailing, __PeopleForMailing.DetailsClass, Global.LightSwitchApplication.Person).Data), d As __PeopleForMailing.DetailsClass, sf As Object)
c(d, d._People, sf)
End Sub
Private Shared Sub _People_Validate(s As __PeopleForMailing, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.People_Validate(r)
End Sub
Private Shared Function _People_CreateQuery(d As __PeopleForMailing.DetailsClass, args As Object()) As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return d.PeopleQuery()
End Function
Private Shared Sub _People_SelectionChanged(s As __PeopleForMailing)
s.People_SelectionChanged()
End Sub
Private Shared Sub _People_OnCollectionChanged(s As __PeopleForMailing, e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
s.People_Changed(e)
End Sub
Private Shared Sub _People_OnLoaded(s As __PeopleForMailing, succeeded As Boolean)
s.People_Loaded(succeeded)
End Sub
Public Shared ReadOnly ptyMailListID As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __PeopleForMailing, __PeopleForMailing.DetailsClass, Integer).Entry( _
"ptyMailListID",
False,
AddressOf __PeopleForMailing.DetailsClass.PropertySetProperties._ptyMailListID_Stub,
AddressOf __PeopleForMailing.DetailsClass.PropertySetProperties._ptyMailListID_Validate,
AddressOf __PeopleForMailing.DetailsClass.PropertySetProperties._ptyMailListID_OnValueChanged)
Private Shared Sub _ptyMailListID_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __PeopleForMailing.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __PeopleForMailing, __PeopleForMailing.DetailsClass, Integer).Data), d As __PeopleForMailing.DetailsClass, sf As Object)
c(d, d._ptyMailListID, sf)
End Sub
Private Shared Sub _ptyMailListID_Validate(s As __PeopleForMailing, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.ptyMailListID_Validate(r)
End Sub
Private Shared Sub _ptyMailListID_OnValueChanged(s As __PeopleForMailing)
s.ptyMailListID_Changed()
End Sub
Public Shared ReadOnly SelectMailListCodes As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __PeopleForMailing, __PeopleForMailing.DetailsClass, Global.LightSwitchApplication.MailListCode).Entry( _
"SelectMailListCodes",
AddressOf __PeopleForMailing.DetailsClass.PropertySetProperties._SelectMailListCodes_Stub,
AddressOf __PeopleForMailing.DetailsClass.PropertySetProperties._SelectMailListCodes_Validate,
AddressOf __PeopleForMailing.DetailsClass.PropertySetProperties._SelectMailListCodes_CreateQuery,
AddressOf __PeopleForMailing.DetailsClass.PropertySetProperties._SelectMailListCodes_SelectionChanged,
AddressOf __PeopleForMailing.DetailsClass.PropertySetProperties._SelectMailListCodes_OnCollectionChanged,
AddressOf __PeopleForMailing.DetailsClass.PropertySetProperties._SelectMailListCodes_OnLoaded)
Private Shared Sub _SelectMailListCodes_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __PeopleForMailing.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __PeopleForMailing, __PeopleForMailing.DetailsClass, Global.LightSwitchApplication.MailListCode).Data), d As __PeopleForMailing.DetailsClass, sf As Object)
c(d, d._SelectMailListCodes, sf)
End Sub
Private Shared Sub _SelectMailListCodes_Validate(s As __PeopleForMailing, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.SelectMailListCodes_Validate(r)
End Sub
Private Shared Function _SelectMailListCodes_CreateQuery(d As __PeopleForMailing.DetailsClass, args As Object()) As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return d.SelectMailListCodesQuery(DirectCast(args(0), Global.System.Nullable(Of Integer)))
End Function
Private Shared Sub _SelectMailListCodes_SelectionChanged(s As __PeopleForMailing)
s.SelectMailListCodes_SelectionChanged()
End Sub
Private Shared Sub _SelectMailListCodes_OnCollectionChanged(s As __PeopleForMailing, e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
s.SelectMailListCodes_Changed(e)
End Sub
Private Shared Sub _SelectMailListCodes_OnLoaded(s As __PeopleForMailing, succeeded As Boolean)
s.SelectMailListCodes_Loaded(succeeded)
End Sub
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend NotInheritable Class CommandSetProperties
Public Shared ReadOnly Method As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __PeopleForMailing, __PeopleForMailing.DetailsClass).Entry( _
"Method",
AddressOf __PeopleForMailing.DetailsClass.CommandSetProperties._Method_Stub,
AddressOf __PeopleForMailing.DetailsClass.CommandSetProperties._Method_CreateExecutableObject)
Private Shared Sub _Method_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __PeopleForMailing.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __PeopleForMailing, __PeopleForMailing.DetailsClass).Data), d As __PeopleForMailing.DetailsClass, sf As Object)
c(d, d._MethodCommand, sf)
End Sub
Private Shared Function _Method_CreateExecutableObject(d As __PeopleForMailing.DetailsClass) As Global.Microsoft.LightSwitch.IExecutable
Return DirectCast(d, __PeopleForMailing.DetailsClass).Methods.Method.CreateInvocation()
End Function
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend NotInheritable Class MethodSetProperties
Public Shared ReadOnly Method As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __PeopleForMailing, __PeopleForMailing.DetailsClass).Entry( _
"Method",
AddressOf __PeopleForMailing.DetailsClass.MethodSetProperties._Method_Stub,
AddressOf __PeopleForMailing.DetailsClass.MethodSetProperties._Method_CanInvoke,
AddressOf __PeopleForMailing.DetailsClass.MethodSetProperties._Method_InvokeMethod)
Private Shared Sub _Method_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __PeopleForMailing.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __PeopleForMailing, __PeopleForMailing.DetailsClass).Data), d As __PeopleForMailing.DetailsClass, sf As Object)
c(d, d._MethodMethod, sf)
End Sub
Private Shared Function _Method_CanInvoke(d As __PeopleForMailing.DetailsClass, args As Global.System.Collections.ObjectModel.ReadOnlyCollection(Of Object), ex As Global.System.Exception) As Global.System.Exception
Dim result = True
d.Screen.Method_CanExecute(result)
Return If(result, Nothing, ex)
End Function
Private Shared Sub _Method_InvokeMethod(d As __PeopleForMailing.DetailsClass, args As Global.System.Collections.ObjectModel.ReadOnlyCollection(Of Object))
d.Screen.Method_Execute()
End Sub
End Class
End Class
End Class
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
Partial Public NotInheritable Class EditPrograms
Inherits Global.Microsoft.LightSwitch.Framework.Client.ScreenObject(Of __EditPrograms, __EditPrograms.DetailsClass)
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private Sub New()
MyBase.New("LightSwitchApplication:EditPrograms")
__EditPrograms.DetailsClass.Initialize(Me)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
Public Shared Function CreateInstance() As EditPrograms
Return New __EditPrograms( _
)
End Function
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub EditPrograms_InitializeDataWorkspace(ByVal saveChangesTo As Global.System.Collections.Generic.List(Of Global.Microsoft.LightSwitch.IDataService))
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub EditPrograms_Created()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub EditPrograms_Activated()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub EditPrograms_Saving(ByRef handled As Boolean)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub EditPrograms_Saved()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub EditPrograms_Closing(ByRef cancel As Boolean)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub EditPrograms_SaveError(ByVal exception As Global.System.Exception, ByRef handled As Boolean)
End Sub
#Region "Private Properties"
''' <summary>
''' Gets the Application object for this application. The Application object provides access to active screens, methods to open screens and access to the current user.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private ReadOnly Property Application As Global.LightSwitchApplication.Application
Get
Return Global.LightSwitchApplication.Application.Current
End Get
End Property
''' <summary>
''' Gets the containing data workspace. The data workspace provides access to all data sources in the application.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private ReadOnly Property DataWorkspace As Global.LightSwitchApplication.DataWorkspace
Get
Return DirectCast(DirectCast(Me.Details, Global.Microsoft.LightSwitch.Details.Client.IScreenDetails).DataWorkspace, Global.LightSwitchApplication.DataWorkspace)
End Get
End Property
#End Region
Partial Private Sub ProgramNames_SelectionChanged()
End Sub
Partial Private Sub ProgramNames_Changed(ByVal e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ProgramNames_Loaded(ByVal succeeded As Boolean)
End Sub
''' <summary>
''' Gets the ProgramNames visual collection. The collection contains all records currently shown on the respective list or grid control.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property ProgramNames As Global.Microsoft.LightSwitch.Framework.Client.VisualCollection(Of Global.LightSwitchApplication.ProgramName)
Get
Return __EditPrograms.DetailsClass.GetValue(Me, __EditPrograms.DetailsClass.PropertySetProperties.ProgramNames)
End Get
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ProgramNames_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class DetailsClass
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenDetails(Of __EditPrograms, __EditPrograms.DetailsClass, __EditPrograms.DetailsClass.PropertySet, __EditPrograms.DetailsClass.CommandSet, __EditPrograms.DetailsClass.MethodSet)
Shared Sub New()
Dim initializePropertyEntry = __EditPrograms.DetailsClass.PropertySetProperties.ProgramNames
End Sub
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Private Shared ReadOnly __EditProgramsEntry As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenDetails(Of __EditPrograms, __EditPrograms.DetailsClass).Entry = _
New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenDetails(Of __EditPrograms, __EditPrograms.DetailsClass).Entry( _
AddressOf __EditPrograms.DetailsClass.__EditPrograms_InvokeInitializeDataWorkspace,
AddressOf __EditPrograms.DetailsClass.__EditPrograms_InvokeSavingEvent,
AddressOf __EditPrograms.DetailsClass.__EditPrograms_InvokeSavedEvent,
AddressOf __EditPrograms.DetailsClass.__EditPrograms_InvokeClosingEvent,
AddressOf __EditPrograms.DetailsClass.__EditPrograms_InvokeCreated,
AddressOf __EditPrograms.DetailsClass.__EditPrograms_InvokeActivated,
AddressOf __EditPrograms.DetailsClass.__EditPrograms_InvokeSaveErrorEvent)
Private Shared Sub __EditPrograms_InvokeInitializeDataWorkspace(s As __EditPrograms, saveChangesTo As Global.System.Collections.Generic.List(Of Global.Microsoft.LightSwitch.IDataService))
s.EditPrograms_InitializeDataWorkspace(saveChangesTo)
End Sub
Private Shared Function __EditPrograms_InvokeSavingEvent(s As __EditPrograms) As Boolean
Dim handled = False
s.EditPrograms_Saving(handled)
Return handled
End Function
Private Shared Sub __EditPrograms_InvokeSavedEvent(s As __EditPrograms)
s.EditPrograms_Saved()
End Sub
Private Shared Function __EditPrograms_InvokeClosingEvent(s As __EditPrograms) As Boolean
Dim cancel = False
s.EditPrograms_Closing(cancel)
Return cancel
End Function
Private Shared Sub __EditPrograms_InvokeCreated(s As __EditPrograms)
s.EditPrograms_Created()
End Sub
Private Shared Sub __EditPrograms_InvokeActivated(s As __EditPrograms)
s.EditPrograms_Activated()
End Sub
Private Shared Function __EditPrograms_InvokeSaveErrorEvent(s As __EditPrograms, ex As Global.System.Exception) As Boolean
Dim handled = False
s.EditPrograms_SaveError(ex, handled)
Return handled
End Function
Public Sub New()
MyBase.New()
End Sub
Public Shadows ReadOnly Property Properties As __EditPrograms.DetailsClass.PropertySet
Get
Return MyBase.Properties
End Get
End Property
Public Shadows ReadOnly Property Commands As __EditPrograms.DetailsClass.CommandSet
Get
Return MyBase.Commands
End Get
End Property
Public Shadows ReadOnly Property Methods As __EditPrograms.DetailsClass.MethodSet
Get
Return MyBase.Methods
End Get
End Property
Private Function ProgramNamesQuery() As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return Me.Screen.DataWorkspace.ApplicationData.ProgramNames
End Function
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _ProgramNames As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __EditPrograms, __EditPrograms.DetailsClass, Global.LightSwitchApplication.ProgramName).Data
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class PropertySet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenPropertySet(Of __EditPrograms, __EditPrograms.DetailsClass)
Public ReadOnly Property ProgramNames As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __EditPrograms, __EditPrograms.DetailsClass, Global.LightSwitchApplication.ProgramName)
Get
Return DirectCast(MyBase.GetItem(__EditPrograms.DetailsClass.PropertySetProperties.ProgramNames), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __EditPrograms, __EditPrograms.DetailsClass, Global.LightSwitchApplication.ProgramName))
End Get
End Property
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class CommandSet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommandSet(Of __EditPrograms, __EditPrograms.DetailsClass)
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class MethodSet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethodSet(Of __EditPrograms, __EditPrograms.DetailsClass)
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend NotInheritable Class PropertySetProperties
Public Shared ReadOnly ProgramNames As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __EditPrograms, __EditPrograms.DetailsClass, Global.LightSwitchApplication.ProgramName).Entry( _
"ProgramNames",
AddressOf __EditPrograms.DetailsClass.PropertySetProperties._ProgramNames_Stub,
AddressOf __EditPrograms.DetailsClass.PropertySetProperties._ProgramNames_Validate,
AddressOf __EditPrograms.DetailsClass.PropertySetProperties._ProgramNames_CreateQuery,
AddressOf __EditPrograms.DetailsClass.PropertySetProperties._ProgramNames_SelectionChanged,
AddressOf __EditPrograms.DetailsClass.PropertySetProperties._ProgramNames_OnCollectionChanged,
AddressOf __EditPrograms.DetailsClass.PropertySetProperties._ProgramNames_OnLoaded)
Private Shared Sub _ProgramNames_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __EditPrograms.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __EditPrograms, __EditPrograms.DetailsClass, Global.LightSwitchApplication.ProgramName).Data), d As __EditPrograms.DetailsClass, sf As Object)
c(d, d._ProgramNames, sf)
End Sub
Private Shared Sub _ProgramNames_Validate(s As __EditPrograms, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.ProgramNames_Validate(r)
End Sub
Private Shared Function _ProgramNames_CreateQuery(d As __EditPrograms.DetailsClass, args As Object()) As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return d.ProgramNamesQuery()
End Function
Private Shared Sub _ProgramNames_SelectionChanged(s As __EditPrograms)
s.ProgramNames_SelectionChanged()
End Sub
Private Shared Sub _ProgramNames_OnCollectionChanged(s As __EditPrograms, e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
s.ProgramNames_Changed(e)
End Sub
Private Shared Sub _ProgramNames_OnLoaded(s As __EditPrograms, succeeded As Boolean)
s.ProgramNames_Loaded(succeeded)
End Sub
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend NotInheritable Class CommandSetProperties
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend NotInheritable Class MethodSetProperties
End Class
End Class
End Class
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
Partial Public NotInheritable Class EditProgramActivities
Inherits Global.Microsoft.LightSwitch.Framework.Client.ScreenObject(Of __EditProgramActivities, __EditProgramActivities.DetailsClass)
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private Sub New()
MyBase.New("LightSwitchApplication:EditProgramActivities")
__EditProgramActivities.DetailsClass.Initialize(Me)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
Public Shared Function CreateInstance() As EditProgramActivities
Return New __EditProgramActivities( _
)
End Function
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub EditProgramActivities_InitializeDataWorkspace(ByVal saveChangesTo As Global.System.Collections.Generic.List(Of Global.Microsoft.LightSwitch.IDataService))
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub EditProgramActivities_Created()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub EditProgramActivities_Activated()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub EditProgramActivities_Saving(ByRef handled As Boolean)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub EditProgramActivities_Saved()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub EditProgramActivities_Closing(ByRef cancel As Boolean)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub EditProgramActivities_SaveError(ByVal exception As Global.System.Exception, ByRef handled As Boolean)
End Sub
#Region "Private Properties"
''' <summary>
''' Gets the Application object for this application. The Application object provides access to active screens, methods to open screens and access to the current user.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private ReadOnly Property Application As Global.LightSwitchApplication.Application
Get
Return Global.LightSwitchApplication.Application.Current
End Get
End Property
''' <summary>
''' Gets the containing data workspace. The data workspace provides access to all data sources in the application.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private ReadOnly Property DataWorkspace As Global.LightSwitchApplication.DataWorkspace
Get
Return DirectCast(DirectCast(Me.Details, Global.Microsoft.LightSwitch.Details.Client.IScreenDetails).DataWorkspace, Global.LightSwitchApplication.DataWorkspace)
End Get
End Property
#End Region
Partial Private Sub ProgramActivityNames_SelectionChanged()
End Sub
Partial Private Sub ProgramActivityNames_Changed(ByVal e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ProgramActivityNames_Loaded(ByVal succeeded As Boolean)
End Sub
''' <summary>
''' Gets the ProgramActivityNames visual collection. The collection contains all records currently shown on the respective list or grid control.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property ProgramActivityNames As Global.Microsoft.LightSwitch.Framework.Client.VisualCollection(Of Global.LightSwitchApplication.ProgramActivityName)
Get
Return __EditProgramActivities.DetailsClass.GetValue(Me, __EditProgramActivities.DetailsClass.PropertySetProperties.ProgramActivityNames)
End Get
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ProgramActivityNames_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class DetailsClass
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenDetails(Of __EditProgramActivities, __EditProgramActivities.DetailsClass, __EditProgramActivities.DetailsClass.PropertySet, __EditProgramActivities.DetailsClass.CommandSet, __EditProgramActivities.DetailsClass.MethodSet)
Shared Sub New()
Dim initializePropertyEntry = __EditProgramActivities.DetailsClass.PropertySetProperties.ProgramActivityNames
End Sub
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Private Shared ReadOnly __EditProgramActivitiesEntry As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenDetails(Of __EditProgramActivities, __EditProgramActivities.DetailsClass).Entry = _
New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenDetails(Of __EditProgramActivities, __EditProgramActivities.DetailsClass).Entry( _
AddressOf __EditProgramActivities.DetailsClass.__EditProgramActivities_InvokeInitializeDataWorkspace,
AddressOf __EditProgramActivities.DetailsClass.__EditProgramActivities_InvokeSavingEvent,
AddressOf __EditProgramActivities.DetailsClass.__EditProgramActivities_InvokeSavedEvent,
AddressOf __EditProgramActivities.DetailsClass.__EditProgramActivities_InvokeClosingEvent,
AddressOf __EditProgramActivities.DetailsClass.__EditProgramActivities_InvokeCreated,
AddressOf __EditProgramActivities.DetailsClass.__EditProgramActivities_InvokeActivated,
AddressOf __EditProgramActivities.DetailsClass.__EditProgramActivities_InvokeSaveErrorEvent)
Private Shared Sub __EditProgramActivities_InvokeInitializeDataWorkspace(s As __EditProgramActivities, saveChangesTo As Global.System.Collections.Generic.List(Of Global.Microsoft.LightSwitch.IDataService))
s.EditProgramActivities_InitializeDataWorkspace(saveChangesTo)
End Sub
Private Shared Function __EditProgramActivities_InvokeSavingEvent(s As __EditProgramActivities) As Boolean
Dim handled = False
s.EditProgramActivities_Saving(handled)
Return handled
End Function
Private Shared Sub __EditProgramActivities_InvokeSavedEvent(s As __EditProgramActivities)
s.EditProgramActivities_Saved()
End Sub
Private Shared Function __EditProgramActivities_InvokeClosingEvent(s As __EditProgramActivities) As Boolean
Dim cancel = False
s.EditProgramActivities_Closing(cancel)
Return cancel
End Function
Private Shared Sub __EditProgramActivities_InvokeCreated(s As __EditProgramActivities)
s.EditProgramActivities_Created()
End Sub
Private Shared Sub __EditProgramActivities_InvokeActivated(s As __EditProgramActivities)
s.EditProgramActivities_Activated()
End Sub
Private Shared Function __EditProgramActivities_InvokeSaveErrorEvent(s As __EditProgramActivities, ex As Global.System.Exception) As Boolean
Dim handled = False
s.EditProgramActivities_SaveError(ex, handled)
Return handled
End Function
Public Sub New()
MyBase.New()
End Sub
Public Shadows ReadOnly Property Properties As __EditProgramActivities.DetailsClass.PropertySet
Get
Return MyBase.Properties
End Get
End Property
Public Shadows ReadOnly Property Commands As __EditProgramActivities.DetailsClass.CommandSet
Get
Return MyBase.Commands
End Get
End Property
Public Shadows ReadOnly Property Methods As __EditProgramActivities.DetailsClass.MethodSet
Get
Return MyBase.Methods
End Get
End Property
Private Function ProgramActivityNamesQuery() As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return Me.Screen.DataWorkspace.ApplicationData.ProgramActivityNames
End Function
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _ProgramActivityNames As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __EditProgramActivities, __EditProgramActivities.DetailsClass, Global.LightSwitchApplication.ProgramActivityName).Data
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class PropertySet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenPropertySet(Of __EditProgramActivities, __EditProgramActivities.DetailsClass)
Public ReadOnly Property ProgramActivityNames As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __EditProgramActivities, __EditProgramActivities.DetailsClass, Global.LightSwitchApplication.ProgramActivityName)
Get
Return DirectCast(MyBase.GetItem(__EditProgramActivities.DetailsClass.PropertySetProperties.ProgramActivityNames), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __EditProgramActivities, __EditProgramActivities.DetailsClass, Global.LightSwitchApplication.ProgramActivityName))
End Get
End Property
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class CommandSet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommandSet(Of __EditProgramActivities, __EditProgramActivities.DetailsClass)
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class MethodSet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethodSet(Of __EditProgramActivities, __EditProgramActivities.DetailsClass)
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend NotInheritable Class PropertySetProperties
Public Shared ReadOnly ProgramActivityNames As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __EditProgramActivities, __EditProgramActivities.DetailsClass, Global.LightSwitchApplication.ProgramActivityName).Entry( _
"ProgramActivityNames",
AddressOf __EditProgramActivities.DetailsClass.PropertySetProperties._ProgramActivityNames_Stub,
AddressOf __EditProgramActivities.DetailsClass.PropertySetProperties._ProgramActivityNames_Validate,
AddressOf __EditProgramActivities.DetailsClass.PropertySetProperties._ProgramActivityNames_CreateQuery,
AddressOf __EditProgramActivities.DetailsClass.PropertySetProperties._ProgramActivityNames_SelectionChanged,
AddressOf __EditProgramActivities.DetailsClass.PropertySetProperties._ProgramActivityNames_OnCollectionChanged,
AddressOf __EditProgramActivities.DetailsClass.PropertySetProperties._ProgramActivityNames_OnLoaded)
Private Shared Sub _ProgramActivityNames_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __EditProgramActivities.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __EditProgramActivities, __EditProgramActivities.DetailsClass, Global.LightSwitchApplication.ProgramActivityName).Data), d As __EditProgramActivities.DetailsClass, sf As Object)
c(d, d._ProgramActivityNames, sf)
End Sub
Private Shared Sub _ProgramActivityNames_Validate(s As __EditProgramActivities, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.ProgramActivityNames_Validate(r)
End Sub
Private Shared Function _ProgramActivityNames_CreateQuery(d As __EditProgramActivities.DetailsClass, args As Object()) As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return d.ProgramActivityNamesQuery()
End Function
Private Shared Sub _ProgramActivityNames_SelectionChanged(s As __EditProgramActivities)
s.ProgramActivityNames_SelectionChanged()
End Sub
Private Shared Sub _ProgramActivityNames_OnCollectionChanged(s As __EditProgramActivities, e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
s.ProgramActivityNames_Changed(e)
End Sub
Private Shared Sub _ProgramActivityNames_OnLoaded(s As __EditProgramActivities, succeeded As Boolean)
s.ProgramActivityNames_Loaded(succeeded)
End Sub
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend NotInheritable Class CommandSetProperties
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend NotInheritable Class MethodSetProperties
End Class
End Class
End Class
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
Partial Public NotInheritable Class CreateAndEditProgamActivity
Inherits Global.Microsoft.LightSwitch.Framework.Client.ScreenObject(Of __CreateAndEditProgamActivity, __CreateAndEditProgamActivity.DetailsClass)
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private Sub New(ByVal ptyPersonID As Integer, ByVal ptyProgramID As Global.System.Nullable(Of Integer))
MyBase.New("LightSwitchApplication:CreateAndEditProgamActivity")
Me.ptyPersonID = ptyPersonID
Me.ptyProgramID = ptyProgramID
__CreateAndEditProgamActivity.DetailsClass.Initialize(Me)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
Public Shared Function CreateInstance(ByVal ptyPersonID As Integer, ByVal ptyProgramID As Global.System.Nullable(Of Integer)) As CreateAndEditProgamActivity
Return New __CreateAndEditProgamActivity( _
ptyPersonID _
,ptyProgramID _
)
End Function
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub CreateAndEditProgamActivity_InitializeDataWorkspace(ByVal saveChangesTo As Global.System.Collections.Generic.List(Of Global.Microsoft.LightSwitch.IDataService))
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub CreateAndEditProgamActivity_Created()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub CreateAndEditProgamActivity_Activated()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub CreateAndEditProgamActivity_Saving(ByRef handled As Boolean)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub CreateAndEditProgamActivity_Saved()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub CreateAndEditProgamActivity_Closing(ByRef cancel As Boolean)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub CreateAndEditProgamActivity_SaveError(ByVal exception As Global.System.Exception, ByRef handled As Boolean)
End Sub
#Region "Private Properties"
''' <summary>
''' Gets the Application object for this application. The Application object provides access to active screens, methods to open screens and access to the current user.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private ReadOnly Property Application As Global.LightSwitchApplication.Application
Get
Return Global.LightSwitchApplication.Application.Current
End Get
End Property
''' <summary>
''' Gets the containing data workspace. The data workspace provides access to all data sources in the application.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private ReadOnly Property DataWorkspace As Global.LightSwitchApplication.DataWorkspace
Get
Return DirectCast(DirectCast(Me.Details, Global.Microsoft.LightSwitch.Details.Client.IScreenDetails).DataWorkspace, Global.LightSwitchApplication.DataWorkspace)
End Get
End Property
#End Region
Partial Private Sub ProgramProperty_Changed()
End Sub
Partial Private Sub ProgramActivities_SelectionChanged()
End Sub
Partial Private Sub ProgramActivities_Changed(ByVal e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ProgramActivities_Loaded(ByVal succeeded As Boolean)
End Sub
Partial Private Sub ptyPersonID_Changed()
End Sub
Partial Private Sub ptyProgramID_Changed()
End Sub
Partial Private Sub Person_Changed()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Person_Loaded(ByVal succeeded As Boolean)
End Sub
Partial Private Sub Program_Changed()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Program_Loaded(ByVal succeeded As Boolean)
End Sub
Partial Private Sub ActivePrograms_SelectionChanged()
End Sub
Partial Private Sub ActivePrograms_Changed(ByVal e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ActivePrograms_Loaded(ByVal succeeded As Boolean)
End Sub
Partial Private Sub ProgramActivitiesSorted_SelectionChanged()
End Sub
Partial Private Sub ProgramActivitiesSorted_Changed(ByVal e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ProgramActivitiesSorted_Loaded(ByVal succeeded As Boolean)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Property ProgramProperty As Global.LightSwitchApplication.Program
Get
Return __CreateAndEditProgamActivity.DetailsClass.GetValue(Me, __CreateAndEditProgamActivity.DetailsClass.PropertySetProperties.ProgramProperty)
End Get
Set(ByVal value As Global.LightSwitchApplication.Program)
__CreateAndEditProgamActivity.DetailsClass.SetValue(Me, __CreateAndEditProgamActivity.DetailsClass.PropertySetProperties.ProgramProperty, value)
End Set
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ProgramProperty_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
''' <summary>
''' Gets the ProgramActivities visual collection. The collection contains all records currently shown on the respective list or grid control.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property ProgramActivities As Global.Microsoft.LightSwitch.Framework.Client.VisualCollection(Of Global.LightSwitchApplication.ProgramActivity)
Get
Return __CreateAndEditProgamActivity.DetailsClass.GetValue(Me, __CreateAndEditProgamActivity.DetailsClass.PropertySetProperties.ProgramActivities)
End Get
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ProgramActivities_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Property ptyPersonID As Integer
Get
Return __CreateAndEditProgamActivity.DetailsClass.GetValue(Me, __CreateAndEditProgamActivity.DetailsClass.PropertySetProperties.ptyPersonID)
End Get
Set(ByVal value As Integer)
__CreateAndEditProgamActivity.DetailsClass.SetValue(Me, __CreateAndEditProgamActivity.DetailsClass.PropertySetProperties.ptyPersonID, value)
End Set
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ptyPersonID_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Property ptyProgramID As Global.System.Nullable(Of Integer)
Get
Return __CreateAndEditProgamActivity.DetailsClass.GetValue(Me, __CreateAndEditProgamActivity.DetailsClass.PropertySetProperties.ptyProgramID)
End Get
Set(ByVal value As Global.System.Nullable(Of Integer))
__CreateAndEditProgamActivity.DetailsClass.SetValue(Me, __CreateAndEditProgamActivity.DetailsClass.PropertySetProperties.ptyProgramID, value)
End Set
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ptyProgramID_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property Person As Global.LightSwitchApplication.Person
Get
Return __CreateAndEditProgamActivity.DetailsClass.GetValue(Me, __CreateAndEditProgamActivity.DetailsClass.PropertySetProperties.Person)
End Get
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Person_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property Program As Global.LightSwitchApplication.Program
Get
Return __CreateAndEditProgamActivity.DetailsClass.GetValue(Me, __CreateAndEditProgamActivity.DetailsClass.PropertySetProperties.Program)
End Get
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Program_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
''' <summary>
''' Gets the ActivePrograms visual collection. The collection contains all records currently shown on the respective list or grid control.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property ActivePrograms As Global.Microsoft.LightSwitch.Framework.Client.VisualCollection(Of Global.LightSwitchApplication.ProgramName)
Get
Return __CreateAndEditProgamActivity.DetailsClass.GetValue(Me, __CreateAndEditProgamActivity.DetailsClass.PropertySetProperties.ActivePrograms)
End Get
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ActivePrograms_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
''' <summary>
''' Gets the ProgramActivitiesSorted visual collection. The collection contains all records currently shown on the respective list or grid control.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property ProgramActivitiesSorted As Global.Microsoft.LightSwitch.Framework.Client.VisualCollection(Of Global.LightSwitchApplication.ProgramActivityName)
Get
Return __CreateAndEditProgamActivity.DetailsClass.GetValue(Me, __CreateAndEditProgamActivity.DetailsClass.PropertySetProperties.ProgramActivitiesSorted)
End Get
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ProgramActivitiesSorted_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class DetailsClass
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenDetails(Of __CreateAndEditProgamActivity, __CreateAndEditProgamActivity.DetailsClass, __CreateAndEditProgamActivity.DetailsClass.PropertySet, __CreateAndEditProgamActivity.DetailsClass.CommandSet, __CreateAndEditProgamActivity.DetailsClass.MethodSet)
Shared Sub New()
Dim initializePropertyEntry = __CreateAndEditProgamActivity.DetailsClass.PropertySetProperties.ProgramProperty
End Sub
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Private Shared ReadOnly __CreateAndEditProgamActivityEntry As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenDetails(Of __CreateAndEditProgamActivity, __CreateAndEditProgamActivity.DetailsClass).Entry = _
New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenDetails(Of __CreateAndEditProgamActivity, __CreateAndEditProgamActivity.DetailsClass).Entry( _
AddressOf __CreateAndEditProgamActivity.DetailsClass.__CreateAndEditProgamActivity_InvokeInitializeDataWorkspace,
AddressOf __CreateAndEditProgamActivity.DetailsClass.__CreateAndEditProgamActivity_InvokeSavingEvent,
AddressOf __CreateAndEditProgamActivity.DetailsClass.__CreateAndEditProgamActivity_InvokeSavedEvent,
AddressOf __CreateAndEditProgamActivity.DetailsClass.__CreateAndEditProgamActivity_InvokeClosingEvent,
AddressOf __CreateAndEditProgamActivity.DetailsClass.__CreateAndEditProgamActivity_InvokeCreated,
AddressOf __CreateAndEditProgamActivity.DetailsClass.__CreateAndEditProgamActivity_InvokeActivated,
AddressOf __CreateAndEditProgamActivity.DetailsClass.__CreateAndEditProgamActivity_InvokeSaveErrorEvent)
Private Shared Sub __CreateAndEditProgamActivity_InvokeInitializeDataWorkspace(s As __CreateAndEditProgamActivity, saveChangesTo As Global.System.Collections.Generic.List(Of Global.Microsoft.LightSwitch.IDataService))
s.CreateAndEditProgamActivity_InitializeDataWorkspace(saveChangesTo)
End Sub
Private Shared Function __CreateAndEditProgamActivity_InvokeSavingEvent(s As __CreateAndEditProgamActivity) As Boolean
Dim handled = False
s.CreateAndEditProgamActivity_Saving(handled)
Return handled
End Function
Private Shared Sub __CreateAndEditProgamActivity_InvokeSavedEvent(s As __CreateAndEditProgamActivity)
s.CreateAndEditProgamActivity_Saved()
End Sub
Private Shared Function __CreateAndEditProgamActivity_InvokeClosingEvent(s As __CreateAndEditProgamActivity) As Boolean
Dim cancel = False
s.CreateAndEditProgamActivity_Closing(cancel)
Return cancel
End Function
Private Shared Sub __CreateAndEditProgamActivity_InvokeCreated(s As __CreateAndEditProgamActivity)
s.CreateAndEditProgamActivity_Created()
End Sub
Private Shared Sub __CreateAndEditProgamActivity_InvokeActivated(s As __CreateAndEditProgamActivity)
s.CreateAndEditProgamActivity_Activated()
End Sub
Private Shared Function __CreateAndEditProgamActivity_InvokeSaveErrorEvent(s As __CreateAndEditProgamActivity, ex As Global.System.Exception) As Boolean
Dim handled = False
s.CreateAndEditProgamActivity_SaveError(ex, handled)
Return handled
End Function
Public Sub New()
MyBase.New()
End Sub
Public Shadows ReadOnly Property Properties As __CreateAndEditProgamActivity.DetailsClass.PropertySet
Get
Return MyBase.Properties
End Get
End Property
Public Shadows ReadOnly Property Commands As __CreateAndEditProgamActivity.DetailsClass.CommandSet
Get
Return MyBase.Commands
End Get
End Property
Public Shadows ReadOnly Property Methods As __CreateAndEditProgamActivity.DetailsClass.MethodSet
Get
Return MyBase.Methods
End Get
End Property
Private Function ProgramActivitiesQuery() As Global.Microsoft.LightSwitch.IDataServiceQueryable
If Me.Screen.ProgramProperty Is Nothing Then
Return Nothing
End If
Dim loader As Global.Microsoft.LightSwitch.IDataServiceQueryable(Of Global.LightSwitchApplication.ProgramActivity) = _
DirectCast(DirectCast(Me.Screen.ProgramProperty.Details.Properties.ProgramActivities, Global.Microsoft.LightSwitch.Details.ILoadableProperty).Loader, Global.Microsoft.LightSwitch.IDataServiceQueryable(Of Global.LightSwitchApplication.ProgramActivity))
If loader Is Nothing Then
Return Nothing
End If
Return Global.Microsoft.LightSwitch.DataServiceQueryable.Include(
loader,
"ProgramActivityName")
End Function
Private Function ActiveProgramsQuery() As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return Me.Screen.DataWorkspace.ApplicationData.ActivePrograms()
End Function
Private Function ProgramActivitiesSortedQuery() As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return Me.Screen.DataWorkspace.ApplicationData.ProgramActivitiesSorted()
End Function
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _ProgramProperty As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __CreateAndEditProgamActivity, __CreateAndEditProgamActivity.DetailsClass, Global.LightSwitchApplication.Program).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _ProgramActivities As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __CreateAndEditProgamActivity, __CreateAndEditProgamActivity.DetailsClass, Global.LightSwitchApplication.ProgramActivity).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _ptyPersonID As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __CreateAndEditProgamActivity, __CreateAndEditProgamActivity.DetailsClass, Integer).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _ptyProgramID As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __CreateAndEditProgamActivity, __CreateAndEditProgamActivity.DetailsClass, Global.System.Nullable(Of Integer)).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _Person As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenReferenceProperty(Of __CreateAndEditProgamActivity, __CreateAndEditProgamActivity.DetailsClass, Global.LightSwitchApplication.Person).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _Program As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenReferenceProperty(Of __CreateAndEditProgamActivity, __CreateAndEditProgamActivity.DetailsClass, Global.LightSwitchApplication.Program).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _ActivePrograms As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __CreateAndEditProgamActivity, __CreateAndEditProgamActivity.DetailsClass, Global.LightSwitchApplication.ProgramName).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _ProgramActivitiesSorted As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __CreateAndEditProgamActivity, __CreateAndEditProgamActivity.DetailsClass, Global.LightSwitchApplication.ProgramActivityName).Data
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class PropertySet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenPropertySet(Of __CreateAndEditProgamActivity, __CreateAndEditProgamActivity.DetailsClass)
Public ReadOnly Property ProgramProperty As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __CreateAndEditProgamActivity, __CreateAndEditProgamActivity.DetailsClass, Global.LightSwitchApplication.Program)
Get
Return DirectCast(MyBase.GetItem(__CreateAndEditProgamActivity.DetailsClass.PropertySetProperties.ProgramProperty), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __CreateAndEditProgamActivity, __CreateAndEditProgamActivity.DetailsClass, Global.LightSwitchApplication.Program))
End Get
End Property
Public ReadOnly Property ProgramActivities As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __CreateAndEditProgamActivity, __CreateAndEditProgamActivity.DetailsClass, Global.LightSwitchApplication.ProgramActivity)
Get
Return DirectCast(MyBase.GetItem(__CreateAndEditProgamActivity.DetailsClass.PropertySetProperties.ProgramActivities), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __CreateAndEditProgamActivity, __CreateAndEditProgamActivity.DetailsClass, Global.LightSwitchApplication.ProgramActivity))
End Get
End Property
Public ReadOnly Property ptyPersonID As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __CreateAndEditProgamActivity, __CreateAndEditProgamActivity.DetailsClass, Integer)
Get
Return DirectCast(MyBase.GetItem(__CreateAndEditProgamActivity.DetailsClass.PropertySetProperties.ptyPersonID), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __CreateAndEditProgamActivity, __CreateAndEditProgamActivity.DetailsClass, Integer))
End Get
End Property
Public ReadOnly Property ptyProgramID As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __CreateAndEditProgamActivity, __CreateAndEditProgamActivity.DetailsClass, Global.System.Nullable(Of Integer))
Get
Return DirectCast(MyBase.GetItem(__CreateAndEditProgamActivity.DetailsClass.PropertySetProperties.ptyProgramID), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __CreateAndEditProgamActivity, __CreateAndEditProgamActivity.DetailsClass, Global.System.Nullable(Of Integer)))
End Get
End Property
Public ReadOnly Property Person As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenReferenceProperty(Of __CreateAndEditProgamActivity, __CreateAndEditProgamActivity.DetailsClass, Global.LightSwitchApplication.Person)
Get
Return DirectCast(MyBase.GetItem(__CreateAndEditProgamActivity.DetailsClass.PropertySetProperties.Person), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenReferenceProperty(Of __CreateAndEditProgamActivity, __CreateAndEditProgamActivity.DetailsClass, Global.LightSwitchApplication.Person))
End Get
End Property
Public ReadOnly Property Program As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenReferenceProperty(Of __CreateAndEditProgamActivity, __CreateAndEditProgamActivity.DetailsClass, Global.LightSwitchApplication.Program)
Get
Return DirectCast(MyBase.GetItem(__CreateAndEditProgamActivity.DetailsClass.PropertySetProperties.Program), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenReferenceProperty(Of __CreateAndEditProgamActivity, __CreateAndEditProgamActivity.DetailsClass, Global.LightSwitchApplication.Program))
End Get
End Property
Public ReadOnly Property ActivePrograms As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __CreateAndEditProgamActivity, __CreateAndEditProgamActivity.DetailsClass, Global.LightSwitchApplication.ProgramName)
Get
Return DirectCast(MyBase.GetItem(__CreateAndEditProgamActivity.DetailsClass.PropertySetProperties.ActivePrograms), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __CreateAndEditProgamActivity, __CreateAndEditProgamActivity.DetailsClass, Global.LightSwitchApplication.ProgramName))
End Get
End Property
Public ReadOnly Property ProgramActivitiesSorted As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __CreateAndEditProgamActivity, __CreateAndEditProgamActivity.DetailsClass, Global.LightSwitchApplication.ProgramActivityName)
Get
Return DirectCast(MyBase.GetItem(__CreateAndEditProgamActivity.DetailsClass.PropertySetProperties.ProgramActivitiesSorted), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __CreateAndEditProgamActivity, __CreateAndEditProgamActivity.DetailsClass, Global.LightSwitchApplication.ProgramActivityName))
End Get
End Property
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class CommandSet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommandSet(Of __CreateAndEditProgamActivity, __CreateAndEditProgamActivity.DetailsClass)
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class MethodSet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethodSet(Of __CreateAndEditProgamActivity, __CreateAndEditProgamActivity.DetailsClass)
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend NotInheritable Class PropertySetProperties
Public Shared ReadOnly ProgramProperty As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __CreateAndEditProgamActivity, __CreateAndEditProgamActivity.DetailsClass, Global.LightSwitchApplication.Program).Entry( _
"ProgramProperty",
False,
AddressOf __CreateAndEditProgamActivity.DetailsClass.PropertySetProperties._ProgramProperty_Stub,
AddressOf __CreateAndEditProgamActivity.DetailsClass.PropertySetProperties._ProgramProperty_Validate,
AddressOf __CreateAndEditProgamActivity.DetailsClass.PropertySetProperties._ProgramProperty_OnValueChanged)
Private Shared Sub _ProgramProperty_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __CreateAndEditProgamActivity.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __CreateAndEditProgamActivity, __CreateAndEditProgamActivity.DetailsClass, Global.LightSwitchApplication.Program).Data), d As __CreateAndEditProgamActivity.DetailsClass, sf As Object)
c(d, d._ProgramProperty, sf)
End Sub
Private Shared Sub _ProgramProperty_Validate(s As __CreateAndEditProgamActivity, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.ProgramProperty_Validate(r)
End Sub
Private Shared Sub _ProgramProperty_OnValueChanged(s As __CreateAndEditProgamActivity)
s.ProgramProperty_Changed()
End Sub
Public Shared ReadOnly ProgramActivities As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __CreateAndEditProgamActivity, __CreateAndEditProgamActivity.DetailsClass, Global.LightSwitchApplication.ProgramActivity).Entry( _
"ProgramActivities",
AddressOf __CreateAndEditProgamActivity.DetailsClass.PropertySetProperties._ProgramActivities_Stub,
AddressOf __CreateAndEditProgamActivity.DetailsClass.PropertySetProperties._ProgramActivities_Validate,
AddressOf __CreateAndEditProgamActivity.DetailsClass.PropertySetProperties._ProgramActivities_CreateQuery,
AddressOf __CreateAndEditProgamActivity.DetailsClass.PropertySetProperties._ProgramActivities_SelectionChanged,
AddressOf __CreateAndEditProgamActivity.DetailsClass.PropertySetProperties._ProgramActivities_OnCollectionChanged,
AddressOf __CreateAndEditProgamActivity.DetailsClass.PropertySetProperties._ProgramActivities_OnLoaded)
Private Shared Sub _ProgramActivities_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __CreateAndEditProgamActivity.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __CreateAndEditProgamActivity, __CreateAndEditProgamActivity.DetailsClass, Global.LightSwitchApplication.ProgramActivity).Data), d As __CreateAndEditProgamActivity.DetailsClass, sf As Object)
c(d, d._ProgramActivities, sf)
End Sub
Private Shared Sub _ProgramActivities_Validate(s As __CreateAndEditProgamActivity, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.ProgramActivities_Validate(r)
End Sub
Private Shared Function _ProgramActivities_CreateQuery(d As __CreateAndEditProgamActivity.DetailsClass, args As Object()) As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return d.ProgramActivitiesQuery()
End Function
Private Shared Sub _ProgramActivities_SelectionChanged(s As __CreateAndEditProgamActivity)
s.ProgramActivities_SelectionChanged()
End Sub
Private Shared Sub _ProgramActivities_OnCollectionChanged(s As __CreateAndEditProgamActivity, e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
s.ProgramActivities_Changed(e)
End Sub
Private Shared Sub _ProgramActivities_OnLoaded(s As __CreateAndEditProgamActivity, succeeded As Boolean)
s.ProgramActivities_Loaded(succeeded)
End Sub
Public Shared ReadOnly ptyPersonID As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __CreateAndEditProgamActivity, __CreateAndEditProgamActivity.DetailsClass, Integer).Entry( _
"ptyPersonID",
False,
AddressOf __CreateAndEditProgamActivity.DetailsClass.PropertySetProperties._ptyPersonID_Stub,
AddressOf __CreateAndEditProgamActivity.DetailsClass.PropertySetProperties._ptyPersonID_Validate,
AddressOf __CreateAndEditProgamActivity.DetailsClass.PropertySetProperties._ptyPersonID_OnValueChanged)
Private Shared Sub _ptyPersonID_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __CreateAndEditProgamActivity.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __CreateAndEditProgamActivity, __CreateAndEditProgamActivity.DetailsClass, Integer).Data), d As __CreateAndEditProgamActivity.DetailsClass, sf As Object)
c(d, d._ptyPersonID, sf)
End Sub
Private Shared Sub _ptyPersonID_Validate(s As __CreateAndEditProgamActivity, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.ptyPersonID_Validate(r)
End Sub
Private Shared Sub _ptyPersonID_OnValueChanged(s As __CreateAndEditProgamActivity)
s.ptyPersonID_Changed()
End Sub
Public Shared ReadOnly ptyProgramID As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __CreateAndEditProgamActivity, __CreateAndEditProgamActivity.DetailsClass, Global.System.Nullable(Of Integer)).Entry( _
"ptyProgramID",
False,
AddressOf __CreateAndEditProgamActivity.DetailsClass.PropertySetProperties._ptyProgramID_Stub,
AddressOf __CreateAndEditProgamActivity.DetailsClass.PropertySetProperties._ptyProgramID_Validate,
AddressOf __CreateAndEditProgamActivity.DetailsClass.PropertySetProperties._ptyProgramID_OnValueChanged)
Private Shared Sub _ptyProgramID_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __CreateAndEditProgamActivity.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __CreateAndEditProgamActivity, __CreateAndEditProgamActivity.DetailsClass, Global.System.Nullable(Of Integer)).Data), d As __CreateAndEditProgamActivity.DetailsClass, sf As Object)
c(d, d._ptyProgramID, sf)
End Sub
Private Shared Sub _ptyProgramID_Validate(s As __CreateAndEditProgamActivity, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.ptyProgramID_Validate(r)
End Sub
Private Shared Sub _ptyProgramID_OnValueChanged(s As __CreateAndEditProgamActivity)
s.ptyProgramID_Changed()
End Sub
Public Shared ReadOnly Person As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenReferenceProperty(Of __CreateAndEditProgamActivity, __CreateAndEditProgamActivity.DetailsClass, Global.LightSwitchApplication.Person).Entry( _
"Person",
AddressOf __CreateAndEditProgamActivity.DetailsClass.PropertySetProperties._Person_Stub,
AddressOf __CreateAndEditProgamActivity.DetailsClass.PropertySetProperties._Person_Validate,
AddressOf __CreateAndEditProgamActivity.DetailsClass.PropertySetProperties._Person_CreateQuery,
AddressOf __CreateAndEditProgamActivity.DetailsClass.PropertySetProperties._Person_OnValueChanged,
AddressOf __CreateAndEditProgamActivity.DetailsClass.PropertySetProperties._Person_OnLoaded)
Private Shared Sub _Person_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __CreateAndEditProgamActivity.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenReferenceProperty(Of __CreateAndEditProgamActivity, __CreateAndEditProgamActivity.DetailsClass, Global.LightSwitchApplication.Person).Data), d As __CreateAndEditProgamActivity.DetailsClass, sf As Object)
c(d, d._Person, sf)
End Sub
Private Shared Sub _Person_Validate(s As __CreateAndEditProgamActivity, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.Person_Validate(r)
End Sub
Private Shared Function _Person_CreateQuery(d As __CreateAndEditProgamActivity.DetailsClass, args As Object()) As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return Nothing
End Function
Private Shared Sub _Person_OnValueChanged(s As __CreateAndEditProgamActivity)
s.Person_Changed()
End Sub
Private Shared Sub _Person_OnLoaded(s As __CreateAndEditProgamActivity, succeeded As Boolean)
s.Person_Loaded(succeeded)
End Sub
Public Shared ReadOnly Program As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenReferenceProperty(Of __CreateAndEditProgamActivity, __CreateAndEditProgamActivity.DetailsClass, Global.LightSwitchApplication.Program).Entry( _
"Program",
AddressOf __CreateAndEditProgamActivity.DetailsClass.PropertySetProperties._Program_Stub,
AddressOf __CreateAndEditProgamActivity.DetailsClass.PropertySetProperties._Program_Validate,
AddressOf __CreateAndEditProgamActivity.DetailsClass.PropertySetProperties._Program_CreateQuery,
AddressOf __CreateAndEditProgamActivity.DetailsClass.PropertySetProperties._Program_OnValueChanged,
AddressOf __CreateAndEditProgamActivity.DetailsClass.PropertySetProperties._Program_OnLoaded)
Private Shared Sub _Program_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __CreateAndEditProgamActivity.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenReferenceProperty(Of __CreateAndEditProgamActivity, __CreateAndEditProgamActivity.DetailsClass, Global.LightSwitchApplication.Program).Data), d As __CreateAndEditProgamActivity.DetailsClass, sf As Object)
c(d, d._Program, sf)
End Sub
Private Shared Sub _Program_Validate(s As __CreateAndEditProgamActivity, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.Program_Validate(r)
End Sub
Private Shared Function _Program_CreateQuery(d As __CreateAndEditProgamActivity.DetailsClass, args As Object()) As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return Nothing
End Function
Private Shared Sub _Program_OnValueChanged(s As __CreateAndEditProgamActivity)
s.Program_Changed()
End Sub
Private Shared Sub _Program_OnLoaded(s As __CreateAndEditProgamActivity, succeeded As Boolean)
s.Program_Loaded(succeeded)
End Sub
Public Shared ReadOnly ActivePrograms As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __CreateAndEditProgamActivity, __CreateAndEditProgamActivity.DetailsClass, Global.LightSwitchApplication.ProgramName).Entry( _
"ActivePrograms",
AddressOf __CreateAndEditProgamActivity.DetailsClass.PropertySetProperties._ActivePrograms_Stub,
AddressOf __CreateAndEditProgamActivity.DetailsClass.PropertySetProperties._ActivePrograms_Validate,
AddressOf __CreateAndEditProgamActivity.DetailsClass.PropertySetProperties._ActivePrograms_CreateQuery,
AddressOf __CreateAndEditProgamActivity.DetailsClass.PropertySetProperties._ActivePrograms_SelectionChanged,
AddressOf __CreateAndEditProgamActivity.DetailsClass.PropertySetProperties._ActivePrograms_OnCollectionChanged,
AddressOf __CreateAndEditProgamActivity.DetailsClass.PropertySetProperties._ActivePrograms_OnLoaded)
Private Shared Sub _ActivePrograms_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __CreateAndEditProgamActivity.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __CreateAndEditProgamActivity, __CreateAndEditProgamActivity.DetailsClass, Global.LightSwitchApplication.ProgramName).Data), d As __CreateAndEditProgamActivity.DetailsClass, sf As Object)
c(d, d._ActivePrograms, sf)
End Sub
Private Shared Sub _ActivePrograms_Validate(s As __CreateAndEditProgamActivity, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.ActivePrograms_Validate(r)
End Sub
Private Shared Function _ActivePrograms_CreateQuery(d As __CreateAndEditProgamActivity.DetailsClass, args As Object()) As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return d.ActiveProgramsQuery()
End Function
Private Shared Sub _ActivePrograms_SelectionChanged(s As __CreateAndEditProgamActivity)
s.ActivePrograms_SelectionChanged()
End Sub
Private Shared Sub _ActivePrograms_OnCollectionChanged(s As __CreateAndEditProgamActivity, e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
s.ActivePrograms_Changed(e)
End Sub
Private Shared Sub _ActivePrograms_OnLoaded(s As __CreateAndEditProgamActivity, succeeded As Boolean)
s.ActivePrograms_Loaded(succeeded)
End Sub
Public Shared ReadOnly ProgramActivitiesSorted As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __CreateAndEditProgamActivity, __CreateAndEditProgamActivity.DetailsClass, Global.LightSwitchApplication.ProgramActivityName).Entry( _
"ProgramActivitiesSorted",
AddressOf __CreateAndEditProgamActivity.DetailsClass.PropertySetProperties._ProgramActivitiesSorted_Stub,
AddressOf __CreateAndEditProgamActivity.DetailsClass.PropertySetProperties._ProgramActivitiesSorted_Validate,
AddressOf __CreateAndEditProgamActivity.DetailsClass.PropertySetProperties._ProgramActivitiesSorted_CreateQuery,
AddressOf __CreateAndEditProgamActivity.DetailsClass.PropertySetProperties._ProgramActivitiesSorted_SelectionChanged,
AddressOf __CreateAndEditProgamActivity.DetailsClass.PropertySetProperties._ProgramActivitiesSorted_OnCollectionChanged,
AddressOf __CreateAndEditProgamActivity.DetailsClass.PropertySetProperties._ProgramActivitiesSorted_OnLoaded)
Private Shared Sub _ProgramActivitiesSorted_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __CreateAndEditProgamActivity.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __CreateAndEditProgamActivity, __CreateAndEditProgamActivity.DetailsClass, Global.LightSwitchApplication.ProgramActivityName).Data), d As __CreateAndEditProgamActivity.DetailsClass, sf As Object)
c(d, d._ProgramActivitiesSorted, sf)
End Sub
Private Shared Sub _ProgramActivitiesSorted_Validate(s As __CreateAndEditProgamActivity, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.ProgramActivitiesSorted_Validate(r)
End Sub
Private Shared Function _ProgramActivitiesSorted_CreateQuery(d As __CreateAndEditProgamActivity.DetailsClass, args As Object()) As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return d.ProgramActivitiesSortedQuery()
End Function
Private Shared Sub _ProgramActivitiesSorted_SelectionChanged(s As __CreateAndEditProgamActivity)
s.ProgramActivitiesSorted_SelectionChanged()
End Sub
Private Shared Sub _ProgramActivitiesSorted_OnCollectionChanged(s As __CreateAndEditProgamActivity, e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
s.ProgramActivitiesSorted_Changed(e)
End Sub
Private Shared Sub _ProgramActivitiesSorted_OnLoaded(s As __CreateAndEditProgamActivity, succeeded As Boolean)
s.ProgramActivitiesSorted_Loaded(succeeded)
End Sub
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend NotInheritable Class CommandSetProperties
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend NotInheritable Class MethodSetProperties
End Class
End Class
End Class
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
Partial Public NotInheritable Class ProgramDetail
Inherits Global.Microsoft.LightSwitch.Framework.Client.ScreenObject(Of __ProgramDetail, __ProgramDetail.DetailsClass)
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private Sub New(ByVal ProgramId As Integer)
MyBase.New("LightSwitchApplication:ProgramDetail")
Me.ProgramId = ProgramId
__ProgramDetail.DetailsClass.Initialize(Me)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
Public Shared Function CreateInstance(ByVal ProgramId As Integer) As ProgramDetail
Return New __ProgramDetail( _
ProgramId _
)
End Function
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ProgramDetail_InitializeDataWorkspace(ByVal saveChangesTo As Global.System.Collections.Generic.List(Of Global.Microsoft.LightSwitch.IDataService))
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ProgramDetail_Created()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ProgramDetail_Activated()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ProgramDetail_Saving(ByRef handled As Boolean)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ProgramDetail_Saved()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ProgramDetail_Closing(ByRef cancel As Boolean)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ProgramDetail_SaveError(ByVal exception As Global.System.Exception, ByRef handled As Boolean)
End Sub
#Region "Private Properties"
''' <summary>
''' Gets the Application object for this application. The Application object provides access to active screens, methods to open screens and access to the current user.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private ReadOnly Property Application As Global.LightSwitchApplication.Application
Get
Return Global.LightSwitchApplication.Application.Current
End Get
End Property
''' <summary>
''' Gets the containing data workspace. The data workspace provides access to all data sources in the application.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private ReadOnly Property DataWorkspace As Global.LightSwitchApplication.DataWorkspace
Get
Return DirectCast(DirectCast(Me.Details, Global.Microsoft.LightSwitch.Details.Client.IScreenDetails).DataWorkspace, Global.LightSwitchApplication.DataWorkspace)
End Get
End Property
#End Region
Partial Private Sub Program_Changed()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Program_Loaded(ByVal succeeded As Boolean)
End Sub
Partial Private Sub ProgramId_Changed()
End Sub
Partial Private Sub ProgramActivities_SelectionChanged()
End Sub
Partial Private Sub ProgramActivities_Changed(ByVal e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ProgramActivities_Loaded(ByVal succeeded As Boolean)
End Sub
Partial Private Sub ProgramActivitiesSorted_SelectionChanged()
End Sub
Partial Private Sub ProgramActivitiesSorted_Changed(ByVal e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ProgramActivitiesSorted_Loaded(ByVal succeeded As Boolean)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property Program As Global.LightSwitchApplication.Program
Get
Return __ProgramDetail.DetailsClass.GetValue(Me, __ProgramDetail.DetailsClass.PropertySetProperties.Program)
End Get
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Program_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Property ProgramId As Integer
Get
Return __ProgramDetail.DetailsClass.GetValue(Me, __ProgramDetail.DetailsClass.PropertySetProperties.ProgramId)
End Get
Set(ByVal value As Integer)
__ProgramDetail.DetailsClass.SetValue(Me, __ProgramDetail.DetailsClass.PropertySetProperties.ProgramId, value)
End Set
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ProgramId_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
''' <summary>
''' Gets the ProgramActivities visual collection. The collection contains all records currently shown on the respective list or grid control.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property ProgramActivities As Global.Microsoft.LightSwitch.Framework.Client.VisualCollection(Of Global.LightSwitchApplication.ProgramActivity)
Get
Return __ProgramDetail.DetailsClass.GetValue(Me, __ProgramDetail.DetailsClass.PropertySetProperties.ProgramActivities)
End Get
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ProgramActivities_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
''' <summary>
''' Gets the ProgramActivitiesSorted visual collection. The collection contains all records currently shown on the respective list or grid control.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property ProgramActivitiesSorted As Global.Microsoft.LightSwitch.Framework.Client.VisualCollection(Of Global.LightSwitchApplication.ProgramActivityName)
Get
Return __ProgramDetail.DetailsClass.GetValue(Me, __ProgramDetail.DetailsClass.PropertySetProperties.ProgramActivitiesSorted)
End Get
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ProgramActivitiesSorted_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class DetailsClass
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenDetails(Of __ProgramDetail, __ProgramDetail.DetailsClass, __ProgramDetail.DetailsClass.PropertySet, __ProgramDetail.DetailsClass.CommandSet, __ProgramDetail.DetailsClass.MethodSet)
Shared Sub New()
Dim initializePropertyEntry = __ProgramDetail.DetailsClass.PropertySetProperties.Program
End Sub
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Private Shared ReadOnly __ProgramDetailEntry As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenDetails(Of __ProgramDetail, __ProgramDetail.DetailsClass).Entry = _
New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenDetails(Of __ProgramDetail, __ProgramDetail.DetailsClass).Entry( _
AddressOf __ProgramDetail.DetailsClass.__ProgramDetail_InvokeInitializeDataWorkspace,
AddressOf __ProgramDetail.DetailsClass.__ProgramDetail_InvokeSavingEvent,
AddressOf __ProgramDetail.DetailsClass.__ProgramDetail_InvokeSavedEvent,
AddressOf __ProgramDetail.DetailsClass.__ProgramDetail_InvokeClosingEvent,
AddressOf __ProgramDetail.DetailsClass.__ProgramDetail_InvokeCreated,
AddressOf __ProgramDetail.DetailsClass.__ProgramDetail_InvokeActivated,
AddressOf __ProgramDetail.DetailsClass.__ProgramDetail_InvokeSaveErrorEvent)
Private Shared Sub __ProgramDetail_InvokeInitializeDataWorkspace(s As __ProgramDetail, saveChangesTo As Global.System.Collections.Generic.List(Of Global.Microsoft.LightSwitch.IDataService))
s.ProgramDetail_InitializeDataWorkspace(saveChangesTo)
End Sub
Private Shared Function __ProgramDetail_InvokeSavingEvent(s As __ProgramDetail) As Boolean
Dim handled = False
s.ProgramDetail_Saving(handled)
Return handled
End Function
Private Shared Sub __ProgramDetail_InvokeSavedEvent(s As __ProgramDetail)
s.ProgramDetail_Saved()
End Sub
Private Shared Function __ProgramDetail_InvokeClosingEvent(s As __ProgramDetail) As Boolean
Dim cancel = False
s.ProgramDetail_Closing(cancel)
Return cancel
End Function
Private Shared Sub __ProgramDetail_InvokeCreated(s As __ProgramDetail)
s.ProgramDetail_Created()
End Sub
Private Shared Sub __ProgramDetail_InvokeActivated(s As __ProgramDetail)
s.ProgramDetail_Activated()
End Sub
Private Shared Function __ProgramDetail_InvokeSaveErrorEvent(s As __ProgramDetail, ex As Global.System.Exception) As Boolean
Dim handled = False
s.ProgramDetail_SaveError(ex, handled)
Return handled
End Function
Public Sub New()
MyBase.New()
End Sub
Public Shadows ReadOnly Property Properties As __ProgramDetail.DetailsClass.PropertySet
Get
Return MyBase.Properties
End Get
End Property
Public Shadows ReadOnly Property Commands As __ProgramDetail.DetailsClass.CommandSet
Get
Return MyBase.Commands
End Get
End Property
Public Shadows ReadOnly Property Methods As __ProgramDetail.DetailsClass.MethodSet
Get
Return MyBase.Methods
End Get
End Property
Private Function ProgramActivitiesQuery() As Global.Microsoft.LightSwitch.IDataServiceQueryable
If Me.Screen.Program Is Nothing Then
Return Nothing
End If
Dim loader As Global.Microsoft.LightSwitch.IDataServiceQueryable(Of Global.LightSwitchApplication.ProgramActivity) = _
DirectCast(DirectCast(Me.Screen.Program.Details.Properties.ProgramActivities, Global.Microsoft.LightSwitch.Details.ILoadableProperty).Loader, Global.Microsoft.LightSwitch.IDataServiceQueryable(Of Global.LightSwitchApplication.ProgramActivity))
If loader Is Nothing Then
Return Nothing
End If
Return Global.Microsoft.LightSwitch.DataServiceQueryable.Include(
loader,
"ProgramActivityName")
End Function
Private Function ProgramActivitiesSortedQuery() As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return Me.Screen.DataWorkspace.ApplicationData.ProgramActivitiesSorted()
End Function
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _Program As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenReferenceProperty(Of __ProgramDetail, __ProgramDetail.DetailsClass, Global.LightSwitchApplication.Program).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _ProgramId As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __ProgramDetail, __ProgramDetail.DetailsClass, Integer).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _ProgramActivities As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __ProgramDetail, __ProgramDetail.DetailsClass, Global.LightSwitchApplication.ProgramActivity).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _ProgramActivitiesSorted As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __ProgramDetail, __ProgramDetail.DetailsClass, Global.LightSwitchApplication.ProgramActivityName).Data
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class PropertySet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenPropertySet(Of __ProgramDetail, __ProgramDetail.DetailsClass)
Public ReadOnly Property Program As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenReferenceProperty(Of __ProgramDetail, __ProgramDetail.DetailsClass, Global.LightSwitchApplication.Program)
Get
Return DirectCast(MyBase.GetItem(__ProgramDetail.DetailsClass.PropertySetProperties.Program), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenReferenceProperty(Of __ProgramDetail, __ProgramDetail.DetailsClass, Global.LightSwitchApplication.Program))
End Get
End Property
Public ReadOnly Property ProgramId As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __ProgramDetail, __ProgramDetail.DetailsClass, Integer)
Get
Return DirectCast(MyBase.GetItem(__ProgramDetail.DetailsClass.PropertySetProperties.ProgramId), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __ProgramDetail, __ProgramDetail.DetailsClass, Integer))
End Get
End Property
Public ReadOnly Property ProgramActivities As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __ProgramDetail, __ProgramDetail.DetailsClass, Global.LightSwitchApplication.ProgramActivity)
Get
Return DirectCast(MyBase.GetItem(__ProgramDetail.DetailsClass.PropertySetProperties.ProgramActivities), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __ProgramDetail, __ProgramDetail.DetailsClass, Global.LightSwitchApplication.ProgramActivity))
End Get
End Property
Public ReadOnly Property ProgramActivitiesSorted As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __ProgramDetail, __ProgramDetail.DetailsClass, Global.LightSwitchApplication.ProgramActivityName)
Get
Return DirectCast(MyBase.GetItem(__ProgramDetail.DetailsClass.PropertySetProperties.ProgramActivitiesSorted), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __ProgramDetail, __ProgramDetail.DetailsClass, Global.LightSwitchApplication.ProgramActivityName))
End Get
End Property
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class CommandSet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommandSet(Of __ProgramDetail, __ProgramDetail.DetailsClass)
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class MethodSet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethodSet(Of __ProgramDetail, __ProgramDetail.DetailsClass)
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend NotInheritable Class PropertySetProperties
Public Shared ReadOnly Program As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenReferenceProperty(Of __ProgramDetail, __ProgramDetail.DetailsClass, Global.LightSwitchApplication.Program).Entry( _
"Program",
AddressOf __ProgramDetail.DetailsClass.PropertySetProperties._Program_Stub,
AddressOf __ProgramDetail.DetailsClass.PropertySetProperties._Program_Validate,
AddressOf __ProgramDetail.DetailsClass.PropertySetProperties._Program_CreateQuery,
AddressOf __ProgramDetail.DetailsClass.PropertySetProperties._Program_OnValueChanged,
AddressOf __ProgramDetail.DetailsClass.PropertySetProperties._Program_OnLoaded)
Private Shared Sub _Program_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __ProgramDetail.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenReferenceProperty(Of __ProgramDetail, __ProgramDetail.DetailsClass, Global.LightSwitchApplication.Program).Data), d As __ProgramDetail.DetailsClass, sf As Object)
c(d, d._Program, sf)
End Sub
Private Shared Sub _Program_Validate(s As __ProgramDetail, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.Program_Validate(r)
End Sub
Private Shared Function _Program_CreateQuery(d As __ProgramDetail.DetailsClass, args As Object()) As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return Nothing
End Function
Private Shared Sub _Program_OnValueChanged(s As __ProgramDetail)
s.Program_Changed()
End Sub
Private Shared Sub _Program_OnLoaded(s As __ProgramDetail, succeeded As Boolean)
s.Program_Loaded(succeeded)
End Sub
Public Shared ReadOnly ProgramId As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __ProgramDetail, __ProgramDetail.DetailsClass, Integer).Entry( _
"ProgramId",
False,
AddressOf __ProgramDetail.DetailsClass.PropertySetProperties._ProgramId_Stub,
AddressOf __ProgramDetail.DetailsClass.PropertySetProperties._ProgramId_Validate,
AddressOf __ProgramDetail.DetailsClass.PropertySetProperties._ProgramId_OnValueChanged)
Private Shared Sub _ProgramId_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __ProgramDetail.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __ProgramDetail, __ProgramDetail.DetailsClass, Integer).Data), d As __ProgramDetail.DetailsClass, sf As Object)
c(d, d._ProgramId, sf)
End Sub
Private Shared Sub _ProgramId_Validate(s As __ProgramDetail, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.ProgramId_Validate(r)
End Sub
Private Shared Sub _ProgramId_OnValueChanged(s As __ProgramDetail)
s.ProgramId_Changed()
End Sub
Public Shared ReadOnly ProgramActivities As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __ProgramDetail, __ProgramDetail.DetailsClass, Global.LightSwitchApplication.ProgramActivity).Entry( _
"ProgramActivities",
AddressOf __ProgramDetail.DetailsClass.PropertySetProperties._ProgramActivities_Stub,
AddressOf __ProgramDetail.DetailsClass.PropertySetProperties._ProgramActivities_Validate,
AddressOf __ProgramDetail.DetailsClass.PropertySetProperties._ProgramActivities_CreateQuery,
AddressOf __ProgramDetail.DetailsClass.PropertySetProperties._ProgramActivities_SelectionChanged,
AddressOf __ProgramDetail.DetailsClass.PropertySetProperties._ProgramActivities_OnCollectionChanged,
AddressOf __ProgramDetail.DetailsClass.PropertySetProperties._ProgramActivities_OnLoaded)
Private Shared Sub _ProgramActivities_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __ProgramDetail.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __ProgramDetail, __ProgramDetail.DetailsClass, Global.LightSwitchApplication.ProgramActivity).Data), d As __ProgramDetail.DetailsClass, sf As Object)
c(d, d._ProgramActivities, sf)
End Sub
Private Shared Sub _ProgramActivities_Validate(s As __ProgramDetail, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.ProgramActivities_Validate(r)
End Sub
Private Shared Function _ProgramActivities_CreateQuery(d As __ProgramDetail.DetailsClass, args As Object()) As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return d.ProgramActivitiesQuery()
End Function
Private Shared Sub _ProgramActivities_SelectionChanged(s As __ProgramDetail)
s.ProgramActivities_SelectionChanged()
End Sub
Private Shared Sub _ProgramActivities_OnCollectionChanged(s As __ProgramDetail, e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
s.ProgramActivities_Changed(e)
End Sub
Private Shared Sub _ProgramActivities_OnLoaded(s As __ProgramDetail, succeeded As Boolean)
s.ProgramActivities_Loaded(succeeded)
End Sub
Public Shared ReadOnly ProgramActivitiesSorted As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __ProgramDetail, __ProgramDetail.DetailsClass, Global.LightSwitchApplication.ProgramActivityName).Entry( _
"ProgramActivitiesSorted",
AddressOf __ProgramDetail.DetailsClass.PropertySetProperties._ProgramActivitiesSorted_Stub,
AddressOf __ProgramDetail.DetailsClass.PropertySetProperties._ProgramActivitiesSorted_Validate,
AddressOf __ProgramDetail.DetailsClass.PropertySetProperties._ProgramActivitiesSorted_CreateQuery,
AddressOf __ProgramDetail.DetailsClass.PropertySetProperties._ProgramActivitiesSorted_SelectionChanged,
AddressOf __ProgramDetail.DetailsClass.PropertySetProperties._ProgramActivitiesSorted_OnCollectionChanged,
AddressOf __ProgramDetail.DetailsClass.PropertySetProperties._ProgramActivitiesSorted_OnLoaded)
Private Shared Sub _ProgramActivitiesSorted_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __ProgramDetail.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __ProgramDetail, __ProgramDetail.DetailsClass, Global.LightSwitchApplication.ProgramActivityName).Data), d As __ProgramDetail.DetailsClass, sf As Object)
c(d, d._ProgramActivitiesSorted, sf)
End Sub
Private Shared Sub _ProgramActivitiesSorted_Validate(s As __ProgramDetail, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.ProgramActivitiesSorted_Validate(r)
End Sub
Private Shared Function _ProgramActivitiesSorted_CreateQuery(d As __ProgramDetail.DetailsClass, args As Object()) As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return d.ProgramActivitiesSortedQuery()
End Function
Private Shared Sub _ProgramActivitiesSorted_SelectionChanged(s As __ProgramDetail)
s.ProgramActivitiesSorted_SelectionChanged()
End Sub
Private Shared Sub _ProgramActivitiesSorted_OnCollectionChanged(s As __ProgramDetail, e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
s.ProgramActivitiesSorted_Changed(e)
End Sub
Private Shared Sub _ProgramActivitiesSorted_OnLoaded(s As __ProgramDetail, succeeded As Boolean)
s.ProgramActivitiesSorted_Loaded(succeeded)
End Sub
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend NotInheritable Class CommandSetProperties
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend NotInheritable Class MethodSetProperties
End Class
End Class
End Class
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
Partial Public NotInheritable Class Home
Inherits Global.Microsoft.LightSwitch.Framework.Client.ScreenObject(Of __Home, __Home.DetailsClass)
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private Sub New()
MyBase.New("LightSwitchApplication:Home")
__Home.DetailsClass.Initialize(Me)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
Public Shared Function CreateInstance() As Home
Return New __Home( _
)
End Function
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Home_InitializeDataWorkspace(ByVal saveChangesTo As Global.System.Collections.Generic.List(Of Global.Microsoft.LightSwitch.IDataService))
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Home_Created()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Home_Activated()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Home_Saving(ByRef handled As Boolean)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Home_Saved()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Home_Closing(ByRef cancel As Boolean)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Home_SaveError(ByVal exception As Global.System.Exception, ByRef handled As Boolean)
End Sub
#Region "Private Properties"
''' <summary>
''' Gets the Application object for this application. The Application object provides access to active screens, methods to open screens and access to the current user.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private ReadOnly Property Application As Global.LightSwitchApplication.Application
Get
Return Global.LightSwitchApplication.Application.Current
End Get
End Property
''' <summary>
''' Gets the containing data workspace. The data workspace provides access to all data sources in the application.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private ReadOnly Property DataWorkspace As Global.LightSwitchApplication.DataWorkspace
Get
Return DirectCast(DirectCast(Me.Details, Global.Microsoft.LightSwitch.Details.Client.IScreenDetails).DataWorkspace, Global.LightSwitchApplication.DataWorkspace)
End Get
End Property
#End Region
Partial Private Sub Image_Logo_Changed()
End Sub
Partial Private Sub Text_Title_Changed()
End Sub
Partial Private Sub Text_Tagline_Changed()
End Sub
Partial Private Sub Text_Description_Changed()
End Sub
Partial Private Sub People_SelectionChanged()
End Sub
Partial Private Sub People_Changed(ByVal e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub People_Loaded(ByVal succeeded As Boolean)
End Sub
Partial Private Sub Image_PersonLogo_Changed()
End Sub
Partial Private Sub Text_UpdatePeople_Changed()
End Sub
Partial Private Sub Text_UpdatePeople2_Changed()
End Sub
Partial Private Sub PeopleCountByMailcodes_SelectionChanged()
End Sub
Partial Private Sub PeopleCountByMailcodes_Changed(ByVal e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub PeopleCountByMailcodes_Loaded(ByVal succeeded As Boolean)
End Sub
Partial Private Sub Image_MailLogo_Changed()
End Sub
Partial Private Sub Text_ManageMail_Changed()
End Sub
Partial Private Sub Text_ManageMail2_Changed()
End Sub
Partial Private Sub Image_LookupTablesLogo_Changed()
End Sub
Partial Private Sub Text_lookupTables_Changed()
End Sub
Partial Private Sub Text_lookupTables2_Changed()
End Sub
Partial Private Sub Text_lookupTables3_Changed()
End Sub
Partial Private Sub Text_lookupTables4_Changed()
End Sub
Partial Private Sub Text_lookupTables6_Changed()
End Sub
Partial Private Sub Text_lookupTables5_Changed()
End Sub
Partial Private Sub Text_lookupTables7_Changed()
End Sub
Partial Private Sub Text_BlankLine_Changed()
End Sub
Partial Private Sub Text_ManageMail3_Changed()
End Sub
Partial Private Sub Text_ManageMail4_Changed()
End Sub
Partial Private Sub PeopleCountByZipDescending_SelectionChanged()
End Sub
Partial Private Sub PeopleCountByZipDescending_Changed(ByVal e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub PeopleCountByZipDescending_Loaded(ByVal succeeded As Boolean)
End Sub
Partial Private Sub Text_UpdatePeople3_Changed()
End Sub
Partial Private Sub Text_UpdatePeople4_Changed()
End Sub
Partial Private Sub Text_ManageMail5_Changed()
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Property Image_Logo As Byte()
Get
Return __Home.DetailsClass.GetValue(Me, __Home.DetailsClass.PropertySetProperties.Image_Logo)
End Get
Set(ByVal value As Byte())
__Home.DetailsClass.SetValue(Me, __Home.DetailsClass.PropertySetProperties.Image_Logo, value)
End Set
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Image_Logo_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Property Text_Title As String
Get
Return __Home.DetailsClass.GetValue(Me, __Home.DetailsClass.PropertySetProperties.Text_Title)
End Get
Set(ByVal value As String)
__Home.DetailsClass.SetValue(Me, __Home.DetailsClass.PropertySetProperties.Text_Title, value)
End Set
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Text_Title_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Property Text_Tagline As String
Get
Return __Home.DetailsClass.GetValue(Me, __Home.DetailsClass.PropertySetProperties.Text_Tagline)
End Get
Set(ByVal value As String)
__Home.DetailsClass.SetValue(Me, __Home.DetailsClass.PropertySetProperties.Text_Tagline, value)
End Set
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Text_Tagline_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Property Text_Description As String
Get
Return __Home.DetailsClass.GetValue(Me, __Home.DetailsClass.PropertySetProperties.Text_Description)
End Get
Set(ByVal value As String)
__Home.DetailsClass.SetValue(Me, __Home.DetailsClass.PropertySetProperties.Text_Description, value)
End Set
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Text_Description_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
''' <summary>
''' Gets the People visual collection. The collection contains all records currently shown on the respective list or grid control.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property People As Global.Microsoft.LightSwitch.Framework.Client.VisualCollection(Of Global.LightSwitchApplication.Person)
Get
Return __Home.DetailsClass.GetValue(Me, __Home.DetailsClass.PropertySetProperties.People)
End Get
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub People_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Property Image_PersonLogo As Byte()
Get
Return __Home.DetailsClass.GetValue(Me, __Home.DetailsClass.PropertySetProperties.Image_PersonLogo)
End Get
Set(ByVal value As Byte())
__Home.DetailsClass.SetValue(Me, __Home.DetailsClass.PropertySetProperties.Image_PersonLogo, value)
End Set
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Image_PersonLogo_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Property Text_UpdatePeople As String
Get
Return __Home.DetailsClass.GetValue(Me, __Home.DetailsClass.PropertySetProperties.Text_UpdatePeople)
End Get
Set(ByVal value As String)
__Home.DetailsClass.SetValue(Me, __Home.DetailsClass.PropertySetProperties.Text_UpdatePeople, value)
End Set
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Text_UpdatePeople_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Property Text_UpdatePeople2 As String
Get
Return __Home.DetailsClass.GetValue(Me, __Home.DetailsClass.PropertySetProperties.Text_UpdatePeople2)
End Get
Set(ByVal value As String)
__Home.DetailsClass.SetValue(Me, __Home.DetailsClass.PropertySetProperties.Text_UpdatePeople2, value)
End Set
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Text_UpdatePeople2_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
''' <summary>
''' Gets the PeopleCountByMailcodes visual collection. The collection contains all records currently shown on the respective list or grid control.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property PeopleCountByMailcodes As Global.Microsoft.LightSwitch.Framework.Client.VisualCollection(Of Global.LightSwitchApplication.PeopleCountByMailcode)
Get
Return __Home.DetailsClass.GetValue(Me, __Home.DetailsClass.PropertySetProperties.PeopleCountByMailcodes)
End Get
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub PeopleCountByMailcodes_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Property Image_MailLogo As Byte()
Get
Return __Home.DetailsClass.GetValue(Me, __Home.DetailsClass.PropertySetProperties.Image_MailLogo)
End Get
Set(ByVal value As Byte())
__Home.DetailsClass.SetValue(Me, __Home.DetailsClass.PropertySetProperties.Image_MailLogo, value)
End Set
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Image_MailLogo_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Property Text_ManageMail As String
Get
Return __Home.DetailsClass.GetValue(Me, __Home.DetailsClass.PropertySetProperties.Text_ManageMail)
End Get
Set(ByVal value As String)
__Home.DetailsClass.SetValue(Me, __Home.DetailsClass.PropertySetProperties.Text_ManageMail, value)
End Set
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Text_ManageMail_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Property Text_ManageMail2 As String
Get
Return __Home.DetailsClass.GetValue(Me, __Home.DetailsClass.PropertySetProperties.Text_ManageMail2)
End Get
Set(ByVal value As String)
__Home.DetailsClass.SetValue(Me, __Home.DetailsClass.PropertySetProperties.Text_ManageMail2, value)
End Set
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Text_ManageMail2_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Property Image_LookupTablesLogo As Byte()
Get
Return __Home.DetailsClass.GetValue(Me, __Home.DetailsClass.PropertySetProperties.Image_LookupTablesLogo)
End Get
Set(ByVal value As Byte())
__Home.DetailsClass.SetValue(Me, __Home.DetailsClass.PropertySetProperties.Image_LookupTablesLogo, value)
End Set
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Image_LookupTablesLogo_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Property Text_lookupTables As String
Get
Return __Home.DetailsClass.GetValue(Me, __Home.DetailsClass.PropertySetProperties.Text_lookupTables)
End Get
Set(ByVal value As String)
__Home.DetailsClass.SetValue(Me, __Home.DetailsClass.PropertySetProperties.Text_lookupTables, value)
End Set
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Text_lookupTables_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Property Text_lookupTables2 As String
Get
Return __Home.DetailsClass.GetValue(Me, __Home.DetailsClass.PropertySetProperties.Text_lookupTables2)
End Get
Set(ByVal value As String)
__Home.DetailsClass.SetValue(Me, __Home.DetailsClass.PropertySetProperties.Text_lookupTables2, value)
End Set
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Text_lookupTables2_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Property Text_lookupTables3 As String
Get
Return __Home.DetailsClass.GetValue(Me, __Home.DetailsClass.PropertySetProperties.Text_lookupTables3)
End Get
Set(ByVal value As String)
__Home.DetailsClass.SetValue(Me, __Home.DetailsClass.PropertySetProperties.Text_lookupTables3, value)
End Set
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Text_lookupTables3_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Property Text_lookupTables4 As String
Get
Return __Home.DetailsClass.GetValue(Me, __Home.DetailsClass.PropertySetProperties.Text_lookupTables4)
End Get
Set(ByVal value As String)
__Home.DetailsClass.SetValue(Me, __Home.DetailsClass.PropertySetProperties.Text_lookupTables4, value)
End Set
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Text_lookupTables4_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Property Text_lookupTables6 As String
Get
Return __Home.DetailsClass.GetValue(Me, __Home.DetailsClass.PropertySetProperties.Text_lookupTables6)
End Get
Set(ByVal value As String)
__Home.DetailsClass.SetValue(Me, __Home.DetailsClass.PropertySetProperties.Text_lookupTables6, value)
End Set
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Text_lookupTables6_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Property Text_lookupTables5 As String
Get
Return __Home.DetailsClass.GetValue(Me, __Home.DetailsClass.PropertySetProperties.Text_lookupTables5)
End Get
Set(ByVal value As String)
__Home.DetailsClass.SetValue(Me, __Home.DetailsClass.PropertySetProperties.Text_lookupTables5, value)
End Set
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Text_lookupTables5_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Property Text_lookupTables7 As String
Get
Return __Home.DetailsClass.GetValue(Me, __Home.DetailsClass.PropertySetProperties.Text_lookupTables7)
End Get
Set(ByVal value As String)
__Home.DetailsClass.SetValue(Me, __Home.DetailsClass.PropertySetProperties.Text_lookupTables7, value)
End Set
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Text_lookupTables7_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Property Text_BlankLine As String
Get
Return __Home.DetailsClass.GetValue(Me, __Home.DetailsClass.PropertySetProperties.Text_BlankLine)
End Get
Set(ByVal value As String)
__Home.DetailsClass.SetValue(Me, __Home.DetailsClass.PropertySetProperties.Text_BlankLine, value)
End Set
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Text_BlankLine_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Property Text_ManageMail3 As String
Get
Return __Home.DetailsClass.GetValue(Me, __Home.DetailsClass.PropertySetProperties.Text_ManageMail3)
End Get
Set(ByVal value As String)
__Home.DetailsClass.SetValue(Me, __Home.DetailsClass.PropertySetProperties.Text_ManageMail3, value)
End Set
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Text_ManageMail3_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Property Text_ManageMail4 As String
Get
Return __Home.DetailsClass.GetValue(Me, __Home.DetailsClass.PropertySetProperties.Text_ManageMail4)
End Get
Set(ByVal value As String)
__Home.DetailsClass.SetValue(Me, __Home.DetailsClass.PropertySetProperties.Text_ManageMail4, value)
End Set
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Text_ManageMail4_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
''' <summary>
''' Gets the PeopleCountByZipDescending visual collection. The collection contains all records currently shown on the respective list or grid control.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property PeopleCountByZipDescending As Global.Microsoft.LightSwitch.Framework.Client.VisualCollection(Of Global.LightSwitchApplication.PeopleCountByZip)
Get
Return __Home.DetailsClass.GetValue(Me, __Home.DetailsClass.PropertySetProperties.PeopleCountByZipDescending)
End Get
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub PeopleCountByZipDescending_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Property Text_UpdatePeople3 As String
Get
Return __Home.DetailsClass.GetValue(Me, __Home.DetailsClass.PropertySetProperties.Text_UpdatePeople3)
End Get
Set(ByVal value As String)
__Home.DetailsClass.SetValue(Me, __Home.DetailsClass.PropertySetProperties.Text_UpdatePeople3, value)
End Set
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Text_UpdatePeople3_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Property Text_UpdatePeople4 As String
Get
Return __Home.DetailsClass.GetValue(Me, __Home.DetailsClass.PropertySetProperties.Text_UpdatePeople4)
End Get
Set(ByVal value As String)
__Home.DetailsClass.SetValue(Me, __Home.DetailsClass.PropertySetProperties.Text_UpdatePeople4, value)
End Set
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Text_UpdatePeople4_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Property Text_ManageMail5 As String
Get
Return __Home.DetailsClass.GetValue(Me, __Home.DetailsClass.PropertySetProperties.Text_ManageMail5)
End Get
Set(ByVal value As String)
__Home.DetailsClass.SetValue(Me, __Home.DetailsClass.PropertySetProperties.Text_ManageMail5, value)
End Set
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Text_ManageMail5_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
''' <summary>
''' Calls the UpdatePeople screen method.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Sub UpdatePeople()
Me.Details.Methods.UpdatePeople.CreateInvocation().Execute()
End Sub
Partial Private Sub UpdatePeople_CanExecute(ByRef result As Boolean)
End Sub
Partial Private Sub UpdatePeople_Execute()
End Sub
''' <summary>
''' Calls the UpdateMail screen method.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Sub UpdateMail()
Me.Details.Methods.UpdateMail.CreateInvocation().Execute()
End Sub
Partial Private Sub UpdateMail_CanExecute(ByRef result As Boolean)
End Sub
Partial Private Sub UpdateMail_Execute()
End Sub
''' <summary>
''' Calls the UpdateLookupTables screen method.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Sub UpdateLookupTables()
Me.Details.Methods.UpdateLookupTables.CreateInvocation().Execute()
End Sub
Partial Private Sub UpdateLookupTables_CanExecute(ByRef result As Boolean)
End Sub
Partial Private Sub UpdateLookupTables_Execute()
End Sub
''' <summary>
''' Calls the LoadListFromExternalSource screen method.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Sub LoadListFromExternalSource()
Me.Details.Methods.LoadListFromExternalSource.CreateInvocation().Execute()
End Sub
Partial Private Sub LoadListFromExternalSource_CanExecute(ByRef result As Boolean)
End Sub
Partial Private Sub LoadListFromExternalSource_Execute()
End Sub
''' <summary>
''' Calls the IdentifyPotentialAddressDuplicates screen method.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Sub IdentifyPotentialAddressDuplicates()
Me.Details.Methods.IdentifyPotentialAddressDuplicates.CreateInvocation().Execute()
End Sub
Partial Private Sub IdentifyPotentialAddressDuplicates_CanExecute(ByRef result As Boolean)
End Sub
Partial Private Sub IdentifyPotentialAddressDuplicates_Execute()
End Sub
''' <summary>
''' Calls the ReviewExternalMailMatches screen method.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Sub ReviewExternalMailMatches()
Me.Details.Methods.ReviewExternalMailMatches.CreateInvocation().Execute()
End Sub
Partial Private Sub ReviewExternalMailMatches_CanExecute(ByRef result As Boolean)
End Sub
Partial Private Sub ReviewExternalMailMatches_Execute()
End Sub
''' <summary>
''' Calls the ReviewImportedPeopleMatches screen method.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Sub ReviewImportedPeopleMatches()
Me.Details.Methods.ReviewImportedPeopleMatches.CreateInvocation().Execute()
End Sub
Partial Private Sub ReviewImportedPeopleMatches_CanExecute(ByRef result As Boolean)
End Sub
Partial Private Sub ReviewImportedPeopleMatches_Execute()
End Sub
''' <summary>
''' Calls the LoadImportedPeople screen method.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Sub LoadImportedPeople()
Me.Details.Methods.LoadImportedPeople.CreateInvocation().Execute()
End Sub
Partial Private Sub LoadImportedPeople_CanExecute(ByRef result As Boolean)
End Sub
Partial Private Sub LoadImportedPeople_Execute()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class DetailsClass
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenDetails(Of __Home, __Home.DetailsClass, __Home.DetailsClass.PropertySet, __Home.DetailsClass.CommandSet, __Home.DetailsClass.MethodSet)
Shared Sub New()
Dim initializePropertyEntry = __Home.DetailsClass.PropertySetProperties.Image_Logo
Dim initializeCommandEntry = __Home.DetailsClass.CommandSetProperties.UpdatePeople
Dim initializeMethodEntry = __Home.DetailsClass.MethodSetProperties.UpdatePeople
End Sub
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Private Shared ReadOnly __HomeEntry As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenDetails(Of __Home, __Home.DetailsClass).Entry = _
New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenDetails(Of __Home, __Home.DetailsClass).Entry( _
AddressOf __Home.DetailsClass.__Home_InvokeInitializeDataWorkspace,
AddressOf __Home.DetailsClass.__Home_InvokeSavingEvent,
AddressOf __Home.DetailsClass.__Home_InvokeSavedEvent,
AddressOf __Home.DetailsClass.__Home_InvokeClosingEvent,
AddressOf __Home.DetailsClass.__Home_InvokeCreated,
AddressOf __Home.DetailsClass.__Home_InvokeActivated,
AddressOf __Home.DetailsClass.__Home_InvokeSaveErrorEvent)
Private Shared Sub __Home_InvokeInitializeDataWorkspace(s As __Home, saveChangesTo As Global.System.Collections.Generic.List(Of Global.Microsoft.LightSwitch.IDataService))
s.Home_InitializeDataWorkspace(saveChangesTo)
End Sub
Private Shared Function __Home_InvokeSavingEvent(s As __Home) As Boolean
Dim handled = False
s.Home_Saving(handled)
Return handled
End Function
Private Shared Sub __Home_InvokeSavedEvent(s As __Home)
s.Home_Saved()
End Sub
Private Shared Function __Home_InvokeClosingEvent(s As __Home) As Boolean
Dim cancel = False
s.Home_Closing(cancel)
Return cancel
End Function
Private Shared Sub __Home_InvokeCreated(s As __Home)
s.Home_Created()
End Sub
Private Shared Sub __Home_InvokeActivated(s As __Home)
s.Home_Activated()
End Sub
Private Shared Function __Home_InvokeSaveErrorEvent(s As __Home, ex As Global.System.Exception) As Boolean
Dim handled = False
s.Home_SaveError(ex, handled)
Return handled
End Function
Public Sub New()
MyBase.New()
End Sub
Public Shadows ReadOnly Property Properties As __Home.DetailsClass.PropertySet
Get
Return MyBase.Properties
End Get
End Property
Public Shadows ReadOnly Property Commands As __Home.DetailsClass.CommandSet
Get
Return MyBase.Commands
End Get
End Property
Public Shadows ReadOnly Property Methods As __Home.DetailsClass.MethodSet
Get
Return MyBase.Methods
End Get
End Property
Private Function PeopleQuery() As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return Global.Microsoft.LightSwitch.DataServiceQueryable.ThenBy( _
Global.Microsoft.LightSwitch.DataServiceQueryable.OrderBy( _
Me.Screen.DataWorkspace.ApplicationData.People, _
Function(p) p.LastName), _
Function(p) p.FirstName)
End Function
Private Function PeopleCountByMailcodesQuery() As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return Global.Microsoft.LightSwitch.DataServiceQueryable.OrderBy( _
Me.Screen.DataWorkspace.WCF_RIA_ServiceData.PeopleCountByMailcodes, _
Function(p) p.MailCodeName)
End Function
Private Function PeopleCountByZipDescendingQuery() As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return Me.Screen.DataWorkspace.WCF_RIA_ServiceData.PeopleCountByZipDescending()
End Function
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _Image_Logo As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, Byte()).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _Text_Title As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _Text_Tagline As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _Text_Description As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _People As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __Home, __Home.DetailsClass, Global.LightSwitchApplication.Person).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _Image_PersonLogo As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, Byte()).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _Text_UpdatePeople As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _Text_UpdatePeople2 As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _PeopleCountByMailcodes As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __Home, __Home.DetailsClass, Global.LightSwitchApplication.PeopleCountByMailcode).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _Image_MailLogo As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, Byte()).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _Text_ManageMail As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _Text_ManageMail2 As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _Image_LookupTablesLogo As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, Byte()).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _Text_lookupTables As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _Text_lookupTables2 As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _Text_lookupTables3 As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _Text_lookupTables4 As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _Text_lookupTables6 As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _Text_lookupTables5 As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _Text_lookupTables7 As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _Text_BlankLine As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _Text_ManageMail3 As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _Text_ManageMail4 As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _PeopleCountByZipDescending As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __Home, __Home.DetailsClass, Global.LightSwitchApplication.PeopleCountByZip).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _Text_UpdatePeople3 As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _Text_UpdatePeople4 As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _Text_ManageMail5 As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _UpdatePeopleCommand As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __Home, __Home.DetailsClass).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _UpdateMailCommand As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __Home, __Home.DetailsClass).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _UpdateLookupTablesCommand As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __Home, __Home.DetailsClass).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _LoadListFromExternalSourceCommand As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __Home, __Home.DetailsClass).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _IdentifyPotentialAddressDuplicatesCommand As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __Home, __Home.DetailsClass).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _ReviewExternalMailMatchesCommand As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __Home, __Home.DetailsClass).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _ReviewImportedPeopleMatchesCommand As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __Home, __Home.DetailsClass).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _LoadImportedPeopleCommand As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __Home, __Home.DetailsClass).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _UpdatePeopleMethod As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __Home, __Home.DetailsClass).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _UpdateMailMethod As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __Home, __Home.DetailsClass).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _UpdateLookupTablesMethod As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __Home, __Home.DetailsClass).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _LoadListFromExternalSourceMethod As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __Home, __Home.DetailsClass).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _IdentifyPotentialAddressDuplicatesMethod As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __Home, __Home.DetailsClass).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _ReviewExternalMailMatchesMethod As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __Home, __Home.DetailsClass).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _ReviewImportedPeopleMatchesMethod As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __Home, __Home.DetailsClass).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _LoadImportedPeopleMethod As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __Home, __Home.DetailsClass).Data
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class PropertySet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenPropertySet(Of __Home, __Home.DetailsClass)
Public ReadOnly Property Image_Logo As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, Byte())
Get
Return DirectCast(MyBase.GetItem(__Home.DetailsClass.PropertySetProperties.Image_Logo), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, Byte()))
End Get
End Property
Public ReadOnly Property Text_Title As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String)
Get
Return DirectCast(MyBase.GetItem(__Home.DetailsClass.PropertySetProperties.Text_Title), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String))
End Get
End Property
Public ReadOnly Property Text_Tagline As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String)
Get
Return DirectCast(MyBase.GetItem(__Home.DetailsClass.PropertySetProperties.Text_Tagline), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String))
End Get
End Property
Public ReadOnly Property Text_Description As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String)
Get
Return DirectCast(MyBase.GetItem(__Home.DetailsClass.PropertySetProperties.Text_Description), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String))
End Get
End Property
Public ReadOnly Property People As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __Home, __Home.DetailsClass, Global.LightSwitchApplication.Person)
Get
Return DirectCast(MyBase.GetItem(__Home.DetailsClass.PropertySetProperties.People), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __Home, __Home.DetailsClass, Global.LightSwitchApplication.Person))
End Get
End Property
Public ReadOnly Property Image_PersonLogo As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, Byte())
Get
Return DirectCast(MyBase.GetItem(__Home.DetailsClass.PropertySetProperties.Image_PersonLogo), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, Byte()))
End Get
End Property
Public ReadOnly Property Text_UpdatePeople As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String)
Get
Return DirectCast(MyBase.GetItem(__Home.DetailsClass.PropertySetProperties.Text_UpdatePeople), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String))
End Get
End Property
Public ReadOnly Property Text_UpdatePeople2 As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String)
Get
Return DirectCast(MyBase.GetItem(__Home.DetailsClass.PropertySetProperties.Text_UpdatePeople2), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String))
End Get
End Property
Public ReadOnly Property PeopleCountByMailcodes As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __Home, __Home.DetailsClass, Global.LightSwitchApplication.PeopleCountByMailcode)
Get
Return DirectCast(MyBase.GetItem(__Home.DetailsClass.PropertySetProperties.PeopleCountByMailcodes), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __Home, __Home.DetailsClass, Global.LightSwitchApplication.PeopleCountByMailcode))
End Get
End Property
Public ReadOnly Property Image_MailLogo As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, Byte())
Get
Return DirectCast(MyBase.GetItem(__Home.DetailsClass.PropertySetProperties.Image_MailLogo), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, Byte()))
End Get
End Property
Public ReadOnly Property Text_ManageMail As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String)
Get
Return DirectCast(MyBase.GetItem(__Home.DetailsClass.PropertySetProperties.Text_ManageMail), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String))
End Get
End Property
Public ReadOnly Property Text_ManageMail2 As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String)
Get
Return DirectCast(MyBase.GetItem(__Home.DetailsClass.PropertySetProperties.Text_ManageMail2), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String))
End Get
End Property
Public ReadOnly Property Image_LookupTablesLogo As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, Byte())
Get
Return DirectCast(MyBase.GetItem(__Home.DetailsClass.PropertySetProperties.Image_LookupTablesLogo), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, Byte()))
End Get
End Property
Public ReadOnly Property Text_lookupTables As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String)
Get
Return DirectCast(MyBase.GetItem(__Home.DetailsClass.PropertySetProperties.Text_lookupTables), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String))
End Get
End Property
Public ReadOnly Property Text_lookupTables2 As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String)
Get
Return DirectCast(MyBase.GetItem(__Home.DetailsClass.PropertySetProperties.Text_lookupTables2), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String))
End Get
End Property
Public ReadOnly Property Text_lookupTables3 As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String)
Get
Return DirectCast(MyBase.GetItem(__Home.DetailsClass.PropertySetProperties.Text_lookupTables3), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String))
End Get
End Property
Public ReadOnly Property Text_lookupTables4 As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String)
Get
Return DirectCast(MyBase.GetItem(__Home.DetailsClass.PropertySetProperties.Text_lookupTables4), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String))
End Get
End Property
Public ReadOnly Property Text_lookupTables6 As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String)
Get
Return DirectCast(MyBase.GetItem(__Home.DetailsClass.PropertySetProperties.Text_lookupTables6), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String))
End Get
End Property
Public ReadOnly Property Text_lookupTables5 As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String)
Get
Return DirectCast(MyBase.GetItem(__Home.DetailsClass.PropertySetProperties.Text_lookupTables5), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String))
End Get
End Property
Public ReadOnly Property Text_lookupTables7 As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String)
Get
Return DirectCast(MyBase.GetItem(__Home.DetailsClass.PropertySetProperties.Text_lookupTables7), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String))
End Get
End Property
Public ReadOnly Property Text_BlankLine As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String)
Get
Return DirectCast(MyBase.GetItem(__Home.DetailsClass.PropertySetProperties.Text_BlankLine), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String))
End Get
End Property
Public ReadOnly Property Text_ManageMail3 As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String)
Get
Return DirectCast(MyBase.GetItem(__Home.DetailsClass.PropertySetProperties.Text_ManageMail3), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String))
End Get
End Property
Public ReadOnly Property Text_ManageMail4 As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String)
Get
Return DirectCast(MyBase.GetItem(__Home.DetailsClass.PropertySetProperties.Text_ManageMail4), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String))
End Get
End Property
Public ReadOnly Property PeopleCountByZipDescending As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __Home, __Home.DetailsClass, Global.LightSwitchApplication.PeopleCountByZip)
Get
Return DirectCast(MyBase.GetItem(__Home.DetailsClass.PropertySetProperties.PeopleCountByZipDescending), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __Home, __Home.DetailsClass, Global.LightSwitchApplication.PeopleCountByZip))
End Get
End Property
Public ReadOnly Property Text_UpdatePeople3 As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String)
Get
Return DirectCast(MyBase.GetItem(__Home.DetailsClass.PropertySetProperties.Text_UpdatePeople3), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String))
End Get
End Property
Public ReadOnly Property Text_UpdatePeople4 As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String)
Get
Return DirectCast(MyBase.GetItem(__Home.DetailsClass.PropertySetProperties.Text_UpdatePeople4), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String))
End Get
End Property
Public ReadOnly Property Text_ManageMail5 As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String)
Get
Return DirectCast(MyBase.GetItem(__Home.DetailsClass.PropertySetProperties.Text_ManageMail5), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String))
End Get
End Property
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class CommandSet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommandSet(Of __Home, __Home.DetailsClass)
Public ReadOnly Property UpdatePeople As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __Home, __Home.DetailsClass)
Get
Return DirectCast(MyBase.GetItem(__Home.DetailsClass.CommandSetProperties.UpdatePeople), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __Home, __Home.DetailsClass))
End Get
End Property
Public ReadOnly Property UpdateMail As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __Home, __Home.DetailsClass)
Get
Return DirectCast(MyBase.GetItem(__Home.DetailsClass.CommandSetProperties.UpdateMail), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __Home, __Home.DetailsClass))
End Get
End Property
Public ReadOnly Property UpdateLookupTables As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __Home, __Home.DetailsClass)
Get
Return DirectCast(MyBase.GetItem(__Home.DetailsClass.CommandSetProperties.UpdateLookupTables), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __Home, __Home.DetailsClass))
End Get
End Property
Public ReadOnly Property LoadListFromExternalSource As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __Home, __Home.DetailsClass)
Get
Return DirectCast(MyBase.GetItem(__Home.DetailsClass.CommandSetProperties.LoadListFromExternalSource), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __Home, __Home.DetailsClass))
End Get
End Property
Public ReadOnly Property IdentifyPotentialAddressDuplicates As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __Home, __Home.DetailsClass)
Get
Return DirectCast(MyBase.GetItem(__Home.DetailsClass.CommandSetProperties.IdentifyPotentialAddressDuplicates), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __Home, __Home.DetailsClass))
End Get
End Property
Public ReadOnly Property ReviewExternalMailMatches As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __Home, __Home.DetailsClass)
Get
Return DirectCast(MyBase.GetItem(__Home.DetailsClass.CommandSetProperties.ReviewExternalMailMatches), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __Home, __Home.DetailsClass))
End Get
End Property
Public ReadOnly Property ReviewImportedPeopleMatches As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __Home, __Home.DetailsClass)
Get
Return DirectCast(MyBase.GetItem(__Home.DetailsClass.CommandSetProperties.ReviewImportedPeopleMatches), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __Home, __Home.DetailsClass))
End Get
End Property
Public ReadOnly Property LoadImportedPeople As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __Home, __Home.DetailsClass)
Get
Return DirectCast(MyBase.GetItem(__Home.DetailsClass.CommandSetProperties.LoadImportedPeople), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __Home, __Home.DetailsClass))
End Get
End Property
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class MethodSet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethodSet(Of __Home, __Home.DetailsClass)
Public ReadOnly Property UpdatePeople As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __Home, __Home.DetailsClass)
Get
Return DirectCast(MyBase.GetItem(__Home.DetailsClass.MethodSetProperties.UpdatePeople), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __Home, __Home.DetailsClass))
End Get
End Property
Public ReadOnly Property UpdateMail As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __Home, __Home.DetailsClass)
Get
Return DirectCast(MyBase.GetItem(__Home.DetailsClass.MethodSetProperties.UpdateMail), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __Home, __Home.DetailsClass))
End Get
End Property
Public ReadOnly Property UpdateLookupTables As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __Home, __Home.DetailsClass)
Get
Return DirectCast(MyBase.GetItem(__Home.DetailsClass.MethodSetProperties.UpdateLookupTables), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __Home, __Home.DetailsClass))
End Get
End Property
Public ReadOnly Property LoadListFromExternalSource As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __Home, __Home.DetailsClass)
Get
Return DirectCast(MyBase.GetItem(__Home.DetailsClass.MethodSetProperties.LoadListFromExternalSource), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __Home, __Home.DetailsClass))
End Get
End Property
Public ReadOnly Property IdentifyPotentialAddressDuplicates As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __Home, __Home.DetailsClass)
Get
Return DirectCast(MyBase.GetItem(__Home.DetailsClass.MethodSetProperties.IdentifyPotentialAddressDuplicates), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __Home, __Home.DetailsClass))
End Get
End Property
Public ReadOnly Property ReviewExternalMailMatches As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __Home, __Home.DetailsClass)
Get
Return DirectCast(MyBase.GetItem(__Home.DetailsClass.MethodSetProperties.ReviewExternalMailMatches), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __Home, __Home.DetailsClass))
End Get
End Property
Public ReadOnly Property ReviewImportedPeopleMatches As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __Home, __Home.DetailsClass)
Get
Return DirectCast(MyBase.GetItem(__Home.DetailsClass.MethodSetProperties.ReviewImportedPeopleMatches), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __Home, __Home.DetailsClass))
End Get
End Property
Public ReadOnly Property LoadImportedPeople As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __Home, __Home.DetailsClass)
Get
Return DirectCast(MyBase.GetItem(__Home.DetailsClass.MethodSetProperties.LoadImportedPeople), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __Home, __Home.DetailsClass))
End Get
End Property
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend NotInheritable Class PropertySetProperties
Public Shared ReadOnly Image_Logo As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, Byte()).Entry( _
"Image_Logo",
False,
AddressOf __Home.DetailsClass.PropertySetProperties._Image_Logo_Stub,
AddressOf __Home.DetailsClass.PropertySetProperties._Image_Logo_Validate,
AddressOf __Home.DetailsClass.PropertySetProperties._Image_Logo_OnValueChanged)
Private Shared Sub _Image_Logo_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __Home.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, Byte()).Data), d As __Home.DetailsClass, sf As Object)
c(d, d._Image_Logo, sf)
End Sub
Private Shared Sub _Image_Logo_Validate(s As __Home, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.Image_Logo_Validate(r)
End Sub
Private Shared Sub _Image_Logo_OnValueChanged(s As __Home)
s.Image_Logo_Changed()
End Sub
Public Shared ReadOnly Text_Title As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String).Entry( _
"Text_Title",
False,
AddressOf __Home.DetailsClass.PropertySetProperties._Text_Title_Stub,
AddressOf __Home.DetailsClass.PropertySetProperties._Text_Title_Validate,
AddressOf __Home.DetailsClass.PropertySetProperties._Text_Title_OnValueChanged)
Private Shared Sub _Text_Title_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __Home.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String).Data), d As __Home.DetailsClass, sf As Object)
c(d, d._Text_Title, sf)
End Sub
Private Shared Sub _Text_Title_Validate(s As __Home, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.Text_Title_Validate(r)
End Sub
Private Shared Sub _Text_Title_OnValueChanged(s As __Home)
s.Text_Title_Changed()
End Sub
Public Shared ReadOnly Text_Tagline As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String).Entry( _
"Text_Tagline",
False,
AddressOf __Home.DetailsClass.PropertySetProperties._Text_Tagline_Stub,
AddressOf __Home.DetailsClass.PropertySetProperties._Text_Tagline_Validate,
AddressOf __Home.DetailsClass.PropertySetProperties._Text_Tagline_OnValueChanged)
Private Shared Sub _Text_Tagline_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __Home.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String).Data), d As __Home.DetailsClass, sf As Object)
c(d, d._Text_Tagline, sf)
End Sub
Private Shared Sub _Text_Tagline_Validate(s As __Home, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.Text_Tagline_Validate(r)
End Sub
Private Shared Sub _Text_Tagline_OnValueChanged(s As __Home)
s.Text_Tagline_Changed()
End Sub
Public Shared ReadOnly Text_Description As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String).Entry( _
"Text_Description",
False,
AddressOf __Home.DetailsClass.PropertySetProperties._Text_Description_Stub,
AddressOf __Home.DetailsClass.PropertySetProperties._Text_Description_Validate,
AddressOf __Home.DetailsClass.PropertySetProperties._Text_Description_OnValueChanged)
Private Shared Sub _Text_Description_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __Home.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String).Data), d As __Home.DetailsClass, sf As Object)
c(d, d._Text_Description, sf)
End Sub
Private Shared Sub _Text_Description_Validate(s As __Home, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.Text_Description_Validate(r)
End Sub
Private Shared Sub _Text_Description_OnValueChanged(s As __Home)
s.Text_Description_Changed()
End Sub
Public Shared ReadOnly People As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __Home, __Home.DetailsClass, Global.LightSwitchApplication.Person).Entry( _
"People",
AddressOf __Home.DetailsClass.PropertySetProperties._People_Stub,
AddressOf __Home.DetailsClass.PropertySetProperties._People_Validate,
AddressOf __Home.DetailsClass.PropertySetProperties._People_CreateQuery,
AddressOf __Home.DetailsClass.PropertySetProperties._People_SelectionChanged,
AddressOf __Home.DetailsClass.PropertySetProperties._People_OnCollectionChanged,
AddressOf __Home.DetailsClass.PropertySetProperties._People_OnLoaded)
Private Shared Sub _People_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __Home.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __Home, __Home.DetailsClass, Global.LightSwitchApplication.Person).Data), d As __Home.DetailsClass, sf As Object)
c(d, d._People, sf)
End Sub
Private Shared Sub _People_Validate(s As __Home, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.People_Validate(r)
End Sub
Private Shared Function _People_CreateQuery(d As __Home.DetailsClass, args As Object()) As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return d.PeopleQuery()
End Function
Private Shared Sub _People_SelectionChanged(s As __Home)
s.People_SelectionChanged()
End Sub
Private Shared Sub _People_OnCollectionChanged(s As __Home, e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
s.People_Changed(e)
End Sub
Private Shared Sub _People_OnLoaded(s As __Home, succeeded As Boolean)
s.People_Loaded(succeeded)
End Sub
Public Shared ReadOnly Image_PersonLogo As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, Byte()).Entry( _
"Image_PersonLogo",
False,
AddressOf __Home.DetailsClass.PropertySetProperties._Image_PersonLogo_Stub,
AddressOf __Home.DetailsClass.PropertySetProperties._Image_PersonLogo_Validate,
AddressOf __Home.DetailsClass.PropertySetProperties._Image_PersonLogo_OnValueChanged)
Private Shared Sub _Image_PersonLogo_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __Home.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, Byte()).Data), d As __Home.DetailsClass, sf As Object)
c(d, d._Image_PersonLogo, sf)
End Sub
Private Shared Sub _Image_PersonLogo_Validate(s As __Home, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.Image_PersonLogo_Validate(r)
End Sub
Private Shared Sub _Image_PersonLogo_OnValueChanged(s As __Home)
s.Image_PersonLogo_Changed()
End Sub
Public Shared ReadOnly Text_UpdatePeople As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String).Entry( _
"Text_UpdatePeople",
False,
AddressOf __Home.DetailsClass.PropertySetProperties._Text_UpdatePeople_Stub,
AddressOf __Home.DetailsClass.PropertySetProperties._Text_UpdatePeople_Validate,
AddressOf __Home.DetailsClass.PropertySetProperties._Text_UpdatePeople_OnValueChanged)
Private Shared Sub _Text_UpdatePeople_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __Home.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String).Data), d As __Home.DetailsClass, sf As Object)
c(d, d._Text_UpdatePeople, sf)
End Sub
Private Shared Sub _Text_UpdatePeople_Validate(s As __Home, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.Text_UpdatePeople_Validate(r)
End Sub
Private Shared Sub _Text_UpdatePeople_OnValueChanged(s As __Home)
s.Text_UpdatePeople_Changed()
End Sub
Public Shared ReadOnly Text_UpdatePeople2 As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String).Entry( _
"Text_UpdatePeople2",
False,
AddressOf __Home.DetailsClass.PropertySetProperties._Text_UpdatePeople2_Stub,
AddressOf __Home.DetailsClass.PropertySetProperties._Text_UpdatePeople2_Validate,
AddressOf __Home.DetailsClass.PropertySetProperties._Text_UpdatePeople2_OnValueChanged)
Private Shared Sub _Text_UpdatePeople2_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __Home.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String).Data), d As __Home.DetailsClass, sf As Object)
c(d, d._Text_UpdatePeople2, sf)
End Sub
Private Shared Sub _Text_UpdatePeople2_Validate(s As __Home, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.Text_UpdatePeople2_Validate(r)
End Sub
Private Shared Sub _Text_UpdatePeople2_OnValueChanged(s As __Home)
s.Text_UpdatePeople2_Changed()
End Sub
Public Shared ReadOnly PeopleCountByMailcodes As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __Home, __Home.DetailsClass, Global.LightSwitchApplication.PeopleCountByMailcode).Entry( _
"PeopleCountByMailcodes",
AddressOf __Home.DetailsClass.PropertySetProperties._PeopleCountByMailcodes_Stub,
AddressOf __Home.DetailsClass.PropertySetProperties._PeopleCountByMailcodes_Validate,
AddressOf __Home.DetailsClass.PropertySetProperties._PeopleCountByMailcodes_CreateQuery,
AddressOf __Home.DetailsClass.PropertySetProperties._PeopleCountByMailcodes_SelectionChanged,
AddressOf __Home.DetailsClass.PropertySetProperties._PeopleCountByMailcodes_OnCollectionChanged,
AddressOf __Home.DetailsClass.PropertySetProperties._PeopleCountByMailcodes_OnLoaded)
Private Shared Sub _PeopleCountByMailcodes_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __Home.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __Home, __Home.DetailsClass, Global.LightSwitchApplication.PeopleCountByMailcode).Data), d As __Home.DetailsClass, sf As Object)
c(d, d._PeopleCountByMailcodes, sf)
End Sub
Private Shared Sub _PeopleCountByMailcodes_Validate(s As __Home, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.PeopleCountByMailcodes_Validate(r)
End Sub
Private Shared Function _PeopleCountByMailcodes_CreateQuery(d As __Home.DetailsClass, args As Object()) As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return d.PeopleCountByMailcodesQuery()
End Function
Private Shared Sub _PeopleCountByMailcodes_SelectionChanged(s As __Home)
s.PeopleCountByMailcodes_SelectionChanged()
End Sub
Private Shared Sub _PeopleCountByMailcodes_OnCollectionChanged(s As __Home, e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
s.PeopleCountByMailcodes_Changed(e)
End Sub
Private Shared Sub _PeopleCountByMailcodes_OnLoaded(s As __Home, succeeded As Boolean)
s.PeopleCountByMailcodes_Loaded(succeeded)
End Sub
Public Shared ReadOnly Image_MailLogo As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, Byte()).Entry( _
"Image_MailLogo",
False,
AddressOf __Home.DetailsClass.PropertySetProperties._Image_MailLogo_Stub,
AddressOf __Home.DetailsClass.PropertySetProperties._Image_MailLogo_Validate,
AddressOf __Home.DetailsClass.PropertySetProperties._Image_MailLogo_OnValueChanged)
Private Shared Sub _Image_MailLogo_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __Home.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, Byte()).Data), d As __Home.DetailsClass, sf As Object)
c(d, d._Image_MailLogo, sf)
End Sub
Private Shared Sub _Image_MailLogo_Validate(s As __Home, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.Image_MailLogo_Validate(r)
End Sub
Private Shared Sub _Image_MailLogo_OnValueChanged(s As __Home)
s.Image_MailLogo_Changed()
End Sub
Public Shared ReadOnly Text_ManageMail As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String).Entry( _
"Text_ManageMail",
False,
AddressOf __Home.DetailsClass.PropertySetProperties._Text_ManageMail_Stub,
AddressOf __Home.DetailsClass.PropertySetProperties._Text_ManageMail_Validate,
AddressOf __Home.DetailsClass.PropertySetProperties._Text_ManageMail_OnValueChanged)
Private Shared Sub _Text_ManageMail_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __Home.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String).Data), d As __Home.DetailsClass, sf As Object)
c(d, d._Text_ManageMail, sf)
End Sub
Private Shared Sub _Text_ManageMail_Validate(s As __Home, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.Text_ManageMail_Validate(r)
End Sub
Private Shared Sub _Text_ManageMail_OnValueChanged(s As __Home)
s.Text_ManageMail_Changed()
End Sub
Public Shared ReadOnly Text_ManageMail2 As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String).Entry( _
"Text_ManageMail2",
False,
AddressOf __Home.DetailsClass.PropertySetProperties._Text_ManageMail2_Stub,
AddressOf __Home.DetailsClass.PropertySetProperties._Text_ManageMail2_Validate,
AddressOf __Home.DetailsClass.PropertySetProperties._Text_ManageMail2_OnValueChanged)
Private Shared Sub _Text_ManageMail2_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __Home.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String).Data), d As __Home.DetailsClass, sf As Object)
c(d, d._Text_ManageMail2, sf)
End Sub
Private Shared Sub _Text_ManageMail2_Validate(s As __Home, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.Text_ManageMail2_Validate(r)
End Sub
Private Shared Sub _Text_ManageMail2_OnValueChanged(s As __Home)
s.Text_ManageMail2_Changed()
End Sub
Public Shared ReadOnly Image_LookupTablesLogo As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, Byte()).Entry( _
"Image_LookupTablesLogo",
False,
AddressOf __Home.DetailsClass.PropertySetProperties._Image_LookupTablesLogo_Stub,
AddressOf __Home.DetailsClass.PropertySetProperties._Image_LookupTablesLogo_Validate,
AddressOf __Home.DetailsClass.PropertySetProperties._Image_LookupTablesLogo_OnValueChanged)
Private Shared Sub _Image_LookupTablesLogo_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __Home.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, Byte()).Data), d As __Home.DetailsClass, sf As Object)
c(d, d._Image_LookupTablesLogo, sf)
End Sub
Private Shared Sub _Image_LookupTablesLogo_Validate(s As __Home, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.Image_LookupTablesLogo_Validate(r)
End Sub
Private Shared Sub _Image_LookupTablesLogo_OnValueChanged(s As __Home)
s.Image_LookupTablesLogo_Changed()
End Sub
Public Shared ReadOnly Text_lookupTables As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String).Entry( _
"Text_lookupTables",
False,
AddressOf __Home.DetailsClass.PropertySetProperties._Text_lookupTables_Stub,
AddressOf __Home.DetailsClass.PropertySetProperties._Text_lookupTables_Validate,
AddressOf __Home.DetailsClass.PropertySetProperties._Text_lookupTables_OnValueChanged)
Private Shared Sub _Text_lookupTables_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __Home.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String).Data), d As __Home.DetailsClass, sf As Object)
c(d, d._Text_lookupTables, sf)
End Sub
Private Shared Sub _Text_lookupTables_Validate(s As __Home, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.Text_lookupTables_Validate(r)
End Sub
Private Shared Sub _Text_lookupTables_OnValueChanged(s As __Home)
s.Text_lookupTables_Changed()
End Sub
Public Shared ReadOnly Text_lookupTables2 As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String).Entry( _
"Text_lookupTables2",
False,
AddressOf __Home.DetailsClass.PropertySetProperties._Text_lookupTables2_Stub,
AddressOf __Home.DetailsClass.PropertySetProperties._Text_lookupTables2_Validate,
AddressOf __Home.DetailsClass.PropertySetProperties._Text_lookupTables2_OnValueChanged)
Private Shared Sub _Text_lookupTables2_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __Home.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String).Data), d As __Home.DetailsClass, sf As Object)
c(d, d._Text_lookupTables2, sf)
End Sub
Private Shared Sub _Text_lookupTables2_Validate(s As __Home, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.Text_lookupTables2_Validate(r)
End Sub
Private Shared Sub _Text_lookupTables2_OnValueChanged(s As __Home)
s.Text_lookupTables2_Changed()
End Sub
Public Shared ReadOnly Text_lookupTables3 As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String).Entry( _
"Text_lookupTables3",
False,
AddressOf __Home.DetailsClass.PropertySetProperties._Text_lookupTables3_Stub,
AddressOf __Home.DetailsClass.PropertySetProperties._Text_lookupTables3_Validate,
AddressOf __Home.DetailsClass.PropertySetProperties._Text_lookupTables3_OnValueChanged)
Private Shared Sub _Text_lookupTables3_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __Home.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String).Data), d As __Home.DetailsClass, sf As Object)
c(d, d._Text_lookupTables3, sf)
End Sub
Private Shared Sub _Text_lookupTables3_Validate(s As __Home, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.Text_lookupTables3_Validate(r)
End Sub
Private Shared Sub _Text_lookupTables3_OnValueChanged(s As __Home)
s.Text_lookupTables3_Changed()
End Sub
Public Shared ReadOnly Text_lookupTables4 As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String).Entry( _
"Text_lookupTables4",
False,
AddressOf __Home.DetailsClass.PropertySetProperties._Text_lookupTables4_Stub,
AddressOf __Home.DetailsClass.PropertySetProperties._Text_lookupTables4_Validate,
AddressOf __Home.DetailsClass.PropertySetProperties._Text_lookupTables4_OnValueChanged)
Private Shared Sub _Text_lookupTables4_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __Home.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String).Data), d As __Home.DetailsClass, sf As Object)
c(d, d._Text_lookupTables4, sf)
End Sub
Private Shared Sub _Text_lookupTables4_Validate(s As __Home, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.Text_lookupTables4_Validate(r)
End Sub
Private Shared Sub _Text_lookupTables4_OnValueChanged(s As __Home)
s.Text_lookupTables4_Changed()
End Sub
Public Shared ReadOnly Text_lookupTables6 As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String).Entry( _
"Text_lookupTables6",
False,
AddressOf __Home.DetailsClass.PropertySetProperties._Text_lookupTables6_Stub,
AddressOf __Home.DetailsClass.PropertySetProperties._Text_lookupTables6_Validate,
AddressOf __Home.DetailsClass.PropertySetProperties._Text_lookupTables6_OnValueChanged)
Private Shared Sub _Text_lookupTables6_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __Home.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String).Data), d As __Home.DetailsClass, sf As Object)
c(d, d._Text_lookupTables6, sf)
End Sub
Private Shared Sub _Text_lookupTables6_Validate(s As __Home, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.Text_lookupTables6_Validate(r)
End Sub
Private Shared Sub _Text_lookupTables6_OnValueChanged(s As __Home)
s.Text_lookupTables6_Changed()
End Sub
Public Shared ReadOnly Text_lookupTables5 As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String).Entry( _
"Text_lookupTables5",
False,
AddressOf __Home.DetailsClass.PropertySetProperties._Text_lookupTables5_Stub,
AddressOf __Home.DetailsClass.PropertySetProperties._Text_lookupTables5_Validate,
AddressOf __Home.DetailsClass.PropertySetProperties._Text_lookupTables5_OnValueChanged)
Private Shared Sub _Text_lookupTables5_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __Home.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String).Data), d As __Home.DetailsClass, sf As Object)
c(d, d._Text_lookupTables5, sf)
End Sub
Private Shared Sub _Text_lookupTables5_Validate(s As __Home, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.Text_lookupTables5_Validate(r)
End Sub
Private Shared Sub _Text_lookupTables5_OnValueChanged(s As __Home)
s.Text_lookupTables5_Changed()
End Sub
Public Shared ReadOnly Text_lookupTables7 As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String).Entry( _
"Text_lookupTables7",
False,
AddressOf __Home.DetailsClass.PropertySetProperties._Text_lookupTables7_Stub,
AddressOf __Home.DetailsClass.PropertySetProperties._Text_lookupTables7_Validate,
AddressOf __Home.DetailsClass.PropertySetProperties._Text_lookupTables7_OnValueChanged)
Private Shared Sub _Text_lookupTables7_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __Home.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String).Data), d As __Home.DetailsClass, sf As Object)
c(d, d._Text_lookupTables7, sf)
End Sub
Private Shared Sub _Text_lookupTables7_Validate(s As __Home, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.Text_lookupTables7_Validate(r)
End Sub
Private Shared Sub _Text_lookupTables7_OnValueChanged(s As __Home)
s.Text_lookupTables7_Changed()
End Sub
Public Shared ReadOnly Text_BlankLine As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String).Entry( _
"Text_BlankLine",
False,
AddressOf __Home.DetailsClass.PropertySetProperties._Text_BlankLine_Stub,
AddressOf __Home.DetailsClass.PropertySetProperties._Text_BlankLine_Validate,
AddressOf __Home.DetailsClass.PropertySetProperties._Text_BlankLine_OnValueChanged)
Private Shared Sub _Text_BlankLine_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __Home.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String).Data), d As __Home.DetailsClass, sf As Object)
c(d, d._Text_BlankLine, sf)
End Sub
Private Shared Sub _Text_BlankLine_Validate(s As __Home, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.Text_BlankLine_Validate(r)
End Sub
Private Shared Sub _Text_BlankLine_OnValueChanged(s As __Home)
s.Text_BlankLine_Changed()
End Sub
Public Shared ReadOnly Text_ManageMail3 As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String).Entry( _
"Text_ManageMail3",
False,
AddressOf __Home.DetailsClass.PropertySetProperties._Text_ManageMail3_Stub,
AddressOf __Home.DetailsClass.PropertySetProperties._Text_ManageMail3_Validate,
AddressOf __Home.DetailsClass.PropertySetProperties._Text_ManageMail3_OnValueChanged)
Private Shared Sub _Text_ManageMail3_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __Home.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String).Data), d As __Home.DetailsClass, sf As Object)
c(d, d._Text_ManageMail3, sf)
End Sub
Private Shared Sub _Text_ManageMail3_Validate(s As __Home, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.Text_ManageMail3_Validate(r)
End Sub
Private Shared Sub _Text_ManageMail3_OnValueChanged(s As __Home)
s.Text_ManageMail3_Changed()
End Sub
Public Shared ReadOnly Text_ManageMail4 As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String).Entry( _
"Text_ManageMail4",
False,
AddressOf __Home.DetailsClass.PropertySetProperties._Text_ManageMail4_Stub,
AddressOf __Home.DetailsClass.PropertySetProperties._Text_ManageMail4_Validate,
AddressOf __Home.DetailsClass.PropertySetProperties._Text_ManageMail4_OnValueChanged)
Private Shared Sub _Text_ManageMail4_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __Home.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String).Data), d As __Home.DetailsClass, sf As Object)
c(d, d._Text_ManageMail4, sf)
End Sub
Private Shared Sub _Text_ManageMail4_Validate(s As __Home, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.Text_ManageMail4_Validate(r)
End Sub
Private Shared Sub _Text_ManageMail4_OnValueChanged(s As __Home)
s.Text_ManageMail4_Changed()
End Sub
Public Shared ReadOnly PeopleCountByZipDescending As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __Home, __Home.DetailsClass, Global.LightSwitchApplication.PeopleCountByZip).Entry( _
"PeopleCountByZipDescending",
AddressOf __Home.DetailsClass.PropertySetProperties._PeopleCountByZipDescending_Stub,
AddressOf __Home.DetailsClass.PropertySetProperties._PeopleCountByZipDescending_Validate,
AddressOf __Home.DetailsClass.PropertySetProperties._PeopleCountByZipDescending_CreateQuery,
AddressOf __Home.DetailsClass.PropertySetProperties._PeopleCountByZipDescending_SelectionChanged,
AddressOf __Home.DetailsClass.PropertySetProperties._PeopleCountByZipDescending_OnCollectionChanged,
AddressOf __Home.DetailsClass.PropertySetProperties._PeopleCountByZipDescending_OnLoaded)
Private Shared Sub _PeopleCountByZipDescending_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __Home.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __Home, __Home.DetailsClass, Global.LightSwitchApplication.PeopleCountByZip).Data), d As __Home.DetailsClass, sf As Object)
c(d, d._PeopleCountByZipDescending, sf)
End Sub
Private Shared Sub _PeopleCountByZipDescending_Validate(s As __Home, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.PeopleCountByZipDescending_Validate(r)
End Sub
Private Shared Function _PeopleCountByZipDescending_CreateQuery(d As __Home.DetailsClass, args As Object()) As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return d.PeopleCountByZipDescendingQuery()
End Function
Private Shared Sub _PeopleCountByZipDescending_SelectionChanged(s As __Home)
s.PeopleCountByZipDescending_SelectionChanged()
End Sub
Private Shared Sub _PeopleCountByZipDescending_OnCollectionChanged(s As __Home, e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
s.PeopleCountByZipDescending_Changed(e)
End Sub
Private Shared Sub _PeopleCountByZipDescending_OnLoaded(s As __Home, succeeded As Boolean)
s.PeopleCountByZipDescending_Loaded(succeeded)
End Sub
Public Shared ReadOnly Text_UpdatePeople3 As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String).Entry( _
"Text_UpdatePeople3",
False,
AddressOf __Home.DetailsClass.PropertySetProperties._Text_UpdatePeople3_Stub,
AddressOf __Home.DetailsClass.PropertySetProperties._Text_UpdatePeople3_Validate,
AddressOf __Home.DetailsClass.PropertySetProperties._Text_UpdatePeople3_OnValueChanged)
Private Shared Sub _Text_UpdatePeople3_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __Home.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String).Data), d As __Home.DetailsClass, sf As Object)
c(d, d._Text_UpdatePeople3, sf)
End Sub
Private Shared Sub _Text_UpdatePeople3_Validate(s As __Home, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.Text_UpdatePeople3_Validate(r)
End Sub
Private Shared Sub _Text_UpdatePeople3_OnValueChanged(s As __Home)
s.Text_UpdatePeople3_Changed()
End Sub
Public Shared ReadOnly Text_UpdatePeople4 As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String).Entry( _
"Text_UpdatePeople4",
False,
AddressOf __Home.DetailsClass.PropertySetProperties._Text_UpdatePeople4_Stub,
AddressOf __Home.DetailsClass.PropertySetProperties._Text_UpdatePeople4_Validate,
AddressOf __Home.DetailsClass.PropertySetProperties._Text_UpdatePeople4_OnValueChanged)
Private Shared Sub _Text_UpdatePeople4_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __Home.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String).Data), d As __Home.DetailsClass, sf As Object)
c(d, d._Text_UpdatePeople4, sf)
End Sub
Private Shared Sub _Text_UpdatePeople4_Validate(s As __Home, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.Text_UpdatePeople4_Validate(r)
End Sub
Private Shared Sub _Text_UpdatePeople4_OnValueChanged(s As __Home)
s.Text_UpdatePeople4_Changed()
End Sub
Public Shared ReadOnly Text_ManageMail5 As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String).Entry( _
"Text_ManageMail5",
False,
AddressOf __Home.DetailsClass.PropertySetProperties._Text_ManageMail5_Stub,
AddressOf __Home.DetailsClass.PropertySetProperties._Text_ManageMail5_Validate,
AddressOf __Home.DetailsClass.PropertySetProperties._Text_ManageMail5_OnValueChanged)
Private Shared Sub _Text_ManageMail5_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __Home.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __Home, __Home.DetailsClass, String).Data), d As __Home.DetailsClass, sf As Object)
c(d, d._Text_ManageMail5, sf)
End Sub
Private Shared Sub _Text_ManageMail5_Validate(s As __Home, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.Text_ManageMail5_Validate(r)
End Sub
Private Shared Sub _Text_ManageMail5_OnValueChanged(s As __Home)
s.Text_ManageMail5_Changed()
End Sub
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend NotInheritable Class CommandSetProperties
Public Shared ReadOnly UpdatePeople As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __Home, __Home.DetailsClass).Entry( _
"UpdatePeople",
AddressOf __Home.DetailsClass.CommandSetProperties._UpdatePeople_Stub,
AddressOf __Home.DetailsClass.CommandSetProperties._UpdatePeople_CreateExecutableObject)
Private Shared Sub _UpdatePeople_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __Home.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __Home, __Home.DetailsClass).Data), d As __Home.DetailsClass, sf As Object)
c(d, d._UpdatePeopleCommand, sf)
End Sub
Private Shared Function _UpdatePeople_CreateExecutableObject(d As __Home.DetailsClass) As Global.Microsoft.LightSwitch.IExecutable
Return DirectCast(d, __Home.DetailsClass).Methods.UpdatePeople.CreateInvocation()
End Function
Public Shared ReadOnly UpdateMail As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __Home, __Home.DetailsClass).Entry( _
"UpdateMail",
AddressOf __Home.DetailsClass.CommandSetProperties._UpdateMail_Stub,
AddressOf __Home.DetailsClass.CommandSetProperties._UpdateMail_CreateExecutableObject)
Private Shared Sub _UpdateMail_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __Home.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __Home, __Home.DetailsClass).Data), d As __Home.DetailsClass, sf As Object)
c(d, d._UpdateMailCommand, sf)
End Sub
Private Shared Function _UpdateMail_CreateExecutableObject(d As __Home.DetailsClass) As Global.Microsoft.LightSwitch.IExecutable
Return DirectCast(d, __Home.DetailsClass).Methods.UpdateMail.CreateInvocation()
End Function
Public Shared ReadOnly UpdateLookupTables As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __Home, __Home.DetailsClass).Entry( _
"UpdateLookupTables",
AddressOf __Home.DetailsClass.CommandSetProperties._UpdateLookupTables_Stub,
AddressOf __Home.DetailsClass.CommandSetProperties._UpdateLookupTables_CreateExecutableObject)
Private Shared Sub _UpdateLookupTables_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __Home.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __Home, __Home.DetailsClass).Data), d As __Home.DetailsClass, sf As Object)
c(d, d._UpdateLookupTablesCommand, sf)
End Sub
Private Shared Function _UpdateLookupTables_CreateExecutableObject(d As __Home.DetailsClass) As Global.Microsoft.LightSwitch.IExecutable
Return DirectCast(d, __Home.DetailsClass).Methods.UpdateLookupTables.CreateInvocation()
End Function
Public Shared ReadOnly LoadListFromExternalSource As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __Home, __Home.DetailsClass).Entry( _
"LoadListFromExternalSource",
AddressOf __Home.DetailsClass.CommandSetProperties._LoadListFromExternalSource_Stub,
AddressOf __Home.DetailsClass.CommandSetProperties._LoadListFromExternalSource_CreateExecutableObject)
Private Shared Sub _LoadListFromExternalSource_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __Home.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __Home, __Home.DetailsClass).Data), d As __Home.DetailsClass, sf As Object)
c(d, d._LoadListFromExternalSourceCommand, sf)
End Sub
Private Shared Function _LoadListFromExternalSource_CreateExecutableObject(d As __Home.DetailsClass) As Global.Microsoft.LightSwitch.IExecutable
Return DirectCast(d, __Home.DetailsClass).Methods.LoadListFromExternalSource.CreateInvocation()
End Function
Public Shared ReadOnly IdentifyPotentialAddressDuplicates As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __Home, __Home.DetailsClass).Entry( _
"IdentifyPotentialAddressDuplicates",
AddressOf __Home.DetailsClass.CommandSetProperties._IdentifyPotentialAddressDuplicates_Stub,
AddressOf __Home.DetailsClass.CommandSetProperties._IdentifyPotentialAddressDuplicates_CreateExecutableObject)
Private Shared Sub _IdentifyPotentialAddressDuplicates_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __Home.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __Home, __Home.DetailsClass).Data), d As __Home.DetailsClass, sf As Object)
c(d, d._IdentifyPotentialAddressDuplicatesCommand, sf)
End Sub
Private Shared Function _IdentifyPotentialAddressDuplicates_CreateExecutableObject(d As __Home.DetailsClass) As Global.Microsoft.LightSwitch.IExecutable
Return DirectCast(d, __Home.DetailsClass).Methods.IdentifyPotentialAddressDuplicates.CreateInvocation()
End Function
Public Shared ReadOnly ReviewExternalMailMatches As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __Home, __Home.DetailsClass).Entry( _
"ReviewExternalMailMatches",
AddressOf __Home.DetailsClass.CommandSetProperties._ReviewExternalMailMatches_Stub,
AddressOf __Home.DetailsClass.CommandSetProperties._ReviewExternalMailMatches_CreateExecutableObject)
Private Shared Sub _ReviewExternalMailMatches_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __Home.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __Home, __Home.DetailsClass).Data), d As __Home.DetailsClass, sf As Object)
c(d, d._ReviewExternalMailMatchesCommand, sf)
End Sub
Private Shared Function _ReviewExternalMailMatches_CreateExecutableObject(d As __Home.DetailsClass) As Global.Microsoft.LightSwitch.IExecutable
Return DirectCast(d, __Home.DetailsClass).Methods.ReviewExternalMailMatches.CreateInvocation()
End Function
Public Shared ReadOnly ReviewImportedPeopleMatches As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __Home, __Home.DetailsClass).Entry( _
"ReviewImportedPeopleMatches",
AddressOf __Home.DetailsClass.CommandSetProperties._ReviewImportedPeopleMatches_Stub,
AddressOf __Home.DetailsClass.CommandSetProperties._ReviewImportedPeopleMatches_CreateExecutableObject)
Private Shared Sub _ReviewImportedPeopleMatches_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __Home.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __Home, __Home.DetailsClass).Data), d As __Home.DetailsClass, sf As Object)
c(d, d._ReviewImportedPeopleMatchesCommand, sf)
End Sub
Private Shared Function _ReviewImportedPeopleMatches_CreateExecutableObject(d As __Home.DetailsClass) As Global.Microsoft.LightSwitch.IExecutable
Return DirectCast(d, __Home.DetailsClass).Methods.ReviewImportedPeopleMatches.CreateInvocation()
End Function
Public Shared ReadOnly LoadImportedPeople As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __Home, __Home.DetailsClass).Entry( _
"LoadImportedPeople",
AddressOf __Home.DetailsClass.CommandSetProperties._LoadImportedPeople_Stub,
AddressOf __Home.DetailsClass.CommandSetProperties._LoadImportedPeople_CreateExecutableObject)
Private Shared Sub _LoadImportedPeople_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __Home.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __Home, __Home.DetailsClass).Data), d As __Home.DetailsClass, sf As Object)
c(d, d._LoadImportedPeopleCommand, sf)
End Sub
Private Shared Function _LoadImportedPeople_CreateExecutableObject(d As __Home.DetailsClass) As Global.Microsoft.LightSwitch.IExecutable
Return DirectCast(d, __Home.DetailsClass).Methods.LoadImportedPeople.CreateInvocation()
End Function
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend NotInheritable Class MethodSetProperties
Public Shared ReadOnly UpdatePeople As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __Home, __Home.DetailsClass).Entry( _
"UpdatePeople",
AddressOf __Home.DetailsClass.MethodSetProperties._UpdatePeople_Stub,
AddressOf __Home.DetailsClass.MethodSetProperties._UpdatePeople_CanInvoke,
AddressOf __Home.DetailsClass.MethodSetProperties._UpdatePeople_InvokeMethod)
Private Shared Sub _UpdatePeople_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __Home.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __Home, __Home.DetailsClass).Data), d As __Home.DetailsClass, sf As Object)
c(d, d._UpdatePeopleMethod, sf)
End Sub
Private Shared Function _UpdatePeople_CanInvoke(d As __Home.DetailsClass, args As Global.System.Collections.ObjectModel.ReadOnlyCollection(Of Object), ex As Global.System.Exception) As Global.System.Exception
Dim result = True
d.Screen.UpdatePeople_CanExecute(result)
Return If(result, Nothing, ex)
End Function
Private Shared Sub _UpdatePeople_InvokeMethod(d As __Home.DetailsClass, args As Global.System.Collections.ObjectModel.ReadOnlyCollection(Of Object))
d.Screen.UpdatePeople_Execute()
End Sub
Public Shared ReadOnly UpdateMail As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __Home, __Home.DetailsClass).Entry( _
"UpdateMail",
AddressOf __Home.DetailsClass.MethodSetProperties._UpdateMail_Stub,
AddressOf __Home.DetailsClass.MethodSetProperties._UpdateMail_CanInvoke,
AddressOf __Home.DetailsClass.MethodSetProperties._UpdateMail_InvokeMethod)
Private Shared Sub _UpdateMail_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __Home.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __Home, __Home.DetailsClass).Data), d As __Home.DetailsClass, sf As Object)
c(d, d._UpdateMailMethod, sf)
End Sub
Private Shared Function _UpdateMail_CanInvoke(d As __Home.DetailsClass, args As Global.System.Collections.ObjectModel.ReadOnlyCollection(Of Object), ex As Global.System.Exception) As Global.System.Exception
Dim result = True
d.Screen.UpdateMail_CanExecute(result)
Return If(result, Nothing, ex)
End Function
Private Shared Sub _UpdateMail_InvokeMethod(d As __Home.DetailsClass, args As Global.System.Collections.ObjectModel.ReadOnlyCollection(Of Object))
d.Screen.UpdateMail_Execute()
End Sub
Public Shared ReadOnly UpdateLookupTables As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __Home, __Home.DetailsClass).Entry( _
"UpdateLookupTables",
AddressOf __Home.DetailsClass.MethodSetProperties._UpdateLookupTables_Stub,
AddressOf __Home.DetailsClass.MethodSetProperties._UpdateLookupTables_CanInvoke,
AddressOf __Home.DetailsClass.MethodSetProperties._UpdateLookupTables_InvokeMethod)
Private Shared Sub _UpdateLookupTables_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __Home.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __Home, __Home.DetailsClass).Data), d As __Home.DetailsClass, sf As Object)
c(d, d._UpdateLookupTablesMethod, sf)
End Sub
Private Shared Function _UpdateLookupTables_CanInvoke(d As __Home.DetailsClass, args As Global.System.Collections.ObjectModel.ReadOnlyCollection(Of Object), ex As Global.System.Exception) As Global.System.Exception
Dim result = True
d.Screen.UpdateLookupTables_CanExecute(result)
Return If(result, Nothing, ex)
End Function
Private Shared Sub _UpdateLookupTables_InvokeMethod(d As __Home.DetailsClass, args As Global.System.Collections.ObjectModel.ReadOnlyCollection(Of Object))
d.Screen.UpdateLookupTables_Execute()
End Sub
Public Shared ReadOnly LoadListFromExternalSource As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __Home, __Home.DetailsClass).Entry( _
"LoadListFromExternalSource",
AddressOf __Home.DetailsClass.MethodSetProperties._LoadListFromExternalSource_Stub,
AddressOf __Home.DetailsClass.MethodSetProperties._LoadListFromExternalSource_CanInvoke,
AddressOf __Home.DetailsClass.MethodSetProperties._LoadListFromExternalSource_InvokeMethod)
Private Shared Sub _LoadListFromExternalSource_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __Home.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __Home, __Home.DetailsClass).Data), d As __Home.DetailsClass, sf As Object)
c(d, d._LoadListFromExternalSourceMethod, sf)
End Sub
Private Shared Function _LoadListFromExternalSource_CanInvoke(d As __Home.DetailsClass, args As Global.System.Collections.ObjectModel.ReadOnlyCollection(Of Object), ex As Global.System.Exception) As Global.System.Exception
Dim result = True
d.Screen.LoadListFromExternalSource_CanExecute(result)
Return If(result, Nothing, ex)
End Function
Private Shared Sub _LoadListFromExternalSource_InvokeMethod(d As __Home.DetailsClass, args As Global.System.Collections.ObjectModel.ReadOnlyCollection(Of Object))
d.Screen.LoadListFromExternalSource_Execute()
End Sub
Public Shared ReadOnly IdentifyPotentialAddressDuplicates As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __Home, __Home.DetailsClass).Entry( _
"IdentifyPotentialAddressDuplicates",
AddressOf __Home.DetailsClass.MethodSetProperties._IdentifyPotentialAddressDuplicates_Stub,
AddressOf __Home.DetailsClass.MethodSetProperties._IdentifyPotentialAddressDuplicates_CanInvoke,
AddressOf __Home.DetailsClass.MethodSetProperties._IdentifyPotentialAddressDuplicates_InvokeMethod)
Private Shared Sub _IdentifyPotentialAddressDuplicates_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __Home.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __Home, __Home.DetailsClass).Data), d As __Home.DetailsClass, sf As Object)
c(d, d._IdentifyPotentialAddressDuplicatesMethod, sf)
End Sub
Private Shared Function _IdentifyPotentialAddressDuplicates_CanInvoke(d As __Home.DetailsClass, args As Global.System.Collections.ObjectModel.ReadOnlyCollection(Of Object), ex As Global.System.Exception) As Global.System.Exception
Dim result = True
d.Screen.IdentifyPotentialAddressDuplicates_CanExecute(result)
Return If(result, Nothing, ex)
End Function
Private Shared Sub _IdentifyPotentialAddressDuplicates_InvokeMethod(d As __Home.DetailsClass, args As Global.System.Collections.ObjectModel.ReadOnlyCollection(Of Object))
d.Screen.IdentifyPotentialAddressDuplicates_Execute()
End Sub
Public Shared ReadOnly ReviewExternalMailMatches As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __Home, __Home.DetailsClass).Entry( _
"ReviewExternalMailMatches",
AddressOf __Home.DetailsClass.MethodSetProperties._ReviewExternalMailMatches_Stub,
AddressOf __Home.DetailsClass.MethodSetProperties._ReviewExternalMailMatches_CanInvoke,
AddressOf __Home.DetailsClass.MethodSetProperties._ReviewExternalMailMatches_InvokeMethod)
Private Shared Sub _ReviewExternalMailMatches_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __Home.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __Home, __Home.DetailsClass).Data), d As __Home.DetailsClass, sf As Object)
c(d, d._ReviewExternalMailMatchesMethod, sf)
End Sub
Private Shared Function _ReviewExternalMailMatches_CanInvoke(d As __Home.DetailsClass, args As Global.System.Collections.ObjectModel.ReadOnlyCollection(Of Object), ex As Global.System.Exception) As Global.System.Exception
Dim result = True
d.Screen.ReviewExternalMailMatches_CanExecute(result)
Return If(result, Nothing, ex)
End Function
Private Shared Sub _ReviewExternalMailMatches_InvokeMethod(d As __Home.DetailsClass, args As Global.System.Collections.ObjectModel.ReadOnlyCollection(Of Object))
d.Screen.ReviewExternalMailMatches_Execute()
End Sub
Public Shared ReadOnly ReviewImportedPeopleMatches As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __Home, __Home.DetailsClass).Entry( _
"ReviewImportedPeopleMatches",
AddressOf __Home.DetailsClass.MethodSetProperties._ReviewImportedPeopleMatches_Stub,
AddressOf __Home.DetailsClass.MethodSetProperties._ReviewImportedPeopleMatches_CanInvoke,
AddressOf __Home.DetailsClass.MethodSetProperties._ReviewImportedPeopleMatches_InvokeMethod)
Private Shared Sub _ReviewImportedPeopleMatches_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __Home.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __Home, __Home.DetailsClass).Data), d As __Home.DetailsClass, sf As Object)
c(d, d._ReviewImportedPeopleMatchesMethod, sf)
End Sub
Private Shared Function _ReviewImportedPeopleMatches_CanInvoke(d As __Home.DetailsClass, args As Global.System.Collections.ObjectModel.ReadOnlyCollection(Of Object), ex As Global.System.Exception) As Global.System.Exception
Dim result = True
d.Screen.ReviewImportedPeopleMatches_CanExecute(result)
Return If(result, Nothing, ex)
End Function
Private Shared Sub _ReviewImportedPeopleMatches_InvokeMethod(d As __Home.DetailsClass, args As Global.System.Collections.ObjectModel.ReadOnlyCollection(Of Object))
d.Screen.ReviewImportedPeopleMatches_Execute()
End Sub
Public Shared ReadOnly LoadImportedPeople As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __Home, __Home.DetailsClass).Entry( _
"LoadImportedPeople",
AddressOf __Home.DetailsClass.MethodSetProperties._LoadImportedPeople_Stub,
AddressOf __Home.DetailsClass.MethodSetProperties._LoadImportedPeople_CanInvoke,
AddressOf __Home.DetailsClass.MethodSetProperties._LoadImportedPeople_InvokeMethod)
Private Shared Sub _LoadImportedPeople_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __Home.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __Home, __Home.DetailsClass).Data), d As __Home.DetailsClass, sf As Object)
c(d, d._LoadImportedPeopleMethod, sf)
End Sub
Private Shared Function _LoadImportedPeople_CanInvoke(d As __Home.DetailsClass, args As Global.System.Collections.ObjectModel.ReadOnlyCollection(Of Object), ex As Global.System.Exception) As Global.System.Exception
Dim result = True
d.Screen.LoadImportedPeople_CanExecute(result)
Return If(result, Nothing, ex)
End Function
Private Shared Sub _LoadImportedPeople_InvokeMethod(d As __Home.DetailsClass, args As Global.System.Collections.ObjectModel.ReadOnlyCollection(Of Object))
d.Screen.LoadImportedPeople_Execute()
End Sub
End Class
End Class
End Class
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
Partial Public NotInheritable Class GetExternalMailList
Inherits Global.Microsoft.LightSwitch.Framework.Client.ScreenObject(Of __GetExternalMailList, __GetExternalMailList.DetailsClass)
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private Sub New()
MyBase.New("LightSwitchApplication:GetExternalMailList")
__GetExternalMailList.DetailsClass.Initialize(Me)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
Public Shared Function CreateInstance() As GetExternalMailList
Return New __GetExternalMailList( _
)
End Function
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub GetExternalMailList_InitializeDataWorkspace(ByVal saveChangesTo As Global.System.Collections.Generic.List(Of Global.Microsoft.LightSwitch.IDataService))
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub GetExternalMailList_Created()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub GetExternalMailList_Activated()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub GetExternalMailList_Saving(ByRef handled As Boolean)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub GetExternalMailList_Saved()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub GetExternalMailList_Closing(ByRef cancel As Boolean)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub GetExternalMailList_SaveError(ByVal exception As Global.System.Exception, ByRef handled As Boolean)
End Sub
#Region "Private Properties"
''' <summary>
''' Gets the Application object for this application. The Application object provides access to active screens, methods to open screens and access to the current user.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private ReadOnly Property Application As Global.LightSwitchApplication.Application
Get
Return Global.LightSwitchApplication.Application.Current
End Get
End Property
''' <summary>
''' Gets the containing data workspace. The data workspace provides access to all data sources in the application.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private ReadOnly Property DataWorkspace As Global.LightSwitchApplication.DataWorkspace
Get
Return DirectCast(DirectCast(Me.Details, Global.Microsoft.LightSwitch.Details.Client.IScreenDetails).DataWorkspace, Global.LightSwitchApplication.DataWorkspace)
End Get
End Property
#End Region
Partial Private Sub ExternalMailPersons_SelectionChanged()
End Sub
Partial Private Sub ExternalMailPersons_Changed(ByVal e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ExternalMailPersons_Loaded(ByVal succeeded As Boolean)
End Sub
Partial Private Sub People_SelectionChanged()
End Sub
Partial Private Sub People_Changed(ByVal e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub People_Loaded(ByVal succeeded As Boolean)
End Sub
Partial Private Sub Count_PrimaryPeople_Changed()
End Sub
Partial Private Sub Count_ExternalList_Changed()
End Sub
Partial Private Sub Count_MatchesProcessed_Changed()
End Sub
''' <summary>
''' Gets the ExternalMailPersons visual collection. The collection contains all records currently shown on the respective list or grid control.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property ExternalMailPersons As Global.Microsoft.LightSwitch.Framework.Client.VisualCollection(Of Global.LightSwitchApplication.ExternalMailPerson)
Get
Return __GetExternalMailList.DetailsClass.GetValue(Me, __GetExternalMailList.DetailsClass.PropertySetProperties.ExternalMailPersons)
End Get
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ExternalMailPersons_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
''' <summary>
''' Gets the People visual collection. The collection contains all records currently shown on the respective list or grid control.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property People As Global.Microsoft.LightSwitch.Framework.Client.VisualCollection(Of Global.LightSwitchApplication.Person)
Get
Return __GetExternalMailList.DetailsClass.GetValue(Me, __GetExternalMailList.DetailsClass.PropertySetProperties.People)
End Get
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub People_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Property Count_PrimaryPeople As Global.System.Nullable(Of Integer)
Get
Return __GetExternalMailList.DetailsClass.GetValue(Me, __GetExternalMailList.DetailsClass.PropertySetProperties.Count_PrimaryPeople)
End Get
Set(ByVal value As Global.System.Nullable(Of Integer))
__GetExternalMailList.DetailsClass.SetValue(Me, __GetExternalMailList.DetailsClass.PropertySetProperties.Count_PrimaryPeople, value)
End Set
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Count_PrimaryPeople_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Property Count_ExternalList As Global.System.Nullable(Of Integer)
Get
Return __GetExternalMailList.DetailsClass.GetValue(Me, __GetExternalMailList.DetailsClass.PropertySetProperties.Count_ExternalList)
End Get
Set(ByVal value As Global.System.Nullable(Of Integer))
__GetExternalMailList.DetailsClass.SetValue(Me, __GetExternalMailList.DetailsClass.PropertySetProperties.Count_ExternalList, value)
End Set
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Count_ExternalList_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Property Count_MatchesProcessed As Global.System.Nullable(Of Integer)
Get
Return __GetExternalMailList.DetailsClass.GetValue(Me, __GetExternalMailList.DetailsClass.PropertySetProperties.Count_MatchesProcessed)
End Get
Set(ByVal value As Global.System.Nullable(Of Integer))
__GetExternalMailList.DetailsClass.SetValue(Me, __GetExternalMailList.DetailsClass.PropertySetProperties.Count_MatchesProcessed, value)
End Set
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Count_MatchesProcessed_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
''' <summary>
''' Calls the GetMailList screen method.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Sub GetMailList()
Me.Details.Methods.GetMailList.CreateInvocation().Execute()
End Sub
Partial Private Sub GetMailList_CanExecute(ByRef result As Boolean)
End Sub
Partial Private Sub GetMailList_Execute()
End Sub
''' <summary>
''' Calls the CalculateMatchScores screen method.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Sub CalculateMatchScores()
Me.Details.Methods.CalculateMatchScores.CreateInvocation().Execute()
End Sub
Partial Private Sub CalculateMatchScores_CanExecute(ByRef result As Boolean)
End Sub
Partial Private Sub CalculateMatchScores_Execute()
End Sub
''' <summary>
''' Calls the ReviewMatchResults screen method.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Sub ReviewMatchResults()
Me.Details.Methods.ReviewMatchResults.CreateInvocation().Execute()
End Sub
Partial Private Sub ReviewMatchResults_CanExecute(ByRef result As Boolean)
End Sub
Partial Private Sub ReviewMatchResults_Execute()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class DetailsClass
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenDetails(Of __GetExternalMailList, __GetExternalMailList.DetailsClass, __GetExternalMailList.DetailsClass.PropertySet, __GetExternalMailList.DetailsClass.CommandSet, __GetExternalMailList.DetailsClass.MethodSet)
Shared Sub New()
Dim initializePropertyEntry = __GetExternalMailList.DetailsClass.PropertySetProperties.ExternalMailPersons
Dim initializeCommandEntry = __GetExternalMailList.DetailsClass.CommandSetProperties.GetMailList
Dim initializeMethodEntry = __GetExternalMailList.DetailsClass.MethodSetProperties.GetMailList
End Sub
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Private Shared ReadOnly __GetExternalMailListEntry As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenDetails(Of __GetExternalMailList, __GetExternalMailList.DetailsClass).Entry = _
New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenDetails(Of __GetExternalMailList, __GetExternalMailList.DetailsClass).Entry( _
AddressOf __GetExternalMailList.DetailsClass.__GetExternalMailList_InvokeInitializeDataWorkspace,
AddressOf __GetExternalMailList.DetailsClass.__GetExternalMailList_InvokeSavingEvent,
AddressOf __GetExternalMailList.DetailsClass.__GetExternalMailList_InvokeSavedEvent,
AddressOf __GetExternalMailList.DetailsClass.__GetExternalMailList_InvokeClosingEvent,
AddressOf __GetExternalMailList.DetailsClass.__GetExternalMailList_InvokeCreated,
AddressOf __GetExternalMailList.DetailsClass.__GetExternalMailList_InvokeActivated,
AddressOf __GetExternalMailList.DetailsClass.__GetExternalMailList_InvokeSaveErrorEvent)
Private Shared Sub __GetExternalMailList_InvokeInitializeDataWorkspace(s As __GetExternalMailList, saveChangesTo As Global.System.Collections.Generic.List(Of Global.Microsoft.LightSwitch.IDataService))
s.GetExternalMailList_InitializeDataWorkspace(saveChangesTo)
End Sub
Private Shared Function __GetExternalMailList_InvokeSavingEvent(s As __GetExternalMailList) As Boolean
Dim handled = False
s.GetExternalMailList_Saving(handled)
Return handled
End Function
Private Shared Sub __GetExternalMailList_InvokeSavedEvent(s As __GetExternalMailList)
s.GetExternalMailList_Saved()
End Sub
Private Shared Function __GetExternalMailList_InvokeClosingEvent(s As __GetExternalMailList) As Boolean
Dim cancel = False
s.GetExternalMailList_Closing(cancel)
Return cancel
End Function
Private Shared Sub __GetExternalMailList_InvokeCreated(s As __GetExternalMailList)
s.GetExternalMailList_Created()
End Sub
Private Shared Sub __GetExternalMailList_InvokeActivated(s As __GetExternalMailList)
s.GetExternalMailList_Activated()
End Sub
Private Shared Function __GetExternalMailList_InvokeSaveErrorEvent(s As __GetExternalMailList, ex As Global.System.Exception) As Boolean
Dim handled = False
s.GetExternalMailList_SaveError(ex, handled)
Return handled
End Function
Public Sub New()
MyBase.New()
End Sub
Public Shadows ReadOnly Property Properties As __GetExternalMailList.DetailsClass.PropertySet
Get
Return MyBase.Properties
End Get
End Property
Public Shadows ReadOnly Property Commands As __GetExternalMailList.DetailsClass.CommandSet
Get
Return MyBase.Commands
End Get
End Property
Public Shadows ReadOnly Property Methods As __GetExternalMailList.DetailsClass.MethodSet
Get
Return MyBase.Methods
End Get
End Property
Private Function ExternalMailPersonsQuery() As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return Global.Microsoft.LightSwitch.DataServiceQueryable.ThenBy( _
Global.Microsoft.LightSwitch.DataServiceQueryable.ThenBy( _
Global.Microsoft.LightSwitch.DataServiceQueryable.OrderBy( _
Me.Screen.DataWorkspace.ApplicationData.ExternalMailPersons, _
Function(e) e.Zip), _
Function(e) e.LastName), _
Function(e) e.FirstName)
End Function
Private Function PeopleQuery() As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return Global.Microsoft.LightSwitch.DataServiceQueryable.ThenBy( _
Global.Microsoft.LightSwitch.DataServiceQueryable.ThenBy( _
Global.Microsoft.LightSwitch.DataServiceQueryable.OrderBy( _
Me.Screen.DataWorkspace.ApplicationData.People, _
Function(p) p.Zip), _
Function(p) p.LastName), _
Function(p) p.FirstName)
End Function
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _ExternalMailPersons As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __GetExternalMailList, __GetExternalMailList.DetailsClass, Global.LightSwitchApplication.ExternalMailPerson).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _People As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __GetExternalMailList, __GetExternalMailList.DetailsClass, Global.LightSwitchApplication.Person).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _Count_PrimaryPeople As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __GetExternalMailList, __GetExternalMailList.DetailsClass, Global.System.Nullable(Of Integer)).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _Count_ExternalList As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __GetExternalMailList, __GetExternalMailList.DetailsClass, Global.System.Nullable(Of Integer)).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _Count_MatchesProcessed As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __GetExternalMailList, __GetExternalMailList.DetailsClass, Global.System.Nullable(Of Integer)).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _GetMailListCommand As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __GetExternalMailList, __GetExternalMailList.DetailsClass).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _CalculateMatchScoresCommand As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __GetExternalMailList, __GetExternalMailList.DetailsClass).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _ReviewMatchResultsCommand As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __GetExternalMailList, __GetExternalMailList.DetailsClass).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _GetMailListMethod As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __GetExternalMailList, __GetExternalMailList.DetailsClass).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _CalculateMatchScoresMethod As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __GetExternalMailList, __GetExternalMailList.DetailsClass).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _ReviewMatchResultsMethod As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __GetExternalMailList, __GetExternalMailList.DetailsClass).Data
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class PropertySet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenPropertySet(Of __GetExternalMailList, __GetExternalMailList.DetailsClass)
Public ReadOnly Property ExternalMailPersons As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __GetExternalMailList, __GetExternalMailList.DetailsClass, Global.LightSwitchApplication.ExternalMailPerson)
Get
Return DirectCast(MyBase.GetItem(__GetExternalMailList.DetailsClass.PropertySetProperties.ExternalMailPersons), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __GetExternalMailList, __GetExternalMailList.DetailsClass, Global.LightSwitchApplication.ExternalMailPerson))
End Get
End Property
Public ReadOnly Property People As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __GetExternalMailList, __GetExternalMailList.DetailsClass, Global.LightSwitchApplication.Person)
Get
Return DirectCast(MyBase.GetItem(__GetExternalMailList.DetailsClass.PropertySetProperties.People), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __GetExternalMailList, __GetExternalMailList.DetailsClass, Global.LightSwitchApplication.Person))
End Get
End Property
Public ReadOnly Property Count_PrimaryPeople As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __GetExternalMailList, __GetExternalMailList.DetailsClass, Global.System.Nullable(Of Integer))
Get
Return DirectCast(MyBase.GetItem(__GetExternalMailList.DetailsClass.PropertySetProperties.Count_PrimaryPeople), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __GetExternalMailList, __GetExternalMailList.DetailsClass, Global.System.Nullable(Of Integer)))
End Get
End Property
Public ReadOnly Property Count_ExternalList As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __GetExternalMailList, __GetExternalMailList.DetailsClass, Global.System.Nullable(Of Integer))
Get
Return DirectCast(MyBase.GetItem(__GetExternalMailList.DetailsClass.PropertySetProperties.Count_ExternalList), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __GetExternalMailList, __GetExternalMailList.DetailsClass, Global.System.Nullable(Of Integer)))
End Get
End Property
Public ReadOnly Property Count_MatchesProcessed As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __GetExternalMailList, __GetExternalMailList.DetailsClass, Global.System.Nullable(Of Integer))
Get
Return DirectCast(MyBase.GetItem(__GetExternalMailList.DetailsClass.PropertySetProperties.Count_MatchesProcessed), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __GetExternalMailList, __GetExternalMailList.DetailsClass, Global.System.Nullable(Of Integer)))
End Get
End Property
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class CommandSet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommandSet(Of __GetExternalMailList, __GetExternalMailList.DetailsClass)
Public ReadOnly Property GetMailList As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __GetExternalMailList, __GetExternalMailList.DetailsClass)
Get
Return DirectCast(MyBase.GetItem(__GetExternalMailList.DetailsClass.CommandSetProperties.GetMailList), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __GetExternalMailList, __GetExternalMailList.DetailsClass))
End Get
End Property
Public ReadOnly Property CalculateMatchScores As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __GetExternalMailList, __GetExternalMailList.DetailsClass)
Get
Return DirectCast(MyBase.GetItem(__GetExternalMailList.DetailsClass.CommandSetProperties.CalculateMatchScores), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __GetExternalMailList, __GetExternalMailList.DetailsClass))
End Get
End Property
Public ReadOnly Property ReviewMatchResults As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __GetExternalMailList, __GetExternalMailList.DetailsClass)
Get
Return DirectCast(MyBase.GetItem(__GetExternalMailList.DetailsClass.CommandSetProperties.ReviewMatchResults), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __GetExternalMailList, __GetExternalMailList.DetailsClass))
End Get
End Property
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class MethodSet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethodSet(Of __GetExternalMailList, __GetExternalMailList.DetailsClass)
Public ReadOnly Property GetMailList As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __GetExternalMailList, __GetExternalMailList.DetailsClass)
Get
Return DirectCast(MyBase.GetItem(__GetExternalMailList.DetailsClass.MethodSetProperties.GetMailList), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __GetExternalMailList, __GetExternalMailList.DetailsClass))
End Get
End Property
Public ReadOnly Property CalculateMatchScores As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __GetExternalMailList, __GetExternalMailList.DetailsClass)
Get
Return DirectCast(MyBase.GetItem(__GetExternalMailList.DetailsClass.MethodSetProperties.CalculateMatchScores), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __GetExternalMailList, __GetExternalMailList.DetailsClass))
End Get
End Property
Public ReadOnly Property ReviewMatchResults As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __GetExternalMailList, __GetExternalMailList.DetailsClass)
Get
Return DirectCast(MyBase.GetItem(__GetExternalMailList.DetailsClass.MethodSetProperties.ReviewMatchResults), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __GetExternalMailList, __GetExternalMailList.DetailsClass))
End Get
End Property
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend NotInheritable Class PropertySetProperties
Public Shared ReadOnly ExternalMailPersons As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __GetExternalMailList, __GetExternalMailList.DetailsClass, Global.LightSwitchApplication.ExternalMailPerson).Entry( _
"ExternalMailPersons",
AddressOf __GetExternalMailList.DetailsClass.PropertySetProperties._ExternalMailPersons_Stub,
AddressOf __GetExternalMailList.DetailsClass.PropertySetProperties._ExternalMailPersons_Validate,
AddressOf __GetExternalMailList.DetailsClass.PropertySetProperties._ExternalMailPersons_CreateQuery,
AddressOf __GetExternalMailList.DetailsClass.PropertySetProperties._ExternalMailPersons_SelectionChanged,
AddressOf __GetExternalMailList.DetailsClass.PropertySetProperties._ExternalMailPersons_OnCollectionChanged,
AddressOf __GetExternalMailList.DetailsClass.PropertySetProperties._ExternalMailPersons_OnLoaded)
Private Shared Sub _ExternalMailPersons_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __GetExternalMailList.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __GetExternalMailList, __GetExternalMailList.DetailsClass, Global.LightSwitchApplication.ExternalMailPerson).Data), d As __GetExternalMailList.DetailsClass, sf As Object)
c(d, d._ExternalMailPersons, sf)
End Sub
Private Shared Sub _ExternalMailPersons_Validate(s As __GetExternalMailList, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.ExternalMailPersons_Validate(r)
End Sub
Private Shared Function _ExternalMailPersons_CreateQuery(d As __GetExternalMailList.DetailsClass, args As Object()) As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return d.ExternalMailPersonsQuery()
End Function
Private Shared Sub _ExternalMailPersons_SelectionChanged(s As __GetExternalMailList)
s.ExternalMailPersons_SelectionChanged()
End Sub
Private Shared Sub _ExternalMailPersons_OnCollectionChanged(s As __GetExternalMailList, e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
s.ExternalMailPersons_Changed(e)
End Sub
Private Shared Sub _ExternalMailPersons_OnLoaded(s As __GetExternalMailList, succeeded As Boolean)
s.ExternalMailPersons_Loaded(succeeded)
End Sub
Public Shared ReadOnly People As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __GetExternalMailList, __GetExternalMailList.DetailsClass, Global.LightSwitchApplication.Person).Entry( _
"People",
AddressOf __GetExternalMailList.DetailsClass.PropertySetProperties._People_Stub,
AddressOf __GetExternalMailList.DetailsClass.PropertySetProperties._People_Validate,
AddressOf __GetExternalMailList.DetailsClass.PropertySetProperties._People_CreateQuery,
AddressOf __GetExternalMailList.DetailsClass.PropertySetProperties._People_SelectionChanged,
AddressOf __GetExternalMailList.DetailsClass.PropertySetProperties._People_OnCollectionChanged,
AddressOf __GetExternalMailList.DetailsClass.PropertySetProperties._People_OnLoaded)
Private Shared Sub _People_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __GetExternalMailList.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __GetExternalMailList, __GetExternalMailList.DetailsClass, Global.LightSwitchApplication.Person).Data), d As __GetExternalMailList.DetailsClass, sf As Object)
c(d, d._People, sf)
End Sub
Private Shared Sub _People_Validate(s As __GetExternalMailList, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.People_Validate(r)
End Sub
Private Shared Function _People_CreateQuery(d As __GetExternalMailList.DetailsClass, args As Object()) As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return d.PeopleQuery()
End Function
Private Shared Sub _People_SelectionChanged(s As __GetExternalMailList)
s.People_SelectionChanged()
End Sub
Private Shared Sub _People_OnCollectionChanged(s As __GetExternalMailList, e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
s.People_Changed(e)
End Sub
Private Shared Sub _People_OnLoaded(s As __GetExternalMailList, succeeded As Boolean)
s.People_Loaded(succeeded)
End Sub
Public Shared ReadOnly Count_PrimaryPeople As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __GetExternalMailList, __GetExternalMailList.DetailsClass, Global.System.Nullable(Of Integer)).Entry( _
"Count_PrimaryPeople",
False,
AddressOf __GetExternalMailList.DetailsClass.PropertySetProperties._Count_PrimaryPeople_Stub,
AddressOf __GetExternalMailList.DetailsClass.PropertySetProperties._Count_PrimaryPeople_Validate,
AddressOf __GetExternalMailList.DetailsClass.PropertySetProperties._Count_PrimaryPeople_OnValueChanged)
Private Shared Sub _Count_PrimaryPeople_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __GetExternalMailList.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __GetExternalMailList, __GetExternalMailList.DetailsClass, Global.System.Nullable(Of Integer)).Data), d As __GetExternalMailList.DetailsClass, sf As Object)
c(d, d._Count_PrimaryPeople, sf)
End Sub
Private Shared Sub _Count_PrimaryPeople_Validate(s As __GetExternalMailList, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.Count_PrimaryPeople_Validate(r)
End Sub
Private Shared Sub _Count_PrimaryPeople_OnValueChanged(s As __GetExternalMailList)
s.Count_PrimaryPeople_Changed()
End Sub
Public Shared ReadOnly Count_ExternalList As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __GetExternalMailList, __GetExternalMailList.DetailsClass, Global.System.Nullable(Of Integer)).Entry( _
"Count_ExternalList",
False,
AddressOf __GetExternalMailList.DetailsClass.PropertySetProperties._Count_ExternalList_Stub,
AddressOf __GetExternalMailList.DetailsClass.PropertySetProperties._Count_ExternalList_Validate,
AddressOf __GetExternalMailList.DetailsClass.PropertySetProperties._Count_ExternalList_OnValueChanged)
Private Shared Sub _Count_ExternalList_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __GetExternalMailList.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __GetExternalMailList, __GetExternalMailList.DetailsClass, Global.System.Nullable(Of Integer)).Data), d As __GetExternalMailList.DetailsClass, sf As Object)
c(d, d._Count_ExternalList, sf)
End Sub
Private Shared Sub _Count_ExternalList_Validate(s As __GetExternalMailList, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.Count_ExternalList_Validate(r)
End Sub
Private Shared Sub _Count_ExternalList_OnValueChanged(s As __GetExternalMailList)
s.Count_ExternalList_Changed()
End Sub
Public Shared ReadOnly Count_MatchesProcessed As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __GetExternalMailList, __GetExternalMailList.DetailsClass, Global.System.Nullable(Of Integer)).Entry( _
"Count_MatchesProcessed",
False,
AddressOf __GetExternalMailList.DetailsClass.PropertySetProperties._Count_MatchesProcessed_Stub,
AddressOf __GetExternalMailList.DetailsClass.PropertySetProperties._Count_MatchesProcessed_Validate,
AddressOf __GetExternalMailList.DetailsClass.PropertySetProperties._Count_MatchesProcessed_OnValueChanged)
Private Shared Sub _Count_MatchesProcessed_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __GetExternalMailList.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __GetExternalMailList, __GetExternalMailList.DetailsClass, Global.System.Nullable(Of Integer)).Data), d As __GetExternalMailList.DetailsClass, sf As Object)
c(d, d._Count_MatchesProcessed, sf)
End Sub
Private Shared Sub _Count_MatchesProcessed_Validate(s As __GetExternalMailList, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.Count_MatchesProcessed_Validate(r)
End Sub
Private Shared Sub _Count_MatchesProcessed_OnValueChanged(s As __GetExternalMailList)
s.Count_MatchesProcessed_Changed()
End Sub
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend NotInheritable Class CommandSetProperties
Public Shared ReadOnly GetMailList As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __GetExternalMailList, __GetExternalMailList.DetailsClass).Entry( _
"GetMailList",
AddressOf __GetExternalMailList.DetailsClass.CommandSetProperties._GetMailList_Stub,
AddressOf __GetExternalMailList.DetailsClass.CommandSetProperties._GetMailList_CreateExecutableObject)
Private Shared Sub _GetMailList_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __GetExternalMailList.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __GetExternalMailList, __GetExternalMailList.DetailsClass).Data), d As __GetExternalMailList.DetailsClass, sf As Object)
c(d, d._GetMailListCommand, sf)
End Sub
Private Shared Function _GetMailList_CreateExecutableObject(d As __GetExternalMailList.DetailsClass) As Global.Microsoft.LightSwitch.IExecutable
Return DirectCast(d, __GetExternalMailList.DetailsClass).Methods.GetMailList.CreateInvocation()
End Function
Public Shared ReadOnly CalculateMatchScores As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __GetExternalMailList, __GetExternalMailList.DetailsClass).Entry( _
"CalculateMatchScores",
AddressOf __GetExternalMailList.DetailsClass.CommandSetProperties._CalculateMatchScores_Stub,
AddressOf __GetExternalMailList.DetailsClass.CommandSetProperties._CalculateMatchScores_CreateExecutableObject)
Private Shared Sub _CalculateMatchScores_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __GetExternalMailList.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __GetExternalMailList, __GetExternalMailList.DetailsClass).Data), d As __GetExternalMailList.DetailsClass, sf As Object)
c(d, d._CalculateMatchScoresCommand, sf)
End Sub
Private Shared Function _CalculateMatchScores_CreateExecutableObject(d As __GetExternalMailList.DetailsClass) As Global.Microsoft.LightSwitch.IExecutable
Return DirectCast(d, __GetExternalMailList.DetailsClass).Methods.CalculateMatchScores.CreateInvocation()
End Function
Public Shared ReadOnly ReviewMatchResults As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __GetExternalMailList, __GetExternalMailList.DetailsClass).Entry( _
"ReviewMatchResults",
AddressOf __GetExternalMailList.DetailsClass.CommandSetProperties._ReviewMatchResults_Stub,
AddressOf __GetExternalMailList.DetailsClass.CommandSetProperties._ReviewMatchResults_CreateExecutableObject)
Private Shared Sub _ReviewMatchResults_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __GetExternalMailList.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __GetExternalMailList, __GetExternalMailList.DetailsClass).Data), d As __GetExternalMailList.DetailsClass, sf As Object)
c(d, d._ReviewMatchResultsCommand, sf)
End Sub
Private Shared Function _ReviewMatchResults_CreateExecutableObject(d As __GetExternalMailList.DetailsClass) As Global.Microsoft.LightSwitch.IExecutable
Return DirectCast(d, __GetExternalMailList.DetailsClass).Methods.ReviewMatchResults.CreateInvocation()
End Function
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend NotInheritable Class MethodSetProperties
Public Shared ReadOnly GetMailList As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __GetExternalMailList, __GetExternalMailList.DetailsClass).Entry( _
"GetMailList",
AddressOf __GetExternalMailList.DetailsClass.MethodSetProperties._GetMailList_Stub,
AddressOf __GetExternalMailList.DetailsClass.MethodSetProperties._GetMailList_CanInvoke,
AddressOf __GetExternalMailList.DetailsClass.MethodSetProperties._GetMailList_InvokeMethod)
Private Shared Sub _GetMailList_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __GetExternalMailList.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __GetExternalMailList, __GetExternalMailList.DetailsClass).Data), d As __GetExternalMailList.DetailsClass, sf As Object)
c(d, d._GetMailListMethod, sf)
End Sub
Private Shared Function _GetMailList_CanInvoke(d As __GetExternalMailList.DetailsClass, args As Global.System.Collections.ObjectModel.ReadOnlyCollection(Of Object), ex As Global.System.Exception) As Global.System.Exception
Dim result = True
d.Screen.GetMailList_CanExecute(result)
Return If(result, Nothing, ex)
End Function
Private Shared Sub _GetMailList_InvokeMethod(d As __GetExternalMailList.DetailsClass, args As Global.System.Collections.ObjectModel.ReadOnlyCollection(Of Object))
d.Screen.GetMailList_Execute()
End Sub
Public Shared ReadOnly CalculateMatchScores As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __GetExternalMailList, __GetExternalMailList.DetailsClass).Entry( _
"CalculateMatchScores",
AddressOf __GetExternalMailList.DetailsClass.MethodSetProperties._CalculateMatchScores_Stub,
AddressOf __GetExternalMailList.DetailsClass.MethodSetProperties._CalculateMatchScores_CanInvoke,
AddressOf __GetExternalMailList.DetailsClass.MethodSetProperties._CalculateMatchScores_InvokeMethod)
Private Shared Sub _CalculateMatchScores_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __GetExternalMailList.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __GetExternalMailList, __GetExternalMailList.DetailsClass).Data), d As __GetExternalMailList.DetailsClass, sf As Object)
c(d, d._CalculateMatchScoresMethod, sf)
End Sub
Private Shared Function _CalculateMatchScores_CanInvoke(d As __GetExternalMailList.DetailsClass, args As Global.System.Collections.ObjectModel.ReadOnlyCollection(Of Object), ex As Global.System.Exception) As Global.System.Exception
Dim result = True
d.Screen.CalculateMatchScores_CanExecute(result)
Return If(result, Nothing, ex)
End Function
Private Shared Sub _CalculateMatchScores_InvokeMethod(d As __GetExternalMailList.DetailsClass, args As Global.System.Collections.ObjectModel.ReadOnlyCollection(Of Object))
d.Screen.CalculateMatchScores_Execute()
End Sub
Public Shared ReadOnly ReviewMatchResults As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __GetExternalMailList, __GetExternalMailList.DetailsClass).Entry( _
"ReviewMatchResults",
AddressOf __GetExternalMailList.DetailsClass.MethodSetProperties._ReviewMatchResults_Stub,
AddressOf __GetExternalMailList.DetailsClass.MethodSetProperties._ReviewMatchResults_CanInvoke,
AddressOf __GetExternalMailList.DetailsClass.MethodSetProperties._ReviewMatchResults_InvokeMethod)
Private Shared Sub _ReviewMatchResults_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __GetExternalMailList.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __GetExternalMailList, __GetExternalMailList.DetailsClass).Data), d As __GetExternalMailList.DetailsClass, sf As Object)
c(d, d._ReviewMatchResultsMethod, sf)
End Sub
Private Shared Function _ReviewMatchResults_CanInvoke(d As __GetExternalMailList.DetailsClass, args As Global.System.Collections.ObjectModel.ReadOnlyCollection(Of Object), ex As Global.System.Exception) As Global.System.Exception
Dim result = True
d.Screen.ReviewMatchResults_CanExecute(result)
Return If(result, Nothing, ex)
End Function
Private Shared Sub _ReviewMatchResults_InvokeMethod(d As __GetExternalMailList.DetailsClass, args As Global.System.Collections.ObjectModel.ReadOnlyCollection(Of Object))
d.Screen.ReviewMatchResults_Execute()
End Sub
End Class
End Class
End Class
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
Partial Public NotInheritable Class EditLookupTables
Inherits Global.Microsoft.LightSwitch.Framework.Client.ScreenObject(Of __EditLookupTables, __EditLookupTables.DetailsClass)
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private Sub New()
MyBase.New("LightSwitchApplication:EditLookupTables")
__EditLookupTables.DetailsClass.Initialize(Me)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
Public Shared Function CreateInstance() As EditLookupTables
Return New __EditLookupTables( _
)
End Function
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub EditLookupTables_InitializeDataWorkspace(ByVal saveChangesTo As Global.System.Collections.Generic.List(Of Global.Microsoft.LightSwitch.IDataService))
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub EditLookupTables_Created()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub EditLookupTables_Activated()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub EditLookupTables_Saving(ByRef handled As Boolean)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub EditLookupTables_Saved()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub EditLookupTables_Closing(ByRef cancel As Boolean)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub EditLookupTables_SaveError(ByVal exception As Global.System.Exception, ByRef handled As Boolean)
End Sub
#Region "Private Properties"
''' <summary>
''' Gets the Application object for this application. The Application object provides access to active screens, methods to open screens and access to the current user.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private ReadOnly Property Application As Global.LightSwitchApplication.Application
Get
Return Global.LightSwitchApplication.Application.Current
End Get
End Property
''' <summary>
''' Gets the containing data workspace. The data workspace provides access to all data sources in the application.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private ReadOnly Property DataWorkspace As Global.LightSwitchApplication.DataWorkspace
Get
Return DirectCast(DirectCast(Me.Details, Global.Microsoft.LightSwitch.Details.Client.IScreenDetails).DataWorkspace, Global.LightSwitchApplication.DataWorkspace)
End Get
End Property
#End Region
Partial Private Sub ActivityNames_SelectionChanged()
End Sub
Partial Private Sub ActivityNames_Changed(ByVal e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ActivityNames_Loaded(ByVal succeeded As Boolean)
End Sub
Partial Private Sub MailCodes_SelectionChanged()
End Sub
Partial Private Sub MailCodes_Changed(ByVal e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub MailCodes_Loaded(ByVal succeeded As Boolean)
End Sub
Partial Private Sub ProgramNames_SelectionChanged()
End Sub
Partial Private Sub ProgramNames_Changed(ByVal e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ProgramNames_Loaded(ByVal succeeded As Boolean)
End Sub
Partial Private Sub ProgramActivityNames_SelectionChanged()
End Sub
Partial Private Sub ProgramActivityNames_Changed(ByVal e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ProgramActivityNames_Loaded(ByVal succeeded As Boolean)
End Sub
Partial Private Sub Seasons_SelectionChanged()
End Sub
Partial Private Sub Seasons_Changed(ByVal e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Seasons_Loaded(ByVal succeeded As Boolean)
End Sub
Partial Private Sub SubscriptionTypes_SelectionChanged()
End Sub
Partial Private Sub SubscriptionTypes_Changed(ByVal e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub SubscriptionTypes_Loaded(ByVal succeeded As Boolean)
End Sub
''' <summary>
''' Gets the ActivityNames visual collection. The collection contains all records currently shown on the respective list or grid control.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property ActivityNames As Global.Microsoft.LightSwitch.Framework.Client.VisualCollection(Of Global.LightSwitchApplication.ActivityName)
Get
Return __EditLookupTables.DetailsClass.GetValue(Me, __EditLookupTables.DetailsClass.PropertySetProperties.ActivityNames)
End Get
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ActivityNames_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
''' <summary>
''' Gets the MailCodes visual collection. The collection contains all records currently shown on the respective list or grid control.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property MailCodes As Global.Microsoft.LightSwitch.Framework.Client.VisualCollection(Of Global.LightSwitchApplication.MailCode)
Get
Return __EditLookupTables.DetailsClass.GetValue(Me, __EditLookupTables.DetailsClass.PropertySetProperties.MailCodes)
End Get
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub MailCodes_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
''' <summary>
''' Gets the ProgramNames visual collection. The collection contains all records currently shown on the respective list or grid control.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property ProgramNames As Global.Microsoft.LightSwitch.Framework.Client.VisualCollection(Of Global.LightSwitchApplication.ProgramName)
Get
Return __EditLookupTables.DetailsClass.GetValue(Me, __EditLookupTables.DetailsClass.PropertySetProperties.ProgramNames)
End Get
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ProgramNames_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
''' <summary>
''' Gets the ProgramActivityNames visual collection. The collection contains all records currently shown on the respective list or grid control.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property ProgramActivityNames As Global.Microsoft.LightSwitch.Framework.Client.VisualCollection(Of Global.LightSwitchApplication.ProgramActivityName)
Get
Return __EditLookupTables.DetailsClass.GetValue(Me, __EditLookupTables.DetailsClass.PropertySetProperties.ProgramActivityNames)
End Get
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ProgramActivityNames_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
''' <summary>
''' Gets the Seasons visual collection. The collection contains all records currently shown on the respective list or grid control.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property Seasons As Global.Microsoft.LightSwitch.Framework.Client.VisualCollection(Of Global.LightSwitchApplication.Season)
Get
Return __EditLookupTables.DetailsClass.GetValue(Me, __EditLookupTables.DetailsClass.PropertySetProperties.Seasons)
End Get
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Seasons_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
''' <summary>
''' Gets the SubscriptionTypes visual collection. The collection contains all records currently shown on the respective list or grid control.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property SubscriptionTypes As Global.Microsoft.LightSwitch.Framework.Client.VisualCollection(Of Global.LightSwitchApplication.SubscriptionType)
Get
Return __EditLookupTables.DetailsClass.GetValue(Me, __EditLookupTables.DetailsClass.PropertySetProperties.SubscriptionTypes)
End Get
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub SubscriptionTypes_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class DetailsClass
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenDetails(Of __EditLookupTables, __EditLookupTables.DetailsClass, __EditLookupTables.DetailsClass.PropertySet, __EditLookupTables.DetailsClass.CommandSet, __EditLookupTables.DetailsClass.MethodSet)
Shared Sub New()
Dim initializePropertyEntry = __EditLookupTables.DetailsClass.PropertySetProperties.ActivityNames
End Sub
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Private Shared ReadOnly __EditLookupTablesEntry As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenDetails(Of __EditLookupTables, __EditLookupTables.DetailsClass).Entry = _
New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenDetails(Of __EditLookupTables, __EditLookupTables.DetailsClass).Entry( _
AddressOf __EditLookupTables.DetailsClass.__EditLookupTables_InvokeInitializeDataWorkspace,
AddressOf __EditLookupTables.DetailsClass.__EditLookupTables_InvokeSavingEvent,
AddressOf __EditLookupTables.DetailsClass.__EditLookupTables_InvokeSavedEvent,
AddressOf __EditLookupTables.DetailsClass.__EditLookupTables_InvokeClosingEvent,
AddressOf __EditLookupTables.DetailsClass.__EditLookupTables_InvokeCreated,
AddressOf __EditLookupTables.DetailsClass.__EditLookupTables_InvokeActivated,
AddressOf __EditLookupTables.DetailsClass.__EditLookupTables_InvokeSaveErrorEvent)
Private Shared Sub __EditLookupTables_InvokeInitializeDataWorkspace(s As __EditLookupTables, saveChangesTo As Global.System.Collections.Generic.List(Of Global.Microsoft.LightSwitch.IDataService))
s.EditLookupTables_InitializeDataWorkspace(saveChangesTo)
End Sub
Private Shared Function __EditLookupTables_InvokeSavingEvent(s As __EditLookupTables) As Boolean
Dim handled = False
s.EditLookupTables_Saving(handled)
Return handled
End Function
Private Shared Sub __EditLookupTables_InvokeSavedEvent(s As __EditLookupTables)
s.EditLookupTables_Saved()
End Sub
Private Shared Function __EditLookupTables_InvokeClosingEvent(s As __EditLookupTables) As Boolean
Dim cancel = False
s.EditLookupTables_Closing(cancel)
Return cancel
End Function
Private Shared Sub __EditLookupTables_InvokeCreated(s As __EditLookupTables)
s.EditLookupTables_Created()
End Sub
Private Shared Sub __EditLookupTables_InvokeActivated(s As __EditLookupTables)
s.EditLookupTables_Activated()
End Sub
Private Shared Function __EditLookupTables_InvokeSaveErrorEvent(s As __EditLookupTables, ex As Global.System.Exception) As Boolean
Dim handled = False
s.EditLookupTables_SaveError(ex, handled)
Return handled
End Function
Public Sub New()
MyBase.New()
End Sub
Public Shadows ReadOnly Property Properties As __EditLookupTables.DetailsClass.PropertySet
Get
Return MyBase.Properties
End Get
End Property
Public Shadows ReadOnly Property Commands As __EditLookupTables.DetailsClass.CommandSet
Get
Return MyBase.Commands
End Get
End Property
Public Shadows ReadOnly Property Methods As __EditLookupTables.DetailsClass.MethodSet
Get
Return MyBase.Methods
End Get
End Property
Private Function ActivityNamesQuery() As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return Me.Screen.DataWorkspace.ApplicationData.ActivityNames
End Function
Private Function MailCodesQuery() As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return Me.Screen.DataWorkspace.ApplicationData.MailCodes
End Function
Private Function ProgramNamesQuery() As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return Me.Screen.DataWorkspace.ApplicationData.ProgramNames
End Function
Private Function ProgramActivityNamesQuery() As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return Me.Screen.DataWorkspace.ApplicationData.ProgramActivityNames
End Function
Private Function SeasonsQuery() As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return Me.Screen.DataWorkspace.ApplicationData.Seasons
End Function
Private Function SubscriptionTypesQuery() As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return Me.Screen.DataWorkspace.ApplicationData.SubscriptionTypes
End Function
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _ActivityNames As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __EditLookupTables, __EditLookupTables.DetailsClass, Global.LightSwitchApplication.ActivityName).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _MailCodes As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __EditLookupTables, __EditLookupTables.DetailsClass, Global.LightSwitchApplication.MailCode).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _ProgramNames As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __EditLookupTables, __EditLookupTables.DetailsClass, Global.LightSwitchApplication.ProgramName).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _ProgramActivityNames As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __EditLookupTables, __EditLookupTables.DetailsClass, Global.LightSwitchApplication.ProgramActivityName).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _Seasons As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __EditLookupTables, __EditLookupTables.DetailsClass, Global.LightSwitchApplication.Season).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _SubscriptionTypes As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __EditLookupTables, __EditLookupTables.DetailsClass, Global.LightSwitchApplication.SubscriptionType).Data
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class PropertySet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenPropertySet(Of __EditLookupTables, __EditLookupTables.DetailsClass)
Public ReadOnly Property ActivityNames As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __EditLookupTables, __EditLookupTables.DetailsClass, Global.LightSwitchApplication.ActivityName)
Get
Return DirectCast(MyBase.GetItem(__EditLookupTables.DetailsClass.PropertySetProperties.ActivityNames), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __EditLookupTables, __EditLookupTables.DetailsClass, Global.LightSwitchApplication.ActivityName))
End Get
End Property
Public ReadOnly Property MailCodes As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __EditLookupTables, __EditLookupTables.DetailsClass, Global.LightSwitchApplication.MailCode)
Get
Return DirectCast(MyBase.GetItem(__EditLookupTables.DetailsClass.PropertySetProperties.MailCodes), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __EditLookupTables, __EditLookupTables.DetailsClass, Global.LightSwitchApplication.MailCode))
End Get
End Property
Public ReadOnly Property ProgramNames As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __EditLookupTables, __EditLookupTables.DetailsClass, Global.LightSwitchApplication.ProgramName)
Get
Return DirectCast(MyBase.GetItem(__EditLookupTables.DetailsClass.PropertySetProperties.ProgramNames), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __EditLookupTables, __EditLookupTables.DetailsClass, Global.LightSwitchApplication.ProgramName))
End Get
End Property
Public ReadOnly Property ProgramActivityNames As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __EditLookupTables, __EditLookupTables.DetailsClass, Global.LightSwitchApplication.ProgramActivityName)
Get
Return DirectCast(MyBase.GetItem(__EditLookupTables.DetailsClass.PropertySetProperties.ProgramActivityNames), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __EditLookupTables, __EditLookupTables.DetailsClass, Global.LightSwitchApplication.ProgramActivityName))
End Get
End Property
Public ReadOnly Property Seasons As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __EditLookupTables, __EditLookupTables.DetailsClass, Global.LightSwitchApplication.Season)
Get
Return DirectCast(MyBase.GetItem(__EditLookupTables.DetailsClass.PropertySetProperties.Seasons), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __EditLookupTables, __EditLookupTables.DetailsClass, Global.LightSwitchApplication.Season))
End Get
End Property
Public ReadOnly Property SubscriptionTypes As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __EditLookupTables, __EditLookupTables.DetailsClass, Global.LightSwitchApplication.SubscriptionType)
Get
Return DirectCast(MyBase.GetItem(__EditLookupTables.DetailsClass.PropertySetProperties.SubscriptionTypes), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __EditLookupTables, __EditLookupTables.DetailsClass, Global.LightSwitchApplication.SubscriptionType))
End Get
End Property
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class CommandSet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommandSet(Of __EditLookupTables, __EditLookupTables.DetailsClass)
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class MethodSet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethodSet(Of __EditLookupTables, __EditLookupTables.DetailsClass)
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend NotInheritable Class PropertySetProperties
Public Shared ReadOnly ActivityNames As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __EditLookupTables, __EditLookupTables.DetailsClass, Global.LightSwitchApplication.ActivityName).Entry( _
"ActivityNames",
AddressOf __EditLookupTables.DetailsClass.PropertySetProperties._ActivityNames_Stub,
AddressOf __EditLookupTables.DetailsClass.PropertySetProperties._ActivityNames_Validate,
AddressOf __EditLookupTables.DetailsClass.PropertySetProperties._ActivityNames_CreateQuery,
AddressOf __EditLookupTables.DetailsClass.PropertySetProperties._ActivityNames_SelectionChanged,
AddressOf __EditLookupTables.DetailsClass.PropertySetProperties._ActivityNames_OnCollectionChanged,
AddressOf __EditLookupTables.DetailsClass.PropertySetProperties._ActivityNames_OnLoaded)
Private Shared Sub _ActivityNames_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __EditLookupTables.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __EditLookupTables, __EditLookupTables.DetailsClass, Global.LightSwitchApplication.ActivityName).Data), d As __EditLookupTables.DetailsClass, sf As Object)
c(d, d._ActivityNames, sf)
End Sub
Private Shared Sub _ActivityNames_Validate(s As __EditLookupTables, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.ActivityNames_Validate(r)
End Sub
Private Shared Function _ActivityNames_CreateQuery(d As __EditLookupTables.DetailsClass, args As Object()) As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return d.ActivityNamesQuery()
End Function
Private Shared Sub _ActivityNames_SelectionChanged(s As __EditLookupTables)
s.ActivityNames_SelectionChanged()
End Sub
Private Shared Sub _ActivityNames_OnCollectionChanged(s As __EditLookupTables, e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
s.ActivityNames_Changed(e)
End Sub
Private Shared Sub _ActivityNames_OnLoaded(s As __EditLookupTables, succeeded As Boolean)
s.ActivityNames_Loaded(succeeded)
End Sub
Public Shared ReadOnly MailCodes As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __EditLookupTables, __EditLookupTables.DetailsClass, Global.LightSwitchApplication.MailCode).Entry( _
"MailCodes",
AddressOf __EditLookupTables.DetailsClass.PropertySetProperties._MailCodes_Stub,
AddressOf __EditLookupTables.DetailsClass.PropertySetProperties._MailCodes_Validate,
AddressOf __EditLookupTables.DetailsClass.PropertySetProperties._MailCodes_CreateQuery,
AddressOf __EditLookupTables.DetailsClass.PropertySetProperties._MailCodes_SelectionChanged,
AddressOf __EditLookupTables.DetailsClass.PropertySetProperties._MailCodes_OnCollectionChanged,
AddressOf __EditLookupTables.DetailsClass.PropertySetProperties._MailCodes_OnLoaded)
Private Shared Sub _MailCodes_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __EditLookupTables.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __EditLookupTables, __EditLookupTables.DetailsClass, Global.LightSwitchApplication.MailCode).Data), d As __EditLookupTables.DetailsClass, sf As Object)
c(d, d._MailCodes, sf)
End Sub
Private Shared Sub _MailCodes_Validate(s As __EditLookupTables, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.MailCodes_Validate(r)
End Sub
Private Shared Function _MailCodes_CreateQuery(d As __EditLookupTables.DetailsClass, args As Object()) As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return d.MailCodesQuery()
End Function
Private Shared Sub _MailCodes_SelectionChanged(s As __EditLookupTables)
s.MailCodes_SelectionChanged()
End Sub
Private Shared Sub _MailCodes_OnCollectionChanged(s As __EditLookupTables, e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
s.MailCodes_Changed(e)
End Sub
Private Shared Sub _MailCodes_OnLoaded(s As __EditLookupTables, succeeded As Boolean)
s.MailCodes_Loaded(succeeded)
End Sub
Public Shared ReadOnly ProgramNames As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __EditLookupTables, __EditLookupTables.DetailsClass, Global.LightSwitchApplication.ProgramName).Entry( _
"ProgramNames",
AddressOf __EditLookupTables.DetailsClass.PropertySetProperties._ProgramNames_Stub,
AddressOf __EditLookupTables.DetailsClass.PropertySetProperties._ProgramNames_Validate,
AddressOf __EditLookupTables.DetailsClass.PropertySetProperties._ProgramNames_CreateQuery,
AddressOf __EditLookupTables.DetailsClass.PropertySetProperties._ProgramNames_SelectionChanged,
AddressOf __EditLookupTables.DetailsClass.PropertySetProperties._ProgramNames_OnCollectionChanged,
AddressOf __EditLookupTables.DetailsClass.PropertySetProperties._ProgramNames_OnLoaded)
Private Shared Sub _ProgramNames_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __EditLookupTables.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __EditLookupTables, __EditLookupTables.DetailsClass, Global.LightSwitchApplication.ProgramName).Data), d As __EditLookupTables.DetailsClass, sf As Object)
c(d, d._ProgramNames, sf)
End Sub
Private Shared Sub _ProgramNames_Validate(s As __EditLookupTables, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.ProgramNames_Validate(r)
End Sub
Private Shared Function _ProgramNames_CreateQuery(d As __EditLookupTables.DetailsClass, args As Object()) As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return d.ProgramNamesQuery()
End Function
Private Shared Sub _ProgramNames_SelectionChanged(s As __EditLookupTables)
s.ProgramNames_SelectionChanged()
End Sub
Private Shared Sub _ProgramNames_OnCollectionChanged(s As __EditLookupTables, e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
s.ProgramNames_Changed(e)
End Sub
Private Shared Sub _ProgramNames_OnLoaded(s As __EditLookupTables, succeeded As Boolean)
s.ProgramNames_Loaded(succeeded)
End Sub
Public Shared ReadOnly ProgramActivityNames As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __EditLookupTables, __EditLookupTables.DetailsClass, Global.LightSwitchApplication.ProgramActivityName).Entry( _
"ProgramActivityNames",
AddressOf __EditLookupTables.DetailsClass.PropertySetProperties._ProgramActivityNames_Stub,
AddressOf __EditLookupTables.DetailsClass.PropertySetProperties._ProgramActivityNames_Validate,
AddressOf __EditLookupTables.DetailsClass.PropertySetProperties._ProgramActivityNames_CreateQuery,
AddressOf __EditLookupTables.DetailsClass.PropertySetProperties._ProgramActivityNames_SelectionChanged,
AddressOf __EditLookupTables.DetailsClass.PropertySetProperties._ProgramActivityNames_OnCollectionChanged,
AddressOf __EditLookupTables.DetailsClass.PropertySetProperties._ProgramActivityNames_OnLoaded)
Private Shared Sub _ProgramActivityNames_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __EditLookupTables.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __EditLookupTables, __EditLookupTables.DetailsClass, Global.LightSwitchApplication.ProgramActivityName).Data), d As __EditLookupTables.DetailsClass, sf As Object)
c(d, d._ProgramActivityNames, sf)
End Sub
Private Shared Sub _ProgramActivityNames_Validate(s As __EditLookupTables, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.ProgramActivityNames_Validate(r)
End Sub
Private Shared Function _ProgramActivityNames_CreateQuery(d As __EditLookupTables.DetailsClass, args As Object()) As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return d.ProgramActivityNamesQuery()
End Function
Private Shared Sub _ProgramActivityNames_SelectionChanged(s As __EditLookupTables)
s.ProgramActivityNames_SelectionChanged()
End Sub
Private Shared Sub _ProgramActivityNames_OnCollectionChanged(s As __EditLookupTables, e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
s.ProgramActivityNames_Changed(e)
End Sub
Private Shared Sub _ProgramActivityNames_OnLoaded(s As __EditLookupTables, succeeded As Boolean)
s.ProgramActivityNames_Loaded(succeeded)
End Sub
Public Shared ReadOnly Seasons As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __EditLookupTables, __EditLookupTables.DetailsClass, Global.LightSwitchApplication.Season).Entry( _
"Seasons",
AddressOf __EditLookupTables.DetailsClass.PropertySetProperties._Seasons_Stub,
AddressOf __EditLookupTables.DetailsClass.PropertySetProperties._Seasons_Validate,
AddressOf __EditLookupTables.DetailsClass.PropertySetProperties._Seasons_CreateQuery,
AddressOf __EditLookupTables.DetailsClass.PropertySetProperties._Seasons_SelectionChanged,
AddressOf __EditLookupTables.DetailsClass.PropertySetProperties._Seasons_OnCollectionChanged,
AddressOf __EditLookupTables.DetailsClass.PropertySetProperties._Seasons_OnLoaded)
Private Shared Sub _Seasons_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __EditLookupTables.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __EditLookupTables, __EditLookupTables.DetailsClass, Global.LightSwitchApplication.Season).Data), d As __EditLookupTables.DetailsClass, sf As Object)
c(d, d._Seasons, sf)
End Sub
Private Shared Sub _Seasons_Validate(s As __EditLookupTables, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.Seasons_Validate(r)
End Sub
Private Shared Function _Seasons_CreateQuery(d As __EditLookupTables.DetailsClass, args As Object()) As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return d.SeasonsQuery()
End Function
Private Shared Sub _Seasons_SelectionChanged(s As __EditLookupTables)
s.Seasons_SelectionChanged()
End Sub
Private Shared Sub _Seasons_OnCollectionChanged(s As __EditLookupTables, e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
s.Seasons_Changed(e)
End Sub
Private Shared Sub _Seasons_OnLoaded(s As __EditLookupTables, succeeded As Boolean)
s.Seasons_Loaded(succeeded)
End Sub
Public Shared ReadOnly SubscriptionTypes As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __EditLookupTables, __EditLookupTables.DetailsClass, Global.LightSwitchApplication.SubscriptionType).Entry( _
"SubscriptionTypes",
AddressOf __EditLookupTables.DetailsClass.PropertySetProperties._SubscriptionTypes_Stub,
AddressOf __EditLookupTables.DetailsClass.PropertySetProperties._SubscriptionTypes_Validate,
AddressOf __EditLookupTables.DetailsClass.PropertySetProperties._SubscriptionTypes_CreateQuery,
AddressOf __EditLookupTables.DetailsClass.PropertySetProperties._SubscriptionTypes_SelectionChanged,
AddressOf __EditLookupTables.DetailsClass.PropertySetProperties._SubscriptionTypes_OnCollectionChanged,
AddressOf __EditLookupTables.DetailsClass.PropertySetProperties._SubscriptionTypes_OnLoaded)
Private Shared Sub _SubscriptionTypes_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __EditLookupTables.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __EditLookupTables, __EditLookupTables.DetailsClass, Global.LightSwitchApplication.SubscriptionType).Data), d As __EditLookupTables.DetailsClass, sf As Object)
c(d, d._SubscriptionTypes, sf)
End Sub
Private Shared Sub _SubscriptionTypes_Validate(s As __EditLookupTables, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.SubscriptionTypes_Validate(r)
End Sub
Private Shared Function _SubscriptionTypes_CreateQuery(d As __EditLookupTables.DetailsClass, args As Object()) As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return d.SubscriptionTypesQuery()
End Function
Private Shared Sub _SubscriptionTypes_SelectionChanged(s As __EditLookupTables)
s.SubscriptionTypes_SelectionChanged()
End Sub
Private Shared Sub _SubscriptionTypes_OnCollectionChanged(s As __EditLookupTables, e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
s.SubscriptionTypes_Changed(e)
End Sub
Private Shared Sub _SubscriptionTypes_OnLoaded(s As __EditLookupTables, succeeded As Boolean)
s.SubscriptionTypes_Loaded(succeeded)
End Sub
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend NotInheritable Class CommandSetProperties
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend NotInheritable Class MethodSetProperties
End Class
End Class
End Class
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
Partial Public NotInheritable Class XXLoadTestData
Inherits Global.Microsoft.LightSwitch.Framework.Client.ScreenObject(Of __XXLoadTestData, __XXLoadTestData.DetailsClass)
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private Sub New()
MyBase.New("LightSwitchApplication:XXLoadTestData")
__XXLoadTestData.DetailsClass.Initialize(Me)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
Public Shared Function CreateInstance() As XXLoadTestData
Return New __XXLoadTestData( _
)
End Function
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub XXLoadTestData_InitializeDataWorkspace(ByVal saveChangesTo As Global.System.Collections.Generic.List(Of Global.Microsoft.LightSwitch.IDataService))
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub XXLoadTestData_Created()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub XXLoadTestData_Activated()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub XXLoadTestData_Saving(ByRef handled As Boolean)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub XXLoadTestData_Saved()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub XXLoadTestData_Closing(ByRef cancel As Boolean)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub XXLoadTestData_SaveError(ByVal exception As Global.System.Exception, ByRef handled As Boolean)
End Sub
#Region "Private Properties"
''' <summary>
''' Gets the Application object for this application. The Application object provides access to active screens, methods to open screens and access to the current user.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private ReadOnly Property Application As Global.LightSwitchApplication.Application
Get
Return Global.LightSwitchApplication.Application.Current
End Get
End Property
''' <summary>
''' Gets the containing data workspace. The data workspace provides access to all data sources in the application.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private ReadOnly Property DataWorkspace As Global.LightSwitchApplication.DataWorkspace
Get
Return DirectCast(DirectCast(Me.Details, Global.Microsoft.LightSwitch.Details.Client.IScreenDetails).DataWorkspace, Global.LightSwitchApplication.DataWorkspace)
End Get
End Property
#End Region
Partial Private Sub People_SelectionChanged()
End Sub
Partial Private Sub People_Changed(ByVal e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub People_Loaded(ByVal succeeded As Boolean)
End Sub
Partial Private Sub Seasons_SelectionChanged()
End Sub
Partial Private Sub Seasons_Changed(ByVal e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Seasons_Loaded(ByVal succeeded As Boolean)
End Sub
Partial Private Sub MailCodes_SelectionChanged()
End Sub
Partial Private Sub MailCodes_Changed(ByVal e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub MailCodes_Loaded(ByVal succeeded As Boolean)
End Sub
Partial Private Sub MailLists_SelectionChanged()
End Sub
Partial Private Sub MailLists_Changed(ByVal e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub MailLists_Loaded(ByVal succeeded As Boolean)
End Sub
Partial Private Sub MailListCodes_SelectionChanged()
End Sub
Partial Private Sub MailListCodes_Changed(ByVal e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub MailListCodes_Loaded(ByVal succeeded As Boolean)
End Sub
Partial Private Sub SubscriptionTypes_SelectionChanged()
End Sub
Partial Private Sub SubscriptionTypes_Changed(ByVal e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub SubscriptionTypes_Loaded(ByVal succeeded As Boolean)
End Sub
''' <summary>
''' Gets the People visual collection. The collection contains all records currently shown on the respective list or grid control.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property People As Global.Microsoft.LightSwitch.Framework.Client.VisualCollection(Of Global.LightSwitchApplication.Person)
Get
Return __XXLoadTestData.DetailsClass.GetValue(Me, __XXLoadTestData.DetailsClass.PropertySetProperties.People)
End Get
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub People_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
''' <summary>
''' Gets the Seasons visual collection. The collection contains all records currently shown on the respective list or grid control.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property Seasons As Global.Microsoft.LightSwitch.Framework.Client.VisualCollection(Of Global.LightSwitchApplication.Season)
Get
Return __XXLoadTestData.DetailsClass.GetValue(Me, __XXLoadTestData.DetailsClass.PropertySetProperties.Seasons)
End Get
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Seasons_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
''' <summary>
''' Gets the MailCodes visual collection. The collection contains all records currently shown on the respective list or grid control.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property MailCodes As Global.Microsoft.LightSwitch.Framework.Client.VisualCollection(Of Global.LightSwitchApplication.MailCode)
Get
Return __XXLoadTestData.DetailsClass.GetValue(Me, __XXLoadTestData.DetailsClass.PropertySetProperties.MailCodes)
End Get
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub MailCodes_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
''' <summary>
''' Gets the MailLists visual collection. The collection contains all records currently shown on the respective list or grid control.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property MailLists As Global.Microsoft.LightSwitch.Framework.Client.VisualCollection(Of Global.LightSwitchApplication.MailList)
Get
Return __XXLoadTestData.DetailsClass.GetValue(Me, __XXLoadTestData.DetailsClass.PropertySetProperties.MailLists)
End Get
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub MailLists_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
''' <summary>
''' Gets the MailListCodes visual collection. The collection contains all records currently shown on the respective list or grid control.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property MailListCodes As Global.Microsoft.LightSwitch.Framework.Client.VisualCollection(Of Global.LightSwitchApplication.MailListCode)
Get
Return __XXLoadTestData.DetailsClass.GetValue(Me, __XXLoadTestData.DetailsClass.PropertySetProperties.MailListCodes)
End Get
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub MailListCodes_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
''' <summary>
''' Gets the SubscriptionTypes visual collection. The collection contains all records currently shown on the respective list or grid control.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property SubscriptionTypes As Global.Microsoft.LightSwitch.Framework.Client.VisualCollection(Of Global.LightSwitchApplication.SubscriptionType)
Get
Return __XXLoadTestData.DetailsClass.GetValue(Me, __XXLoadTestData.DetailsClass.PropertySetProperties.SubscriptionTypes)
End Get
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub SubscriptionTypes_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
''' <summary>
''' Calls the LoadPeople screen method.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Sub LoadPeople()
Me.Details.Methods.LoadPeople.CreateInvocation().Execute()
End Sub
Partial Private Sub LoadPeople_CanExecute(ByRef result As Boolean)
End Sub
Partial Private Sub LoadPeople_Execute()
End Sub
''' <summary>
''' Calls the LoadSeasons screen method.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Sub LoadSeasons()
Me.Details.Methods.LoadSeasons.CreateInvocation().Execute()
End Sub
Partial Private Sub LoadSeasons_CanExecute(ByRef result As Boolean)
End Sub
Partial Private Sub LoadSeasons_Execute()
End Sub
''' <summary>
''' Calls the LoadMailCodes screen method.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Sub LoadMailCodes()
Me.Details.Methods.LoadMailCodes.CreateInvocation().Execute()
End Sub
Partial Private Sub LoadMailCodes_CanExecute(ByRef result As Boolean)
End Sub
Partial Private Sub LoadMailCodes_Execute()
End Sub
''' <summary>
''' Calls the DeleteExistingPeople screen method.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Sub DeleteExistingPeople()
Me.Details.Methods.DeleteExistingPeople.CreateInvocation().Execute()
End Sub
Partial Private Sub DeleteExistingPeople_CanExecute(ByRef result As Boolean)
End Sub
Partial Private Sub DeleteExistingPeople_Execute()
End Sub
''' <summary>
''' Calls the LoadMailLists screen method.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Sub LoadMailLists()
Me.Details.Methods.LoadMailLists.CreateInvocation().Execute()
End Sub
Partial Private Sub LoadMailLists_CanExecute(ByRef result As Boolean)
End Sub
Partial Private Sub LoadMailLists_Execute()
End Sub
''' <summary>
''' Calls the LoadMailListCodes screen method.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Sub LoadMailListCodes()
Me.Details.Methods.LoadMailListCodes.CreateInvocation().Execute()
End Sub
Partial Private Sub LoadMailListCodes_CanExecute(ByRef result As Boolean)
End Sub
Partial Private Sub LoadMailListCodes_Execute()
End Sub
''' <summary>
''' Calls the LoadSubscriptionTypes screen method.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Sub LoadSubscriptionTypes()
Me.Details.Methods.LoadSubscriptionTypes.CreateInvocation().Execute()
End Sub
Partial Private Sub LoadSubscriptionTypes_CanExecute(ByRef result As Boolean)
End Sub
Partial Private Sub LoadSubscriptionTypes_Execute()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class DetailsClass
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenDetails(Of __XXLoadTestData, __XXLoadTestData.DetailsClass, __XXLoadTestData.DetailsClass.PropertySet, __XXLoadTestData.DetailsClass.CommandSet, __XXLoadTestData.DetailsClass.MethodSet)
Shared Sub New()
Dim initializePropertyEntry = __XXLoadTestData.DetailsClass.PropertySetProperties.People
Dim initializeCommandEntry = __XXLoadTestData.DetailsClass.CommandSetProperties.LoadPeople
Dim initializeMethodEntry = __XXLoadTestData.DetailsClass.MethodSetProperties.LoadPeople
End Sub
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Private Shared ReadOnly __XXLoadTestDataEntry As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenDetails(Of __XXLoadTestData, __XXLoadTestData.DetailsClass).Entry = _
New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenDetails(Of __XXLoadTestData, __XXLoadTestData.DetailsClass).Entry( _
AddressOf __XXLoadTestData.DetailsClass.__XXLoadTestData_InvokeInitializeDataWorkspace,
AddressOf __XXLoadTestData.DetailsClass.__XXLoadTestData_InvokeSavingEvent,
AddressOf __XXLoadTestData.DetailsClass.__XXLoadTestData_InvokeSavedEvent,
AddressOf __XXLoadTestData.DetailsClass.__XXLoadTestData_InvokeClosingEvent,
AddressOf __XXLoadTestData.DetailsClass.__XXLoadTestData_InvokeCreated,
AddressOf __XXLoadTestData.DetailsClass.__XXLoadTestData_InvokeActivated,
AddressOf __XXLoadTestData.DetailsClass.__XXLoadTestData_InvokeSaveErrorEvent)
Private Shared Sub __XXLoadTestData_InvokeInitializeDataWorkspace(s As __XXLoadTestData, saveChangesTo As Global.System.Collections.Generic.List(Of Global.Microsoft.LightSwitch.IDataService))
s.XXLoadTestData_InitializeDataWorkspace(saveChangesTo)
End Sub
Private Shared Function __XXLoadTestData_InvokeSavingEvent(s As __XXLoadTestData) As Boolean
Dim handled = False
s.XXLoadTestData_Saving(handled)
Return handled
End Function
Private Shared Sub __XXLoadTestData_InvokeSavedEvent(s As __XXLoadTestData)
s.XXLoadTestData_Saved()
End Sub
Private Shared Function __XXLoadTestData_InvokeClosingEvent(s As __XXLoadTestData) As Boolean
Dim cancel = False
s.XXLoadTestData_Closing(cancel)
Return cancel
End Function
Private Shared Sub __XXLoadTestData_InvokeCreated(s As __XXLoadTestData)
s.XXLoadTestData_Created()
End Sub
Private Shared Sub __XXLoadTestData_InvokeActivated(s As __XXLoadTestData)
s.XXLoadTestData_Activated()
End Sub
Private Shared Function __XXLoadTestData_InvokeSaveErrorEvent(s As __XXLoadTestData, ex As Global.System.Exception) As Boolean
Dim handled = False
s.XXLoadTestData_SaveError(ex, handled)
Return handled
End Function
Public Sub New()
MyBase.New()
End Sub
Public Shadows ReadOnly Property Properties As __XXLoadTestData.DetailsClass.PropertySet
Get
Return MyBase.Properties
End Get
End Property
Public Shadows ReadOnly Property Commands As __XXLoadTestData.DetailsClass.CommandSet
Get
Return MyBase.Commands
End Get
End Property
Public Shadows ReadOnly Property Methods As __XXLoadTestData.DetailsClass.MethodSet
Get
Return MyBase.Methods
End Get
End Property
Private Function PeopleQuery() As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return Global.Microsoft.LightSwitch.DataServiceQueryable.Include(
Me.Screen.DataWorkspace.ApplicationData.People,
"MailCode")
End Function
Private Function SeasonsQuery() As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return Me.Screen.DataWorkspace.ApplicationData.Seasons
End Function
Private Function MailCodesQuery() As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return Me.Screen.DataWorkspace.ApplicationData.MailCodes
End Function
Private Function MailListsQuery() As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return Me.Screen.DataWorkspace.ApplicationData.MailLists
End Function
Private Function MailListCodesQuery() As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return Global.Microsoft.LightSwitch.DataServiceQueryable.Include(
Global.Microsoft.LightSwitch.DataServiceQueryable.Include(
Me.Screen.DataWorkspace.ApplicationData.MailListCodes,
"MailList"),
"MailCode")
End Function
Private Function SubscriptionTypesQuery() As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return Me.Screen.DataWorkspace.ApplicationData.SubscriptionTypes
End Function
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _People As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __XXLoadTestData, __XXLoadTestData.DetailsClass, Global.LightSwitchApplication.Person).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _Seasons As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __XXLoadTestData, __XXLoadTestData.DetailsClass, Global.LightSwitchApplication.Season).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _MailCodes As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __XXLoadTestData, __XXLoadTestData.DetailsClass, Global.LightSwitchApplication.MailCode).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _MailLists As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __XXLoadTestData, __XXLoadTestData.DetailsClass, Global.LightSwitchApplication.MailList).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _MailListCodes As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __XXLoadTestData, __XXLoadTestData.DetailsClass, Global.LightSwitchApplication.MailListCode).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _SubscriptionTypes As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __XXLoadTestData, __XXLoadTestData.DetailsClass, Global.LightSwitchApplication.SubscriptionType).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _LoadPeopleCommand As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __XXLoadTestData, __XXLoadTestData.DetailsClass).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _LoadSeasonsCommand As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __XXLoadTestData, __XXLoadTestData.DetailsClass).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _LoadMailCodesCommand As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __XXLoadTestData, __XXLoadTestData.DetailsClass).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _DeleteExistingPeopleCommand As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __XXLoadTestData, __XXLoadTestData.DetailsClass).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _LoadMailListsCommand As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __XXLoadTestData, __XXLoadTestData.DetailsClass).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _LoadMailListCodesCommand As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __XXLoadTestData, __XXLoadTestData.DetailsClass).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _LoadSubscriptionTypesCommand As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __XXLoadTestData, __XXLoadTestData.DetailsClass).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _LoadPeopleMethod As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __XXLoadTestData, __XXLoadTestData.DetailsClass).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _LoadSeasonsMethod As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __XXLoadTestData, __XXLoadTestData.DetailsClass).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _LoadMailCodesMethod As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __XXLoadTestData, __XXLoadTestData.DetailsClass).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _DeleteExistingPeopleMethod As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __XXLoadTestData, __XXLoadTestData.DetailsClass).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _LoadMailListsMethod As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __XXLoadTestData, __XXLoadTestData.DetailsClass).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _LoadMailListCodesMethod As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __XXLoadTestData, __XXLoadTestData.DetailsClass).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _LoadSubscriptionTypesMethod As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __XXLoadTestData, __XXLoadTestData.DetailsClass).Data
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class PropertySet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenPropertySet(Of __XXLoadTestData, __XXLoadTestData.DetailsClass)
Public ReadOnly Property People As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __XXLoadTestData, __XXLoadTestData.DetailsClass, Global.LightSwitchApplication.Person)
Get
Return DirectCast(MyBase.GetItem(__XXLoadTestData.DetailsClass.PropertySetProperties.People), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __XXLoadTestData, __XXLoadTestData.DetailsClass, Global.LightSwitchApplication.Person))
End Get
End Property
Public ReadOnly Property Seasons As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __XXLoadTestData, __XXLoadTestData.DetailsClass, Global.LightSwitchApplication.Season)
Get
Return DirectCast(MyBase.GetItem(__XXLoadTestData.DetailsClass.PropertySetProperties.Seasons), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __XXLoadTestData, __XXLoadTestData.DetailsClass, Global.LightSwitchApplication.Season))
End Get
End Property
Public ReadOnly Property MailCodes As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __XXLoadTestData, __XXLoadTestData.DetailsClass, Global.LightSwitchApplication.MailCode)
Get
Return DirectCast(MyBase.GetItem(__XXLoadTestData.DetailsClass.PropertySetProperties.MailCodes), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __XXLoadTestData, __XXLoadTestData.DetailsClass, Global.LightSwitchApplication.MailCode))
End Get
End Property
Public ReadOnly Property MailLists As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __XXLoadTestData, __XXLoadTestData.DetailsClass, Global.LightSwitchApplication.MailList)
Get
Return DirectCast(MyBase.GetItem(__XXLoadTestData.DetailsClass.PropertySetProperties.MailLists), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __XXLoadTestData, __XXLoadTestData.DetailsClass, Global.LightSwitchApplication.MailList))
End Get
End Property
Public ReadOnly Property MailListCodes As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __XXLoadTestData, __XXLoadTestData.DetailsClass, Global.LightSwitchApplication.MailListCode)
Get
Return DirectCast(MyBase.GetItem(__XXLoadTestData.DetailsClass.PropertySetProperties.MailListCodes), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __XXLoadTestData, __XXLoadTestData.DetailsClass, Global.LightSwitchApplication.MailListCode))
End Get
End Property
Public ReadOnly Property SubscriptionTypes As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __XXLoadTestData, __XXLoadTestData.DetailsClass, Global.LightSwitchApplication.SubscriptionType)
Get
Return DirectCast(MyBase.GetItem(__XXLoadTestData.DetailsClass.PropertySetProperties.SubscriptionTypes), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __XXLoadTestData, __XXLoadTestData.DetailsClass, Global.LightSwitchApplication.SubscriptionType))
End Get
End Property
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class CommandSet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommandSet(Of __XXLoadTestData, __XXLoadTestData.DetailsClass)
Public ReadOnly Property LoadPeople As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __XXLoadTestData, __XXLoadTestData.DetailsClass)
Get
Return DirectCast(MyBase.GetItem(__XXLoadTestData.DetailsClass.CommandSetProperties.LoadPeople), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __XXLoadTestData, __XXLoadTestData.DetailsClass))
End Get
End Property
Public ReadOnly Property LoadSeasons As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __XXLoadTestData, __XXLoadTestData.DetailsClass)
Get
Return DirectCast(MyBase.GetItem(__XXLoadTestData.DetailsClass.CommandSetProperties.LoadSeasons), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __XXLoadTestData, __XXLoadTestData.DetailsClass))
End Get
End Property
Public ReadOnly Property LoadMailCodes As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __XXLoadTestData, __XXLoadTestData.DetailsClass)
Get
Return DirectCast(MyBase.GetItem(__XXLoadTestData.DetailsClass.CommandSetProperties.LoadMailCodes), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __XXLoadTestData, __XXLoadTestData.DetailsClass))
End Get
End Property
Public ReadOnly Property DeleteExistingPeople As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __XXLoadTestData, __XXLoadTestData.DetailsClass)
Get
Return DirectCast(MyBase.GetItem(__XXLoadTestData.DetailsClass.CommandSetProperties.DeleteExistingPeople), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __XXLoadTestData, __XXLoadTestData.DetailsClass))
End Get
End Property
Public ReadOnly Property LoadMailLists As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __XXLoadTestData, __XXLoadTestData.DetailsClass)
Get
Return DirectCast(MyBase.GetItem(__XXLoadTestData.DetailsClass.CommandSetProperties.LoadMailLists), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __XXLoadTestData, __XXLoadTestData.DetailsClass))
End Get
End Property
Public ReadOnly Property LoadMailListCodes As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __XXLoadTestData, __XXLoadTestData.DetailsClass)
Get
Return DirectCast(MyBase.GetItem(__XXLoadTestData.DetailsClass.CommandSetProperties.LoadMailListCodes), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __XXLoadTestData, __XXLoadTestData.DetailsClass))
End Get
End Property
Public ReadOnly Property LoadSubscriptionTypes As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __XXLoadTestData, __XXLoadTestData.DetailsClass)
Get
Return DirectCast(MyBase.GetItem(__XXLoadTestData.DetailsClass.CommandSetProperties.LoadSubscriptionTypes), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __XXLoadTestData, __XXLoadTestData.DetailsClass))
End Get
End Property
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class MethodSet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethodSet(Of __XXLoadTestData, __XXLoadTestData.DetailsClass)
Public ReadOnly Property LoadPeople As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __XXLoadTestData, __XXLoadTestData.DetailsClass)
Get
Return DirectCast(MyBase.GetItem(__XXLoadTestData.DetailsClass.MethodSetProperties.LoadPeople), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __XXLoadTestData, __XXLoadTestData.DetailsClass))
End Get
End Property
Public ReadOnly Property LoadSeasons As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __XXLoadTestData, __XXLoadTestData.DetailsClass)
Get
Return DirectCast(MyBase.GetItem(__XXLoadTestData.DetailsClass.MethodSetProperties.LoadSeasons), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __XXLoadTestData, __XXLoadTestData.DetailsClass))
End Get
End Property
Public ReadOnly Property LoadMailCodes As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __XXLoadTestData, __XXLoadTestData.DetailsClass)
Get
Return DirectCast(MyBase.GetItem(__XXLoadTestData.DetailsClass.MethodSetProperties.LoadMailCodes), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __XXLoadTestData, __XXLoadTestData.DetailsClass))
End Get
End Property
Public ReadOnly Property DeleteExistingPeople As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __XXLoadTestData, __XXLoadTestData.DetailsClass)
Get
Return DirectCast(MyBase.GetItem(__XXLoadTestData.DetailsClass.MethodSetProperties.DeleteExistingPeople), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __XXLoadTestData, __XXLoadTestData.DetailsClass))
End Get
End Property
Public ReadOnly Property LoadMailLists As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __XXLoadTestData, __XXLoadTestData.DetailsClass)
Get
Return DirectCast(MyBase.GetItem(__XXLoadTestData.DetailsClass.MethodSetProperties.LoadMailLists), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __XXLoadTestData, __XXLoadTestData.DetailsClass))
End Get
End Property
Public ReadOnly Property LoadMailListCodes As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __XXLoadTestData, __XXLoadTestData.DetailsClass)
Get
Return DirectCast(MyBase.GetItem(__XXLoadTestData.DetailsClass.MethodSetProperties.LoadMailListCodes), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __XXLoadTestData, __XXLoadTestData.DetailsClass))
End Get
End Property
Public ReadOnly Property LoadSubscriptionTypes As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __XXLoadTestData, __XXLoadTestData.DetailsClass)
Get
Return DirectCast(MyBase.GetItem(__XXLoadTestData.DetailsClass.MethodSetProperties.LoadSubscriptionTypes), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __XXLoadTestData, __XXLoadTestData.DetailsClass))
End Get
End Property
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend NotInheritable Class PropertySetProperties
Public Shared ReadOnly People As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __XXLoadTestData, __XXLoadTestData.DetailsClass, Global.LightSwitchApplication.Person).Entry( _
"People",
AddressOf __XXLoadTestData.DetailsClass.PropertySetProperties._People_Stub,
AddressOf __XXLoadTestData.DetailsClass.PropertySetProperties._People_Validate,
AddressOf __XXLoadTestData.DetailsClass.PropertySetProperties._People_CreateQuery,
AddressOf __XXLoadTestData.DetailsClass.PropertySetProperties._People_SelectionChanged,
AddressOf __XXLoadTestData.DetailsClass.PropertySetProperties._People_OnCollectionChanged,
AddressOf __XXLoadTestData.DetailsClass.PropertySetProperties._People_OnLoaded)
Private Shared Sub _People_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __XXLoadTestData.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __XXLoadTestData, __XXLoadTestData.DetailsClass, Global.LightSwitchApplication.Person).Data), d As __XXLoadTestData.DetailsClass, sf As Object)
c(d, d._People, sf)
End Sub
Private Shared Sub _People_Validate(s As __XXLoadTestData, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.People_Validate(r)
End Sub
Private Shared Function _People_CreateQuery(d As __XXLoadTestData.DetailsClass, args As Object()) As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return d.PeopleQuery()
End Function
Private Shared Sub _People_SelectionChanged(s As __XXLoadTestData)
s.People_SelectionChanged()
End Sub
Private Shared Sub _People_OnCollectionChanged(s As __XXLoadTestData, e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
s.People_Changed(e)
End Sub
Private Shared Sub _People_OnLoaded(s As __XXLoadTestData, succeeded As Boolean)
s.People_Loaded(succeeded)
End Sub
Public Shared ReadOnly Seasons As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __XXLoadTestData, __XXLoadTestData.DetailsClass, Global.LightSwitchApplication.Season).Entry( _
"Seasons",
AddressOf __XXLoadTestData.DetailsClass.PropertySetProperties._Seasons_Stub,
AddressOf __XXLoadTestData.DetailsClass.PropertySetProperties._Seasons_Validate,
AddressOf __XXLoadTestData.DetailsClass.PropertySetProperties._Seasons_CreateQuery,
AddressOf __XXLoadTestData.DetailsClass.PropertySetProperties._Seasons_SelectionChanged,
AddressOf __XXLoadTestData.DetailsClass.PropertySetProperties._Seasons_OnCollectionChanged,
AddressOf __XXLoadTestData.DetailsClass.PropertySetProperties._Seasons_OnLoaded)
Private Shared Sub _Seasons_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __XXLoadTestData.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __XXLoadTestData, __XXLoadTestData.DetailsClass, Global.LightSwitchApplication.Season).Data), d As __XXLoadTestData.DetailsClass, sf As Object)
c(d, d._Seasons, sf)
End Sub
Private Shared Sub _Seasons_Validate(s As __XXLoadTestData, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.Seasons_Validate(r)
End Sub
Private Shared Function _Seasons_CreateQuery(d As __XXLoadTestData.DetailsClass, args As Object()) As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return d.SeasonsQuery()
End Function
Private Shared Sub _Seasons_SelectionChanged(s As __XXLoadTestData)
s.Seasons_SelectionChanged()
End Sub
Private Shared Sub _Seasons_OnCollectionChanged(s As __XXLoadTestData, e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
s.Seasons_Changed(e)
End Sub
Private Shared Sub _Seasons_OnLoaded(s As __XXLoadTestData, succeeded As Boolean)
s.Seasons_Loaded(succeeded)
End Sub
Public Shared ReadOnly MailCodes As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __XXLoadTestData, __XXLoadTestData.DetailsClass, Global.LightSwitchApplication.MailCode).Entry( _
"MailCodes",
AddressOf __XXLoadTestData.DetailsClass.PropertySetProperties._MailCodes_Stub,
AddressOf __XXLoadTestData.DetailsClass.PropertySetProperties._MailCodes_Validate,
AddressOf __XXLoadTestData.DetailsClass.PropertySetProperties._MailCodes_CreateQuery,
AddressOf __XXLoadTestData.DetailsClass.PropertySetProperties._MailCodes_SelectionChanged,
AddressOf __XXLoadTestData.DetailsClass.PropertySetProperties._MailCodes_OnCollectionChanged,
AddressOf __XXLoadTestData.DetailsClass.PropertySetProperties._MailCodes_OnLoaded)
Private Shared Sub _MailCodes_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __XXLoadTestData.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __XXLoadTestData, __XXLoadTestData.DetailsClass, Global.LightSwitchApplication.MailCode).Data), d As __XXLoadTestData.DetailsClass, sf As Object)
c(d, d._MailCodes, sf)
End Sub
Private Shared Sub _MailCodes_Validate(s As __XXLoadTestData, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.MailCodes_Validate(r)
End Sub
Private Shared Function _MailCodes_CreateQuery(d As __XXLoadTestData.DetailsClass, args As Object()) As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return d.MailCodesQuery()
End Function
Private Shared Sub _MailCodes_SelectionChanged(s As __XXLoadTestData)
s.MailCodes_SelectionChanged()
End Sub
Private Shared Sub _MailCodes_OnCollectionChanged(s As __XXLoadTestData, e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
s.MailCodes_Changed(e)
End Sub
Private Shared Sub _MailCodes_OnLoaded(s As __XXLoadTestData, succeeded As Boolean)
s.MailCodes_Loaded(succeeded)
End Sub
Public Shared ReadOnly MailLists As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __XXLoadTestData, __XXLoadTestData.DetailsClass, Global.LightSwitchApplication.MailList).Entry( _
"MailLists",
AddressOf __XXLoadTestData.DetailsClass.PropertySetProperties._MailLists_Stub,
AddressOf __XXLoadTestData.DetailsClass.PropertySetProperties._MailLists_Validate,
AddressOf __XXLoadTestData.DetailsClass.PropertySetProperties._MailLists_CreateQuery,
AddressOf __XXLoadTestData.DetailsClass.PropertySetProperties._MailLists_SelectionChanged,
AddressOf __XXLoadTestData.DetailsClass.PropertySetProperties._MailLists_OnCollectionChanged,
AddressOf __XXLoadTestData.DetailsClass.PropertySetProperties._MailLists_OnLoaded)
Private Shared Sub _MailLists_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __XXLoadTestData.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __XXLoadTestData, __XXLoadTestData.DetailsClass, Global.LightSwitchApplication.MailList).Data), d As __XXLoadTestData.DetailsClass, sf As Object)
c(d, d._MailLists, sf)
End Sub
Private Shared Sub _MailLists_Validate(s As __XXLoadTestData, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.MailLists_Validate(r)
End Sub
Private Shared Function _MailLists_CreateQuery(d As __XXLoadTestData.DetailsClass, args As Object()) As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return d.MailListsQuery()
End Function
Private Shared Sub _MailLists_SelectionChanged(s As __XXLoadTestData)
s.MailLists_SelectionChanged()
End Sub
Private Shared Sub _MailLists_OnCollectionChanged(s As __XXLoadTestData, e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
s.MailLists_Changed(e)
End Sub
Private Shared Sub _MailLists_OnLoaded(s As __XXLoadTestData, succeeded As Boolean)
s.MailLists_Loaded(succeeded)
End Sub
Public Shared ReadOnly MailListCodes As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __XXLoadTestData, __XXLoadTestData.DetailsClass, Global.LightSwitchApplication.MailListCode).Entry( _
"MailListCodes",
AddressOf __XXLoadTestData.DetailsClass.PropertySetProperties._MailListCodes_Stub,
AddressOf __XXLoadTestData.DetailsClass.PropertySetProperties._MailListCodes_Validate,
AddressOf __XXLoadTestData.DetailsClass.PropertySetProperties._MailListCodes_CreateQuery,
AddressOf __XXLoadTestData.DetailsClass.PropertySetProperties._MailListCodes_SelectionChanged,
AddressOf __XXLoadTestData.DetailsClass.PropertySetProperties._MailListCodes_OnCollectionChanged,
AddressOf __XXLoadTestData.DetailsClass.PropertySetProperties._MailListCodes_OnLoaded)
Private Shared Sub _MailListCodes_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __XXLoadTestData.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __XXLoadTestData, __XXLoadTestData.DetailsClass, Global.LightSwitchApplication.MailListCode).Data), d As __XXLoadTestData.DetailsClass, sf As Object)
c(d, d._MailListCodes, sf)
End Sub
Private Shared Sub _MailListCodes_Validate(s As __XXLoadTestData, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.MailListCodes_Validate(r)
End Sub
Private Shared Function _MailListCodes_CreateQuery(d As __XXLoadTestData.DetailsClass, args As Object()) As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return d.MailListCodesQuery()
End Function
Private Shared Sub _MailListCodes_SelectionChanged(s As __XXLoadTestData)
s.MailListCodes_SelectionChanged()
End Sub
Private Shared Sub _MailListCodes_OnCollectionChanged(s As __XXLoadTestData, e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
s.MailListCodes_Changed(e)
End Sub
Private Shared Sub _MailListCodes_OnLoaded(s As __XXLoadTestData, succeeded As Boolean)
s.MailListCodes_Loaded(succeeded)
End Sub
Public Shared ReadOnly SubscriptionTypes As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __XXLoadTestData, __XXLoadTestData.DetailsClass, Global.LightSwitchApplication.SubscriptionType).Entry( _
"SubscriptionTypes",
AddressOf __XXLoadTestData.DetailsClass.PropertySetProperties._SubscriptionTypes_Stub,
AddressOf __XXLoadTestData.DetailsClass.PropertySetProperties._SubscriptionTypes_Validate,
AddressOf __XXLoadTestData.DetailsClass.PropertySetProperties._SubscriptionTypes_CreateQuery,
AddressOf __XXLoadTestData.DetailsClass.PropertySetProperties._SubscriptionTypes_SelectionChanged,
AddressOf __XXLoadTestData.DetailsClass.PropertySetProperties._SubscriptionTypes_OnCollectionChanged,
AddressOf __XXLoadTestData.DetailsClass.PropertySetProperties._SubscriptionTypes_OnLoaded)
Private Shared Sub _SubscriptionTypes_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __XXLoadTestData.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __XXLoadTestData, __XXLoadTestData.DetailsClass, Global.LightSwitchApplication.SubscriptionType).Data), d As __XXLoadTestData.DetailsClass, sf As Object)
c(d, d._SubscriptionTypes, sf)
End Sub
Private Shared Sub _SubscriptionTypes_Validate(s As __XXLoadTestData, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.SubscriptionTypes_Validate(r)
End Sub
Private Shared Function _SubscriptionTypes_CreateQuery(d As __XXLoadTestData.DetailsClass, args As Object()) As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return d.SubscriptionTypesQuery()
End Function
Private Shared Sub _SubscriptionTypes_SelectionChanged(s As __XXLoadTestData)
s.SubscriptionTypes_SelectionChanged()
End Sub
Private Shared Sub _SubscriptionTypes_OnCollectionChanged(s As __XXLoadTestData, e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
s.SubscriptionTypes_Changed(e)
End Sub
Private Shared Sub _SubscriptionTypes_OnLoaded(s As __XXLoadTestData, succeeded As Boolean)
s.SubscriptionTypes_Loaded(succeeded)
End Sub
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend NotInheritable Class CommandSetProperties
Public Shared ReadOnly LoadPeople As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __XXLoadTestData, __XXLoadTestData.DetailsClass).Entry( _
"LoadPeople",
AddressOf __XXLoadTestData.DetailsClass.CommandSetProperties._LoadPeople_Stub,
AddressOf __XXLoadTestData.DetailsClass.CommandSetProperties._LoadPeople_CreateExecutableObject)
Private Shared Sub _LoadPeople_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __XXLoadTestData.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __XXLoadTestData, __XXLoadTestData.DetailsClass).Data), d As __XXLoadTestData.DetailsClass, sf As Object)
c(d, d._LoadPeopleCommand, sf)
End Sub
Private Shared Function _LoadPeople_CreateExecutableObject(d As __XXLoadTestData.DetailsClass) As Global.Microsoft.LightSwitch.IExecutable
Return DirectCast(d, __XXLoadTestData.DetailsClass).Methods.LoadPeople.CreateInvocation()
End Function
Public Shared ReadOnly LoadSeasons As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __XXLoadTestData, __XXLoadTestData.DetailsClass).Entry( _
"LoadSeasons",
AddressOf __XXLoadTestData.DetailsClass.CommandSetProperties._LoadSeasons_Stub,
AddressOf __XXLoadTestData.DetailsClass.CommandSetProperties._LoadSeasons_CreateExecutableObject)
Private Shared Sub _LoadSeasons_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __XXLoadTestData.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __XXLoadTestData, __XXLoadTestData.DetailsClass).Data), d As __XXLoadTestData.DetailsClass, sf As Object)
c(d, d._LoadSeasonsCommand, sf)
End Sub
Private Shared Function _LoadSeasons_CreateExecutableObject(d As __XXLoadTestData.DetailsClass) As Global.Microsoft.LightSwitch.IExecutable
Return DirectCast(d, __XXLoadTestData.DetailsClass).Methods.LoadSeasons.CreateInvocation()
End Function
Public Shared ReadOnly LoadMailCodes As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __XXLoadTestData, __XXLoadTestData.DetailsClass).Entry( _
"LoadMailCodes",
AddressOf __XXLoadTestData.DetailsClass.CommandSetProperties._LoadMailCodes_Stub,
AddressOf __XXLoadTestData.DetailsClass.CommandSetProperties._LoadMailCodes_CreateExecutableObject)
Private Shared Sub _LoadMailCodes_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __XXLoadTestData.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __XXLoadTestData, __XXLoadTestData.DetailsClass).Data), d As __XXLoadTestData.DetailsClass, sf As Object)
c(d, d._LoadMailCodesCommand, sf)
End Sub
Private Shared Function _LoadMailCodes_CreateExecutableObject(d As __XXLoadTestData.DetailsClass) As Global.Microsoft.LightSwitch.IExecutable
Return DirectCast(d, __XXLoadTestData.DetailsClass).Methods.LoadMailCodes.CreateInvocation()
End Function
Public Shared ReadOnly DeleteExistingPeople As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __XXLoadTestData, __XXLoadTestData.DetailsClass).Entry( _
"DeleteExistingPeople",
AddressOf __XXLoadTestData.DetailsClass.CommandSetProperties._DeleteExistingPeople_Stub,
AddressOf __XXLoadTestData.DetailsClass.CommandSetProperties._DeleteExistingPeople_CreateExecutableObject)
Private Shared Sub _DeleteExistingPeople_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __XXLoadTestData.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __XXLoadTestData, __XXLoadTestData.DetailsClass).Data), d As __XXLoadTestData.DetailsClass, sf As Object)
c(d, d._DeleteExistingPeopleCommand, sf)
End Sub
Private Shared Function _DeleteExistingPeople_CreateExecutableObject(d As __XXLoadTestData.DetailsClass) As Global.Microsoft.LightSwitch.IExecutable
Return DirectCast(d, __XXLoadTestData.DetailsClass).Methods.DeleteExistingPeople.CreateInvocation()
End Function
Public Shared ReadOnly LoadMailLists As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __XXLoadTestData, __XXLoadTestData.DetailsClass).Entry( _
"LoadMailLists",
AddressOf __XXLoadTestData.DetailsClass.CommandSetProperties._LoadMailLists_Stub,
AddressOf __XXLoadTestData.DetailsClass.CommandSetProperties._LoadMailLists_CreateExecutableObject)
Private Shared Sub _LoadMailLists_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __XXLoadTestData.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __XXLoadTestData, __XXLoadTestData.DetailsClass).Data), d As __XXLoadTestData.DetailsClass, sf As Object)
c(d, d._LoadMailListsCommand, sf)
End Sub
Private Shared Function _LoadMailLists_CreateExecutableObject(d As __XXLoadTestData.DetailsClass) As Global.Microsoft.LightSwitch.IExecutable
Return DirectCast(d, __XXLoadTestData.DetailsClass).Methods.LoadMailLists.CreateInvocation()
End Function
Public Shared ReadOnly LoadMailListCodes As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __XXLoadTestData, __XXLoadTestData.DetailsClass).Entry( _
"LoadMailListCodes",
AddressOf __XXLoadTestData.DetailsClass.CommandSetProperties._LoadMailListCodes_Stub,
AddressOf __XXLoadTestData.DetailsClass.CommandSetProperties._LoadMailListCodes_CreateExecutableObject)
Private Shared Sub _LoadMailListCodes_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __XXLoadTestData.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __XXLoadTestData, __XXLoadTestData.DetailsClass).Data), d As __XXLoadTestData.DetailsClass, sf As Object)
c(d, d._LoadMailListCodesCommand, sf)
End Sub
Private Shared Function _LoadMailListCodes_CreateExecutableObject(d As __XXLoadTestData.DetailsClass) As Global.Microsoft.LightSwitch.IExecutable
Return DirectCast(d, __XXLoadTestData.DetailsClass).Methods.LoadMailListCodes.CreateInvocation()
End Function
Public Shared ReadOnly LoadSubscriptionTypes As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __XXLoadTestData, __XXLoadTestData.DetailsClass).Entry( _
"LoadSubscriptionTypes",
AddressOf __XXLoadTestData.DetailsClass.CommandSetProperties._LoadSubscriptionTypes_Stub,
AddressOf __XXLoadTestData.DetailsClass.CommandSetProperties._LoadSubscriptionTypes_CreateExecutableObject)
Private Shared Sub _LoadSubscriptionTypes_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __XXLoadTestData.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __XXLoadTestData, __XXLoadTestData.DetailsClass).Data), d As __XXLoadTestData.DetailsClass, sf As Object)
c(d, d._LoadSubscriptionTypesCommand, sf)
End Sub
Private Shared Function _LoadSubscriptionTypes_CreateExecutableObject(d As __XXLoadTestData.DetailsClass) As Global.Microsoft.LightSwitch.IExecutable
Return DirectCast(d, __XXLoadTestData.DetailsClass).Methods.LoadSubscriptionTypes.CreateInvocation()
End Function
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend NotInheritable Class MethodSetProperties
Public Shared ReadOnly LoadPeople As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __XXLoadTestData, __XXLoadTestData.DetailsClass).Entry( _
"LoadPeople",
AddressOf __XXLoadTestData.DetailsClass.MethodSetProperties._LoadPeople_Stub,
AddressOf __XXLoadTestData.DetailsClass.MethodSetProperties._LoadPeople_CanInvoke,
AddressOf __XXLoadTestData.DetailsClass.MethodSetProperties._LoadPeople_InvokeMethod)
Private Shared Sub _LoadPeople_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __XXLoadTestData.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __XXLoadTestData, __XXLoadTestData.DetailsClass).Data), d As __XXLoadTestData.DetailsClass, sf As Object)
c(d, d._LoadPeopleMethod, sf)
End Sub
Private Shared Function _LoadPeople_CanInvoke(d As __XXLoadTestData.DetailsClass, args As Global.System.Collections.ObjectModel.ReadOnlyCollection(Of Object), ex As Global.System.Exception) As Global.System.Exception
Dim result = True
d.Screen.LoadPeople_CanExecute(result)
Return If(result, Nothing, ex)
End Function
Private Shared Sub _LoadPeople_InvokeMethod(d As __XXLoadTestData.DetailsClass, args As Global.System.Collections.ObjectModel.ReadOnlyCollection(Of Object))
d.Screen.LoadPeople_Execute()
End Sub
Public Shared ReadOnly LoadSeasons As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __XXLoadTestData, __XXLoadTestData.DetailsClass).Entry( _
"LoadSeasons",
AddressOf __XXLoadTestData.DetailsClass.MethodSetProperties._LoadSeasons_Stub,
AddressOf __XXLoadTestData.DetailsClass.MethodSetProperties._LoadSeasons_CanInvoke,
AddressOf __XXLoadTestData.DetailsClass.MethodSetProperties._LoadSeasons_InvokeMethod)
Private Shared Sub _LoadSeasons_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __XXLoadTestData.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __XXLoadTestData, __XXLoadTestData.DetailsClass).Data), d As __XXLoadTestData.DetailsClass, sf As Object)
c(d, d._LoadSeasonsMethod, sf)
End Sub
Private Shared Function _LoadSeasons_CanInvoke(d As __XXLoadTestData.DetailsClass, args As Global.System.Collections.ObjectModel.ReadOnlyCollection(Of Object), ex As Global.System.Exception) As Global.System.Exception
Dim result = True
d.Screen.LoadSeasons_CanExecute(result)
Return If(result, Nothing, ex)
End Function
Private Shared Sub _LoadSeasons_InvokeMethod(d As __XXLoadTestData.DetailsClass, args As Global.System.Collections.ObjectModel.ReadOnlyCollection(Of Object))
d.Screen.LoadSeasons_Execute()
End Sub
Public Shared ReadOnly LoadMailCodes As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __XXLoadTestData, __XXLoadTestData.DetailsClass).Entry( _
"LoadMailCodes",
AddressOf __XXLoadTestData.DetailsClass.MethodSetProperties._LoadMailCodes_Stub,
AddressOf __XXLoadTestData.DetailsClass.MethodSetProperties._LoadMailCodes_CanInvoke,
AddressOf __XXLoadTestData.DetailsClass.MethodSetProperties._LoadMailCodes_InvokeMethod)
Private Shared Sub _LoadMailCodes_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __XXLoadTestData.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __XXLoadTestData, __XXLoadTestData.DetailsClass).Data), d As __XXLoadTestData.DetailsClass, sf As Object)
c(d, d._LoadMailCodesMethod, sf)
End Sub
Private Shared Function _LoadMailCodes_CanInvoke(d As __XXLoadTestData.DetailsClass, args As Global.System.Collections.ObjectModel.ReadOnlyCollection(Of Object), ex As Global.System.Exception) As Global.System.Exception
Dim result = True
d.Screen.LoadMailCodes_CanExecute(result)
Return If(result, Nothing, ex)
End Function
Private Shared Sub _LoadMailCodes_InvokeMethod(d As __XXLoadTestData.DetailsClass, args As Global.System.Collections.ObjectModel.ReadOnlyCollection(Of Object))
d.Screen.LoadMailCodes_Execute()
End Sub
Public Shared ReadOnly DeleteExistingPeople As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __XXLoadTestData, __XXLoadTestData.DetailsClass).Entry( _
"DeleteExistingPeople",
AddressOf __XXLoadTestData.DetailsClass.MethodSetProperties._DeleteExistingPeople_Stub,
AddressOf __XXLoadTestData.DetailsClass.MethodSetProperties._DeleteExistingPeople_CanInvoke,
AddressOf __XXLoadTestData.DetailsClass.MethodSetProperties._DeleteExistingPeople_InvokeMethod)
Private Shared Sub _DeleteExistingPeople_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __XXLoadTestData.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __XXLoadTestData, __XXLoadTestData.DetailsClass).Data), d As __XXLoadTestData.DetailsClass, sf As Object)
c(d, d._DeleteExistingPeopleMethod, sf)
End Sub
Private Shared Function _DeleteExistingPeople_CanInvoke(d As __XXLoadTestData.DetailsClass, args As Global.System.Collections.ObjectModel.ReadOnlyCollection(Of Object), ex As Global.System.Exception) As Global.System.Exception
Dim result = True
d.Screen.DeleteExistingPeople_CanExecute(result)
Return If(result, Nothing, ex)
End Function
Private Shared Sub _DeleteExistingPeople_InvokeMethod(d As __XXLoadTestData.DetailsClass, args As Global.System.Collections.ObjectModel.ReadOnlyCollection(Of Object))
d.Screen.DeleteExistingPeople_Execute()
End Sub
Public Shared ReadOnly LoadMailLists As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __XXLoadTestData, __XXLoadTestData.DetailsClass).Entry( _
"LoadMailLists",
AddressOf __XXLoadTestData.DetailsClass.MethodSetProperties._LoadMailLists_Stub,
AddressOf __XXLoadTestData.DetailsClass.MethodSetProperties._LoadMailLists_CanInvoke,
AddressOf __XXLoadTestData.DetailsClass.MethodSetProperties._LoadMailLists_InvokeMethod)
Private Shared Sub _LoadMailLists_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __XXLoadTestData.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __XXLoadTestData, __XXLoadTestData.DetailsClass).Data), d As __XXLoadTestData.DetailsClass, sf As Object)
c(d, d._LoadMailListsMethod, sf)
End Sub
Private Shared Function _LoadMailLists_CanInvoke(d As __XXLoadTestData.DetailsClass, args As Global.System.Collections.ObjectModel.ReadOnlyCollection(Of Object), ex As Global.System.Exception) As Global.System.Exception
Dim result = True
d.Screen.LoadMailLists_CanExecute(result)
Return If(result, Nothing, ex)
End Function
Private Shared Sub _LoadMailLists_InvokeMethod(d As __XXLoadTestData.DetailsClass, args As Global.System.Collections.ObjectModel.ReadOnlyCollection(Of Object))
d.Screen.LoadMailLists_Execute()
End Sub
Public Shared ReadOnly LoadMailListCodes As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __XXLoadTestData, __XXLoadTestData.DetailsClass).Entry( _
"LoadMailListCodes",
AddressOf __XXLoadTestData.DetailsClass.MethodSetProperties._LoadMailListCodes_Stub,
AddressOf __XXLoadTestData.DetailsClass.MethodSetProperties._LoadMailListCodes_CanInvoke,
AddressOf __XXLoadTestData.DetailsClass.MethodSetProperties._LoadMailListCodes_InvokeMethod)
Private Shared Sub _LoadMailListCodes_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __XXLoadTestData.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __XXLoadTestData, __XXLoadTestData.DetailsClass).Data), d As __XXLoadTestData.DetailsClass, sf As Object)
c(d, d._LoadMailListCodesMethod, sf)
End Sub
Private Shared Function _LoadMailListCodes_CanInvoke(d As __XXLoadTestData.DetailsClass, args As Global.System.Collections.ObjectModel.ReadOnlyCollection(Of Object), ex As Global.System.Exception) As Global.System.Exception
Dim result = True
d.Screen.LoadMailListCodes_CanExecute(result)
Return If(result, Nothing, ex)
End Function
Private Shared Sub _LoadMailListCodes_InvokeMethod(d As __XXLoadTestData.DetailsClass, args As Global.System.Collections.ObjectModel.ReadOnlyCollection(Of Object))
d.Screen.LoadMailListCodes_Execute()
End Sub
Public Shared ReadOnly LoadSubscriptionTypes As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __XXLoadTestData, __XXLoadTestData.DetailsClass).Entry( _
"LoadSubscriptionTypes",
AddressOf __XXLoadTestData.DetailsClass.MethodSetProperties._LoadSubscriptionTypes_Stub,
AddressOf __XXLoadTestData.DetailsClass.MethodSetProperties._LoadSubscriptionTypes_CanInvoke,
AddressOf __XXLoadTestData.DetailsClass.MethodSetProperties._LoadSubscriptionTypes_InvokeMethod)
Private Shared Sub _LoadSubscriptionTypes_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __XXLoadTestData.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __XXLoadTestData, __XXLoadTestData.DetailsClass).Data), d As __XXLoadTestData.DetailsClass, sf As Object)
c(d, d._LoadSubscriptionTypesMethod, sf)
End Sub
Private Shared Function _LoadSubscriptionTypes_CanInvoke(d As __XXLoadTestData.DetailsClass, args As Global.System.Collections.ObjectModel.ReadOnlyCollection(Of Object), ex As Global.System.Exception) As Global.System.Exception
Dim result = True
d.Screen.LoadSubscriptionTypes_CanExecute(result)
Return If(result, Nothing, ex)
End Function
Private Shared Sub _LoadSubscriptionTypes_InvokeMethod(d As __XXLoadTestData.DetailsClass, args As Global.System.Collections.ObjectModel.ReadOnlyCollection(Of Object))
d.Screen.LoadSubscriptionTypes_Execute()
End Sub
End Class
End Class
End Class
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
Partial Public NotInheritable Class GetImportPeopleList
Inherits Global.Microsoft.LightSwitch.Framework.Client.ScreenObject(Of __GetImportPeopleList, __GetImportPeopleList.DetailsClass)
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private Sub New()
MyBase.New("LightSwitchApplication:GetImportPeopleList")
__GetImportPeopleList.DetailsClass.Initialize(Me)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
Public Shared Function CreateInstance() As GetImportPeopleList
Return New __GetImportPeopleList( _
)
End Function
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub GetImportPeopleList_InitializeDataWorkspace(ByVal saveChangesTo As Global.System.Collections.Generic.List(Of Global.Microsoft.LightSwitch.IDataService))
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub GetImportPeopleList_Created()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub GetImportPeopleList_Activated()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub GetImportPeopleList_Saving(ByRef handled As Boolean)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub GetImportPeopleList_Saved()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub GetImportPeopleList_Closing(ByRef cancel As Boolean)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub GetImportPeopleList_SaveError(ByVal exception As Global.System.Exception, ByRef handled As Boolean)
End Sub
#Region "Private Properties"
''' <summary>
''' Gets the Application object for this application. The Application object provides access to active screens, methods to open screens and access to the current user.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private ReadOnly Property Application As Global.LightSwitchApplication.Application
Get
Return Global.LightSwitchApplication.Application.Current
End Get
End Property
''' <summary>
''' Gets the containing data workspace. The data workspace provides access to all data sources in the application.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private ReadOnly Property DataWorkspace As Global.LightSwitchApplication.DataWorkspace
Get
Return DirectCast(DirectCast(Me.Details, Global.Microsoft.LightSwitch.Details.Client.IScreenDetails).DataWorkspace, Global.LightSwitchApplication.DataWorkspace)
End Get
End Property
#End Region
Partial Private Sub ImportPersons_SelectionChanged()
End Sub
Partial Private Sub ImportPersons_Changed(ByVal e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ImportPersons_Loaded(ByVal succeeded As Boolean)
End Sub
Partial Private Sub Count_ImportPeople_Changed()
End Sub
Partial Private Sub Count_PrimaryPeople_Changed()
End Sub
Partial Private Sub People_SelectionChanged()
End Sub
Partial Private Sub People_Changed(ByVal e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub People_Loaded(ByVal succeeded As Boolean)
End Sub
Partial Private Sub Count_MatchProcessed_Changed()
End Sub
''' <summary>
''' Gets the ImportPersons visual collection. The collection contains all records currently shown on the respective list or grid control.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property ImportPersons As Global.Microsoft.LightSwitch.Framework.Client.VisualCollection(Of Global.LightSwitchApplication.ImportPerson)
Get
Return __GetImportPeopleList.DetailsClass.GetValue(Me, __GetImportPeopleList.DetailsClass.PropertySetProperties.ImportPersons)
End Get
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ImportPersons_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Property Count_ImportPeople As Global.System.Nullable(Of Integer)
Get
Return __GetImportPeopleList.DetailsClass.GetValue(Me, __GetImportPeopleList.DetailsClass.PropertySetProperties.Count_ImportPeople)
End Get
Set(ByVal value As Global.System.Nullable(Of Integer))
__GetImportPeopleList.DetailsClass.SetValue(Me, __GetImportPeopleList.DetailsClass.PropertySetProperties.Count_ImportPeople, value)
End Set
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Count_ImportPeople_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Property Count_PrimaryPeople As Global.System.Nullable(Of Integer)
Get
Return __GetImportPeopleList.DetailsClass.GetValue(Me, __GetImportPeopleList.DetailsClass.PropertySetProperties.Count_PrimaryPeople)
End Get
Set(ByVal value As Global.System.Nullable(Of Integer))
__GetImportPeopleList.DetailsClass.SetValue(Me, __GetImportPeopleList.DetailsClass.PropertySetProperties.Count_PrimaryPeople, value)
End Set
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Count_PrimaryPeople_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
''' <summary>
''' Gets the People visual collection. The collection contains all records currently shown on the respective list or grid control.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property People As Global.Microsoft.LightSwitch.Framework.Client.VisualCollection(Of Global.LightSwitchApplication.Person)
Get
Return __GetImportPeopleList.DetailsClass.GetValue(Me, __GetImportPeopleList.DetailsClass.PropertySetProperties.People)
End Get
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub People_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Property Count_MatchProcessed As Global.System.Nullable(Of Integer)
Get
Return __GetImportPeopleList.DetailsClass.GetValue(Me, __GetImportPeopleList.DetailsClass.PropertySetProperties.Count_MatchProcessed)
End Get
Set(ByVal value As Global.System.Nullable(Of Integer))
__GetImportPeopleList.DetailsClass.SetValue(Me, __GetImportPeopleList.DetailsClass.PropertySetProperties.Count_MatchProcessed, value)
End Set
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Count_MatchProcessed_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
''' <summary>
''' Calls the GetImportPeople screen method.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Sub GetImportPeople()
Me.Details.Methods.GetImportPeople.CreateInvocation().Execute()
End Sub
Partial Private Sub GetImportPeople_CanExecute(ByRef result As Boolean)
End Sub
Partial Private Sub GetImportPeople_Execute()
End Sub
''' <summary>
''' Calls the CalculateMatchScores screen method.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Sub CalculateMatchScores()
Me.Details.Methods.CalculateMatchScores.CreateInvocation().Execute()
End Sub
Partial Private Sub CalculateMatchScores_CanExecute(ByRef result As Boolean)
End Sub
Partial Private Sub CalculateMatchScores_Execute()
End Sub
''' <summary>
''' Calls the ReviewMatches screen method.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Sub ReviewMatches()
Me.Details.Methods.ReviewMatches.CreateInvocation().Execute()
End Sub
Partial Private Sub ReviewMatches_CanExecute(ByRef result As Boolean)
End Sub
Partial Private Sub ReviewMatches_Execute()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class DetailsClass
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenDetails(Of __GetImportPeopleList, __GetImportPeopleList.DetailsClass, __GetImportPeopleList.DetailsClass.PropertySet, __GetImportPeopleList.DetailsClass.CommandSet, __GetImportPeopleList.DetailsClass.MethodSet)
Shared Sub New()
Dim initializePropertyEntry = __GetImportPeopleList.DetailsClass.PropertySetProperties.ImportPersons
Dim initializeCommandEntry = __GetImportPeopleList.DetailsClass.CommandSetProperties.GetImportPeople
Dim initializeMethodEntry = __GetImportPeopleList.DetailsClass.MethodSetProperties.GetImportPeople
End Sub
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Private Shared ReadOnly __GetImportPeopleListEntry As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenDetails(Of __GetImportPeopleList, __GetImportPeopleList.DetailsClass).Entry = _
New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenDetails(Of __GetImportPeopleList, __GetImportPeopleList.DetailsClass).Entry( _
AddressOf __GetImportPeopleList.DetailsClass.__GetImportPeopleList_InvokeInitializeDataWorkspace,
AddressOf __GetImportPeopleList.DetailsClass.__GetImportPeopleList_InvokeSavingEvent,
AddressOf __GetImportPeopleList.DetailsClass.__GetImportPeopleList_InvokeSavedEvent,
AddressOf __GetImportPeopleList.DetailsClass.__GetImportPeopleList_InvokeClosingEvent,
AddressOf __GetImportPeopleList.DetailsClass.__GetImportPeopleList_InvokeCreated,
AddressOf __GetImportPeopleList.DetailsClass.__GetImportPeopleList_InvokeActivated,
AddressOf __GetImportPeopleList.DetailsClass.__GetImportPeopleList_InvokeSaveErrorEvent)
Private Shared Sub __GetImportPeopleList_InvokeInitializeDataWorkspace(s As __GetImportPeopleList, saveChangesTo As Global.System.Collections.Generic.List(Of Global.Microsoft.LightSwitch.IDataService))
s.GetImportPeopleList_InitializeDataWorkspace(saveChangesTo)
End Sub
Private Shared Function __GetImportPeopleList_InvokeSavingEvent(s As __GetImportPeopleList) As Boolean
Dim handled = False
s.GetImportPeopleList_Saving(handled)
Return handled
End Function
Private Shared Sub __GetImportPeopleList_InvokeSavedEvent(s As __GetImportPeopleList)
s.GetImportPeopleList_Saved()
End Sub
Private Shared Function __GetImportPeopleList_InvokeClosingEvent(s As __GetImportPeopleList) As Boolean
Dim cancel = False
s.GetImportPeopleList_Closing(cancel)
Return cancel
End Function
Private Shared Sub __GetImportPeopleList_InvokeCreated(s As __GetImportPeopleList)
s.GetImportPeopleList_Created()
End Sub
Private Shared Sub __GetImportPeopleList_InvokeActivated(s As __GetImportPeopleList)
s.GetImportPeopleList_Activated()
End Sub
Private Shared Function __GetImportPeopleList_InvokeSaveErrorEvent(s As __GetImportPeopleList, ex As Global.System.Exception) As Boolean
Dim handled = False
s.GetImportPeopleList_SaveError(ex, handled)
Return handled
End Function
Public Sub New()
MyBase.New()
End Sub
Public Shadows ReadOnly Property Properties As __GetImportPeopleList.DetailsClass.PropertySet
Get
Return MyBase.Properties
End Get
End Property
Public Shadows ReadOnly Property Commands As __GetImportPeopleList.DetailsClass.CommandSet
Get
Return MyBase.Commands
End Get
End Property
Public Shadows ReadOnly Property Methods As __GetImportPeopleList.DetailsClass.MethodSet
Get
Return MyBase.Methods
End Get
End Property
Private Function ImportPersonsQuery() As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return Global.Microsoft.LightSwitch.DataServiceQueryable.Include(
Global.Microsoft.LightSwitch.DataServiceQueryable.Include(
Global.Microsoft.LightSwitch.DataServiceQueryable.Include(
Me.Screen.DataWorkspace.ApplicationData.ImportPersons,
"MailCode"),
"Season"),
"SubscriptionType")
End Function
Private Function PeopleQuery() As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return Me.Screen.DataWorkspace.ApplicationData.People
End Function
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _ImportPersons As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __GetImportPeopleList, __GetImportPeopleList.DetailsClass, Global.LightSwitchApplication.ImportPerson).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _Count_ImportPeople As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __GetImportPeopleList, __GetImportPeopleList.DetailsClass, Global.System.Nullable(Of Integer)).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _Count_PrimaryPeople As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __GetImportPeopleList, __GetImportPeopleList.DetailsClass, Global.System.Nullable(Of Integer)).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _People As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __GetImportPeopleList, __GetImportPeopleList.DetailsClass, Global.LightSwitchApplication.Person).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _Count_MatchProcessed As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __GetImportPeopleList, __GetImportPeopleList.DetailsClass, Global.System.Nullable(Of Integer)).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _GetImportPeopleCommand As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __GetImportPeopleList, __GetImportPeopleList.DetailsClass).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _CalculateMatchScoresCommand As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __GetImportPeopleList, __GetImportPeopleList.DetailsClass).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _ReviewMatchesCommand As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __GetImportPeopleList, __GetImportPeopleList.DetailsClass).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _GetImportPeopleMethod As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __GetImportPeopleList, __GetImportPeopleList.DetailsClass).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _CalculateMatchScoresMethod As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __GetImportPeopleList, __GetImportPeopleList.DetailsClass).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _ReviewMatchesMethod As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __GetImportPeopleList, __GetImportPeopleList.DetailsClass).Data
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class PropertySet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenPropertySet(Of __GetImportPeopleList, __GetImportPeopleList.DetailsClass)
Public ReadOnly Property ImportPersons As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __GetImportPeopleList, __GetImportPeopleList.DetailsClass, Global.LightSwitchApplication.ImportPerson)
Get
Return DirectCast(MyBase.GetItem(__GetImportPeopleList.DetailsClass.PropertySetProperties.ImportPersons), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __GetImportPeopleList, __GetImportPeopleList.DetailsClass, Global.LightSwitchApplication.ImportPerson))
End Get
End Property
Public ReadOnly Property Count_ImportPeople As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __GetImportPeopleList, __GetImportPeopleList.DetailsClass, Global.System.Nullable(Of Integer))
Get
Return DirectCast(MyBase.GetItem(__GetImportPeopleList.DetailsClass.PropertySetProperties.Count_ImportPeople), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __GetImportPeopleList, __GetImportPeopleList.DetailsClass, Global.System.Nullable(Of Integer)))
End Get
End Property
Public ReadOnly Property Count_PrimaryPeople As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __GetImportPeopleList, __GetImportPeopleList.DetailsClass, Global.System.Nullable(Of Integer))
Get
Return DirectCast(MyBase.GetItem(__GetImportPeopleList.DetailsClass.PropertySetProperties.Count_PrimaryPeople), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __GetImportPeopleList, __GetImportPeopleList.DetailsClass, Global.System.Nullable(Of Integer)))
End Get
End Property
Public ReadOnly Property People As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __GetImportPeopleList, __GetImportPeopleList.DetailsClass, Global.LightSwitchApplication.Person)
Get
Return DirectCast(MyBase.GetItem(__GetImportPeopleList.DetailsClass.PropertySetProperties.People), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __GetImportPeopleList, __GetImportPeopleList.DetailsClass, Global.LightSwitchApplication.Person))
End Get
End Property
Public ReadOnly Property Count_MatchProcessed As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __GetImportPeopleList, __GetImportPeopleList.DetailsClass, Global.System.Nullable(Of Integer))
Get
Return DirectCast(MyBase.GetItem(__GetImportPeopleList.DetailsClass.PropertySetProperties.Count_MatchProcessed), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __GetImportPeopleList, __GetImportPeopleList.DetailsClass, Global.System.Nullable(Of Integer)))
End Get
End Property
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class CommandSet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommandSet(Of __GetImportPeopleList, __GetImportPeopleList.DetailsClass)
Public ReadOnly Property GetImportPeople As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __GetImportPeopleList, __GetImportPeopleList.DetailsClass)
Get
Return DirectCast(MyBase.GetItem(__GetImportPeopleList.DetailsClass.CommandSetProperties.GetImportPeople), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __GetImportPeopleList, __GetImportPeopleList.DetailsClass))
End Get
End Property
Public ReadOnly Property CalculateMatchScores As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __GetImportPeopleList, __GetImportPeopleList.DetailsClass)
Get
Return DirectCast(MyBase.GetItem(__GetImportPeopleList.DetailsClass.CommandSetProperties.CalculateMatchScores), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __GetImportPeopleList, __GetImportPeopleList.DetailsClass))
End Get
End Property
Public ReadOnly Property ReviewMatches As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __GetImportPeopleList, __GetImportPeopleList.DetailsClass)
Get
Return DirectCast(MyBase.GetItem(__GetImportPeopleList.DetailsClass.CommandSetProperties.ReviewMatches), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __GetImportPeopleList, __GetImportPeopleList.DetailsClass))
End Get
End Property
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class MethodSet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethodSet(Of __GetImportPeopleList, __GetImportPeopleList.DetailsClass)
Public ReadOnly Property GetImportPeople As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __GetImportPeopleList, __GetImportPeopleList.DetailsClass)
Get
Return DirectCast(MyBase.GetItem(__GetImportPeopleList.DetailsClass.MethodSetProperties.GetImportPeople), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __GetImportPeopleList, __GetImportPeopleList.DetailsClass))
End Get
End Property
Public ReadOnly Property CalculateMatchScores As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __GetImportPeopleList, __GetImportPeopleList.DetailsClass)
Get
Return DirectCast(MyBase.GetItem(__GetImportPeopleList.DetailsClass.MethodSetProperties.CalculateMatchScores), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __GetImportPeopleList, __GetImportPeopleList.DetailsClass))
End Get
End Property
Public ReadOnly Property ReviewMatches As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __GetImportPeopleList, __GetImportPeopleList.DetailsClass)
Get
Return DirectCast(MyBase.GetItem(__GetImportPeopleList.DetailsClass.MethodSetProperties.ReviewMatches), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __GetImportPeopleList, __GetImportPeopleList.DetailsClass))
End Get
End Property
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend NotInheritable Class PropertySetProperties
Public Shared ReadOnly ImportPersons As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __GetImportPeopleList, __GetImportPeopleList.DetailsClass, Global.LightSwitchApplication.ImportPerson).Entry( _
"ImportPersons",
AddressOf __GetImportPeopleList.DetailsClass.PropertySetProperties._ImportPersons_Stub,
AddressOf __GetImportPeopleList.DetailsClass.PropertySetProperties._ImportPersons_Validate,
AddressOf __GetImportPeopleList.DetailsClass.PropertySetProperties._ImportPersons_CreateQuery,
AddressOf __GetImportPeopleList.DetailsClass.PropertySetProperties._ImportPersons_SelectionChanged,
AddressOf __GetImportPeopleList.DetailsClass.PropertySetProperties._ImportPersons_OnCollectionChanged,
AddressOf __GetImportPeopleList.DetailsClass.PropertySetProperties._ImportPersons_OnLoaded)
Private Shared Sub _ImportPersons_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __GetImportPeopleList.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __GetImportPeopleList, __GetImportPeopleList.DetailsClass, Global.LightSwitchApplication.ImportPerson).Data), d As __GetImportPeopleList.DetailsClass, sf As Object)
c(d, d._ImportPersons, sf)
End Sub
Private Shared Sub _ImportPersons_Validate(s As __GetImportPeopleList, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.ImportPersons_Validate(r)
End Sub
Private Shared Function _ImportPersons_CreateQuery(d As __GetImportPeopleList.DetailsClass, args As Object()) As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return d.ImportPersonsQuery()
End Function
Private Shared Sub _ImportPersons_SelectionChanged(s As __GetImportPeopleList)
s.ImportPersons_SelectionChanged()
End Sub
Private Shared Sub _ImportPersons_OnCollectionChanged(s As __GetImportPeopleList, e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
s.ImportPersons_Changed(e)
End Sub
Private Shared Sub _ImportPersons_OnLoaded(s As __GetImportPeopleList, succeeded As Boolean)
s.ImportPersons_Loaded(succeeded)
End Sub
Public Shared ReadOnly Count_ImportPeople As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __GetImportPeopleList, __GetImportPeopleList.DetailsClass, Global.System.Nullable(Of Integer)).Entry( _
"Count_ImportPeople",
False,
AddressOf __GetImportPeopleList.DetailsClass.PropertySetProperties._Count_ImportPeople_Stub,
AddressOf __GetImportPeopleList.DetailsClass.PropertySetProperties._Count_ImportPeople_Validate,
AddressOf __GetImportPeopleList.DetailsClass.PropertySetProperties._Count_ImportPeople_OnValueChanged)
Private Shared Sub _Count_ImportPeople_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __GetImportPeopleList.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __GetImportPeopleList, __GetImportPeopleList.DetailsClass, Global.System.Nullable(Of Integer)).Data), d As __GetImportPeopleList.DetailsClass, sf As Object)
c(d, d._Count_ImportPeople, sf)
End Sub
Private Shared Sub _Count_ImportPeople_Validate(s As __GetImportPeopleList, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.Count_ImportPeople_Validate(r)
End Sub
Private Shared Sub _Count_ImportPeople_OnValueChanged(s As __GetImportPeopleList)
s.Count_ImportPeople_Changed()
End Sub
Public Shared ReadOnly Count_PrimaryPeople As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __GetImportPeopleList, __GetImportPeopleList.DetailsClass, Global.System.Nullable(Of Integer)).Entry( _
"Count_PrimaryPeople",
False,
AddressOf __GetImportPeopleList.DetailsClass.PropertySetProperties._Count_PrimaryPeople_Stub,
AddressOf __GetImportPeopleList.DetailsClass.PropertySetProperties._Count_PrimaryPeople_Validate,
AddressOf __GetImportPeopleList.DetailsClass.PropertySetProperties._Count_PrimaryPeople_OnValueChanged)
Private Shared Sub _Count_PrimaryPeople_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __GetImportPeopleList.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __GetImportPeopleList, __GetImportPeopleList.DetailsClass, Global.System.Nullable(Of Integer)).Data), d As __GetImportPeopleList.DetailsClass, sf As Object)
c(d, d._Count_PrimaryPeople, sf)
End Sub
Private Shared Sub _Count_PrimaryPeople_Validate(s As __GetImportPeopleList, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.Count_PrimaryPeople_Validate(r)
End Sub
Private Shared Sub _Count_PrimaryPeople_OnValueChanged(s As __GetImportPeopleList)
s.Count_PrimaryPeople_Changed()
End Sub
Public Shared ReadOnly People As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __GetImportPeopleList, __GetImportPeopleList.DetailsClass, Global.LightSwitchApplication.Person).Entry( _
"People",
AddressOf __GetImportPeopleList.DetailsClass.PropertySetProperties._People_Stub,
AddressOf __GetImportPeopleList.DetailsClass.PropertySetProperties._People_Validate,
AddressOf __GetImportPeopleList.DetailsClass.PropertySetProperties._People_CreateQuery,
AddressOf __GetImportPeopleList.DetailsClass.PropertySetProperties._People_SelectionChanged,
AddressOf __GetImportPeopleList.DetailsClass.PropertySetProperties._People_OnCollectionChanged,
AddressOf __GetImportPeopleList.DetailsClass.PropertySetProperties._People_OnLoaded)
Private Shared Sub _People_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __GetImportPeopleList.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __GetImportPeopleList, __GetImportPeopleList.DetailsClass, Global.LightSwitchApplication.Person).Data), d As __GetImportPeopleList.DetailsClass, sf As Object)
c(d, d._People, sf)
End Sub
Private Shared Sub _People_Validate(s As __GetImportPeopleList, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.People_Validate(r)
End Sub
Private Shared Function _People_CreateQuery(d As __GetImportPeopleList.DetailsClass, args As Object()) As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return d.PeopleQuery()
End Function
Private Shared Sub _People_SelectionChanged(s As __GetImportPeopleList)
s.People_SelectionChanged()
End Sub
Private Shared Sub _People_OnCollectionChanged(s As __GetImportPeopleList, e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
s.People_Changed(e)
End Sub
Private Shared Sub _People_OnLoaded(s As __GetImportPeopleList, succeeded As Boolean)
s.People_Loaded(succeeded)
End Sub
Public Shared ReadOnly Count_MatchProcessed As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __GetImportPeopleList, __GetImportPeopleList.DetailsClass, Global.System.Nullable(Of Integer)).Entry( _
"Count_MatchProcessed",
False,
AddressOf __GetImportPeopleList.DetailsClass.PropertySetProperties._Count_MatchProcessed_Stub,
AddressOf __GetImportPeopleList.DetailsClass.PropertySetProperties._Count_MatchProcessed_Validate,
AddressOf __GetImportPeopleList.DetailsClass.PropertySetProperties._Count_MatchProcessed_OnValueChanged)
Private Shared Sub _Count_MatchProcessed_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __GetImportPeopleList.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __GetImportPeopleList, __GetImportPeopleList.DetailsClass, Global.System.Nullable(Of Integer)).Data), d As __GetImportPeopleList.DetailsClass, sf As Object)
c(d, d._Count_MatchProcessed, sf)
End Sub
Private Shared Sub _Count_MatchProcessed_Validate(s As __GetImportPeopleList, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.Count_MatchProcessed_Validate(r)
End Sub
Private Shared Sub _Count_MatchProcessed_OnValueChanged(s As __GetImportPeopleList)
s.Count_MatchProcessed_Changed()
End Sub
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend NotInheritable Class CommandSetProperties
Public Shared ReadOnly GetImportPeople As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __GetImportPeopleList, __GetImportPeopleList.DetailsClass).Entry( _
"GetImportPeople",
AddressOf __GetImportPeopleList.DetailsClass.CommandSetProperties._GetImportPeople_Stub,
AddressOf __GetImportPeopleList.DetailsClass.CommandSetProperties._GetImportPeople_CreateExecutableObject)
Private Shared Sub _GetImportPeople_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __GetImportPeopleList.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __GetImportPeopleList, __GetImportPeopleList.DetailsClass).Data), d As __GetImportPeopleList.DetailsClass, sf As Object)
c(d, d._GetImportPeopleCommand, sf)
End Sub
Private Shared Function _GetImportPeople_CreateExecutableObject(d As __GetImportPeopleList.DetailsClass) As Global.Microsoft.LightSwitch.IExecutable
Return DirectCast(d, __GetImportPeopleList.DetailsClass).Methods.GetImportPeople.CreateInvocation()
End Function
Public Shared ReadOnly CalculateMatchScores As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __GetImportPeopleList, __GetImportPeopleList.DetailsClass).Entry( _
"CalculateMatchScores",
AddressOf __GetImportPeopleList.DetailsClass.CommandSetProperties._CalculateMatchScores_Stub,
AddressOf __GetImportPeopleList.DetailsClass.CommandSetProperties._CalculateMatchScores_CreateExecutableObject)
Private Shared Sub _CalculateMatchScores_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __GetImportPeopleList.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __GetImportPeopleList, __GetImportPeopleList.DetailsClass).Data), d As __GetImportPeopleList.DetailsClass, sf As Object)
c(d, d._CalculateMatchScoresCommand, sf)
End Sub
Private Shared Function _CalculateMatchScores_CreateExecutableObject(d As __GetImportPeopleList.DetailsClass) As Global.Microsoft.LightSwitch.IExecutable
Return DirectCast(d, __GetImportPeopleList.DetailsClass).Methods.CalculateMatchScores.CreateInvocation()
End Function
Public Shared ReadOnly ReviewMatches As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __GetImportPeopleList, __GetImportPeopleList.DetailsClass).Entry( _
"ReviewMatches",
AddressOf __GetImportPeopleList.DetailsClass.CommandSetProperties._ReviewMatches_Stub,
AddressOf __GetImportPeopleList.DetailsClass.CommandSetProperties._ReviewMatches_CreateExecutableObject)
Private Shared Sub _ReviewMatches_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __GetImportPeopleList.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __GetImportPeopleList, __GetImportPeopleList.DetailsClass).Data), d As __GetImportPeopleList.DetailsClass, sf As Object)
c(d, d._ReviewMatchesCommand, sf)
End Sub
Private Shared Function _ReviewMatches_CreateExecutableObject(d As __GetImportPeopleList.DetailsClass) As Global.Microsoft.LightSwitch.IExecutable
Return DirectCast(d, __GetImportPeopleList.DetailsClass).Methods.ReviewMatches.CreateInvocation()
End Function
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend NotInheritable Class MethodSetProperties
Public Shared ReadOnly GetImportPeople As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __GetImportPeopleList, __GetImportPeopleList.DetailsClass).Entry( _
"GetImportPeople",
AddressOf __GetImportPeopleList.DetailsClass.MethodSetProperties._GetImportPeople_Stub,
AddressOf __GetImportPeopleList.DetailsClass.MethodSetProperties._GetImportPeople_CanInvoke,
AddressOf __GetImportPeopleList.DetailsClass.MethodSetProperties._GetImportPeople_InvokeMethod)
Private Shared Sub _GetImportPeople_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __GetImportPeopleList.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __GetImportPeopleList, __GetImportPeopleList.DetailsClass).Data), d As __GetImportPeopleList.DetailsClass, sf As Object)
c(d, d._GetImportPeopleMethod, sf)
End Sub
Private Shared Function _GetImportPeople_CanInvoke(d As __GetImportPeopleList.DetailsClass, args As Global.System.Collections.ObjectModel.ReadOnlyCollection(Of Object), ex As Global.System.Exception) As Global.System.Exception
Dim result = True
d.Screen.GetImportPeople_CanExecute(result)
Return If(result, Nothing, ex)
End Function
Private Shared Sub _GetImportPeople_InvokeMethod(d As __GetImportPeopleList.DetailsClass, args As Global.System.Collections.ObjectModel.ReadOnlyCollection(Of Object))
d.Screen.GetImportPeople_Execute()
End Sub
Public Shared ReadOnly CalculateMatchScores As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __GetImportPeopleList, __GetImportPeopleList.DetailsClass).Entry( _
"CalculateMatchScores",
AddressOf __GetImportPeopleList.DetailsClass.MethodSetProperties._CalculateMatchScores_Stub,
AddressOf __GetImportPeopleList.DetailsClass.MethodSetProperties._CalculateMatchScores_CanInvoke,
AddressOf __GetImportPeopleList.DetailsClass.MethodSetProperties._CalculateMatchScores_InvokeMethod)
Private Shared Sub _CalculateMatchScores_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __GetImportPeopleList.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __GetImportPeopleList, __GetImportPeopleList.DetailsClass).Data), d As __GetImportPeopleList.DetailsClass, sf As Object)
c(d, d._CalculateMatchScoresMethod, sf)
End Sub
Private Shared Function _CalculateMatchScores_CanInvoke(d As __GetImportPeopleList.DetailsClass, args As Global.System.Collections.ObjectModel.ReadOnlyCollection(Of Object), ex As Global.System.Exception) As Global.System.Exception
Dim result = True
d.Screen.CalculateMatchScores_CanExecute(result)
Return If(result, Nothing, ex)
End Function
Private Shared Sub _CalculateMatchScores_InvokeMethod(d As __GetImportPeopleList.DetailsClass, args As Global.System.Collections.ObjectModel.ReadOnlyCollection(Of Object))
d.Screen.CalculateMatchScores_Execute()
End Sub
Public Shared ReadOnly ReviewMatches As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __GetImportPeopleList, __GetImportPeopleList.DetailsClass).Entry( _
"ReviewMatches",
AddressOf __GetImportPeopleList.DetailsClass.MethodSetProperties._ReviewMatches_Stub,
AddressOf __GetImportPeopleList.DetailsClass.MethodSetProperties._ReviewMatches_CanInvoke,
AddressOf __GetImportPeopleList.DetailsClass.MethodSetProperties._ReviewMatches_InvokeMethod)
Private Shared Sub _ReviewMatches_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __GetImportPeopleList.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __GetImportPeopleList, __GetImportPeopleList.DetailsClass).Data), d As __GetImportPeopleList.DetailsClass, sf As Object)
c(d, d._ReviewMatchesMethod, sf)
End Sub
Private Shared Function _ReviewMatches_CanInvoke(d As __GetImportPeopleList.DetailsClass, args As Global.System.Collections.ObjectModel.ReadOnlyCollection(Of Object), ex As Global.System.Exception) As Global.System.Exception
Dim result = True
d.Screen.ReviewMatches_CanExecute(result)
Return If(result, Nothing, ex)
End Function
Private Shared Sub _ReviewMatches_InvokeMethod(d As __GetImportPeopleList.DetailsClass, args As Global.System.Collections.ObjectModel.ReadOnlyCollection(Of Object))
d.Screen.ReviewMatches_Execute()
End Sub
End Class
End Class
End Class
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
Partial Public NotInheritable Class ReviewImportedMatches
Inherits Global.Microsoft.LightSwitch.Framework.Client.ScreenObject(Of __ReviewImportedMatches, __ReviewImportedMatches.DetailsClass)
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private Sub New()
MyBase.New("LightSwitchApplication:ReviewImportedMatches")
__ReviewImportedMatches.DetailsClass.Initialize(Me)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
Public Shared Function CreateInstance() As ReviewImportedMatches
Return New __ReviewImportedMatches( _
)
End Function
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ReviewImportedMatches_InitializeDataWorkspace(ByVal saveChangesTo As Global.System.Collections.Generic.List(Of Global.Microsoft.LightSwitch.IDataService))
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ReviewImportedMatches_Created()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ReviewImportedMatches_Activated()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ReviewImportedMatches_Saving(ByRef handled As Boolean)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ReviewImportedMatches_Saved()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ReviewImportedMatches_Closing(ByRef cancel As Boolean)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ReviewImportedMatches_SaveError(ByVal exception As Global.System.Exception, ByRef handled As Boolean)
End Sub
#Region "Private Properties"
''' <summary>
''' Gets the Application object for this application. The Application object provides access to active screens, methods to open screens and access to the current user.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private ReadOnly Property Application As Global.LightSwitchApplication.Application
Get
Return Global.LightSwitchApplication.Application.Current
End Get
End Property
''' <summary>
''' Gets the containing data workspace. The data workspace provides access to all data sources in the application.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private ReadOnly Property DataWorkspace As Global.LightSwitchApplication.DataWorkspace
Get
Return DirectCast(DirectCast(Me.Details, Global.Microsoft.LightSwitch.Details.Client.IScreenDetails).DataWorkspace, Global.LightSwitchApplication.DataWorkspace)
End Get
End Property
#End Region
Partial Private Sub ImportedPeopleByMatchScore_SelectionChanged()
End Sub
Partial Private Sub ImportedPeopleByMatchScore_Changed(ByVal e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ImportedPeopleByMatchScore_Loaded(ByVal succeeded As Boolean)
End Sub
Partial Private Sub UpdateSubscriptions_Changed()
End Sub
Partial Private Sub UpdateDonations_Changed()
End Sub
Partial Private Sub Image_Update_Changed()
End Sub
Partial Private Sub Ent_Season_Changed()
End Sub
Partial Private Sub ActiveSeasons_SelectionChanged()
End Sub
Partial Private Sub ActiveSeasons_Changed(ByVal e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ActiveSeasons_Loaded(ByVal succeeded As Boolean)
End Sub
Partial Private Sub Ent_SubscriptionType_Changed()
End Sub
Partial Private Sub UpdateResults_SelectionChanged()
End Sub
Partial Private Sub UpdateResults_Changed(ByVal e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub UpdateResults_Loaded(ByVal succeeded As Boolean)
End Sub
Partial Private Sub Ent_MailCode_Changed()
End Sub
Partial Private Sub ImportPersons_SelectionChanged()
End Sub
Partial Private Sub ImportPersons_Changed(ByVal e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ImportPersons_Loaded(ByVal succeeded As Boolean)
End Sub
Partial Private Sub DTE_EntryDate_Changed()
End Sub
Partial Private Sub Text_UpdateResults_Changed()
End Sub
''' <summary>
''' Gets the ImportedPeopleByMatchScore visual collection. The collection contains all records currently shown on the respective list or grid control.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property ImportedPeopleByMatchScore As Global.Microsoft.LightSwitch.Framework.Client.VisualCollection(Of Global.LightSwitchApplication.ImportPerson)
Get
Return __ReviewImportedMatches.DetailsClass.GetValue(Me, __ReviewImportedMatches.DetailsClass.PropertySetProperties.ImportedPeopleByMatchScore)
End Get
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ImportedPeopleByMatchScore_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Property UpdateSubscriptions As Global.System.Nullable(Of Boolean)
Get
Return __ReviewImportedMatches.DetailsClass.GetValue(Me, __ReviewImportedMatches.DetailsClass.PropertySetProperties.UpdateSubscriptions)
End Get
Set(ByVal value As Global.System.Nullable(Of Boolean))
__ReviewImportedMatches.DetailsClass.SetValue(Me, __ReviewImportedMatches.DetailsClass.PropertySetProperties.UpdateSubscriptions, value)
End Set
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub UpdateSubscriptions_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Property UpdateDonations As Global.System.Nullable(Of Boolean)
Get
Return __ReviewImportedMatches.DetailsClass.GetValue(Me, __ReviewImportedMatches.DetailsClass.PropertySetProperties.UpdateDonations)
End Get
Set(ByVal value As Global.System.Nullable(Of Boolean))
__ReviewImportedMatches.DetailsClass.SetValue(Me, __ReviewImportedMatches.DetailsClass.PropertySetProperties.UpdateDonations, value)
End Set
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub UpdateDonations_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Property Image_Update As Byte()
Get
Return __ReviewImportedMatches.DetailsClass.GetValue(Me, __ReviewImportedMatches.DetailsClass.PropertySetProperties.Image_Update)
End Get
Set(ByVal value As Byte())
__ReviewImportedMatches.DetailsClass.SetValue(Me, __ReviewImportedMatches.DetailsClass.PropertySetProperties.Image_Update, value)
End Set
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Image_Update_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Property Ent_Season As Global.LightSwitchApplication.Season
Get
Return __ReviewImportedMatches.DetailsClass.GetValue(Me, __ReviewImportedMatches.DetailsClass.PropertySetProperties.Ent_Season)
End Get
Set(ByVal value As Global.LightSwitchApplication.Season)
__ReviewImportedMatches.DetailsClass.SetValue(Me, __ReviewImportedMatches.DetailsClass.PropertySetProperties.Ent_Season, value)
End Set
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Ent_Season_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
''' <summary>
''' Gets the ActiveSeasons visual collection. The collection contains all records currently shown on the respective list or grid control.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property ActiveSeasons As Global.Microsoft.LightSwitch.Framework.Client.VisualCollection(Of Global.LightSwitchApplication.Season)
Get
Return __ReviewImportedMatches.DetailsClass.GetValue(Me, __ReviewImportedMatches.DetailsClass.PropertySetProperties.ActiveSeasons)
End Get
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ActiveSeasons_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Property Ent_SubscriptionType As Global.LightSwitchApplication.SubscriptionType
Get
Return __ReviewImportedMatches.DetailsClass.GetValue(Me, __ReviewImportedMatches.DetailsClass.PropertySetProperties.Ent_SubscriptionType)
End Get
Set(ByVal value As Global.LightSwitchApplication.SubscriptionType)
__ReviewImportedMatches.DetailsClass.SetValue(Me, __ReviewImportedMatches.DetailsClass.PropertySetProperties.Ent_SubscriptionType, value)
End Set
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Ent_SubscriptionType_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
''' <summary>
''' Gets the UpdateResults visual collection. The collection contains all records currently shown on the respective list or grid control.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property UpdateResults As Global.Microsoft.LightSwitch.Framework.Client.VisualCollection(Of Global.LightSwitchApplication.UpdateResult)
Get
Return __ReviewImportedMatches.DetailsClass.GetValue(Me, __ReviewImportedMatches.DetailsClass.PropertySetProperties.UpdateResults)
End Get
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub UpdateResults_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Property Ent_MailCode As Global.LightSwitchApplication.MailCode
Get
Return __ReviewImportedMatches.DetailsClass.GetValue(Me, __ReviewImportedMatches.DetailsClass.PropertySetProperties.Ent_MailCode)
End Get
Set(ByVal value As Global.LightSwitchApplication.MailCode)
__ReviewImportedMatches.DetailsClass.SetValue(Me, __ReviewImportedMatches.DetailsClass.PropertySetProperties.Ent_MailCode, value)
End Set
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Ent_MailCode_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
''' <summary>
''' Gets the ImportPersons visual collection. The collection contains all records currently shown on the respective list or grid control.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property ImportPersons As Global.Microsoft.LightSwitch.Framework.Client.VisualCollection(Of Global.LightSwitchApplication.ImportPerson)
Get
Return __ReviewImportedMatches.DetailsClass.GetValue(Me, __ReviewImportedMatches.DetailsClass.PropertySetProperties.ImportPersons)
End Get
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ImportPersons_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Property DTE_EntryDate As Global.System.Nullable(Of Date)
Get
Return __ReviewImportedMatches.DetailsClass.GetValue(Me, __ReviewImportedMatches.DetailsClass.PropertySetProperties.DTE_EntryDate)
End Get
Set(ByVal value As Global.System.Nullable(Of Date))
__ReviewImportedMatches.DetailsClass.SetValue(Me, __ReviewImportedMatches.DetailsClass.PropertySetProperties.DTE_EntryDate, value)
End Set
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub DTE_EntryDate_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Property Text_UpdateResults As String
Get
Return __ReviewImportedMatches.DetailsClass.GetValue(Me, __ReviewImportedMatches.DetailsClass.PropertySetProperties.Text_UpdateResults)
End Get
Set(ByVal value As String)
__ReviewImportedMatches.DetailsClass.SetValue(Me, __ReviewImportedMatches.DetailsClass.PropertySetProperties.Text_UpdateResults, value)
End Set
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub Text_UpdateResults_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
''' <summary>
''' Calls the UpdatePeople screen method.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Sub UpdatePeople()
Me.Details.Methods.UpdatePeople.CreateInvocation().Execute()
End Sub
Partial Private Sub UpdatePeople_CanExecute(ByRef result As Boolean)
End Sub
Partial Private Sub UpdatePeople_Execute()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class DetailsClass
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenDetails(Of __ReviewImportedMatches, __ReviewImportedMatches.DetailsClass, __ReviewImportedMatches.DetailsClass.PropertySet, __ReviewImportedMatches.DetailsClass.CommandSet, __ReviewImportedMatches.DetailsClass.MethodSet)
Shared Sub New()
Dim initializePropertyEntry = __ReviewImportedMatches.DetailsClass.PropertySetProperties.ImportedPeopleByMatchScore
Dim initializeCommandEntry = __ReviewImportedMatches.DetailsClass.CommandSetProperties.UpdatePeople
Dim initializeMethodEntry = __ReviewImportedMatches.DetailsClass.MethodSetProperties.UpdatePeople
End Sub
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Private Shared ReadOnly __ReviewImportedMatchesEntry As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenDetails(Of __ReviewImportedMatches, __ReviewImportedMatches.DetailsClass).Entry = _
New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenDetails(Of __ReviewImportedMatches, __ReviewImportedMatches.DetailsClass).Entry( _
AddressOf __ReviewImportedMatches.DetailsClass.__ReviewImportedMatches_InvokeInitializeDataWorkspace,
AddressOf __ReviewImportedMatches.DetailsClass.__ReviewImportedMatches_InvokeSavingEvent,
AddressOf __ReviewImportedMatches.DetailsClass.__ReviewImportedMatches_InvokeSavedEvent,
AddressOf __ReviewImportedMatches.DetailsClass.__ReviewImportedMatches_InvokeClosingEvent,
AddressOf __ReviewImportedMatches.DetailsClass.__ReviewImportedMatches_InvokeCreated,
AddressOf __ReviewImportedMatches.DetailsClass.__ReviewImportedMatches_InvokeActivated,
AddressOf __ReviewImportedMatches.DetailsClass.__ReviewImportedMatches_InvokeSaveErrorEvent)
Private Shared Sub __ReviewImportedMatches_InvokeInitializeDataWorkspace(s As __ReviewImportedMatches, saveChangesTo As Global.System.Collections.Generic.List(Of Global.Microsoft.LightSwitch.IDataService))
s.ReviewImportedMatches_InitializeDataWorkspace(saveChangesTo)
End Sub
Private Shared Function __ReviewImportedMatches_InvokeSavingEvent(s As __ReviewImportedMatches) As Boolean
Dim handled = False
s.ReviewImportedMatches_Saving(handled)
Return handled
End Function
Private Shared Sub __ReviewImportedMatches_InvokeSavedEvent(s As __ReviewImportedMatches)
s.ReviewImportedMatches_Saved()
End Sub
Private Shared Function __ReviewImportedMatches_InvokeClosingEvent(s As __ReviewImportedMatches) As Boolean
Dim cancel = False
s.ReviewImportedMatches_Closing(cancel)
Return cancel
End Function
Private Shared Sub __ReviewImportedMatches_InvokeCreated(s As __ReviewImportedMatches)
s.ReviewImportedMatches_Created()
End Sub
Private Shared Sub __ReviewImportedMatches_InvokeActivated(s As __ReviewImportedMatches)
s.ReviewImportedMatches_Activated()
End Sub
Private Shared Function __ReviewImportedMatches_InvokeSaveErrorEvent(s As __ReviewImportedMatches, ex As Global.System.Exception) As Boolean
Dim handled = False
s.ReviewImportedMatches_SaveError(ex, handled)
Return handled
End Function
Public Sub New()
MyBase.New()
End Sub
Public Shadows ReadOnly Property Properties As __ReviewImportedMatches.DetailsClass.PropertySet
Get
Return MyBase.Properties
End Get
End Property
Public Shadows ReadOnly Property Commands As __ReviewImportedMatches.DetailsClass.CommandSet
Get
Return MyBase.Commands
End Get
End Property
Public Shadows ReadOnly Property Methods As __ReviewImportedMatches.DetailsClass.MethodSet
Get
Return MyBase.Methods
End Get
End Property
Private Function ImportedPeopleByMatchScoreQuery() As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return Global.Microsoft.LightSwitch.DataServiceQueryable.Include(
Global.Microsoft.LightSwitch.DataServiceQueryable.Include(
Me.Screen.DataWorkspace.ApplicationData.ImportedPeopleByMatchScore(),
"Season"),
"SubscriptionType")
End Function
Private Function ActiveSeasonsQuery() As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return Me.Screen.DataWorkspace.ApplicationData.ActiveSeasons()
End Function
Private Function UpdateResultsQuery() As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return Me.Screen.DataWorkspace.WCF_RIA_ServiceData.UpdateResults
End Function
Private Function ImportPersonsQuery() As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return Me.Screen.DataWorkspace.ApplicationData.ImportPersons
End Function
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _ImportedPeopleByMatchScore As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __ReviewImportedMatches, __ReviewImportedMatches.DetailsClass, Global.LightSwitchApplication.ImportPerson).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _UpdateSubscriptions As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __ReviewImportedMatches, __ReviewImportedMatches.DetailsClass, Global.System.Nullable(Of Boolean)).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _UpdateDonations As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __ReviewImportedMatches, __ReviewImportedMatches.DetailsClass, Global.System.Nullable(Of Boolean)).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _Image_Update As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __ReviewImportedMatches, __ReviewImportedMatches.DetailsClass, Byte()).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _Ent_Season As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __ReviewImportedMatches, __ReviewImportedMatches.DetailsClass, Global.LightSwitchApplication.Season).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _ActiveSeasons As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __ReviewImportedMatches, __ReviewImportedMatches.DetailsClass, Global.LightSwitchApplication.Season).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _Ent_SubscriptionType As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __ReviewImportedMatches, __ReviewImportedMatches.DetailsClass, Global.LightSwitchApplication.SubscriptionType).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _UpdateResults As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __ReviewImportedMatches, __ReviewImportedMatches.DetailsClass, Global.LightSwitchApplication.UpdateResult).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _Ent_MailCode As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __ReviewImportedMatches, __ReviewImportedMatches.DetailsClass, Global.LightSwitchApplication.MailCode).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _ImportPersons As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __ReviewImportedMatches, __ReviewImportedMatches.DetailsClass, Global.LightSwitchApplication.ImportPerson).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _DTE_EntryDate As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __ReviewImportedMatches, __ReviewImportedMatches.DetailsClass, Global.System.Nullable(Of Date)).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _Text_UpdateResults As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __ReviewImportedMatches, __ReviewImportedMatches.DetailsClass, String).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _UpdatePeopleCommand As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __ReviewImportedMatches, __ReviewImportedMatches.DetailsClass).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _UpdatePeopleMethod As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __ReviewImportedMatches, __ReviewImportedMatches.DetailsClass).Data
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class PropertySet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenPropertySet(Of __ReviewImportedMatches, __ReviewImportedMatches.DetailsClass)
Public ReadOnly Property ImportedPeopleByMatchScore As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __ReviewImportedMatches, __ReviewImportedMatches.DetailsClass, Global.LightSwitchApplication.ImportPerson)
Get
Return DirectCast(MyBase.GetItem(__ReviewImportedMatches.DetailsClass.PropertySetProperties.ImportedPeopleByMatchScore), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __ReviewImportedMatches, __ReviewImportedMatches.DetailsClass, Global.LightSwitchApplication.ImportPerson))
End Get
End Property
Public ReadOnly Property UpdateSubscriptions As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __ReviewImportedMatches, __ReviewImportedMatches.DetailsClass, Global.System.Nullable(Of Boolean))
Get
Return DirectCast(MyBase.GetItem(__ReviewImportedMatches.DetailsClass.PropertySetProperties.UpdateSubscriptions), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __ReviewImportedMatches, __ReviewImportedMatches.DetailsClass, Global.System.Nullable(Of Boolean)))
End Get
End Property
Public ReadOnly Property UpdateDonations As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __ReviewImportedMatches, __ReviewImportedMatches.DetailsClass, Global.System.Nullable(Of Boolean))
Get
Return DirectCast(MyBase.GetItem(__ReviewImportedMatches.DetailsClass.PropertySetProperties.UpdateDonations), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __ReviewImportedMatches, __ReviewImportedMatches.DetailsClass, Global.System.Nullable(Of Boolean)))
End Get
End Property
Public ReadOnly Property Image_Update As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __ReviewImportedMatches, __ReviewImportedMatches.DetailsClass, Byte())
Get
Return DirectCast(MyBase.GetItem(__ReviewImportedMatches.DetailsClass.PropertySetProperties.Image_Update), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __ReviewImportedMatches, __ReviewImportedMatches.DetailsClass, Byte()))
End Get
End Property
Public ReadOnly Property Ent_Season As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __ReviewImportedMatches, __ReviewImportedMatches.DetailsClass, Global.LightSwitchApplication.Season)
Get
Return DirectCast(MyBase.GetItem(__ReviewImportedMatches.DetailsClass.PropertySetProperties.Ent_Season), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __ReviewImportedMatches, __ReviewImportedMatches.DetailsClass, Global.LightSwitchApplication.Season))
End Get
End Property
Public ReadOnly Property ActiveSeasons As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __ReviewImportedMatches, __ReviewImportedMatches.DetailsClass, Global.LightSwitchApplication.Season)
Get
Return DirectCast(MyBase.GetItem(__ReviewImportedMatches.DetailsClass.PropertySetProperties.ActiveSeasons), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __ReviewImportedMatches, __ReviewImportedMatches.DetailsClass, Global.LightSwitchApplication.Season))
End Get
End Property
Public ReadOnly Property Ent_SubscriptionType As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __ReviewImportedMatches, __ReviewImportedMatches.DetailsClass, Global.LightSwitchApplication.SubscriptionType)
Get
Return DirectCast(MyBase.GetItem(__ReviewImportedMatches.DetailsClass.PropertySetProperties.Ent_SubscriptionType), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __ReviewImportedMatches, __ReviewImportedMatches.DetailsClass, Global.LightSwitchApplication.SubscriptionType))
End Get
End Property
Public ReadOnly Property UpdateResults As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __ReviewImportedMatches, __ReviewImportedMatches.DetailsClass, Global.LightSwitchApplication.UpdateResult)
Get
Return DirectCast(MyBase.GetItem(__ReviewImportedMatches.DetailsClass.PropertySetProperties.UpdateResults), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __ReviewImportedMatches, __ReviewImportedMatches.DetailsClass, Global.LightSwitchApplication.UpdateResult))
End Get
End Property
Public ReadOnly Property Ent_MailCode As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __ReviewImportedMatches, __ReviewImportedMatches.DetailsClass, Global.LightSwitchApplication.MailCode)
Get
Return DirectCast(MyBase.GetItem(__ReviewImportedMatches.DetailsClass.PropertySetProperties.Ent_MailCode), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __ReviewImportedMatches, __ReviewImportedMatches.DetailsClass, Global.LightSwitchApplication.MailCode))
End Get
End Property
Public ReadOnly Property ImportPersons As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __ReviewImportedMatches, __ReviewImportedMatches.DetailsClass, Global.LightSwitchApplication.ImportPerson)
Get
Return DirectCast(MyBase.GetItem(__ReviewImportedMatches.DetailsClass.PropertySetProperties.ImportPersons), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __ReviewImportedMatches, __ReviewImportedMatches.DetailsClass, Global.LightSwitchApplication.ImportPerson))
End Get
End Property
Public ReadOnly Property DTE_EntryDate As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __ReviewImportedMatches, __ReviewImportedMatches.DetailsClass, Global.System.Nullable(Of Date))
Get
Return DirectCast(MyBase.GetItem(__ReviewImportedMatches.DetailsClass.PropertySetProperties.DTE_EntryDate), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __ReviewImportedMatches, __ReviewImportedMatches.DetailsClass, Global.System.Nullable(Of Date)))
End Get
End Property
Public ReadOnly Property Text_UpdateResults As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __ReviewImportedMatches, __ReviewImportedMatches.DetailsClass, String)
Get
Return DirectCast(MyBase.GetItem(__ReviewImportedMatches.DetailsClass.PropertySetProperties.Text_UpdateResults), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __ReviewImportedMatches, __ReviewImportedMatches.DetailsClass, String))
End Get
End Property
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class CommandSet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommandSet(Of __ReviewImportedMatches, __ReviewImportedMatches.DetailsClass)
Public ReadOnly Property UpdatePeople As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __ReviewImportedMatches, __ReviewImportedMatches.DetailsClass)
Get
Return DirectCast(MyBase.GetItem(__ReviewImportedMatches.DetailsClass.CommandSetProperties.UpdatePeople), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __ReviewImportedMatches, __ReviewImportedMatches.DetailsClass))
End Get
End Property
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class MethodSet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethodSet(Of __ReviewImportedMatches, __ReviewImportedMatches.DetailsClass)
Public ReadOnly Property UpdatePeople As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __ReviewImportedMatches, __ReviewImportedMatches.DetailsClass)
Get
Return DirectCast(MyBase.GetItem(__ReviewImportedMatches.DetailsClass.MethodSetProperties.UpdatePeople), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __ReviewImportedMatches, __ReviewImportedMatches.DetailsClass))
End Get
End Property
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend NotInheritable Class PropertySetProperties
Public Shared ReadOnly ImportedPeopleByMatchScore As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __ReviewImportedMatches, __ReviewImportedMatches.DetailsClass, Global.LightSwitchApplication.ImportPerson).Entry( _
"ImportedPeopleByMatchScore",
AddressOf __ReviewImportedMatches.DetailsClass.PropertySetProperties._ImportedPeopleByMatchScore_Stub,
AddressOf __ReviewImportedMatches.DetailsClass.PropertySetProperties._ImportedPeopleByMatchScore_Validate,
AddressOf __ReviewImportedMatches.DetailsClass.PropertySetProperties._ImportedPeopleByMatchScore_CreateQuery,
AddressOf __ReviewImportedMatches.DetailsClass.PropertySetProperties._ImportedPeopleByMatchScore_SelectionChanged,
AddressOf __ReviewImportedMatches.DetailsClass.PropertySetProperties._ImportedPeopleByMatchScore_OnCollectionChanged,
AddressOf __ReviewImportedMatches.DetailsClass.PropertySetProperties._ImportedPeopleByMatchScore_OnLoaded)
Private Shared Sub _ImportedPeopleByMatchScore_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __ReviewImportedMatches.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __ReviewImportedMatches, __ReviewImportedMatches.DetailsClass, Global.LightSwitchApplication.ImportPerson).Data), d As __ReviewImportedMatches.DetailsClass, sf As Object)
c(d, d._ImportedPeopleByMatchScore, sf)
End Sub
Private Shared Sub _ImportedPeopleByMatchScore_Validate(s As __ReviewImportedMatches, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.ImportedPeopleByMatchScore_Validate(r)
End Sub
Private Shared Function _ImportedPeopleByMatchScore_CreateQuery(d As __ReviewImportedMatches.DetailsClass, args As Object()) As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return d.ImportedPeopleByMatchScoreQuery()
End Function
Private Shared Sub _ImportedPeopleByMatchScore_SelectionChanged(s As __ReviewImportedMatches)
s.ImportedPeopleByMatchScore_SelectionChanged()
End Sub
Private Shared Sub _ImportedPeopleByMatchScore_OnCollectionChanged(s As __ReviewImportedMatches, e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
s.ImportedPeopleByMatchScore_Changed(e)
End Sub
Private Shared Sub _ImportedPeopleByMatchScore_OnLoaded(s As __ReviewImportedMatches, succeeded As Boolean)
s.ImportedPeopleByMatchScore_Loaded(succeeded)
End Sub
Public Shared ReadOnly UpdateSubscriptions As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __ReviewImportedMatches, __ReviewImportedMatches.DetailsClass, Global.System.Nullable(Of Boolean)).Entry( _
"UpdateSubscriptions",
False,
AddressOf __ReviewImportedMatches.DetailsClass.PropertySetProperties._UpdateSubscriptions_Stub,
AddressOf __ReviewImportedMatches.DetailsClass.PropertySetProperties._UpdateSubscriptions_Validate,
AddressOf __ReviewImportedMatches.DetailsClass.PropertySetProperties._UpdateSubscriptions_OnValueChanged)
Private Shared Sub _UpdateSubscriptions_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __ReviewImportedMatches.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __ReviewImportedMatches, __ReviewImportedMatches.DetailsClass, Global.System.Nullable(Of Boolean)).Data), d As __ReviewImportedMatches.DetailsClass, sf As Object)
c(d, d._UpdateSubscriptions, sf)
End Sub
Private Shared Sub _UpdateSubscriptions_Validate(s As __ReviewImportedMatches, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.UpdateSubscriptions_Validate(r)
End Sub
Private Shared Sub _UpdateSubscriptions_OnValueChanged(s As __ReviewImportedMatches)
s.UpdateSubscriptions_Changed()
End Sub
Public Shared ReadOnly UpdateDonations As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __ReviewImportedMatches, __ReviewImportedMatches.DetailsClass, Global.System.Nullable(Of Boolean)).Entry( _
"UpdateDonations",
False,
AddressOf __ReviewImportedMatches.DetailsClass.PropertySetProperties._UpdateDonations_Stub,
AddressOf __ReviewImportedMatches.DetailsClass.PropertySetProperties._UpdateDonations_Validate,
AddressOf __ReviewImportedMatches.DetailsClass.PropertySetProperties._UpdateDonations_OnValueChanged)
Private Shared Sub _UpdateDonations_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __ReviewImportedMatches.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __ReviewImportedMatches, __ReviewImportedMatches.DetailsClass, Global.System.Nullable(Of Boolean)).Data), d As __ReviewImportedMatches.DetailsClass, sf As Object)
c(d, d._UpdateDonations, sf)
End Sub
Private Shared Sub _UpdateDonations_Validate(s As __ReviewImportedMatches, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.UpdateDonations_Validate(r)
End Sub
Private Shared Sub _UpdateDonations_OnValueChanged(s As __ReviewImportedMatches)
s.UpdateDonations_Changed()
End Sub
Public Shared ReadOnly Image_Update As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __ReviewImportedMatches, __ReviewImportedMatches.DetailsClass, Byte()).Entry( _
"Image_Update",
False,
AddressOf __ReviewImportedMatches.DetailsClass.PropertySetProperties._Image_Update_Stub,
AddressOf __ReviewImportedMatches.DetailsClass.PropertySetProperties._Image_Update_Validate,
AddressOf __ReviewImportedMatches.DetailsClass.PropertySetProperties._Image_Update_OnValueChanged)
Private Shared Sub _Image_Update_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __ReviewImportedMatches.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __ReviewImportedMatches, __ReviewImportedMatches.DetailsClass, Byte()).Data), d As __ReviewImportedMatches.DetailsClass, sf As Object)
c(d, d._Image_Update, sf)
End Sub
Private Shared Sub _Image_Update_Validate(s As __ReviewImportedMatches, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.Image_Update_Validate(r)
End Sub
Private Shared Sub _Image_Update_OnValueChanged(s As __ReviewImportedMatches)
s.Image_Update_Changed()
End Sub
Public Shared ReadOnly Ent_Season As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __ReviewImportedMatches, __ReviewImportedMatches.DetailsClass, Global.LightSwitchApplication.Season).Entry( _
"Ent_Season",
False,
AddressOf __ReviewImportedMatches.DetailsClass.PropertySetProperties._Ent_Season_Stub,
AddressOf __ReviewImportedMatches.DetailsClass.PropertySetProperties._Ent_Season_Validate,
AddressOf __ReviewImportedMatches.DetailsClass.PropertySetProperties._Ent_Season_OnValueChanged)
Private Shared Sub _Ent_Season_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __ReviewImportedMatches.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __ReviewImportedMatches, __ReviewImportedMatches.DetailsClass, Global.LightSwitchApplication.Season).Data), d As __ReviewImportedMatches.DetailsClass, sf As Object)
c(d, d._Ent_Season, sf)
End Sub
Private Shared Sub _Ent_Season_Validate(s As __ReviewImportedMatches, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.Ent_Season_Validate(r)
End Sub
Private Shared Sub _Ent_Season_OnValueChanged(s As __ReviewImportedMatches)
s.Ent_Season_Changed()
End Sub
Public Shared ReadOnly ActiveSeasons As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __ReviewImportedMatches, __ReviewImportedMatches.DetailsClass, Global.LightSwitchApplication.Season).Entry( _
"ActiveSeasons",
AddressOf __ReviewImportedMatches.DetailsClass.PropertySetProperties._ActiveSeasons_Stub,
AddressOf __ReviewImportedMatches.DetailsClass.PropertySetProperties._ActiveSeasons_Validate,
AddressOf __ReviewImportedMatches.DetailsClass.PropertySetProperties._ActiveSeasons_CreateQuery,
AddressOf __ReviewImportedMatches.DetailsClass.PropertySetProperties._ActiveSeasons_SelectionChanged,
AddressOf __ReviewImportedMatches.DetailsClass.PropertySetProperties._ActiveSeasons_OnCollectionChanged,
AddressOf __ReviewImportedMatches.DetailsClass.PropertySetProperties._ActiveSeasons_OnLoaded)
Private Shared Sub _ActiveSeasons_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __ReviewImportedMatches.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __ReviewImportedMatches, __ReviewImportedMatches.DetailsClass, Global.LightSwitchApplication.Season).Data), d As __ReviewImportedMatches.DetailsClass, sf As Object)
c(d, d._ActiveSeasons, sf)
End Sub
Private Shared Sub _ActiveSeasons_Validate(s As __ReviewImportedMatches, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.ActiveSeasons_Validate(r)
End Sub
Private Shared Function _ActiveSeasons_CreateQuery(d As __ReviewImportedMatches.DetailsClass, args As Object()) As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return d.ActiveSeasonsQuery()
End Function
Private Shared Sub _ActiveSeasons_SelectionChanged(s As __ReviewImportedMatches)
s.ActiveSeasons_SelectionChanged()
End Sub
Private Shared Sub _ActiveSeasons_OnCollectionChanged(s As __ReviewImportedMatches, e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
s.ActiveSeasons_Changed(e)
End Sub
Private Shared Sub _ActiveSeasons_OnLoaded(s As __ReviewImportedMatches, succeeded As Boolean)
s.ActiveSeasons_Loaded(succeeded)
End Sub
Public Shared ReadOnly Ent_SubscriptionType As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __ReviewImportedMatches, __ReviewImportedMatches.DetailsClass, Global.LightSwitchApplication.SubscriptionType).Entry( _
"Ent_SubscriptionType",
False,
AddressOf __ReviewImportedMatches.DetailsClass.PropertySetProperties._Ent_SubscriptionType_Stub,
AddressOf __ReviewImportedMatches.DetailsClass.PropertySetProperties._Ent_SubscriptionType_Validate,
AddressOf __ReviewImportedMatches.DetailsClass.PropertySetProperties._Ent_SubscriptionType_OnValueChanged)
Private Shared Sub _Ent_SubscriptionType_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __ReviewImportedMatches.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __ReviewImportedMatches, __ReviewImportedMatches.DetailsClass, Global.LightSwitchApplication.SubscriptionType).Data), d As __ReviewImportedMatches.DetailsClass, sf As Object)
c(d, d._Ent_SubscriptionType, sf)
End Sub
Private Shared Sub _Ent_SubscriptionType_Validate(s As __ReviewImportedMatches, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.Ent_SubscriptionType_Validate(r)
End Sub
Private Shared Sub _Ent_SubscriptionType_OnValueChanged(s As __ReviewImportedMatches)
s.Ent_SubscriptionType_Changed()
End Sub
Public Shared ReadOnly UpdateResults As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __ReviewImportedMatches, __ReviewImportedMatches.DetailsClass, Global.LightSwitchApplication.UpdateResult).Entry( _
"UpdateResults",
AddressOf __ReviewImportedMatches.DetailsClass.PropertySetProperties._UpdateResults_Stub,
AddressOf __ReviewImportedMatches.DetailsClass.PropertySetProperties._UpdateResults_Validate,
AddressOf __ReviewImportedMatches.DetailsClass.PropertySetProperties._UpdateResults_CreateQuery,
AddressOf __ReviewImportedMatches.DetailsClass.PropertySetProperties._UpdateResults_SelectionChanged,
AddressOf __ReviewImportedMatches.DetailsClass.PropertySetProperties._UpdateResults_OnCollectionChanged,
AddressOf __ReviewImportedMatches.DetailsClass.PropertySetProperties._UpdateResults_OnLoaded)
Private Shared Sub _UpdateResults_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __ReviewImportedMatches.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __ReviewImportedMatches, __ReviewImportedMatches.DetailsClass, Global.LightSwitchApplication.UpdateResult).Data), d As __ReviewImportedMatches.DetailsClass, sf As Object)
c(d, d._UpdateResults, sf)
End Sub
Private Shared Sub _UpdateResults_Validate(s As __ReviewImportedMatches, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.UpdateResults_Validate(r)
End Sub
Private Shared Function _UpdateResults_CreateQuery(d As __ReviewImportedMatches.DetailsClass, args As Object()) As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return d.UpdateResultsQuery()
End Function
Private Shared Sub _UpdateResults_SelectionChanged(s As __ReviewImportedMatches)
s.UpdateResults_SelectionChanged()
End Sub
Private Shared Sub _UpdateResults_OnCollectionChanged(s As __ReviewImportedMatches, e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
s.UpdateResults_Changed(e)
End Sub
Private Shared Sub _UpdateResults_OnLoaded(s As __ReviewImportedMatches, succeeded As Boolean)
s.UpdateResults_Loaded(succeeded)
End Sub
Public Shared ReadOnly Ent_MailCode As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __ReviewImportedMatches, __ReviewImportedMatches.DetailsClass, Global.LightSwitchApplication.MailCode).Entry( _
"Ent_MailCode",
False,
AddressOf __ReviewImportedMatches.DetailsClass.PropertySetProperties._Ent_MailCode_Stub,
AddressOf __ReviewImportedMatches.DetailsClass.PropertySetProperties._Ent_MailCode_Validate,
AddressOf __ReviewImportedMatches.DetailsClass.PropertySetProperties._Ent_MailCode_OnValueChanged)
Private Shared Sub _Ent_MailCode_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __ReviewImportedMatches.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __ReviewImportedMatches, __ReviewImportedMatches.DetailsClass, Global.LightSwitchApplication.MailCode).Data), d As __ReviewImportedMatches.DetailsClass, sf As Object)
c(d, d._Ent_MailCode, sf)
End Sub
Private Shared Sub _Ent_MailCode_Validate(s As __ReviewImportedMatches, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.Ent_MailCode_Validate(r)
End Sub
Private Shared Sub _Ent_MailCode_OnValueChanged(s As __ReviewImportedMatches)
s.Ent_MailCode_Changed()
End Sub
Public Shared ReadOnly ImportPersons As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __ReviewImportedMatches, __ReviewImportedMatches.DetailsClass, Global.LightSwitchApplication.ImportPerson).Entry( _
"ImportPersons",
AddressOf __ReviewImportedMatches.DetailsClass.PropertySetProperties._ImportPersons_Stub,
AddressOf __ReviewImportedMatches.DetailsClass.PropertySetProperties._ImportPersons_Validate,
AddressOf __ReviewImportedMatches.DetailsClass.PropertySetProperties._ImportPersons_CreateQuery,
AddressOf __ReviewImportedMatches.DetailsClass.PropertySetProperties._ImportPersons_SelectionChanged,
AddressOf __ReviewImportedMatches.DetailsClass.PropertySetProperties._ImportPersons_OnCollectionChanged,
AddressOf __ReviewImportedMatches.DetailsClass.PropertySetProperties._ImportPersons_OnLoaded)
Private Shared Sub _ImportPersons_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __ReviewImportedMatches.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __ReviewImportedMatches, __ReviewImportedMatches.DetailsClass, Global.LightSwitchApplication.ImportPerson).Data), d As __ReviewImportedMatches.DetailsClass, sf As Object)
c(d, d._ImportPersons, sf)
End Sub
Private Shared Sub _ImportPersons_Validate(s As __ReviewImportedMatches, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.ImportPersons_Validate(r)
End Sub
Private Shared Function _ImportPersons_CreateQuery(d As __ReviewImportedMatches.DetailsClass, args As Object()) As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return d.ImportPersonsQuery()
End Function
Private Shared Sub _ImportPersons_SelectionChanged(s As __ReviewImportedMatches)
s.ImportPersons_SelectionChanged()
End Sub
Private Shared Sub _ImportPersons_OnCollectionChanged(s As __ReviewImportedMatches, e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
s.ImportPersons_Changed(e)
End Sub
Private Shared Sub _ImportPersons_OnLoaded(s As __ReviewImportedMatches, succeeded As Boolean)
s.ImportPersons_Loaded(succeeded)
End Sub
Public Shared ReadOnly DTE_EntryDate As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __ReviewImportedMatches, __ReviewImportedMatches.DetailsClass, Global.System.Nullable(Of Date)).Entry( _
"DTE_EntryDate",
False,
AddressOf __ReviewImportedMatches.DetailsClass.PropertySetProperties._DTE_EntryDate_Stub,
AddressOf __ReviewImportedMatches.DetailsClass.PropertySetProperties._DTE_EntryDate_Validate,
AddressOf __ReviewImportedMatches.DetailsClass.PropertySetProperties._DTE_EntryDate_OnValueChanged)
Private Shared Sub _DTE_EntryDate_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __ReviewImportedMatches.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __ReviewImportedMatches, __ReviewImportedMatches.DetailsClass, Global.System.Nullable(Of Date)).Data), d As __ReviewImportedMatches.DetailsClass, sf As Object)
c(d, d._DTE_EntryDate, sf)
End Sub
Private Shared Sub _DTE_EntryDate_Validate(s As __ReviewImportedMatches, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.DTE_EntryDate_Validate(r)
End Sub
Private Shared Sub _DTE_EntryDate_OnValueChanged(s As __ReviewImportedMatches)
s.DTE_EntryDate_Changed()
End Sub
Public Shared ReadOnly Text_UpdateResults As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __ReviewImportedMatches, __ReviewImportedMatches.DetailsClass, String).Entry( _
"Text_UpdateResults",
False,
AddressOf __ReviewImportedMatches.DetailsClass.PropertySetProperties._Text_UpdateResults_Stub,
AddressOf __ReviewImportedMatches.DetailsClass.PropertySetProperties._Text_UpdateResults_Validate,
AddressOf __ReviewImportedMatches.DetailsClass.PropertySetProperties._Text_UpdateResults_OnValueChanged)
Private Shared Sub _Text_UpdateResults_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __ReviewImportedMatches.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __ReviewImportedMatches, __ReviewImportedMatches.DetailsClass, String).Data), d As __ReviewImportedMatches.DetailsClass, sf As Object)
c(d, d._Text_UpdateResults, sf)
End Sub
Private Shared Sub _Text_UpdateResults_Validate(s As __ReviewImportedMatches, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.Text_UpdateResults_Validate(r)
End Sub
Private Shared Sub _Text_UpdateResults_OnValueChanged(s As __ReviewImportedMatches)
s.Text_UpdateResults_Changed()
End Sub
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend NotInheritable Class CommandSetProperties
Public Shared ReadOnly UpdatePeople As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __ReviewImportedMatches, __ReviewImportedMatches.DetailsClass).Entry( _
"UpdatePeople",
AddressOf __ReviewImportedMatches.DetailsClass.CommandSetProperties._UpdatePeople_Stub,
AddressOf __ReviewImportedMatches.DetailsClass.CommandSetProperties._UpdatePeople_CreateExecutableObject)
Private Shared Sub _UpdatePeople_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __ReviewImportedMatches.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __ReviewImportedMatches, __ReviewImportedMatches.DetailsClass).Data), d As __ReviewImportedMatches.DetailsClass, sf As Object)
c(d, d._UpdatePeopleCommand, sf)
End Sub
Private Shared Function _UpdatePeople_CreateExecutableObject(d As __ReviewImportedMatches.DetailsClass) As Global.Microsoft.LightSwitch.IExecutable
Return DirectCast(d, __ReviewImportedMatches.DetailsClass).Methods.UpdatePeople.CreateInvocation()
End Function
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend NotInheritable Class MethodSetProperties
Public Shared ReadOnly UpdatePeople As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __ReviewImportedMatches, __ReviewImportedMatches.DetailsClass).Entry( _
"UpdatePeople",
AddressOf __ReviewImportedMatches.DetailsClass.MethodSetProperties._UpdatePeople_Stub,
AddressOf __ReviewImportedMatches.DetailsClass.MethodSetProperties._UpdatePeople_CanInvoke,
AddressOf __ReviewImportedMatches.DetailsClass.MethodSetProperties._UpdatePeople_InvokeMethod)
Private Shared Sub _UpdatePeople_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __ReviewImportedMatches.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __ReviewImportedMatches, __ReviewImportedMatches.DetailsClass).Data), d As __ReviewImportedMatches.DetailsClass, sf As Object)
c(d, d._UpdatePeopleMethod, sf)
End Sub
Private Shared Function _UpdatePeople_CanInvoke(d As __ReviewImportedMatches.DetailsClass, args As Global.System.Collections.ObjectModel.ReadOnlyCollection(Of Object), ex As Global.System.Exception) As Global.System.Exception
Dim result = True
d.Screen.UpdatePeople_CanExecute(result)
Return If(result, Nothing, ex)
End Function
Private Shared Sub _UpdatePeople_InvokeMethod(d As __ReviewImportedMatches.DetailsClass, args As Global.System.Collections.ObjectModel.ReadOnlyCollection(Of Object))
d.Screen.UpdatePeople_Execute()
End Sub
End Class
End Class
End Class
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
Partial Public NotInheritable Class XXListAllPeopleAllFields
Inherits Global.Microsoft.LightSwitch.Framework.Client.ScreenObject(Of __XXListAllPeopleAllFields, __XXListAllPeopleAllFields.DetailsClass)
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private Sub New()
MyBase.New("LightSwitchApplication:XXListAllPeopleAllFields")
__XXListAllPeopleAllFields.DetailsClass.Initialize(Me)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
Public Shared Function CreateInstance() As XXListAllPeopleAllFields
Return New __XXListAllPeopleAllFields( _
)
End Function
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub XXListAllPeopleAllFields_InitializeDataWorkspace(ByVal saveChangesTo As Global.System.Collections.Generic.List(Of Global.Microsoft.LightSwitch.IDataService))
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub XXListAllPeopleAllFields_Created()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub XXListAllPeopleAllFields_Activated()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub XXListAllPeopleAllFields_Saving(ByRef handled As Boolean)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub XXListAllPeopleAllFields_Saved()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub XXListAllPeopleAllFields_Closing(ByRef cancel As Boolean)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub XXListAllPeopleAllFields_SaveError(ByVal exception As Global.System.Exception, ByRef handled As Boolean)
End Sub
#Region "Private Properties"
''' <summary>
''' Gets the Application object for this application. The Application object provides access to active screens, methods to open screens and access to the current user.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private ReadOnly Property Application As Global.LightSwitchApplication.Application
Get
Return Global.LightSwitchApplication.Application.Current
End Get
End Property
''' <summary>
''' Gets the containing data workspace. The data workspace provides access to all data sources in the application.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private ReadOnly Property DataWorkspace As Global.LightSwitchApplication.DataWorkspace
Get
Return DirectCast(DirectCast(Me.Details, Global.Microsoft.LightSwitch.Details.Client.IScreenDetails).DataWorkspace, Global.LightSwitchApplication.DataWorkspace)
End Get
End Property
#End Region
Partial Private Sub People_SelectionChanged()
End Sub
Partial Private Sub People_Changed(ByVal e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub People_Loaded(ByVal succeeded As Boolean)
End Sub
''' <summary>
''' Gets the People visual collection. The collection contains all records currently shown on the respective list or grid control.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property People As Global.Microsoft.LightSwitch.Framework.Client.VisualCollection(Of Global.LightSwitchApplication.Person)
Get
Return __XXListAllPeopleAllFields.DetailsClass.GetValue(Me, __XXListAllPeopleAllFields.DetailsClass.PropertySetProperties.People)
End Get
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub People_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class DetailsClass
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenDetails(Of __XXListAllPeopleAllFields, __XXListAllPeopleAllFields.DetailsClass, __XXListAllPeopleAllFields.DetailsClass.PropertySet, __XXListAllPeopleAllFields.DetailsClass.CommandSet, __XXListAllPeopleAllFields.DetailsClass.MethodSet)
Shared Sub New()
Dim initializePropertyEntry = __XXListAllPeopleAllFields.DetailsClass.PropertySetProperties.People
End Sub
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Private Shared ReadOnly __XXListAllPeopleAllFieldsEntry As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenDetails(Of __XXListAllPeopleAllFields, __XXListAllPeopleAllFields.DetailsClass).Entry = _
New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenDetails(Of __XXListAllPeopleAllFields, __XXListAllPeopleAllFields.DetailsClass).Entry( _
AddressOf __XXListAllPeopleAllFields.DetailsClass.__XXListAllPeopleAllFields_InvokeInitializeDataWorkspace,
AddressOf __XXListAllPeopleAllFields.DetailsClass.__XXListAllPeopleAllFields_InvokeSavingEvent,
AddressOf __XXListAllPeopleAllFields.DetailsClass.__XXListAllPeopleAllFields_InvokeSavedEvent,
AddressOf __XXListAllPeopleAllFields.DetailsClass.__XXListAllPeopleAllFields_InvokeClosingEvent,
AddressOf __XXListAllPeopleAllFields.DetailsClass.__XXListAllPeopleAllFields_InvokeCreated,
AddressOf __XXListAllPeopleAllFields.DetailsClass.__XXListAllPeopleAllFields_InvokeActivated,
AddressOf __XXListAllPeopleAllFields.DetailsClass.__XXListAllPeopleAllFields_InvokeSaveErrorEvent)
Private Shared Sub __XXListAllPeopleAllFields_InvokeInitializeDataWorkspace(s As __XXListAllPeopleAllFields, saveChangesTo As Global.System.Collections.Generic.List(Of Global.Microsoft.LightSwitch.IDataService))
s.XXListAllPeopleAllFields_InitializeDataWorkspace(saveChangesTo)
End Sub
Private Shared Function __XXListAllPeopleAllFields_InvokeSavingEvent(s As __XXListAllPeopleAllFields) As Boolean
Dim handled = False
s.XXListAllPeopleAllFields_Saving(handled)
Return handled
End Function
Private Shared Sub __XXListAllPeopleAllFields_InvokeSavedEvent(s As __XXListAllPeopleAllFields)
s.XXListAllPeopleAllFields_Saved()
End Sub
Private Shared Function __XXListAllPeopleAllFields_InvokeClosingEvent(s As __XXListAllPeopleAllFields) As Boolean
Dim cancel = False
s.XXListAllPeopleAllFields_Closing(cancel)
Return cancel
End Function
Private Shared Sub __XXListAllPeopleAllFields_InvokeCreated(s As __XXListAllPeopleAllFields)
s.XXListAllPeopleAllFields_Created()
End Sub
Private Shared Sub __XXListAllPeopleAllFields_InvokeActivated(s As __XXListAllPeopleAllFields)
s.XXListAllPeopleAllFields_Activated()
End Sub
Private Shared Function __XXListAllPeopleAllFields_InvokeSaveErrorEvent(s As __XXListAllPeopleAllFields, ex As Global.System.Exception) As Boolean
Dim handled = False
s.XXListAllPeopleAllFields_SaveError(ex, handled)
Return handled
End Function
Public Sub New()
MyBase.New()
End Sub
Public Shadows ReadOnly Property Properties As __XXListAllPeopleAllFields.DetailsClass.PropertySet
Get
Return MyBase.Properties
End Get
End Property
Public Shadows ReadOnly Property Commands As __XXListAllPeopleAllFields.DetailsClass.CommandSet
Get
Return MyBase.Commands
End Get
End Property
Public Shadows ReadOnly Property Methods As __XXListAllPeopleAllFields.DetailsClass.MethodSet
Get
Return MyBase.Methods
End Get
End Property
Private Function PeopleQuery() As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return Global.Microsoft.LightSwitch.DataServiceQueryable.Include(
Me.Screen.DataWorkspace.ApplicationData.People,
"MailCode")
End Function
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _People As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __XXListAllPeopleAllFields, __XXListAllPeopleAllFields.DetailsClass, Global.LightSwitchApplication.Person).Data
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class PropertySet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenPropertySet(Of __XXListAllPeopleAllFields, __XXListAllPeopleAllFields.DetailsClass)
Public ReadOnly Property People As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __XXListAllPeopleAllFields, __XXListAllPeopleAllFields.DetailsClass, Global.LightSwitchApplication.Person)
Get
Return DirectCast(MyBase.GetItem(__XXListAllPeopleAllFields.DetailsClass.PropertySetProperties.People), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __XXListAllPeopleAllFields, __XXListAllPeopleAllFields.DetailsClass, Global.LightSwitchApplication.Person))
End Get
End Property
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class CommandSet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommandSet(Of __XXListAllPeopleAllFields, __XXListAllPeopleAllFields.DetailsClass)
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class MethodSet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethodSet(Of __XXListAllPeopleAllFields, __XXListAllPeopleAllFields.DetailsClass)
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend NotInheritable Class PropertySetProperties
Public Shared ReadOnly People As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __XXListAllPeopleAllFields, __XXListAllPeopleAllFields.DetailsClass, Global.LightSwitchApplication.Person).Entry( _
"People",
AddressOf __XXListAllPeopleAllFields.DetailsClass.PropertySetProperties._People_Stub,
AddressOf __XXListAllPeopleAllFields.DetailsClass.PropertySetProperties._People_Validate,
AddressOf __XXListAllPeopleAllFields.DetailsClass.PropertySetProperties._People_CreateQuery,
AddressOf __XXListAllPeopleAllFields.DetailsClass.PropertySetProperties._People_SelectionChanged,
AddressOf __XXListAllPeopleAllFields.DetailsClass.PropertySetProperties._People_OnCollectionChanged,
AddressOf __XXListAllPeopleAllFields.DetailsClass.PropertySetProperties._People_OnLoaded)
Private Shared Sub _People_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __XXListAllPeopleAllFields.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __XXListAllPeopleAllFields, __XXListAllPeopleAllFields.DetailsClass, Global.LightSwitchApplication.Person).Data), d As __XXListAllPeopleAllFields.DetailsClass, sf As Object)
c(d, d._People, sf)
End Sub
Private Shared Sub _People_Validate(s As __XXListAllPeopleAllFields, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.People_Validate(r)
End Sub
Private Shared Function _People_CreateQuery(d As __XXListAllPeopleAllFields.DetailsClass, args As Object()) As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return d.PeopleQuery()
End Function
Private Shared Sub _People_SelectionChanged(s As __XXListAllPeopleAllFields)
s.People_SelectionChanged()
End Sub
Private Shared Sub _People_OnCollectionChanged(s As __XXListAllPeopleAllFields, e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
s.People_Changed(e)
End Sub
Private Shared Sub _People_OnLoaded(s As __XXListAllPeopleAllFields, succeeded As Boolean)
s.People_Loaded(succeeded)
End Sub
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend NotInheritable Class CommandSetProperties
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend NotInheritable Class MethodSetProperties
End Class
End Class
End Class
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
Partial Public NotInheritable Class ReviewExternalMailMatches
Inherits Global.Microsoft.LightSwitch.Framework.Client.ScreenObject(Of __ReviewExternalMailMatches, __ReviewExternalMailMatches.DetailsClass)
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private Sub New()
MyBase.New("LightSwitchApplication:ReviewExternalMailMatches")
__ReviewExternalMailMatches.DetailsClass.Initialize(Me)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
Public Shared Function CreateInstance() As ReviewExternalMailMatches
Return New __ReviewExternalMailMatches( _
)
End Function
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ReviewExternalMailMatches_InitializeDataWorkspace(ByVal saveChangesTo As Global.System.Collections.Generic.List(Of Global.Microsoft.LightSwitch.IDataService))
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ReviewExternalMailMatches_Created()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ReviewExternalMailMatches_Activated()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ReviewExternalMailMatches_Saving(ByRef handled As Boolean)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ReviewExternalMailMatches_Saved()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ReviewExternalMailMatches_Closing(ByRef cancel As Boolean)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ReviewExternalMailMatches_SaveError(ByVal exception As Global.System.Exception, ByRef handled As Boolean)
End Sub
#Region "Private Properties"
''' <summary>
''' Gets the Application object for this application. The Application object provides access to active screens, methods to open screens and access to the current user.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private ReadOnly Property Application As Global.LightSwitchApplication.Application
Get
Return Global.LightSwitchApplication.Application.Current
End Get
End Property
''' <summary>
''' Gets the containing data workspace. The data workspace provides access to all data sources in the application.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private ReadOnly Property DataWorkspace As Global.LightSwitchApplication.DataWorkspace
Get
Return DirectCast(DirectCast(Me.Details, Global.Microsoft.LightSwitch.Details.Client.IScreenDetails).DataWorkspace, Global.LightSwitchApplication.DataWorkspace)
End Get
End Property
#End Region
Partial Private Sub ExternalMailPeopleByMatchScore_SelectionChanged()
End Sub
Partial Private Sub ExternalMailPeopleByMatchScore_Changed(ByVal e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ExternalMailPeopleByMatchScore_Loaded(ByVal succeeded As Boolean)
End Sub
''' <summary>
''' Gets the ExternalMailPeopleByMatchScore visual collection. The collection contains all records currently shown on the respective list or grid control.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property ExternalMailPeopleByMatchScore As Global.Microsoft.LightSwitch.Framework.Client.VisualCollection(Of Global.LightSwitchApplication.ExternalMailPerson)
Get
Return __ReviewExternalMailMatches.DetailsClass.GetValue(Me, __ReviewExternalMailMatches.DetailsClass.PropertySetProperties.ExternalMailPeopleByMatchScore)
End Get
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ExternalMailPeopleByMatchScore_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class DetailsClass
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenDetails(Of __ReviewExternalMailMatches, __ReviewExternalMailMatches.DetailsClass, __ReviewExternalMailMatches.DetailsClass.PropertySet, __ReviewExternalMailMatches.DetailsClass.CommandSet, __ReviewExternalMailMatches.DetailsClass.MethodSet)
Shared Sub New()
Dim initializePropertyEntry = __ReviewExternalMailMatches.DetailsClass.PropertySetProperties.ExternalMailPeopleByMatchScore
End Sub
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Private Shared ReadOnly __ReviewExternalMailMatchesEntry As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenDetails(Of __ReviewExternalMailMatches, __ReviewExternalMailMatches.DetailsClass).Entry = _
New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenDetails(Of __ReviewExternalMailMatches, __ReviewExternalMailMatches.DetailsClass).Entry( _
AddressOf __ReviewExternalMailMatches.DetailsClass.__ReviewExternalMailMatches_InvokeInitializeDataWorkspace,
AddressOf __ReviewExternalMailMatches.DetailsClass.__ReviewExternalMailMatches_InvokeSavingEvent,
AddressOf __ReviewExternalMailMatches.DetailsClass.__ReviewExternalMailMatches_InvokeSavedEvent,
AddressOf __ReviewExternalMailMatches.DetailsClass.__ReviewExternalMailMatches_InvokeClosingEvent,
AddressOf __ReviewExternalMailMatches.DetailsClass.__ReviewExternalMailMatches_InvokeCreated,
AddressOf __ReviewExternalMailMatches.DetailsClass.__ReviewExternalMailMatches_InvokeActivated,
AddressOf __ReviewExternalMailMatches.DetailsClass.__ReviewExternalMailMatches_InvokeSaveErrorEvent)
Private Shared Sub __ReviewExternalMailMatches_InvokeInitializeDataWorkspace(s As __ReviewExternalMailMatches, saveChangesTo As Global.System.Collections.Generic.List(Of Global.Microsoft.LightSwitch.IDataService))
s.ReviewExternalMailMatches_InitializeDataWorkspace(saveChangesTo)
End Sub
Private Shared Function __ReviewExternalMailMatches_InvokeSavingEvent(s As __ReviewExternalMailMatches) As Boolean
Dim handled = False
s.ReviewExternalMailMatches_Saving(handled)
Return handled
End Function
Private Shared Sub __ReviewExternalMailMatches_InvokeSavedEvent(s As __ReviewExternalMailMatches)
s.ReviewExternalMailMatches_Saved()
End Sub
Private Shared Function __ReviewExternalMailMatches_InvokeClosingEvent(s As __ReviewExternalMailMatches) As Boolean
Dim cancel = False
s.ReviewExternalMailMatches_Closing(cancel)
Return cancel
End Function
Private Shared Sub __ReviewExternalMailMatches_InvokeCreated(s As __ReviewExternalMailMatches)
s.ReviewExternalMailMatches_Created()
End Sub
Private Shared Sub __ReviewExternalMailMatches_InvokeActivated(s As __ReviewExternalMailMatches)
s.ReviewExternalMailMatches_Activated()
End Sub
Private Shared Function __ReviewExternalMailMatches_InvokeSaveErrorEvent(s As __ReviewExternalMailMatches, ex As Global.System.Exception) As Boolean
Dim handled = False
s.ReviewExternalMailMatches_SaveError(ex, handled)
Return handled
End Function
Public Sub New()
MyBase.New()
End Sub
Public Shadows ReadOnly Property Properties As __ReviewExternalMailMatches.DetailsClass.PropertySet
Get
Return MyBase.Properties
End Get
End Property
Public Shadows ReadOnly Property Commands As __ReviewExternalMailMatches.DetailsClass.CommandSet
Get
Return MyBase.Commands
End Get
End Property
Public Shadows ReadOnly Property Methods As __ReviewExternalMailMatches.DetailsClass.MethodSet
Get
Return MyBase.Methods
End Get
End Property
Private Function ExternalMailPeopleByMatchScoreQuery() As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return Me.Screen.DataWorkspace.ApplicationData.ExternalMailPeopleByMatchScore()
End Function
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _ExternalMailPeopleByMatchScore As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __ReviewExternalMailMatches, __ReviewExternalMailMatches.DetailsClass, Global.LightSwitchApplication.ExternalMailPerson).Data
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class PropertySet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenPropertySet(Of __ReviewExternalMailMatches, __ReviewExternalMailMatches.DetailsClass)
Public ReadOnly Property ExternalMailPeopleByMatchScore As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __ReviewExternalMailMatches, __ReviewExternalMailMatches.DetailsClass, Global.LightSwitchApplication.ExternalMailPerson)
Get
Return DirectCast(MyBase.GetItem(__ReviewExternalMailMatches.DetailsClass.PropertySetProperties.ExternalMailPeopleByMatchScore), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __ReviewExternalMailMatches, __ReviewExternalMailMatches.DetailsClass, Global.LightSwitchApplication.ExternalMailPerson))
End Get
End Property
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class CommandSet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommandSet(Of __ReviewExternalMailMatches, __ReviewExternalMailMatches.DetailsClass)
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class MethodSet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethodSet(Of __ReviewExternalMailMatches, __ReviewExternalMailMatches.DetailsClass)
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend NotInheritable Class PropertySetProperties
Public Shared ReadOnly ExternalMailPeopleByMatchScore As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __ReviewExternalMailMatches, __ReviewExternalMailMatches.DetailsClass, Global.LightSwitchApplication.ExternalMailPerson).Entry( _
"ExternalMailPeopleByMatchScore",
AddressOf __ReviewExternalMailMatches.DetailsClass.PropertySetProperties._ExternalMailPeopleByMatchScore_Stub,
AddressOf __ReviewExternalMailMatches.DetailsClass.PropertySetProperties._ExternalMailPeopleByMatchScore_Validate,
AddressOf __ReviewExternalMailMatches.DetailsClass.PropertySetProperties._ExternalMailPeopleByMatchScore_CreateQuery,
AddressOf __ReviewExternalMailMatches.DetailsClass.PropertySetProperties._ExternalMailPeopleByMatchScore_SelectionChanged,
AddressOf __ReviewExternalMailMatches.DetailsClass.PropertySetProperties._ExternalMailPeopleByMatchScore_OnCollectionChanged,
AddressOf __ReviewExternalMailMatches.DetailsClass.PropertySetProperties._ExternalMailPeopleByMatchScore_OnLoaded)
Private Shared Sub _ExternalMailPeopleByMatchScore_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __ReviewExternalMailMatches.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __ReviewExternalMailMatches, __ReviewExternalMailMatches.DetailsClass, Global.LightSwitchApplication.ExternalMailPerson).Data), d As __ReviewExternalMailMatches.DetailsClass, sf As Object)
c(d, d._ExternalMailPeopleByMatchScore, sf)
End Sub
Private Shared Sub _ExternalMailPeopleByMatchScore_Validate(s As __ReviewExternalMailMatches, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.ExternalMailPeopleByMatchScore_Validate(r)
End Sub
Private Shared Function _ExternalMailPeopleByMatchScore_CreateQuery(d As __ReviewExternalMailMatches.DetailsClass, args As Object()) As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return d.ExternalMailPeopleByMatchScoreQuery()
End Function
Private Shared Sub _ExternalMailPeopleByMatchScore_SelectionChanged(s As __ReviewExternalMailMatches)
s.ExternalMailPeopleByMatchScore_SelectionChanged()
End Sub
Private Shared Sub _ExternalMailPeopleByMatchScore_OnCollectionChanged(s As __ReviewExternalMailMatches, e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
s.ExternalMailPeopleByMatchScore_Changed(e)
End Sub
Private Shared Sub _ExternalMailPeopleByMatchScore_OnLoaded(s As __ReviewExternalMailMatches, succeeded As Boolean)
s.ExternalMailPeopleByMatchScore_Loaded(succeeded)
End Sub
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend NotInheritable Class CommandSetProperties
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend NotInheritable Class MethodSetProperties
End Class
End Class
End Class
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
Partial Public NotInheritable Class SelectPeopleToMail
Inherits Global.Microsoft.LightSwitch.Framework.Client.ScreenObject(Of __SelectPeopleToMail, __SelectPeopleToMail.DetailsClass)
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private Sub New(ByVal MailListName As String, ByVal IncludeSecondary As Boolean, ByVal IncludeExternal As Boolean)
MyBase.New("LightSwitchApplication:SelectPeopleToMail")
Me.MailListName = MailListName
Me.IncludeSecondary = IncludeSecondary
Me.IncludeExternal = IncludeExternal
__SelectPeopleToMail.DetailsClass.Initialize(Me)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
Public Shared Function CreateInstance(ByVal MailListName As String, ByVal IncludeSecondary As Boolean, ByVal IncludeExternal As Boolean) As SelectPeopleToMail
Return New __SelectPeopleToMail( _
MailListName _
,IncludeSecondary _
,IncludeExternal _
)
End Function
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub SelectPeopleToMail_InitializeDataWorkspace(ByVal saveChangesTo As Global.System.Collections.Generic.List(Of Global.Microsoft.LightSwitch.IDataService))
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub SelectPeopleToMail_Created()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub SelectPeopleToMail_Activated()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub SelectPeopleToMail_Saving(ByRef handled As Boolean)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub SelectPeopleToMail_Saved()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub SelectPeopleToMail_Closing(ByRef cancel As Boolean)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub SelectPeopleToMail_SaveError(ByVal exception As Global.System.Exception, ByRef handled As Boolean)
End Sub
#Region "Private Properties"
''' <summary>
''' Gets the Application object for this application. The Application object provides access to active screens, methods to open screens and access to the current user.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private ReadOnly Property Application As Global.LightSwitchApplication.Application
Get
Return Global.LightSwitchApplication.Application.Current
End Get
End Property
''' <summary>
''' Gets the containing data workspace. The data workspace provides access to all data sources in the application.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private ReadOnly Property DataWorkspace As Global.LightSwitchApplication.DataWorkspace
Get
Return DirectCast(DirectCast(Me.Details, Global.Microsoft.LightSwitch.Details.Client.IScreenDetails).DataWorkspace, Global.LightSwitchApplication.DataWorkspace)
End Get
End Property
#End Region
Partial Private Sub GetPeopleToMailSelected_SelectionChanged()
End Sub
Partial Private Sub GetPeopleToMailSelected_Changed(ByVal e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub GetPeopleToMailSelected_Loaded(ByVal succeeded As Boolean)
End Sub
Partial Private Sub prmMailListName_Changed()
End Sub
Partial Private Sub prmIncludeSecondaries_Changed()
End Sub
Partial Private Sub prmIncludeExternals_Changed()
End Sub
Partial Private Sub MailListName_Changed()
End Sub
Partial Private Sub IncludeSecondary_Changed()
End Sub
Partial Private Sub IncludeExternal_Changed()
End Sub
Partial Private Sub ptyRecordCount_Changed()
End Sub
''' <summary>
''' Gets the GetPeopleToMailSelected visual collection. The collection contains all records currently shown on the respective list or grid control.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property GetPeopleToMailSelected As Global.Microsoft.LightSwitch.Framework.Client.VisualCollection(Of Global.LightSwitchApplication.PeopleToMail1)
Get
Return __SelectPeopleToMail.DetailsClass.GetValue(Me, __SelectPeopleToMail.DetailsClass.PropertySetProperties.GetPeopleToMailSelected)
End Get
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub GetPeopleToMailSelected_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Property prmMailListName As String
Get
Return __SelectPeopleToMail.DetailsClass.GetValue(Me, __SelectPeopleToMail.DetailsClass.PropertySetProperties.prmMailListName)
End Get
Set(ByVal value As String)
__SelectPeopleToMail.DetailsClass.SetValue(Me, __SelectPeopleToMail.DetailsClass.PropertySetProperties.prmMailListName, value)
End Set
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub prmMailListName_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Property prmIncludeSecondaries As Boolean
Get
Return __SelectPeopleToMail.DetailsClass.GetValue(Me, __SelectPeopleToMail.DetailsClass.PropertySetProperties.prmIncludeSecondaries)
End Get
Set(ByVal value As Boolean)
__SelectPeopleToMail.DetailsClass.SetValue(Me, __SelectPeopleToMail.DetailsClass.PropertySetProperties.prmIncludeSecondaries, value)
End Set
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub prmIncludeSecondaries_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Property prmIncludeExternals As Boolean
Get
Return __SelectPeopleToMail.DetailsClass.GetValue(Me, __SelectPeopleToMail.DetailsClass.PropertySetProperties.prmIncludeExternals)
End Get
Set(ByVal value As Boolean)
__SelectPeopleToMail.DetailsClass.SetValue(Me, __SelectPeopleToMail.DetailsClass.PropertySetProperties.prmIncludeExternals, value)
End Set
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub prmIncludeExternals_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Property MailListName As String
Get
Return __SelectPeopleToMail.DetailsClass.GetValue(Me, __SelectPeopleToMail.DetailsClass.PropertySetProperties.MailListName)
End Get
Set(ByVal value As String)
__SelectPeopleToMail.DetailsClass.SetValue(Me, __SelectPeopleToMail.DetailsClass.PropertySetProperties.MailListName, value)
End Set
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub MailListName_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Property IncludeSecondary As Boolean
Get
Return __SelectPeopleToMail.DetailsClass.GetValue(Me, __SelectPeopleToMail.DetailsClass.PropertySetProperties.IncludeSecondary)
End Get
Set(ByVal value As Boolean)
__SelectPeopleToMail.DetailsClass.SetValue(Me, __SelectPeopleToMail.DetailsClass.PropertySetProperties.IncludeSecondary, value)
End Set
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub IncludeSecondary_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Property IncludeExternal As Boolean
Get
Return __SelectPeopleToMail.DetailsClass.GetValue(Me, __SelectPeopleToMail.DetailsClass.PropertySetProperties.IncludeExternal)
End Get
Set(ByVal value As Boolean)
__SelectPeopleToMail.DetailsClass.SetValue(Me, __SelectPeopleToMail.DetailsClass.PropertySetProperties.IncludeExternal, value)
End Set
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub IncludeExternal_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Property ptyRecordCount As Global.System.Nullable(Of Integer)
Get
Return __SelectPeopleToMail.DetailsClass.GetValue(Me, __SelectPeopleToMail.DetailsClass.PropertySetProperties.ptyRecordCount)
End Get
Set(ByVal value As Global.System.Nullable(Of Integer))
__SelectPeopleToMail.DetailsClass.SetValue(Me, __SelectPeopleToMail.DetailsClass.PropertySetProperties.ptyRecordCount, value)
End Set
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ptyRecordCount_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
''' <summary>
''' Calls the CreateFileForMailService screen method.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Sub CreateFileForMailService()
Me.Details.Methods.CreateFileForMailService.CreateInvocation().Execute()
End Sub
Partial Private Sub CreateFileForMailService_CanExecute(ByRef result As Boolean)
End Sub
Partial Private Sub CreateFileForMailService_Execute()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class DetailsClass
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenDetails(Of __SelectPeopleToMail, __SelectPeopleToMail.DetailsClass, __SelectPeopleToMail.DetailsClass.PropertySet, __SelectPeopleToMail.DetailsClass.CommandSet, __SelectPeopleToMail.DetailsClass.MethodSet)
Shared Sub New()
Dim initializePropertyEntry = __SelectPeopleToMail.DetailsClass.PropertySetProperties.GetPeopleToMailSelected
Dim initializeCommandEntry = __SelectPeopleToMail.DetailsClass.CommandSetProperties.CreateFileForMailService
Dim initializeMethodEntry = __SelectPeopleToMail.DetailsClass.MethodSetProperties.CreateFileForMailService
End Sub
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Private Shared ReadOnly __SelectPeopleToMailEntry As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenDetails(Of __SelectPeopleToMail, __SelectPeopleToMail.DetailsClass).Entry = _
New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenDetails(Of __SelectPeopleToMail, __SelectPeopleToMail.DetailsClass).Entry( _
AddressOf __SelectPeopleToMail.DetailsClass.__SelectPeopleToMail_InvokeInitializeDataWorkspace,
AddressOf __SelectPeopleToMail.DetailsClass.__SelectPeopleToMail_InvokeSavingEvent,
AddressOf __SelectPeopleToMail.DetailsClass.__SelectPeopleToMail_InvokeSavedEvent,
AddressOf __SelectPeopleToMail.DetailsClass.__SelectPeopleToMail_InvokeClosingEvent,
AddressOf __SelectPeopleToMail.DetailsClass.__SelectPeopleToMail_InvokeCreated,
AddressOf __SelectPeopleToMail.DetailsClass.__SelectPeopleToMail_InvokeActivated,
AddressOf __SelectPeopleToMail.DetailsClass.__SelectPeopleToMail_InvokeSaveErrorEvent)
Private Shared Sub __SelectPeopleToMail_InvokeInitializeDataWorkspace(s As __SelectPeopleToMail, saveChangesTo As Global.System.Collections.Generic.List(Of Global.Microsoft.LightSwitch.IDataService))
s.SelectPeopleToMail_InitializeDataWorkspace(saveChangesTo)
End Sub
Private Shared Function __SelectPeopleToMail_InvokeSavingEvent(s As __SelectPeopleToMail) As Boolean
Dim handled = False
s.SelectPeopleToMail_Saving(handled)
Return handled
End Function
Private Shared Sub __SelectPeopleToMail_InvokeSavedEvent(s As __SelectPeopleToMail)
s.SelectPeopleToMail_Saved()
End Sub
Private Shared Function __SelectPeopleToMail_InvokeClosingEvent(s As __SelectPeopleToMail) As Boolean
Dim cancel = False
s.SelectPeopleToMail_Closing(cancel)
Return cancel
End Function
Private Shared Sub __SelectPeopleToMail_InvokeCreated(s As __SelectPeopleToMail)
s.SelectPeopleToMail_Created()
End Sub
Private Shared Sub __SelectPeopleToMail_InvokeActivated(s As __SelectPeopleToMail)
s.SelectPeopleToMail_Activated()
End Sub
Private Shared Function __SelectPeopleToMail_InvokeSaveErrorEvent(s As __SelectPeopleToMail, ex As Global.System.Exception) As Boolean
Dim handled = False
s.SelectPeopleToMail_SaveError(ex, handled)
Return handled
End Function
Public Sub New()
MyBase.New()
End Sub
Public Shadows ReadOnly Property Properties As __SelectPeopleToMail.DetailsClass.PropertySet
Get
Return MyBase.Properties
End Get
End Property
Public Shadows ReadOnly Property Commands As __SelectPeopleToMail.DetailsClass.CommandSet
Get
Return MyBase.Commands
End Get
End Property
Public Shadows ReadOnly Property Methods As __SelectPeopleToMail.DetailsClass.MethodSet
Get
Return MyBase.Methods
End Get
End Property
Private Function GetPeopleToMailSelectedQuery(ByVal MailListName As String, ByVal IncludeSecondaries As Global.System.Nullable(Of Boolean), ByVal IncludeExternals As Global.System.Nullable(Of Boolean)) As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return Global.Microsoft.LightSwitch.DataServiceQueryable.ThenBy( _
Global.Microsoft.LightSwitch.DataServiceQueryable.ThenBy( _
Global.Microsoft.LightSwitch.DataServiceQueryable.OrderBy( _
Me.Screen.DataWorkspace.WCF_RIA_ServiceData.GetPeopleToMailSelected(MailListName, IncludeSecondaries, IncludeExternals), _
Function(p) p.Zip), _
Function(p) p.LastName), _
Function(p) p.FirstName)
End Function
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _GetPeopleToMailSelected As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __SelectPeopleToMail, __SelectPeopleToMail.DetailsClass, Global.LightSwitchApplication.PeopleToMail1).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _prmMailListName As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __SelectPeopleToMail, __SelectPeopleToMail.DetailsClass, String).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _prmIncludeSecondaries As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __SelectPeopleToMail, __SelectPeopleToMail.DetailsClass, Boolean).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _prmIncludeExternals As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __SelectPeopleToMail, __SelectPeopleToMail.DetailsClass, Boolean).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _MailListName As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __SelectPeopleToMail, __SelectPeopleToMail.DetailsClass, String).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _IncludeSecondary As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __SelectPeopleToMail, __SelectPeopleToMail.DetailsClass, Boolean).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _IncludeExternal As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __SelectPeopleToMail, __SelectPeopleToMail.DetailsClass, Boolean).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _ptyRecordCount As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __SelectPeopleToMail, __SelectPeopleToMail.DetailsClass, Global.System.Nullable(Of Integer)).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _CreateFileForMailServiceCommand As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __SelectPeopleToMail, __SelectPeopleToMail.DetailsClass).Data
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _CreateFileForMailServiceMethod As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __SelectPeopleToMail, __SelectPeopleToMail.DetailsClass).Data
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class PropertySet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenPropertySet(Of __SelectPeopleToMail, __SelectPeopleToMail.DetailsClass)
Public ReadOnly Property GetPeopleToMailSelected As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __SelectPeopleToMail, __SelectPeopleToMail.DetailsClass, Global.LightSwitchApplication.PeopleToMail1)
Get
Return DirectCast(MyBase.GetItem(__SelectPeopleToMail.DetailsClass.PropertySetProperties.GetPeopleToMailSelected), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __SelectPeopleToMail, __SelectPeopleToMail.DetailsClass, Global.LightSwitchApplication.PeopleToMail1))
End Get
End Property
Public ReadOnly Property prmMailListName As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __SelectPeopleToMail, __SelectPeopleToMail.DetailsClass, String)
Get
Return DirectCast(MyBase.GetItem(__SelectPeopleToMail.DetailsClass.PropertySetProperties.prmMailListName), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __SelectPeopleToMail, __SelectPeopleToMail.DetailsClass, String))
End Get
End Property
Public ReadOnly Property prmIncludeSecondaries As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __SelectPeopleToMail, __SelectPeopleToMail.DetailsClass, Boolean)
Get
Return DirectCast(MyBase.GetItem(__SelectPeopleToMail.DetailsClass.PropertySetProperties.prmIncludeSecondaries), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __SelectPeopleToMail, __SelectPeopleToMail.DetailsClass, Boolean))
End Get
End Property
Public ReadOnly Property prmIncludeExternals As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __SelectPeopleToMail, __SelectPeopleToMail.DetailsClass, Boolean)
Get
Return DirectCast(MyBase.GetItem(__SelectPeopleToMail.DetailsClass.PropertySetProperties.prmIncludeExternals), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __SelectPeopleToMail, __SelectPeopleToMail.DetailsClass, Boolean))
End Get
End Property
Public ReadOnly Property MailListName As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __SelectPeopleToMail, __SelectPeopleToMail.DetailsClass, String)
Get
Return DirectCast(MyBase.GetItem(__SelectPeopleToMail.DetailsClass.PropertySetProperties.MailListName), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __SelectPeopleToMail, __SelectPeopleToMail.DetailsClass, String))
End Get
End Property
Public ReadOnly Property IncludeSecondary As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __SelectPeopleToMail, __SelectPeopleToMail.DetailsClass, Boolean)
Get
Return DirectCast(MyBase.GetItem(__SelectPeopleToMail.DetailsClass.PropertySetProperties.IncludeSecondary), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __SelectPeopleToMail, __SelectPeopleToMail.DetailsClass, Boolean))
End Get
End Property
Public ReadOnly Property IncludeExternal As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __SelectPeopleToMail, __SelectPeopleToMail.DetailsClass, Boolean)
Get
Return DirectCast(MyBase.GetItem(__SelectPeopleToMail.DetailsClass.PropertySetProperties.IncludeExternal), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __SelectPeopleToMail, __SelectPeopleToMail.DetailsClass, Boolean))
End Get
End Property
Public ReadOnly Property ptyRecordCount As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __SelectPeopleToMail, __SelectPeopleToMail.DetailsClass, Global.System.Nullable(Of Integer))
Get
Return DirectCast(MyBase.GetItem(__SelectPeopleToMail.DetailsClass.PropertySetProperties.ptyRecordCount), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __SelectPeopleToMail, __SelectPeopleToMail.DetailsClass, Global.System.Nullable(Of Integer)))
End Get
End Property
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class CommandSet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommandSet(Of __SelectPeopleToMail, __SelectPeopleToMail.DetailsClass)
Public ReadOnly Property CreateFileForMailService As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __SelectPeopleToMail, __SelectPeopleToMail.DetailsClass)
Get
Return DirectCast(MyBase.GetItem(__SelectPeopleToMail.DetailsClass.CommandSetProperties.CreateFileForMailService), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __SelectPeopleToMail, __SelectPeopleToMail.DetailsClass))
End Get
End Property
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class MethodSet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethodSet(Of __SelectPeopleToMail, __SelectPeopleToMail.DetailsClass)
Public ReadOnly Property CreateFileForMailService As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __SelectPeopleToMail, __SelectPeopleToMail.DetailsClass)
Get
Return DirectCast(MyBase.GetItem(__SelectPeopleToMail.DetailsClass.MethodSetProperties.CreateFileForMailService), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __SelectPeopleToMail, __SelectPeopleToMail.DetailsClass))
End Get
End Property
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend NotInheritable Class PropertySetProperties
Public Shared ReadOnly GetPeopleToMailSelected As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __SelectPeopleToMail, __SelectPeopleToMail.DetailsClass, Global.LightSwitchApplication.PeopleToMail1).Entry( _
"GetPeopleToMailSelected",
AddressOf __SelectPeopleToMail.DetailsClass.PropertySetProperties._GetPeopleToMailSelected_Stub,
AddressOf __SelectPeopleToMail.DetailsClass.PropertySetProperties._GetPeopleToMailSelected_Validate,
AddressOf __SelectPeopleToMail.DetailsClass.PropertySetProperties._GetPeopleToMailSelected_CreateQuery,
AddressOf __SelectPeopleToMail.DetailsClass.PropertySetProperties._GetPeopleToMailSelected_SelectionChanged,
AddressOf __SelectPeopleToMail.DetailsClass.PropertySetProperties._GetPeopleToMailSelected_OnCollectionChanged,
AddressOf __SelectPeopleToMail.DetailsClass.PropertySetProperties._GetPeopleToMailSelected_OnLoaded)
Private Shared Sub _GetPeopleToMailSelected_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __SelectPeopleToMail.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __SelectPeopleToMail, __SelectPeopleToMail.DetailsClass, Global.LightSwitchApplication.PeopleToMail1).Data), d As __SelectPeopleToMail.DetailsClass, sf As Object)
c(d, d._GetPeopleToMailSelected, sf)
End Sub
Private Shared Sub _GetPeopleToMailSelected_Validate(s As __SelectPeopleToMail, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.GetPeopleToMailSelected_Validate(r)
End Sub
Private Shared Function _GetPeopleToMailSelected_CreateQuery(d As __SelectPeopleToMail.DetailsClass, args As Object()) As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return d.GetPeopleToMailSelectedQuery(DirectCast(args(0), String), DirectCast(args(1), Global.System.Nullable(Of Boolean)), DirectCast(args(2), Global.System.Nullable(Of Boolean)))
End Function
Private Shared Sub _GetPeopleToMailSelected_SelectionChanged(s As __SelectPeopleToMail)
s.GetPeopleToMailSelected_SelectionChanged()
End Sub
Private Shared Sub _GetPeopleToMailSelected_OnCollectionChanged(s As __SelectPeopleToMail, e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
s.GetPeopleToMailSelected_Changed(e)
End Sub
Private Shared Sub _GetPeopleToMailSelected_OnLoaded(s As __SelectPeopleToMail, succeeded As Boolean)
s.GetPeopleToMailSelected_Loaded(succeeded)
End Sub
Public Shared ReadOnly prmMailListName As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __SelectPeopleToMail, __SelectPeopleToMail.DetailsClass, String).Entry( _
"prmMailListName",
False,
AddressOf __SelectPeopleToMail.DetailsClass.PropertySetProperties._prmMailListName_Stub,
AddressOf __SelectPeopleToMail.DetailsClass.PropertySetProperties._prmMailListName_Validate,
AddressOf __SelectPeopleToMail.DetailsClass.PropertySetProperties._prmMailListName_OnValueChanged)
Private Shared Sub _prmMailListName_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __SelectPeopleToMail.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __SelectPeopleToMail, __SelectPeopleToMail.DetailsClass, String).Data), d As __SelectPeopleToMail.DetailsClass, sf As Object)
c(d, d._prmMailListName, sf)
End Sub
Private Shared Sub _prmMailListName_Validate(s As __SelectPeopleToMail, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.prmMailListName_Validate(r)
End Sub
Private Shared Sub _prmMailListName_OnValueChanged(s As __SelectPeopleToMail)
s.prmMailListName_Changed()
End Sub
Public Shared ReadOnly prmIncludeSecondaries As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __SelectPeopleToMail, __SelectPeopleToMail.DetailsClass, Boolean).Entry( _
"prmIncludeSecondaries",
False,
AddressOf __SelectPeopleToMail.DetailsClass.PropertySetProperties._prmIncludeSecondaries_Stub,
AddressOf __SelectPeopleToMail.DetailsClass.PropertySetProperties._prmIncludeSecondaries_Validate,
AddressOf __SelectPeopleToMail.DetailsClass.PropertySetProperties._prmIncludeSecondaries_OnValueChanged)
Private Shared Sub _prmIncludeSecondaries_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __SelectPeopleToMail.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __SelectPeopleToMail, __SelectPeopleToMail.DetailsClass, Boolean).Data), d As __SelectPeopleToMail.DetailsClass, sf As Object)
c(d, d._prmIncludeSecondaries, sf)
End Sub
Private Shared Sub _prmIncludeSecondaries_Validate(s As __SelectPeopleToMail, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.prmIncludeSecondaries_Validate(r)
End Sub
Private Shared Sub _prmIncludeSecondaries_OnValueChanged(s As __SelectPeopleToMail)
s.prmIncludeSecondaries_Changed()
End Sub
Public Shared ReadOnly prmIncludeExternals As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __SelectPeopleToMail, __SelectPeopleToMail.DetailsClass, Boolean).Entry( _
"prmIncludeExternals",
False,
AddressOf __SelectPeopleToMail.DetailsClass.PropertySetProperties._prmIncludeExternals_Stub,
AddressOf __SelectPeopleToMail.DetailsClass.PropertySetProperties._prmIncludeExternals_Validate,
AddressOf __SelectPeopleToMail.DetailsClass.PropertySetProperties._prmIncludeExternals_OnValueChanged)
Private Shared Sub _prmIncludeExternals_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __SelectPeopleToMail.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __SelectPeopleToMail, __SelectPeopleToMail.DetailsClass, Boolean).Data), d As __SelectPeopleToMail.DetailsClass, sf As Object)
c(d, d._prmIncludeExternals, sf)
End Sub
Private Shared Sub _prmIncludeExternals_Validate(s As __SelectPeopleToMail, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.prmIncludeExternals_Validate(r)
End Sub
Private Shared Sub _prmIncludeExternals_OnValueChanged(s As __SelectPeopleToMail)
s.prmIncludeExternals_Changed()
End Sub
Public Shared ReadOnly MailListName As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __SelectPeopleToMail, __SelectPeopleToMail.DetailsClass, String).Entry( _
"MailListName",
False,
AddressOf __SelectPeopleToMail.DetailsClass.PropertySetProperties._MailListName_Stub,
AddressOf __SelectPeopleToMail.DetailsClass.PropertySetProperties._MailListName_Validate,
AddressOf __SelectPeopleToMail.DetailsClass.PropertySetProperties._MailListName_OnValueChanged)
Private Shared Sub _MailListName_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __SelectPeopleToMail.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __SelectPeopleToMail, __SelectPeopleToMail.DetailsClass, String).Data), d As __SelectPeopleToMail.DetailsClass, sf As Object)
c(d, d._MailListName, sf)
End Sub
Private Shared Sub _MailListName_Validate(s As __SelectPeopleToMail, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.MailListName_Validate(r)
End Sub
Private Shared Sub _MailListName_OnValueChanged(s As __SelectPeopleToMail)
s.MailListName_Changed()
End Sub
Public Shared ReadOnly IncludeSecondary As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __SelectPeopleToMail, __SelectPeopleToMail.DetailsClass, Boolean).Entry( _
"IncludeSecondary",
False,
AddressOf __SelectPeopleToMail.DetailsClass.PropertySetProperties._IncludeSecondary_Stub,
AddressOf __SelectPeopleToMail.DetailsClass.PropertySetProperties._IncludeSecondary_Validate,
AddressOf __SelectPeopleToMail.DetailsClass.PropertySetProperties._IncludeSecondary_OnValueChanged)
Private Shared Sub _IncludeSecondary_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __SelectPeopleToMail.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __SelectPeopleToMail, __SelectPeopleToMail.DetailsClass, Boolean).Data), d As __SelectPeopleToMail.DetailsClass, sf As Object)
c(d, d._IncludeSecondary, sf)
End Sub
Private Shared Sub _IncludeSecondary_Validate(s As __SelectPeopleToMail, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.IncludeSecondary_Validate(r)
End Sub
Private Shared Sub _IncludeSecondary_OnValueChanged(s As __SelectPeopleToMail)
s.IncludeSecondary_Changed()
End Sub
Public Shared ReadOnly IncludeExternal As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __SelectPeopleToMail, __SelectPeopleToMail.DetailsClass, Boolean).Entry( _
"IncludeExternal",
False,
AddressOf __SelectPeopleToMail.DetailsClass.PropertySetProperties._IncludeExternal_Stub,
AddressOf __SelectPeopleToMail.DetailsClass.PropertySetProperties._IncludeExternal_Validate,
AddressOf __SelectPeopleToMail.DetailsClass.PropertySetProperties._IncludeExternal_OnValueChanged)
Private Shared Sub _IncludeExternal_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __SelectPeopleToMail.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __SelectPeopleToMail, __SelectPeopleToMail.DetailsClass, Boolean).Data), d As __SelectPeopleToMail.DetailsClass, sf As Object)
c(d, d._IncludeExternal, sf)
End Sub
Private Shared Sub _IncludeExternal_Validate(s As __SelectPeopleToMail, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.IncludeExternal_Validate(r)
End Sub
Private Shared Sub _IncludeExternal_OnValueChanged(s As __SelectPeopleToMail)
s.IncludeExternal_Changed()
End Sub
Public Shared ReadOnly ptyRecordCount As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __SelectPeopleToMail, __SelectPeopleToMail.DetailsClass, Global.System.Nullable(Of Integer)).Entry( _
"ptyRecordCount",
False,
AddressOf __SelectPeopleToMail.DetailsClass.PropertySetProperties._ptyRecordCount_Stub,
AddressOf __SelectPeopleToMail.DetailsClass.PropertySetProperties._ptyRecordCount_Validate,
AddressOf __SelectPeopleToMail.DetailsClass.PropertySetProperties._ptyRecordCount_OnValueChanged)
Private Shared Sub _ptyRecordCount_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __SelectPeopleToMail.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenLocalProperty(Of __SelectPeopleToMail, __SelectPeopleToMail.DetailsClass, Global.System.Nullable(Of Integer)).Data), d As __SelectPeopleToMail.DetailsClass, sf As Object)
c(d, d._ptyRecordCount, sf)
End Sub
Private Shared Sub _ptyRecordCount_Validate(s As __SelectPeopleToMail, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.ptyRecordCount_Validate(r)
End Sub
Private Shared Sub _ptyRecordCount_OnValueChanged(s As __SelectPeopleToMail)
s.ptyRecordCount_Changed()
End Sub
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend NotInheritable Class CommandSetProperties
Public Shared ReadOnly CreateFileForMailService As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __SelectPeopleToMail, __SelectPeopleToMail.DetailsClass).Entry( _
"CreateFileForMailService",
AddressOf __SelectPeopleToMail.DetailsClass.CommandSetProperties._CreateFileForMailService_Stub,
AddressOf __SelectPeopleToMail.DetailsClass.CommandSetProperties._CreateFileForMailService_CreateExecutableObject)
Private Shared Sub _CreateFileForMailService_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __SelectPeopleToMail.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommand(Of __SelectPeopleToMail, __SelectPeopleToMail.DetailsClass).Data), d As __SelectPeopleToMail.DetailsClass, sf As Object)
c(d, d._CreateFileForMailServiceCommand, sf)
End Sub
Private Shared Function _CreateFileForMailService_CreateExecutableObject(d As __SelectPeopleToMail.DetailsClass) As Global.Microsoft.LightSwitch.IExecutable
Return DirectCast(d, __SelectPeopleToMail.DetailsClass).Methods.CreateFileForMailService.CreateInvocation()
End Function
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend NotInheritable Class MethodSetProperties
Public Shared ReadOnly CreateFileForMailService As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __SelectPeopleToMail, __SelectPeopleToMail.DetailsClass).Entry( _
"CreateFileForMailService",
AddressOf __SelectPeopleToMail.DetailsClass.MethodSetProperties._CreateFileForMailService_Stub,
AddressOf __SelectPeopleToMail.DetailsClass.MethodSetProperties._CreateFileForMailService_CanInvoke,
AddressOf __SelectPeopleToMail.DetailsClass.MethodSetProperties._CreateFileForMailService_InvokeMethod)
Private Shared Sub _CreateFileForMailService_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __SelectPeopleToMail.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethod(Of __SelectPeopleToMail, __SelectPeopleToMail.DetailsClass).Data), d As __SelectPeopleToMail.DetailsClass, sf As Object)
c(d, d._CreateFileForMailServiceMethod, sf)
End Sub
Private Shared Function _CreateFileForMailService_CanInvoke(d As __SelectPeopleToMail.DetailsClass, args As Global.System.Collections.ObjectModel.ReadOnlyCollection(Of Object), ex As Global.System.Exception) As Global.System.Exception
Dim result = True
d.Screen.CreateFileForMailService_CanExecute(result)
Return If(result, Nothing, ex)
End Function
Private Shared Sub _CreateFileForMailService_InvokeMethod(d As __SelectPeopleToMail.DetailsClass, args As Global.System.Collections.ObjectModel.ReadOnlyCollection(Of Object))
d.Screen.CreateFileForMailService_Execute()
End Sub
End Class
End Class
End Class
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
Partial Public NotInheritable Class EditMailListCodes
Inherits Global.Microsoft.LightSwitch.Framework.Client.ScreenObject(Of __EditMailListCodes, __EditMailListCodes.DetailsClass)
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private Sub New()
MyBase.New("LightSwitchApplication:EditMailListCodes")
__EditMailListCodes.DetailsClass.Initialize(Me)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
Public Shared Function CreateInstance() As EditMailListCodes
Return New __EditMailListCodes( _
)
End Function
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub EditMailListCodes_InitializeDataWorkspace(ByVal saveChangesTo As Global.System.Collections.Generic.List(Of Global.Microsoft.LightSwitch.IDataService))
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub EditMailListCodes_Created()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub EditMailListCodes_Activated()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub EditMailListCodes_Saving(ByRef handled As Boolean)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub EditMailListCodes_Saved()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub EditMailListCodes_Closing(ByRef cancel As Boolean)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub EditMailListCodes_SaveError(ByVal exception As Global.System.Exception, ByRef handled As Boolean)
End Sub
#Region "Private Properties"
''' <summary>
''' Gets the Application object for this application. The Application object provides access to active screens, methods to open screens and access to the current user.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private ReadOnly Property Application As Global.LightSwitchApplication.Application
Get
Return Global.LightSwitchApplication.Application.Current
End Get
End Property
''' <summary>
''' Gets the containing data workspace. The data workspace provides access to all data sources in the application.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private ReadOnly Property DataWorkspace As Global.LightSwitchApplication.DataWorkspace
Get
Return DirectCast(DirectCast(Me.Details, Global.Microsoft.LightSwitch.Details.Client.IScreenDetails).DataWorkspace, Global.LightSwitchApplication.DataWorkspace)
End Get
End Property
#End Region
Partial Private Sub MailListCodes_SelectionChanged()
End Sub
Partial Private Sub MailListCodes_Changed(ByVal e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub MailListCodes_Loaded(ByVal succeeded As Boolean)
End Sub
''' <summary>
''' Gets the MailListCodes visual collection. The collection contains all records currently shown on the respective list or grid control.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property MailListCodes As Global.Microsoft.LightSwitch.Framework.Client.VisualCollection(Of Global.LightSwitchApplication.MailListCode)
Get
Return __EditMailListCodes.DetailsClass.GetValue(Me, __EditMailListCodes.DetailsClass.PropertySetProperties.MailListCodes)
End Get
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub MailListCodes_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class DetailsClass
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenDetails(Of __EditMailListCodes, __EditMailListCodes.DetailsClass, __EditMailListCodes.DetailsClass.PropertySet, __EditMailListCodes.DetailsClass.CommandSet, __EditMailListCodes.DetailsClass.MethodSet)
Shared Sub New()
Dim initializePropertyEntry = __EditMailListCodes.DetailsClass.PropertySetProperties.MailListCodes
End Sub
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Private Shared ReadOnly __EditMailListCodesEntry As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenDetails(Of __EditMailListCodes, __EditMailListCodes.DetailsClass).Entry = _
New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenDetails(Of __EditMailListCodes, __EditMailListCodes.DetailsClass).Entry( _
AddressOf __EditMailListCodes.DetailsClass.__EditMailListCodes_InvokeInitializeDataWorkspace,
AddressOf __EditMailListCodes.DetailsClass.__EditMailListCodes_InvokeSavingEvent,
AddressOf __EditMailListCodes.DetailsClass.__EditMailListCodes_InvokeSavedEvent,
AddressOf __EditMailListCodes.DetailsClass.__EditMailListCodes_InvokeClosingEvent,
AddressOf __EditMailListCodes.DetailsClass.__EditMailListCodes_InvokeCreated,
AddressOf __EditMailListCodes.DetailsClass.__EditMailListCodes_InvokeActivated,
AddressOf __EditMailListCodes.DetailsClass.__EditMailListCodes_InvokeSaveErrorEvent)
Private Shared Sub __EditMailListCodes_InvokeInitializeDataWorkspace(s As __EditMailListCodes, saveChangesTo As Global.System.Collections.Generic.List(Of Global.Microsoft.LightSwitch.IDataService))
s.EditMailListCodes_InitializeDataWorkspace(saveChangesTo)
End Sub
Private Shared Function __EditMailListCodes_InvokeSavingEvent(s As __EditMailListCodes) As Boolean
Dim handled = False
s.EditMailListCodes_Saving(handled)
Return handled
End Function
Private Shared Sub __EditMailListCodes_InvokeSavedEvent(s As __EditMailListCodes)
s.EditMailListCodes_Saved()
End Sub
Private Shared Function __EditMailListCodes_InvokeClosingEvent(s As __EditMailListCodes) As Boolean
Dim cancel = False
s.EditMailListCodes_Closing(cancel)
Return cancel
End Function
Private Shared Sub __EditMailListCodes_InvokeCreated(s As __EditMailListCodes)
s.EditMailListCodes_Created()
End Sub
Private Shared Sub __EditMailListCodes_InvokeActivated(s As __EditMailListCodes)
s.EditMailListCodes_Activated()
End Sub
Private Shared Function __EditMailListCodes_InvokeSaveErrorEvent(s As __EditMailListCodes, ex As Global.System.Exception) As Boolean
Dim handled = False
s.EditMailListCodes_SaveError(ex, handled)
Return handled
End Function
Public Sub New()
MyBase.New()
End Sub
Public Shadows ReadOnly Property Properties As __EditMailListCodes.DetailsClass.PropertySet
Get
Return MyBase.Properties
End Get
End Property
Public Shadows ReadOnly Property Commands As __EditMailListCodes.DetailsClass.CommandSet
Get
Return MyBase.Commands
End Get
End Property
Public Shadows ReadOnly Property Methods As __EditMailListCodes.DetailsClass.MethodSet
Get
Return MyBase.Methods
End Get
End Property
Private Function MailListCodesQuery() As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return Global.Microsoft.LightSwitch.DataServiceQueryable.Include(
Global.Microsoft.LightSwitch.DataServiceQueryable.Include(
Me.Screen.DataWorkspace.ApplicationData.MailListCodes,
"MailList"),
"MailCode")
End Function
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _MailListCodes As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __EditMailListCodes, __EditMailListCodes.DetailsClass, Global.LightSwitchApplication.MailListCode).Data
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class PropertySet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenPropertySet(Of __EditMailListCodes, __EditMailListCodes.DetailsClass)
Public ReadOnly Property MailListCodes As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __EditMailListCodes, __EditMailListCodes.DetailsClass, Global.LightSwitchApplication.MailListCode)
Get
Return DirectCast(MyBase.GetItem(__EditMailListCodes.DetailsClass.PropertySetProperties.MailListCodes), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __EditMailListCodes, __EditMailListCodes.DetailsClass, Global.LightSwitchApplication.MailListCode))
End Get
End Property
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class CommandSet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommandSet(Of __EditMailListCodes, __EditMailListCodes.DetailsClass)
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class MethodSet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethodSet(Of __EditMailListCodes, __EditMailListCodes.DetailsClass)
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend NotInheritable Class PropertySetProperties
Public Shared ReadOnly MailListCodes As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __EditMailListCodes, __EditMailListCodes.DetailsClass, Global.LightSwitchApplication.MailListCode).Entry( _
"MailListCodes",
AddressOf __EditMailListCodes.DetailsClass.PropertySetProperties._MailListCodes_Stub,
AddressOf __EditMailListCodes.DetailsClass.PropertySetProperties._MailListCodes_Validate,
AddressOf __EditMailListCodes.DetailsClass.PropertySetProperties._MailListCodes_CreateQuery,
AddressOf __EditMailListCodes.DetailsClass.PropertySetProperties._MailListCodes_SelectionChanged,
AddressOf __EditMailListCodes.DetailsClass.PropertySetProperties._MailListCodes_OnCollectionChanged,
AddressOf __EditMailListCodes.DetailsClass.PropertySetProperties._MailListCodes_OnLoaded)
Private Shared Sub _MailListCodes_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __EditMailListCodes.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __EditMailListCodes, __EditMailListCodes.DetailsClass, Global.LightSwitchApplication.MailListCode).Data), d As __EditMailListCodes.DetailsClass, sf As Object)
c(d, d._MailListCodes, sf)
End Sub
Private Shared Sub _MailListCodes_Validate(s As __EditMailListCodes, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.MailListCodes_Validate(r)
End Sub
Private Shared Function _MailListCodes_CreateQuery(d As __EditMailListCodes.DetailsClass, args As Object()) As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return d.MailListCodesQuery()
End Function
Private Shared Sub _MailListCodes_SelectionChanged(s As __EditMailListCodes)
s.MailListCodes_SelectionChanged()
End Sub
Private Shared Sub _MailListCodes_OnCollectionChanged(s As __EditMailListCodes, e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
s.MailListCodes_Changed(e)
End Sub
Private Shared Sub _MailListCodes_OnLoaded(s As __EditMailListCodes, succeeded As Boolean)
s.MailListCodes_Loaded(succeeded)
End Sub
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend NotInheritable Class CommandSetProperties
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend NotInheritable Class MethodSetProperties
End Class
End Class
End Class
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
Partial Public NotInheritable Class EditMailLists
Inherits Global.Microsoft.LightSwitch.Framework.Client.ScreenObject(Of __EditMailLists, __EditMailLists.DetailsClass)
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private Sub New()
MyBase.New("LightSwitchApplication:EditMailLists")
__EditMailLists.DetailsClass.Initialize(Me)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
Public Shared Function CreateInstance() As EditMailLists
Return New __EditMailLists( _
)
End Function
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub EditMailLists_InitializeDataWorkspace(ByVal saveChangesTo As Global.System.Collections.Generic.List(Of Global.Microsoft.LightSwitch.IDataService))
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub EditMailLists_Created()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub EditMailLists_Activated()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub EditMailLists_Saving(ByRef handled As Boolean)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub EditMailLists_Saved()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub EditMailLists_Closing(ByRef cancel As Boolean)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub EditMailLists_SaveError(ByVal exception As Global.System.Exception, ByRef handled As Boolean)
End Sub
#Region "Private Properties"
''' <summary>
''' Gets the Application object for this application. The Application object provides access to active screens, methods to open screens and access to the current user.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private ReadOnly Property Application As Global.LightSwitchApplication.Application
Get
Return Global.LightSwitchApplication.Application.Current
End Get
End Property
''' <summary>
''' Gets the containing data workspace. The data workspace provides access to all data sources in the application.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private ReadOnly Property DataWorkspace As Global.LightSwitchApplication.DataWorkspace
Get
Return DirectCast(DirectCast(Me.Details, Global.Microsoft.LightSwitch.Details.Client.IScreenDetails).DataWorkspace, Global.LightSwitchApplication.DataWorkspace)
End Get
End Property
#End Region
Partial Private Sub MailLists_SelectionChanged()
End Sub
Partial Private Sub MailLists_Changed(ByVal e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub MailLists_Loaded(ByVal succeeded As Boolean)
End Sub
''' <summary>
''' Gets the MailLists visual collection. The collection contains all records currently shown on the respective list or grid control.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property MailLists As Global.Microsoft.LightSwitch.Framework.Client.VisualCollection(Of Global.LightSwitchApplication.MailList)
Get
Return __EditMailLists.DetailsClass.GetValue(Me, __EditMailLists.DetailsClass.PropertySetProperties.MailLists)
End Get
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub MailLists_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class DetailsClass
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenDetails(Of __EditMailLists, __EditMailLists.DetailsClass, __EditMailLists.DetailsClass.PropertySet, __EditMailLists.DetailsClass.CommandSet, __EditMailLists.DetailsClass.MethodSet)
Shared Sub New()
Dim initializePropertyEntry = __EditMailLists.DetailsClass.PropertySetProperties.MailLists
End Sub
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Private Shared ReadOnly __EditMailListsEntry As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenDetails(Of __EditMailLists, __EditMailLists.DetailsClass).Entry = _
New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenDetails(Of __EditMailLists, __EditMailLists.DetailsClass).Entry( _
AddressOf __EditMailLists.DetailsClass.__EditMailLists_InvokeInitializeDataWorkspace,
AddressOf __EditMailLists.DetailsClass.__EditMailLists_InvokeSavingEvent,
AddressOf __EditMailLists.DetailsClass.__EditMailLists_InvokeSavedEvent,
AddressOf __EditMailLists.DetailsClass.__EditMailLists_InvokeClosingEvent,
AddressOf __EditMailLists.DetailsClass.__EditMailLists_InvokeCreated,
AddressOf __EditMailLists.DetailsClass.__EditMailLists_InvokeActivated,
AddressOf __EditMailLists.DetailsClass.__EditMailLists_InvokeSaveErrorEvent)
Private Shared Sub __EditMailLists_InvokeInitializeDataWorkspace(s As __EditMailLists, saveChangesTo As Global.System.Collections.Generic.List(Of Global.Microsoft.LightSwitch.IDataService))
s.EditMailLists_InitializeDataWorkspace(saveChangesTo)
End Sub
Private Shared Function __EditMailLists_InvokeSavingEvent(s As __EditMailLists) As Boolean
Dim handled = False
s.EditMailLists_Saving(handled)
Return handled
End Function
Private Shared Sub __EditMailLists_InvokeSavedEvent(s As __EditMailLists)
s.EditMailLists_Saved()
End Sub
Private Shared Function __EditMailLists_InvokeClosingEvent(s As __EditMailLists) As Boolean
Dim cancel = False
s.EditMailLists_Closing(cancel)
Return cancel
End Function
Private Shared Sub __EditMailLists_InvokeCreated(s As __EditMailLists)
s.EditMailLists_Created()
End Sub
Private Shared Sub __EditMailLists_InvokeActivated(s As __EditMailLists)
s.EditMailLists_Activated()
End Sub
Private Shared Function __EditMailLists_InvokeSaveErrorEvent(s As __EditMailLists, ex As Global.System.Exception) As Boolean
Dim handled = False
s.EditMailLists_SaveError(ex, handled)
Return handled
End Function
Public Sub New()
MyBase.New()
End Sub
Public Shadows ReadOnly Property Properties As __EditMailLists.DetailsClass.PropertySet
Get
Return MyBase.Properties
End Get
End Property
Public Shadows ReadOnly Property Commands As __EditMailLists.DetailsClass.CommandSet
Get
Return MyBase.Commands
End Get
End Property
Public Shadows ReadOnly Property Methods As __EditMailLists.DetailsClass.MethodSet
Get
Return MyBase.Methods
End Get
End Property
Private Function MailListsQuery() As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return Me.Screen.DataWorkspace.ApplicationData.MailLists
End Function
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _MailLists As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __EditMailLists, __EditMailLists.DetailsClass, Global.LightSwitchApplication.MailList).Data
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class PropertySet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenPropertySet(Of __EditMailLists, __EditMailLists.DetailsClass)
Public ReadOnly Property MailLists As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __EditMailLists, __EditMailLists.DetailsClass, Global.LightSwitchApplication.MailList)
Get
Return DirectCast(MyBase.GetItem(__EditMailLists.DetailsClass.PropertySetProperties.MailLists), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __EditMailLists, __EditMailLists.DetailsClass, Global.LightSwitchApplication.MailList))
End Get
End Property
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class CommandSet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommandSet(Of __EditMailLists, __EditMailLists.DetailsClass)
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class MethodSet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethodSet(Of __EditMailLists, __EditMailLists.DetailsClass)
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend NotInheritable Class PropertySetProperties
Public Shared ReadOnly MailLists As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __EditMailLists, __EditMailLists.DetailsClass, Global.LightSwitchApplication.MailList).Entry( _
"MailLists",
AddressOf __EditMailLists.DetailsClass.PropertySetProperties._MailLists_Stub,
AddressOf __EditMailLists.DetailsClass.PropertySetProperties._MailLists_Validate,
AddressOf __EditMailLists.DetailsClass.PropertySetProperties._MailLists_CreateQuery,
AddressOf __EditMailLists.DetailsClass.PropertySetProperties._MailLists_SelectionChanged,
AddressOf __EditMailLists.DetailsClass.PropertySetProperties._MailLists_OnCollectionChanged,
AddressOf __EditMailLists.DetailsClass.PropertySetProperties._MailLists_OnLoaded)
Private Shared Sub _MailLists_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __EditMailLists.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __EditMailLists, __EditMailLists.DetailsClass, Global.LightSwitchApplication.MailList).Data), d As __EditMailLists.DetailsClass, sf As Object)
c(d, d._MailLists, sf)
End Sub
Private Shared Sub _MailLists_Validate(s As __EditMailLists, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.MailLists_Validate(r)
End Sub
Private Shared Function _MailLists_CreateQuery(d As __EditMailLists.DetailsClass, args As Object()) As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return d.MailListsQuery()
End Function
Private Shared Sub _MailLists_SelectionChanged(s As __EditMailLists)
s.MailLists_SelectionChanged()
End Sub
Private Shared Sub _MailLists_OnCollectionChanged(s As __EditMailLists, e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
s.MailLists_Changed(e)
End Sub
Private Shared Sub _MailLists_OnLoaded(s As __EditMailLists, succeeded As Boolean)
s.MailLists_Loaded(succeeded)
End Sub
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend NotInheritable Class CommandSetProperties
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend NotInheritable Class MethodSetProperties
End Class
End Class
End Class
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
Partial Public NotInheritable Class ListMailCodes
Inherits Global.Microsoft.LightSwitch.Framework.Client.ScreenObject(Of __ListMailCodes, __ListMailCodes.DetailsClass)
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private Sub New()
MyBase.New("LightSwitchApplication:ListMailCodes")
__ListMailCodes.DetailsClass.Initialize(Me)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
Public Shared Function CreateInstance() As ListMailCodes
Return New __ListMailCodes( _
)
End Function
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ListMailCodes_InitializeDataWorkspace(ByVal saveChangesTo As Global.System.Collections.Generic.List(Of Global.Microsoft.LightSwitch.IDataService))
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ListMailCodes_Created()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ListMailCodes_Activated()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ListMailCodes_Saving(ByRef handled As Boolean)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ListMailCodes_Saved()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ListMailCodes_Closing(ByRef cancel As Boolean)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ListMailCodes_SaveError(ByVal exception As Global.System.Exception, ByRef handled As Boolean)
End Sub
#Region "Private Properties"
''' <summary>
''' Gets the Application object for this application. The Application object provides access to active screens, methods to open screens and access to the current user.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private ReadOnly Property Application As Global.LightSwitchApplication.Application
Get
Return Global.LightSwitchApplication.Application.Current
End Get
End Property
''' <summary>
''' Gets the containing data workspace. The data workspace provides access to all data sources in the application.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private ReadOnly Property DataWorkspace As Global.LightSwitchApplication.DataWorkspace
Get
Return DirectCast(DirectCast(Me.Details, Global.Microsoft.LightSwitch.Details.Client.IScreenDetails).DataWorkspace, Global.LightSwitchApplication.DataWorkspace)
End Get
End Property
#End Region
Partial Private Sub MailCodes_SelectionChanged()
End Sub
Partial Private Sub MailCodes_Changed(ByVal e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub MailCodes_Loaded(ByVal succeeded As Boolean)
End Sub
''' <summary>
''' Gets the MailCodes visual collection. The collection contains all records currently shown on the respective list or grid control.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property MailCodes As Global.Microsoft.LightSwitch.Framework.Client.VisualCollection(Of Global.LightSwitchApplication.MailCode)
Get
Return __ListMailCodes.DetailsClass.GetValue(Me, __ListMailCodes.DetailsClass.PropertySetProperties.MailCodes)
End Get
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub MailCodes_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class DetailsClass
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenDetails(Of __ListMailCodes, __ListMailCodes.DetailsClass, __ListMailCodes.DetailsClass.PropertySet, __ListMailCodes.DetailsClass.CommandSet, __ListMailCodes.DetailsClass.MethodSet)
Shared Sub New()
Dim initializePropertyEntry = __ListMailCodes.DetailsClass.PropertySetProperties.MailCodes
End Sub
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Private Shared ReadOnly __ListMailCodesEntry As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenDetails(Of __ListMailCodes, __ListMailCodes.DetailsClass).Entry = _
New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenDetails(Of __ListMailCodes, __ListMailCodes.DetailsClass).Entry( _
AddressOf __ListMailCodes.DetailsClass.__ListMailCodes_InvokeInitializeDataWorkspace,
AddressOf __ListMailCodes.DetailsClass.__ListMailCodes_InvokeSavingEvent,
AddressOf __ListMailCodes.DetailsClass.__ListMailCodes_InvokeSavedEvent,
AddressOf __ListMailCodes.DetailsClass.__ListMailCodes_InvokeClosingEvent,
AddressOf __ListMailCodes.DetailsClass.__ListMailCodes_InvokeCreated,
AddressOf __ListMailCodes.DetailsClass.__ListMailCodes_InvokeActivated,
AddressOf __ListMailCodes.DetailsClass.__ListMailCodes_InvokeSaveErrorEvent)
Private Shared Sub __ListMailCodes_InvokeInitializeDataWorkspace(s As __ListMailCodes, saveChangesTo As Global.System.Collections.Generic.List(Of Global.Microsoft.LightSwitch.IDataService))
s.ListMailCodes_InitializeDataWorkspace(saveChangesTo)
End Sub
Private Shared Function __ListMailCodes_InvokeSavingEvent(s As __ListMailCodes) As Boolean
Dim handled = False
s.ListMailCodes_Saving(handled)
Return handled
End Function
Private Shared Sub __ListMailCodes_InvokeSavedEvent(s As __ListMailCodes)
s.ListMailCodes_Saved()
End Sub
Private Shared Function __ListMailCodes_InvokeClosingEvent(s As __ListMailCodes) As Boolean
Dim cancel = False
s.ListMailCodes_Closing(cancel)
Return cancel
End Function
Private Shared Sub __ListMailCodes_InvokeCreated(s As __ListMailCodes)
s.ListMailCodes_Created()
End Sub
Private Shared Sub __ListMailCodes_InvokeActivated(s As __ListMailCodes)
s.ListMailCodes_Activated()
End Sub
Private Shared Function __ListMailCodes_InvokeSaveErrorEvent(s As __ListMailCodes, ex As Global.System.Exception) As Boolean
Dim handled = False
s.ListMailCodes_SaveError(ex, handled)
Return handled
End Function
Public Sub New()
MyBase.New()
End Sub
Public Shadows ReadOnly Property Properties As __ListMailCodes.DetailsClass.PropertySet
Get
Return MyBase.Properties
End Get
End Property
Public Shadows ReadOnly Property Commands As __ListMailCodes.DetailsClass.CommandSet
Get
Return MyBase.Commands
End Get
End Property
Public Shadows ReadOnly Property Methods As __ListMailCodes.DetailsClass.MethodSet
Get
Return MyBase.Methods
End Get
End Property
Private Function MailCodesQuery() As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return Me.Screen.DataWorkspace.ApplicationData.MailCodes
End Function
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _MailCodes As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __ListMailCodes, __ListMailCodes.DetailsClass, Global.LightSwitchApplication.MailCode).Data
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class PropertySet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenPropertySet(Of __ListMailCodes, __ListMailCodes.DetailsClass)
Public ReadOnly Property MailCodes As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __ListMailCodes, __ListMailCodes.DetailsClass, Global.LightSwitchApplication.MailCode)
Get
Return DirectCast(MyBase.GetItem(__ListMailCodes.DetailsClass.PropertySetProperties.MailCodes), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __ListMailCodes, __ListMailCodes.DetailsClass, Global.LightSwitchApplication.MailCode))
End Get
End Property
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class CommandSet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommandSet(Of __ListMailCodes, __ListMailCodes.DetailsClass)
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class MethodSet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethodSet(Of __ListMailCodes, __ListMailCodes.DetailsClass)
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend NotInheritable Class PropertySetProperties
Public Shared ReadOnly MailCodes As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __ListMailCodes, __ListMailCodes.DetailsClass, Global.LightSwitchApplication.MailCode).Entry( _
"MailCodes",
AddressOf __ListMailCodes.DetailsClass.PropertySetProperties._MailCodes_Stub,
AddressOf __ListMailCodes.DetailsClass.PropertySetProperties._MailCodes_Validate,
AddressOf __ListMailCodes.DetailsClass.PropertySetProperties._MailCodes_CreateQuery,
AddressOf __ListMailCodes.DetailsClass.PropertySetProperties._MailCodes_SelectionChanged,
AddressOf __ListMailCodes.DetailsClass.PropertySetProperties._MailCodes_OnCollectionChanged,
AddressOf __ListMailCodes.DetailsClass.PropertySetProperties._MailCodes_OnLoaded)
Private Shared Sub _MailCodes_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __ListMailCodes.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __ListMailCodes, __ListMailCodes.DetailsClass, Global.LightSwitchApplication.MailCode).Data), d As __ListMailCodes.DetailsClass, sf As Object)
c(d, d._MailCodes, sf)
End Sub
Private Shared Sub _MailCodes_Validate(s As __ListMailCodes, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.MailCodes_Validate(r)
End Sub
Private Shared Function _MailCodes_CreateQuery(d As __ListMailCodes.DetailsClass, args As Object()) As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return d.MailCodesQuery()
End Function
Private Shared Sub _MailCodes_SelectionChanged(s As __ListMailCodes)
s.MailCodes_SelectionChanged()
End Sub
Private Shared Sub _MailCodes_OnCollectionChanged(s As __ListMailCodes, e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
s.MailCodes_Changed(e)
End Sub
Private Shared Sub _MailCodes_OnLoaded(s As __ListMailCodes, succeeded As Boolean)
s.MailCodes_Loaded(succeeded)
End Sub
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend NotInheritable Class CommandSetProperties
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend NotInheritable Class MethodSetProperties
End Class
End Class
End Class
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
Partial Public NotInheritable Class ListMailListsOnly
Inherits Global.Microsoft.LightSwitch.Framework.Client.ScreenObject(Of __ListMailListsOnly, __ListMailListsOnly.DetailsClass)
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private Sub New()
MyBase.New("LightSwitchApplication:ListMailListsOnly")
__ListMailListsOnly.DetailsClass.Initialize(Me)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
Public Shared Function CreateInstance() As ListMailListsOnly
Return New __ListMailListsOnly( _
)
End Function
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ListMailListsOnly_InitializeDataWorkspace(ByVal saveChangesTo As Global.System.Collections.Generic.List(Of Global.Microsoft.LightSwitch.IDataService))
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ListMailListsOnly_Created()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ListMailListsOnly_Activated()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ListMailListsOnly_Saving(ByRef handled As Boolean)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ListMailListsOnly_Saved()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ListMailListsOnly_Closing(ByRef cancel As Boolean)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ListMailListsOnly_SaveError(ByVal exception As Global.System.Exception, ByRef handled As Boolean)
End Sub
#Region "Private Properties"
''' <summary>
''' Gets the Application object for this application. The Application object provides access to active screens, methods to open screens and access to the current user.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private ReadOnly Property Application As Global.LightSwitchApplication.Application
Get
Return Global.LightSwitchApplication.Application.Current
End Get
End Property
''' <summary>
''' Gets the containing data workspace. The data workspace provides access to all data sources in the application.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private ReadOnly Property DataWorkspace As Global.LightSwitchApplication.DataWorkspace
Get
Return DirectCast(DirectCast(Me.Details, Global.Microsoft.LightSwitch.Details.Client.IScreenDetails).DataWorkspace, Global.LightSwitchApplication.DataWorkspace)
End Get
End Property
#End Region
Partial Private Sub MailLists_SelectionChanged()
End Sub
Partial Private Sub MailLists_Changed(ByVal e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub MailLists_Loaded(ByVal succeeded As Boolean)
End Sub
''' <summary>
''' Gets the MailLists visual collection. The collection contains all records currently shown on the respective list or grid control.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property MailLists As Global.Microsoft.LightSwitch.Framework.Client.VisualCollection(Of Global.LightSwitchApplication.MailList)
Get
Return __ListMailListsOnly.DetailsClass.GetValue(Me, __ListMailListsOnly.DetailsClass.PropertySetProperties.MailLists)
End Get
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub MailLists_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class DetailsClass
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenDetails(Of __ListMailListsOnly, __ListMailListsOnly.DetailsClass, __ListMailListsOnly.DetailsClass.PropertySet, __ListMailListsOnly.DetailsClass.CommandSet, __ListMailListsOnly.DetailsClass.MethodSet)
Shared Sub New()
Dim initializePropertyEntry = __ListMailListsOnly.DetailsClass.PropertySetProperties.MailLists
End Sub
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Private Shared ReadOnly __ListMailListsOnlyEntry As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenDetails(Of __ListMailListsOnly, __ListMailListsOnly.DetailsClass).Entry = _
New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenDetails(Of __ListMailListsOnly, __ListMailListsOnly.DetailsClass).Entry( _
AddressOf __ListMailListsOnly.DetailsClass.__ListMailListsOnly_InvokeInitializeDataWorkspace,
AddressOf __ListMailListsOnly.DetailsClass.__ListMailListsOnly_InvokeSavingEvent,
AddressOf __ListMailListsOnly.DetailsClass.__ListMailListsOnly_InvokeSavedEvent,
AddressOf __ListMailListsOnly.DetailsClass.__ListMailListsOnly_InvokeClosingEvent,
AddressOf __ListMailListsOnly.DetailsClass.__ListMailListsOnly_InvokeCreated,
AddressOf __ListMailListsOnly.DetailsClass.__ListMailListsOnly_InvokeActivated,
AddressOf __ListMailListsOnly.DetailsClass.__ListMailListsOnly_InvokeSaveErrorEvent)
Private Shared Sub __ListMailListsOnly_InvokeInitializeDataWorkspace(s As __ListMailListsOnly, saveChangesTo As Global.System.Collections.Generic.List(Of Global.Microsoft.LightSwitch.IDataService))
s.ListMailListsOnly_InitializeDataWorkspace(saveChangesTo)
End Sub
Private Shared Function __ListMailListsOnly_InvokeSavingEvent(s As __ListMailListsOnly) As Boolean
Dim handled = False
s.ListMailListsOnly_Saving(handled)
Return handled
End Function
Private Shared Sub __ListMailListsOnly_InvokeSavedEvent(s As __ListMailListsOnly)
s.ListMailListsOnly_Saved()
End Sub
Private Shared Function __ListMailListsOnly_InvokeClosingEvent(s As __ListMailListsOnly) As Boolean
Dim cancel = False
s.ListMailListsOnly_Closing(cancel)
Return cancel
End Function
Private Shared Sub __ListMailListsOnly_InvokeCreated(s As __ListMailListsOnly)
s.ListMailListsOnly_Created()
End Sub
Private Shared Sub __ListMailListsOnly_InvokeActivated(s As __ListMailListsOnly)
s.ListMailListsOnly_Activated()
End Sub
Private Shared Function __ListMailListsOnly_InvokeSaveErrorEvent(s As __ListMailListsOnly, ex As Global.System.Exception) As Boolean
Dim handled = False
s.ListMailListsOnly_SaveError(ex, handled)
Return handled
End Function
Public Sub New()
MyBase.New()
End Sub
Public Shadows ReadOnly Property Properties As __ListMailListsOnly.DetailsClass.PropertySet
Get
Return MyBase.Properties
End Get
End Property
Public Shadows ReadOnly Property Commands As __ListMailListsOnly.DetailsClass.CommandSet
Get
Return MyBase.Commands
End Get
End Property
Public Shadows ReadOnly Property Methods As __ListMailListsOnly.DetailsClass.MethodSet
Get
Return MyBase.Methods
End Get
End Property
Private Function MailListsQuery() As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return Me.Screen.DataWorkspace.ApplicationData.MailLists
End Function
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _MailLists As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __ListMailListsOnly, __ListMailListsOnly.DetailsClass, Global.LightSwitchApplication.MailList).Data
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class PropertySet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenPropertySet(Of __ListMailListsOnly, __ListMailListsOnly.DetailsClass)
Public ReadOnly Property MailLists As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __ListMailListsOnly, __ListMailListsOnly.DetailsClass, Global.LightSwitchApplication.MailList)
Get
Return DirectCast(MyBase.GetItem(__ListMailListsOnly.DetailsClass.PropertySetProperties.MailLists), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __ListMailListsOnly, __ListMailListsOnly.DetailsClass, Global.LightSwitchApplication.MailList))
End Get
End Property
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class CommandSet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommandSet(Of __ListMailListsOnly, __ListMailListsOnly.DetailsClass)
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class MethodSet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethodSet(Of __ListMailListsOnly, __ListMailListsOnly.DetailsClass)
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend NotInheritable Class PropertySetProperties
Public Shared ReadOnly MailLists As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __ListMailListsOnly, __ListMailListsOnly.DetailsClass, Global.LightSwitchApplication.MailList).Entry( _
"MailLists",
AddressOf __ListMailListsOnly.DetailsClass.PropertySetProperties._MailLists_Stub,
AddressOf __ListMailListsOnly.DetailsClass.PropertySetProperties._MailLists_Validate,
AddressOf __ListMailListsOnly.DetailsClass.PropertySetProperties._MailLists_CreateQuery,
AddressOf __ListMailListsOnly.DetailsClass.PropertySetProperties._MailLists_SelectionChanged,
AddressOf __ListMailListsOnly.DetailsClass.PropertySetProperties._MailLists_OnCollectionChanged,
AddressOf __ListMailListsOnly.DetailsClass.PropertySetProperties._MailLists_OnLoaded)
Private Shared Sub _MailLists_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __ListMailListsOnly.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __ListMailListsOnly, __ListMailListsOnly.DetailsClass, Global.LightSwitchApplication.MailList).Data), d As __ListMailListsOnly.DetailsClass, sf As Object)
c(d, d._MailLists, sf)
End Sub
Private Shared Sub _MailLists_Validate(s As __ListMailListsOnly, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.MailLists_Validate(r)
End Sub
Private Shared Function _MailLists_CreateQuery(d As __ListMailListsOnly.DetailsClass, args As Object()) As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return d.MailListsQuery()
End Function
Private Shared Sub _MailLists_SelectionChanged(s As __ListMailListsOnly)
s.MailLists_SelectionChanged()
End Sub
Private Shared Sub _MailLists_OnCollectionChanged(s As __ListMailListsOnly, e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
s.MailLists_Changed(e)
End Sub
Private Shared Sub _MailLists_OnLoaded(s As __ListMailListsOnly, succeeded As Boolean)
s.MailLists_Loaded(succeeded)
End Sub
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend NotInheritable Class CommandSetProperties
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend NotInheritable Class MethodSetProperties
End Class
End Class
End Class
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
Partial Public NotInheritable Class ListMailListCodes
Inherits Global.Microsoft.LightSwitch.Framework.Client.ScreenObject(Of __ListMailListCodes, __ListMailListCodes.DetailsClass)
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private Sub New()
MyBase.New("LightSwitchApplication:ListMailListCodes")
__ListMailListCodes.DetailsClass.Initialize(Me)
End Sub
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
Public Shared Function CreateInstance() As ListMailListCodes
Return New __ListMailListCodes( _
)
End Function
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ListMailListCodes_InitializeDataWorkspace(ByVal saveChangesTo As Global.System.Collections.Generic.List(Of Global.Microsoft.LightSwitch.IDataService))
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ListMailListCodes_Created()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ListMailListCodes_Activated()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ListMailListCodes_Saving(ByRef handled As Boolean)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ListMailListCodes_Saved()
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ListMailListCodes_Closing(ByRef cancel As Boolean)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub ListMailListCodes_SaveError(ByVal exception As Global.System.Exception, ByRef handled As Boolean)
End Sub
#Region "Private Properties"
''' <summary>
''' Gets the Application object for this application. The Application object provides access to active screens, methods to open screens and access to the current user.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private ReadOnly Property Application As Global.LightSwitchApplication.Application
Get
Return Global.LightSwitchApplication.Application.Current
End Get
End Property
''' <summary>
''' Gets the containing data workspace. The data workspace provides access to all data sources in the application.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private ReadOnly Property DataWorkspace As Global.LightSwitchApplication.DataWorkspace
Get
Return DirectCast(DirectCast(Me.Details, Global.Microsoft.LightSwitch.Details.Client.IScreenDetails).DataWorkspace, Global.LightSwitchApplication.DataWorkspace)
End Get
End Property
#End Region
Partial Private Sub MailListCodes_SelectionChanged()
End Sub
Partial Private Sub MailListCodes_Changed(ByVal e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub MailListCodes_Loaded(ByVal succeeded As Boolean)
End Sub
''' <summary>
''' Gets the MailListCodes visual collection. The collection contains all records currently shown on the respective list or grid control.
''' </summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public ReadOnly Property MailListCodes As Global.Microsoft.LightSwitch.Framework.Client.VisualCollection(Of Global.LightSwitchApplication.MailListCode)
Get
Return __ListMailListCodes.DetailsClass.GetValue(Me, __ListMailListCodes.DetailsClass.PropertySetProperties.MailListCodes)
End Get
End Property
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Partial Sub MailListCodes_Validate(ByVal results As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
End Sub
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class DetailsClass
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenDetails(Of __ListMailListCodes, __ListMailListCodes.DetailsClass, __ListMailListCodes.DetailsClass.PropertySet, __ListMailListCodes.DetailsClass.CommandSet, __ListMailListCodes.DetailsClass.MethodSet)
Shared Sub New()
Dim initializePropertyEntry = __ListMailListCodes.DetailsClass.PropertySetProperties.MailListCodes
End Sub
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)> _
Private Shared ReadOnly __ListMailListCodesEntry As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenDetails(Of __ListMailListCodes, __ListMailListCodes.DetailsClass).Entry = _
New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenDetails(Of __ListMailListCodes, __ListMailListCodes.DetailsClass).Entry( _
AddressOf __ListMailListCodes.DetailsClass.__ListMailListCodes_InvokeInitializeDataWorkspace,
AddressOf __ListMailListCodes.DetailsClass.__ListMailListCodes_InvokeSavingEvent,
AddressOf __ListMailListCodes.DetailsClass.__ListMailListCodes_InvokeSavedEvent,
AddressOf __ListMailListCodes.DetailsClass.__ListMailListCodes_InvokeClosingEvent,
AddressOf __ListMailListCodes.DetailsClass.__ListMailListCodes_InvokeCreated,
AddressOf __ListMailListCodes.DetailsClass.__ListMailListCodes_InvokeActivated,
AddressOf __ListMailListCodes.DetailsClass.__ListMailListCodes_InvokeSaveErrorEvent)
Private Shared Sub __ListMailListCodes_InvokeInitializeDataWorkspace(s As __ListMailListCodes, saveChangesTo As Global.System.Collections.Generic.List(Of Global.Microsoft.LightSwitch.IDataService))
s.ListMailListCodes_InitializeDataWorkspace(saveChangesTo)
End Sub
Private Shared Function __ListMailListCodes_InvokeSavingEvent(s As __ListMailListCodes) As Boolean
Dim handled = False
s.ListMailListCodes_Saving(handled)
Return handled
End Function
Private Shared Sub __ListMailListCodes_InvokeSavedEvent(s As __ListMailListCodes)
s.ListMailListCodes_Saved()
End Sub
Private Shared Function __ListMailListCodes_InvokeClosingEvent(s As __ListMailListCodes) As Boolean
Dim cancel = False
s.ListMailListCodes_Closing(cancel)
Return cancel
End Function
Private Shared Sub __ListMailListCodes_InvokeCreated(s As __ListMailListCodes)
s.ListMailListCodes_Created()
End Sub
Private Shared Sub __ListMailListCodes_InvokeActivated(s As __ListMailListCodes)
s.ListMailListCodes_Activated()
End Sub
Private Shared Function __ListMailListCodes_InvokeSaveErrorEvent(s As __ListMailListCodes, ex As Global.System.Exception) As Boolean
Dim handled = False
s.ListMailListCodes_SaveError(ex, handled)
Return handled
End Function
Public Sub New()
MyBase.New()
End Sub
Public Shadows ReadOnly Property Properties As __ListMailListCodes.DetailsClass.PropertySet
Get
Return MyBase.Properties
End Get
End Property
Public Shadows ReadOnly Property Commands As __ListMailListCodes.DetailsClass.CommandSet
Get
Return MyBase.Commands
End Get
End Property
Public Shadows ReadOnly Property Methods As __ListMailListCodes.DetailsClass.MethodSet
Get
Return MyBase.Methods
End Get
End Property
Private Function MailListCodesQuery() As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return Global.Microsoft.LightSwitch.DataServiceQueryable.Include(
Global.Microsoft.LightSwitch.DataServiceQueryable.Include(
Me.Screen.DataWorkspace.ApplicationData.MailListCodes,
"MailList"),
"MailCode")
End Function
<Global.System.Diagnostics.DebuggerBrowsable(Global.System.Diagnostics.DebuggerBrowsableState.Never)>
Private _MailListCodes As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __ListMailListCodes, __ListMailListCodes.DetailsClass, Global.LightSwitchApplication.MailListCode).Data
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class PropertySet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenPropertySet(Of __ListMailListCodes, __ListMailListCodes.DetailsClass)
Public ReadOnly Property MailListCodes As Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __ListMailListCodes, __ListMailListCodes.DetailsClass, Global.LightSwitchApplication.MailListCode)
Get
Return DirectCast(MyBase.GetItem(__ListMailListCodes.DetailsClass.PropertySetProperties.MailListCodes), Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __ListMailListCodes, __ListMailListCodes.DetailsClass, Global.LightSwitchApplication.MailListCode))
End Get
End Property
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class CommandSet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCommandSet(Of __ListMailListCodes, __ListMailListCodes.DetailsClass)
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public NotInheritable Class MethodSet
Inherits Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenMethodSet(Of __ListMailListCodes, __ListMailListCodes.DetailsClass)
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend NotInheritable Class PropertySetProperties
Public Shared ReadOnly MailListCodes As New Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __ListMailListCodes, __ListMailListCodes.DetailsClass, Global.LightSwitchApplication.MailListCode).Entry( _
"MailListCodes",
AddressOf __ListMailListCodes.DetailsClass.PropertySetProperties._MailListCodes_Stub,
AddressOf __ListMailListCodes.DetailsClass.PropertySetProperties._MailListCodes_Validate,
AddressOf __ListMailListCodes.DetailsClass.PropertySetProperties._MailListCodes_CreateQuery,
AddressOf __ListMailListCodes.DetailsClass.PropertySetProperties._MailListCodes_SelectionChanged,
AddressOf __ListMailListCodes.DetailsClass.PropertySetProperties._MailListCodes_OnCollectionChanged,
AddressOf __ListMailListCodes.DetailsClass.PropertySetProperties._MailListCodes_OnLoaded)
Private Shared Sub _MailListCodes_Stub(c As Global.Microsoft.LightSwitch.Details.Framework.Base.DetailsCallback(Of __ListMailListCodes.DetailsClass, Global.Microsoft.LightSwitch.Details.Framework.Client.ScreenCollectionProperty(Of __ListMailListCodes, __ListMailListCodes.DetailsClass, Global.LightSwitchApplication.MailListCode).Data), d As __ListMailListCodes.DetailsClass, sf As Object)
c(d, d._MailListCodes, sf)
End Sub
Private Shared Sub _MailListCodes_Validate(s As __ListMailListCodes, r As Global.Microsoft.LightSwitch.Framework.Client.ScreenValidationResultsBuilder)
s.MailListCodes_Validate(r)
End Sub
Private Shared Function _MailListCodes_CreateQuery(d As __ListMailListCodes.DetailsClass, args As Object()) As Global.Microsoft.LightSwitch.IDataServiceQueryable
Return d.MailListCodesQuery()
End Function
Private Shared Sub _MailListCodes_SelectionChanged(s As __ListMailListCodes)
s.MailListCodes_SelectionChanged()
End Sub
Private Shared Sub _MailListCodes_OnCollectionChanged(s As __ListMailListCodes, e As Global.System.Collections.Specialized.NotifyCollectionChangedEventArgs)
s.MailListCodes_Changed(e)
End Sub
Private Shared Sub _MailListCodes_OnLoaded(s As __ListMailListCodes, succeeded As Boolean)
s.MailListCodes_Loaded(succeeded)
End Sub
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend NotInheritable Class CommandSetProperties
End Class
<Global.System.ComponentModel.EditorBrowsable(Global.System.ComponentModel.EditorBrowsableState.Never)> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.LightSwitch.BuildTasks.CodeGen", "10.0.0.0")> _
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend NotInheritable Class MethodSetProperties
End Class
End Class
End Class
End Namespace
Submit an article or tip