cheveguerra/Intmex_Multiventa
1
0
Fork 0
mirror of https://github.com/KeymonSoft/Intmex_Multiventa.git synced 2026-04-19 21:59:30 +00:00
Code Issues Packages Projects Releases Wiki Activity

- VERSION 5.11.26

Browse Source 
- Se corrigió que cuando se descargue el dato de clientes nuevos no se dulplique el registro.
This commit is contained in:
Jose Alberto Guerra Ugalde
2025-11-28 17:36:45 -06:00
parent ddf5cfe2aa
commit 0a4483d93c
4 changed files with 3 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

1
B4A/C_Principal.bas
View File

@@ -1506,6 +1506,7 @@ Sub JobDone(Job As HttpJob)
If RESULT.Tag = "cn" Then 'query tag If RESULT.Tag = "cn" Then 'query tag
For Each records() As Object In RESULT.Rows For Each records() As Object In RESULT.Rows
Dim CAT_RU_CN As String = records(RESULT.Columns.Get("CAT_RU_CN")) Dim CAT_RU_CN As String = records(RESULT.Columns.Get("CAT_RU_CN"))
B4XPages.MainPage.skmt.ExecNonQuery("DELETE FROM CN")
B4XPages.MainPage.skmt.ExecNonQuery2("INSERT INTO CN(ACTIVO) VALUES (?)", Array As Object (CAT_RU_CN)) B4XPages.MainPage.skmt.ExecNonQuery2("INSERT INTO CN(ACTIVO) VALUES (?)", Array As Object (CAT_RU_CN))
Next Next
End If End If

BIN
B4A/Files/nuevocliente.bal
View File

Binary file not shown.

2
B4A/INTMEX.b4a
View File

@@ -164,7 +164,7 @@ Version=12.8
#Region Project Attributes #Region Project Attributes
#ApplicationLabel: Intmex #ApplicationLabel: Intmex
#VersionCode: 1 #VersionCode: 1
#VersionName: 5.11.25 #VersionName: 5.11.26
'SupportedOrientations possible values: unspecified, landscape or portrait. 'SupportedOrientations possible values: unspecified, landscape or portrait.
#SupportedOrientations: portrait #SupportedOrientations: portrait
#CanInstallToExternalStorage: False #CanInstallToExternalStorage: False

2
B4A/INTMEX.b4a.meta
View File

@@ -91,6 +91,6 @@ ModuleClosedNodes6=
ModuleClosedNodes7= ModuleClosedNodes7=
ModuleClosedNodes8= ModuleClosedNodes8=
ModuleClosedNodes9= ModuleClosedNodes9=
NavigationStack=C_Principal,JobDone,1499,0,C_Principal,cargar_Click,967,0,C_NuevoCliente,p_transparenteCN_Click,588,0,C_NuevoCliente,et_cp_TextChanged,569,0,C_NuevoCliente,b_clienteNuevo_Click,582,6,Diseñador Visual,nuevocliente.bal,-100,6,C_NuevoCliente,B4XPage_Created,168,0,C_NuevoCliente,Initialize,166,0,C_NuevoCliente,Class_Globals,115,4,C_NuevoCliente,B4XPage_Appear,234,6 NavigationStack=C_Principal,cargar_Click,967,0,C_NuevoCliente,p_transparenteCN_Click,588,0,C_NuevoCliente,et_cp_TextChanged,569,0,C_NuevoCliente,b_clienteNuevo_Click,582,6,C_NuevoCliente,B4XPage_Created,168,0,C_NuevoCliente,Initialize,166,0,C_NuevoCliente,Class_Globals,115,4,C_NuevoCliente,B4XPage_Appear,234,6,Main,Process_Globals,18,0,Diseñador Visual,nuevocliente.bal,-100,6,C_Principal,JobDone,1502,1
SelectedBuild=0 SelectedBuild=0
VisibleModules=28,2,13,20,14,29,15,9,4,11 VisibleModules=28,2,13,20,14,29,15,9,4,11