- VERSION 5.03.15

- Se agregó a la pantalla de registro, el engrane y la funcionalidad de envío de base de datos.

Durakelo_reparto.b4a

@@ -1,36 +1,38 @@
 Build1=Default,dreparto.keymon.com.mx
 File1=1.bal
-File10=guardagestion.bal
-File11=guna_viejo.png
-File12=info_gral.bal
-File13=infonavit1.jpg
-File14=itembuttonblue.png
-File15=keymon_logo.png
-File16=kmt.db
-File17=login.bal
-File18=LOGO SANFER.jpg
-File19=logo_exitus1.jpg
+File10=fondo_kmt.jpg
+File11=foto.bal
+File12=guardagestion.bal
+File13=guna_viejo.png
+File14=info_gral.bal
+File15=infonavit1.jpg
+File16=itembuttonblue.png
+File17=keymon_logo.png
+File18=kmt.db
+File19=login.bal
 File2=alert2.png
-File20=Malo.jpg
-File21=mapa.bal
-File22=mapa_rutas.bal
-File23=nopago.bal
-File24=nuevocliente.bal
-File25=pedido.bal
-File26=planfia_logo.png
-File27=planfia_logo_old.png
-File28=planfia_logo_old2.png
-File29=seleccion.bal
+File20=LOGO SANFER.jpg
+File21=logo_exitus1.jpg
+File22=Malo.jpg
+File23=mapa.bal
+File24=mapa_rutas.bal
+File25=nopago.bal
+File26=nuevocliente.bal
+File27=pedido.bal
+File28=planfia_logo.png
+File29=planfia_logo_old.png
 File3=alerta.jpg
-File30=sync.png
-File31=tarjeta.bal
-File32=telefonos.bal
+File30=planfia_logo_old2.png
+File31=seleccion.bal
+File32=sync.png
+File33=tarjeta.bal
+File34=telefonos.bal
 File4=buscar.bal
 File5=detalle_promo.bal
 File6=durakelo1.png
-File7=fila.bal
-File8=fondo_kmt.jpg
-File9=foto.bal
+File7=engrane.jpg
+File8=engrane.png
+File9=fila.bal
 FileGroup1=Default Group
 FileGroup10=Default Group
 FileGroup11=Default Group
@@ -57,6 +59,8 @@ FileGroup3=Default Group
 FileGroup30=Default Group
 FileGroup31=Default Group
 FileGroup32=Default Group
+FileGroup33=Default Group
+FileGroup34=Default Group
 FileGroup4=Default Group
 FileGroup5=Default Group
 FileGroup6=Default Group
@@ -66,18 +70,19 @@ FileGroup9=Default Group
 Group=Default Group
 Library1=baqrcode
 Library10=gps
-Library11=javaobject
-Library12=okhttputils2
-Library13=phone
-Library14=randomaccessfile
-Library15=reflection
-Library16=runtimepermissions
-Library17=serial
-Library18=sql
-Library19=togglelibrary
+Library11=ime
+Library12=javaobject
+Library13=okhttputils2
+Library14=phone
+Library15=randomaccessfile
+Library16=reflection
+Library17=runtimepermissions
+Library18=serial
+Library19=sql
 Library2=batteryprogressview
-Library20=zxing_scanner
-Library21=ime
+Library20=togglelibrary
+Library21=zxing_scanner
+Library22=fileprovider
 Library3=bitmapcreator
 Library4=byteconverter
 Library5=camera
@@ -85,7 +90,7 @@ Library6=core
 Library7=fusedlocationprovider
 Library8=googlemaps
 Library9=googlemapsextras
