diff --git a/App_Code/ClsNominas.vb b/App_Code/ClsNominas.vb index 9da716735..f96d3381a 100644 --- a/App_Code/ClsNominas.vb +++ b/App_Code/ClsNominas.vb @@ -1063,26 +1063,6 @@ Public Class ClsNominas Return Retorno End Function - 'Reporte Personal Acumulados - Public Function GetRepPersonalAcumulados(CvePersonal As Integer, Ejercicio As Integer) As Boolean - Dim Retorno As Boolean = False - DataAdapter("PA_Nom_PersonalAcumuladosGetRep") - - With SqlAdapter.SelectCommand.Parameters - .Add("@CvePersonal", SqlDbType.Int).Value = CvePersonal - .Add("@Ejercicio", SqlDbType.Int).Value = Ejercicio - End With - - Try - SqlAdapter.Fill(Data) - Retorno = True - Catch ex As Exception - OnError("Ocurrió un error al obtener el Reporte Conceptos Acumulados.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo) - End Try - - Return Retorno - End Function - Public Function UpdateNom_NominasDetallesMasivoSueldo(CvePeriodo As Integer, CveConcepto As Integer, Salario As Double, Importe As Double, ImporteExento As Double, ImporteGravado As Double, CveEmpresa As Integer) As Boolean Dim Retorno As Boolean = False DataAdapter("PA_Nom_NominasDetallesUpdateMasivoSueldo") diff --git a/App_Code/ClsPaginas.vb b/App_Code/ClsPaginas.vb index a97e69803..bf5d3e6f6 100644 --- a/App_Code/ClsPaginas.vb +++ b/App_Code/ClsPaginas.vb @@ -3853,7 +3853,7 @@ Public Class ClsPaginas PaginaDict.Add("/Nomina/ISRCalculoAnual.aspx".ToUpper(), 918) PaginaDict.Add("/Nomina/MovimientosSUA.aspx".ToUpper(), 919) - PaginaDict.Add("/Nomina/Acumulados.aspx".ToUpper(), 916) + 'PaginaDict.Add("/Nomina/Acumulados.aspx".ToUpper(), 916) PaginaDict.Add("/RH/CalculoSBC.aspx".ToUpper(), 915) PaginaDict.Add("/Inicio.aspx".ToUpper(), -1) PaginaDict.Add("/reporteador.aspx".ToUpper(), -1) @@ -4728,7 +4728,6 @@ Public Class ClsPaginas PaginaDict.Add("/Nomina/ConceptoNomina.aspx".ToUpper(), 172) PaginaDict.Add("/Nomina/RegistroNomina.aspx".ToUpper(), 173) PaginaDict.Add("/Nomina/RepConceptosAcumulados.aspx".ToUpper(), 174) - PaginaDict.Add("/Nomina/RepPersonalAcumulados.aspx".ToUpper(), 393) PaginaDict.Add("/Nomina/CatPeriodos.aspx".ToUpper(), 177) PaginaDict.Add("/Nomina/Finiquito.aspx".ToUpper(), 197) PaginaDict.Add("/Nomina/CatSatBancos.aspx".ToUpper(), 255)