From dbe970a9a4769ed180361b84495dec43f6f6d1e9 Mon Sep 17 00:00:00 2001
From: rrene <rene.molina@adssistemas.mx>
Date: Tue, 19 Nov 2024 15:49:03 -0700
Subject: [PATCH] =?UTF-8?q?--=20cocnepto=2035,=20para=20sms=20para=20devol?=
 =?UTF-8?q?uci=C3=B3n?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 Inventarios/EntregaAlmacen.aspx.vb | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/Inventarios/EntregaAlmacen.aspx.vb b/Inventarios/EntregaAlmacen.aspx.vb
index dcb6e6ec1..07a695bd1 100644
--- a/Inventarios/EntregaAlmacen.aspx.vb
+++ b/Inventarios/EntregaAlmacen.aspx.vb
@@ -876,7 +876,7 @@ Partial Class Inventarios_EntregaAlmacen
                     Dim FiltroPS As String = ""
                     Select Case ObjInventario.DtResultados.Rows(0)("TipoDocto").ToString()
                         Case "Ing"
-                            Filtro = "CveConcepto IN (3,40)"
+                            Filtro = "CveConcepto IN (3,40,35)"
                         Case "Dev"
                             'cuand es devolucionventa=1, es cancelación de la devolución
                             If EsDevolucionVenta = 1 Then