-

Compras/Compras.aspx.vb

@@ -18133,7 +18133,7 @@ Partial Class Compras_Compras
         Dim IEPSPS = (TxtIEPSModal.Text.ToDouble / 100)
         Dim IEPSPSIVA = 0
 
-        'If Not (CveCompra > 0 Or CveFactura > 0 Or OCVinculada) Then
+        If Not (CveCompra > 0 Or CveFactura > 0 Or OCVinculada) Then
             'If DdlIVA.SelectedValue.ToDouble = 0 Then DrPS("IVA") = 0 Else DrPS("IVA") = IVA * Total
             DrPS("IVA") = IVA * Total
             DrPS("IVAPorcentaje") = IVA
@@ -18146,7 +18146,7 @@ Partial Class Compras_Compras
             DrPS("IEPSPSIVA") = IEPSPSIVA * Total
             DrPS("IEPSPSIVAPorcentaje") = IEPSPSIVA
             AplicaCalculaTotales = True
-            'End If
+        End If
 
         TmpDT.AcceptChanges()