From 6e0a47136c045e6783a6d77f78e552ceb237f571 Mon Sep 17 00:00:00 2001
From: cvaldes1201 <cj.valdes@keymonsoft.com>
Date: Tue, 19 Sep 2023 10:01:47 -0600
Subject: [PATCH] =?UTF-8?q?19/09/23=20Cambio=20para=20que=20el=20cargar=20?=
 =?UTF-8?q?d=C3=ADa=20no=20reste=20RMI=20del=20inventario?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 B4A/C_Principal.bas | 2 +-
 B4A/KelloggsV3.b4a  | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/B4A/C_Principal.bas b/B4A/C_Principal.bas
index e49897b..95788c1 100644
--- a/B4A/C_Principal.bas
+++ b/B4A/C_Principal.bas
@@ -1238,7 +1238,7 @@ Sub JobDone(Job As HttpJob)
 				cuantos_pedidosc = c.GetString("CUANTOS")
 				c.Close
 				If cuantos_pedidosc > 0 Then
-					c=Starter.skmt.ExecQUERY("SELECT PE_PROID, SUM(PE_CANT) AS PE_CANT FROM PEDIDO WHERE PE_CLIENTE <> 0 GROUP BY PE_PROID")
+					c=Starter.skmt.ExecQUERY("SELECT PE_PROID, SUM(PE_CANT) AS PE_CANT, PE_PRONOMBRE FROM PEDIDO WHERE PE_CLIENTE <> '0' AND PE_PRONOMBRE NOT LIKE '%CAMBIO%' GROUP BY PE_PROID, PE_PRONOMBRE")
 					If c.RowCount>0 Then
 						For i=0 To c.RowCount -1
 							c.Position=i
diff --git a/B4A/KelloggsV3.b4a b/B4A/KelloggsV3.b4a
index 40750fd..b8eb8f5 100644
--- a/B4A/KelloggsV3.b4a
+++ b/B4A/KelloggsV3.b4a
@@ -161,7 +161,7 @@ Module9=C_NuevoCliente
 NumberOfFiles=51
 NumberOfLibraries=28
 NumberOfModules=27
-Version=12.2
+Version=12.5
 @EndOfDesignText@
 #Region  Project Attributes	
 	#ApplicationLabel: Kelloggs Venta