schoolmodel.designer.vb


'------------------------------------------------------------------------------
' <auto-generated>
'    This code was generated from a template.
'
'    Manual changes to this file may cause unexpected behavior in your application.
'    Manual changes to this file will be overwritten if the code is regenerated.
' </auto-generated>
'------------------------------------------------------------------------------

Imports System.Data.Objects
Imports System.Data.Objects.DataClasses
Imports System.Data.EntityClient
Imports System.ComponentModel
Imports System.Xml.Serialization
Imports System.Runtime.Serialization

<Assembly: EdmSchemaAttribute("20787ffd-dab5-492d-8753-a02fb3f819a8")>
#Region "EDM Relationship Metadata"
<Assembly: EdmRelationshipAttribute("SchoolModel", "FK_Course_Department", "Department", System.Data.Metadata.Edm.RelationshipMultiplicity.One, GetType(Department), "Course", System.Data.Metadata.Edm.RelationshipMultiplicity.Many, GetType(Course), True)>
<Assembly: EdmRelationshipAttribute("SchoolModel", "FK_StudentGrade_Course", "Course", System.Data.Metadata.Edm.RelationshipMultiplicity.One, GetType(Course), "StudentGrade", System.Data.Metadata.Edm.RelationshipMultiplicity.Many, GetType(StudentGrade), True)>
<Assembly: EdmRelationshipAttribute("SchoolModel", "FK_OfficeAssignment_Person", "Person", System.Data.Metadata.Edm.RelationshipMultiplicity.One, GetType(Person), "OfficeAssignment", System.Data.Metadata.Edm.RelationshipMultiplicity.ZeroOrOne, GetType(OfficeAssignment), True)>
<Assembly: EdmRelationshipAttribute("SchoolModel", "FK_StudentGrade_Student", "Person", System.Data.Metadata.Edm.RelationshipMultiplicity.One, GetType(Person), "StudentGrade", System.Data.Metadata.Edm.RelationshipMultiplicity.Many, GetType(StudentGrade), True)>
<Assembly: EdmRelationshipAttribute("SchoolModel", "CourseInstructor", "Course", System.Data.Metadata.Edm.RelationshipMultiplicity.Many, GetType(Course), "Person", System.Data.Metadata.Edm.RelationshipMultiplicity.Many, GetType(Person))>

#End Region

#Region "Contexts"

