cambios en resdia

B4A/C_Principal.bas

@@ -160,6 +160,8 @@ Sub Class_Globals
 	Private l_monto_kc As Label
 	Private l_version As Label
 	Private l_montoColgateResumen As Label
+	Private l_nes_humedos As Label
+	Private l_nes_secos As Label
 End Sub
 
 Sub initialize
@@ -2366,6 +2368,21 @@ Sub Resumen_Click
 		cRes = cRes + r.GetString("PE_COSTO_TOT")
 	Loop
 	l_montoColgateResumen.Text = NumberFormat2(cRes, 1, 2, 2, True)
+	
+	Private r2 As ResultSet = Starter.skmt.ExecQuery($"SELECT CAT_GP_CLASIF, PEDIDO.* FROM PEDIDO JOIN CAT_GUNAPROD WHERE CAT_GP_CLASIF = 'NESTLE' AND CAT_GP_TIPO LIKE '%HUMEDOS%' AND PE_PROID = CAT_GP_ID"$)
+	Private cRes2 As String = 0
+	Do While r2.NextRow
+		cRes2 = cRes2 + r2.GetString("PE_COSTO_TOT")
+	Loop
+	l_nes_humedos.Text = NumberFormat2(cRes2, 1, 2, 2, True)
+	
+	Private r3 As ResultSet = Starter.skmt.ExecQuery($"SELECT CAT_GP_CLASIF, PEDIDO.* FROM PEDIDO JOIN CAT_GUNAPROD WHERE CAT_GP_CLASIF = 'NESTLE' AND CAT_GP_TIPO LIKE '%SECOS%' AND PE_PROID = CAT_GP_ID"$)
+	Private cRes3 As String = 0
+	Do While r3.NextRow
+		cRes3 = cRes3 + r3.GetString("PE_COSTO_TOT")
+	Loop
+	l_nes_secos.Text = NumberFormat2(cRes3, 1, 2, 2, True)
+	
 	b=skmt.ExecQuery("Select count(*) as CUANTOS from pedido_cliente where pc_cliente <> 0")
 	b.Position=0
 	Cuantos = b.GetString("CUANTOS")

B4A/Durakelo.b4a

@@ -589,47 +589,49 @@ File627=infonavit1.jpg
 File628=itembuttonblue.png
 File629=k.png
 File63=118.png
-File630=kelloggs.png
-File631=keymon_logo.png
-File632=kmt.db
-File633=login.bal
-File634=logo sanfer.jpg
-File635=Logo_durakelo_192xx192.jpeg
-File636=logo_exitus1.jpg
-File637=MainPage.bal
-File638=Malo.jpg
-File639=mapa.bal
+File630=K-b27c0809.png
+File631=kelloggs.png
+File632=keymon_logo.png
+File633=kmt.db
+File634=login.bal
+File635=logo sanfer.jpg
+File636=Logo_durakelo_192xx192.jpeg
+File637=logo_exitus1.jpg
+File638=MainPage.bal
+File639=Malo.jpg
 File64=118marker-rojo.png
-File640=mapa_rutas.bal
-File641=nota.bal
-File642=NoVenta.bal
-File643=nuevocliente.bal
-File644=palomita_verde.png
-File645=pedido.bal
-File646=pedidoitem.bal
-File647=planfia_logo.png
-File648=planfia_logo_old.png
-File649=planfia_logo_old2.png
+File640=mapa.bal
+File641=mapa_rutas.bal
+File642=nestle.png
+File643=nota.bal
+File644=NoVenta.bal
+File645=nuevocliente.bal
+File646=palomita_verde.png
+File647=pedido.bal
+File648=pedidoitem.bal
+File649=planfia_logo.png
 File65=118marker-verde.png
-File650=principal.bal
-File651=proditem.bal
-File652=productos.bal
-File653=productos.bal.old
-File654=promociones.bal
-File655=qr.bal
-File656=rechazo.jpg
-File657=rojo.png
-File658=salma.jpg
-File659=salma.png
+File650=planfia_logo_old.png
+File651=planfia_logo_old2.png
+File652=principal.bal
+File653=proditem.bal
+File654=productos.bal
+File655=productos.bal.old
+File656=promociones.bal
+File657=qr.bal
+File658=rechazo.jpg
+File659=rojo.png
 File66=119.png
-File660=senial.jpg
-File661=sync.png
-File662=tache_rojo.png
-File663=telefonos.bal
-File664=ticketsDia.bal
-File665=Tiendita.jpg
-File666=unilever.jpg
-File667=verde.png
+File660=salma.jpg
+File661=salma.png
+File662=senial.jpg
+File663=sync.png
+File664=tache_rojo.png
+File665=telefonos.bal
+File666=ticketsDia.bal
+File667=Tiendita.jpg
+File668=unilever.jpg
+File669=verde.png
 File67=119marker-rojo.png
 File68=119marker-verde.png
 File69=11marker-rojo.png
@@ -1297,6 +1299,8 @@ FileGroup664=Default Group
 FileGroup665=Default Group
 FileGroup666=Default Group
 FileGroup667=Default Group
+FileGroup668=Default Group
+FileGroup669=Default Group
 FileGroup67=Default Group
 FileGroup68=Default Group
 FileGroup69=Default Group
@@ -1390,7 +1394,7 @@ Module6=C_Cuestionario
 Module7=C_Historico
 Module8=C_Nota
 Module9=C_NoVenta
-NumberOfFiles=667
+NumberOfFiles=669
 NumberOfLibraries=31
 NumberOfModules=24
 Version=12.8
@@ -1398,7 +1402,7 @@ Version=12.8
 #Region  Project Attributes 
 	#ApplicationLabel: Durakelo
 	#VersionCode: 1
-	#VersionName: 4.06.08
+	#VersionName: 4.06.16
 	'SupportedOrientations possible values: unspecified, landscape or portrait.
 	#SupportedOrientations: portrait
 	#CanInstallToExternalStorage: False

B4A/Durakelo.b4a.meta

@@ -73,6 +73,6 @@ ModuleClosedNodes6=
 ModuleClosedNodes7=
 ModuleClosedNodes8=
 ModuleClosedNodes9=
-NavigationStack=C_Cliente,initialize,167,0,C_Cliente,Class_Globals,163,0,C_Cliente,B4XPage_Created,174,0,C_Cliente,B4XPage_CloseRequest,497,0,C_Cliente,rb_p7no_CheckedChange,1768,0,C_Cliente,cuest_preguntaContestada,1784,0,C_Cliente,B_VENTA_Click,1243,0,C_Principal,Class_Globals,1,0,C_Principal,connecta_Click,1991,3,C_Principal,JobDone,1218,2
+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
 SelectedBuild=0
-VisibleModules=2,10,4,19,5,6,8,9,11,24
+VisibleModules=2,10,4,19,5,6,8,9,11,24,23