Files
tsl5/tsl5Model.Designer.vb
2026-05-14 09:52:12 +02:00

1091 lines
38 KiB
VB.net

'------------------------------------------------------------------------------
' <auto-generated>
' Este código se generó a partir de una plantilla.
'
' Los cambios manuales en este archivo pueden causar un comportamiento inesperado de la aplicación.
' Los cambios manuales en este archivo se sobrescribirán si se regenera el código.
' </auto-generated>
'------------------------------------------------------------------------------
Imports System
Imports System.ComponentModel
Imports System.Data.EntityClient
Imports System.Data.Objects
Imports System.Data.Objects.DataClasses
Imports System.Linq
Imports System.Runtime.Serialization
Imports System.Xml.Serialization
<Assembly: EdmSchemaAttribute("769b8197-5328-4aa9-890c-08b089e3327f")>
#Region "Metadatos de relaciones en EDM"
<Assembly: EdmRelationshipAttribute("tsl5Model", "excepcionesmenus_menus", "menus", System.Data.Metadata.Edm.RelationshipMultiplicity.ZeroOrOne, GetType(menus), "excepcionesmenus", System.Data.Metadata.Edm.RelationshipMultiplicity.Many, GetType(excepcionesmenus), True)>
<Assembly: EdmRelationshipAttribute("tsl5Model", "excepcionesmenus_usuarios", "usuarios", System.Data.Metadata.Edm.RelationshipMultiplicity.ZeroOrOne, GetType(usuarios), "excepcionesmenus", System.Data.Metadata.Edm.RelationshipMultiplicity.Many, GetType(excepcionesmenus), True)>
<Assembly: EdmRelationshipAttribute("tsl5Model", "Usuarios_Grupobd", "grupobd", System.Data.Metadata.Edm.RelationshipMultiplicity.One, GetType(grupobd), "usuarios", System.Data.Metadata.Edm.RelationshipMultiplicity.Many, GetType(usuarios), True)>
<Assembly: EdmRelationshipAttribute("tsl5Model", "Menus_GruposMenus", "gruposmenus", System.Data.Metadata.Edm.RelationshipMultiplicity.ZeroOrOne, GetType(gruposmenus), "menus", System.Data.Metadata.Edm.RelationshipMultiplicity.Many, GetType(menus), True)>
<Assembly: EdmRelationshipAttribute("tsl5Model", "usuarios_gruposmenus", "gruposmenus", System.Data.Metadata.Edm.RelationshipMultiplicity.ZeroOrOne, GetType(gruposmenus), "usuarios", System.Data.Metadata.Edm.RelationshipMultiplicity.Many, GetType(usuarios), True)>
#End Region
#Region "Contextos"
''' <summary>
''' No hay documentación de metadatos disponible.
''' </summary>
Public Partial Class tsl5Entities
Inherits ObjectContext
#Region "Constructores"
''' <summary>
''' Inicializa un nuevo objeto tsl5Entities usando la cadena de conexión encontrada en la sección 'tsl5Entities' del archivo de configuración de la aplicación.
''' </summary>
Public Sub New()
MyBase.New("name=tsl5Entities", "tsl5Entities")
MyBase.ContextOptions.LazyLoadingEnabled = true
OnContextCreated()
End Sub
''' <summary>
''' Inicializar un nuevo objeto tsl5Entities.
''' </summary>
Public Sub New(ByVal connectionString As String)
MyBase.New(connectionString, "tsl5Entities")
MyBase.ContextOptions.LazyLoadingEnabled = true
OnContextCreated()
End Sub
''' <summary>
''' Inicializar un nuevo objeto tsl5Entities.
''' </summary>
Public Sub New(ByVal connection As EntityConnection)
MyBase.New(connection, "tsl5Entities")
MyBase.ContextOptions.LazyLoadingEnabled = true
OnContextCreated()
End Sub
#End Region
#Region "Métodos parciales"
Partial Private Sub OnContextCreated()
End Sub
#End Region
#Region "Propiedades de ObjectSet"
''' <summary>
''' No hay documentación de metadatos disponible.
''' </summary>
Public ReadOnly Property excepcionesmenus() As ObjectSet(Of excepcionesmenus)
Get
If (_excepcionesmenus Is Nothing) Then
_excepcionesmenus = MyBase.CreateObjectSet(Of excepcionesmenus)("excepcionesmenus")
End If
Return _excepcionesmenus
End Get
End Property
Private _excepcionesmenus As ObjectSet(Of excepcionesmenus)
''' <summary>
''' No hay documentación de metadatos disponible.
''' </summary>
Public ReadOnly Property grupobd() As ObjectSet(Of grupobd)
Get
If (_grupobd Is Nothing) Then
_grupobd = MyBase.CreateObjectSet(Of grupobd)("grupobd")
End If
Return _grupobd
End Get
End Property
Private _grupobd As ObjectSet(Of grupobd)
''' <summary>
''' No hay documentación de metadatos disponible.
''' </summary>
Public ReadOnly Property gruposmenus() As ObjectSet(Of gruposmenus)
Get
If (_gruposmenus Is Nothing) Then
_gruposmenus = MyBase.CreateObjectSet(Of gruposmenus)("gruposmenus")
End If
Return _gruposmenus
End Get
End Property
Private _gruposmenus As ObjectSet(Of gruposmenus)
''' <summary>
''' No hay documentación de metadatos disponible.
''' </summary>
Public ReadOnly Property menus() As ObjectSet(Of menus)
Get
If (_menus Is Nothing) Then
_menus = MyBase.CreateObjectSet(Of menus)("menus")
End If
Return _menus
End Get
End Property
Private _menus As ObjectSet(Of menus)
''' <summary>
''' No hay documentación de metadatos disponible.
''' </summary>
Public ReadOnly Property usuarios() As ObjectSet(Of usuarios)
Get
If (_usuarios Is Nothing) Then
_usuarios = MyBase.CreateObjectSet(Of usuarios)("usuarios")
End If
Return _usuarios
End Get
End Property
Private _usuarios As ObjectSet(Of usuarios)
#End Region
#Region "Métodos AddTo"
''' <summary>
''' Método desusado para agregar un nuevo objeto al EntitySet excepcionesmenus. Considere la posibilidad de usar el método .Add de la propiedad ObjectSet(Of T) asociada.
''' </summary>
Public Sub AddToexcepcionesmenus(ByVal excepcionesmenus As excepcionesmenus)
MyBase.AddObject("excepcionesmenus", excepcionesmenus)
End Sub
''' <summary>
''' Método desusado para agregar un nuevo objeto al EntitySet grupobd. Considere la posibilidad de usar el método .Add de la propiedad ObjectSet(Of T) asociada.
''' </summary>
Public Sub AddTogrupobd(ByVal grupobd As grupobd)
MyBase.AddObject("grupobd", grupobd)
End Sub
''' <summary>
''' Método desusado para agregar un nuevo objeto al EntitySet gruposmenus. Considere la posibilidad de usar el método .Add de la propiedad ObjectSet(Of T) asociada.
''' </summary>
Public Sub AddTogruposmenus(ByVal gruposmenus As gruposmenus)
MyBase.AddObject("gruposmenus", gruposmenus)
End Sub
''' <summary>
''' Método desusado para agregar un nuevo objeto al EntitySet menus. Considere la posibilidad de usar el método .Add de la propiedad ObjectSet(Of T) asociada.
''' </summary>
Public Sub AddTomenus(ByVal menus As menus)
MyBase.AddObject("menus", menus)
End Sub
''' <summary>
''' Método desusado para agregar un nuevo objeto al EntitySet usuarios. Considere la posibilidad de usar el método .Add de la propiedad ObjectSet(Of T) asociada.
''' </summary>
Public Sub AddTousuarios(ByVal usuarios As usuarios)
MyBase.AddObject("usuarios", usuarios)
End Sub
#End Region
End Class
#End Region
#Region "Entidades"
''' <summary>
''' No hay documentación de metadatos disponible.
''' </summary>
<EdmEntityTypeAttribute(NamespaceName:="tsl5Model", Name:="excepcionesmenus")>
<Serializable()>
<DataContractAttribute(IsReference:=True)>
Public Partial Class excepcionesmenus
Inherits EntityObject
#Region "Método de generador"
''' <summary>
''' Crear un nuevo objeto excepcionesmenus.
''' </summary>
''' <param name="idExcepcionesMenus">Valor inicial de la propiedad idExcepcionesMenus.</param>
Public Shared Function Createexcepcionesmenus(idExcepcionesMenus As Global.System.Int32) As excepcionesmenus
Dim excepcionesmenus as excepcionesmenus = New excepcionesmenus
excepcionesmenus.idExcepcionesMenus = idExcepcionesMenus
Return excepcionesmenus
End Function
#End Region
#Region "Propiedades simples"
''' <summary>
''' No hay documentación de metadatos disponible.
''' </summary>
<EdmScalarPropertyAttribute(EntityKeyProperty:=true, IsNullable:=false)>
<DataMemberAttribute()>
Public Property idExcepcionesMenus() As Global.System.Int32
Get
Return _idExcepcionesMenus
End Get
Set
If (_idExcepcionesMenus <> Value) Then
OnidExcepcionesMenusChanging(value)
ReportPropertyChanging("idExcepcionesMenus")
_idExcepcionesMenus = StructuralObject.SetValidValue(value, "idExcepcionesMenus")
ReportPropertyChanged("idExcepcionesMenus")
OnidExcepcionesMenusChanged()
End If
End Set
End Property
Private _idExcepcionesMenus As Global.System.Int32
Private Partial Sub OnidExcepcionesMenusChanging(value As Global.System.Int32)
End Sub
Private Partial Sub OnidExcepcionesMenusChanged()
End Sub
''' <summary>
''' No hay documentación de metadatos disponible.
''' </summary>
<EdmScalarPropertyAttribute(EntityKeyProperty:=false, IsNullable:=true)>
<DataMemberAttribute()>
Public Property idMenu() As Nullable(Of Global.System.Int32)
Get
Return _idMenu
End Get
Set
OnidMenuChanging(value)
ReportPropertyChanging("idMenu")
_idMenu = StructuralObject.SetValidValue(value, "idMenu")
ReportPropertyChanged("idMenu")
OnidMenuChanged()
End Set
End Property
Private _idMenu As Nullable(Of Global.System.Int32)
Private Partial Sub OnidMenuChanging(value As Nullable(Of Global.System.Int32))
End Sub
Private Partial Sub OnidMenuChanged()
End Sub
''' <summary>
''' No hay documentación de metadatos disponible.
''' </summary>
<EdmScalarPropertyAttribute(EntityKeyProperty:=false, IsNullable:=true)>
<DataMemberAttribute()>
Public Property idUsuario() As Nullable(Of Global.System.Int32)
Get
Return _idUsuario
End Get
Set
OnidUsuarioChanging(value)
ReportPropertyChanging("idUsuario")
_idUsuario = StructuralObject.SetValidValue(value, "idUsuario")
ReportPropertyChanged("idUsuario")
OnidUsuarioChanged()
End Set
End Property
Private _idUsuario As Nullable(Of Global.System.Int32)
Private Partial Sub OnidUsuarioChanging(value As Nullable(Of Global.System.Int32))
End Sub
Private Partial Sub OnidUsuarioChanged()
End Sub
#End Region
#Region "Propiedades de navegación"
''' <summary>
''' No hay documentación de metadatos disponible.
''' </summary>
<XmlIgnoreAttribute()>
<SoapIgnoreAttribute()>
<DataMemberAttribute()>
<EdmRelationshipNavigationPropertyAttribute("tsl5Model", "excepcionesmenus_menus", "menus")>
Public Property menus() As menus
Get
Return CType(Me, IEntityWithRelationships).RelationshipManager.GetRelatedReference(Of menus)("tsl5Model.excepcionesmenus_menus", "menus").Value
End Get
Set
CType(Me, IEntityWithRelationships).RelationshipManager.GetRelatedReference(Of menus)("tsl5Model.excepcionesmenus_menus", "menus").Value = value
End Set
End Property
''' <summary>
''' No hay documentación de metadatos disponible.
''' </summary>
<BrowsableAttribute(False)>
<DataMemberAttribute()>
Public Property menusReference() As EntityReference(Of menus)
Get
Return CType(Me, IEntityWithRelationships).RelationshipManager.GetRelatedReference(Of menus)("tsl5Model.excepcionesmenus_menus", "menus")
End Get
Set
If (Not value Is Nothing)
CType(Me, IEntityWithRelationships).RelationshipManager.InitializeRelatedReference(Of menus)("tsl5Model.excepcionesmenus_menus", "menus", value)
End If
End Set
End Property
''' <summary>
''' No hay documentación de metadatos disponible.
''' </summary>
<XmlIgnoreAttribute()>
<SoapIgnoreAttribute()>
<DataMemberAttribute()>
<EdmRelationshipNavigationPropertyAttribute("tsl5Model", "excepcionesmenus_usuarios", "usuarios")>
Public Property usuarios() As usuarios
Get
Return CType(Me, IEntityWithRelationships).RelationshipManager.GetRelatedReference(Of usuarios)("tsl5Model.excepcionesmenus_usuarios", "usuarios").Value
End Get
Set
CType(Me, IEntityWithRelationships).RelationshipManager.GetRelatedReference(Of usuarios)("tsl5Model.excepcionesmenus_usuarios", "usuarios").Value = value
End Set
End Property
''' <summary>
''' No hay documentación de metadatos disponible.
''' </summary>
<BrowsableAttribute(False)>
<DataMemberAttribute()>
Public Property usuariosReference() As EntityReference(Of usuarios)
Get
Return CType(Me, IEntityWithRelationships).RelationshipManager.GetRelatedReference(Of usuarios)("tsl5Model.excepcionesmenus_usuarios", "usuarios")
End Get
Set
If (Not value Is Nothing)
CType(Me, IEntityWithRelationships).RelationshipManager.InitializeRelatedReference(Of usuarios)("tsl5Model.excepcionesmenus_usuarios", "usuarios", value)
End If
End Set
End Property
#End Region
End Class
''' <summary>
''' No hay documentación de metadatos disponible.
''' </summary>
<EdmEntityTypeAttribute(NamespaceName:="tsl5Model", Name:="grupobd")>
<Serializable()>
<DataContractAttribute(IsReference:=True)>
Public Partial Class grupobd
Inherits EntityObject
#Region "Método de generador"
''' <summary>
''' Crear un nuevo objeto grupobd.
''' </summary>
''' <param name="idGrupoBD">Valor inicial de la propiedad idGrupoBD.</param>
Public Shared Function Creategrupobd(idGrupoBD As Global.System.Int32) As grupobd
Dim grupobd as grupobd = New grupobd
grupobd.idGrupoBD = idGrupoBD
Return grupobd
End Function
#End Region
#Region "Propiedades simples"
''' <summary>
''' No hay documentación de metadatos disponible.
''' </summary>
<EdmScalarPropertyAttribute(EntityKeyProperty:=true, IsNullable:=false)>
<DataMemberAttribute()>
Public Property idGrupoBD() As Global.System.Int32
Get
Return _idGrupoBD
End Get
Set
If (_idGrupoBD <> Value) Then
OnidGrupoBDChanging(value)
ReportPropertyChanging("idGrupoBD")
_idGrupoBD = StructuralObject.SetValidValue(value, "idGrupoBD")
ReportPropertyChanged("idGrupoBD")
OnidGrupoBDChanged()
End If
End Set
End Property
Private _idGrupoBD As Global.System.Int32
Private Partial Sub OnidGrupoBDChanging(value As Global.System.Int32)
End Sub
Private Partial Sub OnidGrupoBDChanged()
End Sub
''' <summary>
''' No hay documentación de metadatos disponible.
''' </summary>
<EdmScalarPropertyAttribute(EntityKeyProperty:=false, IsNullable:=true)>
<DataMemberAttribute()>
Public Property Descripcion() As Global.System.String
Get
Return _Descripcion
End Get
Set
OnDescripcionChanging(value)
ReportPropertyChanging("Descripcion")
_Descripcion = StructuralObject.SetValidValue(value, true, "Descripcion")
ReportPropertyChanged("Descripcion")
OnDescripcionChanged()
End Set
End Property
Private _Descripcion As Global.System.String
Private Partial Sub OnDescripcionChanging(value As Global.System.String)
End Sub
Private Partial Sub OnDescripcionChanged()
End Sub
#End Region
#Region "Propiedades de navegación"
''' <summary>
''' No hay documentación de metadatos disponible.
''' </summary>
<XmlIgnoreAttribute()>
<SoapIgnoreAttribute()>
<DataMemberAttribute()>
<EdmRelationshipNavigationPropertyAttribute("tsl5Model", "Usuarios_Grupobd", "usuarios")>
Public Property usuarios() As EntityCollection(Of usuarios)
Get
Return CType(Me,IEntityWithRelationships).RelationshipManager.GetRelatedCollection(Of usuarios)("tsl5Model.Usuarios_Grupobd", "usuarios")
End Get
Set
If (Not value Is Nothing)
CType(Me, IEntityWithRelationships).RelationshipManager.InitializeRelatedCollection(Of usuarios)("tsl5Model.Usuarios_Grupobd", "usuarios", value)
End If
End Set
End Property
#End Region
End Class
''' <summary>
''' No hay documentación de metadatos disponible.
''' </summary>
<EdmEntityTypeAttribute(NamespaceName:="tsl5Model", Name:="gruposmenus")>
<Serializable()>
<DataContractAttribute(IsReference:=True)>
Public Partial Class gruposmenus
Inherits EntityObject
#Region "Método de generador"
''' <summary>
''' Crear un nuevo objeto gruposmenus.
''' </summary>
''' <param name="idGruposMenus">Valor inicial de la propiedad idGruposMenus.</param>
Public Shared Function Creategruposmenus(idGruposMenus As Global.System.Int32) As gruposmenus
Dim gruposmenus as gruposmenus = New gruposmenus
gruposmenus.idGruposMenus = idGruposMenus
Return gruposmenus
End Function
#End Region
#Region "Propiedades simples"
''' <summary>
''' No hay documentación de metadatos disponible.
''' </summary>
<EdmScalarPropertyAttribute(EntityKeyProperty:=true, IsNullable:=false)>
<DataMemberAttribute()>
Public Property idGruposMenus() As Global.System.Int32
Get
Return _idGruposMenus
End Get
Set
If (_idGruposMenus <> Value) Then
OnidGruposMenusChanging(value)
ReportPropertyChanging("idGruposMenus")
_idGruposMenus = StructuralObject.SetValidValue(value, "idGruposMenus")
ReportPropertyChanged("idGruposMenus")
OnidGruposMenusChanged()
End If
End Set
End Property
Private _idGruposMenus As Global.System.Int32
Private Partial Sub OnidGruposMenusChanging(value As Global.System.Int32)
End Sub
Private Partial Sub OnidGruposMenusChanged()
End Sub
''' <summary>
''' No hay documentación de metadatos disponible.
''' </summary>
<EdmScalarPropertyAttribute(EntityKeyProperty:=false, IsNullable:=true)>
<DataMemberAttribute()>
Public Property Descripcion() As Global.System.String
Get
Return _Descripcion
End Get
Set
OnDescripcionChanging(value)
ReportPropertyChanging("Descripcion")
_Descripcion = StructuralObject.SetValidValue(value, true, "Descripcion")
ReportPropertyChanged("Descripcion")
OnDescripcionChanged()
End Set
End Property
Private _Descripcion As Global.System.String
Private Partial Sub OnDescripcionChanging(value As Global.System.String)
End Sub
Private Partial Sub OnDescripcionChanged()
End Sub
#End Region
#Region "Propiedades de navegación"
''' <summary>
''' No hay documentación de metadatos disponible.
''' </summary>
<XmlIgnoreAttribute()>
<SoapIgnoreAttribute()>
<DataMemberAttribute()>
<EdmRelationshipNavigationPropertyAttribute("tsl5Model", "Menus_GruposMenus", "menus")>
Public Property menus() As EntityCollection(Of menus)
Get
Return CType(Me,IEntityWithRelationships).RelationshipManager.GetRelatedCollection(Of menus)("tsl5Model.Menus_GruposMenus", "menus")
End Get
Set
If (Not value Is Nothing)
CType(Me, IEntityWithRelationships).RelationshipManager.InitializeRelatedCollection(Of menus)("tsl5Model.Menus_GruposMenus", "menus", value)
End If
End Set
End Property
''' <summary>
''' No hay documentación de metadatos disponible.
''' </summary>
<XmlIgnoreAttribute()>
<SoapIgnoreAttribute()>
<DataMemberAttribute()>
<EdmRelationshipNavigationPropertyAttribute("tsl5Model", "usuarios_gruposmenus", "usuarios")>
Public Property usuarios() As EntityCollection(Of usuarios)
Get
Return CType(Me,IEntityWithRelationships).RelationshipManager.GetRelatedCollection(Of usuarios)("tsl5Model.usuarios_gruposmenus", "usuarios")
End Get
Set
If (Not value Is Nothing)
CType(Me, IEntityWithRelationships).RelationshipManager.InitializeRelatedCollection(Of usuarios)("tsl5Model.usuarios_gruposmenus", "usuarios", value)
End If
End Set
End Property
#End Region
End Class
''' <summary>
''' No hay documentación de metadatos disponible.
''' </summary>
<EdmEntityTypeAttribute(NamespaceName:="tsl5Model", Name:="menus")>
<Serializable()>
<DataContractAttribute(IsReference:=True)>
Public Partial Class menus
Inherits EntityObject
#Region "Método de generador"
''' <summary>
''' Crear un nuevo objeto menus.
''' </summary>
''' <param name="idMenus">Valor inicial de la propiedad idMenus.</param>
Public Shared Function Createmenus(idMenus As Global.System.Int32) As menus
Dim menus as menus = New menus
menus.idMenus = idMenus
Return menus
End Function
#End Region
#Region "Propiedades simples"
''' <summary>
''' No hay documentación de metadatos disponible.
''' </summary>
<EdmScalarPropertyAttribute(EntityKeyProperty:=true, IsNullable:=false)>
<DataMemberAttribute()>
Public Property idMenus() As Global.System.Int32
Get
Return _idMenus
End Get
Set
If (_idMenus <> Value) Then
OnidMenusChanging(value)
ReportPropertyChanging("idMenus")
_idMenus = StructuralObject.SetValidValue(value, "idMenus")
ReportPropertyChanged("idMenus")
OnidMenusChanged()
End If
End Set
End Property
Private _idMenus As Global.System.Int32
Private Partial Sub OnidMenusChanging(value As Global.System.Int32)
End Sub
Private Partial Sub OnidMenusChanged()
End Sub
''' <summary>
''' No hay documentación de metadatos disponible.
''' </summary>
<EdmScalarPropertyAttribute(EntityKeyProperty:=false, IsNullable:=true)>
<DataMemberAttribute()>
Public Property Texto() As Global.System.String
Get
Return _Texto
End Get
Set
OnTextoChanging(value)
ReportPropertyChanging("Texto")
_Texto = StructuralObject.SetValidValue(value, true, "Texto")
ReportPropertyChanged("Texto")
OnTextoChanged()
End Set
End Property
Private _Texto As Global.System.String
Private Partial Sub OnTextoChanging(value As Global.System.String)
End Sub
Private Partial Sub OnTextoChanged()
End Sub
''' <summary>
''' No hay documentación de metadatos disponible.
''' </summary>
<EdmScalarPropertyAttribute(EntityKeyProperty:=false, IsNullable:=true)>
<DataMemberAttribute()>
Public Property Ayuda() As Global.System.String
Get
Return _Ayuda
End Get
Set
OnAyudaChanging(value)
ReportPropertyChanging("Ayuda")
_Ayuda = StructuralObject.SetValidValue(value, true, "Ayuda")
ReportPropertyChanged("Ayuda")
OnAyudaChanged()
End Set
End Property
Private _Ayuda As Global.System.String
Private Partial Sub OnAyudaChanging(value As Global.System.String)
End Sub
Private Partial Sub OnAyudaChanged()
End Sub
''' <summary>
''' No hay documentación de metadatos disponible.
''' </summary>
<EdmScalarPropertyAttribute(EntityKeyProperty:=false, IsNullable:=true)>
<DataMemberAttribute()>
Public Property Accion() As Global.System.String
Get
Return _Accion
End Get
Set
OnAccionChanging(value)
ReportPropertyChanging("Accion")
_Accion = StructuralObject.SetValidValue(value, true, "Accion")
ReportPropertyChanged("Accion")
OnAccionChanged()
End Set
End Property
Private _Accion As Global.System.String
Private Partial Sub OnAccionChanging(value As Global.System.String)
End Sub
Private Partial Sub OnAccionChanged()
End Sub
''' <summary>
''' No hay documentación de metadatos disponible.
''' </summary>
<EdmScalarPropertyAttribute(EntityKeyProperty:=false, IsNullable:=true)>
<DataMemberAttribute()>
Public Property Orden() As Nullable(Of Global.System.Int32)
Get
Return _Orden
End Get
Set
OnOrdenChanging(value)
ReportPropertyChanging("Orden")
_Orden = StructuralObject.SetValidValue(value, "Orden")
ReportPropertyChanged("Orden")
OnOrdenChanged()
End Set
End Property
Private _Orden As Nullable(Of Global.System.Int32)
Private Partial Sub OnOrdenChanging(value As Nullable(Of Global.System.Int32))
End Sub
Private Partial Sub OnOrdenChanged()
End Sub
''' <summary>
''' No hay documentación de metadatos disponible.
''' </summary>
<EdmScalarPropertyAttribute(EntityKeyProperty:=false, IsNullable:=true)>
<DataMemberAttribute()>
Public Property idMenuPadre() As Nullable(Of Global.System.Int32)
Get
Return _idMenuPadre
End Get
Set
OnidMenuPadreChanging(value)
ReportPropertyChanging("idMenuPadre")
_idMenuPadre = StructuralObject.SetValidValue(value, "idMenuPadre")
ReportPropertyChanged("idMenuPadre")
OnidMenuPadreChanged()
End Set
End Property
Private _idMenuPadre As Nullable(Of Global.System.Int32)
Private Partial Sub OnidMenuPadreChanging(value As Nullable(Of Global.System.Int32))
End Sub
Private Partial Sub OnidMenuPadreChanged()
End Sub
''' <summary>
''' No hay documentación de metadatos disponible.
''' </summary>
<EdmScalarPropertyAttribute(EntityKeyProperty:=false, IsNullable:=true)>
<DataMemberAttribute()>
Public Property idGrupoMenu() As Nullable(Of Global.System.Int32)
Get
Return _idGrupoMenu
End Get
Set
OnidGrupoMenuChanging(value)
ReportPropertyChanging("idGrupoMenu")
_idGrupoMenu = StructuralObject.SetValidValue(value, "idGrupoMenu")
ReportPropertyChanged("idGrupoMenu")
OnidGrupoMenuChanged()
End Set
End Property
Private _idGrupoMenu As Nullable(Of Global.System.Int32)
Private Partial Sub OnidGrupoMenuChanging(value As Nullable(Of Global.System.Int32))
End Sub
Private Partial Sub OnidGrupoMenuChanged()
End Sub
#End Region
#Region "Propiedades de navegación"
''' <summary>
''' No hay documentación de metadatos disponible.
''' </summary>
<XmlIgnoreAttribute()>
<SoapIgnoreAttribute()>
<DataMemberAttribute()>
<EdmRelationshipNavigationPropertyAttribute("tsl5Model", "excepcionesmenus_menus", "excepcionesmenus")>
Public Property excepcionesmenus() As EntityCollection(Of excepcionesmenus)
Get
Return CType(Me,IEntityWithRelationships).RelationshipManager.GetRelatedCollection(Of excepcionesmenus)("tsl5Model.excepcionesmenus_menus", "excepcionesmenus")
End Get
Set
If (Not value Is Nothing)
CType(Me, IEntityWithRelationships).RelationshipManager.InitializeRelatedCollection(Of excepcionesmenus)("tsl5Model.excepcionesmenus_menus", "excepcionesmenus", value)
End If
End Set
End Property
''' <summary>
''' No hay documentación de metadatos disponible.
''' </summary>
<XmlIgnoreAttribute()>
<SoapIgnoreAttribute()>
<DataMemberAttribute()>
<EdmRelationshipNavigationPropertyAttribute("tsl5Model", "Menus_GruposMenus", "gruposmenus")>
Public Property gruposmenus() As gruposmenus
Get
Return CType(Me, IEntityWithRelationships).RelationshipManager.GetRelatedReference(Of gruposmenus)("tsl5Model.Menus_GruposMenus", "gruposmenus").Value
End Get
Set
CType(Me, IEntityWithRelationships).RelationshipManager.GetRelatedReference(Of gruposmenus)("tsl5Model.Menus_GruposMenus", "gruposmenus").Value = value
End Set
End Property
''' <summary>
''' No hay documentación de metadatos disponible.
''' </summary>
<BrowsableAttribute(False)>
<DataMemberAttribute()>
Public Property gruposmenusReference() As EntityReference(Of gruposmenus)
Get
Return CType(Me, IEntityWithRelationships).RelationshipManager.GetRelatedReference(Of gruposmenus)("tsl5Model.Menus_GruposMenus", "gruposmenus")
End Get
Set
If (Not value Is Nothing)
CType(Me, IEntityWithRelationships).RelationshipManager.InitializeRelatedReference(Of gruposmenus)("tsl5Model.Menus_GruposMenus", "gruposmenus", value)
End If
End Set
End Property
#End Region
End Class
''' <summary>
''' No hay documentación de metadatos disponible.
''' </summary>
<EdmEntityTypeAttribute(NamespaceName:="tsl5Model", Name:="usuarios")>
<Serializable()>
<DataContractAttribute(IsReference:=True)>
Public Partial Class usuarios
Inherits EntityObject
#Region "Método de generador"
''' <summary>
''' Crear un nuevo objeto usuarios.
''' </summary>
''' <param name="idUsuarios">Valor inicial de la propiedad idUsuarios.</param>
''' <param name="usuario">Valor inicial de la propiedad Usuario.</param>
''' <param name="idGrupobd">Valor inicial de la propiedad idGrupobd.</param>
Public Shared Function Createusuarios(idUsuarios As Global.System.Int32, usuario As Global.System.String, idGrupobd As Global.System.Int32) As usuarios
Dim usuarios as usuarios = New usuarios
usuarios.idUsuarios = idUsuarios
usuarios.Usuario = usuario
usuarios.idGrupobd = idGrupobd
Return usuarios
End Function
#End Region
#Region "Propiedades simples"
''' <summary>
''' No hay documentación de metadatos disponible.
''' </summary>
<EdmScalarPropertyAttribute(EntityKeyProperty:=true, IsNullable:=false)>
<DataMemberAttribute()>
Public Property idUsuarios() As Global.System.Int32
Get
Return _idUsuarios
End Get
Set
If (_idUsuarios <> Value) Then
OnidUsuariosChanging(value)
ReportPropertyChanging("idUsuarios")
_idUsuarios = StructuralObject.SetValidValue(value, "idUsuarios")
ReportPropertyChanged("idUsuarios")
OnidUsuariosChanged()
End If
End Set
End Property
Private _idUsuarios As Global.System.Int32
Private Partial Sub OnidUsuariosChanging(value As Global.System.Int32)
End Sub
Private Partial Sub OnidUsuariosChanged()
End Sub
''' <summary>
''' No hay documentación de metadatos disponible.
''' </summary>
<EdmScalarPropertyAttribute(EntityKeyProperty:=false, IsNullable:=false)>
<DataMemberAttribute()>
Public Property Usuario() As Global.System.String
Get
Return _Usuario
End Get
Set
OnUsuarioChanging(value)
ReportPropertyChanging("Usuario")
_Usuario = StructuralObject.SetValidValue(value, false, "Usuario")
ReportPropertyChanged("Usuario")
OnUsuarioChanged()
End Set
End Property
Private _Usuario As Global.System.String
Private Partial Sub OnUsuarioChanging(value As Global.System.String)
End Sub
Private Partial Sub OnUsuarioChanged()
End Sub
''' <summary>
''' No hay documentación de metadatos disponible.
''' </summary>
<EdmScalarPropertyAttribute(EntityKeyProperty:=false, IsNullable:=true)>
<DataMemberAttribute()>
Public Property SHA1Passwd() As Global.System.String
Get
Return _SHA1Passwd
End Get
Set
OnSHA1PasswdChanging(value)
ReportPropertyChanging("SHA1Passwd")
_SHA1Passwd = StructuralObject.SetValidValue(value, true, "SHA1Passwd")
ReportPropertyChanged("SHA1Passwd")
OnSHA1PasswdChanged()
End Set
End Property
Private _SHA1Passwd As Global.System.String
Private Partial Sub OnSHA1PasswdChanging(value As Global.System.String)
End Sub
Private Partial Sub OnSHA1PasswdChanged()
End Sub
''' <summary>
''' No hay documentación de metadatos disponible.
''' </summary>
<EdmScalarPropertyAttribute(EntityKeyProperty:=false, IsNullable:=false)>
<DataMemberAttribute()>
Public Property idGrupobd() As Global.System.Int32
Get
Return _idGrupobd
End Get
Set
OnidGrupobdChanging(value)
ReportPropertyChanging("idGrupobd")
_idGrupobd = StructuralObject.SetValidValue(value, "idGrupobd")
ReportPropertyChanged("idGrupobd")
OnidGrupobdChanged()
End Set
End Property
Private _idGrupobd As Global.System.Int32
Private Partial Sub OnidGrupobdChanging(value As Global.System.Int32)
End Sub
Private Partial Sub OnidGrupobdChanged()
End Sub
''' <summary>
''' No hay documentación de metadatos disponible.
''' </summary>
<EdmScalarPropertyAttribute(EntityKeyProperty:=false, IsNullable:=true)>
<DataMemberAttribute()>
Public Property idGrupomenus() As Nullable(Of Global.System.Int32)
Get
Return _idGrupomenus
End Get
Set
OnidGrupomenusChanging(value)
ReportPropertyChanging("idGrupomenus")
_idGrupomenus = StructuralObject.SetValidValue(value, "idGrupomenus")
ReportPropertyChanged("idGrupomenus")
OnidGrupomenusChanged()
End Set
End Property
Private _idGrupomenus As Nullable(Of Global.System.Int32)
Private Partial Sub OnidGrupomenusChanging(value As Nullable(Of Global.System.Int32))
End Sub
Private Partial Sub OnidGrupomenusChanged()
End Sub
#End Region
#Region "Propiedades de navegación"
''' <summary>
''' No hay documentación de metadatos disponible.
''' </summary>
<XmlIgnoreAttribute()>
<SoapIgnoreAttribute()>
<DataMemberAttribute()>
<EdmRelationshipNavigationPropertyAttribute("tsl5Model", "excepcionesmenus_usuarios", "excepcionesmenus")>
Public Property excepcionesmenus() As EntityCollection(Of excepcionesmenus)
Get
Return CType(Me,IEntityWithRelationships).RelationshipManager.GetRelatedCollection(Of excepcionesmenus)("tsl5Model.excepcionesmenus_usuarios", "excepcionesmenus")
End Get
Set
If (Not value Is Nothing)
CType(Me, IEntityWithRelationships).RelationshipManager.InitializeRelatedCollection(Of excepcionesmenus)("tsl5Model.excepcionesmenus_usuarios", "excepcionesmenus", value)
End If
End Set
End Property
''' <summary>
''' No hay documentación de metadatos disponible.
''' </summary>
<XmlIgnoreAttribute()>
<SoapIgnoreAttribute()>
<DataMemberAttribute()>
<EdmRelationshipNavigationPropertyAttribute("tsl5Model", "Usuarios_Grupobd", "grupobd")>
Public Property grupobd() As grupobd
Get
Return CType(Me, IEntityWithRelationships).RelationshipManager.GetRelatedReference(Of grupobd)("tsl5Model.Usuarios_Grupobd", "grupobd").Value
End Get
Set
CType(Me, IEntityWithRelationships).RelationshipManager.GetRelatedReference(Of grupobd)("tsl5Model.Usuarios_Grupobd", "grupobd").Value = value
End Set
End Property
''' <summary>
''' No hay documentación de metadatos disponible.
''' </summary>
<BrowsableAttribute(False)>
<DataMemberAttribute()>
Public Property grupobdReference() As EntityReference(Of grupobd)
Get
Return CType(Me, IEntityWithRelationships).RelationshipManager.GetRelatedReference(Of grupobd)("tsl5Model.Usuarios_Grupobd", "grupobd")
End Get
Set
If (Not value Is Nothing)
CType(Me, IEntityWithRelationships).RelationshipManager.InitializeRelatedReference(Of grupobd)("tsl5Model.Usuarios_Grupobd", "grupobd", value)
End If
End Set
End Property
''' <summary>
''' No hay documentación de metadatos disponible.
''' </summary>
<XmlIgnoreAttribute()>
<SoapIgnoreAttribute()>
<DataMemberAttribute()>
<EdmRelationshipNavigationPropertyAttribute("tsl5Model", "usuarios_gruposmenus", "gruposmenus")>
Public Property gruposmenus() As gruposmenus
Get
Return CType(Me, IEntityWithRelationships).RelationshipManager.GetRelatedReference(Of gruposmenus)("tsl5Model.usuarios_gruposmenus", "gruposmenus").Value
End Get
Set
CType(Me, IEntityWithRelationships).RelationshipManager.GetRelatedReference(Of gruposmenus)("tsl5Model.usuarios_gruposmenus", "gruposmenus").Value = value
End Set
End Property
''' <summary>
''' No hay documentación de metadatos disponible.
''' </summary>
<BrowsableAttribute(False)>
<DataMemberAttribute()>
Public Property gruposmenusReference() As EntityReference(Of gruposmenus)
Get
Return CType(Me, IEntityWithRelationships).RelationshipManager.GetRelatedReference(Of gruposmenus)("tsl5Model.usuarios_gruposmenus", "gruposmenus")
End Get
Set
If (Not value Is Nothing)
CType(Me, IEntityWithRelationships).RelationshipManager.InitializeRelatedReference(Of gruposmenus)("tsl5Model.usuarios_gruposmenus", "gruposmenus", value)
End If
End Set
End Property
#End Region
End Class
#End Region