From 4319c60b81f022b2d57096cd126aa7f13e5875ed Mon Sep 17 00:00:00 2001
From: cheveguerra <cheveguerra@gmail.com>
Date: Tue, 5 Sep 2023 15:09:37 -0600
Subject: [PATCH] Para que guarde APP INFO en CAT_VARIABLES

---
 B4A/INTMEX_LL.b4a | 2 +-
 B4A/Subs.bas      | 6 +++---
 2 files changed, 4 insertions(+), 4 deletions(-)

diff --git a/B4A/INTMEX_LL.b4a b/B4A/INTMEX_LL.b4a
index 20b9c1c..90d0b4c 100644
--- a/B4A/INTMEX_LL.b4a
+++ b/B4A/INTMEX_LL.b4a
@@ -150,7 +150,7 @@ Module9=C_NoVenta
 NumberOfFiles=46
 NumberOfLibraries=32
 NumberOfModules=22
-Version=12.5
+Version=12.2
 @EndOfDesignText@
 #Region  Project Attributes 
 	#ApplicationLabel: Intmex v1
diff --git a/B4A/Subs.bas b/B4A/Subs.bas
index 9a0251e..159d9bd 100644
--- a/B4A/Subs.bas
+++ b/B4A/Subs.bas
@@ -1321,7 +1321,7 @@ End Sub
 
 'Guarda la empresa y version de la app en CAT_VARIABLES.
 Sub guardaAppInfo(skmt As SQL)
-		skmt.ExecNonQuery("delete from CAT_VARIABLES where CAT_VA_DESCRIPCION = 'EMPRESA' or CAT_VA_DESCRIPCION = 'APP_VERSION'")
-		skmt.ExecNonQuery($"insert into CAT_VARIABLES (CAT_VA_DESCRIPCION, CAT_VA_VALOR) values ('EMPRESA', 'Intmex')"$)
-		skmt.ExecNonQuery($"insert into CAT_VARIABLES (CAT_VA_DESCRIPCION, CAT_VA_VALOR) values ('APP_VERSION', '${Application.VersionName}')"$)
+	skmt.ExecNonQuery("delete from CAT_VARIABLES where CAT_VA_DESCRIPCION = 'EMPRESA' or CAT_VA_DESCRIPCION = 'APP_NAME' or or CAT_VA_DESCRIPCION = 'APP_VERSION'")
+	skmt.ExecNonQuery($"insert into CAT_VARIABLES (CAT_VA_DESCRIPCION, CAT_VA_VALOR) values ('APP_NAME', '${Application.LabelName}')"$)
+	skmt.ExecNonQuery($"insert into CAT_VARIABLES (CAT_VA_DESCRIPCION, CAT_VA_VALOR) values ('APP_VERSION', '${Application.VersionName}')"$)
 End Sub
\ No newline at end of file