-ManifestCode='This code will be applied to the manifest file during compilation.~\n~'You do not need to modify it in most cases.~\n~'See this link for for more information: http://www.basic4ppc.com/forum/showthread.php?p=78136~\n~AddManifestText(~\n~<uses-sdk android:minSdkVersion="4" android:targetSdkVersion="28"/>~\n~<supports-screens android:largeScreens="true" ~\n~    android:normalScreens="true" ~\n~    android:smallScreens="true" ~\n~    android:anyDensity="true"/>)~\n~SetApplicationAttribute(android:icon, "@drawable/icon")~\n~SetApplicationAttribute(android:label, "$LABEL$")~\n~AddApplicationText(<activity android:name="com.google.zxing.client.android.CaptureActivity"~\n~android:screenOrientation="landscape" ~\n~android:configChanges="orientation|keyboardHidden"~\n~android:theme="@android:style/Theme.NoTitleBar.Fullscreen"~\n~android:windowSoftInputMode="stateAlwaysHidden">~\n~</activity>)~\n~AddManifestText(~\n~<uses-permission~\n~  android:name="android.permission.READ_PHONE_STATE"~\n~  android:maxSdkVersion="19" />~\n~)~\n~AddApplicationText(~\n~<meta-data~\n~  android:name="com.google.android.geo.API_KEY"~\n~  android:value="AIzaSyBlBnx3O-DncOSv3oFIp-12wgujOYYcl-U"/>~\n~  <meta-data android:name="com.google.android.gms.version"~\n~   android:value="@integer/google_play_services_version" />~\n~)~\n~AddManifestText(~\n~<uses-permission~\n~  android:name="android.permission.WRITE_EXTERNAL_STORAGE"~\n~  android:maxSdkVersion="19" />~\n~)~\n~'''' para el teclado~\n~	SetActivityAttribute(main, android:windowSoftInputMode, adjustResize|stateHidden)~\n~SetServiceAttribute(Tracker, android:foregroundServiceType, "location")~\n~~\n~SetApplicationAttribute(android:usesCleartextTraffic, "true")~\n~'Si al cargar un mapa de google manda este error "java.lang.NoClassDefFoundError: Failed resolution of: Lorg/apache/http/ProtocolVersion". agregar la siguiente linea:~\n~AddApplicationText(<uses-library android:name="org.apache.http.legacy" android:required="false"/>)
+ManifestCode='This code will be applied to the manifest file during compilation.~\n~'You do not need to modify it in most cases.~\n~'See this link for for more information: http://www.basic4ppc.com/forum/showthread.php?p=78136~\n~AddManifestText(~\n~<uses-sdk android:minSdkVersion="4" android:targetSdkVersion="28"/>~\n~<supports-screens android:largeScreens="true" ~\n~    android:normalScreens="true" ~\n~    android:smallScreens="true" ~\n~    android:anyDensity="true"/>)~\n~SetApplicationAttribute(android:icon, "@drawable/icon")~\n~SetApplicationAttribute(android:label, "$LABEL$")~\n~AddApplicationText(<activity android:name="com.google.zxing.client.android.CaptureActivity"~\n~android:screenOrientation="landscape" ~\n~android:configChanges="orientation|keyboardHidden"~\n~android:theme="@android:style/Theme.NoTitleBar.Fullscreen"~\n~android:windowSoftInputMode="stateAlwaysHidden">~\n~</activity>)~\n~AddManifestText(~\n~<uses-permission~\n~  android:name="android.permission.READ_PHONE_STATE"~\n~  android:maxSdkVersion="19" />~\n~)~\n~AddApplicationText(~\n~<meta-data~\n~  android:name="com.google.android.geo.API_KEY"~\n~  android:value="AIzaSyBlBnx3O-DncOSv3oFIp-12wgujOYYcl-U"/>~\n~  <meta-data android:name="com.google.android.gms.version"~\n~   android:value="@integer/google_play_services_version" />~\n~)~\n~AddManifestText(~\n~<uses-permission~\n~  android:name="android.permission.WRITE_EXTERNAL_STORAGE"~\n~  android:maxSdkVersion="19" />~\n~)~\n~'''' para el teclado~\n~	SetActivityAttribute(main, android:windowSoftInputMode, adjustResize|stateHidden)~\n~SetServiceAttribute(Tracker, android:foregroundServiceType, "location")~\n~~\n~SetApplicationAttribute(android:usesCleartextTraffic, "true")~\n~'Si al cargar un mapa de google manda este error "java.lang.NoClassDefFoundError: Failed resolution of: Lorg/apache/http/ProtocolVersion". agregar la siguiente linea:~\n~AddApplicationText(<uses-library android:name="org.apache.http.legacy" android:required="false"/>)~\n~~\n~AddApplicationText(~\n~  <provider~\n~  android:name="android.support.v4.content.FileProvider"~\n~  android:authorities="$PACKAGE$.provider"~\n~  android:exported="false"~\n~  android:grantUriPermissions="true">~\n~  <meta-data~\n~  android:name="android.support.FILE_PROVIDER_PATHS"~\n~  android:resource="@xml/provider_paths"/>~\n~  </provider>~\n~)~\n~CreateResource(xml, provider_paths,~\n~<paths>~\n~   <external-files-path name="name" path="" />~\n~   <files-path name="name" path="" />~\n~   <files-path name="name" path="shared" />~\n~</paths>~\n~)
 Module1=BatteryUtilities
 Module10=gestion
 Module11=Historico