''' <summary>
''' No Metadata Documentation available.
''' </summary>
Public Partial Class SchoolEntities
    Inherits ObjectContext

    #Region "Constructors"

    ''' <summary>
    ''' Initializes a new SchoolEntities object using the connection string found in the 'SchoolEntities' section of the application configuration file.
    ''' </summary>
    Public Sub New()
        MyBase.New("name=SchoolEntities", "SchoolEntities")
        OnContextCreated()
    End Sub

    ''' <summary>
    ''' Initialize a new SchoolEntities object.
    ''' </summary>
    Public Sub New(ByVal connectionString As String)
        MyBase.New(connectionString, "SchoolEntities")
        OnContextCreated()
    End Sub

    ''' <summary>
    ''' Initialize a new SchoolEntities object.
    ''' </summary>
    Public Sub New(ByVal connection As EntityConnection)
        MyBase.New(connection, "SchoolEntities")
        OnContextCreated()
    End Sub

    #End Region

    #Region "Partial Methods"

    Partial Private Sub OnContextCreated()
    End Sub

    #End Region

    #Region "ObjectSet Properties"

    ''' <summary>
    ''' No Metadata Documentation available.
    ''' </summary>
    Public ReadOnly Property Courses() As ObjectSet(Of Course)
        Get
            If (_Courses Is Nothing) Then
                _Courses = MyBase.CreateObjectSet(Of Course)("Courses")
            End If
            Return _Courses
        End Get
    End Property

    Private _Courses As ObjectSet(Of Course)

    ''' <summary>
    ''' No Metadata Documentation available.
    ''' </summary>
    Public ReadOnly Property Departments() As ObjectSet(Of Department)
        Get
            If (_Departments Is Nothing) Then
                _Departments = MyBase.CreateObjectSet(Of Department)("Departments")
            End If
            Return _Departments
        End Get
    End Property

    Private _Departments As ObjectSet(Of Department)

    ''' <summary>
    ''' No Metadata Documentation available.
    ''' </summary>
    Public ReadOnly Property OfficeAssignments() As ObjectSet(Of OfficeAssignment)
        Get
            If (_OfficeAssignments Is Nothing) Then
                _OfficeAssignments = MyBase.CreateObjectSet(Of OfficeAssignment)("OfficeAssignments")
            End If
            Return _OfficeAssignments
        End Get
    End Property

    Private _OfficeAssignments As ObjectSet(Of OfficeAssignment)

    ''' <summary>
    ''' No Metadata Documentation available.
    ''' </summary>
    Public ReadOnly Property People() As ObjectSet(Of Person)
        Get
            If (_People Is Nothing) Then
                _People = MyBase.CreateObjectSet(Of Person)("People")
            End If
            Return _People
        End Get
    End Property

    Private _People As ObjectSet(Of Person)

    ''' <summary>
    ''' No Metadata Documentation available.
    ''' </summary>
    Public ReadOnly Property StudentGrades() As ObjectSet(Of StudentGrade)
        Get
            If (_StudentGrades Is Nothing) Then
                _StudentGrades = MyBase.CreateObjectSet(Of StudentGrade)("StudentGrades")
            End If
            Return _StudentGrades
        End Get
    End Property

    Private _StudentGrades As ObjectSet(Of StudentGrade)

    #End Region
    #Region "AddTo Methods"

    ''' <summary>
    ''' Deprecated Method for adding a new object to the Courses EntitySet. Consider using the .Add method of the associated ObjectSet(Of T) property instead.
    ''' </summary>
    Public Sub AddToCourses(ByVal course As Course)
        MyBase.AddObject("Courses", course)
    End Sub

    ''' <summary>
    ''' Deprecated Method for adding a new object to the Departments EntitySet. Consider using the .Add method of the associated ObjectSet(Of T) property instead.
    ''' </summary>
    Public Sub AddToDepartments(ByVal department As Department)
        MyBase.AddObject("Departments", department)
    End Sub

    ''' <summary>
    ''' Deprecated Method for adding a new object to the OfficeAssignments EntitySet. Consider using the .Add method of the associated ObjectSet(Of T) property instead.
    ''' </summary>
    Public Sub AddToOfficeAssignments(ByVal officeAssignment As OfficeAssignment)
        MyBase.AddObject("OfficeAssignments", officeAssignment)
    End Sub

    ''' <summary>
    ''' Deprecated Method for adding a new object to the People EntitySet. Consider using the .Add method of the associated ObjectSet(Of T) property instead.
    ''' </summary>
    Public Sub AddToPeople(ByVal person As Person)
        MyBase.AddObject("People", person)
    End Sub

    ''' <summary>
    ''' Deprecated Method for adding a new object to the StudentGrades EntitySet. Consider using the .Add method of the associated ObjectSet(Of T) property instead.
    ''' </summary>
    Public Sub AddToStudentGrades(ByVal studentGrade As StudentGrade)
        MyBase.AddObject("StudentGrades", studentGrade)
    End Sub

    #End Region
    #Region "Function Imports"

    ''' <summary>
    ''' No Metadata Documentation available.
    ''' </summary>
    ''' <param name="studentID">No Metadata Documentation available.</param>
    Public Function GetStudentGrades(studentID As Nullable(Of Global.System.Int32)) As ObjectResult(Of StudentGrade)
        Dim studentIDParameter As ObjectParameter
        If (studentID.HasValue)
            studentIDParameter = New ObjectParameter("StudentID", studentID)
        Else
            studentIDParameter = New ObjectParameter("StudentID", GetType(Global.System.Int32))
        End If

        Return MyBase.ExecuteFunction(Of StudentGrade)("GetStudentGrades", studentIDParameter)

    End Function
    ''' <summary>
    ''' No Metadata Documentation available.
    ''' </summary>
    ''' <param name="mergeOption"></param>
    ''' <param name="studentID">No Metadata Documentation available.</param>
    Public Function GetStudentGrades(studentID As Nullable(Of Global.System.Int32), mergeOption As MergeOption) As ObjectResult(Of StudentGrade)
        Dim studentIDParameter As ObjectParameter
        If (studentID.HasValue)
            studentIDParameter = New ObjectParameter("StudentID", studentID)
        Else
            studentIDParameter = New ObjectParameter("StudentID", GetType(Global.System.Int32))
        End If

        Return MyBase.ExecuteFunction(Of StudentGrade)("GetStudentGrades", mergeOption, studentIDParameter)

    End Function

    #End Region
End Class

#End Region
#Region "Entities"

''' <summary>
''' No Metadata Documentation available.
''' </summary>
<EdmEntityTypeAttribute(NamespaceName:="SchoolModel", Name:="Course")>
<Serializable()>
<DataContractAttribute(IsReference:=True)>
<KnownTypeAttribute(GetType(OnlineCourse))>
<KnownTypeAttribute(GetType(OnsiteCourse))>
Public MustInherit Partial Class Course
    Inherits EntityObject
    #Region "Primitive Properties"

    ''' <summary>
    ''' No Metadata Documentation available.
    ''' </summary>
    <EdmScalarPropertyAttribute(EntityKeyProperty:=true, IsNullable:=false)>
    <DataMemberAttribute()>
    Public Property CourseID() As Global.System.Int32
        Get
            Return _CourseID
        End Get
        Set
            If (_CourseID <> Value) Then
                OnCourseIDChanging(value)
                ReportPropertyChanging("CourseID")
                _CourseID = StructuralObject.SetValidValue(value)
                ReportPropertyChanged("CourseID")
                OnCourseIDChanged()
            End If
        End Set
    End Property

    Private _CourseID As Global.System.Int32
    Private Partial Sub OnCourseIDChanging(value As Global.System.Int32)
    End Sub

    Private Partial Sub OnCourseIDChanged()
    End Sub

    ''' <summary>
    ''' No Metadata Documentation available.
    ''' </summary>
    <EdmScalarPropertyAttribute(EntityKeyProperty:=false, IsNullable:=false)>
    <DataMemberAttribute()>
    Public Property Title() As Global.System.String
        Get
            Return _Title
        End Get
        Set
            OnTitleChanging(value)
            ReportPropertyChanging("Title")
            _Title = StructuralObject.SetValidValue(value, false)
            ReportPropertyChanged("Title")
            OnTitleChanged()
        End Set
    End Property

    Private _Title As Global.System.String
    Private Partial Sub OnTitleChanging(value As Global.System.String)
    End Sub

    Private Partial Sub OnTitleChanged()
    End Sub

    ''' <summary>
    ''' No Metadata Documentation available.
    ''' </summary>
    <EdmScalarPropertyAttribute(EntityKeyProperty:=false, IsNullable:=false)>
    <DataMemberAttribute()>
    Public Property Credits() As Global.System.Int32
        Get
            Return _Credits
        End Get
        Set
            OnCreditsChanging(value)
            ReportPropertyChanging("Credits")
            _Credits = StructuralObject.SetValidValue(value)
            ReportPropertyChanged("Credits")
            OnCreditsChanged()
        End Set
    End Property

    Private _Credits As Global.System.Int32
    Private Partial Sub OnCreditsChanging(value As Global.System.Int32)
    End Sub

    Private Partial Sub OnCreditsChanged()
    End Sub

    ''' <summary>
    ''' No Metadata Documentation available.
    ''' </summary>
    <EdmScalarPropertyAttribute(EntityKeyProperty:=false, IsNullable:=false)>
    <DataMemberAttribute()>
    Public Property DepartmentID() As Global.System.Int32
        Get
            Return _DepartmentID
        End Get
        Set
            OnDepartmentIDChanging(value)
            ReportPropertyChanging("DepartmentID")
            _DepartmentID = StructuralObject.SetValidValue(value)
            ReportPropertyChanged("DepartmentID")
            OnDepartmentIDChanged()
        End Set
    End Property

    Private _DepartmentID As Global.System.Int32
    Private Partial Sub OnDepartmentIDChanging(value As Global.System.Int32)
    End Sub

    Private Partial Sub OnDepartmentIDChanged()
    End Sub

    #End Region
    #Region "Navigation Properties"

    ''' <summary>
    ''' No Metadata Documentation available.
    ''' </summary>
    <XmlIgnoreAttribute()>
    <SoapIgnoreAttribute()>
    <DataMemberAttribute()>
    <EdmRelationshipNavigationPropertyAttribute("SchoolModel", "FK_Course_Department", "Department")>
    Public Property Department() As Department
        Get
            Return CType(Me, IEntityWithRelationships).RelationshipManager.GetRelatedReference(Of Department)("SchoolModel.FK_Course_Department", "Department").Value
        End Get
        Set
            CType(Me, IEntityWithRelationships).RelationshipManager.GetRelatedReference(Of Department)("SchoolModel.FK_Course_Department", "Department").Value = value
        End Set
    End Property
    ''' <summary>
    ''' No Metadata Documentation available.
    ''' </summary>
    <BrowsableAttribute(False)>
    <DataMemberAttribute()>
    Public Property DepartmentReference() As EntityReference(Of Department)
        Get
            Return CType(Me, IEntityWithRelationships).RelationshipManager.GetRelatedReference(Of Department)("SchoolModel.FK_Course_Department", "Department")
        End Get
        Set
            If (Not value Is Nothing)
                CType(Me, IEntityWithRelationships).RelationshipManager.InitializeRelatedReference(Of Department)("SchoolModel.FK_Course_Department", "Department", value)
            End If
        End Set
    End Property

    ''' <summary>
    ''' No Metadata Documentation available.
    ''' </summary>
    <XmlIgnoreAttribute()>
    <SoapIgnoreAttribute()>
    <DataMemberAttribute()>
    <EdmRelationshipNavigationPropertyAttribute("SchoolModel", "FK_StudentGrade_Course", "StudentGrade")>
     Public Property StudentGrades() As EntityCollection(Of StudentGrade)
        Get
            Return CType(Me,IEntityWithRelationships).RelationshipManager.GetRelatedCollection(Of StudentGrade)("SchoolModel.FK_StudentGrade_Course", "StudentGrade")
        End Get
        Set
            If (Not value Is Nothing)
                CType(Me, IEntityWithRelationships).RelationshipManager.InitializeRelatedCollection(Of StudentGrade)("SchoolModel.FK_StudentGrade_Course", "StudentGrade", value)
            End If
        End Set
    End Property

    ''' <summary>
    ''' No Metadata Documentation available.
    ''' </summary>
    <XmlIgnoreAttribute()>
    <SoapIgnoreAttribute()>
    <DataMemberAttribute()>
    <EdmRelationshipNavigationPropertyAttribute("SchoolModel", "CourseInstructor", "Person")>
     Public Property People() As EntityCollection(Of Person)
        Get
            Return CType(Me,IEntityWithRelationships).RelationshipManager.GetRelatedCollection(Of Person)("SchoolModel.CourseInstructor", "Person")
        End Get
        Set
            If (Not value Is Nothing)
                CType(Me, IEntityWithRelationships).RelationshipManager.InitializeRelatedCollection(Of Person)("SchoolModel.CourseInstructor", "Person", value)
            End If
        End Set
    End Property

    #End Region
