diff --git a/colonia.bas b/colonia.bas index ec8ae1d..2847724 100644 --- a/colonia.bas +++ b/colonia.bas @@ -197,6 +197,9 @@ Sub ListView1_ItemClick (Position As Int, Value As Object) If c2.GetString("CAT_CL_LONG").Length > 3 Then thisLoc.Longitude = c2.GetString("CAT_CL_LONG") Private distancia As Int = Tracker.UUGCoords.DistanceTo(thisLoc) 'Calculamos la distancia de la posicion ACTUAL a la tienda. Private esteCliente As Map = CreateMap("distancia": distancia, "ubicacion": thisLoc.Longitude&","&thisLoc.Latitude, "codigo": c2.GetString("CAT_CL_CODIGO"), "nomDirDist": $"${c2.GetString("CAT_CL_NOMBRE")} CALLE: ${c2.GetString("CAT_CL_CALLE")} ${CRLF}Distancia: $1.1{(distancia/1000)} kms"$) + If c2.GetString("CAT_CL_LAT").Length < 3 Then + distancia = i + End If distOrderedMap.Put(distancia, esteCliente) Next distOrderedMap.Keys.Sort(True) 'Ordenamos la mapa de clientes por distancia. diff --git a/intmex_reparto.b4a b/intmex_reparto.b4a index 6e0d42b..6e2653a 100644 --- a/intmex_reparto.b4a +++ b/intmex_reparto.b4a @@ -131,7 +131,7 @@ Version=12.5 #Region Project Attributes #ApplicationLabel: Intmex-Reparto #VersionCode: 1 - #VersionName: 3.11.05 + #VersionName: 4.04.20 'SupportedOrientations possible values: unspecified, landscape or portrait. #SupportedOrientations: portrait #CanInstallToExternalStorage: False diff --git a/intmex_reparto.b4a.meta b/intmex_reparto.b4a.meta index ba7d635..f323ab2 100644 --- a/intmex_reparto.b4a.meta +++ b/intmex_reparto.b4a.meta @@ -70,6 +70,6 @@ ModuleClosedNodes6= ModuleClosedNodes7= ModuleClosedNodes8=2,7,11 ModuleClosedNodes9= -NavigationStack=seleccion,Globals,83,0,Starter,ENVIA_ULTIMA_GPS,110,0,Main,Process_Globals,28,0,seleccion,Activity_Resume,185,3,seleccion,Subir_Click,464,6,seleccion,cargar_Click,483,0,Subs,revisaBD,191,0,Main,Activity_Create,77,0,MAPA_RUTAS,MapFragment1_Ready,140,6,colonia,ListView1_ItemClick,189,1,colonia,traeTodosAVisitar,565,4 +NavigationStack=Starter,ENVIA_ULTIMA_GPS,110,0,Main,Process_Globals,28,0,seleccion,Activity_Resume,185,3,seleccion,Subir_Click,464,6,seleccion,cargar_Click,483,0,Subs,revisaBD,191,0,Main,Activity_Create,77,0,MAPA_RUTAS,MapFragment1_Ready,140,6,colonia,traeTodosAVisitar,556,4,colonia,ListView1_ItemClick,194,6 SelectedBuild=0 -VisibleModules=19,23,20,18,4,5,8,15,6,9,13 +VisibleModules=19,23,20,18,4,5,8,15,6,9