@@ -96,10 +101,11 @@ Module15=nuevocliente
 Module16=pedidos
 Module17=seleccion
 Module18=Starter
-Module19=tarjeta
+Module19=Subs
 Module2=BUSCAR
-Module20=telefonos
-Module21=Tracker
+Module20=tarjeta
+Module21=telefonos
+Module22=Tracker
 Module3=CameraExClass
 Module4=colonia
 Module5=colonia2
@@ -107,15 +113,15 @@ Module6=DBRequestManager
 Module7=detalle_promo
 Module8=fila
 Module9=foto
-NumberOfFiles=32
-NumberOfLibraries=21
-NumberOfModules=21
-Version=12.5
+NumberOfFiles=34
+NumberOfLibraries=22
+NumberOfModules=22
+Version=12.8
 @EndOfDesignText@
 #Region  Project Attributes 
 	#ApplicationLabel: Durakelo-Reparto
 	#VersionCode: 1
-	#VersionName: 3.11.19
+	#VersionName: 5.03.15
 	'SupportedOrientations possible values: unspecified, landscape or portrait.
 	#SupportedOrientations: portrait
 	#CanInstallToExternalStorage: False
@@ -154,6 +160,7 @@ Sub Process_Globals
 	Dim montoActual, montorechazo,montosalida, clientesTotal, clientesVenta, clientesVisitados,almacen, rutaPreventa As String
 	Dim ultimaActualizacionGPS As String = 235959
 	Dim logger As Boolean
+	Public Provider As FileProvider
 End Sub
 
 Sub Globals
@@ -168,6 +175,10 @@ Sub Globals
 	Private IMEN As Label
 	Dim IMEI As String
 	Private l_version As Label
+	Private i_engrane As ImageView
+	Private p_configTransparente As Panel
+	Private b_enviaBD As Button
+	Private p_config As Panel
 End Sub
 
 Sub Activity_Create(FirstTime As Boolean)
@@ -196,8 +207,11 @@ Sub Activity_Create(FirstTime As Boolean)
 	Dim P As PhoneId
 	IMEN.Text = "" 'P.GetDeviceId
 	IMEI = "" 'P.GetDeviceId
-	
 	skmt.ExecNonQuery("CREATE TABLE IF NOT EXISTS RUTAA (RUTAA TEXT)")
+	p_configTransparente.Top = 0 : p_configTransparente.Left = 0
+	p_configTransparente.Width = Activity.Width : p_configTransparente.Height= Activity.Height
+	Provider.Initialize
+	Subs.centraPanel(p_config, p_configTransparente.Width)
 End Sub
 
 Sub Activity_Resume
@@ -356,4 +370,36 @@ Sub dameUsuario
 	Else
 		usuario = "SINUSUARIO"
 	End If
+End Sub
+
+Private Sub i_engrane_Click
+	p_configTransparente.Visible = True
+End Sub
+
+Private Sub p_configTransparente_Click
+	p_configTransparente.Visible = False
+End Sub
+
+Private Sub p_config_Click
+	
+End Sub
+
+'Enviamos la base de datos por correo
+Private Sub b_enviaBD_Click
+'	copiaDB
+'	Sleep(1000)
+	Dim FileName As String = "durakelo_kmt.db"
+	'copy the shared file to the shared folder
+	Log("xxxxxx:"&Provider.SharedFolder)
+	Sleep(1000)
+	File.Copy(File.DirInternal, "kmt.db", Provider.SharedFolder, FileName)
+	Dim email As Email
+	email.To.Add("cheveguerra@gmail.com")
+	email.Subject = "subject"
+	email.Attachments.Add(Provider.GetFileUri(FileName))
+'	email.Attachments.Add(Provider.GetFileUri(FileName)) 'second attachment
+	Dim in As Intent = email.GetIntent
+	in.Flags = 1 'FLAG_GRANT_READ_URI_PERMISSION
+	StartActivity(in)
+	p_configTransparente.Visible = False
 End Sub

