From 866dbd24944a3b0eee1775d3b17f611967b00621 Mon Sep 17 00:00:00 2001
From: Jose Alberto Guerra Ugalde <cheveguerra@gmail.com>
Date: Thu, 21 Mar 2024 16:39:07 -0600
Subject: [PATCH] =?UTF-8?q?-Se=20agreg=C3=B3=20c=C3=B3digo=20para=20que=20?=
 =?UTF-8?q?si=20se=20hace=20click=20en=20la=20categoria=20VARIOS,=20se=20v?=
 =?UTF-8?q?aya=20directamente=20a=20las=20productos,=20sin=20pasar=20por?=
 =?UTF-8?q?=20subcategorias.?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 B4A/B4XMainPage.bas     |   5 +-
 B4A/C_Principal.bas     | 107 +++++++++++++++++++++++++++-------------
 B4A/Files/principal.bal | Bin 44298 -> 44298 bytes
 B4A/Lanterna.b4a        |   2 +-
 B4A/Lanterna.b4a.meta   |   2 +-
 B4A/Starter.bas         |   3 +-
 B4A/Subs.bas            |   2 +
 7 files changed, 83 insertions(+), 38 deletions(-)

diff --git a/B4A/B4XMainPage.bas b/B4A/B4XMainPage.bas
index 7629fe3..88e8cab 100644
--- a/B4A/B4XMainPage.bas
+++ b/B4A/B4XMainPage.bas
@@ -200,10 +200,11 @@ Sub JobDone(Job As HttpJob)
 					Dim CAT_GP_FECHA As String = records(result.Columns.Get("CAT_GP_FECHA"))
 					Dim CAT_GP_FECHA_MOD As String = records(result.Columns.Get("CAT_GP_FECHA_MOD"))
 					Dim CAT_GP_CLASIF As String = records(result.Columns.Get("CAT_GP_CLASIF"))
-					Starter.skmt.ExecNonQuery2("INSERT INTO CAT_GUNAPROD(CAT_GP_ID,CAT_GP_NOMBRE,CAT_GP_PRECIO,CAT_GP_ALMACEN,CAT_GP_IMG,CAT_GP_FECHA,CAT_GP_FECHA_MOD, CAT_GP_CLASIF) VALUES (?,?,?,?,?,?,?,?)", Array As Object (CAT_GP_ID,CAT_GP_NOMBRE,CAT_GP_PRECIO,CAT_GP_ALMACEN,CAT_GP_IMG,CAT_GP_FECHA,CAT_GP_FECHA_MOD,CAT_GP_CLASIF))
+					Dim CAT_GP_TIPO As String = records(result.Columns.Get("CAT_GP_TIPO"))
+					Starter.skmt.ExecNonQuery2("INSERT INTO CAT_GUNAPROD(CAT_GP_ID,CAT_GP_NOMBRE,CAT_GP_PRECIO,CAT_GP_ALMACEN,CAT_GP_IMG,CAT_GP_FECHA,CAT_GP_FECHA_MOD, CAT_GP_CLASIF, CAT_GP_TIPO) VALUES (?,?,?,?,?,?,?,?,?)", Array As Object (CAT_GP_ID,CAT_GP_NOMBRE,CAT_GP_PRECIO,CAT_GP_ALMACEN,CAT_GP_IMG,CAT_GP_FECHA,CAT_GP_FECHA_MOD,CAT_GP_CLASIF,CAT_GP_TIPO))
 				Next
 				For v = 1 To 20 'Agregamos productos varios (editables)
-					Starter.skmt.ExecNonQuery2("INSERT INTO CAT_GUNAPROD(CAT_GP_ID,CAT_GP_NOMBRE,CAT_GP_PRECIO,CAT_GP_ALMACEN,CAT_GP_IMG,CAT_GP_FECHA,CAT_GP_FECHA_MOD, CAT_GP_CLASIF) VALUES (?,?,?,?,?,?,?,?)", Array As Object ($"VAR${NumberFormat2(v, 2, 0, 0, False)}"$,$"Alimentos Varios ${NumberFormat2(v, 2, 0, 0, False)}"$,"1","10000",Null,"2024-02-04 17:00:00","2024-02-04 17:00:00","Varios"))
+					Starter.skmt.ExecNonQuery2("INSERT INTO CAT_GUNAPROD(CAT_GP_ID,CAT_GP_NOMBRE,CAT_GP_PRECIO,CAT_GP_ALMACEN,CAT_GP_IMG,CAT_GP_FECHA,CAT_GP_FECHA_MOD, CAT_GP_CLASIF, CAT_GP_TIPO) VALUES (?,?,?,?,?,?,?,?,?)", Array As Object ($"VAR${NumberFormat2(v, 2, 0, 0, False)}"$,$"Alimentos Varios ${NumberFormat2(v, 2, 0, 0, False)}"$,"1","10000",Null,"2024-02-04 17:00:00","2024-02-04 17:00:00","VARIOS","VARIOS"))
 				Next
 				Starter.skmt.TransactionSuccessful 'Si no se pone TransactionSuccessful no se escribe NADA!!
 				Starter.skmt.EndTransaction
diff --git a/B4A/C_Principal.bas b/B4A/C_Principal.bas
index 78fcedc..6a26fc0 100644
--- a/B4A/C_Principal.bas
+++ b/B4A/C_Principal.bas
@@ -8,7 +8,7 @@ Sub Class_Globals
 	Private Root As B4XView 'ignore
 	Private xui As XUI 'ignore
 	Private p_principal As Panel
-	Private WobbleMenu1 As WobbleMenu
+	Dim WobbleMenu1 As WobbleMenu
 	Dim PCLV, PCLVM As PreoptimizedCLV
 	Private p_meseros As Panel
 	Private clv_prods_ll, clv As CustomListView
@@ -130,6 +130,7 @@ Sub Class_Globals
 	Private p_reabrirMesaMulti As Panel
 	Private b_reabrirMesaMulti As Button
 	Private b_imp2 As Button
+	Private p_wobble As Panel
 End Sub
 
 'You can add more parameters here.
@@ -155,6 +156,7 @@ Private Sub B4XPage_Created (Root1 As B4XView)
 	WobbleMenu1.SetTabTextIcon(2,"Inventario", Chr(0xF16B), Typeface.FONTAWESOME)
 	WobbleMenu1.SetTabTextIcon(3,"Ordenes", Chr(0xF155), Typeface.FONTAWESOME)
 '	WobbleMenu1.SetTabTextIcon(5,"Cinco", Chr(0xF29D), Typeface.FONTAWESOME)
+
 	p_principal.Width = Root.Width
 	p_principal.Height = Root.Height
 	clv_prods_ll.GetBase.SetLayoutAnimated(0, 5dip, (l_meseroAbierta2.Top + l_meseroAbierta2.Height + 5), Root.Width - 20, Root.Height * 0.55) 'Cambiamos el tamaño y posición de la lista de productos.
@@ -224,7 +226,13 @@ Private Sub B4XPage_Created (Root1 As B4XView)
 End Sub
 
 Sub B4XPage_Appear
-	Starter.imprimirTicket = True
+'	p_transparenteCierreAdmin.Elevation = 0
+'	p_wobble.Left = 0
+'	p_wobble.Height = 170
+'	p_wobble.Top = Root.Height - p_wobble.Height - 50
+'	p_wobble.Elevation = 10
+'	p_wobble.BringToFront
+	Starter.imprimirTicket = False
 	reqManager.Initialize(Me, Starter.DBReqServer)
 	B4XPages.MainPage.atrasPresionado = False
 '	Log(Starter.DBReqServer)
@@ -262,7 +270,13 @@ Sub B4XPage_Appear
 	PCLVM.pnlOverlay.Width = clv_mesas.AsView.Width
 	PCLVM.B4XSeekBar1.Update
 	p_meseros.Height = Root.Height - WobbleMenu1.Height
-	If p_mesas.Visible And Subs.revisaCierreAdmin Then p_transparenteCierreAdmin.Visible = True Else p_transparenteCierreAdmin.Visible = False
+	If p_mesas.Visible And Subs.revisaCierreAdmin Then
+		B4XPages.MainPage.principal.p_transparenteCierreAdmin.BringToFront
+		B4XPages.MainPage.principal.p_transparenteCierreAdmin.Visible = True
+		Log(8)
+	Else
+		p_transparenteCierreAdmin.Visible = False
+	End If
 	Private c As Cursor = Starter.skmt.ExecQuery2("select CAT_VA_VALOR from CAT_VARIABLES WHERE CAT_VA_DESCRIPCION = ?", Array As String ("MACIMP"))
 	c.Position = 0
 	If c.RowCount > 0 Then
@@ -278,15 +292,18 @@ Sub B4XPage_Appear
 '	For x = 198 To 305
 '		Log(NumberFormat2(x&".52", 1,2,2,True) & " -> " & n2t.NumberToWords(x&".52"))
 '	Next
+	WobbleMenu1.mBase.As(Panel).Elevation = 10dip 'Ponemos la elevacion en 10 para que quede enfrente de los paneles semitransparentes.
 End Sub
 
 Sub B4XPage_CloseRequest As ResumableSub
 	' BACK key pressed
 	'Return True to close, False to cancel
-	If lv_categorias.Visible And Starter.nivelActual = "SubCats" Then
+	Log($"${lv_categorias.Visible} And ${Starter.nivelActual}, ${Starter.catActual}"$)
+	If (lv_categorias.Visible Or Starter.catActual = "VARIOS") And Starter.nivelActual = "SubCats" Then
 		Log(1)
-'		clv_prods_ll.AsView.Visible = False
-'		lv_categorias.Visible = True
+		clv_prods_ll.AsView.Visible = False
+		lv_categorias.Visible = True
+'		Starter.nivelActual = "Cats"
 		muestraCats
 	else If p_reabrirMesaMulti.Visible Then
 		p_reabrirMesaMulti.Visible = False
@@ -303,7 +320,12 @@ Sub B4XPage_CloseRequest As ResumableSub
 		clv_prods_ll.AsView.Visible = False
 		lv_categorias.Visible = True
 	else If p_mesa.Visible Then
-		If Subs.revisaCierreAdmin Then p_transparenteCierreAdmin.Visible = True Else p_transparenteCierreAdmin.Visible = False
+		If Subs.revisaCierreAdmin Then
+			p_transparenteCierreAdmin.Visible = True
+			Log(8)
+		Else
+			p_transparenteCierreAdmin.Visible = False
+		End If
 		p_mesa.Visible = False
 		p_mesas.Visible = True
 		LlenaMesas(Null, Null)
@@ -319,6 +341,7 @@ Sub B4XPage_CloseRequest As ResumableSub
 End Sub
 
 Sub muestraCats
