Merge branch 'master' of http://jperez@192.168.10.111:8383/SIG.git

Ventas/Ventas.aspx.vb

@@ -4174,7 +4174,10 @@ Partial Class Ventas
                     End If
 
                     If DdlTipoComprobante.SelectedValue.Contiene("Egs", "Dev", "Ant") Then
-                        If ObjVentas.GetVentasAntNC(-1, CveVenta) Then
+                        Dim AplicaAmortizacion As Boolean = False
+                        If DdlTipoComprobante.SelectedValue.Contiene("Ant") Then AplicaAmortizacion = True
+
+                        If ObjVentas.GetVentasAntNC(-1, CveVenta, AplicaAmortizacion) Then
                             GvNC.DataSource = ObjVentas.DtResultados
                             TmpDTNCVinculadas = ObjVentas.DtResultados
                             GvNC.Caption = " <table width='100%'><tr><td style='text-align:center'>Ventas Aplicadas</td></tr></table>"
@@ -4187,7 +4190,7 @@ Partial Class Ventas
                             Next
                         End If
                     End If
-                End If
+                    End If
 
                 If GvNC.Rows.Count > 0 Then
                     ImgAntiPend.Visible = False