Partial Public Class procesos Public ReadOnly Property Permiso As tsWPF.Permisos Get Dim bd As bdGestionAsegasa.gestionasegasaEntities = tsWPF.ObtieneContexto(Me) Return Utilidades.ObtienePermisos(bd, Me.idPermiso, bdGestionAsegasa.Utilidades.dsc.idUsuario) End Get End Property End Class