visualizar módulo Rol 1

2022-09-02 12:51:59 -07:00
parent 152132d130
commit 1a75d635a6
1 changed files with 4 additions and 0 deletions
--- a/Contabilidad/RegPrePolizaS.aspx.vb
+++ b/Contabilidad/RegPrePolizaS.aspx.vb
@@ -434,6 +434,10 @@ Partial Class ContabilidadC_RegPrePolizaS
                '  TxtEstatus.Text = If(Boolean.Parse(dr("Estatus").ToString), "Activa", "Inactiva")
                CvePlantillaPoliza = dr("CvePlantillaPoliza").ToString

+                If UsuarioActual.CveRol = 1 Then
+                    TxtUsuarioElaboro.ToolTip = dr("Modulo").ToString
+                End If
+
                If UsuarioActual.CveRol = 1 OrElse UsuarioActual.TienePermisoProceso(221) Then
                    'DivAgregarConceptos.Visible = True
                    LnkAddConcepto.Visible = True