AdminADS/SIG
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

-- cambio de GlobalDTSubProyectos

Browse Source 
- cambio en GlobalDTUsuarios
This commit is contained in:
rrene
2024-08-01 05:46:28 -07:00
parent 14f053bc86
commit 1c14bceea9
240 changed files with 692 additions and 689 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
RH/ActualizacionMasiva.aspx.vb
View File

@@ -13,7 +13,7 @@ Partial Class RH_ActualizacionMasiva
'DdlCliente.Attributes.Add("onclick", "CargaClientes();")
'CargaProyecto()
ViewState("gvtsubproyectos") = GlobalDTSubProyectos(-1, -1, UsuarioActual.CveEmpresa)
ViewState("gvtsubproyectos") = GlobalDTSubProyectos(UsuarioActual.CveEmpresa)
CargarCentrosDeCosto(DdlProyecto, DdlSubProyecto, LblProyecto, LblSubProyeccto)
divddlproyeto.Visible = DdlProyecto.Visible
GvDatos.Columns(2).Visible = DdlProyecto.Visible
@@ -123,7 +123,7 @@ Partial Class RH_ActualizacionMasiva
End If
End Sub
Private Sub CargaSupervisores()
ViewState("DTUsuarios") = GlobalDTUsuarios.FiltraParametros(String.Format("CveEmpresa = {0} AND EsSupervisorRH = 1 ", UsuarioActual.CveEmpresa))
ViewState("DTUsuarios") = GlobalDTUsuarios(-1, UsuarioActual.CveEmpresa).FiltraParametros(" EsSupervisorRH = 1 ")
Dim Row As DataRow = DirectCast(ViewState("DTUsuarios"), DataTable).NewRow()
Row("CveUsuario") = -1 : Row("Nombre") = "Sin Supervisor Asignado"