diff --git a/Files/principal.bal b/Files/principal.bal index 1dd3eea..44c43ef 100644 Binary files a/Files/principal.bal and b/Files/principal.bal differ diff --git a/Lanterna2.b4a b/Lanterna2.b4a index 9947755..fe2b071 100644 --- a/Lanterna2.b4a +++ b/Lanterna2.b4a @@ -140,6 +140,7 @@ Sub Globals Private CheckBox1 As CheckBox Private b_leyendaDescuento As Button Private p_leyendaDescuento As Panel + Private b_reimprimirTicket As Button End Sub Sub Activity_Create(FirstTime As Boolean) @@ -400,4 +401,8 @@ End Sub Private Sub b_leyendaDescuento_Click +End Sub + +Private Sub b_reimprimirTicket_Click + End Sub \ No newline at end of file diff --git a/Lanterna2.b4a.meta b/Lanterna2.b4a.meta index 5174c61..3a9ebb4 100644 --- a/Lanterna2.b4a.meta +++ b/Lanterna2.b4a.meta @@ -14,7 +14,7 @@ ModuleBreakpoints4= ModuleBreakpoints5= ModuleBreakpoints6= ModuleBreakpoints7= -ModuleClosedNodes0=4,5,6 +ModuleClosedNodes0=5,6 ModuleClosedNodes1= ModuleClosedNodes2= ModuleClosedNodes3= @@ -22,6 +22,6 @@ ModuleClosedNodes4= ModuleClosedNodes5= ModuleClosedNodes6= ModuleClosedNodes7= -NavigationStack=Principal,Globals,189,0,Principal,Activity_Create,212,0,Principal,LlenaOrden,3222,0,Principal,Activity_KeyPress,493,0,Principal,LlenaMesas,1093,0,Principal,p_mesasItem_LongClick,1204,0,Principal,p_mesasItem_Click,1134,0,Principal,b_envioInfo_Click,2478,5,Visual Designer,principal.bal,-100,6,Principal,b_resumen_Click,3480,6 +NavigationStack=Main,cb_impresionActiva_CheckedChange,315,0,Principal,p_resItem_Click,3557,3,Principal,llenaHistorial,996,0,Principal,b_imprimirTicket_Click,2536,0,Principal,b_leyendaDescuento_Click,2908,0,Principal,b_pagoCerrar_Click,1473,0,Principal,p_mesasItem_Click,1189,0,Principal,lv_historial_ItemClick,2774,6,Visual Designer,principal.bal,-100,6,Principal,b_reimprimirTicket_Click,3562,6,Main,b_leyendaDescuento_Click,317,0 SelectedBuild=0 VisibleModules=6,5,7 diff --git a/Principal.bas b/Principal.bas index 4f85dee..71b847a 100644 --- a/Principal.bas +++ b/Principal.bas @@ -2773,9 +2773,12 @@ Private Sub cb_opcionEfectivo_CheckedChange(Checked As Boolean) End Sub Private Sub lv_historial_ItemClick (Position As Int, Value As Object) -' Log(Value) + Log(Value) Private d() As String = Regex.Split("\|", Value) l_verOrden.Text = $"Orden ${d(1)}"$ + Starter.mesaActual = d(0) + Starter.ticketActual = d(1) + Starter.tipov = d(2) lv_verOrden.Clear Private c As Cursor = Starter.skmt.ExecQuery($"select * from PEDIDO where PE_MESA = '${d(0)}' and PE_TICKET = '${d(1)}' and PE_TIPO = '${d(2)}'"$) ' Log($"select * from PEDIDO where PE_MESA = '${d(0)}' and PE_TICKET = '${d(1)}' and PE_TIPO = '${d(2)}'"$) @@ -3559,6 +3562,14 @@ Private Sub p_resumenDia_Click End Sub Private Sub p_resItem_Click - + End Sub +Private Sub b_reimprimirTicket_Click + Log(Starter.mesaActual) +' b_leyendaDescuento_Click + Private tm As Map = CreateMap("ticket":Starter.ticketActual, "pago":Starter.tipov) + listaTickets.Initialize + listaTickets.Add(tm) 'Agregamos el ticket y pago a la lista para imprimir el ticket con estos datos al llamar b_imprimirTicket_Click + b_leyendaDescuento_Click +End Sub \ No newline at end of file