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

se ajustan procesos de mayoreo

Browse Source
This commit is contained in:
cvaldes1201
2026-04-16 13:40:13 -06:00
parent a80af328a7
commit cdd72a1b04
5 changed files with 256 additions and 254 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
B4A/C_DetalleVenta.bas
View File

@@ -579,7 +579,8 @@ Sub b_prodMenos_Click
Log(esteTag.Get(3))
result = Msgbox2("Si se modifica una promoción, la promoción se rompe y solo quedarán los productos sueltos, ¿seguro que desea continuar?","Modificar Promoción", "Si", "", "No",LoadBitmap(File.DirAssets,"alert2.png")) 'ignore
If result = DialogResponse.POSITIVE Then 'Quitamos esta promo
prodsMap.Remove(esteTag.Get(3))
' prodsMap.Remove(esteTag.Get(3))
' c=Starter.skmt.ExecQuery($"select HVD_CODPROMO FROM HIST_VENTAS WHERE HVD_CODPROMO = '${esteTag.Get(2)}' AND HVD_cliente IN (Select CUENTA from cuentaa)"$)
' For i = 0 To c.RowCount -1
' c.Position = i