diff --git a/B4A/C_Principal.bas b/B4A/C_Principal.bas index c5470fe..3e6fa23 100644 --- a/B4A/C_Principal.bas +++ b/B4A/C_Principal.bas @@ -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 diff --git a/B4A/Guna Vistas V3.1.b4a.meta b/B4A/Guna Vistas V3.1.b4a.meta index 397cc04..4cdda13 100644 --- a/B4A/Guna Vistas V3.1.b4a.meta +++ b/B4A/Guna Vistas V3.1.b4a.meta @@ -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