From 7863cb8444f6a1d1fadbd50859399d14d393a5d0 Mon Sep 17 00:00:00 2001 From: rrene Date: Sat, 7 Oct 2023 11:50:52 -0700 Subject: [PATCH] -- actualzar prepolza con TC --- App_Code/ClsContabilidad.vb | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/App_Code/ClsContabilidad.vb b/App_Code/ClsContabilidad.vb index f5eaa75ab..0f769cbbf 100644 --- a/App_Code/ClsContabilidad.vb +++ b/App_Code/ClsContabilidad.vb @@ -292,7 +292,7 @@ Public Class ClsContabilidad Public Function UpdatePrePolizasDetalle(CvePrePolizaDetalle As Integer, Concepto As String, CveSubProyecto As Integer, IdCtaContable As Integer, TipoMovto As Boolean, ImporteMN As Decimal, Optional CveTipoGasto As Integer = -1, Optional CveConceptoContable As Integer = -1, Optional CveProveedor As Integer = -1, Optional CveCompra As Integer = -1, Optional CvePersonal As Integer = -1, Optional CveCliente As Integer = -1, Optional CveVenta As Integer = -1, - Optional Referencia As String = "-1", Optional CveUsuarioModifico As Integer = -1, Optional CveCuenta As Integer = -1, Optional PorcentajeImpuesto As Decimal = -1, Optional Importe As Decimal = -1, Optional CveIE As Integer = -1) As Boolean + Optional Referencia As String = "-1", Optional CveUsuarioModifico As Integer = -1, Optional CveCuenta As Integer = -1, Optional PorcentajeImpuesto As Decimal = -1, Optional Importe As Decimal = -1, Optional CveIE As Integer = -1, Optional TipoCambio As Decimal = -1) As Boolean Dim Retorno As Boolean = False @@ -305,7 +305,7 @@ Public Class ClsContabilidad .Add("@CveSubProyecto", SqlDbType.Int).Value = CveSubProyecto .Add("@IdCtaContable", SqlDbType.Int).Value = IdCtaContable .Add("@TipoMovto", SqlDbType.Bit).Value = TipoMovto - '.Add("@Importe", SqlDbType.Money).Value = Importe + .Add("@TipoCambio", SqlDbType.Decimal).Value = TipoCambio .Add("@ImporteMN", SqlDbType.Money).Value = ImporteMN .Add("@CveTipoGasto", SqlDbType.Int).Value = CveTipoGasto .Add("@CveConceptoContable", SqlDbType.Int).Value = CveConceptoContable