Correcion iva no cocide al genrar nota de credito

2020-01-25 11:30:15 -07:00
parent 3de574d1f8
commit 5375506fce
2 changed files with 52 additions and 38 deletions
--- a/Compras/Compras.aspx.vb
+++ b/Compras/Compras.aspx.vb
@@ -8431,8 +8431,12 @@ Partial Class Compras_Compras
                                                    If Not gvr.DataKey("TipoDocto").Contiene("NC", "DEV", "Ant") Then
                                                        If UsuarioActual.Empresa.Funcionalidad(521) = "1" Then
                                                            If sumaAmortizacion = CompraSaldo Then
-                                                                ImporteMovimiento = TxtIVA.Text.ToDecimal
-                                                                IVACompleto = True
+                                                                ImporteMovimiento = TxtIVA.Text.ToDecimal
+
+                                                                If ImporteMovimiento > 0 Then
+                                                                    IVACompleto = True
+                                                                End If
+
                                                            Else
                                                                ImporteMovimiento = 0
                                                            End If