- VERSION 4.12.04

- Se movio la variable "servidores" de Mainpage a Starter.

B4A/B4XMainPage.bas

@@ -72,7 +72,7 @@ Sub Class_Globals
 	Private lv_servidoresActivos As ListView
 	Dim jsn As JSONParser
 	Dim jsnGnr As JSONGenerator
-	DIM rp AS RuntimePermissions
+	Dim rp As RuntimePermissions
 End Sub
 
 Public Sub Initialize
@@ -140,6 +140,12 @@ Private Sub B4XPage_Created (Root1 As B4XView)
 	s.borraArribaDeXXXErrores(3000)
 	rp.CheckAndRequest(rp.PERMISSION_POST_NOTIFICATIONS)
 	Wait For B4XPage_PermissionResult (Permission As String, Result As Boolean) 'change to Activity_PermissionResult if non-B4XPages.
+
+'	Log(999)
+'	rp.CheckAndRequest(rp.PERMISSION_READ_PHONE_STATE)
+'	Wait For B4XPage_PermissionResult (Permission As String, Result As Boolean) 'change to Activity_PermissionResult if non-B4XPages.
+'	Log(888)
+	
 End Sub
 
 Sub B4XPage_Appear