cheveguerra/Gabinete-Roit
1
0
Fork 0
mirror of https://github.com/KeymonSoft/Gabinete-Roit.git synced 2026-04-23 06:00:16 +00:00
Code Issues Packages Projects Releases Wiki Activity

- Se agregó el permiso de ACCESS_NETWORK_STATE al manifiesto para que no mande error en Android 14

Browse Source
This commit is contained in:
Jose Alberto Guerra Ugalde
2024-03-25 12:07:26 -06:00
parent 2d4e8dd2d2
commit dea84574e5
5 changed files with 25 additions and 29 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
B4A/Gabinete roit.b4a
View File

@@ -74,7 +74,7 @@ Library6=bitmapcreator
Library7=byteconverter Library7=byteconverter
Library8=camera Library8=camera
Library9=compressstrings Library9=compressstrings
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="34"/>~\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~SetApplicationAttribute(android:usesCleartextTraffic, "true")~\n~SetServiceAttribute(Tracker, android:foregroundServiceType, "location")~\n~'SetServiceAttribute(android:requestLegacyExternalStorage, True)~\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~~\n~AddManifestText(~\n~<uses-permission~\n~ android:name="android.permission.ACCESS_FINE_LOCATION"~\n~ android:maxSdkVersion="34" />~\n~)~\n~~\n~AddManifestText(~\n~<uses-permission ~\n~ android:name="android.permission.ACCESS_COARSE_LOCATION"~\n~ android:maxSdkVersion="34" />~\n~ )~\n~~\n~AddPermission(android.permission.ACCESS_BACKGROUND_LOCATION)~\n~~\n~'AddPermission("android.permission.MANAGE_EXTERNAL_STORAGE")~\n~~\n~~\n~'AddManifestText(<uses-permission~\n~'android:name="android.permission.WRITE_EXTERNAL_STORAGE"~\n~'android:maxSdkVersion="34" />~\n~')~\n~~\n~~\n~'End of default text.~\n~~\n~'/////////////////////// App Updating ////////////////~\n~' AddManifestText(<uses-permission~\n~' android:name="android.permission.WRITE_EXTERNAL_STORAGE"~\n~' android:maxSdkVersion="34" />~\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~ )~\n~AddManifestText(<uses-feature android:name="android.hardware.telephony" android:required="false" />)~\n~AddManifestText(<uses-feature android:name="android.hardware.camera" android:required="false" />)~\n~AddManifestText(<uses-feature android:name="android.hardware.camera.autofocus" android:required="false" />)~\n~AddManifestText(<uses-feature android:name="android.hardware.camera.flash" android:required="false" />)~\n~~\n~AddPermission(android.permission.REQUEST_INSTALL_PACKAGES)~\n~AddPermission(android.permission.INTERNET)~\n~AddPermission(android.permission.INSTALL_PACKAGES)~\n~'AddPermission(android.permission.READ_EXTERNAL_STORAGE)~\n~'AddPermission(android.permission.WRITE_EXTERNAL_STORAGE)~\n~'AddPermission(android.permission.READ_PHONE_STATE)~\n~AddPermission(android.permission.WAKE_LOCK)~\n~CreateResourceFromFile(Macro, JhsIceZxing1.CaturePortrait)~\n~'AddPermission("android.permission.MANAGE_EXTERNAL_STORAGE")~\n~SetApplicationAttribute(android:largeHeap, "true")~\n~'AddPermission("android.permission.MANAGE_EXTERNAL_STORAGE")~\n~~\n~AddPermission("android.permission.POST_NOTIFICATIONS")~\n~~\n~AddManifestText(<uses-permission android:name="android.permission.ACCESS_NETWORK_STATE" android:maxSdkVersion="33" />)~\n~AddPermission(android.permission.INTERNET)~\n~SetApplicationAttribute(android:allowBackup, "false")~\n~ 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="33"/>~\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~SetApplicationAttribute(android:usesCleartextTraffic, "true")~\n~SetServiceAttribute(Tracker, android:foregroundServiceType, "location")~\n~'SetServiceAttribute(android:requestLegacyExternalStorage, True)~\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.ACCESS_FINE_LOCATION"~\n~ android:maxSdkVersion="33" />~\n~)~\n~AddManifestText(~\n~<uses-permission ~\n~ android:name="android.permission.ACCESS_COARSE_LOCATION"~\n~ android:maxSdkVersion="33" />~\n~ )~\n~AddPermission(android.permission.ACCESS_BACKGROUND_LOCATION)~\n~~\n~'AddPermission("android.permission.MANAGE_EXTERNAL_STORAGE")~\n~'AddManifestText(<uses-permission~\n~'android:name="android.permission.WRITE_EXTERNAL_STORAGE"~\n~'android:maxSdkVersion="33" />~\n~')~\n~'End of default text.~\n~~\n~'/////////////////////// App Updating ////////////////~\n~' AddManifestText(<uses-permission~\n~' android:name="android.permission.WRITE_EXTERNAL_STORAGE"~\n~' android:maxSdkVersion="33" />~\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~ )~\n~AddManifestText(<uses-feature android:name="android.hardware.telephony" android:required="false" />)~\n~AddManifestText(<uses-feature android:name="android.hardware.camera" android:required="false" />)~\n~AddManifestText(<uses-feature android:name="android.hardware.camera.autofocus" android:required="false" />)~\n~AddManifestText(<uses-feature android:name="android.hardware.camera.flash" android:required="false" />)~\n~~\n~AddPermission(android.permission.REQUEST_INSTALL_PACKAGES)~\n~AddPermission(android.permission.INTERNET)~\n~AddPermission(android.permission.INSTALL_PACKAGES)~\n~'AddPermission(android.permission.READ_EXTERNAL_STORAGE)~\n~'AddPermission(android.permission.WRITE_EXTERNAL_STORAGE)~\n~AddPermission(android.permission.READ_PHONE_STATE)~\n~AddPermission(android.permission.WAKE_LOCK)~\n~CreateResourceFromFile(Macro, JhsIceZxing1.CaturePortrait)~\n~'AddPermission("android.permission.MANAGE_EXTERNAL_STORAGE")~\n~SetApplicationAttribute(android:largeHeap, "true")~\n~~\n~AddPermission("android.permission.POST_NOTIFICATIONS")~\n~AddManifestText(<uses-permission android:name="android.permission.ACCESS_NETWORK_STATE" android:maxSdkVersion="33" />)~\n~AddPermission(android.permission.INTERNET)~\n~~\n~SetApplicationAttribute(android:allowBackup, "false")~\n~~\n~~\n~'SetServiceAttribute(Tracker, android:foregroundServiceType, "location")~\n~AddPermission(android.permission.ACCESS_NETWORK_STATE)~\n~
Module1=appUpdater Module1=appUpdater
Module10=DBRequestManager Module10=DBRequestManager
Module11=errorManager Module11=errorManager
@@ -99,7 +99,7 @@ Version=12.8
#Region Project Attributes #Region Project Attributes
#ApplicationLabel: Gabinete #ApplicationLabel: Gabinete
#VersionCode: 1 #VersionCode: 1
#VersionName: 4.03.06 #VersionName: 4.03.07
'SupportedOrientations possible values: unspecified, landscape or portrait. 'SupportedOrientations possible values: unspecified, landscape or portrait.
#SupportedOrientations: portrait #SupportedOrientations: portrait
#CanInstallToExternalStorage: False #CanInstallToExternalStorage: False

