cheveguerra/Guna_Preventa
1
0
Fork 0
mirror of https://github.com/KeymonSoft/Guna_Preventa.git synced 2026-04-17 21:06:32 +00:00
Code Issues Packages Projects Releases Wiki Activity

- VERSION 5.02.18

Browse Source 
- Se quito el query del envío de abarrotes.
- Se puso que cuando se hace "FIN DIA", el texto de la ruta se ponga en blanco.
This commit is contained in:
Jose Alberto Guerra Ugalde
2025-02-20 16:21:59 -06:00
parent 6b53ca3d88
commit 3cf7c07968
2 changed files with 21 additions and 21 deletions
Download Patch File Download Diff File Expand all files Collapse all files

38
B4A/C_Principal.bas
View File

@@ -2266,6 +2266,7 @@ Sub t2_tick
' End If
' img2.Visible=False
t2.Enabled = False
e_ruta.Text = ""
B4XPage_Appear
End Sub
@@ -2337,27 +2338,27 @@ End Sub
Sub t1_tick
' If CARGA = "SUBIR" Then
cmd.Initialize
cmd.Name = "select_cuantos_pedido_GV2"
cmd.Parameters = Array As Object(ALMACEN,l_ruta.text)
B4XPages.MainPage.reqManager.ExecuteQuery(cmd , 0, "valida_pedido")
cmd.Initialize
cmd.Name = "select_cuantos_pedido_GV2"
cmd.Parameters = Array As Object(ALMACEN,l_ruta.text)
B4XPages.MainPage.reqManager.ExecuteQuery(cmd , 0, "valida_pedido")
cmd.Initialize
cmd.Name = "select_cuantos_noventa_GV2"
cmd.Parameters = Array As Object(ALMACEN,l_ruta.text)
B4XPages.MainPage.reqManager.ExecuteQuery(cmd , 0, "valida_noventa")
cmd.Initialize
cmd.Name = "select_cuantos_noventa_GV2"
cmd.Parameters = Array As Object(ALMACEN,l_ruta.text)
B4XPages.MainPage.reqManager.ExecuteQuery(cmd , 0, "valida_noventa")
cmd.Initialize
cmd.Name = "select_cuantos_pedidoc_GV2"
cmd.Parameters = Array As Object(ALMACEN,l_ruta.text)
B4XPages.MainPage.reqManager.ExecuteQuery(cmd , 0, "valida_pedidoc")
cmd.Initialize
cmd.Name = "select_cuantos_pedidoc_GV2"
cmd.Parameters = Array As Object(ALMACEN,l_ruta.text)
B4XPages.MainPage.reqManager.ExecuteQuery(cmd , 0, "valida_pedidoc")
If PB2.Progress = 0 Then
S_CP.Text = "ENVIAR DATOS (K-1)"
End If
Log("TIMER DISABLED")
img2.Visible=False
t1.Enabled = False
If PB2.Progress = 0 Then
S_CP.Text = "ENVIAR DATOS (K-1)"
End If
Log("TIMER DISABLED")
img2.Visible=False
t1.Enabled = False
' CARGA = ""
' End If
End Sub
@@ -2486,7 +2487,6 @@ Sub P_RESUMEN_click
End Sub
Sub CARGA_Click
B4XPages.ShowPage("Productos")
End Sub

4
B4A/Guna Vistas V3.1.b4a.meta
View File

@@ -60,7 +60,7 @@ ModuleClosedNodes10=
ModuleClosedNodes11=
ModuleClosedNodes12=
ModuleClosedNodes13=
ModuleClosedNodes14=
ModuleClosedNodes14=14,15,16,17,18,22,28,29,30
ModuleClosedNodes15=3,17
ModuleClosedNodes16=
ModuleClosedNodes17=
@@ -82,6 +82,6 @@ ModuleClosedNodes6=
ModuleClosedNodes7=5,6,8,9,10,11
ModuleClosedNodes8=
ModuleClosedNodes9=
NavigationStack=Diseñador Visual,cliente.bal,-100,2,C_Cliente,B4XPage_Appear,1032,6,C_Principal,JobDone,1222,0,C_Principal,Subir_Click,736,0,Subs,TraeMontoProd,1236,0,Subs,TraeMontoProd2,1244,0,B4XMainPage,B4XPage_Created,131,0,DBRequestManager,HandleJob,237,0,Diseñador Visual,principal.bal,-100,2,C_Principal,B4XPage_Created,293,0
NavigationStack=C_Principal,Subir_Click,736,0,Subs,TraeMontoProd,1236,0,Subs,TraeMontoProd2,1244,0,B4XMainPage,B4XPage_Created,131,0,DBRequestManager,HandleJob,237,0,Diseñador Visual,principal.bal,-100,2,C_Principal,B4XPage_Created,293,0,C_Principal,e_ruta_EnterPressed,2266,0,C_Principal,t1_tick,2331,5,C_Principal,P_RESUMEN_click,2481,0,C_Principal,t2_tick,2262,0
SelectedBuild=0
VisibleModules=25,2,14,26,5,10,15,20,4,21