End Class

''' <summary>
''' No Metadata Documentation available.
''' </summary>
<EdmEntityTypeAttribute(NamespaceName:="SchoolModel", Name:="Department")>
<Serializable()>
<DataContractAttribute(IsReference:=True)>
Public Partial Class Department
    Inherits EntityObject
    #Region "Factory Method"

    ''' <summary>
    ''' Create a new Department object.
    ''' </summary>
    ''' <param name="departmentID">Initial value of the DepartmentID property.</param>
    ''' <param name="name">Initial value of the Name property.</param>
    ''' <param name="budget">Initial value of the Budget property.</param>
    ''' <param name="startDate">Initial value of the StartDate property.</param>
    Public Shared Function CreateDepartment(departmentID As Global.System.Int32, name As Global.System.String, budget As Global.System.Decimal, startDate As Global.System.DateTime) As Department
        Dim department as Department = New Department
        department.DepartmentID = departmentID
        department.Name = name
        department.Budget = budget
        department.StartDate = startDate
        Return department
    End Function

    #End Region
    #Region "Primitive Properties"

    ''' <summary>
    ''' No Metadata Documentation available.
    ''' </summary>
    <EdmScalarPropertyAttribute(EntityKeyProperty:=true, IsNullable:=false)>
    <DataMemberAttribute()>
    Public Property DepartmentID() As Global.System.Int32
        Get
            Return _DepartmentID
        End Get
        Set
            If (_DepartmentID <> Value) Then
                OnDepartmentIDChanging(value)
                ReportPropertyChanging("DepartmentID")
                _DepartmentID = StructuralObject.SetValidValue(value)
                ReportPropertyChanged("DepartmentID")
                OnDepartmentIDChanged()
            End If
        End Set
    End Property

    Private _DepartmentID As Global.System.Int32
    Private Partial Sub OnDepartmentIDChanging(value As Global.System.Int32)
    End Sub

    Private Partial Sub OnDepartmentIDChanged()
    End Sub

    ''' <summary>
    ''' No Metadata Documentation available.
    ''' </summary>
    <EdmScalarPropertyAttribute(EntityKeyProperty:=false, IsNullable:=false)>
    <DataMemberAttribute()>
    Public Property Name() As Global.System.String
        Get
            Return _Name
        End Get
        Set
            OnNameChanging(value)
            ReportPropertyChanging("Name")
            _Name = StructuralObject.SetValidValue(value, false)
            ReportPropertyChanged("Name")
            OnNameChanged()
        End Set
    End Property

    Private _Name As Global.System.String
    Private Partial Sub OnNameChanging(value As Global.System.String)
    End Sub

    Private Partial Sub OnNameChanged()
    End Sub

    ''' <summary>
    ''' No Metadata Documentation available.
    ''' </summary>
    <EdmScalarPropertyAttribute(EntityKeyProperty:=false, IsNullable:=false)>
    <DataMemberAttribute()>
    Public Property Budget() As Global.System.Decimal
        Get
            Return _Budget
        End Get
        Set
            OnBudgetChanging(value)
            ReportPropertyChanging("Budget")
            _Budget = StructuralObject.SetValidValue(value)
            ReportPropertyChanged("Budget")
            OnBudgetChanged()
        End Set
    End Property

    Private _Budget As Global.System.Decimal
    Private Partial Sub OnBudgetChanging(value As Global.System.Decimal)
    End Sub

    Private Partial Sub OnBudgetChanged()
    End Sub

    ''' <summary>
    ''' No Metadata Documentation available.
    ''' </summary>
    <EdmScalarPropertyAttribute(EntityKeyProperty:=false, IsNullable:=false)>
    <DataMemberAttribute()>
    Public Property StartDate() As Global.System.DateTime
        Get
            Return _StartDate
        End Get
        Set
            OnStartDateChanging(value)
            ReportPropertyChanging("StartDate")
            _StartDate = StructuralObject.SetValidValue(value)
            ReportPropertyChanged("StartDate")
            OnStartDateChanged()
        End Set
    End Property

    Private _StartDate As Global.System.DateTime
    Private Partial Sub OnStartDateChanging(value As Global.System.DateTime)
    End Sub

    Private Partial Sub OnStartDateChanged()
    End Sub

    ''' <summary>
    ''' No Metadata Documentation available.
    ''' </summary>
    <EdmScalarPropertyAttribute(EntityKeyProperty:=false, IsNullable:=true)>
    <DataMemberAttribute()>
    Public Property Administrator() As Nullable(Of Global.System.Int32)
        Get
            Return _Administrator
        End Get
        Set
            OnAdministratorChanging(value)
            ReportPropertyChanging("Administrator")
            _Administrator = StructuralObject.SetValidValue(value)
            ReportPropertyChanged("Administrator")
            OnAdministratorChanged()
        End Set
    End Property

    Private _Administrator As Nullable(Of Global.System.Int32)
    Private Partial Sub OnAdministratorChanging(value As Nullable(Of Global.System.Int32))
    End Sub

    Private Partial Sub OnAdministratorChanged()
    End Sub

    #End Region
    #Region "Navigation Properties"

    ''' <summary>
    ''' No Metadata Documentation available.
    ''' </summary>
    <XmlIgnoreAttribute()>
    <SoapIgnoreAttribute()>
    <DataMemberAttribute()>
    <EdmRelationshipNavigationPropertyAttribute("SchoolModel", "FK_Course_Department", "Course")>
     Public Property Courses() As EntityCollection(Of Course)
        Get
            Return CType(Me,IEntityWithRelationships).RelationshipManager.GetRelatedCollection(Of Course)("SchoolModel.FK_Course_Department", "Course")
        End Get
        Set
            If (Not value Is Nothing)
                CType(Me, IEntityWithRelationships).RelationshipManager.InitializeRelatedCollection(Of Course)("SchoolModel.FK_Course_Department", "Course", value)
            End If
        End Set
    End Property

    #End Region
