From 4f02d663972464abad588ccc2c3ae5918a045a71 Mon Sep 17 00:00:00 2001 From: Oscar Irigoyen Date: Fri, 17 Feb 2023 08:54:04 -0700 Subject: [PATCH] RepEstadoResultadosHorizontal Correcion 172, Compras Excedido pago al cambiar PS, Transferencias Validar Prepoliza, RepIva 119 RPT correcion --- Bancos/Transferencias.aspx.vb | 26 +-- Compras/Compras.aspx.vb | 2 +- .../RepEstadoResultadosHorizontal.aspx | 73 +++++---- .../RepEstadoResultadosHorizontal.aspx.vb | 153 ++++++++++-------- Empresas/119/Formatos/RepIVAAcreditable.rpt | Bin 131072 -> 131072 bytes Finanzas/RepEstadoResultadosHorizontal.aspx | 13 +- OC/OC.aspx | 9 +- RH/Personal.aspx.vb | 3 +- 8 files changed, 166 insertions(+), 113 deletions(-) diff --git a/Bancos/Transferencias.aspx.vb b/Bancos/Transferencias.aspx.vb index e198bbd5b..e649693cd 100644 --- a/Bancos/Transferencias.aspx.vb +++ b/Bancos/Transferencias.aspx.vb @@ -404,6 +404,21 @@ Partial Class Bancos_Transferencias End If End If + + If MsgError = "" Then + If ObjMov.ValidacionPrePolizaCuadre(CvePrePoliza, -1) Then + If ObjMov.ValorPolizaDescuadre > 0 Then + MsgError = ObjMov.MensajePolizaDescuadre + GuardaLogAD($"Bancos/Transferencias | Error:{ObjMov.MensajePolizaDescuadre} Diferencia:{ObjMov.ValorDiferencia} | CvePrePoliza:{CvePrePoliza}", "LogPrePolizas") + End If + Else + MsgError = "No se pudo validar la prepoliza de cuadre." + End If + End If + + + + If MsgError = "" Then 'Conta ContPAQ @@ -449,16 +464,7 @@ Partial Class Bancos_Transferencias - If MsgError = "" Then - If ObjMov.ValidacionPrePolizaCuadre(CvePrePoliza, -1) Then - If ObjMov.ValorPolizaDescuadre > 0 Then - MsgError = ObjMov.MensajePolizaDescuadre - GuardaLogAD($"Bancos/Transferencias | Error:{ObjMov.MensajePolizaDescuadre} Diferencia:{ObjMov.ValorDiferencia} | CvePrePoliza:{CvePrePoliza}", "LogPrePolizas") - End If - Else - MsgError = "No se pudo validar la prepoliza de cuadre." - End If - End If + If MsgError = "" Then diff --git a/Compras/Compras.aspx.vb b/Compras/Compras.aspx.vb index aa2a73f8c..7c6924bcf 100644 --- a/Compras/Compras.aspx.vb +++ b/Compras/Compras.aspx.vb @@ -16597,7 +16597,7 @@ Partial Class Compras_Compras 'HACEMOS CALCULOS SubTotalIVA = TmpDT.SUM("IVA") SubTotalIEPSIVA = TmpDT.SUM("IEPSPSIVA") - SubTotal = TmpDT.SUM("Total") + TmpDT.SUM("Descuento") + SubTotal = (TmpDT.SUM("Total") + TmpDT.SUM("Descuento")).RoundSQL(6) RetIVA = TmpDT.SUM("RetIVA") RetISR = TmpDT.SUM("RetISR") IEPSPS = TmpDT.SUM("IEPSPS") diff --git a/Contabilidad2/RepEstadoResultadosHorizontal.aspx b/Contabilidad2/RepEstadoResultadosHorizontal.aspx index 5f9ffb583..30ee612d3 100644 --- a/Contabilidad2/RepEstadoResultadosHorizontal.aspx +++ b/Contabilidad2/RepEstadoResultadosHorizontal.aspx @@ -65,24 +65,25 @@
+
-
-
    +
    +
    - +
    - +
    - +
    @@ -101,39 +102,53 @@
    -
    - -
    - - NO - Trimestre - Cuatrimestre - -
    - -
