This commit is contained in:
cvaldes1201
2026-03-10 10:20:45 -06:00
parent 7ccb902593
commit 860ee42ad2
3 changed files with 5 additions and 2 deletions

View File

@@ -140,7 +140,7 @@ Sub B4XPage_Appear
End If
c.Close
'
' p_producto.Visible = True 'PARA PRUEBAS
p_producto.Visible = True 'PARA PRUEBAS
End Sub

View File

@@ -333,8 +333,11 @@ Private Sub lb_folio_Click
Msgbox2Async("Estas seguro de empezar a pickear la ruta : "& folioactual &" del almacen: "& B4XPages.MainPage.almacen.almacenselec,"Atención","Si","","No",Null, False)
Wait For Msgbox_Result (result As Int)
If result=DialogResponse.POSITIVE Then
Log((almacen& ", "& folioactual& ", "&fechabusqueda& ", "&almacen))
Log(almacen)
If almacen = 81 Then
Dim cmd As DBCommand
cmd.Initialize
cmd.Name = "select_productos_guna_picking_BAT"

View File

@@ -28,6 +28,6 @@ ModuleClosedNodes6=
ModuleClosedNodes7=
ModuleClosedNodes8=
ModuleClosedNodes9=
NavigationStack=C_seleccion,Class_Globals,0,0,C_seleccion,b_cargar_Click,270,0,C_almacen,lb_folio_Click,65,0,C_almacen,B4XPage_Appear,40,0,Starter,Process_Globals,11,2,C_picking,B4XPage_Appear,135,2,C_seleccion,lb_folio_Click,326,6,C_picking,btnFlash2_Click,255,0,C_picking,btnFlash_Click,240,3,C_picking,b_guardapicking_Click,421,3,C_terminar,B4XPage_Appear,64,0
NavigationStack=Starter,Process_Globals,11,2,C_picking,btnFlash2_Click,255,0,C_picking,btnFlash_Click,240,3,C_picking,b_guardapicking_Click,421,3,C_seleccion,Class_Globals,0,0,C_seleccion,lb_folio_Click,308,6,C_picking,Class_Globals,0,0,C_picking,B4XPage_Appear,129,2,C_terminar,B4XPage_Appear,62,0,C_terminar,b_enviar_Click,142,0,C_terminar,CreateListItem,116,0
SelectedBuild=0
VisibleModules=1,2,3,4,5,6,7,8,9