From 5cee00fde0a1a72609a46ee4c87cfa0bba255d7f Mon Sep 17 00:00:00 2001 From: rrene Date: Thu, 4 Jan 2024 07:32:35 -0700 Subject: [PATCH] - --- App_Code/ClsClientes.vb | 2 +- App_Code/ClsGenerales.vb | 11 ++--------- 2 files changed, 3 insertions(+), 10 deletions(-) diff --git a/App_Code/ClsClientes.vb b/App_Code/ClsClientes.vb index 1722b4293..60f56f1b0 100644 --- a/App_Code/ClsClientes.vb +++ b/App_Code/ClsClientes.vb @@ -1830,7 +1830,7 @@ Public Class ClsClientes SqlAdapter.Fill(Data) Retorno = True Catch ex As Exception - OnError("Ocurrió un error al obtener las diferencias.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo) + OnError("Ocurrió un error al obtener nombre de corporativos.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo) End Try Return Retorno diff --git a/App_Code/ClsGenerales.vb b/App_Code/ClsGenerales.vb index e1eb9a7be..b287f64dc 100644 --- a/App_Code/ClsGenerales.vb +++ b/App_Code/ClsGenerales.vb @@ -3824,7 +3824,6 @@ Public Class ClsGenerales End Try Return Retorno End Function - Public Function CancelarTimbreTimbrado(CveTimbre As Integer, FechaCancelacion As DateTime, CvePACCancelacion As Integer, SelloCancelacion As String, CveUsuario As Integer, CveEmpresa As Integer) As Boolean Dim Retorno As Boolean = False DataAdapter("PA_Gral_TimbreTimbradoCancelar") @@ -3846,10 +3845,7 @@ Public Class ClsGenerales OnError("Ocurrió un error al actualizar el timbrado", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo) End Try Return Retorno - End Function - - - + End Function Public Function RemoveGralTimbre(CveTimbre As Integer, CveEmpresa As Integer) As Boolean Dim Retorno As Boolean = False DataAdapter("PA_Gral_TimbreRemove") @@ -3868,9 +3864,7 @@ Public Class ClsGenerales Return Retorno End Function - Public Function GetGralMovimientosDetalleTimbre(CveTimbre As Integer, CveEmpresa As Integer) As Boolean - - + Public Function GetGralMovimientosDetalleTimbre(CveTimbre As Integer, CveEmpresa As Integer) As Boolean Dim Retorno As Boolean = False DataAdapter("PA_Gral_MovimientosDetalleTimbreGet") @@ -3887,7 +3881,6 @@ Public Class ClsGenerales End Try Return Retorno - End Function Public Function AddInvEntregaAlmacenRuta(CveSubProyecto As Integer, CveDireccionOrigen As Integer, CveDireccionDestino As Integer, CveMovimientoAlmacen As Integer, CveChofer As Integer, CveCamion As Integer, FechaEntrega As Date, FechaLlegada As DateTime, Tipo As String,