End Class

''' <summary>
''' No Metadata Documentation available.
''' </summary>
<EdmEntityTypeAttribute(NamespaceName:="SchoolModel", Name:="OfficeAssignment")>
<Serializable()>
<DataContractAttribute(IsReference:=True)>
Public Partial Class OfficeAssignment
    Inherits EntityObject
    #Region "Factory Method"

    ''' <summary>
    ''' Create a new OfficeAssignment object.
    ''' </summary>
    ''' <param name="instructorID">Initial value of the InstructorID property.</param>
    ''' <param name="location">Initial value of the Location property.</param>
    ''' <param name="timestamp">Initial value of the Timestamp property.</param>
    Public Shared Function CreateOfficeAssignment(instructorID As Global.System.Int32, location As Global.System.String, timestamp As Global.System.Byte()) As OfficeAssignment
        Dim officeAssignment as OfficeAssignment = New OfficeAssignment
        officeAssignment.InstructorID = instructorID
        officeAssignment.Location = location
        officeAssignment.Timestamp = timestamp
        Return officeAssignment
    End Function

    #End Region
    #Region "Primitive Properties"

    ''' <summary>
    ''' No Metadata Documentation available.
    ''' </summary>
    <EdmScalarPropertyAttribute(EntityKeyProperty:=true, IsNullable:=false)>
    <DataMemberAttribute()>
    Public Property InstructorID() As Global.System.Int32
        Get
            Return _InstructorID
        End Get
        Set
            If (_InstructorID <> Value) Then
                OnInstructorIDChanging(value)
                ReportPropertyChanging("InstructorID")
                _InstructorID = StructuralObject.SetValidValue(value)
                ReportPropertyChanged("InstructorID")
                OnInstructorIDChanged()
            End If
        End Set
    End Property

    Private _InstructorID As Global.System.Int32
    Private Partial Sub OnInstructorIDChanging(value As Global.System.Int32)
    End Sub

    Private Partial Sub OnInstructorIDChanged()
    End Sub

    ''' <summary>
    ''' No Metadata Documentation available.
    ''' </summary>
    <EdmScalarPropertyAttribute(EntityKeyProperty:=false, IsNullable:=false)>
    <DataMemberAttribute()>
    Public Property Location() As Global.System.String
        Get
            Return _Location
        End Get
        Set
            OnLocationChanging(value)
            ReportPropertyChanging("Location")
            _Location = StructuralObject.SetValidValue(value, false)
            ReportPropertyChanged("Location")
            OnLocationChanged()
        End Set
    End Property

    Private _Location As Global.System.String
    Private Partial Sub OnLocationChanging(value As Global.System.String)
    End Sub

    Private Partial Sub OnLocationChanged()
    End Sub

    ''' <summary>
    ''' No Metadata Documentation available.
    ''' </summary>
    <EdmScalarPropertyAttribute(EntityKeyProperty:=false, IsNullable:=false)>
    <DataMemberAttribute()>
    Public Property Timestamp() As Global.System.Byte()
        Get
                Return StructuralObject.GetValidValue(_Timestamp)
        End Get
        Set
            OnTimestampChanging(value)
            ReportPropertyChanging("Timestamp")
            _Timestamp = StructuralObject.SetValidValue(value, false)
            ReportPropertyChanged("Timestamp")
            OnTimestampChanged()
        End Set
    End Property

    Private _Timestamp As Global.System.Byte()
    Private Partial Sub OnTimestampChanging(value As Global.System.Byte())
    End Sub

    Private Partial Sub OnTimestampChanged()
    End Sub

    #End Region
    #Region "Navigation Properties"

    ''' <summary>
    ''' No Metadata Documentation available.
    ''' </summary>
    <XmlIgnoreAttribute()>
    <SoapIgnoreAttribute()>
    <DataMemberAttribute()>
    <EdmRelationshipNavigationPropertyAttribute("SchoolModel", "FK_OfficeAssignment_Person", "Person")>
    Public Property Person() As Person
        Get
            Return CType(Me, IEntityWithRelationships).RelationshipManager.GetRelatedReference(Of Person)("SchoolModel.FK_OfficeAssignment_Person", "Person").Value
        End Get
        Set
            CType(Me, IEntityWithRelationships).RelationshipManager.GetRelatedReference(Of Person)("SchoolModel.FK_OfficeAssignment_Person", "Person").Value = value
        End Set
    End Property
    ''' <summary>
    ''' No Metadata Documentation available.
    ''' </summary>
    <BrowsableAttribute(False)>
    <DataMemberAttribute()>
    Public Property PersonReference() As EntityReference(Of Person)
        Get
            Return CType(Me, IEntityWithRelationships).RelationshipManager.GetRelatedReference(Of Person)("SchoolModel.FK_OfficeAssignment_Person", "Person")
        End Get
        Set
            If (Not value Is Nothing)
                CType(Me, IEntityWithRelationships).RelationshipManager.InitializeRelatedReference(Of Person)("SchoolModel.FK_OfficeAssignment_Person", "Person", value)
            End If
        End Set
    End Property

    #End Region