Durakelo_reparto.b4a.meta

@@ -13,6 +13,7 @@ ModuleBookmarks19=
 ModuleBookmarks2=
 ModuleBookmarks20=
 ModuleBookmarks21=
+ModuleBookmarks22=
 ModuleBookmarks3=
 ModuleBookmarks4=
 ModuleBookmarks5=
@@ -35,6 +36,7 @@ ModuleBreakpoints19=
 ModuleBreakpoints2=
 ModuleBreakpoints20=
 ModuleBreakpoints21=
+ModuleBreakpoints22=
 ModuleBreakpoints3=
 ModuleBreakpoints4=
 ModuleBreakpoints5=
@@ -57,6 +59,7 @@ ModuleClosedNodes19=
 ModuleClosedNodes2=
 ModuleClosedNodes20=
 ModuleClosedNodes21=
+ModuleClosedNodes22=
 ModuleClosedNodes3=
 ModuleClosedNodes4=
 ModuleClosedNodes5=
@@ -64,6 +67,6 @@ ModuleClosedNodes6=
 ModuleClosedNodes7=
 ModuleClosedNodes8=3,6,8,17,18,19
 ModuleClosedNodes9=
-NavigationStack=seleccion,Activity_Create,154,6,Visual Designer,seleccion.bal,-100,6,Starter,ENVIA_ULTIMA_GPS,54,0,Starter,Process_Globals,12,0,Main,Activity_Create,69,6,Visual Designer,login.bal,-100,6,Main,Globals,57,0,Visual Designer,mapa_rutas.bal,-100,5,MAPA_RUTAS,Activity_Create,64,6,MAPA_RUTAS,Globals,39,0
+NavigationStack=Subs,centraEditText,31,0,Subs,Process_Globals,7,0,Main,dameUsuario,244,0,Main,b_enviaBD_Click,276,1,Main,Process_Globals,42,0,Main,Activity_Create,84,6,Diseñador Visual,login.bal,-100,6,Main,Globals,57,0
 SelectedBuild=0
-VisibleModules=1,9,10,17,12
+VisibleModules=1,9,10,17,12,19

Subs.bas

@@ -0,0 +1,37 @@
+B4A=true
+Group=Default Group
+ModulesStructureVersion=1
+Type=StaticCode
+Version=12.8
+@EndOfDesignText@
+'Code module
+'Subs in this code module will be accessible from all modules.
+Sub Process_Globals
+	'These global variables will be declared once when the application starts.
+	'These variables can be accessed from all modules.
+
+End Sub
+
+'Centra una etiqueta dentro de un elemento superior
+Sub centraEtiqueta(elemento As Label, anchoElementoSuperior As Int) 'ignore
+	elemento.Left = Round(anchoElementoSuperior/2)-(elemento.Width/2)
+End Sub
+
+'Centra un panel horizontalmente dentro de un elemento superior
+Sub centraPanel(elemento As Panel, anchoElementoSuperior As Int) 'ignore
+	elemento.Left = Round(anchoElementoSuperior/2)-(elemento.Width/2)
+End Sub
+
+'Centra un panel verticalmente dentro de un elemento superior
+Sub centraPanelV(elemento As Panel, altoElementoSuperior As Int) 'ignore
+	elemento.Top = Round(altoElementoSuperior/2)-(elemento.Height/2)
+End Sub
+
+'Centra una barra de progreso dentro de un elemento superior
+Sub centraProgressBar(elemento As ProgressBar, anchoElementoSuperior As Int) 'ignore
+	elemento.Left = Round(anchoElementoSuperior/2)-(elemento.Width/2)
+End Sub
+
+Sub centraEditText(elemento As EditText, anchoElementoSuperior As Int) 'ignore
+	elemento.Left = Round(anchoElementoSuperior/2)-(elemento.Width/2)
+End Sub