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

@@ -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"