diff --git a/durakelo.b4a b/durakelo.b4a
index 9cd38a1..794dc8b 100644
--- a/durakelo.b4a
+++ b/durakelo.b4a
@@ -1351,10 +1351,9 @@ Sub copiaDB
 	End If
 End Sub
 
-
 'Guarda la empresa y version de la app en CAT_VARIABLES.
-Sub guardaAppInfo(skmt2 As SQL)
-	skmt2.ExecNonQuery("delete from CAT_VARIABLES where CAT_VA_DESCRIPCION = 'EMPRESA' or CAT_VA_DESCRIPCION = 'APP_VERSION'")
-	skmt2.ExecNonQuery($"insert into CAT_VARIABLES (CAT_VA_DESCRIPCION, CAT_VA_VALOR) values ('EMPRESA', '${Application.LabelName}')"$)
-	skmt2.ExecNonQuery($"insert into CAT_VARIABLES (CAT_VA_DESCRIPCION, CAT_VA_VALOR) values ('APP_VERSION', '${Application.VersionName}')"$)
+Sub guardaAppInfo(skmt1 As SQL)
+	skmt1.ExecNonQuery("delete from CAT_VARIABLES where CAT_VA_DESCRIPCION = 'EMPRESA' or CAT_VA_DESCRIPCION = 'APP_NAME' or CAT_VA_DESCRIPCION = 'APP_VERSION'")
+	skmt1.ExecNonQuery($"insert into CAT_VARIABLES (CAT_VA_DESCRIPCION, CAT_VA_VALOR) values ('APP_NAME', '${Application.LabelName}')"$)
+	skmt1.ExecNonQuery($"insert into CAT_VARIABLES (CAT_VA_DESCRIPCION, CAT_VA_VALOR) values ('APP_VERSION', '${Application.VersionName}')"$)
 End Sub
\ No newline at end of file