+	Log("MUESTRA CATS")
 	Private lasCats As List = Subs.traeCategorias
 	Starter.nivelActual = "Cats"
 	lv_categorias.Clear
@@ -677,7 +700,12 @@ End Sub
 'You can see the list of page related events in the B4XPagesManager object. The event name is B4XPage.
 
 Private Sub WobbleMenu1_Tab1Click
-	If Subs.revisaCierreAdmin Then p_transparenteCierreAdmin.Visible = True Else p_transparenteCierreAdmin.Visible = False
+'	Log("TAB 1")
+	If Subs.revisaCierreAdmin Then
+		p_transparenteCierreAdmin.Visible = True
+	Else
+		p_transparenteCierreAdmin.Visible = False
+	End If
 	LlenaMesas(Null, Null)
 '	LlenaProdsLL(Null, Null)
 	Subs.panelVisible(p_mesas, 0, 0)
@@ -691,6 +719,7 @@ Private Sub WobbleMenu1_Tab1Click
 End Sub
 
 Private Sub WobbleMenu1_Tab2Click
+'	Log("TAB 2")
 	LlenaProdsLL(Null, Null)
 '	PCLVM.B4XSeekBar1.mBase.Visible = False
 '	PCLV.B4XSeekBar1.mBase.BringToFront
@@ -705,6 +734,7 @@ Private Sub WobbleMenu1_Tab2Click
 End Sub
 
 Private Sub WobbleMenu1_Tab3Click
+'	Log("TAB 3")
 	Subs.panelVisible(p_historial, 0, 0)
 	p_meseros.Visible = False
 '	p_carrito.Visible = False
@@ -1085,6 +1115,15 @@ End Sub
 
 Private Sub lv_categorias_ItemClick (Position As Int, Value As Object)
 '	Log("ITEM CLICKED")
+	Starter.catActual = value
+	Log(Starter.nivelActual)
+	If Starter.nivelActual = "Cats" And Value = "VARIOS" Then
+		Log(6)
+		Starter.nivelActual = "SubCats"
+		lv_categorias_ItemClick (1, "VARIOS")
+		Starter.nivelActual = "SubCats"
+	End If
+
 	If Starter.nivelActual = "Cats" Then
 		Private lasCats As List = Subs.traeSubCategorias(Value)
 		Starter.nivelActual = "SubCats"
@@ -1168,7 +1207,6 @@ End Sub
 
 Private Sub b_cierraAdmin_Click
 	Private c As Cursor = Starter.skmt.ExecQuery($"select M_ESTATUS from CAT_MESAS where M_ESTATUS = 'ABIERTA'"$)
-	Log(c.RowCount)
 	If c.RowCount = 0 Then 'Si no hay mesas abiertas entonces ...
 		cd1.Initialize(Colors.gray, 10dip)
 		b_cierraAdmin.Background = cd1
@@ -1522,10 +1560,10 @@ Sub b_imp2_Click
 				Private catAnt As String = ""
 				Private catTotal As String = 0
 				If imprimirAqui Then Printer1.WriteString($"Fecha: ${sDate} ${sTime} ${CRLF}${CRLF}"$)
-				Log("** GRUPOS **")
-				cs.Color(Colors.red).Append($"** GRUPOS **${CRLF}"$).pop
+				Log("*** GRUPOS ***")
+				cs.Color(Colors.red).Append($"*** GRUPOS ***${CRLF}"$).pop
 				Printer1.WriteString(Printer1.BOLD)
-				If imprimirAqui Then Printer1.WriteString($"** GRUPOS **${CRLF}"$)
+				If imprimirAqui Then Printer1.WriteString($"*** GRUPOS ***${CRLF}"$)
 				Printer1.WriteString(Printer1.NOBOLD)
 				For i = 0 To c.RowCount - 1
 					c.Position = i
@@ -1542,10 +1580,10 @@ Sub b_imp2_Click
 							End If
 '							Log($">>>>>>>   CAT TOTAL ${catAnt}: ${catTotal}"$ )
 						End If
-						cs.Color(Colors.red).Append($"** ${c.GetString("CAT_GP_CLASIF")} **${CRLF}"$).pop
-						Log($"** ${c.GetString("CAT_GP_CLASIF")} **${CRLF}"$)
+						cs.Color(Colors.red).Append($"++ ${c.GetString("CAT_GP_CLASIF")} ++${CRLF}"$).pop
+						Log($"++ ${c.GetString("CAT_GP_CLASIF")} ++${CRLF}"$)
 						Printer1.WriteString(Printer1.BOLD)
-						If imprimirAqui Then Printer1.WriteString($"** ${c.GetString("CAT_GP_CLASIF")} **${CRLF}"$)
+						If imprimirAqui Then Printer1.WriteString($"++ ${c.GetString("CAT_GP_CLASIF")} ++${CRLF}"$)
 						Printer1.WriteString(Printer1.NOBOLD)
 						Private tipoAnt As String = ""
 						catTotal = 0
@@ -1566,7 +1604,7 @@ Sub b_imp2_Click
 '					If imprimirAqui Then Printer1.WriteString($"${elNombre}${Subs.alineaDerecha(c.GetString("cuantos"), (31 - elNombre.Length), ".")} ${CRLF}"$)
 					If imprimirAqui Then Printer1.WriteString($"${elNombre}${primerEspacio}${cuantos}..${monto} ${CRLF}"$)
 					catTotal = catTotal + c.GetString("cuantos")
-					Log($">>>>  ${catAnt} - ${c.GetString("CAT_GP_CLASIF")}"$)
+'					Log($">>>>  ${catAnt} - ${c.GetString("CAT_GP_CLASIF")}"$)
 					If i = c.RowCount - 1 Then
 						Log($"Total ${c.GetString("CAT_GP_CLASIF")}: ${catTotal}${CRLF}"$)
 						cs.Color(Colors.Green).Append($"Total ${c.GetString("CAT_GP_CLASIF")}: ${catTotal}${CRLF}"$).pop
@@ -1652,7 +1690,7 @@ Sub b_imp2_Click
 				Next
 				totalPagos = NumberFormat2(totalPagos, 1, 0, 0, True)
 				If imprimirAqui Then Printer1.WriteString($"TOTAL PAGOS ......... ${i}..${totalPagos} ${CRLF}"$)
-				If imprimirAqui Then Printer1.WriteString($"${CRLF}${CRLF}"$)
+				If imprimirAqui Then Printer1.WriteString($"${CRLF}${CRLF}${CRLF}"$)
 				cs.Color(Colors.DarkGray).Append($"TOTAL PAGOS:  .........${i}.. ${totalPagos} ${CRLF}"$).pop
 				Log($"TOTAL PAGOS:  .........${i}.. ${totalPagos} ${CRLF}"$)
 			End If
@@ -2095,24 +2133,26 @@ Private Sub b_imprimirTicket_Click
 			If imprimirEste Then Printer1.WriteString(Printer1.REVERSE)
 			If imprimirEste Then Printer1.PrintImage(myimage)
 			If imprimirEste Then Printer1.WriteString(Printer1.UNREVERSE)
-			If imprimirEste Then Printer1.WriteString("RESTAURANTE Y COCINA ITALIANA PEVEL" & CRLF)
-			If logger Then Log("RESTAURANTE Y COCINA ITALIANA PEVEL" & CRLF)
-			If imprimirEste Then Printer1.WriteString("RFC: RCI230918DAA " & CRLF)
-			If logger Then Log("RFC: RCI230918DAA" & CRLF)
-			If imprimirEste Then Printer1.WriteString("REG FSC: GENERAL DE LEY DE PERSONAS MORALES" & CRLF)
-			If logger Then Log("REG FSC: GENERAL DE LEY DE PERSONAS MORALES" & CRLF)
-			If imprimirEste Then Printer1.WriteString("DOM FSC: PASEO DE LAS PALMAS NO. 275, LOCAL B" & CRLF)
-			If logger Then Log("DOM FSC: PASEO DE LAS PALMAS NO. 275, LOCAL B" & CRLF)
-			If imprimirEste Then Printer1.WriteString("EXPEDIDO EN: PASEO DE LAS PALMAS NO. 275, LOCAL B" & CRLF)
-			If logger Then Log("EXPEDIDO EN: PASEO DE LAS PALMAS NO. 275, LOCAL B" & CRLF)
-			If imprimirEste Then Printer1.WriteString("TEL: 55 5207 9969" & CRLF)
-			If logger Then Log("TEL: 55 5207 9969" & CRLF)
+			If tipoPago <> "VENTA" Then 'Solo imprimimos los datos fiscales si es para b_pagoCerrar.
+				If imprimirEste Then Printer1.WriteString("RESTAURANTE Y COCINA ITALIANA PEVEL" & CRLF)
+				If logger Then Log("RESTAURANTE Y COCINA ITALIANA PEVEL" & CRLF)
+				If imprimirEste Then Printer1.WriteString("RFC: RCI230918DAA " & CRLF)
+				If logger Then Log("RFC: RCI230918DAA" & CRLF)
+				If imprimirEste Then Printer1.WriteString("REG FSC: GENERAL DE LEY DE PERSONAS MORALES" & CRLF)
+				If logger Then Log("REG FSC: GENERAL DE LEY DE PERSONAS MORALES" & CRLF)
+				If imprimirEste Then Printer1.WriteString("DOM FSC: PASEO DE LAS PALMAS NO. 275, LOCAL B" & CRLF)
+				If logger Then Log("DOM FSC: PASEO DE LAS PALMAS NO. 275, LOCAL B" & CRLF)
+				If imprimirEste Then Printer1.WriteString("EXPEDIDO EN: PASEO DE LAS PALMAS NO. 275, LOCAL B" & CRLF)
+				If logger Then Log("EXPEDIDO EN: PASEO DE LAS PALMAS NO. 275, LOCAL B" & CRLF)
+				If imprimirEste Then Printer1.WriteString("TEL: 55 5207 9969" & CRLF)
+				If logger Then Log("TEL: 55 5207 9969" & CRLF)
+			End If
+			If imprimirEste Then Printer1.WriteString("CDMX " & sDate &" " & sTime & CRLF)
+			If logger Then Log("CDMX " & sDate &" " & sTime & CRLF)
 			If imprimirEste Then Printer1.WriteString(Printer1.BOLD)
 			If imprimirEste Then Printer1.WriteString("No. Ticket: " & Starter.ticketActual & CRLF)
 			If imprimirEste Then Printer1.WriteString(Printer1.NOBOLD)
 			If logger Then Log("No. Ticket: " & Starter.ticketActual & CRLF)