+
+ + diff --git a/Contabilidad2/RepEstadoResultadosHorizontal.aspx.vb b/Contabilidad2/RepEstadoResultadosHorizontal.aspx.vb index 31d2fdcd8..646220e6c 100644 --- a/Contabilidad2/RepEstadoResultadosHorizontal.aspx.vb +++ b/Contabilidad2/RepEstadoResultadosHorizontal.aspx.vb @@ -1958,6 +1958,8 @@ Partial Class Contabilidad_RepEstadoResultadosHorizontal DtGastosSubProyectoH = DtDatosSubProyectoH.FiltraParametros("Tipo ='G' ") DTTotalesSubProyectoH = DtDatosSubProyectoH.Clone() + + Dim Row As DataRow = DtIngresosSubProyectoH.NewRow Dim TotalActual = 0.0, TotalAnterior = 0.0 @@ -1988,81 +1990,80 @@ Partial Class Contabilidad_RepEstadoResultadosHorizontal Next listaCampos.Clear() - If DtIngresosSubProyectoH.Rows.Count > 0 Then + Dim DTProcesaColumnas As DataTable = If(DtIngresosSubProyectoH.Rows.Count > 0, DtIngresosSubProyectoH, DtGastosSubProyectoH) - For Each dColumn As DataColumn In DtIngresosSubProyectoH.Columns + For Each dColumn As DataColumn In DTProcesaColumnas.Columns + + If IndexData >= 13 Then + + If IndexSubProyecto <= IndexSubProyectoMax Then + + If GvIngresosSubProyectoH.Columns(IndexGv).GetType.Name = "BoundField" Then + + CType(GvIngresosSubProyectoH.Columns(IndexGv), BoundField).DataField = dColumn.ColumnName + GvIngresosSubProyectoH.Columns(IndexGv).Visible = True + + CType(GvTotalesSubProyectoH.Columns(IndexGv), BoundField).DataField = dColumn.ColumnName + GvTotalesSubProyectoH.Columns(IndexGv).Visible = True + + CType(GvGastosSubProyectoH.Columns(IndexGv), BoundField).DataField = dColumn.ColumnName + GvGastosSubProyectoH.Columns(IndexGv).Visible = True + + If IndexSubProyecto <= IndexSubProyectoMax Then + + Dim TxtSub As String = GlobalDTSubProyectos(-1, CveSubProyecto:=dColumn.ColumnName.ToEntero, CveEmpresa:=UsuarioActual.CveEmpresa).FiltroPrimeroValor("SubProyecto") + + If dColumn.ColumnName = "SinSubProyecto" Then + TxtSub = "Sin SubProyecto" + End If + CType(GvIngresosSubProyectoH.Columns(IndexGv), BoundField).HeaderText = TxtSub + CType(GvTotalesSubProyectoH.Columns(IndexGv), BoundField).HeaderText = TxtSub + CType(GvGastosSubProyectoH.Columns(IndexGv), BoundField).HeaderText = TxtSub + CType(GvIngresosSubProyectoH.Columns(IndexGv + 1), BoundField).HeaderText = "%" + CType(GvTotalesSubProyectoH.Columns(IndexGv + 1), BoundField).HeaderText = "%" + CType(GvGastosSubProyectoH.Columns(IndexGv + 1), BoundField).HeaderText = "%" + If (dColumn.ColumnName.ToString.ToEntero > 0 Or dColumn.ColumnName = "SinSubProyecto") Then + CType(GvIngresosSubProyectoH.Columns(IndexGv + 1), BoundField).DataField = $"Porcentaje{dColumn.ColumnName}" + GvIngresosSubProyectoH.Columns(IndexGv + 1).Visible = True + CType(GvTotalesSubProyectoH.Columns(IndexGv + 1), BoundField).DataField = $"Porcentaje{dColumn.ColumnName}" + GvTotalesSubProyectoH.Columns(IndexGv + 1).Visible = True + CType(GvGastosSubProyectoH.Columns(IndexGv + 1), BoundField).DataField = $"Porcentaje{dColumn.ColumnName}" + GvGastosSubProyectoH.Columns(IndexGv + 1).Visible = True + End If - If IndexData >= 13 Then - - If IndexSubProyecto <= IndexSubProyectoMax Then - - If GvIngresosSubProyectoH.Columns(IndexGv).GetType.Name = "BoundField" Then - - CType(GvIngresosSubProyectoH.Columns(IndexGv), BoundField).DataField = dColumn.ColumnName - GvIngresosSubProyectoH.Columns(IndexGv).Visible = True - - CType(GvTotalesSubProyectoH.Columns(IndexGv), BoundField).DataField = dColumn.ColumnName - GvTotalesSubProyectoH.Columns(IndexGv).Visible = True - - CType(GvGastosSubProyectoH.Columns(IndexGv), BoundField).DataField = dColumn.ColumnName - GvGastosSubProyectoH.Columns(IndexGv).Visible = True - - If IndexSubProyecto <= IndexSubProyectoMax Then - - Dim TxtSub As String = GlobalDTSubProyectos(-1, CveSubProyecto:=dColumn.ColumnName.ToEntero, CveEmpresa:=UsuarioActual.CveEmpresa).FiltroPrimeroValor("SubProyecto") - - If dColumn.ColumnName = "SinSubProyecto" Then - TxtSub = "Sin SubProyecto" - End If - - - CType(GvIngresosSubProyectoH.Columns(IndexGv), BoundField).HeaderText = TxtSub - CType(GvTotalesSubProyectoH.Columns(IndexGv), BoundField).HeaderText = TxtSub - CType(GvGastosSubProyectoH.Columns(IndexGv), BoundField).HeaderText = TxtSub - - CType(GvIngresosSubProyectoH.Columns(IndexGv + 1), BoundField).HeaderText = "%" - CType(GvTotalesSubProyectoH.Columns(IndexGv + 1), BoundField).HeaderText = "%" - CType(GvGastosSubProyectoH.Columns(IndexGv + 1), BoundField).HeaderText = "%" - - If (dColumn.ColumnName.ToString.ToEntero > 0 Or dColumn.ColumnName = "SinSubProyecto") Then - CType(GvIngresosSubProyectoH.Columns(IndexGv + 1), BoundField).DataField = $"Porcentaje{dColumn.ColumnName}" - GvIngresosSubProyectoH.Columns(IndexGv + 1).Visible = True - CType(GvTotalesSubProyectoH.Columns(IndexGv + 1), BoundField).DataField = $"Porcentaje{dColumn.ColumnName}" - GvTotalesSubProyectoH.Columns(IndexGv + 1).Visible = True - CType(GvGastosSubProyectoH.Columns(IndexGv + 1), BoundField).DataField = $"Porcentaje{dColumn.ColumnName}" - GvGastosSubProyectoH.Columns(IndexGv + 1).Visible = True - End If - - End If - listaCampos.Add(New String() {dColumn.ColumnName.ToString(), DTSubProyectosCabecerasH.Rows(IndexSubProyecto)(0).ToString()}) End If - - Else - If IndexGv < GvIngresosSubProyectoH.Columns.Count Then - GvIngresosSubProyectoH.Columns(IndexGv).Visible = False - GvTotalesSubProyectoH.Columns(IndexGv).Visible = False - Else - Exit For - End If - + listaCampos.Add(New String() {dColumn.ColumnName.ToString(), DTSubProyectosCabecerasH.Rows(IndexSubProyecto)(0).ToString()}) End If - IndexGv = IndexGv + 2 - IndexSubProyecto = IndexSubProyecto + 1 - IndexMax = IndexMax + 1 + Else + If IndexGv < GvIngresosSubProyectoH.Columns.Count Then + GvIngresosSubProyectoH.Columns(IndexGv).Visible = False + GvTotalesSubProyectoH.Columns(IndexGv).Visible = False + Else + Exit For + End If End If - IndexData = IndexData + 1 - If dColumn.ColumnName = "SinSubProyecto" Then - Exit For - End If + IndexGv = IndexGv + 2 + IndexSubProyecto = IndexSubProyecto + 1 + IndexMax = IndexMax + 1 - Next + End If + IndexData = IndexData + 1 + + If dColumn.ColumnName = "SinSubProyecto" Then + Exit For + End If + + Next + + + If DtIngresosSubProyectoH.Rows.Count > 0 Then For Each dr As DataRow In DtIngresosSubProyectoH.FiltraParametros("Not CtaMayor In (3,4)").Rows @@ -2074,7 +2075,12 @@ Partial Class Contabilidad_RepEstadoResultadosHorizontal For IndexData = 13 To IndexTotales If DtIngresosSubProyectoH.Columns(IndexData).ColumnName.ToEntero > 0 Then 'filtro solo los que tienen número Row.Item(IndexData) = DtIngresosSubProyectoH.SUM($"[{DtIngresosSubProyectoH.Columns(IndexData).ColumnName}]", "Not CtaMayor In (3,4)") - Row.Item($"Porcentaje{DtIngresosSubProyectoH.Columns(IndexData).ColumnName}") = DtIngresosSubProyectoH.SUM($"[{DtIngresosSubProyectoH.Columns(IndexData).ColumnName}]", "NOT CtaMayor in (3,4)") * 100 / DtIngresosSubProyectoH.SUM("ImporteAcumulado", "NOT CtaMayor in (3,4)") + + If DtIngresosSubProyectoH.SUM($"[{DtIngresosSubProyectoH.Columns(IndexData).ColumnName}]", "NOT CtaMayor in (3,4)") <> 0 Then + Row.Item($"Porcentaje{DtIngresosSubProyectoH.Columns(IndexData).ColumnName}") = DtIngresosSubProyectoH.SUM($"[{DtIngresosSubProyectoH.Columns(IndexData).ColumnName}]", "NOT CtaMayor in (3,4)") * 100 / DtIngresosSubProyectoH.SUM("ImporteAcumulado", "NOT CtaMayor in (3,4)") + Else + Row.Item($"Porcentaje{DtIngresosSubProyectoH.Columns(IndexData).ColumnName}") = "0" + End If End If Next @@ -2091,6 +2097,15 @@ Partial Class Contabilidad_RepEstadoResultadosHorizontal CountDinamicoSubProyecto = DtIngresosSubProyectoH.MAX("CountDinamico").ToEntero DtIngresosSubProyectoH.Rows.Add(Row) Else + + + + Row.Item("Nombre") = "INGRESOS " + Row.Item("ImporteActual") = "0.00" + Row.Item("ImporteAcumulado") = "0.00" + Row.Item("CtaMayor") = -1 + DtIngresosSubProyectoH.Rows.Add(Row) + Row.Item("Nombre") = "TOTAL INGRESOS " Row.Item("ImporteActual") = "0.00" Row.Item("ImporteAcumulado") = "0.00" @@ -2113,14 +2128,22 @@ Partial Class Contabilidad_RepEstadoResultadosHorizontal For IndexData = 13 To IndexTotales If DtIngresosSubProyectoH.Columns(IndexData).ColumnName.ToEntero > 0 Then 'filtro solo los que tienen número Row.Item(IndexData) = DtIngresosSubProyectoH.SUM($"[{DtIngresosSubProyectoH.Columns(IndexData).ColumnName}]", "Not CtaMayor In (-1,3,4)") - DtGastosSubProyectoH.SUM($"[{DtGastosSubProyectoH.Columns(IndexData).ColumnName}]", "Not CtaMayor In (-1,3,4)") - Row.Item($"Porcentaje{DtIngresosSubProyectoH.Columns(IndexData).ColumnName}") = DtIngresosSubProyectoH.SUM($"[{DtIngresosSubProyectoH.Columns(IndexData).ColumnName}]", "NOT CtaMayor in (-1, 3,4)") * 100 / DtIngresosSubProyectoH.SUM("ImporteAcumulado", "NOT CtaMayor in (-1,3,4)") + + 'Row.Item($"Porcentaje{DtIngresosSubProyectoH.Columns(IndexData).ColumnName}") = DtIngresosSubProyectoH.SUM($"[{DtIngresosSubProyectoH.Columns(IndexData).ColumnName}]", "NOT CtaMayor in (-1, 3,4)") * 100 / DtIngresosSubProyectoH.SUM("ImporteAcumulado", "NOT CtaMayor in (-1,3,4)") + + If DtIngresosSubProyectoH.SUM($"[{DtIngresosSubProyectoH.Columns(IndexData).ColumnName}]", "NOT CtaMayor in (-1, 3,4)").ToDecimal <> 0 Then + Row.Item($"Porcentaje{DtIngresosSubProyectoH.Columns(IndexData).ColumnName}") = DtIngresosSubProyectoH.SUM($"[{DtIngresosSubProyectoH.Columns(IndexData).ColumnName}]", "NOT CtaMayor in (-1, 3,4)") * 100 / DtIngresosSubProyectoH.SUM("ImporteAcumulado", "NOT CtaMayor in (-1,3,4)") + Else + Row.Item($"Porcentaje{DtIngresosSubProyectoH.Columns(IndexData).ColumnName}") = "0" + End If + End If Next Row.Item("Nombre") = "Resultado del ejercicio" Row.Item("ImporteAcumulado") = DtIngresosSubProyectoH.SUM($"ImporteAcumulado", "Not CtaMayor In (-1,3,4)") - DtGastosSubProyectoH.SUM($"ImporteAcumulado", "Not CtaMayor In (-1,3,4)") Row.Item("CtaMayor") = -2 - Row.Item("CountDinamico") = DtIngresosSubProyectoH.MAX("CountDinamico") + Row.Item("CountDinamico") = DtIngresosSubProyectoH.MAX("CountDinamico").ToString.ToEntero DTTotalesSubProyectoH.Rows.Add(Row) diff --git a/Empresas/119/Formatos/RepIVAAcreditable.rpt b/Empresas/119/Formatos/RepIVAAcreditable.rpt index 33999cb6e6fe6b31b9ab1ca5534683d523c14b5e..2874e90728782da032e09483dcd7145eb468dbd9 100644 GIT binary patch delta 12116 zcmajFb8seI)b@Mdv7MRN6WcZ?6Wg}!+_7y<%!xU%Z95a&c5?E(-+90PPMuY?>bF+c z?%GvdUA22%SNr+F`1!%aF#;drnQ$SW006*atwJ>r^al9+g#PLPSf3vspPwIVkL1^G z&*D%oC5$VH%CR?}9|h-W&pQ2#IMCTdH}p@!v}NV_A5-+@w9A_}lD>T=iTMnHN4qG? zBMW&C@hUOD{pvb&$Odzbt_q;s_>EthyXoH1i6WyjJ^G!9r{)~@Bz$p8Zd7x;50a!< zfBS$yX6J~;jmYGYT0CtJ%X_8AT9%IHPQR5qmbo(^G3p?^U##VFl*GE=9#S6*=3wrL zBMlZQQ?WP(N*50O*1kVRkP*BVIxa7AG3FRZidH7We*C$yj3;d3V!W{N9KSlv%VM%G z0&Y?NC@{=Id_##u{H~hg!n78lnDG7J+U*UbI`iqRht@%!4n-ED`0A|_4IZz4^e!i& z7vGtt;jkvD>F(|ON7p&l!r5(vZ{k-{$6lBgEK?81bg|<3Vp&+PfG37z=>pL3hrgxtzwMU&tTgz zR@pugL5$$s=;@ncReESi=x^E^-$iZssb%f>nkYS7}2-s!Ba2rky4A)S{vgDz|TFaB~v4QN)UtvIs8qH|Ff4w<&+I&_2v9r0ri=-J>tSc zl(#bu%G2Mi=3&<$q}BK&ivwTcKv+xyuIGtY4xR0^w-+2)xj4n*;u+bd$d{Qs4~v_Lx%1qrrsLecK>aoY8S z`r<6esnK!c=-*a_;;McQn%Z7OGBnKTOAAJqq@1y%B<#vAI+&V=4`PJy+Hq9NDYHI< zb8dFq6^adgXH*M~HFpT>Pwa};0W>rAS~SLlyNnJ{L1Ix=ZKf$^_sy;F1be2lyfnP` zdgXMb_;EwEDW3FLgMKkAWNnKFo0|4ds&JHYbN-PZgBk~yE;By`J{)^ zVh=J~i2TDvVfI204^+&QV7rL=xnw{1K@M zb4y87;w}rq;)-HD!=w{xZb8~->Y?Tm#Uj&*4*FMWjr0rcYSx* zG4*bQ>-anU41p@OLU$`KwHOu}oh$){5g47w1S2g400IDTUxxz97vaB%_eI1nQhpKP zi>zNn`l8?$k-sSUMU*efe-Z7A>Ry^&V|bB5a18l2ioX zJS7^21%Tz99PxA)Zqb_`Q1JbZQLYmi&3=gs-ZtoIOy?B-oM&Xh9R3y{@W*@yZ^~Tr z)TGU&Sj$o@W22?|YMIBVw^i(B!gcHj7bD_jFLidEMt3sco2I#PZFqwJ4f5szRsh|y zfHshOr0hOO0Tj~Q|I5bHu$6bRrRX5o;t%XtXo{V9ja}7bjq#1CV&LjVB}F||vxm2= zfU;>x#RMdg2P&aEJX@{B?MB*N72QpafUJ^@Ej_yuz5T;`9|t1WbbmPe#GWc9MK|Gz zRXHv1FIEp4;`;C(^3NtwVMNHaL)~zni%as*vUV*FgrI%ApT3Pme5WVO`Wq*`Bx~Oj zZXBew^_u9aRri=M9#zT_MEKTx3gK>OC1-9G@D5}9%bHbI@oGBr;>JwnxYfo*ISJx< zlAUKf*|5i{+A$;U+3Y(a?&;o@;uf^mkV_+nOxfe%hFiLxMte_E9g#NCJQNJptBGBN zP_u&C)IeaOTFX_?%<ZfiW$ zIJsC!f~P7cbYm;TabZ+~^2;4uLH@Mh1!CbkHy}Hl&Fm&Y&#+S`Fd z7hw%pY+O3tmszml->6|LH=%tQiK#L76Y;GHGj*p!lvw)S;O(@ka3}SUa=Q-+j|m9% zIG_aO4F1blcd^r4l;9Krkfue$3Kxl7z_qQmM}5%YX-xVO`*y^n020C?WH#Qz= z6+6a+JV&H4`uGz{>Zhq^^x2sf1z{Z)tdX@nka+5m9x$8Q;q+>*%(o8RO*ti!48208|Jz8jk_ z3(l^{Yiosw=h3(>;&#}y@j-v>DACMpsZ)7u*l?HQZWoW|!!VK4r=9z?oFMxbCqZC? zs5eD+?NG@L4Wc4a5l4>=PWY{05j=6ZF7>%KI zp^^o?s=0y$T?iLK>=A*EO}+BBa}fOXE26;rCF=rX1^S5~9*If*YCCZ`3QtUKeayaAAlysMm6k=Sy0bmVi!q=nX={2e+MV={!y**|Gi(bMp_Ted|Cg@N^w15R_WPNjY1Qi(xm?cFW_62{%k`EMv0kt$5dbxkl?e= zxu%JVBZY{8bqh~Kzj3_ol2w|Pq9$T#M!lLIj79z+^{S1mb>>?StQ!byv+58qzkWL<}3)*Iz?D3Ghw=M zZg1@&mAYcD%8`*fGT6Cl*M3iaw_c-q&#v!c%;(L! zh4E;78xb`fdZSCKhXl;O)P&s4`CZ|-#cHF$LAb6gBQ8Bfk6!fVD3~8fJ7!}2?ptD$ z&b$dWb0Age&Ob(gdrb_LKS^IlvFibB{_OWGvIH5xn~GsX(6flzUz0QzcH~4Y>SxE& zVlY7bmM(pO);x%iyl)!pY`Up7V?Gpmk(x`)gAk(xf21HyAm!f0D2w5DjDMRu$9pA2@CUg+#D__R6FI{BG|q`N*a^wg&^Z})oJ=MUy?|7Ow2)9w~M|#T}~50 zM-*SW{lvMDN3o4b4e_l^YgQ|x`=LdW*nj({q*%4Y_u&Jw(dAj5Xx`p)X!vG1_4$C_ zb_w)9ulpb$76u!rHVKw{JIrOn6ysc#1rM5Xpv|_?<)n6qpEYFAL<+{iveFq^-gZ_N zBhMUOv*%v~0ueAsIjv@h;gnPO`0}KV^z@w|Q2XVPxI9CZ*l&CR9kD)bn{TWf84#$w z_4S*KDSbjQ^F0f1WrWW6RDpl;Vs>Yr?;7L7*Ev9;80ng)3>6Ucgn@)q7f8Y~@rd*u z*1Q3qeDXdu)p>YPmi72#o`Ee@q6P+{$lW})lCeEbQu1}BG!6z{3$gBA@I5iUd7dp^ zW649oTJ*T~`W4?N7Di7u++MN_JE>1^M<(la4-eV)@GbFmdlI{g&H(7a%(l97GJhwY z`v*Y^Lc%E%nUfH=aStgLo-k(BtlfoO#BaBk;33HCvyD}bzfmYC3Ug$)VH7@uU<=n%wrEJ{ zj+TRQ(UBSBz6+pYU%6~$mPs`V1=jy-GKU2rwk+5b?NIPxmRs$J36D{H*O^neV)=}< zGsg(z=~$ziNZ3b@-fpxia{v;YXd@*j6do4|Pm(T{liT50QbPTC85%@=Qhk|Q#FrH~ z9hkl9*>&4;<};@p{#I<;+NINM)TQcy{0FOAolee5$))C~(sS}#7n<={f3wn^a3eUV z9P)rHHrC%1X8=d1L3Gb3P1INc(K#Gr9}ZwV1^=)@;pl34JO0hOo%ULPMK~oBu|gzd zGAkMej9Z!3^Jl}-9GlK`IXC3U&^G;^+;%8Ywi*w|8vki@dV|lTqhPho%nrA^wT^0- zw&Z%B{Sd>4%IYFG|f zVhKS0S!K?^nYYn8&RR)`}Swcdsk5T4n(a?DQT4jEgUO&o2xhoOm8WTBj zGmjVIcAGCieCTcQM*4Pqgqh_TH?ywDyt#a8nq#x|(G9xaELqi}x=*8+YO`M$MU~}j z@SS&03`Q4%l7y3;KwlUhbRn4E^=^uQ44wD?W{wwCm_c#b#7aWf=$tUmMULv-SSLad zUNyua64j>YYWQz**|`I@k4G9;#SWw|NPFf$HXk$R=6!wY)SY4l?4{#o*JwDqc;Y`y5Fh}^z^I^4%^{nVoV7ZX5kF9W?sEGpS0Ch?`-_A zwdxSZ?k&$gD67DYxpaY7i;>uFRvK!G`%zf;iU6{S!^jclLr-~-z;URTRBTc-;4xq1YJr~ErR2jsO>3F7=MO#27mIb6WemPj%QL^h^$ z&$aYaO3)o_bw1($YqA!`q^*S_FKc#}%({_0Bm(m^L39N1Nj(=0focq}2=QzVVElQ7 ziVq5c%XsOr5I3>(#IWt5u1Q#ur`!;hJmcoA@vJ#(dZ2DRy7@8seWXTq)^>|#HFS^O z7Vxkl^nIP$+_}S5z-P6h`tWI5m*DpI7+RbGt20FPYT&xFb)Z_PLy|C%>S;9r&w^$L zXIC12E6ZWNLqhV{`?2c<(*E887))XD@B~6pX76+ZXO4P5K%FFs;BU5ue$;o`{zp@wo;V9x3a%X3GkR(}jpxfL$;g@gSqLOf zJn4EttZvwpd7vQZowX+~+x^-%rY|fuXSa!rh1=;-o4rfbSIyg8|IUDBf<@$9!RKn$ ze2t~{U{_2Lbf9$2=7ojL|ARpS>CHu2gEs8EKZ-BffF}3xhZ^?IFz_}whbMtJ>t8P% z8vJ#Y8J>PPvKcNKAcV4IYs1lA>n<*S+T@53r##A>74^@a zZw%BH-r8(VsbkSyCCkg567O7Qr+Z@lNIOKm`Z3<)II~v>uqQKGbMkPzr*7G5j`Q#P z5w$=0bJ`3nsw|x?nY*w@4_=*?E&}we9^>ga1gM!&I9>BkxLs-z&TSUiYn8*PoSdBtO!`PTR}O+tgz2~yb9OADfsC-Z|1;U&lKBHo5?y|P5RJa(eVPAv_y?u} zuYe-;qU1GTkfvYPxDyqqq!YPm5$ffsg1}M>AAz(1v`w@?tU{PC>H70OnIV;E8rT5w zUzfN{UIY1GVVoL21GI~`he!akMw*Vz`=5=$zt(nRCwhW;CNhFS0M}EWXMrGKN1_L~ z7s7vXc*cLK$5;FnoCkITN&f#;@+nr+X zHyFV=W;*s0=_91xc!N^Z(Zlt0g03Ltkb~dAE5WZHc4&dgY~i2u zDZWF0K5686T4%PnuO!x=hl)hVB0#t=XJ;Qs?yCr(sfx`>9NlVrQ>HoKP>JrWCPnOO z`)1JzUo*8eGMJd`t5-v{-lIlDoq+G7CYskrWkqvj(Zzwx!#flXF9%pv=><$F2b>d! z{p_hw~?~4A}Fuy@?a5= zojr_6?i!^F>?&(>OipcMEj(C@EPIjClW}dBpFdqK8xZ0brcI-1iO#x9iH>Q>hX-qn zxlR(Zt8j0$$fZ7I|Mf2|(}3FR5UJd^PgD8pu`Kn`O1XDVctPl?H*_?jNZ{jyJhb=2 z)T65VeZ;Rd39lhXybyi1gUB66y0>-!Ni>XV^y7qaKb07^CJTQ46YXflotHo1Myb$o z`WZ1kVZMW)JT2M4YmY6LGsLifEKVAD`+Ro}F!XQ1$fpwdoZk6mRP8n-zt(d`8uzUk zaHm^`WUQ+G`cd{53~|H?XsNxGWFnqiJ19MtAyVIACWjjg%( z$BOyJM$ZT2$rDC~ULJe0<4y^NH%?RP_`N?@dgugxUsAVkH5K#TpjKh*c)0HB9ey4^ z@AdBsb~CnCzr&3*W0@Oc8Q+L@~;aoU~Xtu4-n%m)4ZO1ioB0M*aG z-vwdOrDB~M4ASi~>_PtCPgg}Vu=u6%9<*ii9r`*`7q2KaKhajUdwD2S^3^(iXF-Uc zHUIi%hnOLeM2Fb?qR&*~IwT5!>jGv3I-4IOJSBV>{~3o`>98#kF6T_A@PW8zPf^3M zCqtLqZWo2@u}YHq_3S;D8$Bc2nF^iEYW;T^c`1~o!}PRL4hFRAS>m`4r4A-ths}jX%i7G1~82)qJY_Bry<1jCTf`D6w|$lN}ymcEB->+MM?T~nfwINi!(wb0benX zEqA%NwiNQwL05o+_N{v)^&c5^O}-+8j$;w`)FIW}U2wGwB}X#mDm>!mkB8rHdX;=J zcvD#&jJ37JZrq?Ch0W1<*~F@!>)OiY9w~zC+gO8iuLj3@JW>$8nx9B?;_0zB=hU_e z?bpYO{(lJ~%pBG;T9l*WSqGLqf6Z}|{Mrp)B@hgRYR4&SSiwrJy{S2PersXia-ZGq zkwTwc(CBiWfemi6vw7KO-~mLlwYztHyfYx6FW?K>aMFNIqc4FdBWpEqk^~Uo)R8k- zcMdbqW3kZFCC5`jWt&7i2@LF1X6ohw2q|O8O}`}GLDk_z@Pi_H*HN8QG@(RxlCayf zqz*6%fp$%`g|zx44F#Lt;RSpet$I;uO~PtF82#2vcH7N;+;fH&R+UAgSDOnFlYv?nJE@@kLUMEmczvJeFO~ zZI>rC`u=@$5xENUdGf` z3br+o{p}*@`(6SqSDdQk8A-g7f+rq4`LI$Gi8AP1F{>hxuwB!(I*^8?$^J>>D0z6BK5bnvA#a-GGi1OZUYb5D>zmbP!j2-Q&cz_X0&nfA6ElpJMLotlEvG+NV;QOIPD_b6K%)e#7zNbu$ zQhN|ofWLtR%N!AEa5zyT6^4GNU|xQB{np*%_>x_`dR9tgZs$6Oh<=cCnh%|c^U;Y9 z)w!HJ2LyY*^q{h{sB=_{TGl4(?&Po^gm}MZ62ymKJf&i@=MoXc!ii$q{We)cdroVk zplA#Dz!=N?T{yi`G;3*5=nky~F)H1T>9Qn+l)CLiVr=(p9w(OFvq}VekC~h z`j@=(Dp7J_nFc$Q_lLGo1I*=EK_$2W?-W+lV!4vM!iQI7mUx2D$9`I3K~!d(9U!RG z@_q*9*6Qq5)#r%XhyAS+&IQ%Zzch)gb`(XMq4{b~v&?j*+nD((XuX$2#@QB+u^N#< zue)voi|&%e7zG_0hly@2t>LmZdXF`R*=@!#g;?`J#9ae@9x4`jtOC>MZ$!RaHBUU4 zYQG>E7H;`H8AGN$_)T*Y<%c)@3oZy=#egp=0{F}Nl z2$@dmaMGEN~)$e5K0OrHvGH*GrJRTQEM(d~)2#ccDaB~oEX=TuX zaVQfwl@p_fEkls#CgfE6qxqrxrmwf3J1S*(f8517>iVIj9x3OO`0#m+*XJnI7#oeP z9s&rwKmwL=n2&u0Aw?=%%GR@GB6wytbpME?oeLsT-3D4&G zEoR#@Fx8H2SZYCF61`f;#L*xwUDelaF?0Ja3LzBPw$aIs8|e}Q+*U9C5=Rc8(|~eI zmBw;OdIr%@$yNZ>6@q}}TTv@jSRi*JH<nwM3*&oUU?NP)?iGP6S;)06umhG8I&iR8Ryj`B2UGvV9)o8AbHK)r>|b7sWA^40lF)J zeI42#rZGU7Eoy@7+teWg;>c!!>L(`}i1%m9F51mm+X!n1=i>T)H~jcgSQjg*AP;V{ zLbR8WXY|fm3kSej76t@`e4yu~4NgR^pnLRTGiC?CMGh&X&7Aqn^`bcAK0n&lsempl z!ttN%eiJ2q;wi*zC{utP=AN}R++_W?L2De7sBq}1)b>K*#(=$bB!b0MjOl-SZ6}_} z+$Tt1DOLFf-{iMNbo32l|A-&>fU#(@HhA@oyT&%^B|9;+i>~v;W{P(UKN*v9$bi9vsGV$^ke4Dl-&{?i}I)R!_Mc_Io zA^9iHFs0pzIg*{f6Ys5r^OiSC(9_s+Vj;;|%0M+@UP7}tG-}?ZblC6Kzi~xY#Hya$ zyIIr=CcU!nMd~1#%z_^gcanmdSojP%ZX5@$+5)nqXLtQ(n#tzXT@1Wz*b-|qG>pBJ zbn7qn8jm$(TMKfcoBiW{-QTb+7B?rPP6%>BBgyUu96!BdX$6_q^!;%ywX7qssWz&% zq*64ADd?irAFqNFMfK09HUY&YvO!V6q&mb{un6n3(iV`lH>9hRJWGuf)pCq2pn1^- zfn>iqe%p*+=h198U-1b>F83)j$tS2F?^wPuy9zX{Mx_;nwKTkWv9l(`*l@tj@ULqD z0$(T4!w_HiRCxZObgUI-d>EVY=$MYjNa&BQE_&s1>GLQ`B%Q`E%+`^Q@NY%C3#tA^ z<2+XhIVw;H?^zUg2X(aDH1{KI!``eJeg|3n6S%MLesMG^ic;I&p!w8>LRhjyMfo$p z&Wb}*hV^WOV@JBJ014U|gB8YGcefcGwM<ygWvXqzI+iD!A`JPSW=l{vw*e72w``I$>xw%{mJ%I0lY&kGp&;Lpuz$@5M=@*5`VrAm&W7Dz6 z*^su?y-|j_QCG7WufN*8wF1YJRsyFxXS6~!+aZAzO;kFK0Aeo4yQQxDXbr|dnfdXl zU$%HAF8Mv{-ftA>xBAQ@5=(9D|%V_@VgM<|P_1^*o z^^U~Bc$Fz}k(a2*(4vL0e_*(kftX5R3u%dG_07UBw*vpjC4lLDvO|MK2WiOpzybr~ zO@b3sDQEI@nI{{Y6C6k!CMJl%mVSt^j55jhI>`hvRj=PVvB-&I zmNKnUO4dEO6F5}e={S7!sz34%uMPRVLgxvz*|15O>o1;W1B0!#$bpN`d@Wd-xBAq5^IgdLl_Yt{DM+I1QJX`i$2Z-wovLS!jrpYN~$sFAh*- zH!PjiPA)|&Q?XX%duT{^>o#(0tHt_Zeo42RKzeodAjW*ub0yZo;AR^Cqy;4~*%LD& zi0G=@enEeJmoTH^?ir}SNTNqJ9E7H z1%d4)Y=G8h0YUSZ9E6;(Nh$kiV+#tfMGN|idwjC@-fA(Lp!^}txe?v@7GD|82EWFj z78`NYBNpb+zvL%5gpUTT5oVw5(8MBU+hXOHK%R1;R39i@$ zDjyb${Zt@cSRs&_v^%zo{)%K1fz3udx?pJ6Spy|6VHi)a8ag06dVLSYQyNXvBTXA> zS7%8LRl%Unh*4Y?N@xxi5QQz^($V41&239pj8~kj7_}!P&!mCd6rM2I_E)wlpwNu>qXWf-!2 zo<}3(im(vpz9r0;QbNGVlgo6Q-Y*sonNQ7nJ9m1YE#$d#pjP=@C7#>*9_`&nzf5x? zDn>1HPzg?A#=-H8+@--xmzQ9@5D$Q?(Ud+K+lF-6%b8HyGiy5P!4JCArx_44=LQ}T z^VH0V7eL@q$(}iB1ZxGq7Vuw(So7QC*G?JKiFP3S9Wj&p%e5ARgJGIHM`X})MI;~| zzY|sfdhJSCeBZC8!9ntdyd*N746^jr`U}yYEMcU--G|YhuApuNCikUdI!hdN{B_LT z_$JN3kjN~(ozaTa<3NexCzskq?EdMx?Mx*Q_3~>roJU*VsS?2hxRfLUv-2O%76RBhCipTJs2f$U#@*3y12R;KKD84R91l-o>#TQrRo#Y__duutcrwQQ1e}gO&Iz(I@o4{PLUwRJ4gHo zEbO;JuzcWthzLlI?O|}-+u8S-QsA-A{FkPo@@&7Z&)m|uTbys4Q54kcN;Xhig$en9 zOQ`(?1M@7xW5Ur4w(|Rotk^-obpOyOuN{U$5>MI45T=8VTGJ>QXdY=|OPT z3t>^fs}F)?le#{-)21FYFR*-4+v5?h=hFngUM1P`gZ-(fEx{>Ftp&8UUgu5N?>Pax z&MO*QCc*&)8ct*ld=)MeaUTX4V9I~7F>2u0pI1M3_jg%h2AYI@1r49$&C{NbHWe4) zCl?^U0Rln2#9BAzqQ`T1>=wm+unXA_`ZiD2eI{A!m)97bbpd!xVO`9eEG(G?Tzmh5 zp|SBy2*zdcZTH=P8?k@- z6XQ?QCaySLf6?nYh9!rV?ZZcHAB#w)X{9U9!>eiC(S$k1Pqf{}Yy4`wVyhv!#FaBwhNL_$5!9PK3t84aU zJ8wxE>N3XC$kW*uNR9U(Q^Hd5*}d4Z z!eXCOth}eM0x+z)nte zu>nYjZaK?vOax#GNNV;{TVzdpJpwM{1 zN{Rk{gq3cezg%%)pS_$;@c7qfM8Tp_zyvGvs$tWwo-uXipDbdxh#8Np0a=e3bTOcx zI+RSGi3?Qlr8H(!*9J5E?s8A0U0U^6MOtTcLtVK#yp7@(3qN?a!14&#@#5{B7~0+7 z(K?rn13$Jt^2e{kgzX0galm<1_-D3HBb|5D{^3363rtR~BS2Xi!rc87Ft{px`RSWn z-*V1<0;$J?*)gl?K?C=j9D{LpTj~WQ0{F9Bzl?VaQedxqtvF-yKcsZ|lsj1$@Dap84 z#LP|RpuTSI$qK`b1I~Z2w6E}y=lYBi5dHoi$ zz)0!k^}@>eW9U!)G-aUJs(zqn-5Lc~RMZ2>9C8I3VUkYZvk*Dr1J!2%*= zZ|-0Tz42yYz?v=`CSd|}citG)pNz}0hCa!-A9-DoEfoguxfzY#EN<7-3VnM?)@D#o zk}~D#YQ>QD=w0y8!8z_7LYa&o(G=3`Cp`qeKB+0?J1D#AY1;RaFSkdV^XadkZpmtW z0}CH>JUJvNpuBFG1NO85*~+-3dBV(YhyA~L```C#UySV}`n_n&%? z`X$1@fAPQkum9hC{ks0u{@?f?uYd>m_LuJp*au9YyaSr1-roU1kY-;C9sk!jNS(e1 vO8$SC1(^S17JRM#-!1;5d1~GxQ18n;C=q-Dg8d&iAms@tSmO8ug!q2|56fH` delta 12047 zcmaL7Wl$bXw6@EGyE_DT2@>3bySuvucZb1(ySux)ySoR6-~C}ja;gPa#A{F_^26$J4)>yMx6 zwE*%;nFB$BI#Zu6K>%nx)pHT#4Zwb`W*~eHpYaOz@d5K+f&20P{_*iXbS|kaL>$y+ z+T4(zX8%$7@vep&_I1Ms<0ZxPc~gddXB`)V>F%q?cGTnZJV#^}MA(-}d*=>(j)v;*Gca5(Uz({K;LJ ze*4nxl#vO+XVqA(k5p-X|9ZDz+#&vs?BC5 zYm$faj~~2lSaMgslwh*8*L~%TArAS0N2{GdNP+))f_(C1WV$nJX>X)Qw*e$ zyD|X20rD^W-MS?cMA(wo$rtYKCBgxhx62z0hLYuKh=A|;trXfCPq{m==UYBBr)E|Z z@N{rh_+@|0s4~ zBDgNE$$QDFnJO!VNK|E{R$)bFTSMqFVDVm>{|FmsWGo5jCjLDd#`Gcr&(Fi*=XFDN zXsumS+LseE%|Ioe1c7+Z8RCD-CT+@k$mG5aznbS<#}RU`)jKP#AuJ39ji7~tW&tL5+DBv5GEg5^K+o}hAn2>#GWV9!s zl+y<&9W*f^!{#qfP*An&&MviYayqrx5h~OdyKF$-?_%T1$hOB=?P3K6d_XU?Wa?Y~ zjlR^>HF0c%?&Rx&!{Mu+X!)vOq$`WD>$Z&YfOem`y^8BRm_Rx#qEzybxYI=byws>( zy#a5_Vz4--`wEsEQanczmVu}>grMbKtWXCirY_`Iq1s{ezmpQNt-p#NpJtt>SbeZe zbArTOtqpp3+1WPE%q`$AnOEBaa!%Ftd0mUot5gI|5|I>JDb=5ww*uWxm+KfkyW`8$ zEWP?MH}DRe*41N-u070Q^t=wsV7wqVIt%tbEZV*~LBVPiT)|O|JY&bZ!V9`T;hti4 z#ULSFhm7Fv_85m#ptNqH z@{jWNIC4H@I~gnW{LczI``f`<_Y25nA5CoT^~#&b``^1?@k)>+zNQ4AfuVCIk4dKB z&6zN`40fY3gquT@8hOM5ze{iu`m_Q50z3~`&J&kgEmHdsXX&((xVWNy9NfH-`^6ST z`tYRO4r+4e#yIO*;lmM6ugW^N@%^{ROZrn+@x~DRIqNPxwn7}P7N`bQRQ{g^i}bRf zRH;e5r)1pM)ipa-61ImB_9G8$2>8}EqD9lT;y&T`|lXz0JPVy`8bzoo>-!fb@AO8%b?}8`ri~ITMV6f!xs*o`Ahd+fE`k@T)2Di!hQCS=z|S#6>ybpzFFj z;h}uw(uf$49-HIa`w^^FK+B&9W<}uAoro9-r?ma%um(zNn z@@Hy~tMm`lSSbDj8KbCFFbYH#?spZ*9{)=vaz6WxgBr4HmwOpV5{DUXcFxD!i^-Ui z_B=k;!6i-(Z@zJkbiKI!2(^;0TSfK>IKQ`ubyx~gxF})x!yUM|bE{SXY`=d`uMm+D z;$;s!AzB0m*=_TM@4^9%CP%Jyg07eB7uB%-$j>U$#mb3&mOnWbaiVi@&I5BI3M}M4 zFcUem6!_hl^aAnF5Cn0&uA1bmrP~w&pixt^hv|1;PHp`e=`ap^GqWjjT!~TGf)`!g zd1lgBK2iw3RLJp<s)*R3w}%)M0D^W?OsZvDw)#ZQ;(%@Maeo z1`I*bv8F~24yRXCb=o=TKP;1+p0fgNZ250I;r-1g65e(Ie%$K5Xhp|P&L2z)kTaF8k$#Yp$$YcS;jEbkN5O*tnNk*Ww(%cZ{+9KXfmYzM?BXsV4xHP{iU`eTaq{pEjGQdVv(>?ms*rZMAXm73Z(Q|NEw9GV` zWNX13A&CZ%GwA7pH@arR1m`BFcXmz;iG>m;hpsyKyQ3hiUO0wTSYmQ^JnnFoxI{xl zvm2oz%8A{E+EBt0)vf+X6P>7j!g`gon>*OZtAWqz&;^xgQ|RC}p~j}4jRzo_R#R8w za!2Yqu^l3(Yo{tQO47DL32Y-kqcBg{FYtHj9PsM zzWT&lqt$|NTw!L`O)uVz3eS#E?EK%GARMwCSJs8mp88VdynGXV>E0Qebp;a}J_3S^ z;(38ek&!DBzNf_2#&^O&9MIxW6+63$gtjHB_t37oOfqN%%y*Bt2; zLY#yAs)a?eAvu9k(Kni>-(rn!o%r*h`$wL+GhgoC|R|iI(wQ`gNDzv^&GH z9>>>-DqQo?7I2k6Rv#|4^UOcCwa)<-h)3P~kfo?4#v3FwR9{ewyQvnKE+b}b$8?}r zS;uK)jjl;#=%}P+L>BH#fL&(Ow>`@#x?Rx#n~sVpT1y7G@1uSr+k#BrEhI-LF_Tge z0m+pk*zoN5e&r6WUoW(Roc%Bn{i^(|sYXE~$WT>FrKvxT%gJ}I^ujmV#Z~|_H%0>U z;o4%Hm4%4?SP)EH_g-1@2P}1P6a-x_Bq%A&KfRa;;)Jg7%86+QElV;1j5gNnB!f&g zMSiodK|Xosi%(QIjd#3%GBKK@z7V>%C)fS36C_XfAYVnqY)}Jy#U-l3?8B*R&}bG) z<}uFBxsd|1lrMYje4njCNC&WD?;94Ri(RY`?4T_VX{*dN zcX%0k^|M;>!tU@}G_@jD0p^j@;(Yba3}NK3FGV~!D^c}EcrWUriI<1ZclgfPBNFpf zs*o$R{t(i!o5Nn^$|ijTj~mOOmYRvIVAIer!AFvHdtxzu75JapwXHy>(%>TZ%o0ME zwtO$Y=>ZR{>)?nzg}5m12rmW-eNo)wtb64*Wv@8!0w~+aBLVTHj;k&DWfY!3-E{?| zfzN+VDD?3v(ZxoO%Rv3GmWhEUPMSPTJJLDHu<6UKZ6lVa-Eri9p2PupVvIe9t#U=R z5DML_NvoKpz2ppPpdP@AxvW6kss;)d*)YnTPcOPx#A1L=$=hm z3 zTP&E9THp9(ZBD^*#SL20sYzh`zAE4NrN0OixYx|NYnv02q$lun=p{^1Qmh+-64(v3RFCg;u_L&R7S?e#Q%7adC#t!+GM~gUa`l^@obnk2aI4{9I>M{g+9zWst5J#v3IbznCcZEO?2TtTs|9l2^9YkZ-I-=N_7Q8Yw<~*~J-z zoAFZ}2HFl*>NSJ}MyW3ZY-3PUme!P9+(gCR{tQ14?F{PCJL3C)Y4DeVhcKuTRj^|B zi^l$&YX4^*!&PJzVFwnICM(zn>!r9C>$%B+Sp+1umZJ9lT+lC`1o}~>b{1fAwhZ8{ zdni~7zJr;=*>bSWs%qC^O2><9xa$Cv5(T4KGDyrD`vbXl9~|@f+wHBy z3A>}*CdTfpxPQYUPONw61G#R|byI<`qy&s_(e~V7kV{ebhsXJ~J4d<83S1DXkK6=7 z7uq*NwPj?#k`x#AfYe$-ujV>9sqrtv0Sqz@USA)t)b$T0H-3e&`iZ`6Pi~={7XT;32x<0Vqvn;Xy!GGKghBha(TL z#c`T+oOq%V=_tqjiwlvM5Nm(_(A{Szg&|6Ma zxkZqeEZKX$sfRWVABkEE9Yq+~vDqQMX8Yr(9qR);_c>Rpk`J??V=U#lZt%q{#OWUk zw!_{s>2E*O2qCdXQo9rTuml@$```ebxtuS7n_#0ob(Pu_?5ZUX$L03wDAka3m``^- z#uL?%W#06U=6CIN}F6AR+PRsW-rkI;Mx!7hlVXWtGi2>+f7u z^pb&cY!&-Mlyc!cikTzaU=r*;yu8)2uXqc0ho7bJkellv&j?)Mln*+C2nB$>Tkq$E zdl_KFYS^+go2qnF_Y_)YMvLwcR+GZplsX?jD}3-Jl?iQBG~=l#)cBw8k}ekSd`N;9 zkyYZ(T0SJ=o;q=Mr;BGwN3*6~v?C7^FNuv@y{eNo{%V$J0s-G@mGMnFw{xX8=UK$N zWt4#@E{rz)H-WSeS?FYM$P54trgjjwgFY>G4t&xfj3(6;ErZQ*q#f$ebHkYuyThl7 zZ|p~|1@h_lV!})JNqx4-KZ+u+uCU(Ry@nx8>dPIC6z5Al-WRDE2694{(?oSW)do2n zbOv4}>#0^HYt-NM-H+D(xZl>nt!Jjx!Wb1)hp0WRT6cLJ*&IoF8lVEQFQSdWj(3tw z%S1^3V1nnk|Arqr2h2^P^j(S>z@RVU;G*tosUIXNp%;U?XX`32`8Ac(sn%J`FXIE& zg9ukUh+2(sCn|6COQQl_#!z`7v0U0UcYnGrCN^R1nHwLK#DH_KZK9tw8MM}$LDHp(18X>8!z@aQYXLu5oXk`+47!Vs3X@kK*{}Siv=>r*B7(lp1u>VP!pEBl0 zD#;wE36|r3-x4>e>Y)CcHcO432igCRRBGt@{r^g(VErHKD;sWh>VRIp_U z)CU5nLQt(T9;c8rnVtqlK6s`P1ICNcuJ0bc!FsmPxx^^FlUqm=^!pkQDSuo7{0Xv=xug=>+&t20ur~_YJk+Z^W!kf4^OleeJ->aV zDL*6+z^8=YXYQ`bG^dQErIV_(Oq4AsCLRF6U{<~H z|7MjVd&!nJFL&7R8j4~mzZFRvl`~E6Q}o(m&kx8FX>AD{(R&JlT^m+Oy~OX>lnLhZ^E@_|G7w`mY-PTOb|DL zcweiLHk5h#SiCB#AUj{%c}1r)#_Ym;U&1QK?8a|~$aHbnXh=%U>h+^*)>h{~1=Gvh zC1SMFBes{jmZ|X3MR^o(8h!$lo9iOCP<=_P~#3r5mrLH zsd9OwC#^SbRcv?T;&k)$Ku$6nhb!i2}$^F(H?H;C0_Z1IwlJdW$ zTk^fl8*m_-7lO1KegCC^hlSe>xwL|Ks(Tww3V*Si#8`uMMGk2fKML^*1x-9`G=KZc zD}FGa;R5Ei1vnCkW;gHn%k>SwCiUXtq#fF~*)$&#pz+Mg)kDXweXfQRsj{=ff=B;l z$!)$(pfUD=E&Xz>q*2gY?$c=DRfFFLwq*g7-}J(&BCshHPf2c<^xs=f_;k$@cH>20 z*<7D{K9EgcAVhLsU+hW|Q6$H-MlLmN=%?8aVE7LZ~8) zD$W*VS~C|anreD?d7Vl-x5p3pm}B*EwGQ|F9>k7`qeE-VcL@02ZY^ub4k;IjJYg|H zHMlg(0b;CNBS9M}RardT&M)PjQ&*0c>YC)tB@TsZmli8dr&UFJ=sHW^`3VO1?0w?~ z)c9nyLkqyud!IS$W#s_zn?&bE$n@Duvp~?}%uo)_L$BeO#o!)wm~n!4zhV~XaOp(e zc0qe)9VQq#bivWnY|Pr0q^@|?3AS*7_#5l7-Hzt%reaSkH2)*v%_GzO3{ImcEIe0% zi4EO-cDZfALkmC%kK>8vD^IvreD}+eM!vAncG{}GKqRQgw*t`HcaxEN(_)#*m9wy8 z<*BLbg?KD6@{fL^!gfJXp+0Lf`L6bABw6A3MzKR4+~a}6jzRl_Bb-L z1lwJWi>Qv8GlVT`@Xwr$RayeeRihTW*ALgKWS|U97R63D7dd8~5(~PCD4Zws?y7`c z2ZM|>^QL2ba&G1L-Lgo%d*7W9hx7X??TsYzd*5#%8GygI=EtUPk3z@)cEG>8w!+3` zCj=Z=j-U3NHlebEU12zbOg_?_x)w(8VilQ#o-Tf*f2fK`xrZD{HcU zv;xfu?a-QpbFb!Bbl972+bQ|@9@?cvv$p4JHE3Jep-p}#+%XI{bRw<)#vH5!ZJ241 znTQ(|u>^ea&ntoR;NyjgYuwFVF|g&>5&UWg%$;d0`}epZ)G_4doWQw>?Ph9rq>ED( zdPO0so$!lrLT!n}%58UD1`VORj;sa8VTjQaJIXGoGXXp{I=WVRxi3+sC5t;USEt&a6uukLjJ|R zcM4R@CuPd06420nTHfv|VJ}y8P_zA$q+cm%BJr=E^DR+5hKwJISyxe8%M3QJ!Q)*k znp!J24fnD{&hA3SnrX3r7}1WpR;N>7d>?=gsupw!Dv15#XZWsUoMd{9CEkIA88h=C z^;_u_KfQWe79lxA+^&0DHmQ%8LTF=OdHhJ{p8LFQO0sK%i=H1$8_(!c0cJG`#s&5g zSk%6V#>_oK%&XPL|+J%8@cx9o9+zGn*$C-Ypc!+-{Hw;l}6Dem{L;x7GAW*z45=Nd*U8# zLn`{mz?5otLyPQC%kOa=!fRS|+*Y27Qd=wc*pnfW^W;VHG3whWRbviMb3g}eO`6+X zVZKA|dTR4~cvXN?Rz_8f6!;P)uJ}yI?&7$@x4fG-#HU-ZakUrwg>1`|b_0VXIVf+Z z1oW4N+}0AQg1M$!m!c2?xnA)PLTFBm7AsoK4~g+)8nw;s)w+k-d{EL=yuser+lRw zZ4%ZOqc_KeFk%2j89;N=#w5K5#^aVwDFx8kXh`w(VD1HwmDT0BbfX`4vZvZSIT9Fh zePAp2tof>1u}=RScX9U3^Bk#)sC#Tj+Y;(LopM1!SJ;rR#GQ>++wG3g2?0^5nArLm zJ@=g*%)7Hkiobjl9_c@TQW;ev=W5QhdPU1xEE?Y-{tQX5 z0?FPn!c(dWc#y(OrU9$QhZSGDwRn}2r1*+>tBC`;fJit=enmeDBu{2177dxfBGKNaq1QAyIkYDk(1AV zrFdQAbss#0q<5q-{AqF2mI#ioE^d29%T2`34gQuk9Th zs1S6QZTozvImq@0RZzl6sB~+Mz=YeVp8k?C zTYBShGf>fSY!o#D_S=z{;CA@0z9ZzSlk-4SN6VKyPHckh-D?S z`}IjB4=O4ht>0R_ivy&_FQ&3JKQLb$IOVt46{-Hh-n#Ydq41wYN~%|mcj^57y<+)K z&DgN6v}m2w0DStN4#LJgIZ>mDjN05i*`Hl-`(@y!V(;plYRIk%u|5+&zef?H^meap z@{uDPZ85i~=|0QTNO_nGX>*k2IA2 z?P4I`%5$=bZi2@>`j2G1-LK<>o`A)({aO5h!-P&@vwGOARJx<1zTciTw#|%(Aq;=F z*Nb-A;C>;r!~w+h<6qg)EY^9D7rxe7pWU8v-DZ~%Lua)+{j?C@CD?5psR~EdOmUZN zGX}T(!f0P=ZLID8bKyht^aOX6y%%K_;^q*L&l;ParoZ?z9y68$-Oo}kHDAhsW+Yzp z@i#X3wO?kF`+C=bb{Kih;c4D?E6L+dDK-y8<*KodaIbN>O)<^ERzw9(6V{W9H{x+8 z%(0=5CCPh`8R6{R`dTUM#KLAsxKeEE;EH1S8ry_JO@Q06EW2RR->%qUSI^pT9G%Ur0aiJyOryXII)$jrsN!&*Dr_wG<+&*GpyHp1vm6OKFO zTYo zh_Qc}V~$LfW{M=S=31sgLhE)3V0cpl*-dr55IISViNwXiOJcOs#VO;q%U#Kcv7i9s zUTVplTJ$(tqhLur5s9tqG;+LnqR zdzeLv>F=P!X}F*S2d&Rjj)}S9-~ILlo&8cPIrERHJZ%e$S9meGJUg5v)pkqTw<uEXd<;*eeUwbherbI|-^BfC1Z!`6Z?ubtE-f4|qs z9`IEKYj;8X_7Bj1L`V*>nE!U9+V7(^U&&V-ixJ|lo-{3xu@SFy&$3JM-GXhNR- znoyS*kCm$3g(P!Jn)<}4Xz4}gRkRv|ySSuMlRXw#yi|}9AGXz-VB8|Sa{yf7t~^lu zwZYv5S{1=hlAeQ^G+Z3jEhWY7VViNA6$mXA)mo^=v}M(&?6&}&KyNHqE6}XKoXt40 zVeKHg6FXst;>p#yjDM&Fjllp{^CqI9&g4wRmsB+Uf0T1)N2ng|zUU8o!Q+L71Oq=p z)E@Oo9SL#VyV&Ce@@`wsreyKAJl0cp4HTUQe5)B}6q}Wa*uJo>Z~E{y>4i(cl5ZlF zqsd!!R7+QAH=6*~-@KO}at-A<^{}p`2fHaE<~T}frR={P$s{pLiPmf3ll@!Qtyb?@ zzZ2}Axh{xy-*!%BpKQNNx4Sp!ve&3y_PRy6)G)!;OO7Z!NG@Q67svPxf$H@VUeVb! zdUUla23fEx;({&;6;rH_>Rk6EWpni1PfmimB`*>(N=p*B@Y<7TC{1rQ(9f&ZpuJ$2ifX7e6|Bd~4Cl3FS-%E;QF)zBz7(n@^8;#p~M( z9fF-gw(haQ3zu%8*vL%I_^{Rz8GrK)MmZeVRC+)vZ%Ga3v)Lgp+~Hd0R-Web(()B0 zAYWAP_`LK`IHhX~ohukzRI_MC9FvO##7Wuc`fak=Esp&3@-*SARxo&!b%zu95o2~! zSWTROC8no5B=V5~jlQni_MqETgZMK^iM|HM?+)ZNZi4Tm!{>~%uYTzeCC(;y`gHDz zg={Ct-Qv?VFM?Q_JlSIsVq!ou^rZUxc)Jf|l$r#{{v0WNJr=0CXZaWS1?ZgIY!vK= zhRG@GaEtN|ZavsZXYGfCotb@f^Q_J)z^+j_-p*NtM z=v(36&s!)4z+tY~8()Q682o>tV}%UlAQUoX!6KI7SjK@2K*HtfSs4^P z-{Va?8R&!J8fW%~j(>!BwX9mwGJpBre0U|(0`MTv_TV9ACymwU%Ce=t`NiOTuV=bD zdfarK0Jnvk3@k%JH5HKp$7R{o1tAVsOam1c|18`%=i{bOh7@czFT3bBDiK&R9;8jC zJ5(wUS#GE6#v8r-9W^tjqf$%U;;!q*1K=@f3LtY5sfMo5w92Fc>n3*fHay4s+w5Vt zmQDFa4fQg10`*CyYBs{^2bw}~5fDz)=;e+S+vWFD9XCzGe_zjD1sxX#Q-w^6{R8;H zYrBh08(2!F7`{=s_OJ9qAue|6Goc(CmudneGB&L=Bs|sAZz4Guq=+pwP+Q+ZYiI;`G4fEs2kMXg%5ZPu>i!+$rhggd?8&I15 zgkZj0sHxet7KqB@__S^>Ki+3pmQ)1ya+Oj6>pBC}>L-dc(Z1&dZ89BC%|JtU2$OTS zl{?HGVY^vu)KNofLy5p zk*0B$YHN7HnJ@eB}Il_c)L-e0axNGgQU7E;Y;TN7Klt~VELtL(2eVdu{OfY5|+>qEC%@r86gU0ub zsyuyeof!%(!j5n;%>s(>irvfVS~()^!TrrNE*m)%0&#Y~wFv{5&PI^pN~?P%nF~a9 zneyYoLiRhaM1La?^Z?hQTU_Hv)XCI7Dk6?(YwwL=f5oKR?ZhvtDTbRH-{P=G^V1q` zXMa?-kn?$=Ml&NDY;Qqg(*6{Z?US!CC2FZAp*6Lm3+e5Q3D`KTVeCx6fV4Y1|DBzt z@;j*Nfql3^_=!a#NL5z#$|%DFHH4^s%yze0}=SO#C-OKj3|VMrN1G) zg`P8_l7wj-o1qYtsQs*DJE2LqtQg7p&m>-*+5HFn1B`cJN52GlnL+~5BI$zkltRsv zcYK>fHBHSg!w`IC(W8p=JuwbjX4ZUgX48|aHNr%P)XN9AMq%{yD7U0xpWz=|U%hwr zb{Y{s)+^yQ&V&I}f!}9z#Y_v=dY7_@UA_m%XYwY0c;UaZ5P+r0??G|-de8*Yx=k>O z8wYDV(TPX@Y^zIYy9||Z#_y_Frh+nL9Xg93rzZb1J$Yg%;1lQRFXk6aduzqmW=LTW zZVy+xVMq#DR%I$gNW+Dq)Q6137{;_LK2qU!{>U@aOzCTLo6>tSu)!<{(FH&H3ND9H zc4nJ4er3FIK;H4;82hjwRXXKWS1S`f6LIoIePwQoGj-nI*bwFSYhe^Y6k>!R(&W99 zFzI%_$_)n0WnmPuB>A!|&Wj&N=E_cEqwS{D0Xl_d1$7zbd#qPLE6XED3_KrL6GA`s-ur?-+=M$dry?|)5}w@-iNzf6sr2N5RF+<`1o@9#hWl;!8T)Bmw- zQs?eLlK($04c7m-H2=HffAxR)SubProyecto: -
  • Divisor: + + + + + - + + diff --git a/OC/OC.aspx b/OC/OC.aspx index 6bfa5fdb7..4b0f83c28 100644 --- a/OC/OC.aspx +++ b/OC/OC.aspx @@ -2424,7 +2424,12 @@ - + + + + + + <%-- @@ -2433,7 +2438,7 @@ - + --%> <%-- diff --git a/RH/Personal.aspx.vb b/RH/Personal.aspx.vb index f44258e3d..f86f4b1d8 100644 --- a/RH/Personal.aspx.vb +++ b/RH/Personal.aspx.vb @@ -5545,8 +5545,7 @@ Partial Class RH_Personal Dim objConstancias As New ClsConstancias Dim DocumenBitArray As Byte() = Nothing - Dim RutaDocumento As String = Server.MapPath("~") - 'RutaDocumento = Path.Combine(RutaDocumento, "Empresas\Grales\FormatoDC3.docx") + Dim RutaDocumento As String = DirectorioBaseEmpresas Dim GvRow As GridViewRow = DirectCast(DirectCast(sender, LinkButton).NamingContainer, GridViewRow) Dim _CveCurso As Integer = GvRow.DataKey("CveCurso").ToEntero()