From 5f3c483f6d38c71b34c8e09647e98087e4df123a Mon Sep 17 00:00:00 2001 From: Jonathan Alexis Perez Morales Date: Wed, 18 Aug 2021 11:38:40 -0700 Subject: [PATCH] Seleccionar todos los estatus de REQ/OC al asignar --- Sistemas/UsuarioDetalle.aspx | 479 ++++++++++++++++++++++++-------- Sistemas/UsuarioDetalle.aspx.vb | 30 +- 2 files changed, 391 insertions(+), 118 deletions(-) diff --git a/Sistemas/UsuarioDetalle.aspx b/Sistemas/UsuarioDetalle.aspx index 182c8df96..74d23f2d8 100644 --- a/Sistemas/UsuarioDetalle.aspx +++ b/Sistemas/UsuarioDetalle.aspx @@ -112,20 +112,20 @@ -   +   - - vpn_lock + + vpn_lock - - lock + + lock - - email + + email - <%----%> + <%----%> @@ -162,27 +162,27 @@ - <%-- - Supervisa: - - - - - - - - - - - Autoriza: - - - - - - - - + <%-- + Supervisa: + + + + + + + + + + + Autoriza: + + + + + + + + --%> Empresa: @@ -212,8 +212,8 @@ - - lock + + lock @@ -369,7 +369,7 @@ -   +   @@ -455,7 +455,7 @@ -   +   @@ -501,6 +501,18 @@ + + + + + + +
+ + + +
+ @@ -522,6 +534,18 @@ + +
+ + + + +
+ + + +
+ @@ -543,6 +567,18 @@ + +
+ + + + +
+ + + +
+ @@ -564,6 +600,18 @@ + +
+ + + + +
+ + + +
+ @@ -585,6 +633,18 @@ + +
+ + + + +
+ + + +
+ @@ -606,6 +666,18 @@ + +
+ + + + +
+ + + +
+ @@ -627,6 +699,18 @@ + +
+ + + + +
+ + + +
+ @@ -648,6 +732,18 @@ + +
+ + + + +
+ + + +
+ @@ -669,6 +765,18 @@ + +
+ + + + +
+ + + +
+ @@ -690,6 +798,18 @@ + +
+ + + + +
+ + + +
+ @@ -723,6 +843,18 @@ + +
+ + + + +
+ + + +
+ @@ -744,6 +876,18 @@ + +
+ + + + +
+ + + +
+ @@ -765,6 +909,18 @@ + +
+ + + + +
+ + + +
+ @@ -786,6 +942,18 @@ + +
+ + + + +
+ + + +
+ @@ -807,6 +975,18 @@ + +
+ + + + +
+ + + +
+ @@ -828,6 +1008,18 @@ + +
+ + + + +
+ + + +
+ @@ -849,6 +1041,18 @@ + +
+ + + + +
+ + + +
+ @@ -870,6 +1074,18 @@ + +
+ + + + +
+ + + +
+ @@ -891,6 +1107,18 @@ + +
+ + + + +
+ + + +
+ @@ -912,6 +1140,18 @@ + +
+ + + + +
+ + + +
+ @@ -1626,7 +1866,7 @@
- Empresa: + Empresa:
@@ -2054,7 +2294,7 @@ -   +   @@ -2415,7 +2655,7 @@
- Usuario a clonar: + Usuario a clonar:
@@ -2507,7 +2747,7 @@
- IP: + IP:
@@ -2516,7 +2756,7 @@
- Mac: + Mac:
@@ -2527,18 +2767,18 @@
- <%--
-
- Restrincción por Equipo: -
-
- -
+ <%--
+
+ Restrincción por Equipo: +
+
+ +
--%>
- Aplica Restricción: + Aplica Restricción:
@@ -2880,103 +3120,114 @@ - diff --git a/Sistemas/UsuarioDetalle.aspx.vb b/Sistemas/UsuarioDetalle.aspx.vb index 2ed1f151e..b17cec2e5 100644 --- a/Sistemas/UsuarioDetalle.aspx.vb +++ b/Sistemas/UsuarioDetalle.aspx.vb @@ -2473,7 +2473,17 @@ Partial Class Sistemas_UsuarioDetalle End Sub #Region "GRIDVIEW" - Protected Sub GvEstatusUsuariosREQ_RowDataBound(sender As Object, e As GridViewRowEventArgs) Handles GvEstatusUsuariosREQ.RowDataBound + Protected Sub GvEstatusUsuariosREQ_RowDataBound(sender As Object, e As GridViewRowEventArgs) Handles GvEstatusUsuariosREQ.RowDataBound + If e.Row.RowType = DataControlRowType.Header Then + For i As Integer = 2 To GvEstatusUsuariosREQ.Columns.Count - 1 + Dim CveEstatus As Integer = GvEstatusUsuariosREQ.Columns(i).FooterText.ToEntero + Dim idIndex As Integer = i - 1 + If CveEstatus > -1 Then + e.Row.FCLabel($"LblTituloEstatusREQ{idIndex}").Text = GvEstatusUsuariosREQ.Columns(i).HeaderText + End If + Next + End If + If e.Row.RowType = DataControlRowType.DataRow Then Dim tmpT As DataTable = DTEstatusSubProyectos.FiltraParametros(String.Format("CveSubProyecto = {0}", e.Row.DBCampo("CveSubProyecto").ToString)) @@ -2487,6 +2497,7 @@ Partial Class Sistemas_UsuarioDetalle Dim hdnCveEstatusUsuarios As HiddenField = e.Row.FCHiddenField($"hdnCveEstatusUsuarios{idIndex}") Dim lblSuperior As Label = e.Row.FCLabel($"lblSuperior{idIndex}") Dim lblLimites As Label = e.Row.FCLabel($"lblLimites{idIndex}") + chkEstatus.CssClass = $"chkEstatusREQ{idIndex}" Dim dtTemp As New DataTable Dim existenPermisosActuales As Boolean @@ -2599,7 +2610,18 @@ Partial Class Sistemas_UsuarioDetalle Next End If End Sub - Protected Sub GvEstatusUsuariosOC_RowDataBound(sender As Object, e As GridViewRowEventArgs) Handles GvEstatusUsuariosOC.RowDataBound + Protected Sub GvEstatusUsuariosOC_RowDataBound(sender As Object, e As GridViewRowEventArgs) Handles GvEstatusUsuariosOC.RowDataBound + + If e.Row.RowType = DataControlRowType.Header Then + For i As Integer = 2 To GvEstatusUsuariosOC.Columns.Count - 1 + Dim CveEstatus As Integer = GvEstatusUsuariosOC.Columns(i).FooterText.ToEntero + Dim idIndex As Integer = i - 1 + If CveEstatus > -1 Then + e.Row.FCLabel($"LblTituloEstatus{idIndex}").Text = GvEstatusUsuariosOC.Columns(i).HeaderText + End If + Next + End If + If e.Row.RowType = DataControlRowType.DataRow Then Dim tmpT As DataTable = DTEstatusSubProyectos.FiltraParametros(String.Format("CveSubProyecto = {0}", e.Row.DBCampo("CveSubProyecto").ToString)) @@ -2612,8 +2634,8 @@ Partial Class Sistemas_UsuarioDetalle Dim ImgClasificaciones As LinkButton = e.Row.FCLinkButton($"ImgClasificaciones{idIndex}") Dim hdnCveEstatusUsuarios As HiddenField = e.Row.FCHiddenField($"hdnCveEstatusUsuarios{idIndex}") Dim lblSuperior As Label = e.Row.FCLabel($"lblSuperior{idIndex}") - Dim lblLimites As Label = e.Row.FCLabel($"lblLimites{idIndex}") - + Dim lblLimites As Label = e.Row.FCLabel($"lblLimites{idIndex}") + chkEstatus.CssClass = $"chkEstatus{idIndex}" Dim dtTemp As New DataTable Dim existenPermisosActuales As Boolean