From 9640c2768e1244e9f27d7ac59885f7f5b4a64995 Mon Sep 17 00:00:00 2001 From: cvaldes1201 Date: Tue, 19 Sep 2023 11:12:59 -0600 Subject: [PATCH] 19-9-23 Distancia Geocerca 50mts --- B4A/C_Cliente.bas | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/B4A/C_Cliente.bas b/B4A/C_Cliente.bas index ce31a4c..1a44303 100644 --- a/B4A/C_Cliente.bas +++ b/B4A/C_Cliente.bas @@ -709,7 +709,7 @@ Sub GPS_LocationChanged (Location1 As Location) gps_boton_doe ="1" ' LogColor($"Distancia actual: ${distance}"$, Colors.Blue) - If distance <= 5000000000000 Or usuario = "KMTSKLL1" Then + If distance <= 50 Or usuario = "KMTSKLL1" Then ' If pgs_boton_noventa = "1" Then Tels.Visible = True If gps_boton_doe ="1" Then b_whats.Visible = True B_VENTA.Visible = True