- VERSION 5.07.30

- Se aumento el credito por default para trade spending cuando NO tienen datos de 100,000 a 1,000,000
- Se cambio la ruta de prueba 238 almacen 2 por la ruta y almacen reales.
- Cambios varios para trade spending.

B4A/B4XMainPage.bas

@@ -468,6 +468,11 @@ Sub B4XPage_Appear
 		LogColor("Permisos de almacenamiento: " & MES1.HasPermission, Colors.Magenta)
 '		If MES1.HasPermission Then kh.revisaSiExisteRespaldo  '' Se comenta causa el error de que en el primer cliente,al guardar la venta se trabe la aplicacion!!
 	End If
+	Private cu As Cursor = Starter.skmt.ExecQuery("select USUARIO from USUARIOA")
+	If cu.RowCount > 0 Then
+		cu.Position = 0
+		If cu.GetString("USUARIO") <> "" Then user.Text = cu.GetString("USUARIO")
+	End If
 	DateTime.DateFormat = "yyyy-MM-dd HH:mm:ss"
 	Starter.skmt.ExecNonQuery($"insert into versiones (version, fecha) values ('${Application.VersionName}', '${DateTime.Date(DateTime.Now)}')"$)
 End Sub
@@ -1027,4 +1032,5 @@ End Sub
 Private Sub ImageView1_LongClick
 	Log("######    TRAEMOS FECHA #######")
 	GetFecha
+	
 End Sub