From 6d7edaaff32a54addb01428fece4b31b9838af7d Mon Sep 17 00:00:00 2001 From: Javier Date: Thu, 15 Jan 2026 08:52:13 -0600 Subject: [PATCH] ... --- B4A/B4XMainPage.bas | 2 +- B4A/C_Clientes.bas | 4 ++-- B4A/Intmex_Reparto.b4a.meta | 4 ++-- B4A/appUpdater.bas | 2 +- 4 files changed, 6 insertions(+), 6 deletions(-) diff --git a/B4A/B4XMainPage.bas b/B4A/B4XMainPage.bas index ab41ba3..2a794bb 100644 --- a/B4A/B4XMainPage.bas +++ b/B4A/B4XMainPage.bas @@ -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 diff --git a/B4A/C_Clientes.bas b/B4A/C_Clientes.bas index a8eb715..7930b1d 100644 --- a/B4A/C_Clientes.bas +++ b/B4A/C_Clientes.bas @@ -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 diff --git a/B4A/Intmex_Reparto.b4a.meta b/B4A/Intmex_Reparto.b4a.meta index 4cfbba1..f55ab87 100644 --- a/B4A/Intmex_Reparto.b4a.meta +++ b/B4A/Intmex_Reparto.b4a.meta @@ -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 diff --git a/B4A/appUpdater.bas b/B4A/appUpdater.bas index 64eac8e..32dc376 100644 --- a/B4A/appUpdater.bas +++ b/B4A/appUpdater.bas @@ -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