From 18bda794e6de0f2933c2bb4cef34ff859e978928 Mon Sep 17 00:00:00 2001 From: Jose Alberto Guerra Ugalde Date: Fri, 20 Mar 2026 19:27:17 -0600 Subject: [PATCH] VERSION 6.03.18 - Agregamos vacuum al borrado de las coordenadas! --- B4A/B4XMainPage.bas | 2 +- B4A/intmex_reparto.b4a.meta | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/B4A/B4XMainPage.bas b/B4A/B4XMainPage.bas index d99fa1b..591555e 100644 --- a/B4A/B4XMainPage.bas +++ b/B4A/B4XMainPage.bas @@ -129,7 +129,6 @@ Public Sub Initialize ' B4XPages.GetManager.LogEvents = True End Sub - 'This event will be called once, before the page becomes visible. Private Sub B4XPage_Created (Root1 As B4XView) Root = Root1 @@ -321,6 +320,7 @@ Sub B4XPage_Appear Dim lastUpdate As String = DateTime.Date(fechaCorteLong) ' Borramos las coordenadas de mas de 60 dias de RUTA_GPS Starter.skmt.ExecNonQuery2("DELETE FROM RUTA_GPS WHERE FECHA < ?", Array As String(lastUpdate)) + Starter.skmt.ExecNonQuery("VACUUM") Log("Borramos coords viejas: " & lastUpdate) End Sub diff --git a/B4A/intmex_reparto.b4a.meta b/B4A/intmex_reparto.b4a.meta index 895246f..e792122 100644 --- a/B4A/intmex_reparto.b4a.meta +++ b/B4A/intmex_reparto.b4a.meta @@ -97,6 +97,6 @@ ModuleClosedNodes6= ModuleClosedNodes7= ModuleClosedNodes8= ModuleClosedNodes9= -NavigationStack=Tracker,formatoFecha,324,0,Tracker,Service_Destroy,314,0,Diseñador Visual,login.bal,-100,2,C_Principal,B4XPage_Created,210,0,C_NoVenta,GUARDA_Click,227,0,B4XMainPage,Class_Globals,24,0,Starter,Service_Create,40,0,C_Principal,B4XPage_Appear,225,0,C_Principal,e_ruta_EnterPressed,2029,6,B4XMainPage,B4XPage_Appear,310,2 +NavigationStack=Tracker,Service_Destroy,314,0,Diseñador Visual,login.bal,-100,2,C_Principal,B4XPage_Created,210,0,C_NoVenta,GUARDA_Click,227,0,Starter,Service_Create,40,0,C_Principal,B4XPage_Appear,225,0,C_Principal,e_ruta_EnterPressed,2029,6,B4XMainPage,Class_Globals,120,0,B4XMainPage,Initialize,125,0,B4XMainPage,B4XPage_Appear,316,2 SelectedBuild=0 VisibleModules=30,2,17,7,8,14,31,23,32