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

- VERSION 4.11.29

Browse Source 
- Se regreso que pida el tipo de venta cuando se borra venta de Durakelo!!
This commit is contained in:
Jose Alberto Guerra Ugalde
2024-11-30 12:38:41 -06:00
parent 4e0980157d
commit 1c1259da0c
2 changed files with 5 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
soporteKMS.b4a
View File

@@ -34,7 +34,7 @@ Version=12.8
@EndOfDesignText@
#Region Project Attributes
#ApplicationLabel: Soporte Keymonsoft
#VersionName: 4.11.19
#VersionName: 4.11.29
'SupportedOrientations possible values: unspecified, landscape or portrait.
#SupportedOrientations: portrait
#CanInstallToExternalStorage: False
@@ -1555,7 +1555,7 @@ Private Sub b_forzarVentaBV_Click
End If
If laEmpresa = "Durakelo" Then
cmd.Name = "proc_QUITAR_VENTA_DURAKELO"
cmd.Parameters = Array As Object(almacenEmpresa, rutaVenta, usrSoporte, bandera)
cmd.Parameters = Array As Object(almacenEmpresa, rutaVenta, usrSoporte, tipoVentaKelloggs)
End If
Log($"Madamos borrar venta ${laEmpresa}: "$ & almacenEmpresa&"|"& rutaVenta&"|"&usrSoporte&"|"&tipoVentaKelloggs&"|"&bandera)
reqManager.ExecuteCommand(cmd , "borrarVentaKelloggs")
@@ -1622,7 +1622,7 @@ Private Sub b_revisarVentaBV_Click
laRuta = rut
cmd.Name = $"select_ventaXruta${laEmpresa}_soporte"$
cmd.Parameters = Array As Object(rut, almacenEmpresa)
If laEmpresa = "Kelloggs" Then
If laEmpresa = "Kelloggs" Or laEmpresa = "Durakelo" Then
cmd.Parameters = Array As Object(rut, almacenEmpresa, tipoVentaKelloggs)
Log($"mandamos: ruta=${rut}, almacen=${almacenEmpresa}, ${tipoVentaKelloggs}, select_ventaXruta${laEmpresa}_soporte"$)
End If
@@ -1664,7 +1664,7 @@ End Sub
Private Sub s_empresaBV_ItemClick (Position As Int, Value As Object)
laEmpresa = Value
If laEmpresa = "Kelloggs" Then
If laEmpresa = "Kelloggs" Or laEmpresa = "Durakelo" Then
l_tipoVentaBV.Visible = True
s_tipoVentaBV.Visible = True
p_tipoVentaBV.Visible = True

2
soporteKMS.b4a.meta
View File

@@ -10,6 +10,6 @@ ModuleClosedNodes0=2
ModuleClosedNodes1=
ModuleClosedNodes2=1
ModuleClosedNodes3=1,9,11
NavigationStack=Main,b_resDuplicadosKell_Click,1709,6,Main,b_cerrarTicket_Click,1442,0,Main,borrarVentaForzadaDurakelo,584,0,Main,b_revisarVentaBV_Click,1581,2,Main,b_forzarVentaBV_Click,1525,0,Main,b_borrarVentaBV_Click,1542,0,Main,JobDone,867,6,Main,b_forzarVenta2_Click,561,0,Main,borrarVentaForzadaKelloggs,567,2,Main,borrarVentaForzadaGuna,616,1
NavigationStack=Main,borrarVentaForzadaGuna,616,1,Main,Process_Globals,33,0,Main,s_empresaBV_ItemClick,1643,0,Visual Designer,layout1.bal,-100,4,Main,b_borrarVentaBV_Click,1565,0,Main,JobDone,870,6,Main,borrarVentaForzadaDurakelo,598,0,Main,b_forzarVentaBV_Click,1523,0,Main,s_almacenBV_ItemClick,1623,0,Main,b_revisarVentaBV_Click,1587,2
SelectedBuild=0
VisibleModules=2,3,1