cheveguerra/Kelloggs_v4
1
0
Fork 0
mirror of https://github.com/KeymonSoft/Kelloggs_v4.git synced 2026-04-18 02:29:13 +00:00
Code Issues Packages Projects Releases Wiki Activity

- Se completo el codigo de la clase promociones, ya "casi" sin mapas!

Browse Source
This commit is contained in:
Jose Alberto Guerra Ugalde
2024-05-12 17:53:07 -06:00
parent 99bf32b3fd
commit 33550e86c3
8 changed files with 250 additions and 170 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
B4A/C_Promos.bas
View File

@@ -158,8 +158,8 @@ Sub muestraPromo(promo As String, cliente As String)
' jpeg = c2.GetBlob("CAT_GP_IMG")
' ins.InitializeFromBytesArray(jpeg, 0, jpeg.Length)
' bmp.Initialize2(ins)
Private indicePV = pv.IndexOf(p)
Private estePrecio = listaPreciosPV.Get(indicePV)
Private indicePV As Int = pv.IndexOf(p)
Private estePrecio As String = listaPreciosPV.Get(indicePV)
Private thisProd As Map = prodsPromo.Get(p)
If thisLog Then Log(thisProd)
If existenciaProdVariable > 0 Then