diff --git a/Bancos/PopIEVentas.aspx.vb b/Bancos/PopIEVentas.aspx.vb index 17a1b63e6..ef708b810 100644 --- a/Bancos/PopIEVentas.aspx.vb +++ b/Bancos/PopIEVentas.aspx.vb @@ -2097,15 +2097,15 @@ Partial Class Bancos_PopIEVentas If CveMonedaVenta = 1 And CveMoneda = 2 Then 'factura pesos, pago en dolares - tImporteVenta = ((MovimientoPagar.Total * PorcentajePago) * tipoCambioVenta).RoundSQL + tImporteVenta = ((MovimientoPagar.Total * PorcentajePago) * tipoCambioVentaValuacion).RoundSQL tImportePago = ((MovimientoPagar.Total * PorcentajePago) * tipoCambioVenta / tipoCambioPago).RoundSQL ElseIf CveMonedaVenta = 2 And CveMoneda = 2 Then 'factura dolares, pago en dolares - tImporteVenta = ((MovimientoPagar.Total * PorcentajePago) * tipoCambioVenta).RoundSQL + tImporteVenta = ((MovimientoPagar.Total * PorcentajePago) * tipoCambioVentaValuacion).RoundSQL tImportePago = ((MovimientoPagar.Total * PorcentajePago) * tipoCambioPago).RoundSQL ElseIf CveMonedaVenta = 2 And CveMoneda = 1 Then 'factura dolares, pago en pesos - tImporteVenta = ((MovimientoPagar.Total * PorcentajePago) * tipoCambioVenta).RoundSQL + tImporteVenta = ((MovimientoPagar.Total * PorcentajePago) * tipoCambioVentaValuacion).RoundSQL tImportePago = ((MovimientoPagar.Total * PorcentajePago) * tipoCambioPago).RoundSQL End If