This commit is contained in:
JORGE LUIS CAUDILLO ESPARZA
2022-08-14 23:56:47 -07:00
parent 64b56bec09
commit f76e42b2e8

View File

@@ -7346,7 +7346,7 @@ chkAplicaVacacion As Boolean, chkAplicaIncapacidad As Boolean, chkAplicaRetardo
Public Function estatusPersonalUp(Fecha As DateTime, CvePersonal As Integer, CveEstatusPersonal As Integer, CveEmpresa As Integer, CveUsuario As Integer) As Boolean
Dim Retorno As Boolean = False
Data = New DataTable
SqlDataAdapter("estatusPersonalUp")
SqlDataAdapter("PA_RH_EstatusPersonalUp")
With SqlAdapter.SelectCommand.Parameters
.Add("@Fecha", SqlDbType.DateTime).Value = Fecha
.Add("@CvePersonal", SqlDbType.Int).Value = CvePersonal