- VERSION 4.09.06.EP_d

- Codigo para promo Procter PRO3009
- Codigo para promo Unilever PRO3015

B4A/Starter.bas

@@ -14,6 +14,7 @@ Sub Process_Globals
 	'These variables can be accessed from all modules.
 	Public gps As GPS
 	Dim ph As Phone
+	Dim skmt As SQL
 	Public rp As RuntimePermissions
 	Public FLP As FusedLocationProvider
 '	Private flpStarted As Boolean
@@ -52,6 +53,10 @@ Sub Service_Create
 	logs.Initialize
 	CallSubDelayed(FirebaseMessaging, "SubscribeToTopics") 'Para Push FirebaseMessaging
 	ubicacionActual.Initialize
+	If File.Exists(File.DirInternal, "kmt.db") = False Then
+		File.Copy(File.DirAssets, "kmt.db", File.DirInternal, "kmt.db")
+	End If
+	skmt.Initialize(File.DirInternal,"kmt.db", True)
 End Sub
 
 Private Sub BTAdmin_StateChanged (NewState As Int, OldState As Int)