From 0589b1d7b040dc55865c0d1c0fc6cd64e426e18e Mon Sep 17 00:00:00 2001 From: rakcsle Date: Sat, 26 Mar 2022 15:40:59 -0700 Subject: [PATCH 1/9] AF Pendientes, entradaSalida --- AF/AF.aspx | 441 ++++++++++++++++++---- AF/AF.aspx.vb | 513 ++++++++++++++++++++++++-- App_Code/ClsAF.vb | 235 +++++++++++- App_Code/ClsInventarios.vb | 7 +- Inventarios/EntradasSalidas.aspx | 19 + Inventarios/EntradasSalidas.aspx.vb | 61 ++- Inventarios/ResguardoMaterial.aspx.vb | 7 +- 7 files changed, 1167 insertions(+), 116 deletions(-) diff --git a/AF/AF.aspx b/AF/AF.aspx index d4756bf89..68957ccb4 100644 --- a/AF/AF.aspx +++ b/AF/AF.aspx @@ -218,21 +218,21 @@
- +
- +
- - + + @@ -248,6 +248,35 @@
+ + + +
+
+ +
+ +
+
+
+ + + + +
+ + + + + + + + + +
+
+ +
@@ -1156,65 +1185,79 @@ -
-
-
- Servicios + + + + + + +
+
+
+
+
+ + Mantenimientos + +
+
+
+ Agregar +
+
+ +
+ <%-- + + + --%> + +
+
+
+
+ +
+ + + + + + + + + + + + + + + + + + + + + + + + + + +
+
+
+
+ +
-
- - - - -
+ + + + + + @@ -2076,7 +2119,87 @@ + + + + + + + + + +
+
+
+
+
+ + Producción + +
+
+
+ Agregar +
+
+ +
+ <%-- + + + --%> + +
+
+
+
+ + + + + + + + + + + + + + + + + + + + + + +
+
+
+
+ + +
+ + + + + + + + + + + + + + + + @@ -3106,6 +3229,200 @@
+ + + <%--MODAL PRODUCCION--%> + + + + + + + <%--MODAL MANTENIMIENTO--%> + + + + + diff --git a/AF/AF.aspx.vb b/AF/AF.aspx.vb index 8dad34b1f..4695bad3b 100644 --- a/AF/AF.aspx.vb +++ b/AF/AF.aspx.vb @@ -245,6 +245,31 @@ Partial Class AF_AF #End Region + + Private Property CveProduccion As Integer + Get + If ViewState("CveProduccion") Is Nothing Then + ViewState("CveProduccion") = -1 + End If + Return ViewState("CveProduccion").ToString.ToEntero + End Get + Set(value As Integer) + ViewState("CveProduccion") = value + End Set + End Property + + Private Property CveMantenimiento As Integer + Get + If ViewState("CveMantenimiento") Is Nothing Then + ViewState("CveMantenimiento") = -1 + End If + Return ViewState("CveMantenimiento").ToString.ToEntero + End Get + Set(value As Integer) + ViewState("CveMantenimiento") = value + End Set + End Property + #End Region Protected Sub Page_Load(sender As Object, e As System.EventArgs) Handles Me.Load @@ -260,9 +285,11 @@ Partial Class AF_AF ViewState("CveActivoFijo") = Request("CveActivoFijo") CargaDatos() CargaEventos() - CargaActividades() - - 'Configuración de Modalidad Update + CargaActividades() + CargaProduccion() + CargaMantenimento() + + 'Configuración de Modalidad Update BtnGuardar.Text = "Guardar Cambios" LtlTitulo.Text = "Consulta del Activo Fijo:" @@ -271,8 +298,9 @@ Partial Class AF_AF HlEvento.NavigateUrl = String.Format("/OI/PopUpAgenda.aspx?CveTipoEvento=2&CveActivoFijo=" & CveActivoFijo & "&TB_iframe=true&height=370&width=600;") Else ViewState("CveActivoFijo") = -1 - CargaCombos() - 'Configuración de Modalidad Insert + CargaCombos() + + 'Configuración de Modalidad Insert ImgAddObs.Visible = False LblFechaCaptura.Text = Now.ToShortDateString() LblUsuarioCapturo.Text = UsuarioActual.Usuario @@ -288,6 +316,13 @@ Partial Class AF_AF CargaAFInv() cargaOrdenesdeservicio() + + + + If Request("Op") IsNot Nothing Then + ModalidadesPaginaAF(Request("Op").ToString) + End If + End If End Sub Private Sub cargaOrdenesdeservicio() @@ -373,6 +408,20 @@ Partial Class AF_AF CveEmpresaActual = UsuarioActual.CveEmpresa End Sub + Private Sub ModalidadesPaginaAF(Op As String) + + Select Case Op + Case "AR" 'Arbol Frutal etc + LblFechaCompra.Text = "Fecha de Nacimiento" + LblFechaBaja.Text = "Fecha de Muerte" + TabProduccion.Visible = True + Exit Select + Case Else + Exit Select + End Select + + + End Sub #Region " CARGA COMBOS " Private Sub CargaCombos() @@ -398,6 +447,8 @@ Partial Class AF_AF DdlResponsable.Enabled = False End If + CargaCultivos() + End Sub Private Sub CargaTipoActivoFijo() DdlTipoActivoFijo.DataSource = GlobalDTTipoActivoFijo(CveEmpresaActual).FiltraParametros("", "TipoActivoFijo") @@ -476,6 +527,11 @@ Partial Class AF_AF ' DdlClientes.DataBind() 'End Sub + Private Sub CargaCultivos() + DdlModalCultivosCuadro.DataSource = GlobalDTCultivosCuadro(UsuarioActual.CveEmpresa).FiltraParametros($"CveSubProyecto = {DdlSubProyecto.SelectedValue}") + DdlModalCultivosCuadro.DataBind() + DdlModalCultivosCuadro.Items.Insert(0, New ListItem("Seleccione uno", "-1")) + End Sub Protected Sub DdlProyecto_SelectedIndexChanged(sender As Object, e As System.EventArgs) Handles DdlProyecto.SelectedIndexChanged CargaSubProyecto() End Sub @@ -562,6 +618,13 @@ Partial Class AF_AF DdlModelos.DataBind() DdlModelos.Items.Insert(0, New ListItem("-", "-1")) End Sub + + Private Sub CargaProduccionCuadros() + DdlModalCultivosCuadro.DataSource = GlobalDTCultivosCuadro(UsuarioActual.CveEmpresa).FiltraParametros($"CveSubProyecto = {DdlSubProyecto.SelectedValue}") + DdlModalCultivosCuadro.DataBind() + DdlModalCultivosCuadro.Items.Insert(0, New ListItem("Seleccione uno", "-1")) + End Sub + #End Region Private Sub CargaDatos() @@ -579,7 +642,13 @@ Partial Class AF_AF TxtDescripcion.Text = ObjActivoFijo.Descripcion TxtCodigo.Text = ObjActivoFijo.Codigo TxtValorCompra.Text = ObjActivoFijo.ValorCompra.ToString.FormatoNumero - TxtFechaCompra.Text = ObjActivoFijo.FechaCompra.ToShortDateString + TxtFechaCompra.Text = ObjActivoFijo.FechaCompra.ToShortDateString + + + + TxtFechaBaja.Text = If(ObjActivoFijo.FechaBaja = New Date(1900, 1, 1), "", ObjActivoFijo.FechaBaja.ToString("dd/MM/yyyy")) + + DdlTipoActivoFijo.SelectedValue = ObjActivoFijo.CveTipoActivoFijo.ToString CargaSubTipoActivoFijo() DdlSubTipoActivoFijo.SelectedValue = ObjActivoFijo.CveSubTipoActivoFijo.ToString @@ -654,8 +723,8 @@ Partial Class AF_AF CargaPlacas() CargaLicencias() - CargaSeguros() - CargaServicios() + CargaSeguros() + CargaFallas() CargaAccidentes() @@ -1062,31 +1131,22 @@ Partial Class AF_AF #End Region #Region "S E R V I C I O S - M A N T E M I E N T O" - Public Sub CargaServicios() - Dim TmpServicios As New DataTable - TmpServicios.Columns.Add("CveProveedor", GetType(Integer)) - TmpServicios.Columns.Add("CveCompra", GetType(Integer)) - TmpServicios.Columns.Add("Tipo", GetType(String)) - TmpServicios.Columns.Add("Fecha", GetType(Date)) - TmpServicios.Columns.Add("Proveedor", GetType(String)) - TmpServicios.Columns.Add("Factura", GetType(String)) - TmpServicios.Columns.Add("OdHorometro", GetType(Double)) - TmpServicios.Columns.Add("Observaciones", GetType(String)) - - 'Dim Row As DataRow = TmpServicios.NewRow - 'Row("CveProveedor") = 3100 - 'Row("CveCompra") = 181656 - 'Row("Tipo") = "Preventivo" - 'Row("Fecha") = "01/02/2016" - 'Row("Proveedor") = "EMPRESAS MATCO, S.A. DE C.V." - 'Row("Factura") = "HERAA-158591" - 'Row("OdHorometro") = "198,567" - 'Row("Observaciones") = "Servicio Preventivo 200,000 Kilometros - Servicio Completo" - 'TmpServicios.Rows.Add(Row) - - GvServiciosMant.DataSource = TmpServicios - GvServiciosMant.DataBind() - End Sub + 'Public Sub CargaServicios() + ' Dim TmpServicios As New DataTable + ' TmpServicios.Columns.Add("CveProveedor", GetType(Integer)) + ' TmpServicios.Columns.Add("CveCompra", GetType(Integer)) + ' TmpServicios.Columns.Add("Tipo", GetType(String)) + ' TmpServicios.Columns.Add("Fecha", GetType(Date)) + ' TmpServicios.Columns.Add("Proveedor", GetType(String)) + ' TmpServicios.Columns.Add("Factura", GetType(String)) + ' TmpServicios.Columns.Add("OdHorometro", GetType(Double)) + ' TmpServicios.Columns.Add("Observaciones", GetType(String)) + + + + ' GvServiciosMant.DataSource = TmpServicios + ' GvServiciosMant.DataBind() + 'End Sub #End Region #Region "F A L L A S" @@ -2106,6 +2166,8 @@ Partial Class AF_AF Dim ObjContabilidad As New ClsContabilidad(ObjAF.IniciaTransacSQL()) Dim ErrorGuardar As Boolean = False + Dim FechaBaja As Date = If(TxtFechaBaja.Text = "", MinFecha, TxtFechaBaja.Text.ToDate) + If CveActivoFijo <= 0 Then 'SALIDA DE ALMACEN PARA IMPORTACION @@ -2123,12 +2185,15 @@ Partial Class AF_AF End If + + If Not ErrorGuardar Then If ObjAF.AddActivosFijos(TxtCodigo.Text.Trim, TxtDescripcion.Text.Trim, TxtValorCompra.Text.Trim.ToDouble, TxtFechaCompra.Text.Trim.ToDate, DdlSubTipoActivoFijo.SelectedValue.ToEntero, DdlResponsable.SelectedValue.ToEntero, TxtNoSerie.Text.Trim, TxtAño.Text.Trim.ToEntero, DdlSubProyecto.SelectedValue.ToEntero, DdlCtaContable.SelectedValue.Trim.ToEntero, DdlEstadoActivoFijo.SelectedValue.ToEntero, DdlCtaContableDepreciacion.SelectedValue.ToEntero, TxtPorDepreciacion.Text.Trim.ToDouble, - TxtObservaciones.Text.Trim, DdlClientes.SelectedValue.ToEntero, CveMovimientoSalidaInv, UsuarioActual.CveUsuario, CveEmpresaActual, CveMarca:=DdlMarcas.SelectedValue.ToEntero, - CveModelo:=DdlModelos.SelectedValue.ToEntero, CveGrupo:=DdlGrupo.SelectedValue.ToEntero, CveAFPadre:=DdlAFPadres.SelectedValue.ToEntero, CveDispositivo:=DdlDispositivo.SelectedValue.ToEntero) > 0 Then + TxtObservaciones.Text.Trim, Ddlclientes.SelectedValue.ToEntero, CveMovimientoSalidaInv, UsuarioActual.CveUsuario, CveEmpresaActual, CveMarca:=DdlMarcas.SelectedValue.ToEntero, + CveModelo:=DdlModelos.SelectedValue.ToEntero, CveGrupo:=DdlGrupo.SelectedValue.ToEntero, CveAFPadre:=DdlAFPadres.SelectedValue.ToEntero, CveDispositivo:=DdlDispositivo.SelectedValue.ToEntero, + FechaBaja:=FechaBaja) > 0 Then ViewState("CveActivoFijo") = ObjAF.CveActivoFijo Else ErrorGuardar = True @@ -2155,8 +2220,9 @@ Partial Class AF_AF If Not ObjAF.UpdateActivosFijos(CveActivoFijo.ToString.ToEntero, TxtCodigo.Text.Trim, TxtDescripcion.Text.Trim, TxtValorCompra.Text.Trim.ToDouble, TxtFechaCompra.Text.Trim.ToDate, DdlSubTipoActivoFijo.SelectedValue.ToEntero, DdlResponsable.SelectedValue.ToEntero, TxtNoSerie.Text.Trim, TxtAño.Text.Trim.ToEntero, DdlSubProyecto.SelectedValue.ToEntero, DdlCtaContable.SelectedValue.Trim.ToEntero, DdlEstadoActivoFijo.SelectedValue.ToEntero, DdlCtaContableDepreciacion.SelectedValue.ToEntero, - TxtPorDepreciacion.Text.Trim.ToDouble, TxtObservaciones.Text.Trim, DdlClientes.SelectedValue.ToEntero, UsuarioActual.CveUsuario, CveEmpresaActual, - CveMarca:=DdlMarcas.SelectedValue.ToEntero, CveModelo:=DdlModelos.SelectedValue.ToEntero, CveGrupo:=DdlGrupo.SelectedValue.ToEntero, CveAFPadre:=DdlAFPadres.SelectedValue.ToEntero, CveDispositivo:=DdlDispositivo.SelectedValue.ToEntero) Then + TxtPorDepreciacion.Text.Trim.ToDouble, TxtObservaciones.Text.Trim, Ddlclientes.SelectedValue.ToEntero, UsuarioActual.CveUsuario, CveEmpresaActual, + CveMarca:=DdlMarcas.SelectedValue.ToEntero, CveModelo:=DdlModelos.SelectedValue.ToEntero, CveGrupo:=DdlGrupo.SelectedValue.ToEntero, CveAFPadre:=DdlAFPadres.SelectedValue.ToEntero, CveDispositivo:=DdlDispositivo.SelectedValue.ToEntero, + FechaBaja:=FechaBaja) Then 'Comentado porque te redirecciona no se ocupa - 22 Enero 2016 - Israel Piña 'CargaDatos() @@ -3097,7 +3163,8 @@ Partial Class AF_AF TxtDescripcion.Text = DdlAFInvPS.SelectedText TxtValorCompra.Text = Costo.FormatoNumero - TxtFechaCompra.Text = Now.ToShortDateString + TxtFechaCompra.Text = Now.ToShortDateString + TxtFechaBaja.Text = "" TxtNoSerie.Text = TxtAFInvSerie.Text.Trim TxtValorCompra.Enabled = False @@ -3727,5 +3794,373 @@ Partial Class AF_AF ImprimirPDF("Empresas/Grales/Formatos/RepComprasInsumos.rdlc", DTCompras, params, "RepComprasInsumos", Formato) - End Sub + End Sub + + +#Region "Produccion" + + + + Private Sub CargaProduccion() + + Dim ObjAF As New ClsAF + + If ObjAF.GetProduccion(CveActivoFijo, UsuarioActual.CveEmpresa) Then + GvProduccion.DataSource = ObjAF.DtResultados + Else + GvProduccion.DataSource = Nothing + End If + + ObjAF.Dispose() + GvProduccion.DataBind() + + UpProduccion.Update() + + End Sub + + + Protected Sub LnkAgregarProduccion_Click(sender As Object, e As EventArgs) + + LblModaProduccionTitulo.Text = "Agregar Producción" + LnkModalAgregarProduccion.Text = "Agregar" + CveProduccion = -1 + + DdlModalCultivosCuadro.SelectedValueExist(-1) + TxtModalProduccionCantidad.Text = "" + TxtModalProduccionFecha.Text = "" + + RegistraScript("$('#DVModalProduccion').modal('show');") + + UpModalProduccion.Update() + End Sub + + Protected Sub LnkGvProduccionEdit_Click(sender As Object, e As EventArgs) + + Dim GvRow As GridViewRow = DirectCast(DirectCast(sender, LinkButton).NamingContainer, GridViewRow) + + CveProduccion = GvRow.DataKey("CveProduccion").ToEntero + Dim CveCultivoCuadroDetalle As Integer = GvRow.DataKey("CveCultivoCuadroDetalle").ToEntero + Dim Cantidad As Decimal = GvRow.DataKey("Cantidad").ToDecimal + Dim Fecha As Date = GvRow.DataKey("Fecha").ToDate + + DdlModalCultivosCuadro.SelectedValueExist(CveCultivoCuadroDetalle) + TxtModalProduccionCantidad.Text = Cantidad.ToString("###,###,###.00") + TxtModalProduccionFecha.Text = Fecha.ToString("dd/MM/yyyy") + + + LblModaProduccionTitulo.Text = "Actualizar Producción" + LnkModalAgregarProduccion.Text = "Actualizar" + + UpModalProduccion.Update() + + + RegistraScript("$('#DVModalProduccion').modal('show');") + End Sub + + Protected Sub LnkGvProduccionRemove_Click(sender As Object, e As EventArgs) + + Dim ErrorProceso As Boolean = False + Dim GvRow As GridViewRow = DirectCast(DirectCast(sender, LinkButton).NamingContainer, GridViewRow) + Dim CveProduccionEliminar As Integer = GvRow.DataKey("CveProduccion").ToEntero + + Dim ObjAF As New ClsAF + + If ObjAF.RemoveProduccion(CveProduccionEliminar, UsuarioActual.CveEmpresa) Then + ErrorProceso = False + Else + ErrorProceso = True + End If + + + ObjAF.Dispose() + + + If Not ErrorProceso Then + Alert("Producción Eliminada Correctamente.") + CargaProduccion() + End If + + End Sub + + + + Protected Sub LnkModalAgregarProduccion_Click(sender As Object, e As EventArgs) + Dim ErrorProceso As Boolean = False + Dim ObjAF As New ClsAF + + If CveProduccion > 0 Then + If ObjAF.UpdateProduccion(CveProduccion, CveActivoFijo, DdlModalCultivosCuadro.SelectedValue.ToEntero, TxtModalProduccionCantidad.Text.ToDecimal, TxtModalProduccionFecha.Text.ToDate, UsuarioActual.CveUsuario) Then + ErrorProceso = False + Else + ErrorProceso = True + End If + Else + If ObjAF.AddProduccion(CveActivoFijo, DdlModalCultivosCuadro.SelectedValue.ToEntero, TxtModalProduccionCantidad.Text.ToDecimal, TxtModalProduccionFecha.Text.ToDate, UsuarioActual.CveUsuario) Then + ErrorProceso = False + Else + ErrorProceso = True + End If + End If + + + + ObjAF.Dispose() + + If Not ErrorProceso Then + RegistraScript("$('#DVModalMantenimiento').modal('hide');") + Alert("Producción Agregada Correctamente.") + CargaProduccion() + End If + + End Sub + +#End Region + +#Region "MANTENIMIENTO" + + + + + Private Sub CargaMantenimento() + + Dim ObjAF As New ClsAF + + If ObjAF.GetMantenimientos(CveActivoFijo, UsuarioActual.CveEmpresa) Then + GvMantenimientos.DataSource = ObjAF.DtResultados + Else + GvMantenimientos.DataSource = Nothing + End If + + ObjAF.Dispose() + GvMantenimientos.DataBind() + + UpMantenimientos.Update() + + End Sub + + + Protected Sub LnkAgregarMantenimiento_Click(sender As Object, e As EventArgs) + + LblModaMantenimientoTitulo.Text = "Agregar Mantenimiento" + LnkModalAgregarMantenimiento.Text = "Agregar" + + CveMantenimiento = -1 + + TxtModalMantenimiento.Text = "" + TxtModalMantenimientoObservaciones.Text = "" + TxtModalMantenimientoFecha.Text = "" + TxtArchivoMantenimiento.Text = "[]" + + RegistraScript("$('#DVModalMantenimiento').modal('show');") + + UpModalMantenimiento.Update() + End Sub + + Protected Sub LnkGvMantenimientoEdit_Click(sender As Object, e As EventArgs) + + Dim GvRow As GridViewRow = DirectCast(DirectCast(sender, LinkButton).NamingContainer, GridViewRow) + 'CveMantenimiento, CveActivoFijo, Mantenimiento, Observaciones, Fecha, FechaIng, CveUsuario, Codigo, Descripcion, Usuario + + CveMantenimiento = GvRow.DataKey("CveMantenimiento").ToEntero + + Dim Mantenimiento As String = GvRow.DataKey("Mantenimiento") + Dim Observaciones As String = GvRow.DataKey("Observaciones") + Dim Fecha As Date = GvRow.DataKey("Fecha").ToDate + + TxtModalMantenimiento.Text = Mantenimiento + TxtModalMantenimientoObservaciones.Text = Observaciones + TxtModalMantenimientoFecha.Text = Fecha.ToString("dd/MM/yyyy") + TxtArchivoMantenimiento.Text = "[]" + + + LblModaMantenimientoTitulo.Text = "Actualizar Mantenimiento" + LnkModalAgregarMantenimiento.Text = "Actualizar" + + UpModalMantenimiento.Update() + + + RegistraScript("$('#DVModalMantenimiento').modal('show');") + End Sub + + Protected Sub LnkGvMantenimientoRemove_Click(sender As Object, e As EventArgs) + + Dim ErrorProceso As Boolean = False + Dim GvRow As GridViewRow = DirectCast(DirectCast(sender, LinkButton).NamingContainer, GridViewRow) + Dim CveMantenimientoEliminar As Integer = GvRow.DataKey("CveMantenimiento").ToEntero + + Dim ObjAF As New ClsAF + + If ObjAF.RemoveMantenimientos(CveMantenimientoEliminar, UsuarioActual.CveEmpresa) Then + ErrorProceso = False + Else + ErrorProceso = True + End If + + + ObjAF.Dispose() + + + If Not ErrorProceso Then + Alert("Mantenimiento Eliminado Correctamente.") + CargaMantenimento() + End If + + End Sub + + + + Protected Sub LnkModalAgregarMantenimiento_Click(sender As Object, e As EventArgs) + Dim ErrorProceso As Boolean = False + Dim ObjAF As New ClsAF + ObjAF.IniciaTransacSQL() + + + If CveMantenimiento > 0 Then + + Dim FileExtension As String = "" + Dim Filesgral As List(Of Archivo) = TxtArchivoMantenimiento.getfiles().Archivos + Dim Filename As String = "-1" + + If Filesgral.Count > 0 Then + + For Each fileItem As Archivo In Filesgral + FileExtension = IO.Path.GetExtension(String.Format("{0}Temp\{1}", AppDomain.CurrentDomain.BaseDirectory, fileItem.filename)).Replace(".", "") + Filename = fileItem.filename + Exit For + Next + + Dim Archivo As New System.IO.FileInfo(String.Format("{0}AF\Mantenimientos\{1}", UsuarioActual.Empresa.Ruta, $"{CveMantenimiento}.{FileExtension}")) + If Archivo.Exists() Then + Archivo.Delete() + End If + + + If Not Filename.FilesMove(String.Format("{0}", CveMantenimiento.ToString), String.Format("{0}AF\Mantenimientos", UsuarioActual.Empresa.Ruta), ConcatenarDirectorioBase:=False) Then + ErrorProceso = True + Alert("Error al mover Archivo", TipoMensaje.MsgError) + End If + + End If + + If Not ErrorProceso Then + If Not ObjAF.UpdateMantenimientos(CveMantenimiento, CveActivoFijo, TxtModalMantenimiento.Text, TxtModalMantenimientoObservaciones.Text, TxtModalMantenimientoFecha.Text.ToDate, UsuarioActual.CveUsuario, $"{CveMantenimiento}.{FileExtension}") Then + ErrorProceso = True + End If + End If + + + Else + + + Dim CveMantenimientoTemp As Integer = -1 + + + CveMantenimientoTemp = ObjAF.AddMantenimientos(CveActivoFijo, TxtModalMantenimiento.Text, TxtModalMantenimientoObservaciones.Text, TxtModalMantenimientoFecha.Text.ToDate, UsuarioActual.CveUsuario, "-1") + If CveMantenimientoTemp > 0 Then + ErrorProceso = False + Else + ErrorProceso = True + End If + + If Not ErrorProceso Then + + Dim FileExtension As String = "" + Dim Filesgral As List(Of Archivo) = TxtArchivoMantenimiento.getfiles().Archivos + Dim Filename As String = "" + + If Filesgral.Count > 0 Then + + For Each fileItem As Archivo In Filesgral + FileExtension = IO.Path.GetExtension(String.Format("{0}Temp\{1}", AppDomain.CurrentDomain.BaseDirectory, fileItem.filename)).Replace(".", "") + Filename = fileItem.filename + Exit For + Next + + Dim Archivo As New System.IO.FileInfo(String.Format("{0}AF\Mantenimientos\{1}", UsuarioActual.Empresa.Ruta, $"{CveMantenimientoTemp}.{FileExtension}")) + If Archivo.Exists() Then + Archivo.Delete() + End If + + + If Not Filename.FilesMove(String.Format("{0}", CveMantenimientoTemp.ToString), String.Format("{0}AF\Mantenimientos", UsuarioActual.Empresa.Ruta), ConcatenarDirectorioBase:=False) Then + ErrorProceso = True + Alert("Error al mover Archivo", TipoMensaje.MsgError) + End If + + If Not ErrorProceso Then + If Not ObjAF.UpdateMantenimientos(CveMantenimientoTemp, CveActivoFijo, TxtModalMantenimiento.Text, TxtModalMantenimientoObservaciones.Text, TxtModalMantenimientoFecha.Text.ToDate, UsuarioActual.CveUsuario, $"{CveMantenimientoTemp}.{FileExtension}") Then + ErrorProceso = True + End If + End If + + + End If + + + End If + + + End If + + + + + + + If Not ErrorProceso Then + ObjAF.Commit() + ObjAF.Dispose() + + RegistraScript("$('#DVModalMantenimiento').modal('hide');") + Alert("Mantenimiento Guardado Correctamente.") + CargaMantenimento() + Else + ObjAF.RollBack() + ObjAF.Dispose() + End If + + End Sub + + Protected Sub LnkDescargaArcgivo_Click(sender As Object, e As EventArgs) + Dim GvRow As GridViewRow = DirectCast(DirectCast(sender, LinkButton).NamingContainer, GridViewRow) + Dim Archivo As String = GvRow.DataKey("Archivo") + Dim InfArchivo As New FileInfo($"{UsuarioActual.Empresa.Ruta}\AF\Mantenimientos\{Archivo}") + + If InfArchivo.Exists Then + Response.Clear() + Response.AppendHeader("Content-Disposition", "attachment; filename=" + InfArchivo.Name) + Response.AppendHeader("Content-Length", InfArchivo.Length.ToString()) + Response.ContentType = "application/octet-stream" + Response.WriteFile(InfArchivo.FullName) + + Response.End() + End If + + + + End Sub + + Protected Sub GvMantenimientos_RowDataBound(sender As Object, e As GridViewRowEventArgs) + + If e.Row.RowType = DataControlRowType.DataRow Then + + Dim Archivo As String = e.Row.DataKey("Archivo") + Dim InfArchivo As New FileInfo($"{UsuarioActual.Empresa.Ruta}\AF\Mantenimientos\{Archivo}") + + If InfArchivo.Exists Then + e.Row.FCLinkButton("LnkDescargaArcgivo").Visible = True + ScriptManager.GetCurrent(Me).RegisterPostBackControl(e.Row.FCLinkButton("LnkDescargaArcgivo")) + End If + + End If + + End Sub + +#End Region + + + + + + End Class \ No newline at end of file diff --git a/App_Code/ClsAF.vb b/App_Code/ClsAF.vb index ad8c046c4..94a279be0 100644 --- a/App_Code/ClsAF.vb +++ b/App_Code/ClsAF.vb @@ -47,6 +47,7 @@ Public Class ClsAF Public Property CveCompra As Integer Public Property ValorCompra As Double Public Property FechaCompra As Date + Public Property FechaBaja As Date Public Property CuentaInicial As Integer Public Property CveTipoActivoFijo As Integer Public Property TipoActivoFijo As String @@ -230,6 +231,7 @@ Public Class ClsAF Me.CveUsuario = Data.Rows(0)("CveUsuario").ToString.ToEntero Me.Usuario = Data.Rows(0)("Usuario").ToString Me.CveEmpresa = Data.Rows(0)("CveEmpresa").ToString.ToEntero + Me.FechaBaja = Data.Rows(0)("FechaBaja").ToString.ToDate End If Retorno = True Catch ex As Exception @@ -344,6 +346,9 @@ Public Class ClsAF Me.CveGrupoAF = Data.Rows(0)("CveGrupo").ToString.ToEntero Me.CveAFPadre = Data.Rows(0)("CveAFPadre").ToString.ToEntero Me.CveDispositivo = Data.Rows(0)("CveDispositivo").ToString.ToEntero + Me.FechaBaja = Data.Rows(0)("FechaBaja").ToString.ToDate + + End If Retorno = True Catch ex As Exception @@ -397,7 +402,7 @@ Public Class ClsAF Public Function AddActivosFijos(Codigo As String, Descripcion As String, ValorCompra As Double, FechaCompra As Date, CveSubTipoActivoFijo As Integer, CvePersonalResponsable As Integer, NoSerie As String, Año As Integer, CveSubProyecto As Integer, Cuenta As Integer, CveEstadoActivoFijo As Integer, IdCtaContDepreciacion As Integer, PorDepreciacion As Double, Observaciones As String, CveCliente As Integer, CveMovimiento As Integer, CveUsuario As Integer, CveEmpresa As Integer, Optional CveMarca As Integer = -1, Optional CveModelo As Integer = -1, Optional CveGrupo As Integer = -1, - Optional CveAFPadre As Integer = -1, Optional CveDispositivo As Integer = -1) As Integer + Optional CveAFPadre As Integer = -1, Optional CveDispositivo As Integer = -1, Optional FechaBaja As Date = MinFecha) As Integer Dim Retorno As Integer = -1 DataAdapter("PA_AF_ActivosFijosAdd") @@ -427,6 +432,7 @@ Public Class ClsAF .Add("@CveGrupo", SqlDbType.Int).Value = CveGrupo .Add("@CveAFPadre", SqlDbType.Int).Value = CveAFPadre .Add("@CveDispositivo", SqlDbType.Int).Value = CveDispositivo + .Add("@FechaBaja", SqlDbType.Date).Value = FechaBaja .Add("@CveActivoFijo", SqlDbType.Int).Direction = ParameterDirection.Output .Add("@RETURN_VALUE", SqlDbType.Int).Direction = ParameterDirection.ReturnValue @@ -458,7 +464,7 @@ Public Class ClsAF CvePersonalResponsable As Integer, NoSerie As String, Año As Integer, CveSubProyecto As Integer, IdCtaContActivoFijo As Integer, CveEstadoActivoFijo As Integer, IdCtaContDepreciacion As Integer, PorDepreciacion As Double, Observaciones As String, CveCliente As Integer, CveUsuarioModifico As Integer, CveEmpresa As Integer, Optional CveMarca As Integer = -1, Optional CveModelo As Integer = -1, Optional CveGrupo As Integer = -1, - Optional CveAFPadre As Integer = -1, Optional CveDispositivo As Integer = -1) As Boolean + Optional CveAFPadre As Integer = -1, Optional CveDispositivo As Integer = -1, Optional FechaBaja As Date = MinFecha) As Boolean Dim Retorno As Boolean = False DataAdapter("PA_AF_ActivosFijosUpdate") @@ -490,6 +496,7 @@ Public Class ClsAF .Add("@CveGrupo", SqlDbType.Int).Value = CveGrupo .Add("@CveAFPadre", SqlDbType.Int).Value = CveAFPadre .Add("@CveDispositivo", SqlDbType.Int).Value = CveDispositivo + .Add("@FechaBaja", SqlDbType.Date).Value = FechaBaja End With Try @@ -4512,6 +4519,230 @@ Public Class ClsAF #End Region +#End Region + +#Region " P R O D U C C C I Ó N " + + Public Function AddProduccion(CveActivoFijo As Integer, CveCultivoCuadroDetalle As Integer, Cantidad As Decimal, Fecha As Date, CveUsuario As Integer) As Boolean + + Dim Retorno As Boolean = False + + DataAdapter("PA_AF_ProduccionAdd") + + With SqlAdapter.SelectCommand.Parameters + + .Add("@CveActivoFijo", SqlDbType.Int).Value = CveActivoFijo + .Add("@CveCultivoCuadroDetalle", SqlDbType.Int).Value = CveCultivoCuadroDetalle + .Add("@Cantidad", SqlDbType.Money).Value = Cantidad + .Add("@Fecha", SqlDbType.Date).Value = Fecha + .Add("@CveUsuario", SqlDbType.Int).Value = CveUsuario + + End With + + Try + SqlAdapter.Fill(Data) + + Retorno = True + Catch ex As Exception + OnError("Ocurrió un error al agregar la producción", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo) + End Try + + Return Retorno + + End Function + + Public Function UpdateProduccion(CveProduccion As Integer, CveActivoFijo As Integer, CveCultivoCuadroDetalle As Integer, Cantidad As Decimal, Fecha As Date, CveUsuario As Integer) As Boolean + + Dim Retorno As Boolean = False + + DataAdapter("PA_AF_ProduccionUpdate") + + With SqlAdapter.SelectCommand.Parameters + + .Add("@CveProduccion", SqlDbType.Int).Value = CveProduccion + .Add("@CveActivoFijo", SqlDbType.Int).Value = CveActivoFijo + .Add("@CveCultivoCuadroDetalle", SqlDbType.Int).Value = CveCultivoCuadroDetalle + .Add("@Cantidad", SqlDbType.Money).Value = Cantidad + .Add("@Fecha", SqlDbType.Date).Value = Fecha + .Add("@CveUsuario", SqlDbType.Int).Value = CveUsuario + + End With + + Try + SqlAdapter.Fill(Data) + + Retorno = True + Catch ex As Exception + OnError("Ocurrió un error al actualizar la producción", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo) + End Try + + Return Retorno + + End Function + + + Public Function GetProduccion(CveActivoFijo As Integer, CveEmpresa As Integer) As Boolean + + Dim Retorno As Boolean = False + + DataAdapter("PA_AF_ProduccionGet") + + With SqlAdapter.SelectCommand.Parameters + .Add("@CveActivoFijo", SqlDbType.Int).Value = CveActivoFijo + .Add("@CveEmpresa", SqlDbType.VarChar).Value = CveEmpresa + End With + + Try + SqlAdapter.Fill(Data) + + Retorno = True + Catch ex As Exception + OnError("Ocurrió un error al consultar la producción", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo) + End Try + + Return Retorno + + End Function + + Public Function RemoveProduccion(CveProduccion As Integer, CveEmpresa As Integer) As Boolean + + Dim Retorno As Boolean = False + + DataAdapter("PA_AF_ProduccionRemove") + + With SqlAdapter.SelectCommand.Parameters + .Add("@CveProduccion", SqlDbType.Int).Value = CveProduccion + .Add("@CveEmpresa", SqlDbType.VarChar).Value = CveEmpresa + End With + + Try + SqlAdapter.Fill(Data) + + Retorno = True + Catch ex As Exception + OnError("Ocurrió un error al eliminar la producción", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo) + End Try + + Return Retorno + + End Function + +#End Region + +#Region " M A N T E N I M I E N T O S " + + + + + + Public Function AddMantenimientos(CveActivoFijo As Integer, Mantenimiento As String, Observaciones As String, Fecha As Date, CveUsuario As Integer, Archivo As String) As Integer + + Dim Retorno As Integer = -1 + + DataAdapter("PA_AF_MantenimientosAdd") + + With SqlAdapter.SelectCommand.Parameters + + .Add("@CveActivoFijo", SqlDbType.Int).Value = CveActivoFijo + .Add("@Mantenimiento", SqlDbType.VarChar).Value = Mantenimiento + .Add("@Observaciones", SqlDbType.VarChar).Value = Observaciones + .Add("@Fecha", SqlDbType.Date).Value = Fecha + .Add("@CveUsuario", SqlDbType.Int).Value = CveUsuario + .Add("@Archivo", SqlDbType.VarChar).Value = Archivo + .Add("@CveMantenimiento", SqlDbType.Int).Direction = ParameterDirection.Output + End With + + Try + SqlAdapter.Fill(Data) + Retorno = SqlAdapter.SelectCommand.Parameters("@CveMantenimiento").Value.ToString.ToEntero + + Catch ex As Exception + OnError("Ocurrió un error al agregar el mantenimiento.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo) + End Try + + Return Retorno + + End Function + + Public Function UpdateMantenimientos(CveMantenimiento As Integer, CveActivoFijo As Integer, Mantenimiento As String, Observaciones As String, Fecha As Date, CveUsuario As Integer, Archivo As String) As Boolean + + Dim Retorno As Boolean = False + + DataAdapter("PA_AF_MantenimientosUpdate") + + With SqlAdapter.SelectCommand.Parameters + + .Add("@CveMantenimiento", SqlDbType.Int).Value = CveMantenimiento + .Add("@CveActivoFijo", SqlDbType.Int).Value = CveActivoFijo + .Add("@Mantenimiento", SqlDbType.VarChar).Value = Mantenimiento + .Add("@Observaciones", SqlDbType.VarChar).Value = Observaciones + .Add("@Fecha", SqlDbType.Date).Value = Fecha + .Add("@CveUsuario", SqlDbType.Int).Value = CveUsuario + .Add("@Archivo", SqlDbType.VarChar).Value = Archivo + + End With + + Try + SqlAdapter.Fill(Data) + + Retorno = True + Catch ex As Exception + OnError("Ocurrió un error al actualizar el mantenimiento.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo) + End Try + + Return Retorno + + End Function + + + Public Function GetMantenimientos(CveActivoFijo As Integer, CveEmpresa As Integer) As Boolean + + Dim Retorno As Boolean = False + + DataAdapter("PA_AF_MantenimientosGet") + + With SqlAdapter.SelectCommand.Parameters + .Add("@CveActivoFijo", SqlDbType.Int).Value = CveActivoFijo + .Add("@CveEmpresa", SqlDbType.VarChar).Value = CveEmpresa + End With + + Try + SqlAdapter.Fill(Data) + + Retorno = True + Catch ex As Exception + OnError("Ocurrió un error al consultar los mantenimientos.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo) + End Try + + Return Retorno + + End Function + + Public Function RemoveMantenimientos(CveMantenimiento As Integer, CveEmpresa As Integer) As Boolean + + Dim Retorno As Boolean = False + + DataAdapter("PA_AF_MantenimientosRemove") + + With SqlAdapter.SelectCommand.Parameters + .Add("@CveMantenimiento", SqlDbType.Int).Value = CveMantenimiento + .Add("@CveEmpresa", SqlDbType.VarChar).Value = CveEmpresa + End With + + Try + SqlAdapter.Fill(Data) + + Retorno = True + Catch ex As Exception + OnError("Ocurrió un error al eliminar el mantenimiento.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo) + End Try + + Return Retorno + + End Function + + + #End Region diff --git a/App_Code/ClsInventarios.vb b/App_Code/ClsInventarios.vb index 77de3378d..2d7da6a41 100644 --- a/App_Code/ClsInventarios.vb +++ b/App_Code/ClsInventarios.vb @@ -1287,7 +1287,8 @@ Public Class ClsInventarios Optional CveSeccionAlmacen As Integer = -1, Optional Serie As String = "", Optional Lote As String = "", Optional FechaCaducidad As Date = MinFecha, Optional Observaciones As String = "", Optional CveMovimientoDetalleEntrada As Integer = -1, Optional PUTC As Decimal = -1, Optional CostoIndirecto As Decimal = 0, Optional CveCompraDetalle As Integer = -1, Optional CveOrdenCompraDetalle As Integer = -1, Optional CveVentaDetalle As Integer = -1, - Optional CveContratoDetalle As Integer = -1, Optional CveUsuarioModifico As Integer = -1, Optional EsInterno As Integer = -1, Optional CveVentaDetalleRemision As Integer = -1) As Boolean + Optional CveContratoDetalle As Integer = -1, Optional CveUsuarioModifico As Integer = -1, Optional EsInterno As Integer = -1, Optional CveVentaDetalleRemision As Integer = -1, + Optional CveCultivoCuadroDetalle As Integer = -1) As Boolean Dim Retorno As Boolean = False DataAdapter("PA_Inv_MovimientosDetalleAdd") @@ -1314,6 +1315,7 @@ Public Class ClsInventarios .Add("@CveUsuarioModifico", SqlDbType.Int).Value = CveUsuarioModifico .Add("@EsInterno", SqlDbType.Int).Value = EsInterno .Add("@CveVentaDetalleRemision", SqlDbType.Int).Value = CveVentaDetalleRemision + .Add("@CveCultivoCuadroDetalle", SqlDbType.Int).Value = CveCultivoCuadroDetalle .Add("@CveMovimientoDetalle", SqlDbType.Int).Direction = ParameterDirection.Output End With @@ -1349,7 +1351,7 @@ Public Class ClsInventarios Return Retorno End Function Public Function UpdateMovimientoDetalle(Cantidad As Double, CveUM As Integer, CvePS As Integer, PU As Double, CveAF As Integer, CveMovimientoDetalle As Integer, Optional CveSeccionAlmacen As Integer = -1, Optional Serie As String = "", - Optional Observaciones As String = "-1", Optional PUTC As Double = -1, Optional CveUsuarioModifico As Integer = -1) As Boolean + Optional Observaciones As String = "-1", Optional PUTC As Double = -1, Optional CveUsuarioModifico As Integer = -1, Optional CveCultivoCuadroDetalle As Integer = -1) As Boolean Dim Retorno As Boolean = False DataAdapter("PA_Inv_MovimientosDetalleUpdate") @@ -1366,6 +1368,7 @@ Public Class ClsInventarios .Add("@Serie", SqlDbType.VarChar).Value = Serie .Add("@Observaciones", SqlDbType.VarChar).Value = Observaciones .Add("@CveUsuarioModifico", SqlDbType.Int).Value = CveUsuarioModifico + .Add("@CveCultivoCuadroDetalle", SqlDbType.Int).Value = CveCultivoCuadroDetalle End With Try diff --git a/Inventarios/EntradasSalidas.aspx b/Inventarios/EntradasSalidas.aspx index 43b2d9b89..cefd8ec94 100644 --- a/Inventarios/EntradasSalidas.aspx +++ b/Inventarios/EntradasSalidas.aspx @@ -1701,6 +1701,25 @@ + + + + +
+ + + + + + +
+ + + + +
diff --git a/Inventarios/EntradasSalidas.aspx.vb b/Inventarios/EntradasSalidas.aspx.vb index 9d29b4915..8fd65caff 100644 --- a/Inventarios/EntradasSalidas.aspx.vb +++ b/Inventarios/EntradasSalidas.aspx.vb @@ -511,6 +511,7 @@ Partial Class Inventarios_EntradasSalidas dt.Columns.Add("Observaciones") dt.Columns.Add("CountMovimientoEntradaDetalle") dt.Columns.Add("TotalExtranjero", Type.GetType("System.Double")) + dt.Columns.Add("CveCultivoCuadroDetalle", Type.GetType("System.Int32")) CargaGVM(dt) @@ -569,6 +570,10 @@ Partial Class Inventarios_EntradasSalidas End If + If IfNull(Request("CI"), -1).ToString.ToEntero > 0 And UsuarioActual.Empresa.Funcionalidad(590) = "1" Then + DdlAlmacen.DataSource = GlobalDTAlmacenUsuarios(UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, -1).FiltraParametros("CveTipoAlmacen NOT IN (9,11)") + End If + DdlAlmacenInventarioFisico.DataSource = GlobalDTAlmacenUsuarios(UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, -1).FiltraParametros("CveTipoAlmacen NOT IN (9,11)") 'GlobalDTAlmacen(UsuarioActual.CveEmpresa) DdlAlmacenCambioVigencias.DataSource = GlobalDTAlmacenUsuarios(UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, -1).FiltraParametros("CveTipoAlmacen NOT IN (9,11)") @@ -1328,7 +1333,7 @@ Partial Class Inventarios_EntradasSalidas AddNew(DdlProducto2.SelectedValue.ToEntero, DdlProducto2.SelectedText, DdlUnidad.SelectedValue.ToEntero, DdlUnidad.SelectedItem.Text, txtCantidad.Text.ToDecimal, txtPrecio.Text.ToDecimal, TxtnSerie.Text.Replace(" ", String.Empty), LblCodigo.Text, HdnCodigoAF.Value, HdnCveActivoFijo.Value, TxtObservacionesdetalle.Text, - TxtnLote.Text.Trim, TxtnFechaCaducidad.Text.ToDate, DdlSeccionAlmacen.SelectedValue.ToEntero, DdlSeccionAlmacen.SelectedItem.Text) + TxtnLote.Text.Trim, TxtnFechaCaducidad.Text.ToDate, DdlSeccionAlmacen.SelectedValue.ToEntero, DdlSeccionAlmacen.SelectedItem.Text, CveCultivoCuadroDetalle:=DdlModalCultivosCuadro.SelectedValue.Toentero) LimpiarAgregar() txtCantidad.Text = "" @@ -1339,6 +1344,8 @@ Partial Class Inventarios_EntradasSalidas TxtnFechaCaducidad.Text = "" HdnCodigoAF.Value = "-1" HdnCveActivoFijo.Value = "-1" + DdlModalCultivosCuadro.SelectedValueExist(-1) + RegistraScript("CodigoAF = "";") If Not UsuarioActual.Empresa.Funcionalidad(105).ToString = "1" Then @@ -1352,7 +1359,8 @@ Partial Class Inventarios_EntradasSalidas End Sub - Protected Sub AddNew(CvePS As Integer, PS As String, CveUM As Integer, UM As String, Cantidad As Decimal, PU As Decimal, Serie As String, CodigoAF As String, Codigo As String, CveAF As String, Observaciones As String, Lote As String, FechaCaducidad As Date, CveSeccionAlmacen As Integer, SeccionAlmacen As String, Optional CargarGV As Boolean = True) + Protected Sub AddNew(CvePS As Integer, PS As String, CveUM As Integer, UM As String, Cantidad As Decimal, PU As Decimal, Serie As String, CodigoAF As String, Codigo As String, CveAF As String, Observaciones As String, Lote As String, FechaCaducidad As Date, CveSeccionAlmacen As Integer, SeccionAlmacen As String, Optional CargarGV As Boolean = True, Optional CveCultivoCuadroDetalle As Integer = -1) + If DdlAlmacen.SelectedValue.ToEntero <= 0 Then Alert("Seleccione un almacen", TipoMensaje.MsgAdvertencia) : RegistraScript("playsonidito('142608__autistic-lucario__error.wav')") : DdlProducto2.SelectedText = "" : Exit Sub Dim Valido As Boolean = True @@ -1445,6 +1453,8 @@ Partial Class Inventarios_EntradasSalidas registro.Item("FechaCaducidad") = FechaCaducidad registro.Item("Observaciones") = Observaciones registro.Item("AplicaCaducidad") = RowPS("AplicaCaducidad").ToString + registro.Item("CveCultivoCuadroDetalle") = CveCultivoCuadroDetalle + DtMovimientos.Rows.Add(registro) If CargarGV Then @@ -1536,13 +1546,13 @@ Partial Class Inventarios_EntradasSalidas If GlobalDTInvConceptos.FiltraParametros(String.Format("CveConcepto = {0}", DdlConcepto.SelectedValue.ToEntero)).Rows.Count > 0 AndAlso GlobalDTInvConceptos.FiltraParametros(String.Format("CveConcepto = {0}", DdlConcepto.SelectedValue.ToEntero)).Rows(0)("Origen").ToString.ToEntero < 0 Then If ObjInventario.GetExistenciasPS(Dr("CvePS").ToString.ToEntero, Dr("CveUM").ToString.ToEntero, UsuarioActual.CveEmpresa, CveAlmacen:=DdlAlmacen.SelectedValue.ToEntero, FechaMovto:=String.Format("{0} {1}", TxtFecha.Text.ToDate.ToString("yyyy/MM/dd"), TxtHoraInicio.PostedTime), Serie:=If(Dr("Serie").ToString = "", "-1", Dr("Serie").ToString), Lote:=If(Dr("Lote").ToString = "", "-1", Dr("Lote").ToString)) >= Dr("Cantidad").ToString.ToDouble Then - If Not ObjInventario.AddMovimientoDetalle(CveMovimiento, Dr("Cantidad").ToString.ToDouble, Dr("CveUM").ToString.ToEntero, Dr("CvePS").ToString.ToEntero, ImporteConcepto, CveAF:=Dr("CveAF").ToString.ToEntero, CveSeccionAlmacen:=Dr("CveSeccionAlmacen").ToString.ToEntero, Serie:=Dr("Serie").ToString, Observaciones:=Dr("Observaciones").ToString, Lote:=Dr("Lote").ToString, FechaCaducidad:=Dr("FechaCaducidad").ToString.ToDate, CveUsuarioModifico:=UsuarioActual.CveUsuario) Then + If Not ObjInventario.AddMovimientoDetalle(CveMovimiento, Dr("Cantidad").ToString.ToDouble, Dr("CveUM").ToString.ToEntero, Dr("CvePS").ToString.ToEntero, ImporteConcepto, CveAF:=Dr("CveAF").ToString.ToEntero, CveSeccionAlmacen:=Dr("CveSeccionAlmacen").ToString.ToEntero, Serie:=Dr("Serie").ToString, Observaciones:=Dr("Observaciones").ToString, Lote:=Dr("Lote").ToString, FechaCaducidad:=Dr("FechaCaducidad").ToString.ToDate, CveUsuarioModifico:=UsuarioActual.CveUsuario, CveCultivoCuadroDetalle:=Dr("CveCultivoCuadroDetalle").ToString.ToEntero) Then Mensaje = "Error al Agregar los nuevos movimientos" ErrorMovInv = True : Exit For End If Else If UsuarioActual.TienePermisoProceso(114) Then - If Not ObjInventario.AddMovimientoDetalle(CveMovimiento, Dr("Cantidad").ToString.ToDouble, Dr("CveUM").ToString.ToEntero, Dr("CvePS").ToString.ToEntero, ImporteConcepto, CveAF:=Dr("CveAF").ToString.ToEntero, CveSeccionAlmacen:=Dr("CveSeccionAlmacen").ToString.ToEntero, Serie:=Dr("Serie").ToString, Observaciones:=Dr("Observaciones").ToString, Lote:=Dr("Lote").ToString, FechaCaducidad:=Dr("FechaCaducidad").ToString.ToDate, CveUsuarioModifico:=UsuarioActual.CveUsuario) Then + If Not ObjInventario.AddMovimientoDetalle(CveMovimiento, Dr("Cantidad").ToString.ToDouble, Dr("CveUM").ToString.ToEntero, Dr("CvePS").ToString.ToEntero, ImporteConcepto, CveAF:=Dr("CveAF").ToString.ToEntero, CveSeccionAlmacen:=Dr("CveSeccionAlmacen").ToString.ToEntero, Serie:=Dr("Serie").ToString, Observaciones:=Dr("Observaciones").ToString, Lote:=Dr("Lote").ToString, FechaCaducidad:=Dr("FechaCaducidad").ToString.ToDate, CveUsuarioModifico:=UsuarioActual.CveUsuario, CveCultivoCuadroDetalle:=Dr("CveCultivoCuadroDetalle").ToString.ToEntero) Then Mensaje = "Error al Agregar los nuevos movimientos" ErrorMovInv = True : Exit For End If @@ -1552,7 +1562,7 @@ Partial Class Inventarios_EntradasSalidas End If End If Else - If Not ObjInventario.AddMovimientoDetalle(CveMovimiento, Dr("Cantidad").ToString.ToDouble, Dr("CveUM").ToString.ToEntero, Dr("CvePS").ToString.ToEntero, ImporteConcepto, CveAF:=Dr("CveAF").ToString.ToEntero, CveSeccionAlmacen:=Dr("CveSeccionAlmacen").ToString.ToEntero, Serie:=Dr("Serie").ToString, Observaciones:=Dr("Observaciones").ToString, Lote:=Dr("Lote").ToString, FechaCaducidad:=Dr("FechaCaducidad").ToString.ToDate, CveUsuarioModifico:=UsuarioActual.CveUsuario) Then + If Not ObjInventario.AddMovimientoDetalle(CveMovimiento, Dr("Cantidad").ToString.ToDouble, Dr("CveUM").ToString.ToEntero, Dr("CvePS").ToString.ToEntero, ImporteConcepto, CveAF:=Dr("CveAF").ToString.ToEntero, CveSeccionAlmacen:=Dr("CveSeccionAlmacen").ToString.ToEntero, Serie:=Dr("Serie").ToString, Observaciones:=Dr("Observaciones").ToString, Lote:=Dr("Lote").ToString, FechaCaducidad:=Dr("FechaCaducidad").ToString.ToDate, CveUsuarioModifico:=UsuarioActual.CveUsuario, CveCultivoCuadroDetalle:=Dr("CveCultivoCuadroDetalle").ToString.ToEntero) Then Mensaje = "Error al Agregar los nuevos movimientos" ErrorMovInv = True : Exit For End If @@ -1669,7 +1679,7 @@ Partial Class Inventarios_EntradasSalidas Dim FechaCaducidadVal As Date = If(Dr("AplicaCaducidad").ToString = "True", Dr("FechaCaducidad").ToString.ToDate, MinFecha) If ObjInventario.GetExistenciasPS(Dr("CvePS").ToString.ToEntero, Dr("CveUM").ToString.ToEntero, UsuarioActual.CveEmpresa, DdlAlmacen.SelectedValue.ToEntero, FechaMovto:=String.Format("{0} {1}", TxtFecha.Text.ToDate.ToString("yyyy/MM/dd"), TxtHoraInicio.PostedTime), Serie:=If(Dr("Serie").ToString = "", "-1", Dr("Serie").ToString), Lote:=If(Dr("Lote").ToString = "", "-1", Dr("Lote").ToString), FechaCaducidad:=FechaCaducidadVal) >= Dr("Cantidad").ToString.ToDouble Then - If Not ObjInventario.AddMovimientoDetalle(CveMovimiento, Dr("Cantidad").ToString.ToDouble, Dr("CveUM").ToString.ToEntero, Dr("CvePS").ToString.ToEntero, Dr("PU").ToString.ToDecimal, Dr("CveAF").ToString.ToEntero, CveSeccionAlmacen:=Dr("CveSeccionAlmacen").ToString.ToEntero, Serie:=Dr("Serie").ToString, Observaciones:=Dr("Observaciones").ToString, Lote:=Dr("Lote").ToString, FechaCaducidad:=FechaCaducidadVal, CveUsuarioModifico:=UsuarioActual.CveUsuario) Then + If Not ObjInventario.AddMovimientoDetalle(CveMovimiento, Dr("Cantidad").ToString.ToDouble, Dr("CveUM").ToString.ToEntero, Dr("CvePS").ToString.ToEntero, Dr("PU").ToString.ToDecimal, Dr("CveAF").ToString.ToEntero, CveSeccionAlmacen:=Dr("CveSeccionAlmacen").ToString.ToEntero, Serie:=Dr("Serie").ToString, Observaciones:=Dr("Observaciones").ToString, Lote:=Dr("Lote").ToString, FechaCaducidad:=FechaCaducidadVal, CveUsuarioModifico:=UsuarioActual.CveUsuario, CveCultivoCuadroDetalle:=Dr("CveCultivoCuadroDetalle").ToString.ToEntero) Then Mensaje = "Error al guardar los movimientos" ErrorMovInv = True Exit For @@ -1687,7 +1697,7 @@ Partial Class Inventarios_EntradasSalidas Else If UsuarioActual.TienePermisoProceso(114) Then - If Not ObjInventario.AddMovimientoDetalle(CveMovimiento, Dr("Cantidad").ToString.ToDouble, Dr("CveUM").ToString.ToEntero, Dr("CvePS").ToString.ToEntero, Dr("PU").ToString.ToDecimal, CveAF:=Dr("CveAF").ToString.ToEntero, CveSeccionAlmacen:=Dr("CveSeccionAlmacen").ToString.ToEntero, Serie:=Dr("Serie").ToString, Observaciones:=Dr("Observaciones").ToString, Lote:=Dr("Lote").ToString, FechaCaducidad:=Dr("FechaCaducidad").ToString.ToDate, CveUsuarioModifico:=UsuarioActual.CveUsuario) Then + If Not ObjInventario.AddMovimientoDetalle(CveMovimiento, Dr("Cantidad").ToString.ToDouble, Dr("CveUM").ToString.ToEntero, Dr("CvePS").ToString.ToEntero, Dr("PU").ToString.ToDecimal, CveAF:=Dr("CveAF").ToString.ToEntero, CveSeccionAlmacen:=Dr("CveSeccionAlmacen").ToString.ToEntero, Serie:=Dr("Serie").ToString, Observaciones:=Dr("Observaciones").ToString, Lote:=Dr("Lote").ToString, FechaCaducidad:=Dr("FechaCaducidad").ToString.ToDate, CveUsuarioModifico:=UsuarioActual.CveUsuario, CveCultivoCuadroDetalle:=Dr("CveCultivoCuadroDetalle").ToString.ToEntero) Then Mensaje = "Error al guardar los movimientos" ErrorMovInv = True Exit For @@ -1721,7 +1731,7 @@ Partial Class Inventarios_EntradasSalidas ImporteConcepto = Dr("PU").ToString.ToDecimal End If - If Not ObjInventario.AddMovimientoDetalle(CveMovimiento, Dr("Cantidad").ToString.ToDouble, Dr("CveUM").ToString.ToEntero, Dr("CvePS").ToString.ToEntero, ImporteConcepto, CveAF:=Dr("CveAF").ToString.ToEntero, CveSeccionAlmacen:=Dr("CveSeccionAlmacen").ToString.ToEntero, Serie:=Dr("Serie").ToString, Observaciones:=Dr("Observaciones").ToString, Lote:=Dr("Lote").ToString, FechaCaducidad:=Dr("FechaCaducidad").ToString.ToDate, CveUsuarioModifico:=UsuarioActual.CveUsuario) Then + If Not ObjInventario.AddMovimientoDetalle(CveMovimiento, Dr("Cantidad").ToString.ToDouble, Dr("CveUM").ToString.ToEntero, Dr("CvePS").ToString.ToEntero, ImporteConcepto, CveAF:=Dr("CveAF").ToString.ToEntero, CveSeccionAlmacen:=Dr("CveSeccionAlmacen").ToString.ToEntero, Serie:=Dr("Serie").ToString, Observaciones:=Dr("Observaciones").ToString, Lote:=Dr("Lote").ToString, FechaCaducidad:=Dr("FechaCaducidad").ToString.ToDate, CveUsuarioModifico:=UsuarioActual.CveUsuario, CveCultivoCuadroDetalle:=Dr("CveCultivoCuadroDetalle").ToString.ToEntero) Then Mensaje = "Error al guardar los movimientos" ErrorMovInv = True Exit For @@ -1956,7 +1966,7 @@ Partial Class Inventarios_EntradasSalidas If Not ErrorAC And Not ErrorMovInv Then Dim Msg As New StringBuilder - Msg.AppendFormat("
El Movimiento se registro con el Folio: {0}", ObjInventario.Folio, ObjInventario.CveMovimiento) + Msg.AppendFormat("
El Movimiento se registro con el Folio: {0}", ObjInventario.Folio, CveMovimiento) Msg.AppendFormat("

Imprimir Movimiento ", Encripta(String.Format("OP=Alm&CveMovimiento={0}", CveMovimiento))) If RetornoVirtual IsNot Nothing Then @@ -3326,6 +3336,24 @@ Partial Class Inventarios_EntradasSalidas DdlAlmacen.SelectedValueExist(UsuarioActual.CveAlmacen) End If + + If UsuarioActual.Empresa.Funcionalidad(590) = "1" Then + TrSubProyectoActivoFijo.Visible = True + CargarCentrosDeCosto(Nothing, DdlSubProyecto, Nothing, LblSubProyecto, "Seleccione Uno") + + DVCultivosCuadro.Visible = True + CargaCultivos() + + End If + + End Sub + + + Private Sub CargaCultivos() + DdlModalCultivosCuadro.Items.Clear() + DdlModalCultivosCuadro.DataSource = GlobalDTCultivosCuadro(UsuarioActual.CveEmpresa).FiltraParametros($"CveSubProyecto = {DdlSubProyecto.SelectedValue}") + DdlModalCultivosCuadro.DataBind() + DdlModalCultivosCuadro.Items.Insert(0, New ListItem("Seleccione uno", "-1")) End Sub #End Region @@ -5029,6 +5057,18 @@ Partial Class Inventarios_EntradasSalidas '#End Region Protected Sub LkAgregar_Click() Handles LnkAgregarProducto.Click + + If EsConsumoInterno And UsuarioActual.Empresa.Funcionalidad(590) = "1" Then + + If DdlSubProyecto.SelectedValue.ToEntero <= 0 Then + Alert("Debe seleccionar un Centro de Constos.", TipoMensaje.MsgAdvertencia) + Exit Sub + Else + CargaCultivos() + End If + + End If + limpiarModalDetalle() UpAgregar.Update() RegistraScript("$('#ModalAgregar').modal()") @@ -5039,7 +5079,7 @@ Partial Class Inventarios_EntradasSalidas Dim ObjInventario As New ClsInventarios If Not ObjInventario.UpdateMovimientoDetalle(txtCantidad.Text.ToDouble, DdlUnidad.SelectedValue.ToEntero, DdlProducto2.SelectedValue.ToEntero, txtPrecio.Text.ToDouble, CveAFEdit, CveMovimientoDetalleEdit, DdlSeccionAlmacen.SelectedValue.ToEntero, TxtnSerie.Text, TxtObservacionesdetalle.Text, - CveUsuarioModifico:=UsuarioActual.CveUsuario) Then + CveUsuarioModifico:=UsuarioActual.CveUsuario, CveCultivoCuadroDetalle:=DdlModalCultivosCuadro.SelectedValue.ToEntero) Then Alert("Error al Actualizar los movimientos") Else Alert("Movimiento actualizado correctamente") @@ -5067,6 +5107,7 @@ Partial Class Inventarios_EntradasSalidas TxtObservacionesdetalle.Text = "" DdlSeccionAlmacen.ClearSelection() LkAgregarDetalle.Text = "Agregar" + DdlModalCultivosCuadro.SelectedValueExist(-1) If DdlMonedaTC.SelectedValue.ToEntero = 2 Then VisualizaPUExtranjero(UsuarioActual.TienePermisoProceso(201)) Else diff --git a/Inventarios/ResguardoMaterial.aspx.vb b/Inventarios/ResguardoMaterial.aspx.vb index f72af89ae..1715fcd3a 100644 --- a/Inventarios/ResguardoMaterial.aspx.vb +++ b/Inventarios/ResguardoMaterial.aspx.vb @@ -661,7 +661,9 @@ Partial Class Inventarios_ResguardoMaterial End If - CargaResguardos() + + + If UsuarioActual.CveEmpresa = 140 Then @@ -686,6 +688,9 @@ Partial Class Inventarios_ResguardoMaterial End If + CargaResguardos() + + UpGridLiberacion.Update() UpGenerales.Update() From 167a1c441d8fc41669a9159b88a9984246b82fdd Mon Sep 17 00:00:00 2001 From: rakcsle Date: Mon, 28 Mar 2022 21:27:17 -0700 Subject: [PATCH 2/9] AF apicola, terminal cuentas --- AF/AF.aspx | 135 +- AF/AF.aspx.vb | 132 ++ App_Code/ClsAF.vb | 115 +- App_Code/ClsBancos.vb | 8 +- Bancos/CuentasBancariasDetalle.aspx | 5 + Bancos/CuentasBancariasDetalle.aspx.vb | 11 +- Empresas/48/Formatos/CHQ-28.rdlc | 47 +- Empresas/48/Formatos/CHQ-29.rdlc | 47 +- Empresas/48/Formatos/CotizacionOC.rdlc | 137 +- Empresas/48/Formatos/Factura.rdlc | 17 +- Empresas/48/Formatos/LibroDiario.rdlc | 80 +- Empresas/48/Formatos/LibroMayor.rdlc | 80 +- Empresas/48/Formatos/OC.rdlc | 55 +- Empresas/48/Formatos/ReciboDePago.rdlc | 1860 ++++++++++++++++- .../48/Formatos/RepPresupuestosEgresos.rdlc | 80 +- Ventas/Clientes.aspx.vb | 19 +- vwd.webinfo | 2 + 17 files changed, 2468 insertions(+), 362 deletions(-) diff --git a/AF/AF.aspx b/AF/AF.aspx index 68957ccb4..7660f2441 100644 --- a/AF/AF.aspx +++ b/AF/AF.aspx @@ -2144,11 +2144,7 @@
- <%-- - - - --%> - +
@@ -2186,12 +2182,76 @@ - - + + + + + + + + + + +
+
+
+
+
+ + Plagas Enfermedades + +
+
+
+ Agregar +
+
+ +
+
+
+
+
+ + + + + + + + + + + + + + + + + + +
+
+
+
+ + +
+ + + + + + + + + + @@ -3422,6 +3482,67 @@ + diff --git a/AF/AF.aspx.vb b/AF/AF.aspx.vb index 4695bad3b..66b751121 100644 --- a/AF/AF.aspx.vb +++ b/AF/AF.aspx.vb @@ -270,6 +270,19 @@ Partial Class AF_AF End Set End Property + + Private Property CvePlagaEnfermedad As Integer + Get + If ViewState("CvePlagaEnfermedad") Is Nothing Then + ViewState("CvePlagaEnfermedad") = -1 + End If + Return ViewState("CvePlagaEnfermedad").ToString.ToEntero + End Get + Set(value As Integer) + ViewState("CvePlagaEnfermedad") = value + End Set + End Property + #End Region Protected Sub Page_Load(sender As Object, e As System.EventArgs) Handles Me.Load @@ -288,6 +301,7 @@ Partial Class AF_AF CargaActividades() CargaProduccion() CargaMantenimento() + CargaPlagaEnfermedad() 'Configuración de Modalidad Update BtnGuardar.Text = "Guardar Cambios" @@ -4159,6 +4173,124 @@ Partial Class AF_AF #End Region +#Region "PLAGA ENFERMEDAD" + + + + Private Sub CargaPlagaEnfermedad() + + Dim ObjAF As New ClsAF + + If ObjAF.GetPlagaEnfermedad(CveActivoFijo, UsuarioActual.CveEmpresa) Then + GvPlagaEnfermedad.DataSource = ObjAF.DtResultados + Else + GvPlagaEnfermedad.DataSource = Nothing + End If + + ObjAF.Dispose() + GvPlagaEnfermedad.DataBind() + + UpPlagaEnfermedad.Update() + + End Sub + + + Protected Sub LnkAgregarPlagaEnfermedad_Click(sender As Object, e As EventArgs) + + LblModalTituloPlagaEnfermedad.Text = "Agregar Plaga Enfermedad" + LnkModalAgregarProduccion.Text = "Agregar" + + CvePlagaEnfermedad = -1 + + TxtModalPlagaEnfermedadObservaciones.Text = "" + TxtModalPlagaEnfermedadFecha.Text = "" + + RegistraScript("$('#DVModalPlagaEnfermedad').modal('show');") + + UpModalPlagaEnfermedad.Update() + End Sub + + Protected Sub LnkGvPlagaEnfermedadEdit_Click(sender As Object, e As EventArgs) + + Dim GvRow As GridViewRow = DirectCast(DirectCast(sender, LinkButton).NamingContainer, GridViewRow) + + CvePlagaEnfermedad = GvRow.DataKey("CvePlagaEnfermedad").ToEntero + + Dim Observaciones As String = GvRow.DataKey("Observaciones") + Dim Fecha As Date = GvRow.DataKey("Fecha").ToDate + + + TxtModalPlagaEnfermedadObservaciones.Text = Observaciones + TxtModalPlagaEnfermedadFecha.Text = Fecha.ToString("dd/MM/yyyy") + + + LblModalTituloPlagaEnfermedad.Text = "Actualizar plaga enfermedad" + LnkModalAgregarPlagaEnfermedad.Text = "Actualizar" + + UpModalPlagaEnfermedad.Update() + + + RegistraScript("$('#DVModalPlagaEnfermedad').modal('show');") + End Sub + + Protected Sub LnkGvPlagaEnfermedadRemove_Click(sender As Object, e As EventArgs) + + Dim ErrorProceso As Boolean = False + Dim GvRow As GridViewRow = DirectCast(DirectCast(sender, LinkButton).NamingContainer, GridViewRow) + Dim CvePlagaEnfermedadEliminar As Integer = GvRow.DataKey("CvePlagaEnfermedad").ToEntero + + Dim ObjAF As New ClsAF + + If ObjAF.RemovePlagaEnfermedad(CvePlagaEnfermedadEliminar, UsuarioActual.CveEmpresa) Then + ErrorProceso = False + Else + ErrorProceso = True + End If + + + ObjAF.Dispose() + + + If Not ErrorProceso Then + Alert("Plaga Enfermedad Eliminada Correctamente.") + CargaPlagaEnfermedad() + End If + + End Sub + + + + Protected Sub LnkModalAgregarPlagaEnfermedad_Click(sender As Object, e As EventArgs) + Dim ErrorProceso As Boolean = False + Dim ObjAF As New ClsAF + + If CvePlagaEnfermedad > 0 Then + If ObjAF.UpdatePlagaEnfermedad(CvePlagaEnfermedad, CveActivoFijo, TxtModalPlagaEnfermedadObservaciones.Text, TxtModalPlagaEnfermedadFecha.Text.ToDate, UsuarioActual.CveUsuario) Then + ErrorProceso = False + Else + ErrorProceso = True + End If + Else + If ObjAF.AddPlagaEnfermedad(CveActivoFijo, TxtModalPlagaEnfermedadObservaciones.Text, TxtModalPlagaEnfermedadFecha.Text.ToDate, UsuarioActual.CveUsuario) Then + ErrorProceso = False + Else + ErrorProceso = True + End If + End If + + + + ObjAF.Dispose() + + If Not ErrorProceso Then + RegistraScript("$('#DVModalPlagaEnfermedad').modal('hide');") + Alert("Plaga Enfermedad guardada Correctamente.") + CargaPlagaEnfermedad() + End If + + End Sub + +#End Region diff --git a/App_Code/ClsAF.vb b/App_Code/ClsAF.vb index 94a279be0..fd6191f40 100644 --- a/App_Code/ClsAF.vb +++ b/App_Code/ClsAF.vb @@ -4632,9 +4632,6 @@ Public Class ClsAF #Region " M A N T E N I M I E N T O S " - - - Public Function AddMantenimientos(CveActivoFijo As Integer, Mantenimiento As String, Observaciones As String, Fecha As Date, CveUsuario As Integer, Archivo As String) As Integer Dim Retorno As Integer = -1 @@ -4746,6 +4743,118 @@ Public Class ClsAF #End Region + +#Region " PLAGAS ENFERMEDADES " + + + Public Function AddPlagaEnfermedad(CveActivoFijo As Integer, Observaciones As String, Fecha As Date, CveUsuario As Integer) As Boolean + + Dim Retorno As Boolean = False + + DataAdapter("PA_AF_PlagaEnfermedadAdd") + + With SqlAdapter.SelectCommand.Parameters + + .Add("@CveActivoFijo", SqlDbType.Int).Value = CveActivoFijo + .Add("@Observaciones", SqlDbType.VarChar).Value = Observaciones + .Add("@Fecha", SqlDbType.Date).Value = Fecha + .Add("@CveUsuario", SqlDbType.Int).Value = CveUsuario + + End With + + Try + SqlAdapter.Fill(Data) + + Retorno = True + Catch ex As Exception + OnError("Ocurrió un error al agregar la enfermedad/plaga.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo) + End Try + + Return Retorno + + End Function + + Public Function UpdatePlagaEnfermedad(CvePlagaEnfermedad As Integer, CveActivoFijo As Integer, Observaciones As String, Fecha As Date, CveUsuario As Integer) As Boolean + + Dim Retorno As Boolean = False + + DataAdapter("PA_AF_PlagaEnfermedadUpdate") + + With SqlAdapter.SelectCommand.Parameters + + .Add("@CvePlagaEnfermedad", SqlDbType.Int).Value = CvePlagaEnfermedad + .Add("@CveActivoFijo", SqlDbType.Int).Value = CveActivoFijo + .Add("@Observaciones", SqlDbType.VarChar).Value = Observaciones + .Add("@Fecha", SqlDbType.Date).Value = Fecha + .Add("@CveUsuario", SqlDbType.Int).Value = CveUsuario + + End With + + Try + SqlAdapter.Fill(Data) + + Retorno = True + Catch ex As Exception + OnError("Ocurrió un error al actualizar la enfermedad/plaga.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo) + End Try + + Return Retorno + + End Function + + + Public Function GetPlagaEnfermedad(CveActivoFijo As Integer, CveEmpresa As Integer) As Boolean + + Dim Retorno As Boolean = False + + DataAdapter("PA_AF_PlagaEnfermedadGet") + + With SqlAdapter.SelectCommand.Parameters + .Add("@CveActivoFijo", SqlDbType.Int).Value = CveActivoFijo + .Add("@CveEmpresa", SqlDbType.VarChar).Value = CveEmpresa + End With + + Try + SqlAdapter.Fill(Data) + + Retorno = True + Catch ex As Exception + OnError("Ocurrió un error al consultar la enfermedad/plaga.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo) + End Try + + Return Retorno + + End Function + + Public Function RemovePlagaEnfermedad(CvePlagaEnfermedad As Integer, CveEmpresa As Integer) As Boolean + + Dim Retorno As Boolean = False + + DataAdapter("PA_AF_PlagaEnfermedadRemove") + + With SqlAdapter.SelectCommand.Parameters + .Add("@CvePlagaEnfermedad", SqlDbType.Int).Value = CvePlagaEnfermedad + .Add("@CveEmpresa", SqlDbType.VarChar).Value = CveEmpresa + End With + + Try + SqlAdapter.Fill(Data) + + Retorno = True + Catch ex As Exception + OnError("Ocurrió un error al eliminar la enfermedad/plaga.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo) + End Try + + Return Retorno + + End Function + + + +#End Region + + + #Region " IDisposable Support " ' IDisposable Protected Overridable Sub Dispose(ByVal disposing As Boolean) diff --git a/App_Code/ClsBancos.vb b/App_Code/ClsBancos.vb index 55ee851fb..d416a98bb 100644 --- a/App_Code/ClsBancos.vb +++ b/App_Code/ClsBancos.vb @@ -141,6 +141,7 @@ Public Class ClsBancos Public Property UsaLayoutGrupos As Boolean Public Property UsaTarjeta As Boolean + Public Property TieneTerminal As Boolean #End Region @@ -428,6 +429,7 @@ Public Class ClsBancos Me.UsaLayout = If(Data.Rows(0)("UsaLayout").ToString = "True", True, False) Me.UsaLayoutGrupos = If(Data.Rows(0)("UsaLayoutGrupos").ToString = "True", True, False) Me.UsaTarjeta = If(Data.Rows(0)("UsaTarjeta").ToString = "True", True, False) + Me.TieneTerminal = If(Data.Rows(0)("TieneTerminal").ToString = "True", True, False) End If @@ -462,7 +464,7 @@ Public Class ClsBancos Public Function AddBancosCuentas(CveBanco As Integer, CveTipoCuenta As Integer, NumCuenta As String, CLABE As String, CveMoneda As Integer, DiaCorte As Integer, FInicial As Integer, FActual As Integer, FFinal As Integer, LimiteCredito As Double, IdCtaContable As Integer, IdCtaContableComplementaria As Integer, FormatoCheque As String, CveUsuario As Integer, CveEmpresa As Integer, ConvenioPagoElectronico As String, - UsaLayout As Boolean, UsaTarjeta As Boolean, Optional SaldoInicial As Double = 0, Optional UsaLayoutGrupos As Boolean = False) As Boolean + UsaLayout As Boolean, UsaTarjeta As Boolean, Optional SaldoInicial As Double = 0, Optional UsaLayoutGrupos As Boolean = False, Optional TieneTerminal As Boolean = False) As Boolean Dim Retorno As Boolean = False DataAdapter("PA_Banc_BancosCuentasAdd") @@ -489,6 +491,7 @@ Public Class ClsBancos .Add("@UsaTarjeta", SqlDbType.Bit).Value = UsaTarjeta .Add("@SaldoInicial", SqlDbType.Money).Value = SaldoInicial .Add("@UsaLayoutGrupos", SqlDbType.Bit).Value = UsaLayoutGrupos + .Add("@TieneTerminal", SqlDbType.Bit).Value = TieneTerminal @@ -513,7 +516,7 @@ Public Class ClsBancos Public Function UpdateBancosCuentas(CveBanco As Integer, CveTipoCuenta As Integer, NumCuenta As String, CLABE As String, CveMoneda As Integer, DiaCorte As Integer, FInicial As Integer, FActual As Integer, FFinal As Integer, LimiteCredito As Double, IdCtaContable As Integer, IdCtaContableComplementaria As Integer, FormatoCheque As String, Estatus As Boolean, CveCuenta As Integer, ConvenioPagoElectronico As String, - UsaLayout As Boolean, UsaTarjeta As Boolean, Optional UsaLayoutGrupos As Boolean = False) As Boolean + UsaLayout As Boolean, UsaTarjeta As Boolean, Optional UsaLayoutGrupos As Boolean = False, Optional TieneTerminal As Boolean = False) As Boolean Dim Retorno As Boolean = False DataAdapter("PA_Banc_BancosCuentasUpdate") @@ -538,6 +541,7 @@ Public Class ClsBancos .Add("@UsaLayout", SqlDbType.Bit).Value = UsaLayout .Add("@UsaTarjeta", SqlDbType.Bit).Value = UsaTarjeta .Add("@UsaLayoutGrupos", SqlDbType.Bit).Value = UsaLayoutGrupos + .Add("@TieneTerminal", SqlDbType.Bit).Value = TieneTerminal End With diff --git a/Bancos/CuentasBancariasDetalle.aspx b/Bancos/CuentasBancariasDetalle.aspx index d2a0f9b05..dc51da521 100644 --- a/Bancos/CuentasBancariasDetalle.aspx +++ b/Bancos/CuentasBancariasDetalle.aspx @@ -95,6 +95,11 @@ Layout Grupos: + + + Tiene Terminal: + + Convenio: diff --git a/Bancos/CuentasBancariasDetalle.aspx.vb b/Bancos/CuentasBancariasDetalle.aspx.vb index 24f611f58..ddfc4d03c 100644 --- a/Bancos/CuentasBancariasDetalle.aspx.vb +++ b/Bancos/CuentasBancariasDetalle.aspx.vb @@ -183,7 +183,9 @@ Partial Class Bancos_CuentasBancariasDetalle TxtConvenio.Text = ObjCuentasBancariasDetalle.ConvenioPagoElectronico.ToString ChkLayout.Checked = ObjCuentasBancariasDetalle.UsaLayout ChkLayoutGrupos.Checked = ObjCuentasBancariasDetalle.UsaLayoutGrupos - ChkUsaTarjeta.Checked = ObjCuentasBancariasDetalle.UsaTarjeta + ChkUsaTarjeta.Checked = ObjCuentasBancariasDetalle.UsaTarjeta + + ChkTieneTerminal.Checked = ObjCuentasBancariasDetalle.TieneTerminal ChkUsaTarjeta_CheckedChanged(Nothing, Nothing) @@ -265,7 +267,8 @@ Partial Class Bancos_CuentasBancariasDetalle If ObjCuentasBancariasDetalle.AddBancosCuentas(DdlBanco.SelectedValue.ToEntero, DdlTipoCuenta.SelectedValue.ToEntero, TxtNumCuenta.Text.Trim, TxtCLABE.Text.Trim, DdlMoneda.SelectedValue.ToEntero, 0, TxtFInicial.Text.Trim.ToEntero, 0, 0, TxtLimiteCredito.Text.Trim.ToDouble, DDlCuentaContable.SelectedValue.ToEntero, - DdlCuentaContableComplementaria.SelectedValue.ToEntero, "", UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, If(ChkLayout.Checked, TxtConvenio.Text, ""), ChkLayout.Checked, ChkUsaTarjeta.Checked, UsaLayoutGrupos:=ChkLayoutGrupos.Checked) Then + DdlCuentaContableComplementaria.SelectedValue.ToEntero, "", UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, If(ChkLayout.Checked, TxtConvenio.Text, ""), ChkLayout.Checked, ChkUsaTarjeta.Checked, UsaLayoutGrupos:=ChkLayoutGrupos.Checked, + TieneTerminal:=ChkTieneTerminal.Checked) Then ViewState("CveCuenta") = ObjCuentasBancariasDetalle.TCveCuenta Else ErrorUsuarios = True @@ -296,7 +299,9 @@ Partial Class Bancos_CuentasBancariasDetalle End If Else - If ObjCuentasBancariasDetalle.UpdateBancosCuentas(DdlBanco.SelectedValue.ToEntero, DdlTipoCuenta.SelectedValue.ToEntero, TxtNumCuenta.Text.Trim, TxtCLABE.Text.Trim, DdlMoneda.SelectedValue.ToEntero, 0, TxtFInicial.Text.Trim.ToEntero, 0, 0, TxtLimiteCredito.Text.Trim.ToDouble, DDlCuentaContable.SelectedValue.ToEntero, DdlCuentaContableComplementaria.SelectedValue.ToEntero, "", ChkEstatus.Checked, CveCuenta, TxtConvenio.Text, ChkLayout.Checked, ChkUsaTarjeta.Checked, UsaLayoutGrupos:=ChkLayoutGrupos.Checked) Then + If ObjCuentasBancariasDetalle.UpdateBancosCuentas(DdlBanco.SelectedValue.ToEntero, DdlTipoCuenta.SelectedValue.ToEntero, TxtNumCuenta.Text.Trim, TxtCLABE.Text.Trim, DdlMoneda.SelectedValue.ToEntero, 0, TxtFInicial.Text.Trim.ToEntero, 0, 0, + TxtLimiteCredito.Text.Trim.ToDouble, DDlCuentaContable.SelectedValue.ToEntero, DdlCuentaContableComplementaria.SelectedValue.ToEntero, "", ChkEstatus.Checked, CveCuenta, TxtConvenio.Text, + ChkLayout.Checked, ChkUsaTarjeta.Checked, UsaLayoutGrupos:=ChkLayoutGrupos.Checked, TieneTerminal:=ChkTieneTerminal.Checked) Then 'CargaDatos() GlobalDTBancosCuentas(-1, CveEmpresa:=UsuarioActual.CveEmpresa) = Nothing 'If ObjCuentasBancariasDetalle.GetBancosCuentasUsuarios(-1) Then diff --git a/Empresas/48/Formatos/CHQ-28.rdlc b/Empresas/48/Formatos/CHQ-28.rdlc index 7f9286254..5ccdb248e 100644 --- a/Empresas/48/Formatos/CHQ-28.rdlc +++ b/Empresas/48/Formatos/CHQ-28.rdlc @@ -760,7 +760,7 @@ 8.35775in - 2.05521cm + 1.39375cm true true @@ -925,51 +925,6 @@ 2pt - - true - true - - - - - Fecha Impresión: - - - - - - - - =Today - - - - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - Fecha Impresión: - - - - - - - - =Today - - - - - - 2pt - 2pt - 2pt - 2pt - - - - - - - - - =Today - - - - - - 2pt - 2pt - 2pt - 2pt - - - - - - - 27.94cm 21.59cm 0.5cm @@ -2088,6 +2032,87 @@ ReportParameter1 + + + image/png + iVBORw0KGgoAAAANSUhEUgAAAJgAAAB/CAIAAACc4ZxMAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8YQUAAAAJcEhZcwAAEnQAABJ0Ad5mH3gAAJa8SURBVHhe7f11eFTXGjYOAwlWVzyCa71UTwuRiSGlLXUXrEjxjMZdgQAt7lK0uGvxuLu7J5OMbf3dz5oE6enpkfd9//iu65uuDjsze6+91nM/cj9L9nSRZVkQjbIgSYIs8CIviBwvmwW5TZYrOTG93pBSoU8oaYkva75T1ny7rAnlTnlTfHkzlbKW+PKWO+XNrDQllDUlljUnlrUklrYmlLXSt2VNCeUdnySWtiSU/98pVGHZveMEVjo+pJu23inTo9ymYyp3qDTfLkX7m+/gvbwFBadZv71bcBouuV3Wim8TqCPNeGcH7BYdl9BV6B0VOq3zAN+W4gTI5MFy90M6YG2+/1p24d8WCLYRl6M7t8pbEyDDkpZEuldjVk1Du8hzoiyKEkAkIEVJlHgJhbNYzKLUYpEL6i1bLiR9H7nddenq12ateH3mqtdmrBg/I5bKzJjxM6Nfn2UtMSivzYqmD2dEvz4j6o0ZUW/OiHnzh5Vv/rD6rR/XvPXjyrd+jH1rxoq3flz19oxVb81c+UDB5zNXvDmDivX4zyf8c7Gedu/8zuPO8sbMFeNnrxo/K278zJXjcTxzBVr+2kx0IfY1KjGvz4zB+3hqdiw+ZJ/jQ+u3OB9XUXlj5so3Z6BYq8V96c83OsoKVjr+fH3GivsK/rz3Cd36bwsu/8vuWz9EeYNaG/H6jzGv/4heRL/5I8QLaUe++l3Ij8HrKwwmHnYocB1AWnhZFGSZF80S3yzJ5zPqvvPb6zjJ+3H3Zbau3t3d/bq5BNq4htwttoogG4W/jcKPvQfYugXbKkJs3FACbdz8bBWBPV3DerpE9XCO6uES3sM1uLsiqLtrSHfFvyg4gb7FaQ9+/p8XqoFdTm0LtnELtnEP7oZ3 +tyA6VgTZugX1UKAE9lAEoNi6Bdi4+9u40YGtmz8r7FgRiILzbVCJIpSVEFvXYFbuHnQUGxQ6jUo3Vyqdl9wr3dxD/lzcHii49l7j7y93b6QI7Kbw6+7i18PVt7vCp7urjy3E7ubXZcKSd+ZEFLUZgJsomjuBlGCUkpk313PcsbTSCT+tesJJ13NCQHc0xSO8m0dEV4+Ibp5R3TxiUGzw7hnVxSu8y6QwvHfzwlfR3TxXdEHxwudhXSaFdvOKsfFcZeOxysYTB5E4p+ukqG5eKDj+v14i7jtAieo6KbqrV0zXSVTQkm5e0Sg2rNiiqR7UErSny6SorvcqsRbWSOpOTBcvlGjWIypdrV9RVR0nd50U2YUK6onufGeFLuwsOGHyn0rU/QWV3K3wLwv60mVSbDePFTYesXR3z9iuXrFdJsV0UQT8Y/7KolYDOdS7FslJMoBtl8Vb5XVey1f1dlF2d42yVcTZuK3q6h7NwIi28Yi08cA7Ko3t6hHbxYP61sUzqis+dI9lmK3pgttQlyLQn66esTaeK3EtSQ1nQqwQrhdE/H+74F73FUgfMKDDXfBOOrcCre1q1TMcuKPgYGUXz1VdPFd28cDneKcTqHiRmKwHXSatgATvFQIVt2NdwI3u3r3jQxR2bUdBDdba6HwrwPcfWI/p4M9V3Vc6LsGtWYMhc2gGWQvaHNPNNejdeXFlbUbAJ0udMRJAWmS5jhO91/3+tPtieMJubiu6uq3q5omywsY9xhaoeER3c4c5ruzmAXRXUdXuJCMb92hb14ieblE2CsAWR1hOgQhgDdYuUSdZa1ZaRWPtqlU69x9Yj//5wHp89+Dvv7W+M81DibUiauOFNq/o4h7TCdiqbh5x3Tygdqu7eMThT2DZlRV2OSFKwqKCT1ay93u3uHuXPx3QMWpA8eqsDQeTrDrRcebdA+vx3YN/8y3hh9JxQNrpHt3dJWDi3NXFbUZgyHC0kh1RApDJ5U1vfBP0sLO6p3uE +LWDzgFLEdJkMF7GqK6kwjCwG3e4KtDxWMymstIW8XAO6T1T3mKDu7hpq6w7zX0WdJyyt3oahSBAyify/KExk98qkFYSfR5StVYdYs/HexeOen+ziwUAlc2TSoUaygs6iMIF2tHkyw/L+xt+1VCvS/68L3Yt8jNUeAC0U1MYd/IOALGwzguyI8l3WKsgIlzsvpQ70UvZWBNi4AUhERHImXSajIugsijUK4sAKZJytV6yta4Djp+ETF/4yYX5c/2lBD7mF9oCb9VzdlXoOzwDfC5FZPQPe/y8Uq7LfX+7/vPO0laR5MEE3BDyASqGhm3tEN/cwW68IG49wKu5RFCkIZjTS6so6AxvQvWsQLCZRwYedbbCWuw34m/LPJ//pwrsn/HPpOIeMkvwKXAW1in2IHtm6wLWuLmgzIjwKgLIDSF6Grw3Ze/YJd3DUEIQ9W4qFLIqwLjGtJxPEAXOtKxEXe7qH9nb2XrD5UpJevt3IfRx2sKeTspc7NCCui1cc0/FoYN+V3Bc+gQpTgURIKCQXdtwppo7jfz6wHrMD9OdfFq8VKHD1xAvcV3ZRxHZzi+k1adXDU1f29Irq6RnW0wPMmVhfd1edratPNxcfsG5b9wBbjyBbr1Abr7BuXuFdPSPR964UWZns6JgVK/2hTxg/sB50BMK7fpgKfdKpBPQVdb8DlW6sdBxA1dg7hfAH+3i34/iKviWLZJEetZEbACLAJbaba8g789d0WKQEhsOA5HlZL8u+O0484rbExiMEvsiGaNKarh6wrVVUF9niGvKrXiso9rjHwmR7uwc96rIk7PDNOlmuluWFm0/3dFrU3S2MYJu8hgGJRjANQGENYk3pdE1/V/71OWQxrDCBkkyt/WfF+hU5IkWUjVvMw1PjBnyx+YWFB91CLk6LujQp8KjTsm1vz//l1VlxY7+Pdvwi4Nn3NQ97ets6L7N1Wdbdxbunq6anwr+He7CtR5iNJ7h6FLge/DCw7LDa++8FX0V+ +mHk8ahvazJywtZ3Wr9AeajCkR34SIZN1oaOdVKwn/5vC9KBDJqgfRGRFV0XouwvWFFGMlGgoxwqkWZAApN/W448plnT3CAYXxe1t3aEygARYEiMgUgDNoj5YM5CIHl5Bj7ouiTh0tVGWa2V52eaTvZ0W2biHM62xFsRL2OJaAEkX4vbWEGv1/nQaGmctVokwjSaGBe2JY2XVfbWxQopvvRz1UKvoZFLeDo4D6+lKcT0GBNXGbWV3jxW9JkcO+XHdJ6svBZ3OX3u56JczGXEnk6NPxoedvh50+qbuyK25my5+Hn7AbenaV78PHvKR7ikvVS+Fsqebj42zfzfnkG6u4bZukbbu4bYe4eAEgNaW2PiKrgRkVNfJ0TaTQAZjiFJNgspCyvBb6Ai1BKEa7x1wooCIgucjkWNMnmkG4KT3rpPRL8iW9fdPBbbU4WM7CYHHim6uoRPmE5DkVdmLgDSKHUA+7rbE1rMTSEZQu0yGTFczAKh9UIoHgFQsjmRAwiiXbyQg0VtqllVnO4QOPWAWeQ8Da0GjmRO+V9Z0mC9Z8JpuXii4NQpzzmgM8+1WJX2wKvqQcTESCstiiWnbIjoifXIPt3Hzf8hdM+qb8B9WndgdX3Umq2rP1dtR+w74bNvpt+P31Sfij6bVXSzRXyhuPZRcueZUinLD6c/9dkycu2rUZ0HPTFI9plA+5Kzq6aLt7h5o6xVui+QPUdYzAilyD6+IXu7hPdzCuntEdPfA5xFd3CO7uUfZsmLjhlsjNkchGIN82XohMIdTqEZuzdw1kxVhadXjP3fKWjqAhPBZ1ERBBHEJnfg3QD7mvrQ7gCRqx4CEFU75OyBhwVGHrjTLcj0sctMpANnTPcTWMwp5NzMOa4GRASQrAFBM5lsIVIQQVAt3DVa8mgqddrcz+PBuIfJCqSoLKuxCOuG+gj/Z50xdUCFLdhGtI2zcI9EYW4/I7u7BPV3Vj7oufG1G6NqTCcVtXLnREF9SuvPsVVXs +5s+WBHynDY/de+JqTlm5QagxycXNXGKF/lh6ReyxhLmrjnosWjviI90jrj/3Vizq7b6st2L5QwrVo66aJ911Tyo0j7sS2I8olvdWLOvlinfVw66ah5wAv3cvZ2VPZ3UPV62tq8ZWoeuu8LVR+NOwjnukDXNv3ZDvk7Ey7ex0wg+U/xxIk0RA+m87wYAMIiDJTd0DskNY9wFp4xXR0yvocdclMYeutjAglwDIiQt7uAVB3YAlSC/RRaSe7iu6Ie+EjyUXSpbKvIT1wOpLO9tHADOqTKUziqDApcOZsHOYXd4t+GQVtZM4DiWOIKIsquFz3D3E1iPA1o2G3Gjcztmvp7PqoQnzH3v3u5enz9t5+noDmIEoN1vk8hbz2aRM7eoNH81fNkcTvPPI6YqmpnbBohfFJkmutsilRimxynAwoTjs4JXlm46rt5713XHJb9eVwN1/BO29EbT3euDeawF7/vDZc0W96+Ly7ecXbz6z4NeTc+IOfx+194vQndP8tripNry9eO1Lc+PGzFw55JtV/T9b9dj7sT0mR3ezjpMwnsz0+59QRPkvLFIWySK3nXjUfamtV1AXz0jI8e+BhEXeD2QDgNx4prfT4h5uwbADK4pd3WO6ukXbuAFIlncSlp02ZD24F/wYd7CaLFktkYsuHkj4WBYIUNFJK7VhoBKxpEKhy8Yt1NYtuIcioLvCj0ipi66Hq08v2IRi8RPuC5/2WNTXc9mwDwNe/jJiwqyYyQtjvvKLmxe6ZvuJC/VGzsxJYOy8KJtkuYkTsqrq00uqC6pqmgytBsFkEgWQQgOKRGSwVab3ZhxLclvnJ42i1CjJCC5Q5RpZrpTlUlkuluVCUc6zyBkGObFV+qOeP1lm3J3d/Gt8bdjFUtXh/Jlb06aEXx2/5Ej/r7faTgELZRZJmv1PKKL8h0BmZGSYZLJI3x0nH/FYajspmOXyViDj7geShjwYkDTQ8yCQ6MZSADkBFgkgoxAVaDzBncRt6xnX +zQ0UAJWAvID1WA/gRZlyMDPtglBvDRKTrWSB7tWVpXqgx5TUukfYUkwK7+YWaOvmZ0PDx9qeCvXD7t5PeHo/O8nb/kPtyM/9Xvgu5J25K6Yof/0uYtfS9UfC91/adCH1UELx+ayaW8VNKRX6vDpjid5YaTA2WsztnIm3cDSsBSw5kRMlwGkSZYssWCSzWeKNkmSQ5XZRbhdkoyQCV7MomUVcIfIiZ5HFdkFs5rjixobzSSnbT1+NO3gxdPd57ZZzP/9y/IfovdMDNnuo1k9YsvatRatfnrti7OzYkT/GDvsudsjXKx2/WD3w07XPfBj38HtxREdJWVlouB+/u+VfAOk0f+1dIAEiWaRBFqFcfkg/PJbYTgpiY8EIcsjMYJEgzSzCWYFkkZlcK2KkZweQ1hi5dMPph52W9HQP7uYeagsGTzMhwRTV3eDxVhO3RLQDyQSK4DXQElYhvTMfC+OzOk/4GcQPmFoPRXBvRUBvF11vZ9UjLsrH3JRPe2nspmnGfO7z+swIkMzPg3fOWnlAu+1M7JHrO/7IPJ5W8kdpY0YzV2qWa0S5XiKLgZK1UQfJ5lCQLhskqU0UWgVLu1kv8JzEiQBSwEskLC2CbBEEXuCMFnNaccWJO5kH/ki5nlPWzEltFrOBpvkAM8eLZlxh4UWTIBfX1a0/cOjrZX4vTP6h/zvfPTNx7mNOix5yXtLDZbmti7abi66Li09XhV9XNz+82ygCuikCbFwD4PC70fQIRTGKKRT1/0X5D4DE609ALu4EEiaFILySbKWzxvuBBG27H0jGWk89MnFRb4/Anh5+z0z1G/JZuN3HYb08/IjOga93pP+gNoScNd0mawO7cyO+Z6sIt1WE2Cr8ujmpbZ28H3Je+pRi6eBp6le/CfFYHPdD+B7V5nORh+9su5x5PLHoj7w6MJH8ZnOZga82SQ2chGhnhapdEoyS2SBx7SLfLpNJEXg0JUDvKPA98I2NJrHJ0G7mzbzAi0jEJOTS +HE+mRlm1hNo47uTNJPeZynHvz/H4yf/gtfQak9DCmQ0ijJWziIIoSEAe+MM0awyGpJKaX49dn7Zk1SCPpQ9NXNbLzbeHR2gPt/Du7lHdwWjIPxF3tfECE7RmMijEXTt4AGRrLZ3Svlf+nWtFIvkXQHZHjPQiIAktXMyA7Lget4EbvAsk0g+3JVGHO4Bctv7Yo04Leik0T0xS+xyMP19p2pFcO37u2l7uft1hYWwujEb0EYDdw2yQcbsHgcL1dNX1dlE+qlA96antP1U7+jPthPlRn/hvXr7x6LpzCacyK1LqDEXtUhVPFtYgER48G+U3C+QGDQJsAkUAIBwPExFgKSbBYvWKLbiEl2s4ucQg5TRbkqpbzuWU77iSFbf3auQvv2UUlwNyTgRnt0g0lWcBoCIEw4YvOVGss4irDl0dNnne0xNnvPKlZu/NnDpBbhNNZtFiESUa4gSMkoS763lOL0n1opzTJkQfiR//Q+RjLst7ufj0cg/u7h6KLAUUjAg85El4MBKA+DU5moaBaJDrr/C7W/5XIAO7eEUglSTCiVomr6DBnQeBJKLhCTsLfMSV8sgmRna81x996N3ZPV2X9n9v6bGcEjjbjDbhPd/ND7kpe3gE27gjs/a1cdHYOqt6uXo/5aW2m657/rsQl4UrPwnYtPCXwxGHrm2/ln0hvyq1ob3ETPQBpsO8ogQuhihulASTLHKSRMYgChA0RTVRNEkyx2wRRtlgEiv0fFad4VZx86m0im2XMsP3XV/y64lvQ/d4LVk7/vvwYR/59vdc3vft7z/7OTSvvsUgw7bMqJKEQfIAjmzphAhIJRMvlrXwPhtO9fda8rDzgjdnR5xJKwfxIZ1BEyQeTcA1sGgUTuQBcJss1ory+dz6n1cdHf1JYC8FUk//7p5hXd0jEAspakxa2Y1sg2FJ72yICkD+rxYp3D/7AUkhlvjstMZIlkeS6cAiY7tOjqURcDZaSCGNDYCxGBnZ0yPwcZfFEQcJ +SMDmvfHIQ06zH3Jfbj9t0enMImBQ0Gr51GfNoxNn9nZa+KTb8mEf+b3xQ9h07aYFq49EHry+C7DlVCVXtxS3WeoFGWaNS2BwrZLYJokGCXIRBCCHOIb/RB7MxCTwFkk0i5A9OUycXMfLOU3m6yV1hxNLfjmVpNt8ZkbEning+rNjRn8aOGiq5lkP9WMKdS8Xlc1Ela2TpoezpreTctS05VvPxsO8DMCDXCQQlGT2nygLMi17wReyxYybSimlTVOX//qw6+JHXJd8pNmUXtEGZ4BrAB+5VcgR0POIqxZZsnCCsY0zNwtyeZuw54/c9zTbnpms7u6u6+YBu4zu7hnbwyvW1msFCpIlYvUdyBFI9/GdTm7/3wIJhsaAPPmY+zJbzxAa7LbO5hAtth7Q/BSNTVsnDTxiEdsecQ96ymVx1KHrABJFuen33u/+2Mtl4UDPuWfTi8yyXNFqWhS1yW2O/08xu6MP3jx0szC+tCm/yVxhkJo4CldGeEgJPFCwQLfxpygAv3bJYpI4k8BxkoBoBZdnhU0vyC2CXGeWi1r5pIqWE8nFcUduLFp75D31hhe/C3X4QNfnPd1jnqre7qqebroeCt8eCv+eisCebiEIwCy/jOnhEd7b1fdJ56U/BG3KrGuEHnBAjYwQCPJkWjIgxEcCjJMXZLhds8i18tIvx287TPV+2E3Vz2tZ0K4LNUYJrcU5ItAkM5bIrRNbwhtv4dF4wcBxzRbpVlHz/NWH+05Td1Nobd1DetC4BJJsillgf7YeoH7IwRC/YDDM25GnBVSAEASTZWuUm/01kER22h8E0iQxi9xx8jG3pTRERx4crJWybFrVwca9aDEAYqd1kQQ+8Qh7yNP/Mad5kYeu4VpEI5/1++1cfhj7sXLSwrAbRZXAqcEi5NW2lLaaG5F6C4zEw18J8EcyghlbrieAIpoFMjJ4ToPIg1IyU5NglDBQ6Ee1gMBjvlbWsO9Ofti+S7NXHXJbvv75b0MGTFU+ +pljS23W5jYuym5tvV/egLu4hXTzCu6KdSEAZiejmGdmdQkBkN+i+xwpbt5CHnZY5zYq+kF2NNiOv6AQSvhRRz0KZBYAkeOA/BTgDs8AbRCmlxqBYuApZ8qMuS1xmRdzMgzoxzNkLWFpfhCtpAXkRM88ByxZRLDJKUb/fHvdl8GMK5Esg81FE9IAQDXgBHgQvJHir/gpIQGgt/zmQokRAbjv5uGIpDZrTEB1YK43L2HrQTCYYLA1aeoB3RXV1D+viFtRV4dNbsfTJiTOiD1wkHsiLp2+krz1w6WRSSWpVcz3PtwEYgdmTyCPrgraDrHOwMwFpGGIcz0N3kY0JFrPAkbeURUCIUI38usIip9W1nUgrWX3qzrKNx6f5bHzpxzD76donPJf1omkKjY2rrpurj40isJtHiI1XJC2JsHI/8HhrvOnwSwjn4d3cw2mdinvYwwqfF78M+T2+BLdoheoQQWXRUbamHpSIsHgJ2cDM4CfhWYU2nq/mEDhOP+O+9JGJy4YiSz0a30KYw4ShjriW7LIDSPYCliDAQBixoF2Sai3y/hv5Tj/FPqZQdldA4RAdV1O+QRM4BA9rKvlVQouO7/OrKP85kHD6kKDv9lNPKJb18AhhQHYMsNmyJKGnR0RvRXBPZ99eEzWPKFQDP/B78cfI9303Lv31wLW8ijaQSbNZb7LokWyBTIL0kwh4njrEFFQ0cqKFxRXwAnBLAg+dNAg8wMPlMNnSFsvtwvo913JD9lyeEb7LdX7sqI99+nopH3H17uGqsXXz7+oeAAWiQWcahqaRaObnaXyLkQg2dQcXygaDEHvQW8bL4FfDursHPuKuee3HqF1/FDTAN0jQXRI0tAlmxcgqGRg5WUiFgMTLzIsGTjRZZAHxe/PFbPvJqkedVc+4LJkRsqvcyAyaKiGj/BOW0AX8Q/WTAES46FZOPpNW4rYk9nEPlY1beFe3lV3dUaxzI9A8NhlAIFnxswbLTlD/CyBFnrHWk0+6 +LevhGUp+iYCMhC/q7urb3Vn5kNOSPm5LX/gy5APVFs2mc0jmLubVZLeaqnkJqm0g4zJDfxEe4CdNgpkDQEjJeLyhbzzEwUkWyAw8Dy4MzgrgwQeUW+QbpS07rmT7brv8pd+Od2ZED/8osK+n9hGn5b2dtb1pjBQRDnkLMhZ4dXLsUK/uHitt3OAhaFrUhobrqP9E4q1TH56U6lAoIqSju7pF2iBYOi9+/YdgaEm1SW5HwkhOlUQMIMgWidkQilbzpPl24ICUH7xVQss5aNvJlMox0/0fmqh8xGnJu7Mjkqra0AX4T3hRKGgH9J1AQqRUtSSR1SJFtXD4r0WSzmSXeyl/7eWssXEJt3WLtnEP7UbDkA8OIJMJdrhZhuV/A6RRMkKsvjuOPKX4ube7v617MBLzhxQ+T7t5D/tQPXFe5Pw1B7Zfy7xZri9oFeo4CngU7dBXcEuEd4p2cKAWjkeCBeZisfAgLrA9sAAZlmhimQMSiWZRrjCKqdXtRxJL/XdemrJ83fNfhvWf4vOom7aHi9bGGflJcHcFsswI4NENzJktO7N6CDIvmsdYwQpNhtAIIno1aTUNIpIuo9tE0OBFbNwiaMGKe3h314CHXZf9Y07E4YSCBg7Nlk1oFYmcrMVqM2Q8EIe14H+WmoH+QOt4OFiJR25zMbv25S+DezurH3JRDv1AeSqjBCHcRIrbAeQ/v/ChBQKAxlCyAlkJTaJ8Lrdhwty1j7hoaHDYMwQ62tU9tosb4iVN2P3XQP5THkms1W/Lvmedvn/KbbHdhz7jZ0Z9FrAreOfl328X5DQakSbiBMRCdAmKypxJR6F8ig2KIJFidomwh1OIxnEWGY6pVZArzVJmQ/uZrOrVZ1Lnrf5dsXCl4zTvx10XP+QCt+nTg1buhnVRRHalNVGdo+STGXO+OwtP2TSlQ2ydKhvTok5SYaNFNL1MKyfc2ai6ZxzebYCii/Yp92XTVOtPpFQgJQAVMINWkocnasrSDGI7 +VvisYBCC7AVHgtPQV/BnAjKn6qUvA3o5wU/49vNavO1KEnwYKTEUttMiWQUPvAQySBgn3QS5lEmUG0X5cErZG7Mie7kqbd3CurnRIgRys55rULq43wWSJQt/C+RfDAiYRQJp3e+nPldFqTcd2/pHxqXC2pxGS72Z7g0mBz5tAk4sgFtfrJ2oglwIz3MIeybQFpGDn7LgTMEM82w3isn5tVvOJi369egk77XPfRv+7Ht+iFU9XFXdkSF4Btl6hXTzDLMhf0hLhNDEjhyZ9BHtpj6g9Vb1ZEOyLI+2muk9naW+saU6K2zhbGmR5mo41Z6uvvbva+etOnyzuAXZjgmKxobV4O8l5j1Z6XgREtaDzt5RxwgESn6QqBxNLh7zsba3q38v16BnPJauPHrpLpDQBeuFrII/vTrugi8JSyLnXK0obv4j/bnvIro7Bdu6xyDSd3VnC2s6gESX0TUrkPiTkpC/AfLBGMl8TlmLPr+xrcoiNbKxHsq+QQYQ4ChTgBHCSXAwNRTKhUnDEF7AaMwW3mAi1Dg4T70oN5nFNosFl1U3GxdFbLWfuvBhj2U9Xb1pgsktpIdnmK0nkoSwbpMiusLsKB6TDdlMWssmRggYRr5xbF0wYB2ytyop8IOZsoHDyfetVQTqUAXkGx7wqzE93CN6OalHTfeN2H8trwmJoGxEtkMODski2eBdkePg3jG9iKNA9CR2oI1CEYQGKzZfTrGbuqSnS2BvRfiTrkvDfjsFdM0IJ39rkax2AElfosDLcoJRLxhKTULA7uv9vAJ70WglAjniPZRvTRdat/bfAXlXGQlI2D9syCQiE5eNAApqC5dOjJylROQ/rVky+gWbI0ZKsZByeXRGMnIcSlVj283Mio1HbyxbsSW+uBR5ZEmbabrP2u6uS7p6BPd2D+nlFgr224PmQxAYkJVSIkWLBKihq7rhvQNFMkH6trOwD1mXaJEOdYlZ590S021SFJIQGob2CuvuFviUm9r1p1W/ +XcqpbZMNAgrzqLw1UsNlkMjvL/TCP0Rw0En0ldQUmMMgIfp2SawUZPXWY8+4LeypCOzlFvKEy5KQPacBpAW1MrvtqOS+132VQ9QkPxoihpkj7lqMbRYxtcr8RcDOx9y1Nm40QQQgu3r8CUjmV6HK/zmQFPIQDxhg1E/AhzhHOkzJOwRAeTLrHOVNyAVF3mydq5PkNgApSG2cvPXItQnf6Bw85w72/P5sZgG+LTJwH/hugRft6hnRyyOquyKiO00uxnRna6VoHh/YgKRQRkUmhZyBbT2ggcCuk2jbA0Bi2QW6x6zTM66bVxztKgGWYDQ0i8KGDJH4e4Q+5On/kEI55EPd4pUHb+bXNyEugIwheFO2j77B5SNZRVwk8cJC2H9WWbN/iLNS5ztkQH/R0JtRlnJaLR9ofn3EZSmtF3EPflKxNObwZWIMRPTIZeFkazV3X9aaYdJMQWjYCA6Mch1UiUgkgO3Lp1OLxn8f0NNFY6sAwbauS2LTTVOQSqGDVnP8O4ss/hOQHW6EFVJEqA5cKLlUkBYwdchAMMLJwhLBFyiblqvM8u3ihm2nr15Oy0aXmiXZe93xR96Z+Yjzz47Tfj6ZUQwgiw3CdN1uxCobTxBI2nFgtSHkfNYRZBpp7BjFpWLjudLWIw6MlGLhZJrchlaSsXqsQaF+kguF4dLsZo/Jqyi6MDht3cN6u/k9rVj69oyItcfjCxva2niRpoh5BG1oI72IopHBWTtuxY0ddr7u+kbrvyRxInWkrCdSyp/7PKCnm9bGM7SnW8Cz7ks2XUoC+zMKHFQFioJKH6zs7gsoEh2ESFmhZITGHUXZIMr1ZiHu6B/9Jy3rpQhCNgV4IBxapA8gaZsDm2P/y5EdUAGXMAYk7cayvghI1gwUNIhGYCQJBbeDH4IWoUuSkefaJB6ANclytt6w61bGgtWH//FDsKPbDyt/v4gPa2mpx/neExY8oljm+P4SAAnPU9QuMiD9WG4H70EjL1YgqcXW +tL0Txc7CHClaP9mqjCxSggXQKmcKk3i39Vxtw1ZIk3F7RPVwD+3ppLKbqpkbffBqTkMjsiOR5u5pNh9ChpQRKDqLNQR2lgdeDEj6EAc4ouFfNppYa5b9tp9/0m1pD49AG4+QXq4+g6eqjqUWg+wASLLIvwOS7Bo3pWIdC5JpZIvxR6mFE3JbhOk+2x5yUdu6I+NiC2ghGXKtTMsZeP8NkBKHQneiMQ72otwdL+TDgkEQYXClBuFyfm34octeylUOH2kecUXOvvwxl0U/xh3fnVy+7Xbp9KBDvV3UvRRq+2nLTmeXAPXCNuFD7S4CkjwqzS13DKR1FiuQ5FfvFuoD3gHhWrYglkEIG7VeyzxtNzda4QfN6OEW2cvF/wmXZe/Ojl59NL64BU1FbgdXL5gJNIpw1jBB46g0XMhmGju9D+v+vRczVmZAzFWaiczTwG9iZYtiyVobF28br3Abj7CHXDSvfBl0s7QZHbTGSCvZ+csXPie1uIslhSYOlZPHk2QDL0Gwmy5nD/8suLurv3WsCoW2phB1t2ZZ/w2QzP5osyvuJdACFkZ/ZKldluoFObPesO967sI1v7/8VcgTrst7OOtsXIO7KcK6e4T3cA94xEv35CT1U17aRz18eroH9nAD6VedzCxFvkxA6nb3Uvh3palw1oJ7DIUV9uEDQFIHOtSQhXoaaWPz2NZgiTwyqvukSBv3iO5uoY+46kZMD5y34tDNkqZGniZSKHllPJvFe8o1rF2zjrGwzYNkPIxC/ln4TNB0PjlVmciqVYN/OZ1k96GvjVtgN8/oHl4RD7sopy5dl99Mg4t0I5hjh7v+i1cnkHgRlrg7m8uEpoBdgoaQ306vN38ZuvchV5WtIrg7rcKlJWdMDizFIu7zHwOJviIU416weR5ZPCeDslfz8rXSupXHbn2s3TJquv/jzt493/Xr4RLTVbGqi3tcF1qHHm2LLNAzCOl8NxpGCYbC2ir8B76nPJ1TRvORzCJ7KfxA +dqxLFwGedTEcUZtOIK2lE0tCizgOcVHAZl0/bh24X4EgakP7av26u6j6eGneV2/dci6zsJV8vkmyWEBOQUrRF3IlJDXYJEOOPus4YC+SLyv3vSBoimQ0vIHAKokmSWoV5PQ6w/vqDQ+7qbt7EdO2cQ99VKGcv/JInYWtJyCR4cI/68Td1z/dgoyS4rX1foJkFMU6QV53Jtnxfd8erv5siXO0NVhSbtbhnP4NkNYGEJDoPWRAasKL7SKtjbhcWLdk46GXv/fvO0n1iJNfr4lBPV0jbFxXdnUDhNYpGIg1xqZjVouIcjfPKLI8N3+795Wns0sRIwvb+em6nb0VPkgZARIbEb2HHJW7polCsBHf6U6AxdhQRhFN5BbFDdSUPLMtLRlBh39+8dugqP03M6tNTRa5XRQNlDiBlkFM7MXEdg8ua7n76iSrD3xGoRQogk7CoJFciQZJhDdaceRWP6+lvRQ+3WkBXzhYa//3fFcdTQJVYXZ979VRUefrT/V3vvCZVZ/oEvgPMOkmXkivM01a9MvDzho4OeLhbIiDcT28r/kzkLT8egVYq9P8tWCtD1gkUgtgqefEcr3lQnaVatPJV34Mfkgxv6fCGxbW0z3a1o3WGXd1W8W8XxSNX9M67o5JLjbauYbNJUXaKPzs3/cGkFaLnK7b8ZBCi+jCsos/A2m1SyuJtTIgGlojLYEjhWLS/o1uMH23WCI1bkG93bSO03XfhOw4n1PXwIP9I8EwmzmTBaSDyExnGo+XVZB3y/0v9uefPiZDIQhpHAOJl1GUWkT5SkHd6z8G9XJeBqbaXRHa3T2sp8LvuW8ijiaXI9jiIkLzX5vjv3h13BkXghSbBUubJMCBrzh8+xnF8h7uQSyhohXFNFWJ+ELbof7JIjvSDxpr/ROQlFTcyC5dGLtr/LcBj7outnFRd/MIsvEM6+YZ1sUjlKyNlpaQLdIgGYAkikWrv2ma1DOuq9dalvNFdlf4OExbCrLTCeTOhxQ6 +W69wWsP/V0Cink4gCVRSFNpaTNkh6R2oqVtkT9egXhOX272nne6/c+ulrMIWXk/TnLLFwtEYGXI5mqEnf0qpk1WwVnHdLfe/2J8sTN57MY+HujiLhERLaOHlzAbL7JX7H3Nf+pBXCE3CKEJ7uoc87KadptmUXguDJMdtBfJP1f+HLwJSFM0CZxQp3CaWt7/xfXgvV60tTfqCGUDOVt7+V671XwFpEcxI+yJ3nxvgNu8h5+U9ENjdwkCFaanxpIhuU8K6TI6gzIEyVoYlM/9unWsbiVkRlpSY93DVOU5bcoax1rx28SOfPQ+56rpDIdhOko52dBYrkNbC4qIVSJrHtnWPsVFE9HANeshFiwTReV7smhPJKdUmZBdGyvEpmlG0IXbNsdSCXlap3pMsjjr/uHdI/+C8jnhpfZF50HQb385xJklssMgbz2UO/9zfBrkjrc+IsFWE9XQLftpD7bP9XI2Z2LB12staOm/y373QWtQDTUTOUGORFqz6/XFXVU+3MBt3+DawdxoigNAQtkhc/4lrNUnmZlnWbjn7qCuyJVg35B6JFB6eE9QD13eZTNwJOkLpuXU8hXaRraKtZWxZHxx6N1qBDuvROb635HRWCdKsvHaJgHTW2dI0PQ1VWPMNayE9YK71gUJDpnCk0d1dQ3s6+zyh8H7p21Dt1nMJFW2NFtnMyxaOrA5+kLlSJNZgDDTwxBILgsdaOkNRx8uKIhO39V98dd9fZFY00QGn2g53J8u3CmoUC+N6uXl38QyB4nb3iO3uDh0NHP15yLHkMj2t4aMURfi3QP7TF9Yb3n1B9aAQ0Ew4sC0XMwdP8+/pHGDjAbNBgFzNRkjITkhuHXkIKwhAf2mRBrb4ym/72cfdlLYeobQ8hxZ2rLSl+SCY4Bo2zkkKQkDSEFonHjTsSRkPiDKbY4rq7qaze2/pyaxSVAggp/vu6uWisfWwTuhbN5LBaViTRRplJZqKhnaMLsZ0m7zCxiuypyLgURfv +cZ8htTh8NKWs3CzpEQ4RCc34H4YHWyAGiKjGmDwJ1CpTJtK7KN4D8r4XEyNOe0CiBAfqaRfEJlHOb7Usitv/hIfK1iOYJkSJOUf1Rgbp7P1FwM4CAxpDKQSh3/nqqOa/f8GtgKNRTinJf+Q1vDMrFpbA5tKj4fzIWsiQrKVznBJAuK/q7hw2Yf7qgjZy8taXFUgJBhSw7dTjbssYkDE0see5uhsKPcCDRkQ7dOFeuQuktdBKLeKZCp8BHyiP5pTWy3K2Qf7Ab2cvV1hktI0bDdFZgWReFDkvja+SuROWVAMMurvC92GFasiHvt+F7j10p7ikXWpl4/gmCxswIy5CwZABSUTTenD3Ze1Sp97/O/nS99bTyKig2q2iVNgu+u8439djMeJLd9Yp20krbD0iH3LzG+C1bNOFFDYyh4hMd7PeFC9rff/DixfMvCRYJCJuRS3892F7HlJ427gFd6M1Wmz+wCorAhIQ0pZhHADIHk6hE+bF5f8JyHa2QDlg+0l61JVnCNuTBuYCBx0Hd8ziIvyqtV4qZEl0AKvq0BfA0J02lsIhBzw9Tb3uVvGdFul0iUmh3AXzsmGj+2z6G54Thk6P/yFSCiDRSpr3j+nuGtHbyWfIFO9PtRt2/pGb1WhpFGQ9L7WD2NEYBfI7luXTeOm915+AxMvaq79/MfcL4HA6ELGGWJrJgTluvZw17vMAWo3hjhQZbika0dqWFm6pXX5elVZnapdwAUeOtfPVUen/8sLV6JYFFmnixTpeDvrtjycmKW3d/G3caQjFKmE2VsdGBghFfEJTDrZOIe/OJSDRDTQedd0D0n/7icc6dixbgbROuzMCAtg6MaOqJ9+DsOMTprw0d+8Z2nNKwPDvY179Ke7lWXH93qf9DzbucV3c1rI5Ghgl8KZCm3vcVyCwd3cL6e2q6TNJO1W1Zfv51LwGI4gSAhVN9bHBJvKRHeoP2P4CuY6j/1SmOA3dR8JFtSMm8jxcNqX/ZzOq3vkp +5hE3HZMjQj4gjLFVRHV3DXrG0zv88I0aTjLytEGBHHdnQzpq/V9euBbqCUWl2QhAsPdOgf10bU93H4TJrmxomsyGIpqVGDK9pxUwUbbOAe/+tDJfTzGyA8iMjIx7QLrTulba205LLsj46FEZHaphNfB/KhTzVnQFocKxJ5v49UREDLJ19enhrANBQP7QlZjOWtRj3cuCYEmLK90iuruG9HbW9Zukcv15RczxO4n1RlhhO619JbiIFdIwm5VMUFT7P5Oa9YUaUCG4EYybBpc53mLmzO2CfLtEP127+RHFsp5eSLqQXCF1jrVVxPZwjezppHtn3oprZQ2tSDQFI1JNWoXT4doJz466/+sXLqWxQ1SFCttl+Y/ihld+BD1WdaeV6VbkIHxkBAiWzE4A7WSa47N18nGat7KQkR3U8sC2uoAdcK1sgTLwICBhy0gw/i2QRIipwC6ZadInHiugyz09onu5RfZAGuNGoz9gQ6CjcL827uE93AN7u2gGvafzXLImcv/V5JrWJloTROuSDcgDmLyZzIEeaT8LYf93UGTcCFjSGycgmeHbRDGpTP9N8G9Pual6uAd0nwSuEU75MTmMFT1cwp711IYcuFbBi+2SkQFJ47EdMP4fAYkWAUR0DVQc2aSU3Wx+T7O+t+syW/dgWzSA2AOlkkCBDVVSstB1SqzNpIgeTir3RXFlBsRWKDyNTzwQIzu2DABIysoBJDPqjokxK2zMzd4tlFPiE+I+xAvYWA+NEoAfe6zoTs/iiUYShvyyC42bR/XwiOrhEtTTSf2U2xKXn1euPH4roaq52swbaGsAHJZgkmiHIiIQydxayB6thVDF3/8HL8icRjvJPwNKQeZ4uVmQsprNP8UeetZd28s1BP6DPeUBTiWmi/uKbm7RD7sGTvwp7kZ5S7PMmwBkR7B+IHn937GknrG+ybTWvpKXZ6/Y/6gCQIbSkl0ENZI8eTvmzOApgQUQDXzIeen3YbtrYchUB6nCXwDJ +XCul/129Vtt0Zh2A6u8LsRhaqEjxj8btkLR6rGBLxAjFLl6R3TxCeyl8+032eevHyMj9f2Q1mRtBu5HFsmSQxEKSQauYjGnWguyG+sliGv5Ab+nv//1F3pBGOAXeRDuDpHZeym0xL9t08mkvVS9kroqVPT1Wwe1DaqBjCAG2roF9vLQhe/+oQ/4j0bQQ21qAegAkZUKsxf87kNYL0TEgYmEbN4L2XH7GSwmLtKFFWcxyYD+0sjeiiyKyiwLiDe/tphnosWTtsXhkn7ShiCKFNf1gW88D2Cae7swi0QfKYzxXgWES5fF6sExaSYVyBirWjWGM5QJvNoZAXJSSDRvarRLRzc3fVqF9crLuH/NX+++5dq2oqQFyAZ2RyLlREARwhBWzOigZbenhWCRjCksoWgFkgP6vL0gN3IbneaPAtYkCKHFJm6jZfHLgNCWSDXqQHiIiWzFLc9duMT3cwh5RqF0XrLpZ3GSkUQgaAKToSlVZLZteHbX/Ty/rxagDmswhrMjypvNp/adq6Om1HvT8NeYFacKZBphA7xGw3AIedZ733pKV8cUtkKEAvSJxdQBJD4MI3HHyic4YyaY3acSPbIu864OzhvfG1SgoWgtztsR3utIjPSJtPKJwYxu3kIfcfPp4LfdYvDrmyK0bZS3lFlqU1g5x0hAb0X+otFWtYS1MMgAW4uqQGPXT+j/9839okTKA5DjewFmaeaG4TQ7ec3XwNPXDrjr2NBy4LBqVtPFC9vxrd48VPV39Bk5ZvuLYrVoLrRohXsJ8Am29o1hLr456/9cXrkdvST8ISAFAHrxTPGS6n60iwNYzvBstrqcMgtHDiJ60lTGyt/PyMZ8u33Ulrd5sHaeEY0B7GJAmmYeRBuw4/oT7IlvPwK40FY6Az5gbbe23PosWCFFh01XWDyPZs2itj6ON6jYpvKtXKG0EdA/p4RbUw8Wvh5P2GQ+tx+J1qw7dTCmtb+IRC3mDxGgfG+2GR5GQZUhsQbMk +AEYCkFSdOmft5z1RsU4/+NkD39/3YtJmZ//pJUCBLYKBF0paLUE7zw+ZpnzERf2QGxocQY96mhTWdXIE+SG3NT3cI3s5Lf9Auz6z2QjFR2BkqgVqAjwtnbrHXh11/y8v5n8QS+BXBYvIIek6m1U99svgHm6+th6B3SaFdptED3i0UYT1dA/p7urfy0k3/GP/iN+vVZpp6psaQaPN1AQC0iJawH0Dth56wnlOd2dvW1ddDxdVdxetjYtfN1d/G1ctjru7+PZw9u3h4ovjbgqNjavG1lXd3UXT3cWnq6t/F4VfV4VPN4Wuq5Oqp+vyR9yW9J201GVJXOyxOxlVBj0nGwTOIFuMopkDiLRCghILq9dEeKQdP5TYAVcSDMrdaQzrPx2w0OnMWOlD/G9hBb7Zar/sSvoPV8Mzw0Vbr4V+UF+tNVt4vqixJWjbAUeP7590nvmIy6LeLirKlNiDpiGsni4BDzn79HZaPmy6es/tvCZJMopIiGAzbCEcG0CA/AEsLWmikQUK3gxaahPuaY0QJOeOP9mL/qEPHvwQ3ecE0Yzum2UeKFzLb3rz+6AeE+Z2d1nWXaGyRSrCHsL0iMuyfp7LvRb/sudafrmBmBE9iIRCNOOGViB50QLuu/HIWbe5Ae/Ojf7HT9ETf4qYMDfynXkr/zEvbsLcmIlzoybSe+yEebHvzot+e17UO/Oj3p0Xaf383bkrcOa79NWKd+dEOv8U/KFyxdqTdxJr2+BFmeJAh3ELC/SO5Au7QLfp7ugTSZcSRrbui4VGnEMgAwCGDjCiJWAQHsOGhMi+s8INigAhsmrwKRMS+5xWPeA/UlkgQAk3kSncqc1sOnHt1hfL/D3m+Cp+ClTMi3CeF4ucbOK8FROoxDnNX+E0N1wxNzRwx5niNslAy0JpPR6tOmA3I+GROyMgWdDG/cmbULtQqB30J+sjrrF2kUGHT0C2aHk3vupoLWriJVAFC1yUQZTTy5rmhq2fOMtnwtzQiXMj +nOZFTpgf4bVs1fyVBzeeS8moNzaLspFqJ7YFraeK7gJJRi0Kte2GnPqmjIbWjPqWrLrWrPrWzHp9Rr0+q16fXYfj1vRGfWqTPrWxNbWpNaNRn9HYmtmgx/nZ9a3ZDTgNB/rcmpb8uuaSprZmgTb1I51gq9OJ8sGBkykxqeNFcFkRYH+y9pCnpTV81FsaTaa4ZN2CSisIaYUYqXAHUAwrqzhIWjikb++r0Aqh9Wb0OV0oEjAVTc151Q05ddTynHp9Tl1bbkNbDrrQqM9sbMtswntLdkNLRbul2SyZaRWQhSY8KKjTrAerjCChv3AbACuizYhxBAw1gNpJXoDdmCklK9QqeqFRrO3UfNYq0jY4b3rGSKPBklffklHXnFHXklPfmlunx3t+k7HaLDUJkl4QjLT5nuOI5JKKo+O4uANIE/uCrQaidayQIJqEghPBh5jXks3sUScIpSg4gDdH5DCyz62NYpaCE9Ewi0Xm2kWziR5EA0+GqmkpCcOBRE1oMhhYT6lXRHOYkrKe0YAqWsfWYlp7TnETEqHLqH6SJE0ayBxHwLOb07I3I+21ooESkhqTE4mdLiNrQFW0QJc0hVYU4FrGnFnv8D3eGVemhvGy2SwbaK+ZKFrQC/qXVtVDIUlsVD/000K7JwhL6xoRlpWQxVoDP/MB1HLC2ipMhiX7p+OzDr2kChkikAQNGMr06CZqGPWXdIPN06HxJgvb6SfQimuSCWGJmE1wMSBpewDbHcGzLXIcDIKKme0ONKPP0ANBbONEIxTUTHSBcAHwnLVeKjiNZiigvZxoMspmo8RTaKFHp1iQs6G38Om0cpDQQ5s5MEEk17gRWsPMjr6gBosWGX2hO7J1jTzJE5/QJAEtC2UnQC/pBAPLCelXZ5DgIaUWEc5oFSN6yAyUzuToElIXiNtM5g7N4oyQGLTMwLZ20HgbrTEwsz2AaAlyDXxjpJ0aVLuZ54wSZ8JNRQkpN7QU3gFhHV4M7cR94XfYNkOm +AxLuQi2n5QvWcQPqL8ONdJhUhlQRn3MkYVqqiVah/bgFyYwGj9o50UCjd6zxZGC0WZa9Cya0E5Wz1XhQJlROiHYAyUkcFfSPM9HucN5EDxvim2WhXuZqJL5GtlTJ5irZUi1balmpk80dBxLfKIgtFqHVLIIMki7glkZ6oAPu1y6ZG2RzncyhHnY+1yBzzTLXJPMNvNBgEfS0kJh8Pa3a7dBoHsrTLnONMl9HN7Kghno6wJ9ci2xplS2ooUXkmgWuVeTa6GRLG32OaoUGWcSFjbKliU7jmwVzi8Tpadsgj69qZfTFhAobJGo5mt1uJg4LuSMhahHEZllsoqZSx5upBrFFlOppz7KlRbC0WKRWaI/MwTDaZHOzbG6id3QKbRNRf2vHjfh6idcLFgPiCXkBYMmsER20+gpYHjC2SAaTpEedIq6yNLJu1sh8pSxUyJYy2VQlm+plAxpcKfO1Et8gcc2iRS9xBoE3mXiTmUIWWTIFbyuQpAWy0SQazLyeNi9zNXJ7nlhziy+5aMg6Xp+wu/rWtlqUG1vrbmytv4Hj7fV3drSkHjDkneQqrsmt6TJfLEl1ktBm1VOK3ny70FpuKrxuyr/QXnjWlHecyzvO55/hc8/y+WcNBWfayq9b2ssEyBHKCB9F5oauwsPAvFtMdVmtRZcMhWdMBefNBWfNBadMRaeNRRcM+Rda8y8balJFc5XI1Rvq81uKbhmKrlgKLlgKz5mKzhpRCs4YC87qCy8Y65JEQ1FrdXJr0dW2wtOGwuPGohOmvFOWglPGwtP6gnNtNckCXyuIrQLfLPF1poYMQ9FVQ+E5c9E5c+FZS8E5Y9GZ9rJT+pILLeV3jPpSg9BkkdolvtXYkNNSeMWQf96Ud96YfwbtbCs62150AfdFzfiztehKc1kybwDAxBOY0cB0oK80rkAug5xogyjUiIYSsTHTXHpDn3myMXF3Q/yW+jsb6m6ur7++of7aVpSGW9uaU36DEITKm3JDttxW +DkWEChpIzuTGaGt4B5CwIlkwmVtFUx1fl9qYuCPvsHfyr18mRk1JDFEkBE1ICH43PnBiUsDEZL93k/zfiQ/8R3zIhPhQl8Qor6Q1H+ftW1B3YxVXdQMKBfXnOQPbMNLUkn/1xrqFVyM/vhH9wZ1IryScHDE5OWJaYuS0q5Ef3NixxFgTLwl6DtgTl6GIQK6Vh5qW5J7/5dKKz25FTkmKmJISMTkt3DM9wiM13Cs+4r0LUZ+mnYgWW7NkY3Hx1R0XV3x7O2pqaqRHSqRXYtTkhKjJSZFetyO9rq6YnnUymKs8m/R70PnYz25ETYqPcb8T7R4f7ZEQ7RkfPfmPqA9TDwfzrVmiAONuktuLCy6uvxr95c3IaQnRU5MjFGkRngnh7rdivC5HT7+2Xd1adkfAmbAeY0X2lbVno6ffiZqUGOGVGKm4E6W4He0RHzMpIdI9iY7drkS/d3XTwraqFFnQM38LLaXVsnA/AhgXfCbfKOkzWjIPFR8PS1k/Nz7q04QQr4SgiUnBbycHvpEc+HqK/xspATh+NynIKSHUNQHSW/lx7vbFVRd/MZZdE8wV8IKwdQSG+yyS7X2ULM18dVLBkaDrQYqbPi8n6V7I1IzLV40qUg4vUg8v0IwsUo8sUA1HydMMy1EPy9GOyNaNTtWMjdc8fz3gH8nbFrfmnpO5OlE0wPUIQn1L7qlbMZ/e0b2ZonsxUz0yRzsySz06SzUuU/PcLe0rCb98aam4CncEdw+nz1gD/kefofSluSdCr/i/laYZm6caU6AcW6QaXaIaUeKNSsZd1b2RsU8tN6fKhvzisyuv+r2bqh2VpxmSrx6Rox6VrR6dqxmboR53w/et/APecvWFnKP+F/ydqDvaMVR8xmRpx+CE28pXkjb8JNQkw7PBD0mNGdn71PG61zJ1Y7I16ObgQlSoGp2hff6q9q2UHd58bRpcjsjr5bb8rIPqK7rXMrRjcjWj8iAH7Ygs3ahs7RgcoyUZPiMSfF+4 +EvFeU95ZWYDDR6SE7cDrmBgDB6fUy82ZZZdW3oj58LruH/HqV9NVz2eRiIbnaAfnagbnawYXaIbkaYehFKhxMDRbNzxdOzpR+/I1P6eEjT81Zh2TTWW01oeG8DstEhFCFEFQamr+2Hg9wAW9LdKOQClWDalUOdQqB9V4D6hSDqxUDipXDSpDUdqV07Fdqdq+RD24VDssWzvqD9+3035T8o2JkrmeF/QSX92e+3tK9PuZ6hchkTKVXbnGrkxtX64cXKYenKkdlbFmOld+SZbaKNNmfIeWXjNtFVuLC44FJAS8UqSxq/AeVKEcXKFyrFTaVXnbFasdbuueyz2wnIA05pefi73p/1qOzr5M269SZV+ldKhS2lcoHUpUQ1J8xpfu85ZrrjTc+uVmqFOWZkSJyrFMNbiE2uxYrBmWrR6TsuoTU/ElydIock1i9Z3szTOzVKNKVPYVGrtq1UBUhdYWKEfc9nmz7FS4rM/jEEeFBrE+IWPTj4ma5wpVjuVolcquUm1fpnEoVzlWqQdVqfoVawdlaUdeC3SqTdpFUZnsBPwGlIw4Cy+YZGN1S+r+G1GT43UvZalHFKmGlKvtKtT9y7UDSjQDSjWDKtAGFcRlV64eWK3qX6EdUKTpV6QZWKwZnKsec0szPmXLPHPxRcRjyovApTosUmyVpDahMTt128J47Qslage0r1Q9uEzrWK7pX63uV+vdt9K7T6Wyb7l6QJl6YIVyEPpZjUZrBlaoB1aq8KFDmm7M7ZVT9Vm/IVBLYCiWCkP24bSo9/JUzxcrhwH1Kg06iQsdqtQOWaphWWuncxWXZFHPxp4RtsEwWb4APqsvKT0RmOL/YomqX5WqL2mA1r5UO6hMY1ektU/wGZ17cKmsT5VNBWVno28GjM/1sS/T9a8k6dvXqHCXgZBLms+LZfuWyfXXDbn7EuO8MjSDSyEs5cByZd8SNeRin6MekhDh0Zb9u2yuBBHjSi6mrvo4Tz26QgW9caiBWqgc +yjWOearhicHOjXc2y1ypRW4WxCqh6lL66k/StWOK1RA3btcfpVI9qFptV6PsV6PqU6Lun6kZejPwHxVX42RzObqGsAF+A1ZslkxmcKjW/KKjgXf8X8vTQcXtIcBqZR9cWKnqW0nI2dd4D6r1HlStHFCNr1T9yzT9S3UDS7UDKpQDKpX2ucqRtwMnVl5cKZvKITgE3E4gBSOImbH44q3Y6anacWUaR8iiUjWoQjOwXNu3SkXmyD7pX6EaUK4eBHOkD1UDKtUDgHS5qh/QzdYOjw95p+5arGzKk8BULVX6nEOp0VPz1WMrVUNh2VVKO0i5WjOoUmMPB5i55hO+4rIstcDRk04RliylAqdvLSg/EZTq9ypEj75VqQdUau0qtNB9+zK1Y7L2ucIDS+W2VNmcX34+Ot7vtXytY6l2YKVmAOqvUQFOQD4o1WdcyW8A8o5YdTlzy/dp2tGw5goNmgHlGFDqPbBAMzwh2KkpfqtsLIU3MuYeTYyZlKcZXaUaXKccVEcWOahMPQTxJWnlJ2BnkljLS60SV23OP54Y7ZkGE4fDUNpXKwfVKvtVq/rVqEnoVep+sKpcreMd31dLTgTB/4NLImzApSKHt1ASWydV3sjaOCNNN7YUnsYbBj2oQk3yZIpuX0MusG+tsi9qgxesJovvX6HpV6HFXQZUeg9ERxI1Y9J3zhfbCglHlm4SkLQnm69rStt/K8wNfhUOEDoCIIETmkVKAeTUgyBW6CA8D5CohuLQt7BFlH7F6gF52uGJga+Xn/aT2zIpeTBXtuQeTo15L089hnyjEn7PvsZqxBo7AJm19nMCUmwCQWehkag5SCs9CrI1n4D0fb1UDfPtRzfS4kJYG7mvFO1zRfsZkJb88gvRCX6vFWgYkGpCCEAyvO3TfJ8v/W253JAotySXH9cl614oVMGr26PN0PRK70FF6qHxAW/VXFoJnwnVbk3ZdTt8Yp5mZLVqcI2SHFqlamCJZnCa7vnsbT+JNbdl +AYkWso4qfdq+hHAEoKGlAOAukGgneS80A75xYKHGIUn3YuEBpdySgasoqaJpc3AB5MS1XNHZtLhPMiniwEL6VWj6olRqCDnSdXKzA8tgM8zHojuEsZrsngHZv0Rtl6wZlrD+W64lG0z1PiAhO76q+tb628Fvw9jhBivI/gAnxNcP6gkMEHKzfZ/PDXoV4ZBcCsSBqqEpqn6wyFLVgELd0ES/lwoOLZOa0lgmV6XP/f1BIGEu1M//EMgU39fuAQm3DM+ptC/7F0DCCKxAQqyVKrsSDYB8sXS/t9ycgtMab/2S6IvThiHqAJ4qeC21Q7FqcJLvq2XH/eTWNNlYWH99ze3AN3BOlcoRN2J6DLAdklHPMR9ZnwOCLRKQZQ03NyUGvgMCggCGsI07AsUqbb8qAKmhDkK5IWv4tuwd84TaBIlrlWiZD0eLygnIGmPOkeSoqTnq4YiL1epnK7VPVWqfrNQ8U0nedWCBcnCOz7jcwJdzfMYWa0ZUKIcgDDN7hXrBOw6ARaXqhiWt/5JrzqDhnLuuVYJrtZRWXouJD3ylQA2hQxEYkBp4QgTIQcWq4fnhE5t/X6Q/pS5aOzVbA2WEROBJ+tXCuXv3gbKAQSTpnsvfv0hqTJJ5pNU1+py7QBJVqYZrRc/vt8jKKw8ASZ4VrMB4v0XCtVZrHgAyWTOOgESMNOdXnI9OIITuA5K00B6qlubzUgk4UUuaLJQZcg4nhSlyASQsW00mW622L1XZp/u+WLRvsdwUL7dlVZwJSfB7uUg9GKGxSu1YpiG6UaByTAp8o/baatlYJvJGGicxFFVfjE3yeb1QM4TiGfqlGginCiArteRX0eByVX8Ya4ZmdObGb7nyq7KlSeAMMEhBshDTsVS2pf2WFOaerx4OnYMMq9XPVGqerVTjwgGFSocs//G1e2YaLvpVbPky2/flMjUCk701BrOQOQBmk64ZkrrhS74xRRZRM9cBpCy0y5biyiuRCf4vFWqGQuiVFBTR +5/5VsHelQ45qbMH6r+Tyk3LD5cYzuhSfcYXaweVaO3iSOmVfUCEACaGn6sbl7ZknNyQQ574PyErVYGBArv+/AtLvdYrWzGXhKiuQ5arB9yzyL4GEX9LYwf9n+LxYemAZWZtUI1Rdz1r3VbpmJE4jYgmJwGtp7DJ1Y/O2zhSqr8otSYWHvBN9nivRQmQO5WoH2HSF0i5fNSw12r09c7/M1bNnsRhkfXb5Cf807csl2qFoFfOr5IdhjtSATiDL1ERcU1Z/aMw5IZvqaexNRKREDWb4qraUXSmhLvmqEVWqITVKu1riSkQ+EDKzlSNyVk3jcvfKzTdab8alhkwsJrwfALJCAy0Zlrr+C74JQBppfqEDSLFdNpeUnQ+74/dKgWYEeBHsFwSsWt2nWtu3Qu2YqXkhf+tMuf6W3J7WdC020e+VfO2wUq0DaHcN+qCEgwUvcEDal79zrtyYyICs1mcfSouZmq8BkI7UXPSZxUiwUACZ/csXfNVVWWpG4EAqeQ9IqcO1pt0HZLX2HpCpuueL9nVa5N0YCUKEM4lLswCjdgCQJfuXSC2pstQgt2SV7F+erBtXDMuGMqlBuPqDgedoRmUhnS0+I9bfyNr+U6p2bAkA1tqha6UahzIYh2pU1vovuIrLEt/C0SyqQW5OK9y/NEP7YqluCLIFqDJFNbhrWCdj+ISleiDCZJbPsKQYz5bkvbKpTuRp2JmnSRIeKt6WsjMl2KlAPaJKPQyBv45oI/I68A+HdOWIjHWfc1UXZHO2Pn13YpRHvhoRAXLrALIS0gZb1A7PWPcV3ww1NdE4XadFGgBkybmIW35v5KlHQh9xdg18Jkxe1we5CwJ+/vbZcmOCbMxpvL46wW98vnY4uooziQeB06MRGkdEhYJd8xiQjQCyLetAWsxkEHoGJDS3wyIBZBYy938FZEeMDO4AUmO1yA7X+h8ASQwQpIYBuZhipNggG0pqL8YmBMAfOlQw6wEJRCRDlMqI/cCYeVAo +O5P+61dpmtFIcip0A5Dn4NZlqqGpmpeKDyyTmlMFro2j2YRWqf5W7vZZ2ZpxpVrHMi3sG0CyVJIcGHFDOCdoEoDM1g1JDJ/YeGOTbKoWeAPNLrDJc5AdK5B56hEVmiFVMAY1WSSYfwkcsnpY+oYvLVWXZb6wLXNfSpRXtmZIKSkf2SJcDiJaOYDUjMj49Wu+KVOmh9zdA7JVNpWUnI2+5fdWjnYUMQJymH1q1c9WaPsW6QaD8edunUEImfORXyf4v5avGwphwRBrvfvVePdDWC3SDEnRPp+/a77UmChBdnwl2pEW5ZWnGVWhdvhnIOFaObjWfwFkxcmQNL83OizyPrLzN0DSmcRaQTcGIsIx17oEBiTBPViq9al7kiI9cjTDwQahHBWa/mVaO+SIqaFubbfX89l7U1dMy1SPLNPB5cIJQTUdC1TDE/zfrrmMdK1E4Np5zixxjVzlxawNX+aqR5VoHRBxK7VQHQdQOUgDSMCpVioHQCzwk3lax6Sgt2qQ7RlKESBpFgUJJc3t1JFrDZmYqx6GPJV1DYo1ANdWqAfRINGGr7mqK7K50JR2IC1qchaAhHpRtkr5CSovVdtnqUdm/PotAUkDuYQhASkKzbKpGMl1gt8bBdrh5Yg3KlCY/rVwx9oBADJR81wWXCsBWdB4a0O8/1t52hFoOo1rKOFa+6HnhZrhibqXcnctEJuSCEiuoj3zt/Rojzzwrr8CkizSCqTIPRAj/3MgTSxG/hOQsJJSjWOaz8tEdhiQEldvKbmQ/uvXGbAkclNoMNIyhyL1sJSAt1suhPBJcWkRrnmqEeUUjPuinRUqxyzViNsRHo3pB+AMRbAVziALtabC4+lxH8CY4L0rKCkC8A4gehUBI0p8EaoHAgwaY1LblegcUwLGlx/3l/UFUFaOiKsZDrbDIkMm5qmHwraoa+p+kDlkWKG2y9KOztzwLVd5VTYVmdIOpUa+l6UZXqJD3gXWArsnmYMSMyC/ISBpZUUn +kLzcDLJTcTYqye/VIu3gSk2fCk0f4ia4UjMIqpesHZezdZZcf1s25jbe2nTb/90c7ZgizTCkYuhDqcaeho60IxO0r+TsXAggRb5etpQbMn/LiPbI14yAB67yHgj2exfIjhgJIOUOIMGd8R+93wfk/ekHRXvGWh8EMgpAFsINAgB1P6BYy4aQkP+l+L5SdFApN2VIQrPIN4r1iYW/LU/3GQ8Wg9StWgmpDS7RDEvxebn+94Xmq5qUoNcLlEMrNHCV/RC0wAxS1KMT131hqrhKJJw30QCpuao1dW9ypGehClkBUd9qGnd0KNQOqYt5pSx0eKEPjUVUI5So7Mq1aMNLBfuWyE3pMj3DFihaRAnaUNWesis1eEIeEgQt8gLyEGXq/ugColWabkzKhq8tFZdgM20ZhxOjPsjUjiqB0rCEEkDiAALP1oxM++UrvilDpCnhTtdKz/gHkOcjkv1eKWayo+SUBmIcKilaOKQByG0A8haArL+9/UqgZ4JufKrm+WTtCyma53GQonshQffqFe27abuUfGMaAcmVtWfvS4+elEe+2h5A1iwHTR9YpYWLt8vWjM755Useeie3MCCFfwEkLBIM4gEg07T3udZzUYl+r4NCAwBrjKSIpRlUrBmS7Du++IC33JQq8c2CoJfbC6rPRKb4vY0wyRInO7BTGpLVjK3e9ZX++Mxk33FFStxuYB2yciXCpEOS9rms35bI+kxJaAFboVlPY1kjksgQ5yIQTqUDKbrarljlmKcb2fjrxNLo5wp87ZGYAUi4nyqS23M5YH91KWCt8My05QuZKIBM3ZUa6oRMtBJ0SYMEtC+ARCAs1iJBHJW87jNL+WmQneasQzdiPk7WvYSIWKgZAfpaiKIZmqcZmqIZl/Trd1xzpkS/anE3j5QAZFH5+fBEv1cL1Ug/O7Sbxim0CMIOCH6Z20B24sGJmrPPpe7xzd6+IH/7nLzt83K3zc/btiBv+/zsHUuSt6uKLm0TW4olESpc +rs89hPQjBwyCLHIQpMOoc3/kLbDInLWwyD9kqZU2XUnMz1N77gIZzPJIx0oVDZfAjkEHQKzg8dI0zxVDvi0psimvA0gdAQlviZZDVyo1A4ig+YwvA95NiaLYZEGdxpqWWztSQxV5SsdyZG8aJLVQC4dMZOVrPeq3TcvQjSrC58p+CCj4tljjmKh7verCatlSwQugrEaJgCytuBQTH/RGgWowI6tQSsdC9eAcv+ebd3xYtuLNXM1geHWYTi25+kHZ6rGZ676TKm+LHKmCwBsFoU3mqtrSdieHueZoRpInVz9bpe4D1wpTBqnO0g1JinYxZmyRDUlN2YevrvnhWpB7QogzyFFagHNikFNSyLtJQe/cCvS8tWWZuTkXrJXjOgfNZZGALOsAcmgHkGwQDkkuAlWqZlzW9plSE+horWistTQWiI0ZUkOq2JAh1aWLdclifYLYmCY0ZgqtJZIFrkwv81VtWYcyopBHji0DHjQCQuwZ4ra6VgKyohNIUQSQDEwGpL4AQKb5vVmqGlxJFnkPSHKt9wN5ttMiEWCg2lYOSfRvSJrOCmQSLWAAtTM3mPNOp636MJOGBRwrteCKSFTsclWOxRGvVq54O1czBAlADdFCZCZ2eZphySEKY+oBhDRBbEMiL5r1sj6/5FTAHf+XilSDazW4EWl5gXpodtD49iMzy9e6ZmmGQgMqNQ7wDZWqgbmaUSmrPuJLLiJIi3w7rXFH77g6Y/bhlEjPXBXyCnIkpNwa8CMSDvKfFO2Y/C3fcAWHxKqr7XlH2zJ3GzJ3t6fuNKT91p51QJ/5W3vq/vbUE635t0SukVaTWWc/MjIyCEjz3wGZph6bu30GqLwkNPK0dMVCq1RkIy05Qcv4VllsFOVWeuahhOYaaM20pbo98/esyPfzVePKVEMqlY5WICmBu2uR/xrIylNwrf8jkMi3kDmk6V5F7giyIwitIBpIBKXa25nbZqboxhURkCy5Zvy22Hd4ScCIYg0iEAjF +gHLlgBKNQ4Z2bFrcZ2LZFWAgoFMA0tIiNqbn7V8Sj3RTZc9yR0REx3z10KzQNw0XlpdumpaqGVGEDAexk0b47BBW4iPcDNkHZb6anv1O/NwiWJr50isZaz7JUw+jO9KAOFSnX4UK7UceMrCQhiFfSFrxfv2VaKH0uKy/KXPZMlcsm0qRC0hiDS18McH22iRgQevB+I5tdf8WyHTNc3kgO40pMtcEF8HWaNGaWvZYc5HFcCM9pJiG+Wm1FZIb2VLbnnUsPeqDPM3zZciWyGuxCkG1tfY5mjG5v3zJ/b+xSOQD5bBIn1cKDyilFmRa9IQH8mntuQUn/O74vJSvG0w+jfh2f1xCbg3WQMOYRPFhGYXwb7pXCn9bLDcmCUg5kAXyICnNXO3tjK0zUhD1yRzRKju4VthueuQEw43Akp1fJGlHsRg8CP2tAMa6kbeD/tEQvwGBhh5RAMrDWQTBJNWl5e1akKEdU0ZEFOD1rVCh9EPwRoIBgwaLTNeMSQx6I3PTF1WXI7nSc7I+WzZWiJZ6s7nJzOk5Sxv9JIlopuVZd8nOvwFS7ZiufSlr63y5IR1ukxa0cRxYHGphC90BI00K89B6kRbs0PJAAMnVtmYfTYn+IFv7PHJn1MksoMMiAeTfWWRHjHzjfwRS5YA2I/0oOKgUW7JkoZ2eoU/Bqawhccv1gLdzfJBmkMhoAIvys74oSJ2tY/rl2gE52iEJAe/UXVoJ7HmumeeMbLtDvbnkQsraT9M1IxDPqD1acEiHHM2wtFXuhtRVpQfnJPiMA5A0CkgT6Y75mmHx/uOrr0SBSwpiK2xA5MwW5KNtZTVX194Jetua7JeDsir7V3j3gyZVKwdUecMrDCyBiqgdMn1GJwS8jcSp7uoaoeK63F4K1wKnyIl6xC96EInI1n/+KyBBpe4CWa4ZnKF9IWfLTLkhSeYaJEu7SAv39BLfKgjtNGbBmyyCyUyPakC2RIuyLbwRzqQ19/eUmPeztePQJrSM +Dbvc71o/twJJz8qxkh3CsmOI7l9bJKjg8yUdQObfByRoFBIVa4x0QMqc4vtC/mFvqTULnl/ijLTViasyF526EeaZoRmBvLNCORAio24SlmSLcHTlyEHVAzLVQ5IjJ7el7Aa5E3g9aSffLnPVxpzDCTFTMtS4HHYDKSEFdMjSDkv/9T1z7uaqE8vj/V4s0jiim6BCYMVFmqGJPi+VHNPJhjyBqK8RXoyjgYUmvvJ62rY5NzUv5qodS9SDSmgMgQZYqpXQqn5lqgHI+oo1DsXawXnqkcgOboc6pW+d0ZywVW5IEQ3VItcq8SDAHE0XsUTyP7BIcq1jcrd8KzfckE3w1NZFkZWypZSmvy0VEJAs1Eh8rcw3SEIrz+l5qL+lXJ91MDV6KowP6VGFNwMSrgPpx78F8u9cqwMs8m+ARICsVFOmler3XP7vy0V9Ji1/ogWoiOWNYu2djI0/JGlGF8ErQtbk7a1LF9gwm5rWo5Ro7NK1SLe/NhefkYVqyvxojNSInuqTtt8OcUYyANFXaSElmLVDpmZk1qZP+ZLfGi74Jvq/WqQZzPJUfGWPdDZZ93z27gUsh4Ho22W+ndRCglpUNGf9nrTph1u+yC6G4kwkfojNFcpnKlVPV2j7lmjt0ItKLbyLfb7WMU03OF43IjnaufDgUlPhGSRCtPRS5GgEhS1k/g+AhJsCj9r2JVewvzphR/mNbZU3ttXc2FB749fam+tqb2youbm56s7mqvhNZXe21uedE9pKaSGouVyfeSgt8r181RgK/jR4i74xi9TY5fwNkJ2uFUCWqYf8Kf2wutb7gaQBgT8BqbEr1dql+T5Hk6N6ULk2WpnHwUm0yPqciuP+t3UvQTQUn9gkD2ISijXdRvpYqHVM1r2Qv2uxUBsvCvW0jJm30AYbc1n9tdU3fd/K145ko9g0aQXXilCXs+N7oepYy9WwJP83IEA0huIIWouopBmduu4bEc5MhD7BP7dJtPsMgalFNpa0FZzO ++m0RMopU1chc7bAC7eAyDYLlk1WaZyrYiDy8BaOy/VGK1P0yfRxuBL6SumO2pfSiZCxjTxjmhLsrzf+tRaZqRhVs+UR/LfTmig+u+U+M938nKeD1JP9XE+n9zcSAt+4EvXkz+M2LwS4pe7352gRaaGup1Gf9nhY5rUA1tlJlV+vdv+6/A7KDtXYOCPxHQCJGMiBhkQ6pvi8UHlou6dNlCVGAo9W8XDuIX8PtDdeD3snWDaPhElpRhgtpxgN0EaBC9CCTSQFvVp2OlNvyeVHPSbTCT+YMsqG46nTIHZ/xRZrhFSz6AEsaMtS+mLd3nlRz1nAzLingnTz18DKa4IN3BW+yQ7aTvOp9S9llmW8Gh4C/kWghnRlBlxISSz1fn9R4Y23ulq8Tgt5MhE7QlBxb2KHsW6umqYtqZZ8ydZ8yZZ9y7wEFGsckn9FXAt7KPeLD1cfLchOtzLu7rvU/AHJs0aZPDRd90sImwisWq4dDCsVq5MLDilTDi1VDCzVDszQj7uhezd4+X66+JcHZipUtOUdSoqflqcZWKO1rlg2sJfX/7yzyvwCSpNb3PiBBdl4qYkBK4AW4BS/R8xa46rbcwwmr3kvXjS5SOTKW2A+ZHAU8+EOaswV5GZkU6tp0c6tsquAkk5ktgadhndb8on3LE3U0+QyKVI3baQeUqIaC3xbsXyLXXzQlbkgJcs5Rj0R4g1owIPvnqB0TI91bMw/LlgZa7U/DWGYJyQxnpCUDXJtEuUSBWH259tqKpPVf3Ap4I0U9qkALCduDNFV790OBmZap+1Z6DyhROuarhqWrn0+ImKrPOCBLNTLtg/gL1joe2PyTa7VP1T5fuPFz41lVXvg/EMBpZSI8EsUYeCc2kqtxLNYMT9W+XLBzgVwTT0vohaqWnN9To6fkqkaXKe0rlwMGK5BsYlkzJnvtl3zlNVkG9SLWygI2A7IjRoam+b1V1gEkuVYWkAbQ9HUHkMmMtUYn+L1egHSCJmYBJE6G +q6TglAogDyql1kz6cWzrDjRESqmZq7mRvm0mzU3S+B/6yCaEASQb1AWQGZqxSbEfGnJOUkyVaUs1tQzMoikje8vMFNydxg1wI1q3V6QaEu/zatFRldz8hzl9R2qoR45mFBw7rQRDgqjum6d2TAh6t/7WZtlcw3EGStvoh7YBpInWC9IvZrYgfMpCLbpjKT9XejI4edUnib5vZ6rHltByBZBwezJQDa2Cq1QhSR1SqByRpBlfdjxI5srpMRrMCv4SSJCx/jREpxmAqIucKUX7XOHGL0xnVNnhb+cCSFoF4lhBq//6g8JUaB1KdINLtCNStS/k75wv1SPdbJDNlW3ZB2msVT2ynKIRrSJgKgLbss9Wj81a+xVXeZ35PdpFQ3Mf1BJmke2F5SdD0/3fRoykq4gfDqimKfj+oKNpmnHF+xbLrUmyKZcB+UaBFmEJ+oEzAQbe7UD2kn1fLj6kkloy6AEJ8GmyQHtlAGpLbtER3yTfV4qIJdIoLko1c62VxB4dUlTPZWyaxVffQXClrVTAEVgKLVLNzfRfPkPMowCJVhGrAj0ZfNv/1YqzgXLLLUsu+jsNVIjmKTV9azRk6zDfeN0btRdiZWM5/copjdKZeDh5sZ2xsEZZaqJpRADJlcjmPLk52ZJ9qOqoLiPKK0M9pkTtCAeGjlfBIhE+1LSWuAAcSjs2e+fPUns+OsUzyd0PZMT9QBLJ7ADSPl03rmjjx6bT3jkR7+RpQUBoEhyGDyDrGBmp1MKbDYWt5O2cK9Un3gekV75mZIUGXoJmXAEkrYZV2+cQkF9ysEgACYtEYSOtd4EsQ4z0f7uUgIRQgGIHkHDpqZrnHwTy9QLtEAYknUNz9DRj45ji+zJZZAeQtHucimSUTeUNV+NSA18nIGG+VEBcgSIBWap2TNa8UH5II7flyFJ7J5CCLDRZis+nxL6XpR1NSSTyd23/Su3AMuDk90b1pWi5PZkrPZMR93mWamw5UaE+VepnoSgl6mGJ +6vGVRwLktkLkbKKAuNjc3phXk326IeNwY8bBxszDTWkoe5tSdjSm7qxP29daeFKqv2xK3lSw4fNMHZI3OGqE/760mkSDKG5XpB2coh2ZvPF7HskV7SAj0RGQNPX6AJDwgdbZdmIQcK1p2lFFmz5qP6tKCHsnXTeUpk9Z4gUPU6caUEdLOvuXaWkhQcGueRIYGk1jVRCQMZ75mhEEJC017rDIe0BWUYyU6DnyDwLZVlB6IiTV7637gGR+nuTyF0AW3gckWgIgS7UgOy8XH1BKzWCtevgfVE3TPADSUt0Wvzkt9B+FmsHlBIlVtwbSzLvKrlgzJEHzct25cNlYRD+wR9Yo0YZJrk6fcSgx0jNTOxLpEwEJX6cbVKYcnOL7Zsv1GNlwky8/krv2s2zvsWDp8A2Vmr5gxWWqYSnKl4t3L4ZnFvkWZKW8uaYy88Sx6C/O+TtdD3C+4ed802fidb9/XPd/+w8/p/P+U25sWW6uuSG3pTRfiU0PfgdNggSoQjIGRJCBxVogMjxp3VdcUxptCf8PgSxV2YO1Fm/5zPBHRPK6z1JCXy+EvZMigyDYIQEHuapV9yvTOaTpxhXsYmt2aEdchb4DyOEMSAKeCk0LgOz8B0D6A0iKkZ1A0jA0XM2/AJKlHw8A+RKAlJtpiI5NoyOSSGzssLo1cWtq+MR8zVDk4AxIGnJCr0EywdritePrLsbIxmL2lA0IB9dxsqWq4c7WxFCnbM1wwA8Hw5b3AUjHLN+Xag/OMSVEGa7oimIVBaqRVdRs1Ilz+oOdpaufy93wrQgOKDTRNBZX25h+4Gq4R6p2bJF2VIlqOAJtrnZItg6EcXSC8rW0dXP4iutgQMasA6lRXoUQIHl+FsvZGvESzaB0MJL1X9HiK8lA64A6gYRrLS4/H5no/9r9QKI1DEiHdO3Ygi1fS3kHjBk7ag7/nOPzHHF3eCQ1MjBHptGwSPs03diCXXOkhgQGZHknkCNIQ63pIKRGtMUuVzMm +65e/AhK6D6P5j4GsPBuV6Psa2VYHa6WRmhoayyYgSwBkE8sjySKhJAATGWFtS+L2lEgXyA7IUc1oG1vPXq6xB1287fN6NUKauVISjQQ+RSBONpdWXVkdH/BmnnZYGa3Y61sDPwTsVfa52uFpgS9mhL+eF/pSvg9ovD0+rKZJrn4VSBs0yEBGp658nys+RwMmBGRda8rexDDXAhUShEG1pN/9i7T983QD83WDM1SjgTpfcUU2F7TnH05e9V6uagTaiQBJvB18R0kjKpnq4WnrrMshkZh25pEEpKmo7GwEAakZRmmyNUYSkGysVTMuf8uPcvV1WZ/Sen1Vqt/rRdph8GaMuyLS2Fdq7cC5GZA/dQDJVbblHEqL9ijQdgDJLJKUgyySgPyC7f1okth2+A5ySEAa5LbcspPBqX5v0mg7A5IpOAGJGAYgi35bRECac6vORSfBIhmQ0DnchYCkQGKf5vcyAQnXKrSx5diECG0q5uqaE3cmR7rk6YbRSgvKE9BZWDNZZL5u+C2fN2ouxdH2UvgG2DA1zCzr88pOBMRrX87XDC4h4wCQfWvJwQ4o0jrk0RyIQ6l6EPINWrRBk50D8S1OK9XYZWhGJUdPas/6ndJrGvKta0v5LSXUtUg9DKbGzqRF5XCYhQBSPSpr3ddc1VXZUmrM/T115dQ8mrZ0BENGCK/yHogCD5elHpH+61d8QypZ5F0g2eIrK5CvF1mBpPg3iLEY3GNwmuq5/M2zZGT6hrz6G+sT/d8u1gyF60BnkISg3QCylIaR4FrvAlnRlnsoLcYTQIKmQlIdWHYCmfnLZ7SggS2++jOQ+tzSk0Epvm/AIikYE2vttEiVY4rmheLfFsstibIxu+psZJJvB5BkkQQJQU4pU4dFplPmQDsUqXoKkwAyaWdShHOudiiIw10gq7QDIfQ83fCbPq8TkMYKSTDKxKd5CpZN6QV7lyRpxhVpHMpgu5SnP1Or7FOh6gf8wCTZzGLfKmVfuD74 +KthALXgmjcjYZ+nGJoS5tiTvgX+mKT9zTXvynuQwVyBUqkXiZFfnDfMdhLsX6IbA32Zs+I6rug4fYMk9nAkgiV5RjgCzITdJi1RA+0fQmp0GWg55Xx5JQBbfBZJYKxthopyMiNkQZKAMSMiuoPHWxkR/ZJNIivvUKZ+FX6KTYQTIwXXPIUZKjX8CcqQVSOuZABLYZ6tHZa79hCzyPiBZEgkg22GR/wLIQcUE5IsdeaQxp+oMgEQ4oAGBCtKqDiAh2XtAdlgkdRTOhzxb4v1ADgKQFFkfAHIVAckj/eAoBxX1Ys2dzE0z0jSjS2irG2hRn0plH8BGC89omMK+VD2gTNMHylRJw7YOaAMb+iEXkqMdeyfg3fqb62VzGdIYWiGQvDMxFA0YhbQNnLnOm3xmqWZAntYxWTsmbcO3XNU12VJiyf2dATkGRBLWQoEJAvRGmATJAJDf8g3g5PfnkR1AIkY+ACSuhOsoUw1J07yQt2U2ZfqmvObb65P83+gEsi9LJZkRaBzTdc/l75onNiT/k0Uiq70PSPXAbM3IjLWfWCouyFIjA5LybqZZiNsGuT2v7BS5VrBWcg+EIi3PBZAlqsGpAHLfEjh5ZF3VZ6MZkI7MDuDKrLdAKLUDa/2Ta6Weon4LgNyeHO501yKp/cTsO4C85fNa7eVVsglAsgFueghFs6X0StraL7I14Cbw2wNK1cCvX6WyfxXtHLWntcXwjboBJdr+LI7QTBaSNHS2XA3HOzI54M2q81EwA1lskfnqtpSdSaFOoIHlWlIjiLFajTSvb4FuEPKKtHVfcJUXZUuROfdo2ooPcrSjS3WOlbTZAXj3q/KG0Q/K0gxP//XrvwLSWFx6JiLB77UizXBGdh4AEqlV5rY5cn2CbMpqub06JQBEkWIkG6yhuXI4+goYLlvXSgPEfAPFyA4gh9O6qfuABDAdQJafl8UGiR7ueRdIuPsHgKTG0OwEagCQdiXqwcwiF1uBrDoTkegLpm0F +EgS9E0giOy8XWdOPe0CigH/WEpARE5EQPwAks8h83bBbPuMZkJW4kDZs0LRJU3vuqYSY93PUw8to3dCAMnU/eFdmlIDTrtzboUTlUKSxK6YwaV+tdqC4rkUqSZ4WDiPF98XCw2q5LVuWYJE1bSm7kkMnFEJNGTa1ShILhUk0WzsyZf0nluqzsqXYmHM6OebTbN2oEu2gcti3ui9IWbUSHnsgmzv7mm/8E5CcQTaWlJ2NTvR9qwjsmUbgKLVAwgdjqlAhaxmTs+1HuemObM5uuf1LKlnkcOsCPavjBlGsYAvS8wBkIyyykRYoMyDzOs4E3QIkSL1pDWeWbkTa2ulc+QVZbKTxKvo5eTQIfpVZZFt22YmgZJ83SjSUVyDeIGDTpjAKhA5pmucLySLhWrMrz4Sx5ZD2lUjANX2q1cSNmZtySPF5uWi/Sm7KAh5w3R0WCV2x1Dcn7YBrBUUkvsY8CuO60MUBBZrBN31frblCQIq8QaCfdDEiLW5J3Z8Q7p6nHFauJNJRCjpKIPUrUw3K14zK9n0xzefFNN8Xc33GFoOLwijBE7Uk+graV+uQoh2XtXue3JImAUiyyF2JIRPzoUm0G5BsBjpaprJDAE7Vjk7d+KWl6iLyCHP22fToz3K1CKWwKFpsR2snaTWQY556BFgr14w8siNqWC2SpgXKzsck+L3JFvpB7mSUbKDPEffI0QzP2/ipXH9JNia3Xl+RqnulRDmMnUZ7dGFq6FuZbnCqz7j83fOkhlSJdmNVtuccQvpBK1PItfavBOOiMaN+Fdr+mdphmWve54tOyHyVxLfIgl7immW+ReSMApxPe0bJiYAkvzcKNY7l1HrkqWznKexAPTBdMzYf2WrtFVmfUHUqINHn5UJi50+z5WgdlKpYZZdMrlUjN2Yh1CHOUTfJJiXZXN+UtDshUpGng5bg5H60ToB2fJKpFWgB5GvVV8Fay3lLu4Um9VtlS2UTKF7QO/nKwRXeNBhURuve+paq +BiC5Koib3Hha3XgxsOFcYNW2H7J1L9ImZJZnWxcelCAR145N2/yDWHdLEutJMil7E0Kcc3TDSnX28K5M1LT4qlA7ME07Ih00sOysbM6xpO3LoS3f1sy1Y5SuUulQqRySpxqWuu5TrjkZ4N0DkpdaZb60/OrKhKA3C9TDacaVDPmZag2yK7sK9WCE1pxYN3Piajl/T9VvczPVz5XSTrn+QJH5d2Q2DqU6WOS4Qoi4Ppk9HKeqPZOALFAPYWHg6RrvPrXK/rVgFppBBeqh+THuphsr+aJTlpJL5uIrxuI/zJUpYnuViPhqzCk+HRIf8HaBZgi5FCL0oF2DEIHgZDLVI7JWT+PTNsqFe8p3fJuuGVNMC+nBMoAiZDewQjuwQDMoOeDlkt81ZJG0pY32t7PBHTO4RlPizoRId8RIWidAQ9uwHtoRXaYeVKAddtP3zRoCsliytPC0/qEReW3VmbB4+GqYPm3+trrxPiXqAenacSUHQKGvyeYMWZ+mv7UxNdQ1TzWkgtZ+9kOX4QzLkL+rhqeu+cRSglSyRrZUGNL3J4W5I77Qni9Nv0ptn0pNXxClYm3fHK1DesQE440Yuex3/Xnf7OC3C1QjKsCeVBAd4IDaDYQzz1MPSfv1E64xyfqQvg4gOdBrvqr6xrqEwLfzNMOgUGDzNapn6lTP1CIxUg8uVA7L0Y7Li3IuWe2V4fdSvmYIW7SC9ANA9gPfgc2VsxhZtHO+XJ9KrpV2Yx1JjZ0M14o4VKt8tk75TJ2aOgYLK9PY5/uOyYmYkLVqUvqq91JXfhC/8rP0vT6m6jR6ulJ7Ucnp2AT/iYW0o4xoDnwy4CkFkOp+BWrHDJ8XC1d6lcZNLgh4pVg1uGJ5R4LF4jp8A0KdY7zfS6XHdMhkZMRgGgtA9GVPLeOqWxJ2JYe7F2iGkcpS2oD6HdhuOnuk0fG6N+sQIy0lPK9nT5pqkVpyCg+qE/2eL9bCB9LuDgTjClWfIrVdgu7FklMBoA4y +VyYbSw3pB9Oip6DL5YgjOI2tHQH86ZoRKbHvG7OP4u6ggcasQ4mRk7PVY2EkQIjGUdloKqqFMmVrRudGuhX+8nFO+ASaFKNlEuTJqtUIun0g9nL1oEzt4JQNzCIRNe4CSQ/8s9TUxW+/EzwhWz0cpL+UFr33r1c+Xad6FoGkVOlQphxcrByc7w165gBNLNfSzCIzNQAJ7wpTGJyleb5kB4BMobFWvrI151By7CRahqt2RJ5UC/MlIkeyhuwKvQfkqR1yULSOGdoR8doXU9d9Yyq/SUrQXlp96dd4/3cLlDRlRkAixFJa9myFtk+xun+hxiFXNTh3uT04JNgjrX7zHlCjHEgUmtIAGmlL9BtfcSZENhTyotH6jAIaDaDBtsbWhF2pYc4Ih2xDBY00ERtQwffYF2mGJOherbscK1lKLUKbGfEbDr8+LXP73BS/saVQX7AbNk4GvpOvdbyJu1xZCYYpSQ2QoSn3eHLslEzNULb8AH5iYLmGRm2ytIOTwl30idtlUwlcgrHgZELsh5nqMSAW1kQFyk2cy6qIqsF5ylGZ6rE5qiHFlFahkWBDhDSBTbe2z9CMSN70NUdBl5790gGkTE8Ba2jOPHwryi1dO7yYluoOq1ba19PkBgIPUS9aCbHcrooelkKLMNE+qBtJAUIkPwxP4pitfq74HpAV+pwDySs8s7QjizVDSzXICO1qYDe0CRlSo8VLFSwswbkhFqb5jMta/zltXuFqaYICWhVCxJJUm+IN1LZPpeqZcvXTJZpnoUZlJE3I9NkqFfSUkVXKgmDupCuF3sNSApxrrq6hbIweLEdP5KSH74mibG5tTtiVEj4hj5bDgDig5VZTtmNDdIPv+LxcdyVatpTyQpuFHpvdyFffTlv3NbSNHmfiTY9jKFfZwS3n6YbdDHy7PmGrLFSJYotkaRBKLmas+ThDM4z2WqNObxhQn1J13zyNXWLAa43XV8mGPImrMldcSV73FShkCTJ9IsywRcQF +yrBRcJdyesKMQxlFUNojxZw5W8FM/sC+VDUsTf18yqaZvD6bPRaPTNJqkUZkIJba23fWfZGgGwv3UqocWuXtWOM9CLXA9is1NOjOHgUALUbuj3rtS71RHIpV8HhIIgeUgtxqxuXt/FlqyKTVMVwVgEyN9QCvge7TGhlKV6y7eaEKfRDV4HzARauXDypRD6XF7MifKi7JfC0yBH3uidsr30vxGQH3RZNNtEwE1kaeDdiTjGgvO61nhAqDYEPtiGzT2DcIer981ajkiPdb0g/JYi0ntdMQK4CkZ+CD7LQ2x++BfeRAvdiaK1hzLVgYCcgxXzsC6UfNhWiYDliYQBO/DVzhxeSVH2VpRlYqHau8HRB6ilWO4KJIEG/6TdSn/06DqFybbGyWy2/lrPs2TT26VDmscrlDJS1spBVyeSqHZP9Xqs4EyYZcgWsQG9Jy9yxK8hkHvSkhKg5dhJzREcCPLIuGb+iJFXDgWoQt+Gc4QvtiyiAGlXk7FKhHJfm8lrdfLRlLBRD+u0N0bGmqES4+76jfdZ/Xc1UjSr3BZSA1gMfWDFLi369quX2FN9QWTn9gtnJYrv/48hiXLJ8x+bSrbVCxdkiy7sXsXYvEpmxR0MtinT7ncEqMOzIeBIlC9aAS2odFKTNCeom2L1gMKq/xdqhaDm0Ygfiaue4zvvwyrbg0NYmNGWl7lvyhezFXM6wCOEHWtOnAsULJHlRBCRJaSKWK9oeg//YVSvtyjQM9UkY1MFkDhZ1trLwuy00AQ6Y1t7wo8eRdLY1NCbvjwxWwMDSsHDSHrfYoVQ8s1A7OUI+47vtW1YUVsqGMuLTULvN1rWmHb4V5IVxVeA+t9HaEypaQE7bP8hl9I8ilLfc4smFRaJUsTUi1s7bNTtKOy1c6QuIV3vblyiElyiEFqmFJYNcHlGJLJj3tr6209tLq24H/yPAZWQCeSOMGcJvUL9g6bIbGs1SgP2y1jqpPOe1SHlQOg1H2R9Kcohl3Lcip +7sYmmatj6nkXSFp5bkFwas85ER/3RaLulVz1iAL4GR/7fB3ZOKRG4xdKqKFjntYxRTcqPtSp9phGTl6f/ctnSZqX8zVjcjRj7ujGZ+5aLDVn0Si8UN2afThxxWQkRkW64UVaxyL14GLNsHzt4AINEiY7eJVSYsijylQj8zWjk32ez9j4ORuaAlEyyKaahvQDV2Om3fF9CZy5VD0UulXiTcG7jB7SMrSM3Bc8BzJ0fDWkRDW0WDmkUDWMhlHUY64EuZZfXy+bS2gVBT00lEeYhPLS71NwNU3xu2+Fe6boxuZoh+ZpAAm0cFCRbmiubmSmz/PXfN+tugDWWsG2QtBWutpb22+GuGVqxhQpRyPPRiJfpHLM0Tgk6sbcjJxiLEU2XCfIzbzQIOvT039bct33lSyfUUXqIaXKIcXqEYXUwbEJ2vGZW+fz1UmypUU21vElV1O3zL/m+1aadnSedniBxqGIxvmgJUNopyINY0Hvrd6uf6nSrlTlUKR2KKAlS2P+8P9Hxt7FfMUNmdcjM7735Ct60imoHd8mtxY0JuxJ3TgjMdQlwf+lO35j7/iOS9OMzVaPy1SOTdE8H+/z/M2AN5PXfFJ+LkKs/gOEu+aPDVdDP7ype/eO7z8u+kxM3aMUwfhpQ2FtY97pK7GfXPN9I9FnfJLu5TTd+Azta+naV9N1L2VoX8zUvpKheyNN+3qG7vV43fgrvq/f3vR9e/UtWWhiW0rbRH122fVfEjd/fzvMPdH/7WTdyyma59LVYzJVYzLwrh6Lku09Lkf1fIbq+TTNiymaV1J1byQHuaas/b7w7EquPlm01NIwG88J6CuNHHE0kMvX1icduB710U3ta4k+ryTpXkr1eSHN54Vkn5cStePv+Lx5VudaeWUjPWVToARXNleXXd1yPsjrtu8bSbq3E3RvJfq+kurzYpLvS1d937q5+kdTebwstQhSC49k31icfjT8jJ/LLd1rqdoXMjTPp2pfStK+nKQb/4fu +3Vvr55rLb8nmRsncJLeXN2acydqjSo15PzlgQqLfK7DjNPVzmcrnM1XPZavG5KpGZWtGZGpHZGpGpmueS9W8lKB9OdH3zdvhUzP3adpyT8pt8BnQUfZA2g4gabeGKPAcZ26RTLWm8oSmO3vLj4Vm7V6ctmVu9vofc9d/n7Hxh7Td87KP+FRc2WDMvSQ159GkDFfL12eWXttReDqy8ERY7qmIyqQDQnsV7R8TjW31OfmXNhaeCC85FlJyPLjsRFDZscDyYwEVR/0qj6AEVh0NrzwaXnUspOxYUP6J8KKb242t+WwnF9wDx1taRFOZqSa+IfX3qou/lh7xL9g9P2frzOwtMzI3oz3fZm78NnvD9zmbZmVvnZu7Z0nhIf/qc6ua7+w1F9+S2kAOEbf0UFD6/V721GX2iDT0vLWlPKHw8vrS40HlxwJx6/KjAZVHg8qOBpUeRTtDsk6sqMu/JnBNHD2izyKZW5pyr+adji45GVh8IrLwZHTxybDy40Elx4Pyj0eWXdvPNQFyZDht7FGujTXZl3NOxZUcDy8/HoxSdCKw8KR/0Qn/ghOhxde2WhqyBUsTreG2tAqmBqExuy3nZO21jSVnQ3MOLc/aMS97008562dlr/8hZ93Xmeu/zNj0RcbGb9I3z8reszT/SEDVhdXNqUcgc4meMgIhU2ZMDKAzRtLjp3la8G/gRKPAt9MjX1sK5doMsSZZrLolVt0Uam6IjfH0VCtjhWzR0xpRFOICzbKxBgmD3FYEri8ZKyQLkmj4Mk7km0RjmQyZthTR06Vac+XWfLk1S27NkFuz5bZ8ukRfKOtz8JWkLxbMtbxAPyohsJ8XZBu1DRKcG0dPc6BdLI0pUl28WHdHrLnOV90QqFW3pJp4fCg1JElNObK+WDZW09JFzkjLutmjS8Dp6FGFtL+E0g96yLC5WTKUUhtasuQWtKqAWthSKuvL5PYyqa1aNLfygsHCmelBgOimuU4yFMntuazBxXJ7odyW +K7fkUdcMMHqOuTfamCaJJtHSLLVXIgrSySjtBTRWbs6WzXmCuZy3NIlCuyDRT5ryMCZoLezBhBw0X9Jnig3JYu1tseaWWBMv1iTxtXf4uut8zU2+Np4WHyEnhpzpCcJ6gTexn2aghUgd85EZGRk0XE1uxyTRc5jNaBftk0YH+HZ6lq7UyoNoATC+ReJaoQg8CUaARCBtnn7930yPcYbuS3oz4opAz7ymB1+L9PuPEBtPzymFcQAVnNYmsUdI8bJ1wXUbDdlDQ+m3/+AEjZxooVV19PBqBDZ64LNFMAoS0G2VzK2S2A5aQavFIALRgGol3JHa1iRxUCB6TDRNPEENIFnJRGNyIuII2slxRPAs7KcM2BQjh2v1NGUvmui5fxw90BvaA7kIHD3knWNtYA/lNgBXtnegjS2tgJagm+hIG1IUgWgU7oOTzTRWTEqILphwiQQHgJuJkJiel9vNdGCmp2AJAj2YnJYPorW4b7tAO3LaBL7FzNdzCC4CJI/2GwS5RZRaLVwzxzXTjwfxJo49EFuikA+XSg/RgFl2bKuTBHomLBUaXaae0gwhYUVPrKc20QOr6RmcAm3xA8el1jI+jzNhPvQcIHxjkkwmCQZNz/FlBs8ZJFO7YDKJZvqBZLa4XaCHdOMEEjkpAgwXvaUdXjzUn37eFB9Dq6CtnAXKjmphF2gcazI9oBc3I2ujLY+oEDWhmEhL6BjNooYyLmfh6HHy1okVQAd/bYajpCfVEtC4nbV3DHj2RHheaIW4cQ7yTag6IU5rNaFhFug1PVWcb+fg0NjgAtSDfi9YAjxm6AU9AZoUgp6ESw0jd2KWoYjAViIwqbcWqxWhB5AFdQTprYF6h87Qc61RM65BVKdnogs8gDfybRZSQeqzmTfSFjg0jMap0EnqGcF3b6wVJsbu0mSSipssGTVtmbX64hZDM2wBKkQGxsRO2KIFpEgdj8qF44H0LfAnJjgt/GOUTSbB1MqJxU3tufUtNSaLgbQO +jsBEIuBN9Mh0evY5+XHCAbelLnL00wTUf8mMb1ATekefmOAA0OE2Qa7Wm4prm8taDK0wLrY01AIbgtAgHMFiEY3s5wBQNekYAgW5Lwn6a+0vU35ACznAtUKXrHIVLaQsZEwWyNAitLUIpmqjObdOn1HTmtPQVmG0wHsYkXzSE/gtRs7QzPH5jaasWkN+g6GJ40ykHPSUfTJ3QC+yf+mRPLTnqt1iKGxoya1paWxDb3EHjv38iVGkPVlktWbBZBAQgaQKI5/bYMzCTesNVUa+mbaaQmsMeh75uLmgvq1cb6q3cPlN7dm1bXXtHO4K4cMTMGfQObJjIcOSG83Sut//mLYwdsLMMOdZIR8sCt989GqDmcKgUcIt6bH87JcCgLiZEyEjiE0GDrB35rdkMyQumxBSCppb5oWt+XBR0PH4rFb6mQV6mB7b3kyuD1KEsMkc4ATY/hrIiCPzArWg33cySkaoOQwRWmkRzABfL8g7j537YNbPoet3VLQaYOu0hY+qox0xFsKD1vZTY3AveGneCFGYZJOROCtaSFYFh4h74ebWc6AiIAQMBgBJlmyUxEsZ+bOD13nMDXaZ5e8xL3hB1NaU8oY2+ulcjoQu8bcKq74P2uDyU9jH6pVnUnKNiLroB22Lgt6RZ2aaygEGuP70yoq5YaunztOduZNBv0WBuEgNsHCcgTO3kQEwIG8UVM4M2eA2N9R5VrDH3JB5IeuTi2vYI8Ut6PiGw5c8f1wesGnf2ZziT9WR05eEnLiVAbdAv8/I5gGsa7sJSKgsbpPX0OY2y//Rt7/rO1nZx3PpY29+M2luaFp1Sy0vl7abS/WWKoPQBJ8tCTUGY5XRVG3iqtq5FgGuQGwzSw2tfHm7pYQz1cnS7armt75V93P6Ye3J+GoYk8FSaTBVWTi8N4OkW4S6dkuNia+xCBVGc7XF0iCKNRaxvJ2raDdD7/SS3CLL1ZxQ2m4hTTQJTZx86ErCT6Fxqw6eKjNYGixiZRu+ +4mpMQgsvN3NCrcFUbeBrTWKdgWuxWFoEcyPPlRvQbHONgWvmaaqsVhBL2iwVekudQdCTZpGBkmQhChitKDXxUvCuE/3cZj3h+nP/SUuecv3J3n3WphM3jbJs4oC6qVWS9sfnjfjUu/s7M/t5zf311O12GATEZ/XUpJQUMhBUmzip2Mifzqv4x+zg/q7fbb+U2IwembhiSLLNUmc0GciNwT/S6NHKwxcGuc98bMJP/b2WP+30k73L9xtOXG/khXbwZlmO2Xfu6dc/mKaM/vWPNDuv78dMm334ViZcFP12P614gHvtBFIifi5l1zS/+bXqcee5rpp9Cs3eR9+Z+fa3ASdSq9YevzUjdNPX/hvnR+/ZfzvvanHDsrgds8PWLYrbNSds3a4rt3P1/Mbj12eHbfvEd/WMmE1br6atOJ44bOryp5wXfqhdtze+cNHq3TOit85ZvXdm9JaDCYW7rqTMCVobvu/CquM3ZoWu2Xj2xq3qNt/tJ74N3vB90Grlqu2XMytulzZqN+3/KviXr/x+9f318I2Cxt1X074N/iXq8IXbVfrw3Wd+DNzwtd+6hSt2n0orPZ9Zvih6y/zY3YtWH1oQve1kUm6+nl9x8MKPIZu+8lv3c/TWQ3cyExuN4QfOfx248Rvf9ctid1xOzocsTPCwFO9oTARANnCycuORpz1+tvsk/P3wEw7Tffq5zVh58BIsEiHAIpoAxvpLKQOnK3solvSZsiR07+VGCggIYYhhCG80Ww82WW8Uj1xPmxm28fPgHcM+D+0/efm6S1lHUsp+XrXrU/8134Zsit57urBOj+t4Ua4X5IBdp/q6zXX4MPCj8NODP/B76h/fhe4+XyfIBnp0hLz9cpKdYobr4tjAEwn9J8157Rv1pZxqA1CEGtCiCvbWASScniwhMLz2hfpppzlfRR2fu+7M6OmL3lsUteFsxsQZgc9MnDn0Q80zrnM/Cty64Xrx2I+WPe30g93khc86fzdpSfjOmyXO +s8OfUvxkP131lMsMj0VxS9ZfdpikftJ1meuSFSFH40d87P2k+8/PTl3+uGLO19H7f1p7tK/rD56q9Z+G7h3g+u381ft/uZA50HPGwKkLBk2da+f63fLVR4J2XR7kOfPZSQv6T10+yH1e2P47ms1n+jp98XnQ+nVXc+w95w7wWmw3zftp55kzYvesPJM+ZMrCZxQ42ftZ1zkLVh46kFo79pPF/bzmDZm+/Fmnb78M2vrL5cIxn/n08Vw88lNtv4lfKlftqgUxo5gGg0KaCe8qARX1+sNPucwb/lXMnC03Xp0TOebjuetPXATkIGAI1Y2iHH74cv9pS/u+H9DXY9nyX36HEwIDAPfoIDXED+WCeuO3fuuenvhD/0nez0zSDXhPE30q54fIw0+7zu7/4bKnPBeM+WjhwVtZAANybxDlgN2n+rjOGf1poHLnHec54eOnz/v10IUmkF0EDlk+nZI/aurPb8yOWrDtj34e8z0WRCaXt5I5gh0gO7ai2UF26IHicmZt2+tf+z0zYebM2ENXK42XS2tvlDXuu5734qcaxw/V36+/0neq8u0FK1b/UTbqE63DdN204GP9PJeO/z4w+GDqy1+HDPzQ94u480M/Ur/yTcDm27Vvzol5xmth5NnEHSnl+HD4F+FTgn5/2n2Bh2bTN6uOPek+z123+6OIY8+4zP5pzTG//bcfd/puwvJ1rqqNT0347qvAXXPjTj6tmDdBuVPhe+AJp9mLNp5fuulcH+cfPgva7n8o8cmJs1+bu25a2Kmn3ZdM1W4OOZblOE378pxfP1lx6UnF4k8D9qy4mNt3ypwX5kR9GH34Wc/ZrotW+h1MHThV9eKsuMW/3X5ywqff+q6oaKOoSRsnIQsmFKQI4btO23kseNZ9+WSfHYEnUnclF6U3tOohcUR4Sa7mJe/Nvw+Yuuj1uRv7eyybEbYtp0nfTpkpXCtoFa2yBpAp5fpJS+KeVCz08jv4/MzV/acsCz2RPdVn75OT +ln8Qd3bkDzGDJi/YeD6hlUme/Pme0/1d546Zrt12tfBWaeOd/IqyBn0bh3wc1Ei+kV85/gv1899FfL7i3LOKn7/y2VDQiDwCvJ7IMnnWu9NYCJAAMq2m7ZWv/J52mjlv1cEiXq6T5XpZPppUNGK6t+OnugW/JfX7QP3mvNi4qyWjP1UP/yzgxw237T7we+W74LCjGa9+E9Zvqubb1Rdnrjqh3nHxeIn+HwtC+06es/l25v6M0mEfLBv/Y9TP6y+88OmyT4K2fRt35EmveQqf3dMjjj+rmD979WnV3tuPw0Z9N38dc2DsJ0u+j93//YpjTyt+nuT72/erT435ZJHut0vLtp172un7j4N2a/cnPj5xzj8Wb/xq7ZU+HsunaLaGnsgbNE3z1tKtC/dmPeuxBOdEns995r25I2aEKwJ2POX+o/PCSP/DifbvLxvxRaDqUPw3UdvWHLlYbwa/J4AAJFEdEcFeOp9R+qH3avvJS592m//q7NCIEzfy9WaDJIMTwziKTNwP0dv7TVnyfujJAZPU05RrEmsakdVSoII8iSxDwnJyRZvH4tVPeSz7fM2l15dsGDBtUcipVE/d7kc9lyoCDwz/MszOa+6G0zcQ/5D2NQty0J4z/V3nj/vI50B8KdA1yDK4DOiVkbfgOLW6eeKckGFfhDppDvRRLFkQ81uFARGBshe4EfKsd1kr/kTYTK9te/lr3ycm/jB75b5zBfUHE3NOZVXsuJk7/DO13afaBXsTBnyge2PuirgrxaM+UQ7/3O/79dcHva995Tu/X6/kT1H++qjTglGfBM5fe+Z4QeuVBvGtn4IGTJqz9WbG4czyEe8vH/9d0MaLWQdu5RxIqZi38cRjbjPcfHbAIp9WLJi55qL3vqRHXH+cErh5X1rlzsSCQ4VNs9efe9p17ge+23/Pa9iTmHW1tnXp1mNPOv0wPfQ35cHkh5xnvrF07Ze/XHjKY4mHZnPgydz+H6rfWL5p4d60Zz1+nh68 +O/xS4ZNTl/T2XP7Y5MWPOH3t8nPIxlsFr88IesJ5zqszQ7Q7L94pb0WGD+JKz8OFY2STzq0in6M37kssQWR57seoxxTzRk1fcOhmGoAkjivJGS3GqZq4fh+o5u5Mt/8w6J05UVdLavUwLGYYRHvoeSlyUnXrpKWrH3db+vGa868vWd9/2s/BZ5O8/HY87Dr/SY9FTzvNHeY5a+OJPwCSSZLrRDl436X+bovGfRyw8VLOyYz8Y3fS0subkGWxFXxSXqvxQ59f+7zvO/yHdX08l/luPwPHQL+hRe6E3Op9QFKyLKc26F/8Vvu08w/fR+5csG7fiE/mK7yjQ08mjPlK5/CxZslvqYDtzblRK6+WDfvCf+jn/jM2XLf7UDv+W/9j2Q0n89u/jjxlP1XzrOu8jwJ2HSk0TZgXOcjrp63X0w9nVwyZrn71m9CTGbVNslwiyJrtZ55VzPTy3fZh5O9Pui2csfqP5b8l9XaZ4eW/fX9m7f600uPFbXPXn3/See4HAbuP5LceSCm4Wd+u2nHySZcfPw75TXMg6WGXOa8vX/fZLxef9Fo2WbMp5GTegOm6t5ZvXrA38VnPhR8G7g89V/z05IUjvgv2Pnw7+mLy9ju58S3irviy99Qb+rvPtfOa47v5aDPyGxpFopwdEoEqN3HCqt9PuvzkM8n7lx/WnBz+mV9/99lxRy+3iLAP2KV4s7Lx3XkRz3pppgaeHDAt5IWvg87klLSRJdAvXlEWQwPzALJx0pJVT7kv+2TVqTcB5HtLQs9kevlufspj/mdRR+LO5W48n5RcXg8UcTJiZNCe8/BMoz8O0G695jY74JWP5q88fKUWboDlGJVGcf6KA0+7q5+aEtp3yvLY49cboAE0fMZmlHHfu0Aif4PfSKlte+UH3ydcZn4RefCz2P09FbPHzQr1PZY46gsfh499Fu5JG/iB9o254XE3yod8FjD0U7+ZG67afaB59Vv/rTcKIo7dXr4r+cdfbgyYonzp +m9BdKQ0TF8QOmDRvy43MgzmVIEHjvw05i3RXlqs42W/zyX4usyf57H4/+sQT7otnrr66fO/th1x+dPfd8Uno1oFuX34evGXGqqNPKuZO9t/zReQBe/dvlm48smzb2SddZnwa8ptuX+JDLrNfW7bus3VXEHUmadYHn8ruB4tctuHnfUl9vH6e7rc7/Gzhs5Pmv/lzXMSl3AWbDocdvnokq8Jvzzm/g3d+WHv64Qnff+K7rlTPkRNDjoj+Qy5EdqTl63Y97fTV6M99f9pyZeRXoX3c50cevYYoA7NDRnQip+z5r3wembjwMeefH1UsH/6ZbufttEZa0UVjSGChSChwnFTdMGnpyifcln4Sd+7NJRv7TV0Scjprks+mZzx/XrQr0f/A7WW/7ruSUwxDtzCqHLL79FPuc4Z8HrR46+2xn/g89e53gfuuVOKmUCARaZjss+3CU67LH1Jo7d9fvvVmVg39UD2aDeDYODkPJbRaJJytLGfX6l/5RvOYYoGrz34Xv3093Ra//FNs4LH0UV8GDpzu8+OW289MWf7m/IiVfxSM+tJ3+Cfq2esvOHyofuW7gJCjd17+Vj1omvbbNdeGf+w3/rvQfamN7/4U1c9rftzFtF3plYM/Ur72lc+5jHIAidwxZPvpfk4/vbtku2vA4ccUi+b8ckm978ajLj84q7Z6aLc87fzd5yE7YAjPus1xVW2f4nfgaecZi7acW7zt/DOKmZ+G7A44nPyI06zxC9d+GHvmSc9l03w2h5xKH/Ch95tL1y36LbmPB1zC5qhzOX085o+fHfdF9LFnXX9U/BwRduT6kPdmvDY7dOn+5N4TZnwSuO1GefvhG6ln4tNrWk1sJEEGa1VtPvSMxxyHT4OmRp5w/CLiWc9FYUduXc6v23c58Up+7ZYbuXZTFzhO13wUunf45wEDpi6Mu3DrRkX9bxev38zMb+UEIy9BOZJrGr2WRj/pvsQ98PfnZsf1m7Io7FTaVL/Nz3ot+Tz2 +4gtfhwz2+HHzmWs408yeeBiy4+jTk+YO+MT/o8hTQz8JfMp5rv/+mzcqGw5dvnU9Pb9SlCOP3howWfWI05JxX2h/z6y4Ulix70rCjewStqceygB/yoBk45hyWVOb20++j0+c8ZSX9zNTlL0nzHZdHLf+av5r3wc/4fLTyC+Dn3SdO0Xzy8YbhaM/WDTmw4VzVx8bMnXRK1/7xJxJf3tW0JPOC4d/FNRn4mz3OZHn8/TTlq59csIP05SrYk+lj5i26K1PFl9Op0gOBh938MpA5zn9JmmefV/3uOuc2auOxJ5NBX6Dpirt3/Pu4zxj3srDui3nB7rOtJuyfPA032ed5/nsva3cdvGZd778MmDzmvM5fVxm2U1dNvQjv8ff/emb4F0rzmQMnDL/3cWrFu+41dfpx090cdtulg5/b6mdx/KxH/k99da3H6k3/HopZ9QH8/t7zHn++7DHJv4wZ9Wh324Xjf9o1gfzNMkFNWCBiG/NnBy672wft5lPuC/q8772UcWiQZMWRh+7rfl1/xjXz5eu2hd2+PZT73759qzgo4Xtnkvjnp7wVeCBs6G/nRilmLo4LKbeyNHzOkQ5p77lM93KJ11m9UMyrZhn7zFn1ZnUr0N3POU8c/jH/v0QeifP+e1KEmwXjFlvltYeOt/fc+ajSJ+maB53+nmAYtHK45krD198QTF9UdDKKknefCVt+HuLn3x7xjvf6f4oa/XfuHeE0/vLYtY1kjGacM8OINmiJKnFbFl7+PSkn0PemRH07szAyQsj1h67llLTrtt4xGNBmNPsoKmLo9ecvH42p/xrVdRXyvDYgxc/XBL+XcDak5mV/ttPKeZGus4OnzYvNG7vxcIWYfWBq1MWhH6tjt50LuHT5ZHzfWNS8ipwQ6TB1zOKv9OtmfJz7FTVGvf5gZF7T18rbZgRvN51VpjTrKDPVLEHr2efS62Y6b/OfU6w65zgz33WHkuv/OX49clzNIGbDl4vbp0Xvt1zfojz +rMAPl67aeSn994T8aYtDflq5a8Xx+KnzAv1+3X27rM077sCk2WHuPwZMXxi+/uSdG2Vti1bscJ8bPGFm0PtLo367kXk+p9zzJ+3kWaqkgmoLaAKNyMin0wq+C/gFzXhjpt/bM/2+DV57Ib9s5f6j781YEr792C8nbnjMVP0cszWp3uiz8XfFDE3ckQu/Hr88ZebP4Zu2NZk5pJNms1BnsIDLeC0ImbI09r0lMR8uDj98u2DrhbT3l0Q5zwp2nxO4MGpzankDzZLSbBl/O6doZuivE+cEvPtjgPOs0JlBO24U67efvTp9zvKw9XvqJfliVikyX48fg5ZFbsutN687cHLq94tjth9EUCfWTcMGViApIRZMgrmWMxe2mDNqDRnVrQUNxnoT12w21ZjF3CZTZl17QTNXY5FqzJbC+rbiprayNnNhU3tRk6HKJFSapJwmLqMGf5qbTJKekxDKi1osBfWt5e1cYbOxokmvN9JYstls1HN8WbMpv96U38rnNrSVt7TXW7jKdjGn1pJR216qNyNWNVvkSr2YVdOeXtNc1GapE+RyvTmvtqmsRd/MiTVGKafBkFHXWtwqNPBydTuX19Ce22IoauPyatvKGw2NZqnGIBU0mPLq2kua0QWhnpPKDUJWvTG11ljcwiEylRq42N9Ofr4kML2sDjkigASzqDMLJS2mnLq2pJrm5JqWojZ9nWgob2/Nq28s05sq2tGGlpJmY61FKG4y5da2Qwjl+LCuuay5xcBzAg2WiwbcziznNJjyW7jsBkN2bXuVQaizyIX4s86YW2+oNvB6M86mIV+zxaQ3myrbTTn1bRB7dp2psk1qssgV7W15Nc3lTSY9L9SbhII6c161ubzZ3GKRq5rbC6ubERFAuBlp7RwQoL+QAklmk8yB79L0Dc1kIcsB4BY2tC2jq3AaJlGk3yhlU10wL+s7TVXQ00YoZcYntIeDzuGpKvqhWutPGeNDGojg2W/tso10NApB95IkNo+D +k+kudF+RBkBxOxS6F21uY+MmIPr0vGUBHswoiyggfmaECIF+F7eN7TFHhTSUzy7H+dQRehA/UkY6Gfk15RKsqqT8vBlK36C12ysaIXkigRydg5bDQ9EJaLaRHphlNNPUDOsdSYlqhgRRm7WzZpp7EkwQFDWNnrPPcfRjxewHqFEkVg8TIOsvtZDmZNAiC82S0lV4h6ipj1QtmkcTEWZUjo7QTJ5V5h13BKMRaK6OGkPtYeMBDEiZ5rghZ0gPnwNiJCREx4nZktMF5Ox/ln3ifkh+rd+y+WVWK0GGGmhGjU2sADJIm6aocSlOtsrUWtAfnEZDY2xQAkkYoLKw86kmlpPRTag6yu9wNhWqlkb66Qzk70QS0WCWiRN/o+lPnnUKnxCdo17QPVBwQNfSldR9Mj5RqGyqu5WRXVLb2m4ULLwFlsGxYVMB7aUr2E2pHhqNRYVE8lmlrCrqAhMXxEsqB59KU+gkXustrQVtYViwPlF1rG/URBCTzq9YzVQ5Xugu/oL4wX/papqYgWAhXqgXtYzpp4kmwwVERyBHEsKLAfn/f/3/+kuW/z95CcDpstdZ8wAAAABJRU5ErkJggg== + + + image/png + iVBORw0KGgoAAAANSUhEUgAAAFkAAABPCAIAAAAP5v5+AAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8YQUAAAAJcEhZcwAAEnQAABJ0Ad5mH3gAADo5SURBVHhetbsHdxtXtiWs//XWfGtmvulu25KYiZxzzgAzKSrnnCgqizmAyKlQqAIKOTCLyrbkdmhny1YkKWl2Eer33LPa4fXMu7oqFguoqnv33WeffQrgtnf/r9vbd+/W375Be/fm7bvNN2/fvN1c39zY2Nh893Z9c/PtG/zc3Hi9/vbt283NNxsbeBP7xo3Nt6/XX2y8efXm3frm2/VX6y83Ntdxic03b3A2e7X6xd/i7f9V7b8GizebG5ub65gw+2NjYx0/Nt+/ioltAYRt/QgaTkHHC2gbm3j7OvbrGLH9zRYC2Gy19+f8F7T/l1jUx4ql32CnVj/Ebt5sbP70009ffP3V1999+/jhoy8//+Lbr7958uSvTx7/9cmTzx8+eowDL16uvwQZXq1j4kBiA5TZfLe+8R6OOgIgF8u3X3AE+9jWf/2/b/8iFhgEu4h/b/UjbAPv3779+eWL777//uu/ffXx/QdLtfm7a3dK5XIoFimWyxRBEvFkCv8IOk3nKCo7MTUXDMXJVI6kC9nC/L0Hj9fuffLlVz88e7n5ch3IvnvxavPFi5dgzOvXr3EvbFnE8fsGewT3rA/p/77961hgKGj1MdXhePny5dOnTx9+/DHFZNKZTKlQpJMkQ9F5JktRVJwk8oUCyQJBMekcsMhlywmCJkkmkcgQySxBlnwBMpOdJ8hCobxcW1xbu/foi6++g5Q8e/b85YsX6+vruMWrV6+2MGdbHZf6kP5Iq78Z23961r+IRX0oLBG2QAEEX375ZaFQiMfjJJWKEolcPr+6vJKl0wUmG49Eq9VqJB6jM0zEF0kl6YAv7POGpibnfHORJJklkzmfLzExHUuQpVR6PpNbTGcrlYWVYnUhX6ktr915/ORT +YIEJAI46Fmi46WeffYad92P6A62OAtr73/+x/SeweH+ZrYYRvHjxAih89913q6urd+7cKZfLlUqFJMk0k8nkc0yWKeQLpXyBodNlEISmwQsKbCGz3plANlOIhBJEIp1lKul0KZUqkKnilDd+azwYJ4sUU80Wa7lKtbq8ki7kM4UczsNdHj58+M0339TXAGMAKZ49e4ad9+P7vfa7qP0nsMC16q0+jufPn/309GmtWs3lckAhTdPgRZIgEkkCWFA0FQqGmBQ9X64Uc/lAMBiOxwrFUiFTzNC5cmE+GibTdNE3F8vnFwKBZDBE+iLUxasTvnCKSOdz1VpxYSEQj2YrBTKbSmfSBEGEwyGGYV68fIF1+feRAJr34/u9hvdj2Iiy+n794C/bb2OBE9CBPNtZb7A1AryAqGWFkE4TSRIzDIai+UIxEo3PzQWTKSqTY1JUKhGLFbLZeeBUKmUyaTpDUxTN0DkySYeD8dGR6alJP7BIxDOBADE6OjfhjfnCVCyVT+XKdKFMAdksEySjRI5KM0wySabT6VgsTlPpR48++fbb74DC69cb7Cj/WJgAuJ9//vnHH3/Ezr+ABe60AcOE1Pbqzcbz9dc/v3wJVH768adMNp+gMjRTTKULM3MhmilXF9ZIrHOQjMRJOpPKZEGUVDwezeUyVCqZTiXzaToWDgGvUCiSTjO+uVAoGItGkuihIBEOkUmyRFIlCGe2uETQxWCCTmSKsUw2lmHiBEiUiURiFJUOh+Jz3nA0Qj55/DmMGyKmnk1YJd9gofm1xi7jFpXq2/dHf9F+GwvWI26+xR3erL9993ITuCBZvFpZWkVAJGkAUUIijMRTxQrUrkSkmFCUCIYjBJlI0SSVTpEkkUlT4VCAwWqSOJwolsrzC4uYEvJIJIxXEVaZXK4GLMYmQrF4Lkpk42Q+SuZGZwKz4USqVJ6LEd45fzyBKCFHRycunB++NHQN58aiqS+//BYLvA56/KP1+KcN8/9le3/0 +F+23sHgD84z+dmP9HesCv3n6dOn27YWFlWSCKldWs/kVCP7i6kNofm3xNp0tRDBcikqmkT7jcQJZg8rmmGAwEAr6UyRRLhXisVgqRZfLkJgCzAV6tbIELMKhZCZdCkWZOX8qmmC8ASJBFeJ0PkTQt2bnQA06k02R1PT0rMlkVSp0GrVxoH/v5ITPOxv+/LMvMFTkF7Q/rh3/tLFY/FOQ0OBukMdhh5HEv/7xx9ryyuSsLxZLxqOEP0D6g5liaY0pLIWiKQBRWVjKFsGPGp3LQCYJ6EWKjMSidDqNFFMsFJcXF+E6sLalUgW8oJAtKkvhEBGPURPjSK7RSCwbjjKhCO0PkbOBRKa0MB2MeeMEkSvE4kQkHN2//6BSrjYZ7ehSierQwZORcGJsZHxhYeH58+fA4t9j5Ndm9NttG06rUwvb/+MScFEvcI/Nza++/z5bLgdjCX84FgolsN4zM7HhqzNjE2GSKtNMKZ0rpnP5WDKZTJOZYpbOZ3MVhA8dScSz+Vw2l4XviLEtnkymCoVSAskmkcoypTlvCME/OxMKh9kYCUUys7449NcLjOjcbCg+DWWgM4i7iYkptVqrkKsNeqvF7JTLNDqtNRIm5+b8MzMzX3zxBcYPODAFNIBST73vZ/LH2jacg5NhYOpXQXv/yrt3L549x6ufPPkr4jhBpwNwSwQVi5HxSOratWlfkApG0sEwFU9mYkkacKRgpTDLdBqMj1NUIBr1hUL5UqlQKoMICJtwOIIdhAnD5KgUQ6WyiTjlmwuHg0QwSNCZ+RhRiBE58CJG5pJMMVdbTpcrITJ19/6D8+cvKhQqndaoVun1OotErOzr3eudxQ0JJCmswqNHjzD4+opi2LA/v5zLH2ksFkARlumXBKu3jfXN77/7AbEajifJTI7M5OMEDUr7vdGZ2QhTWCBS+QSZhXYGwolsoTo54wtFE8E4MR0KklkmnkoFIBAMA7uJ6EmSFOBAjEAsMplslimGQwn0UDCB +5BoKJkPh9NRMPBzLROKZ8uKdXHU5RmXnkEIKpZXbayeOnWxqapZI5GqlHpIh4Ev7+/Z5Z4OBQDAMMINBZNy6EwM7sLTY+Vd4gR91OFFKs9X0Vn7CFXH84f1HmAmdKyKDxlMZZFCGqRCx9NLyvUyh7AvFoJqhaNLrj6WzZWynZiNwjmPeuWQ2W55fLFRruVIlkyvAHGSzRYrKsEkxHAWxY1EoRSoUjIMdM9NBmipALK5cm4EikXSJzJSofNUXJUMpejYap+jMgQOH+HyBXK6ymB1qlaGlibt78BCTKfn9Ab/f7/V6A3ApBAEHDCBACijIfxoL/AcI9V+2nipsvtp4tc4+R3n79dffpNPZNDI8FrNYZvJFOlNkmBLyWTRGBiOJsYmZQDB2c2RyZHQ6kcxkmLI/kAgn6FShHExCRuZLC8v5yjzKCiJF50uVxeU1XDAQCEciiXAkEY0mc7kyNGZmJjA9hRmRk1PwEGmQLJmtRah8hGJQps1Fo4l44sTxk2ol9EKr1Zg1ahOHI9p/4Eg8QUaj8Vg0Fo3G4vFEMBgiiCRQ2LLF//kYef9zqwGLV+uvnq+//Pnlz19+99Wdew+xnsFgFHmUJOlcvhgKx2e9gfHJGWxjcWpq2odCMxRO+HzhcnkBACE7+MKxMM3cmvXH0/kAQqhcSTG5ENJPmq7ML5CpDExqPEH5/OEIqJFI4VIXLl4en5iJhKjrLC/IMFEY9xFTmFe2EE1RUZLIMczewT3cNoFcopHL9TKplseXHDp8JJqITU3PzHl9JVaSMjSdASIPHjyqSyc8x/uJ/bH2H1gAQ0TYKzj29dc/vfh5fmVx5fbdUqlGJFFS5TJMAfKIcePWmEA2VyaSaQBBp/PF0jzsVSyewgwLhSqUJZLO1NbuVFZW6WIJ2SJGkv5IKMWgPINBZxIEfEeJorMTk7OBYBRbdFwzHoVVraTStZlgKp6pxdLFJLCg0r5IKJfN9vf2tzS1K+U6Pk8mlWgaGtt2 +79lPpWmfPwAulUoleFnkIYbJQo+++grC8QbBws7r760+zd9o/8ALoInQAMO++f7HLC5frlWqC0wWRSQmVSVQR0QSSPVJkqboXKFYw8RgI4FCMIT1oNABDauyxWJxeSnBZJI5RHQhxaSTNElmUrFkAsUKky0CVqAwPeMDuNhBHxubPnL41MmTF2d9xHQglcwtTAYTk4GoP04ghZEJor+nTySQyqVaoUCpUZtlcs2p02eDmH0kms+XvHCmfohoBCEDhV5eXsVUYDgAAVSj3t5P8tfbP2Cx+ebtsxevX21sPvn8y+rSKpMrZZh8vlCGLUhRaX8gDHXIFypAB/QOhhIIiq0VRk1dAE2QbAKBKEEzAZJMZDMR1CG5TCJNpfNZOpsuzZdRthdLtfmFlXQmj+WMxpL1DkyPHj3Z1NAmEMjbeYopHxGlyxMBYjacjKTSZDoX9Pn1Gh23jS8Vq0EKAV8uV2hPnjozNT0dCIagxJFIHOxAQtmCpog8de/eg7rdqCeUP4jF+zdtxcjb9Y3Nr779oTK/XFlcXbl9L5srFIpVMpXGSiaIFMYNIMqVWr5QhUyAERSdBwTgCOBgU2exNheKJWCwFhbT5RK0sTBfjZPwC4lsKUdQZKWyuLC4ioiDcECMoBqxOAmxEInlba08oVC2o5FzZvgWWViajaZDyRz0JhBNzk7PAAuFVK2U68UilUSsVqr0l4avjE9OghpIJYEA3FoULJmengEo2Wwe2rGVIv8lLNAAxM/PXty5/0lt8e6dB3/NF6uQfWg1nWawktFYgkimKtX5bK6Yy1eQX4AC1BSqUSovRKKAqcQ+s8sUInQuDqZk8gj4Ym2RKZRqi8sUk43GkWqLdS4ACFAD0QFSnDl7sam5XSqVa7QGiVxrcHRPhVJXJ/xDN6bowsJsIDY+Ot7e0sbniIx6u1plEgrkao0RJa+PzacBQIDQABZIIkglOALHB0e3unr75cuXyCmAo24RfrvVsUB/Ly1Pnz5b +Wr1fW3i4vPYp5kbRTKFYRiAkCHJL/0lETT3I8RJ4gWDB/Le0IwumECwWRSI7D7uULi5mSkupbHnWF00jwS6tIVqqtUWoJkgBOgARwFGbXx7Ytbe9nS+VymRylVSpFyqNMxEKqWTMG0/lFoJRevTmiFgg4nNFyCNIIlyuRCpTT03PTkxNTiFOpmf9/tCW42XregwOvhZhArzhvupw1OOlPsdfa/+ABXjx5MlX9x5+sbj8YPn2k1yhVixWV2/fQ4THUUEkKUwec0DWADSYxuTUHA4iiCAideHEPHFGLF0lMrV0YSVXXUvQRX8olS3Mo5xlchVcEG/+9xhBB5q9fYPtHEFraxuXxxeIlRqLZ8QbHvcnwmRxJkiibL157YZEJJZJlGqlUcBXiIRKoUg+OTUzNTPtnfNBNUOhsNfrI8kUsJid9SKnFIvlXC6POqWOBdrvY/Hm3es379ZZt/n23Q9PX6ysPSzWVphirbiwms5XCDA7V0kls7FgMhKIYnTRUCISISLBRCJCwEcn4xQyRCZTSiZzNF3KMtVUtposLLLPb9O1fHE1kMwSleUwU54OJuGtfJFkLJmhmAIYFiUoP5sH4m5PZ1Nzq0DIzpfLE+mNNti2a9cngihYvfFgkLw+NsoVCUUShUiiEohUoIZabbh+7UbQF4hGIBW+aCwMu0WSVJYpwOYjqxFEIk1nPn70BFggobD1NisZgOMf4uCXbdvmu5cbb9frH8f89Yvv1u59Wlu6W6wtza/dy1XmWWlLULXyQiwIA0AnwkQqQc9MI9BjWToXCkTCwTiTLvp90Wy2WiqtZpkama0RhUWKqiYTUNOFEFUMF+e9dCFVWJpffsiUFwNRMkJQ4RiYkQ+EowjsXYO7gYVYopBIVc0tHLPZHo2mAv5EPj8/Mx2ZnY0eP3eWI4awKsRSjRCkECphQG/dHCFiiRjSbgIWI5jL5UANvy8MREAQhsmAGtXqwtOffgIW9afnv4PF23cAgv1Yb/Pt +u7998/Tuw88ffPxlqba8cu/h4trdTL5YKFVCkCcU0tA81KqRBEa/UF2kk+lIKEahcihWK+WFcnmpWFyMxzPRZB4ZkQIEAWpujvAlmHh5aTJGxdMwK/fz1eVceTFTqKCiS9LZbAGSlOnq7uULRFKZSqsztUE4ZKoIsAgkvN7o9BYWB44caWhtkSg1coWex5XxeDKNyjAyMhoMBOd8KPi9oXDg8vAVvc6kVGgtZvu1qzdQ/C3ML0XC8YcPP0Z59fo167t+Bwuk0c23gOLdsxcb3/3w/Pa9TysLdxZW7975+K/3P30STSamZmaD/gBWIAEaBsNBf5B9AIvcksoEfKFUMs1k8rFokqJy0QhZyC+QmUowmYtEMsE5FAuMN0r7M6U5Mpct305nF1CJ5ytLTLGagA/NFqdmEe7B/QcOcbh8pFV0gVAqkShnvYj/yNDQzZERbyRCHzlxopXDEYplTc08Pl/O5Uo1GuOtkbGJiQkEyKx3YmxsRCAQ8bjoYqlEdfTIcdjPZDKFgS0vr7x69frvJXwdiF/BAvbs9Sabb77/8Xmldqdcu1tdvM/2lfuLd9by5RKRIlPJZBRlSSgEzwNcUAll6HQCFEGBnc6myK0nlzDpdC4Wo+ZCSYKpEYl8Iszks0veCDWMmMpW6NwiSZWBRYRIw5FFE1QqnZuc8c7Mzp07f7GxqRXyyRdIhCKZQqU7derizExoYsJ38+bM1FRo7779fKGIyxUigwCL1lbBrsH9yKRjE5OT02OBgLe7u1sgAApKiVilVOj7+3cjTBAyRCK1uLhc9+OsIv42LzbfbmzCnL1598NPr/PFlUxuqbb0iM4uFBfWivMLoP+de/eyGSYejpDxZAJVJJ2mwAGGoZJkNBytVWvVynwoGIO/QJYhiPRsIEHnlyiynIrma5W1IMFMx+hUeXkuiAREF+ZXkFihFzGCDsdJVMDQ/Bs3bzW3tCmUWgABOFrbeJNTvmiUGhmZiccZny+xb98BLpen +UGhaWgVisYbDkezZdzgSi0/MTPsCc97ZKaUSIiKFiMCec9pF3V39DFPA8iGtlMvV+gcIW7z4HSyAGv6/+/a7F7WFB5FYrrLwYGHl4zhdTLCuALDeTqeYEnxUJBHxRwu5ImvAUCNHIljTOMpVio7HiFCIdRzIqUxhPhDN+GeJ6VuBc6evBuKZcLocy1bjySKZLEI7M4VaplDNl+ahPKjl4e7BdjZJKLWIEQ5XCDhOnDx/5sxwb+++3buP7dt3wu32IOOqVDoeVyoSqZqaeD39e2b8gZHJCUStzzcn4Avb24RymU4q0UJQLGZnqTifpnMwHfPzi19//Q38xZZ2/nv/51i8eb3OPs55/OTrFF0rVe8xhVU6u4h0EIMtqMAa5ZMJerGyTMYomkDFWkjEaTqVIhNxgn2MGUdpCMNLECAKhUUuz6+GErl4JOubiDZt58+FqSBdDJB5KlOrVNaylSWCzvvg3wnWi8CJBoLhGzdHdzY0NzS2frS9kcMVtbbxNVqL09mzb98xt3vX/v2nBvoG5FI5jyOUSjVSqW7HzvYDh0/MhcMj05Nz/rnTp0+KRVI+T4I6RSoGFtK+vj0pkiESSCjpVIr6/vsf/u47fxOLjU0U+2+eP39VqqwGQmkmt1qq3k9laoX5tdV7n1QWVpCeSoX5LFUgIqlStlIu1IBFMk5k03SpUMhnc+l0mtxyXChkC0VYklwkkaWIgsfSx29TTM7G/GSOKi2XK2vHjpzv2rXP3tHr7hkw2dx7Dx21Oz1Go9lud544cfLU6XPHT5weHZt0ubvkct2BA8euXBkZHh4dGrqllCn4EFehVCSEuMqRak6dvXh9bPzm9GQkHj1+/ISAD53Qs7wQa0CQ3t7dZDKNyKUpJhFPfvXV11u1CdrvYPHq1frrH58+e/DoMyJVpDPzDz752/Lax7kqQEHNXklBHfL5arUKmYiEIwGfH/UpRaSIGJEkyGwmCwWlUgwcZIJIkyRKOJqmGYbMSThK +Tqv8+qh/bC4OUpDhjKBFJFGrXb39B46f7d13uHvPfpur02Kxu+y2fbsHDh46cvTYiZ7efrvDbbG6Wlp5f/lLg0Si0WgsUqlCpYKzEPP4QoFQvH1n44kzZyMJYga1QILs7WVtK0JMJlezaUiqstnduXwxmUwjeyUJ+vPP/vb8+Yv3M/71xmIBagCL+w//Wq7eKZRuZ4srxdrt2ur9dC4HLJAzUXYuLy/DXUZC4RBqdVTbwUg8HCPiRMAXTMRJ3K9SXcwXavF4GnU9MksmyYjblW0t0pHJMOxGrrQSno3L+YpDx092Dez5885Wi6dXoNRZ3d0Ol8fpsO/48AOlUn1xaBgiKpbIu7r7dXoLjHZ//36brVMqUWvURuRLuVzLF0jbOcJzF69Me4NelHbpHLwZIFCp9WqNAXKj0ug7u/rCEfZpWyqZQVr9+OO/oiJ5P+Nfb9teb7wAFt98+32ltloo384VVrPFZSpbhV4kKXC+ACBi0IV43O/zhwJBwEHGE/EQhDROJJLhYBTCeWnoCkZ/6vTFXK4ajiRBS8SYQWFubhCiZCFyC7FkPjQTF7aI7J4usUIjVunztdUYlQ+jlkvRhVxOo1ZptHqtziCRIgowdYPb0yMSKfbvP+5290ECpBINyhC4b7FYLRAohoZvso+a58IknTUYrS2tXOiuXKEBIkhGu/ccYLLFcDiRZUpQ0LW1B6hH3s/419u2jTevkEq+/faHQmmR9YXF2+X5u7nSEpmtZgsFJsdQaZpAxUeS7APWSBRYpCAMRGoXCqpWjtPuCodiapWhqZljMrkScdRaiWAgBF4MdOxuaRJN+4jSyoNIInPr8ghnB+f4yXMiqUZtcKBmS2aroQQVgyOKJ9xut05vNBjNcoUK9ZlIrECXSFQHD57cvftwK4JLpJVJ9AI+cqdaqTRdvzUdCJMQhDiRFkI4Bahl5EABW3j5WyMTGGMwGMtlS8VCFTECXvzuIww2RvDjq6+/y2Qra3c/W1x5 +lMpUFm9/nEiXEiRZKpfoTJr9bhGJgicOXvi8c/FoNEczRw8dE/CEHldHiszYbR4U0f39+2Ccw1FkWWr8xniXo6epgX/i3NVouhSKU0OnLzX+qeHi0FWFyqg3uancApVfoPPVKW8wQVKejo6dDU3AAmZcpdbhakgoJpPzwIETnZ272lslPI5cJFBLJTqBAAyyT81G0Gf9iVNnLspkKkAA575V0SiBy6w3wD5JpHPIgCgg7997BOv5+3UqYgQ/ECPLqw/uP/pbOruYpCt0tkbl51PpDNJ/Osssr6zk8wCkANMFP0Al4UMTfd39DpvT4+oMBmImo11vsHZ3D2YyZYKki8X8qaMnWra3tDYLVHoHSvYokTl77Jy4RTQ2OtvUyLc5+jKFlUxxhcrXvMGYPxKzuVxcnsDuYLdbjksqEMp0euuePUcQJlyOVCLWyKV6bNvbEQyGqdlwOEajEHN6uut0gGQADnSrzRWDi4uTFAVPzEAv7t55CKv1T3PHL9u29Y2XsBjrGxuPP/2qtng/mSpDO7PFpThdqswvoDRLJAmoBniB1SaJZBq1VIryz8xZjFa302MxWc+fG4K3aWsX7Nl7GNoZhl3LZS6dO9/4QWNTA8fZNUAVa7Fk+sCuA20ftV44c6VhB6+r5wBTXA0SObq46IskokTK4emAUshkitY2DsozxD+wcDg79+492te376MPm0xGh9Fgb2sT8PjS5hbe3v1Hs4Xa8PVRoUQhl6vrdIBwIKEMX76eIKg5X4gkM/lcBcn1q7/Ba6Fm/z0sYNXfbGFx78GnyHzFyh1WO5lqrrJCpFIZJs1kmQjMdhR+FhV6KBpGBoneuHzVZrJazVaFTGmzucxmx86GlgMHj1+9OnbqzJlLwxecFlvrjla5VKu3uq3d/Z29g3qF7tyhU/0de8wGj0JhJTPz4VQpVVj0o4Sl6M7ePoFIfPDQ4Y+279i+oxFzU6r0Zovz0KGT585d4fPFZ86ct9tdQqGkrZ0n +U6i5AvH49KxYqWpsaYfQbgUI61m1OuPC4ko6w36XJ8uKRa2Qr37y8ZOXL+t16m+1ba82X2/xYvPLb36sLNxdXPm4snAfvCjU1tKFUnlxgWIy4Vgsw2QBB4xmIhaLhYKnj59WKXQqhb65kaPVmNvbRC0tgqZGHo+nMBptTQ07BBz+7r7dXR29BpPD4upSqAxD54ZHr4/fujkrkejMlq44WUgXFgk4/VQWN+rs6Wtr5e3atQ8ZkSdEdW4QiGRtHAEclFptHBzYM3xxuK21XanU8PkipUqLAk4sU8jVGtAEaYXDlai05u2NbTdGJ2uLq8FQLJViisVqEiYwX/rxx6d/4NEvYuTdu9dvWFV5/PnfmGJtfuX+8u1PcsVVJr9Cl+ZTxXI8nY5COJPk/Px8iiT83qlUIuS0e+AdJCKdyeBpb5Vy22UtjcLmRuHQhVulXE0tU4EvUolMqWA/9Wtu5oglKpFI3dgiaBEoPtjZDrKwXznIV+DBY1HC5wsBwbZmgVHvMFlcLqTn85dOnD1/fujS8PDlofNDMpQafJlUKBcLZe2tPIlYwWkXQCCgmnKZkctRKVTWhlaR3t5J5cvQYyqNoGZKxXIsHrt9+zYS6vPnv/+Nv20b795uvHuHvPr90+cLy3chfJFYZmHpEUlVUvlSGEKZzfkjkenZ2Vq1OjszNTs9MTc93gmPZOsBBMeOnBPyVXKpQaUwR0IpiiwSUUqr0Fy6OOzz+s+dHTp+7MzMjH9mJnjlyuicPz46E9IYnTK1ccoLr5YOwaQkqVmvH5WIXmPt7dmt1VsuXb05F4qgT816JyenpqdmzHqr1WhvaWyTiOR8rgglKYKIxxNJ5UoBXyURG3h8ladnb6a0lGSKyXShXF0qFKqrK7dLpdInn3yCYuTFixe/n1ORdtlv37x79/3TZ1CjQnmpUlsrlFbTzHy2XC0sLaTyuTj7rU0mDO/Cfs5HTU+My6UqmUyHAvny8C0e+Kk0etx9KTKHNLE0 +v6xTasVCicPuOnzoWHfXgNPZCV7ATY9N+LwhUq138MSqYJSc9UF/4uXK/OkzFxqb2tyObqvZ09m968yFS/5I3BsMj4xPjI6OBfxBi8nmnfH1dvc3NbSickfBKpYqEEGtXD4iTiGzcHnKm+NzdGGBzJYTdP7u/Y/Xbj8oFsorqyuPHz9+9uzZH3oOvr6J0ozVzucvXi0ur2VzlcXFu5XK7WSymKQzJJMOxaM0k4HjiiXiCJNSoXjh3Hm5VC2T6vbtPXr82DmFnC2KsB+P0QF/PBmn7GabyWjRqnU93QNGg81gtNnsnUqlsaVNNHxzytU5+GFD+7Vbk9dvTU5MzUHw3Z5uo8F67fIInyfjCWRHT50dm/ZeHRlDjJw7d/7aletGveXcmQv9vYPNTe18voQvlIhkyjaeENkGWMilJo3O2cKVHjxxIZEupPNVOlNABslmC6gbv/zyS8RI/bPV327wnetv3rF/qbC5+ebxk89QTVSrt2u1O9XqGlMoQi0jBOrrBBwXk8tOT0+jPDt9+oxIKPvLn3bcuD5ms7rkMo1eZzl96gKZzKTpvN8b7HJ37t93YKBvsFSoDl28OjY2TSQziUTGYus8eeFaz8BBjcFud/dY7B1mq1OrM/3bf/vvDmdHT9dus9EpFCmMNpfF2aHUGXhCEY8rgPSAhrhFX88gnyduamnf2dzW2MoRypRCmUIk0sikJr3R08aXO7t3gxf5ylK+WKtVl0ul6pMnj+tPff/+LOe3GptT372r17PvXr1cr+JCuUqtulrIL6Qz6UDI39XbdfT40aHhS9dv3hgZHU9R9ODgXrC0tYXr94VlUhXGB1Mdj5EwoIl4avTmmIgn2rt7n0KmOn/uktnkcLq63O5eu62zuVWot3UqtbYWrlipMctUeo3OpNOZP/xoJ+r0U8cv7N97lMOTWJ2d+4+cUOtNH2zf0dzcCpu/b+8ht7u7t29QJFEgLkw2p0pv2t7UyhPLVCqLgKfhCzUfNfKM +ju7y0p3Hn3+zuvZgbe1huVT9/vvvMC/wYmPrS4/1af5a21b/QivgePv2zcbG5r07D1MkynCSSDCRSEipkra0Ne1o2LGjYWdbe7tMrnR39oCc/+tPH5oM1lAwuv2jRiSL7q5+2H4AEY0QU+MzDR81DA8NHzl0tL9v95nTF48cPbV37xEoy4WhG0PXJ66PzJ4fvrF735GBPQeNZvv2HU379h++fOXGgb3HDHp7O1fEEUj/9FHD9qaWPfsPnDl9TqVQX758XW+0NrdwGprbzA53plBOMfnBg4c/bG4ViTVSsYEvVBttXdfGvPnaytLaw0ptuVpdXqgt/vTTU9Ch/pHq7/Pi71igs2/98ouvSsUFJlMCFqOjN8wWbW9fZ2tbS3NrC48v4IlEHzY0q3Smm7cmFDK1Vm3gcoS93bv27D6Qz5WpFAM4rl6+rlNp49E4QzMAK0mgWkvO+SKTk/6pmdDVUe/kbHR8JugPE4EIcfb8MIcDkyWHvor4ig8/aNrRCDTkIoXG09sfjicCgeChA4fhJlGe8ASSdr4IWACIeCp99vLVBi5PrjDt3M7fu+9kcf5OprzMlJdK86uZbKmQr925c//FC/abSkDhd4FA28Z+SMS+r/7Wtz/88B3oMD0zGY6EuhAeXb2nT1/46MNGgRBVIAyyYGdD++Ejp2/ffTAXCFntTrXWYLM5Dx8+Nl9bDAUjyWQK9bscKWN0empybs4b9s6GpqcDsSjlnQ2HQsnJKf/w8M2jx8709u/RG21ihJhQ2soRfLC9sb2Z17SjBcUeTVFmo/HY0aOwuyPXRydGpkQisUyukMnUO3a2Od19E1N+Xyi299BhrkQES6bX25lshaRySSpXri3XFlZL5YVisfbzzy/qX78AEHVqbM2RbZgz3DY7c/YDQ9Qq7D6w+I+aBS88e/Y0noCbGJueHTWbnFevjtdqa83NAg5Him1rq6ipiX95eIRMZ1PZ7JUbNwUSqVgqc7o9N27cUqs1R48e +n/MGpWLtnDc6OeGjUnkkF78vNjE2d+bUpWtXx5z2DrgvPlfc2sZvaGzbid7MgXBYHB1BX+TmtRF+Ozcc8Dts5qOHDk6OT45cH7s2fJPP53MwAomSx5XuHjw2MeG/MTKp0Rtb+ZzGlrbpaX+GKcbiqUKxmsuV699+qM0vb31Tif17G6DA7v1dPll42L9nYyHYYJ/2vkb2wP7/icXGxvqzZz+XSvlYLNzUzLl+YyIUSoAUXK6EwxG3tQt3NrRduzYWiKDaSh86dlyu0qCm+vCjHVAULpf9rFyrgWU+cOXyrc6Ofninw4dOwqS3NPNaW/jQnIadrehcjkgiVRlN9q6eXUOXb0zM+BKw+nQ+nWJOnzwtFPA7O909XZ0zU9NBf6S7o9/l8pw8daa5CbHKP3LkLJ0uXhy+0cLhGe22q9dvFYo11IwkTHdpPl+oghSrt+/94k/7/nnD5LFh/66NNZvgBbD4x4Y6//mLF9ksc+vWTbFEMTk1N+sNyuQalKFiiRLodHUPUHQukkjGSPLi5SvN7TjSe+bseR6MgUyh1eq5XEFjQ1tTYxunXcjnST74y06xSAEuIKH09+0Z3LX/4oUr+/cdGRmdQv6+cm3kxOkLnu7+7v7doIzN4jp04JBMJuW0tyrksr179u7fewheZmpqNpmkVUrdBx80SCTqq9dGRydmL16+NjI1PTHtvX5j7MTJcydPnb84dPXc+eEzZ4euXR8NBKORaGJmZnbrY/cMTacXFhbX1u58+umnn332OfshK0uHfwDsPRZbosHSg/369wYi5bnZZNm+vREjvjUyiTVsbGpvaeXtbGjtH9ibyRTZL+Tk8mcuXGxoad23/+CJk6fb27mHDx/t7u4RCCQ93YM93bsAhFAgM+itmP+loWsw4wP9e3Hc7epGV2uMno7ejq7+XXsODu47fODoyXNnL126eOXgwUNXr17p6upobm5UKJR4/80b47MzgUiYuHF9VLK1HlgVgUQuU2klCg3c +Fqp7LBW2fIFUJFZgh8sTt7Tyd+5s5vOFcvh0gUij0alUGpVa6/F0dnZ29/T29e8aOHPu7PjE+OycNxKLPv70yba/f3Ma8QE83m28ZhH58Yef9+45dODg0aFLV0bHJnc2NMvkKhTL7Rz+mbMXIjEiliQTFH35+g2RVGZ3uDwdXWfPnicIMhAIqdU6AV9sszqtFofV4kRFv2N7IypKjB3m0mZ1azUmq8Wl11tBMYerS67SG8wOiVKr11ugCBi0QAh94HI4SOIcu80NTonFymNHT0fCiYmJWblCDd8pkCjEcrXaYBFBRPgSk9nhcHZqtCaL1YVutbmBtdXqtNudvb39MMFOpxv7kHmn06PTGkxmixkljtmMuxpMpjYOhyBJYIFo+Y/27OdXG+vvPv/sbyaDMxSK4Y0IgbZ2rkAoFookjU0tF4eGk2RqfHoGVfH+w0dUWh2AwEs3b44wTC4WS2AyYrEU8Pf09CFkFApUIpB6444dO1ta2qAaiJ32NkFTUzsW84OPGlGgq7QmsUJjd3R09+w6dOTIidMnhoYvXr1+5eKloQsXL+v0lrY20fjY7My0j8PhSWXydg7qMokNkzc6DCYHQthm9+B0uUILv48OJZKi/jPazCY70NTrzDBBWBinowMdzhB22eFkn7C6PZ29fQMisTRFpdkYefz4U6/Xt3//ob7ewa7OAavFI5fp3c7+cmWho7Mb8xdLZJhtQ2PzzoYmHEHinPUH6FwO2mm22eVKVUtru9c7FwyGBwYGMVwwEx0K0tjYLJFIAQTEz2Kx7RrY0+HpQ7CcPHHuKhvsvstXb0XiJLQzRiKoC3O+4OT09MTU+M2RG+jXbtw4f2GYVW6ObPeug3a7y+3xjE6MavW6hpY2hdqg0Fgttg6QAl2lNoBoPT2DYATgwK8gGuZstbrAR2ChURt1WhPQYcXLbNcbzVqd0YQqwOURCCWxOLFtYmK8vb2tra29pbm9YWcLdA4F0v/3b3/p72Ufq6vU +muaWNr5A1NDY0tTcun1HA6CZm/PTTDbFZIevXZfIFbiWVmdQKtUDA7vBhQMHDg0NDV+7dmN4+MrcXMDnC259nypIUelIJI4SZnLCCwmAW7t2fQRea3DPgb7Bfbv2HXK5u212t9VmV6qVVrsFeHL5/F2D+5QqPadNopTpJ8Zn5hcWjhw7jAIFvACbZCqTzmDD+oMUELWOzj6zxWkw2QCHQgmBMBh0Fmi2UW/Ta82YGsJTqzWxKmawYkejBRZ2s8UhEEopOrtt+OxBpYR3+MAhqxkxbPR0dlitNn67vMd5+OLFKzwBny8Qc7hioUAhlWgcVs/e3fs7PR2FfInJFI4fO23QW4A6ShIQ+P69R4U80nu2Os9+W/jqtVvhMDk+Pnfo8Mnde/YN7t4zsGsQlRiPL8a9sW1r54PMg7sP7Gxo+f//1wc6vVkoksFoDwzuPXP2UnMzTyBQuN39SqWJ0y7Waa12WwcKX2hKSwsHkYjI5/GEBqXBbrCb9Ba9waIxmFGqGCx2MEIokNrMTpfZZUSsaM16lcFhc9utLoVcU2cHtogdixnlUieMbzSR2nZz6Fhb40duh1utNBpNVoPRYNAbxHylqFW/Y3tTe3u7WMyai7ZWEfiiURknJ2daW1p97Bf9k2dOXcBFeVwRCIXyqbOjR63UyxUqpFOxRM7lSxoaOFsOTdDU3M4TCk6eOr31jFvC5YkAR2NTm1Sm6u4ZACg4gn2FUosc0dLCFYmUYhH7MbJYrFUoTLBYWAy4kpZmLpZXLGKfEhsMRuQICUekEMjFAkiSRa7WqXRGFHXABZBh2hKhTCpSGLQmlUKLbtCYzDoLoNEo9cjQEA5sQQ0OVxiOJ7edPbJ351/+LBfjFYtSpVFrlSoMSab58H+2cpo5HKhdY5uQJ+W0ibd/1ALu1RaWDFbz3r0HKqX582eHUI9oVHq5TP3Rhw1trTwYyqamliYMmSdsauY2N/Obmnjsp8EcQXNLS2NzM5YdClfHAiMA +Ruj1bxvIFRqQFqYGBGG/tSjVGo0uk8kjlxtRs0HFwHBkaKyn3YbjFrBYIBTJ+TKVSGXSW5Uo8i12nclqtrsgnGqlTqnSwaGr1HqEA3BRoktVFp1FI1FrpBqz2eFydrpdXZ1dfRhJBFjcHDrPaWh1WDrt1i61RgcsbDaTVCzz2Pv0UrWwhdPe0M5pQlkm//OfG7p7B5fu3r01MyGSykul+Rs3x7CYPb2DGo0RWuVwdng8vZAP5CrIbWdXv83WqdPZlEoD5NpkNiN7qTWgHUDXWaxOzLl/YA8gwA6C1mpz4SWsEphis3dYzB5gYbf3qNU2i9ltBi5Gh8WMVO3U6UxghE5nQMIyq00WtUWnNuJcZ0e3zdWBLRQEWFgdHjZ9290yhUYmVaGwNqpNepnOqjK5zS5IBqIbWHR19WFULBaXTp4QtQt7O/cgiUICrQ4MS6eQymxGt0NrdmiNSqG86aPW5gbuzp3t3X27/Yn4ueuXUS/q9ewksYAmkxM7KpURHTM3mm2Qb6vN4fb0dHbuksl0mBiwV6rURpOJfYRlskE1ECnYdnX3gxSAAx0KAlCkMiXYocOAVSaxWC0SaQQClUyqk0m1SoUeWKD3dPcbDCwcSPlGJXTCDL2QydVgBKihNVpMJptRb5WpdWKtTm9zKrWQUi0Ka4Pa6NDZrEr2LNacmB29Pbtc7i6wEuls29jlIWEbd0//wU7PLpgCm8OsVElkYplV77Fh8bQGMxKQzmbQ2cH2No7ww6amNjGcjrqhkduOIoUr1ertWiy+2tTWLsY+ly+WymXAAgEFXighQ0YYoQ6d3uB0uwEEBg0UsIPxYQdBgckDCywsxgSi4US12gTh1Ons4AXg0Glt0E4ECMyC0WDr6Rkwm61I0hZUyiaHy+h02T0GoxUBAiCkSo1aredxhEotRu0Eb5Q6o0SmkoihGXqT1mxUGdTsszgzYqTD02N3eKBiLC/Gr12QC/mDfXuc9m7YKovdDEdihjKrOiwG +i9VkAeQ6tbnD3WezdiDw2lGAKeRGK1R8QGd0KjUWvcmlMdj57MegNqOlw4hLWCwKpQZJ3uHoRgdxgL0dgu3xwBFCKRAOYAoGgYgANIADuICoEqlya8coEMgBot3ebTC4jEY39tUqiL/TbvOYjHa1ijXURiOsI4sFeAF1xOk6sxWQiuUqqVQlkyiFEnm7ECZOb7I4gBQExWSyIxUY9Ga91oQYQfljMtowEtx3LhDe5pu4vPMv/6O3qw95GOKv1WMRdF2eXV22g0qFxmSx6PQmhYL9Ux61yqhVmyRimUwiFYoUar3TZIODtsiU5na+Amxp4ynM9h4NaIox251yhQ5zQNToDcj/bk9Hh95otNhcGDRIARYABeyDESKJAkdACoQJOIKXzGYXuCASqWUykKvHaHBKxGqNmjXv4AUyAiwcYgQUsmjNuzoGrAAIl7U6MHOJSgNnhXlCVmQKNTgCbXK4OrW4o1KDccthlg2Wrb9b06Oq9nT0QNFnfaFtEzfPi3ktsAxIhxr2ywtivd5k0ruUErtUioA0sB9GSJRIqEqFQY0wQ8JBkaMy2Fy9epNTpbNiq9SYpQo9tlqDA7e02u2IZAwOEgERUSr1yNaezi6URjKZGkYQs8X6i8UKuVyDX3GQz5cACOACLBAmMrnWZuvQ6+0arVUuN2i1FqlMq1DqbTDUegumqkJhJpGjy4Qyt9Vt1FtQjOiMVo3ejM7qBfsg3qBRQjzYmkjDfhAnFYpR0BkNJgS1WafBuioAB4S/pZXLYjE3c4vHbe7u7BDwRDqtWSrRgtVGo1MsRXkHXDAZDVaArZrURnSHvUuPWDBaMVsoObYGpA0g7/JgH8beZLahTEKBBBOJlUIpBVGo+yidDtdXQr0ddk89yWEoMEVYBug8kh+wQLwAKSCCsxBNOIh9pEuVHlujw92Ja7Lc0ZlxCrIsnKNaq9XojDo9rKQV8Ol0FrUGi68Q8WU6uVMh0mvkOrlYgWIOwBmQSpQmk9YG +cwFSsLCq9aitJ2fmtk2NXwUWe3cPajV6VNkatRlXhPgDOZlMCUuDvCWVKrb8pQ0xJhIqke23olqHdcbkpTIFSlUAIZMrJFIEkKK+vJg/OtiBubEcgTgig6iNbFLUmupeCDvoGBNAQWbBZfFmwAEvCHhxHQwUQQrJE8J4q3VQIbwH7wQQW7DaYDS0WBOjxQB5sXeZzW69wYr1EEkwda1cZFbLLXIJUq5Fp9HjEg6rW8CRQgFRkqBaAaYAl/10/uqNbcG5if/x3/8NWchudTjsncAC0MIOaRBsbLRpkb0AClCUSlSoahApiF6MFXWe2YKwN7GZ2IbqiGUK2IGkCPsAUWS54u7CO2EiWEOB3AZXyJbtLpFQBnuGiN2qlDS4ODpQwMyxxYn1RIN9qCw6mAQSsCpodSjVOsCB02EZcboBvtvM1qYudw9GjoWE0wFtpXIFsojV2CMVIqjZ0DbojHoECJKjyd3dOeBydWJV0IEFwL04fG1bYG7yz3/6n309fbDrBw8ch1mC1GMcWHNEBww/tNpigXQbEEEyKUjpRJi4XN0HDh7xdHRviWJ3/8Du3r5BcAEQYBp1K4V7YIVRXG3VV3DTrECCAnDQ9cljMh53N44ADug5TgGPAN/W3fU4BXOuo2OF8kFDnZ2ezj5cFpYRjJDLQDnEo0cJgwhPrTLz+UjgLhgTlUqP8SMNy6UWjQrvVINHDodLqdTKpGAatLQLTMTCYBi4GvLI5Ws3t8XDgb/8+U+wR2aU/QabxQKdZ783ZXPYtzy/ecvVgBEaFALQC5ezh01vZqfNDjXsR7GMNent273/wFGc2NTMQXbo6OzFfAANsmad85ik093JLoXZWU/sCDpIF+DAr6i4MCbgiFNweh0UdvFRk9tc2NEYbOhylVEq1yG/IEkjv5pNLpAUmRJnQVa1WoSwR693azQQZj3I4nT26jQupdxks7oBOjiO5ID5A0HAYQKmJju4CV1DCrty/da2SMDfsGPH/r0H +MT5kLKhRb98u1CVKtUKvMwAIaJpOyz78wEtgR2/PHlBDLEaNroezhPPHAiJEsXZ8gRRBi/iCuYRA4HhP7y5ggR0MF8ECyrD3trr6egcxDgEfmqF1OjpghAENFrxOK2xxCnCEMUfHQJHcDRY38pRYghSGIaEwsSOcYcmQPlBNwF1KJDqdDnnUZbV2IQ3hHIXCKBEbUd1hkeA4hCIJsgnGYzDYFQpEqwULjPv29u6Crt8YmdgW8vk5re3dnb3wMDarB84Uyg+DYLai1NepVch8UhYL8EVl4HHFRgOqXatWYxEKURFgKeBeVDKZtr1dBBtiMDgcDpQednR2PVFesU8TDHWvCVFCRKADCEAAlkI4MRoELTDCG8ACOFTwAmfVo6y+Dy+n0TvkKpNCaVKrLTweiGrSa+1qpbmzsx+Fv0ZjFYthqx1SKd7A+mAzW7Y4VCqH1d7TP7AXyPb09nO4AtzCaHLI5TrckQ0QFHp2N5crGr56c1ssHGltau10d7scnZ3s0/cuuE+M1GQxYLnd7g4NCja4CAu4jWLGhgUxGhwSiVYkUkGr1HWtZS2A1cCa7D4tXIbOBDNXxwJsx7aeWViBtkBuPOAgtgACjABpAQoiBRQAajirjiNcBvgFGcLoLY4epcam0QMXjxYQqK16rcNq6lTKTJ2dA3AiGrUNKBj0nVIJMr0b73E6u+DftVq3Tu/ErS1WVt21yMq4tQMvdeKOWBXoFGoiDI+NkRSREAtFPV39GJnL2QULgATpdDttDgveCL5iEhim2WzT69knH6APqnuV0iARY1kxDayzWSFH7aSRyaApSqvVjZIckwHPdVhzm2vX4H7oMRYKDq+zoxfqgDDBINCxLOigBq6M8hRYwFMAPpAWqglMYZmxbhZXF6sXaqNYqtGiJlRvWWEZJJN9wIv3w6dCNbVah0ppVSgAhw0pHEd0Wo9KxfoRjMdowowAB+aEkt+59dm9GSsB86ZQaE6fu/i/AftvOgwNPdxU +AAAAAElFTkSuQmCC + + Cm 0446ccd6-cd7b-4e18-9ae7-7589107a2103 \ No newline at end of file diff --git a/Empresas/48/Formatos/Factura.rdlc b/Empresas/48/Formatos/Factura.rdlc index 36d9c1899..03e16ee01 100644 --- a/Empresas/48/Formatos/Factura.rdlc +++ b/Empresas/48/Formatos/Factura.rdlc @@ -168,11 +168,11 @@ - Alumbrado Público de Hermosillo + AGENCIA MUNICIPAL DE ENERGIA Y CAMBIO CLIMATICO DE HERMOSILLO @@ -185,7 +185,7 @@ - R.F.C. APH050331V29 alumbrado.hermosillo@hotmail.com + R.F.C. APH050331V29 - true diff --git a/Empresas/48/Formatos/LibroDiario.rdlc b/Empresas/48/Formatos/LibroDiario.rdlc index b1113fc3c..67a49b1c1 100644 --- a/Empresas/48/Formatos/LibroDiario.rdlc +++ b/Empresas/48/Formatos/LibroDiario.rdlc @@ -1092,62 +1092,6 @@ - - 0.68792cm - true - true - - - true - true - - - - - Fecha Impresión: - - - - - - - - =Today - - - - - - 2pt - 2pt - 2pt - 2pt - - - - - - - 21.59cm 27.94cm 0.5cm @@ -1267,6 +1211,30 @@ count = count + 1 Return count End function + + + image/png + iVBORw0KGgoAAAANSUhEUgAAAGgAAAAcCAYAAACNr/p2AAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8YQUAAAAJcEhZcwAADsQAAA7EAZUrDhsAABY3SURBVGhD7Zr7k1VVdsdv377v9+3b3dBkajKOEytOWVZNZfIPpFKppPJDKpXKT/kPpmp+yg/5IZNUZqzxhSiCogIO+EZhQBRRUVREBEEQEMVHfEZFaPp1+/a9fV+98vmufU93O/4D88Mc2Pecs/faa6293nufjtmSmbf+4B417+jQFgd3vXP5mG4dWnPQGP9DHNGzdWnCEeYvcY9AfHiZhuDUhHcA813AcBeaASt+RWPL87mW+7iWwgR19byJ33memjTxzTiDuvW4C8bXI1yDsXCJr0XaalwBVv1+rR4QWb1H86N3v62SAT/huUsLa+/xLD7VYprgVzTDMWmhIhoJTn2Dy2F0BYTLylP/Kib8/h18K5d3R3BOQ8LSXQyuKMinRi2C1315LtfyewTIFfV5C/16DAKVkBs8RQryThdUGFcTv1IQt2W0WmeYs6Ik3YOR+hU6V0QWKfg7ePQzkAf9KwoSLikm4A2GhIKigTBpYDnOuBrPEYEwMzw73AA2GneGaN7/fQEst4iWP+sKDAc+IuZ9JeEW0fWXyGhW4VV39PyHzXEN4Lm8y390iQc1EAz6vjOuu3BHTe8+JpyRIQVvdAVF48uwkoHaAL/WoDHnRbIR7UHfAMQbP6uVhoJWe4JaxPTqWbTvCUqwq2DUrbsTn6MpjAD3vXE9aJFqelZbAfMrelFbBtGPcAuvFg791XBRiyYsP0dr4hY1dS+/r4KPxr4zPmhRn/MtPuSJKwryoWV40YNHV9KAdoTX+ZFC6V9Fa3mqngfvumKdvpAHt202edYIkzqtcNdPty+k4ep1NbBaOCsM6DEw0LBurzHA27V2B80KJlKy4+1YD5iwYH7p7w9w9tUVMR69+FibnzptxlqtSe4rfHRl +M4Jfalq/v+DPPlWkdY/eB3h174BuqTfArdtgvLUQ8HY7QjoYX8W3BNztBC/ou4IWzdE4DRHkJaLFTx/CEW5rgVOMdAEWTm4d6EhW0kW3K0Bdiiid4EHdPgTA4HyApD6PEnhZbIewo6TVbNd9gigH5kSNcV8l8yQ77u12i16EL1wOrecuuJasp/VGC+1J0eoA92JLU73xOBjXXT+CkTI1SveSPCgk+YXmLItbUZKDA9vpapyLvsHQYEwXQkVA7cA2jfX1OtZqQDTijYH2YqQALWxlrL/YoGEkwEgZ3aUFhlbWK5y62g0ETUffjWrAY7SuBcYkSp+gzg7ynQYkGIQUJtpKM7FOb6AYOlo9EUNZtPZSy9lrgUQkgqAX6ekBL6TyPKTJY6MuRQZ6aqJdZ5LmYRPC5v0yLp9Kc8tlLCTE0JoDZcvaegsAw/xie46ujs914xROV2iUt6CntWgerYsi212UxLqEs4EA28wXXLsroTew1Lrz02a8OwhRAog8bakPvzJa0WXM192Hl+YgeuCuLnfB8q5/GpnXkCBc6FomRsmY5ntIVFjSPAkIJxcTISLJgxaZ2xbKYHTMFjYvs73TAUJr8iY8LQZawLWgWgdhm/uimBBixsUcfOOBgbEm8IsMLPLSAsE8fC3QN82z+4HG9cCd/9YCV5N34Re9Bs/C65dg6JQecWTHp7tot2mSld4XxJf6GG+oL4JjvpYuOeg+jw7QGWEcPsQj4zJysdPsyejCuJQj4YgPrb05aHoPPPGi/0IgHIvtZVkp8GhNC9zVnD/R8qkSOk/0eYcmQU8doib8kq0ChacZOpZorqBFJC9Nt5mpub4gEMyxuskpsw3rzf76xkN2962MTcMwHi5FiEZES74lZUhI87Nmv/kvs5//7DVbf1fXZumbQTCLMCee2riu33lXJGlBp64771pGq6MQxRNATeqNBV4bwCxAqAVcg9TVotUZm4cfjS/Ak5TV0jP3qZmggKvAzTGnzvvC +VejBWwvYOv0yCPEluuInqEUhkjmiAb15cAnOjSgALednwWntmn8V/HPg3YCMbviLI3b7bwPPDfHMeBOLcU9VsuRdTQqQ7IVWim3TFEQkDxXRYifmgP7ctQWepXHlyHkYHBvbYNXKdisVn7Rq5kXLxJ6z6vALtqbyO5I0iJgILm9z0K3TquU7rJR7zEbyL1oh+4Jl8o9bvnyfFYo3ufJmAQbMm5iv5n9r5fRWq43c5kJRv8KpnuT916zZaqnY/VYb/W9XYqH4H1bI/49VSrfZSGmLTYz83orpHdC63Uaqt1kxf7uN1m610bX/7rQqY/dZrrDDxqqPWim11Sq0UvpeKxbutGIZ2NE7bBqlySFkogsYh3sftMdrN1s2/YBlMnfa+js/dgV14TnKZ/JmwdVRzEjtbisUdlkmcdjyqTdstPqCpZP3OR0ZepMlyUD9QjORp7qhQw9HhP9/tdGRf3YaHvmAj/XFDZfCj6xEIeCH6zZbbuiAFRNHLJ15yNLF+yyb3WYT44etEHvHqsnjNjG6yWYQqGy9ztx1Y4+gxKOWix+yfPaA5Ys7LVV42PKlVy2Tessq6QtWSO4OVg48ZKwB06XUbqvE37N87BW3ci1ErHveEdNpxlPHLZfdbLMQy5d+beXqrVYZ2WD5zA7mnYKnM1YrPW1jo9stX1iPQm6yYvVXNoXgMtmjFou9jqE9CV8brVrcYuvGdwVhZg6i3NP07XLvVK5SDJHQ5uElEdtvhfRFy6VPYBBb3LIlSOUW5UBZ+zVrn7Rc7DCGcdAS2cdY807LlZ+wVOZZK+SOWT5x1tZUX/J1i4ZCdkcagZaKKXnPNOv62c//0ybW/dLWrvk3L/S8IqSYcQ/qIQkBzjIwJyEk91l56KzVUidsDkavEkpmkeily1hV4aiVho9aFuuQZcwwf4p5heQxPOwTK+cP2SRhR94gC5brF/KvsIiPrZY5h0XdZHWsowED8rrs8DErDC1YPn7JMsm9ISTAS+T2 +ufQhS8dZ5NhWmwZXAz5EV/inCL+F+GdWHP7cbv4NvOAJypWiq3X8/T98acnMZxZPvGfTrEEhpw7MLPOm4DGNpadjV1HCMQ+HKj0kO4XRYmqvVdNfWmboa8vEL1i1sNdmCJHKd/Jvjx7AFWJvWjX+f1bM7bMpaE7C/GXoyDiqlYOWjX1oxeRpPPh2z0vK11KPsPRIsooYilp1zQX/Ah3K4cqlMoWYZyb2OVLRZRCkSvsslThno6mXrM1Wg+raXVs5SdVhg/di7i6s9R77yxt32iQIUyN3sNi3LZV83aYlfJiYRyBUrx7WJNRc8imr5F/FEoMnSOEKP4nURRtCQbHYtBVLJz1fiI4Yn4PxYQwiljhmc+DzKkvMMygruyohJy7ioW97XvKcwOq1pGl4L5eesUTuG4vhAXPwERVhTejPgK88csQSw5csm3vTZlifaLJLIIRvIkydt1ziil1/LcaTxEMyj3ie8wKFNiUlVrcA85ElY9AHpyLCLHhkfFK41l3IPkMYP2YVIsACPEruPd9ok7WJkVqSIlGhtB/P32dz4BAfHgEZjPkMHlQWT3JPlN6x2PAHNl7eZm2sTeNe3bAyT2S8r7/9fbfGWRBPstBs4VnLZU7b9dcfd8aF0s3Ey0UYZdEScCq5wyrko1meZcHZ4mM2nHkPelcIpdOWTL5FKN0QlAqXUmIs85bFC8dcIb4abaZkceBYO4GCE+8T1k6E6hAAlbTKDXNYY6X4jMVSX6LkU+61FGuuoB545X3x4cPM/9yS6QNWZ0xbiib9tezzlkqfw/vetW8voYj8HquWnrCrjCmPKOlPs/ZU9qDlUh/axNjrriAtWSwudEL5L8NWBKmUnyHUbbJFKVHyJMB7yS1c8CPestlTGOgJu4JcXX7w0mH7EnNlAqBklynfY8nC51jcSde+FqSS3mPmEhJQaUGfDhZUgalqKaeet3L8faskXrYFhK4iRVbodoAkFiHItsSuAjv6g/ttePgWm2Gh +cyi/kKMAQfh5BHHtjyYR6FkrFw7b1BVms7AxlJnMfWBD6VdtnsVpQaKv7YyquFz2YQT0mSXih11BOokQz/IweVQ69bANxS7a3/5NoCcLZm9r83jXWPG85QmN+eRFDOtVq8OjDGOi+LwVhs9aurrfPgf2MnTTxQfwlsdtCqPwKAL+QuYJogK5M4Vy4NXjnk2TN9hXsYcSr+xpPdwm8ncRPe4w7W/lgcpx0qByrJQ4IxrJE0SRg86HULWlTWQePIhnlZ754j5LZhUSjlidiYtUG7IIv1BOX26j2bIM5njVRnipxC5ZeXifL5z9rSsQUYQGoyofL7PYTOU+KqxtVkeRCkGl/KOWpUiQQub0nn7OEkMn6T9jDfJdOfmwpbNnbTj9dPCggYLkRAq16TTJePhtWzP+sidvt1ruMjZ5bD7zvI0Xv6QKPGXlIgVF/hYMYjOK30fuOW6FxNtWzO7yfKXwNImga6mzntPixQftK+h8DZ2RdbsR3lN2yx3ghoisfiT3mlWSlyyfftZDXzD7KYqAgbbkjsyXpyULW22ksMkaeLUKC+UYMasyW+uamLjX4rGTGOxRz6Eq2CS7pd4MChIwC5KQamPPW2zoQ0vmj3j8V15qEQzDyUGXzRlIITiHB8zSdZn3dOY8SfxLcss+t1pZryqQtswHDheZLxeujFDZZd8mZ2zzZHsVhRTzB6iktnviFvOV3EYrlT8mvHxik9+ioMIjKOig1cYf8X2LQlefxKaQq0KhUH2IuL3XvgG2SV84omerjXyu+wmV3/AnKIfCJP461dwDVh67yzLFDcT7e9kKbLc/W4PQ4E35QgVLobyRfPKulbOX7Ao8fYOSZVixxEuWK35l6dz+sE0AvpR8jQLgC4zpgHtnSBzioU++RgvSD/NHR16iYjxLhfuQtXlXNGEIg6KGA49klkvvZKvxFYXJm9YEv+vHFdNBQQ6N6zKQze1EQe9ZhsQcJSuBaYLO8GS5Y9nbbAIvKP/gF/YF +BBPZY1jXaULA057sZDhquhRuZHHaDBZz71pq6COrVXbYLAtKZV61BGV5bfRRm0bh2psqBAxR2seSn9k3GEyxdIAK7HGbpV9hQYsX0+LlMnOy+d2WQ9BuGNBR8tXZmLwpn32dEHbFxtIkcHDNgOMycCpiJHwv9+FLOWVSYxhIsfgSyvkaaz5nlcrj5Na7yZN7LJ58k/w44yW7vEcGkKIEzyc+Jf8ddP50FimBqxL26AOdFvJJJ8/bcOwjFLrduoJjbjPoz8OdctdIiXUMn7IbrjsTDJwxHVB3ei0UpHgEQpWM1bFNWOS7nnQnWYT2Ra5lkPimjEWNJF60EhaVrvzSpiA0uuaQVapnbDj5tF1CaNoTSbGioj2VEv3I+HMw+QnW+Y796MebvbCIsbdJlT6xQuUJLy81qQP+QpVwkrlAmP0YmDOUqgdsmnEJstHVuRkVpyuAxEvZXivtslnGVb6qFlUeUrWWy70BzYtWpvryEAr/kPWUC0t+SiBPdCHRoT1RNvk5IfMD32iO5B4kFG5m4/0QinkJI/yCaPGGl8pS0r/80xUKozMUCofsikIkdLX2dO1Bi+H1kl9lhHUPf0GV+b795IdbvThRLnXlACtDvoLMxsYewDm2+obX8zdji/0WcMpBVAHSqoAlzHT6sCWHjtva2kMeW6UUKW8KgqXCPVZLkxjjhED6ZhCq9h7p1FO48RuWLz/tVcgcC1dslWWXRvZbJk+sT1JIZJ5zL5MVx3Pn8JT3KRy2OWybfp29XSaEpyrHUdK37knFzB4/vpEH6ZxQIUyK194lG/9fkv1OT9LReaCKGsGntC+jErvzziUPY7DlrcE/hUJdKmVVcEyMbaTYOM0+7CO77vqzNgM+hacWa5NxesWZ/JRwdjKUysgrRAHK+BSb9+rv/TjrErCxLOvKNqhMz1kifYacThnOuhvgUwQSf+JTTTJXNZrLbGVLsMFPb6JDWNWjOn7zjaoskrleQVSr+9j8XbBS7LyN +Ji/A2CnL5M5Qkp7GailpUxdstLzfKxnt+v1IqHa/ZRKnEMpnNoT1ZcvHLJk6avnceYtT4eWzZwgdO1zhivXTtFj8LYqSc/7uhxliHGEpSSbzT1g8/xUwbG7Z8avyEoxOllvEF4UPV9DQeZuobDB9/VA1JDQqUiTcLDv4ZAKLB7/WrOYKpPkFPeXeLsIfTe+x3NArrJ0cI/7Uj/BUbGjPoxyaRw7F+MkQpoCRwY6u3cIaT+CpF8ifZ/GUd1HMJK2FUtjbDV2wIbYgV5CRwprzBxdtTEUncDL8tYTIQuyE1Yo4BHBitEVShKwXCzFpVBN1uC6PUEVTKxygMjuGki5YCiFlCgh++ATJ+0X76XVUeDCnvYyHFeaoIlxT2W2JmPYVwGUJUWwg4wnyTvKojdf2+AGqDEFWfPPG04SgnRQJW12w/SU47TICV6J/w1/9jopvP3j22j/+3cuuOPXL5cWrPCif2+JFhGoR36cx4Gdk0Fg3+guqtj2WL21zzwt/hxBg/EHKESyC//HYr21keKONl+53a/b8AYCGlfN0LihLz6XuZkvxoN274SPnR3lInlktk+CzR6wwxB6OiBDPfurhWacXudxJy5T2eo7zDS5Jqd2b83UohMkTR/PbrTi020arN3vlGVnRPHFXPMSWVEpjdtFJth+WQrhObLz2z+8nJ91rlfFNbkU62fXvbDJHzWah0Xe3SMZ3r2/jrhutXHvAbqYsVWWuuCqr11F6A4twFOBwl2de+DQ8h4DZZAKjMChBqfTVIqLKULJVU/yeZB77OH9u6JArungX/8o52ny6UpzBMObKWfUsBcvrxItKd8kHkl6paYkdsr/6VCV6ThbzwktTsSL+FKKl3PE1GyxbetCuv/EVm8YzS7nNhOEjGMzB8MUXTPIgqV+VsYzT59N0+uKoeda3MuXaTp9QKeb1Vy6Ky82+GgsESJP9qF2LpUkEQt5TiYT/61N0TxWEFgy8zmEwCqeioxSVwS5gMaYF ++W0R0Hm/e4eQascrrgZfScOnD5/iYUGHEX4gAXyLeONFAFockAJFWLTGwydqfT5TEJGSRERjAz55Vc/qFl36Cq2mS5/oRb/lsVf4CauDTyTRZ3kZo3Dqa6zAtAw/74MphS4Puyh/vLjLfnrNM54X9dFP52/OL5P13qLu1jdo59e3NKCHeE+f7ZFTTEMEN1qdQe0j9NEOAvz4RzGA9YGroYzpQgQpcUMw+jyh6kqxUgeujp0BEZBldyQUCRdG5KXKId2leaxwYKrigfH+PBO0QQB3xKCP687lfXoHXxuC0XBLeHUfKFB0JEE9hh2R+vnVEbImcdOYQpfj9IZCO/AzGGzo0JG7LLzPTr5DSOqq/KJvsL0BHkMA3An7CQvxh3e3NxmVooLWJSUx7JtoZ0ZomkxFk6qehQMuhXMe/C6OIAa6MRJkGpMbhT/ka4Bcu2B5VPhErOZfpv0S1QbhI3wuFj0xJEi9t1S3ClaE2GT45+hgCvQrMerDtywcPGJO5q9XIdI8gdH8ON61Tp9vqMJ+wEOEXrmkIv9DDJ413bv9gR7h4mr7BDp1POWK45Xh8Jlc/eE9lE1SBDRIYt7FT6cdLNj5dSVzo8mTVF15FaEYp70BMAssSLnLlSc+xBRupVDJf6fVIk76H5gsoSBFDZcNhuC9QSSi7X+0ovkMr/zh4p+uP8rrTwr6o77M/h/fWtZW+jPbpgAAAABJRU5ErkJggg== + + + image/png + iVBORw0KGgoAAAANSUhEUgAAAGgAAAAcCAYAAACNr/p2AAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8YQUAAAAJcEhZcwAADsQAAA7EAZUrDhsAABY3SURBVGhD7Zr7k1VVdsdv377v9+3b3dBkajKOEytOWVZNZfIPpFKppPJDKpXKT/kPpmp+yg/5IZNUZqzxhSiCogIO+EZhQBRRUVREBEEQEMVHfEZFaPp1+/a9fV+98vmufU93O/4D88Mc2Pecs/faa6293nufjtmSmbf+4B417+jQFgd3vXP5mG4dWnPQGP9DHNGzdWnCEeYvcY9AfHiZhuDUhHcA813AcBeaASt+RWPL87mW+7iWwgR19byJ33memjTxzTiDuvW4C8bXI1yDsXCJr0XaalwBVv1+rR4QWb1H86N3v62SAT/huUsLa+/xLD7VYprgVzTDMWmhIhoJTn2Dy2F0BYTLylP/Kib8/h18K5d3R3BOQ8LSXQyuKMinRi2C1315LtfyewTIFfV5C/16DAKVkBs8RQryThdUGFcTv1IQt2W0WmeYs6Ik3YOR+hU6V0QWKfg7ePQzkAf9KwoSLikm4A2GhIKigTBpYDnOuBrPEYEwMzw73AA2GneGaN7/fQEst4iWP+sKDAc+IuZ9JeEW0fWXyGhW4VV39PyHzXEN4Lm8y390iQc1EAz6vjOuu3BHTe8+JpyRIQVvdAVF48uwkoHaAL/WoDHnRbIR7UHfAMQbP6uVhoJWe4JaxPTqWbTvCUqwq2DUrbsTn6MpjAD3vXE9aJFqelZbAfMrelFbBtGPcAuvFg791XBRiyYsP0dr4hY1dS+/r4KPxr4zPmhRn/MtPuSJKwryoWV40YNHV9KAdoTX+ZFC6V9Fa3mqngfvumKdvpAHt202edYIkzqtcNdPty+k4ep1NbBaOCsM6DEw0LBurzHA27V2B80KJlKy4+1YD5iwYH7p7w9w9tUVMR69+FibnzptxlqtSe4rfHRl +M4Jfalq/v+DPPlWkdY/eB3h174BuqTfArdtgvLUQ8HY7QjoYX8W3BNztBC/ou4IWzdE4DRHkJaLFTx/CEW5rgVOMdAEWTm4d6EhW0kW3K0Bdiiid4EHdPgTA4HyApD6PEnhZbIewo6TVbNd9gigH5kSNcV8l8yQ77u12i16EL1wOrecuuJasp/VGC+1J0eoA92JLU73xOBjXXT+CkTI1SveSPCgk+YXmLItbUZKDA9vpapyLvsHQYEwXQkVA7cA2jfX1OtZqQDTijYH2YqQALWxlrL/YoGEkwEgZ3aUFhlbWK5y62g0ETUffjWrAY7SuBcYkSp+gzg7ynQYkGIQUJtpKM7FOb6AYOlo9EUNZtPZSy9lrgUQkgqAX6ekBL6TyPKTJY6MuRQZ6aqJdZ5LmYRPC5v0yLp9Kc8tlLCTE0JoDZcvaegsAw/xie46ujs914xROV2iUt6CntWgerYsi212UxLqEs4EA28wXXLsroTew1Lrz02a8OwhRAog8bakPvzJa0WXM192Hl+YgeuCuLnfB8q5/GpnXkCBc6FomRsmY5ntIVFjSPAkIJxcTISLJgxaZ2xbKYHTMFjYvs73TAUJr8iY8LQZawLWgWgdhm/uimBBixsUcfOOBgbEm8IsMLPLSAsE8fC3QN82z+4HG9cCd/9YCV5N34Re9Bs/C65dg6JQecWTHp7tot2mSld4XxJf6GG+oL4JjvpYuOeg+jw7QGWEcPsQj4zJysdPsyejCuJQj4YgPrb05aHoPPPGi/0IgHIvtZVkp8GhNC9zVnD/R8qkSOk/0eYcmQU8doib8kq0ChacZOpZorqBFJC9Nt5mpub4gEMyxuskpsw3rzf76xkN2962MTcMwHi5FiEZES74lZUhI87Nmv/kvs5//7DVbf1fXZumbQTCLMCee2riu33lXJGlBp64771pGq6MQxRNATeqNBV4bwCxAqAVcg9TVotUZm4cfjS/Ak5TV0jP3qZmggKvAzTGnzvvC +VejBWwvYOv0yCPEluuInqEUhkjmiAb15cAnOjSgALednwWntmn8V/HPg3YCMbviLI3b7bwPPDfHMeBOLcU9VsuRdTQqQ7IVWim3TFEQkDxXRYifmgP7ctQWepXHlyHkYHBvbYNXKdisVn7Rq5kXLxJ6z6vALtqbyO5I0iJgILm9z0K3TquU7rJR7zEbyL1oh+4Jl8o9bvnyfFYo3ufJmAQbMm5iv5n9r5fRWq43c5kJRv8KpnuT916zZaqnY/VYb/W9XYqH4H1bI/49VSrfZSGmLTYz83orpHdC63Uaqt1kxf7uN1m610bX/7rQqY/dZrrDDxqqPWim11Sq0UvpeKxbutGIZ2NE7bBqlySFkogsYh3sftMdrN1s2/YBlMnfa+js/dgV14TnKZ/JmwdVRzEjtbisUdlkmcdjyqTdstPqCpZP3OR0ZepMlyUD9QjORp7qhQw9HhP9/tdGRf3YaHvmAj/XFDZfCj6xEIeCH6zZbbuiAFRNHLJ15yNLF+yyb3WYT44etEHvHqsnjNjG6yWYQqGy9ztx1Y4+gxKOWix+yfPaA5Ys7LVV42PKlVy2Tessq6QtWSO4OVg48ZKwB06XUbqvE37N87BW3ci1ErHveEdNpxlPHLZfdbLMQy5d+beXqrVYZ2WD5zA7mnYKnM1YrPW1jo9stX1iPQm6yYvVXNoXgMtmjFou9jqE9CV8brVrcYuvGdwVhZg6i3NP07XLvVK5SDJHQ5uElEdtvhfRFy6VPYBBb3LIlSOUW5UBZ+zVrn7Rc7DCGcdAS2cdY807LlZ+wVOZZK+SOWT5x1tZUX/J1i4ZCdkcagZaKKXnPNOv62c//0ybW/dLWrvk3L/S8IqSYcQ/qIQkBzjIwJyEk91l56KzVUidsDkavEkpmkeily1hV4aiVho9aFuuQZcwwf4p5heQxPOwTK+cP2SRhR94gC5brF/KvsIiPrZY5h0XdZHWsowED8rrs8DErDC1YPn7JMsm9ISTAS+T2 +ufQhS8dZ5NhWmwZXAz5EV/inCL+F+GdWHP7cbv4NvOAJypWiq3X8/T98acnMZxZPvGfTrEEhpw7MLPOm4DGNpadjV1HCMQ+HKj0kO4XRYmqvVdNfWmboa8vEL1i1sNdmCJHKd/Jvjx7AFWJvWjX+f1bM7bMpaE7C/GXoyDiqlYOWjX1oxeRpPPh2z0vK11KPsPRIsooYilp1zQX/Ah3K4cqlMoWYZyb2OVLRZRCkSvsslThno6mXrM1Wg+raXVs5SdVhg/di7i6s9R77yxt32iQIUyN3sNi3LZV83aYlfJiYRyBUrx7WJNRc8imr5F/FEoMnSOEKP4nURRtCQbHYtBVLJz1fiI4Yn4PxYQwiljhmc+DzKkvMMygruyohJy7ioW97XvKcwOq1pGl4L5eesUTuG4vhAXPwERVhTejPgK88csQSw5csm3vTZlifaLJLIIRvIkydt1ziil1/LcaTxEMyj3ie8wKFNiUlVrcA85ElY9AHpyLCLHhkfFK41l3IPkMYP2YVIsACPEruPd9ok7WJkVqSIlGhtB/P32dz4BAfHgEZjPkMHlQWT3JPlN6x2PAHNl7eZm2sTeNe3bAyT2S8r7/9fbfGWRBPstBs4VnLZU7b9dcfd8aF0s3Ey0UYZdEScCq5wyrko1meZcHZ4mM2nHkPelcIpdOWTL5FKN0QlAqXUmIs85bFC8dcIb4abaZkceBYO4GCE+8T1k6E6hAAlbTKDXNYY6X4jMVSX6LkU+61FGuuoB545X3x4cPM/9yS6QNWZ0xbiib9tezzlkqfw/vetW8voYj8HquWnrCrjCmPKOlPs/ZU9qDlUh/axNjrriAtWSwudEL5L8NWBKmUnyHUbbJFKVHyJMB7yS1c8CPestlTGOgJu4JcXX7w0mH7EnNlAqBklynfY8nC51jcSde+FqSS3mPmEhJQaUGfDhZUgalqKaeet3L8faskXrYFhK4iRVbodoAkFiHItsSuAjv6g/ttePgWm2Gh +cyi/kKMAQfh5BHHtjyYR6FkrFw7b1BVms7AxlJnMfWBD6VdtnsVpQaKv7YyquFz2YQT0mSXih11BOokQz/IweVQ69bANxS7a3/5NoCcLZm9r83jXWPG85QmN+eRFDOtVq8OjDGOi+LwVhs9aurrfPgf2MnTTxQfwlsdtCqPwKAL+QuYJogK5M4Vy4NXjnk2TN9hXsYcSr+xpPdwm8ncRPe4w7W/lgcpx0qByrJQ4IxrJE0SRg86HULWlTWQePIhnlZ754j5LZhUSjlidiYtUG7IIv1BOX26j2bIM5njVRnipxC5ZeXifL5z9rSsQUYQGoyofL7PYTOU+KqxtVkeRCkGl/KOWpUiQQub0nn7OEkMn6T9jDfJdOfmwpbNnbTj9dPCggYLkRAq16TTJePhtWzP+sidvt1ruMjZ5bD7zvI0Xv6QKPGXlIgVF/hYMYjOK30fuOW6FxNtWzO7yfKXwNImga6mzntPixQftK+h8DZ2RdbsR3lN2yx3ghoisfiT3mlWSlyyfftZDXzD7KYqAgbbkjsyXpyULW22ksMkaeLUKC+UYMasyW+uamLjX4rGTGOxRz6Eq2CS7pd4MChIwC5KQamPPW2zoQ0vmj3j8V15qEQzDyUGXzRlIITiHB8zSdZn3dOY8SfxLcss+t1pZryqQtswHDheZLxeujFDZZd8mZ2zzZHsVhRTzB6iktnviFvOV3EYrlT8mvHxik9+ioMIjKOig1cYf8X2LQlefxKaQq0KhUH2IuL3XvgG2SV84omerjXyu+wmV3/AnKIfCJP461dwDVh67yzLFDcT7e9kKbLc/W4PQ4E35QgVLobyRfPKulbOX7Ao8fYOSZVixxEuWK35l6dz+sE0AvpR8jQLgC4zpgHtnSBzioU++RgvSD/NHR16iYjxLhfuQtXlXNGEIg6KGA49klkvvZKvxFYXJm9YEv+vHFdNBQQ6N6zKQze1EQe9ZhsQcJSuBaYLO8GS5Y9nbbAIvKP/gF/YF +BBPZY1jXaULA057sZDhquhRuZHHaDBZz71pq6COrVXbYLAtKZV61BGV5bfRRm0bh2psqBAxR2seSn9k3GEyxdIAK7HGbpV9hQYsX0+LlMnOy+d2WQ9BuGNBR8tXZmLwpn32dEHbFxtIkcHDNgOMycCpiJHwv9+FLOWVSYxhIsfgSyvkaaz5nlcrj5Na7yZN7LJ58k/w44yW7vEcGkKIEzyc+Jf8ddP50FimBqxL26AOdFvJJJ8/bcOwjFLrduoJjbjPoz8OdctdIiXUMn7IbrjsTDJwxHVB3ei0UpHgEQpWM1bFNWOS7nnQnWYT2Ra5lkPimjEWNJF60EhaVrvzSpiA0uuaQVapnbDj5tF1CaNoTSbGioj2VEv3I+HMw+QnW+Y796MebvbCIsbdJlT6xQuUJLy81qQP+QpVwkrlAmP0YmDOUqgdsmnEJstHVuRkVpyuAxEvZXivtslnGVb6qFlUeUrWWy70BzYtWpvryEAr/kPWUC0t+SiBPdCHRoT1RNvk5IfMD32iO5B4kFG5m4/0QinkJI/yCaPGGl8pS0r/80xUKozMUCofsikIkdLX2dO1Bi+H1kl9lhHUPf0GV+b795IdbvThRLnXlACtDvoLMxsYewDm2+obX8zdji/0WcMpBVAHSqoAlzHT6sCWHjtva2kMeW6UUKW8KgqXCPVZLkxjjhED6ZhCq9h7p1FO48RuWLz/tVcgcC1dslWWXRvZbJk+sT1JIZJ5zL5MVx3Pn8JT3KRy2OWybfp29XSaEpyrHUdK37knFzB4/vpEH6ZxQIUyK194lG/9fkv1OT9LReaCKGsGntC+jErvzziUPY7DlrcE/hUJdKmVVcEyMbaTYOM0+7CO77vqzNgM+hacWa5NxesWZ/JRwdjKUysgrRAHK+BSb9+rv/TjrErCxLOvKNqhMz1kifYacThnOuhvgUwQSf+JTTTJXNZrLbGVLsMFPb6JDWNWjOn7zjaoskrleQVSr+9j8XbBS7LyN +Ji/A2CnL5M5Qkp7GailpUxdstLzfKxnt+v1IqHa/ZRKnEMpnNoT1ZcvHLJk6avnceYtT4eWzZwgdO1zhivXTtFj8LYqSc/7uhxliHGEpSSbzT1g8/xUwbG7Z8avyEoxOllvEF4UPV9DQeZuobDB9/VA1JDQqUiTcLDv4ZAKLB7/WrOYKpPkFPeXeLsIfTe+x3NArrJ0cI/7Uj/BUbGjPoxyaRw7F+MkQpoCRwY6u3cIaT+CpF8ifZ/GUd1HMJK2FUtjbDV2wIbYgV5CRwprzBxdtTEUncDL8tYTIQuyE1Yo4BHBitEVShKwXCzFpVBN1uC6PUEVTKxygMjuGki5YCiFlCgh++ATJ+0X76XVUeDCnvYyHFeaoIlxT2W2JmPYVwGUJUWwg4wnyTvKojdf2+AGqDEFWfPPG04SgnRQJW12w/SU47TICV6J/w1/9jopvP3j22j/+3cuuOPXL5cWrPCif2+JFhGoR36cx4Gdk0Fg3+guqtj2WL21zzwt/hxBg/EHKESyC//HYr21keKONl+53a/b8AYCGlfN0LihLz6XuZkvxoN274SPnR3lInlktk+CzR6wwxB6OiBDPfurhWacXudxJy5T2eo7zDS5Jqd2b83UohMkTR/PbrTi020arN3vlGVnRPHFXPMSWVEpjdtFJth+WQrhObLz2z+8nJ91rlfFNbkU62fXvbDJHzWah0Xe3SMZ3r2/jrhutXHvAbqYsVWWuuCqr11F6A4twFOBwl2de+DQ8h4DZZAKjMChBqfTVIqLKULJVU/yeZB77OH9u6JArungX/8o52ny6UpzBMObKWfUsBcvrxItKd8kHkl6paYkdsr/6VCV6ThbzwktTsSL+FKKl3PE1GyxbetCuv/EVm8YzS7nNhOEjGMzB8MUXTPIgqV+VsYzT59N0+uKoeda3MuXaTp9QKeb1Vy6Ky82+GgsESJP9qF2LpUkEQt5TiYT/61N0TxWEFgy8zmEwCqeioxSVwS5gMaYF ++W0R0Hm/e4eQascrrgZfScOnD5/iYUGHEX4gAXyLeONFAFockAJFWLTGwydqfT5TEJGSRERjAz55Vc/qFl36Cq2mS5/oRb/lsVf4CauDTyTRZ3kZo3Dqa6zAtAw/74MphS4Puyh/vLjLfnrNM54X9dFP52/OL5P13qLu1jdo59e3NKCHeE+f7ZFTTEMEN1qdQe0j9NEOAvz4RzGA9YGroYzpQgQpcUMw+jyh6kqxUgeujp0BEZBldyQUCRdG5KXKId2leaxwYKrigfH+PBO0QQB3xKCP687lfXoHXxuC0XBLeHUfKFB0JEE9hh2R+vnVEbImcdOYQpfj9IZCO/AzGGzo0JG7LLzPTr5DSOqq/KJvsL0BHkMA3An7CQvxh3e3NxmVooLWJSUx7JtoZ0ZomkxFk6qehQMuhXMe/C6OIAa6MRJkGpMbhT/ka4Bcu2B5VPhErOZfpv0S1QbhI3wuFj0xJEi9t1S3ClaE2GT45+hgCvQrMerDtywcPGJO5q9XIdI8gdH8ON61Tp9vqMJ+wEOEXrmkIv9DDJ413bv9gR7h4mr7BDp1POWK45Xh8Jlc/eE9lE1SBDRIYt7FT6cdLNj5dSVzo8mTVF15FaEYp70BMAssSLnLlSc+xBRupVDJf6fVIk76H5gsoSBFDZcNhuC9QSSi7X+0ovkMr/zh4p+uP8rrTwr6o77M/h/fWtZW+jPbpgAAAABJRU5ErkJggg== + + Cm 644b5749-ad74-45b6-ab76-777b4ab74aff \ No newline at end of file diff --git a/Empresas/48/Formatos/LibroMayor.rdlc b/Empresas/48/Formatos/LibroMayor.rdlc index f501868ee..43457466f 100644 --- a/Empresas/48/Formatos/LibroMayor.rdlc +++ b/Empresas/48/Formatos/LibroMayor.rdlc @@ -925,62 +925,6 @@ - - 0.74083cm - true - true - - - true - true - - - - - Fecha Impresión: - - - - - - - - =Today - - - - - - 2pt - 2pt - 2pt - 2pt - - - - - - - 21.59cm 27.94cm 0.5cm @@ -1124,6 +1068,30 @@ count = count + 1 Return count End function + + + image/png + iVBORw0KGgoAAAANSUhEUgAAAGgAAAAcCAYAAACNr/p2AAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8YQUAAAAJcEhZcwAADsQAAA7EAZUrDhsAABY3SURBVGhD7Zr7k1VVdsdv377v9+3b3dBkajKOEytOWVZNZfIPpFKppPJDKpXKT/kPpmp+yg/5IZNUZqzxhSiCogIO+EZhQBRRUVREBEEQEMVHfEZFaPp1+/a9fV+98vmufU93O/4D88Mc2Pecs/faa6293nufjtmSmbf+4B417+jQFgd3vXP5mG4dWnPQGP9DHNGzdWnCEeYvcY9AfHiZhuDUhHcA813AcBeaASt+RWPL87mW+7iWwgR19byJ33memjTxzTiDuvW4C8bXI1yDsXCJr0XaalwBVv1+rR4QWb1H86N3v62SAT/huUsLa+/xLD7VYprgVzTDMWmhIhoJTn2Dy2F0BYTLylP/Kib8/h18K5d3R3BOQ8LSXQyuKMinRi2C1315LtfyewTIFfV5C/16DAKVkBs8RQryThdUGFcTv1IQt2W0WmeYs6Ik3YOR+hU6V0QWKfg7ePQzkAf9KwoSLikm4A2GhIKigTBpYDnOuBrPEYEwMzw73AA2GneGaN7/fQEst4iWP+sKDAc+IuZ9JeEW0fWXyGhW4VV39PyHzXEN4Lm8y390iQc1EAz6vjOuu3BHTe8+JpyRIQVvdAVF48uwkoHaAL/WoDHnRbIR7UHfAMQbP6uVhoJWe4JaxPTqWbTvCUqwq2DUrbsTn6MpjAD3vXE9aJFqelZbAfMrelFbBtGPcAuvFg791XBRiyYsP0dr4hY1dS+/r4KPxr4zPmhRn/MtPuSJKwryoWV40YNHV9KAdoTX+ZFC6V9Fa3mqngfvumKdvpAHt202edYIkzqtcNdPty+k4ep1NbBaOCsM6DEw0LBurzHA27V2B80KJlKy4+1YD5iwYH7p7w9w9tUVMR69+FibnzptxlqtSe4rfHRl +M4Jfalq/v+DPPlWkdY/eB3h174BuqTfArdtgvLUQ8HY7QjoYX8W3BNztBC/ou4IWzdE4DRHkJaLFTx/CEW5rgVOMdAEWTm4d6EhW0kW3K0Bdiiid4EHdPgTA4HyApD6PEnhZbIewo6TVbNd9gigH5kSNcV8l8yQ77u12i16EL1wOrecuuJasp/VGC+1J0eoA92JLU73xOBjXXT+CkTI1SveSPCgk+YXmLItbUZKDA9vpapyLvsHQYEwXQkVA7cA2jfX1OtZqQDTijYH2YqQALWxlrL/YoGEkwEgZ3aUFhlbWK5y62g0ETUffjWrAY7SuBcYkSp+gzg7ynQYkGIQUJtpKM7FOb6AYOlo9EUNZtPZSy9lrgUQkgqAX6ekBL6TyPKTJY6MuRQZ6aqJdZ5LmYRPC5v0yLp9Kc8tlLCTE0JoDZcvaegsAw/xie46ujs914xROV2iUt6CntWgerYsi212UxLqEs4EA28wXXLsroTew1Lrz02a8OwhRAog8bakPvzJa0WXM192Hl+YgeuCuLnfB8q5/GpnXkCBc6FomRsmY5ntIVFjSPAkIJxcTISLJgxaZ2xbKYHTMFjYvs73TAUJr8iY8LQZawLWgWgdhm/uimBBixsUcfOOBgbEm8IsMLPLSAsE8fC3QN82z+4HG9cCd/9YCV5N34Re9Bs/C65dg6JQecWTHp7tot2mSld4XxJf6GG+oL4JjvpYuOeg+jw7QGWEcPsQj4zJysdPsyejCuJQj4YgPrb05aHoPPPGi/0IgHIvtZVkp8GhNC9zVnD/R8qkSOk/0eYcmQU8doib8kq0ChacZOpZorqBFJC9Nt5mpub4gEMyxuskpsw3rzf76xkN2962MTcMwHi5FiEZES74lZUhI87Nmv/kvs5//7DVbf1fXZumbQTCLMCee2riu33lXJGlBp64771pGq6MQxRNATeqNBV4bwCxAqAVcg9TVotUZm4cfjS/Ak5TV0jP3qZmggKvAzTGnzvvC +VejBWwvYOv0yCPEluuInqEUhkjmiAb15cAnOjSgALednwWntmn8V/HPg3YCMbviLI3b7bwPPDfHMeBOLcU9VsuRdTQqQ7IVWim3TFEQkDxXRYifmgP7ctQWepXHlyHkYHBvbYNXKdisVn7Rq5kXLxJ6z6vALtqbyO5I0iJgILm9z0K3TquU7rJR7zEbyL1oh+4Jl8o9bvnyfFYo3ufJmAQbMm5iv5n9r5fRWq43c5kJRv8KpnuT916zZaqnY/VYb/W9XYqH4H1bI/49VSrfZSGmLTYz83orpHdC63Uaqt1kxf7uN1m610bX/7rQqY/dZrrDDxqqPWim11Sq0UvpeKxbutGIZ2NE7bBqlySFkogsYh3sftMdrN1s2/YBlMnfa+js/dgV14TnKZ/JmwdVRzEjtbisUdlkmcdjyqTdstPqCpZP3OR0ZepMlyUD9QjORp7qhQw9HhP9/tdGRf3YaHvmAj/XFDZfCj6xEIeCH6zZbbuiAFRNHLJ15yNLF+yyb3WYT44etEHvHqsnjNjG6yWYQqGy9ztx1Y4+gxKOWix+yfPaA5Ys7LVV42PKlVy2Tessq6QtWSO4OVg48ZKwB06XUbqvE37N87BW3ci1ErHveEdNpxlPHLZfdbLMQy5d+beXqrVYZ2WD5zA7mnYKnM1YrPW1jo9stX1iPQm6yYvVXNoXgMtmjFou9jqE9CV8brVrcYuvGdwVhZg6i3NP07XLvVK5SDJHQ5uElEdtvhfRFy6VPYBBb3LIlSOUW5UBZ+zVrn7Rc7DCGcdAS2cdY807LlZ+wVOZZK+SOWT5x1tZUX/J1i4ZCdkcagZaKKXnPNOv62c//0ybW/dLWrvk3L/S8IqSYcQ/qIQkBzjIwJyEk91l56KzVUidsDkavEkpmkeily1hV4aiVho9aFuuQZcwwf4p5heQxPOwTK+cP2SRhR94gC5brF/KvsIiPrZY5h0XdZHWsowED8rrs8DErDC1YPn7JMsm9ISTAS+T2 +ufQhS8dZ5NhWmwZXAz5EV/inCL+F+GdWHP7cbv4NvOAJypWiq3X8/T98acnMZxZPvGfTrEEhpw7MLPOm4DGNpadjV1HCMQ+HKj0kO4XRYmqvVdNfWmboa8vEL1i1sNdmCJHKd/Jvjx7AFWJvWjX+f1bM7bMpaE7C/GXoyDiqlYOWjX1oxeRpPPh2z0vK11KPsPRIsooYilp1zQX/Ah3K4cqlMoWYZyb2OVLRZRCkSvsslThno6mXrM1Wg+raXVs5SdVhg/di7i6s9R77yxt32iQIUyN3sNi3LZV83aYlfJiYRyBUrx7WJNRc8imr5F/FEoMnSOEKP4nURRtCQbHYtBVLJz1fiI4Yn4PxYQwiljhmc+DzKkvMMygruyohJy7ioW97XvKcwOq1pGl4L5eesUTuG4vhAXPwERVhTejPgK88csQSw5csm3vTZlifaLJLIIRvIkydt1ziil1/LcaTxEMyj3ie8wKFNiUlVrcA85ElY9AHpyLCLHhkfFK41l3IPkMYP2YVIsACPEruPd9ok7WJkVqSIlGhtB/P32dz4BAfHgEZjPkMHlQWT3JPlN6x2PAHNl7eZm2sTeNe3bAyT2S8r7/9fbfGWRBPstBs4VnLZU7b9dcfd8aF0s3Ey0UYZdEScCq5wyrko1meZcHZ4mM2nHkPelcIpdOWTL5FKN0QlAqXUmIs85bFC8dcIb4abaZkceBYO4GCE+8T1k6E6hAAlbTKDXNYY6X4jMVSX6LkU+61FGuuoB545X3x4cPM/9yS6QNWZ0xbiib9tezzlkqfw/vetW8voYj8HquWnrCrjCmPKOlPs/ZU9qDlUh/axNjrriAtWSwudEL5L8NWBKmUnyHUbbJFKVHyJMB7yS1c8CPestlTGOgJu4JcXX7w0mH7EnNlAqBklynfY8nC51jcSde+FqSS3mPmEhJQaUGfDhZUgalqKaeet3L8faskXrYFhK4iRVbodoAkFiHItsSuAjv6g/ttePgWm2Gh +cyi/kKMAQfh5BHHtjyYR6FkrFw7b1BVms7AxlJnMfWBD6VdtnsVpQaKv7YyquFz2YQT0mSXih11BOokQz/IweVQ69bANxS7a3/5NoCcLZm9r83jXWPG85QmN+eRFDOtVq8OjDGOi+LwVhs9aurrfPgf2MnTTxQfwlsdtCqPwKAL+QuYJogK5M4Vy4NXjnk2TN9hXsYcSr+xpPdwm8ncRPe4w7W/lgcpx0qByrJQ4IxrJE0SRg86HULWlTWQePIhnlZ754j5LZhUSjlidiYtUG7IIv1BOX26j2bIM5njVRnipxC5ZeXifL5z9rSsQUYQGoyofL7PYTOU+KqxtVkeRCkGl/KOWpUiQQub0nn7OEkMn6T9jDfJdOfmwpbNnbTj9dPCggYLkRAq16TTJePhtWzP+sidvt1ruMjZ5bD7zvI0Xv6QKPGXlIgVF/hYMYjOK30fuOW6FxNtWzO7yfKXwNImga6mzntPixQftK+h8DZ2RdbsR3lN2yx3ghoisfiT3mlWSlyyfftZDXzD7KYqAgbbkjsyXpyULW22ksMkaeLUKC+UYMasyW+uamLjX4rGTGOxRz6Eq2CS7pd4MChIwC5KQamPPW2zoQ0vmj3j8V15qEQzDyUGXzRlIITiHB8zSdZn3dOY8SfxLcss+t1pZryqQtswHDheZLxeujFDZZd8mZ2zzZHsVhRTzB6iktnviFvOV3EYrlT8mvHxik9+ioMIjKOig1cYf8X2LQlefxKaQq0KhUH2IuL3XvgG2SV84omerjXyu+wmV3/AnKIfCJP461dwDVh67yzLFDcT7e9kKbLc/W4PQ4E35QgVLobyRfPKulbOX7Ao8fYOSZVixxEuWK35l6dz+sE0AvpR8jQLgC4zpgHtnSBzioU++RgvSD/NHR16iYjxLhfuQtXlXNGEIg6KGA49klkvvZKvxFYXJm9YEv+vHFdNBQQ6N6zKQze1EQe9ZhsQcJSuBaYLO8GS5Y9nbbAIvKP/gF/YF +BBPZY1jXaULA057sZDhquhRuZHHaDBZz71pq6COrVXbYLAtKZV61BGV5bfRRm0bh2psqBAxR2seSn9k3GEyxdIAK7HGbpV9hQYsX0+LlMnOy+d2WQ9BuGNBR8tXZmLwpn32dEHbFxtIkcHDNgOMycCpiJHwv9+FLOWVSYxhIsfgSyvkaaz5nlcrj5Na7yZN7LJ58k/w44yW7vEcGkKIEzyc+Jf8ddP50FimBqxL26AOdFvJJJ8/bcOwjFLrduoJjbjPoz8OdctdIiXUMn7IbrjsTDJwxHVB3ei0UpHgEQpWM1bFNWOS7nnQnWYT2Ra5lkPimjEWNJF60EhaVrvzSpiA0uuaQVapnbDj5tF1CaNoTSbGioj2VEv3I+HMw+QnW+Y796MebvbCIsbdJlT6xQuUJLy81qQP+QpVwkrlAmP0YmDOUqgdsmnEJstHVuRkVpyuAxEvZXivtslnGVb6qFlUeUrWWy70BzYtWpvryEAr/kPWUC0t+SiBPdCHRoT1RNvk5IfMD32iO5B4kFG5m4/0QinkJI/yCaPGGl8pS0r/80xUKozMUCofsikIkdLX2dO1Bi+H1kl9lhHUPf0GV+b795IdbvThRLnXlACtDvoLMxsYewDm2+obX8zdji/0WcMpBVAHSqoAlzHT6sCWHjtva2kMeW6UUKW8KgqXCPVZLkxjjhED6ZhCq9h7p1FO48RuWLz/tVcgcC1dslWWXRvZbJk+sT1JIZJ5zL5MVx3Pn8JT3KRy2OWybfp29XSaEpyrHUdK37knFzB4/vpEH6ZxQIUyK194lG/9fkv1OT9LReaCKGsGntC+jErvzziUPY7DlrcE/hUJdKmVVcEyMbaTYOM0+7CO77vqzNgM+hacWa5NxesWZ/JRwdjKUysgrRAHK+BSb9+rv/TjrErCxLOvKNqhMz1kifYacThnOuhvgUwQSf+JTTTJXNZrLbGVLsMFPb6JDWNWjOn7zjaoskrleQVSr+9j8XbBS7LyN +Ji/A2CnL5M5Qkp7GailpUxdstLzfKxnt+v1IqHa/ZRKnEMpnNoT1ZcvHLJk6avnceYtT4eWzZwgdO1zhivXTtFj8LYqSc/7uhxliHGEpSSbzT1g8/xUwbG7Z8avyEoxOllvEF4UPV9DQeZuobDB9/VA1JDQqUiTcLDv4ZAKLB7/WrOYKpPkFPeXeLsIfTe+x3NArrJ0cI/7Uj/BUbGjPoxyaRw7F+MkQpoCRwY6u3cIaT+CpF8ifZ/GUd1HMJK2FUtjbDV2wIbYgV5CRwprzBxdtTEUncDL8tYTIQuyE1Yo4BHBitEVShKwXCzFpVBN1uC6PUEVTKxygMjuGki5YCiFlCgh++ATJ+0X76XVUeDCnvYyHFeaoIlxT2W2JmPYVwGUJUWwg4wnyTvKojdf2+AGqDEFWfPPG04SgnRQJW12w/SU47TICV6J/w1/9jopvP3j22j/+3cuuOPXL5cWrPCif2+JFhGoR36cx4Gdk0Fg3+guqtj2WL21zzwt/hxBg/EHKESyC//HYr21keKONl+53a/b8AYCGlfN0LihLz6XuZkvxoN274SPnR3lInlktk+CzR6wwxB6OiBDPfurhWacXudxJy5T2eo7zDS5Jqd2b83UohMkTR/PbrTi020arN3vlGVnRPHFXPMSWVEpjdtFJth+WQrhObLz2z+8nJ91rlfFNbkU62fXvbDJHzWah0Xe3SMZ3r2/jrhutXHvAbqYsVWWuuCqr11F6A4twFOBwl2de+DQ8h4DZZAKjMChBqfTVIqLKULJVU/yeZB77OH9u6JArungX/8o52ny6UpzBMObKWfUsBcvrxItKd8kHkl6paYkdsr/6VCV6ThbzwktTsSL+FKKl3PE1GyxbetCuv/EVm8YzS7nNhOEjGMzB8MUXTPIgqV+VsYzT59N0+uKoeda3MuXaTp9QKeb1Vy6Ky82+GgsESJP9qF2LpUkEQt5TiYT/61N0TxWEFgy8zmEwCqeioxSVwS5gMaYF ++W0R0Hm/e4eQascrrgZfScOnD5/iYUGHEX4gAXyLeONFAFockAJFWLTGwydqfT5TEJGSRERjAz55Vc/qFl36Cq2mS5/oRb/lsVf4CauDTyTRZ3kZo3Dqa6zAtAw/74MphS4Puyh/vLjLfnrNM54X9dFP52/OL5P13qLu1jdo59e3NKCHeE+f7ZFTTEMEN1qdQe0j9NEOAvz4RzGA9YGroYzpQgQpcUMw+jyh6kqxUgeujp0BEZBldyQUCRdG5KXKId2leaxwYKrigfH+PBO0QQB3xKCP687lfXoHXxuC0XBLeHUfKFB0JEE9hh2R+vnVEbImcdOYQpfj9IZCO/AzGGzo0JG7LLzPTr5DSOqq/KJvsL0BHkMA3An7CQvxh3e3NxmVooLWJSUx7JtoZ0ZomkxFk6qehQMuhXMe/C6OIAa6MRJkGpMbhT/ka4Bcu2B5VPhErOZfpv0S1QbhI3wuFj0xJEi9t1S3ClaE2GT45+hgCvQrMerDtywcPGJO5q9XIdI8gdH8ON61Tp9vqMJ+wEOEXrmkIv9DDJ413bv9gR7h4mr7BDp1POWK45Xh8Jlc/eE9lE1SBDRIYt7FT6cdLNj5dSVzo8mTVF15FaEYp70BMAssSLnLlSc+xBRupVDJf6fVIk76H5gsoSBFDZcNhuC9QSSi7X+0ovkMr/zh4p+uP8rrTwr6o77M/h/fWtZW+jPbpgAAAABJRU5ErkJggg== + + + image/png + iVBORw0KGgoAAAANSUhEUgAAAGgAAAAcCAYAAACNr/p2AAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8YQUAAAAJcEhZcwAADsQAAA7EAZUrDhsAABY3SURBVGhD7Zr7k1VVdsdv377v9+3b3dBkajKOEytOWVZNZfIPpFKppPJDKpXKT/kPpmp+yg/5IZNUZqzxhSiCogIO+EZhQBRRUVREBEEQEMVHfEZFaPp1+/a9fV+98vmufU93O/4D88Mc2Pecs/faa6293nufjtmSmbf+4B417+jQFgd3vXP5mG4dWnPQGP9DHNGzdWnCEeYvcY9AfHiZhuDUhHcA813AcBeaASt+RWPL87mW+7iWwgR19byJ33memjTxzTiDuvW4C8bXI1yDsXCJr0XaalwBVv1+rR4QWb1H86N3v62SAT/huUsLa+/xLD7VYprgVzTDMWmhIhoJTn2Dy2F0BYTLylP/Kib8/h18K5d3R3BOQ8LSXQyuKMinRi2C1315LtfyewTIFfV5C/16DAKVkBs8RQryThdUGFcTv1IQt2W0WmeYs6Ik3YOR+hU6V0QWKfg7ePQzkAf9KwoSLikm4A2GhIKigTBpYDnOuBrPEYEwMzw73AA2GneGaN7/fQEst4iWP+sKDAc+IuZ9JeEW0fWXyGhW4VV39PyHzXEN4Lm8y390iQc1EAz6vjOuu3BHTe8+JpyRIQVvdAVF48uwkoHaAL/WoDHnRbIR7UHfAMQbP6uVhoJWe4JaxPTqWbTvCUqwq2DUrbsTn6MpjAD3vXE9aJFqelZbAfMrelFbBtGPcAuvFg791XBRiyYsP0dr4hY1dS+/r4KPxr4zPmhRn/MtPuSJKwryoWV40YNHV9KAdoTX+ZFC6V9Fa3mqngfvumKdvpAHt202edYIkzqtcNdPty+k4ep1NbBaOCsM6DEw0LBurzHA27V2B80KJlKy4+1YD5iwYH7p7w9w9tUVMR69+FibnzptxlqtSe4rfHRl +M4Jfalq/v+DPPlWkdY/eB3h174BuqTfArdtgvLUQ8HY7QjoYX8W3BNztBC/ou4IWzdE4DRHkJaLFTx/CEW5rgVOMdAEWTm4d6EhW0kW3K0Bdiiid4EHdPgTA4HyApD6PEnhZbIewo6TVbNd9gigH5kSNcV8l8yQ77u12i16EL1wOrecuuJasp/VGC+1J0eoA92JLU73xOBjXXT+CkTI1SveSPCgk+YXmLItbUZKDA9vpapyLvsHQYEwXQkVA7cA2jfX1OtZqQDTijYH2YqQALWxlrL/YoGEkwEgZ3aUFhlbWK5y62g0ETUffjWrAY7SuBcYkSp+gzg7ynQYkGIQUJtpKM7FOb6AYOlo9EUNZtPZSy9lrgUQkgqAX6ekBL6TyPKTJY6MuRQZ6aqJdZ5LmYRPC5v0yLp9Kc8tlLCTE0JoDZcvaegsAw/xie46ujs914xROV2iUt6CntWgerYsi212UxLqEs4EA28wXXLsroTew1Lrz02a8OwhRAog8bakPvzJa0WXM192Hl+YgeuCuLnfB8q5/GpnXkCBc6FomRsmY5ntIVFjSPAkIJxcTISLJgxaZ2xbKYHTMFjYvs73TAUJr8iY8LQZawLWgWgdhm/uimBBixsUcfOOBgbEm8IsMLPLSAsE8fC3QN82z+4HG9cCd/9YCV5N34Re9Bs/C65dg6JQecWTHp7tot2mSld4XxJf6GG+oL4JjvpYuOeg+jw7QGWEcPsQj4zJysdPsyejCuJQj4YgPrb05aHoPPPGi/0IgHIvtZVkp8GhNC9zVnD/R8qkSOk/0eYcmQU8doib8kq0ChacZOpZorqBFJC9Nt5mpub4gEMyxuskpsw3rzf76xkN2962MTcMwHi5FiEZES74lZUhI87Nmv/kvs5//7DVbf1fXZumbQTCLMCee2riu33lXJGlBp64771pGq6MQxRNATeqNBV4bwCxAqAVcg9TVotUZm4cfjS/Ak5TV0jP3qZmggKvAzTGnzvvC +VejBWwvYOv0yCPEluuInqEUhkjmiAb15cAnOjSgALednwWntmn8V/HPg3YCMbviLI3b7bwPPDfHMeBOLcU9VsuRdTQqQ7IVWim3TFEQkDxXRYifmgP7ctQWepXHlyHkYHBvbYNXKdisVn7Rq5kXLxJ6z6vALtqbyO5I0iJgILm9z0K3TquU7rJR7zEbyL1oh+4Jl8o9bvnyfFYo3ufJmAQbMm5iv5n9r5fRWq43c5kJRv8KpnuT916zZaqnY/VYb/W9XYqH4H1bI/49VSrfZSGmLTYz83orpHdC63Uaqt1kxf7uN1m610bX/7rQqY/dZrrDDxqqPWim11Sq0UvpeKxbutGIZ2NE7bBqlySFkogsYh3sftMdrN1s2/YBlMnfa+js/dgV14TnKZ/JmwdVRzEjtbisUdlkmcdjyqTdstPqCpZP3OR0ZepMlyUD9QjORp7qhQw9HhP9/tdGRf3YaHvmAj/XFDZfCj6xEIeCH6zZbbuiAFRNHLJ15yNLF+yyb3WYT44etEHvHqsnjNjG6yWYQqGy9ztx1Y4+gxKOWix+yfPaA5Ys7LVV42PKlVy2Tessq6QtWSO4OVg48ZKwB06XUbqvE37N87BW3ci1ErHveEdNpxlPHLZfdbLMQy5d+beXqrVYZ2WD5zA7mnYKnM1YrPW1jo9stX1iPQm6yYvVXNoXgMtmjFou9jqE9CV8brVrcYuvGdwVhZg6i3NP07XLvVK5SDJHQ5uElEdtvhfRFy6VPYBBb3LIlSOUW5UBZ+zVrn7Rc7DCGcdAS2cdY807LlZ+wVOZZK+SOWT5x1tZUX/J1i4ZCdkcagZaKKXnPNOv62c//0ybW/dLWrvk3L/S8IqSYcQ/qIQkBzjIwJyEk91l56KzVUidsDkavEkpmkeily1hV4aiVho9aFuuQZcwwf4p5heQxPOwTK+cP2SRhR94gC5brF/KvsIiPrZY5h0XdZHWsowED8rrs8DErDC1YPn7JMsm9ISTAS+T2 +ufQhS8dZ5NhWmwZXAz5EV/inCL+F+GdWHP7cbv4NvOAJypWiq3X8/T98acnMZxZPvGfTrEEhpw7MLPOm4DGNpadjV1HCMQ+HKj0kO4XRYmqvVdNfWmboa8vEL1i1sNdmCJHKd/Jvjx7AFWJvWjX+f1bM7bMpaE7C/GXoyDiqlYOWjX1oxeRpPPh2z0vK11KPsPRIsooYilp1zQX/Ah3K4cqlMoWYZyb2OVLRZRCkSvsslThno6mXrM1Wg+raXVs5SdVhg/di7i6s9R77yxt32iQIUyN3sNi3LZV83aYlfJiYRyBUrx7WJNRc8imr5F/FEoMnSOEKP4nURRtCQbHYtBVLJz1fiI4Yn4PxYQwiljhmc+DzKkvMMygruyohJy7ioW97XvKcwOq1pGl4L5eesUTuG4vhAXPwERVhTejPgK88csQSw5csm3vTZlifaLJLIIRvIkydt1ziil1/LcaTxEMyj3ie8wKFNiUlVrcA85ElY9AHpyLCLHhkfFK41l3IPkMYP2YVIsACPEruPd9ok7WJkVqSIlGhtB/P32dz4BAfHgEZjPkMHlQWT3JPlN6x2PAHNl7eZm2sTeNe3bAyT2S8r7/9fbfGWRBPstBs4VnLZU7b9dcfd8aF0s3Ey0UYZdEScCq5wyrko1meZcHZ4mM2nHkPelcIpdOWTL5FKN0QlAqXUmIs85bFC8dcIb4abaZkceBYO4GCE+8T1k6E6hAAlbTKDXNYY6X4jMVSX6LkU+61FGuuoB545X3x4cPM/9yS6QNWZ0xbiib9tezzlkqfw/vetW8voYj8HquWnrCrjCmPKOlPs/ZU9qDlUh/axNjrriAtWSwudEL5L8NWBKmUnyHUbbJFKVHyJMB7yS1c8CPestlTGOgJu4JcXX7w0mH7EnNlAqBklynfY8nC51jcSde+FqSS3mPmEhJQaUGfDhZUgalqKaeet3L8faskXrYFhK4iRVbodoAkFiHItsSuAjv6g/ttePgWm2Gh +cyi/kKMAQfh5BHHtjyYR6FkrFw7b1BVms7AxlJnMfWBD6VdtnsVpQaKv7YyquFz2YQT0mSXih11BOokQz/IweVQ69bANxS7a3/5NoCcLZm9r83jXWPG85QmN+eRFDOtVq8OjDGOi+LwVhs9aurrfPgf2MnTTxQfwlsdtCqPwKAL+QuYJogK5M4Vy4NXjnk2TN9hXsYcSr+xpPdwm8ncRPe4w7W/lgcpx0qByrJQ4IxrJE0SRg86HULWlTWQePIhnlZ754j5LZhUSjlidiYtUG7IIv1BOX26j2bIM5njVRnipxC5ZeXifL5z9rSsQUYQGoyofL7PYTOU+KqxtVkeRCkGl/KOWpUiQQub0nn7OEkMn6T9jDfJdOfmwpbNnbTj9dPCggYLkRAq16TTJePhtWzP+sidvt1ruMjZ5bD7zvI0Xv6QKPGXlIgVF/hYMYjOK30fuOW6FxNtWzO7yfKXwNImga6mzntPixQftK+h8DZ2RdbsR3lN2yx3ghoisfiT3mlWSlyyfftZDXzD7KYqAgbbkjsyXpyULW22ksMkaeLUKC+UYMasyW+uamLjX4rGTGOxRz6Eq2CS7pd4MChIwC5KQamPPW2zoQ0vmj3j8V15qEQzDyUGXzRlIITiHB8zSdZn3dOY8SfxLcss+t1pZryqQtswHDheZLxeujFDZZd8mZ2zzZHsVhRTzB6iktnviFvOV3EYrlT8mvHxik9+ioMIjKOig1cYf8X2LQlefxKaQq0KhUH2IuL3XvgG2SV84omerjXyu+wmV3/AnKIfCJP461dwDVh67yzLFDcT7e9kKbLc/W4PQ4E35QgVLobyRfPKulbOX7Ao8fYOSZVixxEuWK35l6dz+sE0AvpR8jQLgC4zpgHtnSBzioU++RgvSD/NHR16iYjxLhfuQtXlXNGEIg6KGA49klkvvZKvxFYXJm9YEv+vHFdNBQQ6N6zKQze1EQe9ZhsQcJSuBaYLO8GS5Y9nbbAIvKP/gF/YF +BBPZY1jXaULA057sZDhquhRuZHHaDBZz71pq6COrVXbYLAtKZV61BGV5bfRRm0bh2psqBAxR2seSn9k3GEyxdIAK7HGbpV9hQYsX0+LlMnOy+d2WQ9BuGNBR8tXZmLwpn32dEHbFxtIkcHDNgOMycCpiJHwv9+FLOWVSYxhIsfgSyvkaaz5nlcrj5Na7yZN7LJ58k/w44yW7vEcGkKIEzyc+Jf8ddP50FimBqxL26AOdFvJJJ8/bcOwjFLrduoJjbjPoz8OdctdIiXUMn7IbrjsTDJwxHVB3ei0UpHgEQpWM1bFNWOS7nnQnWYT2Ra5lkPimjEWNJF60EhaVrvzSpiA0uuaQVapnbDj5tF1CaNoTSbGioj2VEv3I+HMw+QnW+Y796MebvbCIsbdJlT6xQuUJLy81qQP+QpVwkrlAmP0YmDOUqgdsmnEJstHVuRkVpyuAxEvZXivtslnGVb6qFlUeUrWWy70BzYtWpvryEAr/kPWUC0t+SiBPdCHRoT1RNvk5IfMD32iO5B4kFG5m4/0QinkJI/yCaPGGl8pS0r/80xUKozMUCofsikIkdLX2dO1Bi+H1kl9lhHUPf0GV+b795IdbvThRLnXlACtDvoLMxsYewDm2+obX8zdji/0WcMpBVAHSqoAlzHT6sCWHjtva2kMeW6UUKW8KgqXCPVZLkxjjhED6ZhCq9h7p1FO48RuWLz/tVcgcC1dslWWXRvZbJk+sT1JIZJ5zL5MVx3Pn8JT3KRy2OWybfp29XSaEpyrHUdK37knFzB4/vpEH6ZxQIUyK194lG/9fkv1OT9LReaCKGsGntC+jErvzziUPY7DlrcE/hUJdKmVVcEyMbaTYOM0+7CO77vqzNgM+hacWa5NxesWZ/JRwdjKUysgrRAHK+BSb9+rv/TjrErCxLOvKNqhMz1kifYacThnOuhvgUwQSf+JTTTJXNZrLbGVLsMFPb6JDWNWjOn7zjaoskrleQVSr+9j8XbBS7LyN +Ji/A2CnL5M5Qkp7GailpUxdstLzfKxnt+v1IqHa/ZRKnEMpnNoT1ZcvHLJk6avnceYtT4eWzZwgdO1zhivXTtFj8LYqSc/7uhxliHGEpSSbzT1g8/xUwbG7Z8avyEoxOllvEF4UPV9DQeZuobDB9/VA1JDQqUiTcLDv4ZAKLB7/WrOYKpPkFPeXeLsIfTe+x3NArrJ0cI/7Uj/BUbGjPoxyaRw7F+MkQpoCRwY6u3cIaT+CpF8ifZ/GUd1HMJK2FUtjbDV2wIbYgV5CRwprzBxdtTEUncDL8tYTIQuyE1Yo4BHBitEVShKwXCzFpVBN1uC6PUEVTKxygMjuGki5YCiFlCgh++ATJ+0X76XVUeDCnvYyHFeaoIlxT2W2JmPYVwGUJUWwg4wnyTvKojdf2+AGqDEFWfPPG04SgnRQJW12w/SU47TICV6J/w1/9jopvP3j22j/+3cuuOPXL5cWrPCif2+JFhGoR36cx4Gdk0Fg3+guqtj2WL21zzwt/hxBg/EHKESyC//HYr21keKONl+53a/b8AYCGlfN0LihLz6XuZkvxoN274SPnR3lInlktk+CzR6wwxB6OiBDPfurhWacXudxJy5T2eo7zDS5Jqd2b83UohMkTR/PbrTi020arN3vlGVnRPHFXPMSWVEpjdtFJth+WQrhObLz2z+8nJ91rlfFNbkU62fXvbDJHzWah0Xe3SMZ3r2/jrhutXHvAbqYsVWWuuCqr11F6A4twFOBwl2de+DQ8h4DZZAKjMChBqfTVIqLKULJVU/yeZB77OH9u6JArungX/8o52ny6UpzBMObKWfUsBcvrxItKd8kHkl6paYkdsr/6VCV6ThbzwktTsSL+FKKl3PE1GyxbetCuv/EVm8YzS7nNhOEjGMzB8MUXTPIgqV+VsYzT59N0+uKoeda3MuXaTp9QKeb1Vy6Ky82+GgsESJP9qF2LpUkEQt5TiYT/61N0TxWEFgy8zmEwCqeioxSVwS5gMaYF ++W0R0Hm/e4eQascrrgZfScOnD5/iYUGHEX4gAXyLeONFAFockAJFWLTGwydqfT5TEJGSRERjAz55Vc/qFl36Cq2mS5/oRb/lsVf4CauDTyTRZ3kZo3Dqa6zAtAw/74MphS4Puyh/vLjLfnrNM54X9dFP52/OL5P13qLu1jdo59e3NKCHeE+f7ZFTTEMEN1qdQe0j9NEOAvz4RzGA9YGroYzpQgQpcUMw+jyh6kqxUgeujp0BEZBldyQUCRdG5KXKId2leaxwYKrigfH+PBO0QQB3xKCP687lfXoHXxuC0XBLeHUfKFB0JEE9hh2R+vnVEbImcdOYQpfj9IZCO/AzGGzo0JG7LLzPTr5DSOqq/KJvsL0BHkMA3An7CQvxh3e3NxmVooLWJSUx7JtoZ0ZomkxFk6qehQMuhXMe/C6OIAa6MRJkGpMbhT/ka4Bcu2B5VPhErOZfpv0S1QbhI3wuFj0xJEi9t1S3ClaE2GT45+hgCvQrMerDtywcPGJO5q9XIdI8gdH8ON61Tp9vqMJ+wEOEXrmkIv9DDJ413bv9gR7h4mr7BDp1POWK45Xh8Jlc/eE9lE1SBDRIYt7FT6cdLNj5dSVzo8mTVF15FaEYp70BMAssSLnLlSc+xBRupVDJf6fVIk76H5gsoSBFDZcNhuC9QSSi7X+0ovkMr/zh4p+uP8rrTwr6o77M/h/fWtZW+jPbpgAAAABJRU5ErkJggg== + + Cm 644b5749-ad74-45b6-ab76-777b4ab74aff \ No newline at end of file diff --git a/Empresas/48/Formatos/OC.rdlc b/Empresas/48/Formatos/OC.rdlc index 5a07cb490..d9cb161f1 100644 --- a/Empresas/48/Formatos/OC.rdlc +++ b/Empresas/48/Formatos/OC.rdlc @@ -2431,7 +2431,20 @@ - =IIF(Parameters!NombreSolicito.Value = "London Manuel Tapia", "Lic. " & Parameters!NombreSolicito.Value, Parameters!NombreSolicito.Value) + Antonio Almada Botello. + + + + + + + + + Director Mtto. @@ -2443,9 +2456,9 @@ Textbox12 - 8.43521cm + 8.30821cm 3.07712cm - 0.44478cm + 0.7997cm 5.83844cm 28 + + + + + + + + =IIF(Parameters!NombreAutorizo.Value="Guillermo Chan","Almacenista",Parameters!PuestoAutorizo.Value) @@ -2555,9 +2581,9 @@ Textbox12 - 8.43521cm + 8.30821cm 11.4732cm - 0.44478cm + 0.7997cm 5.83844cm 31 + + + + + + + + Director Gral. @@ -2705,7 +2744,7 @@ Textbox12 10.6416cm 7.3963cm - 0.55061cm + 1.00499cm 5.83844cm 36 @@ -3866,7 +3866,7 @@ - R.F.C. APH050331V29 alumbrado.hermosillo@hotmail.com + R.F.C. APH050331V29 - - 0.66146cm - true - true - - - true - true - - - - - Fecha Impresión: - - - - - - - - =Today - - - - - - 2pt - 2pt - 2pt - 2pt - - - - - - - 27.94cm 21.59cm 0.5cm @@ -932,6 +876,30 @@ count = count + 1 Return count End function + + + image/png + iVBORw0KGgoAAAANSUhEUgAAAGgAAAAcCAYAAACNr/p2AAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8YQUAAAAJcEhZcwAADsQAAA7EAZUrDhsAABY3SURBVGhD7Zr7k1VVdsdv377v9+3b3dBkajKOEytOWVZNZfIPpFKppPJDKpXKT/kPpmp+yg/5IZNUZqzxhSiCogIO+EZhQBRRUVREBEEQEMVHfEZFaPp1+/a9fV+98vmufU93O/4D88Mc2Pecs/faa6293nufjtmSmbf+4B417+jQFgd3vXP5mG4dWnPQGP9DHNGzdWnCEeYvcY9AfHiZhuDUhHcA813AcBeaASt+RWPL87mW+7iWwgR19byJ33memjTxzTiDuvW4C8bXI1yDsXCJr0XaalwBVv1+rR4QWb1H86N3v62SAT/huUsLa+/xLD7VYprgVzTDMWmhIhoJTn2Dy2F0BYTLylP/Kib8/h18K5d3R3BOQ8LSXQyuKMinRi2C1315LtfyewTIFfV5C/16DAKVkBs8RQryThdUGFcTv1IQt2W0WmeYs6Ik3YOR+hU6V0QWKfg7ePQzkAf9KwoSLikm4A2GhIKigTBpYDnOuBrPEYEwMzw73AA2GneGaN7/fQEst4iWP+sKDAc+IuZ9JeEW0fWXyGhW4VV39PyHzXEN4Lm8y390iQc1EAz6vjOuu3BHTe8+JpyRIQVvdAVF48uwkoHaAL/WoDHnRbIR7UHfAMQbP6uVhoJWe4JaxPTqWbTvCUqwq2DUrbsTn6MpjAD3vXE9aJFqelZbAfMrelFbBtGPcAuvFg791XBRiyYsP0dr4hY1dS+/r4KPxr4zPmhRn/MtPuSJKwryoWV40YNHV9KAdoTX+ZFC6V9Fa3mqngfvumKdvpAHt202edYIkzqtcNdPty+k4ep1NbBaOCsM6DEw0LBurzHA27V2B80KJlKy4+1YD5iwYH7p7w9w9tUVMR69+FibnzptxlqtSe4rfHRl +M4Jfalq/v+DPPlWkdY/eB3h174BuqTfArdtgvLUQ8HY7QjoYX8W3BNztBC/ou4IWzdE4DRHkJaLFTx/CEW5rgVOMdAEWTm4d6EhW0kW3K0Bdiiid4EHdPgTA4HyApD6PEnhZbIewo6TVbNd9gigH5kSNcV8l8yQ77u12i16EL1wOrecuuJasp/VGC+1J0eoA92JLU73xOBjXXT+CkTI1SveSPCgk+YXmLItbUZKDA9vpapyLvsHQYEwXQkVA7cA2jfX1OtZqQDTijYH2YqQALWxlrL/YoGEkwEgZ3aUFhlbWK5y62g0ETUffjWrAY7SuBcYkSp+gzg7ynQYkGIQUJtpKM7FOb6AYOlo9EUNZtPZSy9lrgUQkgqAX6ekBL6TyPKTJY6MuRQZ6aqJdZ5LmYRPC5v0yLp9Kc8tlLCTE0JoDZcvaegsAw/xie46ujs914xROV2iUt6CntWgerYsi212UxLqEs4EA28wXXLsroTew1Lrz02a8OwhRAog8bakPvzJa0WXM192Hl+YgeuCuLnfB8q5/GpnXkCBc6FomRsmY5ntIVFjSPAkIJxcTISLJgxaZ2xbKYHTMFjYvs73TAUJr8iY8LQZawLWgWgdhm/uimBBixsUcfOOBgbEm8IsMLPLSAsE8fC3QN82z+4HG9cCd/9YCV5N34Re9Bs/C65dg6JQecWTHp7tot2mSld4XxJf6GG+oL4JjvpYuOeg+jw7QGWEcPsQj4zJysdPsyejCuJQj4YgPrb05aHoPPPGi/0IgHIvtZVkp8GhNC9zVnD/R8qkSOk/0eYcmQU8doib8kq0ChacZOpZorqBFJC9Nt5mpub4gEMyxuskpsw3rzf76xkN2962MTcMwHi5FiEZES74lZUhI87Nmv/kvs5//7DVbf1fXZumbQTCLMCee2riu33lXJGlBp64771pGq6MQxRNATeqNBV4bwCxAqAVcg9TVotUZm4cfjS/Ak5TV0jP3qZmggKvAzTGnzvvC +VejBWwvYOv0yCPEluuInqEUhkjmiAb15cAnOjSgALednwWntmn8V/HPg3YCMbviLI3b7bwPPDfHMeBOLcU9VsuRdTQqQ7IVWim3TFEQkDxXRYifmgP7ctQWepXHlyHkYHBvbYNXKdisVn7Rq5kXLxJ6z6vALtqbyO5I0iJgILm9z0K3TquU7rJR7zEbyL1oh+4Jl8o9bvnyfFYo3ufJmAQbMm5iv5n9r5fRWq43c5kJRv8KpnuT916zZaqnY/VYb/W9XYqH4H1bI/49VSrfZSGmLTYz83orpHdC63Uaqt1kxf7uN1m610bX/7rQqY/dZrrDDxqqPWim11Sq0UvpeKxbutGIZ2NE7bBqlySFkogsYh3sftMdrN1s2/YBlMnfa+js/dgV14TnKZ/JmwdVRzEjtbisUdlkmcdjyqTdstPqCpZP3OR0ZepMlyUD9QjORp7qhQw9HhP9/tdGRf3YaHvmAj/XFDZfCj6xEIeCH6zZbbuiAFRNHLJ15yNLF+yyb3WYT44etEHvHqsnjNjG6yWYQqGy9ztx1Y4+gxKOWix+yfPaA5Ys7LVV42PKlVy2Tessq6QtWSO4OVg48ZKwB06XUbqvE37N87BW3ci1ErHveEdNpxlPHLZfdbLMQy5d+beXqrVYZ2WD5zA7mnYKnM1YrPW1jo9stX1iPQm6yYvVXNoXgMtmjFou9jqE9CV8brVrcYuvGdwVhZg6i3NP07XLvVK5SDJHQ5uElEdtvhfRFy6VPYBBb3LIlSOUW5UBZ+zVrn7Rc7DCGcdAS2cdY807LlZ+wVOZZK+SOWT5x1tZUX/J1i4ZCdkcagZaKKXnPNOv62c//0ybW/dLWrvk3L/S8IqSYcQ/qIQkBzjIwJyEk91l56KzVUidsDkavEkpmkeily1hV4aiVho9aFuuQZcwwf4p5heQxPOwTK+cP2SRhR94gC5brF/KvsIiPrZY5h0XdZHWsowED8rrs8DErDC1YPn7JMsm9ISTAS+T2 +ufQhS8dZ5NhWmwZXAz5EV/inCL+F+GdWHP7cbv4NvOAJypWiq3X8/T98acnMZxZPvGfTrEEhpw7MLPOm4DGNpadjV1HCMQ+HKj0kO4XRYmqvVdNfWmboa8vEL1i1sNdmCJHKd/Jvjx7AFWJvWjX+f1bM7bMpaE7C/GXoyDiqlYOWjX1oxeRpPPh2z0vK11KPsPRIsooYilp1zQX/Ah3K4cqlMoWYZyb2OVLRZRCkSvsslThno6mXrM1Wg+raXVs5SdVhg/di7i6s9R77yxt32iQIUyN3sNi3LZV83aYlfJiYRyBUrx7WJNRc8imr5F/FEoMnSOEKP4nURRtCQbHYtBVLJz1fiI4Yn4PxYQwiljhmc+DzKkvMMygruyohJy7ioW97XvKcwOq1pGl4L5eesUTuG4vhAXPwERVhTejPgK88csQSw5csm3vTZlifaLJLIIRvIkydt1ziil1/LcaTxEMyj3ie8wKFNiUlVrcA85ElY9AHpyLCLHhkfFK41l3IPkMYP2YVIsACPEruPd9ok7WJkVqSIlGhtB/P32dz4BAfHgEZjPkMHlQWT3JPlN6x2PAHNl7eZm2sTeNe3bAyT2S8r7/9fbfGWRBPstBs4VnLZU7b9dcfd8aF0s3Ey0UYZdEScCq5wyrko1meZcHZ4mM2nHkPelcIpdOWTL5FKN0QlAqXUmIs85bFC8dcIb4abaZkceBYO4GCE+8T1k6E6hAAlbTKDXNYY6X4jMVSX6LkU+61FGuuoB545X3x4cPM/9yS6QNWZ0xbiib9tezzlkqfw/vetW8voYj8HquWnrCrjCmPKOlPs/ZU9qDlUh/axNjrriAtWSwudEL5L8NWBKmUnyHUbbJFKVHyJMB7yS1c8CPestlTGOgJu4JcXX7w0mH7EnNlAqBklynfY8nC51jcSde+FqSS3mPmEhJQaUGfDhZUgalqKaeet3L8faskXrYFhK4iRVbodoAkFiHItsSuAjv6g/ttePgWm2Gh +cyi/kKMAQfh5BHHtjyYR6FkrFw7b1BVms7AxlJnMfWBD6VdtnsVpQaKv7YyquFz2YQT0mSXih11BOokQz/IweVQ69bANxS7a3/5NoCcLZm9r83jXWPG85QmN+eRFDOtVq8OjDGOi+LwVhs9aurrfPgf2MnTTxQfwlsdtCqPwKAL+QuYJogK5M4Vy4NXjnk2TN9hXsYcSr+xpPdwm8ncRPe4w7W/lgcpx0qByrJQ4IxrJE0SRg86HULWlTWQePIhnlZ754j5LZhUSjlidiYtUG7IIv1BOX26j2bIM5njVRnipxC5ZeXifL5z9rSsQUYQGoyofL7PYTOU+KqxtVkeRCkGl/KOWpUiQQub0nn7OEkMn6T9jDfJdOfmwpbNnbTj9dPCggYLkRAq16TTJePhtWzP+sidvt1ruMjZ5bD7zvI0Xv6QKPGXlIgVF/hYMYjOK30fuOW6FxNtWzO7yfKXwNImga6mzntPixQftK+h8DZ2RdbsR3lN2yx3ghoisfiT3mlWSlyyfftZDXzD7KYqAgbbkjsyXpyULW22ksMkaeLUKC+UYMasyW+uamLjX4rGTGOxRz6Eq2CS7pd4MChIwC5KQamPPW2zoQ0vmj3j8V15qEQzDyUGXzRlIITiHB8zSdZn3dOY8SfxLcss+t1pZryqQtswHDheZLxeujFDZZd8mZ2zzZHsVhRTzB6iktnviFvOV3EYrlT8mvHxik9+ioMIjKOig1cYf8X2LQlefxKaQq0KhUH2IuL3XvgG2SV84omerjXyu+wmV3/AnKIfCJP461dwDVh67yzLFDcT7e9kKbLc/W4PQ4E35QgVLobyRfPKulbOX7Ao8fYOSZVixxEuWK35l6dz+sE0AvpR8jQLgC4zpgHtnSBzioU++RgvSD/NHR16iYjxLhfuQtXlXNGEIg6KGA49klkvvZKvxFYXJm9YEv+vHFdNBQQ6N6zKQze1EQe9ZhsQcJSuBaYLO8GS5Y9nbbAIvKP/gF/YF +BBPZY1jXaULA057sZDhquhRuZHHaDBZz71pq6COrVXbYLAtKZV61BGV5bfRRm0bh2psqBAxR2seSn9k3GEyxdIAK7HGbpV9hQYsX0+LlMnOy+d2WQ9BuGNBR8tXZmLwpn32dEHbFxtIkcHDNgOMycCpiJHwv9+FLOWVSYxhIsfgSyvkaaz5nlcrj5Na7yZN7LJ58k/w44yW7vEcGkKIEzyc+Jf8ddP50FimBqxL26AOdFvJJJ8/bcOwjFLrduoJjbjPoz8OdctdIiXUMn7IbrjsTDJwxHVB3ei0UpHgEQpWM1bFNWOS7nnQnWYT2Ra5lkPimjEWNJF60EhaVrvzSpiA0uuaQVapnbDj5tF1CaNoTSbGioj2VEv3I+HMw+QnW+Y796MebvbCIsbdJlT6xQuUJLy81qQP+QpVwkrlAmP0YmDOUqgdsmnEJstHVuRkVpyuAxEvZXivtslnGVb6qFlUeUrWWy70BzYtWpvryEAr/kPWUC0t+SiBPdCHRoT1RNvk5IfMD32iO5B4kFG5m4/0QinkJI/yCaPGGl8pS0r/80xUKozMUCofsikIkdLX2dO1Bi+H1kl9lhHUPf0GV+b795IdbvThRLnXlACtDvoLMxsYewDm2+obX8zdji/0WcMpBVAHSqoAlzHT6sCWHjtva2kMeW6UUKW8KgqXCPVZLkxjjhED6ZhCq9h7p1FO48RuWLz/tVcgcC1dslWWXRvZbJk+sT1JIZJ5zL5MVx3Pn8JT3KRy2OWybfp29XSaEpyrHUdK37knFzB4/vpEH6ZxQIUyK194lG/9fkv1OT9LReaCKGsGntC+jErvzziUPY7DlrcE/hUJdKmVVcEyMbaTYOM0+7CO77vqzNgM+hacWa5NxesWZ/JRwdjKUysgrRAHK+BSb9+rv/TjrErCxLOvKNqhMz1kifYacThnOuhvgUwQSf+JTTTJXNZrLbGVLsMFPb6JDWNWjOn7zjaoskrleQVSr+9j8XbBS7LyN +Ji/A2CnL5M5Qkp7GailpUxdstLzfKxnt+v1IqHa/ZRKnEMpnNoT1ZcvHLJk6avnceYtT4eWzZwgdO1zhivXTtFj8LYqSc/7uhxliHGEpSSbzT1g8/xUwbG7Z8avyEoxOllvEF4UPV9DQeZuobDB9/VA1JDQqUiTcLDv4ZAKLB7/WrOYKpPkFPeXeLsIfTe+x3NArrJ0cI/7Uj/BUbGjPoxyaRw7F+MkQpoCRwY6u3cIaT+CpF8ifZ/GUd1HMJK2FUtjbDV2wIbYgV5CRwprzBxdtTEUncDL8tYTIQuyE1Yo4BHBitEVShKwXCzFpVBN1uC6PUEVTKxygMjuGki5YCiFlCgh++ATJ+0X76XVUeDCnvYyHFeaoIlxT2W2JmPYVwGUJUWwg4wnyTvKojdf2+AGqDEFWfPPG04SgnRQJW12w/SU47TICV6J/w1/9jopvP3j22j/+3cuuOPXL5cWrPCif2+JFhGoR36cx4Gdk0Fg3+guqtj2WL21zzwt/hxBg/EHKESyC//HYr21keKONl+53a/b8AYCGlfN0LihLz6XuZkvxoN274SPnR3lInlktk+CzR6wwxB6OiBDPfurhWacXudxJy5T2eo7zDS5Jqd2b83UohMkTR/PbrTi020arN3vlGVnRPHFXPMSWVEpjdtFJth+WQrhObLz2z+8nJ91rlfFNbkU62fXvbDJHzWah0Xe3SMZ3r2/jrhutXHvAbqYsVWWuuCqr11F6A4twFOBwl2de+DQ8h4DZZAKjMChBqfTVIqLKULJVU/yeZB77OH9u6JArungX/8o52ny6UpzBMObKWfUsBcvrxItKd8kHkl6paYkdsr/6VCV6ThbzwktTsSL+FKKl3PE1GyxbetCuv/EVm8YzS7nNhOEjGMzB8MUXTPIgqV+VsYzT59N0+uKoeda3MuXaTp9QKeb1Vy6Ky82+GgsESJP9qF2LpUkEQt5TiYT/61N0TxWEFgy8zmEwCqeioxSVwS5gMaYF ++W0R0Hm/e4eQascrrgZfScOnD5/iYUGHEX4gAXyLeONFAFockAJFWLTGwydqfT5TEJGSRERjAz55Vc/qFl36Cq2mS5/oRb/lsVf4CauDTyTRZ3kZo3Dqa6zAtAw/74MphS4Puyh/vLjLfnrNM54X9dFP52/OL5P13qLu1jdo59e3NKCHeE+f7ZFTTEMEN1qdQe0j9NEOAvz4RzGA9YGroYzpQgQpcUMw+jyh6kqxUgeujp0BEZBldyQUCRdG5KXKId2leaxwYKrigfH+PBO0QQB3xKCP687lfXoHXxuC0XBLeHUfKFB0JEE9hh2R+vnVEbImcdOYQpfj9IZCO/AzGGzo0JG7LLzPTr5DSOqq/KJvsL0BHkMA3An7CQvxh3e3NxmVooLWJSUx7JtoZ0ZomkxFk6qehQMuhXMe/C6OIAa6MRJkGpMbhT/ka4Bcu2B5VPhErOZfpv0S1QbhI3wuFj0xJEi9t1S3ClaE2GT45+hgCvQrMerDtywcPGJO5q9XIdI8gdH8ON61Tp9vqMJ+wEOEXrmkIv9DDJ413bv9gR7h4mr7BDp1POWK45Xh8Jlc/eE9lE1SBDRIYt7FT6cdLNj5dSVzo8mTVF15FaEYp70BMAssSLnLlSc+xBRupVDJf6fVIk76H5gsoSBFDZcNhuC9QSSi7X+0ovkMr/zh4p+uP8rrTwr6o77M/h/fWtZW+jPbpgAAAABJRU5ErkJggg== + + + image/png + iVBORw0KGgoAAAANSUhEUgAAAGgAAAAcCAYAAACNr/p2AAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8YQUAAAAJcEhZcwAADsQAAA7EAZUrDhsAABY3SURBVGhD7Zr7k1VVdsdv377v9+3b3dBkajKOEytOWVZNZfIPpFKppPJDKpXKT/kPpmp+yg/5IZNUZqzxhSiCogIO+EZhQBRRUVREBEEQEMVHfEZFaPp1+/a9fV+98vmufU93O/4D88Mc2Pecs/faa6293nufjtmSmbf+4B417+jQFgd3vXP5mG4dWnPQGP9DHNGzdWnCEeYvcY9AfHiZhuDUhHcA813AcBeaASt+RWPL87mW+7iWwgR19byJ33memjTxzTiDuvW4C8bXI1yDsXCJr0XaalwBVv1+rR4QWb1H86N3v62SAT/huUsLa+/xLD7VYprgVzTDMWmhIhoJTn2Dy2F0BYTLylP/Kib8/h18K5d3R3BOQ8LSXQyuKMinRi2C1315LtfyewTIFfV5C/16DAKVkBs8RQryThdUGFcTv1IQt2W0WmeYs6Ik3YOR+hU6V0QWKfg7ePQzkAf9KwoSLikm4A2GhIKigTBpYDnOuBrPEYEwMzw73AA2GneGaN7/fQEst4iWP+sKDAc+IuZ9JeEW0fWXyGhW4VV39PyHzXEN4Lm8y390iQc1EAz6vjOuu3BHTe8+JpyRIQVvdAVF48uwkoHaAL/WoDHnRbIR7UHfAMQbP6uVhoJWe4JaxPTqWbTvCUqwq2DUrbsTn6MpjAD3vXE9aJFqelZbAfMrelFbBtGPcAuvFg791XBRiyYsP0dr4hY1dS+/r4KPxr4zPmhRn/MtPuSJKwryoWV40YNHV9KAdoTX+ZFC6V9Fa3mqngfvumKdvpAHt202edYIkzqtcNdPty+k4ep1NbBaOCsM6DEw0LBurzHA27V2B80KJlKy4+1YD5iwYH7p7w9w9tUVMR69+FibnzptxlqtSe4rfHRl +M4Jfalq/v+DPPlWkdY/eB3h174BuqTfArdtgvLUQ8HY7QjoYX8W3BNztBC/ou4IWzdE4DRHkJaLFTx/CEW5rgVOMdAEWTm4d6EhW0kW3K0Bdiiid4EHdPgTA4HyApD6PEnhZbIewo6TVbNd9gigH5kSNcV8l8yQ77u12i16EL1wOrecuuJasp/VGC+1J0eoA92JLU73xOBjXXT+CkTI1SveSPCgk+YXmLItbUZKDA9vpapyLvsHQYEwXQkVA7cA2jfX1OtZqQDTijYH2YqQALWxlrL/YoGEkwEgZ3aUFhlbWK5y62g0ETUffjWrAY7SuBcYkSp+gzg7ynQYkGIQUJtpKM7FOb6AYOlo9EUNZtPZSy9lrgUQkgqAX6ekBL6TyPKTJY6MuRQZ6aqJdZ5LmYRPC5v0yLp9Kc8tlLCTE0JoDZcvaegsAw/xie46ujs914xROV2iUt6CntWgerYsi212UxLqEs4EA28wXXLsroTew1Lrz02a8OwhRAog8bakPvzJa0WXM192Hl+YgeuCuLnfB8q5/GpnXkCBc6FomRsmY5ntIVFjSPAkIJxcTISLJgxaZ2xbKYHTMFjYvs73TAUJr8iY8LQZawLWgWgdhm/uimBBixsUcfOOBgbEm8IsMLPLSAsE8fC3QN82z+4HG9cCd/9YCV5N34Re9Bs/C65dg6JQecWTHp7tot2mSld4XxJf6GG+oL4JjvpYuOeg+jw7QGWEcPsQj4zJysdPsyejCuJQj4YgPrb05aHoPPPGi/0IgHIvtZVkp8GhNC9zVnD/R8qkSOk/0eYcmQU8doib8kq0ChacZOpZorqBFJC9Nt5mpub4gEMyxuskpsw3rzf76xkN2962MTcMwHi5FiEZES74lZUhI87Nmv/kvs5//7DVbf1fXZumbQTCLMCee2riu33lXJGlBp64771pGq6MQxRNATeqNBV4bwCxAqAVcg9TVotUZm4cfjS/Ak5TV0jP3qZmggKvAzTGnzvvC +VejBWwvYOv0yCPEluuInqEUhkjmiAb15cAnOjSgALednwWntmn8V/HPg3YCMbviLI3b7bwPPDfHMeBOLcU9VsuRdTQqQ7IVWim3TFEQkDxXRYifmgP7ctQWepXHlyHkYHBvbYNXKdisVn7Rq5kXLxJ6z6vALtqbyO5I0iJgILm9z0K3TquU7rJR7zEbyL1oh+4Jl8o9bvnyfFYo3ufJmAQbMm5iv5n9r5fRWq43c5kJRv8KpnuT916zZaqnY/VYb/W9XYqH4H1bI/49VSrfZSGmLTYz83orpHdC63Uaqt1kxf7uN1m610bX/7rQqY/dZrrDDxqqPWim11Sq0UvpeKxbutGIZ2NE7bBqlySFkogsYh3sftMdrN1s2/YBlMnfa+js/dgV14TnKZ/JmwdVRzEjtbisUdlkmcdjyqTdstPqCpZP3OR0ZepMlyUD9QjORp7qhQw9HhP9/tdGRf3YaHvmAj/XFDZfCj6xEIeCH6zZbbuiAFRNHLJ15yNLF+yyb3WYT44etEHvHqsnjNjG6yWYQqGy9ztx1Y4+gxKOWix+yfPaA5Ys7LVV42PKlVy2Tessq6QtWSO4OVg48ZKwB06XUbqvE37N87BW3ci1ErHveEdNpxlPHLZfdbLMQy5d+beXqrVYZ2WD5zA7mnYKnM1YrPW1jo9stX1iPQm6yYvVXNoXgMtmjFou9jqE9CV8brVrcYuvGdwVhZg6i3NP07XLvVK5SDJHQ5uElEdtvhfRFy6VPYBBb3LIlSOUW5UBZ+zVrn7Rc7DCGcdAS2cdY807LlZ+wVOZZK+SOWT5x1tZUX/J1i4ZCdkcagZaKKXnPNOv62c//0ybW/dLWrvk3L/S8IqSYcQ/qIQkBzjIwJyEk91l56KzVUidsDkavEkpmkeily1hV4aiVho9aFuuQZcwwf4p5heQxPOwTK+cP2SRhR94gC5brF/KvsIiPrZY5h0XdZHWsowED8rrs8DErDC1YPn7JMsm9ISTAS+T2 +ufQhS8dZ5NhWmwZXAz5EV/inCL+F+GdWHP7cbv4NvOAJypWiq3X8/T98acnMZxZPvGfTrEEhpw7MLPOm4DGNpadjV1HCMQ+HKj0kO4XRYmqvVdNfWmboa8vEL1i1sNdmCJHKd/Jvjx7AFWJvWjX+f1bM7bMpaE7C/GXoyDiqlYOWjX1oxeRpPPh2z0vK11KPsPRIsooYilp1zQX/Ah3K4cqlMoWYZyb2OVLRZRCkSvsslThno6mXrM1Wg+raXVs5SdVhg/di7i6s9R77yxt32iQIUyN3sNi3LZV83aYlfJiYRyBUrx7WJNRc8imr5F/FEoMnSOEKP4nURRtCQbHYtBVLJz1fiI4Yn4PxYQwiljhmc+DzKkvMMygruyohJy7ioW97XvKcwOq1pGl4L5eesUTuG4vhAXPwERVhTejPgK88csQSw5csm3vTZlifaLJLIIRvIkydt1ziil1/LcaTxEMyj3ie8wKFNiUlVrcA85ElY9AHpyLCLHhkfFK41l3IPkMYP2YVIsACPEruPd9ok7WJkVqSIlGhtB/P32dz4BAfHgEZjPkMHlQWT3JPlN6x2PAHNl7eZm2sTeNe3bAyT2S8r7/9fbfGWRBPstBs4VnLZU7b9dcfd8aF0s3Ey0UYZdEScCq5wyrko1meZcHZ4mM2nHkPelcIpdOWTL5FKN0QlAqXUmIs85bFC8dcIb4abaZkceBYO4GCE+8T1k6E6hAAlbTKDXNYY6X4jMVSX6LkU+61FGuuoB545X3x4cPM/9yS6QNWZ0xbiib9tezzlkqfw/vetW8voYj8HquWnrCrjCmPKOlPs/ZU9qDlUh/axNjrriAtWSwudEL5L8NWBKmUnyHUbbJFKVHyJMB7yS1c8CPestlTGOgJu4JcXX7w0mH7EnNlAqBklynfY8nC51jcSde+FqSS3mPmEhJQaUGfDhZUgalqKaeet3L8faskXrYFhK4iRVbodoAkFiHItsSuAjv6g/ttePgWm2Gh +cyi/kKMAQfh5BHHtjyYR6FkrFw7b1BVms7AxlJnMfWBD6VdtnsVpQaKv7YyquFz2YQT0mSXih11BOokQz/IweVQ69bANxS7a3/5NoCcLZm9r83jXWPG85QmN+eRFDOtVq8OjDGOi+LwVhs9aurrfPgf2MnTTxQfwlsdtCqPwKAL+QuYJogK5M4Vy4NXjnk2TN9hXsYcSr+xpPdwm8ncRPe4w7W/lgcpx0qByrJQ4IxrJE0SRg86HULWlTWQePIhnlZ754j5LZhUSjlidiYtUG7IIv1BOX26j2bIM5njVRnipxC5ZeXifL5z9rSsQUYQGoyofL7PYTOU+KqxtVkeRCkGl/KOWpUiQQub0nn7OEkMn6T9jDfJdOfmwpbNnbTj9dPCggYLkRAq16TTJePhtWzP+sidvt1ruMjZ5bD7zvI0Xv6QKPGXlIgVF/hYMYjOK30fuOW6FxNtWzO7yfKXwNImga6mzntPixQftK+h8DZ2RdbsR3lN2yx3ghoisfiT3mlWSlyyfftZDXzD7KYqAgbbkjsyXpyULW22ksMkaeLUKC+UYMasyW+uamLjX4rGTGOxRz6Eq2CS7pd4MChIwC5KQamPPW2zoQ0vmj3j8V15qEQzDyUGXzRlIITiHB8zSdZn3dOY8SfxLcss+t1pZryqQtswHDheZLxeujFDZZd8mZ2zzZHsVhRTzB6iktnviFvOV3EYrlT8mvHxik9+ioMIjKOig1cYf8X2LQlefxKaQq0KhUH2IuL3XvgG2SV84omerjXyu+wmV3/AnKIfCJP461dwDVh67yzLFDcT7e9kKbLc/W4PQ4E35QgVLobyRfPKulbOX7Ao8fYOSZVixxEuWK35l6dz+sE0AvpR8jQLgC4zpgHtnSBzioU++RgvSD/NHR16iYjxLhfuQtXlXNGEIg6KGA49klkvvZKvxFYXJm9YEv+vHFdNBQQ6N6zKQze1EQe9ZhsQcJSuBaYLO8GS5Y9nbbAIvKP/gF/YF +BBPZY1jXaULA057sZDhquhRuZHHaDBZz71pq6COrVXbYLAtKZV61BGV5bfRRm0bh2psqBAxR2seSn9k3GEyxdIAK7HGbpV9hQYsX0+LlMnOy+d2WQ9BuGNBR8tXZmLwpn32dEHbFxtIkcHDNgOMycCpiJHwv9+FLOWVSYxhIsfgSyvkaaz5nlcrj5Na7yZN7LJ58k/w44yW7vEcGkKIEzyc+Jf8ddP50FimBqxL26AOdFvJJJ8/bcOwjFLrduoJjbjPoz8OdctdIiXUMn7IbrjsTDJwxHVB3ei0UpHgEQpWM1bFNWOS7nnQnWYT2Ra5lkPimjEWNJF60EhaVrvzSpiA0uuaQVapnbDj5tF1CaNoTSbGioj2VEv3I+HMw+QnW+Y796MebvbCIsbdJlT6xQuUJLy81qQP+QpVwkrlAmP0YmDOUqgdsmnEJstHVuRkVpyuAxEvZXivtslnGVb6qFlUeUrWWy70BzYtWpvryEAr/kPWUC0t+SiBPdCHRoT1RNvk5IfMD32iO5B4kFG5m4/0QinkJI/yCaPGGl8pS0r/80xUKozMUCofsikIkdLX2dO1Bi+H1kl9lhHUPf0GV+b795IdbvThRLnXlACtDvoLMxsYewDm2+obX8zdji/0WcMpBVAHSqoAlzHT6sCWHjtva2kMeW6UUKW8KgqXCPVZLkxjjhED6ZhCq9h7p1FO48RuWLz/tVcgcC1dslWWXRvZbJk+sT1JIZJ5zL5MVx3Pn8JT3KRy2OWybfp29XSaEpyrHUdK37knFzB4/vpEH6ZxQIUyK194lG/9fkv1OT9LReaCKGsGntC+jErvzziUPY7DlrcE/hUJdKmVVcEyMbaTYOM0+7CO77vqzNgM+hacWa5NxesWZ/JRwdjKUysgrRAHK+BSb9+rv/TjrErCxLOvKNqhMz1kifYacThnOuhvgUwQSf+JTTTJXNZrLbGVLsMFPb6JDWNWjOn7zjaoskrleQVSr+9j8XbBS7LyN +Ji/A2CnL5M5Qkp7GailpUxdstLzfKxnt+v1IqHa/ZRKnEMpnNoT1ZcvHLJk6avnceYtT4eWzZwgdO1zhivXTtFj8LYqSc/7uhxliHGEpSSbzT1g8/xUwbG7Z8avyEoxOllvEF4UPV9DQeZuobDB9/VA1JDQqUiTcLDv4ZAKLB7/WrOYKpPkFPeXeLsIfTe+x3NArrJ0cI/7Uj/BUbGjPoxyaRw7F+MkQpoCRwY6u3cIaT+CpF8ifZ/GUd1HMJK2FUtjbDV2wIbYgV5CRwprzBxdtTEUncDL8tYTIQuyE1Yo4BHBitEVShKwXCzFpVBN1uC6PUEVTKxygMjuGki5YCiFlCgh++ATJ+0X76XVUeDCnvYyHFeaoIlxT2W2JmPYVwGUJUWwg4wnyTvKojdf2+AGqDEFWfPPG04SgnRQJW12w/SU47TICV6J/w1/9jopvP3j22j/+3cuuOPXL5cWrPCif2+JFhGoR36cx4Gdk0Fg3+guqtj2WL21zzwt/hxBg/EHKESyC//HYr21keKONl+53a/b8AYCGlfN0LihLz6XuZkvxoN274SPnR3lInlktk+CzR6wwxB6OiBDPfurhWacXudxJy5T2eo7zDS5Jqd2b83UohMkTR/PbrTi020arN3vlGVnRPHFXPMSWVEpjdtFJth+WQrhObLz2z+8nJ91rlfFNbkU62fXvbDJHzWah0Xe3SMZ3r2/jrhutXHvAbqYsVWWuuCqr11F6A4twFOBwl2de+DQ8h4DZZAKjMChBqfTVIqLKULJVU/yeZB77OH9u6JArungX/8o52ny6UpzBMObKWfUsBcvrxItKd8kHkl6paYkdsr/6VCV6ThbzwktTsSL+FKKl3PE1GyxbetCuv/EVm8YzS7nNhOEjGMzB8MUXTPIgqV+VsYzT59N0+uKoeda3MuXaTp9QKeb1Vy6Ky82+GgsESJP9qF2LpUkEQt5TiYT/61N0TxWEFgy8zmEwCqeioxSVwS5gMaYF ++W0R0Hm/e4eQascrrgZfScOnD5/iYUGHEX4gAXyLeONFAFockAJFWLTGwydqfT5TEJGSRERjAz55Vc/qFl36Cq2mS5/oRb/lsVf4CauDTyTRZ3kZo3Dqa6zAtAw/74MphS4Puyh/vLjLfnrNM54X9dFP52/OL5P13qLu1jdo59e3NKCHeE+f7ZFTTEMEN1qdQe0j9NEOAvz4RzGA9YGroYzpQgQpcUMw+jyh6kqxUgeujp0BEZBldyQUCRdG5KXKId2leaxwYKrigfH+PBO0QQB3xKCP687lfXoHXxuC0XBLeHUfKFB0JEE9hh2R+vnVEbImcdOYQpfj9IZCO/AzGGzo0JG7LLzPTr5DSOqq/KJvsL0BHkMA3An7CQvxh3e3NxmVooLWJSUx7JtoZ0ZomkxFk6qehQMuhXMe/C6OIAa6MRJkGpMbhT/ka4Bcu2B5VPhErOZfpv0S1QbhI3wuFj0xJEi9t1S3ClaE2GT45+hgCvQrMerDtywcPGJO5q9XIdI8gdH8ON61Tp9vqMJ+wEOEXrmkIv9DDJ413bv9gR7h4mr7BDp1POWK45Xh8Jlc/eE9lE1SBDRIYt7FT6cdLNj5dSVzo8mTVF15FaEYp70BMAssSLnLlSc+xBRupVDJf6fVIk76H5gsoSBFDZcNhuC9QSSi7X+0ovkMr/zh4p+uP8rrTwr6o77M/h/fWtZW+jPbpgAAAABJRU5ErkJggg== + + Cm 644b5749-ad74-45b6-ab76-777b4ab74aff \ No newline at end of file diff --git a/Ventas/Clientes.aspx.vb b/Ventas/Clientes.aspx.vb index 71868e376..0498d9696 100644 --- a/Ventas/Clientes.aspx.vb +++ b/Ventas/Clientes.aspx.vb @@ -3889,14 +3889,17 @@ Partial Class Clientes IdCtaContableRetISR = IdCuentaContable End Select - - Dim ObjClientes As New ClsClientes - If Not ObjClientes.VincularCuentasContables(IdCtaContableClientes, IdCtaContableAnticipos, IdCtaContableRetIVA, IdCtaContableRetISR, CveCliente) Then - TieneError = True - End If - - ObjClientes.Dispose() - + If CveCliente > 0 Then + Dim ObjClientes As New ClsClientes + If Not ObjClientes.VincularCuentasContables(IdCtaContableClientes, IdCtaContableAnticipos, IdCtaContableRetIVA, IdCtaContableRetISR, CveCliente) Then + TieneError = True + End If + + ObjClientes.Dispose() + End If + + + Else TieneError = True End If diff --git a/vwd.webinfo b/vwd.webinfo index b238327fe..d53893e0b 100644 --- a/vwd.webinfo +++ b/vwd.webinfo @@ -444,6 +444,8 @@ + + From d8a90f9c33df69d2958977f3fdf68fffdf5a4b72 Mon Sep 17 00:00:00 2001 From: JORGE LUIS CAUDILLO ESPARZA Date: Wed, 30 Mar 2022 08:14:28 -0700 Subject: [PATCH 3/9] --- App_Code/ADSBase.vb | 4 + App_Code/ClsNominas.vb | 57 +- App_Code/ClsVentas.vb | 19 + App_Code/Timbrado.vb | 4 +- Documentacion/TableroMaterialidad.aspx | 12 +- Documentacion/TableroMaterialidad.aspx.cs | 40 +- General/SaldosIniciales.aspx | 2 +- General/SaldosIniciales.aspx.vb | 171 ++- Inicio.aspx | 34 +- Metronic/assets/admin/layout/css/custom.css | 6 + Nomina/CalculoISRAnual.aspx | 6 +- Nomina/CalculoISRAnual.aspx.cs | 97 +- Nomina/CargaArchivosNomina.aspx | 65 + Nomina/CargaArchivosNomina.aspx.cs | 218 ++++ Nomina/Nomina.aspx | 1248 ++++++++++--------- Nomina/Nomina.aspx.cs | 128 +- RH/CatPersonal.aspx | 7 + RH/CatPersonal.aspx.vb | 19 +- RH/Personal.aspx | 2 +- RH/Personal.aspx.vb | 7 + SAT/Default.aspx | 21 + SAT/Default.aspx.cs | 14 + SAT/SolicitudesNominaSat.aspx | 373 ++++++ SAT/SolicitudesNominaSat.aspx.cs | 79 ++ vwd.webinfo | 16 + 25 files changed, 1939 insertions(+), 710 deletions(-) create mode 100644 Nomina/CargaArchivosNomina.aspx create mode 100644 Nomina/CargaArchivosNomina.aspx.cs create mode 100644 SAT/Default.aspx create mode 100644 SAT/Default.aspx.cs create mode 100644 SAT/SolicitudesNominaSat.aspx create mode 100644 SAT/SolicitudesNominaSat.aspx.cs diff --git a/App_Code/ADSBase.vb b/App_Code/ADSBase.vb index 979b1af09..708cac5cb 100644 --- a/App_Code/ADSBase.vb +++ b/App_Code/ADSBase.vb @@ -180,6 +180,10 @@ Public Class ADSBase If Not IsNothing(pr.SqlDataType) Then If Not IsNothing(pr.ParameterDirection) Then SqlAdapter.SelectCommand.Parameters.Add(pr.ParameterName, pr.SqlDataType).Direction = pr.ParameterDirection + If (Not IsNothing(pr.SqlValue)) Then + + SqlAdapter.SelectCommand.Parameters.Add(pr.ParameterName, pr.SqlDataType).Value = If(Not IsNothing(pr.SqlValue), pr.SqlValue, DBNull.Value) + End If Else SqlAdapter.SelectCommand.Parameters.Add(pr.ParameterName, pr.SqlDataType).Value = If(Not IsNothing(pr.SqlValue), pr.SqlValue, DBNull.Value) End If diff --git a/App_Code/ClsNominas.vb b/App_Code/ClsNominas.vb index 8823cda54..491e1ca31 100644 --- a/App_Code/ClsNominas.vb +++ b/App_Code/ClsNominas.vb @@ -2482,12 +2482,13 @@ Public Class ClsNominas Return retorno End Function + Public Function CalculoISRAnual(ejercicio As Integer, cveEmpresa As Integer) As Boolean Dim retorno As Boolean = False DataAdapter("PA_Nom_CalculoISRAnual", CommandType.StoredProcedure) addParameters("@Ejercicio", SqlDbType.Int, ejercicio) addParameters("@CveEmpresa", SqlDbType.Int, cveEmpresa) - retorno = RunQuery("Ocurrió un error al obtener el PA_Nom_CalculoISRAnual.") + retorno = RunQuery("Ocurrió un error al obtener el Calculo ISR anual.") Return retorno End Function Public Function GetNominaAcumulado(Ejercicio As Integer, CveProyecto As Integer, CveSubProyecto As Integer, CveTurno As Integer, CvePeriodoI As Integer, CvePeriodoF As Integer, CveEmpresa As Integer, Optional RegimenContratacion As Integer = 1, Optional CvePersonal As Integer = -1, Optional CveTipoPeriodo As Integer = -1) As Boolean @@ -3180,7 +3181,61 @@ Public Class ClsNominas retorno = RunQuery("Ocurrió un error al obtener el PA_Agro_Embarque_PalletGet.") Return retorno End Function +#Region "Visor sat" + Public Function SATSolicitudTimbreNominaGral(IDsolicitud As Integer, cveEmpresa As Integer) As Boolean + Dim retorno As Boolean = False + DataAdapter("[PA_SAT_SolicitudTimbreNominaGral]", CommandType.StoredProcedure) + addParameters("@IDsolicitud", SqlDbType.Int, IDsolicitud) + addParameters("@CveEmpresa", SqlDbType.Int, cveEmpresa) + retorno = RunQuery("Ocurrió un error al obtener el Calculo ISR anual.") + Return retorno + End Function +#Region "CRUD_SolicitudesNominas" + Public Function SolicitudesNominasGet(idSolicitudNominas As Integer, CveEmpresa As Integer) As Boolean + Dim retorno As Boolean = False + DataAdapter("PA_Gral_SAT_SolicitudesNominasGet", CommandType.StoredProcedure) + addParameters("@idSolicitudNominas", SqlDbType.Int, idSolicitudNominas) + addParameters("@CveEmpresa", SqlDbType.Int, CveEmpresa) + retorno = RunQuery("Ocurrió un error al obtener el SolicitudesNominas.") + Return retorno + End Function + Public Function SolicitudesNominasAdd(idSolicitudCFDI As Integer, idSolicitudMetadata As Integer, estatus As Integer, observaciones As String, fechaInicio As DateTime, fechaFin As DateTime, cveUsuarioIng As Int32, cveEmpresa As Int32) As Boolean + Dim retorno As Boolean = False + DataAdapter("PA_Gral_SAT_SolicitudesNominasAdd", CommandType.StoredProcedure) + addParameters("@idSolicitudCFDI", SqlDbType.Int, idSolicitudCFDI) + addParameters("@idSolicitudMetadata", SqlDbType.Int, idSolicitudMetadata) + addParameters("@Estatus", SqlDbType.Int, estatus) + addParameters("@Observaciones", SqlDbType.VarChar, observaciones) + addParameters("@FechaInicio", SqlDbType.DateTime, fechaInicio) + addParameters("@FechaFin", SqlDbType.DateTime, fechaFin) + addParameters("@CveUsuarioIng", SqlDbType.Int, cveUsuarioIng) + addParameters("@CveEmpresa", SqlDbType.Int, cveEmpresa) + retorno = RunQuery("Ocurrió un error al agregar el SolicitudesNominas.") + Return retorno + End Function + Public Function SolicitudesNominasUp(idSolicitudNominas As Int32, idSolicitudCFDI As Int32, idSolicitudMetadata As Int32, estatus As Int32, observaciones As String, cveEmpresa As Int32) As Boolean + Dim retorno As Boolean = False + DataAdapter("PA_Gral_SAT_SolicitudesNominasUp", CommandType.StoredProcedure) + addParameters("@idSolicitudNominas", SqlDbType.Int, idSolicitudNominas) + addParameters("@idSolicitudCFDI", SqlDbType.Int, idSolicitudCFDI) + addParameters("@idSolicitudMetadata", SqlDbType.Int, idSolicitudMetadata) + addParameters("@Estatus", SqlDbType.Int, estatus) + addParameters("@Observaciones", SqlDbType.VarChar, observaciones) + addParameters("@CveEmpresa", SqlDbType.Int, cveEmpresa) + retorno = RunQuery("Ocurrió un error al actualizar el SolicitudesNominas.") + Return retorno + End Function + Public Function SolicitudesNominasRemove(idSolicitudNominas As Int32, CveEmpresa As Integer) As Boolean + Dim retorno As Boolean = False + DataAdapter("PA_Gral_SAT_SolicitudesNominasRemove", CommandType.StoredProcedure) + addParameters("@idSolicitudNominas", SqlDbType.Int, idSolicitudNominas) + addParameters("@CveEmpresa", SqlDbType.Int, CveEmpresa) + retorno = RunQuery("Ocurrió un error al eliminar el SolicitudesNominas.") + Return retorno + End Function +#End Region +#End Region #Region "IDisposable Support" ' IDisposable Protected Overridable Sub Dispose(ByVal disposing As Boolean) diff --git a/App_Code/ClsVentas.vb b/App_Code/ClsVentas.vb index fa31af006..a340074f6 100644 --- a/App_Code/ClsVentas.vb +++ b/App_Code/ClsVentas.vb @@ -144,6 +144,25 @@ Public Class ClsVentas End Sub #End Region + Public Function GuardaTimbre(CveVenta As Integer, CveNomina As Integer, UUID As String) As Boolean + Dim Retorno As Boolean = False + DataAdapter("PA_GuardaTimbreGet") + + With SqlAdapter.SelectCommand.Parameters + .Add("@CveVenta", SqlDbType.Int).Value = CveVenta + .Add("@CveNomina", SqlDbType.Int).Value = CveNomina + .Add("@UUID", SqlDbType.VarChar).Value = UUID + End With + + Try + SqlAdapter.Fill(Data) + Retorno = True + Catch ex As Exception + OnError("Ocurrió un error al guardar los dataos del timbre.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo) + End Try + + Return Retorno + End Function Public Function GetVenta(CveVenta As Integer, CveEmpresa As Integer, Optional VerificaAlmacen As Boolean = True) As Boolean Dim Retorno As Boolean = False DataAdapter("PA_VentasGet") diff --git a/App_Code/Timbrado.vb b/App_Code/Timbrado.vb index 0bcf64bbb..fc320f55f 100644 --- a/App_Code/Timbrado.vb +++ b/App_Code/Timbrado.vb @@ -211,7 +211,7 @@ Public Class Timbrado Public Function CFDICancelar(Empresa As Empresa, FolioFiscal As String, Total As Decimal, RFCReceptor As String, RFCEmisor As String, Optional CvePACCancelacion As Integer = 2, Optional ValidaFactura As Boolean = True, Optional CveSATMotivoCancelacion As Integer = -1, Optional FolioSustitucion As String = "") As RespuestaCancelacionSAT Dim Retorno As New RespuestaCancelacionSAT Dim MsgCancelacion As New StringBuilder - + 'dim Error If CvePACCancelacion = 3 Then ValidaFactura = False End If @@ -1238,7 +1238,7 @@ Public Class Timbrado If Ret <> "" Then MensajeErrorCFDI = Ret Retorno = If(Ret = "", True, False) End If - + 'Dim error End Select diff --git a/Documentacion/TableroMaterialidad.aspx b/Documentacion/TableroMaterialidad.aspx index 3c43bafe2..ae6341363 100644 --- a/Documentacion/TableroMaterialidad.aspx +++ b/Documentacion/TableroMaterialidad.aspx @@ -287,12 +287,12 @@ - + <%# string.Format("{1}", Eval("CveCliente"), Eval("Cliente")) %> - - + + @@ -449,7 +449,7 @@ - <%----%> +