agregado procesos y bd clases

guia/Extensiones/procesos.vb

@@ -0,0 +1,8 @@
+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