diff --git a/Compras/Compras.aspx.vb b/Compras/Compras.aspx.vb
index 18b7302e2..05a4556a7 100644
--- a/Compras/Compras.aspx.vb
+++ b/Compras/Compras.aspx.vb
@@ -1041,6 +1041,11 @@ Partial Class Compras_Compras
     End Property
     Private Property RetIVAOriginal As Double
         Get
+
+            If ViewState("RetIVAOriginal") Is Nothing Then
+                ViewState("RetIVAOriginal") = 0
+            End If
+
             Return ViewState("RetIVAOriginal").ToString.ToDouble
         End Get
         Set(value As Double)
@@ -1049,6 +1054,10 @@ Partial Class Compras_Compras
     End Property
     Private Property RetISROriginal As Double
         Get
+            If ViewState("RetISROriginal") Is Nothing Then
+                ViewState("RetISROriginal") = 0
+            End If
+
             Return ViewState("RetISROriginal").ToString.ToDouble
         End Get
         Set(value As Double)
@@ -16695,9 +16704,9 @@ Partial Class Compras_Compras
 
 
 
-        TxtRetIVAModal.Text = FormatoNumero(GvRow.DataKey("RetIVAPorcentaje").ToDouble * 100, 0)
-        TxtRetISRModal.Text = FormatoNumero(GvRow.DataKey("RetISRPorcentaje").ToDouble * 100, 0)
-        TxtIEPSModal.Text = FormatoNumero(GvRow.DataKey("IEPSPSPorcentaje").ToDouble * 100, 0)
+        TxtRetIVAModal.Text = FormatoNumero(GvRow.DataKey("RetIVAPorcentaje").ToDouble * 100, 2)
+        TxtRetISRModal.Text = FormatoNumero(GvRow.DataKey("RetISRPorcentaje").ToDouble * 100, 2)
+        TxtIEPSModal.Text = FormatoNumero(GvRow.DataKey("IEPSPSPorcentaje").ToDouble * 100, 2)
 
         ViewState("RetIVA") = GvRow.DataKey("RetIVAPorcentaje").ToDouble
         ViewState("RetISR") = GvRow.DataKey("RetISRPorcentaje").ToDouble
@@ -16900,14 +16909,14 @@ Partial Class Compras_Compras
                     End If
 
                     If TxtIEPSModal.Text = "" Then
-                        TxtIEPSModal.Text = FormatoNumero(PS("IEPSPorcentaje").ToString.ToDecimal * 100, 0)
+                        TxtIEPSModal.Text = FormatoNumero(PS("IEPSPorcentaje").ToString.ToDecimal * 100, 2)
                     End If
                     ViewState("IEPSPSIVA") = If(PS("IEPSGrabaIVA").ToString = "True", PS("IEPSPorcentaje").ToString.ToDouble, 0)
 
 
                     'TxtIVAModal.Text = FormatoNumero(ViewState("IVAPS").ToString().ToDouble * 100, 0)
-                    TxtRetIVAModal.Text = FormatoNumero(ViewState("RetIVA").ToString().ToDouble * 100, 0)
-                    TxtRetISRModal.Text = FormatoNumero(ViewState("RetISR").ToString().ToDouble * 100, 0)
+                    TxtRetIVAModal.Text = FormatoNumero(ViewState("RetIVA").ToString().ToDouble * 100, 2)
+                    TxtRetISRModal.Text = FormatoNumero(ViewState("RetISR").ToString().ToDouble * 100, 2)
 
 
                     If (CveFactura > 0 Or CveCompra > 0) And TxtIEPS.Text.ToDecimal = 0 And PS("IEPSPorcentaje").ToString.ToDecimal > 0 Then