diff --git a/App_Code/ClsContPAQi.vb b/App_Code/ClsContPAQi.vb index 8ce1484e1..5b006c0b4 100644 --- a/App_Code/ClsContPAQi.vb +++ b/App_Code/ClsContPAQi.vb @@ -2025,6 +2025,8 @@ Public Class ClsContPAQi End With Try + + SqlAdapter.SelectCommand.CommandTimeout = 0 SqlAdapter.Fill(Data) Retorno = True Catch ex As Exception diff --git a/App_Code/ClsNominas.vb b/App_Code/ClsNominas.vb index 3f2ff3384..53cc36e26 100644 --- a/App_Code/ClsNominas.vb +++ b/App_Code/ClsNominas.vb @@ -323,20 +323,7 @@ Public Class ClsNominas End Try Return retorno End Function - Public Function GetNominasSinTimbrar() As Boolean - Dim retorno As Boolean = False - DTSet = New DataSet() - DataAdapter("PA_Nom_NominasSinTimbrar", CommandType.StoredProcedure) - With SqlAdapter.SelectCommand.Parameters - End With - Try - SqlAdapter.Fill(Data) - retorno = True - Catch ex As Exception - OnError("Ocurrió un error al NominasSinTimbrar.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo()) - End Try - Return retorno - End Function + Public Function PersonalISRAnual(CvePersonal As Integer, cveEmpresa As Integer, Ejercicio As Integer) As Boolean Dim retorno As Boolean = False DTSet = New DataSet() diff --git a/Bancos/IE.aspx b/Bancos/IE.aspx index 60a92a6c8..768a9a830 100644 --- a/Bancos/IE.aspx +++ b/Bancos/IE.aspx @@ -211,7 +211,7 @@