diff --git a/B4A/B4XMainPage.bas b/B4A/B4XMainPage.bas index 003a1a4..c478c3a 100644 --- a/B4A/B4XMainPage.bas +++ b/B4A/B4XMainPage.bas @@ -723,7 +723,8 @@ Private Sub lv_server_ItemClick (Position As Int, Value As Object) Starter.DBReqServer = Value ' l_server.Text = Value et_server.Text = Value - Starter.reqManager.Initialize(Me, Value) + Starter.reinicializaReqManager(Value) +' Starter.reqManager.Initialize(Me, Value) ToastMessageShow("Servidor modificado", False) End Sub diff --git a/B4A/C_RespaldoDiario.bas b/B4A/C_RespaldoDiario.bas index 26b4647..a873dc6 100644 --- a/B4A/C_RespaldoDiario.bas +++ b/B4A/C_RespaldoDiario.bas @@ -8,7 +8,7 @@ Sub Class_Globals Private Root As B4XView 'ignore Private xui As XUI 'ignore Dim skmt, rkmt As SQL - Dim rp As RuntimePermissions +' Dim rp As RuntimePermissions Dim safePath As String Dim fechaHoy As String Dim skmtAttached As Boolean = False @@ -19,7 +19,7 @@ Public Sub Initialize As Object ' Log("************************** " & safePath) Dim Dirp As String = File.DirRootExternal Dim Dir As String - Dim Dir2 As String +' Dim Dir2 As String Try File.MakeDir(Dirp,"/kmts") Dir = "/kmts" @@ -30,6 +30,7 @@ Public Sub Initialize As Object End Try ' safePath = rp.GetSafeDirDefaultExternal("./") safePath = Dirp & Dir + private name = rkmt.Initialize(safePath,"md.rkmt.km", True) skmt.Initialize(File.DirInternal,"kmt.db", False) '############################################################################################################# diff --git a/B4A/Mariana.b4a b/B4A/Mariana.b4a index c88c5c6..32618c9 100644 --- a/B4A/Mariana.b4a +++ b/B4A/Mariana.b4a @@ -750,7 +750,7 @@ Module9=C_NoVenta NumberOfFiles=347 NumberOfLibraries=26 NumberOfModules=26 -Version=12.5 +Version=12.2 @EndOfDesignText@ #Region Project Attributes #ApplicationLabel: Mariana diff --git a/B4A/Mariana.b4a.meta b/B4A/Mariana.b4a.meta index aa33679..7e7699f 100644 --- a/B4A/Mariana.b4a.meta +++ b/B4A/Mariana.b4a.meta @@ -69,7 +69,7 @@ ModuleClosedNodes20= ModuleClosedNodes21= ModuleClosedNodes22= ModuleClosedNodes23= -ModuleClosedNodes24=9 +ModuleClosedNodes24=9,10,11 ModuleClosedNodes25= ModuleClosedNodes26= ModuleClosedNodes3= @@ -79,6 +79,6 @@ ModuleClosedNodes6= ModuleClosedNodes7= ModuleClosedNodes8= ModuleClosedNodes9= -NavigationStack=NotificationService,Service_Start,25,0,NotificationService,getShortcut,157,0,NotificationService,getNumberOrGroupWA,148,0,NotificationService,Process_Globals,8,5,NotificationService,esMensajeWAValido,56,0,Starter,Service_Start,54,0,B4XMainPage,B4XPage_Created,226,0,Starter,Process_Globals,9,5,NotificationService,NotiMon_NotificationPosted,48,6,B4XMainPage,b_regesar_Click,693,6 +NavigationStack=Starter,reinicializaReqManager,122,0,B4XMainPage,JobDone,481,0,B4XMainPage,muestraProgreso,676,0,B4XMainPage,i_engrane_Click,690,0,B4XMainPage,ocultaProgreso,681,0,C_RespaldoDiario,Class_Globals,9,0,C_RespaldoDiario,Initialize,26,2,B4XMainPage,Entrar_LongClick,714,0,Starter,ENVIA_ULTIMA_GPS,74,0,B4XMainPage,lv_server_ItemClick,719,3 SelectedBuild=0 VisibleModules=2,24,23,12,16,25,13,15,6,8