cheveguerra/Intmex_Reparto
1
0
Fork 0
mirror of https://github.com/KeymonSoft/Intmex_Reparto.git synced 2026-04-17 21:06:23 +00:00
Code Issues Packages Projects Releases Wiki Activity

se ajusta el proceso para mostrar los clientes aunque no tengan coordenadas

Browse Source
This commit is contained in:
Javier
2025-09-26 13:32:38 -06:00
parent 8e9761bdb5
commit f155af5f0c
145 changed files with 572 additions and 604 deletions
Download Patch File Download Diff File Expand all files Collapse all files

14
B4A/C_Clientes.bas
View File

@@ -176,13 +176,13 @@ Sub ListView1_ItemClick (Position As Int, Value As Object)
thisLoc.Longitude = c2.GetString("CAT_CL_LONG")
' Log(Tracker.UUGCoords)
Private distancia As Int = Tracker.UUGCoords.DistanceTo(thisLoc) 'Calculamos la distancia de la posicion ACTUAL a la tienda.
If distancia = 0 And distanciacero = 0 Then
distancia = distancia + i
distanciacero = distancia
Else If distanciacero <> 0 And distancia = 0 Then
distancia = distanciacero + i
distanciacero = distancia
End If
' If distancia = 0 And distanciacero = 0 Then
distancia = distancia + i
' distanciacero = distancia
' Else If distanciacero <> 0 And distancia = 0 Then
' distancia = distanciacero + i
' distanciacero = distancia
' End If
' distancia = distancia + i 'comentar la linea despues de tener las coordenadas correctas