cheveguerra/Lanterna_H
1
0
Fork 0
mirror of https://github.com/KeymonSoft/Lanterna_H.git synced 2026-04-17 21:06:16 +00:00
Code Issues Packages Projects Releases Wiki Activity

- checkbox de "descuento por efectivo", se cambió a apagado por default

Browse Source
This commit is contained in:
Jose Alberto Guerra Ugalde
2024-06-26 07:06:01 -06:00
parent 56dfbf950f
commit b44a635891
4 changed files with 5 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

BIN
Files/principal.bal
View File

Binary file not shown.

2
Lanterna2.b4a
View File

@@ -86,7 +86,7 @@ Version=12.8
#Region Project Attributes
#ApplicationLabel: Lanterna
#VersionCode: 1
#VersionName: 4.06.21
#VersionName: 4.06.22
'SupportedOrientations possible values: unspecified, landscape or portrait.
#SupportedOrientations: landscape
#CanInstallToExternalStorage: False

2
Lanterna2.b4a.meta
View File

@@ -22,6 +22,6 @@ ModuleClosedNodes4=
ModuleClosedNodes5=
ModuleClosedNodes6=
ModuleClosedNodes7=
NavigationStack=Subs,actualizaProducto,1286,0,Principal,l_prods_Click,319,0,Principal,Printer1_Error,1681,0,Principal,b_imp2_Click,1928,6,Principal,b_imp3_Click,2176,0,Principal,b_pagoCerrar_Click,1422,0,Subs,traeTicket,684,0,Subs,traeConsecutivoTicket,1471,0,Principal,b_abrirMesa_Click,1258,0,Principal,b_resumen_Click,3486,6
NavigationStack=Principal,b_imp3_Click,2176,0,Principal,b_pagoCerrar_Click,1422,0,Subs,traeTicket,684,0,Subs,traeConsecutivoTicket,1471,0,Principal,b_abrirMesa_Click,1258,0,Principal,b_resumen_Click,3486,6,Visual Designer,principal.bal,-100,6,Principal,cb_factura_CheckedChange,3562,0,Principal,b_imprimirTicket_Click,2557,1,Main,Process_Globals,29,0
SelectedBuild=0
VisibleModules=6,5,7

5
Principal.bas
View File

@@ -2564,7 +2564,8 @@ Private Sub b_imprimirTicket_Click
p_transparenteDescuento.Visible = True
' p_leyendaDescuento.Visible = True
' p_leyendaDescuento.BringToFront
If Not(Starter.ticketFactura) Then cb_leyendaDescuento.Checked = True
cb_leyendaDescuento.Checked = False
' If Not(Starter.ticketFactura) Then cb_leyendaDescuento.Checked = True
End Sub
Private Sub cb_pagoPropina_SelectedIndexChanged (Index As Int)
@@ -3572,7 +3573,7 @@ Private Sub cb_factura_CheckedChange(Checked As Boolean)
cb_mostrarDescuento.Enabled = False
Else
Log(333)
cb_leyendaDescuento.Enabled = True
' cb_leyendaDescuento.Enabled = True
cb_mostrarDescuento.Enabled = True
End If
Starter.skmt.ExecNonQuery($"update PEDIDO_TICKET set PT_FACTURAR = '${Checked}' where PT_TICKET = '${Starter.ticketActual}' and PT_MESA = '${Starter.mesaActual}' and PT_PAGO = 'VENTA'"$)