- Se agregó en la pantalla de ordenes un botón para reimprimir las ordenes.

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