-			If imprimirEste Then Printer1.WriteString("CDMX " & sDate &" " & sTime & CRLF)
-			If logger Then Log("CDMX " & sDate &" " & sTime & CRLF)
 			If imprimirEste Then Printer1.WriteString($"Mesero: ${Starter.meseroActual}${Subs.rellenaHasta(15 - Starter.meseroActual.Length)}${Printer1.BOLD} # Mesa${CRLF}"$)
 			If logger Then Log($"Mesero: ${Starter.meseroActual}${Subs.rellenaHasta(15 - Starter.meseroActual.Length)} # Mesa${CRLF}"$)
 			If imprimirEste Then Printer1.WriteString(Printer1.NOBOLD)
@@ -2134,8 +2174,9 @@ Private Sub b_imprimirTicket_Click
 					Private elNombre As String = c.GetString("PE_PRONOMBRE")
 					If elNombre.Length > 30 Then elNombre.SubString2(0, 30)
 					elSubTotal = c.GetString("PE_COSTO_TOT") - (c.GetString("PE_COSTO_TOT") * (c.GetString("DESC") / 100))
-					If imprimirEste Then Printer1.WriteString($"${c.GetString("PE_CANT")} ${elNombre}${CRLF}${Subs.alineaDerecha("$"&NumberFormat2(elSubTotal, 1, 2, 2, True), 30, ".")}${CRLF}"$)
-					Log($"${c.GetString("PE_CANT")} ${elNombre}${CRLF}${Subs.alineaDerecha("$"&NumberFormat2(elSubTotal, 1, 2, 2, True), 30, ".")}${CRLF}"$)
+					Private cantXpu As String = $"${c.GetString("PE_CANT")} x ${c.GetString("PE_COSTOU")}"$
+					If imprimirEste Then Printer1.WriteString($"${c.GetString("PE_CANT")} ${elNombre}${CRLF}${cantXpu}${Subs.alineaDerecha("$"&NumberFormat2(elSubTotal, 1, 2, 2, True), (30 - cantXpu.Length), ".")}${CRLF}"$)
+					Log($"${c.GetString("PE_CANT")} ${elNombre}${CRLF}${cantXpu}${Subs.alineaDerecha("$"&NumberFormat2(elSubTotal, 1, 2, 2, True), (30 - cantXpu.Length), ".")}${CRLF}"$)
 				Next
 			End If
 			c = Starter.skmt.ExecQuery($"select *, ifnull(PT_PROPINA, "0") as propina, ifnull(PT_ALMACEN, "") as ALM from PEDIDO_TICKET where PT_MESA = '${Starter.mesaActual}' and PT_PAGO = '${tipoPago}' and PT_TICKET = '${Starter.ticketActual}'"$)
