From 6c6b1837801da5254a3bb9117e53dbb0751cb2f8 Mon Sep 17 00:00:00 2001
From: cvaldes1201 <cj.valdes@keymonsoft.com>
Date: Mon, 1 Jul 2024 10:08:30 -0600
Subject: [PATCH] ...

---
 B4A/C_Principal.bas     |   8 ++++----
 B4A/Durakelo.b4a.meta   |   4 ++--
 B4A/Files/principal.bal | Bin 54141 -> 54141 bytes
 3 files changed, 6 insertions(+), 6 deletions(-)

diff --git a/B4A/C_Principal.bas b/B4A/C_Principal.bas
index 7d84a4a..145b488 100644
--- a/B4A/C_Principal.bas
+++ b/B4A/C_Principal.bas
@@ -232,7 +232,7 @@ Private Sub B4XPage_Created (Root1 As B4XView)
 		'where pc_fecha = ?", Array As String(fecha)
 		C.Position=0
 		b.Position=0
-		L_MONTOD.Text = c.GetString("MONTO_DIA")
+			L_MONTOD.Text = NumberFormat2(c.GetString("MONTO_DIA"), 1, 2, 2, True)
 		l_cuantosc.Text = c.GetString("CLIENTES_DIA")
 		l_cuantosn.Text = b.GetString("CUANTOS")
 		drop = c.GetString("MONTO_DIA") / c.GetString("CLIENTES_DIA")
@@ -399,7 +399,7 @@ Sub B4XPage_Appear
 		'where pc_fecha = ?", Array As String(fecha)
 		C.Position=0
 		b.Position=0
-		L_MONTOD.Text = c.GetString("MONTO_DIA")
+		L_MONTOD.Text = NumberFormat2(c.GetString("MONTO_DIA"), 1, 2, 2, True)
 		l_cuantosc.Text = c.GetString("CLIENTES_DIA")
 		l_cuantosn.Text = b.GetString("CUANTOS")
 	
@@ -2468,7 +2468,7 @@ Sub Resumen_Click
 		If E1.GetString("CUANTOS") > 0 Then
 			c=skmt.ExecQuery2("Select  sum(PE_COSTO_TOT) As MONTO_DIA from pedido where PE_TIPO = ?", Array As String("VENTA"))
 			c.Position = 0
-			L_VENTA.Text = c.GetString("MONTO_DIA")
+			L_VENTA.Text = numberformat2(c.GetString("MONTO_DIA"), 1, 2, 2, true)
 			c.Close
 		Else
 			L_VENTA.Text = 0
@@ -2523,7 +2523,7 @@ Sub Resumen_Click
 		Else
 			ImageView3.Bitmap = LoadBitmap(File.DirAssets, "palomita_verde.png")
 		End If
-		L_TICKPROM.Text =  Round2((c.GetString("MONTO_DIA") / c.GetString("CLIENTES_DIA")),2)
+		L_TICKPROM.Text = numberformat2(Round2((c.GetString("MONTO_DIA") / c.GetString("CLIENTES_DIA")),2), 1, 2, 2, true)
 		If c.GetString("MONTO_DIA") < 2500 Then
 			ImageView5.Bitmap = LoadBitmap(File.DirAssets, "tache_rojo.png")
 		Else if c.GetString("MONTO_DIA") > =  2500  And c.GetString("MONTO_DIA") < 4000 Then
diff --git a/B4A/Durakelo.b4a.meta b/B4A/Durakelo.b4a.meta
index 616b79c..71f6c6b 100644
--- a/B4A/Durakelo.b4a.meta
+++ b/B4A/Durakelo.b4a.meta
@@ -73,6 +73,6 @@ ModuleClosedNodes6=
 ModuleClosedNodes7=
 ModuleClosedNodes8=
 ModuleClosedNodes9=
-NavigationStack=C_Cliente,rb_p7no_CheckedChange,1768,0,C_Cliente,cuest_preguntaContestada,1784,0,C_Cliente,B_VENTA_Click,1243,0,C_Principal,JobDone,1193,2,C_Principal,connecta_Click,1991,3,C_Principal,Resumen_Click,2349,4,Diseñador Visual,Cliente.bal,-100,1,Diseñador Visual,principal.bal,-100,6,Subs,traePromosVendidas,997,0,Subs,traeMaxPromos,983,0
+NavigationStack=C_Principal,connecta_Click,1991,3,Diseñador Visual,Cliente.bal,-100,1,Subs,traePromosVendidas,997,0,Subs,procesaPromocion,1010,0,Subs,traeMaxPromos,983,0,C_Principal,JobDone,1353,2,C_Principal,B4XPage_Created,228,0,C_Principal,B4XPage_Appear,395,0,Diseñador Visual,principal.bal,-100,6,C_Principal,Resumen_Click,2464,4
 SelectedBuild=0
-VisibleModules=2,10,4,19,5,6,8,9,11,24,23
+VisibleModules=2,10,4,19,5,6,8,9,11,24
diff --git a/B4A/Files/principal.bal b/B4A/Files/principal.bal
index e38b189e34066424608417a6a3a624bb42e0751c..cc3279be2875075803663b7a11bce5d38d8906d3 100644
GIT binary patch
delta 72
zcmeynjQQ^}<_)zgCWmd-oZQ!}H+h4p|77KrcP2mEs5!ZQGuLLLRXqw&Nv_G7OEo9^
WZ<F0@ewvjTtm0lf*XI0le5?QwE+O9l

delta 71
zcmV-N0J#7CrUU(^1F(IllL>4ola7Nfldv^UlOw6z0X(v*z95tDw+WLdT_BT=g9?)=
dr74q7wjHxK%LM}gP?La2D3jiY3bSv{4h53+9-9CF