End Class

''' <summary>
''' No Metadata Documentation available.
''' </summary>
<EdmEntityTypeAttribute(NamespaceName:="SchoolModel", Name:="OnlineCourse")>
<Serializable()>
<DataContractAttribute(IsReference:=True)>
Public Partial Class OnlineCourse
    Inherits Course
    #Region "Factory Method"

    ''' <summary>
    ''' Create a new OnlineCourse object.
    ''' </summary>
    ''' <param name="courseID">Initial value of the CourseID property.</param>
    ''' <param name="title">Initial value of the Title property.</param>
    ''' <param name="credits">Initial value of the Credits property.</param>
    ''' <param name="departmentID">Initial value of the DepartmentID property.</param>
    ''' <param name="uRL">Initial value of the URL property.</param>
    Public Shared Function CreateOnlineCourse(courseID As Global.System.Int32, title As Global.System.String, credits As Global.System.Int32, departmentID As Global.System.Int32, uRL As Global.System.String) As OnlineCourse
        Dim onlineCourse as OnlineCourse = New OnlineCourse
        onlineCourse.CourseID = courseID
        onlineCourse.Title = title
        onlineCourse.Credits = credits
        onlineCourse.DepartmentID = departmentID
        onlineCourse.URL = uRL
        Return onlineCourse
    End Function

    #End Region
    #Region "Primitive Properties"

    ''' <summary>
    ''' No Metadata Documentation available.
    ''' </summary>
    <EdmScalarPropertyAttribute(EntityKeyProperty:=false, IsNullable:=false)>
    <DataMemberAttribute()>
    Public Property URL() As Global.System.String
        Get
            Return _URL
        End Get
        Set
            OnURLChanging(value)
            ReportPropertyChanging("URL")
            _URL = StructuralObject.SetValidValue(value, false)
            ReportPropertyChanged("URL")
            OnURLChanged()
        End Set
    End Property

    Private _URL As Global.System.String
    Private Partial Sub OnURLChanging(value As Global.System.String)
    End Sub

    Private Partial Sub OnURLChanged()
    End Sub

    #End Region
End Class