2
B4A/Gabinete roit.b4a.meta
View File

@@ -49,6 +49,6 @@ ModuleClosedNodes6=
ModuleClosedNodes7= ModuleClosedNodes7=
ModuleClosedNodes8= ModuleClosedNodes8=
ModuleClosedNodes9= ModuleClosedNodes9=
NavigationStack=Subs,fechaKMT,89,0,Starter,Process_Globals,35,0,Starter,Service_Destroy,79,0,Visual Designer,login.bal,-100,3,Visual Designer,errormanager.bal,-100,1,Starter,Application_Error,67,0,errorManager,Activity_Resume,93,5,login,b_inicio_Click,109,0,login,JobDone,145,0,login,b_inicio_LongClick,119,6,Main,Process_Globals,21,0 NavigationStack=login,JobDone,178,0,B4XMainPage,Timerconteo_tick,95,0,B4XMainPage,B4XPage_Appear,72,1,Main,Process_Globals,19,0,Subs,notiLowReturn,69,0,Subs,IsConnectedToInternet,77,0,login,B4XPage_CloseRequest,193,0,B4XMainPage,CheckAndRequestNotificationPermission,86,0,B4XMainPage,B4XPage_Created,52,0,login,B4XPage_Appear,64,2
SelectedBuild=0 SelectedBuild=0
VisibleModules=14,3,12,5,6,10,15,16,11 VisibleModules=14,3,12,5,6,10,15,16,11

