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

-Se quitó la restricción de los RMIs, ahora se pueden meter puros RMIs y ya no los borra del pedido.

Browse Source
This commit is contained in:
Jose Alberto Guerra Ugalde
2024-04-12 14:43:09 -06:00
parent e122b8c83e
commit 9e44af4b70
5 changed files with 14 additions and 7 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
B4A/Subs.bas
View File

@@ -1428,6 +1428,12 @@ End Sub
'Borra los RMIs del pedido mayores que los productos del pedido y si borro RMIs regresa FALSE.
Sub revisaRMIs(clienteId As String) As Boolean 'ignore
Log("Revisamos RMIs y borramos si es necesario.")
' ######################################################
Return True ' Regresamos verdadero para brincarnos el candado de RMIs, asi se pueden meter RMIs sin restricción.
' ######################################################
Private validos As Boolean = True
Private cr As Cursor = Starter.skmt.ExecQuery($"select sum(pe_cant) as cuantos from pedido where pe_cedis = 'DUR' and pe_cliente = '${clienteId}'"$)
Private cp As Cursor = Starter.skmt.ExecQuery($"select sum(pe_cant) as cuantos from pedido where pe_cedis <> 'DUR' and pe_cliente = '${clienteId}'"$)