Correcion Timbrado Equivalencia se redondea a 10 en lugar de 6 decimales
This commit is contained in:
@@ -905,7 +905,7 @@ Public Class Timbrado
|
|||||||
'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, 6)
|
||||||
Equivalencia = Math.Round((1 / VentaTipoCambio), 6)
|
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, 6)
|
||||||
Equivalencia = VentaTipoCambio
|
Equivalencia = VentaTipoCambio
|
||||||
|
|||||||
Reference in New Issue
Block a user