cheveguerra/Kelloggs_v4
1
0
Fork 0
mirror of https://github.com/KeymonSoft/Kelloggs_v4.git synced 2026-04-17 18:26:11 +00:00
Code Issues Packages Projects Releases Wiki Activity

- VERSION 5.09.01

Browse Source 
- Se quito el almacen y ruta en duro al traer los datos de Trade Spending
- Se corrigio la barra de busqueda de productos que no regresaba los datos correctos.
This commit is contained in:
Jose Alberto Guerra Ugalde
2025-09-09 15:52:46 -06:00
parent 42eeb55fe5
commit d54ebd7994
9 changed files with 462 additions and 422 deletions
Download Patch File Download Diff File Expand all files Collapse all files

42
B4A/B4XMainPage.bas
View File

@@ -118,6 +118,8 @@ Sub Class_Globals
Private p_importarBDWA As Panel
Private cb_importarBDWA As CheckBox
' Type TResultado(Tag As String, Success As Boolean, resultado As DBResult, ErrorMessage As String)
Private Label4 As Label
Private clicked As Int = 0
End Sub
Public Sub Initialize
@@ -393,6 +395,7 @@ End Sub
Sub B4XPage_Appear
Log(">>>>>> APPEAR - INICIAMOS MAIN PAGE <<<<<<<<<")
clicked = 0
If Not(MES1.IsInitialized) Then MES1.Initialize(Me, "MES1")
Log(DateTime.GetDayOfWeek(DateTime.Now))
kh.RD_Init
@@ -468,11 +471,6 @@ Sub B4XPage_Appear
LogColor("Permisos de almacenamiento: " & MES1.HasPermission, Colors.Magenta)
' If MES1.HasPermission Then kh.revisaSiExisteRespaldo '' Se comenta causa el error de que en el primer cliente,al guardar la venta se trabe la aplicacion!!
End If
Private cu As Cursor = Starter.skmt.ExecQuery("select USUARIO from USUARIOA")
If cu.RowCount > 0 Then
cu.Position = 0
If cu.GetString("USUARIO") <> "" Then user.Text = cu.GetString("USUARIO")
End If
DateTime.DateFormat = "yyyy-MM-dd HH:mm:ss"
Starter.skmt.ExecNonQuery($"insert into versiones (version, fecha) values ('${Application.VersionName}', '${DateTime.Date(DateTime.Now)}')"$)
End Sub
@@ -592,6 +590,9 @@ Sub JobDone(Job As HttpJob)
p_importarBDWA.Visible = False
End If
End If
If result.tag = "traeConexion" Then
Subs.logJobDoneResultados(result)
End If
End If
Job.Release
End If
@@ -1030,7 +1031,32 @@ Sub GetFecha
End Sub
Private Sub ImageView1_LongClick
Log("###### TRAEMOS FECHA #######")
GetFecha
' Log("###### TRAEMOS FECHA #######")
' GetFecha
End Sub
Log("traeConexion")
Private reqManagerX As DBRequestManager
reqManagerX.Initialize(Me, "http://keymon.net:9010/DB2")
Private cmdX As DBCommand
cmdX.Initialize
cmdX.Name = "traeConexion"
cmdX.Parameters = Array As Object()
reqManagerX.ExecuteQuery(cmdX, 0, "traeConexion")
End Sub
Sub ponUsuario
Private cu As Cursor = Starter.skmt.ExecQuery("select USUARIO from USUARIOA")
If cu.RowCount > 0 Then
cu.Position = 0
If cu.GetString("USUARIO") <> "" Then user.Text = cu.GetString("USUARIO")
End If
End Sub
Private Sub Label4_Click
clicked = clicked + 1
Log(clicked)
If clicked >= 5 Then
clicked = 0
ponUsuario
End If
End Sub

2
B4A/C_Cliente.bas
View File

@@ -855,7 +855,7 @@ Sub GPS_LocationChanged (Location1 As Location)
End If
laDist= Location1.DistanceTo(ubicacionTienda)
l_ubicacion2.Text = $"Dist: $1.0{laDist} mts."$
If laDist > 300 Then
If laDist > 50 Then ' Antes 300
l_ubicacion2.TextColor = Colors.Red
dentroDeGeocerca = False
Else

4
B4A/C_Principal.bas
View File

@@ -943,7 +943,7 @@ Sub cargar_Click
cmd.Initialize
cmd.Name = "traeInfoTrendSpending"
' cmd.Parameters = Array As Object(e_ruta.text, ALMACEN)
cmd.Parameters = Array As Object(238, 2)
cmd.Parameters = Array As Object(e_ruta.text, ALMACEN)
reqManager.ExecuteQuery(cmd , 0, "trendSpending")
LogColor($"Trade Spending: Ruta: ${e_ruta.text}, almacen: ${ALMACEN}"$, Colors.red)
@@ -2085,6 +2085,8 @@ Sub JobDone(Job As HttpJob)
Dim HIST_TSS_GRUPO As String = records(RESULT.COLUMNS.GET("HIST_TSS_GRUPO"))
Starter.skmt.ExecNonQuery2("INSERT INTO HIST_TREND_SPENDING_SEMANAL (HIST_TSS_RUTA, HIST_TSS_IDALMACEN, HIST_TSS_TIPO, HIST_TSS_SEMANA1, HIST_TSS_SEMANA1_ACUM, HIST_TSS_SEMANA2, HIST_TSS_SEMANA2_ACUM, HIST_TSS_SEMANA3, HIST_TSS_SEMANA3_ACUM, HIST_TSS_SEMANA4, HIST_TSS_SEMANA4_ACUM, HIST_TSS_SEMANA5, HIST_TSS_SEMANA5_ACUM, HIST_TSS_SEMANA6, HIST_TSS_SEMANA6_ACUM, HIST_TSS_GRUPO) VALUES (?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?)", Array As Object (HIST_TSS_RUTA, HIST_TSS_IDALMACEN, HIST_TSS_TIPO, HIST_TSS_SEMANA1, HIST_TSS_SEMANA1_ACUM, HIST_TSS_SEMANA2, HIST_TSS_SEMANA2_ACUM, HIST_TSS_SEMANA3, HIST_TSS_SEMANA3_ACUM, HIST_TSS_SEMANA4, HIST_TSS_SEMANA4_ACUM, HIST_TSS_SEMANA5, HIST_TSS_SEMANA5_ACUM, HIST_TSS_SEMANA6, HIST_TSS_SEMANA6_ACUM, HIST_TSS_GRUPO))
Next
LogColor("GUARDAMOS INFO DE TRADE SPENDING", Colors.Blue)
Subs.logJobDoneResultados(RESULT)
ts.Initialize(Me, "ts", Starter.skmt)
End If
End If

