- VERSION 5.09.01

- 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.

B4A/C_Cliente.bas

@@ -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