From da8de6474355f3bc8c4bc8f755eba6d1ff141358 Mon Sep 17 00:00:00 2001
From: david <darranz@rodax-software.com>
Date: Thu, 7 Feb 2008 22:07:23 +0000
Subject: [PATCH] Facturas de cliente: informe en formato Word (sin terminar).

git-svn-id: https://192.168.0.254/svn/Proyectos.Tecsitel_FactuGES2/trunk@269 0c75b7a4-871f-7646-8a2f-f78d34cc349f
---
 Source/Informes/FacturaCliente.rdx            | Bin 0 -> 123904 bytes
 .../Reports/uRptWordFacturaCliente.dfm        | 611 ++++++++++++++++++
 .../Reports/uRptWordFacturaCliente.pas        | 358 ++++++++++
 .../Servidor/srvFacturasCliente_Impl.pas      |  25 +-
 Source/Servicios/FactuGES.RODL                |   8 +
 Source/Servicios/FactuGES_Intf.pas            |  19 +
 Source/Servicios/FactuGES_Invk.pas            |  29 +
 Source/Servicios/RODLFILE.res                 | Bin 24139 -> 24408 bytes
 Source/Servidor/FactuGES_Server.dpr           |   3 +-
 Source/Servidor/FactuGES_Server.dproj         |  10 +
 Source/Servidor/FactuGES_Server.groupproj     |  16 +-
 11 files changed, 1063 insertions(+), 16 deletions(-)
 create mode 100644 Source/Informes/FacturaCliente.rdx
 create mode 100644 Source/Modulos/Facturas de cliente/Reports/uRptWordFacturaCliente.dfm
 create mode 100644 Source/Modulos/Facturas de cliente/Reports/uRptWordFacturaCliente.pas

