cheveguerra/Mazapa-Reparto
1
0
Fork 0
mirror of https://github.com/KeymonSoft/Mazapa-Reparto.git synced 2026-04-20 22:39:16 +00:00
Code Issues Packages Projects Releases Wiki Activity

5.07.25

Browse Source
This commit is contained in:
Javier
2025-09-01 14:03:23 -06:00
parent 0aed0e2527
commit fd31cf9915
733 changed files with 1072 additions and 1072 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
B4A/C_Productos.bas
View File

@@ -96,7 +96,7 @@ Sub B4XPage_Appear
' c=Starter.skmt.ExecQuery("select distinct hist_ventas.hvd_num_registro, HIST_VENTAS.HVD_CLIENTE, HIST_VENTAS.HVD_PRONOMBRE, HIST_VENTAS.HVD_PROID, HIST_VENTAS.HVD_CANT, HIST_VENTAS2.HVD_CANT as HVD_CANT2, HIST_VENTAS.HVD_COSTO_TOT, HIST_VENTAS.HVD_CODPROMO from HIST_VENTAS inner join HIST_VENTAS2 on HIST_VENTAS.HVD_PROID = HIST_VENTAS2.HVD_PROID and HIST_VENTAS.HVD_CLIENTE = HIST_VENTAS2.HVD_CLIENTE WHERE HIST_VENTAS.HVD_CLIENTE IN (Select CUENTA from cuentaa) and HIST_VENTAS.HVD_RECHAZO = 0 order by HIST_VENTAS.HVD_CODPROMO desc, HIST_VENTAS.HVD_PRONOMBRE asc")
c=Starter.skmt.ExecQuery("select * from HIST_VENTAS WHERE hvd_rechazo <> 2 and HVD_RECHAZOCANT > 0 and HVD_CLIENTE NOT IN (SELECT CUENTA FROM CUENTAA) order by HVD_CODPROMO desc, HVD_PRONOMBRE asc")
c=Starter.skmt.ExecQuery("select * from HIST_VENTAS WHERE hvd_rechazo <> 2 and HVD_RECHAZOCANT > 0 and HVD_CLIENTE NOT IN (SELECT CUENTA FROM CUENTAA) AND HVD_PROID IN (SELECT CAT_GP_ID FROM CAT_GUNAPROD WHERE CAT_GP_TIPO <> 'ALEN') order by HVD_CODPROMO desc, HVD_PRONOMBRE asc")
' Private c2 As Cursor=Starter.skmt.ExecQuery("select from PEDIDO WHERE PE_CLIENTE IN (SELECT CUENTA FROM CUENTAA)")
ListView1.Clear