-- cambio de librería y redondeo de USD-MXN en complemento de pago

aumento de 6 a 10 decimales
This commit is contained in:
2023-10-31 13:14:05 -07:00
parent 01f7975b46
commit 3b3c94a402
2 changed files with 2 additions and 2 deletions

View File

@@ -904,10 +904,10 @@ Public Class Timbrado
Equivalencia = 1 Equivalencia = 1
'condiciones especiales para el pago en pesos, facturas en moneda extranjera 'condiciones especiales para el pago en pesos, facturas en moneda extranjera
ElseIf MonedaPago = "MXN" AndAlso VentaAbreviaturaSAT <> "MXN" Then ElseIf MonedaPago = "MXN" AndAlso VentaAbreviaturaSAT <> "MXN" Then
VentaTipoCambio = Math.Round(VentaTipoCambio, 6) VentaTipoCambio = Math.Round(VentaTipoCambio, 10)
Equivalencia = Math.Round((1 / VentaTipoCambio), 10) Equivalencia = Math.Round((1 / VentaTipoCambio), 10)
ElseIf MonedaPago = "USD" AndAlso VentaAbreviaturaSAT <> "USD" Then ElseIf MonedaPago = "USD" AndAlso VentaAbreviaturaSAT <> "USD" Then
VentaTipoCambio = Math.Round(VentaTipoCambio, 6) VentaTipoCambio = Math.Round(VentaTipoCambio, 10)
Equivalencia = VentaTipoCambio Equivalencia = VentaTipoCambio
End If End If

Binary file not shown.