diff --git a/Source/Informes/FacturaCliente.rdx b/Source/Informes/FacturaCliente.rdx
new file mode 100644
index 0000000000000000000000000000000000000000..42c3b0881ade7247a79f0a2da3e220910ea645d9
GIT binary patch
literal 123904
zcmeEP2|!HW_kT0fz9`wZOvo;kwP{~OkxCI+qbO2|C~Ji5OLkHAC9-c>TkKL4DUni9
zq(w@Ln*Zm`GxHs-Q;qok{@=%$ci(;I-Q}En&pr3tb8pY0n<gJT-!_G)aOn^XqMR*B
zi1EeK5mx0s%M*k;!ZbiRo6RPp`vUp{@c7^LFQGuz(J*4!6iE?+C{nmXGLay_SzKWJ
zODTeALQI`Gb>;`(55An(Uw))yS`zEb2x8?I3by`yyZ09?0xgLkj-jEj*>b!$)rGkT
zM>v5M64Wz!=MR&yiYQ&hdvhv^^Q->zJxh^_<i8I_lsn?v<Gu;^dAM`&TdNR67M`1Q
z#7_<Pfj{57bRh^SRME2=LA(LJb$5br!~I4df*^a$E!@dV(7On_kt05IRzq4pziYus
z;nyE-{b%&}HJ<yF-I*Z3R^lt}i*e`TaqrynaPceBms@}Cd$PXQkYEhz(-M)<y{I=8
z?_~O?@rq1u6z<$~3i15n=QBvep$~4ni<=HFLcjpGJ|w;QuZrn$pI@LHoq+gQlA<sF
zH+2bf)8p2U4*JL-0q<2gUDCDhlY)_Raob(9o>aTwe#d>^sy9I#0d@w;PfAy^{gD?J
zFBI*7ynOI|2JYNv?t9KlA^dRD<tD{#Ut~VR5P26&Bl}l8?oDv#=KlfDWWB%Q?ty!4
z7nu%uRlIZCBlk{WRsTB+<+88-HSbNue7MhCI&<4kb$4z;T=~F%H<BiZ`RJT?CH|2g
z{O`$c$@k<{F`oNevESA9Ob#q$dUQgD*T%@_|E~WiP<IN*%E}t%+dIv06*qF2JI&q6
zZJJZQi@2ek%RDE0J9}{pcZX?CuHx3N^X#0(xtEp4)OlnCizz<Vlf3YPsm!!T0v--7
z^ITaZqJiC92d2|(H&+*@sm=~83R9iJG#R7M!7;&W_jwLXDm8JYxVWq=LsnLV`zs-C
zJ;cz;#CpgGrj^PF6<I?QV;0k3u-c&hgZgO<lr`+jG(d*-U+j7_)d#3B)d#B%=*Kj(
zvv+s0m$i0qp02`TYN+)YpgO3}fPsB9)R}#m1N+Gu+j(-L2Mr$3M`K{0egkA3`pmX-
zLT%<bOq=U8&%s&G&IzS*R&jBdhw@5DNZ=QAqAnAcxzkh}T$m2d%ux<ARG4NC?$cCI
z_n-OpW?H+>c4exmtEg+J^=6K6n(FS#RPD_)c6D|_bU(G;Ru0oh8Z!s?W)5?mX~#6{
zqo&b+@Zf>W3bm7!ZN?m8W-!EvY2oNP&vmY&tDB0+Y`Yl_Dg&4k<}#bpTFA;8>l<2+
z9;MG5OI@<Y4$~a%SWGpIzN!QJs;jE1ijQ${ndUUxiNhAA+TgybgQ$3MV^{atc4WET
z>}I&Km;+UrpyOPov5K*ZxVS~i3?~;mrpt8}vl-Juf9McqbF~)YBd?SA93CSRRn`6)
zebhAu5A36^-e<5z{{aIB4eo~=K`N7xLx+qs88YgrKGSFj)5_e~+D3oW5T^bZ{gJl%
zM&`Z2P5qzT<g_18Pg(u>_I4aH8hE(RaGl$mIhd)>91z5Gb4F9NlLc$l2Qkg`jYgRm
z$r?Gh*}2cNn@v`VQzBQOOm%W5TP%l3b?*lMf4_j9&%o%_2hb1DAD{&=1`Gq(0LB8w
z0o(v{0PcWAfQ^7nfX#rd06)NXzz)DJz;3`^fInbAAOH{u2nO5$+ysa~3;XdU<;%+y
z{M^5OAHP9gejEy*{%!iP#LZ#cugq!L(y>ePG{VqSo-j9M5SD;R0HOsIuO+dZKe`Ps
zw&Dj&>dk<E@Fz$tCsUd|Oj2SlfKX)2B(vt`*PIwFL7P2{5OD!`NYDtemX0r*L-mp4
z;*n3l>Bvi2rzg$Ov?Z^cKQllLRO~EKgMZ#|YS5mFM~V1f{rrf)SMHYLmA~TAqjG8_
zovKL<WhdV<$$1_Pe4qo!b|3|43Frvu3g`_e<7dDx52gHXvZ{S}&HtwQ2Y#&o!ZlE!
zsT{%RLYKWSM&BntSczzMq&v|Z(6S57WICx6+I685P2`B`5jbWWngT&cko+h6ZZGsh
z6~GJ3n#*w2ko$kH{wF9PB0|t;B4qz2Wq(x`hF`1si6CZi=38iHt+*|XzSEds^rwmR
zr-{b37D3yq3MAs(3DKT}mZ-hLm{yL8H<byI!=z<|bCDlVfjBh9pFv)nUln-45cU=E
zo>hvIjFa*vxc{W)(TF>QLL6zaWJj_ism}!pHH#xB<?Nru6zJZ(kUp?ki-EMZapZiN
zoUHu<?W&G$Uv+ecs-ydZS~Mw!F=1E8a3iMor@7Uqas-X!y$YZ&Koy_{PzMxHB%*#Z
z_#YAld*H|VFDzsV$YQYWLa$2hbKWqjc*B5TuM|y)lDy{XeYyyfdLL=E<6VZl5CT6<
zQB>3~5Byja!VMm+f=S8a1({HV<f*IJ5&0=($U7%25+}wDbMJ(xADtWK-U-oQ1~<&T
z6Qa+4i6iSxNt%C)&>%!eeh&qZy8ajdsqg=7{3p%Hv+S>6D5z@#z~I!AuvehQoP|(t
zsEad5kqtpam(v`$3?=V`2sM^)<H#>0<HV?uggcIqOA0lN9t~nYCKUgS7wzJHd2Ijd
zV~1ZKs~8h%DJUVrKfiMV@5woyCs}9i<-`q;cbjS-_+R|SaD!zDma%5pmqS}<U{fNS
z5O;}>qZ^<paheR`c})jRi5n*G<Rt|8@Jow81NmtX=I9t`ApDQDH4s9Ce@?#;yeH@N
z|MUEp6m2m7xx6RumH7X&4UnRQ$A82Li~sx_ZYcjrelG?r0c-$}_MHED{&zxWY+(QY
zU*SL3ezygDC+z^+0Hh6XCxEo!?E(Cv4_Hv`nEEy4fB5B1eIB@piSd~(IF<^|_^&Dc
zdzeOcRxbP;|2fYHb2>Ikh4CNjy7>3Y_>UKyg}BO^K*Pp=;dO7fIK_Y3DOub~Q(p;^
zzod<JAAq#ca_zIEZ8ib$6+qf(nE)lgFNUG&A2PYTB=4yWefTA{IR4cBUxllm^-=PS
zGX6DJz}%2%vJ!S_fP#H4x)6jN^>QMjCIRfaP_A3jByT$cIsudcJprUGPz|sb;1Adb
z*bfK+TnF3$+yvYPL;+p`z5u=hiU7p`aZERx16lxD0+axq0NnvS06hUEg&zvv7skgF
zJ}$g^_Hp69Ez7z8T<u&(qC71fGfZC-s-{gVS-ttp@NFqec2!tJXRc+Qv~^d+fTf-^
zyTj^UgPpuO>pIHz^DBd%O$<$2SG4iFIrf{*SsB=jic+}9Pnj{ZpT<-jDG3@CWoX(Q
z9}-x^AjpM-F%mR8#PHS=$Q%$Y#YKkZ*Nh4qkP8bk1aj%ukGBpXz<LFlBEd^fo=_zF
zG|Bs}fNlWNQ;2uj^Fj#xBGLI@{MIn1HPdTt&Ggn)wE9Zs4!+j!L(T(8VOLQPsKKBh
zzP(69A`Wv(f`}BkEE}jyh((HU1#D|t6V8Ny5X+RP9QUaeH;#L+*BHSFROZ+fIZ8e^
zrJpJw_YqS7vgwgPMqvuTeM8>)=ZMCzB9T1r4(I{k_Wj-n_W_XW0eu0gfQs_q7UIbM
zznP!=8~GpBH`2rEhUW9n_agEToiw{HG-`cBj`ZW3Wq%0OtWzt|my>|e80HG9ja-)H
zwhb;L2r(hI2MI2>+r{x3U;BT89sUVc;J+MKh9{$vT-nW)*}WmUMghM6Lm>!y{s+?E
zk$3s=LJ0iwW_-18enI2MsyRG}<jdLamHC3T2#L71B>UvL5MqD|SMx%KTo+Ck62TjG
zyEx9RJ$36q-F_tzOzRNNv+Omh%Z<b75E(MR5OQk%>m@d()vpm47I|fW_@PWaU>i3G
zwsC`C8#h>~OoY5B*7u}DN{OVl?K^rY!?xQTi-67l8S25fN^t~qXxaOs1kG9u$e8Cz
zkmGPK0Lg0>z!G2u7!6niSOa(thyjrPz+X~gQevWFQo=7rp=|$Mf>D59#~??1%58yf
zWuF|EDP@4qqv7WoeLXc4L3AHNn(W^szpVlMJU@=-O8_qKV-Y6ThRHT?nZMF7&i`|r
z`X>mNZ=pW?lJqYR2l(@8?C>vhRR|L-%aE(@5I_<YI;bfrMdW%^BeVXH6p<N3G*zW_
zwU8v#wm8z-ThNG(=T@jN&)wHoI_DzN3D9|qi%1uM@;QQNb<T>>8X&XfF5P=!$6Py5
z+dV`1(C~DN4n5|&u{yOki@4Vvk)+%rff`5&f{E~2X$r^{T@o-D;+G(T0HbTT6E2Fm
z$?XYZ^0!rwpDtlbZr>2<eqC+%6!uz+kwayr+M+=cvL?ffNGruUfS&}JdW$Ld?%_t8
zJ8Gx_aVDyLCLSc+hK-v`5YkOape?hXycIhD=9w7jTYFCWvfpc7%a?B-JTmacJa;8Q
z3%|WmIjglqY1ft(M|ztMKiT}=x}Es}0Rb~l##@aqj<7junjUW&cHP41-8#n><3wAC
z=rgm1GnGW>O3U@aM<zwz9F&umGH!Zy<QuPmZkA1an<Yo>UzGE`ywIW3<0nsMS-+dS
zAp6bQ4I5s3Ur_d;z;?i_^XY5WNR;Q@4{oRSTrK5h>6)30=-|YwhYlao_`G7hsK=~V
zeQsKhofp#m*z^(EA#XI(7fhXXPccgKO{bGX?2YUbkIgPV`zHL&>jAR{oql)D+*e2A
zqq}YYnR7~`zLa=;@@--Jk`}PuMkS!9mdBU-m&-y*HwS7cc4)KYSW)DjL;cz>i7IYi
zu6=%KC(jof&Uod=Jr(n4r>FK~fXcu#MW%CRrdm6mnB#N*nU(R!4NgACB{xK*+3Z;P
z@xvGY<57V@HpeFw?#X(SAEFnYbGUe@(t*8}1Bxdv@_n*$+QN;QZ_h07KQ^1$b<wsH
zOM=#g&CQO{xE8ld{I=Hi1sTqH3EM=wrGCC=s4XR@d~lM%LjP|wIxcM4sadC<EAIq}
zX>GYz*f~)*v7k-wQ#Xx^&;OVv;bmj~rCaA^>Ic~?yGoi(Sh7AdEk#<62t6y``r&Nv
zggN%&Or`j(`NwX!>ku(}+@e=@lw;31e9bs&#zk$z!Qob;#;oX_;Ia5sVMJoz3Ac%R
z@ks&O#4QUIA9@n%K{hu6wt4N-YBwo&LiZ5jp0nnq**TAHJ#2ARV|Qkl$B4|quJ3PV
z2VeK!G|x%zTIjZAN*$fp1u190r)M!*@0vf$!*;~$glW^wqxMZWKBmK|=$>slPW3$Z
z$-Mc#!CMv)kL0wxkJ#Htb<2Ey?7_Cwz^oUCwuNh?AD2?rieDYLIR8=9G|lICx2Szx
z-{ixvjOk$!((1A5hKKBJN)E3GnUUm?{%OY`-9`Dq1+HPw!dteB^C~ELx#InbEmI;A
z4GFm^Khk6GXx%Q#le@CiE&cTl=49zpXV<UW(6e`sOC{Tb^7L1IeEoFRJ4JR&=bgdh
zcP<$?{-xrC{o=Y#nU_b6$^JB+Zl-AM8Mov{_T|l!O6Pq%u9Oh;W!I!za|T$?@nwcx
z)SbZ|&R&{%`Q_OTEDwpR=f7-|dgOC$+;dgKuQOkzgiQ{yi(dV%yzDBw<m=>JXD2mz
z)V0Iy=F#H|tYzJL9`?Ug9{5UftA^HL3+*J;Gbzbud@SV+E)cE0DDK;Rg1B*Ufv^2E
z(@E>Z3%5SsoIF2OT)CO;{<|$a-S*E;xRbuoJn5SC{70WwgwI^;-*xsRudEh_&K$Je
zQ8HXV*R!}JecAZZt3jJ&w?u}xj+8iW>AExEhG+IYwpY_W%$3LX1^I6}e0|nTo6#2&
z{D&$RBp)AleSYTkx1Y26D4!1KG%fA<`OSVR3a>}^*rt8Af2(DecK7yvmOb=QqU2p|
zjTDm=38vHMs;_PPN$FbgWAU@r9?mQ07;c#HDf#5#g&W-6PX`5z*3-T#`r*!iWzlQ3
zgW}TeYfUnd>h#fUS<{n;jix`Rub$u0RAuz87b-5N!|v~sO7`+7IMqvMvR&$1747hX
zRywVFn=WqY*3-|p_^tZMqdT>2M|JNa<<g(|yxg|iCYh`E^EM7Wvf1(Nk;}tRT^JN>
z<+;XP=i-kxD>@ZUI{T?dkwU^l;#vRmJ)G98El}_u;B1^d<FMGq1ODR|xE#G|+O2c;
zkE8h}vVKKYY3sf+)(-Ys<<;eTknP&nUhTsSCxwRZkT&0^eQ>^+`bEj?yMcP)_cpIx
z*XD(X1$$Fj-<^}v?jDpoeMaoO?Cy1I^iE7rS8u1LIIWpt;fBL=A1&LNJbLbJiQ)aW
zsJ>M?%ILlRTgL4UCE*A54svc1th#p6!YNMSZi>#$6c5c@wwS#+Eb@&vv*c2a;p*9^
z(#9N_k?fK(_SPrE@Ztksf}b|gGLqXm=w17=`$@gh0}t)<`AU1NWn9?a%Qa_FtnIO;
z5^}-2hAho9HMU(XE@mJlt};ORtXzM|VztcRSfy6GTkGnnow=>z-0iB2oQb)4AFs!=
z7ks=+Yt~J6cXOASF1ePM#N;xgq?5+!*}p!zYE+5Hy$zY#(;crKJSdfO<I(_R;qB|Z
z<KC%OXJ22Dy8JZhiA+GaYL}O;*3p)s&BhcsJzg-=$v`@H%5t4sSx(^^J10$HwN}-0
zhzT{>KYrf84nHQgV@k_CqD#M<EMXueCt+@L>V9zdA^sZfU8mm+-*f7z^{Ct}PfXgr
zSpBx0^RC$o_qS>u8$5bY(BMUvKfk<UGJf#*%NiD!+ihJjG|i*uVzs#Pedp&|L^7GH
zV#nM$8JQAxbYSVrgrI!^MW57Eedl#pp&7Dw|1rnYdJkJG`YiC7JA9pa&l{6g&xpHn
z^-+681@V@_wrLZ_H)|2SdE*k9ZpXf)uU0zbeLg>9<f!}S4{W8|-dNvji1JZoOH0cm
z6Ysy;nDgRhvtujb-iMcL?C<-rxJC5Ygv<BsTK4h_RPR^fy3*th;j6kWZ<PCGktZ8U
zx+oN@iqFxR*z=Z=mgMGE+fqBf>f1lB+v1NA*X7#1oz-9ARm>@~WQ`>$-y(NSH#oSn
zYeCx)P6^)*#`+$YTcB>@7}z4M$s9f9!I@VT<4seWE)|n0o;t@`>B5KJ4*lDPF?x1)
zo*<t%)JpT%z*&0-Om8{h(v@zKzT)S54a`n>Xc>Ao^wIp*4v*d_@055bq1axei>Ka|
zD{_vD*?G^*;_r8IC|tGD_p0lg8(R+qMS7;HwNBn{@VMIx@s;8i_UFCp=RCRDyxmG~
zS8EMO>GAH0?6-~QjFO||?j^~ryv{yf-0{?%Nx|n<%FVx!b!X=z>16M<)+^^aPMPL9
zO>4lR2NK)+_jPtmxLlZcx#;GC_HXADeY0DdY#zTVvE2344Q7zhsMg1l76slpF5hnF
z^5M?0NoHR^=b3AFUw`e@6~#9_b+_vHDYnhnI`={J%ZX82o}8I><DueF6_tZ7;RWMg
z9dzkGQaxRAAzjYJ!o7UWC|{phzRkr<i>~cgxoqP(^-VK5xg}%2PAQ9+Hr~$1vt!$@
z^0!9LyM8ctVS1}x39}Cz8obrsu!LyYYm()LIQi)=@<*1<h}A62J{q|;Re7B1655!M
z$SL=Wd_TT5%kkUVOJkLe%rIu#BZ1|8kF2*?q`b$E7#S~n?(T+>ZPE<KEx8eq7q2pJ
z?17AXFMF03K7GwDUaLDT)bvc;<}9V}qC<v!^@_IB?NDH4p1L}2@R6^>rbcKzlUHmy
zSjSv6<mvM;EAfy`u4lYrM?1$)o4#v=mvieJamD!O&tr%72{XK%u%T(cWTzE<?NmEE
z$E%KriP4fVW-1*edN>wry0jszU--s(hol}kUz`{_UpJ$av1e;ZYgf;~9b&Xji#1v8
z(Qcr}GwUUzGB%qkblWejO1#RM<m%L|P%QORdfSjAqK>cF>{6ohxMdodyT<Ifay2Wg
zXz%rNUk^AGZqQn0_d&YLgHJw>6qP65HM!9@P2S0>Z`8u)FQwY`&QAZlGjY=niKDA0
zZp&R&zA<@($q4<T)E{OWh96<5E|&S;U1{j0gwm3vS7*j)?#chwer_wRn=&`jzV}+%
zH-|`PMFtKGys5Wj)b5y$V}8(DJhV$RxbiK3j_w_HKxwdx$<iMWG<CWz3Sa$FRBShG
zkV}$dU`#+WroCP#wSodSj|p9V?1)_0T)Bj?ZSv;JdQT>+ZkxPY=c|h6vn9(ef3x}8
zbXJMlkA;uVTCUQb{Ns7y=1HDx(RRc07K%jE&s%52`1RhgtnaGSe6~(U2cz<)`rW&{
zl^xM8{-)*J4Fk7yzcs1nX^BC8Avu29gWX34X!Z!1uqnrPkM6hd)iXBl)9I9BrS944
zuCICA6`Mz%tsEVfP0Y6$9xor9`RZWDw?mwA2F`xipDxnHYn#f+@t!WbXDtY`ay#k0
zC9sRuiCil&^Sri^sn%*ipL)v$iYWPxh{>7nc1($>yufs+w!^rK#?j$H{yNSq1H~&!
z#it|ecI3KU2%NEG<VpX`4e~=De6ZbSHY{<LYKYs)pb;~+w6|CsvU~n}KObe^^JX_E
zsTWLjZZ=2#O7z&6P9HY;uWx?j#+|hB*0QHoitm^0Jb8N3^tDfy&SCexezZjLhsN``
z#gqGV>NWFiV)Jpg^D^71pZ7Y#YBTBDL$@5;(Q6zwSxz6JthIZKpG}L+icXnJMP+VE
zSoX-Dx<^gbr07P^F^}3=F59*AO7p^5KjwSB$_O~z>ghP6n~wwTD__*yqqZYAdCEYC
zlX@%0uh{K%;AF_0^J*8GD90A$mC0L=RbIE+^VQz{vkC*^XZ@HYWo_X#MNYydw#9Yr
zWR(wNBC^)gPUN0Y5!<UW^`^<83-=4dZ(4YWSR6b#V6~IUP@llJrTwHVz0MkhU%t9t
z%5$uE7uVMka+5F2>DVko?&_9XM~ieu&kr7vLOWQ{TI9$<OPRgzMwH4HB<y;k5_^)i
zOT}+<x%XG&>p>eo=UazHyzjnuKtP8>ZC<(V%WHkYSNg=v9WO@rdNJUk=b?Lx4_vmJ
zuCTD1g5jJtv)fMZvv*bB?B_NemlXT#3S3f}aG-d`t(`VBxhUI19qvCUN%j^uD^;5k
zuW-mlRL)Lx^a^pQ1HR)9tV#(O`z^lH;;DBQeP3`bS#|A{F4yKM4PKhG{jyWSYlmms
zf|fjrwxUG`WNC}-?=t7cp@_)a3$C2Z_P%5>cHof5D}xf4`_DF6n*M#lu+U{cZbJj!
zHkn=Iq2uvhQ%r35g(e9XzCH+=X)mhvra8mPTkl@y!-`u^u6uu7BXZogH?4cGQn?m&
zOYH8@q@<!N58r(&Sru?UE_c)160tT*a^w3pS=@9nJtlei7PSI~q~7W9t=h)#x9$jO
zn%1`arA~8-I%>|1EMEB_fAfs}kza3=ca&u}9oPMu!U*Z7mR@l=<IY-)-l}0Pt5|eH
ze}Pt~gM%F%K1`KKY17Vfquw@#Oo+{~k|UX~bCpYC`j;Lu&)BYS<u*&f>S15?;_G7T
z56WFlY&u#uh*mmi%7nY_wgX+97K%(I!q;Bg*YjPUcS;c_vu-jp*Ijt!H+a_j$Nj}(
zcbVnh_uQO2)^o!mhv=p6&REKo${A^g8b8zvxE1=QD0m%1RqptQ37Xy)y(Co)2CQjc
zc5%$gC-!k0S{c54y6t9mTdgVE79=gBs|D|0cr~YwMyrS^@4LH3tqLhOmZG)atJ7O7
zJwE?ih+e+p?vLYU`<QggZ@GQ_#a2GA4ZHh!Y#Z@;(09h3Z^@zJeFm85i;63mZcJ-B
zK(UQw=N0K1dp16}HE*EN$z3$x_~W*wANttKKa{Z=&{aW3-rvpZU7JUFyLYQSkMTcH
zb|(0G$^NG?S|!QhPgdnlN=$n=G3?N{OWP$=wpgd#Q_WNE6lgz2B7L0MG`~Fq54d+J
zk2pJK<M&6#Pv^}X74*^O?*87JW|+(if4!yE(n)6x2Yi2QC$2d8ow)Q!vynT-1r?n;
z7dcFMTK|O9SCb+f7MUMk<b0En5PSLPg~Dk0LAPxaAGdQJbE##sJKlQ+pMAGZd8UEc
zpeIu;lI)Lc&$RYq;JaP6nc2g-k8p1pZMR)fexJ=Sy^M*A6(jGP-t8RlV%xqgBSyTo
zX(2MCslICYy>ThyC66t7p<8gkTrPWHe1N7xFFE#(o?rC#Nqp;bxTr+q&6>80kBnh2
zkm+z|L6fZ}9%mw#e&7E_e1F1(4Q+nhW}iJNcKhz81-D#FZ^z9z<w-x&J@vr0eSyP#
zcTMkI%#2X=f2JkcquI`5&tB$SeE$5o$J9>`Lw%MlXKslcRy?Hbh8J;PZm3Un8MrRD
z;8pT#%hu^eng=4o6t5aRH*i_|WMnUeuTEtFqL%_<x)14^wfft8!&9c4CQVoPBAwDY
z+S#z<#(wLjcHiU6*r>F_?^@8dHa7$Asm<)+V6m+I8Hv<z&lP*ejbd&{3H0uk8jyS~
zH_A(W#Hz$^5pS+F@wQxgJSO{Oi;2>S_a2R(HtWHmt-Y-E=0<;19PAN#-_I>#O-7%r
zhX<~9l0W3uY~KzqQT=A=6JzPOY^J%`zfyj2cEqzyr`qj$!yGsLAg$ZRHO_mVHSal3
zeeK7KM{S0uXbs#Ddty!Zv4iAh_IbeW+l=+Bul%9gdaG9jsA%;G9R4|1q`zlwThH5P
zJ=|w~ET(rKCY7S^mD288|Df~N$9p%O&ai7T%|ZRB9jWw>7}IW_*=T=8>=(z}P%rJL
z?lOZuE^L(+e{fG{+J}&NBfXy7?lZ8bbi$hC#MZ};P2M>4?6&9c9E;7>`X%htw>Ue%
zQ`PF*(Tg41o*rz|UafP+-m?}zwlEy_4o~~8{(g?HgOcrt7X3!GJJ)@LYyT6u=`xGk
zM43POHnFW%z>v1~AA1&eYISCR$@v21x1q;QHD?Ud*w#K%LuToaQG=K5ecU3hcLJ?7
z{lW|F@cS3;b#4)~{8^8XCX1B~?%%R2(K%+iZg{8TujU;|Bfc1282EhqaQB-!G8*ef
zG57S+KPa(up;b~7+E#z&<m1ylo|bsZDtca*_doF>K>5&>ZY|{e%3}`CmK*&;HcmuW
z?cr$YOSZ#&SzWr^iJX5fK0|VZe9S!6mMug(xSVoptF`;6k>i0SGS0E<r(JhhLfl-@
z*W_jJ;oeToXZgg~oJyM2e3;CrVyR(SR(tx-iDx`D>@K=pSH4~60iJGcp4rQ+NYCzm
zL~;7DaU*x_oM^4TY4zHo;ty-m&1XHl#`tzI^}?a>Jv!lYwu<P@+;^&jdVkO4cC91h
z9eyZu47V(hp0Xyhhx1kG%q{0m&h%RPad~eE*0;~`<{$cWTw12|c~10Ni>=D*Hij<=
zdvUeHE}2VhN__q7gG|L&z1rrQRk+}qol;u(lS>b#YOgUIyH9rWYMCExwT5+Q-9NjB
zdYD7x^gUh$YDM`c<K44YKkIh4<e=S}MD;eaoZLUyTeW-;G;I5k6DiJHd$rMO@xmvX
zG2@2eP!DGOiKj+OMh)3Dj2ZmdJb9G-@T=XPO&Q@~D<V6r-ISh#SNWMu^zn1qIqCD-
zh1nq=i@K>leYE01SBG(?S3YV;hPQmOi!pjf>I#t+`6BCrPul7>QM9#44czI}#Auw#
zsY51f40OVbdnTtO%WJ)v6CJuaXo<QUjrGYlch!kK7bi$t%4KMU8h6@yRP?~(n3bZ>
zr<Same|mabSNEoiu6%LIY;oVGSMu^lQ`hfd$<Dsh+T3WVUHR4@osVtmyT@kA(XA>G
z3HsUUsk1lhA6Cj5?k+8{=Sq^D>UptGbJdm~)Jp7Iu=pHZvD{>bd-{TL5&^bqmy@3t
zt_Zk2*L{4*b8DaX=jLeUw3)`Zz|?>6!eLXd<wvZKbnbs7O{-Um<%%m|T^vun(Qn@`
zXr6`jVEIlCL;BqK{+6Db`shO+|L?O0YAYWZytbE7;Q^(OP0uEWF=$~1S34vfd$y)m
z&mQlki5FK-jFM*T*Aag@r`grCk-OE2?8z`0-qjeS(8PJ&i7@Zvu!v4$RrZTM>|x#F
z;fi|)pCk`*_xB#FB{8Q(?u=>fdzSjPZSGWLGE&Z<)pO-(y2YYBPUKE8%=N$7WY2w5
zzg?TY&A%OZbl_#BXQ!GLtt=>6kP)rYeWq&ED}67!<HV!D`0Yk_x-3YWJm6g3xs5~D
z40HGI?zhv4)uo^Aac|@G&gXWy_s*A!R%^TdOdCU%*z<)yE*|rUa%}cYK7FE_hQjXC
zU8BWzEQ~)sY}e6~9Tz<Q^jxIvX4S(NwQfs}ZnihdM|4H!rt^mmznGYQb>q<<kz3B}
zNDxi9CKY11Q=z|)?B*%&-{?O!7&g+T(@Ob!{T)J&eYjz3`eK}w=gJN%B8Lw*OI`H6
zi$Y3EwG%T}j1FCySF(?FT%(nn*RUWNC2w(h_$0f2^YX3fa=yy@Ms>*&4asZUWb$@V
zt(`A)&WWXN>fR}0`v#ktD$g8}^S5-^)#9tvcJZck&%tIV#9s{_v`PA?l+t$Ptf3Oa
zbX0p9DyvT;*7`5sCV6rD<AteoX0YDnqTX$@qEa=VxNLXW|M2}}W>-t~FGI=>F89?=
zT@_I#r6uJbGWDo}W!jN_i9YHlJU8ikd{~p>;nXLl=-{Hy+21Z3hNU)}d)q2ZgE^pZ
zWb7$ehBFtM$F<kh8_{}nk-mkpylY$AAeFN(%hu$@r}Sl)I$XZhzG#@3tlmrG^z;S3
z1569oJ5JcRV%?fmJMsoFT{dI{hOs{dEOH#8yKL#|lc9xM5BFOg&AjHbr^QrH`Jn#y
z(tWx~%`FeP*?%D8NOJ6!zUv&59`4vNe$0wy<sP1A<EEc77AaqJx5Zb#Su0C?Z+pL3
zxv*$kcd=f_$9L^IdrgX+Ztq>2N1Xif-Dpls?6$zJo6hvyI6PqCk4;8%QwPaxu~oj-
za(RpGgLb!bnR>wB;FPe3QC;)QiWW4tz17h;17A-#`tjYONqyEE`Y)XRso&_b^_!Kf
zWN)VRT&BH!!7w{9+Mw<63Q42(Y-r+pHzg_6jwTnR+No*y@!oG=n04}M={R)oBKha@
z;vUF$F1EfVD=qCgxcSYE@eAw?^3QiZ<#j-8#@+==a%TrBYMAsYTjWU(AQIL&ZfmWw
za^>hA?zw~ZEwZpT{wTAd@Ic67>#+7JFCv!SO>i2deMM)^=+P6Jv<ongu+%p%JLLCX
zdi2n~{mfg3b>6w&m2odn_qk@--Z$zuzII?FIp$hF@O?bt^3|+!K0}=uK6_-kDyV)L
zeYZG3R6)XX_ZI8^6G~jf?|fOFQfj?Byz{m8N!@PWI`+7SZ&p~3p&6?VtZ$dFGl-eD
zuiN4jyB%ZutXw`|<+`Y#$2m0T@Tr6EN(}e)dG(<6i*vbcTld|1c1(F@gzi?G;7<z=
z`N&%w&x^iU`Y~kxj8AS)?aZ{Nx}F%nrD>k)s{Pm9blz{e>!>_v%!RBMDf)?vZc2ql
z+|O;@Ni{c?sb#IPG&k*V`>*~?#hX!ItYbgP$Yn{`ZAum2D4lR7sH4)HR=0~q^H<(e
zO6;xd6tC%W%6v2}AvHv~$()yQqsM8Co7|!3ak78=G3K=69pAR^UeY0U(T1Z@5o0FX
zdn|4N8f-3fX;<h{^syD&x=5|9Qrd}>s1Z+&+*tl{?mVZ(FSlq<@_+EzP_?6O|0SJU
zblrETuf=5VWwe&-<|;|74Lf#VjEU#nGZL3AbIdgei5}lP-fvXSmHGH$=D}wEdjk%f
zVg#vb9U2&9enZD3&!o$>XVF7;WcK_z{X(>Tt6eRdt%?~H(fP39)QB-A38{<ho^Li8
zoBZBtjH_)I<z??I+em!YKNf#ZqKkrfdf;gF3wuL5N3AGH^zjlOG-LL$4vNKUrc%oH
zA|nTOpDkZ3&A1^W(r1v4N=~b&nWA!<cem?@$39)Z)ab>E)K(Vm>+f|rGBW(Vm`9tH
zD~7gh{%(K4)6dpLtYbkgxocum=6CLw@k;*&?U{P;sVfVQt-OD*OLCjIC9QRoZk`&0
z>Gfpol;?xYHw^uDBL3Qp&bP%@jgz@a-$9d$&Ha{g>3i18E3IT>JXeK_8NA%N@MiY0
zBE>FmONyop+_}-<Rgh=X5ZeO=rt;g399k~9<}DlScY304$)o|t75nac)}edKfu$Y&
z-s?S*IyAvd$waMN%o@38$)T&R6wQhrs2wJGaFyh$q`rqPy=n1CeO*pVEtc)D&h`rL
zG9#7@-6^s1o@BUW-uP2NL1`1G$aV3&o0({`ZSL1Cxkh?pFNxm2)vNQ;+lO;K6=mr@
zF4EV|%t@cEeQ8JZ6iX##DXDAarZ-dNW!0LR=ENo**_<<IQc{~dZLJ-{!geuxWJvBy
zUevymk(k=S{rQYlx8E#zD4n|N>)3_YB<`=tU$N=Rj}|4Vcl5T?JIA*g(@IQzORj^Z
zmgf(GW_gfl*uP|VPD<X~3EM9xyQMCEl#?PJCOKyZoyeAq+B>Y5mefYWCp}Gub#+ys
z8A|Ey5WRcUG0^l}dy5{6I*-JB-+WQoy4$`F!e_UPqECrfOT-!$<=a@g9*w3u2lPp9
z|2mj0y<4n*a7^da5-ds*CPPLVoiUiQf($qQwSdO&+C<ywMkviEL>*}Z;@~C1P!PqP
zMrU-F#huPzd=<f+A;M4)$6Z8}VJ+TyK0#9u?L41G?=IVUJ{=gH=QBhU5HBKXEzTMv
zP5iS(_%GO!+o}*GM%f7({V*MO8l4^|hC7`>_amPfBJ^Me?joY}XN<ma(u63-L5Oq&
z=eXct;|LXK@YY++#v*)!cN}qO);o?t7bPhqDCKA(<Y9koa{miSM;a)|_e4>Z`;O!0
z^b=D=6h2B6X7v;|u8MdJZmVS}pqyy6A~Lw6)l#jLr9ie)5gD?T{?alVad#hI^IIs%
zDI{I@XY-?)8;#f8Kr|Y?36~Tc67rLY&H(XhBNP1pNu)|%|GYR!VbW1J4UKAI)ldgc
zil{T15{DjQTz^Uqt>7KcYhdWse3*2G08OgZzl;>(e3j>%;KCyejZTq?>RmKC)lev+
zp*Qf630;Isrt16Je}o}uRf_$o!fY{(xW%Y;AyiY_qPh~*nrP&yLA*{!XOLv#c2A6`
z+;`Qtty(uI(JIi`m{d=Af<BT|M<D1kB`87vsTHY?L_!6j(K97TLI0^0R|O%R_Z#4I
z{}0g^m2)Mf5nY7z!EVj%W^(-9lTQ2PiT=wI&tbbtG8q$}e{nvi;lLG;fX*H3E|Z!W
zNI+HnGITH+oxjrha>A+fKlyM(FO9FVH2N=<rTtPp8gGLH=eyb}8`OayjCjX-k}c?;
z>#>xRbOs}X6ks)8a)d}OoGpn9B2u|z`xGOE9J~Y#3F+L{2#V;F>FR=0V#FPq4AGHb
zBP>BQBRb`gvhogc@J5V$F8Lt>;Zq6mTp5&1OstX<B9Q^tL=vz3J${G)#((aL|G6vv
z=dSplyW+pZT@m7q<Bd&9RZ@(RLpUh}$zh%po}?;CdRW7Gn{&!Dsb!P15^{1U4}dQ<
zp#W$GAWyq$0U%EYCwIM&!nO^dEub9$l9GTFCCEuhM*tI`1n30l4Cn$-26P3Ge^a14
z?mYlK0lfgd0et`}fQNuG;Hcq#8bIQ|{24b8ckB=%1_LwzEPy6J3!n|q0q6qs0Qvv}
zfFZyLFa%%>7z!8$FaeN*$#B33fEi#Uz#KsCh_nQdp66BoYXIrVJ_cX|7z-c|ue1e_
zTc9QYCITh_CIhAb>;O{%(*X7W2f%c|41goR2{02d3*Zcx4R8Ut0<b%cm;-PJz^|Qi
zioFN!^8pJ0o&YbvLck)xV!#r>Qou5RH((S}a>bWS)Z7Jkcg`1hA>h@L5alU1WE&Ba
zq;tLurM@Rg$-BG@^EfA?_d|@g2o-Gv3e4kBfrnP7fE4kMaz(0Df_&T!NUO+(h06xD
zcL(K-aG!?r%V&cFBpn33+9H3le~@{Tm!RK~e>Z`=%)$Mc$a5O<wBYc9<g(ybOITK9
zfllWAlcbeC=AKB;r9VHyWSr@xioe=15dYM1AAmc_A3?9y$e+xcyu|R)Jz8MXULRtb
zp3)&g%@5PauEIMJpIZ+8v}vG#GpE(_#|j><5C6&3Nm)f+3{ZU(dih9B@1^4E^4kRb
zCuODtfTV#S-wps$=obo;2Fc@!R_FG!B?$68KaK*VH<>T@;(u3Nn1&amtRXK_ZjwEg
zypurIh2&#J`A@!+K|I;kngB@oPsWk*pS=Hf{W~duw!oRhgN^mNXy871v>;jgiV2W<
zfWE!!REK{~FlTa3Fz09pRlgzA_@;4z9M%N8=nTQ|s=+EpsWE@9^p@-+$*Tgt7MnZD
zpTfa7y}DgYP(|Dtydd=*^8IcA`Q-rsS&GvDQU+fGkp1Wdfb2`j0J1-20Z2JPek_R_
z`S%;hv`C`?Ife|zog71ra3}j3cH?pS+XURnKIe!#+3(zNCv`7R+?(O<jXPP6G-OWd
zR%98N0B#sTPMDN=Mt1X^?3w!R?shH<nHC-n%MrH%-~(6*SOr)O@CB>^tOcwCtOslW
zYy@lqYzAxrYz6oMwgI*Sb^vw)b^%EG>;dcr_yhI<_5%U{fq(;mgMdST!+;}zqkv<8
z<A4)@lYk(=DF7*F;&49$I14xjI1ji0xCpoexD2=gxC$Wo5CXUkxB<8cxCOWkxC00U
zgaN_<5rDgZdw~0Z2LLj^N4P%*JOM-ko&ur((ST=w=YSYMEP&)U`AzQ6dpzz5fY*RT
zz#G6@KoZ~`AQ_MXcn?Sgqyf?a9{?W#8GuZ{C%|U_*?!1jBO8zdAoC)jA(sRp-b@J%
zgGRPU#+&&_mI&wkiXg<m(cq%EOVi1CG9*LyLwg`G4CR;{ijdFb#l3e&n2aG?1&uQY
zKmb=$X$q*Pe>A3sl>YzAw?E2$psF~Q8^1**Mbu--j}rd+m;NZ_e=IL=P}BI2Km5ex
zhKoy!5d<Hoz~{Wrsh?ACJ-hYf^^>#r&)$7`_t33F0oMaI1aCMMaVq>p`0>!=Ax}dN
z-#(1D_v7wAfA>7)Q_8cXXZPan<rU<CjfF*p+_dX<|BpX>^g>$)As;0?0-0BxSOpHO
zJH5^~$aj9g{Ha@}vgWdeEE+Ow$uI;=mYCqzz|#P~n)5WNN9vWnr@sAGd)sxkW7muY
z{*+Bqww&8?^v==Hm{2f{FE@dL|M7<-sS?r>Za=?$<o1zSJ7-PWFbP!GU7(9!5F5V@
z|F1Pq%Y23T%pEiLT;22G%Ljp2!$JE0${$K(U5mW7K6pL43L3iADl70o+e5qI+~B2v
z4yLz24}HmXw<~(ll_yuiV#6RO-(|cLkVXH``1AhL`-kxlw_n^oal=GNArO+1Q9Oz^
zFo6CBhM*HdFm5`#X~(4<7>?po<EcJVR!%AwxC)92s6eg1|3CQi<?9y=@EE^6_Ip_R
zST>Lel|MIGYGUDIvHIldeIfhMJ)jdHN6@~c^cU5xR&G>A_+RG_8ZHKVv}O$9!tE;H
zlFob`{4PGU7@U8Z@)FdA(p{Ox4T<?5<quTa{K9<5`!T*_MlK&&xy3gyX6WLf5Mmfo
zo+my3nEkOK9H{x*|2h6(w)nO1>xG9G-1fK)UpBmfe5mj_G-$KsX6TI(FCt#2zXoX=
zIQ^`dIe7cO#UBj+AyFZV4lV*+wLG*cP`4qENX;wIYk$c8__TPCjj|lnO5KJd{IBo_
z!#|oeh5|Ehvxe}Y!nZ~XjSLqWV%`FS!TZne8&2=Krtt6Q5Bdy-=V@D}>CPu-ltTP(
zx5+N>Mj#YqC>ixO(A1S774ZMf{DFNeF+Fk8Msm6jBa09@W3j>lWB=2{rxmEx_>cc)
z{si9(p1g6g5ZOW{1(omg-P50PKQ%r#D(Cp`<WG85I%FCwTEb<H=`vHF<34wu->FQe
zKNa(D;}1+EXYQR@er!2rAVOpg^Z@ANurg<T&H7WUs50Mw6@M`0z_37>@rB472S0}!
z(Kix5BvwhGKO6Zk;SahE7QJ9SgSIO~&QRS3DO2lkf0h+h=Ke3?Pu%-B$L)?n<P4I+
zloJ-s7s)TGB+OqD`ETG4R!ipWog+l%KpBVW2dV&UbbkpSsw>9d%^!$0v~P$t;m$pw
zL1VxXd=aKP;x$72-_0Ma*~3gM#GZqskYLQam_{J2P_p=o`GbW{tPBg0Ip~Bi17Rp@
zH0x%=S@gH^2a9U(e-Wb928(kG0v3Qd4X0USrttUiC-+<Kxd-QjZX4KnX{X>`8I8$-
zn)CXb_(QFAoeV!|<7*>Cu?FXWjb}E33_SOYno06kz5Sc`gPwEw@ntOF2vMxTjSWsT
zb#giTk3UsWAUi*M^V!Wp_Z7g3-QPdSsfr#y<Nl8R18+er9ShfX1DDM;L2K&aQd<MH
z8voVb!Jo*)NGyp7am+zdShu5m1sb2ILd@|m;131|jNig#4!mrzE?r^ghY-nD*Q7Ax
zqD-*VI(bfh4wNCR%xC6iVj&Q|a~U}qXiXS_k#hd`f2>Y_nm;HtTrY&XWPqiiZ5OsR
z+;_9COsEncR;2GG-%-b9N0!0Y8`>$BNVcBa3NL)vt>E+xyD#)r%qI}QW(ThWUI%X;
zJQjK^D=!ON{nPw`zqrsP8|wE5SEs2?3v~zV!u}s{27G{Ypf*I10X{z#eoYl&c;~}0
z9InDxgM{JnPxA+MFyWflU~<43=pQtEV)+%jx3F((>-nwNvml5G1Y0NIRSya8f6X7?
zLe@d_QSRFa{JH*<mX+oi=qcR&9N19>u~4O)`Q4EiG%%22s|u#WwT`9GEiuh=_jeD9
z2*Tbw43!v>P(o^k&R^6&#2@tB6X7R>%N!U}quxaESFX{*Sa^pV!#a7boB;yFm&<M!
z2zK~~QR+g4Evx*+{uBIxguWhi9fP6}U2sQukAU9|wR4xhe!n{m&S0znz0oCVWe)Z`
zK<L5rE4V%5Pw)pK2s=7!t&QLa7;&NY{BBlMNFQwh(g{AM@XD&Ss2E|;yA~c?SXVEU
zM&}RI-kZ@kg|)AfB8>HFYlw>q^!u%k7{4z*x+tJE%D~HD#jzFeM$IiCr#E%F8l68_
zSf)I3Yi)A^B49iQ!yC;%8Y3qRdV8<#70}3z4hD4&4wZFc3lF(*`SZQ_yXziT;i?62
z^Jui$4rVpjeZS=J5<%JycI-inKYsoA+xKrgde=43xcq@4DTuTdr1lgJRz<Pj6K%S#
z^{xj#rd61wP}{s~Eg_UicpwX|2UJ&{M&u8u2)|rv&t|Rl6A%HtF*7H#y2=SL9`X~r
zB?T-M>WH2DLJ_%*$e-x9(E>I;LC64W2-+wN-;Ln<i3tG~4q+S<q+pnMVssMLS}h-c
ze(U4`od-rio()Qniq?z+*IY~qh1f%CND9g!EHyQk2XE12uz4TzZp!#pLxO_8;_?UP
z2^^z9Ss4WXT5wDppfY~__*$zdAOa?X6V^}otsAGQs=?rb84FIb;5TGeS4iN%z$7?L
z1i|F;2Ya5O2L3+By<L}gp~Y8Mv%1EkAL1YzLF(5)92g0)E+9zpps8R3EY@=xm}7;{
zx%|Nz1$Mz=a#G>FP#&@P1mP`+1w;@^0B7{-(T(8A1~G*hzkmu2ETh<?EEIC_C&J}V
zY;r6#U%0yPzZ6y&Hh<&A#sbp5Ry0hX(A8_ODGH_7Xj2eYI83M3@<6P?{#Nf9Xw9YN
z@CTX!EWeOHaDNrz*hb}yB@w6XPJ+nqS}8#xKtX~kSaY=+{uT<GAS(qZ5{`z$DI&sB
z*eaBq%O7YR=*Z|oLf_zrnE;lc1f+efXecCHrYclI=#MZ+2x!4Yd9Vi`b`hbMfl81o
z-*Ds>nmAVOg{vY!3So6uKoMRmbAVvH$QWm<{3c>h$wFttQl=o14dsEPZMc!3hU#$m
z1NP6@HiKG?fw`mx^t!%!@almO4LTTkAnBpX)U_COn!`es6=bg-nltRz)Uj1{Esx;%
z9R9#P&~Y2Ndk{(@&N&tQ>zXlf*p~NEZ+>?OL3&6HIFOUD>erlU<+oVT2#pOD+$jMq
zR6v&%98LPW)f5hY(4#5i1=<A8;H+H5`o%!!5U`>(@PzjY-5c{n%0sM9<w?#=#?*m2
zZmQM~(RqL@h(JbTfi1h%1RIFJ;SWwp;q8Q)y=%5mtO(#aj*`OC6pz3S3}8U0U)zBQ
z!iGk;#t1?x984z2+94Wp<E+?n_=5!}9)HkugfakQOv5QDLKJS`53Her(6|B)ID@_i
z!C0$-5ds-LHK2X1O$qfv>#LB_?|9_!=go&V{HJo_5KXlH2IhwO9eg2bt*GD#Fu0+d
z^(YnWvd9H0S*_o~)P|l`D}R6hcTc$EHk?Ye7Ky_jY%Js7uLg~{;m)zI-oFxXekTZv
zU>kzLtsa6G<G0@hKV$)MRO^BaCV_C=uC+YqJdm`%!<ti>T^#;kiHm<_2JRO1phShV
zF)bCMK@^H5RP}ny(IL}dngz*Wva8uN0#hhDydW-LFkt*9Yfc3k;*rB2EIWe$ymo^*
zU;}q%fRLC~3vuv4v#y`Agrzl{LyhhSlXuN39Ciw!Ve*JjLjbd*##yxG@CUR!aN_{~
z-Y8TBLwjXj3LXQ613L(6sA64T!A-k<+u-1v0S6NB2YOEpQ#&jlg8u^A3}Dp83D<&C
zqam1_{zDme_-TfNX&RC$OddRikU!aahq3js-sQm@nHusDs6mAT5d<k7SPjg27pATs
za`=ONDHVza>NdpD980l6+|q--jcqeEkhX?OL(Ru7M`~2TnLBSkzO51&HX|I*E6Csj
zLcz3MWg@>L5`SH)yd0Y$D)0x=;A-U6dS?iMDMaM}x(l`Iq8{ae^rp7oP!)tnZk35Z
zc;bA%S~Y7V0<SiBf;NI?O_h_wA53^E@CT1*PxUJW)Y!GB)(Y4bE9YAw1~kK*1U8x~
z=~`<fdL70eUYcNal}W*DWVhLlhgL%X+-}T0#~k^F4QG{01iN$n4&1=tBgC00_yYph
z!)8sf4*bE`#j71g4+x9O=4{NS`Df@n{0adS278u-{zn#SXk{G!KwGO&5b6<Ihidq=
zx>w*TzcyH9%5{oth#wWq*03n@X9x3V<&uLx0`A^{wqE)3-xtH>PnF^b_TqYIwJ_!j
zVq)Z{Sq)*Z8oM~_F*BuT2Kxa7HGle}R*tHCW+M7LW_|o<)rDb=pmv!4KA!NW%o%^+
zxmu;qI=XXR+b$*&P(S%+yVX@xz<6vEXy7^FaJ}QVULjvNxK|KyutxD)P--X}oT&Ke
z_q)TK{)35ibri({PMtgwV7S|TWp@qrtLrN$2MwGIqVH9hjA7NI!cIsy90<5n1smP(
z<_UlL9R9#CRo$MPny20TDN$icTgNb5S3XpS4^^Y#<1wb&kOll%;P?Ul2_BR>LH6@t
zO%6voR<8B$i{bDG8Zp*A_>0dU#@Vcbi+@VFu2Nd^rzv0<M1?+!HO&SR0E<5rii8#f
zNyR&<16@=Q4{KNyh3lVDYrQ!9!5|91i|S~G!Cr7h8x@_mZ(emt)ioYe#FmtXFLpp>
zshl;;jF|XQ6oL$|PJ-}0L}6eAho)C6QH6-W;SUIa4U)WqR0yD4f-fv%RYX8RULlw2
z9)%+BG5l9&&w%9!eI6|o6PxPFz>CKkRQ=}c_2w9dKlmDhdX*|RRWx{y2xw7<D}#W$
zW_gvaAwaEZ3oc!&BLg(z>Q2zcV$O*$a>%c4638na);Q|7fLmRu1c~SJ2L}?Mzw^pc
zApq71=u3o+&4LK>3h7t(h%sAO4rWl&t8-(8Z#b0;za^+bks#z@v=W4(!o}h82OA@B
z#6yKbRd~b^tF=zeFww&Vu)>E8c@&nbH4Hs9>=bd{<&1#^qY&00Dwh^&3XI^5-+91l
zE`JcLq4-phA;N2=7W4zSqE@bA{bDd@tT0h&NbAHl{2Gd3v&IG|ZX<o{PMq#H9nu6I
zDQL3@;|~rtvRc5aCYL`L_W13H)zt$MfcI&Y0oa33t?E9nYdrK>VaYd?789Nt{@xZk
z38t~o^w85VT}5w!#{<LxbPL2(S=mO2<njku;T)M7h9HWxFlu9`Pz~k6R2O@y>&l1f
z@ZkX@#C=$3gVdkitS&pmV~oO3%rloavbI*4uzdV^obb3-j}A04Y`mz!ml+Ewf=t9~
zpb-Bn7-9tU`>b5EDr2CeVY<MdMddIwIyg@>+=Hpg0@O8<k3XP9<-%4OgA<sl%LjiX
zR1g=kDwC}o30h*lF2qI*g8|kTDrZz72JO`Qh<DBYKGjh`xbb}afsp`XWQCGe`G{%s
zv!rKLk_{@55cO*qWrV&X8cxFF){d*PUKJv-lnr<6n!V<P%Z<vZ@$m<9Xv~i*l(EW3
zNI9$q<IjRsP7e)Ki2OnS!P-Z|=coMTL^W|zTm^Gnb=AaN0V)v`KPU?Pi8NZ6k3Yy0
zZi%(df_PQI$xM~Elh<s@<9#b&0HPA=h;aEskrq3l1uO&5;I{~$H~iI(#-9TH${!4h
zIDJvTf}?R`9If1vaEK5(n1G4YjD`i=>O7(<=Ub;3$YD%uYR<jFTQnB<_`np2<=0y0
z>2)eh4amRp2ZmA<p+dQ8c*Hnb*$oTE{2D$H{1x~Qt9lK(Vhz<2<Q4SQdhGhg7F|rh
zv8;Ui`E9Hk!M2Lshg5c0I~FA0I^q1v9}M|$f~~<&TA8|-;#V*#V5$w53{bZ+a-Cw}
z5CD-<r`psN`O@P{Py*^yDhe6qI8+>(IM&VJ-3bRMv{TRl$_FL$DW*Z2r8fN4Tgmv9
zKd2uT2<lp1oSIPKggguy4RjHKgoHy)16Q_dWf!~<V9lv(eR=piF^*1!FnS}#WbEXH
zM+%sRMvA}Kg<9Zf5$r*NWxv+)R7R-89~eOdJV=XIOaw4n;GfVzC^hilap+e#b)<56
zg&qR|CCH43zp`}-^Mnx?Rgbd^D)9#dz;Rl&8WJj$5r!eGAn}L?Nep{_Lkw~77-%$;
zBuso297rnEPFRm{dZ??OUKM}fj{(K09)*Hkfq#sIeGxO+x~2m)Y3bpmb*%@lY1A(O
zD<4dA!d>~Tvf_elv*fQrRs6ww$d)RTuQ?Jcr!X$^ClBk4fSaC>G9|);?*%t9bEpC%
zQ)r$T@@uYR1K+}cUMG#T8vbCjUv&%iH5U*TO*9dn%89CDQDyGFxiwhEsZkb#9>!EC
zRQx@VpVf^M#&Q!%TXP*7@)l|nmM{dbOEvt#{Hxx@gkFp(D!+p!3;<7FKfww)xC9x3
zRRgS3K;%R1!O>P2rtl|ml0GKY<Ln8+D=Ii9CV_CW{(U1-o%Eh+_=DQO5s#;P)T70~
zFAANo0#&eY3jz=hw>T9Vwj`*W_=S60Jq}i{kg{+eVO@YV9}aT$sCccP)X8PKdj4SN
zW<xv);CKo*XMRD)BjN9`r|}XOVgQpm7_bENo3E8E6awTwCar=OvU>g?4NTt!+%j8T
z=^)eaSJnhC&R>WL!HXUGa09Qdj&+KMlSh^7GSyYQM*cw4sKMn(kaD59z(KcxyY;Ip
zdt=69GKSqyn808gS3|@~U8kru@&^Q{w<5>SJ)8j9$ZpF*XC2k(vATs-FPyvsdkL(h
zltZ21mPS~7>MGl7;}0r|F4Pc3fnpSNHu#^^N%RVx#zIUG-n2NZ2OCjgHNkNe*k42)
zX2WxV<X`^-^{{oke#ch}z#sTj@aM+gG3pdX8L`SmZLY183>G3?e@9Z7i@;I>tr_MM
z{7nqFsX;NqwiuYUVRM6c$Dc-q7~<c~B6u+b;132!A?_zdkzpaIUttBW)*r#d+A;El
z2OzbY0J=dQQp*kXZjS=+2YEKc2w!C%gO42i{u;jV>W}cDF*6m6KWGP-Z`ReQT_tCz
zNX(9~00G||_yN^p3vy#p=+EXQ7=KVkD42Cx`mTXFyjL(rVL=PVoxjAg^JiI6W$ps=
z2VdiaC(LJf)D>0$eF-X}5dC<otmwZqvM&6AS2C1Dq3Cjzd5gti?BRnVM2)ilQgRBt
z*mdC#GRGnb6tK$F6;=%T64X*m0Qt?|La+3{D8V}N2Q`Dyxqdz`b>bn`f}o%NiwOCf
ziduL6K$XV|T%Cwr4`j@^(2<UX9)pcm@ZICTiAaAi*}C%wg~ifC4g2xy!Hw!Z!2%w1
zJaktq_)#0Rurl)psnz&d*NZ<WCf0!kcPyxm{B?@QfsFXeGGG+U4?L&eKe)54ad=f<
z{=iEBE1?aswAYC_{K)X&hv);ZAZ9VWh1SnI?YQ1%l*S=;J#wipf2geBCo06h%E-@z
zTEmpX34SMTm<U%1xNKr43U>FSYf)aOyfyPb>u^#Jp74LtF#aGVG+!ZFPitjMbqJIb
z5VjuS913ifhX)-j|5(uoe-RE(0=Udj?yZy`GJYxj9RYN?zj=kX!TbS>r~~w?qg><1
z^H!_i>WJAilnlsWbTfD$!YviD5r-V$Kf+jTh8Ylj4=&P>mVco}FAV-bs=!UE@%d1v
z94oAHR`AE8y!qjr2>qk->5BXUr;)?L;17z7jb%c&p4N%{LP4g4B)T8^68z>HnH5!L
zCnWwLZERM;TA@(r^v4r{@9g=9=c^=GBS#94KPWg>awsR!KThC=7XbbQnB)C%g<Yup
z0gK=`(Lk51hLcuUDPX77A77XfHh;h({K*51vO+usPFVD=M>@hiy`&zp@i*`XrGWbf
zoLL&d%v}$X*Xa}Z?*Cbf-|yiM)ljfO`nPT!tP`c{hYYP8P7-x>Dy&C8sqT~C$sgqT
zG5aI7#x}AgwSKIq?kh}k|KPm!H}eN9f?);Dy@LGpiRviy$K&zma{iPN@AvbE>baPd
zLur7i<&P7)9tFVRmVe4CqOtfxaS0nd;VWOkwo(s*HS#BzG5o0^sB!rN4<JnXFo$hq
z0yi)_crEcxRHPbOqy086f2e9fV}-+TLrzC%AieAKIV|AVpVep#sgTj1;15*<7=y6E
zQ@Fba>qL0LkxxaOszA0zd;D|!K^3tuf#bTcqV~H_9T1!ql`*mUh(*3XWr+Ku`~i#L
z;DNOX93u&Tg1>W`gef+*S~OaRsgTj1<`1tp@bSPj32U0a@8E&TeWTVGtOeohus^sK
z^w;o*ViXK_aKXkFG@Nfrt!dUu!rzL3?G;rXv&w5$zdP`k@rSA|9B`n9<B#*;2ucC}
zEZpzl5?1N(xAd_0>31`shV=hR{!rz`?mGByVQ)U%<>5gE*Lg6Zf*Zl_U<;Kd4t~HX
zFIAqeQ3E-J{^~F04}V=@Ucq14gu4xT6gE&ag6P9h(=hJxm*J0u|0Vq4(FWUX;fRgt
zE!?CiO#(+P3AYzf`^?dM|CCP6t1JTlHvUj$$Ch^ZiGo*9Ch!N!p!MMlR7wCgWRooR
zh{1@9gQ5POa~l4g{NZn52xAEY=cZseFz`ko=26t)9#~+9_C;;Tqz+xD?6PqDz;P0=
z+Mu7H<Ke7-s37p)!#oG47yKzZb%h%79{(r!L)C^yT5M&8(uG|^I0F?L#^uMCVK>L*
z3V;6#0X*WEv-@%P@s|g&xhUdA1Z<zsLU7nn!~c*ckFLTB{15S`N|IFAfI^+Pz#CZp
z{#}#=!61ZjF$i;FDlwBVAzX;*glnCXR3PXyaeO5SAPFr<0%XZWej*wo|B-|>F@*DL
zCCKN$;2?iazFa2%^0JzTV8nMGK)qB$-gcmXGvQDTcFoaEkUtG5WSs=9|102zs!{2R
z5>|u<F&qEv2zSDZ#|L*#%sj#gJaM5=tNiT_`qS}71|VquB<-(}g~m15z`}}C0rG*Y
zgdboXA;E24G?&2!CT5H;<ZD8n7=~XOs{Hd#z7vt<ydx9!<lyFWo+UWH_~GD4ah{MT
z`P5CG^CZQ~m(KaFfD=26=sSHn-Z<k|?B`ch%)vc-c`@pELnCbQ%f%u2NhA9F6T?Zf
z2+suJR-H6sWRS19ZRgi}L*8-fOi_TWE9y<xqu?h!nj#kQG>SUSIZq@7DX!3nri3D)
zM6@Pa5DFY<iWu@=6GE=Szb1&22Q($x5FPPNJE9fQoM^_umB+6f-YVdId!iGeOfd1j
z4btvH^d!3Dw=@1J6RJc%JS*dwjOzsGO7!6T>xuYoL@&^_H$uJe+m#b0pSl9bxL)|}
z0jzF_QAP=v0P>eCO-JP07J0V+`L83VUY&qTVv;47Lm3q~rKD;>#wc*gOof`EE-i?b
zs8dVOgG{dtO4%8;{EtQ?ok(i^N23O`qpNHJe`Zm%h+WQR7ss)`vv0Fo;ykI0{C7`d
zFJHX1^Wx?B`zOvte2*{qnuxcd>^3<uj{_Hb&lqWEz#75QWto_34`+?Da+-O#^bHX1
zu_a61W<J2wN{6MJ&0-jD41J%3_y=sU%$IxJZCR!tS&ZQei^`J``Is$QdT-fu2mKTl
zZO=zCCW<Xy6dNBhSBItbjz!no^f?8Q&)6b)QTwJ_C9vp5+w<QeCWbAN^#HcuI2O(B
zIT`VS%}Bqs+BTL&*E(33iilTik+L@z7F$1K(Pq9PBjVYNFGuE>MX~6H;pJ(FNMO_R
z*BL)y5vR!4iEMh--U*LcH0@pF<6AcUdz9}37Hz|K5*Lpbr|RO-r;L1j$ELs7IP@Ni
zwx*PPOkvY=ZdpdKXa|0fkMG&^k6W$rXqH4KmCB|)o*9mU1(cDG>B#7;Nf?VZA&V^d
z2V}HyWGIWcOV;!wo0jQwhedPDC7&`-LSNlb7TqMOoP5q?(~>>#*692@Jbhx*-nfOa
zL^N4i{)J@3XEyDNQzVPfDq|74Wh@bWmf6M^Z#gdrzZh0CEf&j6d+4Z%i&ndPd#_$L
z%WIW?63NpnHtmsN9ILq|YwR57rMu6B-wn+{>Ys|)pUU6I1K|ss7CZhmtBEd4cj8>H
zD_`E`v2)q%A5ZZrhfV)+eN-Y#a)kS0|7VZV+3fQBoM>8<^;?$su*DmL-(oo|3~{+^
z+BcVEme^2zlZ`LgSvL`t$EKD0r?5l}-H)Anca4fjG(lrnpL7{dU)i(|4yi1Lj(bS)
zB|PVYRvWa_(Wq8DD80ampgl79z@qE;#GS?CH#RN94b4m6ZcFYNJQsj|%XKqZB094I
zp5+H~Vu-yTS#;M|MW^so$fhM3X0qrG!C5!hlBMkYY<5z9CcC_tdUsm;GfQOn!W4G-
zZMJO5gQI5;Z(ic+j-&6=vPvinAFV7f=gj*%Z0XFzl--WzCafVWmUcOdp*4I%Oev7Q
zvuSBYSuEPrTj6ZUa(4dn5bqg7SX$p$wAuKxJ>S_yY+8ZO7Z%;XBR-5Rl5u>J<)~~H
z5%craIlV6|n(zB?Ha%(Am`^O)vhp%~Qw%}^i>|Zeb18c7V>bQMHscHy&EWmdx1n0u
zEZXw4A8d*E>j{tJ6XU<;#-P>RU6;-x4v{z|Y+A|O92VVpV{tiKw(N<ou7!!I?NFx)
zTat2Lvgsw8Y|~i8(Vv)UM!6`T|L1Zx{o!2QVwR{TYs&gdKjPW6sJW>untmvSM;y&%
z(MDb`W7BR~e`7H;je|d+Pkp#(_MSzXTtMQKvS~&3Ksx)QoK1T$I*&y+TlxV#D{hfR
z3XAY3>kO1I-LEW~?r!Av<LLy{V|B(mHtnTtGK)6p1Bvp3P0N~+$D(=XAeDkyAdvRa
zWHzmEW-3brE!=@a_8)8_6*$vAp*XSnps%Jw-g`E!cyBgKPLstNs%dQJ=(T?K0*6&w
z6G>i{vFYU@TKO!RRWyPbv%y!I@i}~P$t0I0uWx1MzW(6V=*Ud;vG=*`Y_fqM<q|i1
zp?ejXUHpXp?NX42u5O&ik{mkY(Cy?x{C%b$xfEuO1vsv?4b|JI2|n7tO-C)Je`Sf7
zxgB{?l1U-Oj{uTgCMsC!f>vo3TlRrX?8s*^tQX=>r~wBRF5Odr%Gf<eO8H}fq;;hX
zQlj*Zb|D18D4&}jNC5=AcQ(Kq{j3~#S-_)d2SBt$jzgr$g=|vpl(UJu-&n+1G^Y1v
zWJ0&fAzt!l7P9EN-mghfj8q=$en)Qe3xJesgH#OeX0U0ewGe5xEr%32z&QgPnrSQ=
za<(f_OyZDC`J(SE(IMBrLmH5Bi;bAgg)G7cy&-=BkaS-HDQj{uOH$J|wCvNH2OnN>
zWFrc-45=AK12Jy~5Urvz*~HBvmXysy_TK5b6Glv5ltI=IDQ1oU=FSpeei)U(BBCJ<
z%a#?h7|t14-lZt@nm6eb;&rrHx|VM#dixiW6gDq``gBMM#K=pwPcd5X+Mk%aweU10
zvw%%Y90`)>MV3J{mdpXB*$MV(WM{@<1D##60*G2iAa7DFkoO5l-d9FIJ6TxjS%{&m
z{3EiavrApb)ZYOuZyrhF<t15cBD9nxs=E)H5hj6*TB9>4)IxWl&MEuGrWdZ&Mq|?S
zz=<BTi`r!@F|Bo2$;umxbaii0$k~%hSTvmwh{N)&TBwn05pY*)mZ6Jefg{N_z#S4w
z;l4Hiu0>WpDzY0gVoV-{d6_Lx4WiJ3KUox@_#DjgE83+jn&zRe=y=-=NIE?QYJxdX
zmlOl_l@(CeQHh?`0;+vJ#CNDZDrR`EEC)@~3#g-Bp!t3<E@098N-{tM8vAq!i#QJ1
z|IQGUI+Tq*I~(KEOf<|42c)=(Op(Suhy+dF0qp}C5na>gI}$A0Tn-9tEk=qNmS~rn
zo<*D_%l84<t2~#al@>{>G07yhPdVC4GSbbpL-rmi6z<j^Ak|f5d%y?@TfM|*v@(x!
z77<i}(ZNj<>6$!6(<ckD9=Ntyz>Ob9*6L(gE?e~b8ZFlFx4`}GrG?^NCR3%ew}aTk
zYS8C{Eo!wnn=Rt4$?`5MW)s_yx7KzJR@nhV6iN3q(DJu|_OtSH*&^S3v~)s>LE}ey
zz+9L|=1gbbHvpz_{1-O8ED!@0&Fm3SOEzigzDB=Fu?D7NCWV=41x)K4F#H->A%h2H
zdC+uru|{VXvFT~9T423dI)(bq9H<^>bF^0`K-Jol1JqJKmRBJvd%}$D=|@sOaq@p-
z3DkY%K+SMPNhiDkaksMk3)%F<F`C~Y&CTP>KLb;Yoo~xx=|p@6Jx-Ga)r-t!Gwy0#
zEJH1d+(Av6ZU~vA7&{S&vvYu09zwPzy(38S<(RwZTo?3#rs+kZiL%S5ur!ZA8bn!;
zMYPY&W7CsozQ)M?b*2v4j31HNin2dDvJ65pk%u>#>yV2;D+w(?&$@*cO!F<x;$VHB
zp~bod5%s_niD|oh&tntCX!&0q$<{OSC5gmlGq!6EjUk1mhYpf5j)1yW?oTpf!-p@N
zRLV~1m}Ws-UK@h<I*U`#P3A*z>I8nz{=fFV11ySWS#)-n3<`odASjqcz>KIMsDL7%
zm{3tf6bzuul5<7`BnQbz5EL*H1d(h)G6-TIg9@_b%)aW~#dOsFKj)r%?tSmsezh~x
zU0q#WU0q#WJ&g47B3Vs1BO|u!Yyt$uVnBEx4+tkqVH%(oh~)~tVBn*7ATC@-pn<kf
zDa3+qGXr7ZY&!UXZ70y|-CqU%<7d+?z=1;}S}%Y=w`&=!CH^qNgsp+Fx;0q={cSEE
zy6D9{)tyjWa|DU(Xlp%{G+uiO$$nEPLI5iY)|5Evi9{tE3Cm|TSP#-Bl^dUXp!gk?
zP`vL0JgXHBLCeDrP5^DiYhZg&8FAER3uu7e2ehUp_d>T*`}?5eEtOE9&<0FA8m*%e
z``o}95Y?`?^wWxn1A3dGlHEsej6XlK=#wDH8$RzHgt9kOLb^Islh5dXPbH1^Ttn-U
zhHEogLEk{*8PZTsH5<Huj(dBc-ZtBp6y!J6!untcMO#hYP)TF)8Vb+>X)V)Q<N?%D
zNy85hg6N35ACE!t>qK2pd(sxYq?U0gehq!Nf!I+ig4@@TU}cz;b+gC%3Dl7x<n=ch
zqtej!*HltZi-SB=l~mM^XNoQ8q>himK7mkn4mds(-B&|pY0q=@)H?)IfPK5PTTou*
zcn5X-6$n(hRe})lv4+YyO#MvFk2HXdki=H7Dx1b7ST=1wrkq$Y`ie>%ij)INJH3Z1
zsT_R+kycmYJUrD6_OWXpRMI|S5)sorS_LM=4LnlCg5e4(+vpJZq@CjpA6PzCwpCN8
zJ>%3$Shi7P>eVlxZ{VDL3IRh(lyt5ygy#y7_tia6Y~F*s@p3AO@<0)^lDO5krHGy}
zPK`U*1_R<o9V>yHQYw*hTM26Ty+@D5RASO0RAHM@RVh3dQ3+4Mq>;92R*ja!^Gh)C
z=K%X$8U2YgR$;Ie+CPxqR|&;0z^-2c^i8|$deG+aIh9bQ4c(D+tawFxB#o6C0KX*J
zi={&~kn<Eq#6u1+w9;!|!}Aju-9($6G>qu>H;|K0B{p9N28jxGkKe*`E|rjQ9DMu(
zw?MnlBhy%|y2K{nLD}Oa@>8;@q=xI7TU#ZVG{Op6`jLC^m`ZANF;{GpV3L(N8`*%C
z_eWHwhBPw?$u<dQNt2Lj>L{|28DM0)?_S*1D#0SB=#u-I3KnpH`jE;r+LL@>Pm2W8
z&T}56t;i~*P?=hiT;#U_<`xO_>y^|&G}9hXnK~M;8>qBMu*oYs20wzubr{WvyHu8j
zr#{C{No;GAm?SNA&c)rgpt=QIMrt3@&?G9`r^eJP4%_!hfF`nSlTy?3NX~xr9+lms
zvJci|Mx9d!jgtNdF0Inpz!u~^-=GSN_diQ=2z7BXJSnkVPC{N{o5Uu02{{SrQ)-8{
zpYVvzsz);?nmT8Q3M<j4#z!xb@*+cBZ|20NT~8_~tuM*%8tq3DFNDfE3d{_SQisQ=
z*a*Nl+Nm%?0mEQGs3VL}0Q}dYoda#Pb<dxb+<*4Gu`1_D#c<PLKiW1zD4^$kO?qUM
zw~f0AZjBq^mbL~~_+<wl-^@|^NV1Q%QeNf6c^Kk`pK+3TV%aA~D1cI*66Atgwc;eJ
zh~bG)z-U#JmzQxpPDuI82n7t+H5COL;^g-@(I}}4xsnhH=zEjq<xqnYP45jbLIGW`
zlCBz8;RN^hj8H&(Nt{bLPBh3EL_2O23TSy6=~#jjd>c>(gaW!VuUQuXjf#m-K>sbX
z7dV!SiecN*opR+lPB3_Y9>F#Zzlnc>6B34zZo%U-4<mStrBwxsSC?p>j}zi)dw(#f
zJtcOzI3axuA%p4veA^KoZCVj22nE#m=HNu~!*TQoOF&nFMK(^j(#;433?<rR;aDZ=
zDJ(#pv5#?rcQ1N^^{PMKC<`ZAzL^LGd<cP3)2C=sfJ567n2j@$af8%BlmQNDw@)FC
zk;ib%XbfjE#;p_U&}{ld#qO5jd<HmfV_<IY8W9&19UT|t7j`4H6^$u405zsn_*63P
ze9ixQa(+c+c@J#d!6Z}0KQclAbyr^FlZ|jA*Wj=h-K~AF%chPY;{&09u_F6goZUJo
zGWA^ze2{J;6!6CJEzW8YnV1hRmP~{K1_J7E7IR~Z#CmFX2GmBOfYf@N$uubINgE>+
z&};$9kkHBq1$1~d;v~bMq7g<YU^u~`8I&sK)hHtrP-D`96Afb<7@>g9Ku|AZ_uIXU
zP{2Tp;Rl?_(C^{9{sd^SkBX(V;>5s)VMZvR)${{S^vdsoP{1g)zlYj7K=~31$TRqa
zGg(D^q=f=TUp+3!Ou8Nr<Q0<E-o*$7#2U22;N*XTP(WwP$7CN{OWX{{4aRYjfmOnL
zG%>;HYBz1i2_7Z1P{6?Zq9|`OoZO2O{9)Olg#rd+J8+^&NE3ttI<s8u>_6k!dq&X{
zqYluqj}QuIec<#FCq#`SqW~MT0l*>}UhjfXz&L~gD0j`;aDvGvMroPBXPf}*43(|1
zsOfc6b5nmGgaW!NZ#CoCBZLE?fYIPioM@If0-=EM*YQTSmR2t2K38tH_QGm2lH}5a
zV~-h_?WPpqFSQFc=heYRLpU=TcTade2219f;6|KaTu#Ts9#cT$(f*>uu@@(i&GS28
zPIWx9Zomm{g9rz_^kGjxDj0+P$}7h%oM>~s17=o3gl#>JrJ_CqO1WV-PB2P_*2ZeD
zKtJMO&q=6vsly4b9S8+B23_u5APZP034?whAcM!?wha0<;!L37UNo`8?)($rcu;_y
zI%AM8*{csW_9H2uac(k>o0HAmy~7gxL%nX?Zk`AQyfo;+2@Y?^Ag<?6h9NV10yUmn
zP;ee&2kW4OjKa6I6wugDz0@8?C}1QIY8VzmW6wT969I$BKQr&b+0DHlm41N5f(n}n
zTF{`!4n~}O7rK{7hH><41y8Zts~cys3CygctxCXXlQkf@Q=o&R0icyOb>k2UxZi`5
z93!5zFhT*NDSgn=Rp=yPz!{LpFUG-2jFuYogCVewE$%=D2n5sS40w+3P$-}q@CXJE
z!L-y~hD?j6v|uXui<P}NRshQM$p#TBL7{*F-+s`msAfhepvG_jN<s$#sn-dpm{fwF
zokxaD>$^S3<UmXLMgus(st&d+J%NB?*?>X;5d%20S<&z}p@5`*9E*k7(0>Jx4C?`@
z%WVi}C%cr7QCePgG)#m7qJWy|TR`md21JK95DF+B#5tU+sVQDYSFF7vzzIg)GJ#?Z
znD<8kv%|g($KIk)K-3UU^6%`99s#c7TNoSsBG6f)LHsC$0%)Rest43svtckJ_0-rQ
z(BPX4%wz+2a_@xQN;49PQ7zgVja~yx>uhQsG-pE_2H4}r03taPb|Rl_q3s;7ybY#+
zmNPgS)(=Y=BNQ+ifT*_tT3;{{aSZHOu<{X{*(i-l?RG=5b?l^Xt_Onv_1ZXu0tRmy
zAY}^ahqj*?jNvTgThQM=XP|3XLPzd#8-|CMC=_sq3{na}+r2n2`vg~*rGyVofNNGp
z$89zST-$Eg5RD{*jd1FNjp?`xpqjh^m80190sAz}@fQXo(5Xid3K+X*3{;(J0kz2%
zP_KixKxl9P)LV3-c?i|BAIx_-U=mHM#$hi$8V0ELb)dc-W_>u}?kH_9PR$#}u`Jks
zx0!;Z9>G3)&>z+(Ur@|WFQAx&C=#d{K+viU&^nOnlVgX`=00g0Ztsi$#ZEiWOL7=J
zx-gyw$YCfHz>t;G2ZS9v4*K!|==NTP=0iTxLjiY2(G-Pd(~+fjs7IlI@sM#?^<jJ8
zA4mqe7PX8}Kmy>pbOCOo1?p7}3Iz<s8-U9KxWi!v!0vN;DBvDiW8*+R9WKzTBnSmW
zlksR23b+Stlkd^6#?wuKC8In*>%R-K_v?rK{Xi_)@Fj!-#%hcJGop{aYp*f}OtU5k
z1&pV|f<>^Y0o2hXvQab4tB;O=>C;Ka>~sK3#~v8)LewGSSK}xY@Bnx0flxqu0N4S7
zbvqrk%@$BYK<5YzmPn{65W8U-y^Dtrg2Z!d&`i(#L=OeD*a2!9QuodP;Pgrh2=_Lg
z3ZZ}&Cz$RevTYM16wvR2<AxQm!yn2+j2eMWBvl$b8-q~5a1cn7U|2*C1vCSqe-8=;
z6qz8zOdwhBR0)&osWG6D!x^CfcbuFF*5HjTuxQ}f3w!(zzReH{==U{5YFtAP1$24i
z#xEfhFdU6qHG2kVBjtlIvr0gN!40E_0*1T|@DealudEQUfMEy)jDY6%`ylPHsb_=&
z?vc&kBcmBYBUOPy0jX#(5;~C6&rBW5F|_JNkyA5h$}kdk`jk*GoQCN`j8MQEQ;!}9
z1$6tM$!Gl*5T08Cg2y|U2DF`goz;CX@Q=+A7YU=#K<7gv#6mzj17X;=82rFacSOLk
z0r`&+hQPs%PiVb>P(Xjedss^zzz7qJQebs!j{^F}w;)hLD;{X<f#N1Gr9|?T&nOho
z;)!HWe)vr&VC=RLR5yJD%V#-Q4-(lfr-u;=c<b;1o?U83pyko$?m*i*1#Ay36fhQJ
z2pSOBiPqE?z0mE#K}IN`%Bl^RC>euLz+fU+1ENc22O|_P6legIVkzJl_taeP!$}sQ
zuLl^RfMPeOW?2j_Dru}g#R=-UC$uv{0VBo6P|vX(ynya!Hc-zbrnV3HO|`H-ghG*F
zI0^;ix?4d9jJ+aghXD`@7%g%#fX-W&qEJ9{egJfyWEfD;!3YJ6<sf!k-asgz`4Lzd
zCcA+0u|WbAw%QO1Xb(fB54#`~Fwk+s5{bq-D3>X#s)rE@c<%=sJ3k(TP(XKO!kqwT
zm;&r(#)+ww_2b>t@mC;F+g6;AL4i=fC>&5#Jqm%15N-%og**-h+rZT>zitdd0V9tr
zfRg#$5eNkg4nK-Y$hm#nHN=74$H~^mJv<|;YYajG9f{zP+Ek4~C}3;^&W3u%KT=pI
z^_@*HAhb|GEo#iIi4h9uN&`a*%iBjrD4-|F28tv5kv9&ZfZpfUpj1So`yF3G0Xa@>
zILR`RI?f0M^gclZ@3%2R0R_&ef^ldABNR{#CXHn1(J;mc1(f*#w%>b3C}6xU1oVUG
zR6NKC1+-lQbh1@!KO+>--~-(;h^u3S0><Bm0KX*D!1p7JP(br-3&8LyZefH1#`9y$
zX&8^Y-#{NA6wsat3=*wkOW(pXgaY#2z{hvW1MQ-R0-D`$GVow~yOt3O_?YQo*orf`
zr&o1=4@L_Ge7Y5B-G)<5iN23MF+u?!iz09sd1iyKv?l5pBNQ;&|1=P`q%0OTw<?;y
zgaXF;UpU#c;7sOzx8Hq6Rsli*9R;^6i~-XSkIby6f^DIN0=hqChS;^>Y?gL$X(fH#
zR5)><g#tcS-*ffELAxgz8~NQzx?j}@K_n`5kP!;#`c#;3!^{Ek!)9#c5^(!Pc}W{1
z6foRWn(5~X8fE+uoH|?Iln&%Qqfo$LO~H+ax8g%Ra5D?s0yoCVw2P;Uvzhzt$7LVU
z%z;qA2o)5m>r=_=g33n^6LKrEUS<|lz5n>Gs&5QjIa(-S3_<}A2N;Dg0D^Br0e{{K
z01f=}R=}UP0{*-e0RGmWw*vmW6@a$+&;Ps?@aL_7KW_#6c`M-0TLFLG3i$I@z@N7Q
zAT0Cet$_bm-wL4panAp%KTQRa>hc^5S{1FP#9fy?T}pH`oUb6V-@igc_f~d6Fh`w<
zLEp{gTaIfqz7^S=(>G(w%oPge(=RUb+A;K2JTBUAv)bMzLL9nl1WL!%7Q1t$6m+@m
zjJm4*HtNByn|IeI>@#-O-*RtsmhFOm^`wtW2YG9rVkK+tEY)$o+{YWV_WX{|XRfoj
zg$Erm(v410SiJD_XmpSKB(K4JO)lM}%NtA_OoRsF)h@p_nVT)6o|WUvsT909!cbBC
z9{cCKFsYpUtCwA7RTwB!-N#n>sW;_CaNkN~xicxi#aZgcQE~A(V*HwX{Qa)i@n=?k
zb^Gy5wq2_|MBfTVlU7{mZOfcDoD+U+{rSlWqL<Z8Pw3=a<Uh~HA9>cwoO(68@Qt;=
z@cm91#|t-`4n&=))2%=B=%Y-|P<The%gK_m+@9;-&mAjxx4bzlGT5%0@LY07|6CKj
zPP1~gm?>=B3I5wHyA*b)IkK{B<6sq8E1bl=hJ8rvLqfUWjDVS2rNk05Mb0ly;o_E8
zQd(*9{DM(y9)WN1q=2cqXLTtm_gT0<6mh;gEOqL2w8P$ErhL~An@?+}L_~0Orr%!+
zO;|gf_szdKBk6TA$Ag#eUT}rxhzeEesTQkb@g3;Xd2V!8XB#Kwgw2*m?K(Ld{nSrL
z%oLT<D$9}&IYM4HZ}iw40Z#5`M9%le*|u?Tvnd_CS&*<~d(cMxMW-`z0&l)l-AnO!
zAwRpq@$H=R{ufL`W=t(l*uOr0gV}>mmC5o)HXM1dQTf3fPurbM2FuLFs>Xxw;L3#p
z0uJQ|9>*2dXGgCasjP_)4jud`ChA0<XS*rwT1brcEvct7`R$DC@LeuS%hJ^y&r~I+
zJe$kU%Q`(lt?B3yzG=l*-7L5k$8<D13PxJr>1o@ux8P2=Cs8f^%JS{P(ZVV!DpAJ@
zUb%HvWbnn<RyE`dyRC6*9hz30RP&%fWBPKhF!9yHdiL^<F(*;)uD$vXm|nOJ3-Jz#
zvR>M9Y}q4ON%pHVyc-w3TD7KYv3YCmL+&|m&#mEoRd!RcZlgtgZ=wI`Z4rKp`eyIe
zsp*X<cZ%gU5|`Hwo7Ob>l9cd<4=McB3XM}NS-6HyUQ!jj+p<Dy&FpN_vL)w_^3?9!
zw<%`bxoc}rPhWdKc`>^a>z(E6KG!@|$x6z4W;j#p*&AU$wx?|TbD4yUrIM4mwauwr
zC5qJr3$*$j?445d-lThm#}^tmip{L^+4g*K1*<*l-H@*LtIr?jBL@h+b(CCNzw~|b
zq+Yk%vUNq=`R};wA5!lO&A<6rJ>j-Jx8dFP$9~T^>#Q%U+T+?MH1#wk*G4{J^I5a%
zymrll{@MqF8Afy8UK;Gxu&h(6cBmcKyO}N!FS~bU%saEN$FV$f{A_leFMp@l{i#c7
z^O7s6uaf!SEZge2#fyJ-n<xIHxbj$$$BRVG^r!sMA|esGIekZ7Md+^CBi_tzO61m6
z)*pA?>tuJ%X)24tU}}iSgM-E=-|%sBTO8^>F_x=&M8nQ_{_Jj^M|;Q*BPgcLGnUs}
z2#?(0c}iv&o4#CK#kGp(v@TDS)tT~5{hy-?FE<Jw7PTN8NGm*1FzD3!R<YB|bNNPx
zEnIQ}v!lYsS4CY>HWLo?!uC{8x}E2`XI7KUVT<(Ku4)nTq42i+%4OsIFJDuKE^pP$
zQb?@2+AcW2ynTDONwLP(d42no8Xc=PM0LxZ%#|$R;h(Z$ixP9%%hK$9tZD9gi6-Uy
z&sS@n_TO!Cer6{te|2eT`OcNuGMP25Q&!jM*sjtLU3k7)baz>qB-aiB!Dwu$cAxuw
z*X-3fZsbUgXXo!7D>vNQHbM&Y9G<CXykTCM<SmxTjs|nq8I-76>}|WMz`HnvQxtpE
zsjjE9xSyr*WAp5^C}!<f@QxX_@UYd!5B>)NlT+HW2d_Q6-5svg?<#4f(ZVV8<fGj)
ze&J(z^69IZcy#uyDl#pt<e0PKbMq&^T6bTzXvbsT6o+xQy4~`-r3V{F6<v2lkwne8
z29^l!yk9di{O(oa;Z1=(y>syyk{Mj-O#{m<S9M~|5`|&w!ZM^R_6C&AKQKy|_Ee*G
zTXJvDrLB*tp(6>p@|L4dHf>pCmg88-%o0FYulr6rtSppI;FQz?vA({G21kWPeG5&e
z3J;UKk6(Qt_2Rgw_wj%&-6F;%7FG{>4|Y#EH!L=4`aDU+Ve|3P(*CRJ##H7xyShx7
ziivkr+seFF_*$)UXzZbGnXe@~K1F(o(A!D7=Tv8?;I8XDmON5lc8hJjS6Zjn<_-FL
zLN_f<JL=x)6u7lF$MMY7;4KR}_lX<N$a7MvN<R3^c!svN)v=y~yQ+B-KD>&U|8~1h
z=ei3|*ASV6OuR+nju`6(oHNSacQMY|BTPv024x?MQrGOlMpd!+k1M#tm;{}6mvtIm
zj1d$NHd3(MtabR_j^dp7pe^Smw(%zm4&BPt@TFY58+OKGPh8LkSDu|uTGYH1<!aA~
zrd_m;-+jhouCjSrfMJ7|ov_m##SC@vzLV$qE{P`>A1YhW;vRHmYE=5;rX#A8ZrZbk
zOj>yS^t;oSUs_(Gu6h_f%s#rYw95SW$_2~MzO9{lIJ4`+9Pv9QQ4+J%Q=eY!RNL>Y
z<*ssix3FY@hu6VrSNU~5STb{Eu&FHVIT<J>DnFRM?7*`*DpvlM$y58!jT#!iY74zS
z<K<!5jOU>R!uK`>iuqFNPOQ_4ld?Tx8(<P1mv-rn*xkv(<$YaaJgSF;T^x;HT?;wa
zA6k8GRGmXr+2jN_+rjc_4>#9|v>eE7ze2b{xgo-GP2^;TeB|AN{+tYD119B&xV4Tt
z@;mLq-j1y1P%%l`mh&Lx3WxC_Rw2FDY~081UYgI>#+~BvD0*<qe#3;_^>C6ulPM}f
zh3ne;-6NCwYW!b_l*bYLMZB(#TX*kx81MF}M>Q+AVac_%q4OeVz0wQrnt8*C^Tt`<
ziv7zg);=|k%r_5zpmCblbTO~YrCAqdpI&**Vb$l-gYzwh?EJ$lMry)`&OGuvNZ>9~
zi=0>RWVp_nRdGb@L^W^ZL1u0Z=KZ#;9N|uf!yW2F5A{|rFhBX&Y``eBPW18#p;WTq
z2FrIo4|Hl?Yn6D%TRbb?M<@<$-^>ysbSXVDw=mNvIqtLdedR;zwm-LzuMr4InrzuT
za8xeKYBckSccb@l>Y%|EgN98kEW7SbuDRR&B>wCvX2~~GN&Bp&@)us`_l$FCc(}3f
zaPOO$D;z{piypD$?R@ucF!|~G-eHH(f+~tTKFl)9f>OO|viTHqVp*MyhgctpUFuej
z=jI&^p1x^Qnr1J#zu?l~{7rb_ko}XMt7k$AyVJ+#Pohpayd;%(H|I+gld8_cNy_^@
zH!4lyA551vl3Wn6L0hZkBv<{cIVx^a-XyNHgE7NVA6`?0hs)NCL@KrUNbkFNj(6YF
zRpLVrS*}EIr_@f_zcrpPvi`);Jbkrwx;myzC$XH%slm(MuY50<8`qve+T?QgmDh%I
z4bRuGl=~}E3XHE(4jH?eX%$<(PgLO^;g;Q;wd1K&=%cJRg9$DqQSR85qnoVnnXrp)
zTkAY`?A`(U7pJORXUJ5(^v?J^Tk?dr(K{=mSVD+tO6SUrGjdNfEYT}+NE_e5L701O
z%L<m}>Ym;-sUH4-*25R<<QMl$_qlR!hTUtKC0+*JyFaZTAO-f;WwEYYD=*E=DyZPr
zG-WOSER}_}%^L&Vo;)J2la2EyI9120DYUFS#q*SF-`YjITs%P+P2SIX))f#SR$3Mm
zK9-p9a5&^;ndER?&I<>MdTrCwW7(0t_kGywJye_WMZ1I-gq=FT)_hn|(<^XYxW3SM
zZqfm_foD5jlF#mqZ#|e7vcmn0JUQpJ#|%sLB$>4X&ox;2kH2T-+@rY1_i+5+?c0TN
z!kTMp8eggBYMCj;nw`%e)s#PozT02Svp!R;_W7Li2kuYjdu$!JA?dw~@Y!vO>tCEy
zes?O$=Yy&j3F`T)efTW5WVinGVhtaDp5TLWQf<e~`3nma@)m|xcn5pz-u?REG^XuS
zq(#T`57!@Ik1?y*+83_G{drw==qBFf+*IFX9a6z;y(_N|4sU$pJlj0#0M&?V-eaT5
zp7I8Xg_Z*$Z&*WWj=Iho&7>y9v1I1C8$Hq+$*eka)0mjJq%qt(I84sT|MZF>fn3p`
z5=rKze10({m7VuWOG^z-eteo`XJsScQ7AXGeYR^wRY$t`N!@iWl)hJWuT^F?%WeuU
z%;ry#E#0Pj`Nf{)yxlruq0IL~%a&|k)b7~ZAahf}UHvp~2WS1v;`1`|-B!DtToUL+
zauf9RN{#oPl@XdRc6O<jven!~w#FP|+iQpS3b@vXSubu3txKg8nTYRpsO`;tlRDX2
z#WJ?+bKJCJoVEGSj%c2H66v{IRSGX|<=<eCRp50o*ST$F`_u501w4@#`GS2-n5Fre
zkChW29n{o4^-8!RX?KbH%{l&W1P-5$AS`xsK7Xxb>N2wU<<@)A2Y1y=u5&HF;k@L~
zdhW9;pHNrvNtCSOiOiI8bO;rZTp70O6NPDwF=e)KW|D#axz-`#5;=}~X_NXny=&s{
zJUn7O<uplSvZj`Jv<7necORG&thhgjRNkRY$uimeQlD#mtLcoU>WILFgqAe&9+MZD
zE7vXKtZ}ZZof#W*+-+x)cj<fWAtkZZHGa~{No$Qo_w`2Kn?L*3hJ$m(7PehWQXcgn
zX<ggZG$7t^$w^C4ZTGa*d*|F<vRiM>4N5bY`K%(PXT8T}ONMTreX4cY(1IC>A;Wk2
zgx_Yx+?-01+vq*_!$vO4?Rz&^U3)&QYDEoUCh=~?=A44N`3tAT+mtL#n`|z;t>BTy
z@Rk?_mt6~DUy-AlunyU~>q>og>1S-=+UT-ZAaJ>K1e>MlzIT%eo<Rb~V^15r95$ZB
zZ~Txa=tf1TaAfl0Y204pW!Eoo?;o91#k5uI>3+`pYI05zLPC!V4R2SsvG3+7Ba2R-
z#yn5==Ed2P0nxJB;TBxy%dcoY)V07eY*)!wCR|^kGxeNZ*}<Fd&P|o$+B?J{*S;@s
z&82G6OPM9iK3jR_EL>}RaaPGGF5BkMOQQHs#~j|{?{`d9+THQ;;82Tmv(mYzsifX}
zjdvq+0=MK`@??@a8+>z~_!{H7IWr5ZwMKd8=cx2?o^bxK^n42E2anrvXH6_yZC0>J
z^nR*VYFRnoa!l~krQ*xVp299}ITqO!Df9ff?#~)_@;Vi-!0PbITd%#}C{;tSDd)xg
zCnq;M%Nz=xbk&h-bhf12yqRl0FBQ+$Dm)!%(kC|96IZSO*|B7C-f)D5bFKKSb2|Dh
zr}j;M5-;Zyb)){g=ki&S(<<zWNoUe!b{Ys&-*_o&v3I+_oIt`SrMkU5yHXaHoY-xk
z#xzN8&WU9k9J~~d*?H;useig``Z=w2aIyHyXSPokX&qKbZr#Y9GyR1>X}@oyEt72z
zlS@LJ+SbYZYRZjaemaw74~yK4ly}~?C40xRy81dE$v2mZv#!Qlh;tJpJ~~kxZUo*t
z%BjNLCYiNkfoC*x`13M*=F*eH4u-c*&(_nQVwT*Y^I=+n-SRq{XD6=&N=&-&c&3u9
zrN+4D=)xHHRe=XjM0<+l)<}OAZ@h3-`nq8IE`3h6z~pxtqIXz6;$k)tlC`V)%x@F<
z$K`$Xn~e^$g{p}?s4MNa4b8;$kEE5V+BMw1w5fBJCh4w#^pgrL_vJQGs!<EqL^Vk+
zuUD~6&KA<X`9^x~>UgrU>IR+#TH9Bq54<H(8lSbS3>vtwZnJRIhRe%k`@;oWrzF*7
zlL*<{Qs%vjDRExDY-s~0R*`aJFDEHv3+u~Ed?`(P0>rV;$BTyM=51WhJNdlJjcn_>
z?A!&1L_(OKE>)fO)HXljMcsP+AnQYtY?r1{&S>ffS~|_1sxv6RhkM(MQen-lL(EHW
zP)^8Df-)ut7ASc6yZ0JqhDEP?AXsv9%AkGUuu)sF$da?7MX#hyG-9!5VbwmekA;ky
zj<3Dlb=z&Hvz&g=5-&d;38B?nW36{wIe*(<e?<>RvDoY@iL+!RSV~Pt@5LAtY4erv
zG#|UTkvHJhqGA?b)9P3`|LC~+M$bQ%GR?j!di|bcCi{NAYeja<whN~i?%Z{+wmHQu
zdTF6YqHhgzO)5v4j34hByGd71G`x|1zD;h=!3Fj_`D?VYVp`JG6e<qyGq#^+TexeN
zVx!rB5O4i-u^VS?_h;F64F^laZk%z^L@u67(3+K)qpq=<+@nh5b`lQWE7Z=M)-`+b
zaUW($zltrlSsLA!EXeh7J$P26M60gHW1j!CZVn&TDMaH9iZ@taZCLNl8O<T+Biz1|
zO>T?mG8tiUP3&@zjW_!}pXa8HM1cgU2ZJkSw-+^TdZFv174o#<xWFP6@s90d5jIYn
z8y#}TI3ziO(oRP6sx(Cf*V>8SFm{(VXmPGL&{<hF7-9D5bMFJ0>_$F3b6@sGfwld6
z%5RRPjeIaws+zl1YWK|jgVM^vJbJU$;zg1w$DF&W>sL`nv>rT~J1EC8Nvd*3bF-1t
zT7~{A+DF}NU7Q_!yVeTmy0(R7Q$L29X>Z?ZW$74~)$e(IwPUeBs$Jl;lg2#pYx0}z
z7IWa^X&GzQk)rC#JyyABzkBNId*pyE-?)KsQq}33JDA4J@}_lrowFZy%CxSqHy!j|
z!m>Q}$f89Toa;5VuJFIQJFa6u_EK57ci1BL#AR-~LQO~AW%0)KTpnt|snczy`K%9^
zqkA%ZTf~X%r$vjp6bFr_sy&*&qYY{wjc$E!roQruOpxj6kE{2OUAZc_Z&F6nGONu#
zMsgY~g!Mkvyzlk~x=wb=tAE$1LEw%TT`(mlcE#HY#RVqQwRdhX<0&OqJ(;v{NHuj5
zC#Ug-sTpq7MyIy*+*x?jB%I~UH6uapq;>oo<(H3{852XX8W(NvnIiV~`<Lod)(4v@
zpW4yN<=P*fX0Dn&SEM4>GOtEw{pRE?m-g>JI(bg0Qm%@$(paQd1Lyvot5z$`%wFhs
zMURvpwzYKA*tIv}>D}{4@3bkZPn@0~eUQ?A+ivH1l3gIzB3{vs{dq&7%)D&I0UoMr
zjt=XxKJKuoA5jg+S(rNa-QvtgG0&GewP!Eg+2#;_WloJ>yg*m*V)J?p-$N_yZPwbm
z6vaR9B%IGVxgn2jmy_MACo?N<Q)bUx<(YI~{6p?m&w~jcO(X4ilw-S!Ge%m|Le6}=
z_)<f0^GUrMM?9u<={bZvytt*oJx^PB{eipf74_1!W*Hn=xdoJ&3q&d90+Om5Eh$ac
z=XM7P@MjctsFr`^;%;ZtaBpOF<E%-HpD%c6M&=N6kA1#i?FwO?>P@;gmG%>A8q<U)
zU#hIye|Y2J<MRfe*9FZzphSqB|90+@;d$j|uF*xg2acaIFrNl8xZ1Bfr(bulbp};+
zP;9nf(~bI~-7lijZ7OlHj(MfWX7!*apJYVmZ(U=taN45a$W_Y6t*r>tU2s9R%h@sE
z2jq?O64@T8bSiDc*p~JhG`I;<xLPaDM(_n)3k|<XiWilPTo<pDzD2%EUMRJsc)Rb1
zW!<Om7N45oKb_B^Y;W$u>oO;E56IUvnrW0?l|NM1u<wALnvk&7dzD#ipQK}|Z?g&U
zvNnh97r%QgYhjV?aIKvQ>-sYnV&?G=i79Xh=NA^PTXKPCh?A7g#k6w$7Lm>wMQ540
zH|6<A=aj#^Vkui;+c-m6|4P14)SjFM7K2&#wmWA}eIL^I@{{VIL`=Lc#ksuRaN+8<
zSJLT(67hta$)+*(1rb7Zv#Km+ZV}A5c>uQ8$2ZrPu2*v1*?Xfp^~}Od7Kg)J8AM+K
zcR8iE{{BFFW%7(kWyTIUEZZvmOfx>m4Dt)T9UeTf&d+Vzt9aunX=>ry6nK1OwWeF7
zT2D&wx^>KHSbc3Q|El1Uc}wcUE$4eRNIm0-JgO)tFSfYMnY*Me%OQF2T=BZi+3XPx
z><;f%Mc#ii?U}es=X6O4HMxbSc;A1>wb<#$W}nZV!`^k|W_*0pu@l@v#(5uV<-PH4
z4~neRq5I4QkCrdA%)Cx9=AT5g)8$M}ywrSQ^L^jq6Doqj92}|R3K@+&lf<Sdbe7jf
zUF}@2{%%&+W=UVUY=42JZS28yW^)(FvWP{5^pG4f-&j25Z1nFwWSYuW;M`;Do;*5j
zxbd-+4{>4ji~}=R#62ilDw4*d7(pdMKxWNwKxcgye$?kd-Ni=pXPxz|+3c5miP&fM
zqHA)?B{|$=UM!QBTcpQJkm1<s%bXXj9j0)5uJTf|g?nJXuVgmnlIip$=fd<N;)&eL
zSh>t#&p{Qv=wjme(3N#_UnfvG16bB1lr3x=Mu#Bs+xN&OZaZO1#-<AqW(X1FPor;^
z5&U*wf`%ATo3OTu86%L=xZp}4k`ByRXowNgxE2}`hzDj!9N@%=fJs_InA%U`7Miw>
zFry!8|5#^D6$?gSh636R2WbbU(GNeT*AUcy)+%A5Rc;~F8n@8z+u;`aHU0mYUO`X)
zr;<Kd13t<2^?Qsz-lOjd?$Oh~pmAR0lpY!Tf_ohDCve3!((h+No}!MXz8<c3nk=An
z`m~OwmcT(h{Zo)H1%MGxT}H}6yPw@?Aag&9K)at@B)<N54*h;f#mwf-1qAddLWGO1
z(-~JY#uYAK68z~F28#COdEy4uC04$y3>KNg<L%FeEnhK|C<=M)0H{x>TpNHJ06q_h
zA#F1UK%Wz|2S6X_a|M_I-~+%35Db7m=NARQ2XG4j@pc~oeFQNB0MUL9fH-P`FZxZ$
z2p(yDndsBR)q{~=J(H8x2Es#aq4eXG9~!6i3(5pAE_gz%pcc><I8{5y2Iuv@Gy*w)
zCoyBP@P$cD+BYb*;7gO_fAV{j8{qqs@JAY7(%)$l^=mHb2qXd~1MOdcF`$2kl%D(d
zfB%*5f1)we|NBk+CFYmT!_8kJ|2H7~SK4<ZPKOT&5<s`PzkHMRt2Ov<VD=BmKN9$f
z1ms{@fWKpd56dD8N>42CO<+Bksp#9d=OGJOI{{2affrL!AYv*2$K?o28VWP93vwJ>
zH~<-7H%5>`pQzpa4J9`C%5MkQHUpre2Q<*fcPE3^lY|H?LIkNrn1&F64_nJ-vuzot
zjDiq$l+EU%Hf9Z2dod!7+TPz#Lm#6>-vOSWMgVHFFdC_uz$yt?C1L6S44OwV5{>53
z-_TqQG<m?71ABZ?+Jvc5#+cM1;sV6uCI*{xzt9GD8RVgw8pcGUuJ#-1YiQJ&=+uod
zI(5?gFA|vgbJCas#!REF@Eh9bL%g$KJq6Au6->sMMzD9Y=gv0~#yB`Qq!vM&s1@K?
z4P*IBKGy-Q=}?0%S-vPqU{w+X!TcKuBgrXXtbfVpdYTMa=`xrg%)$fu_5Gmj#n@=H
zey0H&fYxO6(PV}`u`>9Z{3Ef8+N)0kt{lcrqxr42|EQzjQ~^bH#Glk6w&_S}G73CD
z4$K}*TB@5G0W*b*v7%z|x!oP0>GaiH3$*<d+zY@8TMu(dALbJJ&Nq72hkR5<2GGYu
zpgjybfayr}Q18K&3%NwJ#P#JH*&0w!_q#bMfFWmlMnCvzbgz2ihJ$n-dF^P{qV;|S
zb`I;MX2X@{YSHMjgRh|j^aNm5>R|Bqg1{TXr&|C?Y(B`S8<YG-*Erxi;kw|hpf7f7
zVWx0B1>7L-iyNC%z=jcnc{T{ryuodl0Fp3a+c&i*Vam|X_Yyfn;{dfg3Fh1PG&W#M
zr6RE@gbm-&-~mYwgGE9TLsI-I+pm-`OdT6nB47((yYkhVae}9%1-;aSnmQnTP57mM
z+nXO&V3H7Nvi*7@HvsRcTjLmZ4DQqcG=xY<C#QcIcr?@1vBMYv6G!w3G*QA2FQy3c
zxClV!>OAfGy>EwPg+3O%QdWSVSb#pt4GxPnT!7DS4Hfc@Q4jVKw7==WWY7bhFIH5B
z*4o!+WUr>tXVX7ruTbl#6Ue$(!VkKq1M+L&ftDuj3IFhwb5!pi(*(sYO3a3GFt)E0
zCos?s1ASo~dE$#9Ga3N#f#@QfpSSpZ?$5bHwdo0!FQ$JFoJR9&?xLUO3jH)!_?ukB
z^*<)mBI5gJeY!Eh4nq<&xv|mdz(xgRLz5K`{e$XX<%DDb<)R4XYd^oXgR}_kg60D(
z0)QD#`wTm>C#wKZMYP_cRT9}|wDxQT*a5H;Kn~ylz(IgR0EYo|04@St0zjU+DFE92
zp&gn9fGdDIz*PV=Zk_<%0BEP?2jCA72yhJm?b<>B!T=Hg&@Qb8pc{Y*WFi0{2(SQP
z5dhMGB>+nSmH{jWSOKsSKm=eFfGB_%z%_s%fM9?}0GR+q0CfO^07C%NKz`E!Rsie;
z*ax5rupht-z!@MG;66YpKp8+eKovj$@W@M(Jlt3_04^x~RT+K60MVKOa6u^!fcra|
zz+?$35%`anp)vZNPvE8ED=+_0_6?u^$+ExV^WQDc|Ml&mA;Q9ct}lP1?0<d#zR|OP
zWo&=fKQwQ@*Ik;xXg{dz`}V$;nLLGBjCl*Q<eL=7YI6BkWwEUPx73T1`q9>Xu}iF|
zY@+XUdp1!9_UxBsgx{3?uHIjleQ%Q|coFzbdjeSC&-k3Mbx`&@n!hUh9nAos`7h`a
z>6g012D;?@D?N)N{X5EF$)m+G;R31sJDUGYnFrM7Va%1)S4bH328|&6Sku<c?{#US
z48u?#NQ`<vYwuqvL%jT|J+u~oU-peIK@l^9m+y5Rbm?dHCUoh)p&sJ%U*QG$cHh@S
zjMEd6_2h444LxV1t)$<{?62(S_wt;eN%xojgJmQdpFE8At>KD*mZs92Zq#3-W9Z@E
z?L+@vpZQ<$iIG2y{NQi>-+!0ii+o<>vwv^zAcLM*e_duxEBpEQTC?7S`rq5a32h7i
zkC&l+%J+N%FH9&Cc#--^87lf8C<~H;W`DFlYrgXGOL;=Qf2GX(XYEbM1)BX=Xd-$3
zs^0(4?V)+}{n(-mlo<2qJG<p&&J87p*r&1*rQp2L1S}S)tRsv~qSwSc5}^5+M25Z~
zyGB4rv}8>{KIqTOY<^SryL$g>S@>_-3nyUG81@u`&WT>A2Pi=wj-o5Q9>-7n_xmyw
z#Gs&hVi+cH3}OS@fu`(NniJzNAuUt_<3K=b!bBOmg|lf<+PV)e(m$3>7Y(8#v6_A3
zqtVBK)(cE_M>{$u{(&aF68sW=?Y~(Q5Y2CWAH*w~ngL&F3QUG)WZUe$;D?s1e?oJj
zmmo8s$?^+%(yG(SkoSfX)T7&izoa=KGkQy3>wPPiFJ&~^;WWP%{zQwGzSmvQ36vOR
zwEN%kLdQVkhuZtmzd`e;Nwu97zJpGkkSG1WPyAZ%cjNG%E~D8A9tLmLaJBww3s5c^
z8x$`@zz%?--4lRx^+!OlIE2gu$jd;9D*;elUH}wBL=P(<%DECi9AF2)L4b<@W&rL0
zfdGO~e=$HNz+MI&q}=dG^QAc9iugdXMS6+kj=C`gfDd3Qz%&5#b_Z&+0%!nPS{(Qa
zT-^YA0EPiZ0Z{CePr`@lYtJW0rutd~J<1^DLuHBp{1TxtB#RB`o&l&Wq&!OilrRG2
zHeB^FR*Dc@Sy}blgd=w~E6-bsUzAudS234Li+Q5D8yUKGl7Y*@a=h2!`AZ8byN_#@
z{zI{V6I85iE}eEH19vY2mzjC%%f`<kc@oY(U10)8>@KQNv7L*7D5Qzl?O)OT7FP=6
z??Q5;MT1wv@LOAB14xwI7?FbJxd6sSL4rda<$(#xjge@!4qhgpppFwTb_yc!V<KW4
zw0dY#qp&l=-v(D+Mm_=Z(a7z?I4S4_m&ecm5B35zgHhp^4Pzpq!QM)uFEdjpr~)b`
zAl8tF&BI^~kw>w2#M&qb_;0fYbtYItzWf3PYqZ!r=u0E8hL#3v02a&!^EghxY_V`x
z46~!%+tcn{FobVSK&;si3aN#dqcpmA%7$#{)>P2N7lfjjs9S8%t;fK*0Jatkjxdx%
zFK8V@dI8$|rIVo9w0qPt>Q4-mPVh%NCHR3q*5B}l@c%jfPJH2y4_nZM=C2o0en@m~
z=?_2SmX*fseZaiSL{|WG{=oy>UI%HOg?twb<uFO39<vc%?uI!{xON!cg#w{5V_V^u
z6{N-mrww#9u*($z%*P}F>;#k}308xmLl*5Sp^9NA04A;z`RKYDct>`}15^n00R1BA
zTf+^#ACLj*Yd?^rA3{zf7oB(7i4O374|u-_`BtC{=pS0DY~U9IeL%^M_G?f3b*9;e
z$Eb~8_JD>6KZtXb(DmDUdM>hLKa)P{$G2R6)fFb%xfZgEo&ae2qV*ctWF+&m&=a0{
zU>lcV*u^dIEQKhcKEj7)sq4YK!uRZ{-t#f+R2CG_^tupay#+8dL0NlYx*E`?AkwJQ
zV0vEz)@dlIgt}U^5-N2L<o)U-lo#6uXNoxB%G2HmL#LxUaMFwZZ)Q~hV>o-%1DpP9
zEN*z4ObhT&(dbN^w@#de>%sc)k9izlTGOYUgv-)enf#kp#4!@oIRMV$k9Fy}Tt84m
zT%)t?^T0cLqvZnh37x%fr}Yxu;ZVu}yvxI>*!Q_Sz_AVuTl33_@%I?qG}#~-p>ut7
zI{$q+2hh|2*?pfoiT2(ddLKaRA8Jg8HZ^Ecz~TKDEexG(qtkhG;;jhJ`m_^x^sb-|
ztxxC;zEg022Ck?rO(-z{EDg}{Uzeft<C9<yb^t|9IB(YYp)S3AGRPUd$$(DFF96Wr
zYS06^s5TeWnRr7;8FCN@^b$7O_@R0eIq2m6tL$Zf^9gENj5<grXas&%#`lwP_&J_3
zw1RXN$$@^t|1&%^x7Gk`1=tB72Y^mNbpZ4MOaWjip`BXZg=+>t9RRGpv@?GceJNl-
zC0siI*uZE?0HBjaYk-N9MHE#*2~cR(2U%=nqnQBE3J22@?B?I|o{+`-)`LP`8}g!H
z0fV=GF!;}&>Fr3ubvwXBzx3e#62P~8y9Lkb0M!6p03={=J^(sZeaV3La2)`c3Vl!k
zFa>Y|hyl0<fcggi0Rq%!!Ge-`W)q=@s!^;=fs8UJfPM#m_k_U+)45z`ZJ@6!fop1O
zUC_W+UYK}yd8MY_1qnUc`^yse1r2>NS>p`OZGAzDtgoY~si$kGrBBw<$E?AW5~A+E
zBLa1dWW7N^n%!DiU+<KGCRtvV?w26OCK4KIBobtN5g_A>z=r{TaP<d3PV+SYWSGA_
zxSlwSo(R5e0OCB*G#>yOZX^~o<gNfnEUfT<WwXK{BOo%a6VI$L@T`!_3jYw+w*bxl
z(>#95+fLw19)QlnuiB@#y&Bp^38^DerHLtl)aDQXto&aN{jb9PKPx*X;6ni5TmI10
zK|a{TLH%@)6*`=sIE<e-h^O<9<n$x_s!v~K`eP0BjM6{L|F?Yq9eJX~9ZhRAotptr
zLYpCd6;`ZrDi`*6$2v@Fi!>&pp@N+@48ryvxrs$jO~!JW3a~bX*H|g}H6}E*iB=Dd
z3HSv6qc3+Ld4&O>G5py}8fY#|jN|WKxInT)3CV>Bb$*1<pX4E&AM^jK&wfA?r3K%#
zhl1x5&&iDPZ~2^PbK;8lLUgE7#EGpHdPheJxs>ojw}!0Pepofn(fk1;_(i#h=tQDp
zA#AiJ&^_jF?~xMiobCb55Q!`#W+rALiOI<n6M$^%2|6^h3mNFGF!V+o4#j)mY6RE4
zw6#_PT82OG0XjsC8U9Rzz{)~orq2Y#?bl?DZuem(G~Y-MR!{KH7tvbhWMLwr^vl+z
zVNKD2)fUxR`=t)B%tWiB0omVhOn^tku?Bb?$QwY#3t-BKvANE~DET1AI2wwlkIv~P
z-s_IuIr|FuXj2H8Co=%LVQ0cfJP7goTsn17RTB2oZ7)>#lm1cyx=gxE53mQAjSVlX
z2Rz_coPs*YyYOJZUy}F@0t_)Dv5DKMpmAb*gG}A8k{nuxAeKPohLMLg9Q{=fY<sMJ
z1;~`5Bu@LC_(7UMr6TVMB?2ZuyCPo-`Pzn{!KWY(=`!-0b;17=z?5lk@uFRc2Glst
zsPXT;5U_D739LNyhRVWDmrWMEi5&uPmDSTUxS*v=))V;oUv{AdLUAAZBQL<DO=)y5
XGEq%r1J=9o?j<_GKfnL`B=CO#mmXlj

literal 0
HcmV?d00001

diff --git a/Source/Modulos/Facturas de cliente/Reports/uRptWordFacturaCliente.dfm b/Source/Modulos/Facturas de cliente/Reports/uRptWordFacturaCliente.dfm
new file mode 100644
index 00000000..ecf1851c
--- /dev/null
+++ b/Source/Modulos/Facturas de cliente/Reports/uRptWordFacturaCliente.dfm	
@@ -0,0 +1,611 @@
+object RptWordFacturaCliente: TRptWordFacturaCliente
+  OldCreateOrder = False
+  OnCreate = DataModuleCreate
+  Height = 245
+  Width = 341
+  object schReport: TDASchema
+    ConnectionManager = dmServer.ConnectionManager
+    DataDictionary = DataDictionary
+    Datasets = <
+      item
+        Params = <
+          item
+            Name = 'ID'
+            Value = ''
+            ParamType = daptInput
+          end>
+        Statements = <
+          item
+            Connection = 'IBX'
+            SQL = 
+              'select'#10'   v_facturas_cliente.id, v_facturas_cliente.id_empresa,'#10 +
+              '   v_facturas_cliente.referencia, v_facturas_cliente.tipo,'#10'   v_' +
+              'facturas_cliente.fecha_factura, v_facturas_cliente.base_imponibl' +
+              'e,'#10'   v_facturas_cliente.situacion, v_facturas_cliente.descuento' +
+              ','#10'   v_facturas_cliente.importe_descuento, v_facturas_cliente.iv' +
+              'a,'#10'   v_facturas_cliente.importe_iva, v_facturas_cliente.re,'#10'   ' +
+              'v_facturas_cliente.importe_re, v_facturas_cliente.importe_total,' +
+              #10'   v_facturas_cliente.observaciones, v_facturas_cliente.nif_cif' +
+              ','#10'   v_facturas_cliente.id_cliente, v_facturas_cliente.nombre,'#10' ' +
+              '  v_facturas_cliente.calle, v_facturas_cliente.provincia,'#10'   v_f' +
+              'acturas_cliente.poblacion, v_facturas_cliente.codigo_postal,'#10'   ' +
+              'v_facturas_cliente.recargo_equivalencia, v_facturas_cliente.impo' +
+              'rte_neto,'#10'   v_facturas_cliente.importe_porte, formas_pago.descr' +
+              'ipcion as FORMA_PAGO'#10'from v_facturas_cliente'#10'   left outer join ' +
+              'formas_pago on (formas_pago.id = v_facturas_cliente.id_forma_pag' +
+              'o)'#10'WHERE V_FACTURAS_CLIENTE.ID = :ID'#10
+            StatementType = stSQL
+            ColumnMappings = <
+              item
+                DatasetField = 'ID'
+                TableField = 'ID'
+              end
+              item
+                DatasetField = 'ID_EMPRESA'
+                TableField = 'ID_EMPRESA'
+              end
+              item
+                DatasetField = 'REFERENCIA'
+                TableField = 'REFERENCIA'
+              end
+              item
+                DatasetField = 'OBSERVACIONES'
+                TableField = 'OBSERVACIONES'
+              end
+              item
+                DatasetField = 'ID_CLIENTE'
+                TableField = 'ID_CLIENTE'
+              end
+              item
+                DatasetField = 'NIF_CIF'
+                TableField = 'NIF_CIF'
+              end
+              item
+                DatasetField = 'NOMBRE'
+                TableField = 'NOMBRE'
+              end
+              item
+                DatasetField = 'IMPORTE_TOTAL'
+                TableField = 'IMPORTE_TOTAL'
+              end
+              item
+                DatasetField = 'CALLE'
+                TableField = 'CALLE'
+              end
+              item
+                DatasetField = 'POBLACION'
+                TableField = 'POBLACION'
+              end
+              item
+                DatasetField = 'PROVINCIA'
+                TableField = 'PROVINCIA'
+              end
+              item
+                DatasetField = 'CODIGO_POSTAL'
+                TableField = 'CODIGO_POSTAL'
+              end
+              item
+                DatasetField = 'TIPO'
+                TableField = 'TIPO'
+              end
+              item
+                DatasetField = 'FECHA_FACTURA'
+                TableField = 'FECHA_FACTURA'
+              end
+              item
+                DatasetField = 'BASE_IMPONIBLE'
+                TableField = 'BASE_IMPONIBLE'
+              end
+              item
+                DatasetField = 'SITUACION'
+                TableField = 'SITUACION'
+              end
+              item
+                DatasetField = 'DESCUENTO'
+                TableField = 'DESCUENTO'
+              end
+              item
+                DatasetField = 'IMPORTE_DESCUENTO'
+                TableField = 'IMPORTE_DESCUENTO'
+              end
+              item
+                DatasetField = 'IVA'
+                TableField = 'IVA'
+              end
+              item
+                DatasetField = 'IMPORTE_IVA'
+                TableField = 'IMPORTE_IVA'
+              end
+              item
+                DatasetField = 'RE'
+                TableField = 'RE'
+              end
+              item
+                DatasetField = 'IMPORTE_RE'
+                TableField = 'IMPORTE_RE'
+              end
+              item
+                DatasetField = 'RECARGO_EQUIVALENCIA'
+                TableField = 'RECARGO_EQUIVALENCIA'
+              end
+              item
+                DatasetField = 'IMPORTE_NETO'
+                TableField = 'IMPORTE_NETO'
+              end
+              item
+                DatasetField = 'IMPORTE_PORTE'
+                TableField = 'IMPORTE_PORTE'
+              end
+              item
+                DatasetField = 'FORMA_PAGO'
+                TableField = 'FORMA_PAGO'
+              end>
+          end>
+        Name = 'Informe_Cabecera'
+        Fields = <
+          item
+            Name = 'ID'
+            DataType = datInteger
+            Required = True
+            InPrimaryKey = True
+          end
+          item
+            Name = 'ID_EMPRESA'
+            DataType = datInteger
+          end
+          item
+            Name = 'REFERENCIA'
+            DataType = datString
+            Size = 255
+          end
+          item
+            Name = 'TIPO'
+            DataType = datString
+            Size = 1
+          end
+          item
+            Name = 'FECHA_FACTURA'
+            DataType = datDateTime
+          end
+          item
+            Name = 'BASE_IMPONIBLE'
+            DataType = datCurrency
+          end
+          item
+            Name = 'SITUACION'
+            DataType = datString
+            Size = 19
+          end
+          item
+            Name = 'DESCUENTO'
+            DataType = datFloat
+          end
+          item
+            Name = 'IMPORTE_DESCUENTO'
+            DataType = datCurrency
+          end
+          item
+            Name = 'IVA'
+            DataType = datFloat
+          end
+          item
+            Name = 'IMPORTE_IVA'
+            DataType = datCurrency
+          end
+          item
+            Name = 'RE'
+            DataType = datFloat
+          end
+          item
+            Name = 'IMPORTE_RE'
+            DataType = datCurrency
+          end
+          item
+            Name = 'IMPORTE_TOTAL'
+            DataType = datCurrency
+          end
+          item
+            Name = 'OBSERVACIONES'
+            DataType = datMemo
+          end
+          item
+            Name = 'NIF_CIF'
+            DataType = datString
+            Size = 15
+          end
+          item
+            Name = 'ID_CLIENTE'
+            DataType = datInteger
+          end
+          item
+            Name = 'NOMBRE'
+            DataType = datString
+            Size = 255
+          end
+          item
+            Name = 'CALLE'
+            DataType = datString
+            Size = 255
+          end
+          item
+            Name = 'PROVINCIA'
+            DataType = datString
+            Size = 255
+          end
+          item
+            Name = 'POBLACION'
+            DataType = datString
+            Size = 255
+          end
+          item
+            Name = 'CODIGO_POSTAL'
+            DataType = datString
+            Size = 10
+          end
+          item
+            Name = 'RECARGO_EQUIVALENCIA'
+            DataType = datSmallInt
+          end
+          item
+            Name = 'IMPORTE_NETO'
+            DataType = datCurrency
+          end
+          item
+            Name = 'IMPORTE_PORTE'
+            DataType = datCurrency
+          end
+          item
+            Name = 'FORMA_PAGO'
+            DataType = datString
+            Size = 255
+          end>
+        ReadOnly = True
+      end
+      item
+        Params = <
+          item
+            Name = 'ID_FACTURA'
+            Value = ''
+            ParamType = daptInput
+          end>
+        Statements = <
+          item
+            Connection = 'IBX'
+            ConnectionType = 'Interbase'
+            Default = True
+            SQL = 
+              'SELECT'#10'    ID, ID_FACTURA, POSICION, TIPO_DETALLE, CONCEPTO, CAN' +
+              'TIDAD,'#10'    IMPORTE_UNIDAD, DESCUENTO, IMPORTE_TOTAL, VISIBLE'#10'FRO' +
+              'M FACTURAS_CLIENTE_DETALLES'#10'WHERE ID_FACTURA = :ID_FACTURA AND V' +
+              'ISIBLE = 1 AND {Where}'#10'ORDER BY ID_FACTURA, POSICION;'#10
+            StatementType = stSQL
+            ColumnMappings = <
+              item
+                DatasetField = 'ID'
+                TableField = 'ID'
+              end
+              item
+                DatasetField = 'POSICION'
+                TableField = 'POSICION'
+              end
+              item
+                DatasetField = 'TIPO_DETALLE'
+                TableField = 'TIPO_DETALLE'
+              end
+              item
+                DatasetField = 'CONCEPTO'
+                TableField = 'CONCEPTO'
+              end
+              item
+                DatasetField = 'IMPORTE_TOTAL'
+                TableField = 'IMPORTE_TOTAL'
+              end
+              item
+                DatasetField = 'CANTIDAD'
+                TableField = 'CANTIDAD'
+              end
+              item
+                DatasetField = 'IMPORTE_UNIDAD'
+                TableField = 'IMPORTE_UNIDAD'
+              end
+              item
+                DatasetField = 'ID_FACTURA'
+                TableField = 'ID_FACTURA'
+              end
+              item
+                DatasetField = 'DESCUENTO'
+                TableField = 'DESCUENTO'
+              end
+              item
+                DatasetField = 'VISIBLE'
+                TableField = 'VISIBLE'
+              end>
+          end>
+        Name = 'Informe_Detalles'
+        Fields = <
+          item
+            Name = 'ID'
+            DataType = datInteger
+            InPrimaryKey = True
+          end
+          item
+            Name = 'ID_FACTURA'
+            DataType = datInteger
+          end
+          item
+            Name = 'POSICION'
+            DataType = datInteger
+          end
+          item
+            Name = 'TIPO_DETALLE'
+            DataType = datString
+            Size = 10
+          end
+          item
+            Name = 'CONCEPTO'
+            DataType = datString
+            Size = 2000
+          end
+          item
+            Name = 'CANTIDAD'
+            DataType = datInteger
+          end
+          item
+            Name = 'IMPORTE_UNIDAD'
+            DataType = datCurrency
+          end
+          item
+            Name = 'DESCUENTO'
+            DataType = datFloat
+          end
+          item
+            Name = 'IMPORTE_TOTAL'
+            DataType = datCurrency
+          end
+          item
+            Name = 'VISIBLE'
+            DataType = datSmallInt
+          end>
+        ReadOnly = True
+      end>
+    JoinDataTables = <>
+    UnionDataTables = <>
+    Commands = <>
+    RelationShips = <>
+    UpdateRules = <>
+    Version = 0
+    Left = 48
+    Top = 16
+  end
+  object DataDictionary: TDADataDictionary
+    Fields = <>
+    Left = 46
+    Top = 142
+  end
+  object DABin2DataStreamer: TDABin2DataStreamer
+    Left = 48
+    Top = 80
+  end
+  object tbl_Cabecera: TDAMemDataTable
+    RemoteUpdatesOptions = []
+    Fields = <
+      item
+        Name = 'ID'
+        DataType = datInteger
+        Required = True
+        InPrimaryKey = True
+      end
+      item
+        Name = 'ID_EMPRESA'
+        DataType = datInteger
+      end
+      item
+        Name = 'REFERENCIA'
+        DataType = datString
+        Size = 255
+      end
+      item
+        Name = 'TIPO'
+        DataType = datString
+        Size = 1
+      end
+      item
+        Name = 'FECHA_FACTURA'
+        DataType = datDateTime
+      end
+      item
+        Name = 'BASE_IMPONIBLE'
+        DataType = datCurrency
+      end
+      item
+        Name = 'SITUACION'
+        DataType = datString
+        Size = 19
+      end
+      item
+        Name = 'DESCUENTO'
+        DataType = datFloat
+      end
+      item
+        Name = 'IMPORTE_DESCUENTO'
+        DataType = datCurrency
+      end
+      item
+        Name = 'IVA'
+        DataType = datFloat
+      end
+      item
+        Name = 'IMPORTE_IVA'
+        DataType = datCurrency
+      end
+      item
+        Name = 'RE'
+        DataType = datFloat
+      end
+      item
+        Name = 'IMPORTE_RE'
+        DataType = datCurrency
+      end
+      item
+        Name = 'IMPORTE_TOTAL'
+        DataType = datCurrency
+      end
+      item
+        Name = 'OBSERVACIONES'
+        DataType = datMemo
+      end
+      item
+        Name = 'NIF_CIF'
+        DataType = datString
+        Size = 15
+      end
+      item
+        Name = 'ID_CLIENTE'
+        DataType = datInteger
+      end
+      item
+        Name = 'NOMBRE'
+        DataType = datString
+        Size = 255
+      end
+      item
+        Name = 'CALLE'
+        DataType = datString
+        Size = 255
+      end
+      item
+        Name = 'PROVINCIA'
+        DataType = datString
+        Size = 255
+      end
+      item
+        Name = 'POBLACION'
+        DataType = datString
+        Size = 255
+      end
+      item
+        Name = 'CODIGO_POSTAL'
+        DataType = datString
+        Size = 10
+      end
+      item
+        Name = 'RECARGO_EQUIVALENCIA'
+        DataType = datSmallInt
+      end
+      item
+        Name = 'IMPORTE_NETO'
+        DataType = datCurrency
+      end
+      item
+        Name = 'IMPORTE_PORTE'
+        DataType = datCurrency
+      end
+      item
+        Name = 'FORMA_PAGO'
+        DataType = datString
+        Size = 255
+      end>
+    Params = <
+      item
+        Name = 'ID'
+        Value = ''
+        ParamType = daptInput
+      end>
+    LogChanges = False
+    StreamingOptions = [soDisableEventsWhileStreaming]
+    RemoteFetchEnabled = False
+    LocalSchema = schReport
+    LocalDataStreamer = DABin2DataStreamer
+    DetailOptions = [dtCascadeOpenClose, dtCascadeApplyUpdates, dtAutoFetch, dtCascadeDelete, dtCascadeUpdate, dtDisableLogOfCascadeDeletes, dtDisableLogOfCascadeUpdates, dtIncludeInAllInOneFetch]
+    MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates]
+    LogicalName = 'Informe_Cabecera'
+    IndexDefs = <>
+    Left = 168
+    Top = 16
+  end
+  object tbl_Detalles: TDAMemDataTable
+    RemoteUpdatesOptions = []
+    Fields = <
+      item
+        Name = 'ID'
+        DataType = datInteger
+        InPrimaryKey = True
+      end
+      item
+        Name = 'ID_FACTURA'
+        DataType = datInteger
+      end
+      item
+        Name = 'POSICION'
+        DataType = datInteger
+      end
+      item
+        Name = 'TIPO_DETALLE'
+        DataType = datString
+        Size = 10
+      end
+      item
+        Name = 'CONCEPTO'
+        DataType = datString
+        Size = 2000
+      end
+      item
+        Name = 'CANTIDAD'
+        DataType = datInteger
+      end
+      item
+        Name = 'IMPORTE_UNIDAD'
+        DataType = datCurrency
+      end
+      item
+        Name = 'DESCUENTO'
+        DataType = datFloat
+      end
+      item
+        Name = 'IMPORTE_TOTAL'
+        DataType = datCurrency
+      end
+      item
+        Name = 'VISIBLE'
+        DataType = datSmallInt
+      end>
+    Params = <
+      item
+        Name = 'ID_FACTURA'
+        Value = ''
+        ParamType = daptInput
+      end>
+    MasterParamsMappings.Strings = (
+      'ID_PRESUPUESTO=ID_PRESUPUESTO')
+    LogChanges = False
+    StreamingOptions = [soDisableEventsWhileStreaming]
+    RemoteFetchEnabled = False
+    LocalSchema = schReport
+    LocalDataStreamer = DABin2DataStreamer
+    DetailOptions = [dtCascadeOpenClose, dtCascadeApplyUpdates, dtAutoFetch, dtCascadeDelete, dtCascadeUpdate, dtDisableLogOfCascadeDeletes, dtDisableLogOfCascadeUpdates, dtIncludeInAllInOneFetch]
+    MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates]
+    LogicalName = 'Informe_Detalles'
+    IndexDefs = <>
+    Left = 264
+    Top = 16
+  end
+  object tbl_Empresa: TDAMemDataTable
+    RemoteUpdatesOptions = []
+    Fields = <>
+    Params = <
+      item
+        Name = 'ID'
+        Value = '31'
+        ParamType = daptInput
+      end>
+    LogChanges = False
+    StreamingOptions = [soDisableEventsWhileStreaming]
+    RemoteFetchEnabled = False
+    DetailOptions = [dtCascadeOpenClose, dtCascadeApplyUpdates, dtAutoFetch, dtCascadeDelete, dtCascadeUpdate, dtDisableLogOfCascadeDeletes, dtDisableLogOfCascadeUpdates, dtIncludeInAllInOneFetch]
+    MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates]
+    LogicalName = 'Empresa'
+    IndexDefs = <>
+    Left = 168
+    Top = 80
+  end
+end
diff --git a/Source/Modulos/Facturas de cliente/Reports/uRptWordFacturaCliente.pas b/Source/Modulos/Facturas de cliente/Reports/uRptWordFacturaCliente.pas
new file mode 100644
index 00000000..1d4865c7
--- /dev/null
+++ b/Source/Modulos/Facturas de cliente/Reports/uRptWordFacturaCliente.pas	
@@ -0,0 +1,358 @@
+unit uRptWordFacturaCliente;
+
+interface
+
+uses
+  SysUtils, Classes, AHWord97, IB, IBCustomDataSet, IBDatabase,
+  Word2000,
+  uDAInterfaces, uDADataStreamer, uDABin2DataStreamer, uDAClasses,
+  uDAScriptingProvider, uDADataTable, uDAMemDataTable;
+  
+type
+  TRptWordFacturaCliente = class(TDataModule)
+    DABin2DataStreamer: TDABin2DataStreamer;
+    tbl_Cabecera: TDAMemDataTable;
+    tbl_Detalles: TDAMemDataTable;
+    tbl_Empresa: TDAMemDataTable;
+    schReport: TDASchema;
+    DataDictionary: TDADataDictionary;
+    procedure DataModuleCreate(Sender: TObject);
+  private
+    FConnection: IDAConnection;  
+    FPlantilla : string;
+    FWordApp : TWordApp;
+    FDocumento : TWordDoc;
+    FNumCapitulos : Integer;
+    FCodigoFactura : string;
+    FNombreFichero : String;
+    function DarNumCapitulos : Integer;
+    procedure InsertarConceptos(Tabla : Table);
+    function Generar : Boolean;
+    function RellenarCabecera : boolean; virtual;
+    function RellenarInforme : boolean; virtual;
+    procedure _GenerarFactura(const AID: String);	
+  public
+    function Exportar(Codigo, Fichero : String): Boolean;
+    constructor Create (AOwner : TComponent); override;
+    destructor Destroy; override;
+  end;
+
+implementation
+
+{ TRptWordFacturaCliente }
+
+{$R *.dfm}
+
+uses
+  Windows, Variants, Dialogs, uDataModuleServer, uStringsUtils, uSistemaFunc,
+  srvEmpresas_Impl, uROTypes, uROClasses;
+
+const
+  rptInforme = 'AlbaranCliente.rdx';  
+  
+constructor TRptWordFacturaCliente.Create(AOwner: TComponent);
+begin
+  inherited;
+  FDocumento := NIL;
+  FPlantilla := DarRutaInformes + rptInforme;
+end;
+
+function TRptWordFacturaCliente.DarNumCapitulos: Integer;
+var
+  AuxNumCapitulos : integer;
+begin
+  AuxNumCapitulos := 0;
+  tbl_Cabecera.First;
+  while not tbl_Cabecera.Eof do
+  begin
+    if tbl_Cabecera.FieldByName('TIPO_DETALLE').AsString = 'Titulo' then
+      AuxNumCapitulos := AuxNumCapitulos + 1;
+    tbl_Cabecera.Next;
+  end;
+  tbl_Cabecera.First;
+  Result := AuxNumCapitulos;
+end;
+
+destructor TRptWordFacturaCliente.Destroy;
+begin
+  if FDocumento <> NIL then
+    FDocumento.Free;
+  FDocumento := NIL;
+  inherited;
+end;
+
+function TRptWordFacturaCliente.Exportar(Codigo, Fichero: String): Boolean;
+begin
+  if EsCadenaVacia(Fichero) then
+  begin
+    Result := False;
+    raise Exception.Create('Falta indicar el fichero donde se exportará el listado.');
+  end;
+
+  FNombreFichero := Fichero;
+  FCodigoFactura := Codigo;
+  _GenerarFactura(Codigo);
+  Result := True;
+end;
+
+procedure TRptWordFacturaCliente.DataModuleCreate(Sender: TObject);
+begin
+  schReport.ConnectionManager := dmServer.ConnectionManager;
+  FConnection := dmServer.DarNuevaConexion;
+end;
+
+function TRptWordFacturaCliente.Generar : Boolean;
+var
+  Aux : OleVariant;
+begin
+  FWordApp := TWordApp.Create (False, False);
+  with FWordApp do
+  begin
+    Visible := False;
+    ScreenUpdating := False;
+  end;
+
+  FDocumento := TWordDoc.CreateNewDoc(FWordApp, FPlantilla);
+  FWordApp.ScreenUpdating := False;
+  try
+    if not RellenarCabecera then
+      RaiseError('Se producido un error al generar la cabecera en MS Word.');
+
+    if not RellenarInforme then
+      RaiseError('Se producido un error al generar el informe en MS Word.');
+
+    FDocumento.SaveAs(FNombreFichero);
+    FWordApp.CloseApp(wdDoNotSaveChanges);
+    Result := True;
+  finally
+    FDocumento := NIL;
+    FWordApp := NIL;
+  end;
+end;
+
+procedure TRptWordFacturaCliente.InsertarConceptos(Tabla : Table);
+var
+  numRows, numCols, mergeSplit, shiftCells : OleVariant;
+  iContador : Integer;
+  TotalConceptos : Double;
+begin
+  numRows := 2;
+  numCols := 1;
+  mergeSplit := False;
+  shiftCells := False;
+  iContador := 2; // Empezar en la 2ª fila de celdas. La primera es la
+                  // cabecera de la tabla.
+
+  with Tabla, tbl_Detalles do
+  begin
+    while not EOF do
+    begin
+      if FieldByName('TIPO_DETALLE').AsString <> 'Concepto' then
+        Break;
+      // Partir la celda actual en 2 filas de 1 columna.
+      Rows.Item(iContador).Cells.Split (numRows, numCols, mergesplit);
+      Cell(iContador, 1).Range.Text := FieldByName('CONCEPTO').AsString;
+      Cell(iContador, 2).Range.Text := FieldByName('CANTIDAD').AsString;
+      Cell(iContador, 3).Range.Text := FormatFloat(DISPLAY_EUROS2, FieldByName('IMPORTE_UNIDAD').AsFloat);
+      Cell(iContador, 4).Range.Text := FormatFloat(DISPLAY_EUROS2, FieldByName('IMPORTE_TOTAL').AsFloat);
+      TotalConceptos := TotalConceptos + FieldByName('IMPORTE_TOTAL').AsFloat;
+      Next;
+      Inc (iContador);
+    end;
+    // Borrar la fila vacía que sobra
+    Rows.Item(iContador).Cells.Delete(shiftCells);
+    Cell(iContador, 1).Range.Text := 'Total: ' + FormatFloat(DISPLAY_EUROS2, TotalConceptos);
+    AutoFitBehavior(wdAutoFitWindow);
+  end;
+end;
+
+function TRptWordFacturaCliente.RellenarCabecera: boolean;
+var
+  NombreFichero,
+  Texto,
+  FicheroTemporal : String;
+  LinkToFile, SaveWithDocument, _Range : OleVariant;
+  Imagen : InlineShape;
+  _ShiftCells : OleVariant;
+
+begin
+
+  //PARA DIBUJAR EL LOGOTIPO MULTIEMPRESA
+  {---------------------------  PENDIENTE
+  if (EmpresaActiva.Logotipo <> Nil) then
+  begin
+    //Activamos cabecera
+    FWordApp.Application.ActiveWindow.ActivePane.View.SeekView := wdSeekCurrentPageHeader;
+    LinkToFile := False;
+    SaveWithDocument := True;
+    _Range := EmptyParam;
+    FicheroTemporal := DarFicheroTemporal;
+    EmpresaActiva.Logotipo.SaveToFile (FicheroTemporal);
+    Imagen := FWordApp.Application.ActiveWindow.ActivePane.Selection.InlineShapes.AddPicture(ficherotemporal, LinkToFile, SaveWithDocument, _Range);
+
+    //Formateamos imagen
+    if ((Imagen.Get_Width > ANCHO_LOGO_INF)) then
+    begin
+      Imagen.Set_Height(((ANCHO_LOGO_INF * Imagen.Get_Height) /Imagen.Get_Width));
+      Imagen.Set_Width(ANCHO_LOGO_INF);
+    end;
+  end;
+  ----------------------------  }
+  
+  with FDocumento, tbl_Cabecera do
+  begin
+    ReplaceBookmark('CodigoFacturaCab', FCodigoFactura);
+    ReplaceBookmark('FechaFacturaCab', FieldByName('FECHA_FACTURA').AsString);
+    ReplaceBookmark('VencimientoCab', ''{FieldByName('FECHAVENCIMIENTO').AsString});
+    ReplaceBookmark('FormaPagoCab', FieldByName('FORMA_PAGO').AsString);
+    ReplaceBookmark('BancoCab', ''{FieldByName('BANCO').AsString});
+
+    ReplaceBookmark('NombreClienteCab', FieldByName('NOMBRE').AsString);
+    ReplaceBookmark('CIFClienteCab', FieldByName('NIF_CIF').AsString);
+
+    ReplaceBookmark('DireccionClienteCab', FieldByName('CALLE').AsString);
+    ReplaceBookmark('PoblacionClienteCab',
+       FieldByName('CODIGO_POSTAL').AsString + ' ' +
+       FieldByName('POBLACION').AsString + ' ' + FieldByName('PROVINCIA').AsString);
+
+    ReplaceBookmark('BaseImponible', FormatFloat(DISPLAY_EUROS2, FieldByName('BASE_IMPONIBLE').AsFloat));
+    // ???????? ReplaceBookmark('BaseImponible2', FormatFloat(DISPLAY_EUROS2, FieldByName('BASE_IMPONIBLE2').AsFloat);    
+
+    if (FieldByName('DESCUENTO').AsInteger = 0) then
+    begin
+      ReplaceBookmark('BaseImponibleTexto', 'Base imponible');
+      FWordApp.GotoBookmark('CeldasDescuento');
+      _ShiftCells := wdDeleteCellsShiftLeft;
+      FWordApp.Application.Selection.Cells.Delete(_ShiftCells);
+    end
+    else begin
+      ReplaceBookmark('Descuento', FieldByName('DESCUENTO').AsString);
+      ReplaceBookmark('ImporteDto', FormatFloat(DISPLAY_EUROS2, FieldByName('IMPORTE_DESCUENTO').AsFloat));
+    end;
+    if EsCadenaVacia(FieldByName('IVA').AsString) then
+      ReplaceBookmark('IVA', '0')
+    else
+      ReplaceBookmark('IVA', FieldByName('IVA').AsString);
+    ReplaceBookmark('ImporteIVA', FormatFloat(DISPLAY_EUROS2, FieldByName('IMPORTE_IVA').AsFloat));
+    ReplaceBookmark('ImporteTotal', FormatFloat(DISPLAY_EUROS2, FieldByName('IMPORTE_TOTAL').AsFloat));
+
+    Texto := FieldByName('OBSERVACIONES').AsString;
+    if not EsCadenaVacia(Texto) then
+    begin
+      NombreFichero := DarFicheroTemporal;
+      EscribirEnFichero(NombreFichero, Texto);
+      FWordApp.InsertFile(NombreFichero, 'Descripcion');
+      SysUtils.DeleteFile(NombreFichero);
+    end;
+
+    ReplaceBookmark('NombreEmpresa', tbl_Empresa.FieldByName('NOMBRE').AsString);
+    ReplaceBookmark('CifEmpresa', tbl_Empresa.FieldByName('NIF_CIF').AsString);
+    ReplaceBookmark('DireccionEmpresa',
+      Format('%s. %s %s', [tbl_Empresa.FieldByName('CALLE').AsString,
+      tbl_Empresa.FieldByName('CODIGO_POSTAL').AsString, tbl_Empresa.FieldByName('POBLACION').AsString]));
+    ReplaceBookmark('TelefonoEmpresa', tbl_Empresa.FieldByName('TELEFONO_1').AsString);
+    ReplaceBookmark('FaxEmpresa', tbl_Empresa.FieldByName('FAX').AsString);
+    ReplaceBookmark('CorreoEmpresa', tbl_Empresa.FieldByName('EMAIL_1').AsString);
+
+    ReplaceBookmark('DatosRegistroMercantil', tbl_Empresa.FieldByName('REGISTRO_MERCANTIL').AsString);
+    Close;
+  end;
+  Result := True;
+end;
+
+function TRptWordFacturaCliente.RellenarInforme : boolean;
+var
+  numRows, numCols, mergesplit : OleVariant;
+  iRowCount : Integer;
+  TipoConAnterior : String;
+  Seleccion : TWordRange;
+  TotalCapitulo : Double;
+  EsCapitulo : Boolean;
+begin
+  Result := False;
+  iRowCount := 2;
+  numrows := 2;
+  numcols := 1;
+  mergeSplit := False;
+  TipoConAnterior := '';
+  TotalCapitulo := 0;
+  EsCapitulo := False;
+
+  with FDocumento.Document.Tables.Item(1), tbl_detalles do
+  begin
+    First;
+    while not tbl_detalles.EOF do
+    begin
+        if (TipoConAnterior = 'Concepto') and (FieldByName('TIPO_DETALLE').AsString = 'Titulo') then
+        begin
+          Rows.Item (iRowCount).Cells.Split (numRows, numCols, mergesplit);
+          if EsCapitulo then
+          begin
+            Rows.Item (iRowCount).Cells.Split (numRows, numCols, mergesplit);
+            Cell(iRowCount, 2).Range.Text := 'TOTAL DEL CAPÍTULO';
+            Cell(iRowCount, 5).Range.Text := FormatFloat(DISPLAY_EUROS2, TotalCapitulo);
+            TotalCapitulo := 0;
+            Inc (iRowCount);
+          end;
+          Inc (iRowCount);
+        end;
+        Rows.Item (iRowCount).Cells.Split (numRows, numCols, mergesplit);
+        if FieldByName('TIPO_DETALLE').AsString = 'Titulo' then
+        begin
+          Cell(iRowCount, 2).Range.Text := FieldByName('CONCEPTO').AsString;
+          Rows.Item(iRowCount).Select;
+          Seleccion := FDocumento.AddRangeFromSelection;
+          Seleccion.Bold := True;
+          TotalCapitulo := 0;
+          EsCapitulo := True;
+        end
+        else begin
+          Cell(iRowCount, 1).Range.Text := FieldByName('REFERENCIA').AsString;
+          Cell(iRowCount, 2).Range.Text := FieldByName('CONCEPTO').AsString;
+          Cell(iRowCount, 3).Range.Text := FieldByName('CANTIDAD').AsString; { + ' ' +
+                                           FieldByName('UNIDADESMEDIDA').AsString;}
+          Cell(iRowCount, 4).Range.Text := FormatFloat(DISPLAY_EUROS2, FieldByName('IMPORTE_UNIDAD').AsFloat);
+          Cell(iRowCount, 5).Range.Text := FormatFloat(DISPLAY_EUROS2, FieldByName('IMPORTE_TOTAL').AsFloat);
+          TotalCapitulo := TotalCapitulo + FieldByName('IMPORTE_TOTAL').AsFloat;
+        end;
+        TipoConAnterior := FieldByName('TIPO_DETALLE').AsString;
+        Next;
+        Inc (iRowCount);
+    end;
+    if EsCapitulo then
+    begin
+      Rows.Item (iRowCount).Cells.Split (numRows, numCols, mergesplit);
+      Cell(iRowCount, 2).Range.Text := 'TOTAL DEL CAPÍTULO';
+      Cell(iRowCount, 5).Range.Text := FormatFloat(DISPLAY_EUROS2, TotalCapitulo);
+      TotalCapitulo := 0;
+    end;
+    Close;
+  end;
+  Result := True;
+end;
+
+procedure TRptWordFacturaCliente._GenerarFactura(const AID: String);
+var
+  ACopiaPlantilla : String;
+begin
+  tbl_Cabecera.ParamByName('ID').AsString := AID;
+  tbl_Detalles.ParamByName('ID_FACTURA').AsString := AID;
+
+  tbl_Cabecera.Active := True;
+  tbl_Detalles.Active := True;
+
+  FCodigoFactura := AID;
+
+  ACopiaPlantilla := DarFicheroTemporal;
+  CopiarFichero(FPlantilla, ACopiaPlantilla);
+  FPlantilla := ACopiaPlantilla;
+  try
+    if RecuperarEmpresa(tbl_Cabecera.FieldByName('ID_EMPRESA').AsInteger, tbl_Empresa) then
+      Generar;
+  finally
+    SysUtils.DeleteFile(ACopiaPlantilla);
+  end;
+end;
+
+
+end.
diff --git a/Source/Modulos/Facturas de cliente/Servidor/srvFacturasCliente_Impl.pas b/Source/Modulos/Facturas de cliente/Servidor/srvFacturasCliente_Impl.pas
index 1a14d34d..ff582306 100644
--- a/Source/Modulos/Facturas de cliente/Servidor/srvFacturasCliente_Impl.pas	
+++ b/Source/Modulos/Facturas de cliente/Servidor/srvFacturasCliente_Impl.pas	
@@ -36,17 +36,18 @@ type
   protected
     { IsrvFacturasCliente methods }
     function GenerateReport(const FacturaID: String): Binary;
+    function GenerateReportEnWord(const ID: Integer): Binary;    
   end;
 
 implementation
 
 {$R *.dfm}
 uses
-  {Generated:} FactuGES_Invk, Dialogs,
+  {Generated:} FactuGES_Invk, Dialogs, uSistemaFunc,
   uDataModuleServer, uDatabaseUtils, uUsersManager, schFacturasClienteClient_Intf,
   uRestriccionesUsuarioUtils,
 //  uRptFacturasCliente_Server,
-  uBizFacturasClienteServer;
+  uBizFacturasClienteServer, uRptWordFacturaCliente;
 
 procedure Create_srvFacturasCliente(out anInstance : IUnknown);
 begin
@@ -95,6 +96,26 @@ begin
   }
 end;
 
+function TsrvFacturasCliente.GenerateReportEnWord(const ID: Integer): Binary;
+var
+  AReportGenerator : TRptWordFacturaCliente;
+  AFicheroTMP : TFileName;
+begin
+  Result := NIL;
+  AFicheroTMP := DarFicheroTemporal;
+  AReportGenerator := TRptWordFacturaCliente.Create(nil);
+  try
+    if AReportGenerator.Exportar(IntToStr(ID), AFicheroTMP) then
+    begin
+      Result := Binary.Create;
+      Result.LoadFromFile(AFicheroTMP);
+      SysUtils.DeleteFile(AFicheroTMP)
+    end;
+  finally
+    FreeAndNIL(AReportGenerator);
+  end;
+end;
+
 initialization
   TROClassFactory.Create('srvFacturasCliente', Create_srvFacturasCliente, TsrvFacturasCliente_Invoker);
 
diff --git a/Source/Servicios/FactuGES.RODL b/Source/Servicios/FactuGES.RODL
index d6d379d8..dc49ae00 100644
--- a/Source/Servicios/FactuGES.RODL
+++ b/Source/Servicios/FactuGES.RODL
@@ -242,6 +242,14 @@
 </Parameter>
 </Parameters>
 </Operation>
+<Operation Name="GenerateReportEnWord" UID="{04A25AE7-9AC6-474F-9A4A-04D8292959E6}">
+<Parameters>
+<Parameter Name="Result" DataType="Binary" Flag="Result">
+</Parameter>
+<Parameter Name="ID" DataType="Integer" Flag="In" >
+</Parameter>
+</Parameters>
+</Operation>
 </Operations>
 </Interface>
 </Interfaces>
diff --git a/Source/Servicios/FactuGES_Intf.pas b/Source/Servicios/FactuGES_Intf.pas
index aa06f252..5adef2ee 100644
--- a/Source/Servicios/FactuGES_Intf.pas
+++ b/Source/Servicios/FactuGES_Intf.pas
@@ -453,6 +453,7 @@ type
   IsrvFacturasCliente = interface(IDataAbstractService)
     ['{56B4FFF0-AB1B-46B2-BA16-ABD5360F6311}']
     function GenerateReport(const FacturaID: String): Binary;
+    function GenerateReportEnWord(const ID: Integer): Binary;
   end;
 
   { CosrvFacturasCliente }
@@ -466,6 +467,7 @@ type
     function __GetInterfaceName:string; override;
 
     function GenerateReport(const FacturaID: String): Binary;
+    function GenerateReportEnWord(const ID: Integer): Binary;
   end;
 
   { IsrvFacturasProveedor }
@@ -1317,6 +1319,23 @@ begin
   end
 end;
 
+function TsrvFacturasCliente_Proxy.GenerateReportEnWord(const ID: Integer): Binary;
+begin
+  try
+    result := nil;
+    __Message.InitializeRequestMessage(__TransportChannel, 'FactuGES', __InterfaceName, 'GenerateReportEnWord');
+    __Message.Write('ID', TypeInfo(Integer), ID, []);
+    __Message.Finalize;
+
+    __TransportChannel.Dispatch(__Message);
+
+    __Message.Read('Result', TypeInfo(Binary), result, []);
+  finally
+    __Message.UnsetAttributes(__TransportChannel);
+    __Message.FreeStream;
+  end
+end;
+
 { CosrvFacturasProveedor }
 
 class function CosrvFacturasProveedor.Create(const aMessage: IROMessage; aTransportChannel: IROTransportChannel): IsrvFacturasProveedor;
diff --git a/Source/Servicios/FactuGES_Invk.pas b/Source/Servicios/FactuGES_Invk.pas
index e403e0ae..56b4951c 100644
--- a/Source/Servicios/FactuGES_Invk.pas
+++ b/Source/Servicios/FactuGES_Invk.pas
@@ -133,6 +133,7 @@ type
   protected
   published
     procedure Invoke_GenerateReport(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
+    procedure Invoke_GenerateReportEnWord(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
   end;
 
   TsrvFacturasProveedor_Invoker = class(TDataAbstractService_Invoker)
@@ -522,6 +523,34 @@ begin
   end;
 end;
 
+procedure TsrvFacturasCliente_Invoker.Invoke_GenerateReportEnWord(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
+{ function GenerateReportEnWord(const ID: Integer): Binary; }
+var
+  ID: Integer;
+  lResult: Binary;
+  __lObjectDisposer: TROObjectDisposer;
+begin
+  lResult := nil;
+  try
+    __Message.Read('ID', TypeInfo(Integer), ID, []);
+
+    lResult := (__Instance as IsrvFacturasCliente).GenerateReportEnWord(ID);
+
+    __Message.InitializeResponseMessage(__Transport, 'FactuGES', 'srvFacturasCliente', 'GenerateReportEnWordResponse');
+    __Message.Write('Result', TypeInfo(Binary), lResult, []);
+    __Message.Finalize;
+    __Message.UnsetAttributes(__Transport);
+
+  finally
+    __lObjectDisposer := TROObjectDisposer.Create(__Instance);
+    try
+      __lObjectDisposer.Add(lResult);
+    finally
+      __lObjectDisposer.Free();
+    end;
+  end;
+end;
+
 { TsrvFacturasProveedor_Invoker }
 
 procedure TsrvFacturasProveedor_Invoker.Invoke_GenerateReport(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
diff --git a/Source/Servicios/RODLFILE.res b/Source/Servicios/RODLFILE.res
index 74f27a538093a75ccc39a914ed2ee321494e3e4e..8c757af03e081b7e5a5e210a15dcb4ea07daf238 100644
GIT binary patch
delta 73
zcmX@Thw;Wf#t8~c9Pt~KjIAg4+v}(pm^d1lI=Y(cS~@zL>6)0ExB*!vj=BaWE*3_X
cMwX_Qu4a=r3Ykw{VCFLUf=T!0dDd%{056ml#Q*>R

delta 24
gcmcbykMZ;##t8~czhgHl8Cy>d@bcWe+Ged10Eg=eN&o-=

diff --git a/Source/Servidor/FactuGES_Server.dpr b/Source/Servidor/FactuGES_Server.dpr
index 9de6c583..044397ec 100644
--- a/Source/Servidor/FactuGES_Server.dpr
+++ b/Source/Servidor/FactuGES_Server.dpr
@@ -112,7 +112,8 @@ uses
   schReferenciasServer_Intf in '..\Modulos\Referencias\Model\schReferenciasServer_Intf.pas',
   schReferenciasClient_Intf in '..\Modulos\Referencias\Model\schReferenciasClient_Intf.pas',
   uRptFichasEmpleado_Server in '..\Modulos\Contactos\Reports\uRptFichasEmpleado_Server.pas' {RptFichasEmpleado: TDataModule},
-  uRptEtiquetasContacto_Server in '..\Modulos\Contactos\Reports\uRptEtiquetasContacto_Server.pas' {RptEtiquetasContacto: TDataModule};
+  uRptEtiquetasContacto_Server in '..\Modulos\Contactos\Reports\uRptEtiquetasContacto_Server.pas' {RptEtiquetasContacto: TDataModule},
+  uRptWordFacturaCliente in '..\Modulos\Facturas de cliente\Reports\uRptWordFacturaCliente.pas' {RptWordFacturaCliente: TDataModule};
 
 {$R *.res}
 {$R ..\Servicios\RODLFile.res}
diff --git a/Source/Servidor/FactuGES_Server.dproj b/Source/Servidor/FactuGES_Server.dproj
index b46792b0..cf71a968 100644
--- a/Source/Servidor/FactuGES_Server.dproj
+++ b/Source/Servidor/FactuGES_Server.dproj
@@ -36,6 +36,12 @@
     <Borland.ProjectType />
     <BorlandProject>
 <BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">1</VersionInfo><VersionInfo Name="MinorVer">0</VersionInfo><VersionInfo Name="Release">0</VersionInfo><VersionInfo Name="Build">0</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">3082</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName"></VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">1.0.0.0</VersionInfoKeys><VersionInfoKeys Name="InternalName"></VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName"></VersionInfoKeys><VersionInfoKeys Name="ProductVersion"></VersionInfoKeys><VersionInfoKeys Name="Comments"></VersionInfoKeys><VersionInfoKeys Name="CompileDate"></VersionInfoKeys></VersionInfoKeys><Excluded_Packages>
+      
+      
+      
+      
+      
+      
       <Excluded_Packages Name="C:\Documents and Settings\All Users\Documentos\RAD Studio\5.0\Bpl\dxPSCoreD10.bpl">ExpressPrinting System by Developer Express Inc.</Excluded_Packages>
       <Excluded_Packages Name="$(BDS)\bin\dcloffice2k100.bpl">Microsoft Office 2000 Sample Automation Server Wrapper Components</Excluded_Packages>
       <Excluded_Packages Name="$(BDS)\bin\dclofficexp100.bpl">Microsoft Office XP Sample Automation Server Wrapper Components</Excluded_Packages>
@@ -114,6 +120,10 @@
       <Form>RptFacturasCliente</Form>
       <DesignClass>TDataModule</DesignClass>
     </DCCReference>
+    <DCCReference Include="..\Modulos\Facturas de cliente\Reports\uRptWordFacturaCliente.pas">
+      <Form>RptWordFacturaCliente</Form>
+      <DesignClass>TDataModule</DesignClass>
+    </DCCReference>
     <DCCReference Include="..\Modulos\Facturas de cliente\Servidor\srvFacturasCliente_Impl.pas">
       <Form>srvFacturasCliente</Form>
       <DesignClass>TDataAbstractService</DesignClass>
diff --git a/Source/Servidor/FactuGES_Server.groupproj b/Source/Servidor/FactuGES_Server.groupproj
index 25d9bbbc..d86d61e8 100644
--- a/Source/Servidor/FactuGES_Server.groupproj
+++ b/Source/Servidor/FactuGES_Server.groupproj
@@ -4,7 +4,6 @@
   </PropertyGroup>
   <ItemGroup />
   <ItemGroup>
-    <Projects Include="C:\Archivos de programa\RemObjects Software\RemObjects SDK for Delphi\Samples\Named Pipes\NamedPipeServer.dproj" />
     <Projects Include="FactuGES_Server.dproj" />
   </ItemGroup>
   <ProjectExtensions>
@@ -22,23 +21,14 @@
   <Target Name="FactuGES_Server:Make">
     <MSBuild Projects="FactuGES_Server.dproj" Targets="Make" />
   </Target>
-  <Target Name="NamedPipeServer">
-    <MSBuild Projects="C:\Archivos de programa\RemObjects Software\RemObjects SDK for Delphi\Samples\Named Pipes\NamedPipeServer.dproj" Targets="" />
-  </Target>
-  <Target Name="NamedPipeServer:Clean">
-    <MSBuild Projects="C:\Archivos de programa\RemObjects Software\RemObjects SDK for Delphi\Samples\Named Pipes\NamedPipeServer.dproj" Targets="Clean" />
-  </Target>
-  <Target Name="NamedPipeServer:Make">
-    <MSBuild Projects="C:\Archivos de programa\RemObjects Software\RemObjects SDK for Delphi\Samples\Named Pipes\NamedPipeServer.dproj" Targets="Make" />
-  </Target>
   <Target Name="Build">
-    <CallTarget Targets="FactuGES_Server;NamedPipeServer" />
+    <CallTarget Targets="FactuGES_Server" />
   </Target>
   <Target Name="Clean">
-    <CallTarget Targets="FactuGES_Server:Clean;NamedPipeServer:Clean" />
+    <CallTarget Targets="FactuGES_Server:Clean" />
   </Target>
   <Target Name="Make">
-    <CallTarget Targets="FactuGES_Server:Make;NamedPipeServer:Make" />
+    <CallTarget Targets="FactuGES_Server:Make" />
   </Target>
   <Import Condition="Exists('$(MSBuildBinPath)\Borland.Group.Targets')" Project="$(MSBuildBinPath)\Borland.Group.Targets" />
 </Project>
\ No newline at end of file