''' <summary>
''' No Metadata Documentation available.
''' </summary>
<EdmEntityTypeAttribute(NamespaceName:="SchoolModel", Name:="OnsiteCourse")>
<Serializable()>
<DataContractAttribute(IsReference:=True)>
Public Partial Class OnsiteCourse
    Inherits Course
    #Region "Factory Method"

    ''' <summary>
    ''' Create a new OnsiteCourse object.
    ''' </summary>
    ''' <param name="courseID">Initial value of the CourseID property.</param>
    ''' <param name="title">Initial value of the Title property.</param>
    ''' <param name="credits">Initial value of the Credits property.</param>
    ''' <param name="departmentID">Initial value of the DepartmentID property.</param>
    ''' <param name="location">Initial value of the Location property.</param>
    ''' <param name="days">Initial value of the Days property.</param>
    ''' <param name="time">Initial value of the Time property.</param>
    Public Shared Function CreateOnsiteCourse(courseID As Global.System.Int32, title As Global.System.String, credits As Global.System.Int32, departmentID As Global.System.Int32, location As Global.System.String, days As Global.System.String, time As Global.System.DateTime) As OnsiteCourse
        Dim onsiteCourse as OnsiteCourse = New OnsiteCourse
        onsiteCourse.CourseID = courseID
        onsiteCourse.Title = title
        onsiteCourse.Credits = credits
        onsiteCourse.DepartmentID = departmentID
        onsiteCourse.Location = location
        onsiteCourse.Days = days
        onsiteCourse.Time = time
        Return onsiteCourse
    End Function

    #End Region
    #Region "Primitive Properties"

    ''' <summary>
    ''' No Metadata Documentation available.
    ''' </summary>
    <EdmScalarPropertyAttribute(EntityKeyProperty:=false, IsNullable:=false)>
    <DataMemberAttribute()>
    Public Property Location() As Global.System.String
        Get
            Return _Location
        End Get
        Set
            OnLocationChanging(value)
            ReportPropertyChanging("Location")
            _Location = StructuralObject.SetValidValue(value, false)
            ReportPropertyChanged("Location")
            OnLocationChanged()
        End Set
    End Property

    Private _Location As Global.System.String
    Private Partial Sub OnLocationChanging(value As Global.System.String)
    End Sub

    Private Partial Sub OnLocationChanged()
    End Sub

    ''' <summary>
    ''' No Metadata Documentation available.
    ''' </summary>
    <EdmScalarPropertyAttribute(EntityKeyProperty:=false, IsNullable:=false)>
    <DataMemberAttribute()>
    Public Property Days() As Global.System.String
        Get
            Return _Days
        End Get
        Set
            OnDaysChanging(value)
            ReportPropertyChanging("Days")
            _Days = StructuralObject.SetValidValue(value, false)
            ReportPropertyChanged("Days")
            OnDaysChanged()
        End Set
    End Property

    Private _Days As Global.System.String
    Private Partial Sub OnDaysChanging(value As Global.System.String)
    End Sub

    Private Partial Sub OnDaysChanged()
    End Sub

    ''' <summary>
    ''' No Metadata Documentation available.
    ''' </summary>
    <EdmScalarPropertyAttribute(EntityKeyProperty:=false, IsNullable:=false)>
    <DataMemberAttribute()>
    Public Property Time() As Global.System.DateTime
        Get
            Return _Time
        End Get
        Set
            OnTimeChanging(value)
            ReportPropertyChanging("Time")
            _Time = StructuralObject.SetValidValue(value)
            ReportPropertyChanged("Time")
            OnTimeChanged()
        End Set
    End Property

    Private _Time As Global.System.DateTime
    Private Partial Sub OnTimeChanging(value As Global.System.DateTime)
    End Sub

    Private Partial Sub OnTimeChanged()
    End Sub

    #End Region
End Class