6
B4A/Subs.bas
View File

@@ -69,6 +69,12 @@ Sub notiLowReturn(title As String, Body As String, id As Int) As Notification 'i
notification.Notify(id) notification.Notify(id)
' Log("notiLowReturn SetInfo") ' Log("notiLowReturn SetInfo")
Return notification Return notification
' java.lang.SecurityException: Starting FGS with Type location callerApp=ProcessRecord{d39abd3 32668:gabinete.keymon.lat/u0a261}
' targetSDK=34 requires permissions: all of the permissions allOf=True [android.permission.FOREGROUND_SERVICE_LOCATION]
' any of the permissions allOf=False [android.permission.ACCESS_COARSE_LOCATION, android.permission.ACCESS_FINE_LOCATION]
' And the app must be in the eligible state/exemptions To access the foreground only permission
End Sub End Sub
Sub IsConnectedToInternet As Boolean 'ignore Sub IsConnectedToInternet As Boolean 'ignore

11
B4A/login.bas
View File

@@ -58,7 +58,6 @@ Private Sub B4XPage_Created (Root1 As B4XView)
End Sub End Sub
Sub B4XPage_Appear Sub B4XPage_Appear
If Starter.muestraProgreso = 1 Then If Starter.muestraProgreso = 1 Then
muestraProgreso("Descargando actualización") muestraProgreso("Descargando actualización")
Starter.muestraProgreso = 0 Starter.muestraProgreso = 0
@@ -69,7 +68,7 @@ Sub B4XPage_Appear
p_adorno.Width = Root.Width * 0.85 p_adorno.Width = Root.Width * 0.85
p_adorno.Height = Root.Height * 0.80 p_adorno.Height = Root.Height * 0.80
Log("inicio1") Log("inicio1")
StartService(Tracker) ' StartService(Tracker)
Starter.rp.CheckAndRequest(Starter.rp.PERMISSION_ACCESS_FINE_LOCATION) Starter.rp.CheckAndRequest(Starter.rp.PERMISSION_ACCESS_FINE_LOCATION)
Wait For B4XPage_PermissionResult (Permission As String, Result As Boolean) Wait For B4XPage_PermissionResult (Permission As String, Result As Boolean)
If Result Then If Result Then
@@ -103,8 +102,6 @@ Sub B4XPage_Appear
' Else If EsDomingo(newDate) Then ' Else If EsDomingo(newDate) Then
' Log("¡Hoy es Domingo!") ' Log("¡Hoy es Domingo!")
' End If ' End If
End Sub End Sub
Private Sub b_inicio_Click Private Sub b_inicio_Click
@@ -185,17 +182,14 @@ Sub JobDone (Job As HttpJob)
B4XPages.ShowPage("Supervisor") B4XPages.ShowPage("Supervisor")
End If End If
Else If Starter.trabaja = 0 Then Else If Starter.trabaja = 0 Then
B4XPages.ShowPage("Principal")
MsgboxAsync("Hoy es día de descanso","Atención") MsgboxAsync("Hoy es día de descanso","Atención")
End If End If
Next Next
' ToastMessageShow(" Historico Clientes Promociones Actualizado." , True) ' ToastMessageShow(" Historico Clientes Promociones Actualizado." , True)
End If End If
End If End If
End If End If
End Sub End Sub
Private Sub B4XPage_CloseRequest As ResumableSub Private Sub B4XPage_CloseRequest As ResumableSub
@@ -204,7 +198,6 @@ Private Sub B4XPage_CloseRequest As ResumableSub
Else Else
B4XPages.ShowPage("login") B4XPages.ShowPage("login")
End If End If
' Return True ' Return True
Return False Return False
End Sub End Sub

