cheveguerra/Guna_Preventa_Diseno_Viejo
1
0
Fork 0
mirror of https://github.com/KeymonSoft/Guna_Preventa_Diseno_Viejo.git synced 2026-04-20 06:09:13 +00:00
Code Issues Packages Projects Releases Wiki Activity

- VERSION 5.03.22

Browse Source 
- Se regresaron cambios para la ruta de suplencia (VERSION 5.03.10)
- Se regresaron cambios para nota y promo especial (VERSION 5.02.22)
This commit is contained in:
Jose Alberto Guerra Ugalde
2025-03-24 15:57:22 -06:00
parent 005ffd00b0
commit d4346a65e5
5 changed files with 82 additions and 7 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
B4A/C_Principal.bas
View File

@@ -1095,19 +1095,18 @@ Sub cargar_Click
cmd.Name = "selectPromo3055Jul-Sep_Guna"
cmd.Parameters = Array As Object(e_ruta.text, ALMACEN)
B4XPages.MainPage.reqManager.ExecuteQuery(cmd , 0, "hist_pro3055")
'SUPLENCIA
If E_RUTA2.text <> "" Then
Starter.skmt.ExecNonQuery("DELETE from RUTA_SUPLENCIA")
B4XPages.MainPage.skmt.ExecNonQuery2("INSERT INTO RUTA_SUPLENCIA(RS_RUTA) VALUES(?)",Array As String(E_RUTA2.Text))
E_RUTA2.Visible = False
p_ruta2.Visible = False
cmd.Initialize
cmd.Name = "select_cat_clientes_guna_GV2"
cmd.Parameters = Array As Object(E_RUTA2.text, ALMACEN)
B4XPages.MainPage.reqManager.ExecuteQuery(cmd , 0, "kmt_datos2")
cmd.Initialize
cmd.Name = "select_hist_datos_GV2_2"
cmd.Parameters = Array As Object(E_RUTA2.text, ALMACEN,E_RUTA2.text, ALMACEN,E_RUTA2.text, ALMACEN)