''' <summary>
''' No Metadata Documentation available.
''' </summary>
<EdmEntityTypeAttribute(NamespaceName:="SchoolModel", Name:="Person")>
<Serializable()>
<DataContractAttribute(IsReference:=True)>
Public Partial Class Person
    Inherits EntityObject
    #Region "Factory Method"

    ''' <summary>
    ''' Create a new Person object.
    ''' </summary>
    ''' <param name="personID">Initial value of the PersonID property.</param>
    ''' <param name="lastName">Initial value of the LastName property.</param>
    ''' <param name="firstName">Initial value of the FirstName property.</param>
    Public Shared Function CreatePerson(personID As Global.System.Int32, lastName As Global.System.String, firstName As Global.System.String) As Person
        Dim person as Person = New Person
        person.PersonID = personID
        person.LastName = lastName
        person.FirstName = firstName
        Return person
    End Function

    #End Region
    #Region "Primitive Properties"

    ''' <summary>
    ''' No Metadata Documentation available.
    ''' </summary>
    <EdmScalarPropertyAttribute(EntityKeyProperty:=true, IsNullable:=false)>
    <DataMemberAttribute()>
    Public Property PersonID() As Global.System.Int32
        Get
            Return _PersonID
        End Get
        Set
            If (_PersonID <> Value) Then
                OnPersonIDChanging(value)
                ReportPropertyChanging("PersonID")
                _PersonID = StructuralObject.SetValidValue(value)
                ReportPropertyChanged("PersonID")
                OnPersonIDChanged()
            End If
        End Set
    End Property

    Private _PersonID As Global.System.Int32
    Private Partial Sub OnPersonIDChanging(value As Global.System.Int32)
    End Sub

    Private Partial Sub OnPersonIDChanged()
    End Sub

    ''' <summary>
    ''' No Metadata Documentation available.
    ''' </summary>
    <EdmScalarPropertyAttribute(EntityKeyProperty:=false, IsNullable:=false)>
    <DataMemberAttribute()>
    Public Property LastName() As Global.System.String
        Get
            Return _LastName
        End Get
        Set
            OnLastNameChanging(value)
            ReportPropertyChanging("LastName")
            _LastName = StructuralObject.SetValidValue(value, false)
            ReportPropertyChanged("LastName")
            OnLastNameChanged()
        End Set
    End Property

    Private _LastName As Global.System.String
    Private Partial Sub OnLastNameChanging(value As Global.System.String)
    End Sub

    Private Partial Sub OnLastNameChanged()
    End Sub

    ''' <summary>
    ''' No Metadata Documentation available.
    ''' </summary>
    <EdmScalarPropertyAttribute(EntityKeyProperty:=false, IsNullable:=false)>
    <DataMemberAttribute()>
    Public Property FirstName() As Global.System.String
        Get
            Return _FirstName
        End Get
        Set
            OnFirstNameChanging(value)
            ReportPropertyChanging("FirstName")
            _FirstName = StructuralObject.SetValidValue(value, false)
            ReportPropertyChanged("FirstName")
            OnFirstNameChanged()
        End Set
    End Property

    Private _FirstName As Global.System.String
    Private Partial Sub OnFirstNameChanging(value As Global.System.String)
    End Sub

    Private Partial Sub OnFirstNameChanged()
    End Sub

    ''' <summary>
    ''' No Metadata Documentation available.
    ''' </summary>
    <EdmScalarPropertyAttribute(EntityKeyProperty:=false, IsNullable:=true)>
    <DataMemberAttribute()>
    Public Property HireDate() As Nullable(Of Global.System.DateTime)
        Get
            Return _HireDate
        End Get
        Set
            OnHireDateChanging(value)
            ReportPropertyChanging("HireDate")
            _HireDate = StructuralObject.SetValidValue(value)
            ReportPropertyChanged("HireDate")
            OnHireDateChanged()
        End Set
    End Property

    Private _HireDate As Nullable(Of Global.System.DateTime)
    Private Partial Sub OnHireDateChanging(value As Nullable(Of Global.System.DateTime))
    End Sub

    Private Partial Sub OnHireDateChanged()
    End Sub

    ''' <summary>
    ''' No Metadata Documentation available.
    ''' </summary>
    <EdmScalarPropertyAttribute(EntityKeyProperty:=false, IsNullable:=true)>
    <DataMemberAttribute()>
    Public Property EnrollmentDate() As Nullable(Of Global.System.DateTime)
        Get
            Return _EnrollmentDate
        End Get
        Set
            OnEnrollmentDateChanging(value)
            ReportPropertyChanging("EnrollmentDate")
            _EnrollmentDate = StructuralObject.SetValidValue(value)
            ReportPropertyChanged("EnrollmentDate")
            OnEnrollmentDateChanged()
        End Set
    End Property

    Private _EnrollmentDate As Nullable(Of Global.System.DateTime)
    Private Partial Sub OnEnrollmentDateChanging(value As Nullable(Of Global.System.DateTime))
    End Sub

    Private Partial Sub OnEnrollmentDateChanged()
    End Sub

    #End Region
    #Region "Navigation Properties"

    ''' <summary>
    ''' No Metadata Documentation available.
    ''' </summary>
    <XmlIgnoreAttribute()>
    <SoapIgnoreAttribute()>
    <DataMemberAttribute()>
    <EdmRelationshipNavigationPropertyAttribute("SchoolModel", "FK_OfficeAssignment_Person", "OfficeAssignment")>
    Public Property OfficeAssignment() As OfficeAssignment
        Get
            Return CType(Me, IEntityWithRelationships).RelationshipManager.GetRelatedReference(Of OfficeAssignment)("SchoolModel.FK_OfficeAssignment_Person", "OfficeAssignment").Value
        End Get
        Set
            CType(Me, IEntityWithRelationships).RelationshipManager.GetRelatedReference(Of OfficeAssignment)("SchoolModel.FK_OfficeAssignment_Person", "OfficeAssignment").Value = value
        End Set
    End Property
    ''' <summary>
    ''' No Metadata Documentation available.
    ''' </summary>
    <BrowsableAttribute(False)>
    <DataMemberAttribute()>
    Public Property OfficeAssignmentReference() As EntityReference(Of OfficeAssignment)
        Get
            Return CType(Me, IEntityWithRelationships).RelationshipManager.GetRelatedReference(Of OfficeAssignment)("SchoolModel.FK_OfficeAssignment_Person", "OfficeAssignment")
        End Get
        Set
            If (Not value Is Nothing)
                CType(Me, IEntityWithRelationships).RelationshipManager.InitializeRelatedReference(Of OfficeAssignment)("SchoolModel.FK_OfficeAssignment_Person", "OfficeAssignment", value)
            End If
        End Set
    End Property

    ''' <summary>
    ''' No Metadata Documentation available.
    ''' </summary>
    <XmlIgnoreAttribute()>
    <SoapIgnoreAttribute()>
    <DataMemberAttribute()>
    <EdmRelationshipNavigationPropertyAttribute("SchoolModel", "FK_StudentGrade_Student", "StudentGrade")>
     Public Property StudentGrades() As EntityCollection(Of StudentGrade)
        Get
            Return CType(Me,IEntityWithRelationships).RelationshipManager.GetRelatedCollection(Of StudentGrade)("SchoolModel.FK_StudentGrade_Student", "StudentGrade")
        End Get
        Set
            If (Not value Is Nothing)
                CType(Me, IEntityWithRelationships).RelationshipManager.InitializeRelatedCollection(Of StudentGrade)("SchoolModel.FK_StudentGrade_Student", "StudentGrade", value)
            End If
        End Set
    End Property

    ''' <summary>
    ''' No Metadata Documentation available.
    ''' </summary>
    <XmlIgnoreAttribute()>
    <SoapIgnoreAttribute()>
    <DataMemberAttribute()>
    <EdmRelationshipNavigationPropertyAttribute("SchoolModel", "CourseInstructor", "Course")>
     Public Property Courses() As EntityCollection(Of Course)
        Get
            Return CType(Me,IEntityWithRelationships).RelationshipManager.GetRelatedCollection(Of Course)("SchoolModel.CourseInstructor", "Course")
        End Get
        Set
            If (Not value Is Nothing)
                CType(Me, IEntityWithRelationships).RelationshipManager.InitializeRelatedCollection(Of Course)("SchoolModel.CourseInstructor", "Course", value)
            End If
        End Set
    End Property

    #End Region
End Class

