This commit is contained in:
Javier
2026-01-15 08:52:13 -06:00
parent f1511e004a
commit 6d7edaaff3
4 changed files with 6 additions and 6 deletions

View File

@@ -540,7 +540,7 @@ Private Sub i_engrane_Click
Subs.centraBoton(b_regesar, Root.Width)
Subs.centraBoton(b_server, p_serverList.Width)
lv_server.Clear
lv_server.AddSingleLine("http://keymon.lat:1782")
lv_server.AddSingleLine("http://keymon.net:1782")
If user.Text = "KMTS1" Then lv_server.AddSingleLine("http://10.0.0.205:1782")
' l_server.Text = Starter.server
et_server.Text = server

View File

@@ -630,8 +630,8 @@ Sub caculaRutaGPS(coords As List)
ProgressDialogShow2("Calculando distancia y tiempo, un momento por favor.", False)
Dim j As HttpJob
j.Initialize("trip", Me) 'Calculamos el resto de la ruta.
j.Download($"http://keymon.lat:9002/ruteador?m=OSRM&r=${Subs.traeRutaReparto}&a=${Subs.traeAlmacen}&f=CEDIS,${Starter.cedisLocation.Longitude},${Starter.cedisLocation.Latitude}&c=${coordsStr}"$)
Log($"http://keymon.lat:9002/ruteador?m=OSRM&r=${Subs.traeRutaReparto}&a=${Subs.traeAlmacen}&f=CEDIS,${Starter.cedisLocation.Longitude},${Starter.cedisLocation.Latitude}&c=${coordsStr}"$)
j.Download($"http://keymon.net:9002/ruteador?m=OSRM&r=${Subs.traeRutaReparto}&a=${Subs.traeAlmacen}&f=CEDIS,${Starter.cedisLocation.Longitude},${Starter.cedisLocation.Latitude}&c=${coordsStr}"$)
Log($"http://keymon.net:9002/ruteador?m=OSRM&r=${Subs.traeRutaReparto}&a=${Subs.traeAlmacen}&f=CEDIS,${Starter.cedisLocation.Longitude},${Starter.cedisLocation.Latitude}&c=${coordsStr}"$)
Wait For (j) JobDone(j As HttpJob)
If j.Success Then
Dim jp As JSONParser

View File

@@ -91,6 +91,6 @@ ModuleClosedNodes6=
ModuleClosedNodes7=
ModuleClosedNodes8=
ModuleClosedNodes9=
NavigationStack=C_Principal,connecta_Click,1869,0,C_Principal,JobDone,1323,0,C_Cliente,b_cxc_Click,1207,0,C_Cliente,gest_Click,359,0,C_Mapas,Class_Globals,0,0,MAPA_RUTAS,MapFragment1_Ready,145,0,C_Clientes,ListView1_ItemClick,132,0,Starter,ENVIA_ULTIMA_GPS,134,0,C_Principal,cargar_Click,980,0,C_Principal,envioinfo,959,0
NavigationStack=C_Cliente,b_cxc_Click,1207,0,C_Cliente,gest_Click,359,0,C_Mapas,Class_Globals,0,0,MAPA_RUTAS,MapFragment1_Ready,145,0,C_Clientes,ListView1_ItemClick,132,0,Starter,ENVIA_ULTIMA_GPS,134,0,C_Principal,cargar_Click,980,0,C_Principal,envioinfo,959,0,appUpdater,Process_Globals,74,1,B4XMainPage,i_engrane_Click,536,1,C_Clientes,caculaRutaGPS,607,2
SelectedBuild=0
VisibleModules=1,2,3,4,5,6,7,8,9,10,16,27,28
VisibleModules=1,2,3,4,5,6,7,8,9,10,16

View File

@@ -78,7 +78,7 @@ Sub Process_Globals
'These variables can be accessed from all modules.
'Aqui va la liga al archivo .ver en el servidor que contiene la información de la aplicacion
Public lnk As String = "https://keymon.lat/movil/intmex/intmex_reparto.ver"
Public lnk As String = "https://keymon.net/movil/intmex/intmex_reparto.ver"
'/// En el servidor se necesita un archivo de texto (.ver) que tenga los siguientes
'/// datos separados por un tabulador