- VERSION 5.10.01

- Se cambio el query de conectar (select_ruta4_KELL) a nueva version (select_ruta5_KELL) para preveeer cuando se quiera bloquear la conexion de versiones viejas.
This commit is contained in:
2025-10-03 10:31:28 -06:00
parent 48a1221ef9
commit 6446187478
2 changed files with 4 additions and 5 deletions

View File

@@ -2283,7 +2283,7 @@ Sub connecta_Click
Else
connecta.TextColor = Colors.White
End If
kb.HideKeyboard
' Log("################# PERMISOS BT: " & Starter.rp.Check("android.permission.BLUETOOTH_CONNECT"))
' Log("Permisos BT: " & Starter.rp.Check("android.permission.BLUETOOTH_CONNECT"))
@@ -2323,7 +2323,7 @@ Sub connecta_Click
conn = "1"
reqManager.trackInit
linker.verifyDevice(Subs.traeAlmacen, e_ruta.text)
' Else
@@ -2339,11 +2339,10 @@ Sub connecta2
reqManager.ExecuteQuery(cmd , 0, "version")
End Sub
Sub connecta3
Dim cmd As DBCommand
cmd.Initialize
cmd.Name = "select_ruta4_KELL"
cmd.Name = "select_ruta5_KELL"
cmd.Parameters = Array As Object(ALMACEN, e_ruta.text, usuario)
' Log($"******* Almacen: ${ALMACEN}, ${e_ruta.text}, ${usuario}"$)
reqManager.ExecuteQuery(cmd , 0, "ruta")

View File

@@ -100,6 +100,6 @@ ModuleClosedNodes6=
ModuleClosedNodes7=
ModuleClosedNodes8=
ModuleClosedNodes9=
NavigationStack=C_TicketsDia,Class_Globals,1,0,C_TicketsDia,ListView1_ItemLongClick,86,2,C_Principal,SUBIR_INFO_PEDIDO,3231,0,Subs,actualizaTET,1526,0,C_Cliente,Guardar_Click,989,2,C_Principal,enviaPedidoCliente,3423,0,C_Principal,JobDone,1813,0,C_Principal,enviaPedido,3368,0,kms_helperSubs,revisaImpresa,1066,0,kms_helperSubs,clienteConDOE,1062,0,B4XMainPage,B4XPage_Created,153,0
NavigationStack=C_Principal,enviaPedido,3368,0,kms_helperSubs,revisaImpresa,1066,0,kms_helperSubs,clienteConDOE,1062,0,B4XMainPage,B4XPage_Created,153,0,Diseñador Visual,productos.bal,-100,1,Diseñador Visual,principal.bal,-100,1,B4XMainPage,Class_Globals,32,0,C_Principal,connecta_Click,2326,0,C_Principal,connecta2,2334,0,C_Principal,connecta3,2338,0
SelectedBuild=0
VisibleModules=31,1,12,5,16,26,3,32,13,14,19,4,15