cheveguerra/Marquez_Reparto
1
0
Fork 0
mirror of https://github.com/KeymonSoft/Marquez_Reparto.git synced 2026-04-20 22:29:25 +00:00
Code Issues Packages Projects Releases Wiki Activity

cambios no subidos

Browse Source
This commit is contained in:
cvaldes1201
2024-08-22 09:42:20 -06:00
parent ea31fd4801
commit 363fcfd3d9
3 changed files with 6 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
B4A/B4XMainPage.bas
View File

@@ -168,8 +168,8 @@ Private Sub B4XPage_Created (Root1 As B4XView)
Subs.agregaColumna("CAT_GUNAPROD","PRECIOCONVER","TEXT") Subs.agregaColumna("CAT_GUNAPROD","PRECIOCONVER","TEXT")
Starter.skmt.ExecNonQuery("CREATE TABLE IF NOT EXISTS RUTAA (RUTAA TEXT)") Starter.skmt.ExecNonQuery("CREATE TABLE IF NOT EXISTS RUTAA (RUTAA TEXT)")
Starter.skmt.ExecNonQuery("CREATE TABLE IF NOT EXISTS wayPoints (codigo TEXT, indice INT)") Starter.skmt.ExecNonQuery("CREATE TABLE IF NOT EXISTS wayPoints (codigo TEXT, indice INT)")
' Dim server As String = "http://187.189.244.154:1781" Dim server As String = "http://187.189.244.154:1781"
Dim server As String = "http://192.168.100.10:1781" ' Dim server As String = "http://192.168.100.10:1781"
' Dim server As String = "http://keymon.lat:9000" ' Dim server As String = "http://keymon.lat:9000"
' server = "http://10.0.0.205:1782" ' server = "http://10.0.0.205:1782"
' Dim server As String = "http://192.168.100.10:1781" ' Dim server As String = "http://192.168.100.10:1781"

4
B4A/Marquez_Reparto.b4a.meta
View File

@@ -88,6 +88,6 @@ ModuleClosedNodes6=
ModuleClosedNodes7=1,2,3,6,7,8,9,10,13,15,16 ModuleClosedNodes7=1,2,3,6,7,8,9,10,13,15,16
ModuleClosedNodes8= ModuleClosedNodes8=
ModuleClosedNodes9=5,6,7,8,9,13,14,15,16,17,20 ModuleClosedNodes9=5,6,7,8,9,13,14,15,16,17,20
NavigationStack=Diseñador Visual,mapa_rutas.bal,-100,1,Diseñador Visual,no_venta.bal,-100,1,Diseñador Visual,nuevocliente.bal,-100,2,Diseñador Visual,pedido.bal,-100,1,Diseñador Visual,principal.bal,-100,3,Diseñador Visual,proditem.bal,-100,1,Diseñador Visual,productos.bal,-100,5,Diseñador Visual,tabulador.bal,-100,1,Diseñador Visual,telefonos.bal,-100,1,B4XMainPage,B_Aceptar_Monto_Click,516,0 NavigationStack=Diseñador Visual,no_venta.bal,-100,1,Diseñador Visual,nuevocliente.bal,-100,2,Diseñador Visual,pedido.bal,-100,1,Diseñador Visual,principal.bal,-100,3,Diseñador Visual,proditem.bal,-100,1,Diseñador Visual,productos.bal,-100,5,Diseñador Visual,tabulador.bal,-100,1,Diseñador Visual,telefonos.bal,-100,1,B4XMainPage,B_Aceptar_Monto_Click,516,0,B4XMainPage,B4XPage_Created,165,0,Starter,Process_Globals,29,0
SelectedBuild=0 SelectedBuild=0
VisibleModules=27,2,16,7,26,28,5,17,6,9,13 VisibleModules=27,2,16,7,26,28,5,17,6,9

4
B4A/Starter.bas
View File

@@ -32,8 +32,8 @@ Sub Process_Globals
Public SharedFolder As String 'Para actualizar apk Public SharedFolder As String 'Para actualizar apk
Dim cedisLocation As Location Dim cedisLocation As Location
Dim reqManager As DBRequestManager Dim reqManager As DBRequestManager
' Dim server As String = "http://187.189.244.154:1781" Dim server As String = "http://187.189.244.154:1781"
Dim server As String = "http://192.168.100.10:1781" ' Dim server As String = "http://192.168.100.10:1781"
' Dim server As String = "http://keymon.lat:9000" ' Dim server As String = "http://keymon.lat:9000"
' Dim server = "http://192.168.100.10:1781" ' Dim server = "http://192.168.100.10:1781"
Dim muestraProgreso = 0 Dim muestraProgreso = 0