- Se corrigio condicion para que mande mensaje de error cuando no se especifican coordenadas.

Ruteador-NonUI.b4j

@@ -51,7 +51,7 @@ Sub Process_Globals
 '	Dim coords As List
 '	Dim estePunto() As String
 	Dim error As String = ""
-	dim msg as string = ""
+	Dim msg As String = ""
 End Sub
 
 Sub AppStart (Args() As String)

Ruteador-NonUI.b4j.meta

@@ -16,6 +16,6 @@ ModuleClosedNodes2=
 ModuleClosedNodes3=
 ModuleClosedNodes4=
 ModuleClosedNodes5=
-NavigationStack=Main,generaMatrizOSRM,275,0,Main,tiempos,424,5,Mapa,generaMatrizRuteoTiempos,85,0,Mapa,tiempos,108,0,rutaCompleta,generaMatrizRuteoTiempos,85,0,rutaCompleta,tiempos,105,0,Main,calculateDistance3,607,0,Ruteador,tiempos,166,0,Ruteador,generaMatrizRuteoTiempos,103,6,Main,creaTablas,155,6,Main,ruteo,308,0
+NavigationStack=Mapa,generaMatrizRuteoTiempos,85,0,Mapa,tiempos,108,0,rutaCompleta,generaMatrizRuteoTiempos,85,0,rutaCompleta,tiempos,105,0,Main,calculateDistance3,607,0,Ruteador,tiempos,166,0,Ruteador,generaMatrizRuteoTiempos,103,6,Main,ruteo,308,0,Ruteador,Handle,38,0,Main,creaTablas,129,6
 SelectedBuild=0
 VisibleModules=5,3,4,1,2

Ruteador.bas

@@ -38,11 +38,11 @@ Sub Handle(req As ServletRequest, resp As ServletResponse)
 	Private matriz As String = req.GetParameter("m")
 	Main.inicio = req.GetParameter("i")
 	Main.final = req.GetParameter("f")
-	If Main.final <> "" Then coords = coords & ";" & Main.final
 	If matriz <> "" And matriz <> "OSRM" Then matriz = ""
 	Log($"r: ${ruta}, a: ${almacen}, Coords: ${coords}"$)
 	Private urlParams As Map
 	If ruta <> "" And almacen <> "" And coords <> "" Then
+		If Main.final <> "" Then coords = coords & ";" & Main.final
 		ruta = "R" & ruta
 		urlParams.Initialize
 		urlParams.Put("almacen", almacen)