- 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:
2024-04-28 17:06:56 -06:00
parent 4aa7b60f6a
commit a78af8bb87
8 changed files with 320 additions and 156 deletions

View File

@@ -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