diff --git a/B4A/Files/principal.bal b/B4A/Files/principal.bal
index e07348d8ffb451814909aa21e598ecf31b40470c..5804d5be7ed2a69460c46886396c8cb06325dde4 100644
GIT binary patch
literal 44298
zcmd^I3w&f(S)b4(yD9Cql%lBBPP%Q`w%gEbU%N}8olUZB+B~*NcC%ed(>s&9n_(w2
z!<|WXi%4rx3Z<2nN{jfQ6$Ry`Xi-t{(fWW|K><M!5mZ1?p(rY%82|t8+<P8(-kF)S
z{WZVenSA#=zH`q1{Lgp3^WDjAUm}rs(@BZMiTE8LZAMCE%GuRy`Ib{54@D32fmba0
z!LyN<UhvXEHkkBF-WFEbvr;Y>@?nL3<fx33Rn;Sbf5Z#+c}EK925mFmaynaJV^txO
z^@G4mEiPyCR)#-UD0?~8o1b6J7RK|33w@#>yIf=^=>-ToI7X3z>~c1k%Vv)HW!29z
zdKjVVz&wvFX3NoY5hGINs@uTVvpP+bS{aioxpMZDFc%XlVM0M+v7~wr{Cr_K9e4-4
zAX_LA$@D_m4=^Dwpze%4Y3d#tSt*qZ%LlUlu@E&jGMQ1M!m^()c{#r{ptN90eo%Oh
zdMFe#*+PEou+P;hoGWSz%f-S<e$iQwvqzTv%+WoC<6&1^;V6sChtUxV%%_L}6Y)%L
z6{{2k*>XWT#v{QjMP+IjCBn+8MIy0~%kkMSFJ$vs3~V&(34Mt8oPWG*bslAL9;h$a
z`NYmk=ln3U82C^UWfC3KL`NJV`^m*<G&JF*{an}yX(G?W(XP3J^JRw2?SO|a!YbsT
zFB}ZDYv`Y=n&{_L8g<Lw>D9A$aQx^23lVs8iUW(`h!1<YvNu`CmkUHDx3H822{7xN
z420n340vi>+5D=X2V+4iQa&f^ut`fLuBBvx7Nln+hl5o8sO1W?cBp=qISlSeRmJ6!
z>WZXLrS4*o61iwC6rfm`<Jn~oY%TlbcWxoRcNB{8T-m*>9N#~=g>tqi<5ROLXUi+O
z!iZWo1+mJyCc@CJH{+L9FcvkoGVMs%l03>Stop%pu;}OINi&^O9h!hTYgZE9C`%TE
zwafkyuA0yv?ANO(z^-cT)K^?c7hoCvQrJIr4DIvs4pZfs!#A~sjbvCXOKc*irSq|C
z7iA<xYeR5__$(}EpLj3?SM3iMf@QBX>XQQ;dC^RS%U=|xskYqvA$zzvRMChBQ&S=p
z)w7r=5kW<<i^YXXRu#q6sQ!vUHlN8By__0uxVcH6Vg-E^m@ZFLGuUFT_4B1!Iq>qO
zqKA5A9|H`JneVGCGia#(?1n_-c@<4UPJK^B!2yd+MZNmOP!@KWEGw;IMlw#Z{<E2&
zkjq&-V;z%8c;*Xf7{f_FzcTFMkv~1^SK?XteF9Q15-nXMv&%^4x<oQb9LdBilG$k_
zv&%^48b>k-5Xt0CB$KX@%(aPRZp}#MR3n+&Ka$DoNG8sN^m~!Ggptf8i{$Tz`~yg5
zApM|~|3j91rX?pWdC-#2g1i;!Y@~B6`CLnWfhBK)d>+#INEcZ0c1ym{l7}q$g_eAg
zB@bKj4okk+k}t93OD*{_OTOHacUtl;OWtkCFS6t-EcwNj{1QvP(vq*T<dh}vvE&g;
z9<}5#OWteAS6lKmmOO6B*FwGyX##1|lBX<r+LHG{z8+}?Y1WeGEP1~rAF$+kOFn4H
zH(2r^OMa;(-)PA%v*epBdBKuzwq)+@Xv}F#&RFuICHt0q*piP}@{%QIE&1h^eAJS2
zmb`4qdB_E%BGN06qWuUlaWm4HZ=hwN9h#jv_V`Dy-*(;h$0i=X;JgFdriLEdzU@oF
z_6t9H%GA{3<9*i#!#i%f>NOue;ht|MUiX1dJ(_&%d3Qd0=Dv$Rx#PZvKKGu}@4EY>
z^Cz~SRK7Fy%H@+kn0WqM?mw5<Jr@R#HZ4<{yQS!J_m8H%QZ_R*>X))d@_sNh>6g9e
zdO~YhMm<`i_?_iB$n)}WP|9$aM^^&*&A~4Q-Z46zGy!qtqhZ<5NFi4Uq9+=vp{SW#
zL|dF;T^d=Re%lm0B6bsvkrwyxN-hUe@B4Y$S)72ml|_FpTh2+%mwT%oXUo~-(VFvD
z=NSaCnq}_@JA(I<^Qlh+86s`|YPOWceAwwK9qN4fBC5*yhs!6ha-qn^$Fhs%C8}QX
zvqzT7Y`Em*GfRa)bSRM(cOT6zmaq(oi)fJJ2oZic<9JFqZq0C&+7W^ZwE1j#X`~Qf
z6-!Y8&!BVxj#(hnF^}^cF44+JgBfozyCUv}pYvB`EjesI&y`%{K#L3Zc|Kwed)6y@
zi;LO(5suk$i)zhKUnHC>hOBWemo1jEuawoAnw}b?PWb+&KhEJWJnhsmzk~|}mxYgP
z!?jyV<v?V5&1C4v*wozE%)&L(GvkM*r{+=<R0q!bydsQe3VFF%mN535KatJ*T%c0<
zmYk4eYI<feH6fb-mn|NvYT8M;)4;1G=~v}CS4IUvn8V?gIqYS8A~QO+H?@Cajw4&u
zBjZUQj_knL%-r}$YJ!9q=G3g~3VWUy+dFp)e(&=FFDbV`FGwyv`d)84o_J~YlYTDA
z?hDEBsqvBV>E!5mDtSvX=OH(P&$DKH+=%jpvyzKa6M2h;q2xrNlw9=6{6sc2Cc$jr
zQV5bz3ew<`@8yR$upPAwMRe;F0}(xh7e<oHzPWOB;UH)HQ8@3M+EO-OW+s0Nc6`X@
zi!0@5x6X|noFkw`uT(k)7PHkcgiMGNyk6JW4PA2%MSJq$6@lJPwT-5(^jlEshFi|7
zQa{>JL$hVjCx_K%4t59KC}X{(l-HZ6KF70|Ey+HL^0@xt*0Qs3B`lTv#VCuMF)<I>
zW~u@q39rFHt(A#xSh6zFL%1?jY@!j|CWpOJS^3IiYR5CP;>JzbA9?7Jhp4VFI7nt(
zOz_;xKeI2PA6X4?6OIw5-8_av<8U()$H65Gk+E{tFJ0JB*9A(?s8{x`4zi1!pHf01
zaedO4ctiei+^%x|#Y3tnhe@m=Rz#YPA~F}5NE(Rn`5Lk0Je|h#h!K@j@#Bu`NHC^@
zEbNUw0dadNXEUC}ZuY4q)BG;sKoEWtI5q5Ob=dRlQsJ0dh&`T!1+B0VfxVPn@*;0t
z-N}rR)XdEI+%&6Prk2FMq6>FaxQTm=IwkhRd=>sE(eO=<&8B8qL0>t!;$dyxKv~Jl
z6_+HSh5LFmX#!3|wJ<Y&^)+*x2d$WnvQW$T)B%{{)XezwtQucDyg_2^o0&d1KAD=N
z(H<OByIh9?xKMUzfK-XcdlYRIIy#EMSx(Q4j!lit5<O!a<V@jc5lR$ULILb2wDa<8
zRZsy{@gD?04uSV-JJO<t<>ry=GhwYDxi1H%<Z=>nY%WyCVULcD0Gf$~sr{3C#%5;O
zO*+;!mri%1#^FYpxPG!kv>;$6LUqZrIUPj;=8^-+sp%ntZ-u0}!l^wo<1<NCAVhY=
zg2()Fap<Uj3qoK+nBGwOlH&;1r3>l8acbIg$-xmmB48>6OcOpZiakc*H5&Il(-WiN
zD8^={le>vM1HC#>C?tqIk4%Fwv#E)(S=B&|EDWv)8SMy@3Yr;>RuBe53`4`o-Sq6{
zruV7s<^=m>d@}mvZeF{^Oor{Ec%TB`X|{tymw9_UDAn#(QgRZ(AQsz!UvA~gxm7e@
zby!MiQDJtXt0d8)Xn`2M6}jht$HN@XhqST6?XvS3i6#+Lc!jQx>+j8|NQ*KKFlh`A
zDQwhc3(J``Gd8;)3z8fio1iOF>m)Ft8952eqjgA`5D%xB&BL=*Hkr6<T-0Wjy{cHN
zUv2Pl4DUJMGC6NL=nq7QoP1(9_LEPP0H!ZEsP`b`b(MNo2P+8Eae;Q$3z4Z^lF=cv
zkh}Vsi#y}v_H_iWG-UOJtX9l%2SYG9am(^vjqMd}5v^A7%yi3f?jpwSiZUXnEE!|c
zifDHHQmJ8?q8IBL39)LFu<yN$dBTTGQla8U7<Hsh_dN)$h<W9}$~xvvBh4cpuOg@w
zrpLVE;^4pW+WV79r!R8t0ym56z1Lg~6yWX~f_MN`?Nm3Y%7G1EbPgs}$_&+Vu%fp;
z=b|#MUroFt;^725D*MWoM42y+i;2>67;}i&3$mOVEM@eDK{hQP7`Pn1h+zbGd8<cI
zxd0|sPbI>6g}C)1ff+OYh4SuBm?_<xIJ}~h)j;0mF}Lz91y^BmrJTJ`y+<r50~~L=
zql9W>rLv!d>x9>hN#SA=_jF`|T`T#h0GGC;+`~(%4lgjMccidAS<3S2BC35}fM9@e
zPeRtJmrr`(ohFHEV<}Wt8seB~5cO+HnF*mE0leA#iWdmP!_1PHgFok`xs(;&AVJfa
z^gPA<Or&OU!Anl>pCe)Sc$uR|0=`ZZkC5iWJvfg^j2hN;g=@tdY6@?NJ&Awpotd6Y
zj*VVD#<8$S-#Ga&iwiKvHH#a3rtB~33LM7l5-xqmq(0BtQ7<@3{U##LLjn^U!O-MV
z#@CBlJs+r^noN^nT9!oOwkxlK@J02I7~pRrHoy~<ef8XfEK-dbi2>RXDd&!7ul;LJ
ze0vSQ6TO_)0EfkX`Vu5gUk_0gT{I_BN*o8cZ#i2LxQJ3jZizk~5Pdy7$4=nh=vl-E
z9eELmx(KxIBJe<v3GlKI&IAME-amoiaW!-vWioV{Wiz8>l+76pBK31RXCa9undAL;
z+;PX&C<nh2y=UWt4J2&d*CTVMEzv`f!F>cdf&jbJGZ83Q`2|QP2_A$^<DqA&rz3dC
z+khUbG{E3N0YgE6xfY|AzNau(JsPcv_1Xu9$f(6%TU!%gI061t1!fxx^iUcB!^#F2
z!qf<u9+|ic%nq~@9FIeg@+TnZzV&G80&^ak2xHEN&>Ca7D_q80038F{@o^57DaKp~
zaftcc4=+RlrS3^x#GGM#=uyhJ35<}5qY*L@bWT*73#+KmfX5aWBlRUNVXaH?p|QM-
zIhW&OCsO}f&#gTI7gg?J(QbUah{6^4&?u>mDR^>E8X~elE0A)ohaR_{iPnTtu`h{U
zzHm`HwCi}k1YO1PzFFaYC5rSY^|%}1O@%GseHE%Jyg?5QS6g^<9bLTlAxF=o3f?J{
zE4=qW5`K?BuxL4o$4Z#SklUB2K~Az{FOpF4Y6xP-uVKzOJ_JYhQiHeb(Z%sv<n$@_
z_S9f6H_dv{d>C!7V;9ybqd9yh3S3ONlj>oL;*iZoGQ4i%<bi#S*^z1|&xAcZAuo5I
zfL?j>u(H9L8(td)p(Ho9rVTOat7c%4zmAiKt$GasyAI4G`qS&y2pCpw4H&}`V+lD$
z!7+`kB`liTh$ETZZbs^FjxkfH+6Wj@LrxV|Hoy=jmoco^0%N%E1Q`5QN5q8?WHhu!
zqKO^`f8xH%H1fn`(aM=4`T8h(2Er_oGH}T#dlQ5~q$<AM+O4<Vx)nt|)W)CQIefIx
zK5?IXhr+bq-(vgaSbG^nHFx0vN-FJg4U5ced@|Aik*Z;Ksn9Gemw6s3G`qE&hJ&cG
z6G@oX)*(jThyt#tFoHvnZOTyzBS-|75y-G@tueDVpg_2B2!i28f0RuUs4Ws*S<Yca
z<%+!&;*ETaZ3_(}m1-Eb;9-DG40_FM3pGiqH1<NDI$S3KVS8jRUIjrwK#AF4eCU;r
z6h0MEyY4x?3|+;kcUwE2Diylm)%8?wLiLbzmZP}~x%E8Nx_Hx+xOiXI0Ph8~*dV-b
zMpqrhn+n&3_vGYc)0@0SypLl{_4w_fT;ZLDBwITJf%`{g`%(6(5Dp^^9KpvDQvcd#
zKl6nwgdR3~IR$R3qYwsi_*h2jUwie#-^nwlfR7?lAF5z;X-&q6B#|!z*aTq^soF_W
z;j2|M;;%sC_{!G2gJ|o+d28$A-ubA|U0FS+x?75vsV&v9%LoVNZmG8d(Rxc9poLn?
zuA8tDx{3q;U^^y^3SHpq;$22{g?Gm;+dMl2Zwhj5Zi66rldN)X;<x;$BVz^f2I0Mm
zuHtxy!HxA@wyCfMybZq-?`ki&L0XFqJPoJ{-o2o;i#MuN!<*R(d2@Jl{nm2~o$5^|
z!~6(x#2Ku-4zjXAl`fg<+|vYUB9UiRuY(@~G6E4QD2R4{cWq7j)`7@MO2#6zX|!df
z0a`outC-qxD-X@xw(`f(L!A6=S$Qfn%fv<7Xe+P1b*_x;0{Tm`#E&$v^2SH+x|P4B
z3h-@Nc`9^)uWRLBiRwF%+7GGHOvskfR(?x_x3==AVm2oql&vw62T|>!u3McSMpsQ+
z9ac7|uGi|^06<);vyNEHMp+$<wcA$bRp_CkR)-4BGI7y1+UjgZpR&Z->WoFZptDxz
zN6?Wh(IA9s-o5=s=hdh)a4SCe(_78WzYPWPrD(wpaksi|J{7u4QP&RrD5|@5i0XDB
z)w?kFh+U_hF#(FLXtPc`ltNQweY$S<Z%0>c;7tqU;!TAu;Qbm@S9rI3o8l}4?*}2s
zdVB|hoU_LvXcMcQGGtcR{Q!9zWcPo}9+V8Tj<?Cm2GwTlzJh=%4JB^^K?S0AV(d3S
zrFff%Aeftem2e^M^{A5QJ%<%lxbVjzwiqsC6Ek%J;X2v`L$9gjXw&eSsk1<)z7K-1
zLx&6B2UO~@V*|ag*J5z--FRC&cWo+k!K-WiZbEgn8=u7R)dpI>JF4K_!f8`!{iv`7
zykDpBeiCCF8+gNhJ?5*oS`C{=P`4lru(FF~a~t2ac~mDGe>04hZ2Udg@6tC9E<GA;
zLXf!;ug?x1JV+0rhvVZ<tFO;sTHW^hp+p^BNl0R$H$fOgs^*rxBi<hMs=H)&q9AUR
zZmwmNXmuOCKBGdjuw3SOqz13g-he8~G~rm01toI3kQzH??ose|v=Ie7yo3=y4M7;O
z4MGh@pv3;pO&4CMK7AN*7qI9kBdD-tMqG|YonZvG%{m!@mK9Fq3i8xW?0WFvZgiyy
zTf?A|{bEpA*`Unr;~G>})MijTscKH74q0j^avdSd)`5Z1j(t&s6W~wP?@s;%3K{`J
z1p*8!8(;{N3k)kZ28PFpuqY2f?8;Xl=ta?^(V9?Nanf}C!uLjWI)v1*?@m&o0gq7D
zbusTj1+{D2b$NKq2;N*C!J8+4i*|eun#fr>0>Qed+>6IJOgE>-klU^A^07x3$7`iG
zL36{u%XbC(7EB+8Aee52P=muLvA>>H3)45DTIVpm586n90j^w)cf9QJNyqd!1|dA9
zeHBb;DVoC6xaQAjf8!^CS0!;SLT;7sdlO~h1#kK_ctM3OFXoZczyp0Vs_aB+{|j9D
zq~M+xMlg!nl;!eJQTY~KKPm1<S2a+707cps=y40`=cA|w>Qv~WUiYMU3#u!;+YJrU
zmvMI>Nz&8~M7_|z+rTi;PodK|@@<7BsL&vPH=gPu|5j8`$hUh&)6Wy+xdg)WreDUT
z&_Xf23$`x^0-k5<zI~tY#`bRCiECo*F_`MNZ{AJgTxjd|O@%HOny`I8gGP!G?cTl*
zL6b1z0(kVo2wwhVFVg4GR>k#_QIhC2r(x^Y2P)W%)a3WPe->5sP-JlQEyci{2|*jU
zEqEAUWf###*M}aNI8~YmHN98?<~Rf?*WVL(7jpDyTwu;Xk@d%VX*`NMn}I+hr*@DZ
zWuFS+Fw(%!;UiDsZTR4i`t}~P85U8^l8{8(CJ2K_)dERPeS7agG;W>6oP>s&ho<?9
zEh;paa|QHl>Y6qJuoJ0&?Yir(6S#@{E~Hk&NUuU0QScH7vR+&!;mS4$HP#Cyb{MIh
zL%b>AA3}dMfPcUqr5<;qL!1g-;4Qp=9)+6wm*HXH?fB>n-Xx-n_c7$?ao58;g^G&N
zX-L9oQtK(SKYjtjsj*DMDAJRY>2ln%Om+4L6}rpxr0tIZ45hXGVGMoO_s1_{a5aEm
z-~OON7x=pS17Y}1?+=Z4)B6Ks2%TIHlG-U<KVsjBu3TQ%IbvDaph^c;n;EeQG~)VT
zq_0`^+m^^zCgf@eLP`B+-+ViyN24{dLHtjtZa|)xkV6p6S=k?DZ-THHsekR>d+)_>
z=l%CD;rT|S7XDm@P0ZBaiKj+WS5u>vFx~|<2vQ8!$<(zY&KKb|rjELuI<4%l0g2jb
z-~Rb!lyr1AQlSf8-QCC&T%A@BG_iK!!FUJn#*-$9MKu?1x-Ft$8wA0dbP@B-omCHS
zb6T}y{hGr2Js3(y@utES@P03<cLwhVp~=OYw~40k?#yY^6yEQ{m}=mCC5kjFWZYy<
zBX5ifYvO$=3bm~eZ_IeVYi;s-1-f0lIozi3HfK!N`TZ*xQ%CWp!Y2jqFQQ`?Z`zxt
z@D5N>o#|Z&q*Po&=5%jKNODkaf-s0w?e_TSn`42H{ivu$n}pP`{ax8udo-#ZNcmM1
z#JO-)J6~g<LYE8k$Y~Hnem|-xi`Q--<zvt!j38Qa!ZghYZeE3P8j@g~fxz}E+mEto
zFeF}Z1i}*1I{!crEwL<GlX07p$gi=;%-)PtC1g|0clb3_jjwMQD66!soNA*h6cxJb
zn@5iP(WB)=)HAZJ#I4N|J`cU9f4`|0k}R=y+Vppq8aZvhP9;c*fv!9952F|N<oXD5
z1l=<s=m5?Zj)s+8Q1uBVGi}b1*T8%nzN>J56oObohKclOw4a8|3P-*R*090}Xwe$t
zRNjh_ny_?>))2Qzx4q1}+HUy(N^0zuVH9Zu1yj9S_Mu3xCy_P*IVv;@%VloD8vX{V
zb;cT!>p~#j!-NsHLy*zaG12pJ8G#b}e)EiG#BTzNjxvG@TV}*>p;2cT@p@=-8F2_X
zO)(;cipqFCqZ#o*z|c`fP+`lA_-!=m3?se@P3vR?T2_3`FF>ARN!O3q-$7T}gb9T!
zk60RMIbvDapnNx;+#{A1wHZ7e4^?Ajcf$P=us#Pt3@W?See2O^O(?B^s3TrTbN`Cu
zhtRzqlpdz*g=mOa*+4{}qY*>~0^^>Y(i=jgzX`dHKcj4&JMeU3elaJ&pQ_)4{4fd{
z0Ye4C9ac8L5GEIx=G-%qO1QHZf^bK_%KREeuSer@=L}S~US)PYIPkmZFK*u2`j!P1
z8t@2Z-Fw3Cp@K4O?S9Kb<IUv}ymfH5dFSW%(Uw=Pfj_`UQx`PUixH7I{IUP!>k&Nb
z71tZ{QRMb~3uKTT$}Y8EDMVx|7t8e!k@yP{uYe%Hd>Miaf?HJ&%OxVJ*k5OCeTP!P
zW~3@N*RzqmiRI@Yg?|+HhY<BpG(xWF(mRxu+Xsf~1Q`B9GXl(65Tx(x?9sTu#CB*G
zoTI1D-$48kV2WFheeHyksL(7dmw6tkK{)A;QAOF1cEd^RP#Dn%K^Vcir!XP~LG#mP
z1WLMmfqMEd;!l7@M;SqdEi-~%T4xwR3+6K75OSJg1R2w{3)Itx5g!E%9c2U+w#<mf
z(5N$vI1EkeWCU7P+zw3MpF&*kRSM^pI&7P}Cp?bo+L+ZiY!^{SybxA4c=OP7y%1K^
z22rk3%5-uQntQ^jy&-JKRpn2`d%~Y#aE*Y`UI;52U<i{73@f_8^vIdw0>cQR@ac94
zQvL)4S(Hye(4*0skXaGN?fO08W9T%#i`%*<P@w^jP}aRCd>j?j{%!Z3z*P~vDG1)5
zhah-wgHQu+l-Or{*YW;y^cTmw=8GJTTRi3SA?PcF8=9uV7Vth5)fL{g-`~6&bu=rj
z7zz!7+4%Zirmr95e^Ypy6Euw`&q8YWue<#PD&<-6ZTR4idf&!u`gF>^CLxKoO%Mi=
zs=bu0c&S_M4FY#))5}C$WSKG$YAh2Ky33?zQ+IzfvtC?)#_M$mwPb(HLy-N!am#v<
zQT6u60?NDQ@jQKAD}53$)F8#Mji6wvNwE(_HAq2)E-AP+4Q@roVzzrL;<5`P?uQ_Z
zxC=s4I~esUJf2S>Z@qpF^=(G#Z_dy8OH|c_l>yWC$R0csg22rM*n%{`$_8bg4(@Tz
zithGNU{IwocX^l@0SmdR{Hf^Yd>Vsm1Pl=nU|87zLzrA(SkVQhnxCW3ffu5>ut@*o
zL(hl%sz;+Wp<0EX)AcaaXV9r0N)5(nU|87zLzvbB44Ns%j6-mN*@hfF8W$M0vi|#<
zE`*_Ozy0>D=)}B-pTm>dxJgKj5778~`2DT5e`CBonpgi;(_f*WqXw4>-G!Y;P6LDc
zSyb7H)c&8w@{NJmkgr1!M(88B5hIMt)O8p2a~ND4^|r1AROq5!*X8+ZR9ASndnM2Z
zoDTaneZU!)r|YJP*A#6G8kr_mcClQKY0@_P6;LNc)c<&O-X4u>n$AFx^$zQ)>bw69
zh8gE?%`296(=uo!egjVd632Y|hYAhmTmgb4H<7wT?ws#VHj3dGfgtO}5eQcr8IBjD
zqB8D#Ac=9Ol5>#4H#A>>7{_bhy8kth`=Cu6G4@geQ1<8odM$E7GrUp%8pvzWrC>@Z
z1XHfMV9G78cci-qP-4G6>$)-iTl5!SoRG{9*rU{3XcRA?LKpkG9R4Dzcg7eGLz9a)
zZ$?ewZH)0V+8z25@DeWk9RzyYn-Ynu+IcHSg)SH7k<-8(`g>GSjHtMO{sW3$gw*8!
z56SaH7(x3aJMcJ!rWoO&B3mT}+S!3kg@V3}UTW+>Qd--IrgtC}x~SLPf#wu}<1BFT
zgxZB<{%q?CJZU?{!#(`g6HhmDg}on7F5X9x(-htTDk{9Y?hbtgUAdt0BJSSp^-YbH
zT`bq*4pjn^hh70D2|<rWLyXLdD{MPNtcZbCi%EVJoz@`Y1NJDJCL$FY@CapHBK{*P
zsEuDcble;f`=LpQ*aJZ}{$2=85z)9a|AZ#u&U_6*AClr{GRocrVGyZW47e%0{~3*I
z;C&^EG%IA>oWQ>z^(m%uOf{Szs%-&vv;A8~owpsc{dwHFsB<qjg*xh0g!?*Uf}2{2
ze?|8-R$_f7m<r7rd>T)6ng4ZE=nV6rNUZ@kxG?_{5M&LuLeQLYEe%Q%y~YH0-O_vm
z{dE*?Dr^DoCs4gJc=PBG&TG66A*U(4QLlpY-$dSek3rhH%}7m#xc?1RH63KYmB%2D
z_bo^RtZeY*>F6GVtf(m^{(&MNRT=}KL)=g4ul)Wy#@q-P?H{nR0fsQSz_6kVOpokJ
z7Z}<}VG)lvDQ9F`7KPs|)T7awP;KM=gKweJ_^xd$ZbyX%JVII5O8y5bs9oD`+)m@o
z<q^C;4?*zW2B8MtDCu(KyyCE$LzgYM9c%H(_x{$}za!pWrcBc|upJ)^WP~xD|AZLl
zLKrrvJTYk<#J{G8P{V7XLYE8k$Z2p@{4Z2djHtLO?ncpzkea+I(!G)$$So|4XgZRc
zLJPG<H$W1P@el;#G4@B<n;>jPlK-Y2znyP-e;dy?BDL_3o3M$CS#!q6y|wAha0%4O
z)b(a~7jo)t1{8-!m~oq_PCz&lf&n2JWfO!!r2aMhGlFM9=plFtmgv6BZONaif0FUv
zDA0qFJxgO+<Nn6V2BK!{vx0ys&B3(|Pr{Bo1c6A0v%i8IJ(?%iK7R*8iSNm_>@yV_
z@CapH`}{wsuoJ2M|Ap>!Xc4?C?eh*4)xaAiwteop7yG~HFOGL;11s-uq>ym*d<Zpc
zAQiTN_jgfU;a&UY_HNYCtR$>e12-Ix;5`b#H3760_3$><ZyGga<I~EUjemWVJp*AD
zsfF|G>2n_bA0}3V3+p=%snF%ZJaQVGhdBQ`bRN>43nShSK^W2Wd58uT_Zt2ucWT|!
zC>54uAdp-t+mEtOh0ufA102D#Ajsc2oxmL0T>fX-cu&4r{kt0dc-q9G&HPYBYilP$
z=s69|pB?3##Nw0jLHj+xKkqt)ISY6?6@t8Ye-4D6Ey&@I`tl#u8zLu>FC*UsVGyZW
z;3qo4P%J-H|C_$kptlBDDh&rQ62n2jY8VbGG-RRC)Dx|1u?e=aAnp23P^9>BGc*Zb
am?Nh%T`RF51W#-cMk_zP{EU6{B>o?-Iv<??

literal 44298
zcmd^I3wT^dbza4?><xK?Y1&Y-j+5XJN3orU9|>XCk{rv{!<OU+2BKU^*Vf|I?y|d*
z9SS6M3V{$xLQ2Y`kE9gZra(&zZE2y8q>qrM&;l)mQX1L<EqwqjrIbF@|37o@Ja+f)
z-qmWA@I~J@SLe>1IWzOmf6knldu6XqBoc2uE0H)8ze`AKkuuYj>_WD3+j)?C!<)k;
zuUPa;&qChRq&HQ{mWKVZcMgl}ny*v}`Jg}#a#Y6Is_5~Of7~nW_l_6P4C+pMb5q#@
zE2{$2S-({BGBb18yp`ck6e?a$wdUs+vW3C?vBGLmkew^Ck*P@tTiHjEO4+$=X(Bs)
z!mp@y=FmbPRhP{Dz)ZFh-WSm$^;|Vu^7W`L5T#be@O-Y4JvYe3fXWz9sW4Mkt(W|K
zVQ#AA9r8-qLYYWTO;-F82IQ5fd)gi}b@%qomn((2Ls|c1fEp{A%&<~n&d-;<oL^2V
zEf|ttDx9xw3dQMcAwO`;=WG=&7qx}CVqrc%<4nk<eY5`biCu+LK~tRJFpJZN-Vq9n
zr-%*{@#)+GW~o%lRtnNEZV6^Ne5SflCaf%4BodRk9Pj<gWHz5g$NICL(1(am_@^pX
z<6#!Zf%1Z#Pwc#@oF8NsOFoo@nM4OA(Ga`Hc5+oT>K*c?{9MooX(IQ;(Jr}_<7I}7
z?U08if+FOgFB}ZCYv`Y?s_6U76v|e-=hV;M%KoDTOhn0>P#l;EdVI{wRlMOszEU7E
zxyjiqNPto2q$313XTVea%H|jRJQxdFk@7j2hc#L%b1o$lv>-i0Iq0NnM@?6dwN<q<
z$8OLjRS}m<swt8}J#{C8l*om1p#a6ioXXC5U~9!EzjKq-wxdw2&K2ur;cENIO;)l+
z>7N=^C0m)#75db?DTr0po)AO3+?ZdUM_*LmD)b{kP4Xx=x!{*ZOEZ36?ljXm)ZQVe
zv#gTvhFLNpEM4)BbJm3ZV85P40d_%ar@rFkQ~{pRF9+>YNAG?w?=V&F*?m)5*hq#|
zWr<JZuyj7Gc1C(qv<!kX#Cu^m+r*6_xT=4wP@40~{XRLso)^tPIQ>OonyO3N57<NF
zP>=dNxSBGlsP4r@i3lo+Uo1}6vZ^SqMzvQgW%JY7qL)+M4UC)gDb~<Of$8!@Rf8|)
zTwf^FDkU#pE_x_e@zKFxnfd<OX9f+`o?VfMtgERKaO$}=4-Q#uD(cxMhBC2R$g=VR
zMkM_d?>|0WD&%q&&sfG}5}w0_DLBJnKR>_4!!3Wh)UU)D_`M3L8;PDSl-Xn`b6!H3
zBo1X_7Rqcil-Xn`bB;rq1PEpFCX`9nQ0Cl(GEFm-In+?5`G+!j9m>R+kbWN$r!bT`
zWug27kS{`d9?}n5`OmlHi!C{2$?Glo6382nE=9V`k}tR97g+K}$X6h}5a~)w-ek#F
zS#qx>Uv0^oEqRM2Z?)uWEcseXzRr@bx8!Y>yxo#_Sn^IwzQK}jwB#3A@=ccfVoOe2
za>kN(S#qBx_gnISCGWQ6n=N^dB@bHiUda29hLDCWdBl=OEqOoW14v^?<CZ*O$p<a@
zkR>0s<Rg~+5=%a6$uG6!ms#@5E%_Epp0wm!Et$3*_Ib*Zr!9HLl6^})X357bdDfD%
zmi!7!K4Hl@OP;gjJmdmW5$Tmkp*=!O+=_JZo9J2ShsMWFKJoDb8~1H`eCUZQuQ;@E
zr1$Yn8^2WAbk)bt9T|CIaP{8OmaTWB@BG-Rd%u}@!-qffXzKBGcRy?F{%bzH_5O!G
z|Gwwk^X9W&IJD`k%H5e)&7J*`#D#Bv;BsR3Y&bmnwCVE1ZAG8f-#_J*v(vr(emQ$Q
z@0WUq{fZZEPv{LRC`WHpy=OTed0rj?N(BLP|9nY)v-2}0?<9jxx`1ls{lT-|zCx~0
z3h(Hsdc$h&Bl_ZLmZg*R8MlofB4RUPAL((A&F6A(^}e5{pT!E8o1gI~vXz{ae1*5*
zakLyw9<@1swVpu`uUYYqvmr!3IiLDOkS@~aFJ#MEjE9XbFrdy?Hd9s3KUP`A!i6F$
zpUlowW~qAC&mNzxu;Q$jpPnt0M28YtaOa8aOc~RV*i469jS%6NHIA!<6V`00Q#wRY
zfp$1sne8i-FpK5z0oS0Z0s^y=49DCaW_O9!v{V@LX0r1VZumKWLFSU(_Vb*{8CFA-
z5ylpLQuJnKviaj2#}>|w4voka9Z3Zt8dsZo165lpu7U1$_li2@!x8n4R}d}c5K}S-
zz2h=w*dtFFUWVn_pP6h~#u4Umr45E=XCWjnm;ISAODLDiWsBwPtAsowqay>PhuMe{
zm}7|gGbjBrHZ!CMZ&`r_XEQk%6(e|BOW(lA#K73(p3$+vqoX4enITRw?8oPJWpKKX
zSCOCU1gn<;aLymf=6&*}T)8bL+#MMm8_o=gZDJ3|HiJEp7)b?rGS_@S<2~k0`<$`<
zf!&#dLlacIp!-E6f_@zu7@HXE%M3+1g)n9pXAs_4J8iSS<zSC_<%){F1{8<Ll&w*W
z*BeV`%Sk;o+de}6$U~1j#2ysZucz8;$RKwI%Is?y%+#ZuITMh`(cA{3;RvVYFabLO
z9M4p;e)+1Vx~^1u`n`&Gb16GRoRt##9+GtGTCdkXg%CgIU(>4|<uHf^99Ym0`*A!J
z+9{b4-0u;0LKiuh$3aCUQ|)s(g#=@?lm*eW8%79S$xeH6fUsY2N@zh=m*JHv>=uDj
z-3}*|EsxI@PO7=v<;mHUb#_784Grv`Ai&qLY3?emeI%LIml+!yoET-1>($iQ`$h2{
z>g<Dkp>8<{VZPdnmr3{Gf$_{Z3+Vk1XFe#+?GOujx#Fyxu3+;R4xYfXhm&K2H}9F?
zcz6P!xBS#HIC2QKm>C-!9asIU-fNR!`^QF)3=U_8X|?OuvzoP?<AmA!R8pq;@Ild6
zp`*9d9OdX(|G>z=IMFknQg%=5EzY$>mVGJP>66=(+*<|I=^lgqpn#mTfCyZQ7Yee<
z39{@PcYpSIfa<TCM`IWZN|jRkb5N7Z6{6fhc;G}$z2Qw@Kpc6^Ar$8l8{}!fADeg5
zXf~U#Fq6MEHM9BRyik)RCI*g7(2W(na`_}yG3K4bk!hgcJwhRz{R4fNvZ2Y5gTuQ9
z#>UyVsj88)MLkLdgR6(U66&yJSPss!QkN1<MNa0Do2ik}UXsE(w<Ys3yT%5`QY^r!
zv$ys1eRIX$6aH;DC+Y>dy;Iko!kN}oVXAP7ns!}#q>r~aRb(e|gs2Xg*kX7FMFe(@
z4)q7U7#JH(?Ib678mdpzgq&6PeWM`qcxGr|Tvbp#3r--!NbF-6b+TkMS|=6gVsL(%
z+R5-|VsyW91I~$<^iK{}Q#-jg6*nH#3lGf{_)fL0?7EEGBc+u0QBrCcCnkJspN`VS
zY@-QlJJM%2N{c#+Cb~)zEs7R6=(dix+2O$;hvOk_tTSoxNIb435!4w3=d(CzA95%=
z)Q9fQ0g*s#pBS-E*3sl`qPOIw<fPXtrDh&|zqbi@?1Z24b15$Dh1B54VBg?qs(&z(
zx-FISkUNd*C1XBLJ@bW2QZrH#c{7FH)KH<En(->UBAXghh+YwI6iO*5MPP`7d@tWi
zSnWe*Iu&<lW9p=Zyre6UV;42;%D)BAnKd>reh^$s^$!fOn^B9fIhv70*xXtng*oCO
zTG>1zTeTdLQhLf2?BX6-Y-&=!+TiT~-g5v>=S>IW(QvZQJ~Qb1*=NcDrY}>h-h*(8
z>y*2>G>>CCa&J2Uk)4P?;Z4yk)hy4Pc%8{LS2{J68Aq^{8a+5c$aZ<tCytl+l0p0+
z4{cmeaZ*mMV0iQNF^m;6cyHuMz_)vBbT~E8fAawQ!bdv#<IOliQTA&bas70~pV0-_
zjqzE~<fN3RW9j!wC#c_?lhG<Lus(E6Ts2=hX!X3IdTKINwh)&c9D>Urb96|yak~&6
zCGwupTX;`<9`ms)J&spBVz7bn=n`9bG?f!7=e-Dz$~yFlx)PhQ?|J06Wi!d=c9chz
zYVqV@y>c%0!LHK7XUe6ptdVetk0)$=HxGkhcquAWh7%meQYX5`f($V6_JydMcQGui
zUj{H>2ue{amK*c#kDdSe>mNv^oVLiQE8Q$k(QdO(QHZ;*PO49qm3MYeo7u4~n=iwl
z%G143fkF5h>~a*wzBI<mGx8I7)V7r^i!xt=Y4iGm-I&0u3_+Gd!|E8mdJ#v>8=2lM
zJYR9AxBk&GC&0YKpb~Kg3UTWV3p2+2tK_AoP*a*WFDMk9tP1jylex98Z#WCX^OfvX
z>IG|AExOfpx0X?Cpj`1&2<P!0HYHq4;Q#|!VAp&;d;n`t$pJ-Km7&*1x#NXRsdAS7
zUR3*BHL&PnaY5FCmrr@YLXg59wj3xc_p;Ai1oit{840291H9S%yjP;7ClYtOI1S-R
zb(2W)H?dDLIG|VQx))hQlo^R6%|)J**z_+wi{JRpB7P^jsXWP<AgHSo#AkIE5f@#w
z8hJ{7CrMB8Mg;a%9uY#(#|2__7uT^>q(IjUF5E+jK<6X^{ksTU5M%({rv)QHhe+{N
zJRVnF=TatJr~5G@N`=`R(R!pF4(Adi(WJ(>xVX3>%)#$O_ocY7f*hN#?vk<7WOP@g
zbB`fM5MYyfBmxBszX0hh!Go}AJoHHQa1<UgaH=%G;6?#ML7wkLuchq~j8*qWYhpQ0
zYodE2E-M7g6=+I#r5P|R+!`=y;1R$~0R{nvd){WitTba@7y}qmLm0!t1{lKRGKK~9
zJU3^|J`@*V@LK_M6$F_kT8U^93&2gaDP4&?7D{fy#h4NmNOmuTtC1AHQeid?W<63p
z3%mXH+r`4DjX&L+acQA`;(mFP)uroiX|euXRekBiR$P<U;BpyKVCL6CypH*FV%H;K
zShr@jF=sn2F45_^!~+m1@c^8r9Y|7LCYB1##B!Q<BCSr`AlDmlP4cCbp6#2M^I}}m
zNIh^(i{de;ID?ejg-aiWeq8D?f}Juxg!M!Lr%o6#0zpiLy^`^e2reU#5jYZ&j5is;
zy^vrx1kQ$<#0Cq8h3(BKzenmtz(}PUMnR8N40>_QLJiUdf%YOG?1vyAY{HlYgjYk*
zz0q)@STO!UNNS9GA<58bTW08~FnbMz^+@&jk5zO79ua8y>8?k;Av~(4-W^fY<CF;X
z*c*+ROFb%d!D~pmVH8gzfph^}aY)w??@_38@xHzZ-el(r;myu1E8bMNB)o@*hhrOg
zi+G<xpBnL-7NPJy07>{g24P%hPlVZYhzF69hj2NJ)U)`x&wlX;gf3Ql2?d(fQ3%PG
z;_@=2p2gRG=(~JLoV*2>Nu<?c1l?Lwi<VRqtJSllThUJS%mz-}!y}D{cmVChIqnEc
zqC$6O^_Uu(6fsL9N!%NIio3*QB3u~9>zdR%o0!xTYOIh+O{1x5;2&(qg;Ajkd_%m6
zSsJNlvFrA(<-wb4hu}>?2t(H^6e8^}LJ~&fcd%smkX8uqV`!=x?|T*AwM37zWKdxX
zcpH8v9&QhB(po0$0-!2*cLP=zZxpGAH?zCtVixO;ZwHT~LD!Ewh8$UuYqx_eY*6K@
zs>3}QGij@dM4qiyE`Tc6A*p@xM}dqKM~;GM=l?D)3PgH4SWC&OUC&B+dG;~USua0}
z7OKhLmY1hOGfkYdmG<&FS|=mK3K%cR6h8t%6Hb!_#RBecgtS6lCyS=4fp5#pQ=tod
zLofdd6i*|y@8#(x#H6&BKPSYScs9Ztj|1dQ$l7tQbHeVF(Bd)VM0gz*HmEMu>%0Vj
zxL#)oXDut`b<o#Ndz~Cws3w0~UWW?JG;z{a+Uu-En|d7*uQL!@!SZ^YIW#0wv>rmU
zeR3XUk_BA&Q+LB$#DnUoXu%KBT6Z9svl=RNr=p=BdL@ddk&GW=6q7+}eo8|>vkoQI
z(!K%G68(^gdG<mH*Z(As1X|oy#X6uUL2ny)(*wD9Q(+5u^KDBSsr}tlFSH2W4?+;e
ze;0x{)Kd`R`ThMUsaD*M`~8aDsb+qkg$=54{Jw&KONpW6Eg+~s)Xo|E08|Pkd9r6H
z*%M~3fk5vg=bZSR=)Me>;3#$;;vU|b`H-PAHj*WeO7({Q9NZ*X#SEQ5xPdmo(6JNO
z{2<V#N;7mmkfC#ig&q31@B=`l5j!@b#tKDY3ux*(B>SZLj?6aZY{y0SQZQq`1T*>u
zjoA(sJ`WcGj|yGz8hXEB6i*}dEIx(DS1aiKPGYRpc(<_H)OtTEYyodNrZkdSZKyKd
zY7@b45?%OBLGwhIL#x%60(s?Q-P_QpOXA0nBP7;4Y$71sWnmY~c!p1v#_*|541X<#
zFTm`Ay$dj0*>!JRV5)Z5SE3}*TgKOCM~)m}gwVzQ@u$_-XE@Jy>u-S)<)%`Qq_=Az
ztVgOBmc6&SKFZY($zFvA)kYFT$F)vLJMvAa72%Yq&`d0+c_&hn*JnS3B59=dU!T1j
zT7(f?yo3?&f*_2bOO0Rzp4hM8pV5qXHLzG#Mo?kPjCc(yrIFfa1kGlNj6lu6jT&hR
zqO!z}2a&HuQ<|_s;aZ1ElN5)_!UknJ9@n9=pmu{2Nh$Mi9jZRE)IsDDjx1XT22R_A
zl^bwlJm;mjqpP#u`QMJ)X29r`hJ_6<gvkYl1)BrI<wRJNhai6CD-iUg=-y~ecv|zJ
z#$M!!@9xxw?+!FjZM(tig<5Y;f7mR<q(TE8p}YZUb>c=`>wE_B!^ln}wIA}ZV}duQ
zNAM<5TlC|nQAO~+6N0r-`4QY!!*pxrb;w<v*oJGJc$@=%Js&apz6(kAv~OU}8*vdF
z*-FH!$QE53??z6rDt1Mn$)?gsOW8hu2=(5CWPi6us~1e!o?yySf+=k-g2Q-{=r&<{
z6sGr}*z#feW@u}MDO-HXF+GJ&2&VL}f+;;kEKEmGa1~M_`HYS?eiR7Q5+}k8iL&sb
zK?F*LE-!W>r%43*78FS%wI6TjmEu0A6GkwWiRHO?e4!Z8@s;9UG!=n5`>lO}?zf=M
zbt}TdQK5@^!<FK#D4s@Iif<zc)*-2*Snbuc1yYD*fhf1~FXQe<qt(c_bu2-J26+ZJ
z4Uzvb6i6erzeY386W_-v5T?g|8E4j$4*0%Osl@fn#E_eDr|c>P=?tXg8eF1w&#T_j
z-tHTRpl<tUtN!l$ZFo@4g|>FzROoUchVOd-mC{J<`@W;lB8<2a5xp>ii?rAxV-D?A
z+$b4O65VDsY<>Gc1#6LH00KR8_*3^U1AZJ2bXTNvj4j2%T?|1xxN~rmWMLQ4X4{8)
zpMo%o6<|(55McCo0uLic_r?Y0d3a>~$;1KN3VFvMH2UE0?RYNlB;NsnKkB;<X7gC2
z1yhLi_1-(7vvn485E|+oxG@LYRA?~g4Cv7`bZzIMWE!bwao@gu0ylBbAT@u#=PoL*
zMjcUb69kzrPLptDBZP?g!V~)#X)kVNzPN050{C}9Zv^m5Tg0i*1>VB@C-6{npSUD{
z5|=bm`*;&37w?nEiG{aWN}jIv@lzN|#58TkBTXh5E_o=fsDXV@p*u}anSCVDmDcRT
zIQov;$4{ek5x_6aKB&+IzM*|Qh~jCaWwZ~CcWnDW`$3SqACmI@&xa(QiR)dvp6OEP
zSc7DrusnoYm)8xJSQa*@z7}`d&4^E+6Tb)vF-0Q5ShMcemV7A1Z-yY0)PH=(w?n!&
zS`#Z&|0&e~@&p*Zsy4v%gxMUYiZt%Kj}&s=fBy{b_aL?K{+m_I&<RAdp{t>}s}(iK
z(7B71q3b}LFTx{+j<U<OTE+Sr<=tp+S*?)@UGN%O<Ikda8cAN5X<}uNW1@ri;7$|7
zqMD00!xmA%SU~VT3PIdAEvpgUX0>X^`^Cchz39ra;!TAu;Qezbo<?dP?+2m9#hbf{
zSa>hbY7-0ZpGTh}@b>UXvqDET&5l&4FcR+<;i2{wH{nLY=QITDf&#ecIG4ijdDL_9
zCedTzZPu8M^ZOUjr)9;P3ZD|ZpG3nh-t;%I@SZ|JwWfFAAf;ya*Wy9Sqi?G^2-%{0
zn}T!(Qp1Cod$LvaQK9}p%ENe2&4qMk8ynb;i)(uXS8T7rAu<)ZT-b@6CWpwsh$3mE
z_774%0WHD^&aJF4u^Hi`hGN74NP=;*^MXStco=Dke;|mOn3jXM$e$XTuqlPCh)HJl
zTBJHhHd~Qh{a4=aLtgd#1_x!ezE#g}gDn&ly7Mbrs9TV21rd#$EY<{>p;{-~4<&98
zVWw~$o~d)|Zb+g)2W|S>rDj3f`>6yekz}|b2zM%w{{R|rt>-c1i1n~ZeSmWgZjvnQ
zf~r?24V4Q_y|Xe6%qP17?)O6wZ%AtB-e^t8tO?{h;0<enfEK+WR^<)osX3Nz(HkQC
za_h^u>siY$;YozGEX^BIp_y1ta}00z%P5vcYTp}@>p~#z!^9h&hM?o92u7fYy}x-z
zGvb55Vp$nMg)KAUS5PU9)IKBL2rVunjv^-(Bg_u$8O?}a1zyX_2r6uu5g$UOG*bJF
z_$st4krAl*RDS07VKlE@m{7QOiDgJ5ODqc;lwXTGcZp>|y)aq_7*x3qNyQ#_pAmrd
zc?jZA`CPZHd!sesX$?ds&}<_LdEl<Q?vhoFE%2xA8@pe_1KlazO*abB5V5d<h~Zf?
zhztY<B2-g+q973I<3#<(+kE6gRQ1NLbzl(bRK>*{0DtNN^XqsJ8yFTgz!0Wpz|;%R
z7;uQ8oq{01d;@}>6y2MK!0bg8P_J`;`t}=8ejOV)50~qa)+7>beF;g020TJ}15)Id
zkgvhRG*bItS<r|DZxTW9*0#D4IT3i{i5>iO9Pf{yy=uH8H)!m)81Fs^&qb1$cn1XY
z4wwpC!235*JdL!B-xHBFF5df*(+F=9TAW5n;rE>oE<+0bMDDjB*245U7U<BIr)<&1
z@os5N*t_Cip0aHh(`Fn-g_@OTS@ys2R-TWdc|GOY$wjO@ENrl*y*6{O1`M<EoQn;x
z7`*-le+hrU-|>~_V=;gs0ur^bumOfJxxldCMMzxzqTldoPq-VUghl!zny;azo+hn{
z+N$61?M0qgCVfw=qbh1yizKeajaBMxzJD7<t4;jD%r@lKIf{(q38~P4M<~U1qrSoa
z9TZ3-bz<ewuN9kFEuVAOo=E;KE`s;(L1+>0n)7GNlRg4<dd9V3K8oC~Z-ESAp=?qw
zFG57ta<N<r5wC$3vCtbK2ob*wK{`QG)!lN5h$8lf^sQSc6(}Os0COoGt>JSEq2I@?
z?utgpbzRy*S-5>*s7`?4KXE3&TmnJbrn%|fxWGIQkF3w!I<PJO-uZjXKL8fh-eZ51
z_n1Lpna>6<GN{l@ET?%VQj-@Me~2P!r1rPvY)}}n8iFw5AOvAV20{cQ@WhT@pV5r?
zBVe(tjG)4n8Sxk@rIFfa1U;C`h@;4f#RwB$KcgA(ap1MAjG)4n8SywOrIFfa#4%`D
zA|p_<W_Mun{urW)LJmMW11UL%OT?$sPw+Vdmp?(0AmS6u`6MoXiiB~lRsWvqpW*IP
zeDrBtKBFEjF8(=$t_yJai!kT25R!k1%gZTz4wuhU7{TSQkOa6dK<Hv<!XNbxmFnp&
zRnJq9q~~iOtVgQ%_x?5UK)t~9uTi<0Hj!I&y|fT89YgKFjoG48p`i`eem&5J5h{;l
z(n#$y2TBxkZUq9ex_ldg_!90BWOX5U5^o?9k)Li}yT6EwLb&xnjG816i?@gT8x+?I
zopg@g)D6Ulw?wEc?1Jh>s4S?%Cpq9%%PLi_LsAF4=V6dyQpi!ypN@OTC(*fPz~~5-
zg$*!-$pwZ5U0@oXUY<sAVazum$fVGub#JsLWUl-k@=Iv6+Em-xLsFpu?@8R<fE0Op
z`L}qOMrwZ#$ypI1QV_i9@dR(W+6cVy#E$>=;+AIIv41G-@1VRI??~6kev9$$gAm~w
zsjvmSjYo|Bs^mRTsaYw8ulP-eU<_ZMk?5@{9YZX<O>}htRRnK3|A^J{ARZ<E9vAWX
z?|{G`wSqCb6D!!4p*Qw45f_=J1}hj9y3?db)6hQR%vV2jH=nPgC?)oB7=qXb`z`ae
z6+$EXU>u=Vunt7S-#Z_>d<8H>kYc-ypkS&=(O}0+g)S*}BB#lY*?3F@All(&P|<u`
z9*+^6c2V#E1YyKI5Mo&{%GE@}Uq#+h;~eT+i_{Y@&iMxv)r6G})AvNgIV@~Y=IY=s
z=bS0md=wZ|Y1~~NZbraDu6q7-jC1}GoofaR5s(0og$*!-$pwZ5U0~|PIeHzq8pVZ0
z`kzF+5aFxtjn;%>HE~YskukNbMUv2d0|d0Ce(Juy{u-X?u0$|K1H-}w7{as^VAvaB
z43|3>n2pHMy>WqIE$jd2>VU&NefqTE#o_X2rT@vex5WOs@So7TWp%hz=uYfT<TP=(
z|BNDOr1m$F+$jnp{uP2SLNCG17(osx=eieCM?=(qK?BvOx3wjpLKpQLkQ2EjAUJ8H
z_O}Fjfn$i++5%@no{qbwucLF?88mZEEbL;r6xXDE_A5hR^na<5w|nEdrmD9m2T)Ro
z$guZm6uWbqUCrOfEtU?`IEaWX78M%IIRh&lyHBD`aU6XRgvgwxSdkhXi*g*NA<2B*
z3E?uN;7gHjLafGX|C0ZWvNuDU1Y&F@0#LT-0(v)c0yn%;Uy8gQO$w%jLNKMf5KL+E
z+9F*Wz!Uq`YR8@NzoEVA$qC4OpWRE%1;KtF9z|eJg)a6Do$<e;cp9mFXS@YkT)g)q
zCl=nu89$@Lp>F{%;lh7FxE^T@<|eZZLY?nDv}0?q|D-~f3o*i>Z=+HgsZKcbpU9?%
ziuoT<ay=17&_9U<o`MjI5u^@lC6et}V62xJ-$5%87PuXcw4aD=fmG<C-p~TiL-90H
z&msb6f$L1%EoHy|0P4ATpFmD5yr)o5;ob3Y=)cgE3+iLY5w~_R1nt(&!A+8dT`bRM
zHZjvsX$Q`zr|v)KPz#J+UQ?)}d!scWvt|q14iRh4z_=7u|7GHLkrzS4r7Z<iXuu<s
z4T<>QD3C^K|HIcFXp!mRp8Z0kF7AwC5z&M*|AQ)LASM477Y6u>pD9R^y#~U1q<U{L
zW8wXOs2qW}hew(f(r*r65oxtzD*L3Fx&t@nT_)AGfVwgN=mYzHsMOrFSkB|Tbx7(>
z9et*YI&C=?>L^!p+(&ioyWm(e!Lyx+nOK?&rb06ZJm6`_{4Nwvqfq<IhY~dh3}l4)
zpMoHBumOVRl%7pw2FOoAS|Pm8SZ=(jum!wVEgRlkI)w8Y@1w|xg*VF8aGtwlH3zLP
zgQ(id5jX!cTule*aP2b47*Cc#7B=`YK5&;o7Sxmy2cgJEmBvBnBkrg5=iogtfFS|`
z3=11z2$Ks83%bD6JL2YK3ybutPM&Pbr0}a#Jxy8@%CCHUum)YJ_L6O#+fktbk5Jx#
zaYdfntwn(}3bemf)Od4x#7lkwg5b^dKLT$&>F~*U&0@6~O)7tog48tZK!89mzXE@k
zpRB`$;Mkyc#f-C6q(YYqJ28?bC+BBsMzs5?lHrwDAdfGE5wTxYnv?SZ)Rj4+HWM-S
zgxPB#tVNP#9>1M`a_w0d%O2#l@K3I>ii=r1=fn9hURfK%wa9jj;bG)7G6p;jmN1%4
zs|y$YapOx+t&8;(Ea85cX33wrZ`#hnsCB0z7A`6f|IES$qB#D!-onMv2|KuL6NvP2
z_E(Ujd-K%#=d&@^W%bWgXuu<s4gE9!q$UkG+V{_lAO!DP|ICeR1m1XJ`{%v56>HoF
z!B}G|%%(N2M_Tg!?Ocqv8t=dddeEzTsn?ZeN2gTS0^aALcv=P!y>ojHo@-WGJ2%$_
za3?8v_d{@901N7oXidlr4BvP^M!<qM4+IU~SB2TV5UxgQVLkiaSr5;T=E8Q2StBT1
vAg02F21ln<=yG8vYBgC8FVKu=cRhR&8WTo*5P~ow_Iij4HTxPjuPgEY@GvO+

diff --git a/B4A/Lanterna.b4a b/B4A/Lanterna.b4a
index fd7f138..8710910 100644
--- a/B4A/Lanterna.b4a
+++ b/B4A/Lanterna.b4a
@@ -82,7 +82,7 @@ Version=12.8
 #Region  Project Attributes 
 	#ApplicationLabel: Lanterna
 	#VersionCode: 1
-	#VersionName: 4.03.13
+	#VersionName: 4.03.20
 	'SupportedOrientations possible values: unspecified, landscape or portrait.
 	#SupportedOrientations: portrait
 	#CanInstallToExternalStorage: False
diff --git a/B4A/Lanterna.b4a.meta b/B4A/Lanterna.b4a.meta
index 42d06ed..c33f27e 100644
--- a/B4A/Lanterna.b4a.meta
+++ b/B4A/Lanterna.b4a.meta
@@ -25,6 +25,6 @@ ModuleClosedNodes5=
 ModuleClosedNodes6=
 ModuleClosedNodes7=
 ModuleClosedNodes8=47,48
-NavigationStack=C_Principal,b_mesaEditar_Click,1057,0,C_Principal,B4XPage_Created,217,0,C_Principal,B4XPage_CloseRequest,279,6,C_Principal,muestraCats,314,2,C_Principal,p_mesasItem_Click,912,0,Main,Activity_ActionBarHomeClick,35,0,B4XMainPage,Class_Globals,22,0,C_Principal,B4XPage_Appear,220,3,C_Principal,b_imp_Click,1362,0,C_Principal,b_imp2_Click,1501,6
+NavigationStack=C_Principal,B4XPage_Appear,286,0,C_Principal,p_mesasItem_Click,937,0,C_Principal,B4XPage_Created,211,0,B4XMainPage,JobDone,205,2,C_Principal,b_mesaEditar_Click,1096,0,Subs,traeSubCategorias,1411,3,C_Principal,p_mesaAbierta_Click,1106,0,C_Principal,lv_categorias_ItemClick,1111,3,C_Principal,B4XPage_CloseRequest,298,6,C_Principal,muestraCats,337,6
 SelectedBuild=0
 VisibleModules=1,7,8,2,3,6,4,5
diff --git a/B4A/Starter.bas b/B4A/Starter.bas
index 04b460d..07929d6 100644
--- a/B4A/Starter.bas
+++ b/B4A/Starter.bas
@@ -27,7 +27,8 @@ Sub Process_Globals
 	Dim ticketActual, mesaActual, meseroActual, comensalesActuales, totalActual, mac_impresora As String
 	Dim formasDePago As Int = 1
 	Dim imprimirTicket As Boolean = False
-	dim nivelActual as string
+	Dim nivelActual As String
+	dim catActual as string
 End Sub
 
 Sub Service_Create
diff --git a/B4A/Subs.bas b/B4A/Subs.bas
index 0035426..8fc17e4 100644
--- a/B4A/Subs.bas
+++ b/B4A/Subs.bas
@@ -1409,6 +1409,7 @@ End Sub
 Sub traeSubCategorias(cat As String) As List
 	Private c As Cursor = Starter.skmt.ExecQuery($"select distinct CAT_GP_CLASIF from CAT_GUNAPROD where CAT_GP_TIPO = '${cat}' order by CAT_GP_CLASIF"$)
 	Private l As List
+	Log(c.RowCount)
 	If c.RowCount > 0 Then
 		l.Initialize
 		For i = 0 To c.RowCount - 1 
@@ -1498,6 +1499,7 @@ Sub revisaCierreAdmin As Boolean
 		c.Position = 0
 		If c.GetString("CAT_VA_VALOR") = 1 Then
 '			B4XPages.MainPage.principal.p_transparenteCierreAdmin.BringToFront
+'			Log(7)
 '			B4XPages.MainPage.principal.p_transparenteCierreAdmin.Visible = True
 			cierre = True
 		Else