16
B4A/C_Productos.bas
View File

@@ -1487,7 +1487,11 @@ Sub Busca_TextChanged (Old As String, New As String)
listaProds.Initialize
listaHints.Initialize
Sleep(0)
Dim p As ResultSet = Starter.skmt.ExecQuery($"select CAT_GP_ID, CAT_GP_NOMBRE, CAT_GP_ALMACEN, CAT_GP_PRECIO, CAT_GP_TIPO, CAT_GP_TIPOPROD from ${Subs.traeTablaProds(Starter.tipov)} where CAT_GP_NOMBRE like '%${New}%' and CAT_GP_PRECIO > 0 AND CAT_GP_ALMACEN > 0 and CAT_GP_CLASIF <> 'PROMOS' and CAT_GP_PROMOCION <> '1' order by CAT_GP_NOMBRE"$)
If clienteId = "0" Then
Dim p As ResultSet = Starter.skmt.ExecQuery($"select CAT_GP_ID, CAT_GP_NOMBRE, CAT_GP_ALMACEN, CAT_GP_PRECIO, CAT_GP_TIPO, CAT_GP_TIPOPROD from ${Subs.traeTablaProds(Starter.tipov)} where CAT_GP_NOMBRE like '%${New}%' and CAT_GP_PRECIO > 0 And CAT_GP_CLASIF <> 'PROMOS' ORDER BY CAT_GP_TIPOPROD2 DESC, CAT_GP_NOMBRE"$)
Else
Dim p As ResultSet = Starter.skmt.ExecQuery($"select CAT_GP_ID, CAT_GP_NOMBRE, CAT_GP_ALMACEN, CAT_GP_PRECIO, CAT_GP_TIPO, CAT_GP_TIPOPROD from ${Subs.traeTablaProds(Starter.tipov)} where CAT_GP_NOMBRE like '%${New}%' and CAT_GP_PRECIO > 0 And CAT_GP_CLASIF <> 'PROMOS' and CAT_GP_PROMOCION <> '1' ORDER BY CAT_GP_TIPOPROD2 DESC, CAT_GP_NOMBRE"$)
End If
' c2 = Starter.skmt.ExecQuery2("select CAT_GP_ID, CAT_GP_NOMBRE, CAT_GP_PRECIO, CAT_GP_ALMACEN, CAT_GP_IMG from " & query & " where CAT_GP_ALMACEN > 0 AND CAT_GP_TIPO = ? AND CAT_GP_SUBTIPO =? AND CAT_GP_TIPOPROD <> 1 and (length(CAT_GP_CODPROMO) = 1 OR CAT_GP_CODPROMO = CAT_GP_ID) ", Array As String( Value, Value)
Log("Llamamos LlenaProdsLL")
LlenaProdsLL(p, Null)
@@ -1515,13 +1519,17 @@ Sub LlenaProdsLL(p As ResultSet, extra As String)
' Log("CANTSMAP: " & cantsMap)
pe.Close
End If
' Log(p.IsInitialized)
Log(p.IsInitialized)
' If query = "" Or query = Null Then query = "cat_gunaprod2"
If p.IsInitialized Then
Log($"YA HAY RESULTSET ${p.RowCount}"$)
Log($"RECIBIMOS RESULTSET ${p.RowCount}"$)
Else
' Log("NO HAY RESULTSET")
Dim p As ResultSet = Starter.skmt.ExecQuery($"select CAT_GP_ID, CAT_GP_NOMBRE, CAT_GP_ALMACEN, CAT_GP_PRECIO, CAT_GP_TIPO, CAT_GP_TIPOPROD from ${Subs.traeTablaProds(Starter.tipov)} where CAT_GP_PRECIO > 0 And CAT_GP_CLASIF <> 'PROMOS' and CAT_GP_PROMOCION <> '1' ORDER BY CAT_GP_TIPOPROD2 DESC, CAT_GP_NOMBRE"$)
If clienteId = "0" Then
Dim p As ResultSet = Starter.skmt.ExecQuery($"select CAT_GP_ID, CAT_GP_NOMBRE, CAT_GP_ALMACEN, CAT_GP_PRECIO, CAT_GP_TIPO, CAT_GP_TIPOPROD from ${Subs.traeTablaProds(Starter.tipov)} where CAT_GP_PRECIO > 0 And CAT_GP_CLASIF <> 'PROMOS' ORDER BY CAT_GP_TIPOPROD2 DESC, CAT_GP_NOMBRE"$)
Else
Dim p As ResultSet = Starter.skmt.ExecQuery($"select CAT_GP_ID, CAT_GP_NOMBRE, CAT_GP_ALMACEN, CAT_GP_PRECIO, CAT_GP_TIPO, CAT_GP_TIPOPROD from ${Subs.traeTablaProds(Starter.tipov)} where CAT_GP_PRECIO > 0 And CAT_GP_CLASIF <> 'PROMOS' and CAT_GP_PROMOCION <> '1' ORDER BY CAT_GP_TIPOPROD2 DESC, CAT_GP_NOMBRE"$)
End If
' If Starter.Logger Then Log($"select CAT_GP_ID, CAT_GP_NOMBRE, CAT_GP_ALMACEN, CAT_GP_PRECIO, CAT_GP_TIPO, CAT_GP_TIPOPROD from ${Subs.traeTablaProds(Starter.tipov)} where CAT_GP_PRECIO > 0 And CAT_GP_CLASIF <> 'PROMOS' and CAT_GP_PROMOCION <> '1' ORDER BY CAT_GP_TIPOPROD2 DESC, CAT_GP_NOMBRE"$)
' Log(p.RowCount & " - " & Subs.traeTablaProds(Starter.tipov))
End If