''' <summary>
''' No Metadata Documentation available.
''' </summary>
<EdmEntityTypeAttribute(NamespaceName:="SchoolModel", Name:="StudentGrade")>
<Serializable()>
<DataContractAttribute(IsReference:=True)>
Public Partial Class StudentGrade
    Inherits EntityObject
    #Region "Factory Method"

    ''' <summary>
    ''' Create a new StudentGrade object.
    ''' </summary>
    ''' <param name="enrollmentID">Initial value of the EnrollmentID property.</param>
    ''' <param name="courseID">Initial value of the CourseID property.</param>
    ''' <param name="studentID">Initial value of the StudentID property.</param>
    Public Shared Function CreateStudentGrade(enrollmentID As Global.System.Int32, courseID As Global.System.Int32, studentID As Global.System.Int32) As StudentGrade
        Dim studentGrade as StudentGrade = New StudentGrade
        studentGrade.EnrollmentID = enrollmentID
        studentGrade.CourseID = courseID
        studentGrade.StudentID = studentID
        Return studentGrade
    End Function

    #End Region
    #Region "Primitive Properties"

    ''' <summary>
    ''' No Metadata Documentation available.
    ''' </summary>
    <EdmScalarPropertyAttribute(EntityKeyProperty:=true, IsNullable:=false)>
    <DataMemberAttribute()>
    Public Property EnrollmentID() As Global.System.Int32
        Get
            Return _EnrollmentID
        End Get
        Set
            If (_EnrollmentID <> Value) Then
                OnEnrollmentIDChanging(value)
                ReportPropertyChanging("EnrollmentID")
                _EnrollmentID = StructuralObject.SetValidValue(value)
                ReportPropertyChanged("EnrollmentID")
                OnEnrollmentIDChanged()
            End If
        End Set
    End Property

    Private _EnrollmentID As Global.System.Int32
    Private Partial Sub OnEnrollmentIDChanging(value As Global.System.Int32)
    End Sub

    Private Partial Sub OnEnrollmentIDChanged()
    End Sub

    ''' <summary>
    ''' No Metadata Documentation available.
    ''' </summary>
    <EdmScalarPropertyAttribute(EntityKeyProperty:=false, IsNullable:=false)>
    <DataMemberAttribute()>
    Public Property CourseID() As Global.System.Int32
        Get
            Return _CourseID
        End Get
        Set
            OnCourseIDChanging(value)
            ReportPropertyChanging("CourseID")
            _CourseID = StructuralObject.SetValidValue(value)
            ReportPropertyChanged("CourseID")
            OnCourseIDChanged()
        End Set
    End Property

    Private _CourseID As Global.System.Int32
    Private Partial Sub OnCourseIDChanging(value As Global.System.Int32)
    End Sub

    Private Partial Sub OnCourseIDChanged()
    End Sub

    ''' <summary>
    ''' No Metadata Documentation available.
    ''' </summary>
    <EdmScalarPropertyAttribute(EntityKeyProperty:=false, IsNullable:=false)>
    <DataMemberAttribute()>
    Public Property StudentID() As Global.System.Int32
        Get
            Return _StudentID
        End Get
        Set
            OnStudentIDChanging(value)
            ReportPropertyChanging("StudentID")
            _StudentID = StructuralObject.SetValidValue(value)
            ReportPropertyChanged("StudentID")
            OnStudentIDChanged()
        End Set
    End Property

    Private _StudentID As Global.System.Int32
    Private Partial Sub OnStudentIDChanging(value As Global.System.Int32)
    End Sub

    Private Partial Sub OnStudentIDChanged()
    End Sub

    ''' <summary>
    ''' No Metadata Documentation available.
    ''' </summary>
    <EdmScalarPropertyAttribute(EntityKeyProperty:=false, IsNullable:=true)>
    <DataMemberAttribute()>
    Public Property Grade() As Nullable(Of Global.System.Decimal)
        Get
            Return _Grade
        End Get
        Set
            OnGradeChanging(value)
            ReportPropertyChanging("Grade")
            _Grade = StructuralObject.SetValidValue(value)
            ReportPropertyChanged("Grade")
            OnGradeChanged()
        End Set
    End Property

    Private _Grade As Nullable(Of Global.System.Decimal)
    Private Partial Sub OnGradeChanging(value As Nullable(Of Global.System.Decimal))
    End Sub

    Private Partial Sub OnGradeChanged()
    End Sub

    #End Region
    #Region "Navigation Properties"

    ''' <summary>
    ''' No Metadata Documentation available.
    ''' </summary>
    <XmlIgnoreAttribute()>
    <SoapIgnoreAttribute()>
    <DataMemberAttribute()>
    <EdmRelationshipNavigationPropertyAttribute("SchoolModel", "FK_StudentGrade_Course", "Course")>
    Public Property Course() As Course
        Get
            Return CType(Me, IEntityWithRelationships).RelationshipManager.GetRelatedReference(Of Course)("SchoolModel.FK_StudentGrade_Course", "Course").Value
        End Get
        Set
            CType(Me, IEntityWithRelationships).RelationshipManager.GetRelatedReference(Of Course)("SchoolModel.FK_StudentGrade_Course", "Course").Value = value
        End Set
    End Property
    ''' <summary>
    ''' No Metadata Documentation available.
    ''' </summary>
    <BrowsableAttribute(False)>
    <DataMemberAttribute()>
    Public Property CourseReference() As EntityReference(Of Course)
        Get
            Return CType(Me, IEntityWithRelationships).RelationshipManager.GetRelatedReference(Of Course)("SchoolModel.FK_StudentGrade_Course", "Course")
        End Get
        Set
            If (Not value Is Nothing)
                CType(Me, IEntityWithRelationships).RelationshipManager.InitializeRelatedReference(Of Course)("SchoolModel.FK_StudentGrade_Course", "Course", value)
            End If
        End Set
    End Property

    ''' <summary>
    ''' No Metadata Documentation available.
    ''' </summary>
    <XmlIgnoreAttribute()>
    <SoapIgnoreAttribute()>
    <DataMemberAttribute()>
    <EdmRelationshipNavigationPropertyAttribute("SchoolModel", "FK_StudentGrade_Student", "Person")>
    Public Property Person() As Person
        Get
            Return CType(Me, IEntityWithRelationships).RelationshipManager.GetRelatedReference(Of Person)("SchoolModel.FK_StudentGrade_Student", "Person").Value
        End Get
        Set
            CType(Me, IEntityWithRelationships).RelationshipManager.GetRelatedReference(Of Person)("SchoolModel.FK_StudentGrade_Student", "Person").Value = value
        End Set
    End Property
    ''' <summary>
    ''' No Metadata Documentation available.
    ''' </summary>
    <BrowsableAttribute(False)>
    <DataMemberAttribute()>
    Public Property PersonReference() As EntityReference(Of Person)
        Get
            Return CType(Me, IEntityWithRelationships).RelationshipManager.GetRelatedReference(Of Person)("SchoolModel.FK_StudentGrade_Student", "Person")
        End Get
        Set
            If (Not value Is Nothing)
                CType(Me, IEntityWithRelationships).RelationshipManager.InitializeRelatedReference(Of Person)("SchoolModel.FK_StudentGrade_Student", "Person", value)
            End If
        End Set
    End Property

    #End Region
End Class

#End Region