cheveguerra/Durakelo
1
0
Fork 0
mirror of https://github.com/KeymonSoft/Durakelo.git synced 2026-04-20 12:49:25 +00:00
Code Issues Packages Projects Releases Wiki Activity

- VERSION 5.05.13

Browse Source 
- Se corrigen los montos y piezas que semuestran en Resumen Dia del abordo
- Se agrega la funcion "Subs/agrupaProdsPromo" que agrupa los productos fijos y variables de las promos, esto para el caso de que los fijos y variables sean iguales en monto y cantidad y el pasarInfoMovil no los tire!
This commit is contained in:
Jose Alberto Guerra Ugalde
2025-05-14 18:31:13 -06:00
parent e233af99fd
commit 9011b6a8bb
5 changed files with 72 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
B4A/C_Principal.bas
View File

@@ -2557,9 +2557,13 @@ Sub Resumen_Click
Private montoAbordo As String = 0
Private px As Cursor = Starter.skmt.ExecQuery("select cat_gp_almacen, cat_gp_precio from cat_gunaprod2 where cat_gp_tipo <> 'PROMOS'")
If px.RowCount > 0 Then
px.Position = 0
pzasAbordo = pzasAbordo + px.GetString("CAT_GP_ALMACEN")
montoAbordo = montoAbordo + (px.GetString("CAT_GP_PRECIO") * px.GetInt("CAT_GP_ALMACEN"))
For i = 0 To px.RowCount - 1
px.Position = i
pzasAbordo = pzasAbordo + px.GetString("CAT_GP_ALMACEN")
montoAbordo = montoAbordo + (px.GetString("CAT_GP_PRECIO") * px.GetInt("CAT_GP_ALMACEN"))
Log(pzasAbordo)
Log(montoAbordo)
Next
End If
Log(pzasAbordo)
Log(montoAbordo)