BIN
B4A/Files/compra_y_gana.png Normal file
View File

Binary file not shown.
Side by Side

After

Width:  |  Height:  |  Size: 498 KiB

BIN
B4A/Files/qr_kelloggs.png Normal file
View File

Binary file not shown.
Side by Side

After

Width:  |  Height:  |  Size: 166 KiB

809
B4A/KelloggsV4.b4a
View File

@@ -1,425 +1,427 @@
Build1=Default,kelloggsV2.keymon.lat,HU2_PUBLIC
File1=alcancia.png
File10=cacahuates_blanco2.png
File100=marker-azul-33.png
File101=marker-azul-34.png
File102=marker-azul-35.png
File103=marker-azul-36.png
File104=marker-azul-37.png
File105=marker-azul-38.png
File106=marker-azul-39.png
File107=marker-azul4.png
File108=marker-azul-4.png
File109=marker-azul-40.png
File100=marker-azul-32.png
File101=marker-azul-33.png
File102=marker-azul-34.png
File103=marker-azul-35.png
File104=marker-azul-36.png
File105=marker-azul-37.png
File106=marker-azul-38.png
File107=marker-azul-39.png
File108=marker-azul4.png
File109=marker-azul-4.png
File11=cacahuates_blanco3.png
File110=marker-azul-41.png
File111=marker-azul-42.png
File112=marker-azul-43.png
File113=marker-azul-44.png
File114=marker-azul-45.png
File115=marker-azul-46.png
File116=marker-azul-47.png
File117=marker-azul-48.png
File118=marker-azul-49.png
File119=marker-azul5.png
File110=marker-azul-40.png
File111=marker-azul-41.png
File112=marker-azul-42.png
File113=marker-azul-43.png
File114=marker-azul-44.png
File115=marker-azul-45.png
File116=marker-azul-46.png
File117=marker-azul-47.png
File118=marker-azul-48.png
File119=marker-azul-49.png
File12=cacahuates_chico.png
File120=marker-azul-5.png
File121=marker-azul-50.png
File122=marker-azul-51.png
File123=marker-azul-52.png
File124=marker-azul-53.png
File125=marker-azul-54.png
File126=marker-azul-55.png
File127=marker-azul-56.png
File128=marker-azul-57.png
File129=marker-azul-58.png
File120=marker-azul5.png
File121=marker-azul-5.png
File122=marker-azul-50.png
File123=marker-azul-51.png
File124=marker-azul-52.png
File125=marker-azul-53.png
File126=marker-azul-54.png
File127=marker-azul-55.png
File128=marker-azul-56.png
File129=marker-azul-57.png
File13=cacahuates_original.jpeg
File130=marker-azul-59.png
File131=marker-azul-6.png
File132=marker-azul-60.png
File133=marker-azul-61.png
File134=marker-azul-62.png
File135=marker-azul-63.png
File136=marker-azul-64.png
File137=marker-azul-65.png
File138=marker-azul-66.png
File139=marker-azul-67.png
File130=marker-azul-58.png
File131=marker-azul-59.png
File132=marker-azul-6.png
File133=marker-azul-60.png
File134=marker-azul-61.png
File135=marker-azul-62.png
File136=marker-azul-63.png
File137=marker-azul-64.png
File138=marker-azul-65.png
File139=marker-azul-66.png
File14=cacahuates_original2.bmp
File140=marker-azul-68.png
File141=marker-azul-69.png
File142=marker-azul-7.png
File143=marker-azul-70.png
File144=marker-azul-71.png
File145=marker-azul-72.png
File146=marker-azul-73.png
File147=marker-azul-74.png
File148=marker-azul-75.png
File149=marker-azul-76.png
File140=marker-azul-67.png
File141=marker-azul-68.png
File142=marker-azul-69.png
File143=marker-azul-7.png
File144=marker-azul-70.png
File145=marker-azul-71.png
File146=marker-azul-72.png
File147=marker-azul-73.png
File148=marker-azul-74.png
File149=marker-azul-75.png
File15=cacahuates_original2.jpg
File150=marker-azul-77.png
File151=marker-azul-78.png
File152=marker-azul-79.png
File153=marker-azul-8.png
File154=marker-azul-80.png
File155=marker-azul-81.png
File156=marker-azul-82.png
File157=marker-azul-83.png
File158=marker-azul-84.png
File159=marker-azul-85.png
File150=marker-azul-76.png
File151=marker-azul-77.png
File152=marker-azul-78.png
File153=marker-azul-79.png
File154=marker-azul-8.png
File155=marker-azul-80.png
File156=marker-azul-81.png
File157=marker-azul-82.png
File158=marker-azul-83.png
File159=marker-azul-84.png
File16=cacahuates_original3.bmp
File160=marker-azul-86.png
File161=marker-azul-87.png
File162=marker-azul-88.png
File163=marker-azul-89.png
File164=marker-azul-9.png
File165=marker-azul-90.png
File166=marker-azul-91.png
File167=marker-azul-92.png
File168=marker-azul-93.png
File169=marker-azul-94.png
File160=marker-azul-85.png
File161=marker-azul-86.png
File162=marker-azul-87.png
File163=marker-azul-88.png
File164=marker-azul-89.png
File165=marker-azul-9.png
File166=marker-azul-90.png
File167=marker-azul-91.png
File168=marker-azul-92.png
File169=marker-azul-93.png
File17=carrito.png
File170=marker-azul-95.png
File171=marker-azul-96.png
File172=marker-azul-97.png
File173=marker-azul-98.png
File174=marker-azul-99.png
File175=marker-rojo.png
File176=marker-rojo-0.png
File177=marker-rojo1.png
File178=marker-rojo-1.png
File179=marker-rojo-10.png
File170=marker-azul-94.png
File171=marker-azul-95.png
File172=marker-azul-96.png
File173=marker-azul-97.png
File174=marker-azul-98.png
File175=marker-azul-99.png
File176=marker-rojo.png
File177=marker-rojo-0.png
File178=marker-rojo1.png
File179=marker-rojo-1.png
File18=checklist.bal
File180=marker-rojo-100.png
File181=marker-rojo-11.png
File182=marker-rojo-12.png
File183=marker-rojo-13.png
File184=marker-rojo-14.png
File185=marker-rojo-15.png
File186=marker-rojo-16.png
File187=marker-rojo-17.png
File188=marker-rojo-18.png
File189=marker-rojo-19.png
File180=marker-rojo-10.png
File181=marker-rojo-100.png
File182=marker-rojo-11.png
File183=marker-rojo-12.png
File184=marker-rojo-13.png
File185=marker-rojo-14.png
File186=marker-rojo-15.png
File187=marker-rojo-16.png
File188=marker-rojo-17.png
File189=marker-rojo-18.png
File19=checks.bal
File190=marker-rojo2.png
File191=marker-rojo-2.png
File192=marker-rojo-20.png
File193=marker-rojo-21.png
File194=marker-rojo-22.png
File195=marker-rojo-23.png
File196=marker-rojo-24.png
File197=marker-rojo-25.png
File198=marker-rojo-26.png
File199=marker-rojo-27.png
File190=marker-rojo-19.png
File191=marker-rojo2.png
File192=marker-rojo-2.png
File193=marker-rojo-20.png
File194=marker-rojo-21.png
File195=marker-rojo-22.png
File196=marker-rojo-23.png
File197=marker-rojo-24.png
File198=marker-rojo-25.png
File199=marker-rojo-26.png
File2=alert2.png
File20=cliente.bal
File200=marker-rojo-28.png
File201=marker-rojo-29.png
File202=marker-rojo-3.png
File203=marker-rojo-30.png
File204=marker-rojo-31.png
File205=marker-rojo-32.png
File206=marker-rojo-33.png
File207=marker-rojo-34.png
File208=marker-rojo-35.png
File209=marker-rojo-36.png
File200=marker-rojo-27.png
File201=marker-rojo-28.png
File202=marker-rojo-29.png
File203=marker-rojo-3.png
File204=marker-rojo-30.png
File205=marker-rojo-31.png
File206=marker-rojo-32.png
File207=marker-rojo-33.png
File208=marker-rojo-34.png
File209=marker-rojo-35.png
File21=cliente.bal.bak
File210=marker-rojo-37.png
File211=marker-rojo-38.png
File212=marker-rojo-39.png
File213=marker-rojo-4.png
File214=marker-rojo-40.png
File215=marker-rojo-41.png
File216=marker-rojo-42.png
File217=marker-rojo-43.png
File218=marker-rojo-44.png
File219=marker-rojo-45.png
File210=marker-rojo-36.png
File211=marker-rojo-37.png
File212=marker-rojo-38.png
File213=marker-rojo-39.png
File214=marker-rojo-4.png
File215=marker-rojo-40.png
File216=marker-rojo-41.png
File217=marker-rojo-42.png
File218=marker-rojo-43.png
File219=marker-rojo-44.png
File22=clientes.bal
File220=marker-rojo-46.png
File221=marker-rojo-47.png
File222=marker-rojo-48.png
File223=marker-rojo-49.png
File224=marker-rojo-5.png
File225=marker-rojo-50.png
File226=marker-rojo-51.png
File227=marker-rojo-52.png
File228=marker-rojo-53.png
File229=marker-rojo-54.png
File23=detalle_promo.bal
File230=marker-rojo-55.png
File231=marker-rojo-56.png
File232=marker-rojo-57.png
File233=marker-rojo-58.png
File234=marker-rojo-59.png
File235=marker-rojo-6.png
File236=marker-rojo-60.png
File237=marker-rojo-61.png
File238=marker-rojo-62.png
File239=marker-rojo-63.png
File24=durakelo.png
File240=marker-rojo-64.png
File241=marker-rojo-65.png
File242=marker-rojo-66.png
File243=marker-rojo-67.png
File244=marker-rojo-68.png
File245=marker-rojo-69.png
File246=marker-rojo-7.png
File247=marker-rojo-70.png
File248=marker-rojo-71.png
File249=marker-rojo-72.png
File25=durakelo1.png
File250=marker-rojo-73.png
File251=marker-rojo-74.png
File252=marker-rojo-75.png
File253=marker-rojo-76.png
File254=marker-rojo-77.png
File255=marker-rojo-78.png
File256=marker-rojo-79.png
File257=marker-rojo-8.png
File258=marker-rojo-80.png
File259=marker-rojo-81.png
File26=engrane.jpg
File260=marker-rojo-82.png
File261=marker-rojo-83.png
File262=marker-rojo-84.png
File263=marker-rojo-85.png
File264=marker-rojo-86.png
File265=marker-rojo-87.png
File266=marker-rojo-88.png
File267=marker-rojo-89.png
File268=marker-rojo-9.png
File269=marker-rojo-90.png
File27=engrane.png
File270=marker-rojo-91.png
File271=marker-rojo-92.png
File272=marker-rojo-93.png
File273=marker-rojo-94.png
File274=marker-rojo-95.png
File275=marker-rojo-96.png
File276=marker-rojo-97.png
File277=marker-rojo-98.png
File278=marker-rojo-99.png
File279=marker-verde.png
File28=engranes.png
File280=marker-verde-0.png
File281=marker-verde-1.png
File282=marker-verde-10.png
File283=marker-verde-100.png
File284=marker-verde-11.png
File285=marker-verde-12.png
File286=marker-verde-13.png
File287=marker-verde-14.png
File288=marker-verde-15.png
File289=marker-verde-16.png
File29=errormanager.bal
File290=marker-verde-17.png
File291=marker-verde-18.png
File292=marker-verde-19.png
File293=marker-verde-2.png
File294=marker-verde-20.png
File295=marker-verde-21.png
File296=marker-verde-22.png
File297=marker-verde-23.png
File298=marker-verde-24.png
File299=marker-verde-25.png
File220=marker-rojo-45.png
File221=marker-rojo-46.png
File222=marker-rojo-47.png
File223=marker-rojo-48.png
File224=marker-rojo-49.png
File225=marker-rojo-5.png
File226=marker-rojo-50.png
File227=marker-rojo-51.png
File228=marker-rojo-52.png
File229=marker-rojo-53.png
File23=Compra_y_Gana.png
File230=marker-rojo-54.png
File231=marker-rojo-55.png
File232=marker-rojo-56.png
File233=marker-rojo-57.png
File234=marker-rojo-58.png
File235=marker-rojo-59.png
File236=marker-rojo-6.png
File237=marker-rojo-60.png
File238=marker-rojo-61.png
File239=marker-rojo-62.png
File24=detalle_promo.bal
File240=marker-rojo-63.png
File241=marker-rojo-64.png
File242=marker-rojo-65.png
File243=marker-rojo-66.png
File244=marker-rojo-67.png
File245=marker-rojo-68.png
File246=marker-rojo-69.png
File247=marker-rojo-7.png
File248=marker-rojo-70.png
File249=marker-rojo-71.png
File25=durakelo.png
File250=marker-rojo-72.png
File251=marker-rojo-73.png
File252=marker-rojo-74.png
File253=marker-rojo-75.png
File254=marker-rojo-76.png
File255=marker-rojo-77.png
File256=marker-rojo-78.png
File257=marker-rojo-79.png
File258=marker-rojo-8.png
File259=marker-rojo-80.png
File26=durakelo1.png
File260=marker-rojo-81.png
File261=marker-rojo-82.png
File262=marker-rojo-83.png
File263=marker-rojo-84.png
File264=marker-rojo-85.png
File265=marker-rojo-86.png
File266=marker-rojo-87.png
File267=marker-rojo-88.png
File268=marker-rojo-89.png
File269=marker-rojo-9.png
File27=engrane.jpg
File270=marker-rojo-90.png
File271=marker-rojo-91.png
File272=marker-rojo-92.png
File273=marker-rojo-93.png
File274=marker-rojo-94.png
File275=marker-rojo-95.png
File276=marker-rojo-96.png
File277=marker-rojo-97.png
File278=marker-rojo-98.png
File279=marker-rojo-99.png
File28=engrane.png
File280=marker-verde.png
File281=marker-verde-0.png
File282=marker-verde-1.png
File283=marker-verde-10.png
File284=marker-verde-100.png
File285=marker-verde-11.png
File286=marker-verde-12.png
File287=marker-verde-13.png
File288=marker-verde-14.png
File289=marker-verde-15.png
File29=engranes.png
File290=marker-verde-16.png
File291=marker-verde-17.png
File292=marker-verde-18.png
File293=marker-verde-19.png
File294=marker-verde-2.png
File295=marker-verde-20.png
File296=marker-verde-21.png
File297=marker-verde-22.png
File298=marker-verde-23.png
File299=marker-verde-24.png
File3=alerta.jpg
File30=fondo_kmt.jpg
File300=marker-verde-26.png
File301=marker-verde-27.png
File302=marker-verde-28.png
File303=marker-verde-29.png
File304=marker-verde-3.png
File305=marker-verde-30.png
File306=marker-verde-31.png
File307=marker-verde-32.png
File308=marker-verde-33.png
File309=marker-verde-34.png
File31=foto.bal
File310=marker-verde-35.png
File311=marker-verde-36.png
File312=marker-verde-37.png
File313=marker-verde-38.png
File314=marker-verde-39.png
File315=marker-verde-4.png
File316=marker-verde-40.png
File317=marker-verde-41.png
File318=marker-verde-42.png
File319=marker-verde-43.png
File32=foto1.jpg
File320=marker-verde-44.png
File321=marker-verde-45.png
File322=marker-verde-46.png
File323=marker-verde-47.png
File324=marker-verde-48.png
File325=marker-verde-49.png
File326=marker-verde-5.png
File327=marker-verde-50.png
File328=marker-verde-51.png
File329=marker-verde-52.png
File33=foto2.jpg
File330=marker-verde-53.png
File331=marker-verde-54.png
File332=marker-verde-55.png
File333=marker-verde-56.png
File334=marker-verde-57.png
File335=marker-verde-58.png
File336=marker-verde-59.png
File337=marker-verde-6.png
File338=marker-verde-60.png
File339=marker-verde-61.png
File34=foto3.jpg
File340=marker-verde-62.png
File341=marker-verde-63.png
File342=marker-verde-64.png
File343=marker-verde-65.png
File344=marker-verde-66.png
File345=marker-verde-67.png
File346=marker-verde-68.png
File347=marker-verde-69.png
File348=marker-verde-7.png
File349=marker-verde-70.png
File35=foto4.jpg
File350=marker-verde-71.png
File351=marker-verde-72.png
File352=marker-verde-73.png
File353=marker-verde-74.png
File354=marker-verde-75.png
File355=marker-verde-76.png
File356=marker-verde-77.png
File357=marker-verde-78.png
File358=marker-verde-79.png
File359=marker-verde-8.png
File36=guardagestion.bal
File360=marker-verde-80.png
File361=marker-verde-81.png
File362=marker-verde-82.png
File363=marker-verde-83.png
File364=marker-verde-84.png
File365=marker-verde-85.png
File366=marker-verde-86.png
File367=marker-verde-87.png
File368=marker-verde-88.png
File369=marker-verde-89.png
File37=guna_viejo.png
File370=marker-verde-9.png
File371=marker-verde-90.png
File372=marker-verde-91.png
File373=marker-verde-92.png
File374=marker-verde-93.png
File375=marker-verde-94.png
File376=marker-verde-95.png
File377=marker-verde-96.png
File378=marker-verde-97.png
File379=marker-verde-98.png
File38=historico.bal
File380=marker-verde-99.png
File381=nota.bal
File382=noventa.bal
File383=nuevocliente.bal
File384=palomita_verde.png
File385=palomita_verde_original.png
File386=pedido.bal
File387=pedidoItem.bal
File388=planfia_logo.png
File389=planfia_logo_old.png
File39=info_gral.resp
File390=planfia_logo_old2.png
File391=principal.bal
File392=proditem.bal
File393=productos.bal
File394=productos2.bal
File395=profina.jpg
File396=profina.png
File397=promociones.bal
File398=qr.bal
File399=rechazo.jpg
File30=errormanager.bal
File300=marker-verde-25.png
File301=marker-verde-26.png
File302=marker-verde-27.png
File303=marker-verde-28.png
File304=marker-verde-29.png
File305=marker-verde-3.png
File306=marker-verde-30.png
File307=marker-verde-31.png
File308=marker-verde-32.png
File309=marker-verde-33.png
File31=fondo_kmt.jpg
File310=marker-verde-34.png
File311=marker-verde-35.png
File312=marker-verde-36.png
File313=marker-verde-37.png
File314=marker-verde-38.png
File315=marker-verde-39.png
File316=marker-verde-4.png
File317=marker-verde-40.png
File318=marker-verde-41.png
File319=marker-verde-42.png
File32=foto.bal
File320=marker-verde-43.png
File321=marker-verde-44.png
File322=marker-verde-45.png
File323=marker-verde-46.png
File324=marker-verde-47.png
File325=marker-verde-48.png
File326=marker-verde-49.png
File327=marker-verde-5.png
File328=marker-verde-50.png
File329=marker-verde-51.png
File33=foto1.jpg
File330=marker-verde-52.png
File331=marker-verde-53.png
File332=marker-verde-54.png
File333=marker-verde-55.png
File334=marker-verde-56.png
File335=marker-verde-57.png
File336=marker-verde-58.png
File337=marker-verde-59.png
File338=marker-verde-6.png
File339=marker-verde-60.png
File34=foto2.jpg
File340=marker-verde-61.png
File341=marker-verde-62.png
File342=marker-verde-63.png
File343=marker-verde-64.png
File344=marker-verde-65.png
File345=marker-verde-66.png
File346=marker-verde-67.png
File347=marker-verde-68.png
File348=marker-verde-69.png
File349=marker-verde-7.png
File35=foto3.jpg
File350=marker-verde-70.png
File351=marker-verde-71.png
File352=marker-verde-72.png
File353=marker-verde-73.png
File354=marker-verde-74.png
File355=marker-verde-75.png
File356=marker-verde-76.png
File357=marker-verde-77.png
File358=marker-verde-78.png
File359=marker-verde-79.png
File36=foto4.jpg
File360=marker-verde-8.png
File361=marker-verde-80.png
File362=marker-verde-81.png
File363=marker-verde-82.png
File364=marker-verde-83.png
File365=marker-verde-84.png
File366=marker-verde-85.png
File367=marker-verde-86.png
File368=marker-verde-87.png
File369=marker-verde-88.png
File37=guardagestion.bal
File370=marker-verde-89.png
File371=marker-verde-9.png
File372=marker-verde-90.png
File373=marker-verde-91.png
File374=marker-verde-92.png
File375=marker-verde-93.png
File376=marker-verde-94.png
File377=marker-verde-95.png
File378=marker-verde-96.png
File379=marker-verde-97.png
File38=guna_viejo.png
File380=marker-verde-98.png
File381=marker-verde-99.png
File382=nota.bal
File383=noventa.bal
File384=nuevocliente.bal
File385=palomita_verde.png
File386=palomita_verde_original.png
File387=pedido.bal
File388=pedidoItem.bal
File389=planfia_logo.png
File39=historico.bal
File390=planfia_logo_old.png
File391=planfia_logo_old2.png
File392=principal.bal
File393=proditem.bal
File394=productos.bal
File395=productos2.bal
File396=profina.jpg
File397=profina.png
File398=promociones.bal
File399=qr.bal
File4=alerta_amarilla.png
File40=infonavit1.jpg
File400=rojo.png
File401=salma.jpg
File402=salma.png
File403=senial.jpg
File404=sync.png
File405=tache_rojo.png
File406=tache_rojo_original.png
File407=telefonos.bal
File408=ticketsDia.bal
File409=Tiendita.jpg
File41=INVENTARIO (1).jpg
File410=transporte.png
File411=verde.png
File412=vista1.png
File413=vista2.png
File414=vista3.png
File415=vista4.png
File416=WhatsApp Image 2022-11-17 at 11.50.59 AM.jpeg
File417=WhatsApp Image 2022-11-17 at 11.50.59 AM.jpg
File418=whatsapp.png
File419=whatsapp_original.png
File42=INVENTARIO.jpg
File420=WHATSTEL.jpeg
File421=WHATSTEL.png
File43=inventario.PNG
File44=itembuttonblue.png
File45=itembuttonred.png
File46=kellanova.png
File47=kellanova_borde.png
File48=kelloggs.png
File49=Kelloggs.rkmt.km
File40=info_gral.resp
File400=QR_Kelloggs.png
File401=rechazo.jpg
File402=rojo.png
File403=salma.jpg
File404=salma.png
File405=senial.jpg
File406=sync.png
File407=tache_rojo.png
File408=tache_rojo_original.png
File409=telefonos.bal
File41=infonavit1.jpg
File410=ticketsDia.bal
File411=Tiendita.jpg
File412=transporte.png
File413=verde.png
File414=vista1.png
File415=vista2.png
File416=vista3.png
File417=vista4.png
File418=WhatsApp Image 2022-11-17 at 11.50.59 AM.jpeg
File419=WhatsApp Image 2022-11-17 at 11.50.59 AM.jpg
File42=INVENTARIO (1).jpg
File420=whatsapp.png
File421=whatsapp_original.png
File422=WHATSTEL.jpeg
File423=WHATSTEL.png
File43=INVENTARIO.jpg
File44=inventario.PNG
File45=itembuttonblue.png
File46=itembuttonred.png
File47=kellanova.png
File48=kellanova_borde.png
File49=kelloggs.png
File5=amarillo.png
File50=kelloggs_chico.png
File51=kelloggs_original.png
File52=kelloggs2.jpg
File53=kelloggs2.png
File54=keymon_logo.png
File55=kmt.db
File56=knv_logo_white.png
File57=login.bal
File58=logo sanfer.jpg
File59=logo_192x192.png
File50=Kelloggs.rkmt.km
File51=kelloggs_chico.png
File52=kelloggs_original.png
File53=kelloggs2.jpg
File54=kelloggs2.png
File55=keymon_logo.png
File56=kmt.db
File57=knv_logo_white.png
File58=login.bal
File59=logo sanfer.jpg
File6=anterior.jpg
File60=logo_exitus1.jpg
File61=logo2.png
File62=logo2_192x192.png
File63=MainPage.bal
File64=Malo.jpg
File65=mapa.bal
File66=mapa_rutas.bal
File67=mapas.bal
File68=marker-azul.png
File69=marker-azul-0.png
File60=logo_192x192.png
File61=logo_exitus1.jpg
File62=logo2.png
File63=logo2_192x192.png
File64=MainPage.bal
File65=Malo.jpg
File66=mapa.bal
File67=mapa_rutas.bal
File68=mapas.bal
File69=marker-azul.png
File7=BLACNCO.jpg
File70=marker-azul1.png
File71=marker-azul-1.png
File72=marker-azul-10.png
File73=marker-azul-100.png
File74=marker-azul-11.png
File75=marker-azul-12.png
File76=marker-azul-13.png
File77=marker-azul-14.png
File78=marker-azul-15.png
File79=marker-azul-16.png
File70=marker-azul-0.png
File71=marker-azul1.png
File72=marker-azul-1.png
File73=marker-azul-10.png
File74=marker-azul-100.png
File75=marker-azul-11.png
File76=marker-azul-12.png
File77=marker-azul-13.png
File78=marker-azul-14.png
File79=marker-azul-15.png
File8=cacahuates.png
File80=marker-azul-17.png
File81=marker-azul-18.png
File82=marker-azul-19.png
File83=marker-azul2.png
File84=marker-azul-2.png
File85=marker-azul-20.png
File86=marker-azul-21.png
File87=marker-azul-22.png
File88=marker-azul-23.png
File89=marker-azul-24.png
File80=marker-azul-16.png
File81=marker-azul-17.png
File82=marker-azul-18.png
File83=marker-azul-19.png
File84=marker-azul2.png
File85=marker-azul-2.png
File86=marker-azul-20.png
File87=marker-azul-21.png
File88=marker-azul-22.png
File89=marker-azul-23.png
File9=cacahuates_blanco.png
File90=marker-azul-25.png
File91=marker-azul-26.png
File92=marker-azul-27.png
File93=marker-azul-28.png
File94=marker-azul-29.png
File95=marker-azul3.png
File96=marker-azul-3.png
File97=marker-azul-30.png
File98=marker-azul-31.png
File99=marker-azul-32.png
File90=marker-azul-24.png
File91=marker-azul-25.png
File92=marker-azul-26.png
File93=marker-azul-27.png
File94=marker-azul-28.png
File95=marker-azul-29.png
File96=marker-azul3.png
File97=marker-azul-3.png
File98=marker-azul-30.png
File99=marker-azul-31.png
FileGroup1=Default Group
FileGroup10=Default Group
FileGroup100=Default Group
@@ -779,6 +781,8 @@ FileGroup419=Default Group
FileGroup42=Default Group
FileGroup420=Default Group
FileGroup421=Default Group
FileGroup422=Default Group
FileGroup423=Default Group
FileGroup43=Default Group
FileGroup44=Default Group
FileGroup45=Default Group
@@ -903,7 +907,7 @@ Module6=C_Mapas
Module7=C_Nota
Module8=C_NoVenta
Module9=C_NuevoCliente
NumberOfFiles=421
NumberOfFiles=423
NumberOfLibraries=28
NumberOfModules=32
Version=12.8
@@ -911,7 +915,7 @@ Version=12.8
#Region Project Attributes
#ApplicationLabel: Kelloggs Venta
#VersionCode: 3000
#VersionName: 5.07.30
#VersionName: 5.09.01
#SupportedOrientations: portrait
#CanInstallToExternalStorage: False
#BridgeLogger:true
@@ -928,8 +932,7 @@ Version=12.8
#End Region
' Version que estaba en la tabla CAT_VERSION antes -> 2.95
'actualizaProducto, c=30000007778, p=1008037471, nombre=BARRA ALL BRAN FRESA 37 GR, cant=1, cedis=3, tipo=VENTA
' 5.08.30 --> corrige que en la barra de busqeda en productos no hacia nada!
Sub Process_Globals
Public ActionBarHomeClicked As Boolean

