'------------------------------------------------------------------------------
' <auto-generated>
'     This code was generated by a tool.
'     Runtime Version:2.0.50727.3643
'
'     Changes to this file may cause incorrect behavior and will be lost if
'     the code is regenerated.
' </auto-generated>
'------------------------------------------------------------------------------

Option Strict Off
Option Explicit On


'
' This file contains the strongly-typed dataset class.
' The TableAdapters and Dataset Designer (.xsd) file are in the DataAccess project. 
'

'''<summary>
'''Represents a strongly typed in-memory cache of data.
'''</summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
 Global.System.Serializable(),  _
 Global.System.ComponentModel.DesignerCategoryAttribute("code"),  _
 Global.System.ComponentModel.ToolboxItem(true),  _
 Global.System.Xml.Serialization.XmlSchemaProviderAttribute("GetTypedDataSetSchema"),  _
 Global.System.Xml.Serialization.XmlRootAttribute("RecipeHolderDatabaseDataSet"),  _
 Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.DataSet")>  _
Partial Public Class RecipeHolderDatabaseDataSet
    Inherits Global.System.Data.DataSet
    
    Private tableCourses As CoursesDataTable
    
    Private tableCuisineTypes As CuisineTypesDataTable
    
    Private tableFoodTypes As FoodTypesDataTable
    
    Private tableIngredients As IngredientsDataTable
    
    Private tableNutritionDetails As NutritionDetailsDataTable
    
    Private tableRecipeIngredient As RecipeIngredientDataTable
    
    Private tableRecipes As RecipesDataTable
    
    Private tableUnitMeasurements As UnitMeasurementsDataTable
    
    Private tableAccounts As AccountsDataTable
    
    Private tableRetrieveRecipeTable As RetrieveRecipeTableDataTable
    
    Private tableRetrieveRecipeIngredientTable As RetrieveRecipeIngredientTableDataTable
    
    Private tableViewIngredientsFoodTypes As ViewIngredientsFoodTypesDataTable
    
    Private relationFK_Ingredients_FoodTypes As Global.System.Data.DataRelation
    
    Private relationRetrieveRecipeTable_NutritionDetails As Global.System.Data.DataRelation
    
    Private relationRetrieveRecipeTable_RetrieveRecipeIngredientTable As Global.System.Data.DataRelation
    
    Private relationFK_RecipeIngredient_Recipes As Global.System.Data.DataRelation
    
    Private relationFK_Recipes_Accounts As Global.System.Data.DataRelation
    
    Private relationFK_NutritionDetails_Recipes As Global.System.Data.DataRelation
    
    Private relationFK_RecipeIngredient_UnitMeasurements As Global.System.Data.DataRelation
    
    Private _schemaSerializationMode As Global.System.Data.SchemaSerializationMode = Global.System.Data.SchemaSerializationMode.IncludeSchema
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
    Public Sub New()
        MyBase.New
        Me.BeginInit
        Me.InitClass
        Dim schemaChangedHandler As Global.System.ComponentModel.CollectionChangeEventHandler = AddressOf Me.SchemaChanged
        AddHandler MyBase.Tables.CollectionChanged, schemaChangedHandler
        AddHandler MyBase.Relations.CollectionChanged, schemaChangedHandler
        Me.EndInit
    End Sub
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
    Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext)
        MyBase.New(info, context, false)
        If (Me.IsBinarySerialized(info, context) = true) Then
            Me.InitVars(false)
            Dim schemaChangedHandler1 As Global.System.ComponentModel.CollectionChangeEventHandler = AddressOf Me.SchemaChanged
            AddHandler Me.Tables.CollectionChanged, schemaChangedHandler1
            AddHandler Me.Relations.CollectionChanged, schemaChangedHandler1
            Return
        End If
        Dim strSchema As String = CType(info.GetValue("XmlSchema", GetType(String)),String)
        If (Me.DetermineSchemaSerializationMode(info, context) = Global.System.Data.SchemaSerializationMode.IncludeSchema) Then
            Dim ds As Global.System.Data.DataSet = New Global.System.Data.DataSet
            ds.ReadXmlSchema(New Global.System.Xml.XmlTextReader(New Global.System.IO.StringReader(strSchema)))
            If (Not (ds.Tables("Courses")) Is Nothing) Then
                MyBase.Tables.Add(New CoursesDataTable(ds.Tables("Courses")))
            End If
            If (Not (ds.Tables("CuisineTypes")) Is Nothing) Then
                MyBase.Tables.Add(New CuisineTypesDataTable(ds.Tables("CuisineTypes")))
            End If
            If (Not (ds.Tables("FoodTypes")) Is Nothing) Then
                MyBase.Tables.Add(New FoodTypesDataTable(ds.Tables("FoodTypes")))
            End If
            If (Not (ds.Tables("Ingredients")) Is Nothing) Then
                MyBase.Tables.Add(New IngredientsDataTable(ds.Tables("Ingredients")))
            End If
            If (Not (ds.Tables("NutritionDetails")) Is Nothing) Then
                MyBase.Tables.Add(New NutritionDetailsDataTable(ds.Tables("NutritionDetails")))
            End If
            If (Not (ds.Tables("RecipeIngredient")) Is Nothing) Then
                MyBase.Tables.Add(New RecipeIngredientDataTable(ds.Tables("RecipeIngredient")))
            End If
            If (Not (ds.Tables("Recipes")) Is Nothing) Then
                MyBase.Tables.Add(New RecipesDataTable(ds.Tables("Recipes")))
            End If
            If (Not (ds.Tables("UnitMeasurements")) Is Nothing) Then
                MyBase.Tables.Add(New UnitMeasurementsDataTable(ds.Tables("UnitMeasurements")))
            End If
            If (Not (ds.Tables("Accounts")) Is Nothing) Then
                MyBase.Tables.Add(New AccountsDataTable(ds.Tables("Accounts")))
            End If
            If (Not (ds.Tables("RetrieveRecipeTable")) Is Nothing) Then
                MyBase.Tables.Add(New RetrieveRecipeTableDataTable(ds.Tables("RetrieveRecipeTable")))
            End If
            If (Not (ds.Tables("RetrieveRecipeIngredientTable")) Is Nothing) Then
                MyBase.Tables.Add(New RetrieveRecipeIngredientTableDataTable(ds.Tables("RetrieveRecipeIngredientTable")))
            End If
            If (Not (ds.Tables("ViewIngredientsFoodTypes")) Is Nothing) Then
                MyBase.Tables.Add(New ViewIngredientsFoodTypesDataTable(ds.Tables("ViewIngredientsFoodTypes")))
            End If
            Me.DataSetName = ds.DataSetName
            Me.Prefix = ds.Prefix
            Me.Namespace = ds.Namespace
            Me.Locale = ds.Locale
            Me.CaseSensitive = ds.CaseSensitive
            Me.EnforceConstraints = ds.EnforceConstraints
            Me.Merge(ds, false, Global.System.Data.MissingSchemaAction.Add)
            Me.InitVars
        Else
            Me.ReadXmlSchema(New Global.System.Xml.XmlTextReader(New Global.System.IO.StringReader(strSchema)))
        End If
        Me.GetSerializationData(info, context)
        Dim schemaChangedHandler As Global.System.ComponentModel.CollectionChangeEventHandler = AddressOf Me.SchemaChanged
        AddHandler MyBase.Tables.CollectionChanged, schemaChangedHandler
        AddHandler Me.Relations.CollectionChanged, schemaChangedHandler
    End Sub
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
     Global.System.ComponentModel.Browsable(false),  _
     Global.System.ComponentModel.DesignerSerializationVisibility(Global.System.ComponentModel.DesignerSerializationVisibility.Content)>  _
    Public ReadOnly Property Courses() As CoursesDataTable
        Get
            Return Me.tableCourses
        End Get
    End Property
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
     Global.System.ComponentModel.Browsable(false),  _
     Global.System.ComponentModel.DesignerSerializationVisibility(Global.System.ComponentModel.DesignerSerializationVisibility.Content)>  _
    Public ReadOnly Property CuisineTypes() As CuisineTypesDataTable
        Get
            Return Me.tableCuisineTypes
        End Get
    End Property
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
     Global.System.ComponentModel.Browsable(false),  _
     Global.System.ComponentModel.DesignerSerializationVisibility(Global.System.ComponentModel.DesignerSerializationVisibility.Content)>  _
    Public ReadOnly Property FoodTypes() As FoodTypesDataTable
        Get
            Return Me.tableFoodTypes
        End Get
    End Property
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
     Global.System.ComponentModel.Browsable(false),  _
     Global.System.ComponentModel.DesignerSerializationVisibility(Global.System.ComponentModel.DesignerSerializationVisibility.Content)>  _
    Public ReadOnly Property Ingredients() As IngredientsDataTable
        Get
            Return Me.tableIngredients
        End Get
    End Property
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
     Global.System.ComponentModel.Browsable(false),  _
     Global.System.ComponentModel.DesignerSerializationVisibility(Global.System.ComponentModel.DesignerSerializationVisibility.Content)>  _
    Public ReadOnly Property NutritionDetails() As NutritionDetailsDataTable
        Get
            Return Me.tableNutritionDetails
        End Get
    End Property
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
     Global.System.ComponentModel.Browsable(false),  _
     Global.System.ComponentModel.DesignerSerializationVisibility(Global.System.ComponentModel.DesignerSerializationVisibility.Content)>  _
    Public ReadOnly Property RecipeIngredient() As RecipeIngredientDataTable
        Get
            Return Me.tableRecipeIngredient
        End Get
    End Property
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
     Global.System.ComponentModel.Browsable(false),  _
     Global.System.ComponentModel.DesignerSerializationVisibility(Global.System.ComponentModel.DesignerSerializationVisibility.Content)>  _
    Public ReadOnly Property Recipes() As RecipesDataTable
        Get
            Return Me.tableRecipes
        End Get
    End Property
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
     Global.System.ComponentModel.Browsable(false),  _
     Global.System.ComponentModel.DesignerSerializationVisibility(Global.System.ComponentModel.DesignerSerializationVisibility.Content)>  _
    Public ReadOnly Property UnitMeasurements() As UnitMeasurementsDataTable
        Get
            Return Me.tableUnitMeasurements
        End Get
    End Property
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
     Global.System.ComponentModel.Browsable(false),  _
     Global.System.ComponentModel.DesignerSerializationVisibility(Global.System.ComponentModel.DesignerSerializationVisibility.Content)>  _
    Public ReadOnly Property Accounts() As AccountsDataTable
        Get
            Return Me.tableAccounts
        End Get
    End Property
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
     Global.System.ComponentModel.Browsable(false),  _
     Global.System.ComponentModel.DesignerSerializationVisibility(Global.System.ComponentModel.DesignerSerializationVisibility.Content)>  _
    Public ReadOnly Property RetrieveRecipeTable() As RetrieveRecipeTableDataTable
        Get
            Return Me.tableRetrieveRecipeTable
        End Get
    End Property
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
     Global.System.ComponentModel.Browsable(false),  _
     Global.System.ComponentModel.DesignerSerializationVisibility(Global.System.ComponentModel.DesignerSerializationVisibility.Content)>  _
    Public ReadOnly Property RetrieveRecipeIngredientTable() As RetrieveRecipeIngredientTableDataTable
        Get
            Return Me.tableRetrieveRecipeIngredientTable
        End Get
    End Property
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
     Global.System.ComponentModel.Browsable(false),  _
     Global.System.ComponentModel.DesignerSerializationVisibility(Global.System.ComponentModel.DesignerSerializationVisibility.Content)>  _
    Public ReadOnly Property ViewIngredientsFoodTypes() As ViewIngredientsFoodTypesDataTable
        Get
            Return Me.tableViewIngredientsFoodTypes
        End Get
    End Property
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
     Global.System.ComponentModel.BrowsableAttribute(true),  _
     Global.System.ComponentModel.DesignerSerializationVisibilityAttribute(Global.System.ComponentModel.DesignerSerializationVisibility.Visible)>  _
    Public Overrides Property SchemaSerializationMode() As Global.System.Data.SchemaSerializationMode
        Get
            Return Me._schemaSerializationMode
        End Get
        Set
            Me._schemaSerializationMode = value
        End Set
    End Property
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
     Global.System.ComponentModel.DesignerSerializationVisibilityAttribute(Global.System.ComponentModel.DesignerSerializationVisibility.Hidden)>  _
    Public Shadows ReadOnly Property Tables() As Global.System.Data.DataTableCollection
        Get
            Return MyBase.Tables
        End Get
    End Property
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
     Global.System.ComponentModel.DesignerSerializationVisibilityAttribute(Global.System.ComponentModel.DesignerSerializationVisibility.Hidden)>  _
    Public Shadows ReadOnly Property Relations() As Global.System.Data.DataRelationCollection
        Get
            Return MyBase.Relations
        End Get
    End Property
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
    Protected Overrides Sub InitializeDerivedDataSet()
        Me.BeginInit
        Me.InitClass
        Me.EndInit
    End Sub
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
    Public Overrides Function Clone() As Global.System.Data.DataSet
        Dim cln As RecipeHolderDatabaseDataSet = CType(MyBase.Clone,RecipeHolderDatabaseDataSet)
        cln.InitVars
        cln.SchemaSerializationMode = Me.SchemaSerializationMode
        Return cln
    End Function
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
    Protected Overrides Function ShouldSerializeTables() As Boolean
        Return false
    End Function
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
    Protected Overrides Function ShouldSerializeRelations() As Boolean
        Return false
    End Function
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
    Protected Overrides Sub ReadXmlSerializable(ByVal reader As Global.System.Xml.XmlReader)
        If (Me.DetermineSchemaSerializationMode(reader) = Global.System.Data.SchemaSerializationMode.IncludeSchema) Then
            Me.Reset
            Dim ds As Global.System.Data.DataSet = New Global.System.Data.DataSet
            ds.ReadXml(reader)
            If (Not (ds.Tables("Courses")) Is Nothing) Then
                MyBase.Tables.Add(New CoursesDataTable(ds.Tables("Courses")))
            End If
            If (Not (ds.Tables("CuisineTypes")) Is Nothing) Then
                MyBase.Tables.Add(New CuisineTypesDataTable(ds.Tables("CuisineTypes")))
            End If
            If (Not (ds.Tables("FoodTypes")) Is Nothing) Then
                MyBase.Tables.Add(New FoodTypesDataTable(ds.Tables("FoodTypes")))
            End If
            If (Not (ds.Tables("Ingredients")) Is Nothing) Then
                MyBase.Tables.Add(New IngredientsDataTable(ds.Tables("Ingredients")))
            End If
            If (Not (ds.Tables("NutritionDetails")) Is Nothing) Then
                MyBase.Tables.Add(New NutritionDetailsDataTable(ds.Tables("NutritionDetails")))
            End If
            If (Not (ds.Tables("RecipeIngredient")) Is Nothing) Then
                MyBase.Tables.Add(New RecipeIngredientDataTable(ds.Tables("RecipeIngredient")))
            End If
            If (Not (ds.Tables("Recipes")) Is Nothing) Then
                MyBase.Tables.Add(New RecipesDataTable(ds.Tables("Recipes")))
            End If
            If (Not (ds.Tables("UnitMeasurements")) Is Nothing) Then
                MyBase.Tables.Add(New UnitMeasurementsDataTable(ds.Tables("UnitMeasurements")))
            End If
            If (Not (ds.Tables("Accounts")) Is Nothing) Then
                MyBase.Tables.Add(New AccountsDataTable(ds.Tables("Accounts")))
            End If
            If (Not (ds.Tables("RetrieveRecipeTable")) Is Nothing) Then
                MyBase.Tables.Add(New RetrieveRecipeTableDataTable(ds.Tables("RetrieveRecipeTable")))
            End If
            If (Not (ds.Tables("RetrieveRecipeIngredientTable")) Is Nothing) Then
                MyBase.Tables.Add(New RetrieveRecipeIngredientTableDataTable(ds.Tables("RetrieveRecipeIngredientTable")))
            End If
            If (Not (ds.Tables("ViewIngredientsFoodTypes")) Is Nothing) Then
                MyBase.Tables.Add(New ViewIngredientsFoodTypesDataTable(ds.Tables("ViewIngredientsFoodTypes")))
            End If
            Me.DataSetName = ds.DataSetName
            Me.Prefix = ds.Prefix
            Me.Namespace = ds.Namespace
            Me.Locale = ds.Locale
            Me.CaseSensitive = ds.CaseSensitive
            Me.EnforceConstraints = ds.EnforceConstraints
            Me.Merge(ds, false, Global.System.Data.MissingSchemaAction.Add)
            Me.InitVars
        Else
            Me.ReadXml(reader)
            Me.InitVars
        End If
    End Sub
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
    Protected Overrides Function GetSchemaSerializable() As Global.System.Xml.Schema.XmlSchema
        Dim stream As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
        Me.WriteXmlSchema(New Global.System.Xml.XmlTextWriter(stream, Nothing))
        stream.Position = 0
        Return Global.System.Xml.Schema.XmlSchema.Read(New Global.System.Xml.XmlTextReader(stream), Nothing)
    End Function
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
    Friend Overloads Sub InitVars()
        Me.InitVars(true)
    End Sub
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
    Friend Overloads Sub InitVars(ByVal initTable As Boolean)
        Me.tableCourses = CType(MyBase.Tables("Courses"),CoursesDataTable)
        If (initTable = true) Then
            If (Not (Me.tableCourses) Is Nothing) Then
                Me.tableCourses.InitVars
            End If
        End If
        Me.tableCuisineTypes = CType(MyBase.Tables("CuisineTypes"),CuisineTypesDataTable)
        If (initTable = true) Then
            If (Not (Me.tableCuisineTypes) Is Nothing) Then
                Me.tableCuisineTypes.InitVars
            End If
        End If
        Me.tableFoodTypes = CType(MyBase.Tables("FoodTypes"),FoodTypesDataTable)
        If (initTable = true) Then
            If (Not (Me.tableFoodTypes) Is Nothing) Then
                Me.tableFoodTypes.InitVars
            End If
        End If
        Me.tableIngredients = CType(MyBase.Tables("Ingredients"),IngredientsDataTable)
        If (initTable = true) Then
            If (Not (Me.tableIngredients) Is Nothing) Then
                Me.tableIngredients.InitVars
            End If
        End If
        Me.tableNutritionDetails = CType(MyBase.Tables("NutritionDetails"),NutritionDetailsDataTable)
        If (initTable = true) Then
            If (Not (Me.tableNutritionDetails) Is Nothing) Then
                Me.tableNutritionDetails.InitVars
            End If
        End If
        Me.tableRecipeIngredient = CType(MyBase.Tables("RecipeIngredient"),RecipeIngredientDataTable)
        If (initTable = true) Then
            If (Not (Me.tableRecipeIngredient) Is Nothing) Then
                Me.tableRecipeIngredient.InitVars
            End If
        End If
        Me.tableRecipes = CType(MyBase.Tables("Recipes"),RecipesDataTable)
        If (initTable = true) Then
            If (Not (Me.tableRecipes) Is Nothing) Then
                Me.tableRecipes.InitVars
            End If
        End If
        Me.tableUnitMeasurements = CType(MyBase.Tables("UnitMeasurements"),UnitMeasurementsDataTable)
        If (initTable = true) Then
            If (Not (Me.tableUnitMeasurements) Is Nothing) Then
                Me.tableUnitMeasurements.InitVars
            End If
        End If
        Me.tableAccounts = CType(MyBase.Tables("Accounts"),AccountsDataTable)
        If (initTable = true) Then
            If (Not (Me.tableAccounts) Is Nothing) Then
                Me.tableAccounts.InitVars
            End If
        End If
        Me.tableRetrieveRecipeTable = CType(MyBase.Tables("RetrieveRecipeTable"),RetrieveRecipeTableDataTable)
        If (initTable = true) Then
            If (Not (Me.tableRetrieveRecipeTable) Is Nothing) Then
                Me.tableRetrieveRecipeTable.InitVars
            End If
        End If
        Me.tableRetrieveRecipeIngredientTable = CType(MyBase.Tables("RetrieveRecipeIngredientTable"),RetrieveRecipeIngredientTableDataTable)
        If (initTable = true) Then
            If (Not (Me.tableRetrieveRecipeIngredientTable) Is Nothing) Then
                Me.tableRetrieveRecipeIngredientTable.InitVars
            End If
        End If
        Me.tableViewIngredientsFoodTypes = CType(MyBase.Tables("ViewIngredientsFoodTypes"),ViewIngredientsFoodTypesDataTable)
        If (initTable = true) Then
            If (Not (Me.tableViewIngredientsFoodTypes) Is Nothing) Then
                Me.tableViewIngredientsFoodTypes.InitVars
            End If
        End If
        Me.relationFK_Ingredients_FoodTypes = Me.Relations("FK_Ingredients_FoodTypes")
        Me.relationRetrieveRecipeTable_NutritionDetails = Me.Relations("RetrieveRecipeTable_NutritionDetails")
        Me.relationRetrieveRecipeTable_RetrieveRecipeIngredientTable = Me.Relations("RetrieveRecipeTable_RetrieveRecipeIngredientTable")
        Me.relationFK_RecipeIngredient_Recipes = Me.Relations("FK_RecipeIngredient_Recipes")
        Me.relationFK_Recipes_Accounts = Me.Relations("FK_Recipes_Accounts")
        Me.relationFK_NutritionDetails_Recipes = Me.Relations("FK_NutritionDetails_Recipes")
        Me.relationFK_RecipeIngredient_UnitMeasurements = Me.Relations("FK_RecipeIngredient_UnitMeasurements")
    End Sub
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
    Private Sub InitClass()
        Me.DataSetName = "RecipeHolderDatabaseDataSet"
        Me.Prefix = ""
        Me.Namespace = "http://tempuri.org/RecipeHolderDatabaseDataSet.xsd"
        Me.EnforceConstraints = true
        Me.SchemaSerializationMode = Global.System.Data.SchemaSerializationMode.IncludeSchema
        Me.tableCourses = New CoursesDataTable
        MyBase.Tables.Add(Me.tableCourses)
        Me.tableCuisineTypes = New CuisineTypesDataTable
        MyBase.Tables.Add(Me.tableCuisineTypes)
        Me.tableFoodTypes = New FoodTypesDataTable
        MyBase.Tables.Add(Me.tableFoodTypes)
        Me.tableIngredients = New IngredientsDataTable
        MyBase.Tables.Add(Me.tableIngredients)
        Me.tableNutritionDetails = New NutritionDetailsDataTable
        MyBase.Tables.Add(Me.tableNutritionDetails)
        Me.tableRecipeIngredient = New RecipeIngredientDataTable
        MyBase.Tables.Add(Me.tableRecipeIngredient)
        Me.tableRecipes = New RecipesDataTable
        MyBase.Tables.Add(Me.tableRecipes)
        Me.tableUnitMeasurements = New UnitMeasurementsDataTable
        MyBase.Tables.Add(Me.tableUnitMeasurements)
        Me.tableAccounts = New AccountsDataTable
        MyBase.Tables.Add(Me.tableAccounts)
        Me.tableRetrieveRecipeTable = New RetrieveRecipeTableDataTable
        MyBase.Tables.Add(Me.tableRetrieveRecipeTable)
        Me.tableRetrieveRecipeIngredientTable = New RetrieveRecipeIngredientTableDataTable
        MyBase.Tables.Add(Me.tableRetrieveRecipeIngredientTable)
        Me.tableViewIngredientsFoodTypes = New ViewIngredientsFoodTypesDataTable
        MyBase.Tables.Add(Me.tableViewIngredientsFoodTypes)
        Dim fkc As Global.System.Data.ForeignKeyConstraint
        fkc = New Global.System.Data.ForeignKeyConstraint("FK_Ingredients_FoodTypes", New Global.System.Data.DataColumn() {Me.tableFoodTypes.FoodTypeIDColumn}, New Global.System.Data.DataColumn() {Me.tableIngredients.FoodTypeIDColumn})
        Me.tableIngredients.Constraints.Add(fkc)
        fkc.AcceptRejectRule = Global.System.Data.AcceptRejectRule.None
        fkc.DeleteRule = Global.System.Data.Rule.Cascade
        fkc.UpdateRule = Global.System.Data.Rule.Cascade
        fkc = New Global.System.Data.ForeignKeyConstraint("FK_RecipeIngredient_Ingredients", New Global.System.Data.DataColumn() {Me.tableIngredients.IngredientIDColumn}, New Global.System.Data.DataColumn() {Me.tableRecipeIngredient.IngredientIDColumn})
        Me.tableRecipeIngredient.Constraints.Add(fkc)
        fkc.AcceptRejectRule = Global.System.Data.AcceptRejectRule.None
        fkc.DeleteRule = Global.System.Data.Rule.None
        fkc.UpdateRule = Global.System.Data.Rule.Cascade
        fkc = New Global.System.Data.ForeignKeyConstraint("FK_Recipes_CuisineTypes", New Global.System.Data.DataColumn() {Me.tableCuisineTypes.CuisineTypeIDColumn}, New Global.System.Data.DataColumn() {Me.tableRecipes.CuisineTypeIDColumn})
        Me.tableRecipes.Constraints.Add(fkc)
        fkc.AcceptRejectRule = Global.System.Data.AcceptRejectRule.None
        fkc.DeleteRule = Global.System.Data.Rule.None
        fkc.UpdateRule = Global.System.Data.Rule.Cascade
        fkc = New Global.System.Data.ForeignKeyConstraint("FK_Recipes_CourseTypes", New Global.System.Data.DataColumn() {Me.tableCourses.CourseTypeIDColumn}, New Global.System.Data.DataColumn() {Me.tableRecipes.CourseTypeIDColumn})
        Me.tableRecipes.Constraints.Add(fkc)
        fkc.AcceptRejectRule = Global.System.Data.AcceptRejectRule.None
        fkc.DeleteRule = Global.System.Data.Rule.None
        fkc.UpdateRule = Global.System.Data.Rule.Cascade
        Me.relationFK_Ingredients_FoodTypes = New Global.System.Data.DataRelation("FK_Ingredients_FoodTypes", New Global.System.Data.DataColumn() {Me.tableFoodTypes.FoodTypeIDColumn}, New Global.System.Data.DataColumn() {Me.tableIngredients.FoodTypeIDColumn}, false)
        Me.Relations.Add(Me.relationFK_Ingredients_FoodTypes)
        Me.relationRetrieveRecipeTable_NutritionDetails = New Global.System.Data.DataRelation("RetrieveRecipeTable_NutritionDetails", New Global.System.Data.DataColumn() {Me.tableRetrieveRecipeTable.RecipeIDColumn}, New Global.System.Data.DataColumn() {Me.tableNutritionDetails.RecipeIDColumn}, false)
        Me.Relations.Add(Me.relationRetrieveRecipeTable_NutritionDetails)
        Me.relationRetrieveRecipeTable_RetrieveRecipeIngredientTable = New Global.System.Data.DataRelation("RetrieveRecipeTable_RetrieveRecipeIngredientTable", New Global.System.Data.DataColumn() {Me.tableRetrieveRecipeTable.RecipeIDColumn}, New Global.System.Data.DataColumn() {Me.tableRetrieveRecipeIngredientTable.RecipeIdColumn}, false)
        Me.Relations.Add(Me.relationRetrieveRecipeTable_RetrieveRecipeIngredientTable)
        Me.relationFK_RecipeIngredient_Recipes = New Global.System.Data.DataRelation("FK_RecipeIngredient_Recipes", New Global.System.Data.DataColumn() {Me.tableRecipes.RecipeIDColumn}, New Global.System.Data.DataColumn() {Me.tableRecipeIngredient.RecipeIDColumn}, false)
        Me.Relations.Add(Me.relationFK_RecipeIngredient_Recipes)
        Me.relationFK_Recipes_Accounts = New Global.System.Data.DataRelation("FK_Recipes_Accounts", New Global.System.Data.DataColumn() {Me.tableAccounts.AccountIDColumn}, New Global.System.Data.DataColumn() {Me.tableRecipes.AccountIdColumn}, false)
        Me.Relations.Add(Me.relationFK_Recipes_Accounts)
        Me.relationFK_NutritionDetails_Recipes = New Global.System.Data.DataRelation("FK_NutritionDetails_Recipes", New Global.System.Data.DataColumn() {Me.tableRecipes.RecipeIDColumn}, New Global.System.Data.DataColumn() {Me.tableNutritionDetails.RecipeIDColumn}, false)
        Me.Relations.Add(Me.relationFK_NutritionDetails_Recipes)
        Me.relationFK_RecipeIngredient_UnitMeasurements = New Global.System.Data.DataRelation("FK_RecipeIngredient_UnitMeasurements", New Global.System.Data.DataColumn() {Me.tableUnitMeasurements.UnitMeasurementIDColumn}, New Global.System.Data.DataColumn() {Me.tableRecipeIngredient.UnitMeasurementIDColumn}, false)
        Me.Relations.Add(Me.relationFK_RecipeIngredient_UnitMeasurements)
    End Sub
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
    Private Function ShouldSerializeCourses() As Boolean
        Return false
    End Function
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
    Private Function ShouldSerializeCuisineTypes() As Boolean
        Return false
    End Function
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
    Private Function ShouldSerializeFoodTypes() As Boolean
        Return false
    End Function
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
    Private Function ShouldSerializeIngredients() As Boolean
        Return false
    End Function
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
    Private Function ShouldSerializeNutritionDetails() As Boolean
        Return false
    End Function
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
    Private Function ShouldSerializeRecipeIngredient() As Boolean
        Return false
    End Function
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
    Private Function ShouldSerializeRecipes() As Boolean
        Return false
    End Function
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
    Private Function ShouldSerializeUnitMeasurements() As Boolean
        Return false
    End Function
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
    Private Function ShouldSerializeAccounts() As Boolean
        Return false
    End Function
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
    Private Function ShouldSerializeRetrieveRecipeTable() As Boolean
        Return false
    End Function
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
    Private Function ShouldSerializeRetrieveRecipeIngredientTable() As Boolean
        Return false
    End Function
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
    Private Function ShouldSerializeViewIngredientsFoodTypes() As Boolean
        Return false
    End Function
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
    Private Sub SchemaChanged(ByVal sender As Object, ByVal e As Global.System.ComponentModel.CollectionChangeEventArgs)
        If (e.Action = Global.System.ComponentModel.CollectionChangeAction.Remove) Then
            Me.InitVars
        End If
    End Sub
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
    Public Shared Function GetTypedDataSetSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType
        Dim ds As RecipeHolderDatabaseDataSet = New RecipeHolderDatabaseDataSet
        Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType
        Dim sequence As Global.System.Xml.Schema.XmlSchemaSequence = New Global.System.Xml.Schema.XmlSchemaSequence
        Dim any As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
        any.Namespace = ds.Namespace
        sequence.Items.Add(any)
        type.Particle = sequence
        Dim dsSchema As Global.System.Xml.Schema.XmlSchema = ds.GetSchemaSerializable
        If xs.Contains(dsSchema.TargetNamespace) Then
            Dim s1 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
            Dim s2 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
            Try 
                Dim schema As Global.System.Xml.Schema.XmlSchema = Nothing
                dsSchema.Write(s1)
                Dim schemas As Global.System.Collections.IEnumerator = xs.Schemas(dsSchema.TargetNamespace).GetEnumerator
                Do While schemas.MoveNext
                    schema = CType(schemas.Current,Global.System.Xml.Schema.XmlSchema)
                    s2.SetLength(0)
                    schema.Write(s2)
                    If (s1.Length = s2.Length) Then
                        s1.Position = 0
                        s2.Position = 0
                        
                        Do While ((s1.Position <> s1.Length)  _
                                    AndAlso (s1.ReadByte = s2.ReadByte))
                            
                            
                        Loop
                        If (s1.Position = s1.Length) Then
                            Return type
                        End If
                    End If
                    
                Loop
            Finally
                If (Not (s1) Is Nothing) Then
                    s1.Close
                End If
                If (Not (s2) Is Nothing) Then
                    s2.Close
                End If
            End Try
        End If
        xs.Add(dsSchema)
        Return type
    End Function
    
    Public Delegate Sub CoursesRowChangeEventHandler(ByVal sender As Object, ByVal e As CoursesRowChangeEvent)
    
    Public Delegate Sub CuisineTypesRowChangeEventHandler(ByVal sender As Object, ByVal e As CuisineTypesRowChangeEvent)
    
    Public Delegate Sub FoodTypesRowChangeEventHandler(ByVal sender As Object, ByVal e As FoodTypesRowChangeEvent)
    
    Public Delegate Sub IngredientsRowChangeEventHandler(ByVal sender As Object, ByVal e As IngredientsRowChangeEvent)
    
    Public Delegate Sub NutritionDetailsRowChangeEventHandler(ByVal sender As Object, ByVal e As NutritionDetailsRowChangeEvent)
    
    Public Delegate Sub RecipeIngredientRowChangeEventHandler(ByVal sender As Object, ByVal e As RecipeIngredientRowChangeEvent)
    
    Public Delegate Sub RecipesRowChangeEventHandler(ByVal sender As Object, ByVal e As RecipesRowChangeEvent)
    
    Public Delegate Sub UnitMeasurementsRowChangeEventHandler(ByVal sender As Object, ByVal e As UnitMeasurementsRowChangeEvent)
    
    Public Delegate Sub AccountsRowChangeEventHandler(ByVal sender As Object, ByVal e As AccountsRowChangeEvent)
    
    Public Delegate Sub RetrieveRecipeTableRowChangeEventHandler(ByVal sender As Object, ByVal e As RetrieveRecipeTableRowChangeEvent)
    
    Public Delegate Sub RetrieveRecipeIngredientTableRowChangeEventHandler(ByVal sender As Object, ByVal e As RetrieveRecipeIngredientTableRowChangeEvent)
    
    Public Delegate Sub ViewIngredientsFoodTypesRowChangeEventHandler(ByVal sender As Object, ByVal e As ViewIngredientsFoodTypesRowChangeEvent)
    
    '''<summary>
    '''Represents the strongly named DataTable class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.Serializable(),  _
     Global.System.Xml.Serialization.XmlSchemaProviderAttribute("GetTypedTableSchema")>  _
    Partial Public Class CoursesDataTable
        Inherits Global.System.Data.TypedTableBase(Of CoursesRow)
        
        Private columnCourseTypeID As Global.System.Data.DataColumn
        
        Private columnName As Global.System.Data.DataColumn
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.TableName = "Courses"
            Me.BeginInit
            Me.InitClass
            Me.EndInit
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal table As Global.System.Data.DataTable)
            MyBase.New
            Me.TableName = table.TableName
            If (table.CaseSensitive <> table.DataSet.CaseSensitive) Then
                Me.CaseSensitive = table.CaseSensitive
            End If
            If (table.Locale.ToString <> table.DataSet.Locale.ToString) Then
                Me.Locale = table.Locale
            End If
            If (table.Namespace <> table.DataSet.Namespace) Then
                Me.Namespace = table.Namespace
            End If
            Me.Prefix = table.Prefix
            Me.MinimumCapacity = table.MinimumCapacity
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext)
            MyBase.New(info, context)
            Me.InitVars
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property CourseTypeIDColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnCourseTypeID
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property NameColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnName
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Browsable(false)>  _
        Public ReadOnly Property Count() As Integer
            Get
                Return Me.Rows.Count
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Default ReadOnly Property Item(ByVal index As Integer) As CoursesRow
            Get
                Return CType(Me.Rows(index),CoursesRow)
            End Get
        End Property
        
        Public Event CoursesRowChanging As CoursesRowChangeEventHandler
        
        Public Event CoursesRowChanged As CoursesRowChangeEventHandler
        
        Public Event CoursesRowDeleting As CoursesRowChangeEventHandler
        
        Public Event CoursesRowDeleted As CoursesRowChangeEventHandler
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Sub AddCoursesRow(ByVal row As CoursesRow)
            Me.Rows.Add(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Function AddCoursesRow(ByVal Name As String) As CoursesRow
            Dim rowCoursesRow As CoursesRow = CType(Me.NewRow,CoursesRow)
            Dim columnValuesArray() As Object = New Object() {Nothing, Name}
            rowCoursesRow.ItemArray = columnValuesArray
            Me.Rows.Add(rowCoursesRow)
            Return rowCoursesRow
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function FindByCourseTypeID(ByVal CourseTypeID As Integer) As CoursesRow
            Return CType(Me.Rows.Find(New Object() {CourseTypeID}),CoursesRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overrides Function Clone() As Global.System.Data.DataTable
            Dim cln As CoursesDataTable = CType(MyBase.Clone,CoursesDataTable)
            cln.InitVars
            Return cln
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function CreateInstance() As Global.System.Data.DataTable
            Return New CoursesDataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub InitVars()
            Me.columnCourseTypeID = MyBase.Columns("CourseTypeID")
            Me.columnName = MyBase.Columns("Name")
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitClass()
            Me.columnCourseTypeID = New Global.System.Data.DataColumn("CourseTypeID", GetType(Integer), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnCourseTypeID)
            Me.columnName = New Global.System.Data.DataColumn("Name", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnName)
            Me.Constraints.Add(New Global.System.Data.UniqueConstraint("Constraint1", New Global.System.Data.DataColumn() {Me.columnCourseTypeID}, true))
            Me.columnCourseTypeID.AutoIncrement = true
            Me.columnCourseTypeID.AutoIncrementSeed = -1
            Me.columnCourseTypeID.AutoIncrementStep = -1
            Me.columnCourseTypeID.AllowDBNull = false
            Me.columnCourseTypeID.ReadOnly = true
            Me.columnCourseTypeID.Unique = true
            Me.columnName.AllowDBNull = false
            Me.columnName.MaxLength = 50
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function NewCoursesRow() As CoursesRow
            Return CType(Me.NewRow,CoursesRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function NewRowFromBuilder(ByVal builder As Global.System.Data.DataRowBuilder) As Global.System.Data.DataRow
            Return New CoursesRow(builder)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function GetRowType() As Global.System.Type
            Return GetType(CoursesRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanged(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanged(e)
            If (Not (Me.CoursesRowChangedEvent) Is Nothing) Then
                RaiseEvent CoursesRowChanged(Me, New CoursesRowChangeEvent(CType(e.Row,CoursesRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanging(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanging(e)
            If (Not (Me.CoursesRowChangingEvent) Is Nothing) Then
                RaiseEvent CoursesRowChanging(Me, New CoursesRowChangeEvent(CType(e.Row,CoursesRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleted(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleted(e)
            If (Not (Me.CoursesRowDeletedEvent) Is Nothing) Then
                RaiseEvent CoursesRowDeleted(Me, New CoursesRowChangeEvent(CType(e.Row,CoursesRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleting(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleting(e)
            If (Not (Me.CoursesRowDeletingEvent) Is Nothing) Then
                RaiseEvent CoursesRowDeleting(Me, New CoursesRowChangeEvent(CType(e.Row,CoursesRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub RemoveCoursesRow(ByVal row As CoursesRow)
            Me.Rows.Remove(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Shared Function GetTypedTableSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType
            Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType
            Dim sequence As Global.System.Xml.Schema.XmlSchemaSequence = New Global.System.Xml.Schema.XmlSchemaSequence
            Dim ds As RecipeHolderDatabaseDataSet = New RecipeHolderDatabaseDataSet
            Dim any1 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any1.Namespace = "http://www.w3.org/2001/XMLSchema"
            any1.MinOccurs = New Decimal(0)
            any1.MaxOccurs = Decimal.MaxValue
            any1.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any1)
            Dim any2 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any2.Namespace = "urn:schemas-microsoft-com:xml-diffgram-v1"
            any2.MinOccurs = New Decimal(1)
            any2.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any2)
            Dim attribute1 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute1.Name = "namespace"
            attribute1.FixedValue = ds.Namespace
            type.Attributes.Add(attribute1)
            Dim attribute2 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute2.Name = "tableTypeName"
            attribute2.FixedValue = "CoursesDataTable"
            type.Attributes.Add(attribute2)
            type.Particle = sequence
            Dim dsSchema As Global.System.Xml.Schema.XmlSchema = ds.GetSchemaSerializable
            If xs.Contains(dsSchema.TargetNamespace) Then
                Dim s1 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Dim s2 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Try 
                    Dim schema As Global.System.Xml.Schema.XmlSchema = Nothing
                    dsSchema.Write(s1)
                    Dim schemas As Global.System.Collections.IEnumerator = xs.Schemas(dsSchema.TargetNamespace).GetEnumerator
                    Do While schemas.MoveNext
                        schema = CType(schemas.Current,Global.System.Xml.Schema.XmlSchema)
                        s2.SetLength(0)
                        schema.Write(s2)
                        If (s1.Length = s2.Length) Then
                            s1.Position = 0
                            s2.Position = 0
                            
                            Do While ((s1.Position <> s1.Length)  _
                                        AndAlso (s1.ReadByte = s2.ReadByte))
                                
                                
                            Loop
                            If (s1.Position = s1.Length) Then
                                Return type
                            End If
                        End If
                        
                    Loop
                Finally
                    If (Not (s1) Is Nothing) Then
                        s1.Close
                    End If
                    If (Not (s2) Is Nothing) Then
                        s2.Close
                    End If
                End Try
            End If
            xs.Add(dsSchema)
            Return type
        End Function
    End Class
    
    '''<summary>
    '''Represents the strongly named DataTable class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.Serializable(),  _
     Global.System.Xml.Serialization.XmlSchemaProviderAttribute("GetTypedTableSchema")>  _
    Partial Public Class CuisineTypesDataTable
        Inherits Global.System.Data.TypedTableBase(Of CuisineTypesRow)
        
        Private columnCuisineTypeID As Global.System.Data.DataColumn
        
        Private columnName As Global.System.Data.DataColumn
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.TableName = "CuisineTypes"
            Me.BeginInit
            Me.InitClass
            Me.EndInit
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal table As Global.System.Data.DataTable)
            MyBase.New
            Me.TableName = table.TableName
            If (table.CaseSensitive <> table.DataSet.CaseSensitive) Then
                Me.CaseSensitive = table.CaseSensitive
            End If
            If (table.Locale.ToString <> table.DataSet.Locale.ToString) Then
                Me.Locale = table.Locale
            End If
            If (table.Namespace <> table.DataSet.Namespace) Then
                Me.Namespace = table.Namespace
            End If
            Me.Prefix = table.Prefix
            Me.MinimumCapacity = table.MinimumCapacity
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext)
            MyBase.New(info, context)
            Me.InitVars
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property CuisineTypeIDColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnCuisineTypeID
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property NameColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnName
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Browsable(false)>  _
        Public ReadOnly Property Count() As Integer
            Get
                Return Me.Rows.Count
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Default ReadOnly Property Item(ByVal index As Integer) As CuisineTypesRow
            Get
                Return CType(Me.Rows(index),CuisineTypesRow)
            End Get
        End Property
        
        Public Event CuisineTypesRowChanging As CuisineTypesRowChangeEventHandler
        
        Public Event CuisineTypesRowChanged As CuisineTypesRowChangeEventHandler
        
        Public Event CuisineTypesRowDeleting As CuisineTypesRowChangeEventHandler
        
        Public Event CuisineTypesRowDeleted As CuisineTypesRowChangeEventHandler
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Sub AddCuisineTypesRow(ByVal row As CuisineTypesRow)
            Me.Rows.Add(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Function AddCuisineTypesRow(ByVal Name As String) As CuisineTypesRow
            Dim rowCuisineTypesRow As CuisineTypesRow = CType(Me.NewRow,CuisineTypesRow)
            Dim columnValuesArray() As Object = New Object() {Nothing, Name}
            rowCuisineTypesRow.ItemArray = columnValuesArray
            Me.Rows.Add(rowCuisineTypesRow)
            Return rowCuisineTypesRow
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function FindByCuisineTypeID(ByVal CuisineTypeID As Integer) As CuisineTypesRow
            Return CType(Me.Rows.Find(New Object() {CuisineTypeID}),CuisineTypesRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overrides Function Clone() As Global.System.Data.DataTable
            Dim cln As CuisineTypesDataTable = CType(MyBase.Clone,CuisineTypesDataTable)
            cln.InitVars
            Return cln
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function CreateInstance() As Global.System.Data.DataTable
            Return New CuisineTypesDataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub InitVars()
            Me.columnCuisineTypeID = MyBase.Columns("CuisineTypeID")
            Me.columnName = MyBase.Columns("Name")
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitClass()
            Me.columnCuisineTypeID = New Global.System.Data.DataColumn("CuisineTypeID", GetType(Integer), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnCuisineTypeID)
            Me.columnName = New Global.System.Data.DataColumn("Name", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnName)
            Me.Constraints.Add(New Global.System.Data.UniqueConstraint("Constraint1", New Global.System.Data.DataColumn() {Me.columnCuisineTypeID}, true))
            Me.columnCuisineTypeID.AutoIncrement = true
            Me.columnCuisineTypeID.AutoIncrementSeed = -1
            Me.columnCuisineTypeID.AutoIncrementStep = -1
            Me.columnCuisineTypeID.AllowDBNull = false
            Me.columnCuisineTypeID.ReadOnly = true
            Me.columnCuisineTypeID.Unique = true
            Me.columnName.AllowDBNull = false
            Me.columnName.MaxLength = 50
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function NewCuisineTypesRow() As CuisineTypesRow
            Return CType(Me.NewRow,CuisineTypesRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function NewRowFromBuilder(ByVal builder As Global.System.Data.DataRowBuilder) As Global.System.Data.DataRow
            Return New CuisineTypesRow(builder)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function GetRowType() As Global.System.Type
            Return GetType(CuisineTypesRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanged(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanged(e)
            If (Not (Me.CuisineTypesRowChangedEvent) Is Nothing) Then
                RaiseEvent CuisineTypesRowChanged(Me, New CuisineTypesRowChangeEvent(CType(e.Row,CuisineTypesRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanging(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanging(e)
            If (Not (Me.CuisineTypesRowChangingEvent) Is Nothing) Then
                RaiseEvent CuisineTypesRowChanging(Me, New CuisineTypesRowChangeEvent(CType(e.Row,CuisineTypesRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleted(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleted(e)
            If (Not (Me.CuisineTypesRowDeletedEvent) Is Nothing) Then
                RaiseEvent CuisineTypesRowDeleted(Me, New CuisineTypesRowChangeEvent(CType(e.Row,CuisineTypesRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleting(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleting(e)
            If (Not (Me.CuisineTypesRowDeletingEvent) Is Nothing) Then
                RaiseEvent CuisineTypesRowDeleting(Me, New CuisineTypesRowChangeEvent(CType(e.Row,CuisineTypesRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub RemoveCuisineTypesRow(ByVal row As CuisineTypesRow)
            Me.Rows.Remove(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Shared Function GetTypedTableSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType
            Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType
            Dim sequence As Global.System.Xml.Schema.XmlSchemaSequence = New Global.System.Xml.Schema.XmlSchemaSequence
            Dim ds As RecipeHolderDatabaseDataSet = New RecipeHolderDatabaseDataSet
            Dim any1 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any1.Namespace = "http://www.w3.org/2001/XMLSchema"
            any1.MinOccurs = New Decimal(0)
            any1.MaxOccurs = Decimal.MaxValue
            any1.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any1)
            Dim any2 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any2.Namespace = "urn:schemas-microsoft-com:xml-diffgram-v1"
            any2.MinOccurs = New Decimal(1)
            any2.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any2)
            Dim attribute1 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute1.Name = "namespace"
            attribute1.FixedValue = ds.Namespace
            type.Attributes.Add(attribute1)
            Dim attribute2 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute2.Name = "tableTypeName"
            attribute2.FixedValue = "CuisineTypesDataTable"
            type.Attributes.Add(attribute2)
            type.Particle = sequence
            Dim dsSchema As Global.System.Xml.Schema.XmlSchema = ds.GetSchemaSerializable
            If xs.Contains(dsSchema.TargetNamespace) Then
                Dim s1 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Dim s2 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Try 
                    Dim schema As Global.System.Xml.Schema.XmlSchema = Nothing
                    dsSchema.Write(s1)
                    Dim schemas As Global.System.Collections.IEnumerator = xs.Schemas(dsSchema.TargetNamespace).GetEnumerator
                    Do While schemas.MoveNext
                        schema = CType(schemas.Current,Global.System.Xml.Schema.XmlSchema)
                        s2.SetLength(0)
                        schema.Write(s2)
                        If (s1.Length = s2.Length) Then
                            s1.Position = 0
                            s2.Position = 0
                            
                            Do While ((s1.Position <> s1.Length)  _
                                        AndAlso (s1.ReadByte = s2.ReadByte))
                                
                                
                            Loop
                            If (s1.Position = s1.Length) Then
                                Return type
                            End If
                        End If
                        
                    Loop
                Finally
                    If (Not (s1) Is Nothing) Then
                        s1.Close
                    End If
                    If (Not (s2) Is Nothing) Then
                        s2.Close
                    End If
                End Try
            End If
            xs.Add(dsSchema)
            Return type
        End Function
    End Class
    
    '''<summary>
    '''Represents the strongly named DataTable class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.Serializable(),  _
     Global.System.Xml.Serialization.XmlSchemaProviderAttribute("GetTypedTableSchema")>  _
    Partial Public Class FoodTypesDataTable
        Inherits Global.System.Data.TypedTableBase(Of FoodTypesRow)
        
        Private columnFoodTypeID As Global.System.Data.DataColumn
        
        Private columnName As Global.System.Data.DataColumn
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.TableName = "FoodTypes"
            Me.BeginInit
            Me.InitClass
            Me.EndInit
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal table As Global.System.Data.DataTable)
            MyBase.New
            Me.TableName = table.TableName
            If (table.CaseSensitive <> table.DataSet.CaseSensitive) Then
                Me.CaseSensitive = table.CaseSensitive
            End If
            If (table.Locale.ToString <> table.DataSet.Locale.ToString) Then
                Me.Locale = table.Locale
            End If
            If (table.Namespace <> table.DataSet.Namespace) Then
                Me.Namespace = table.Namespace
            End If
            Me.Prefix = table.Prefix
            Me.MinimumCapacity = table.MinimumCapacity
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext)
            MyBase.New(info, context)
            Me.InitVars
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property FoodTypeIDColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnFoodTypeID
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property NameColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnName
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Browsable(false)>  _
        Public ReadOnly Property Count() As Integer
            Get
                Return Me.Rows.Count
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Default ReadOnly Property Item(ByVal index As Integer) As FoodTypesRow
            Get
                Return CType(Me.Rows(index),FoodTypesRow)
            End Get
        End Property
        
        Public Event FoodTypesRowChanging As FoodTypesRowChangeEventHandler
        
        Public Event FoodTypesRowChanged As FoodTypesRowChangeEventHandler
        
        Public Event FoodTypesRowDeleting As FoodTypesRowChangeEventHandler
        
        Public Event FoodTypesRowDeleted As FoodTypesRowChangeEventHandler
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Sub AddFoodTypesRow(ByVal row As FoodTypesRow)
            Me.Rows.Add(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Function AddFoodTypesRow(ByVal Name As String) As FoodTypesRow
            Dim rowFoodTypesRow As FoodTypesRow = CType(Me.NewRow,FoodTypesRow)
            Dim columnValuesArray() As Object = New Object() {Nothing, Name}
            rowFoodTypesRow.ItemArray = columnValuesArray
            Me.Rows.Add(rowFoodTypesRow)
            Return rowFoodTypesRow
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function FindByFoodTypeID(ByVal FoodTypeID As Integer) As FoodTypesRow
            Return CType(Me.Rows.Find(New Object() {FoodTypeID}),FoodTypesRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overrides Function Clone() As Global.System.Data.DataTable
            Dim cln As FoodTypesDataTable = CType(MyBase.Clone,FoodTypesDataTable)
            cln.InitVars
            Return cln
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function CreateInstance() As Global.System.Data.DataTable
            Return New FoodTypesDataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub InitVars()
            Me.columnFoodTypeID = MyBase.Columns("FoodTypeID")
            Me.columnName = MyBase.Columns("Name")
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitClass()
            Me.columnFoodTypeID = New Global.System.Data.DataColumn("FoodTypeID", GetType(Integer), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnFoodTypeID)
            Me.columnName = New Global.System.Data.DataColumn("Name", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnName)
            Me.Constraints.Add(New Global.System.Data.UniqueConstraint("Constraint1", New Global.System.Data.DataColumn() {Me.columnFoodTypeID}, true))
            Me.columnFoodTypeID.AutoIncrement = true
            Me.columnFoodTypeID.AutoIncrementSeed = -1
            Me.columnFoodTypeID.AutoIncrementStep = -1
            Me.columnFoodTypeID.AllowDBNull = false
            Me.columnFoodTypeID.ReadOnly = true
            Me.columnFoodTypeID.Unique = true
            Me.columnName.AllowDBNull = false
            Me.columnName.MaxLength = 50
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function NewFoodTypesRow() As FoodTypesRow
            Return CType(Me.NewRow,FoodTypesRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function NewRowFromBuilder(ByVal builder As Global.System.Data.DataRowBuilder) As Global.System.Data.DataRow
            Return New FoodTypesRow(builder)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function GetRowType() As Global.System.Type
            Return GetType(FoodTypesRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanged(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanged(e)
            If (Not (Me.FoodTypesRowChangedEvent) Is Nothing) Then
                RaiseEvent FoodTypesRowChanged(Me, New FoodTypesRowChangeEvent(CType(e.Row,FoodTypesRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanging(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanging(e)
            If (Not (Me.FoodTypesRowChangingEvent) Is Nothing) Then
                RaiseEvent FoodTypesRowChanging(Me, New FoodTypesRowChangeEvent(CType(e.Row,FoodTypesRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleted(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleted(e)
            If (Not (Me.FoodTypesRowDeletedEvent) Is Nothing) Then
                RaiseEvent FoodTypesRowDeleted(Me, New FoodTypesRowChangeEvent(CType(e.Row,FoodTypesRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleting(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleting(e)
            If (Not (Me.FoodTypesRowDeletingEvent) Is Nothing) Then
                RaiseEvent FoodTypesRowDeleting(Me, New FoodTypesRowChangeEvent(CType(e.Row,FoodTypesRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub RemoveFoodTypesRow(ByVal row As FoodTypesRow)
            Me.Rows.Remove(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Shared Function GetTypedTableSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType
            Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType
            Dim sequence As Global.System.Xml.Schema.XmlSchemaSequence = New Global.System.Xml.Schema.XmlSchemaSequence
            Dim ds As RecipeHolderDatabaseDataSet = New RecipeHolderDatabaseDataSet
            Dim any1 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any1.Namespace = "http://www.w3.org/2001/XMLSchema"
            any1.MinOccurs = New Decimal(0)
            any1.MaxOccurs = Decimal.MaxValue
            any1.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any1)
            Dim any2 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any2.Namespace = "urn:schemas-microsoft-com:xml-diffgram-v1"
            any2.MinOccurs = New Decimal(1)
            any2.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any2)
            Dim attribute1 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute1.Name = "namespace"
            attribute1.FixedValue = ds.Namespace
            type.Attributes.Add(attribute1)
            Dim attribute2 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute2.Name = "tableTypeName"
            attribute2.FixedValue = "FoodTypesDataTable"
            type.Attributes.Add(attribute2)
            type.Particle = sequence
            Dim dsSchema As Global.System.Xml.Schema.XmlSchema = ds.GetSchemaSerializable
            If xs.Contains(dsSchema.TargetNamespace) Then
                Dim s1 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Dim s2 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Try 
                    Dim schema As Global.System.Xml.Schema.XmlSchema = Nothing
                    dsSchema.Write(s1)
                    Dim schemas As Global.System.Collections.IEnumerator = xs.Schemas(dsSchema.TargetNamespace).GetEnumerator
                    Do While schemas.MoveNext
                        schema = CType(schemas.Current,Global.System.Xml.Schema.XmlSchema)
                        s2.SetLength(0)
                        schema.Write(s2)
                        If (s1.Length = s2.Length) Then
                            s1.Position = 0
                            s2.Position = 0
                            
                            Do While ((s1.Position <> s1.Length)  _
                                        AndAlso (s1.ReadByte = s2.ReadByte))
                                
                                
                            Loop
                            If (s1.Position = s1.Length) Then
                                Return type
                            End If
                        End If
                        
                    Loop
                Finally
                    If (Not (s1) Is Nothing) Then
                        s1.Close
                    End If
                    If (Not (s2) Is Nothing) Then
                        s2.Close
                    End If
                End Try
            End If
            xs.Add(dsSchema)
            Return type
        End Function
    End Class
    
    '''<summary>
    '''Represents the strongly named DataTable class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.Serializable(),  _
     Global.System.Xml.Serialization.XmlSchemaProviderAttribute("GetTypedTableSchema")>  _
    Partial Public Class IngredientsDataTable
        Inherits Global.System.Data.TypedTableBase(Of IngredientsRow)
        
        Private columnIngredientID As Global.System.Data.DataColumn
        
        Private columnFoodTypeID As Global.System.Data.DataColumn
        
        Private columnName As Global.System.Data.DataColumn
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.TableName = "Ingredients"
            Me.BeginInit
            Me.InitClass
            Me.EndInit
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal table As Global.System.Data.DataTable)
            MyBase.New
            Me.TableName = table.TableName
            If (table.CaseSensitive <> table.DataSet.CaseSensitive) Then
                Me.CaseSensitive = table.CaseSensitive
            End If
            If (table.Locale.ToString <> table.DataSet.Locale.ToString) Then
                Me.Locale = table.Locale
            End If
            If (table.Namespace <> table.DataSet.Namespace) Then
                Me.Namespace = table.Namespace
            End If
            Me.Prefix = table.Prefix
            Me.MinimumCapacity = table.MinimumCapacity
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext)
            MyBase.New(info, context)
            Me.InitVars
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property IngredientIDColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnIngredientID
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property FoodTypeIDColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnFoodTypeID
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property NameColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnName
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Browsable(false)>  _
        Public ReadOnly Property Count() As Integer
            Get
                Return Me.Rows.Count
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Default ReadOnly Property Item(ByVal index As Integer) As IngredientsRow
            Get
                Return CType(Me.Rows(index),IngredientsRow)
            End Get
        End Property
        
        Public Event IngredientsRowChanging As IngredientsRowChangeEventHandler
        
        Public Event IngredientsRowChanged As IngredientsRowChangeEventHandler
        
        Public Event IngredientsRowDeleting As IngredientsRowChangeEventHandler
        
        Public Event IngredientsRowDeleted As IngredientsRowChangeEventHandler
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Sub AddIngredientsRow(ByVal row As IngredientsRow)
            Me.Rows.Add(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Function AddIngredientsRow(ByVal parentFoodTypesRowByFK_Ingredients_FoodTypes As FoodTypesRow, ByVal Name As String) As IngredientsRow
            Dim rowIngredientsRow As IngredientsRow = CType(Me.NewRow,IngredientsRow)
            Dim columnValuesArray() As Object = New Object() {Nothing, Nothing, Name}
            If (Not (parentFoodTypesRowByFK_Ingredients_FoodTypes) Is Nothing) Then
                columnValuesArray(1) = parentFoodTypesRowByFK_Ingredients_FoodTypes(0)
            End If
            rowIngredientsRow.ItemArray = columnValuesArray
            Me.Rows.Add(rowIngredientsRow)
            Return rowIngredientsRow
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function FindByIngredientID(ByVal IngredientID As Integer) As IngredientsRow
            Return CType(Me.Rows.Find(New Object() {IngredientID}),IngredientsRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overrides Function Clone() As Global.System.Data.DataTable
            Dim cln As IngredientsDataTable = CType(MyBase.Clone,IngredientsDataTable)
            cln.InitVars
            Return cln
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function CreateInstance() As Global.System.Data.DataTable
            Return New IngredientsDataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub InitVars()
            Me.columnIngredientID = MyBase.Columns("IngredientID")
            Me.columnFoodTypeID = MyBase.Columns("FoodTypeID")
            Me.columnName = MyBase.Columns("Name")
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitClass()
            Me.columnIngredientID = New Global.System.Data.DataColumn("IngredientID", GetType(Integer), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnIngredientID)
            Me.columnFoodTypeID = New Global.System.Data.DataColumn("FoodTypeID", GetType(Integer), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnFoodTypeID)
            Me.columnName = New Global.System.Data.DataColumn("Name", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnName)
            Me.Constraints.Add(New Global.System.Data.UniqueConstraint("Constraint1", New Global.System.Data.DataColumn() {Me.columnIngredientID}, true))
            Me.columnIngredientID.AutoIncrement = true
            Me.columnIngredientID.AutoIncrementSeed = -1
            Me.columnIngredientID.AutoIncrementStep = -1
            Me.columnIngredientID.AllowDBNull = false
            Me.columnIngredientID.ReadOnly = true
            Me.columnIngredientID.Unique = true
            Me.columnFoodTypeID.AllowDBNull = false
            Me.columnName.AllowDBNull = false
            Me.columnName.MaxLength = 50
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function NewIngredientsRow() As IngredientsRow
            Return CType(Me.NewRow,IngredientsRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function NewRowFromBuilder(ByVal builder As Global.System.Data.DataRowBuilder) As Global.System.Data.DataRow
            Return New IngredientsRow(builder)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function GetRowType() As Global.System.Type
            Return GetType(IngredientsRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanged(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanged(e)
            If (Not (Me.IngredientsRowChangedEvent) Is Nothing) Then
                RaiseEvent IngredientsRowChanged(Me, New IngredientsRowChangeEvent(CType(e.Row,IngredientsRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanging(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanging(e)
            If (Not (Me.IngredientsRowChangingEvent) Is Nothing) Then
                RaiseEvent IngredientsRowChanging(Me, New IngredientsRowChangeEvent(CType(e.Row,IngredientsRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleted(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleted(e)
            If (Not (Me.IngredientsRowDeletedEvent) Is Nothing) Then
                RaiseEvent IngredientsRowDeleted(Me, New IngredientsRowChangeEvent(CType(e.Row,IngredientsRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleting(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleting(e)
            If (Not (Me.IngredientsRowDeletingEvent) Is Nothing) Then
                RaiseEvent IngredientsRowDeleting(Me, New IngredientsRowChangeEvent(CType(e.Row,IngredientsRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub RemoveIngredientsRow(ByVal row As IngredientsRow)
            Me.Rows.Remove(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Shared Function GetTypedTableSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType
            Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType
            Dim sequence As Global.System.Xml.Schema.XmlSchemaSequence = New Global.System.Xml.Schema.XmlSchemaSequence
            Dim ds As RecipeHolderDatabaseDataSet = New RecipeHolderDatabaseDataSet
            Dim any1 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any1.Namespace = "http://www.w3.org/2001/XMLSchema"
            any1.MinOccurs = New Decimal(0)
            any1.MaxOccurs = Decimal.MaxValue
            any1.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any1)
            Dim any2 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any2.Namespace = "urn:schemas-microsoft-com:xml-diffgram-v1"
            any2.MinOccurs = New Decimal(1)
            any2.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any2)
            Dim attribute1 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute1.Name = "namespace"
            attribute1.FixedValue = ds.Namespace
            type.Attributes.Add(attribute1)
            Dim attribute2 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute2.Name = "tableTypeName"
            attribute2.FixedValue = "IngredientsDataTable"
            type.Attributes.Add(attribute2)
            type.Particle = sequence
            Dim dsSchema As Global.System.Xml.Schema.XmlSchema = ds.GetSchemaSerializable
            If xs.Contains(dsSchema.TargetNamespace) Then
                Dim s1 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Dim s2 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Try 
                    Dim schema As Global.System.Xml.Schema.XmlSchema = Nothing
                    dsSchema.Write(s1)
                    Dim schemas As Global.System.Collections.IEnumerator = xs.Schemas(dsSchema.TargetNamespace).GetEnumerator
                    Do While schemas.MoveNext
                        schema = CType(schemas.Current,Global.System.Xml.Schema.XmlSchema)
                        s2.SetLength(0)
                        schema.Write(s2)
                        If (s1.Length = s2.Length) Then
                            s1.Position = 0
                            s2.Position = 0
                            
                            Do While ((s1.Position <> s1.Length)  _
                                        AndAlso (s1.ReadByte = s2.ReadByte))
                                
                                
                            Loop
                            If (s1.Position = s1.Length) Then
                                Return type
                            End If
                        End If
                        
                    Loop
                Finally
                    If (Not (s1) Is Nothing) Then
                        s1.Close
                    End If
                    If (Not (s2) Is Nothing) Then
                        s2.Close
                    End If
                End Try
            End If
            xs.Add(dsSchema)
            Return type
        End Function
    End Class
    
    '''<summary>
    '''Represents the strongly named DataTable class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.Serializable(),  _
     Global.System.Xml.Serialization.XmlSchemaProviderAttribute("GetTypedTableSchema")>  _
    Partial Public Class NutritionDetailsDataTable
        Inherits Global.System.Data.TypedTableBase(Of NutritionDetailsRow)
        
        Private columnNutritionID As Global.System.Data.DataColumn
        
        Private columnRecipeID As Global.System.Data.DataColumn
        
        Private columnCalories As Global.System.Data.DataColumn
        
        Private columnCaloriesFromFat As Global.System.Data.DataColumn
        
        Private columnTotalFat As Global.System.Data.DataColumn
        
        Private columnSaturatedFat As Global.System.Data.DataColumn
        
        Private columnTransFat As Global.System.Data.DataColumn
        
        Private columnCholesteral As Global.System.Data.DataColumn
        
        Private columnSodium As Global.System.Data.DataColumn
        
        Private columnTotalCarbohydrates As Global.System.Data.DataColumn
        
        Private columnDietaryFiber As Global.System.Data.DataColumn
        
        Private columnSugar As Global.System.Data.DataColumn
        
        Private columnProtein As Global.System.Data.DataColumn
        
        Private columnVitaminA As Global.System.Data.DataColumn
        
        Private columnVitaminC As Global.System.Data.DataColumn
        
        Private columnCalcium As Global.System.Data.DataColumn
        
        Private columnIron As Global.System.Data.DataColumn
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.TableName = "NutritionDetails"
            Me.BeginInit
            Me.InitClass
            Me.EndInit
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal table As Global.System.Data.DataTable)
            MyBase.New
            Me.TableName = table.TableName
            If (table.CaseSensitive <> table.DataSet.CaseSensitive) Then
                Me.CaseSensitive = table.CaseSensitive
            End If
            If (table.Locale.ToString <> table.DataSet.Locale.ToString) Then
                Me.Locale = table.Locale
            End If
            If (table.Namespace <> table.DataSet.Namespace) Then
                Me.Namespace = table.Namespace
            End If
            Me.Prefix = table.Prefix
            Me.MinimumCapacity = table.MinimumCapacity
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext)
            MyBase.New(info, context)
            Me.InitVars
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property NutritionIDColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnNutritionID
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property RecipeIDColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnRecipeID
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property CaloriesColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnCalories
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property CaloriesFromFatColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnCaloriesFromFat
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property TotalFatColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnTotalFat
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property SaturatedFatColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnSaturatedFat
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property TransFatColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnTransFat
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property CholesteralColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnCholesteral
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property SodiumColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnSodium
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property TotalCarbohydratesColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnTotalCarbohydrates
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property DietaryFiberColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnDietaryFiber
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property SugarColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnSugar
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property ProteinColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnProtein
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property VitaminAColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnVitaminA
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property VitaminCColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnVitaminC
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property CalciumColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnCalcium
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property IronColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnIron
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Browsable(false)>  _
        Public ReadOnly Property Count() As Integer
            Get
                Return Me.Rows.Count
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Default ReadOnly Property Item(ByVal index As Integer) As NutritionDetailsRow
            Get
                Return CType(Me.Rows(index),NutritionDetailsRow)
            End Get
        End Property
        
        Public Event NutritionDetailsRowChanging As NutritionDetailsRowChangeEventHandler
        
        Public Event NutritionDetailsRowChanged As NutritionDetailsRowChangeEventHandler
        
        Public Event NutritionDetailsRowDeleting As NutritionDetailsRowChangeEventHandler
        
        Public Event NutritionDetailsRowDeleted As NutritionDetailsRowChangeEventHandler
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Sub AddNutritionDetailsRow(ByVal row As NutritionDetailsRow)
            Me.Rows.Add(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Function AddNutritionDetailsRow( _
                    ByVal parentRetrieveRecipeTableRowByRetrieveRecipeTable_NutritionDetails As RetrieveRecipeTableRow,  _
                    ByVal Calories As Double,  _
                    ByVal CaloriesFromFat As Double,  _
                    ByVal TotalFat As Double,  _
                    ByVal SaturatedFat As Double,  _
                    ByVal TransFat As Double,  _
                    ByVal Cholesteral As Double,  _
                    ByVal Sodium As Double,  _
                    ByVal TotalCarbohydrates As Double,  _
                    ByVal DietaryFiber As Double,  _
                    ByVal Sugar As Double,  _
                    ByVal Protein As Double,  _
                    ByVal VitaminA As Integer,  _
                    ByVal VitaminC As Integer,  _
                    ByVal Calcium As Integer,  _
                    ByVal Iron As Integer) As NutritionDetailsRow
            Dim rowNutritionDetailsRow As NutritionDetailsRow = CType(Me.NewRow,NutritionDetailsRow)
            Dim columnValuesArray() As Object = New Object() {Nothing, Nothing, Calories, CaloriesFromFat, TotalFat, SaturatedFat, TransFat, Cholesteral, Sodium, TotalCarbohydrates, DietaryFiber, Sugar, Protein, VitaminA, VitaminC, Calcium, Iron}
            If (Not (parentRetrieveRecipeTableRowByRetrieveRecipeTable_NutritionDetails) Is Nothing) Then
                columnValuesArray(1) = parentRetrieveRecipeTableRowByRetrieveRecipeTable_NutritionDetails(1)
            End If
            rowNutritionDetailsRow.ItemArray = columnValuesArray
            Me.Rows.Add(rowNutritionDetailsRow)
            Return rowNutritionDetailsRow
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function FindByNutritionID(ByVal NutritionID As Integer) As NutritionDetailsRow
            Return CType(Me.Rows.Find(New Object() {NutritionID}),NutritionDetailsRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overrides Function Clone() As Global.System.Data.DataTable
            Dim cln As NutritionDetailsDataTable = CType(MyBase.Clone,NutritionDetailsDataTable)
            cln.InitVars
            Return cln
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function CreateInstance() As Global.System.Data.DataTable
            Return New NutritionDetailsDataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub InitVars()
            Me.columnNutritionID = MyBase.Columns("NutritionID")
            Me.columnRecipeID = MyBase.Columns("RecipeID")
            Me.columnCalories = MyBase.Columns("Calories")
            Me.columnCaloriesFromFat = MyBase.Columns("CaloriesFromFat")
            Me.columnTotalFat = MyBase.Columns("TotalFat")
            Me.columnSaturatedFat = MyBase.Columns("SaturatedFat")
            Me.columnTransFat = MyBase.Columns("TransFat")
            Me.columnCholesteral = MyBase.Columns("Cholesteral")
            Me.columnSodium = MyBase.Columns("Sodium")
            Me.columnTotalCarbohydrates = MyBase.Columns("TotalCarbohydrates")
            Me.columnDietaryFiber = MyBase.Columns("DietaryFiber")
            Me.columnSugar = MyBase.Columns("Sugar")
            Me.columnProtein = MyBase.Columns("Protein")
            Me.columnVitaminA = MyBase.Columns("VitaminA")
            Me.columnVitaminC = MyBase.Columns("VitaminC")
            Me.columnCalcium = MyBase.Columns("Calcium")
            Me.columnIron = MyBase.Columns("Iron")
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitClass()
            Me.columnNutritionID = New Global.System.Data.DataColumn("NutritionID", GetType(Integer), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnNutritionID)
            Me.columnRecipeID = New Global.System.Data.DataColumn("RecipeID", GetType(Integer), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnRecipeID)
            Me.columnCalories = New Global.System.Data.DataColumn("Calories", GetType(Double), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnCalories)
            Me.columnCaloriesFromFat = New Global.System.Data.DataColumn("CaloriesFromFat", GetType(Double), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnCaloriesFromFat)
            Me.columnTotalFat = New Global.System.Data.DataColumn("TotalFat", GetType(Double), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnTotalFat)
            Me.columnSaturatedFat = New Global.System.Data.DataColumn("SaturatedFat", GetType(Double), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnSaturatedFat)
            Me.columnTransFat = New Global.System.Data.DataColumn("TransFat", GetType(Double), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnTransFat)
            Me.columnCholesteral = New Global.System.Data.DataColumn("Cholesteral", GetType(Double), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnCholesteral)
            Me.columnSodium = New Global.System.Data.DataColumn("Sodium", GetType(Double), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnSodium)
            Me.columnTotalCarbohydrates = New Global.System.Data.DataColumn("TotalCarbohydrates", GetType(Double), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnTotalCarbohydrates)
            Me.columnDietaryFiber = New Global.System.Data.DataColumn("DietaryFiber", GetType(Double), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnDietaryFiber)
            Me.columnSugar = New Global.System.Data.DataColumn("Sugar", GetType(Double), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnSugar)
            Me.columnProtein = New Global.System.Data.DataColumn("Protein", GetType(Double), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnProtein)
            Me.columnVitaminA = New Global.System.Data.DataColumn("VitaminA", GetType(Integer), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnVitaminA)
            Me.columnVitaminC = New Global.System.Data.DataColumn("VitaminC", GetType(Integer), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnVitaminC)
            Me.columnCalcium = New Global.System.Data.DataColumn("Calcium", GetType(Integer), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnCalcium)
            Me.columnIron = New Global.System.Data.DataColumn("Iron", GetType(Integer), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnIron)
            Me.Constraints.Add(New Global.System.Data.UniqueConstraint("Constraint1", New Global.System.Data.DataColumn() {Me.columnNutritionID}, true))
            Me.columnNutritionID.AutoIncrement = true
            Me.columnNutritionID.AutoIncrementSeed = -1
            Me.columnNutritionID.AutoIncrementStep = -1
            Me.columnNutritionID.AllowDBNull = false
            Me.columnNutritionID.ReadOnly = true
            Me.columnNutritionID.Unique = true
            Me.columnRecipeID.AllowDBNull = false
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function NewNutritionDetailsRow() As NutritionDetailsRow
            Return CType(Me.NewRow,NutritionDetailsRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function NewRowFromBuilder(ByVal builder As Global.System.Data.DataRowBuilder) As Global.System.Data.DataRow
            Return New NutritionDetailsRow(builder)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function GetRowType() As Global.System.Type
            Return GetType(NutritionDetailsRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanged(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanged(e)
            If (Not (Me.NutritionDetailsRowChangedEvent) Is Nothing) Then
                RaiseEvent NutritionDetailsRowChanged(Me, New NutritionDetailsRowChangeEvent(CType(e.Row,NutritionDetailsRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanging(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanging(e)
            If (Not (Me.NutritionDetailsRowChangingEvent) Is Nothing) Then
                RaiseEvent NutritionDetailsRowChanging(Me, New NutritionDetailsRowChangeEvent(CType(e.Row,NutritionDetailsRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleted(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleted(e)
            If (Not (Me.NutritionDetailsRowDeletedEvent) Is Nothing) Then
                RaiseEvent NutritionDetailsRowDeleted(Me, New NutritionDetailsRowChangeEvent(CType(e.Row,NutritionDetailsRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleting(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleting(e)
            If (Not (Me.NutritionDetailsRowDeletingEvent) Is Nothing) Then
                RaiseEvent NutritionDetailsRowDeleting(Me, New NutritionDetailsRowChangeEvent(CType(e.Row,NutritionDetailsRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub RemoveNutritionDetailsRow(ByVal row As NutritionDetailsRow)
            Me.Rows.Remove(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Shared Function GetTypedTableSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType
            Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType
            Dim sequence As Global.System.Xml.Schema.XmlSchemaSequence = New Global.System.Xml.Schema.XmlSchemaSequence
            Dim ds As RecipeHolderDatabaseDataSet = New RecipeHolderDatabaseDataSet
            Dim any1 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any1.Namespace = "http://www.w3.org/2001/XMLSchema"
            any1.MinOccurs = New Decimal(0)
            any1.MaxOccurs = Decimal.MaxValue
            any1.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any1)
            Dim any2 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any2.Namespace = "urn:schemas-microsoft-com:xml-diffgram-v1"
            any2.MinOccurs = New Decimal(1)
            any2.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any2)
            Dim attribute1 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute1.Name = "namespace"
            attribute1.FixedValue = ds.Namespace
            type.Attributes.Add(attribute1)
            Dim attribute2 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute2.Name = "tableTypeName"
            attribute2.FixedValue = "NutritionDetailsDataTable"
            type.Attributes.Add(attribute2)
            type.Particle = sequence
            Dim dsSchema As Global.System.Xml.Schema.XmlSchema = ds.GetSchemaSerializable
            If xs.Contains(dsSchema.TargetNamespace) Then
                Dim s1 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Dim s2 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Try 
                    Dim schema As Global.System.Xml.Schema.XmlSchema = Nothing
                    dsSchema.Write(s1)
                    Dim schemas As Global.System.Collections.IEnumerator = xs.Schemas(dsSchema.TargetNamespace).GetEnumerator
                    Do While schemas.MoveNext
                        schema = CType(schemas.Current,Global.System.Xml.Schema.XmlSchema)
                        s2.SetLength(0)
                        schema.Write(s2)
                        If (s1.Length = s2.Length) Then
                            s1.Position = 0
                            s2.Position = 0
                            
                            Do While ((s1.Position <> s1.Length)  _
                                        AndAlso (s1.ReadByte = s2.ReadByte))
                                
                                
                            Loop
                            If (s1.Position = s1.Length) Then
                                Return type
                            End If
                        End If
                        
                    Loop
                Finally
                    If (Not (s1) Is Nothing) Then
                        s1.Close
                    End If
                    If (Not (s2) Is Nothing) Then
                        s2.Close
                    End If
                End Try
            End If
            xs.Add(dsSchema)
            Return type
        End Function
    End Class
    
    '''<summary>
    '''Represents the strongly named DataTable class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.Serializable(),  _
     Global.System.Xml.Serialization.XmlSchemaProviderAttribute("GetTypedTableSchema")>  _
    Partial Public Class RecipeIngredientDataTable
        Inherits Global.System.Data.TypedTableBase(Of RecipeIngredientRow)
        
        Private columnRecipeIngredientID As Global.System.Data.DataColumn
        
        Private columnRecipeID As Global.System.Data.DataColumn
        
        Private columnIngredientID As Global.System.Data.DataColumn
        
        Private columnUnitMeasurementID As Global.System.Data.DataColumn
        
        Private columnIngredientAmount As Global.System.Data.DataColumn
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.TableName = "RecipeIngredient"
            Me.BeginInit
            Me.InitClass
            Me.EndInit
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal table As Global.System.Data.DataTable)
            MyBase.New
            Me.TableName = table.TableName
            If (table.CaseSensitive <> table.DataSet.CaseSensitive) Then
                Me.CaseSensitive = table.CaseSensitive
            End If
            If (table.Locale.ToString <> table.DataSet.Locale.ToString) Then
                Me.Locale = table.Locale
            End If
            If (table.Namespace <> table.DataSet.Namespace) Then
                Me.Namespace = table.Namespace
            End If
            Me.Prefix = table.Prefix
            Me.MinimumCapacity = table.MinimumCapacity
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext)
            MyBase.New(info, context)
            Me.InitVars
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property RecipeIngredientIDColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnRecipeIngredientID
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property RecipeIDColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnRecipeID
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property IngredientIDColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnIngredientID
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property UnitMeasurementIDColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnUnitMeasurementID
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property IngredientAmountColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnIngredientAmount
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Browsable(false)>  _
        Public ReadOnly Property Count() As Integer
            Get
                Return Me.Rows.Count
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Default ReadOnly Property Item(ByVal index As Integer) As RecipeIngredientRow
            Get
                Return CType(Me.Rows(index),RecipeIngredientRow)
            End Get
        End Property
        
        Public Event RecipeIngredientRowChanging As RecipeIngredientRowChangeEventHandler
        
        Public Event RecipeIngredientRowChanged As RecipeIngredientRowChangeEventHandler
        
        Public Event RecipeIngredientRowDeleting As RecipeIngredientRowChangeEventHandler
        
        Public Event RecipeIngredientRowDeleted As RecipeIngredientRowChangeEventHandler
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Sub AddRecipeIngredientRow(ByVal row As RecipeIngredientRow)
            Me.Rows.Add(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Function AddRecipeIngredientRow(ByVal parentRecipesRowByFK_RecipeIngredient_Recipes As RecipesRow, ByVal IngredientID As Integer, ByVal parentUnitMeasurementsRowByFK_RecipeIngredient_UnitMeasurements As UnitMeasurementsRow, ByVal IngredientAmount As Decimal) As RecipeIngredientRow
            Dim rowRecipeIngredientRow As RecipeIngredientRow = CType(Me.NewRow,RecipeIngredientRow)
            Dim columnValuesArray() As Object = New Object() {Nothing, Nothing, IngredientID, Nothing, IngredientAmount}
            If (Not (parentRecipesRowByFK_RecipeIngredient_Recipes) Is Nothing) Then
                columnValuesArray(1) = parentRecipesRowByFK_RecipeIngredient_Recipes(5)
            End If
            If (Not (parentUnitMeasurementsRowByFK_RecipeIngredient_UnitMeasurements) Is Nothing) Then
                columnValuesArray(3) = parentUnitMeasurementsRowByFK_RecipeIngredient_UnitMeasurements(0)
            End If
            rowRecipeIngredientRow.ItemArray = columnValuesArray
            Me.Rows.Add(rowRecipeIngredientRow)
            Return rowRecipeIngredientRow
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function FindByRecipeIngredientID(ByVal RecipeIngredientID As Integer) As RecipeIngredientRow
            Return CType(Me.Rows.Find(New Object() {RecipeIngredientID}),RecipeIngredientRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overrides Function Clone() As Global.System.Data.DataTable
            Dim cln As RecipeIngredientDataTable = CType(MyBase.Clone,RecipeIngredientDataTable)
            cln.InitVars
            Return cln
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function CreateInstance() As Global.System.Data.DataTable
            Return New RecipeIngredientDataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub InitVars()
            Me.columnRecipeIngredientID = MyBase.Columns("RecipeIngredientID")
            Me.columnRecipeID = MyBase.Columns("RecipeID")
            Me.columnIngredientID = MyBase.Columns("IngredientID")
            Me.columnUnitMeasurementID = MyBase.Columns("UnitMeasurementID")
            Me.columnIngredientAmount = MyBase.Columns("IngredientAmount")
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitClass()
            Me.columnRecipeIngredientID = New Global.System.Data.DataColumn("RecipeIngredientID", GetType(Integer), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnRecipeIngredientID)
            Me.columnRecipeID = New Global.System.Data.DataColumn("RecipeID", GetType(Integer), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnRecipeID)
            Me.columnIngredientID = New Global.System.Data.DataColumn("IngredientID", GetType(Integer), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnIngredientID)
            Me.columnUnitMeasurementID = New Global.System.Data.DataColumn("UnitMeasurementID", GetType(Integer), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnUnitMeasurementID)
            Me.columnIngredientAmount = New Global.System.Data.DataColumn("IngredientAmount", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnIngredientAmount)
            Me.Constraints.Add(New Global.System.Data.UniqueConstraint("Constraint1", New Global.System.Data.DataColumn() {Me.columnRecipeIngredientID}, true))
            Me.columnRecipeIngredientID.AutoIncrement = true
            Me.columnRecipeIngredientID.AutoIncrementSeed = -1
            Me.columnRecipeIngredientID.AutoIncrementStep = -1
            Me.columnRecipeIngredientID.AllowDBNull = false
            Me.columnRecipeIngredientID.ReadOnly = true
            Me.columnRecipeIngredientID.Unique = true
            Me.columnRecipeID.AllowDBNull = false
            Me.columnIngredientID.AllowDBNull = false
            Me.columnUnitMeasurementID.AllowDBNull = false
            Me.columnIngredientAmount.AllowDBNull = false
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function NewRecipeIngredientRow() As RecipeIngredientRow
            Return CType(Me.NewRow,RecipeIngredientRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function NewRowFromBuilder(ByVal builder As Global.System.Data.DataRowBuilder) As Global.System.Data.DataRow
            Return New RecipeIngredientRow(builder)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function GetRowType() As Global.System.Type
            Return GetType(RecipeIngredientRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanged(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanged(e)
            If (Not (Me.RecipeIngredientRowChangedEvent) Is Nothing) Then
                RaiseEvent RecipeIngredientRowChanged(Me, New RecipeIngredientRowChangeEvent(CType(e.Row,RecipeIngredientRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanging(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanging(e)
            If (Not (Me.RecipeIngredientRowChangingEvent) Is Nothing) Then
                RaiseEvent RecipeIngredientRowChanging(Me, New RecipeIngredientRowChangeEvent(CType(e.Row,RecipeIngredientRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleted(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleted(e)
            If (Not (Me.RecipeIngredientRowDeletedEvent) Is Nothing) Then
                RaiseEvent RecipeIngredientRowDeleted(Me, New RecipeIngredientRowChangeEvent(CType(e.Row,RecipeIngredientRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleting(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleting(e)
            If (Not (Me.RecipeIngredientRowDeletingEvent) Is Nothing) Then
                RaiseEvent RecipeIngredientRowDeleting(Me, New RecipeIngredientRowChangeEvent(CType(e.Row,RecipeIngredientRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub RemoveRecipeIngredientRow(ByVal row As RecipeIngredientRow)
            Me.Rows.Remove(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Shared Function GetTypedTableSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType
            Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType
            Dim sequence As Global.System.Xml.Schema.XmlSchemaSequence = New Global.System.Xml.Schema.XmlSchemaSequence
            Dim ds As RecipeHolderDatabaseDataSet = New RecipeHolderDatabaseDataSet
            Dim any1 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any1.Namespace = "http://www.w3.org/2001/XMLSchema"
            any1.MinOccurs = New Decimal(0)
            any1.MaxOccurs = Decimal.MaxValue
            any1.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any1)
            Dim any2 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any2.Namespace = "urn:schemas-microsoft-com:xml-diffgram-v1"
            any2.MinOccurs = New Decimal(1)
            any2.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any2)
            Dim attribute1 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute1.Name = "namespace"
            attribute1.FixedValue = ds.Namespace
            type.Attributes.Add(attribute1)
            Dim attribute2 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute2.Name = "tableTypeName"
            attribute2.FixedValue = "RecipeIngredientDataTable"
            type.Attributes.Add(attribute2)
            type.Particle = sequence
            Dim dsSchema As Global.System.Xml.Schema.XmlSchema = ds.GetSchemaSerializable
            If xs.Contains(dsSchema.TargetNamespace) Then
                Dim s1 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Dim s2 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Try 
                    Dim schema As Global.System.Xml.Schema.XmlSchema = Nothing
                    dsSchema.Write(s1)
                    Dim schemas As Global.System.Collections.IEnumerator = xs.Schemas(dsSchema.TargetNamespace).GetEnumerator
                    Do While schemas.MoveNext
                        schema = CType(schemas.Current,Global.System.Xml.Schema.XmlSchema)
                        s2.SetLength(0)
                        schema.Write(s2)
                        If (s1.Length = s2.Length) Then
                            s1.Position = 0
                            s2.Position = 0
                            
                            Do While ((s1.Position <> s1.Length)  _
                                        AndAlso (s1.ReadByte = s2.ReadByte))
                                
                                
                            Loop
                            If (s1.Position = s1.Length) Then
                                Return type
                            End If
                        End If
                        
                    Loop
                Finally
                    If (Not (s1) Is Nothing) Then
                        s1.Close
                    End If
                    If (Not (s2) Is Nothing) Then
                        s2.Close
                    End If
                End Try
            End If
            xs.Add(dsSchema)
            Return type
        End Function
    End Class
    
    '''<summary>
    '''Represents the strongly named DataTable class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.Serializable(),  _
     Global.System.Xml.Serialization.XmlSchemaProviderAttribute("GetTypedTableSchema")>  _
    Partial Public Class RecipesDataTable
        Inherits Global.System.Data.TypedTableBase(Of RecipesRow)
        
        Private columnPreparationTime As Global.System.Data.DataColumn
        
        Private columnDirections As Global.System.Data.DataColumn
        
        Private columnCookTime As Global.System.Data.DataColumn
        
        Private columnPhoto As Global.System.Data.DataColumn
        
        Private columnTemperature As Global.System.Data.DataColumn
        
        Private columnRecipeID As Global.System.Data.DataColumn
        
        Private columnCourseTypeID As Global.System.Data.DataColumn
        
        Private columnCuisineTypeID As Global.System.Data.DataColumn
        
        Private columnName As Global.System.Data.DataColumn
        
        Private columnAccountId As Global.System.Data.DataColumn
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.TableName = "Recipes"
            Me.BeginInit
            Me.InitClass
            Me.EndInit
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal table As Global.System.Data.DataTable)
            MyBase.New
            Me.TableName = table.TableName
            If (table.CaseSensitive <> table.DataSet.CaseSensitive) Then
                Me.CaseSensitive = table.CaseSensitive
            End If
            If (table.Locale.ToString <> table.DataSet.Locale.ToString) Then
                Me.Locale = table.Locale
            End If
            If (table.Namespace <> table.DataSet.Namespace) Then
                Me.Namespace = table.Namespace
            End If
            Me.Prefix = table.Prefix
            Me.MinimumCapacity = table.MinimumCapacity
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext)
            MyBase.New(info, context)
            Me.InitVars
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property PreparationTimeColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnPreparationTime
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property DirectionsColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnDirections
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property CookTimeColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnCookTime
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property PhotoColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnPhoto
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property TemperatureColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnTemperature
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property RecipeIDColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnRecipeID
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property CourseTypeIDColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnCourseTypeID
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property CuisineTypeIDColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnCuisineTypeID
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property NameColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnName
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property AccountIdColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnAccountId
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Browsable(false)>  _
        Public ReadOnly Property Count() As Integer
            Get
                Return Me.Rows.Count
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Default ReadOnly Property Item(ByVal index As Integer) As RecipesRow
            Get
                Return CType(Me.Rows(index),RecipesRow)
            End Get
        End Property
        
        Public Event RecipesRowChanging As RecipesRowChangeEventHandler
        
        Public Event RecipesRowChanged As RecipesRowChangeEventHandler
        
        Public Event RecipesRowDeleting As RecipesRowChangeEventHandler
        
        Public Event RecipesRowDeleted As RecipesRowChangeEventHandler
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Sub AddRecipesRow(ByVal row As RecipesRow)
            Me.Rows.Add(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Function AddRecipesRow(ByVal PreparationTime As Integer, ByVal Directions As String, ByVal CookTime As Integer, ByVal Photo() As Byte, ByVal Temperature As Integer, ByVal CourseTypeID As Integer, ByVal CuisineTypeID As Integer, ByVal Name As String, ByVal parentAccountsRowByFK_Recipes_Accounts As AccountsRow) As RecipesRow
            Dim rowRecipesRow As RecipesRow = CType(Me.NewRow,RecipesRow)
            Dim columnValuesArray() As Object = New Object() {PreparationTime, Directions, CookTime, Photo, Temperature, Nothing, CourseTypeID, CuisineTypeID, Name, Nothing}
            If (Not (parentAccountsRowByFK_Recipes_Accounts) Is Nothing) Then
                columnValuesArray(9) = parentAccountsRowByFK_Recipes_Accounts(0)
            End If
            rowRecipesRow.ItemArray = columnValuesArray
            Me.Rows.Add(rowRecipesRow)
            Return rowRecipesRow
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function FindByRecipeID(ByVal RecipeID As Integer) As RecipesRow
            Return CType(Me.Rows.Find(New Object() {RecipeID}),RecipesRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overrides Function Clone() As Global.System.Data.DataTable
            Dim cln As RecipesDataTable = CType(MyBase.Clone,RecipesDataTable)
            cln.InitVars
            Return cln
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function CreateInstance() As Global.System.Data.DataTable
            Return New RecipesDataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub InitVars()
            Me.columnPreparationTime = MyBase.Columns("PreparationTime")
            Me.columnDirections = MyBase.Columns("Directions")
            Me.columnCookTime = MyBase.Columns("CookTime")
            Me.columnPhoto = MyBase.Columns("Photo")
            Me.columnTemperature = MyBase.Columns("Temperature")
            Me.columnRecipeID = MyBase.Columns("RecipeID")
            Me.columnCourseTypeID = MyBase.Columns("CourseTypeID")
            Me.columnCuisineTypeID = MyBase.Columns("CuisineTypeID")
            Me.columnName = MyBase.Columns("Name")
            Me.columnAccountId = MyBase.Columns("AccountId")
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitClass()
            Me.columnPreparationTime = New Global.System.Data.DataColumn("PreparationTime", GetType(Integer), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnPreparationTime)
            Me.columnDirections = New Global.System.Data.DataColumn("Directions", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnDirections)
            Me.columnCookTime = New Global.System.Data.DataColumn("CookTime", GetType(Integer), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnCookTime)
            Me.columnPhoto = New Global.System.Data.DataColumn("Photo", GetType(Byte()), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnPhoto)
            Me.columnTemperature = New Global.System.Data.DataColumn("Temperature", GetType(Integer), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnTemperature)
            Me.columnRecipeID = New Global.System.Data.DataColumn("RecipeID", GetType(Integer), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnRecipeID)
            Me.columnCourseTypeID = New Global.System.Data.DataColumn("CourseTypeID", GetType(Integer), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnCourseTypeID)
            Me.columnCuisineTypeID = New Global.System.Data.DataColumn("CuisineTypeID", GetType(Integer), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnCuisineTypeID)
            Me.columnName = New Global.System.Data.DataColumn("Name", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnName)
            Me.columnAccountId = New Global.System.Data.DataColumn("AccountId", GetType(Integer), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnAccountId)
            Me.Constraints.Add(New Global.System.Data.UniqueConstraint("Constraint1", New Global.System.Data.DataColumn() {Me.columnRecipeID}, true))
            Me.columnDirections.AllowDBNull = false
            Me.columnDirections.MaxLength = 3000
            Me.columnCookTime.AllowDBNull = false
            Me.columnTemperature.AllowDBNull = false
            Me.columnRecipeID.AutoIncrement = true
            Me.columnRecipeID.AutoIncrementSeed = -1
            Me.columnRecipeID.AutoIncrementStep = -1
            Me.columnRecipeID.AllowDBNull = false
            Me.columnRecipeID.ReadOnly = true
            Me.columnRecipeID.Unique = true
            Me.columnCourseTypeID.AllowDBNull = false
            Me.columnCuisineTypeID.AllowDBNull = false
            Me.columnName.AllowDBNull = false
            Me.columnName.MaxLength = 50
            Me.columnAccountId.AllowDBNull = false
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function NewRecipesRow() As RecipesRow
            Return CType(Me.NewRow,RecipesRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function NewRowFromBuilder(ByVal builder As Global.System.Data.DataRowBuilder) As Global.System.Data.DataRow
            Return New RecipesRow(builder)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function GetRowType() As Global.System.Type
            Return GetType(RecipesRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanged(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanged(e)
            If (Not (Me.RecipesRowChangedEvent) Is Nothing) Then
                RaiseEvent RecipesRowChanged(Me, New RecipesRowChangeEvent(CType(e.Row,RecipesRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanging(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanging(e)
            If (Not (Me.RecipesRowChangingEvent) Is Nothing) Then
                RaiseEvent RecipesRowChanging(Me, New RecipesRowChangeEvent(CType(e.Row,RecipesRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleted(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleted(e)
            If (Not (Me.RecipesRowDeletedEvent) Is Nothing) Then
                RaiseEvent RecipesRowDeleted(Me, New RecipesRowChangeEvent(CType(e.Row,RecipesRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleting(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleting(e)
            If (Not (Me.RecipesRowDeletingEvent) Is Nothing) Then
                RaiseEvent RecipesRowDeleting(Me, New RecipesRowChangeEvent(CType(e.Row,RecipesRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub RemoveRecipesRow(ByVal row As RecipesRow)
            Me.Rows.Remove(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Shared Function GetTypedTableSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType
            Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType
            Dim sequence As Global.System.Xml.Schema.XmlSchemaSequence = New Global.System.Xml.Schema.XmlSchemaSequence
            Dim ds As RecipeHolderDatabaseDataSet = New RecipeHolderDatabaseDataSet
            Dim any1 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any1.Namespace = "http://www.w3.org/2001/XMLSchema"
            any1.MinOccurs = New Decimal(0)
            any1.MaxOccurs = Decimal.MaxValue
            any1.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any1)
            Dim any2 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any2.Namespace = "urn:schemas-microsoft-com:xml-diffgram-v1"
            any2.MinOccurs = New Decimal(1)
            any2.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any2)
            Dim attribute1 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute1.Name = "namespace"
            attribute1.FixedValue = ds.Namespace
            type.Attributes.Add(attribute1)
            Dim attribute2 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute2.Name = "tableTypeName"
            attribute2.FixedValue = "RecipesDataTable"
            type.Attributes.Add(attribute2)
            type.Particle = sequence
            Dim dsSchema As Global.System.Xml.Schema.XmlSchema = ds.GetSchemaSerializable
            If xs.Contains(dsSchema.TargetNamespace) Then
                Dim s1 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Dim s2 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Try 
                    Dim schema As Global.System.Xml.Schema.XmlSchema = Nothing
                    dsSchema.Write(s1)
                    Dim schemas As Global.System.Collections.IEnumerator = xs.Schemas(dsSchema.TargetNamespace).GetEnumerator
                    Do While schemas.MoveNext
                        schema = CType(schemas.Current,Global.System.Xml.Schema.XmlSchema)
                        s2.SetLength(0)
                        schema.Write(s2)
                        If (s1.Length = s2.Length) Then
                            s1.Position = 0
                            s2.Position = 0
                            
                            Do While ((s1.Position <> s1.Length)  _
                                        AndAlso (s1.ReadByte = s2.ReadByte))
                                
                                
                            Loop
                            If (s1.Position = s1.Length) Then
                                Return type
                            End If
                        End If
                        
                    Loop
                Finally
                    If (Not (s1) Is Nothing) Then
                        s1.Close
                    End If
                    If (Not (s2) Is Nothing) Then
                        s2.Close
                    End If
                End Try
            End If
            xs.Add(dsSchema)
            Return type
        End Function
    End Class
    
    '''<summary>
    '''Represents the strongly named DataTable class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.Serializable(),  _
     Global.System.Xml.Serialization.XmlSchemaProviderAttribute("GetTypedTableSchema")>  _
    Partial Public Class UnitMeasurementsDataTable
        Inherits Global.System.Data.TypedTableBase(Of UnitMeasurementsRow)
        
        Private columnUnitMeasurementID As Global.System.Data.DataColumn
        
        Private columnName As Global.System.Data.DataColumn
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.TableName = "UnitMeasurements"
            Me.BeginInit
            Me.InitClass
            Me.EndInit
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal table As Global.System.Data.DataTable)
            MyBase.New
            Me.TableName = table.TableName
            If (table.CaseSensitive <> table.DataSet.CaseSensitive) Then
                Me.CaseSensitive = table.CaseSensitive
            End If
            If (table.Locale.ToString <> table.DataSet.Locale.ToString) Then
                Me.Locale = table.Locale
            End If
            If (table.Namespace <> table.DataSet.Namespace) Then
                Me.Namespace = table.Namespace
            End If
            Me.Prefix = table.Prefix
            Me.MinimumCapacity = table.MinimumCapacity
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext)
            MyBase.New(info, context)
            Me.InitVars
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property UnitMeasurementIDColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnUnitMeasurementID
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property NameColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnName
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Browsable(false)>  _
        Public ReadOnly Property Count() As Integer
            Get
                Return Me.Rows.Count
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Default ReadOnly Property Item(ByVal index As Integer) As UnitMeasurementsRow
            Get
                Return CType(Me.Rows(index),UnitMeasurementsRow)
            End Get
        End Property
        
        Public Event UnitMeasurementsRowChanging As UnitMeasurementsRowChangeEventHandler
        
        Public Event UnitMeasurementsRowChanged As UnitMeasurementsRowChangeEventHandler
        
        Public Event UnitMeasurementsRowDeleting As UnitMeasurementsRowChangeEventHandler
        
        Public Event UnitMeasurementsRowDeleted As UnitMeasurementsRowChangeEventHandler
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Sub AddUnitMeasurementsRow(ByVal row As UnitMeasurementsRow)
            Me.Rows.Add(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Function AddUnitMeasurementsRow(ByVal Name As String) As UnitMeasurementsRow
            Dim rowUnitMeasurementsRow As UnitMeasurementsRow = CType(Me.NewRow,UnitMeasurementsRow)
            Dim columnValuesArray() As Object = New Object() {Nothing, Name}
            rowUnitMeasurementsRow.ItemArray = columnValuesArray
            Me.Rows.Add(rowUnitMeasurementsRow)
            Return rowUnitMeasurementsRow
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function FindByUnitMeasurementID(ByVal UnitMeasurementID As Integer) As UnitMeasurementsRow
            Return CType(Me.Rows.Find(New Object() {UnitMeasurementID}),UnitMeasurementsRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overrides Function Clone() As Global.System.Data.DataTable
            Dim cln As UnitMeasurementsDataTable = CType(MyBase.Clone,UnitMeasurementsDataTable)
            cln.InitVars
            Return cln
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function CreateInstance() As Global.System.Data.DataTable
            Return New UnitMeasurementsDataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub InitVars()
            Me.columnUnitMeasurementID = MyBase.Columns("UnitMeasurementID")
            Me.columnName = MyBase.Columns("Name")
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitClass()
            Me.columnUnitMeasurementID = New Global.System.Data.DataColumn("UnitMeasurementID", GetType(Integer), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnUnitMeasurementID)
            Me.columnName = New Global.System.Data.DataColumn("Name", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnName)
            Me.Constraints.Add(New Global.System.Data.UniqueConstraint("Constraint1", New Global.System.Data.DataColumn() {Me.columnUnitMeasurementID}, true))
            Me.columnUnitMeasurementID.AutoIncrement = true
            Me.columnUnitMeasurementID.AutoIncrementSeed = -1
            Me.columnUnitMeasurementID.AutoIncrementStep = -1
            Me.columnUnitMeasurementID.AllowDBNull = false
            Me.columnUnitMeasurementID.ReadOnly = true
            Me.columnUnitMeasurementID.Unique = true
            Me.columnName.AllowDBNull = false
            Me.columnName.MaxLength = 50
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function NewUnitMeasurementsRow() As UnitMeasurementsRow
            Return CType(Me.NewRow,UnitMeasurementsRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function NewRowFromBuilder(ByVal builder As Global.System.Data.DataRowBuilder) As Global.System.Data.DataRow
            Return New UnitMeasurementsRow(builder)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function GetRowType() As Global.System.Type
            Return GetType(UnitMeasurementsRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanged(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanged(e)
            If (Not (Me.UnitMeasurementsRowChangedEvent) Is Nothing) Then
                RaiseEvent UnitMeasurementsRowChanged(Me, New UnitMeasurementsRowChangeEvent(CType(e.Row,UnitMeasurementsRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanging(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanging(e)
            If (Not (Me.UnitMeasurementsRowChangingEvent) Is Nothing) Then
                RaiseEvent UnitMeasurementsRowChanging(Me, New UnitMeasurementsRowChangeEvent(CType(e.Row,UnitMeasurementsRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleted(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleted(e)
            If (Not (Me.UnitMeasurementsRowDeletedEvent) Is Nothing) Then
                RaiseEvent UnitMeasurementsRowDeleted(Me, New UnitMeasurementsRowChangeEvent(CType(e.Row,UnitMeasurementsRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleting(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleting(e)
            If (Not (Me.UnitMeasurementsRowDeletingEvent) Is Nothing) Then
                RaiseEvent UnitMeasurementsRowDeleting(Me, New UnitMeasurementsRowChangeEvent(CType(e.Row,UnitMeasurementsRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub RemoveUnitMeasurementsRow(ByVal row As UnitMeasurementsRow)
            Me.Rows.Remove(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Shared Function GetTypedTableSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType
            Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType
            Dim sequence As Global.System.Xml.Schema.XmlSchemaSequence = New Global.System.Xml.Schema.XmlSchemaSequence
            Dim ds As RecipeHolderDatabaseDataSet = New RecipeHolderDatabaseDataSet
            Dim any1 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any1.Namespace = "http://www.w3.org/2001/XMLSchema"
            any1.MinOccurs = New Decimal(0)
            any1.MaxOccurs = Decimal.MaxValue
            any1.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any1)
            Dim any2 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any2.Namespace = "urn:schemas-microsoft-com:xml-diffgram-v1"
            any2.MinOccurs = New Decimal(1)
            any2.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any2)
            Dim attribute1 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute1.Name = "namespace"
            attribute1.FixedValue = ds.Namespace
            type.Attributes.Add(attribute1)
            Dim attribute2 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute2.Name = "tableTypeName"
            attribute2.FixedValue = "UnitMeasurementsDataTable"
            type.Attributes.Add(attribute2)
            type.Particle = sequence
            Dim dsSchema As Global.System.Xml.Schema.XmlSchema = ds.GetSchemaSerializable
            If xs.Contains(dsSchema.TargetNamespace) Then
                Dim s1 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Dim s2 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Try 
                    Dim schema As Global.System.Xml.Schema.XmlSchema = Nothing
                    dsSchema.Write(s1)
                    Dim schemas As Global.System.Collections.IEnumerator = xs.Schemas(dsSchema.TargetNamespace).GetEnumerator
                    Do While schemas.MoveNext
                        schema = CType(schemas.Current,Global.System.Xml.Schema.XmlSchema)
                        s2.SetLength(0)
                        schema.Write(s2)
                        If (s1.Length = s2.Length) Then
                            s1.Position = 0
                            s2.Position = 0
                            
                            Do While ((s1.Position <> s1.Length)  _
                                        AndAlso (s1.ReadByte = s2.ReadByte))
                                
                                
                            Loop
                            If (s1.Position = s1.Length) Then
                                Return type
                            End If
                        End If
                        
                    Loop
                Finally
                    If (Not (s1) Is Nothing) Then
                        s1.Close
                    End If
                    If (Not (s2) Is Nothing) Then
                        s2.Close
                    End If
                End Try
            End If
            xs.Add(dsSchema)
            Return type
        End Function
    End Class
    
    '''<summary>
    '''Represents the strongly named DataTable class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.Serializable(),  _
     Global.System.Xml.Serialization.XmlSchemaProviderAttribute("GetTypedTableSchema")>  _
    Partial Public Class AccountsDataTable
        Inherits Global.System.Data.TypedTableBase(Of AccountsRow)
        
        Private columnAccountID As Global.System.Data.DataColumn
        
        Private columnFirstName As Global.System.Data.DataColumn
        
        Private columnLastName As Global.System.Data.DataColumn
        
        Private columnUserName As Global.System.Data.DataColumn
        
        Private columnPassword As Global.System.Data.DataColumn
        
        Private columnisProtected As Global.System.Data.DataColumn
        
        Private columnEMail As Global.System.Data.DataColumn
        
        Private columnDateCreated As Global.System.Data.DataColumn
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.TableName = "Accounts"
            Me.BeginInit
            Me.InitClass
            Me.EndInit
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal table As Global.System.Data.DataTable)
            MyBase.New
            Me.TableName = table.TableName
            If (table.CaseSensitive <> table.DataSet.CaseSensitive) Then
                Me.CaseSensitive = table.CaseSensitive
            End If
            If (table.Locale.ToString <> table.DataSet.Locale.ToString) Then
                Me.Locale = table.Locale
            End If
            If (table.Namespace <> table.DataSet.Namespace) Then
                Me.Namespace = table.Namespace
            End If
            Me.Prefix = table.Prefix
            Me.MinimumCapacity = table.MinimumCapacity
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext)
            MyBase.New(info, context)
            Me.InitVars
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property AccountIDColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnAccountID
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property FirstNameColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnFirstName
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property LastNameColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnLastName
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property UserNameColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnUserName
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property PasswordColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnPassword
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property isProtectedColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnisProtected
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property EMailColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnEMail
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property DateCreatedColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnDateCreated
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Browsable(false)>  _
        Public ReadOnly Property Count() As Integer
            Get
                Return Me.Rows.Count
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Default ReadOnly Property Item(ByVal index As Integer) As AccountsRow
            Get
                Return CType(Me.Rows(index),AccountsRow)
            End Get
        End Property
        
        Public Event AccountsRowChanging As AccountsRowChangeEventHandler
        
        Public Event AccountsRowChanged As AccountsRowChangeEventHandler
        
        Public Event AccountsRowDeleting As AccountsRowChangeEventHandler
        
        Public Event AccountsRowDeleted As AccountsRowChangeEventHandler
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Sub AddAccountsRow(ByVal row As AccountsRow)
            Me.Rows.Add(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Function AddAccountsRow(ByVal FirstName As String, ByVal LastName As String, ByVal UserName As String, ByVal Password() As Byte, ByVal isProtected As Boolean, ByVal EMail As String, ByVal DateCreated As Date) As AccountsRow
            Dim rowAccountsRow As AccountsRow = CType(Me.NewRow,AccountsRow)
            Dim columnValuesArray() As Object = New Object() {Nothing, FirstName, LastName, UserName, Password, isProtected, EMail, DateCreated}
            rowAccountsRow.ItemArray = columnValuesArray
            Me.Rows.Add(rowAccountsRow)
            Return rowAccountsRow
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function FindByAccountID(ByVal AccountID As Integer) As AccountsRow
            Return CType(Me.Rows.Find(New Object() {AccountID}),AccountsRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overrides Function Clone() As Global.System.Data.DataTable
            Dim cln As AccountsDataTable = CType(MyBase.Clone,AccountsDataTable)
            cln.InitVars
            Return cln
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function CreateInstance() As Global.System.Data.DataTable
            Return New AccountsDataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub InitVars()
            Me.columnAccountID = MyBase.Columns("AccountID")
            Me.columnFirstName = MyBase.Columns("FirstName")
            Me.columnLastName = MyBase.Columns("LastName")
            Me.columnUserName = MyBase.Columns("UserName")
            Me.columnPassword = MyBase.Columns("Password")
            Me.columnisProtected = MyBase.Columns("isProtected")
            Me.columnEMail = MyBase.Columns("EMail")
            Me.columnDateCreated = MyBase.Columns("DateCreated")
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitClass()
            Me.columnAccountID = New Global.System.Data.DataColumn("AccountID", GetType(Integer), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnAccountID)
            Me.columnFirstName = New Global.System.Data.DataColumn("FirstName", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnFirstName)
            Me.columnLastName = New Global.System.Data.DataColumn("LastName", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnLastName)
            Me.columnUserName = New Global.System.Data.DataColumn("UserName", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnUserName)
            Me.columnPassword = New Global.System.Data.DataColumn("Password", GetType(Byte()), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnPassword)
            Me.columnisProtected = New Global.System.Data.DataColumn("isProtected", GetType(Boolean), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnisProtected)
            Me.columnEMail = New Global.System.Data.DataColumn("EMail", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnEMail)
            Me.columnDateCreated = New Global.System.Data.DataColumn("DateCreated", GetType(Date), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnDateCreated)
            Me.Constraints.Add(New Global.System.Data.UniqueConstraint("Constraint1", New Global.System.Data.DataColumn() {Me.columnAccountID}, true))
            Me.columnAccountID.AutoIncrement = true
            Me.columnAccountID.AutoIncrementSeed = -1
            Me.columnAccountID.AutoIncrementStep = -1
            Me.columnAccountID.AllowDBNull = false
            Me.columnAccountID.ReadOnly = true
            Me.columnAccountID.Unique = true
            Me.columnFirstName.AllowDBNull = false
            Me.columnFirstName.MaxLength = 50
            Me.columnLastName.AllowDBNull = false
            Me.columnLastName.MaxLength = 50
            Me.columnUserName.MaxLength = 50
            Me.columnisProtected.AllowDBNull = false
            Me.columnEMail.MaxLength = 50
            Me.columnDateCreated.AllowDBNull = false
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function NewAccountsRow() As AccountsRow
            Return CType(Me.NewRow,AccountsRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function NewRowFromBuilder(ByVal builder As Global.System.Data.DataRowBuilder) As Global.System.Data.DataRow
            Return New AccountsRow(builder)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function GetRowType() As Global.System.Type
            Return GetType(AccountsRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanged(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanged(e)
            If (Not (Me.AccountsRowChangedEvent) Is Nothing) Then
                RaiseEvent AccountsRowChanged(Me, New AccountsRowChangeEvent(CType(e.Row,AccountsRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanging(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanging(e)
            If (Not (Me.AccountsRowChangingEvent) Is Nothing) Then
                RaiseEvent AccountsRowChanging(Me, New AccountsRowChangeEvent(CType(e.Row,AccountsRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleted(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleted(e)
            If (Not (Me.AccountsRowDeletedEvent) Is Nothing) Then
                RaiseEvent AccountsRowDeleted(Me, New AccountsRowChangeEvent(CType(e.Row,AccountsRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleting(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleting(e)
            If (Not (Me.AccountsRowDeletingEvent) Is Nothing) Then
                RaiseEvent AccountsRowDeleting(Me, New AccountsRowChangeEvent(CType(e.Row,AccountsRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub RemoveAccountsRow(ByVal row As AccountsRow)
            Me.Rows.Remove(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Shared Function GetTypedTableSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType
            Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType
            Dim sequence As Global.System.Xml.Schema.XmlSchemaSequence = New Global.System.Xml.Schema.XmlSchemaSequence
            Dim ds As RecipeHolderDatabaseDataSet = New RecipeHolderDatabaseDataSet
            Dim any1 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any1.Namespace = "http://www.w3.org/2001/XMLSchema"
            any1.MinOccurs = New Decimal(0)
            any1.MaxOccurs = Decimal.MaxValue
            any1.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any1)
            Dim any2 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any2.Namespace = "urn:schemas-microsoft-com:xml-diffgram-v1"
            any2.MinOccurs = New Decimal(1)
            any2.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any2)
            Dim attribute1 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute1.Name = "namespace"
            attribute1.FixedValue = ds.Namespace
            type.Attributes.Add(attribute1)
            Dim attribute2 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute2.Name = "tableTypeName"
            attribute2.FixedValue = "AccountsDataTable"
            type.Attributes.Add(attribute2)
            type.Particle = sequence
            Dim dsSchema As Global.System.Xml.Schema.XmlSchema = ds.GetSchemaSerializable
            If xs.Contains(dsSchema.TargetNamespace) Then
                Dim s1 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Dim s2 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Try 
                    Dim schema As Global.System.Xml.Schema.XmlSchema = Nothing
                    dsSchema.Write(s1)
                    Dim schemas As Global.System.Collections.IEnumerator = xs.Schemas(dsSchema.TargetNamespace).GetEnumerator
                    Do While schemas.MoveNext
                        schema = CType(schemas.Current,Global.System.Xml.Schema.XmlSchema)
                        s2.SetLength(0)
                        schema.Write(s2)
                        If (s1.Length = s2.Length) Then
                            s1.Position = 0
                            s2.Position = 0
                            
                            Do While ((s1.Position <> s1.Length)  _
                                        AndAlso (s1.ReadByte = s2.ReadByte))
                                
                                
                            Loop
                            If (s1.Position = s1.Length) Then
                                Return type
                            End If
                        End If
                        
                    Loop
                Finally
                    If (Not (s1) Is Nothing) Then
                        s1.Close
                    End If
                    If (Not (s2) Is Nothing) Then
                        s2.Close
                    End If
                End Try
            End If
            xs.Add(dsSchema)
            Return type
        End Function
    End Class
    
    '''<summary>
    '''Represents the strongly named DataTable class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.Serializable(),  _
     Global.System.Xml.Serialization.XmlSchemaProviderAttribute("GetTypedTableSchema")>  _
    Partial Public Class RetrieveRecipeTableDataTable
        Inherits Global.System.Data.TypedTableBase(Of RetrieveRecipeTableRow)
        
        Private columnAccountId As Global.System.Data.DataColumn
        
        Private columnRecipeID As Global.System.Data.DataColumn
        
        Private columnRecipeName As Global.System.Data.DataColumn
        
        Private columnPreparationTime As Global.System.Data.DataColumn
        
        Private columnDirections As Global.System.Data.DataColumn
        
        Private columnCookTime As Global.System.Data.DataColumn
        
        Private columnTemperature As Global.System.Data.DataColumn
        
        Private columnCourseTypeName As Global.System.Data.DataColumn
        
        Private columnCuisineTypeName As Global.System.Data.DataColumn
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.TableName = "RetrieveRecipeTable"
            Me.BeginInit
            Me.InitClass
            Me.EndInit
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal table As Global.System.Data.DataTable)
            MyBase.New
            Me.TableName = table.TableName
            If (table.CaseSensitive <> table.DataSet.CaseSensitive) Then
                Me.CaseSensitive = table.CaseSensitive
            End If
            If (table.Locale.ToString <> table.DataSet.Locale.ToString) Then
                Me.Locale = table.Locale
            End If
            If (table.Namespace <> table.DataSet.Namespace) Then
                Me.Namespace = table.Namespace
            End If
            Me.Prefix = table.Prefix
            Me.MinimumCapacity = table.MinimumCapacity
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext)
            MyBase.New(info, context)
            Me.InitVars
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property AccountIdColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnAccountId
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property RecipeIDColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnRecipeID
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property RecipeNameColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnRecipeName
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property PreparationTimeColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnPreparationTime
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property DirectionsColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnDirections
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property CookTimeColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnCookTime
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property TemperatureColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnTemperature
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property CourseTypeNameColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnCourseTypeName
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property CuisineTypeNameColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnCuisineTypeName
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Browsable(false)>  _
        Public ReadOnly Property Count() As Integer
            Get
                Return Me.Rows.Count
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Default ReadOnly Property Item(ByVal index As Integer) As RetrieveRecipeTableRow
            Get
                Return CType(Me.Rows(index),RetrieveRecipeTableRow)
            End Get
        End Property
        
        Public Event RetrieveRecipeTableRowChanging As RetrieveRecipeTableRowChangeEventHandler
        
        Public Event RetrieveRecipeTableRowChanged As RetrieveRecipeTableRowChangeEventHandler
        
        Public Event RetrieveRecipeTableRowDeleting As RetrieveRecipeTableRowChangeEventHandler
        
        Public Event RetrieveRecipeTableRowDeleted As RetrieveRecipeTableRowChangeEventHandler
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Sub AddRetrieveRecipeTableRow(ByVal row As RetrieveRecipeTableRow)
            Me.Rows.Add(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Function AddRetrieveRecipeTableRow(ByVal AccountId As Integer, ByVal RecipeName As String, ByVal PreparationTime As Integer, ByVal Directions As String, ByVal CookTime As Integer, ByVal Temperature As Integer, ByVal CourseTypeName As String, ByVal CuisineTypeName As String) As RetrieveRecipeTableRow
            Dim rowRetrieveRecipeTableRow As RetrieveRecipeTableRow = CType(Me.NewRow,RetrieveRecipeTableRow)
            Dim columnValuesArray() As Object = New Object() {AccountId, Nothing, RecipeName, PreparationTime, Directions, CookTime, Temperature, CourseTypeName, CuisineTypeName}
            rowRetrieveRecipeTableRow.ItemArray = columnValuesArray
            Me.Rows.Add(rowRetrieveRecipeTableRow)
            Return rowRetrieveRecipeTableRow
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function FindByRecipeID(ByVal RecipeID As Integer) As RetrieveRecipeTableRow
            Return CType(Me.Rows.Find(New Object() {RecipeID}),RetrieveRecipeTableRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overrides Function Clone() As Global.System.Data.DataTable
            Dim cln As RetrieveRecipeTableDataTable = CType(MyBase.Clone,RetrieveRecipeTableDataTable)
            cln.InitVars
            Return cln
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function CreateInstance() As Global.System.Data.DataTable
            Return New RetrieveRecipeTableDataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub InitVars()
            Me.columnAccountId = MyBase.Columns("AccountId")
            Me.columnRecipeID = MyBase.Columns("RecipeID")
            Me.columnRecipeName = MyBase.Columns("RecipeName")
            Me.columnPreparationTime = MyBase.Columns("PreparationTime")
            Me.columnDirections = MyBase.Columns("Directions")
            Me.columnCookTime = MyBase.Columns("CookTime")
            Me.columnTemperature = MyBase.Columns("Temperature")
            Me.columnCourseTypeName = MyBase.Columns("CourseTypeName")
            Me.columnCuisineTypeName = MyBase.Columns("CuisineTypeName")
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitClass()
            Me.columnAccountId = New Global.System.Data.DataColumn("AccountId", GetType(Integer), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnAccountId)
            Me.columnRecipeID = New Global.System.Data.DataColumn("RecipeID", GetType(Integer), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnRecipeID)
            Me.columnRecipeName = New Global.System.Data.DataColumn("RecipeName", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnRecipeName)
            Me.columnPreparationTime = New Global.System.Data.DataColumn("PreparationTime", GetType(Integer), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnPreparationTime)
            Me.columnDirections = New Global.System.Data.DataColumn("Directions", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnDirections)
            Me.columnCookTime = New Global.System.Data.DataColumn("CookTime", GetType(Integer), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnCookTime)
            Me.columnTemperature = New Global.System.Data.DataColumn("Temperature", GetType(Integer), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnTemperature)
            Me.columnCourseTypeName = New Global.System.Data.DataColumn("CourseTypeName", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnCourseTypeName)
            Me.columnCuisineTypeName = New Global.System.Data.DataColumn("CuisineTypeName", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnCuisineTypeName)
            Me.Constraints.Add(New Global.System.Data.UniqueConstraint("Constraint1", New Global.System.Data.DataColumn() {Me.columnRecipeID}, true))
            Me.columnAccountId.AllowDBNull = false
            Me.columnRecipeID.AutoIncrement = true
            Me.columnRecipeID.AllowDBNull = false
            Me.columnRecipeID.ReadOnly = true
            Me.columnRecipeID.Unique = true
            Me.columnRecipeName.AllowDBNull = false
            Me.columnRecipeName.MaxLength = 50
            Me.columnDirections.AllowDBNull = false
            Me.columnDirections.MaxLength = 3000
            Me.columnCookTime.AllowDBNull = false
            Me.columnTemperature.AllowDBNull = false
            Me.columnCourseTypeName.AllowDBNull = false
            Me.columnCourseTypeName.MaxLength = 50
            Me.columnCuisineTypeName.AllowDBNull = false
            Me.columnCuisineTypeName.MaxLength = 50
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function NewRetrieveRecipeTableRow() As RetrieveRecipeTableRow
            Return CType(Me.NewRow,RetrieveRecipeTableRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function NewRowFromBuilder(ByVal builder As Global.System.Data.DataRowBuilder) As Global.System.Data.DataRow
            Return New RetrieveRecipeTableRow(builder)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function GetRowType() As Global.System.Type
            Return GetType(RetrieveRecipeTableRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanged(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanged(e)
            If (Not (Me.RetrieveRecipeTableRowChangedEvent) Is Nothing) Then
                RaiseEvent RetrieveRecipeTableRowChanged(Me, New RetrieveRecipeTableRowChangeEvent(CType(e.Row,RetrieveRecipeTableRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanging(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanging(e)
            If (Not (Me.RetrieveRecipeTableRowChangingEvent) Is Nothing) Then
                RaiseEvent RetrieveRecipeTableRowChanging(Me, New RetrieveRecipeTableRowChangeEvent(CType(e.Row,RetrieveRecipeTableRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleted(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleted(e)
            If (Not (Me.RetrieveRecipeTableRowDeletedEvent) Is Nothing) Then
                RaiseEvent RetrieveRecipeTableRowDeleted(Me, New RetrieveRecipeTableRowChangeEvent(CType(e.Row,RetrieveRecipeTableRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleting(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleting(e)
            If (Not (Me.RetrieveRecipeTableRowDeletingEvent) Is Nothing) Then
                RaiseEvent RetrieveRecipeTableRowDeleting(Me, New RetrieveRecipeTableRowChangeEvent(CType(e.Row,RetrieveRecipeTableRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub RemoveRetrieveRecipeTableRow(ByVal row As RetrieveRecipeTableRow)
            Me.Rows.Remove(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Shared Function GetTypedTableSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType
            Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType
            Dim sequence As Global.System.Xml.Schema.XmlSchemaSequence = New Global.System.Xml.Schema.XmlSchemaSequence
            Dim ds As RecipeHolderDatabaseDataSet = New RecipeHolderDatabaseDataSet
            Dim any1 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any1.Namespace = "http://www.w3.org/2001/XMLSchema"
            any1.MinOccurs = New Decimal(0)
            any1.MaxOccurs = Decimal.MaxValue
            any1.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any1)
            Dim any2 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any2.Namespace = "urn:schemas-microsoft-com:xml-diffgram-v1"
            any2.MinOccurs = New Decimal(1)
            any2.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any2)
            Dim attribute1 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute1.Name = "namespace"
            attribute1.FixedValue = ds.Namespace
            type.Attributes.Add(attribute1)
            Dim attribute2 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute2.Name = "tableTypeName"
            attribute2.FixedValue = "RetrieveRecipeTableDataTable"
            type.Attributes.Add(attribute2)
            type.Particle = sequence
            Dim dsSchema As Global.System.Xml.Schema.XmlSchema = ds.GetSchemaSerializable
            If xs.Contains(dsSchema.TargetNamespace) Then
                Dim s1 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Dim s2 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Try 
                    Dim schema As Global.System.Xml.Schema.XmlSchema = Nothing
                    dsSchema.Write(s1)
                    Dim schemas As Global.System.Collections.IEnumerator = xs.Schemas(dsSchema.TargetNamespace).GetEnumerator
                    Do While schemas.MoveNext
                        schema = CType(schemas.Current,Global.System.Xml.Schema.XmlSchema)
                        s2.SetLength(0)
                        schema.Write(s2)
                        If (s1.Length = s2.Length) Then
                            s1.Position = 0
                            s2.Position = 0
                            
                            Do While ((s1.Position <> s1.Length)  _
                                        AndAlso (s1.ReadByte = s2.ReadByte))
                                
                                
                            Loop
                            If (s1.Position = s1.Length) Then
                                Return type
                            End If
                        End If
                        
                    Loop
                Finally
                    If (Not (s1) Is Nothing) Then
                        s1.Close
                    End If
                    If (Not (s2) Is Nothing) Then
                        s2.Close
                    End If
                End Try
            End If
            xs.Add(dsSchema)
            Return type
        End Function
    End Class
    
    '''<summary>
    '''Represents the strongly named DataTable class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.Serializable(),  _
     Global.System.Xml.Serialization.XmlSchemaProviderAttribute("GetTypedTableSchema")>  _
    Partial Public Class RetrieveRecipeIngredientTableDataTable
        Inherits Global.System.Data.TypedTableBase(Of RetrieveRecipeIngredientTableRow)
        
        Private columnRecipeId As Global.System.Data.DataColumn
        
        Private columnIngredientName As Global.System.Data.DataColumn
        
        Private columnIngredientAmount As Global.System.Data.DataColumn
        
        Private columnUnitMeasurementName As Global.System.Data.DataColumn
        
        Private columnFoodTypeName As Global.System.Data.DataColumn
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.TableName = "RetrieveRecipeIngredientTable"
            Me.BeginInit
            Me.InitClass
            Me.EndInit
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal table As Global.System.Data.DataTable)
            MyBase.New
            Me.TableName = table.TableName
            If (table.CaseSensitive <> table.DataSet.CaseSensitive) Then
                Me.CaseSensitive = table.CaseSensitive
            End If
            If (table.Locale.ToString <> table.DataSet.Locale.ToString) Then
                Me.Locale = table.Locale
            End If
            If (table.Namespace <> table.DataSet.Namespace) Then
                Me.Namespace = table.Namespace
            End If
            Me.Prefix = table.Prefix
            Me.MinimumCapacity = table.MinimumCapacity
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext)
            MyBase.New(info, context)
            Me.InitVars
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property RecipeIdColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnRecipeId
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property IngredientNameColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnIngredientName
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property IngredientAmountColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnIngredientAmount
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property UnitMeasurementNameColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnUnitMeasurementName
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property FoodTypeNameColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnFoodTypeName
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Browsable(false)>  _
        Public ReadOnly Property Count() As Integer
            Get
                Return Me.Rows.Count
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Default ReadOnly Property Item(ByVal index As Integer) As RetrieveRecipeIngredientTableRow
            Get
                Return CType(Me.Rows(index),RetrieveRecipeIngredientTableRow)
            End Get
        End Property
        
        Public Event RetrieveRecipeIngredientTableRowChanging As RetrieveRecipeIngredientTableRowChangeEventHandler
        
        Public Event RetrieveRecipeIngredientTableRowChanged As RetrieveRecipeIngredientTableRowChangeEventHandler
        
        Public Event RetrieveRecipeIngredientTableRowDeleting As RetrieveRecipeIngredientTableRowChangeEventHandler
        
        Public Event RetrieveRecipeIngredientTableRowDeleted As RetrieveRecipeIngredientTableRowChangeEventHandler
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Sub AddRetrieveRecipeIngredientTableRow(ByVal row As RetrieveRecipeIngredientTableRow)
            Me.Rows.Add(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Function AddRetrieveRecipeIngredientTableRow(ByVal parentRetrieveRecipeTableRowByRetrieveRecipeTable_RetrieveRecipeIngredientTable As RetrieveRecipeTableRow, ByVal IngredientName As String, ByVal IngredientAmount As Decimal, ByVal UnitMeasurementName As String, ByVal FoodTypeName As String) As RetrieveRecipeIngredientTableRow
            Dim rowRetrieveRecipeIngredientTableRow As RetrieveRecipeIngredientTableRow = CType(Me.NewRow,RetrieveRecipeIngredientTableRow)
            Dim columnValuesArray() As Object = New Object() {Nothing, IngredientName, IngredientAmount, UnitMeasurementName, FoodTypeName}
            If (Not (parentRetrieveRecipeTableRowByRetrieveRecipeTable_RetrieveRecipeIngredientTable) Is Nothing) Then
                columnValuesArray(0) = parentRetrieveRecipeTableRowByRetrieveRecipeTable_RetrieveRecipeIngredientTable(1)
            End If
            rowRetrieveRecipeIngredientTableRow.ItemArray = columnValuesArray
            Me.Rows.Add(rowRetrieveRecipeIngredientTableRow)
            Return rowRetrieveRecipeIngredientTableRow
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overrides Function Clone() As Global.System.Data.DataTable
            Dim cln As RetrieveRecipeIngredientTableDataTable = CType(MyBase.Clone,RetrieveRecipeIngredientTableDataTable)
            cln.InitVars
            Return cln
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function CreateInstance() As Global.System.Data.DataTable
            Return New RetrieveRecipeIngredientTableDataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub InitVars()
            Me.columnRecipeId = MyBase.Columns("RecipeId")
            Me.columnIngredientName = MyBase.Columns("IngredientName")
            Me.columnIngredientAmount = MyBase.Columns("IngredientAmount")
            Me.columnUnitMeasurementName = MyBase.Columns("UnitMeasurementName")
            Me.columnFoodTypeName = MyBase.Columns("FoodTypeName")
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitClass()
            Me.columnRecipeId = New Global.System.Data.DataColumn("RecipeId", GetType(Integer), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnRecipeId)
            Me.columnIngredientName = New Global.System.Data.DataColumn("IngredientName", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnIngredientName)
            Me.columnIngredientAmount = New Global.System.Data.DataColumn("IngredientAmount", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnIngredientAmount)
            Me.columnUnitMeasurementName = New Global.System.Data.DataColumn("UnitMeasurementName", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnUnitMeasurementName)
            Me.columnFoodTypeName = New Global.System.Data.DataColumn("FoodTypeName", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnFoodTypeName)
            Me.columnRecipeId.AllowDBNull = false
            Me.columnIngredientName.AllowDBNull = false
            Me.columnIngredientName.MaxLength = 50
            Me.columnIngredientAmount.AllowDBNull = false
            Me.columnUnitMeasurementName.AllowDBNull = false
            Me.columnUnitMeasurementName.MaxLength = 50
            Me.columnFoodTypeName.AllowDBNull = false
            Me.columnFoodTypeName.MaxLength = 50
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function NewRetrieveRecipeIngredientTableRow() As RetrieveRecipeIngredientTableRow
            Return CType(Me.NewRow,RetrieveRecipeIngredientTableRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function NewRowFromBuilder(ByVal builder As Global.System.Data.DataRowBuilder) As Global.System.Data.DataRow
            Return New RetrieveRecipeIngredientTableRow(builder)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function GetRowType() As Global.System.Type
            Return GetType(RetrieveRecipeIngredientTableRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanged(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanged(e)
            If (Not (Me.RetrieveRecipeIngredientTableRowChangedEvent) Is Nothing) Then
                RaiseEvent RetrieveRecipeIngredientTableRowChanged(Me, New RetrieveRecipeIngredientTableRowChangeEvent(CType(e.Row,RetrieveRecipeIngredientTableRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanging(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanging(e)
            If (Not (Me.RetrieveRecipeIngredientTableRowChangingEvent) Is Nothing) Then
                RaiseEvent RetrieveRecipeIngredientTableRowChanging(Me, New RetrieveRecipeIngredientTableRowChangeEvent(CType(e.Row,RetrieveRecipeIngredientTableRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleted(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleted(e)
            If (Not (Me.RetrieveRecipeIngredientTableRowDeletedEvent) Is Nothing) Then
                RaiseEvent RetrieveRecipeIngredientTableRowDeleted(Me, New RetrieveRecipeIngredientTableRowChangeEvent(CType(e.Row,RetrieveRecipeIngredientTableRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleting(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleting(e)
            If (Not (Me.RetrieveRecipeIngredientTableRowDeletingEvent) Is Nothing) Then
                RaiseEvent RetrieveRecipeIngredientTableRowDeleting(Me, New RetrieveRecipeIngredientTableRowChangeEvent(CType(e.Row,RetrieveRecipeIngredientTableRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub RemoveRetrieveRecipeIngredientTableRow(ByVal row As RetrieveRecipeIngredientTableRow)
            Me.Rows.Remove(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Shared Function GetTypedTableSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType
            Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType
            Dim sequence As Global.System.Xml.Schema.XmlSchemaSequence = New Global.System.Xml.Schema.XmlSchemaSequence
            Dim ds As RecipeHolderDatabaseDataSet = New RecipeHolderDatabaseDataSet
            Dim any1 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any1.Namespace = "http://www.w3.org/2001/XMLSchema"
            any1.MinOccurs = New Decimal(0)
            any1.MaxOccurs = Decimal.MaxValue
            any1.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any1)
            Dim any2 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any2.Namespace = "urn:schemas-microsoft-com:xml-diffgram-v1"
            any2.MinOccurs = New Decimal(1)
            any2.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any2)
            Dim attribute1 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute1.Name = "namespace"
            attribute1.FixedValue = ds.Namespace
            type.Attributes.Add(attribute1)
            Dim attribute2 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute2.Name = "tableTypeName"
            attribute2.FixedValue = "RetrieveRecipeIngredientTableDataTable"
            type.Attributes.Add(attribute2)
            type.Particle = sequence
            Dim dsSchema As Global.System.Xml.Schema.XmlSchema = ds.GetSchemaSerializable
            If xs.Contains(dsSchema.TargetNamespace) Then
                Dim s1 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Dim s2 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Try 
                    Dim schema As Global.System.Xml.Schema.XmlSchema = Nothing
                    dsSchema.Write(s1)
                    Dim schemas As Global.System.Collections.IEnumerator = xs.Schemas(dsSchema.TargetNamespace).GetEnumerator
                    Do While schemas.MoveNext
                        schema = CType(schemas.Current,Global.System.Xml.Schema.XmlSchema)
                        s2.SetLength(0)
                        schema.Write(s2)
                        If (s1.Length = s2.Length) Then
                            s1.Position = 0
                            s2.Position = 0
                            
                            Do While ((s1.Position <> s1.Length)  _
                                        AndAlso (s1.ReadByte = s2.ReadByte))
                                
                                
                            Loop
                            If (s1.Position = s1.Length) Then
                                Return type
                            End If
                        End If
                        
                    Loop
                Finally
                    If (Not (s1) Is Nothing) Then
                        s1.Close
                    End If
                    If (Not (s2) Is Nothing) Then
                        s2.Close
                    End If
                End Try
            End If
            xs.Add(dsSchema)
            Return type
        End Function
    End Class
    
    '''<summary>
    '''Represents the strongly named DataTable class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.Serializable(),  _
     Global.System.Xml.Serialization.XmlSchemaProviderAttribute("GetTypedTableSchema")>  _
    Partial Public Class ViewIngredientsFoodTypesDataTable
        Inherits Global.System.Data.TypedTableBase(Of ViewIngredientsFoodTypesRow)
        
        Private columnIngredientName As Global.System.Data.DataColumn
        
        Private columnFoodTypeName As Global.System.Data.DataColumn
        
        Private columnFoodTypeID As Global.System.Data.DataColumn
        
        Private columnIngredientID As Global.System.Data.DataColumn
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.TableName = "ViewIngredientsFoodTypes"
            Me.BeginInit
            Me.InitClass
            Me.EndInit
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal table As Global.System.Data.DataTable)
            MyBase.New
            Me.TableName = table.TableName
            If (table.CaseSensitive <> table.DataSet.CaseSensitive) Then
                Me.CaseSensitive = table.CaseSensitive
            End If
            If (table.Locale.ToString <> table.DataSet.Locale.ToString) Then
                Me.Locale = table.Locale
            End If
            If (table.Namespace <> table.DataSet.Namespace) Then
                Me.Namespace = table.Namespace
            End If
            Me.Prefix = table.Prefix
            Me.MinimumCapacity = table.MinimumCapacity
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext)
            MyBase.New(info, context)
            Me.InitVars
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property IngredientNameColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnIngredientName
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property FoodTypeNameColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnFoodTypeName
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property FoodTypeIDColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnFoodTypeID
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property IngredientIDColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnIngredientID
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Browsable(false)>  _
        Public ReadOnly Property Count() As Integer
            Get
                Return Me.Rows.Count
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Default ReadOnly Property Item(ByVal index As Integer) As ViewIngredientsFoodTypesRow
            Get
                Return CType(Me.Rows(index),ViewIngredientsFoodTypesRow)
            End Get
        End Property
        
        Public Event ViewIngredientsFoodTypesRowChanging As ViewIngredientsFoodTypesRowChangeEventHandler
        
        Public Event ViewIngredientsFoodTypesRowChanged As ViewIngredientsFoodTypesRowChangeEventHandler
        
        Public Event ViewIngredientsFoodTypesRowDeleting As ViewIngredientsFoodTypesRowChangeEventHandler
        
        Public Event ViewIngredientsFoodTypesRowDeleted As ViewIngredientsFoodTypesRowChangeEventHandler
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Sub AddViewIngredientsFoodTypesRow(ByVal row As ViewIngredientsFoodTypesRow)
            Me.Rows.Add(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Function AddViewIngredientsFoodTypesRow(ByVal IngredientName As String, ByVal FoodTypeName As String, ByVal FoodTypeID As Integer) As ViewIngredientsFoodTypesRow
            Dim rowViewIngredientsFoodTypesRow As ViewIngredientsFoodTypesRow = CType(Me.NewRow,ViewIngredientsFoodTypesRow)
            Dim columnValuesArray() As Object = New Object() {IngredientName, FoodTypeName, FoodTypeID, Nothing}
            rowViewIngredientsFoodTypesRow.ItemArray = columnValuesArray
            Me.Rows.Add(rowViewIngredientsFoodTypesRow)
            Return rowViewIngredientsFoodTypesRow
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function FindByIngredientID(ByVal IngredientID As Integer) As ViewIngredientsFoodTypesRow
            Return CType(Me.Rows.Find(New Object() {IngredientID}),ViewIngredientsFoodTypesRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overrides Function Clone() As Global.System.Data.DataTable
            Dim cln As ViewIngredientsFoodTypesDataTable = CType(MyBase.Clone,ViewIngredientsFoodTypesDataTable)
            cln.InitVars
            Return cln
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function CreateInstance() As Global.System.Data.DataTable
            Return New ViewIngredientsFoodTypesDataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub InitVars()
            Me.columnIngredientName = MyBase.Columns("IngredientName")
            Me.columnFoodTypeName = MyBase.Columns("FoodTypeName")
            Me.columnFoodTypeID = MyBase.Columns("FoodTypeID")
            Me.columnIngredientID = MyBase.Columns("IngredientID")
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitClass()
            Me.columnIngredientName = New Global.System.Data.DataColumn("IngredientName", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnIngredientName)
            Me.columnFoodTypeName = New Global.System.Data.DataColumn("FoodTypeName", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnFoodTypeName)
            Me.columnFoodTypeID = New Global.System.Data.DataColumn("FoodTypeID", GetType(Integer), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnFoodTypeID)
            Me.columnIngredientID = New Global.System.Data.DataColumn("IngredientID", GetType(Integer), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnIngredientID)
            Me.Constraints.Add(New Global.System.Data.UniqueConstraint("Constraint1", New Global.System.Data.DataColumn() {Me.columnIngredientID}, true))
            Me.columnIngredientName.AllowDBNull = false
            Me.columnIngredientName.MaxLength = 50
            Me.columnFoodTypeName.AllowDBNull = false
            Me.columnFoodTypeName.MaxLength = 50
            Me.columnFoodTypeID.AllowDBNull = false
            Me.columnIngredientID.AutoIncrement = true
            Me.columnIngredientID.AllowDBNull = false
            Me.columnIngredientID.ReadOnly = true
            Me.columnIngredientID.Unique = true
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function NewViewIngredientsFoodTypesRow() As ViewIngredientsFoodTypesRow
            Return CType(Me.NewRow,ViewIngredientsFoodTypesRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function NewRowFromBuilder(ByVal builder As Global.System.Data.DataRowBuilder) As Global.System.Data.DataRow
            Return New ViewIngredientsFoodTypesRow(builder)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function GetRowType() As Global.System.Type
            Return GetType(ViewIngredientsFoodTypesRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanged(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanged(e)
            If (Not (Me.ViewIngredientsFoodTypesRowChangedEvent) Is Nothing) Then
                RaiseEvent ViewIngredientsFoodTypesRowChanged(Me, New ViewIngredientsFoodTypesRowChangeEvent(CType(e.Row,ViewIngredientsFoodTypesRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanging(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanging(e)
            If (Not (Me.ViewIngredientsFoodTypesRowChangingEvent) Is Nothing) Then
                RaiseEvent ViewIngredientsFoodTypesRowChanging(Me, New ViewIngredientsFoodTypesRowChangeEvent(CType(e.Row,ViewIngredientsFoodTypesRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleted(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleted(e)
            If (Not (Me.ViewIngredientsFoodTypesRowDeletedEvent) Is Nothing) Then
                RaiseEvent ViewIngredientsFoodTypesRowDeleted(Me, New ViewIngredientsFoodTypesRowChangeEvent(CType(e.Row,ViewIngredientsFoodTypesRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleting(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleting(e)
            If (Not (Me.ViewIngredientsFoodTypesRowDeletingEvent) Is Nothing) Then
                RaiseEvent ViewIngredientsFoodTypesRowDeleting(Me, New ViewIngredientsFoodTypesRowChangeEvent(CType(e.Row,ViewIngredientsFoodTypesRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub RemoveViewIngredientsFoodTypesRow(ByVal row As ViewIngredientsFoodTypesRow)
            Me.Rows.Remove(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Shared Function GetTypedTableSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType
            Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType
            Dim sequence As Global.System.Xml.Schema.XmlSchemaSequence = New Global.System.Xml.Schema.XmlSchemaSequence
            Dim ds As RecipeHolderDatabaseDataSet = New RecipeHolderDatabaseDataSet
            Dim any1 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any1.Namespace = "http://www.w3.org/2001/XMLSchema"
            any1.MinOccurs = New Decimal(0)
            any1.MaxOccurs = Decimal.MaxValue
            any1.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any1)
            Dim any2 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any2.Namespace = "urn:schemas-microsoft-com:xml-diffgram-v1"
            any2.MinOccurs = New Decimal(1)
            any2.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any2)
            Dim attribute1 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute1.Name = "namespace"
            attribute1.FixedValue = ds.Namespace
            type.Attributes.Add(attribute1)
            Dim attribute2 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute2.Name = "tableTypeName"
            attribute2.FixedValue = "ViewIngredientsFoodTypesDataTable"
            type.Attributes.Add(attribute2)
            type.Particle = sequence
            Dim dsSchema As Global.System.Xml.Schema.XmlSchema = ds.GetSchemaSerializable
            If xs.Contains(dsSchema.TargetNamespace) Then
                Dim s1 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Dim s2 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Try 
                    Dim schema As Global.System.Xml.Schema.XmlSchema = Nothing
                    dsSchema.Write(s1)
                    Dim schemas As Global.System.Collections.IEnumerator = xs.Schemas(dsSchema.TargetNamespace).GetEnumerator
                    Do While schemas.MoveNext
                        schema = CType(schemas.Current,Global.System.Xml.Schema.XmlSchema)
                        s2.SetLength(0)
                        schema.Write(s2)
                        If (s1.Length = s2.Length) Then
                            s1.Position = 0
                            s2.Position = 0
                            
                            Do While ((s1.Position <> s1.Length)  _
                                        AndAlso (s1.ReadByte = s2.ReadByte))
                                
                                
                            Loop
                            If (s1.Position = s1.Length) Then
                                Return type
                            End If
                        End If
                        
                    Loop
                Finally
                    If (Not (s1) Is Nothing) Then
                        s1.Close
                    End If
                    If (Not (s2) Is Nothing) Then
                        s2.Close
                    End If
                End Try
            End If
            xs.Add(dsSchema)
            Return type
        End Function
    End Class
    
    '''<summary>
    '''Represents strongly named DataRow class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Partial Public Class CoursesRow
        Inherits Global.System.Data.DataRow
        
        Private tableCourses As CoursesDataTable
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal rb As Global.System.Data.DataRowBuilder)
            MyBase.New(rb)
            Me.tableCourses = CType(Me.Table,CoursesDataTable)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property CourseTypeID() As Integer
            Get
                Return CType(Me(Me.tableCourses.CourseTypeIDColumn),Integer)
            End Get
            Set
                Me(Me.tableCourses.CourseTypeIDColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Name() As String
            Get
                Return CType(Me(Me.tableCourses.NameColumn),String)
            End Get
            Set
                Me(Me.tableCourses.NameColumn) = value
            End Set
        End Property
    End Class
    
    '''<summary>
    '''Represents strongly named DataRow class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Partial Public Class CuisineTypesRow
        Inherits Global.System.Data.DataRow
        
        Private tableCuisineTypes As CuisineTypesDataTable
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal rb As Global.System.Data.DataRowBuilder)
            MyBase.New(rb)
            Me.tableCuisineTypes = CType(Me.Table,CuisineTypesDataTable)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property CuisineTypeID() As Integer
            Get
                Return CType(Me(Me.tableCuisineTypes.CuisineTypeIDColumn),Integer)
            End Get
            Set
                Me(Me.tableCuisineTypes.CuisineTypeIDColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Name() As String
            Get
                Return CType(Me(Me.tableCuisineTypes.NameColumn),String)
            End Get
            Set
                Me(Me.tableCuisineTypes.NameColumn) = value
            End Set
        End Property
    End Class
    
    '''<summary>
    '''Represents strongly named DataRow class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Partial Public Class FoodTypesRow
        Inherits Global.System.Data.DataRow
        
        Private tableFoodTypes As FoodTypesDataTable
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal rb As Global.System.Data.DataRowBuilder)
            MyBase.New(rb)
            Me.tableFoodTypes = CType(Me.Table,FoodTypesDataTable)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property FoodTypeID() As Integer
            Get
                Return CType(Me(Me.tableFoodTypes.FoodTypeIDColumn),Integer)
            End Get
            Set
                Me(Me.tableFoodTypes.FoodTypeIDColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Name() As String
            Get
                Return CType(Me(Me.tableFoodTypes.NameColumn),String)
            End Get
            Set
                Me(Me.tableFoodTypes.NameColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function GetIngredientsRows() As IngredientsRow()
            If (Me.Table.ChildRelations("FK_Ingredients_FoodTypes") Is Nothing) Then
                Return New IngredientsRow(-1) {}
            Else
                Return CType(MyBase.GetChildRows(Me.Table.ChildRelations("FK_Ingredients_FoodTypes")),IngredientsRow())
            End If
        End Function
    End Class
    
    '''<summary>
    '''Represents strongly named DataRow class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Partial Public Class IngredientsRow
        Inherits Global.System.Data.DataRow
        
        Private tableIngredients As IngredientsDataTable
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal rb As Global.System.Data.DataRowBuilder)
            MyBase.New(rb)
            Me.tableIngredients = CType(Me.Table,IngredientsDataTable)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property IngredientID() As Integer
            Get
                Return CType(Me(Me.tableIngredients.IngredientIDColumn),Integer)
            End Get
            Set
                Me(Me.tableIngredients.IngredientIDColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property FoodTypeID() As Integer
            Get
                Return CType(Me(Me.tableIngredients.FoodTypeIDColumn),Integer)
            End Get
            Set
                Me(Me.tableIngredients.FoodTypeIDColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Name() As String
            Get
                Return CType(Me(Me.tableIngredients.NameColumn),String)
            End Get
            Set
                Me(Me.tableIngredients.NameColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property FoodTypesRow() As FoodTypesRow
            Get
                Return CType(Me.GetParentRow(Me.Table.ParentRelations("FK_Ingredients_FoodTypes")),FoodTypesRow)
            End Get
            Set
                Me.SetParentRow(value, Me.Table.ParentRelations("FK_Ingredients_FoodTypes"))
            End Set
        End Property
    End Class
    
    '''<summary>
    '''Represents strongly named DataRow class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Partial Public Class NutritionDetailsRow
        Inherits Global.System.Data.DataRow
        
        Private tableNutritionDetails As NutritionDetailsDataTable
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal rb As Global.System.Data.DataRowBuilder)
            MyBase.New(rb)
            Me.tableNutritionDetails = CType(Me.Table,NutritionDetailsDataTable)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property NutritionID() As Integer
            Get
                Return CType(Me(Me.tableNutritionDetails.NutritionIDColumn),Integer)
            End Get
            Set
                Me(Me.tableNutritionDetails.NutritionIDColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property RecipeID() As Integer
            Get
                Return CType(Me(Me.tableNutritionDetails.RecipeIDColumn),Integer)
            End Get
            Set
                Me(Me.tableNutritionDetails.RecipeIDColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Calories() As Double
            Get
                Try 
                    Return CType(Me(Me.tableNutritionDetails.CaloriesColumn),Double)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("The value for column 'Calories' in table 'NutritionDetails' is DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableNutritionDetails.CaloriesColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property CaloriesFromFat() As Double
            Get
                Try 
                    Return CType(Me(Me.tableNutritionDetails.CaloriesFromFatColumn),Double)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("The value for column 'CaloriesFromFat' in table 'NutritionDetails' is DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableNutritionDetails.CaloriesFromFatColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property TotalFat() As Double
            Get
                Try 
                    Return CType(Me(Me.tableNutritionDetails.TotalFatColumn),Double)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("The value for column 'TotalFat' in table 'NutritionDetails' is DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableNutritionDetails.TotalFatColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property SaturatedFat() As Double
            Get
                Try 
                    Return CType(Me(Me.tableNutritionDetails.SaturatedFatColumn),Double)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("The value for column 'SaturatedFat' in table 'NutritionDetails' is DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableNutritionDetails.SaturatedFatColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property TransFat() As Double
            Get
                Try 
                    Return CType(Me(Me.tableNutritionDetails.TransFatColumn),Double)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("The value for column 'TransFat' in table 'NutritionDetails' is DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableNutritionDetails.TransFatColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Cholesteral() As Double
            Get
                Try 
                    Return CType(Me(Me.tableNutritionDetails.CholesteralColumn),Double)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("The value for column 'Cholesteral' in table 'NutritionDetails' is DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableNutritionDetails.CholesteralColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Sodium() As Double
            Get
                Try 
                    Return CType(Me(Me.tableNutritionDetails.SodiumColumn),Double)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("The value for column 'Sodium' in table 'NutritionDetails' is DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableNutritionDetails.SodiumColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property TotalCarbohydrates() As Double
            Get
                Try 
                    Return CType(Me(Me.tableNutritionDetails.TotalCarbohydratesColumn),Double)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("The value for column 'TotalCarbohydrates' in table 'NutritionDetails' is DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableNutritionDetails.TotalCarbohydratesColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property DietaryFiber() As Double
            Get
                Try 
                    Return CType(Me(Me.tableNutritionDetails.DietaryFiberColumn),Double)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("The value for column 'DietaryFiber' in table 'NutritionDetails' is DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableNutritionDetails.DietaryFiberColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Sugar() As Double
            Get
                Try 
                    Return CType(Me(Me.tableNutritionDetails.SugarColumn),Double)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("The value for column 'Sugar' in table 'NutritionDetails' is DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableNutritionDetails.SugarColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Protein() As Double
            Get
                Try 
                    Return CType(Me(Me.tableNutritionDetails.ProteinColumn),Double)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("The value for column 'Protein' in table 'NutritionDetails' is DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableNutritionDetails.ProteinColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property VitaminA() As Integer
            Get
                Try 
                    Return CType(Me(Me.tableNutritionDetails.VitaminAColumn),Integer)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("The value for column 'VitaminA' in table 'NutritionDetails' is DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableNutritionDetails.VitaminAColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property VitaminC() As Integer
            Get
                Try 
                    Return CType(Me(Me.tableNutritionDetails.VitaminCColumn),Integer)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("The value for column 'VitaminC' in table 'NutritionDetails' is DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableNutritionDetails.VitaminCColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Calcium() As Integer
            Get
                Try 
                    Return CType(Me(Me.tableNutritionDetails.CalciumColumn),Integer)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("The value for column 'Calcium' in table 'NutritionDetails' is DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableNutritionDetails.CalciumColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Iron() As Integer
            Get
                Try 
                    Return CType(Me(Me.tableNutritionDetails.IronColumn),Integer)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("The value for column 'Iron' in table 'NutritionDetails' is DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableNutritionDetails.IronColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property RetrieveRecipeTableRow() As RetrieveRecipeTableRow
            Get
                Return CType(Me.GetParentRow(Me.Table.ParentRelations("RetrieveRecipeTable_NutritionDetails")),RetrieveRecipeTableRow)
            End Get
            Set
                Me.SetParentRow(value, Me.Table.ParentRelations("RetrieveRecipeTable_NutritionDetails"))
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property RecipesRow() As RecipesRow
            Get
                Return CType(Me.GetParentRow(Me.Table.ParentRelations("FK_NutritionDetails_Recipes")),RecipesRow)
            End Get
            Set
                Me.SetParentRow(value, Me.Table.ParentRelations("FK_NutritionDetails_Recipes"))
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsCaloriesNull() As Boolean
            Return Me.IsNull(Me.tableNutritionDetails.CaloriesColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetCaloriesNull()
            Me(Me.tableNutritionDetails.CaloriesColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsCaloriesFromFatNull() As Boolean
            Return Me.IsNull(Me.tableNutritionDetails.CaloriesFromFatColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetCaloriesFromFatNull()
            Me(Me.tableNutritionDetails.CaloriesFromFatColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsTotalFatNull() As Boolean
            Return Me.IsNull(Me.tableNutritionDetails.TotalFatColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetTotalFatNull()
            Me(Me.tableNutritionDetails.TotalFatColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsSaturatedFatNull() As Boolean
            Return Me.IsNull(Me.tableNutritionDetails.SaturatedFatColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetSaturatedFatNull()
            Me(Me.tableNutritionDetails.SaturatedFatColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsTransFatNull() As Boolean
            Return Me.IsNull(Me.tableNutritionDetails.TransFatColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetTransFatNull()
            Me(Me.tableNutritionDetails.TransFatColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsCholesteralNull() As Boolean
            Return Me.IsNull(Me.tableNutritionDetails.CholesteralColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetCholesteralNull()
            Me(Me.tableNutritionDetails.CholesteralColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsSodiumNull() As Boolean
            Return Me.IsNull(Me.tableNutritionDetails.SodiumColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetSodiumNull()
            Me(Me.tableNutritionDetails.SodiumColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsTotalCarbohydratesNull() As Boolean
            Return Me.IsNull(Me.tableNutritionDetails.TotalCarbohydratesColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetTotalCarbohydratesNull()
            Me(Me.tableNutritionDetails.TotalCarbohydratesColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsDietaryFiberNull() As Boolean
            Return Me.IsNull(Me.tableNutritionDetails.DietaryFiberColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetDietaryFiberNull()
            Me(Me.tableNutritionDetails.DietaryFiberColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsSugarNull() As Boolean
            Return Me.IsNull(Me.tableNutritionDetails.SugarColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetSugarNull()
            Me(Me.tableNutritionDetails.SugarColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsProteinNull() As Boolean
            Return Me.IsNull(Me.tableNutritionDetails.ProteinColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetProteinNull()
            Me(Me.tableNutritionDetails.ProteinColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsVitaminANull() As Boolean
            Return Me.IsNull(Me.tableNutritionDetails.VitaminAColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetVitaminANull()
            Me(Me.tableNutritionDetails.VitaminAColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsVitaminCNull() As Boolean
            Return Me.IsNull(Me.tableNutritionDetails.VitaminCColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetVitaminCNull()
            Me(Me.tableNutritionDetails.VitaminCColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsCalciumNull() As Boolean
            Return Me.IsNull(Me.tableNutritionDetails.CalciumColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetCalciumNull()
            Me(Me.tableNutritionDetails.CalciumColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsIronNull() As Boolean
            Return Me.IsNull(Me.tableNutritionDetails.IronColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetIronNull()
            Me(Me.tableNutritionDetails.IronColumn) = Global.System.Convert.DBNull
        End Sub
    End Class
    
    '''<summary>
    '''Represents strongly named DataRow class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Partial Public Class RecipeIngredientRow
        Inherits Global.System.Data.DataRow
        
        Private tableRecipeIngredient As RecipeIngredientDataTable
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal rb As Global.System.Data.DataRowBuilder)
            MyBase.New(rb)
            Me.tableRecipeIngredient = CType(Me.Table,RecipeIngredientDataTable)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property RecipeIngredientID() As Integer
            Get
                Return CType(Me(Me.tableRecipeIngredient.RecipeIngredientIDColumn),Integer)
            End Get
            Set
                Me(Me.tableRecipeIngredient.RecipeIngredientIDColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property RecipeID() As Integer
            Get
                Return CType(Me(Me.tableRecipeIngredient.RecipeIDColumn),Integer)
            End Get
            Set
                Me(Me.tableRecipeIngredient.RecipeIDColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property IngredientID() As Integer
            Get
                Return CType(Me(Me.tableRecipeIngredient.IngredientIDColumn),Integer)
            End Get
            Set
                Me(Me.tableRecipeIngredient.IngredientIDColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property UnitMeasurementID() As Integer
            Get
                Return CType(Me(Me.tableRecipeIngredient.UnitMeasurementIDColumn),Integer)
            End Get
            Set
                Me(Me.tableRecipeIngredient.UnitMeasurementIDColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property IngredientAmount() As Decimal
            Get
                Return CType(Me(Me.tableRecipeIngredient.IngredientAmountColumn),Decimal)
            End Get
            Set
                Me(Me.tableRecipeIngredient.IngredientAmountColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property RecipesRow() As RecipesRow
            Get
                Return CType(Me.GetParentRow(Me.Table.ParentRelations("FK_RecipeIngredient_Recipes")),RecipesRow)
            End Get
            Set
                Me.SetParentRow(value, Me.Table.ParentRelations("FK_RecipeIngredient_Recipes"))
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property UnitMeasurementsRow() As UnitMeasurementsRow
            Get
                Return CType(Me.GetParentRow(Me.Table.ParentRelations("FK_RecipeIngredient_UnitMeasurements")),UnitMeasurementsRow)
            End Get
            Set
                Me.SetParentRow(value, Me.Table.ParentRelations("FK_RecipeIngredient_UnitMeasurements"))
            End Set
        End Property
    End Class
    
    '''<summary>
    '''Represents strongly named DataRow class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Partial Public Class RecipesRow
        Inherits Global.System.Data.DataRow
        
        Private tableRecipes As RecipesDataTable
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal rb As Global.System.Data.DataRowBuilder)
            MyBase.New(rb)
            Me.tableRecipes = CType(Me.Table,RecipesDataTable)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property PreparationTime() As Integer
            Get
                Try 
                    Return CType(Me(Me.tableRecipes.PreparationTimeColumn),Integer)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("The value for column 'PreparationTime' in table 'Recipes' is DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableRecipes.PreparationTimeColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Directions() As String
            Get
                Return CType(Me(Me.tableRecipes.DirectionsColumn),String)
            End Get
            Set
                Me(Me.tableRecipes.DirectionsColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property CookTime() As Integer
            Get
                Return CType(Me(Me.tableRecipes.CookTimeColumn),Integer)
            End Get
            Set
                Me(Me.tableRecipes.CookTimeColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Photo() As Byte()
            Get
                Try 
                    Return CType(Me(Me.tableRecipes.PhotoColumn),Byte())
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("The value for column 'Photo' in table 'Recipes' is DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableRecipes.PhotoColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Temperature() As Integer
            Get
                Return CType(Me(Me.tableRecipes.TemperatureColumn),Integer)
            End Get
            Set
                Me(Me.tableRecipes.TemperatureColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property RecipeID() As Integer
            Get
                Return CType(Me(Me.tableRecipes.RecipeIDColumn),Integer)
            End Get
            Set
                Me(Me.tableRecipes.RecipeIDColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property CourseTypeID() As Integer
            Get
                Return CType(Me(Me.tableRecipes.CourseTypeIDColumn),Integer)
            End Get
            Set
                Me(Me.tableRecipes.CourseTypeIDColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property CuisineTypeID() As Integer
            Get
                Return CType(Me(Me.tableRecipes.CuisineTypeIDColumn),Integer)
            End Get
            Set
                Me(Me.tableRecipes.CuisineTypeIDColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Name() As String
            Get
                Return CType(Me(Me.tableRecipes.NameColumn),String)
            End Get
            Set
                Me(Me.tableRecipes.NameColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property AccountId() As Integer
            Get
                Return CType(Me(Me.tableRecipes.AccountIdColumn),Integer)
            End Get
            Set
                Me(Me.tableRecipes.AccountIdColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property AccountsRow() As AccountsRow
            Get
                Return CType(Me.GetParentRow(Me.Table.ParentRelations("FK_Recipes_Accounts")),AccountsRow)
            End Get
            Set
                Me.SetParentRow(value, Me.Table.ParentRelations("FK_Recipes_Accounts"))
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsPreparationTimeNull() As Boolean
            Return Me.IsNull(Me.tableRecipes.PreparationTimeColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetPreparationTimeNull()
            Me(Me.tableRecipes.PreparationTimeColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsPhotoNull() As Boolean
            Return Me.IsNull(Me.tableRecipes.PhotoColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetPhotoNull()
            Me(Me.tableRecipes.PhotoColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function GetRecipeIngredientRows() As RecipeIngredientRow()
            If (Me.Table.ChildRelations("FK_RecipeIngredient_Recipes") Is Nothing) Then
                Return New RecipeIngredientRow(-1) {}
            Else
                Return CType(MyBase.GetChildRows(Me.Table.ChildRelations("FK_RecipeIngredient_Recipes")),RecipeIngredientRow())
            End If
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function GetNutritionDetailsRows() As NutritionDetailsRow()
            If (Me.Table.ChildRelations("FK_NutritionDetails_Recipes") Is Nothing) Then
                Return New NutritionDetailsRow(-1) {}
            Else
                Return CType(MyBase.GetChildRows(Me.Table.ChildRelations("FK_NutritionDetails_Recipes")),NutritionDetailsRow())
            End If
        End Function
    End Class
    
    '''<summary>
    '''Represents strongly named DataRow class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Partial Public Class UnitMeasurementsRow
        Inherits Global.System.Data.DataRow
        
        Private tableUnitMeasurements As UnitMeasurementsDataTable
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal rb As Global.System.Data.DataRowBuilder)
            MyBase.New(rb)
            Me.tableUnitMeasurements = CType(Me.Table,UnitMeasurementsDataTable)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property UnitMeasurementID() As Integer
            Get
                Return CType(Me(Me.tableUnitMeasurements.UnitMeasurementIDColumn),Integer)
            End Get
            Set
                Me(Me.tableUnitMeasurements.UnitMeasurementIDColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Name() As String
            Get
                Return CType(Me(Me.tableUnitMeasurements.NameColumn),String)
            End Get
            Set
                Me(Me.tableUnitMeasurements.NameColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function GetRecipeIngredientRows() As RecipeIngredientRow()
            If (Me.Table.ChildRelations("FK_RecipeIngredient_UnitMeasurements") Is Nothing) Then
                Return New RecipeIngredientRow(-1) {}
            Else
                Return CType(MyBase.GetChildRows(Me.Table.ChildRelations("FK_RecipeIngredient_UnitMeasurements")),RecipeIngredientRow())
            End If
        End Function
    End Class
    
    '''<summary>
    '''Represents strongly named DataRow class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Partial Public Class AccountsRow
        Inherits Global.System.Data.DataRow
        
        Private tableAccounts As AccountsDataTable
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal rb As Global.System.Data.DataRowBuilder)
            MyBase.New(rb)
            Me.tableAccounts = CType(Me.Table,AccountsDataTable)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property AccountID() As Integer
            Get
                Return CType(Me(Me.tableAccounts.AccountIDColumn),Integer)
            End Get
            Set
                Me(Me.tableAccounts.AccountIDColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property FirstName() As String
            Get
                Return CType(Me(Me.tableAccounts.FirstNameColumn),String)
            End Get
            Set
                Me(Me.tableAccounts.FirstNameColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property LastName() As String
            Get
                Return CType(Me(Me.tableAccounts.LastNameColumn),String)
            End Get
            Set
                Me(Me.tableAccounts.LastNameColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property UserName() As String
            Get
                Try 
                    Return CType(Me(Me.tableAccounts.UserNameColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("The value for column 'UserName' in table 'Accounts' is DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableAccounts.UserNameColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Password() As Byte()
            Get
                Try 
                    Return CType(Me(Me.tableAccounts.PasswordColumn),Byte())
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("The value for column 'Password' in table 'Accounts' is DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableAccounts.PasswordColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property isProtected() As Boolean
            Get
                Return CType(Me(Me.tableAccounts.isProtectedColumn),Boolean)
            End Get
            Set
                Me(Me.tableAccounts.isProtectedColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property EMail() As String
            Get
                Try 
                    Return CType(Me(Me.tableAccounts.EMailColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("The value for column 'EMail' in table 'Accounts' is DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableAccounts.EMailColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property DateCreated() As Date
            Get
                Return CType(Me(Me.tableAccounts.DateCreatedColumn),Date)
            End Get
            Set
                Me(Me.tableAccounts.DateCreatedColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsUserNameNull() As Boolean
            Return Me.IsNull(Me.tableAccounts.UserNameColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetUserNameNull()
            Me(Me.tableAccounts.UserNameColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsPasswordNull() As Boolean
            Return Me.IsNull(Me.tableAccounts.PasswordColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetPasswordNull()
            Me(Me.tableAccounts.PasswordColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsEMailNull() As Boolean
            Return Me.IsNull(Me.tableAccounts.EMailColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetEMailNull()
            Me(Me.tableAccounts.EMailColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function GetRecipesRows() As RecipesRow()
            If (Me.Table.ChildRelations("FK_Recipes_Accounts") Is Nothing) Then
                Return New RecipesRow(-1) {}
            Else
                Return CType(MyBase.GetChildRows(Me.Table.ChildRelations("FK_Recipes_Accounts")),RecipesRow())
            End If
        End Function
    End Class
    
    '''<summary>
    '''Represents strongly named DataRow class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Partial Public Class RetrieveRecipeTableRow
        Inherits Global.System.Data.DataRow
        
        Private tableRetrieveRecipeTable As RetrieveRecipeTableDataTable
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal rb As Global.System.Data.DataRowBuilder)
            MyBase.New(rb)
            Me.tableRetrieveRecipeTable = CType(Me.Table,RetrieveRecipeTableDataTable)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property AccountId() As Integer
            Get
                Return CType(Me(Me.tableRetrieveRecipeTable.AccountIdColumn),Integer)
            End Get
            Set
                Me(Me.tableRetrieveRecipeTable.AccountIdColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property RecipeID() As Integer
            Get
                Return CType(Me(Me.tableRetrieveRecipeTable.RecipeIDColumn),Integer)
            End Get
            Set
                Me(Me.tableRetrieveRecipeTable.RecipeIDColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property RecipeName() As String
            Get
                Return CType(Me(Me.tableRetrieveRecipeTable.RecipeNameColumn),String)
            End Get
            Set
                Me(Me.tableRetrieveRecipeTable.RecipeNameColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property PreparationTime() As Integer
            Get
                Try 
                    Return CType(Me(Me.tableRetrieveRecipeTable.PreparationTimeColumn),Integer)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("The value for column 'PreparationTime' in table 'RetrieveRecipeTable' is DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableRetrieveRecipeTable.PreparationTimeColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Directions() As String
            Get
                Return CType(Me(Me.tableRetrieveRecipeTable.DirectionsColumn),String)
            End Get
            Set
                Me(Me.tableRetrieveRecipeTable.DirectionsColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property CookTime() As Integer
            Get
                Return CType(Me(Me.tableRetrieveRecipeTable.CookTimeColumn),Integer)
            End Get
            Set
                Me(Me.tableRetrieveRecipeTable.CookTimeColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Temperature() As Integer
            Get
                Return CType(Me(Me.tableRetrieveRecipeTable.TemperatureColumn),Integer)
            End Get
            Set
                Me(Me.tableRetrieveRecipeTable.TemperatureColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property CourseTypeName() As String
            Get
                Return CType(Me(Me.tableRetrieveRecipeTable.CourseTypeNameColumn),String)
            End Get
            Set
                Me(Me.tableRetrieveRecipeTable.CourseTypeNameColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property CuisineTypeName() As String
            Get
                Return CType(Me(Me.tableRetrieveRecipeTable.CuisineTypeNameColumn),String)
            End Get
            Set
                Me(Me.tableRetrieveRecipeTable.CuisineTypeNameColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsPreparationTimeNull() As Boolean
            Return Me.IsNull(Me.tableRetrieveRecipeTable.PreparationTimeColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetPreparationTimeNull()
            Me(Me.tableRetrieveRecipeTable.PreparationTimeColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function GetNutritionDetailsRows() As NutritionDetailsRow()
            If (Me.Table.ChildRelations("RetrieveRecipeTable_NutritionDetails") Is Nothing) Then
                Return New NutritionDetailsRow(-1) {}
            Else
                Return CType(MyBase.GetChildRows(Me.Table.ChildRelations("RetrieveRecipeTable_NutritionDetails")),NutritionDetailsRow())
            End If
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function GetRetrieveRecipeIngredientTableRows() As RetrieveRecipeIngredientTableRow()
            If (Me.Table.ChildRelations("RetrieveRecipeTable_RetrieveRecipeIngredientTable") Is Nothing) Then
                Return New RetrieveRecipeIngredientTableRow(-1) {}
            Else
                Return CType(MyBase.GetChildRows(Me.Table.ChildRelations("RetrieveRecipeTable_RetrieveRecipeIngredientTable")),RetrieveRecipeIngredientTableRow())
            End If
        End Function
    End Class
    
    '''<summary>
    '''Represents strongly named DataRow class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Partial Public Class RetrieveRecipeIngredientTableRow
        Inherits Global.System.Data.DataRow
        
        Private tableRetrieveRecipeIngredientTable As RetrieveRecipeIngredientTableDataTable
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal rb As Global.System.Data.DataRowBuilder)
            MyBase.New(rb)
            Me.tableRetrieveRecipeIngredientTable = CType(Me.Table,RetrieveRecipeIngredientTableDataTable)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property RecipeId() As Integer
            Get
                Return CType(Me(Me.tableRetrieveRecipeIngredientTable.RecipeIdColumn),Integer)
            End Get
            Set
                Me(Me.tableRetrieveRecipeIngredientTable.RecipeIdColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property IngredientName() As String
            Get
                Return CType(Me(Me.tableRetrieveRecipeIngredientTable.IngredientNameColumn),String)
            End Get
            Set
                Me(Me.tableRetrieveRecipeIngredientTable.IngredientNameColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property IngredientAmount() As Decimal
            Get
                Return CType(Me(Me.tableRetrieveRecipeIngredientTable.IngredientAmountColumn),Decimal)
            End Get
            Set
                Me(Me.tableRetrieveRecipeIngredientTable.IngredientAmountColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property UnitMeasurementName() As String
            Get
                Return CType(Me(Me.tableRetrieveRecipeIngredientTable.UnitMeasurementNameColumn),String)
            End Get
            Set
                Me(Me.tableRetrieveRecipeIngredientTable.UnitMeasurementNameColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property FoodTypeName() As String
            Get
                Return CType(Me(Me.tableRetrieveRecipeIngredientTable.FoodTypeNameColumn),String)
            End Get
            Set
                Me(Me.tableRetrieveRecipeIngredientTable.FoodTypeNameColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property RetrieveRecipeTableRow() As RetrieveRecipeTableRow
            Get
                Return CType(Me.GetParentRow(Me.Table.ParentRelations("RetrieveRecipeTable_RetrieveRecipeIngredientTable")),RetrieveRecipeTableRow)
            End Get
            Set
                Me.SetParentRow(value, Me.Table.ParentRelations("RetrieveRecipeTable_RetrieveRecipeIngredientTable"))
            End Set
        End Property
    End Class
    
    '''<summary>
    '''Represents strongly named DataRow class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Partial Public Class ViewIngredientsFoodTypesRow
        Inherits Global.System.Data.DataRow
        
        Private tableViewIngredientsFoodTypes As ViewIngredientsFoodTypesDataTable
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal rb As Global.System.Data.DataRowBuilder)
            MyBase.New(rb)
            Me.tableViewIngredientsFoodTypes = CType(Me.Table,ViewIngredientsFoodTypesDataTable)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property IngredientName() As String
            Get
                Return CType(Me(Me.tableViewIngredientsFoodTypes.IngredientNameColumn),String)
            End Get
            Set
                Me(Me.tableViewIngredientsFoodTypes.IngredientNameColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property FoodTypeName() As String
            Get
                Return CType(Me(Me.tableViewIngredientsFoodTypes.FoodTypeNameColumn),String)
            End Get
            Set
                Me(Me.tableViewIngredientsFoodTypes.FoodTypeNameColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property FoodTypeID() As Integer
            Get
                Return CType(Me(Me.tableViewIngredientsFoodTypes.FoodTypeIDColumn),Integer)
            End Get
            Set
                Me(Me.tableViewIngredientsFoodTypes.FoodTypeIDColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property IngredientID() As Integer
            Get
                Return CType(Me(Me.tableViewIngredientsFoodTypes.IngredientIDColumn),Integer)
            End Get
            Set
                Me(Me.tableViewIngredientsFoodTypes.IngredientIDColumn) = value
            End Set
        End Property
    End Class
    
    '''<summary>
    '''Row event argument class
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Public Class CoursesRowChangeEvent
        Inherits Global.System.EventArgs
        
        Private eventRow As CoursesRow
        
        Private eventAction As Global.System.Data.DataRowAction
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New(ByVal row As CoursesRow, ByVal action As Global.System.Data.DataRowAction)
            MyBase.New
            Me.eventRow = row
            Me.eventAction = action
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Row() As CoursesRow
            Get
                Return Me.eventRow
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Action() As Global.System.Data.DataRowAction
            Get
                Return Me.eventAction
            End Get
        End Property
    End Class
    
    '''<summary>
    '''Row event argument class
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Public Class CuisineTypesRowChangeEvent
        Inherits Global.System.EventArgs
        
        Private eventRow As CuisineTypesRow
        
        Private eventAction As Global.System.Data.DataRowAction
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New(ByVal row As CuisineTypesRow, ByVal action As Global.System.Data.DataRowAction)
            MyBase.New
            Me.eventRow = row
            Me.eventAction = action
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Row() As CuisineTypesRow
            Get
                Return Me.eventRow
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Action() As Global.System.Data.DataRowAction
            Get
                Return Me.eventAction
            End Get
        End Property
    End Class
    
    '''<summary>
    '''Row event argument class
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Public Class FoodTypesRowChangeEvent
        Inherits Global.System.EventArgs
        
        Private eventRow As FoodTypesRow
        
        Private eventAction As Global.System.Data.DataRowAction
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New(ByVal row As FoodTypesRow, ByVal action As Global.System.Data.DataRowAction)
            MyBase.New
            Me.eventRow = row
            Me.eventAction = action
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Row() As FoodTypesRow
            Get
                Return Me.eventRow
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Action() As Global.System.Data.DataRowAction
            Get
                Return Me.eventAction
            End Get
        End Property
    End Class
    
    '''<summary>
    '''Row event argument class
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Public Class IngredientsRowChangeEvent
        Inherits Global.System.EventArgs
        
        Private eventRow As IngredientsRow
        
        Private eventAction As Global.System.Data.DataRowAction
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New(ByVal row As IngredientsRow, ByVal action As Global.System.Data.DataRowAction)
            MyBase.New
            Me.eventRow = row
            Me.eventAction = action
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Row() As IngredientsRow
            Get
                Return Me.eventRow
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Action() As Global.System.Data.DataRowAction
            Get
                Return Me.eventAction
            End Get
        End Property
    End Class
    
    '''<summary>
    '''Row event argument class
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Public Class NutritionDetailsRowChangeEvent
        Inherits Global.System.EventArgs
        
        Private eventRow As NutritionDetailsRow
        
        Private eventAction As Global.System.Data.DataRowAction
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New(ByVal row As NutritionDetailsRow, ByVal action As Global.System.Data.DataRowAction)
            MyBase.New
            Me.eventRow = row
            Me.eventAction = action
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Row() As NutritionDetailsRow
            Get
                Return Me.eventRow
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Action() As Global.System.Data.DataRowAction
            Get
                Return Me.eventAction
            End Get
        End Property
    End Class
    
    '''<summary>
    '''Row event argument class
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Public Class RecipeIngredientRowChangeEvent
        Inherits Global.System.EventArgs
        
        Private eventRow As RecipeIngredientRow
        
        Private eventAction As Global.System.Data.DataRowAction
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New(ByVal row As RecipeIngredientRow, ByVal action As Global.System.Data.DataRowAction)
            MyBase.New
            Me.eventRow = row
            Me.eventAction = action
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Row() As RecipeIngredientRow
            Get
                Return Me.eventRow
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Action() As Global.System.Data.DataRowAction
            Get
                Return Me.eventAction
            End Get
        End Property
    End Class
    
    '''<summary>
    '''Row event argument class
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Public Class RecipesRowChangeEvent
        Inherits Global.System.EventArgs
        
        Private eventRow As RecipesRow
        
        Private eventAction As Global.System.Data.DataRowAction
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New(ByVal row As RecipesRow, ByVal action As Global.System.Data.DataRowAction)
            MyBase.New
            Me.eventRow = row
            Me.eventAction = action
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Row() As RecipesRow
            Get
                Return Me.eventRow
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Action() As Global.System.Data.DataRowAction
            Get
                Return Me.eventAction
            End Get
        End Property
    End Class
    
    '''<summary>
    '''Row event argument class
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Public Class UnitMeasurementsRowChangeEvent
        Inherits Global.System.EventArgs
        
        Private eventRow As UnitMeasurementsRow
        
        Private eventAction As Global.System.Data.DataRowAction
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New(ByVal row As UnitMeasurementsRow, ByVal action As Global.System.Data.DataRowAction)
            MyBase.New
            Me.eventRow = row
            Me.eventAction = action
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Row() As UnitMeasurementsRow
            Get
                Return Me.eventRow
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Action() As Global.System.Data.DataRowAction
            Get
                Return Me.eventAction
            End Get
        End Property
    End Class
    
    '''<summary>
    '''Row event argument class
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Public Class AccountsRowChangeEvent
        Inherits Global.System.EventArgs
        
        Private eventRow As AccountsRow
        
        Private eventAction As Global.System.Data.DataRowAction
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New(ByVal row As AccountsRow, ByVal action As Global.System.Data.DataRowAction)
            MyBase.New
            Me.eventRow = row
            Me.eventAction = action
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Row() As AccountsRow
            Get
                Return Me.eventRow
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Action() As Global.System.Data.DataRowAction
            Get
                Return Me.eventAction
            End Get
        End Property
    End Class
    
    '''<summary>
    '''Row event argument class
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Public Class RetrieveRecipeTableRowChangeEvent
        Inherits Global.System.EventArgs
        
        Private eventRow As RetrieveRecipeTableRow
        
        Private eventAction As Global.System.Data.DataRowAction
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New(ByVal row As RetrieveRecipeTableRow, ByVal action As Global.System.Data.DataRowAction)
            MyBase.New
            Me.eventRow = row
            Me.eventAction = action
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Row() As RetrieveRecipeTableRow
            Get
                Return Me.eventRow
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Action() As Global.System.Data.DataRowAction
            Get
                Return Me.eventAction
            End Get
        End Property
    End Class
    
    '''<summary>
    '''Row event argument class
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Public Class RetrieveRecipeIngredientTableRowChangeEvent
        Inherits Global.System.EventArgs
        
        Private eventRow As RetrieveRecipeIngredientTableRow
        
        Private eventAction As Global.System.Data.DataRowAction
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New(ByVal row As RetrieveRecipeIngredientTableRow, ByVal action As Global.System.Data.DataRowAction)
            MyBase.New
            Me.eventRow = row
            Me.eventAction = action
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Row() As RetrieveRecipeIngredientTableRow
            Get
                Return Me.eventRow
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Action() As Global.System.Data.DataRowAction
            Get
                Return Me.eventAction
            End Get
        End Property
    End Class
    
    '''<summary>
    '''Row event argument class
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Public Class ViewIngredientsFoodTypesRowChangeEvent
        Inherits Global.System.EventArgs
        
        Private eventRow As ViewIngredientsFoodTypesRow
        
        Private eventAction As Global.System.Data.DataRowAction
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New(ByVal row As ViewIngredientsFoodTypesRow, ByVal action As Global.System.Data.DataRowAction)
            MyBase.New
            Me.eventRow = row
            Me.eventAction = action
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Row() As ViewIngredientsFoodTypesRow
            Get
                Return Me.eventRow
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Action() As Global.System.Data.DataRowAction
            Get
                Return Me.eventAction
            End Get
        End Property
    End Class
End Class