31
B4XMainPage.bas
View File

@@ -23,7 +23,7 @@ Version=9.85
Sub Class_Globals Sub Class_Globals
Public Root As B4XView Public Root As B4XView
Private xui As XUI Private xui As XUI
Dim timer As Timer ' Dim timer As Timer
' Clases ' Clases
Public login As login Public login As login
Dim principal As C_principal Dim principal As C_principal
@@ -33,7 +33,6 @@ End Sub
Public Sub Initialize 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.
@@ -42,9 +41,9 @@ Private Sub B4XPage_Created (Root1 As B4XView)
Root.LoadLayout("MainPage") Root.LoadLayout("MainPage")
B4XPages.GetManager.TransitionAnimationDuration = 0 B4XPages.GetManager.TransitionAnimationDuration = 0
login.Initialize login.Initialize
B4XPages.AddPageAndCreate("login",login.Initialize) B4XPages.AddPageAndCreate("login", login)
timer.Initialize("Timerconteo",1000) ' timer.Initialize("Timerconteo",1000)
timer.Enabled = True ' timer.Enabled = True
principal.Initialize principal.Initialize
B4XPages.AddPage("Principal", principal) B4XPages.AddPage("Principal", principal)
supervisor.Initialize supervisor.Initialize
@@ -67,19 +66,17 @@ Private Sub B4XPage_Created (Root1 As B4XView)
Else Else
ToastMessageShow("No permission", True) ToastMessageShow("No permission", True)
End If End If
CheckAndRequestNotificationPermission CheckAndRequestNotificationPermission
End Sub End Sub
Private Sub B4XPage_Appear Private Sub B4XPage_Appear
Wait For (CheckAndRequestNotificationPermission) Complete (HasPermission As Boolean) ' Wait For (CheckAndRequestNotificationPermission) Complete (HasPermission As Boolean)
If HasPermission Then ' If HasPermission Then
Log("Con permisos de notificación") ' Log("Con permisos de notificación")
Else ' Else
ToastMessageShow("No permission to show notification", True) ' ToastMessageShow("No permission to show notification", True)
End If ' End If
B4XPages.ShowPage("login")
End Sub End Sub
'Make sure that targetSdkVersion >= 33 'Make sure that targetSdkVersion >= 33
@@ -102,9 +99,9 @@ End Sub
'You can see the list of page related events in the B4XPagesManager object. The event name is B4XPage. 'You can see the list of page related events in the B4XPagesManager object. The event name is B4XPage.
Sub Timerconteo_tick Sub Timerconteo_tick
B4x_Transition.PrepareTransition_FadeOut(xui, Root.Width, Root.Height, Root, login.Root) ' B4x_Transition.PrepareTransition_FadeOut(xui, Root.Width, Root.Height, Root, login.Root)
B4XPages.ShowPageAndRemovePreviousPages("login") ' B4XPages.ShowPageAndRemovePreviousPages("login")
timer.Enabled = False ' timer.Enabled = False
End Sub End Sub