diff --git a/App_Code/CFDITimbre.vb b/App_Code/CFDITimbre.vb
index 749257ef8..22febac8e 100644
--- a/App_Code/CFDITimbre.vb
+++ b/App_Code/CFDITimbre.vb
@@ -479,14 +479,14 @@ Public Class CFDIComplementoPagos20
 
     Public ReadOnly Property MontoTotalPagos As Decimal
         Get
-            Return (From c In ComplementoPagos Select c.Monto * c.TipoCambioP).Sum()
+            Return (From c In ComplementoPagos Select c.Monto * c.TipoCambioP).Sum().RoundSQL()
         End Get
     End Property
     Public ReadOnly Property TotalTrasladosBaseIVA0 As Decimal
         Get
             Dim Ret As Decimal = 0
             For Each cfd As CFDIComplementoPago In ComplementoPagos
-                Ret = Ret + ((From c In cfd.Traslados Where c.Impuesto = "002" And c.TasaOCuota = 0.0 Select c.BaseMN).Sum() * cfd.TipoCambioP.RoundSQL(4)) 'temporal redondeo a 4, 2023.07.07
+                Ret = Ret + ((From c In cfd.Traslados Where c.Impuesto = "002" And c.TasaOCuota = 0.0 Select c.BaseMN).Sum() * cfd.TipoCambioP)
             Next
             Return Ret.RoundSQL()
         End Get