-- parametro de tiponomina en asistencias
This commit is contained in:
@@ -3081,7 +3081,7 @@ Partial Class Clientes
|
|||||||
|
|
||||||
Protected Sub BtnConsultarAsistencia_Click(sender As Object, e As System.EventArgs) Handles BtnConsultarAsistencia.Click
|
Protected Sub BtnConsultarAsistencia_Click(sender As Object, e As System.EventArgs) Handles BtnConsultarAsistencia.Click
|
||||||
Dim objpersonal As New ClsRH
|
Dim objpersonal As New ClsRH
|
||||||
If objpersonal.GetAsistencias(-1, CveCliente, -1, -1, -1, 1, txtFechaI.Text.Trim.ToDate(), txtFechaF.Text.Trim.ToDate(), UsuarioActual.CveEmpresa) Then
|
If objpersonal.GetAsistencias(-1, CveCliente, -1, -1, -1, 1, -1, txtFechaI.Text.Trim.ToDate(), txtFechaF.Text.Trim.ToDate(), UsuarioActual.CveEmpresa) Then
|
||||||
GVAsistencia.DataSource = objpersonal.DtResultados.FiltraParametros("Fecha IS NOT NULL")
|
GVAsistencia.DataSource = objpersonal.DtResultados.FiltraParametros("Fecha IS NOT NULL")
|
||||||
Else
|
Else
|
||||||
GVAsistencia.DataSource = Nothing
|
GVAsistencia.DataSource = Nothing
|
||||||
|
|||||||
Reference in New Issue
Block a user