mirror of
https://github.com/KeymonSoft/Lanterna_H.git
synced 2026-04-17 21:06:16 +00:00
- Se corrigio que la pantalla de reasignar mesa se muestre bien.
- Se agregó que cuando se descargue informacion de web, si había mesas abiertas, se regrese la informacion a CAT_MESAS. - Se corrigio el como se ven los campos cuando se cierra la mesa.
This commit is contained in:
8
Subs.bas
8
Subs.bas
@@ -1076,7 +1076,7 @@ Sub revisaMaxPromosProdsVariablesPorInventario(pm As Map) As Int 'ignore
|
||||
If thisLog Then Log($"Prods variables disponibles = ${totalProdsVariablesDisponibles}"$)
|
||||
If thisLog Then Log($"Prods variables2 disponibles = ${totalProdsVariables2Disponibles}"$)
|
||||
Private maxPromosXVariables As Int = 0
|
||||
Private maxPromosXVariables2 As Int = 0
|
||||
' Private maxPromosXVariables2 As Int = 0
|
||||
For x = 1 To maxPromosXFijos
|
||||
If thisLog Then Log("=====================================================")
|
||||
If thisLog Then Log("=====================================================")
|
||||
@@ -1175,7 +1175,7 @@ Sub traeTotalTicketActual_P(tipoPago As String) As String
|
||||
If p.RowCount > 0 Then
|
||||
For j = 0 To p.RowCount - 1
|
||||
p.Position = j
|
||||
Log(p.GetString("CAT_GP_TIPO"))
|
||||
' Log(p.GetString("CAT_GP_TIPO"))
|
||||
If p.GetString("CAT_GP_TIPO") = "ALIMENTOS" Then
|
||||
desc = p.GetString("DESC") / 100
|
||||
' desc = Ceil(desc)
|
||||
@@ -1294,8 +1294,8 @@ Sub actualizaProducto(costoU As String, cant As String, nombre As String, prodId
|
||||
' Private tablaProds As String = "cat_gunaprod2"
|
||||
' If tipoVenta = "ABORDO" Then tablaProds = "cat_gunaprod"
|
||||
Private c As Cursor=Starter.skmt.ExecQuery($"select * from pedido where PE_PROID = '${prodId}' and PE_TICKET = '${ticketId}' and PE_MESA = '${mesa}' and PE_TIPO = '${tipoVenta}'"$)
|
||||
Log($"select * from pedido where PE_PROID = '${prodId}' and PE_TICKET = '${ticketId}' and PE_MESA = '${mesa}' and PE_TIPO = '${tipoVenta}'"$)
|
||||
Log(c.RowCount)
|
||||
' Log($"select * from pedido where PE_PROID = '${prodId}' and PE_TICKET = '${ticketId}' and PE_MESA = '${mesa}' and PE_TIPO = '${tipoVenta}'"$)
|
||||
' Log(c.RowCount)
|
||||
If c.RowCount > 0 Then
|
||||
LogColor("ACTUALIZAMOS PROD", Colors.Blue)
|
||||
c.Position = 0
|
||||
|
||||
Reference in New Issue
Block a user