VERSION 6.03.18

- Agregamos vacuum al borrado de las coordenadas!
This commit is contained in:
2026-03-20 19:27:17 -06:00
parent 25ef7fedb8
commit 18bda794e6
2 changed files with 2 additions and 2 deletions

View File

@@ -129,7 +129,6 @@ Public Sub Initialize
' B4XPages.GetManager.LogEvents = True ' B4XPages.GetManager.LogEvents = True
End Sub End Sub
'This event will be called once, before the page becomes visible. 'This event will be called once, before the page becomes visible.
Private Sub B4XPage_Created (Root1 As B4XView) Private Sub B4XPage_Created (Root1 As B4XView)
Root = Root1 Root = Root1
@@ -321,6 +320,7 @@ Sub B4XPage_Appear
Dim lastUpdate As String = DateTime.Date(fechaCorteLong) Dim lastUpdate As String = DateTime.Date(fechaCorteLong)
' Borramos las coordenadas de mas de 60 dias de RUTA_GPS ' 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.ExecNonQuery2("DELETE FROM RUTA_GPS WHERE FECHA < ?", Array As String(lastUpdate))
Starter.skmt.ExecNonQuery("VACUUM")
Log("Borramos coords viejas: " & lastUpdate) Log("Borramos coords viejas: " & lastUpdate)
End Sub End Sub

View File

@@ -97,6 +97,6 @@ ModuleClosedNodes6=
ModuleClosedNodes7= ModuleClosedNodes7=
ModuleClosedNodes8= ModuleClosedNodes8=
ModuleClosedNodes9= 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 SelectedBuild=0
VisibleModules=30,2,17,7,8,14,31,23,32 VisibleModules=30,2,17,7,8,14,31,23,32