- VERSION 5.04.12

- Cambios en el manifiesto para intents desde whatsapp

B4A/B4XMainPage.bas

@@ -87,6 +87,8 @@ Sub Class_Globals
 	Dim Durakelo As C_Durakelo
 	Dim Marquez As C_Marquez
 	Private l_version0 As Label
+	Private b_guardaRutaTodos As Button
+	Private b_guardaRuta As Button
 End Sub
 
 Public Sub Initialize
@@ -139,6 +141,24 @@ Sub B4XPage_Appear
 	If Not(in.IsInitialized) Then in = B4XPages.GetNativeParent(Me).GetStartingIntent
 	If Not(intentUsado) And in <> Null Then
 		Log(in)
+'		Dim action As String = in.Action
+'		Log("Action: " & action)  ' Ej: "android.intent.action.VIEW"
+'		Dim uri As Object = in.GetData  ' Obtiene la URI (content://...)
+'		Log(in.GetData)
+'		If uri <> Null Then
+'			Dim uriString As String = uri
+'			Log("URI: " & uriString)  ' Ej: "content://com.whatsapp.provider.media/..."
+'		Else
+'			Log("El Intent no tiene URI asociada.")
+'		End If
+'		Dim mimeType As String = in.GetData
+'		Log("MIME Type: " & mimeType)  ' Ej: "application/x-sqlite3"
+'		If in.HasExtra("android.intent.extra.STREAM") Then
+'			Dim extraUri As Object = in.GetExtra("android.intent.extra.STREAM")
+'			Log("Extra URI: " & extraUri)  ' Ej: "content://..."
+'		Else
+'			Log("No hay extras con android.intent.extra.STREAM")
+'		End If
 		intentUsado = True
 '		Log(in.GetData)
 		If in.GetData <> Null Then
@@ -431,6 +451,7 @@ End Sub
 
 Sub l_ruta2_LongClick
 	p_editaRuta.Top = l_ruta2.top
+	b_guardaRuta.text = $"Cambiar en "${l_ruta2.text}""$
 	p_editaRuta.Visible = True
 End Sub
 
@@ -476,6 +497,22 @@ Sub b_guardaRuta_Click
 	p_editaRuta.Visible = False
 End Sub
 
+Private Sub b_guardaRutaTodos_Click
+	Log("Guardamos nueva ruta.")
+	If et_nuevaRuta.Text <> "" Then
+		skmt.ExecNonQuery($"update PEDIDO set PE_RUTA = '${et_nuevaRuta.Text}'"$)
+		skmt.ExecNonQuery($"update PEDIDO_CLIENTE set PC_RUTA = '${et_nuevaRuta.Text}' where PC_RUTA = '${ruta}'"$)
+		skmt.ExecNonQuery($"update kmt_info set CAT_CL_RUTA = '${et_nuevaRuta.Text}' where CAT_CL_RUTA = '${ruta}'"$)
+		Try 'Si es Guna, se pone en kmt_info2
+			skmt.ExecNonQuery($"update kmt_info2 set CAT_CL_RUTA = '${et_nuevaRuta.Text}' where CAT_CL_RUTA = '${ruta}'"$)
+		Catch
+			Log(LastException)
+		End Try
+		l_ruta2.Text = et_nuevaRuta.text
+	End If
+	p_editaRuta.Visible = False
+End Sub
+
 'Cambiamos el almacen actual por el especificado.
 Sub b_guardaAlmacen_Click
 	If et_nuevoAlmacen.Text <> "" Then
@@ -988,4 +1025,4 @@ End Sub
 
 Private Sub p_validacion_Click
 	p_validacion.Visible = False
-End Sub
+End Sub

B4A/DBCheck.b4a

@@ -23,7 +23,7 @@ Library6=ime
 Library7=okhttputils2
 Library8=randomaccessfile
 Library9=sql
-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: https://www.b4x.com/forum/showthread.php?p=78136~\n~AddManifestText(~\n~<uses-sdk android:minSdkVersion="5" android:targetSdkVersion="31"/>~\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~CreateResourceFromFile(Macro, Themes.LightTheme)~\n~'End of default text.~\n~~\n~SetApplicationAttribute(android:usesCleartextTraffic, "true")~\n~AddPermission(android.permission.INTERNET)~\n~AddPermission(android.permission.READ_EXTERNAL_STORAGE)~\n~AddPermission(android.permission.WRITE_EXTERNAL_STORAGE)~\n~SetApplicationAttribute(android:allowBackup, "false")~\n~~\n~AddActivityText(main,~\n~<intent-filter>~\n~<action android:name="android.intent.action.VIEW" />~\n~<category android:name="android.intent.category.DEFAULT" />~\n~<data android:mimeType="application/octet-stream" />~\n~</intent-filter>)
+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: https://www.b4x.com/forum/showthread.php?p=78136~\n~AddManifestText(~\n~<uses-sdk android:minSdkVersion="5" android:targetSdkVersion="31"/>~\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~CreateResourceFromFile(Macro, Themes.LightTheme)~\n~'End of default text.~\n~~\n~SetApplicationAttribute(android:usesCleartextTraffic, "true")~\n~AddPermission(android.permission.INTERNET)~\n~AddPermission(android.permission.READ_EXTERNAL_STORAGE)~\n~AddPermission(android.permission.WRITE_EXTERNAL_STORAGE)~\n~SetApplicationAttribute(android:allowBackup, "false")~\n~~\n~'AddActivityText(main,~\n~'<intent-filter>~\n~'<action android:name="android.intent.action.VIEW" />~\n~'<category android:name="android.intent.category.DEFAULT" />~\n~'<data android:mimeType="application/octet-stream" />~\n~'</intent-filter>)~\n~~\n~AddActivityText(main,~\n~<intent-filter>~\n~<action android:name="android.intent.action.VIEW" />~\n~<category android:name="android.intent.category.DEFAULT" />~\n~    <data android:mimeType="application/x-sqlite3" /> <!-- Para bases de datos -->~\n~    <data android:mimeType="application/octet-stream" /> <!-- Para otros archivos binarios -->~\n~    <data android:scheme="content" /> <!-- Filtra URIs tipo content:// -->~\n~</intent-filter>)
 Module1=B4XMainPage
 Module2=C_Durakelo
 Module3=C_Envios
@@ -41,7 +41,7 @@ Version=12.8
 #Region  Project Attributes 
 	#ApplicationLabel: DBCheck
 	#VersionCode: 1
-	#VersionName: 4.11.18
+	#VersionName: 5.04.12
 	'SupportedOrientations possible values: unspecified, landscape or portrait.
 	#SupportedOrientations: portrait
 	#CanInstallToExternalStorage: False

B4A/DBCheck.b4a.meta

@@ -19,7 +19,7 @@ ModuleBreakpoints7=
 ModuleBreakpoints8=
 ModuleBreakpoints9=
 ModuleClosedNodes0=2,6
-ModuleClosedNodes1=7,8,9,11,12,13,15,16,17,18,19,20,21
+ModuleClosedNodes1=4,7,8,9,11,12,13,16,17,18,19,20,21,22
 ModuleClosedNodes2=
 ModuleClosedNodes3=4,5
 ModuleClosedNodes4=
@@ -28,6 +28,6 @@ ModuleClosedNodes6=
 ModuleClosedNodes7=
 ModuleClosedNodes8=1
 ModuleClosedNodes9=12,13,14
-NavigationStack=B4XMainPage,envioMarquez,688,0,B4XMainPage,envioDurakelo,685,0,B4XMainPage,b_valida_Click,973,1,B4XMainPage,Class_Globals,81,1,C_Marquez,valida,446,0,C_Durakelo,envia,191,0,C_Marquez,Initialize,21,1,C_Durakelo,JobDone,344,0,C_Marquez,envia,254,0,C_Marquez,JobDone,473,1
+NavigationStack=C_Marquez,envia,254,0,C_Marquez,JobDone,473,1,B4XMainPage,b_guardaRuta_Click,458,1,B4XMainPage,b_guardaRutaTodos_Click,486,0,B4XMainPage,l_ruta2_LongClick,429,6,Main,Globals,23,0,Main,Process_Globals,19,0,Main,Activity_KeyPress,39,0,Main,Activity_Create,30,0,B4XMainPage,B4XPage_Appear,137,0
 SelectedBuild=0
 VisibleModules=1,9,4,2,5,6