From 14cab8d59718b6110f2d21c09935bd990fd91ba1 Mon Sep 17 00:00:00 2001
From: Raul Pimienta <raul.pimienta@adssistemas.mx>
Date: Sat, 31 Aug 2019 13:24:23 -0700
Subject: [PATCH] Registrar en 0 mercncia en transito nc

---
 Compras/Compras.aspx.vb | 4 +---
 1 file changed, 1 insertion(+), 3 deletions(-)

diff --git a/Compras/Compras.aspx.vb b/Compras/Compras.aspx.vb
index 02bb186f9..01188dd7f 100644
--- a/Compras/Compras.aspx.vb
+++ b/Compras/Compras.aspx.vb
@@ -6207,7 +6207,6 @@ Partial Class Compras_Compras
 
                                                                 Concepto = $"{NombreProveedor} {TxtSerie.Text} - {TxtFolio.Text}"
 
-                                                                If importeMovimiento <> 0 Then
                                                                     'Conta ContPAQ
                                                                     If IdCtaContable = 0 Then
                                                                         CuentasContablesInvalidas.Append("<br>" & GlobalDTContaConceptosContables(-1).FiltroPrimero(String.Format("CveConceptoContable = {0}", 68))("ConceptoContable").ToString)
@@ -6224,9 +6223,8 @@ Partial Class Compras_Compras
                                                                     End If
 
 
-                                                                End If
 
-                                                                Dim ContienePSNeteoBonif As Boolean = False
+                                                                    Dim ContienePSNeteoBonif As Boolean = False
                                                                 For Each Dr As DataRow In TmpDT.Rows
                                                                     If Dr("CveClasificacion").ToString.ToEntero.Contiene(20319) Then 'clasificación de Bonificación, no se incluirá en el neteo
                                                                         ContienePSNeteoBonif = True