From 81d1653bab980f637e64484332432d31ab9cc894 Mon Sep 17 00:00:00 2001 From: rrene Date: Tue, 15 Jul 2025 16:35:24 -0700 Subject: [PATCH] -- filtros preasistencia --- App_Code/ClsNominas.vb | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/App_Code/ClsNominas.vb b/App_Code/ClsNominas.vb index 8613d0d3c..f7cd0e891 100644 --- a/App_Code/ClsNominas.vb +++ b/App_Code/ClsNominas.vb @@ -2858,7 +2858,7 @@ Public Class ClsNominas End Try Return retorno End Function - Public Function GetchecadorAsistencia(FechaInicio As DateTime, FechaFin As DateTime, CveEmpresa As Integer) As Boolean + Public Function GetchecadorAsistencia(FechaInicio As DateTime, FechaFin As DateTime, CveSubProyecto As Integer, CveEmpresa As Integer) As Boolean Dim retorno As Boolean = False Try @@ -2867,6 +2867,7 @@ Public Class ClsNominas With SqlAdapter.SelectCommand.Parameters .Add("@FechaInicio", SqlDbType.DateTime).Value = FechaInicio .Add("@FechaFin", SqlDbType.DateTime).Value = FechaFin + .Add("@CveSubProyecto", SqlDbType.Int).Value = CveSubProyecto .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa End With SqlAdapter.Fill(DTSet)