8
B4A/KelloggsV4.b4a.meta
View File

@@ -65,13 +65,13 @@ ModuleBreakpoints7=
ModuleBreakpoints8=
ModuleBreakpoints9=
ModuleClosedNodes0=
ModuleClosedNodes1=2,6,7,8,9,10,11,12,14,16
ModuleClosedNodes1=4,6
ModuleClosedNodes10=
ModuleClosedNodes11=3,5,6
ModuleClosedNodes12=3,7,8,9,10,11,12
ModuleClosedNodes13=6,7,8,9,12,13
ModuleClosedNodes14=
ModuleClosedNodes15=2,3,7,8,15,17
ModuleClosedNodes15=3,7,8,15,17
ModuleClosedNodes16=
ModuleClosedNodes17=
ModuleClosedNodes18=
@@ -97,6 +97,6 @@ ModuleClosedNodes6=
ModuleClosedNodes7=
ModuleClosedNodes8=
ModuleClosedNodes9=
NavigationStack=Subs,traeMaxPromos,1180,0,Subs,alcanzanLosVariablesParaPromo,1159,0,Subs,revisaMaxPromosProdsFijosPorInventario,1346,1,C_TrendSpending,traeInfoTrendSpending,64,0,C_TrendSpending,traeMaximas,295,0,C_TrendSpending,traeBonificacionesMaximas,321,2,C_TrendSpending,maxPromosPorProdsVariables,370,0,C_Principal,cargar_Click,885,0,C_Cliente,B4XPage_Appear,545,0,kms_helperSubs,traeLimiteCredito,1279,0,kms_helperSubs,ping,1277,0
NavigationStack=B4XMainPage,ImageView1_LongClick,1031,6,C_Principal,Class_Globals,12,0,Diseñador Visual,productos.bal,-100,1,C_Productos,Busca_TextChanged,1467,4,Subs,traeTablaProds,1683,0,Subs,generaGUID_EnExterno,1966,0,Subs,parseHTTPError,1978,0,C_TrendSpending,Initialize,29,0,C_Principal,JobDone,2081,6,C_Principal,cargar_Click,939,0,B4XMainPage,JobDone,570,0
SelectedBuild=0
VisibleModules=1,30,11,15,3,31,12,13,7,28,25
VisibleModules=1,30,11,15,3,31,12,13,7,28

3
B4A/Subs.bas
View File

@@ -1757,7 +1757,8 @@ Sub horaNormal(fecha As String) As String 'ignore
Return nuevaFecha
End Sub
'En geocerca si mete la contraseña poner 0 en precision gps y si esta dentro de los 50 mts poner 1 y 2 para eventos que no lo ocupen
'Guarda en la tabla BitacoraGPS el evento espcificado en eventob, junto con coordenadas y otros datos.
'En precision,si metio contraseña para brincar la geocerca, poner 0 gps, si esta dentro de los 50 mts poner 1 y 2 para eventos que no lo ocupen.
'Mandar fecha de sync(sysdate)
Sub bitacora(fechab As String, usuariob As String, almacenb As String, rutab As String, eventob As String, clienteb As String, iniciob As String, finb As String, latitudb As String, longitudb As String, precision As String, motivonoventa As String, motivonovisita As String )
Log(motivonovisita)