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

cambio a globaldtRHPersonal

Browse Source
This commit is contained in:
rrene
2023-02-28 17:18:06 -07:00
parent 77a7e42ccd
commit fb27659904
1 changed files with 11 additions and 8 deletions
Download Patch File Download Diff File Expand all files Collapse all files

11
Sistemas/UsuarioDetalle.aspx.vb
View File

@@ -718,11 +718,14 @@ Partial Class Sistemas_UsuarioDetalle
Private Sub CargaPersonal() Private Sub CargaPersonal()
Dim dt As DataTable = Nothing Dim dt As DataTable = Nothing
Dim RH As New ClsRH 'Dim RH As New ClsRH
If RH.GetPersonal(-1, DdlEmpresaAsignaciones.SelectedValue.ToEntero) Then 'If RH.GetPersonal(-1, DdlEmpresaAsignaciones.SelectedValue.ToEntero) Then
dt = RH.DtResultados ' dt = RH.DtResultados
'End If
'RH.Dispose()
If DdlEmpresaAsignaciones.SelectedValue.ToEntero > 0 Then
dt = GlobalDTRHPersonal(DdlEmpresaAsignaciones.SelectedValue.ToEntero)
End If End If
RH.Dispose()
DdlPersonal.Items.Clear() DdlPersonal.Items.Clear()
DdlPersonal.DataSource = dt DdlPersonal.DataSource = dt