From 8142d7457b0a3fb28f8e2180aef28f07801349da Mon Sep 17 00:00:00 2001 From: roberto Date: Thu, 6 Dec 2007 16:22:11 +0000 Subject: [PATCH] Subida de contabilidad (aun queda bastante) git-svn-id: https://192.168.0.254/svn/Proyectos.Acana_FactuGES2/trunk@48 f4e31baf-9722-1c47-927c-6f952f962d4b --- Build/Build.fbl5 | Bin 2752512 -> 2752512 bytes Database/scripts/SCRIPT_CONTABILIDAD.SQL | 37 + .../Contabilidad/Contabilidad_Group.groupproj | 54 +- .../Controller/Contabilidad_controller.dpk | 4 +- .../Controller/Contabilidad_controller.dproj | 2 + .../Controller/View/uIEditorBalance.pas | 2 +- .../Controller/View/uIEditorBalances.pas | 7 +- .../View/uIEditorCuentasEspeciales.pas | 7 +- .../View/uIEditorElegirBalances.pas | 26 + .../View/uIEditorElegirCuentasEspeciales.pas | 26 + .../Controller/uBalancesController.pas | 40 +- .../Controller/uCuentasController.pas | 97 +- .../uCuentasEspecialesController.pas | 42 +- .../Controller/uEpigrafesController.pas | 60 +- .../Data/uDataModuleContabilidad.dfm | 49 +- .../Model/schContabilidadClient_Intf.pas | 288 ++- .../Model/schContabilidadServer_Intf.pas | 330 +++- .../Contabilidad/Model/uBizBalances.pas | 23 +- .../Contabilidad/Model/uBizCuentas.pas | 23 +- .../Model/uBizCuentasEspeciales.pas | 23 +- .../Contabilidad/Model/uBizEpigrafes.pas | 23 +- .../Servidor/srvContabilidad_Impl.dfm | 339 +++- .../Servidor/srvContabilidad_Impl.pas | 2 + .../Contabilidad/Views/Contabilidad_view.dpk | 6 +- .../Views/Contabilidad_view.dproj | 16 + .../Views/uContabilidadViewRegister.pas | 7 +- .../Contabilidad/Views/uEditorBalances.dfm | 1641 +++++++++++++++-- .../Contabilidad/Views/uEditorBalances.pas | Bin 5572 -> 4306 bytes .../Contabilidad/Views/uEditorCuenta.pas | 2 + .../Views/uEditorCuentasEspeciales.dfm | 1621 ++++++++++++++-- .../Views/uEditorCuentasEspeciales.pas | Bin 6170 -> 4885 bytes .../Views/uEditorElegirBalances.dfm | 257 +++ .../Views/uEditorElegirBalances.pas | 126 ++ .../Views/uEditorElegirCuentasEspeciales.dfm | 257 +++ .../Views/uEditorElegirCuentasEspeciales.pas | 126 ++ .../Views/uEditorElegirEpigrafes.dfm | 4 +- .../Views/uEditorElegirEpigrafes.pas | 2 +- .../Contabilidad/Views/uEditorEpigrafe.pas | 2 + .../Contabilidad/Views/uViewBalances.dfm | 117 ++ .../Contabilidad/Views/uViewBalances.pas | 82 + .../Contabilidad/Views/uViewCuenta.dfm | 72 +- .../Contabilidad/Views/uViewCuenta.pas | 47 +- .../Views/uViewCuentasEspeciales.dfm | 97 + .../Views/uViewCuentasEspeciales.pas | 76 + .../Contabilidad/Views/uViewEpigrafe.dfm | 1 + .../Contabilidad/Views/uViewEpigrafe.pas | 28 +- Source/Servidor/FactuGES_Server.RES | Bin 23216 -> 23208 bytes Source/Servidor/FactuGES_Server.rc | 2 +- 48 files changed, 5571 insertions(+), 522 deletions(-) create mode 100644 Source/Modulos/Contabilidad/Controller/View/uIEditorElegirBalances.pas create mode 100644 Source/Modulos/Contabilidad/Controller/View/uIEditorElegirCuentasEspeciales.pas create mode 100644 Source/Modulos/Contabilidad/Views/uEditorElegirBalances.dfm create mode 100644 Source/Modulos/Contabilidad/Views/uEditorElegirBalances.pas create mode 100644 Source/Modulos/Contabilidad/Views/uEditorElegirCuentasEspeciales.dfm create mode 100644 Source/Modulos/Contabilidad/Views/uEditorElegirCuentasEspeciales.pas create mode 100644 Source/Modulos/Contabilidad/Views/uViewBalances.dfm create mode 100644 Source/Modulos/Contabilidad/Views/uViewBalances.pas create mode 100644 Source/Modulos/Contabilidad/Views/uViewCuentasEspeciales.dfm create mode 100644 Source/Modulos/Contabilidad/Views/uViewCuentasEspeciales.pas diff --git a/Build/Build.fbl5 b/Build/Build.fbl5 index 7ffabc41f1bba885aafe4047007b6a5e3e8601da..00ef91471b57c748dc1e57ea5a5d6c66d2169a47 100644 GIT binary patch delta 172008 zcmeFa3w%x2wm-ht&O=^1FWHZk1c^ih35gwTXpj&DL83uukPw6h2|+~II|MCsl(Xz9^5ZKJfM$0J&8X*YgjtTpHAj|KI)HdwTx&%IC8(GQM-o zG2e5|`5kku7>(7O5iXaZsexS;@YCtJ!!92_R#s}3eEyhx{+R3H(&;(G6^d?p5~oyZ zj)p25A1gaOM^1+ZZzo9^+EK?iyKf$Oy<$`-!kiQef4H>+T(P9-v7JteJ@O|Z_MT9C zr32m;M&hox_>ub1;4<64z`Btn*}K>;4|B9Pg*iGjJWzJ&VVSby)kmtOkeZfWK9H)T z4sV*#+NJfL&=yK^$iu~+TPjAfnH;24Y6^91(fHtrqB(x^hy*BI?8()~PVJmoT`XVf z<$To3jO$XJsV#9m=wZs4=$fuIHEwcE@ix^L zxOQ_hojB_V6dLa71^_t5y=W42J%4%|ILTfy0nqH}SrQ(&m zS0Y}~y>kEM>X*x2&UrcD>Qq`F(Ry882d zr}ypHH)-F9ef{=D?hD-KwU66(ckh+G7xtdmyLs=_y~%qc_j>Jpu;=qVrww}!@7b}Z ze9!znqxVGa3Ebnghud>&_odwY zbL`H6JG<}fuv4}3!HyF<_UzcOW9g2mJ4WnK@8EXat-4Zmw(4+IZq?YTAyqxA0;^P2 zXSW~TzGHj&_Bq=#wg+xkZGX7!*0u}VPHijNW|+Qh?6x7>BDb~L_SM$+ww~C!f9vM0 zE4EJEn!L69R_Co>RlZlbzp}its4}@St}?Pxsd$@zlRwEH<6q+s@-Opy`JMbWeha^m zU&pWESMtmF#rz_^fS=3H;%D&F_{sbPejGoBAIT5rhw_8?{(K+47vF<_hVROE<~#Bs z2EHxdn)l^3yf^R8yYP;@l7FQ8UH7Z*C*5t`kGk)5-|D{BeWCkI_lfQ!-TS(Cb#Lq5 z)Sc8F)4irUsC!wrSGQBQO}9n2QMXRFMz>P8Ot)CKNLQentDB{pp_`_gtec=4ryHXi zsT-~vsvD&1uj`}hrR$-4M%Pu>S=Ui#2+_6GwbuFSG&*mcyUs-iy;k=~`@8m6?N8d< z+8?#wYroZgt^Gp#nf4RyN80zb?`q%HzNtN_J*It4dr58S zPHK*6Ueg@ZysX))*{Rv4*`nE~S*KZ}S*cm3S*%&4DbUQ-%+k!zOw&x(Owf$ejM0qL z4A%_R4AS)1^wIRv^w2z`>8k0hF?7^~XxeI8YkV~tjkm^KMzuvsXtMFq<&xhuKI2Do9dJ5W9rw`2h}gD_o{cQx2d%gE*Qi&j zm#G)47pV)>bJerdGt|@6lhqT{_Hd#U=R%$E{h3VZ3=mWx}?Y^mN-wk2na{}%f#*EUyfF5aBE*?+U!X7i@T zP3JaMZ%Wz}y-By}JUK!tNIZ!m!Ni{2+<1Ot@y6_pi5s0ZHf^ZiP`V*+L&^sG4L2*! zR}@xcR>W5*Dz2|Tx4w9N-ule-3F{-)d#*pX?$Eljb%};`QR{rxohh#=FD*|fk0|#n zKVMc`R#R41W-QAoOD{_(3oUC}dwK2gwZ^qsYZKNwt!-LUzov3c@tVvvVQc)?xUDg- zzP9?z>eAJDt5a6{ueM)(t#o&3X=!$8bZJ1TqV(LV7H4tcYI`wZeaex#UbqO-X43p+{U@*=hn_Go|`u}b8ggJ|GDNl z4Rg-Vshv|Zr(#atoQOFAbDZW}&)c0>nwOmyny1Ti%DXxH;_M@{vuCHwjxx+{nss^B z@mX23l4eEBx|w@1_egF|ZhCG~Zd7h?u1~Ig?#-O@ITbmDIcYh;Ic_;OXV%QDn3*>- zc4p{IrSi38Q8lAvM%Ijo8M+zwr`Judo?bFNVS2=L&*=@>XR>!^XJ@BnCuYZF z2WQ)7pMUYlixn@Xy%_&u@Qc@`ou5`S&5%DWeOl}^r)l@6UY~k-YTeYTsaaE#rbbLP zXI;xWlU1CRot2oS%Ti=DPN|tvIi++;;grlN@l%|pG)=CbylJv=a{6Td$@Y`4O{$qx zF)43S%%reM{*&A$-OId~S&>6CeWV%5ZwiCGiFCi+agH{tk%>Is`B6i>*T zkU1g6Fd=?I)P&#(ZWC^1)Mo6?D9*^tNX!V!@X4^xxR-t{{d{^&dU1MQdS-e`dTe@V zdiD5<@rC2f;~K}EA9rY6#kl-&Y2y;cMUM*|=Qi&C*h6D0$Ci#Q9GgBiaje_e`)SwH zE~nL|Ri|a8rKTmMMWlJA)xU83g-tJ{y%7IG@CyxN&Wtha9+NdDX-veJd!w(7zBu~K z=p&S(L;1Y8WYbYRww2prY9yP#w3O%`X{<2-Wz;zuyJtK;Do`7!Pf_! z8&o(bdr;b-*g>I#oCX~lxM^Viz_5Wn1MekNCu~Y6Nyth_N{C3fHsJh#ngNE)0f_^` z23+o6*T1TNYX8{&0sSxcJJ;`czsi2a{WAOM`YHM~#&3!@#;3=-#oz0Dv2SVLyuK-Y z-TIpQ-0X9)Pi>#dJ_&sy`gr!KjoTep92XN89A_U_8(R}w8EcHqiA|49ij9ud#h&YZ zsCQZK#NJW8eR`koRoknkS6Q$8Ua7t8TlTuy^L)?Zp4mMUd)oKB7jrGK?^MUDBV`AJy;Cuhvi3hwIh)U%H;?x}$4R z*X~^dyK-I6MjnV<9hn>%7a18D80i(sMc$40JmN&e^oS7=-6C#uxzOcsmy9k0yL9OC zRp+yv_jDfHxnJjYoiBx-3f~%@9Ns;g5C1Uis3B}a*pRSpVd}8co%VNH(W!f!~pYP-?x2DalLlLwQkk=VXLF9wzgW>s#~jet<JI8F zKJWSL_sQ@{_KEXp=cDqu)pA42g)PUn^lJIQ`*ZIV-t)budJpuD^!D<8&+D*Pxz`Y{ zZeD7y3!W!DH+v5BjP&&KG@SO>@3F$8pGUZd%Huuv6Yl%nSG&(~AK|WY|3!64Rj!(^ z8m)3x-F3U*w%Tou+Xy!=H_q*@>m}E-u18(>xUP1c?%K_@mFq*7vn~f*R=W&w>E@z# zx#Iku^M2=C=M3j$=Q!sM&d$ykoK84xcFJ%X=+wdKMvDtA4!2m?Vp5BKEmVdU4;^ng ze&u-9agXD4#}SU*93MJ-=Wy0xsl#-KAr8C)=WxY-zx`(W754M(GwkE+o$c@1U9j6~ zx72QuT{}CK-7Vz_7e|M+s~DAxm8XjCY^RBU*px~+2ngJ!iAqvfA@L?qZLzM60qjWWqCu@j9JQ@NB% z(WpIGv$K}P!;3s3g5}nXGF8ua!IHnCb|2xFb}Bwol3EamVqIw1qt-W zz9Za?y;RoicMP`dp~h=sPvw@;>RwJ|Nwez5v`1UB zcHj@8GTW~g(pR7)J<6dn(_El3CqtA;)}obisz{ab{30<{&Ju_I&ma z3z2-RMZ6Fq|dSn%k39zR@iA*bX{t*2+71L+WjGpRw_AvTKBD} zY)#szR1b9>z(j~OGlx@!CSCZUn5kbs7Bh8+W}=D8yUj9%b5bvB)*^@Dykw*ugGnxu zW~M8ZdMd>ZqErxf57k_UuVMJMA{?hulWiWV&vf39!hLHK6{i%YmWXL$(W&HKrg?mY z${IV;=n36<0ocj6mfOnZs;+KXCb1zmoP>s4d>gu73f!A)?f$?KLb`#vlxFES4 zTAExcXW5ekZX8;iezEXa%jLa+Mt^Q$s~f13Ol`eB4Z7q$<{m zxe`Xov>H`gQ>jLks?<$~cveSvQM?du;zluE8H{xD?fW>wco<<5Aez-#&h0$3i~Vdd z63%sGODqhq*IXioJ1*D7hW9a(7a>%Z`+^f=ZqW zcC1!%hAfy$ZV*0Iai|MOq zdhS$u*ps?IsE16jVYT(SJYibC2hTQK+tgypv)rMx)wWeNa=Mie&+60k!`4EMcRUdL zP3uPx?{|NEHnxM#))%5#9dTE_7P4L8D<(%r9@mp*w-=SY;n~;@2K6u)%powSzfxdl z+>LbzkRZb`d*Oq2Gh{|9pMdLrg8c|#*neK$DhH%PXgw@wvhjS3n zirn3+(vtd)kgO*piydFq*^(nLS;ZEyvm0}!h>g9QmSGQ-dz+Q%0$6_q2X36{$4;uY zoUV_pMhSElCN8?JRnW%adeBllM`esX$q$D{DN&F|;jqx#0`@jr%kF7j=u@e%z{90& zU>8{Ety~CmiYG^IcZP@d3lM9JwV27bgaKEt)D; zh<2k|?2HdUlJ{ZwkoZVdlYlhj z6wGjW3bG~&X1M8q*NgYn1w+3}?53*Ll|%Yv*76WJN614*jkvl+Nfy5bg`S`wGoFF! z8VIraS&O-&oiITj3>OQ%H&X0W!)Uc9QJGAo*r_VP(o5E?ZGKLue5`aF(2KD0Uk-%z z`g9mE*El$hsYxiYUAzg5Mv$0z&<9+F;^#~(N(NJ#V{UX z{C*nh?`BUJ8dyzMtNnCu%c@cc>n@jiNa!JS2dmAVajDq^`i?k}axc=V$fk07v#R+J zDqc;>qoDm7=i#2Rw<;$xD0KC52u(+pAr|v(ZY?jBgSNv zze6+>=Y4W`JQSyQ9~dir6l7Z;)otZ9m>T**i5}akyu)pTB{{7$BdfezT9R2*&Zbfv z%by5K*15VMC|>|vvfSPhW(Y+<9UX~pi}myswemHU-!!vYYOA&aZwXxj`yAHR4oB>J z=VA0b52fBGJTXYe{;HRC?ZJZ8cKgafc#2Q_n~)F1;19(7+@R_INaa85NbCSrvBTe? z1?B3{Z{L^#{9FXTq@_!lH_JO;pRZqCeFbbGX5FKod_AeUY7 zIHFG^E|JC`Lgi2@#oqe}#sW?zvclvJ5^Ckiu`q+y#!M=6>`2nHDj$-U6xfSQONM@j z442iZDbh|L;x0YGnJuK27Ex)SQq12h&a`GYuH_ejS*z0rCrrk|V+1GT;ImNczr&-O zWT&X|9oE38a3&XeLnnBg0&_t-j*J@t%Y#dR-yxB^;91i&0-iNfz&tMSW%aQ78KF_< z0e6Apt#TQd|0x*8n-03y4dV3)j*F2nE`~#Ft6O2O4~25yNf0ggB?^+8M%&>h7>8Qg{$w5lJ#5mD~%oC}~uVZC12!ux540 zU+6AaV~pXQ%i=)%gXYFeik9s!E`wA7unZbwggmZRkT<789@jy4odF#t6)YgT^<*B& z>4(DOa`R}hde!2tl`Ev(a3Ph8nsv(+V9DxJ=+rMlo$)`5){t2tCwoCv`{Y1X7eF+e zyk(hCJrasB;;0x630CquEbxhaE)ZGWq0{F=8T=qBj&ND@v2BIfh>mK7<~6a?pQWAr zT`K?9tkcJUrD$u`uBZf}VnquvGt_m#h0+@6KxM~fHF5zu<6dE(y)nR}6X`fx)m7IL ztb1Ea;XpwYKBL!F3R}YS3E*uMm0rAXM9# zJgBxoz|hQrYTE$Ot#+QkH9}*lq0>Ng#kyeVJj(Z=^E`wH?Od4S(xFhlk;u6!9a$OT z(aCgkE;7-%U~i_iVx3+kv|{8AF*_r6Lo1GnhwK#RLw3FZ#w8zmA$kksYiW3?0>s|OUOgQd8@#mBb}F4-V2?`1j2rAPQ% zG{rh9PdCef3s`ctW-ZstqjQL(!p=xp6C-1W*3tOusjRRg_t&V*4h=9C=sMS<3|s{z zVAblNR6Q?@su{QGpoFQAbld@>AgvsxKx}@iE0j~u3hT5Rvu(bH^6Qbw9}UPSNtPm%#FHc$B^b z7Ll>E%Gw8hA!MAgmLg^BG7v2O25ZAgSTVgPu9&)P1;TcOFbV{Arp-369;hITwn3`h z0e@Qtc!k!=ChjGm26?GGxldUrMM>0rkhA*rX9Jw9hwkVXI95m(L!Nd(Febx z9bEtz=v-l>vWQBtp59b}5Uk>cb%m&Tq)WxhR$-2u6JV5@Y2eS~!^ zEgf4JapP&J(y7d#Qq0vOc;fAZIwa6?77yd!cf!iqq%d{fg%b=;=T<8saDgxaDaE3o zUMbFnX4#cWH!8&>(>UV32a<%vo8md@iQc0cr!42lBfxb@kebyURB~S-wUB;dFTX5q zi@8i{eG-+Eo2B-KupPdw>jqY>K9+X;Dr_?H#mAB2fVkP#b9njD@1 z<7#F#bj86ibgE$pWx_z%4`pj1RVRrEglW9+W#E-`xSzH3A$CCuyx1TgABN0pz`E7l-rW|$*rmHX1wALi z9i!GvR32|;-5so1Wv1dhg$kcd-O|)O&26Kxw^Lcw%-T%_Y5h7>_=hlW(f#nNuS0ch zhPnR;41mFq8m?Dl6@M3=lW;KVgkG$8deVp+LA&NiDn~Wzs!FiLS+j=E^Fd059eb29 z$raGtE}*ioS?;k`tH9}^ejAJF*csr-;iao#DFCIu3Z zj?Bqhu*6vdNmyMY<_g&|k$B5N24(xO1C~MN|V5c;-ogp>I0g!vhHlOEzE zx%Lb!$g{!1i*U($S)yKxhd=QM5{?c$T15J+fHi8vSzyKwfteE`$vE>}m}`+(w%P)% z+G9qHSE@xb=%**jKG0@^AcoaZA1Qb=jMNuyJS@(1+;CbK&r_KK9*w^Nz1#-uSnZHI ziiNt(KOuHVx<%kF&=&fH%1`Zx?mcMx&S1wXvAj?t*r9~7aejl?u^-X+kEsL((CK}! zvmESL?Y*4n1)l_mPq9KL!%m0%o(eUw#8!-+aYEgpPZJyQ8u*yWpi{6i&WFeK2e47` zw^jB?$TLh4twl=5I8Pju+&P-p_o#fIN^vj}ux9mq!&k{dXQHQf#qEmsc-)(P2z#?( z5Y6gZ?JHsH$yjb9U9)i+v;ikjIgv^+6F5`jqFdGp*rCaPU#Bf+U35W>3vCML$mZpfi!K~v^6j=e+LHPYnbp?LoBP4K-@r~!27}R zjs*^ZM;ZAE$-@tTJp2aA(+M*2j#!?zzJYRn0}I7Qz%v2AL%7bcGEd5b-9$qp?j|-v zI#!?RUM~pgB++wNcpi)F{0P$N0WJKk>T6Cn4x(CJ7I^_J3~hqTAuOEWd+6~YjQ05N z;IxhdEU(@a9hX&8aaZ#_lAF(gF{^8paCf1*(9?2?B9R^D+R^S2LS_4A-32{zR>y9J zy)Xwn>6P0+N6JPjiJi%KU3HUFy1@CXAEEN*Lgm3h){bz-?;o(@8Vfz(fao6by{UTH z;T{BE7b%NFE1>b+Zb5%}8+OIFAg&h__>5TbAK!u}-Sdz+e4fiX#o_nyoVbyCXchGE zGB=$TZ3dMy3AwFWs*HmXct>?xnFu@KCP?NN$dkDFh7Srr9?myG2V4v3SnWoq!^Ad% z6%e+OFP^CS3C4}CHN>#`G%VK%YiYVHQ{;+IMeZY7Wgk;nPo+3bR0^FDsUwr&C)FN1 z-7GL~br$3v2pK~18Z(5Cdotz&AciY{Rb_Dw7ol{*X$ma~xDPFm1%@9B%LkLk1JwgZ zp1t97r4yWsR6IBHG5twC8tDE_5vek`A2&eO6e_r&A_WO~6r>}S@JR(h#}{+(K74}+ zCA-||-yT$YQt3sdH0WPNi}hl{2WEP30Ua=TbROlrD<-6eu9MOCdjtsA{CLh|0xOE}^oR%B55;qjCk6 zE2&&XWhs?wsVt{*J(U%rG$=MwfKa)K$}LpBL}ewF+o-IfawnC$sN7BE9xC@ySxx1B zDqj&K_!?>`aFEJZsXR>OYgE2Y#6*daLb{E8mRg;l~<^|O67M{{y^n*DsNEv4=Qg_d7H{6D(_PHGnMzK{8f}a6u(j6 zK9vus{DaCzR4O=e*mG1mkSmaX&Xqh^?%sy?qNq2OEvfV&fhF$GlJpYyST30CD1q@D zPJ=pA*@emoD!Wn{MP)ZCpP}+uDr2bZNo6l8`%pQM${|!HiE@x4g#sg~97W}5D#ube zj>_>=PNZ@&l~ak=O7}L&GpU+GWiFL@R2EQKNaaE*i>O>or@`0@~9wT=pLhhiOSy0_u3l3Wm8*C~2~${)#&Qg^NM zZK~cOhfCetcmI{D_o*~f`H;%TR4SF?0JNjho(x>=-kVdAqScV3x9RX|_m7ptbB+5U zld;UbWM=E;tB%2OY}L^L-Yr&gq-eBfOOn$euyc8=!_jPytWZ)C>XG>L*V8(9+7GM_ z0~6HCSiPrgYXnE`^*mb<-IoWadFc5o^eHM2hS$*br1oOn8Z0 z&%4mGWS4PUuPHeQUXbSNilkTRh8S!VATEp6wOn!SK?p zo)5B_YjD8pN!Sf*>B5V7dJ zJL!40FObIuLPXEACzU)Hj?w9Pws@2W!wYDg6w(yV#!<%n< z;@@Dc$H6NvdY|gROd= zZ93#J;e~QNA7-Y+)yl4X?=Q`2w4<;UKo2XZs|1Y;b7ndA53%2g6$kFjakL ztx)h%uAVeBS_^`2Q0PhNWotn|+v<6?7?h_6hqClM+l0u2;hj@GIsd&i!|Sx1 zHNY81J$!S<)=U8}GU$1>4V9-0hivpb+sep;;bagz4s05S_Y3qq+sn#h!#jFST z!@)x$;~gURSCSIqUT??X&Bxn)bopN2E!|%dY*A0@^s;Q1278jSW6e& zaC)BYT;ws~y(0*=nJ#?0BZ54*=;0=RX2ZK#dY-Wwa>L+{*7I!3CJ%;VGJ2kEDCNQM zW=aIUp*Ym1i7Y zKZzjD-&(6`cp+NP&$gK^oKn;Cqiv2f@Mys>wiyf`6A_Bt&Zd3%c#ocUw;2p)$e<(G zv=0Z_VJzOVR^#B!(DQ6_Dz6dv+yyLDZ(559AL!8YjHi{y1c#EIXIo@>F!G>GjG2sZ9 zxPWIgn>=yqxZPq4yElSV(*berFV57}oJcHI+Sincv%p|;yr{~|XX#(C1(esqA zm2U$Hyzrst8G9=)9lUI%=NZc^4~93)VfFNhwW@_LvFLf`9g)X`^GbStlg&cGTR$+H z*en#hA+P6G*bIg*K`9(I3!|6{wpJy{RoDtCT zj5Cy13%t^*=b6_)9t`Jp^gN?R<-u@zLeJOQOdHOsz)tqAwblY3C6EP_8j+;$P1*{#|aITMog@VIdEOL!Yp*ziO>e@HUd3XPyXo zOgOxx=NYdo4~E0SdY;ko@?iK5m!1!?-3|VL;8>f%@Yy##Po1Y$MkTy;qo3qstH%Cs z-vWeOFvpL)9B|A|Pttz0R)6q;M?DXjut7e+>!*62Ii%!<;geL*tTtoA$3gUbkIMnqxG86~M=Pai^jjXU#y;W7-{r_i^$SM>J=0T3R;nle^w+Wp5ZF${lxPnNO1GFxn*$^zIEUKS8!D|NOn zl42Ox*KFBLE`_iFMq9}O80{(x=wd5%w#TuEVGzHi%eJW&Az}bKrXmYq6RRvB)>i8M ztOXeGOTPWBgoP-9~6J5S%^izSz7_`+6rLq09k(7a+L)bq|cduYReYe{jw-hjIV9QxMC~d zsw}`jKc>#s=dwiD#zz*w*2b~`wriFJu;sF4fI;|_`_Hm`(QMtb6~G7uOIv~|MkUAs z*gmXzfB~K|Y@Oab1Ok{hLl)o)t2C<TNWS? zlraCx9{`MhmPKKljVypUJ!AoF|1Jy26H922r_N5?$)Xh6s+5Jc0@xuvnJGpmK9cP} z81E#DQfw;`#v;pNu(N-%0LI`#z!UqA3R{UVAC1fwqwr(_n{An5XCZ_b&GsK#ZAD>c z0Az_U-d`3_ZOat%+R+#m`wvE|$!sx-NEX0c*0KQR7?K4Xc`{ql{zE*sXk{?4^NTWD z>}Z25fSvV_1+Wtb76Eks!8k*U5OM#(Turh7Mq$bVnCn{>z+5=Z0)+hs^9eKy!TksG zCCCEUi4$1>b3n-g?mSuZ;{I-!-x;&@5Wh3*NRZ4HqlRPwDkV8w;Hfn&neTalH?7&? zSum+p^K+Cder1%;GFLc9N#aKQhyUf$=0Bx;8t_m4H|W#Kd0ILD^q{0 zQ~fhh+CqO>77Tx3-D52n{@Uh;-QGWG{ymU6C7V6|dlZpv{O_?X@B#mUX=%6pAKdrf zRSPiw{+ny~pVxxn(O*<>T5e&t{}*Nf(*Nfb^q;Dq6EJWFvo7;b6~q6>`)u6y1|+nP zCG?+B0{){&rlt*Ezd0H3)58)AkKa&`=t=y#p2X`~= z{sH_fzQkqYha@FZA73FCSucD{;pc`VrU1XuB~d2$8GMQKwg<(5CFB5#x$u;K* zisY-p4`)e?j5jDjEDJ3``IRa7`7nb-0;xfhh-v(0o5VqBL6Ll^_;n$Py5T{QC`$a^ zfkcMm*N!Es7r&1q(GmFNDv9E0jo;Cf_PF>BA&DBnZ?>?*>yH9Kk$6@7qKm{L;D78` z&q@>w$}Xm~14SZM@$+^PbJrde>Xm`V6nI}_(}prqJ;7DA`(wH92CiCg&!Z0 zxSSMFLYQs*Hjv~<9|?*?R^yk0B#J8)lv@}F%CC5Y-{g_l?lGW9eA^44OlG#zK)K2k z{G6Ud$Kpq1B%W$KD3T*79TdrRl>v&x&`$v6S;;9p5j5$1M<(9K5}E``f2K?ZMLKUW z1r*7_mj#OCrJ4##EQ>P@6zQD8i=eDhfMS_-HmL)vRaX*MlS{`y5cNFw+M7xR68_&I3jAq~?PnIV0zTlE=&y zfFgOg7J$-@nZvKdEM>|p)q;l=Yw(B>!3kXp#qV11ORgZzCv@D~f<3 z5!jnRab@N>EW=M`cq+~-xA`UHJCPC7BiiS%ji zQ~LCO3X%1+98VeB{}RR)7}36_GjqI;IFY6~-f^Z|i@YDSAdQQ>Uofyu&10Brq#e$` zPQiu6Uzr7i;$K%*Yef|n)_-9Zu>SE8{8wcG(*G-)Ut##G3Qo(7_5W990n+~~n;#Z- ze`)hS#`^y&vjFM;mCa8V)_+|Vo<4v6y1K`a_g6oE$QR4JyO^e}^*-lhc!VUY#H%97 z8U#5MHi)S7vQ#806+@&=6Dlcei;9Xw%%UQ3v8YIdA}SRa2Zo~J5o*%z3^`kgJw+v) zWdRk5?nGsoWr#%JVu(b{q9U=Ps7PckDknKeUnnbT63L28aSgMLL?T&H`P4E*;$n3WB5`}D zNc(J5B7Bz{pMMa`^QIV+KXiy~j z6_t@J3#dpeEh-YVi;8q24Jq3;EKVEQB@dB;?p7&UO;qCy}wJ#Ii`JNNg@D zU$YS8Y+G6?-7FP}zeSc-;$l%@EUn=YYR#BgiHt>>Rw7xErj_VdRIaduP?1>Ld{El4 z5L6^C7L`0!aO7eICKbxBc!U~`VqqksBGH|wEV2wKvQ#7@6mOHbSX3ld6qVO4;{dPv zXFB&`{`pgr_*aZ1QouBG5|xS}5*>_+MBt(#F~F!uTr4Wh=-1gS3&6!r`;#z5GIj|I zLPcU+QIQx|R3u^+m1gv7GsblyvxX$=T+@|J-Vf|exAu7Zc$3CG-dU#UC%hkf96RUj z6#WFhx~)Guo;tXNa6EPOQ-1X+FZq<0{4e1p|J^$h@TOx)(6=pvNVjiWdi|UKYD@ZK zCja;T%EID5{q>)y0|TDX!c)TR(3bgM3mBwy@i-Qyy^k)B%>NR=)gl>F(5;roTtzYh z77Y?PXhv$llA$oO|EtPK1~dCNvMDU{?B8xO=E016d$f~6mm_A}-y^t;0eBh=K!ddF zH{-4!Z(*#0SpiEJODe#OQ~=(=2nDke084(rY)9{4WQ5rs00bRax(@UX%6AwPW=9N$ z3tB^17@AwqTf!OO1OS3Y1|YwH8DYoA%q{>}k`87h9q`vn_^2Chv1lD3NmaZoN2r>f0>_vf9tR=i@lpq$RB>)Ki$^axY(5OfZLHcGjAc%g- zZqZPH(Hv$i1sEe@)&YP_t+hH77n8@ zLdJ|d2`0mMGjnfH5NyMu#Dan#BSXw_6u|O}P0@!U=`2oP3NUKL98Up8yqNm|fXVo< z-rFA(1R0lN9zX%cnwS$Pzz7!eKqLb&&K#ERAbJZUSImPcz<3yQA_XX$qc9`Mf*Co@ zYzzejLB`3Lhf#o0G3F!+Ok`xNIT;W%!Wbv>a8M9r9F6&T3NW6=oI-&RmM+pWXoHbk z=8>Qv$Os(sC<-tV$DE4eA8%oVk9jmG*qn?YHID%WK}O=3UjPL`M%|dxC~%c!1P|lk z9gM;;kD~yiam?cZK%)&f{*i+)r-OzlV{ObC6ksRx%o8ZU7$5UQ3NSv%oXMgvqmux@ zWco8;GAIZ#0?2HbLJ`LGn6oJGHH$Nq0mF z*c~${U}(vZnSh{?bF4q-fPx_7jm)_eV62jP76llWWJdZ38;{Y}<~&dkWCW9W4k!p- zp~)J|b1B03B=bB9FzU&i4*(ir#FTkHC=l^0fE;7%jU%tV9b3Y0meL;ODMqTEAt8pFsjSEk^+oYGq0imBhbvH0s#HLf+e$>-oj`s z^BM{;F3h}^0*u=-mjQs)TEJ|SgM#2}2CM@G!6gh>PXUq8g7nQ56k+6-c>@I)0cPGv z0mgfo2>_T3J9=o|1PX$T3^Q*A1y?A{$z|RG0D==)Mqa`@G;j-ZtC=eSL3FOdba-9M z7dTVrik7crK3yU|T_UTYSNOp7DeF8M3OrpRvpEr)6omdr|M{WST!|uRl@q~-|eSkDV#0#!wj-QqQ{L12BL*cen+Oi^m z+g54IihvfbW?miK!bwgXY+BsGumh@s-zOSLYl+myTX01y(eDV1hD#!F5kUG*A_WmZ zUQOcS5I{CZVv#TtzHmv-BLo8A65TvV8XKo__q z=Me%CaP?zZMIaKcX3isn9uUb_gdHRbF3DGfKsUG~Ul9Vh8J0G}2s{f{Ghb1603_E? zG$=jb8p$$(z;ke+XGnBfArb?ZL%jiL!;D}@?FX0Svq4}8T&FGXNCrUi zgWw$_;F6pgV9=n51w?WuVG?n0LC!?J7J)u+rCS1h0Z6h0;sI#pP3jN87Ip__a{yeD z^9X?ixWIWtomPkpglmpvoIwCc&Lg~IFkF)J2!TYnJXsVh{7|^gS^~oWkbFgWM-p7@ zP%pTOp#KdAu7S)37GyG9l4}ToDR4=iAq2AE z`WnZ-;21z;DqOLaz%&4wxrVXtAoH|xR_VRAh?s303x|{@Rnk@ ziY${^3V`I*!8?}0g$*Y(9sL9QNF3GEdz*@MPd3DMGn9Z_^4`%`wb+^F!1B2JWwS?V*z%Y zoGcwV9U8oyJS9<{k|_TrB+Ao{^t2;A?MP4O)8MDW;OQ{c%t zId3gB{oSZ@Gmxa`g6%7Kr&i5pqE;WVnW&Y+QiakKr&Ru6_rJ3u|AMxAn&i`Y`+xep z4f9i^>7jwY=0*~Xycap-;bPBepVCuLcT!JhzyGDPA500)kUCcv`(ob;KPR{L&%ve$ zeikah)mJyPz0uxuezsqJJSiF4KAO}!`+iDhI=Am&iap_{>uHKjXzyl6Jd@hTkUTDA zH%W2~iZ&gZ7m~_t9M#^7n_(K4=ciGUbeE7OQ`)?sGxnyG!jL=8SYBTcV|#BAK=7fk|6{lYdnil(4Gdj`djh|BF`TcACCw`h`48>Ar}x`ez%YIA~m zkw(`LFETSCB#;E?gSLvrcuyY`gvn%*GQD3V@$BXoFW4uCq9B2il%NKZ6ajJ9zN_{k zAG!F3ljtVjOyagLsIbLz3VVImu2CfSwGa)N-#zFplC~Rib|0G6e?w3uCYrNR1i<{5F}+w+^kfBkAY; z>bTn^uy0VfDQTDbH_kM(Q|JdAiLD7L*%%DPDmxvNPa@y;ZN=9ARb zK?y=ROj)UZ1sr+lIp`!OM}@W}bpb)yBw&2#X7a{8UpJy28#GwRyeZ&AKPM%LE%9q2 zyBCGV5aS%bHspnz&~{kwI0O`jC9UM#-Q-$>FIA&amt)_(zg z@%$CPD3aa@3hvnul1XZ_Ll%>zhCV0y?La%iOAF7m;aP**blIAs3YZ~Uf_OlA8* zQv0*tMUvj4y^%zG6O@8>1NJpJx3}N;dB|ike=Q8Ey{+1}C1sf*#iVYZpEvoc+_fz^ z!iS_n6X;0wji7uJ*yzlWHLcpKxMxXatM*|e;;wJP#@o=?b+`RqA}8O4fivZfUm!`l z>|04v?4gpX-cf7Fqj1+2q%y+QpLqN&#DOeJ3G(HpkjS54H0DGC%9r}-xk(}ryTR3$ z{BYMVl9Xv-fEe$oRb>88ex2;TgsxWq_s|9sqz;)ul8^aza_p0loiSq~>GE?>Pz&+z zNu*rs+kpjKXdj~9cp$WeN8dSWHZ|O-y|epH+MS3yPIt;~=ig4e9en%Ht*l#4x9m%=uPR)X zzAAoIz^cZTRVy=BRxi(Ap1NGO{Mxef%c_=TFAH9FW@*{doTaHtJ(pf9t}RX}b}PQN zWcQK?!xG(+n~RGV$1H9rsxB%i$|;I3@-M0~mKf^{rG~5p0SjshDhi?s6a|g*&&@xR zUp=pScKU3^?DMmXxrw>WZTP0-{N(gxUGmMOGfBls6^XkCXSU>Riz?^~c z1KkE*ym|5Zk?SRf>*?1Uf2jMR`iJx%qJD7uq3rvF@2`J%N zSB+OMep~ge@!OPd!@j+L<@h(n-;{h6`&DDZrUw58`-b8#W4`qHvhj<$FDkw$y&Qkp z|8mOT1OBe~`}NOaFWtXbf3f7E=f!iMrhMx5Y2zoyKZ*V%;FEh7>Mm4W2))o)Z#Z5b zTOUyGRNwINk&lfZmwk}-LCgoiAKZVx{(YanHNIQ-ZuPr`?>fC(cXrd+%(L-l!_F$s zdcJe+?WDIWPiLJDIDNnFa$QG92!5mKWc|tGC*x0som8B>d?NEi{E0Bb3B`%1<7Z5TrX*9S>H4wkV=2c% zkKH?Z?r6%xW)1em&{+rq_aBYdC!5@a03h52YQ7Iu!Qm zwS%<>OAeMENIejJAmG5gnjdX6f?XwKt*EUyf&e@!>*^L~kD67b2A6*Aj9PLKDsns2GqpAZs8mQs#i&`v|drY6ulaIp6i*_Goa`FnBth2nD}VV=yT6TJhQ25X4iX>7b9yU z^CA->10owE61ph5ly;8qd@cM?xS=dOKm1UqvQ815GCTTryw^e3;aX^AXkKV``^5GE z?eB-22|3rUqFr9Qw005gnu2SCOM|ikqXK;b%>nfR*#WTu4Qfhvd*)QKO-Y?kC&9Bin$2ZmYK7WWW;Zyi1-ifc&<>(T0joM8HZLro& z+o*|ZdD;88ca?XZccEv3r^551M~z3ON2uzeTdiA)TeRDG*F&xmuIF58T*_R0T<$xU zI_Ee$Ip1{3b4qo(-r{_V)D|%<&N~wyV+OS72EmPH7To= zS;|o5b*_rbM{Gy!V9<@oKo zM`G|FMowYm1m$5H_lTw@N}lzO027ZMd$dsWrgt({jr#%q`eAL0^!p$`#+2YE2Y)?! z)CL8dPQe7#2CfnAz|&O14>jX~hl<4?$L}9MZh?O`{l<(-vUeez5NZ_fQ-B@Mx8P22 zM?ksYdLl~@i3#Q>_66dJwZm^4nKmYt`2S=Fjz$2P$4;LOJQUlf_Zc22Oz^*0`@H2 zh^O;H=zZQ4yJ>+T`7ssLk|hSNGi24Azt44&}8Oyl_}n!!QB$z25TKorY0wgr|1 z52G;*Pfy`}c(j{gUNkdGz=BKj)Sta2Unh zEbeOy7}l1v1@#qL^QFB{?DGo&#cFqYwcFune& zR*;vR{Z)oMh*akz_C(epCQ}T14#TEU3>%+eBcNNp1#z)W88#K}LktHf!=_OTMQW%tdbadDWn z$MeoOEM`#<#}vB}k7!~^aPDGQE?{U7Hu4fShhhO1*j$RWvB2h0thEJ}k55Q6*vbOL zw`LH-cNkd0xFSF-$O2nHv9=c2&rl2ay*u6l!?Tr$=`1klo&rX8yZQ%oJk|ov>BAj8 zEbb_RI}pQJf#qVcg4}lXAF9k!kX~;76ATqbvAwF`9@bv#DYo4LTSu{N7Fao8cxH7I zOtj4Ya)sC#pRq`@jAA$;u=|z(26;0GCyg0cMhzB%K{lM$Qfz?*wuWNFBH`5(E3mk) zlw$KOuvHY>D8!|mXC(zUSQuPEu?h>U1TZ|dyWRp@PO*HzSf-az3}2LBwYrpI(*R@R zxY$6!N{btpP;8!s!NnBAx4xJ`-VWZbf{A9Z;?EhcHDC^aJ#T@Xa)cQWuoo<_UGO*F zXBcAv?xEml3v4gNa8_f}>OP8%vcQUrV$E!^$e?oz_%a|QGST9`eo*6hZXd@k)Pg}6 zyYUpnu?wJp^#u%1{Nq~#K@{slF&xkAzBr0428>mIEX5Km;_e0;SPK&@GBd&eH{vS- zB^Hr~0ERCTEVaNADV7A0S!W##7?uR5M3$Kpdf!lsgnI*q1sPz0^`cmj!6K1C)F8gp z!b+FNCD-`+w6(R%r}GmNHzNfr?%0fz5p;7c*A z{WAf>Qey9B&5%mt4zsv#6vb9rBsLTk48(#i%91RXIqvDHL4*_K< znqlVc1{khy7^Z^zaFuccFjlYjG%h|>SlihFhH-zexX+Eoy>5ZIig69X(}G2Ip$743 z!LY+lu&jsqya6J!;^Q+Fu`ew!d>$kAi3Ns32C)kk7!EhY>IDqy2Rj1}Oa$@mLY9b< zmgIZDScy4`nE_)pgF^x1zGo2^R~v|(v%qjwg4o9vSXUeh2!3P%>M8c21r|lIzgb|P zKr?lrO~NvBfnt~8K9=bQ!0-*emSBU`>X#HVd}VPXKB_P??^+~+k5P?wgq+- zFf5%G46=m3rPw!cAFG8c6w_GT*SHYcA0y)?mL+@{Zp6%ZTikdPFnq)DuEl--01PwZ zZ*kw>XP526!W#X?;F6dylM;V9$-;`;rfnc* z@6zgHfI355FN?Te1BPk%kca<=y|)gxs@&f9Hz6fr0xBD%O9e$z=>`!|Ql+IOl@N(Z zOM}!xq+6sUMOqLPvAabSyIXYgd!Dt%c=yBgl_Q7aIiKGjcwKJReb4d6d}q%!*Br^o zv8V^;ioY(KA|c)3xSP8j&WGeKbKG=%=(?F}f?oJ$+11=_QnrgZp3r;QJK?a~jN-pK z_C`8e;A8~)y!MCVuidzbdExen!by`PuARB2a9&?qb4|oGgX0lsT)ZrRJD9romq&+@ zQeh=H9wTc@;fm&lN!)7~P_B?~%d$9R1Al?UJ#FqaiTf^sR-gASbfLE z{b}wfoVSsgH-C8gl_Wj9$a-BJ+D9fCt{vj4N?dxlR&)~gyp7Ct;@*U7hPbXM>nr~o z=Av>Em=zWBXU+X3@IrGu%6YFZFgH-*a>22KwWYpuEsp09K7v`y^-GjZY@V4-_LT}V z!Ex?*9q)zHnd4^coylmfnl${n&0QC%?=^E}CGORsD9jb9jL7#9$Sr~=kKS+wYlO#K zZ}=Q@JifX+AC4n0fOOH73%xZIm zByP)4Y=4bVxR}Vz2&8K-jVy+10LSYBUnGmn@h+0Ph2~mH*-cg-PBudaH=1k5mtFfN zu>q2Eat;c6uXn-S3YS6LPIFgDh3BQi7L0Se8gOigyXUm1n=3H)z+T_)DBBW_r{Zyk zn54H+xD*QWq{Iu?!fEoga6AEV*BHBPIv#r6H8IC4Om|Jq@j}quc6JD5c_HYoIpQKp zUf{cI0ZDhWxEs(*zL=mED)gbQ1IH7Z`r>MvV_9DpZnOFtN_{KwnfGCu@%-N#ZjC_7 zrV`l73fC8RGaQGyp12>f;0TM0lv0@H4Y$W2Im7l^Me@ni7$OSt;tI^px@a23RL!)KPQCa#CMs^YriGs@ys_#*Gb zXUzCEvoqW$dE8u! z<6hVuPo&uhwoF070=~7d}br9#4W&QR>&>G<6`*CQQ%hSZmBtL z>h6}A<5uWyDn4^@cH{DQxx!>uaVyPr5%;jU&f=EiGdsimiPyIqpMQnJAuH_7AF(*@ zpBNWE&sbxU`vNb#8lPD>lN4TOE~B`tI7t46xC_OtLLBFgds?sWQG90H1roP0Ew+Ek z^F^+=MzV?9Y>tl;_;G2Axvb(2!u^c;4#>gpF>_Cf+h%S*&olhU`MAjpQsH)U=ZM>3 zF1@&&<}etcgS*V(pWt2u{Dcnf@y?+Aq&+5gyM)_oZkMwXiSIqI? znb55bW)^1cO@lE5S8t`+xz74DCJz3hAV%+Byu zfH(4?mE~;&cORSMg_OA{>6l4g@Ot1U=E{ou2#$?Z5tjn@C+6fzai5zjF769+yq@tk zzKlC8|7%2kWq~EdeQmCUxNpo|E$&-$y#DY;GGV#@fevyXCHh0caFJ>;|}A`;ZI`?Cre;PbG#1q4t|D)*+OM;nGr`)(Q1x ziL7u%k#C_9Ufk3Xmkn`rwZ(mkIBwfz#MQ!uEFXd5P0{#;EdFgjEb*jYcf|WebvtwC zEI>e!ScNLdxr*O{vV3lfM_J#rFF?C&qcofk!ujc9L#yD@A*b~TS0iB>PaS!gdXu<~ zI7F9$TZiM3*U`w@Di7y1d#DE@Lxukeb5Oj;w2#3c$1MZRRSm!q|6JlS@YDT6L>1*~7A!+Yjgc%WQ6+xQ5njIhl`}%pFIZcclRw zR}$Wo@-{Lh>Wh-*Nnl26WUjaj<{pOg!r9Fog!2wwVs4R?z1ZABaTl3e16KeGH9jyG zn&jH)y}rQQ0XT2ud~;8V%VutMyuw6%dEqX`9B&YJg~dH8E)Tz!;nG|R=?&*Lw?tgB zxkGT?nOx?c7I(S1^>98~mzi59?oxBnVn}Z|r^&Svn8VytaNclHIL_T>i7R66S&1ub zZj;2Nv-76NLg_nyfXzp;LaD34fFt<$N_&Pq0>Kt)N=2pP@$Q&Px z<-K3ad8+b!-7bNs3|%<*?7XNvpQ+;%B^ zPdYqMfPEzIZu)-fcZ=gFcxQey$92oyujXc38}aM0UrfeKa#!)Qxt;jzb8?3@e1|kV z2JRp_!>@3?Gwsds+fa9Rn!8P0hjiHfSh$7AZRg+-3b;<ArQ zt^oe$jC8by`K6?HW>ZF7v!T8QydHCT7Xm5y6p_2`=57(!!`zMHrlBD|Y*LOW+Ei9j=%| z;b!o4v;20-=WYn(bhrm4aIm?~68A71pNn3AQSgQbSsZV5`N*uaxRp}hTsU@SF5<%V z*epoCarHr|FlKJC6uu9R9pvWeogQe8o2R>b&CQmw1I+bJ?O^_-*^q2_jx_wBx$=Y2kG?wG{Q zLsu|ZQPNUrcz#00Z|VEGwb0x$iCbWf-`aU2E8w`~Zs5EnC02#m=ro`BX#@79xd^U5 z90xU=r!2R^-KD~1=2pZ56BRBsHy@37h2v0RA5_S1@_Yoxn&SzfcW{Z7T`qBpOPic0 z6)u9~dUU; z_a5HAr_6ENEFAmkMx4aXvR1jW`9i-Rj68oe{9*Vt@vKag;G59>}x;uzCIv#c1J!OsuCU;Mp<8jH|Soq~~?MuYsfB>S0cJ%vJ9D?WBsgCrea!KugU?8Bb0|(%BfdX>#Twy*#NP0m z=EjJ7%iL&jJu}BXY?wU0-bhr;5xNx93ZQZxCq|g#HsBqd1Xmw%95r_n&2iN5)3TeB zqkO}yXilka7+hTx<@1jPwl-~)d@x-!0$t*Py9Atf{R*r(bXSY}0876R+*RW8A&%}! zarw>h(Fw1wfVpDgF1Zi80sfMwNpilZpam3_fFkCKh{NU(|LF&3z!%6nn1O512|iZm z4HiRL{%j<>#Nqrf{xg(haWA1PHisyQCwX4D8VVOjg*PT7FbK%4d!?t_QDm-)eu+79FGJZSJ@o*zwWA-i*Pm=WL1+q8}-1u zu;SLnipyU6I)9(7%p5{@-7F4EC9EG^&2dINu8TR&2wdVyw3o>fDC~QH_HZ@PFu!v0 z6|S8*cG@d!YmQ$zd0c06y!+>_levq;4dfF@+$?zy)C2EDARX5QZ)5-*cUx)Tyo3GC zasBYPe&#Nf`g+1~1hJGu8$Ha`(UYj|CQ}gTja-98!Zn?bIe7=KgySa0dra<{nd8kK zcg@Y6FOE;Vapsb(Gx00Yp(eS_`u=Z-Ic_>WcZadf@`#gFjyNsR2;I5jTA9ltuC=+$ z;@YIg@@L^pBHLPEMsYm1=JONR;9sA+j`(~GuB5m-QI@WRxDMv77T3|-RcWiFR@fer zja(;z?cmtK3~;_h^u@?iNj5zl~*f|o`$=bM5s_T`0>zLb!sX1aD3L6_ba`wyUp=T#g}Lw zb4_j0^C&kRjwg=XpuFrfbFCz93>?~xl4c^%SBKtKA%9HZg@+{qGBfC z4UZ2umlMaQb?I)ChI_$r=BCEm#rDiz_cY0?<-)OB{eNZPQT(kHu-F(%YXo1|1dczaU-7bxcH&zYea)gwUDCsnJX(r2b$yQuJ?~W6=ij0ByNDY=2G7XIF8>m#QFTz z9*FCs>`7aXw@)6IrVMY|@PWE2QVJ_X-0@7uXY>R%561CCp>S+l2V5wmK=HXdt^nS# zKh1HU<3;~4S6Q0)%^X)0FZ(SVA4=vL@9rCOTp8W{nkXB^zqIj%^NUqjQ5yN#3Uf5Q z@K5G$khmYsU4%IA^l_{25^-O{wLk~Cf`+TeqmX>EwI`$x@rUMkYUd4qWrgpNxG&A! zE$$0*yzk>>KR4G$;x6a*$A^P!$(&pU$LFJztje4cwc(Y^>;(P&L zXJvW*?Pafob zal`J#0TM^V3*h{~*}~#FOI&kvoy0XW$0NMA+tgeKaZTVR=D-eVPEzU!@gXC=i)0%{ z%^Plto7;4ciEErFj2}kD#&l1v9o=f&P8P~7<{m_yz65%quJWksX{oE3)xT9-Yjaz~ zwK2C@T-$_;;zu6M$Ws#7-rPZPcbYpOu7kNJ#dS2dUtA}1`{E9(ACIhj9E)#v zc|roaAdqgaxUS~*i0fuJ#DZdff-3sp%*VE#@7B>Q} zGRl4>u8+Ad#ocZ03vu_Di#`|G*W_p7`kDJwTz_+)h#O$;n7Dh*eJpOExsMVqaUC=s zvJ&Rxs00o&_o2AK=8lLPV(tTRL(RP}jw8)B-V-;BzowvkSLARDd`H|gxQd8-Tii%< zZ;2aa?oDx{&AlORjJek%k@uT?P25;>uZkOI?iFz};3}YlFN>RC?j>;(&An(YejPN) zow+1&HurkHz9+*EVVihID^VR4<|xM@ElZu&Vmk)k{#^6p`YON5zlest<%jt`^y zo^dhuv`tZV9pd~5b8ouD_fAh@Q}Z3yY&6WTo%V}+(A;63$a&x#le;AFA#*#$%{8|} z++&%L%oL5R7dOx1wu$=@?l9u|qto$r(SFiGll@%6Ei%_v++uS)LGn(&0rxB_94c<9 zxgp|~nHwx_Ib6iTJaBu3dm*2J;~AH`mF9SMTd&FE1ajVUB*Kg$3 zn7m5@J7anBo7isR)*+6rtGM;%x`=z!94|G!GaJm^863vH9U9>m-0g!zW?lr+@u=v9 zH=AoKZi~4#;pc7A>vAu1GvItX=xJ`cxJGa| z8;CzU@7u=B<|a#ALv!tA8`_9&VJu_M^u-;~n=D{p#&!N6C;@&hjI_|Lc^6cd;lcOZ?ZF3{Vt$^e9K0@5P=7x)V&)hI^@0;TR%SZY% z9#fx3g;PWxF~@b!13xr3N!(F$6UBXGZi2XX;5Z87#T_#jjT8Ba$+6--HFv+b@8DiU zg)woTo0}!>3v)aW`HXyNjvFOh;_T%sliVsj@MAcR%rtS|n0r9nx8|mbdj*aw+yZgm zo0~6gEze%KukI!C2Me4h?k96|#rBab)I*`_t8gVJ+R*O4f?h$kGvzM13xer(+foU=%+{5CEW3+hrSsl)I zsKv}Rl-&%UT4vl$;)K2`mrC>ti0HJ+7QN9;4lr zHCF@9J6ITwooOJQxdx7H6iIVsYHv!KEG!L|Fjt6f>u2{RFUS@(w zks9WviK`Ab9u2pWvenG(LmNILRn0vhWve7yhNP*KvGYbH=c-rP;-*MkC3BO-RWvtA z+zsX?(#86qy6E%4xb8;xI2*o@u1DB7xCsoy|J+?xFvq=-kMp(W#$vk1T?023WqDuG z>nmyQ4so9)+KrMpRv!4Nb!GvaH}Z)&-n?-4p}DPaK7L2cZ4vi@xw%sI8#q2sI0G)c zRN!lqizM(XE4)zLm*yUa^M=1L$5U2!@0;5!?wGm9#C;r@ykc?B=Zv^U>W+W?HpGSu33rz`c8o7ZIx{2FnuB*7m&22?!y@q@uO3{4h{0-ww9VSNlP6GujdYb#s^ zxTX@f1ui|@bcuTu?oTu_McjJ0<8YJ3ts9KxPdQ2CS__;g?jW4+qM)po0B)Z$K37G@NRRriQ8pv zmejY?Tnmrm^50=H2I-AFY3>dWMBILJv!%jE;5dS8#LKQS*I3HF;$>w^?6m?g?|)^%oBnK4X#(8TxWMWNsZA$rUR$ zA^DdmT}FI;j2YGq=QvjMtZ?@u%(vJt;TShY+}Gwti~GvTa{uOKzct7Go4fB4E=uCw z*5x-=;V5xGm>VhXM{^^@{bX*qxU87DEa>zAalasrZfM+Lwz&fTYI2AK{$>ti7CQK| zH8M=x?-n;m+#lxd6ZfaNf#P;VklY`25_ukaoe8eLxFmD^#HBIUS6qrUa<90w7I%-h z^yZ?wMV@1_kGKrxdW$<@o$e^^F*xq2TZ+qQWqXOsVyw?1<-A{%OVKFqcMLPIF1(E;V-oCr@7AW#&@EHAP>lW>0F9^ry&N z2!u@fLtL`Cg2{X?Q#wAF#Yt+&FWW!=clOv&NZ_HzM#h z2^?#IY2kdizXiuR<_%GwyZbHfvP6aP4vsN*i^PpK*GSw9K99nNTZo*FK)UAQronOU z^2!{~hvWN^@*>WM{{f4;LgJ>HYbNzgF~{$d!>~>^nOodEI5xryE}!GM=B|*2A2OFm z+#ER0NIt3WL36n+E`HWH+vM$#-bl<`vQ#+BTrP17;MhUl8t_qg1djWUba1}tR>3ud zz61c)T!yXsG|6KdqTijxa>tJq?xS?j4*0ZW7tu3iH~@d)?Ct^J>yvZ*#mb zb2kL;V$`==+}-AOiMz+#PHz8RxECZx;b95vYk@n&b%f(GUMa4>#cdaNuQ^`edmDY= zIK#ZaPdJSKeI_3Z5--Dmy99v;#SOAJUM+fs{ovSXUdFl`Y-JCKi_ASKZWtY35wTz7 za0}cgZiKlf#0`YwQ12Bt%G@4tli+e7?s;)z%smGed9Uv``K$zvHFsFtICIa48*lEA zxRG!i!KcMdH1|}h!=r_eIT84Js!W<}?lo~!%)KgZs<~IhJz(x-ansDbByIv+4n7O? zqR1I>nRrjNkIZ7YOVPpiC2p3v_rw)G2hZyw?wGjQh@<;h+=J#mqC@-fol49qJSu?? znR{2cLOc!#+g z#9eB0$7SquoWbhLk2pV+XM-z;hSR{I-NgA{PAi-~A>%`HBOKpjP*w`pHqX7bf0FJ&WVnvd>%#xEiRBGvaa0dHzSqIdRzxfz{!z7uVF>`OXu;MhSfV=vs=+$C^6cdg7_EUu+Ft_xoF4s#b- zT>Sj6C@ysQt0JD8`KI_emT^J2g5sXbg!4SO3&b6QD*(sSZ!i0*l`SCd4Rc%^Q*_W@q`D@eK&abKI`n(lGy;kX<9L)^FKj*I)w z-0$MPH}@M~{Nok=kTLeeLfnveFcU7RP%*FVecI0`K*!5-cfXj+AnsRl+{Jp_H*lOG z?pxgbZjKiy?v5v1l*9{8m(L7I{BW7aZ{O5*!(E9@k|!9x-5-GCYsj;qtZ!=DEbe_N z`)?tZj%QEa@D8i+12`Y8?dEt-!OK2uWjQ16w!pF7 zh|AsO<5rmGZQjUc3w&1^SqaC^@GRHkR=^d7}viPh81!pboq!?$n!QY zyvp1QaNd~*twNrLyIT&&QQ*10yJhB*q>b5D_7Ail8je90LSe4y-tbZ@%B(XRv)(e(8g4AT#VD zHOH;Q;~p}{EyCT*Az1#LV_vm*;W-xgC!8;mad7P5K8YJ^?k9=6AFcr6xRrP#lP&Im zl$`;`c7Nyg?~M$A%m>MnNO#jM@F^)g%^bH9Z-kq1ew5uKaYM~v2QiBKDd`E^l}+ zBpp{c@AV*aJeql254bB3$LoEsa1S~Io>UW2b$x~#|z(UZkNRMu?n|~ z>j;+z^=%c`!Q3ZsK67`{@f|70M7FoUEmF9hIUW_ga9eY{s&&^JjwADxxL$BvOx(hJ zM!K8hC0dzVRG<9US@;Buhwb}8J=;C$nB<-Z2fdwrb+t`=9y z9OuppSBJ}q3fD_qHFN94RW--Go_D5-xwVYr_RoEBWs}_ZdtfCv&M{XwZ@8klo#JjV z#~qTFz1|$R2rpY7E*I+CBQC0Ek_QeiT-O{ApYH0wagMo_c!jmiZGiI;tYz*sDO=MV zj|W~~jf9Jm9+kpPAd}I^`x4mL9M9pr@U7BT4IDeja|4fSZSJVV zwKBIE&gbr0IBs^_-o5NK=D2r+D;!_@OPYK{3YRdqiZ0e~4W7SFpDA%|!856%(A;o7 z!C5*l1$pnm-PKm~VX5vaIL`1&aaWq-5!&asxVbHG-sfTo7sbE)@R^%~&ah!#gLuP* z&Pn{3kSDxFPysu*2yy&@;R$?px7ZxdMcpki_ouj}=6;Gh>?>H|GLt-q@WRW@{UL6J zIi6{I+)8u2+;I1>x#LoH0cM0hW7#h5kqCj5`$Vob$F0dLTw{)l-Q8MqTZE!Vmw-Ig&T(n8#X2?yDTz@_A;lYV#dTvddx;(caZUf@DkMg+rn7j3G-1WFy zk2ua84-xLR!L5el9vv=mt@1eJDoF0WJ#YuyN;n=$+zrZtFU#O~C~>zPadceI-L=N& zWpG^2-EG8-q+s3R+sS=>TggZ6jziuebGHG3d|+&<1g=6OT;YC~3iq1hsew20ggG9e z-R(2?gSh?Xena~q@JW+gA-(VcbH9i?XpU!f9`}?vo_4xh2*<677tuxGS?_Nd6SpDw ztv+2d%4ZPBdlS5h_Q1pDc+u50?KN|} zrR45)bG$frw-t`-4o}A1yPNVvYwwcfXqBhT-lvbKEf8 z{cesMhP&gL&^z{!cY|F1ktx=Hb8_J<<%cC6YHyn+wtRDPsd`UhT^W=E-JtimbcnwaCS**vbPIsS}}t~%HL zTOrx-LJ6!7$B|heu7$bz;%>_vdwfT7;o`U3v{^E(rMZ~6R+(d2b|#O{(b}fXm1!L_ z$5vrl)XApJk!g+LIMaQ_4TCEIcaOMU=C}v-neJ__kGMYOdW*X|;iC9Y_`L8v7T8k) z`R8Biv*Z?IEs% zxkX7B=&j!!P9B*iDgieZare{Ve|GO`bGJ)Zt}=I2?2QZ(xJyJNYx!vNffE$BGMkb}!m&e=)ak?oCSVU{)(UNZh&R?i07mwwt=B&xd-aIUc2aCCoAm zl5;#z3a3GZ>`Z@gN#^>AJAtx{8;c5kWlb@+P8#{s9DgJ24ex;Ch8=%(ruT5WNggvj zFugTAP8vyPZh&+qt-1A5mUk3Jpph|B_E&SG&Bec<{Ke!wQsK|$MoHnH%#9SsuUOg0 z{o;)&yJ7n$;anG1LF7B|o-^D#^?l*DI@uezk_*apy!ySR+%cFhsd*HpgFndfY4KBL4K#<*O$7(@%G=nd47C-F*Oe6rJIFG2Ojkj;T7_ zy#U72)~@`(G&TyAsm^S`f6CQINq=5mSq*4*XddZ)*J0*w?E_dVk1 ziirCXjx$nN+>cpsK}=alxMk)##M_9K_&s@AwA38$?09`k%<;~SyT#`2l>V)U zV_)VX&IfQC94}C6!+BrU!Eru1N!hgt7bQI;h1Xc%UDEJsb8{r_5p%qkO=+#NEvL@Im(j>&v_NZb)PKF@ZyxYsQ%8Xyh7 zX0p2kzG|+&#Jys!pSYLJ^%eJ$xqHNY0LRWOgTp$L*o}V%ISg``1io*9_lbMYTp#J+ zyXJa}d&k^BDf_m$UJ~~fho8NigPUV>os&z8n9_J5JZ$C0_!3iAZ$b8{;sE?>GtGTcYtiXw(_k7P|acG}(QtXTfcn#+b=uCYKi z?5=s{#1{o@#N9f?@yi2_jJx&bxN^CB)Z9{W8_X?9(=#>jN1Nl-2=qDr!CVtKU!LEa zDz5}!lb<-pfGJ>%7-1srln57_I#cU|pq$OPE!kOi>Ifv-z?!-4NpdOZU+ z)cB0^-BA;KQv5|y3eyy(E6h-ssW407L4`RA(L+je73L|-S6HC1P+^h6Vud9NO9RA@ zS%EML%N15AtWO>U;RQex z7XOPn=_Q4i6<$+#Q{gRzw-w$|cvs;)zNaa4;e7|b_pl=N!|^GEN(z+~3ge&@!md)d zTA_qOsZ_xBcU>ys(4$aBp{znVh4Km&6s}jeL7}2Sl)~AotdpuJR8^>^P+g&hLQREQ z3bhsL5HSBq@h;q`lNu;AQn*FoR)xk2O%$3cG*f7v4(*4f*Fq=Vrf|DLONCYntrglR zv{mRL5G8dLN{Z0y2XLV9~PRflV&K)RG6jkkOO};(Mq9%LPv#83cWM=@rO0^(MfkJ+~dGs zMBJs&U7?3UPla9z0~Dfrl?E!@r!dHYzh&sF&`+Vi!f=HV3L^vX_%kXHV6+2&YA{$~ zh{8|>KFt~5idbft!UTnh3X>9m;}3ssFvcel?pGMAFiv5-!c>I^6s9@wS4WK%ng9~V zA5LnjlbR_sS7@QoUg1uMD^Oc4h1(VGP-q#3j)hw5q&5m|71}xQ*I#87Dkel%1;;d+JY3N;jJD%`Bl$RJ8#-M9Fp0)XojZcwPEP+OsnLS2P= z3iTcM`^#d4`0xqNJcSD!_{xG&ev(QUuP{*|n(t=HR5*DP_G7p`1chg=z|Q6zVJRW)u2@;}5IjEysB8 z2)wZsfVbuXjC8mLVdWJnDDZ}PybQy5pEm&S7zg0J?8Nbham{p6D}_l8*CMRCLOliE zdyCi2Fy2`T&{Scx!WiBt3~`eku0suV6CdnxYDSBw`FZo;z_0e<8;atg{cY;DDVrUcm-upbv~a$C}H_c^s{s5;D-LB*TVAh#P(Y!uLJ>mz_`^7UQ5I@=+}C?f*{-nLp&X`QGfb2r;9h1b zT%d51LPLf8eBLPDDr+d@y(8@LhWMf_^equaz=Tw2tgu1LY*g5#uvZ{T+V6Bd>c$mM zqHaP#h4KoO6{;xIP`E|mR)-ro`LNvG-n-er&X zn~>dWAS5dkQ7EZ!jlxq}_0tN65`g0m>weBB)c_Rr8VJP{4rtgxh36GsPY(mdedGwQDZHKv*#6!~C44!mH8fJVMWL%hUDW-oS3vk$p@xRtq|neHN@1bfbkgk# zcPLcyajb_j&v`?HqY57>e5FuTE2u`m{3oTbh8jAlmO^cXIu7+w=3}p$a7>|!hSgVS zpm0-0v>#vTSVKddbhE>am{MJ#u0lP9#tKaonkqCCh?1H+@jc6R{3uMQt58qjMlI7w z;TDBk6aUm?d12e|+dB6A+0v`wrZ~>op3&aQA0;JU%&QZvqkWnF% z!yRad&)mgpBmD0Bal-Lb;P#hFxB^$;iD{@ItHOB>Em7Sq-VotuuYmB2!mkRy8AK_J z`$H%FsgTASYK5@;-Votxg%S!S6-q0VQD{VnAAeZgcit-DdxakyT4M?y*NYDcfzR^= z-~)dFiYr{HaFs$?<~0h1%ITyk4sFp8AG3^y5%?Tt06y~=Ad3$c!_HO6rf{i1lysR> zI~3w$mGSBb#S}7Y*u@Gt6mlvgD->{OkE+jih)5SW5iV4?NFl#MI{$KtWzs90qmV%% ztHYfrb9uZruK%Q5UN<41LPjl=N#Q(&YzpT)bUO9#SQg>?$+6{4+5k16o+w)nch>iGOy96AFY@i4+_h0O}v6!t0H z9ctt8=MEnrR>w49@rJqpHhLk#CWS2uk1Om_*sZWv;fVy`_`|vn`=qXb4GKFI_9*OE zIH+();TeTKKI7fc&JIjT9DhhpdmMpJipEEQz$Y*R@KMeHe7rKiU4FtD?F`m zh=BP|N?~=+=%jZX`e4cn3bd z*siccVYAoGGFuc5D?IDaF9-I2H+id|q~%^6p*}71uML2 zLOY)lk-9k%?o#Nk&{v_KLVt$=sGzMv7lnZe_r(F@pTa_ebkbmjAqqns_*8dSg#ik~ z6-FqGR2anvRpTSf>PG9NF%Eo+I}d(t5Dz1?Q)sWyRiT^0y;@sz65Q`J2zBrDWkh&F zAuVn%$GgBO=X>3R3lwrHPgO3MvO*PwstVN<`a6t6Z4@_mW$Gx@Rj8*>)YlT$R*b(lj_-h`fcASF;ZmJ)nZo4? zxfGHW3M&+Gn1-sC_zCbdK7X(@mGJv9g_+(T7Mi87U15j9PKW6zGtmc&FiByGL6pKt zGj!5Sg;@$Qg^dm~P{BjKya;m@<|)iqSU|x1C#A5^LY=fo;bDbg+UjtH2@W$++Y~QD zn65BGVJ6Oh6N{g5vvg8SVYb493UeH0p#uIoF}^YpCMrx)m@E(_P4j-U&~$~_3J*HW zM%XmJW+IH&DGw+tQdq38#35o0OPvVo9OeKzcvlINb;?wQWeO`59#&YTuqF3c_Qy$eFbZdXoKzp9aGF0(`pX|3VgJJaV!xiqeL?P%U%WT5gT8n# z?bd2((|(ff>|6K#uiv_d_v-b;d-d|H%@z&ni^uu=>)!trj6$P3;;%)(pOiSox(vxP zKAM6F>*EvP|M!6JSN{)MO>NYkZ~R})_;if+Rv+!9fan{g|2;(L!#~&RYSi|F&(LWB zo-f&pLLYdc|1~6@FZo}$8oz3YHyZt4&A4>|+u#4$*s}{4pS<{=$GY%iY{Bq6*<&k) z=Q%I+Pjm!R{_w#%P51(3{`4|G0Gj&KGygVlKlN`HI>Rza{qUG5#wNaq3`(6urv|KuEnPvK9L6|HRXpF5rjT!;!rdN)rEmmqAXx04DS&{X;-AQ=s9@`nBv zY{&n%afzWmDXbtG>giu7pC%MWnK535(DEeuYq$z=-MrAh1F>&MW6}RQ8Vj6%qSC0S zomX@cl*N>7{z%w=3>8t^Mz1XuxU5s@452FO-s^SO1gt%6uw{Lkh3ca2AHD7dfF=JX zG(wp-ybK{aiT)azAZ~>hI!$PSG9P%Ee*uxkwFJE5g-#RNqReMr<}{%L%6yzCQz9uv z=x-tR%~-6xzl_D&%Rf=zG9g^E~VQ|aG?*zR$8vPXka z^GjaynZR&V5FSN6HH<25bUKy(8e&t&=eZ;n8;?QfpT-kW)fm4@`DY+@ z;e_3cGD!(wFhgu$Ur~_RisA)N4aX7otB0KlB=yI|rB{#&%`uCq z^v^-;f(Nie%=rLj_*8#-WJQ-c`!&Ud0A?AEkHe|q5`+!)uzv?)?>~Sg@CiG_KT$F& z8sin63FJcs1HFP%LqUYi_OMi_h@noUe-mO)Ps1+vD%3pRYyM}UG^!rvRi6Z9F=cUl z3QtQ@=?tMFs+;N!of@hjY=egx*lFosO-igpCrzn|8kTzvX99Il!CJ3?5S>H;8eq}_ zk2^KojIg5~c193s4NU=yytrny=0$JjKZeez?Fp~# z)X)uK2jgK}8B^)>p%-d++#5PI+>Nl^9`;vYE8|~HO00|nP{Vq!;nZ*+!m|3M=Dz_^ zD8$ublQ(o~7=f^Jy`eLK`%%H4-p>7OD3wkL6EG!{w|XWp6&0j-s{*(YD)bM)Y&7(f zH}vja%zmftKZci4+bZw$D}eL7>QexBwWpYLhEv`}t69C(zl8>g9qQl4 zomN<^>D)Z|>wJn1r1K7(ImC9&&6BV8x2Wv6FZeTtSfP1&@;CVvb(Qj;Xa7SGduSed znPvc9@9Q<6F~ri&$5ma<`8>=2mw(EAf{=gxXWA!uE{}b}T2A?=`T~Sx{1hR7|0gPr zIUMK<^*@GdP}^v)?Ib9LDI}>gG;c(2!Em>sNs-z;lBu@(aurtX)18PkV^j& z#-oPMy@pf6B!qq7VSfv@U-;X&#NqR#u$gG+6>sQFAo#(2D(A&ONoDp30@6-?*zA8_?yeCkkiO=0%Kx{IiVnh zSjA8JQ>1p5d+}ZoFMevc0AWlg9Y2izzYu%i5qwQ~F@iSw3&l%6AGeCJOAGGZ^53i`P;a}AYO^Ov&Dx0lqY-btMRdyH*>}iyLJusbQRWM z8K3G;bUj*{;Vqp66)|O+Px)^FmrzYKG~OHfFG2&fGs4?3u-(gFO-d}3Gnvu^4c+Gr z{cE`SG~-S;EY@}%7I~L-Smgiu&)8oP!audUptpJb6y}T}cFlS;Tz)-j{nvk5{DzRz z{IfOtqj|EIjaClEt!6(xeHgIGVHF@`|9%7z@`A4hgpA>903nz7T0qD$z77!bkFN)W z%;b*(QZt5c0PXQsHv)D!Yyv#v_ck^ILdNhdfRHhKD`1a@JqFnAuniD0hCdDn8N;^& zQZt6{0ELv%I|0lloy?nTy8t22^lm`NK)nYLa#QaGgsjz1077EueSnZMdOsi}pneh% zh1b6v0EHyj2LT~H_EUh6IQwZpNU41Y5YkLP19;E7eHak3RzC{}`K+G5J?<^Q z0*AK&Ap!Y2fRLK}UBC(tdk+xaCGZ0*MYA&>hffRH`@Q$WZo{~6!`@7(8r@Vcij03k*Emw-9p1%Y3ILSp%^0U=-W zH-M1I`CCB9AN?I5WS0IO5E51Y00=3pe*|<5CrW@W4nGgZF`}*0FPIeaO#cc98K{2) zwDPdu0WBSl1H!v${s4ru*M9<Y9ry?O>fX)luzaGgUYKq-gJfD#1Ee^N>o(A7TaT)Kx(RVKm`xG2vFYPVnDf&G5iuxcb@90~(MV)3X5D7@CED4?##6$32rx{CwmJ6s8v=WrEZuEW)Uha5@(W;v7u z%yhU0Fe45;N4gd?-6xd-baS{4(AA+dAS56!1L*8i$^tq$lmm2hC=Uqf!z%#7yL+w& z+!NlIdIRWgFH{lG$DtCSw?kz>FNZ3Co(@$3Jshe5x;s<{+~rUMFvy`MAPRZGYk>y( zq}qUxOS}$XfKRCl2(R9$2k7Th>I3>Z+z1%$&;St9g5Lxf=~Eg;pb<_t1BN>^0t|Dw z1rUCGaVub`PiYJo;?M*z*r6$4l0!4VM2F^p2?^kBQ_y&ybQ@rt!|i~OG5ij|{XV57 zV2nd6z%+-}fbdeDHh`%%!7tp|=-waY`#$zc~Dox^TG$VR>g5Hf-91%&tTJOK!~ z#PLi+G`0U^crdw`Jq`+Y!23;qEhHDmY@ zP%W?fLqJF~eiRTAkbeXS8N)vYgcRS$0Asv@PXMDGJ_Uq~;hzCQF7eL+jYGnrFF+vy z`Imr@G5jk)$npI(;BtS`<{LoB3;r!2WDNff5ORrs4+vSte*lF1<3IBF6EcSXgh?UC z_s@Wk{reX{$P4}}AY=^x4G?mP{|*@IGkzQp@{j)k2pPlw1mv-Kh*DBOA^Z0UK*$T8 zG!(lGpVu^ikV`x*AY>U&2k->sDd_ud|7lClY zJ2B~E05<*vTmnFC3CIpW-x81m5b}NJ1cX%JmjXhP@XG)jy+4-&LSpe;L(zW7Ii8G3 zA+2|AKuGwV2T;RXy#i3hAuph^Lq0%xhx~wo4g~%)GCLk&V!pJ44FrbM; z5kN=Hw-a z)CGjZ;`IPe`bt+Hu+QN}Ku90nAOeNV;x_?8!taKFkP7@}Ku8ka2oT=Ta|X z0MB|mg8`oWJ4zV>3VFeY0z$@cuA3p3_%OiNUc+#}R}LcpA32N!g!JK~0MGf9(SVTe zdki3+2|RxMxgS)^7v)$$4To`ncxG{IWGUkTRej0?K*$R|5pc{Kngj^1>zND)$-k!n z!W(*~0#Y-EKLBdrbx#9?G~?3&Ausq0K*$(A6A*HV&jN(x-!VYQ3qBhVGKN10XyWb6 zi64KQ9>S!M<9jY3WdEKA2zkNh1472|1%QwWd?6qt7GDGiDaRKBLNf9tfRG71S_-O) zLu&k(ybMs;VL2dV7GD9l(|fuS5R!yH3<&ANR{=s|@kan5tM_U^B1t%w#eHv&Q`@J)b_Bz!X8Amjyq5)d+m9{_}0;s*gC-}h61kO};0Ku8jP2oTbTKf`T2WEMXRxXyd` zEFk3gehv__e?Jch>BCa+ zzYYjV!ruUd^xAr<%sfRH}? z2!NTzCVDaVfiLMHG}02g>|p90R0oIV3(bNCz(vVVU8 z2zkN31cZ#?Ujafc@vi|P%lJ2dkQe-0K*$*W9U$Zq|DMO6kp24yObU6ye+2L}H9q4% z0YWbEp8+Au_%DEv;`>)XNdEmB!1IEq{0<0-#g7BhSk+O=AE1y-{7*ngGoAtn3CK?X zLhf!}HiWF+X#gSLH&bvo@?qq+DWjaQvH;k^z51X7P-GkaL{($3klI z%z%*ao4M{nD)4gwAxU^vKu9cp9-xZ1nhg-rf}ama%@}?GDC8W!5D>DFUj)eOHCzk` z8N)9Dgk0j;0U`M}6H$e{;5h*yWB8?jkW2is2m=|?j9-pPAuo6?K*$)*yObf9cy2(* z{+$O9@`7Ih2pPlk0zxkFe1MQ;JU<|00*?xSLXz-;fRH}C5Flh0FAN9?zl#7e_!q22 z0U=3vF+fNkUK|h-i(d%{DaWq@Byxn~L(0|obGfhTB>*AecS%4<1%3@6BniJ35YmU2 z0))ik*8%c*ZKVNu9m)Xa`B_R?z_}Ux_)`uPQh}ETge2h=0CT<2^?;Cb{06}7zG74a zgsk3`03qLZWx!*8jZy`$)uAdN3i-pUf!6t?>VS}Qyar&6PpJu5?NAF4(udaugnZw1 z03j22T|h_@UJtO(E2tlVLT2$B0h@hN1HdMSn*bqwctgNppK>$c35Q02y$-hkc01e( z*yYd|U|Gg-{AmK(;***JLdNiBfRN+6IUr>JZUH#tWo`o;bhsU`-{B6x9*35Ioer%4 zI{=B}Pis)f@!bXxvVXS)guLMG03l;|dqBt~ekUMg8Semi+8gQ!c*>y@Alz~54Co%H z3n=6T?+OSR!@B`OF7dknozvK1p*x_HLk~blhn|3t;=30hB>(OW2x-ClaPfzX;dcW< zGVyx=A9}k2_Fs!xx_~RLh|pCfRGk^6d*NY_-If_CO!rb5|G~y z2zkNB0#^I3U>qRi5+4tE$vZaz5b}ag1cZ#?lK>%?_+-Fy>G3Cigr9;BA(Qu1K*;g^ z03hTNp9To2z^4O3lJFUT9p1T_fRI>x7GRrCi2*_~^4UE8EcZzdVp2#SJ_isIem?{V zslev~LXz-#fRH|XJ|H9(UjPUx#}@)ZlJG@zM z6ZqGFkR<#YKu90{Ef;^tEdCuJ{=kkFQ$UKp`9X`GAnt`vO2n_07A;~D*z!G zd0s$mACf2^DC7mt4+t5<3jjhc@q&PmX1ov}qyjGt2uZ?=07ClkqJWTCyci&4^)3!b zr(6jNslcxSge2it148=n5`d6cyd)rza~u_10|?p3uLXp>;H3Z|k@t0gkm9>E z0Lj1Y_)`WH@`9HIgpA?k03nxndB6#LGZC zh0Nmh03qjieL%=Yej^~{?rs1GS-o!pgnZu(0ek#%^JYLu65a?9(udyyu*Bjx{@e-* zIma6VLN@XyfRLxWDIjF^ZU$h&@A!gf4hX5hTL40m@Y?_(efaHwkXZZ<08@@9jz29y zAscxsK*;gk8W6I7w*iE_;B5gRV|Y8j#eS@954gzTP5?HxL{B>aiutD35l}R|rm+(! zr1kC$DC}`v03j84S3pP--VG4ahu;MViN(7ELdx+TfRK#5Cm>|??llbCUr6}f8ZkbNFRO=AS4#=3kWI4`vF2W^8SF0J_-W>A>a4CfLS&rN*M^6>2db~Li+Ik zuf6Y&hcavbcaJe4L{ZH6G2rE`aJ&oeqXPzdA-bdpX=P`zRq>7bDwj+ zult;PF9eD=i@%SDAYG9y0fICI*ayM*>$)+2PE<&Q5C|0@5rR^szZ+sd1cexY^;dd- z03r#7FpwmKa|8uQhTwz(d;>v&0vv=OUjb4eIIaL92#zU0Dg=27a0r521xSMc!0XT0 zS<@lPQHU}i$X0;E5M(KU7=oh;kO{$I1vmmhh5{UgAYB2nAV^byYzQJ0AO{}Q~+BD z92CF~0;U4kLtvo*4iL;$07nRD3g85RnF6pNaD%~#v37Na$W=a-j1hxvW2m%`gaD!lKagsl@!qnoVFldFT#Yyqd3jg0PPJ)*Q>;vBzZmf;7 zSWu;IvVFg_W2cE^2JWkHP|u*AoO(z2|Lu2#%NSD{OxZyE<&FqnB5#hk|K*!=Ai^oA`o$(t!iE+S{1&^eU;TJl~tX-HNG*v zHoikXSA8z{hED(^(^C~sHqY<4m`h8@awXWOtTY=k|u ztZ`Y@vY2JA%k-A1EPK7QZE4NY^rZ<)BbEj(^;zn=)M%;7(tc0RCFV=|7dJ01T%5i* zbg_6AR|9dz3E`#9m&f)Y!(Z&;Mt=Xn%VGfp@IxK@k^iP3vcHj%@Pqun56VIC0U-GQ zhYufSD8K*k9{!Gf%u?rrSw;CR{e>@FlA%lHviW3-2GQiLHM9Tx?d2SoRJm>sj(MjWJ?}I61 zsV|q3f#8$J6QK@krBQ1suhg}LjlGMn5{~(tZvED|-<{L|+=J&>XP=;a1+pwD8-Z2< zJfkF;iYI+?#tDxBFP2l*noLJNv*3g|Vd*9yJfFe>!qQ0>rcEZNqV1vO&rC*L=of22xzS|Q#eBvDKPe@kCz&WuCa1!`oIp^~WYmR@wHCNd zN?pt^O_V01#JIQOJ}60FZKGsQpV-lW!eyO+tZ*{gV(tu}JHz~j>UdD`H6>hX9Y?{< zz^5p@8*^U#Jq41xB?uS6&h)b)?V|(AXw=X8(tSl1@B(u>*|f>DBG#LbQD9w7;e+?; zP_^>eP_@4fQKsWN#>?Bc8(v@LLHJ2OdN?kX+Y8piX%==D{7IIs@hlnXuv(8k!Yfce zQ3kBm!X3pORJ`qnx+J z4~-|DXocEfdk&3VAGcRvSDpk|_q^LsC2aE_xj=4dpM4b8EbIpQlXGHw1&tkgtrS*- zsiOW_J7D_?jfu7BP@F7-g?cK|-r5`1#DWeTbM z(1&YPT3O$l$kfcp~EGCt5k4 z1=@ct=vIbqmwlgd=?i@gb3v0oKQCg!3p5yaN8omHGQAS|=2{R0JLG>KB{HDjnv6_Z z3Cx>K-cBkz^lVU`KN)pT?4?iubaO{ANSch!?`J@rhbN=Nct0?CHHqxwy#tVsO-65d zR}oH1Wvttn3{F-DtTUPXF^Syr-UY;9654+3YTA?1*jNv0JTMs@#(Sj6?~}-e&(c9-gpD5+&gI{=BrSh zOn#X}c6klszJ(Xo?!%K%S)Sdf61xr?Ovci1ny}WSd$M|z;;1YWY|Q&)2$=9f2h|`0 zM`Ji_andKD^;p9^kmsM2+WVTI+Sm~O-xLAY{)9QP`M`h8DZj+rBtxC+QYWFa+|uC` ztYP#gW9b(Zs0cP~`LBxjzK1!n3DbYg31<)#uoi{aTV~26R0i@%-oH^;#Ym|0r}sLX z@eyy|5F9(Pef-9TQu!E(c`Jx}2?tMXL%olKD(087;1k53YKpB4{+L7Viji>q{Pbkl z;_9)|G4}(Z!?0j%_4UWYFh>KjL^ui2d<`cd*wSN#kPLRehBso^y6LeprN<7x8dCXB$t4k*&(O<)dgEuK!Jbn|5K3vB|*WL1Sh^EIQdZ^`1~GT@=@}+pzuqAQ(qFC{*s{R zQ-R=92BG*<$)|!dUlN@ClAz>Eg6}^U2tM)`wVz8q3Oc_e!1imMu&q{qNq}ul`q>cz z1$%<+VEUOvA;30Nolt=7DmtM6+kA9F0k%cye+UF)+|By`DH#)N_>utIxb{EF8ao2p z4R%7o#)$+1j5*pgkpvS2eMu1fCBfz|3ARiu5Re)|CYF#Iu)QWIuzc0LoDY+D0TcNZLw@lydG6HE@ASqDTm(C}bb6Ey~$64VM@ zn?(!(K`a_e`h-PNL!{zhk{<$|Hxe~*j4-+-O*#$HT=w3jJm+OGs z1(YSIm2~|@(ivqW3bcijRswAU1{KKi(7Lfx7VTrWfS~nyy1-g<`gC9vNKyp?51Nsw zixS?((bksC58ocT%aUwk?ZhJQ3f;0}dk92!b~ZMSV91VP41}lX{y9_<3ouuc%s@Dm zp#|nQ(lx*$DJfhkW23teoQ*T^T#i}*nHMP@?7d9W0KDZSDrnb(X3JtQgrI>z3dso| zxd5^Q)P~H1>CCI>cXI0iq7ThfnT*2&9an~_^y)SA1CleF2rYJtv;mmt(5C})2}uJS zyG}C&!sloRridNRmI->Uqe}quB`j8QgT?}bRFXeP^I_}-^9!M=wyi-aS1yn&5zy^I ziXPLxU=2-c%#hMGGzt;}5DWS$piP>t0=l^jvfQXwcr;a9P7umQeg!sH(Ro0711%kK z1}8Sq=7Lc=DFldH(J&w@qV)mqpP&a04%6&`HlH*LY><)Cu@lk20~t*Vu>;P*Bn!~> zE3Az7LX-(R2kkmY-Nmp*VnNRW+G^monZ^LQ{~}f*d&d%FTVQi*|4d>4373=v`zA>b ztTfj{rJVb;6$nTbFrW`~Kp$|?qNM?GJ?a9wJKz^{8uV~kIIJfuZLGOugG4%5$wxI1 zN09%J7L7!Mwx3DnQsbixUp!`D*iGr{5M^6yCdmB-wZz<38d=WhRvz>3v45$0v^sfL z0L*@r2IjUw1u&lnUk}0Ns3W6%Zoo4lb4Vx*8bMz2m9z zx?ktVCB;$Wx?(G1S+RqA8usMx>4*-B){m~<#oRd>)fH8~L%bt)hxZQZj@s?f+nXX} z;rZe5;UVFyaP9EiFisdXZ1f-Oui8V?LM=l_LPiCfn>Lqhj^7**oV6)vliMc7rqPYL z8-*Lm8wUcD0z(451Mz_!0p$Uf0lgde8>kyb*Eg-N&&)X00*TE_0r1@(2Qhf%! zW!{2n?=){q?~xT9E5s{8R=BLFU7o)@X}QaC?d5%5E?z><-X-Nr#7o#q43`Wq7A|Hj z)>z!@KD?-Ikz`TIqJTyAi)t4ZEeu%5T&TKG=*n`fbrHLSx!Akty7Vn5n;$!$H{Wgk zh;xf`k#nSTypxhsw_}rIzGJi_%dyrW+5zuSE3gl+XV|OS585@@<=ZjrRP6?B8*KA! zWj68il;%}ii>(8!U98F0I@Zsuu38mZ1zQbSmRcrQa^Ze}ZwN05F9^R8ekD95JSIFK z{7kq@xJ~#c;U?ia;TqvP!WF`0!bQS4!pPh1x0P>&Z^PcYyp_GFeiQk|>2Kkf1>)N?s4v8{l`j=s~@F33VGDm)$~yKko-{TVc&z=2i_0t zA80)2=&bIPbVhf2clLHPbd+@nJ96)H?z8VP?v)GLIql4Le0$eVB|oM76#0|KPliAB z-EF#CepmHwds}6jTN|UTNme2g%R*#$ne0x=osib}7W}~dF z8oiZ&EB;o6nlAA!X#GIdF>z# z@PR)V&gN&avIdVf9W6V`I%;@S>8S9C{*lql?#z%(c4n8jPRtX#h#L-<9A+IhJY15I zmJyjD7)(z|=cjYh+taGkywjLzO^3=3*&otB#IRJdY_TY_$g&8taI@%`E1nxN*JbXg zd9FFfyqnR)$Y(?|+!$nrDx-@YOAn&k(_3gsG%`(z)@N30=52;I>!OxWgQ%lu7utZv zqa2ih)|tkda!dy(EtE#Ql=zU(p73f zN)d4I&krd0^8;1WQZYeVyXz0?Lw>@1gM! zP#!|hmC96U3>DfE$PKZaZJiX;kCllhT*vA1)!W7*n+jj{A=QlWtKR1N3E1a(It z5e6Br96UygMH-XNfUggt8qxf?Y*4$Tg6lt$*zdJxE* zZ8b+%0S*bhDkqk}`86~R=`nNCas;IKLlwKsX~z+qgDptThlGW8BWgKz&yR6lNGZs? zMw=_W(?L%hqXxzZ7)bgQ6rsDM+N#7o2>8eEbPDnsv=u_$=Z=k@I`DBO*+{$2LOx8c z7Dj;lA?F$vE<&wA?_81$JB2?+l-aPHK;atNY>-k;Bacxmkp_@P^q$2SRz`LLzZHoG4QxC#%WtE`ZwcL=S{L3<9GJdq7*Q?7&1bftB@Pwr9)1! z?*_UMbWf+Lflb#?=V=%LX3JuN;97LHw0{v}8zOb9C&eQ`T?$E#rt7dKZZyb51X+;$ zrGqy}JCU)X*KkRu((;vznFu&$1c|VlH&IidaRdE?xWL#84^YlyB+1X>Xu|?gmuYjr z(`MQ=K;1x!&G{C^SQ>r6ydkHr^k$E-P_NWGLrD0cSQT67XL#7U5WSpu(9R0huAn zEE?n|UovKaRtjkjh?q~;$M~X4L==?Hr?YYPc0gyJo+$=qfj|`6$ZY}aZ7(hpA$2s& z2!{3Qk-*IGf5WjN41Z?K0V`iKxEK`|ImTXfd(tZrP;CWkruq!hQbjY(b;m{|*uUos zy541_#ir?|jU4Ja6m-brP)Djbm6NKP+9DE*gd)DkLqrz!rBtT~Q}8L(2iXUi2k{5H zzKQ&Xour#Id?4#U&;hptj02E$kEU1^xogzW8`{ zJR^Q|Z~I=!Ug2KUASMSc+oo+i@wufyeZ?B6;i{MB2N0jjG`2*Y1w(+*Hwvo4$g!4nGp$#G8kjM~T zh-C;qM7E`TOYRo_7L6?(o5h>MAT8w*tR37J#MtDvQ3Fy^?SUnM%s}nHkpMw?KvF$}!vt>dp7=C$)`c};7w)@O zDyMrTeu%_n6=pI4<y^?*xGFIvdCq;W!lSnm)0(2 zFJ&&}d$K(BJ(WEDJ=&L43YO$A@n6DNqO_!8F=w&r;u800cYk+@n{W|J&PjPJ)LuB~ z+TmK}n&hhM%5bS%khLIwf&Bv21>N%{^GjIKEPs{@OPkf_ROyuE6z{}wVmMVg@*OoC zI~>Fgy*A}GV)#0gk0jC=!YRTD!ZAV);RqpvkV=62SMDe5BYaKRP1s4;PS{HLim;im zk+7byhOmm@OIS`=N?1%-NSIG>B-j$H33CZFf+@k6KqSm2%p_l0IRdcOUsz#?x-dP_cSOySlo{yHdLRyX?DEySg8i zJxqHT^pN!s|8S&})q(Hmz0bezf1hz*>3+)3Za?e(JaDfJGE&<2dfUs}bKCjttafsH z_g%L(-L?T)wM^qq?(NvyLAUj9541M4CbbIit+g%e7G{g=N9vE{=7FY`rpl(2rl2Ov zCXJ@yTf$puH+VN#H^?`JuUB7Bx*l?!bzS>x$JUzxT2*Zw<5MezoNIip}eeISk5a?gM<_768X~bMX}&w z>_z>HN@dmO#pjD4$HXaNm1vZdoQ*%Le^%+N1IXhsE9ESh2Qv_;AW${$bAH zj*Qw2j|@ged3shlBV8js(uQYaX;aHAVtO!H)_Ch)s}?JXRjieV)u?5zCC8FsIc(8x z5e=y(vW2Qe*WAjvedd+sS?2MOZW>^;L$WD=W{FZwyC8KWqy$my1r!;%n#?0p$$0XB zNu5cqNr;JuiM~m-vBcQTc*IC%ly4Mo#4%zRH5kSl`WuoBl?>ZSkt80Zl*)-IM1P_^ z(U4eckYW&Kz%iggTB%9DM4zp%t3N!aYfkx`lsSfTMrZfVuAVKPU9KCiYp<)JTQ@6q zmiH{`tUm2DtzZu=LoFq(G|foOQH^em1`Q95?&%HF1E#x8?@*6a_gC*zYf&p#W2qUc z6{)7EYO4-UOPR)>HcaRsL=$)f7lM+q2PBcOS1At~i&9rMyX=}I1bPa%xA-Fin?laF4=Hc&Aa^#mI&VO$PQMPLxa5=MAp&CoKS zeH>K>``YNHV*wF)5DpITG@x~lsENg(Gy&h5R5CVPa=PgLI1sG^BPa5V!qc>`a89;h z&>qfZVEl{?WPY?1BmzYJi|z|H6~ke+#SsmWa?a335HQFf@d1B?UI&U6pm3UHK-540 z(}lzwi!sV0OISccKCUAN#$q+y7toZCfw2q2L@i)(4$cSu)Py5xc|JC{%VSem3@5@J zMZst?8i`FpV7v-TlgH!cy@A8pXa!9GEE-_Y>c=?@FL?!!dJq)=Lq_I{Xb6HA6dMAvpQmr!Ig5TM&zz!kFhe(7BPMg@X~r;M*`vC=ZBH z=~(RQHp-CC&7_h$=rIJWD}j+E^&O0{`4o~2f*GU*Ko~Q<*n22>Y(A5T%}ULs8xtAf%HV?@G)vk; z*p$%Q_)Mu(2_1Wg0-xu>w3WP*$ZI?wlz4q{DU4I*8kgUTB<=;_~+ z%A6N87f^l*hF7)EF&LQR!U<0=8VkCK^!qrLGiV#2Sx7DC(mBwf z7zbx2i}`smFcN*yoOD+@Jd7sckaKbhINNQGmO%C2!*9#pCc)s0?%VD+b#Ij3t{pC|$g2pg@T{<^a4**^&$|?NDfp7XrRNtLFD75iEXykiE$Khoe753j_*vJp zdS^S&^b}nvvMJIjdUv|wbn@xI(~X6hg_J_1uwPOriIMn7o}a8a>3P!Zq~^)S6L}}1 zPUxI?Bq#_k@G7t==+D2JpPk=)+$Q%gkPadM7ifZ>oSK}t9J8!Av8TBCaOvU9!(NAt z4!_O_OgB%jNy|%1Omj}tOnY`H`H>EnxOvp?KO>j+k6ki(e9#4r^i?83Cy*FZS=GTE=zl-aPtB;F|^NBNyTNi5< zTeT;9Pr@FDJ!*S;c6Y`U$GFE(V$@>lqqCzUqBWyCcg5`D?sDDrdS~;_!kxuYQBi79 z{gG{gNKs^9q(kKE9giYPBRnI_A~Yi!`FZ>(zWcV$@XW7@w?u70w)AXn-ki9ZyV+{9 zS@2L$dQe0VH%K$6XH(54?k38ns~Zb8CU11zsI##@P!z}w913U)s0oM)@C+~txVk~K z!F+?-hN1PP>l4;<*Xyi%#Eatj@tk=>Ya7=VtQEMfRa;xSMzkhsjrp3txc9g*TzBpx z|EvDR{(=5B{%ZcEt7BGcu71Ai-m3If!K<8Cb@~*_;TD>q@nidA@PJ z!M+B*&wUzwLVav}TD>oLXM6j2Q@r1;$XgM*;;-e8mNza>Snjvne0j51wwJk=n%5A! zl%2rl3fQlg)h}DO%y}7QS?AIVOOuy+dFpuSHJNQzQI-OSxfd9IG$UHGS*cm3nU|T7*=uSi zHHylmK0@nJAJhhIG%Yo?G1W6Iq$E>RDE;IpGMD_^q|L<7#KEN5_=2&Qv6XR!QMQqh z5n_~Qm~3cZ_!lXUlt9uWy(4B4V~Co>A%hr$bp}29jr!~KUG>}MRL$|6V?L*TcJXX0 z!EBw`1$v2kdV2446Lmv%hi2WI#hv9mtA1wjOxKx|nT0yZItDs_Y3FGtXd~LsW<<>J zo6)azPb*x@N2_16RWnr6OS4C#Q6o^pU88Y&>2#avdeckQ)72^JD(cy4QEKLD{i>y^ z;i?qXXVXfjMNA8v<~5Bn?Jq(jA)63LpePGM;r=0dN+pBQgZ_gqgW7|AfAIeZdtv`# z;Cb3}-gDM-^7G+=mI2NHb3lJU_IuIq@xRBy$ZU1LxL?0t))&y{(bxO0@_&W=%KTOP z*O6x}&x)S8JTrWTf7bU)TU#%Tv1H#`n`%zUi<*#40cjMD~nvAcv1 zSb_)booStxog*FP9Vu{HJaE76ej1z_$KPY$Q@YpDUfu2jqqBW&lD613W?M)rvsJrw zq@|^$s3o$6(?V?-{jupsA&kU^HTN}1;OtkaspD4Bt$%H|Y^^*G7`oX%6y0W_1x}dsH`#Pn%?jM?dNV_Jv%D?J;)&8o>_lDo&zwh`i z>^qn5bieDa$*p14;A?8Dv#Q;$Xj~bnimwW(!dKN+W>s2N_I_LYE$>^mZ)KN@E{iY2 z9lXaUQ&16Q1js%}tnMU6L{%9mlmu^QG>)#*& zzy^E#=DKY_~uW>DuLBAuU{N`ke;gU?Cykahi~(sMEbuuk(4wg^mmNdhTAh>wMSXE^@b~Exj$Y zO{J|(7B2IW*~t3uT)mTh$KeigC;N8H?ZDf5xBFY`TZ3DzS}R&I1ubzcHZ3YGkABqq z5xLcRlY7(QrqRuNjirr=jg-dc4N(n#4bBZiHyUpg+{nA0P+xN``@7)p`fHkNDr&-O zTx;}ds;U#KHLIUX?@808!BS^w=au3s=2z6N3{{m@B~)>%{3@f$eaZ~V3eP8=4?j;i z|N30(xrlSl=juxfOGTvu_foym=Ov+MLr>eBzIv+QRPrg;Q#z;m3q^(8!h4b`Nr8kb zF_$2csuQAoZhq(Sn&XAX*B!Syu5!HiSky7KWBqw;d7`|)Jcm3{ZUlIJr2a_Y5!WMT zM;>KXWQsD)Ghd4n#DQ?!`s;8T9J#^|M;&rK)SOzHnwjdAYLxm~Aj%d6i~3WVQz}xz zQ(RN@Qq&H@0V)wmOczE7xk620kDx}dPGBY|-j}>DVxQT*cL{B9EDGOiwddXLgx!I= zJ$L^V(-u=2;}xS9lMY81E*xWecGc|4+ZnpEKdL#ZA}Tz}HA*k4Dl#z=iR{_Yyd!Z3 zcZb!E&-x#xz3rC>Wfz5%1 zfx&@M8^YH)tgGN<^5S?lJQd!fwGL~LH6m^}*N>|PhnFgWKi8k)U%Wbbb;N43)$dld zt%_RZx~dV5E$M!qeg=L+oQjnRaAfKCZSxiR2KqYqru$$c$ul^PTv#5u+(%Z%Vs{OqN{aOr)sXN70Drz;#ps^B1^=Fz{TZHZ_};1Y)=B6qHPk6XQ4 zsavp{z`;$^t#whU>m%ntt(J_+(7Km8+GHg_pUWc{U@45y;SE^waC<6xwsM zIJ0$T?q=_(t<++wCsl`9fF_`!s1Z73+AJ^?nYJ3|85&X?bcHX@92YJ_UIYKW#+O-r2ij?hV{C&Uqa2xbHol{P#VZ{dJ9 z!rxOaRZdiu3t7+L8*AZ11`PO+fw{{60qKS` AzyJUM delta 160105 zcmeEv34F{~*Z<69k!`j}m~12x5hRfigjy0}k0sV1A@T2)#!6r~;UKj$u!U)u3J@AE#7df)#mpN@0S_jm5O=kE8O-~HVh4Eb^c z{2V&P`qY)dpJU_g4yRu!p1FQ_>5-kSdb}*~w&{AX*cC%}L2CE1fxZ)OR%Yx&Uhh(cE#cmIsl@TMizi zxVc~E>;D1u2GYga!FqO}t+g@G*5=v^g>@ro(zf51D$^jj%KYaF$=d2rs9&X;?pYDm z>jEk$J?NIgg=};>$F=K#jh2j@~%AW1bQsS*}uqNNXva4<{%A@j3t^H1|!*5s^ zI~^SNH!&7YaonvV5e7$V;@QB_bJqusA=OEUuj6~hPbxb;^)hzJaSU@d7B6+|V#VMC zTODh+)O&6=ZCbl2W7DWj-ka<;-QBo!WBSIFjjl4>^Ss${#WZmU;yVs?z8@w)RooVguwS{Zb*Cws)vesp- z_1Y(Eiq{maIk;xqn%p&+YYb}=*R)-uTO(Ujy!znk{MG5Jlk}?-R(Dw)u{vP2-Rk1J zqP&B7+wyYq((Zf;d5i=hR(e>XWyI^bMzhO)Su%z=Scd_^mXYo(?_RwOt(*e zH2d7_WwWQx9x%J+Y`59=v!BlTVb;Z2M`jhwnm?=2ET38OS$k&Y&73~7{>X zyOnk*ZFpKtT4>r2AD;fO;KKnQ#(Wt0q0fi*AKsg>V#drFLuPo*u$l40^sMQVruUw% zo&Lgb#gJu~Zb&xt&>NZ>ybR~`d-TinG5SV&H~o=m1=HqFYc(xsnsVBasXM2xn>v5$ zgsDBI%BS8-J)SxtH9oaz>eDILr|g?DVakvxJ*G68Qge#i6#FTUCZC%;ee&?h?Izny zelY3uq?wZ@Od2w&-K5Y-+DZFT)}_o$X_`_!#U^Fn2L&Ij_+a`6!#`;E!J~=#D--uj z96hne#QGC|m~e5zkqPT2%%3oNLiGvC2@l3^9G^8ld3?}#*YQu^U-$m}_ea0)^}fyf zKa9&8H)q`Nan;AUjZ_T=HoG0CCH50Wk>?Mxby)G;Y2>E76LW4DhTJvM%9 z$FZSfea33X%E#Utb9_wJm`P)LkMS8}Kjz-(jia;lqmxHB9bJ92&FIsk_KhkSwPMuF zQA0)rjdC6JbmYE~>qgET*=l6aNae^YBMyzo8!>!D?-A`rG#cSELO$a7@a@C1hW8#G zIoxOXt;FMr8xtoa#wRvSv`KtA?1y0&hwU4-V%U&j9ft)CdolFZ&_hF~4;?frdnZiD56Zw=ZwC~Hviphkmg4ssi0 zKj_iGa|5#mP8!&Ipw~c~fjd-&<=Q%urpy@!jgpP3CRfq5@He}6G9Vw z66_Q1_21J!umAM^1Nyh?U$eiqzr6pWez*D^@3*nv^nS_x2K0;R*R)^te(U11;wS0j zU&LLHJ04dMmlZc5u6JCkxcYI`7b~=y9vZxgL2vvU*JK zp^!N^+d3+8s|nWB()eqtX{u=4HI+2Z8kNRD zW2;eUO4YxspQ#_KAF6*+-%)?3zM;OVzN9{{KBGRNKB_*f-mm^#y-WS6daHVqdcAtJ zdZl`~I$OO+y+A!zJxe`9Jxx7XJyAVQJw`o3JybnV-A~;|-BaCF-AUbE-CEs3-AvtB zuWq2Os}5GzQv0i`sjH~n)s@uFYL(hSZL3zOOI5$Co~a(I9;$v)-BEp~x}mzNx}-X< zI-@$FI;uLX+OPUtwM+G>YO89KYQ1W;YNcwqDqFQkwLmpjHA^)^HBB{HHBmKAHAXc; zHB>cF)lbz&)l=0~)k)P})mqg;)l8*ttZJaDs|r@tQu(W@sj8^lRh3lEDwWDXWvf!C zN|nDWpD7NmJEe4r?d09buG8I)`5iMmCUtDm(XXR*NBybjz0q5ubE4Ct2S*1+yF@?fu(!k7 z4rv{tIs|rb>TtRJ!S=cB6WhnOZ`(e+y?1+A`(y34waaW5*Dk7^U%T6FPqp3BHl=Ms z+laPKZB1?Nx4G7)u+7>wiEX;H32F1Zb#d#1ty5bMZXMOysr8dq7h2`C%4n6^YE-N4 zt-@M8iMkfGH_D)oN{nh7C5yV-@>t7^mg8G?Z>ei(*YbIb+bu4%C~UE##o88&TcouZ z)grouXAA2Vw<8N9w?t+{j*lE1**!8UGBDC9@^-|9h{A{+5xEiR5q1$znqO-k*F2(m zU~^6LC(SN5+uJO^+0tg|%|8NBO~aeodN#FddaQ|Y z##6^sd0^O9&#k6{-37S?hJx^dfC62CY0K>`g!s znPqaEt52$*P(Pr)uD)IU%V7t@a>EQ^Nnr_LUBbe{bYU0j71rBPZ*9GddZX$E)^n-% zr0(vzxpfV7!|Qt2mDMc_-4dD++9fn1G$hnJR1+!-EeW|CvO8o{NcWJikh^t?>TIi% zP^WF3fI8QL3xn4N#|1|P`vqSJ+8dM;)Fmi9NEdV}aECr{abR>{SfESb!P@z?(`$#< z_O30fU07>Nt&CdTYc;9mS?fa0y)|=ccCXo_rf1EffZYL01G)r+2j~Kh)!0@evqnUX zkQ&}KoN7Grzu=$ZpWq+iUsC;Y_1)DItH)MvTRotezF7FEr!+GU?(KD&K#eA0Xd`#AYL@xI`l?w#b_ z#oOBZN!8m`3#)Fano%{PYCu)Hst2p&S4poDR>iZ5$!mvKj#sKzn3tcIi`R3{V$Xw~ z<2~a%n|MC)xaP6fBhjOaM~KH=_agUg?uqWP?rq&e+;#5H-PXEgxQ)`g>D**)#k!?B zgDyd*)7j~sSH4#HROP*uw^UwSd3k}N z8sJ*&a?B;)CBdbOON5J`i<8U!ii<0zR*b8tsrcOavU9p~igTiKTjvmGjq@?>Hf^Rh zS{tTy(H3cTYnE!-YC<#`jsBoIU!AUwQU|J?)W=l2Rr#t6)p%8Rm6Pg;@`5r`nWBtU z+9^w%ikvc>#yfR)(m2VSN*pgZ7CP>5TY_@0G2UrOBdYVKNt4Ld$q7+X@q5 ztJ5jAZAT}dxb<)a(N20wIp(e0#hn&PMnX;w?=M#fqx<8||1XJVwUI;6gp;g60? z=@w?H{5)6oHK!Li1p@ijxXNT|GCf&YiS)Nt#w%Q1$$o3)MBVptnasa!$wT}4YvmsLhNgcc zj-`*3RJ#P}w}S{FmSU_JUe4l@EfC|xBV{$>QbC!bI|R`NS&EjNM5}0COIDguZ77u= z`lha~OffUPR$3U6IRv0%= zS+})o2WAqlX!%(lw}{ho<#Yu>276dC>_HlB(bgVRn@nGYS(eRX6Hb?w)3y#Qv)H1W z4x`2O!60TEr}7_p?7N)avmsp^ptyE}RUcTgDo3rX>vZn}rUfZ!oU5#+(7KXNj?h0B zL;9(f;sqIKZbZ!4lUQzSY+0wb<+K8)U=Eb?N1zS6{9lF;ts2{mto8@2mB}YVo7vO} z+DxEQS)!W*#@kqmmaJ6=YZNjo*;dv(DJ9FRLG!eMq%5|NM?ce~c*8L4>JM42I|Z_Q z!G);Q%854Bpoe-9xm@W=R;rbkbk895#gHgJJO3lIs?yI)TOzk+ zIHx0QNn2+a=t5k{8E550MMGCIElTNT>|asYQLb}=va{Gn&yAx)%V*80Rs-*=@-Mk< zg`6HKXR85hHC41w>3Ps0pwg%IrIk)8aoz)!p5qDw1=NDY0g*JBrVLfeQWvmTNXgtt zWi?|)C1tEa2MNhqS}K`aH)x01e2+D;Q4c7U58}2C=5z>j7&oXd73f)FNss&>o$Vf8 zU?p7fGArROykuiI?aC>rEe3xmbSHOcTQ5Q5A0*NPM*o}cF#7L;iN*tP56G<>$?6LD zSr6q!T`#DCT9#7x+zZ`xelE*H=4#0MV?Su^abRtVCHcr1G}qektj2hEmA~S-m2oTO zwj|vPa$V8uN})|j zG*nLIL%2ahIUQE67}3Yu+hR6vQEhxoHJtZhm6F5FTEXc`PJtB5WLhX>iwm0TAJB#w zQbaQ=TLKFk@@Ye8n5TT8VYYr{R-CS9o=kh$x<1_;%%<51jzR<<}p{s|{rszhB zs;GlVlN!np-7HAK;us(K1zq3}Hnz(~O<^h6@j9{R)PYl0s^5dH;Oc*%tehR7jMF`Y zLN-`3-{%1;mz_9Bl^TW}Wy+gzWz9K_D5u=Tym~VJ5&%P$;y7KYO|+>(2kl4em6b_R zEl74ABx`ZFmA|0L?itRKtv`k(Tf$505vPwiWqH~H8Q6^7Hq!W0ZDlpNt_u{I#inyh zN&5+30~4#3(&&MnfJ(k-QklLvAYA>KU#KQCxB%ox&mIsjsVMQzoo4$A7{SKKB_b#=5*x z>v0-Zu9Dvei!64m$T(WLU+!l4*Y0E5!g=gQoHn*4`Hi4bPC?ym|BU} z+H=?~;3o3fCol*uY6Mf;bFin1C40{Gr!i*EV2yZb8pIg)9>iD-F)R+Wp;j0}EEeg2 zOX~VS3`ela;w&Xs&=}r>nN>(hwNMzE?>B{^c^af+ah48+H64uT-B+<_IA4>;VIgC_24+C8Ue>}=v7ehs7Y(XMtcP(bAI`Hog42Xe6(?LwEk%h4kwIv-z)J z@-HNG4NM6oJzz?>0oiD2DI23<&jBk$KG7H^eNVF^@59aR%V}J>Y&-x>_lWj9_MV>5 zdrXiUi*4-wX=P}rA(u5R!veO7me1zO(m9<|PPr2-tkx^tNl`CloMMLy366zfX*{Ih zXUYCUwzNn6n!|cjG|UF%yAv?DRDm2RN)31tVoO_Xztt}G+%QeTl<6NJD}w|lGPIM z<_Unef(bAI*6|x51&iZb%tM+lzFIKwb+~*p&&L){3(Dnd6Qr_{O;qg%D(fnm!z4Kn ziaYgnO+tGbE71_ZHkdNrG~}6FYZj-A%BAwc#W-dV3@0`fAhXtlPG`RihDH9*ko-Lo zITSnS5Xj_Z*uf2jeQ7wp5O5=BheDAag$!F9I#08Tbp4Q3{rGfBUxHI!O!p&s(WpTu&^gy*UL^ER#8dbr$ED&ApGJTV0#fdS6*r_aWG1QA_-ES~T6V*=RLpDQLOc1d8Uu`%pAWNZjHO zq^+h7@wJkrv89!vv_5MuJGkjPIo(B!n!j`5-m=E<)tFK)k4 zDj&<$BypO|DG(@`LogFhgz@t^n&5k*{HAw*NGnD4+SeN z#?N9tPV6%<3dv~SSw0&2&R&RNu`kbmLOX#icaLx?H}dT4=5&t@xod#&YdKh+3R(M$ zA0btXvp07p%BD|4FUvA8{PuKZk;3L8L@A;ka^u-FrI)pCEZC#8q=)XKY-LvEw-=uu zfrftson#UY=<3n!J+sW4J30O!knFo~~L)tTV;e+ZUX9JuoO z(dsU@lWOb$y)!NgdZ#m(V{yKmJ{7x@Y$9_T8rpu$dZ#yU+CH3C;}onbhMh8ah!;V3 zst+?8UFcLM#fxCU`vhj{k6`Zj7*eyi;L(0gjl_ixv?)XM322jZZNSL2i^0g9uQO8q zHSI5{Y%-V0n43XfnH#0!)D7NIEP;O5z?G=7!8|pX2dgNY)^okU({?HweA%lZ5sO1^ z#{qP17h6iP1f0$*WCo`na>`2LA*~*HRY+nXfwfC9@YmSdMZXkUP+gc!m%@;6!-bq# z2EDBz)SktXi2;Wzc%J4SV!aKQgk;gsQ7%8*T*%5CSZmc_YppsfAWto!7*{i|OVyQ-GAw4M ztptm#06$DSB2lk`RZ}vQtVL(n)O1?w_%aG>{rp$g`yt?!0t7MC&i9bnVK z7X$_+d&Mq4#mzm<>6voo?*m<4P*8svQcgQk6S%*P`rSz5EHEKD4@~F|(JXopvvjmp zqUJEmf1QVx7ecMf9D!L(ks4D_f zERIL<@M0bI(A))J;Pa|{6ff7&oQ^41&OTsY6|#K{H2bmn&?JIk=aUc3{5niZ8^Qk1 z%*8@Nd|-G@-K1P9*AcM6(NgW?In&y~#TGUYdW2*|C8(W@Em%7c?R`tpLTS4aFT`c| z#)dd|flMEBA=3)Lj8HJspX9XwGu2z6g_eLOi%XjauzZ8L5|=b+z&Kbak=5g2p7;&Y zz02l_SD-<0#l_g~6Wp}yga?v}ci0XqCp>K>w`3@th+r%#|0cU`JS5-=Cc3ebJi8rC zbO#+4m$K)6qcx0fZ#41DXJBIc1~Ah!gBTVYZzy$`%ktA$n|KUugS77s#q-pKRQU{w z=LfKr?&t#1dkG7V_7*jDzz2^=_b6~NY9GJCe#m5<|X<9$xYmuoAZfHsQ* zZt_{W#^tXi4c`3qVG}jUUuWHTtgIsNbb*s?gnqZnw%(#SVd;mfp%xojJS=(fn1<7(OA5QSq;Xl>d~d22l-KgtiC^3T@ReEGVpAqk2K%4MM_#A{&IZ3T@rGWk`d_ zR#PE1{>fzuX1Wqu15fx>nl*{Iru0-af{oE0o0ki(7g+XXEM( z>w|B|1ldrGI}E9{k*;S2WCN?xDGZ@_6oPFWFefc!~% zr~3iuomP;7#nE`cMVhyAr%YxHgS=IR2o|T-ruS*y_>^j}XJ;qmCf-tCa$0IbLJmUS zWgZcY!;lq{3aBW>V?FM_GBd`bh0(9)*zP6(l?;tBBwx#WwPn7YsJyuzzMD{Y*8%y@p50@*8DiFZcDa( zr8Mapf)cT65#< z-aN@Zoc1ke0*up^SEPrA(2|?VUrysoYVvtAD7lZoXp19ZBy6vt2$I;_AlcpxY(Za> zr&o*9+U3%J@Va`K&Q`<|c=~7u`7R0S{28nc&M6-%euUM)d7!t!tAX@@i}B&txU6mU zIs=vLT=7_TP{%Ow1T!#_8`Of+mgNlm0t!fHsZl@a9N0$tx%ZO;Lf@MgY{C# zrNz#=z3N}P!}8@2^8~o8ZbBxCz>Y6jCJx+$%>4w_Qw;cHz<(j~U>wJbp%iq3URNzX zo^+P^lC>AZTA%k!y~f8?39-LJ+7q* zr%i21_z&R6I0)wMr*GYio$uhZ^91yM4B%fThOD`?nTuny;@saru5b{igE?hA{Y%hh zvC}4hNT=!-%u8+HombwI$L_^xtgX>-S9xEq_{D{c`3Z{G1g60`%vx|r?PpjpZ3VV~ zy%KT1uiRww2k>|KJBs^IE4yJo_yD4P1$ZH?6>|0gOjG_~m&NfceoVRUPrKjeS{Q@Y zK7^O)-$5n+0)6fq=z}Go_7hNRZn?F|i4tgxlV4Xc^W$g%?mx@MDe*444bN&@PTO(H z3UCWFP>Z8ZGFyM~&Mf0v!Y{H1HEn z@;Y2y2&bX8#>{8R@p7B1pqU;ls7$<{L&Ydyz43~!3ykU)$``h7;xm^ewP4_ty*Kt1 z{~NZ`M|E?$9v6Y=s(wpU|F#n5>FWQ!oLljdh8m1E*?EwVYPsRL7|s zr+94yR-HGeKAcwL)Q{5|oCa`OlT&CAG8bJ~Z~zMRIBL!i}d0A~ksI+)WTL_Skh zSwE7qqd6VJ=~zyaI8EksJf|OUn!@Q6PE$F>T_qL`)(=v=F9YdpPSY9H%jR-mKBo&f zUC3!Br;9jU!f7_AOF3P}X%43=I9r&l@smecE;-sJQ)r$2CdhtnT9{fSbj&!0JPpVLR2KIZf(r@wLfg45qQHF5fq z(^5|5a#j%vPOUkuz^NTlbcxw>z=7PFt*UCT;cP|Xmab|j_aN=kRc++eNmjb5j=na3 z7|3Z5r@@@o<+L8BVVpMLG@R2$oHpjPDW?&fMsnJc(^ib?Wvw~Tmecl}cHlIc(@var z=Cli^F`Rbgv>T^=IPJ@69H;S|_M^0=OqRfb0h|uxbTFsGI8EeqIHw~x9ZBZQQB~C^ zadsT1?{hkV(}|o;;&ck9(>T?0YT$Gxr?WYo!)XSm^Eq9>s9v^^1DTv=ak_}pC7cpY zmvfrK=}Jylahl6%9;a(KUCZfuPB%~rj{g$k|Jre#7ZyPOox$jnnI# z-r)2mIR~lAZ<9wrh%Q5=k^fA5GE|jG+YFVr{s|X*%IPysf8+Eyr!P4Dozp)!eaUGl zr>{80)dWrta!wVT+Hh*iDETBq6-w@AsB~H_f8xw(MWcMa>a4`C^t^-acJV^39?jIGC5IOanWy2*qa6f^b)dkWtS(x*P`Y4%FSc4beGe$3ct z#`>2igE0>>o`;p|*y920@ttLiZOhmO=NP-6vHkin_Bc!F#v;bT?O2%q>}1A1W=|gm zFt!(Cdw#@NxWx;FZNF#iZLZmxvGz=OWe3LQF}70%V{0?v{k*WQGq%cJ_B4yJmDV$M zAY+5CF!n5CXANTP1*W;mb5P(yc=mZhXBcaHfjuo`?8Cu~{f5Q8(T1_hxT+nDH8A0${TX|TJ+1ULV-K^ZJ$ViO z&e+l#>}d}sT!nXz81}SZMfS8NdwM2~u^#N{4R^*iVoz187~73&ZpGLoT=PK2o@4C( z+Ki27?8BcK`x}c3PvLes?1r7n0CLt@Z6hx<#}C9$nq{)RWdPBqf<$8mWM5?}&od3# zQH)*0p03w3R>Pj!)?w^m_Vm(5#*Sc5&kSYkx9n*pIb#)!_2=V@H;2+nKT1{*3L)geQK&*oo|E=}(M(%GjQ~xAkGd`x~>TQyIIUkg;o+ z@R{w5ox<2L`HUULSu4g?U~!)u7@J+do{nR}>$@@*_Cq+! zjXBEL4aP@%)rkt@^?mA8`Tyd7l?T*+MEuF=v&L4eA7=0L(Imtgzv!>ot06~HbsAit z$du$zs?NoxLRpZyBp6D)5-g}I6Ywqz`jiE!hk?mbCj$$HmkBf~3sSEF6L_x-ZBZ7a z4g@AZeF!YrqfDSzS&%vpm_Xk$G`=i2uq-&ZEC{P&k@?YOLFzkT%BcH*1*r#t1*sE( z1*!jl1*ev2pk4!pQilNxQl9|}&M%Xt4g-c#UjYkJcL577DU)4R7F2{y#r8|BW+*2k%_x%i|TYnZTEEAv(0ESW@01Hw#01Hx201HxQ01KWj(?DGU z45iKh7Nq_F7Njl#7NlMP7Q9lXf%*a%O5Fi0c)d)3It3Vdy9}i+0ftg<01Hw-01HwV z01Hwt01MKMKMT^mKMTGr(@S^!45gcX7Nq-r7IeUE0t;%&f*xhT>SaN?<7cvT)6ar* zf6sz+OV5IISI>ft%QQrk1?je)3DBKA3)0O!3)1a93(_4v3(`$K3(|c)3(~DV3)0;_ z3(^fg3(~zl3)1aA3(_4w3-&3qjPCmxO1J(jm{2A__xlW`TYeU#yM7j=8-Et0dw&+B z+kO@tS*DEc`WZ?${wzrM{wzqh|13y704zwI04zAIOc`|rFw{_nQilLTsSkh!>Gq!m zsRMuo>E53O>Gq!m>CT@8>876r>3*LD=@y>_>8_py>HeJs=~kTu=`NiG=?0wz3(M?1 zUKXT#bS6Nz=`2Wh>MTe%=`47@EE?UbGn8)AS&;6~S&(khS&;72S&(kkS@33=vfE|B zpUZ-Dzs_XomYoIZZk+|`Mx6!eUY!N$cAW+3PMrnmCY=T8KAi>W7M%s@o}301u+n&B z&{Q_=Gic7a84pg^G_GJ=uv{~Fh*$Zo`J88BYAtqvtvQM8@lP*k{>RrhzkB)*?zVnc zIPVJQA6|a`|3L%EZKn1%CQa7Xt4O*m)GBS(y1;s0*Rmk8889Lt~a{w4R z4V(a2N?P!moA11lvx?7pd<_g;$|G|D7;gyBgf0T(AuPQF4Bg|P*f+q?7xq-{ zGH`Suj*qSYL)TEq;F$#B-!A%T zVLX3I*LWy~hnVQ12$^4jp_?>ho&eJr;^=Aio&q;bXm|$9e!<`YeY&p2NY84oNUd;6IiLdw4|m zQ}_rkPuMA*;0Mgt1>*z^-PWR*5*WHAL`DV7U||A&9Yyy`_yjKz)-gdKEYeP`l1{%Re_; z-C8138<-UkpxOd~87!C}VCcRH#e#tmuXao8xI+5WHG+>q;1TsWA%mZ`(5)RZb%7Bt zu1o6y0}YTR6b6hqky47E>opR^*Z`Oa!88PhdazJiI55=BfQ-HoaCC!*Tw`G9UJaS| zfT2DfWblh6x`joiDKOL@gG@7EsLuhJ=D<+T2Qm@BED|Q*!Ew6b!zV3(VFwsOfWr^a zVuV~2Fm!{Aa;<<7CoW1`1M^sBELo!c%}yWeB$=lEi%bKE^O;DeAuz)s4O(CSG6T(~ z^k0tjAB@AN&9`QP{=Z*z|B+JA|68^9@0$SA<{K>g#*n+ZqM=%3*tBW!5pB?K`iXhk zeA5ZNrWBz6{o?|9!=<1v?F4mHPmCY`Hq!;P)e?DqJ@XNWMWGm-HWveDp6>r%MogQ3 zZ>oH>hD7ymE92Y*{oBeo&o|CLZ_tEnXj$gvt0jidKb9V`8TAc68U7Eg`%jucI&RR` zF^=7!T^9Q%Uui${Ysfg}D@}gqEB*h#Vf8Kx@0_y#Ij1cAA0=BF3nw`5up=cCoFk17 zra9lNK#He1FC=XiI{T7jlXDgM8SU>15H~WIV1Jvw4LdTHV7le%2!Get034)B-$AgU7r-II;JtB2vu1J}B zVjXi2om*y?5z29=6Z0RLeL?6hXccrO23lLCBQz{`d$D z=n67>f6x_VcK9G;b_F3*&if-AK6>g4N)qbOF=TfCpu@-PMnT5xdO^nQEJ4QX@Il7x zZ9&HD<3Yyk$U%m>g0TEckvlF-K*sEQLB{N_LB{N_LB{OxLB{N6LdNWxLdNV&LdNVd zLMB5F>C@JPoY@0~J|44M2N|%8B3SDy1s{6}MLe6Y^h#hDbZb51m_*zJ5)V=Ox69NzFx%dM5I z#jEKKO8RPg{=4PYyS2)@waR~Pt@6LNHNpRp!Bb!QJ&twoSDh~O1Q_;WK?7cQ!ku1zLe@i*PE)_`sjn?n$(iO?#TJLQZ0IoIuI|c9q*o_@UCwk3) z6VR7a@*~%(6k6XnK-b!)H=YdSOJ*?@JuSt*FTZ~_gn8sFn)bI?2JH`9z*{Q-NdM18 z@?Qo1fQV@OQPEicI{>!7f2`ysNTB9pBAI_3C~dET_6L9BU4f|s00>qVZ)D04k&Id7 zjRN|=Cz;o#qObf$v-jF`MY8(0Rq)(0y-Zm0b_{{_$3HEjHz@)A|MdkB4Lt;{OM|Wh zJy2%)PXL{`(z#SAq;D#Z{Jnr4tYMb?z3GZ%A^&f+0O)mRpmaOL$3O1Hm6<*T0KrK@sRaPq-#-(1qY{ul9a$`x z_D0hc$zuP1n+0HAfBf?T_zX-%DdBfE{U-qZe?rN>p+o=r+!%R&g#+F6-vADQj(zYG z4t~?00sUW)zX|w~BYbU6HK*ANI~S zUjW$u-(~^m-&)IK4UhK!w^#uBw>kJi&tv`n?G*s5Ki+B!;Qjxt6#%6FRto^fAI$vQ zDgYdR-ev*(UtfRp{kNyz>d=CG;kSjiqSAa|@b4Ho_ff@o67f;RhxkvrF?eys&4cx( zZ(+%M0e-bWhBmuv91!QBOxHOe4l$W-a6o)pYP!jR(LzTt2gE@o(=85&vrne)7@#+Q zYHa$Ri-^xxO}9B9PMVp1;D9*YWxB%wagNLMBL{j4L+%2AyL53H(R2?O1p6{C3=DWb zagoU)&d&fKn9UtE|Al?sLlDP}+b*Hw7Y^W+@3d4)I51aue;!c)JDfls1A?eH7-#ww z7z7&#i6>m5lK`FqfZ%+Q%rh?WsgU>$00i#}iRWA*lS<%#_W}?^#nD02?_5NDifsA= z00hOMNRx?6h%=X_mjECrzH2s>atUvd?kfNg6kjo$WY91l;f6~bp)|>{slrd3k2EPz z1SI;1+*onIS7^n}78d+d0oVY5pg4+Y`tz2|RDnlng-YpwX9ozP;sB`0o{PZu?X313 z06_3GPo@-C$@usBeVq~{a4uagbf`Fx2+?ShPy;|0T**R2!$oQc5iI}+RuX_SFbM7z zKt(Qr|1)l?)dc_qCkVimOSBWIR006OnIOS7T$Q2hAVUC+H~=S#nPrUuz+@5x@E$M-ZWKThT<{>`ERt!; zfffR2#)0P|PIC?r0Ym_R$utu{Brpg*6F>_NgbAP}2i8{;$wYDF6Cu)y1KY`iR~0?} zbd0n4NpXzxffGH(x$)gG&i}Os@7@{y?)>S$a{d&)hKVLco(?ufZL-Ui5oFsr7cFtR z2LF`Yaq-fd@?Zd54Zn+GY(ZuX{054#1p#`6kW^wFfC?$F9su(?4x{iZci7;Hfb?=5 z69RCjj^2E!4n+GcFAOjCM^5d}5^$k)p<3P`UkqJZS4B3MzQ zl270#E?%dA^j;zgNUtNJfb(Xt(z}mLSd(AE@2rS|fb{MjD)F5j&{C-ge)Ke2lo7_k4|c?t zRy2jo^N5N_uPrj60_iPH6gUcC1(7aF zNN;PR62|}>Cvt}p$KlsUL_s6;(%YI$h)8d2q5!|OiS;9tkY3zGCC&nvAdk_P87HW61PPGdeXu>fBKjIS~{!swG$19+V9N+QtLbC%80sM~8M<~Ik(u=7~2uLrdqJZ>*Dig-{ zg`fCLkpg~r7nIrQha%PCXFfuK^NRFZDiZ?ItEnhZ6F~8`A_b&ZR8c^BO%(+sS5?9K z1GP%;tD=DP&MFGj0V(mdBL$>aS5ZKEeH8_yS6ER%dW{tY!tirZ@pUCd>O(T(`$!5% z@3f+T^j<3pNbk0yKqJs0uD3GbT#O$qiq9V@Pi5BqtN$6+^OceYEioq9GlC80aJ~meV(PgHi9{tLf;b$J=5x4@s z%|ZtPSK%iPVW z{%8cyC*4>Y1zpltr2x95&EpwHL6@}I9gP6Gq^)^@=xJ`yCtc1TjV@^OavB}Y=y1*! zg^1^c(4%=tq>Bvtmv>14^e>xz%P4{VWwUP?0q~nbQxIAaLAU5rsS@;gQZFcg^wa>WV^>53UC`o05OqJJ!?~QZ8U4$rg{kOUMmHf& zXZWKpdNj>0P6Pts zXOQYx3&2uQ&gh#)cXTBofdG1+sXH3-FEb&6-e$A=83FVyo1M)FpexzzTSfpq$7WYD z0_Z0;dyWx6x3Jkyi~zcZgQSM&(Kl@N3!|OrJ}>7wM{oHA5eLmg=QujXX~CnJ=n60A z21n0#Ij=W5y30Aa!LLnS+H5O;cA^_QO%xi|f*<_WN&)mqi+6S=tQPb@m-9ZO!}&*H z8P*dzoR>=hbT~_$&3ft(Un zoDcwdV$op@9&El9Km>iuyM|93#{n{;rAqb#f+w9Xu0R7tKeA?*7ekPK^;z2idm=tIUz ziCF^sKf1BE3lXgSHt=&2A_%mFpPdwF2f!04&>n!_q(BD%CJF#sP)GR9lLDOp@WB30 z%Lqj}!_QF)bO8Vc(=v$|0GbF>u^D!Q-z*`4KyUcnk^%z&=q`;i1OQh7=rPW4_HI(07ryYl;{aRcPY>d0HZWYEC53VfL8T^AMh+Q2=s-YzL!)a4v-?LNIU?O zr4s!B@RCaO2cWtXNC04`h=Q3P2)`LpU=RRVJc{0gB7@;)BSf%#h9V%eA}|boze<5b z0M-fs3vdMd#tR(?jD%kosl+G%mI;Z`z>L9{dj&!Sk@w*@M=CN2fay{I8?3z)_z-|p z0f0u?SolQm{sMPuUF$rPcPEiY{>?W=;Dt^# zE`90RPvIY-#ZOhHg8ELeZ9C#zERw?{<#f=@(2;Y^{Z^58FFW47?D$t+cD!pZ@7l|| z_VRAn^n2G0-gSfj$=v|fL&>B__!%yD9kH*z<1e`JX)Yyty6x>wDylm2B3S*=~@uSuM&9ZxQwen8$yAk>S?1&6Q zQmFBz-tD%N(Pp;J<9%|_(ZM>+eX)m~lUR1W2kWL?R{l+_jQMkY*UCx4JP%ke$$i5~ zf{jOr@u0$Yx11C^`S&CXkGg6}=Sq&YTf6GLy0 zwZ;?|UzJ?Zpb<%T^<7Ukd3ZP(8&~qpRwx=YAU9U~u9Jt5)aCAhq}bh8M>4niH!&Xc z^axfc8rCHxRXo;{%h~Qua`1>p8YyYu|J+YCs+b`Wi^_ zxBe!QG~HvA@kuieJ8KeAIlw?ZZs_4iMi$oa$!_JZBMB@0o081m+#6w`i!$v_)Jc43zzfhwZ+490&M{*4wO-OOKfQalm9&L>g7d<9JcI%UpzW#N= zyofpOm5hzz{J)kHjWPgA=S$a0MC0LTLxMXvx|2`N`Pz`*1O3|@1LJ&aC`g;(0YSvj z4=TOrbB{veGQcB=JZ}R36y^B#Ay<f<=tF`Z0M@pFuM;^j(*H)qCNk^L`VAX+j~YH^$oqlbb%X1M zlPL=WdXVBGsJ4jjp%yj6JOW7WYLB#RN2rL-w>`Y9=E$u{zhwUiav(dPq0#F{UuSt$ zH<`^o=uy6~yZ9MS3m$~92ZZ0pk3`%-UjC!62Z>1bFIB?Z7I;Ws`nHrAr>6VQlN$%i zJ@VTaHNgQ1a^u?e9y^-IpOeUc<^S>l9X>%H`%L%j_R~{ObDxfS>i4wpN#>KJC$Ud7 zPj3IZ_t);fI{kY4@!H2Bk9CjlKT3Pl`u-&yw6<(tkPlFymq3Pu@Rm zxwrUU*ge_3;=9N07XFxjC;z*I?_}Sdx@9PiF19XSdo$@~mz&`?oo?Q~QFtx$TGF-H zYk}9SuVs82rTA`#R@* z_w$#}Wu8kscem(R(YB(rBA235XV;!hIva4-`}F-&r%vrSm3}JW)Y6mr$Ni39JGSGP z;aK>wytapzh%P z1BD0D4lMp+?VhAPCA*7u@7|rXJ8HMfSevo;MxP!XIqLezB_l_Vd^)0F#LN+`Mw}Zy zXL!xwPZJ9g^M(x> zJN6Ii@7jN7zv=zl`n`z16~8QgbbPD$LvfSzaq_rZeUJBD(YJbEo4ybFtm`wWPfQNl;gt$#0ULRe6kO;}dF>VE1 zPq!ap|I+T3-Eg~(cGoK$s?f1QXa&~_OKgK|wYE=fCfR6ho?2hAPPXo0eckGiRScYh z^xU0qOfbrfr*>`GwRl(Ju7F)(pUOTB-1@xWa>2oZ#Ra1Z!V7c-vVz<#v0Fm6?A<(m zbE5)Pi=TW{xF|PsRAzK$Sf*X( z+Jz|#T^5=asgcZq!`e-26G2b3*3a zO+T2Pkv=LtBK^Yb{Mm-ty4gju;$}t7(#;w*Lo=gf`sL|crti=j^x=9Z{q1Qv(-Kmh zQlCu8n36Qbddl6&iIZiMZ%;ZlDSA@Kq{5W^l!z3+lr0}*e&GFq^#_>~$4`_^yglLA zgtilIk3Tj(VSJQ+{Hga7-j90!^0>X@qQ?b{D^AW$PDu7nzMPbkl#t|?KSy?@2oRy(W z2ZX9>Ks%hIsfz!~P^N0tl2??0voU{|WnZ|lr@yF4MQh2PP5JW}* zHU=<%;1Tmpf#Vk7SNjaG0FDI$h6f<`N-zjgefV-5Cq0a7gQwXrkx3E|bB~EklVE5X zVkv;(EQyivcmrZnC2}<#z_$k&9=Z_*R^tZZfi_{F568CSIRgQDb8wpks|^_DN_ zi_3j3!R)y)qXF|bzEpVDlj|D-HWZA(BaFgmZ;s(fIf40bY!JqU@N@W8;~2i57joDH zv9PcZLHiADpX{{uZ0Uo~P;RV5AD+fUECJ&ZHyck6J*q{M z-tTtDN=bOx?Siw;R(1*n$nDlZfMf9z%nvXuzYhQtp)q{`6U7?I zF{~01xj9#eEkXC>}EjFk#6sX!jA&7k&dw z^qH0*mk8EjnF_fWj$yqCeR!Z8<*H#>39vIyWUvGqnnHToc{WxINg<2uJm>2Bfy{F_ z+7vF484QNtvF0a$2}1^P>{kgkkYkS}*Z___l3@LL8jS%Hwrxm-b6T!4^0B?AQtvnc zW)85vE(p{>VfZ<4EL4Koa}3X-2{}8!4nW*G608Epf+d(O$ATo7f?;}DO$oTj3J$7) zLOiG1k%jOb09shj`g(x zicoYpJb8#1o-h@4IGnp)da5;S+33!}?y(QQ&j>Sr_uQ=9Af}vq(^Z}rv1iuD3{BmlL zL@o{%Q15}92ebu{)6>4Y83Yh?XCTFJk%U+!z(kG zSPBE-nJBGfJTKb_5_tunsFPC=ZVZ?LA`9#@j#ZQ-vV&uCiQK1vp+1xoMsEWQGg4U+ z*T^v!y+m*)S7ie1zN~j%m3<)Q3F*OVCOpcMvet_Y$axyFOJ$Dr-Hf z>kIkAKO_&aWEw&Q4NzggF?fy`S}(A#cw7}=qR8=NI3|Wh3Aw|7q4B6s$jt+6iIdFu zh1PR|t^Pm-SoVPgE_#HCRiL?!1`L<`LeoKz8wnVmBNdu(=D@gV5)21=#Bj|c^x;5{ zag!w&PHlkc>9?LjALqEoK8}wr~6yjWs));^aVBd%ou?(ae3xBfR)3c6OSAfvIIY5OiJt2%~%qA~AJ&ArlWVJr9N{Pr22qR_# zRG2Z8V>oaNRl_*uD8XVcF~h!)J{@4b1Q2HjoY+O~b_3QFunK^QGRDCM zF9^A%{Cx#B3!PwnU7p$D$F5jDj#0zeacviH9(DnkJ zM$8dmJ_S@8>%7H~X_dfaI^BGB=&$_vbixaM%x#N|dDU2VyG zhPhhec=wcXRVDA4Nf*VxMDmLBT3{6kJRKD`Mdlh(;KkVbTfuRo^+kOy;u^x0mAC>Z zkM2To6)?>%{Kh!1?Vjf#kdhmcH-?Lt+X6Q@Ukc|Tj*fBexXQSwxgEJX*UICz;N=xE z$KBK$U5XnT&v>}Ic;>Sa$X1^rfyFU*_277P^vqQe*BFjnsaKL8j!UM9#5KgyY6(|Z z-1&&3i<(I0I*^SZ^GaY5I5y@2i7REUjJTq3Y#?`SZ(vC)uad-FV2-NU!EuhcA^9Aav$!+iyy6mYoV&&nSJ51AV|ZMp%vk>nY$SoFBamA^PfEPv z3RVd>98W%{+5;b374ncM%*L%`+O$ zTf-dt4WGL!vEDl%u8riag*ZCyC5($Ng)W9>+OQxy0mf{*)c|1k( zyv@zE=i%993zO|6uqx)R4I0x_3T%ZqI_^1M@x!<}&4hEj23VvxtBt$-@`&Tc%8lCN zGGRAv0>^9qcxj>jlysaDbHt13ke>N3I1Y=!W52sU%}o>chqte|_${V~*+aiF?w@Yc1vNg5&*~ z&fNdKlAR_yN#Ns_xw*K<;JB!pi8~eUQ&h}7qZB+Z>2jH?BrXfwA;j?@l#IjqcV?4i zg2b(iVTsk1QZJ1jMH(w>DwP$4`x1q4EBDHZ!+izE4a;3#xG&(i3%fhd@^XWAcdj|^ zUGC0I=8aN#OmLY8l5@%3)!jMCz!V<3-JNZYyRf@6EH4j6?sA)BKjQ9mb3C|};>8>n zWdSRY2M-Ut5bkRz)iT#tTq(=jT3pG5FZoy4_<`yOs+(k0I`TA3Uof#oc7M{yU!aZY-QD{FBb#I>~YZW7lS zj^mNtBCgXgtbfYUBCA;?my7FY1>P*K1ss>cjpCY{8!WD&xk2I@z;T%V5SSY$uB*AR;@ZP;PDYBm%;I#{UIUkc^OYL1Ej$F5DT1sovWsONBL%jDV65j+N9AcPHFmn7a$bEi%Vfc6^Q(nkyr2S?sX> zD~eodffd9pF;`yPUFOP(TWqeZxH)itqJca+_r}aNSB#GPKTqXmnJg-S3#>q9^vns1 z<7#s^-yAPo+|4srLfl+)=ZlM`K>m&vo+om$xpT!$GKUlMP{~AdXN#K&$2l${ZidAb z7B@ZVqIje%Z}lA(SV#hIhGQ>ws<_+X*y$7ycbhqEBB6n|nnP%C6U?0zJ1l=L{%Me0 z3aJt})f}&)yn*ZCxDnPCx6WKGapU3Gz`Wu{!Er`%iCc>vIPbw*9?kaJ`&Gi*`zPT%7hb!@4(JJ0# z<-;^Cc|Vw@B9L>(`y#$1U&(>j2jO_v$6aZ}(Om;qJaM>gYK5pI6pO1T#g#QzS6n%B zb;Ol|W3_`>96Xy>!5p6)d9@YIbrx414)sRyrtR}_QBuaEow=)Qj$5p|CUDbHF}EOh zRn4(ea97P7I|X+ao4X`-wm)8ClAVGFRyS8o+@#-IHq~yIE4{UCk*`v5?WsW_H zyVmB4i)#tT@|uflYp#X3%d%ko&q5&Ye0hNb5jY#JtGEv4E)&*ug7|t zY%PJk%;BgLDyd=>cbAGQ!##_NyNN4jj<;^Tfft!$N8zs0Q0)KA%;T2JItb(-^E_a> zt8I=4On1Glf$gP%1I+R6rpJ}FirLG!D*?9)b+qL5n9B=IvWswcfjQm_c6YwH7UIr> z+kpb>i7R7qZN*iD;|%lY7?;QOU%?~~k6uZ6bG#$&t~lIIWNt35m^t2J_qhGTabG__ zj`VQcMR{0WI3)Q>$97D6+yc1haTK^s!?|ysc(r{da>|We0v%I|1 z?G=}@I6gn{xO3sSwCZM(>#-tM32&!+;QeS=J_J6Bf4zqui*-!546Zo-ICo2};tEpn z8E_m@d@0hsF}ckx2@cEubdz@liJr?^&4&u!n8MaTK1_0#W{%H|+!Zp%$1?6_q0u?f z==rF_8$FIQ57vY+lRvhkE*?}u6#E3CS8=$Q{)~CyjVvDbC?tT}c} z?sl1DzvONVR%Sz#ms?imEnLHtr;DtW1Lp*2HQycaMc4%HGB{S^bGOqfVMphcJY$aM z5AL2e$8Ox+Q|2Oe*)D&BZ5Tv>55AO z0&w2H{(v}sPJ-{~c;Vkz9G^^k+)r>%U>UI&akm3`v5Q3USGqj&c1V5(gC}q9wwdE8 zkGmhOz=BfXlNQHQ9*=v%9FO$wwwh}hJKKr3nB>`|2R?3&Cw}f8GshD@caOsHV;($D zbGO-C6LFi&@l3|!zKD8r%Z(Pu(;Ih>nB(bm3V>8%yE^tYiyMaki0F-ap(0q8f3-#=bZ5Nj%RL#Ksp}0 zJ+QSoUPpUe8*@CMdt6&{H6^YI9A}QbmB+O=7r%kz1$HpWF3bae7?Rv|&V%z^=L@(k zDDX^ipPS1g?lW^|i2KHlL%h!8QjM=fyP{$q|E@C0<6k#(eZ`Ho9_KXaac(wus<=_+ za)}#h?i6t&MqvH33(F~TxCQ1AcM9$geu@V2EizvUIpGe$RS=iMTzPTX&6N|E&0N{c zb&eKz8YC;>+hJbGFl$V9INwX!Vaag&sDUL@GI6+T>YxjTBCI~3*7^{J2VhgaOef8gqa_Js|^VNT!xeY0aB|TFQMQ?*EBPI*#_Lwo4t^$`` z+(U??%LL~;&%@@jN!(VngC~wWJN5E5B94xyb)NTe#No6qxwpD}#0pH2N;bf;fk!0s zW9Il|;>z@TUpL1pytsqrxIR4Y4Re1;+?(dIO5BTZTz*`<-jv28 z@d8Kwl+Ax!kvch3RlZ5n7!kbM_tFm|7hM%NZ^ifKcve#|@mOD6DEwfGCpDh+XLFS$ z>o4YbqT_LV`KJl0I2XBI&ZHJP%nAV|L;uQA>+s zTfDrn=n3qeIfwN#WB?&s+u- zbM%$Ru++Tb(&io&*U<`mASH48HK~oGF2>KIEU&b?xn1I_qbz>8?s+Mzl$F0(TuF1A z#Fa3&QQY}S7sa16@&;c5$x5D+z>Cd2E3TTkUE->m+bOP!xo5;xHurSw>^kToNRICE zlmu2Xw?kY-bKAvLFt<%yd2>&S>kY@jD!vofi#IbUzZF@|GCv`%r^S6E?s7POPZ;8gSgTUleyKuY)LG5V;)Z5WF0?OAc=Ha6qElEC-}}P+%wI zeE@m=Ah={m^10Ja#Cg|om$_%eEjPCt^@qTO$tNXnzPTsF%`>-E++?`*`I2AY^onO& z++z~gW@z$*)x*%}I1crvv^F`^C0r|WL&UW-cayj-aC=ZOFNVD0&gO0r*U8*yaUJ0z zX1-Zu3&npCNxhsRi@~;8;94fgYNSwf$>m#nZx!&R~G1p7n#pZg7t7h(Uaci&v zcS+P5l6poo-?r~nSo7Y?Z!yQGlJ2&e+YaZQbq_e6{p=9;q`8%FzHe+Z$2#2AMYFJc z6E6-br!8)^#O;*4UidC^I}zuNebyXzMt9F8UHSNPVqWp{ z7PwX_dBGejE}2+36sN&sF$1rleJf?TM&?$C8)I&{xLeHKCvLR4d&S)h_cH3ZN8G5S zi{ej3`c~KhayJ4;Nnm?(BgM5dH$q%nbHl~;g4>JoZWq_n+-7Jt4+YK;+27oBasABQA?_-3)5P^PH&xt~ za9j#g#9d)7nk=%9$w}gRo0}-^2Dq0{U_#vW=H`pL&fGk4*P5G~bjh=qYfR3Oz(H_a zGPA{9ZElvhf#zn48v(}+ZmGE8=9Y+SIuz@l$Li}v4zs|!#0@pKSlkeEcZ$0Sj!R~d zxEswa6gSx10^Jx!T7k)I4i_cyrK=K%{ zS^~$LyI))}96oqCdkUN%qq1aAx*~9X=*eoXD4ZXovY9I^aYZ?3C9iQ)Mdm;t9q$o% zfs3;wUmVB|R}#A`ciB@A$CnAtmbhHzvPoQaI5s*>;&Q^Vj>4JnI-R%hbd%>vU~Y5F zTyXQ}qf(dVj9#>ZC@+FbT4Tl_j$Oz`us1p~_lUT$=61t*z2nTiC~mwtp80rr6Ot}_ z{B{k7AiOoTV6$5-ZolNc-P}HL6V0)GCGp1vILX{z#w7-$xadx(Ihc(rpnPkaY+*ce z^rlQRw@KWnTv!*#yG7h|#L+zpR}z1$c80lEFzt(ADje#KQu;u8#j}z!rMI}*=6Z>{ z7j8Z(xmw&@a|6ZAGdDn7w=Bt5_n?7Qxo+a-!?A(= z#m#}^lI|z&E^aZDSBYE$mw>xT+){Hlid$xGu(%~wUSDzdn7dNk-Ih1HLF9cVuNSu% zj&pLIxE1EE754_*0>s@cZk0JaLJq5VrRBXQ>5`qnYLkN`@P5mT`^q8nT5}`Btuu$m zks)q59G4)Tss#5Q+(Nk9#66fD>!0#gk#8ecj{JB78_w^syk(9JboUZmcEoW5cDLVL zZ*lv~aRc_az2VUAn6yMyKihu4_S z3=U$^EXGop2kE=wlji1%+h%T#xb5ayUdLjx6|@27WbUFJH_pQ;|$NzOW7Ap&XmA+;1(f}FLQZgcAJ|fZjZUC z;`W-GB5t3#$?mxR_nVyL68}C6$2lG+?qzdh#XS$lCAdi3tL7GpdjO7m#87cB!9|?A z86sbYq~qI&KF0?v^AK_C;kdtZ20ZRfb7RE40>>GdDDG`@x8ntlkohgke2WCWYi=}M zqRiCPU!rfZ0iTKuSa+OX;7)^M9loLeY;mX~xS!1N5a4k~EH9UVyL5A02JZe!x+vZh zT>fYU^6=sA2Xow3-FE{Fn!DHF*l2dL?smiR=*`~U-Fudo{hzyc z&9VQ3D;S^9ykn9bpa;G>EU{^N>XPUt%nBdxXOV{)H=4^VZm_vb;%+dPBJO%~M=~9) z>pFAk;;x0On?I#j%3mU{Ny?Nz#SJp|hq$ZF{Vr~xx!=SM7?HSWCVuDD8VziNy}B*Z zien-Cia(Ao&=#%~TuF1qb0l3!ap#*WA+8u4%WDW%(DIfv*FapUq)U#<>w&c)TO)HD z1bSo2n5!q5FEH0y;z}nAjE5ic^2(ZPBzZ5iye;CqIQVdm%bRR21y(TEOk8m+nO10E zQ*o6LM^_ilE569w`Eb4jD_VK2ByW|-WJ{48g`*`3HxxWrXAS4ZM5H5b(uS;J&4aow{fUlO_!&KpzH;)=m}V-96Wz7W|{;_4u-3mRBe z;_8~Kl61+l#x9VZ5y<<4UP(O*s+g2Q;uNoG%5A z($XI80x7R6^3rj)^Ss?S6cuF`$=uxnxhr~LVRWNs;z;}ec2z%0pADA>Zl$;a=2nQy zZ*IA`eCF=s$%hwsmdSf1u!l9KvotWT#oZ%uXPUcPTq(G`Xy9gXCCzPe$CIBlNY34Q zm-x4kxpm@F&8-!e2aZ3ySthQa#jO!n0*;N@DDHf?i1HDU=UL{};)+}5hs6~$#~UfW z1S`Ouh4QwED{t;eaplZC!IMAFd@dxH0&n=cD{FyU#hnAk^}b5ng%-C(+y&+y7gq+3 zGt4_P$vU|HO+FeV9)`o^L*TRGidr1sckl)lfn%c|6j#mi?h;qk+)i;-=ptl(Mr36R zd|KQ^=AIH)366_;hq#L7wu`F+R{(MQ#ML&p7cTNSsbzAH1lBaSTU-ruFN(X=+zaBW z!*K~dFYXd^&mDD9N)yPl5%~I1nbO$Y0dbAYy(X@qxmU$CF!zeM`sQ91R}Zd0eysnO zMAnTZF66|ufjb8cd{10!bMK1l40j&l4vFhz?h|nx&3#OV`r{Lj4p!ht64=VzJL1}# z`%qjjhU3ao>t-X9a#BuC2NE#r3qj--x?B z>7tacMfR}3uf%nS<6`|%TsL!Hi0f+Zb8(lM`%GMaxKxz)OYE@xdH&bWgSxGUkfWPT9W0n-D}u?2TZOc#7oi zG;=(OaCZ*e4#e@i&fVGOcv|PKfH|Jlxhsq=dJytPqaeMTeLP1}-T>z<%x{@_lIfZA znd51gyN8jNbJt(;Zn5(CfX2&fjTyWeaeN|(dXwjWPg>@F5?Coqa=ZhcfOzJo5Z4Ep zc{b#3hvmIW+|w4vGbE2IgYq~W181(dE$Ll6|D$9JT|SGcRn1iVBC#`D+-rK++?`oaOaAfV|jTI;(2GA z<28f3S;MjZSqYytxtwW%d?w{?hPlGxrkhI>Hwli7IY-b9^!Q5Hm#+%FQj>rFTCeL&UHw}(+!s|V+c&a%* zTyrjTF|AC^Y*1op2s|S4I!L;7ao3vrOWZYZJdFM+ZjiY@#9eLf zcX0#F{f1jwq16M1C!Sh{8xkXsSOf*UJ%ukUJka^fgwah{hS>!ag? zc6XV~&5Ip22=)Q#*iTu>WGQg4wK@}=H}DAJSn))O%Z38!`0(8;$!>0zxGZq2V=d2Aj=RNWhU1cn*cuN!-7+td z0?)8OR^oBFtw63OZ%kfu%Ovhh%ggdSZ$5JilP=jID~ttD{2 z2+uLMRN~IIymTISp1FG^?%bSM|16NNh4`GLN+sUvLgu)d+*O1dV-565&Vu8j=6d(? zikO=zuCV1@$qva2EM}4|^a6`oX1)&Oap#+xAqAE&H(lH%a1k1_Ldq*;j_*0JytqRu zZE}rC?h(b|ICtEteNGC(ah0$@Z_I_}mWwNEj*a#iDQAuwp}PxmqC;XOt0i-J3*?66 zfpy`=A#Q`jRWdgR&Kr1=rjgOaxb9P3@KV^+3wNO zSKP!L4pLFb+|(qu1rKayj*H)2EjTWjhozDh=D5vxV_KSHV?1vwbKH)S4$HqGB40yj(M&gQt@ zJ+6y6?uzc(!*R)QOZPeMYL45MyGC$ab(`QKZ((Z!%apFXNVhQF1NUA%$+XoT63q-asTIHz0TyR z5_rA2T;gspcZ#^d=I~FL;~UN4d?mQs;3lEb*~LXeOlA`~)Eq8`Lgr!SvWOdQ4i~o} zZiKm~Wp$1;$Agrw&QVDh#YZ@ocR)@=3we}sH`?4&Qs6D-w!-;VJ;vM?aXh#bn)0N8mIxrl`2f;CM9S zlJU$l&GDG-t7(=w9=_dO4L22ei%5BM%oR?$lJVl7Ycfp&=b0-+ml(PZ?_b|wXXGiU zqck+v9EWz`rQjLj=3CZODeg{loCiOaEjD+axVy}qD{e{B;TNtV$5_R=rQ-L8B!5iE z3n#DSpt&QG_jPl;>hrh*=6KcTZm+qYVrSdx9+N*x;A`f1dFYwnGsi17cki0x6`Q+P z&HW*H=fXXnFZqI^$1RRbJ}rTFntMvzEOU>Fn`v&dxEbd7bjB;04)<8TgnlGRM2W?sl5v-CuXR&GF`{yO+)VhWdki$s~6{58Q9= z7jZ9|;~gE3d%+xUn7F&e_NLRZVU~txxufBDYvMF>ohffNd8!1CGM7u-NOPx%J7g8J z60i7^A&Kudqz;R|wzPbb_LVu_Qu6qB%<=w)yC>kd?eGzUyJswp_tD)wZI1WR-94Xl zQ9Kr!%jYbRcmLfzYmRsI-92TFH{spwF!!0bhvC@3H^pr=_fhQZ*s{gshZ4Bm+^6EU znL8xzNppPo;*ELS+y~+wGxxr@hy2*W=OUhYg9RQG_n^7g#XV~7J#m}O@rjX_x5*qI z@VL9rT=b&I2TUFix8B@q;?|jaRoq&0uZY_Rw7qhqg9F!A}O)PkAU4^L#@oO;Cte-2B&vN#P%exS&Kef@MCC=%kb4^PbAocc|a z&C=#cT2^y&#hnJnC;N-Vooen*aakx7J)uahc(`FlNW)*?yhLB2wNZ{Az zZV~qtTm@tvE$&NmH;eni+$eFMn;R+a6#nA8G74NMGPAXiclNy1pIPP+;yyJuT-+gZ z!^CB=^5%%kYHqGBn!J!z&=_9Td&Os(<835&pI9YB#T|j;V&y$gkK?y#-ee4ICuyO>7u!?|EElbC19k+V!|%snk}EzR+4$}4GQ?x5stZSHk(Z6cEgL^gx- z#pMNdg)3+c^to$qjwjsSzz*hk2I#J%xwpi1G8b`9yui*Tc^%`KyO`tLd0bmKF0Gw# z-oPv23d21waox;4C$77>_ux=RvIFm7@>vPI+}tj4m%(u<(0RqZ%<<^qjZTB(zQk)K zZ*(7Xd}qMpdgsFWXMvm(54;wEMc~+KucWWJJrZ}7IqsZZU_W!aC9c0YUIKX?SHQ7> z@1y=u$v~4_G+uE}I4)K$8Fz!sy&wf%WA1%8Z_Ir-lodr@R_uANLmVCR(!~!buQ$mH zY|ngyxqWcn>cQqdlDGkITv}Z3Udc`7cntOOMh{6Il<$S}<8QrOSpPiG@BreK3`1tR zmnCy`^cuWic}d&|#L;br^NL5Bu#1g-pqD4(;RPH$ByfNhDqMJ_Q2`pc$3=Q9p-qG+TApB z4~v@$_bM90M{^!G#T*~axtk0ZF_2HRTrPrq9d3uXh32-4TVRg&{ylHP9B=8nn{SS{ z@7>Kahr9AeKdLv^ByYES;2bzER^D27cMse_xaY;)ZSFa7%gjA1ZmGFl!D0C?F}X8H zJhC;eHmk*W6Fy_L%!o-0q}{QhpHmq6L00?gev) z#XWECJ8{pM`&Qhua9pb2h&u@PKHQPmVfl0MzYfW{OP9a{=Kd1*nz=v4y=v|caj%&B zUEIs&eiQc+-Y9)cK3lf4$1BAd$^C$m~+J)=Ab*2=ZO5y0?!urEga{# zfVgkWL5;XXmdMaBJQu86o_&GAimujCgv z&Rm+fpUo9A7oY$AWHMC(e>7K6+z;l?6PF3MIS-+d(&G4wYr0b6jvy~*q@=j?q4*3R zWeJggS>XBN{xruQtoq#jF?4g@cT&?*qcJ$mEr&wBz<%r}eJishzktIV=I;6+t~}y+ z0pRC%SD52dACJ4z93SSn>uZkXdETp%E=u`I0{dCum*RTEv4OwA`RVZOaAo0s7B|4+ z*ch+mYIC1Ud4tTcfyGl2<$q6|9bIFN2Q#l@h`G-s?@)8UNZdd;w&kn1yyO9KBHV>= ztk>Hz+~Pi!@)aBK`O=X{Oi!I?R4 z8u6MXj7}X{AfK=LQW$5BOTh~qZ;p>mJ#K24A-)A91$3!H3@tJCA2&VoiDj#uK|n0pXc0`7pgsc?*o80ZDwVUjm4 zJo9vOU%`1LGt9jud1spA;`g{&=6Ey1%bNzr#;^|5n>>uKhAa;GniM$40=f9Tz#&ekx{3!IBUHiqlY12@4HgWE3!-f3}sqUe>} zW$uvVU1IK4IIm-=xdS|nbGb|cy}-N8u@aA449CXsLf7MlU_0W~^j?X(*W!33?s3b_ z@q(D;#fR|~CYjj-SDNFE3wNs|v%CAvu`%Ajf+Lb2!(D@OlhW`!wwz~fwYYOR@@v)n zc!VkP91G-CvS&UUt_tE-iYs7lg}D6YmW#`0?mls6nY%aBbw?|?5sQ#_IC!w|_5KLv zj&3)c&+$fc+!lO}D`UF#WzCuv!oR0pivQuiBG{)(rur6zU!Y?0@x+5(YZZRasu4f^fip{79;ul`z^R9m5rLtm_jI_Tx%^+g!z>x(d2VZ1_NpF4&XQ7B5_DM~t%ifK}D zh4U3kDU?`~b3FbJjn z>=hAyQTR0m_CHMeO_P3C_(S1Og{)f9LWk>7+SeXN_(tJdh3_~vPQ3aVcUY6YSNK8U zM~54bXPv@&g$EQKRM?;peW>)M!dDK1QPI5$D->2LtWvmNVYR}V0PKI(I^75;na#EZ z!U9cMsIW-kPKCP^?o(Lqa1)B2p9J(jq=Y6dR#>92RAHII-3s?O3`Nn?6=o>R1SI<( z#?8{C*$Q(M<|@o{7={9FSD2_UNnx_Wlt^i+!Zd|D9EPK!(F&meri|5;aSrk4vi+D$ z;1`?Y&Hl()*#GzmW+S}NuE38jhZKHAIlwvvel|Iz@T<`=WWtpVKNlT<-p%4}f3(j^Qlkao}q)*P_Na zg)of}_dldNG-LvcRjB}cMJfPa zdJ4d|odWPRrvQAvDL@$qz9fKY>widjeJK$55wbWFp|Q7{&_sdX8w+9l&{zO|VJrYY zEf#>^6blgX%VB}|$*=(YR#*UjBrE{G4irkOW|1se(NKI@f#lj_;HT_9HbtA{)Y>d!_$YPNMWqPI0X(tAM#94 z;Gpv%g`>>}n5e+<<&*sno4{e@LmbDC55RZv1MtoH0DNUW0N9Gz!&oZ@Qu6xd=)PM-@zk9=`4<|VUkeMs_rU`2MX&&Tl`RI` zQ;t&j5}Q*B-(CyA*VY2?eYF65y(<9U>k7bI)dBdbSq!|(%6H5H@ZGW)A|~;zvXI2r z$pY}UZ2;b{4Zs_<0eA;L2HrX69rOUaO&);v#{=-bc(VUtCf*SbNxT&vfcL-y@L5I- ze1^bh2?6-PAON2f1mGir0DLwO0M7)h|6y@_8W58BSSJQPz~Ez*0DN>3fX_?<@L@>+ zJ|zjj$0Gq2DnyH%_`rw{nBq7BpCSd|)1v@A7X$E}@EG`r?`%&Y6jDf2;OnL#4`268_CL(T_dG+=)e3y-8mI7SC!cx-;FHY& ze54tG&oTq>A!YzRy$o>MF(vTvbDYHIz5^BbkT<08>23f%)eXSMxdHebHvk{t2H>;# z7|P{C|HB92Mi^dCfseUE3ZHKW;DhY|LllN840GTUem?z=^AP%2N|a8zLgTJf=&QhI z`=Nw>3jG}_ptM$gnM7FOwGtjwc#MGgPf2Ie7ER)}%j1fe!jF~**yKN8pC}K&Z<7b$ z2e}=h6n^(TrphQ`g91OU9#Z&K^#J^wdH{Y_JODo^9)MpG55P}|2jI8EV~AKQzZxEr z-g2md6#f<`P9gBeU;)M`@SF4@{Dobd zatTV?>O~Xyvx|@tZC83m;aP$!4SfVR7C4(ITOTLk++h&qP?OuufsU!UGBqDr{DG z6p-wHYN2fY-Ys4x1pXi{KsRp>Q||N~p1{wZg|Jin8igtR&{;@1)uA?0_$l!?g-|5& zYeEt}w{|oshi1yDaJoWng)@_M+54YHD2^`y z#+e8gC|syeR-v3i1%)aKRUI0m=wbp;1@3MpFlX$q%1G)2*T|1@5}gx})=u>8|We|T|(%$g~iLUx55 z3OOB`qX53z8&^c&yT1YWa&Q2=(rWz=D>sR1e~R8qJ|p@ss#ev&MJ{ZBQm=wgRfNa0Jw zaU6lKxdy1DVHYV>R;aFUsX~n;p#NdnH8rWWLu;gzQMf?iLWS}Q6%;BeR8go3NcKN% zP*E$NJp#Yj6VEGwpW6vgQlXSWX@#;1{%BS7@QYuLXs$;#wTP z4-`^LIJ8G;^*s-vfdaoB66a~p>z}TgshdJ~g&qo5I&?tUwY)e&ZH2lD^%R;IMCr`b zRFn9%lel$E;Rj%1=m=<`&{mr^_67*!?HVTQWuBLNU5*TRH2zdbA^@) ztrS`-vW6L?&`qJcLM^Yg8^ZQ@0THQz#}Qg7v{q=N&{mY9j-YB88FCPMj`H#yc?9#Aj6`oUgUg3oR?0@z;^#RoI zD+EG*uZWPUP)ebKLPZ6B;2>@(3wTQFc{&N`f0(q>ldb^p727xyp`Jp0g)_Zuh80pM zrchkre1#H#WdG9_B~7e7k)MT$asg$fD{71}6tbm)&J;3_gXcLbcb9R*xJ z#So=4>3mJPM4`4q9fbxC15iLah4u;^6dv-;jCmd=aQUZ`p46lr3ePxPjWG0$$(bM^ z;V9s_;8DOGtu&`_a~LSu!_3en|CcR1XLiY`&8u25H@oVtg2NC%HHC{6+AH)>n5wYUkM}H%AG(N_HsP=2PJsSrC}@~xA`Dj;t1w03 zi0?+slg(cXAY@m_;lR&O-0B4orU8=u4~d`Lh+9WU_p%9Dw1k`rrzxDSkjG&p3P@4N zq>!0IA;+~cj-Qnkz6)FDJ zev~4vl~7#a0tJ3iA%s;`;O7!T3O`8^19vuliy}a24sRQ%j3!l4sHsp}p^idbhjFN= zlEOs_l?9@d8bT@c6dEh=^96BBSvEgg5TKbtbBFN=tFCaV0zbHroNvZ8a3VBR;3o;< zIHt5!Xy-5iDb*BeDYQ^%sn9A0_CGA4wI;P!=&I07p|``WD4>x-cZD7bJr#QKQy}r| zv4lRF#E$`llq(%>Ls$oejtZR=IxFzQ32|vGfP9S7}l|h5iZy6b33>?JyOk%~6=EFz+Z}|C@i5@OVpMvBF&n zOB9wmOhc_ry&ESqQ)sTx${lu^F4d$O3N;;Oa9;f!icnHh$|{soD6epl zK$KEhD5Z+SOq5;ID!+aDyS7Dw)G+$}4!U~0z3ab^?I3!TfQiWv-cPrc%fc?+%K!67n4k*0gumEAJ z6z*48tFTUCy~3MGK>x$y-qNIZ72b1Lh_DA0HYn^;cvj(Mg;x~b1|<6*mi>+=EduOT z*rTvlVV}Z&g_jgwS2*af81+0E-Zdv})1>VRI}~0};8!E!{xB}i5730|4od(}c^Kj8 zqtFYlKOQCA2vvAa;dzBu75D{?xCt!#5wCR_U|Y`3gKHORd-dj1dKdch?8Nesg*GLI zjw+Ntarj7~vkM(Nmcg{XI+j7^&Gj;8{xr+~Kaj!y+XES3sDkS-R6!bsDrnpd$7z2z z^}i47D*pSm9<9_aRZh4Gt*{uw7zD=&oscIAqXCfq`w$&pt-TNy1|-NBh9K-^@6C@3 z&{Z5)+&>kT>?)3F!g$O?_=WsG4PpF;f4U;y#s5b=*#G`(^ZM_a5T*Z*24&Qqd$3l* zNCPJf_o1|SpaIN(N_wEb3+qu__;J=T@E}s&_xrB@22g+8%l@0B6G(XswSM8XW(-@q z;Z*rkj|2TzU?=K1;FU(ZKzsf4;^e{}6ur=k&H&i|WRUbXQx2fkFr2{u3D*DopK-~p z+;Q|(^q)W&Y2Y|B2tyT21S#S0~>xur&GWokRJ_}1Y{L240Av(^ue=3aq zPsU|0#2kge1x_w(L(%xfzV$yw$zJBa2~ij|;J;aGsC0XT#Sn%n*Z~Mb6+8t9qZ1qh z&mblIF8>4p{m%)OaAE}{`=68Bgnd{(;cWODz$pLW>Ayl4s^Bo#YFphs=*a6Ug3?-2#3`meMltEY+b>J9?j-ia9 zJW2=y5@ZaO5Ecd+I38gClW|-%6cQc{AsC0E!*Bu$QM%HJ z!(>zxMkhE1rXVE@G!P)}e*&>@J5HE|;=)h`vjJgjf&U1+|H(MhLX;f_7dW}FjQvj- zs^D%^6b23WZ$WfSMXS(+FjT=>Kp0%$8g-*Lrd6!sS?3Ih%N4T#c@$&~3vyqfI4#m*SABPp?{ZteeMkhE1aw8=SJMeelEEG`3f70=90QJXPcLBtO@dW-sNJBkgsDi>b;`kTF z69D~FPzptdp$bX^!q@`QF?7OE0cD5L366nEND0FU90e@@^rLh#pgJlF0}cG2;MYGH zW~zgfFgn38P!B0#pn<;&M~5nCg5tvH1jj%#q=XR!PBKIpmfapHVRV9Hpd(VkZ~`X? z=zlUUp$94oBMqD|^g?MIogm)d9g_V|UnGT*22L3IqqHzO!7*?RQo^VMF@&KC{x!*u zTF0bZj}l7wOk@m05Ecd`$QXv-i2W}NJ1`uX{!@ZZpt$;9s zz{!KS|H-(xJ5XyFgWxz}Ci1lLRrG&>_doNHDGWRCcVGbu2xAZ&CoEzA69yyzWdO^N z5=I(0VOWXMjt*6@3KRwxIJxiuiVi~%WB}}cj!AkLnZg(Z#|fK}CyYUGoUjFXFzSHy zKSs%8({aLfln@3a$QYhRSQvHSUm(gjDWp7y62fo-CmGoPgtGSo!gvDzAiRQlY;Xef zKSC+#ZzAbZzvOuf!0`m)9^;>ZWdHLKDyr+X{)6x(>IuUM#K7ZUJbV9|bRsD~prSB> z!2brQ|G46gE9?){+R>Z+7ofra3Ap|_uDJgtEZa?Z-P@1%|0!_!rypmg(@{}tpQDom zs6Sr)`A~Kksvtigj3@99LZO>*{0oB%fKDQukJ7^E1jj&0q=exFqGRafLU~ja1{%l! zu>8|ANcx{CRZv_Qo!}U#hLkYSz<&nT{~VL4CW;HA6C4AzkrGB4IALgr(xNar0VzOZ zKp1J@grOx$3queb3sHtiZIKejAUICwh&(n10j_I~2hjgqhPW^W!Er(l&e0y2gn2ut&@ zAvaDa8HHWRwsFB*+-1 zAuJ3#@ONMq3JBv7B*FWiW0K|~E(|;HcVHn3sO*a*V_3}oCk!qCI*D*EN(-YC90SXd z5(XNGj-kH;YfxMmo!}T)hm@d>63B%JUEeZn?kp4aFLP{7;;3Nb4pHTK*Ko~UOzXRxhj;ZJ%nh?el_y^&A)WZ=3 zlKqcU-2eQ8@HuJ?!wJL?`k#MI^5e(fNjZ#)!UzKY8({xCuDIh0`yI80;RKEkqV(g7 zJ2ouy5Zr9?3*!@lxc@n!5_kc1I@%M46Znt7`=8^?lphs^;RH?wL>UxU2o;6V366on zNC{&LoG?Vklu!g^hoK5e0m85Ye+NpVfG||S1%Tw}1Xy23f&EVfB!w{ujuR>)PZ)OK z@4zJ}07DR1|6`QwWip1E$P~sPI8LaGJYfiee}U-VCpAQ-Fb2VKLQ~`kqYfM|M4G7; zAPh*5F|8+V22L1yp)?LoknDe);{K-(lEO#>Ck*{j zS{R++7#N6@7sLApG5IS8e+RBdaba|VV_+~+!UzKY1A1kgbb=|PQ0umwiNUqg@kAXh(q{jiDI&1-a z9CFwO_{3p5;N!%O`f2&2r!e`R`=yAx04p5!0+u`M1N`W)AMmWhOMqPtF9UWu zyaL$a@G4-n!)t(*IWZ=3d^kM-y3dnd2i)s$5O7bTNW--J9p1#`FYez0{Os^H;3tQ7 z00$l31>EoO9$=Nj`+&O>eNb@pAtwKD{}JGKhmQfjIeY@x?{EmP&*4)*3EyEp16<}~ zfPW6?;_wBav%{Bwzv2SAU>$q~dfkir8gRhj8^DF0>03Y7G0GXWDE@&d*?oCO#c zLt4wF~9FAuoMp#tDWhl+r~4wV2`Ia~zj>rfeRg+moUABU=d?pYF* znx^HeeleyW^*!_wz-EW)fK3jU0ya9-06dZy+!TkNT9|yueQiL0ucQv3pF>^14iBpb z*x*nf@SsBjzypbGD7bJVOs;d^7_io%31H3qW~jUwrdGRd4!GZ;1z?p!OTfJjtpN8p zvZoiMq=eP_UOhc1Bo68qW2u9$q!eK)|n z4&4FoIP?I#?Ql8ZEr*_fHywHb-bkF;9JTks!%j!vMesiDk%<_i9Xj=YA02+r$U(9j?XX*Y2+aeC2RG;7f-a0ADx^2K?@DBj7iO zn*hHiDzrcohhp+)_rm}`ISdE<;4lL4ec}e>$U6#?ue!e(@JeC>e1}^w`I7rFfc*{; zV4uTSz+Q)Ofbb*E@qo;J5itRfDRBe^m%9y33{lti9ZDC;gvCfqLp%y(D{nCGwzFxTO3z#NBr0J9S#P*$`Y zlXtsc0a)g+60p=^6<~?O{eZh1Rs$A0tO4BVuoke$VI5$d!+OBl7!oC0r{(GJAb7PW zZUEfx@DN~?!^41;4vzpjXMZnVz zy8%x*>;dd>*bCV1un({;u>%D+ei@T{-M<3Z z6!50QXMi^xJ_j636lsSZ{Yy-K=Kd?drw(5O4mo@S_{8B`z{iO`$e#BwCO>rlJ>Y}H z1MnSw#N>DGe*%2#@H5~WhhG3+JNydx%HcP_mkz%JzDRtBg3JDi$zR<61^C$^9q^OG z5x|d$O6}9~_s)b<*zetE23+N@&SnAhb;t_1!B3F00s1*)XC8+f%;S&~aAjgUYKd}j z(#tv(aD~HZfc~E2bihzg$qg9da0cKehdh8A9L@w>?~oU8jl)@hela9Ec1X)pHb3|l zPb>f!=5RLPMu&3%gA+45VEvtk$!pyg1YDhX3BE%iOy1@`4KUuJFkrMp5x~t3MFArn ziUCGA6bB4S6z+%)q68*qyDtft?obMFheK(=6o)c^i4GS4ZcX&=m{#oCa+qA~zC2)| zLj}MLhl+s74wV3t94-P(aHtFz=THSO)}bmON>uEGjp<@c-sS!hz_$p#flJVjFVgZG_2$`^JD-^E+cT zHpSFB*UbQH9GU}`JG21Y=g<Zh+Sux&vNy=mB`e;c~#s4m|BI-fk@p5nKIVQf;L${d%hK|9ya|&}x*q~~!eJ<2tHUtB7Kh=02OUNL9&i{5 zSerR9__DNoWpBoGX1{D14cP2aw*WRdi~(#+Y(QJi8jHz?-H!uo$UMJmTE5;BFqz#; zx)qSk;Wj{4huZ;J93}$(^0FoY{&biO_`_ie;P*t`u2`niFqy-%-vP+vFddNMFavNT zu@5;q%);c4Ueav94-Rtx-#g3&{N^wZ@T1q}4;j{*854kLS?EttH=Z+>hAqP^rL>wwHL72VIN?V!+yXeWy&jG*@ zk9r-j)!`sui^Cg$#~t1TJm&Bg;9-Zi0S{$Qyni`v9KMU`Q@xt^0J$9A2jp=00Fd3` zLqIl%j{sR6J_clV_ymy2;SeCj;ZwjbacdIkm#5`v@;Nx&TlWRvFNZGye>!{x_}$@a zz;6!U0DjG$=+rZx89|1o&`~>*c;b*`%iLE_xUj7>YJe~z3N*0>CZ~8%O~7P_T7XFowE+_y>Huy}3`X{B^)NX%u?>?Q8enp^hcpDt za%cpY>ChN3!=VXax81~A{DEnvAr zJHUMo?EzuH(hh(-6Ejd{kxrOg=s}$U3mm!tN@h#EbY)t;4qY+5#uK^$Ry%YD-0#o> zu*%_bz)FXnfE5nC0QV-&?8`fwnEcZH6@U*Nt^{mI^kUFen0&x}Kfrp2{(yCfWeDmp z5R*T+zZ&qp!yv$6hid@eIa~|)*5Nw9HxAbWzD|6Ag3AuZWLAF;btB+U54s8PhrKDJ_0Oq z7z+qv6ORLY>XnQK9CDZd_{8B>z{iOrD7ftHnEb%~M8JCvlK}5JOa{E3sM`;x=TkBH zx%+8=&l2O{J50yqJML!y-gcM?c*|iH;7y0wfHxfG01i6L1-zEX(;r8{1SaE=uhBE6 zF94MCI|mB^=Q}I{6nD52P|RU5plG69|FrynO&sO7K%P&4s9D(ScilNYj32))&tHw zC2_-mw0ze-i0QiC{0)FQ4i5opJ3I`iJFO$mpD8MxHxfm09Nbc zn5^o43!sX_RzPKkCjb{YJPD}eunkbbVLPCFqRzmy{Jo#TWEgq>X~0Xqz@Gu^ci0Ko z=dcU#g2S_b=N+E=f7(0$uqKY~(dQQk0s;~=B!GztVNt-K0fG$*3K|tOU{J7NK|!Mi z4GId1CbUq4qJ|b7RJ5Ujjf#pb7_eZYf?@?5EVf`#p~V(kY-3++@h!IZ1Y99)zt6q@ z-RIs%o(DLenUk5>nX_kh&TMu8nsB%Ya06X|TISsXu@O&i2DpMl3xFPn+W?>8@CCqS z91H+k(d~7xdj1l`S5Loh19-_>T9*C{Vi=zO3&0#4i~ylHJOv2B;a7l} zxV`)bU3#H23?YxO_C%|01btHgAIFJFB;6MQoqs=n+$*4)@PG4#byb#YE3y_L~4Zs>4 zYynbmumf0u!#IFA9P9yN5iu2F4~`&42>4^ZTI3xkA#?5FIz$zS810>;)43LOJ3P3CYC8oJkE!To9CZJM~ zgVupO3BSTw58#f&1^_o4WB{%>qyjKdH#BnTCJ!Vpy7JBL zt^pPf;96fVlV2~BaeE90dw9J}9-g6IFO!Gvecc8o@p_pIZ&-kSc)d)93H8s{%jDO~ zWPG*rdYSxsnG7!B^)mVOGI{7~;q@{ZU#7lZCjWo3OrB~9Z>4shNV1t(J$BN@w@H>+ zsC72ygV%4M{=fYO>aN+ZTkyIM)cvI2?6i-r2r}$E)P`H%I6n6@p zGJ!IlGLABqVo4!U{v`jG{2TdK^3UWS$={Q|B|jkFBY#D{L%vP^oP3>pm3*0eiF}d# zG5H+%H2Ea?L-KL*5%MAOd*uD(J>+-EZ!!LMP^1y zBf}z@kq(iBNMl4>L_*v~@8y;#fb-+(&43ek&wYeyF}0yW3J1; zwB@!dXBipE%49#sDV_vm>t`P=87<) z%TW*mnsCBAV-}sWhEisp27^94$|!O6ShG^g%@s}K?IeI*%Tb+r(p&|Gcezubxync8 zDkg&<1(0w2G-!q~=5^MY*J(0F1jZOhn(@-k{u~Q-RyhGi^u=D5&2XK&w!(Qh z4L&)lmxgnO4i1_bXz%-P+57k5&E9_z+L^x}Z}!mV=sVzZQ~&LA$9F)5Q~rk>mTtD1 z)onf80Fwdgs*kYFOn=#+7QDud7fh$!PB@yww_jEZy*LR)?qUh-x&K!7pZ0cbVfNRlT9Gy-z+*BeE2AxSJvUgGe3Wpn(Kj?EO(k_t|IxH z3fPa6uenN$xymb>LJogxmg(8CqnicR<>YN%*7AR-un?G8fYVfSy;yU-KkcEYDdsA1 z<|-q0s0lVd7gv}mzA{cH)0<~TooR2HsUeew8A>HtmF>cllyNib6xs%*%D zd4FrvN;5rVvS=rcc~Nhfsk}06C(~;?MzuT9Obxj^LrIg(Rg%nAMr>a%H1Dca=8CUQ z2q&g_fve5+OlOAEBy*Kya}}6?mLunBEPG0dS;oi-BZju1`e`g1${I5b^y>U^ay74F zt+}4*L~`nfv{9WSHCI`A4O)>$hE}XI&lsv>rUkeIFAC(YH_IJrW7a3&Rg{6|{k7qr zdTv!Lfs+x^N43KA#^jqQffQig4_nL> zhmK<%3;LlK(nqx*-AoPr%z}#iZJ?qI^NhuRLPm!vW2<=vOhYWRoXrYAyuY3LnB~0@KSHsUItk6hYxC~ zJM*67xc=pTD&tN=8lMYBcf_V zygMR(H6ngJBDRl+-;9WzBjWuL@xh4ra764H5xYmkrz2u0*wf3Sm@^{I9TCGu#PAVu z-iSDVL==sP3r0lKqtRbhv1mk$7!e~!#Kj}xk`YlnB4&+<+egG5BVzW52ybk}E8aCC zDn>*lE;>_iiE8ooh-i8Y`^%Q+j)iY5!}bowKc zGc9!IODD&z9E+Q#l!*5GaVP6CcQg7(2Q>_g7=%iRj2VaaaNBj2)?76a^&MdFQ04cS zGm`t+Sfa138Nn!VFT+*WWn;=7+|Mu~wI#z9X~>KaUEN*=jc8&4lG%F}nG$(OJdx{$ zyjRdC4JqnEtk_l-hrXw0>#`jf14L9*gr^8AU6irhBCu9fUgsmGQ>ortmM|C7g3($h=Hhr z!Du(B{y2{3$CRzxn6ky2$up_y%h+Wk(hPxag&TW2k(i9SwQMHp+Tb}w_hJ&8LDbFK z;7KNu_yTl*0~O0uyaw! zIrdnc`vvwMBC4Fo4bydD?5RYGpRa(Yv!B8ahYv#AFHU1`AVZ?RAKEmXonz_?su+MtC2+{uXN!6-(|m2406#K0bhwr60r=qR7vfd*Hyi*;RPp3rfcnOsL`r4F6* z%pf96$o&kxb=lJgQG>Y+LuJaNu^DI+5%WP6&*?N>-7M}WL^97e2(7uo^+lQxZZ0|+ z%&oi&gjsa7~~YkGY+He1JGg5zh*2l4MVYxxso9! zp|15`*6qB`mh7=0S2L03n-MFR@8y+}Exasu@oQ4c=Z(B?O zggzAY1>H;M{yx?~(#^We7)L~jKJ1TeEI^5X!S7rGN?Qgeh|z*wjO1gvQlz$kbBsr1 zbEe`ZBa0<2Mxild8UJ(mktdzFMv?h@@-x?G{rzqIgTFTYs{K{{Yx1uHPkWv;JgIo1 ze8POv*Vo*a+ZWr%>tp_?eXM@Wd)(Wr?+xo6{K4>p_J^JxSr4bD;XC2CR^Rq^*F7wG znENpHA@5<+1LcFZ`<)%y4poP|Bdo)MwTVh)rT6&u6ngz|qTbZ|bx2$fpecs$u+?3gr z*u-zDyP>`zy}`dhz0rGJ+nC-cX%sd(G)fzKuW7DjUJJX%xn_H<;%f3$;Z>`v>MQaq zu~!_f^yusK#g}Q9dG&*JoplX$#dQin9i^`4(~?i+pNc+hx}?3Nz9hQjda1uwR9jGO z{G{%al20U`V4n~^Dfl?-W7@~Y3xvw%^A+cd&P&gSoNqc;c}{vxc#e9m;B460rizk^ z^oo!QW<~#*n$x+blTSySrkrj+Re37=l5!YFWO_OZIHT-3|2{3OA&!4PNWE)?#hPnhR_4lVg(oliiY^txjF-vHH}i zq*XzyYLgBp(S@9ySI&NQFTwG9`UEHJC3$cZ< zDX|{QpDt@%R=aH9vPUr~F>W!>Bv&M*l6;AyDQCU%OQK3=K#Vz7;af&!2 zB5h%-=$L4yC`A+`augk#A2Z*1K5K62oSZr9=CI~G3vCH440Q{=8G4OdnOF%+^b3nC! zj(?K>0)IFEdVW4Xl<&-cGJ`dvg%`!M=5zq-jCZET%p3ZSgJj&GL2hz3Fqz zC&S0zr`0>(+r^vceRt~FsaaFwriM;+o~pPoZI^VkKB*B`?>tjYW;~--vBZ}e0ct*cVKSd9x`zYuw zE_p5qE?zFyF868Gv`Cr-t#D$>#1|7DO{kqvI3Zy|@C1(u&z)PHpE}h$WjIAT#W=DY zI~=m?pW4;i9kWZbdv1H*HpO;o-Ao9eNL$L<{KJoc=0p|yv#wRNdgo|TJL z`I!7Msbij4=3Ay(Mp-_x*lFQx@tm@cqDZ5}Q0yozwCzaU5%m%25&jYCk-@`;!?MGY!`NYcab_{KxF2<* zN)&3F zI#6^V`vC2LVZU~N`hLlNY(HVYW?$^SzJj)b^aAe!N`YZ-<=*1Gg1yE)`uxm%alUK* zpvs_CYeZtZT_yPS6i^NR8!^7?XXa^<-t?-b`G=Y-{W=hP|E6%yE1=-esEW@Zzz z+jhk72-(rJy<$6mJ8gSKmOASVTGn7@ab|XAVrI{_rfu=t`nR@km2DMoHDpLLA~JXx zRq4g)-sukM+ARfJI9sf?Xg23=w%Tk9k6=8w`;Wia=#RfRc2n^yB=F4;@He^WOJp|u zjoxC4y)D~pa_z<~p7580lFqSs|FchiyQ%#ucAk5h-jCJdmS0XbPiJIbA`m2rs&ZdNVA7gW(xhNbcuVpwv=HJ zmbNrgu*K1m5vXJCV>FX=b+!yGi8F^l5d;YQg76rPz&D7`+>)|-)5c_o*zjir@B;mj zAJ3DC;@jyGQ{+XUQ`)ifiKeBz0Cn>{r|Jau>{%pqF_AkCX_a&iSxlrL$2__c-3#`# zK^Gm_d)%i_$1Cvjogo;hz)!$~I?&4TYNic1UeHXPhxP< zMjCe}syx9i8V)kKh#<(sLq->F7&80@u>(`cO7{beF_(xAMSA+8E;^fr$~fpq zxfV({Zu8`$%6K-0m{%CtNWI|!Jg{L>-O=V0+_wHkM zx=m9Voy4Ii4{3S;D!jwqJ1WvduVz5N;wfFEEAVAt5T4#_V^cBQI zJ_=?8A&nBkc^W-C1Pyv~MIR}H*%nAWmn}iEaPC1Qx&R|)L&sP;-aM|5G!(3P8TOhF z@uP+3APDsiXE+G83EAKD^g?7&~-(!^$?k=^;GE~gt(M49NA*5;0B?F=X6hWJ_d_Iyk!t1(#NvlX>bk# z1|Nm2O?XPZjrp{p< z+us6$fA}lby;f9Gi06GpKFXpZEtx||Bq*DIDxqe z?6-<%iO-Dv?fn(~x&5?$fvvO9u1v^#`5ZLJlpnXR#{A+6NbDudD>FgO?}U-aCrxvjo!XzsmLb*t!B z_AT+P_RniR*L)uPx%cOk&l_&KHVxkBxsiKA2oa=`>)F?nuge>R4XzE8hW2a8*96xT z4%a%b)?JOis=ge5S$LUqxwF2qUR6)6Z>}q=^RA=TNk8R(%BxlD;&nnDM>lZMa54TO z^mkbNQkLfD1DN<*c#QdT)|zVf{I zyzBYFbE0$D*{+J@iinE7Gc{+5&nVAG6lc88)SWh*ia#Yh#W~fft<&e0L zp7NS>bl=+4 zwJ~eG))Lo7rgS71Ci^A7SiN&~!s_tVFIKg#I<;!uswYWTl1dXhR+g{KTba5tbfw~c z!i9wVgqv@6uQlMVmp=!ugSNt-`s`Il(#D*~7V!T22k8J{|wWq1NHBLym)^ z{mpTw#ubiB85cb6xm~@@I-4k)$75T@CXIb!-D+KJ?Qh*`Rc#e%^>|Fnm%Vl^>?7({$QctYqPR1*|C z36T&B5`4h?p#OO8aoKU(P;>f} zmAfR_w%I*9ns!Kb2zE4V*KRM^Zo6HZRglHWvdYqA3Nl?YE4LMG%iKoTHnV3a4%D7e zmm$vJXVj%@(uL{FbV_=Y+;(GUsy5a1JY3UDI^gEeFjHs;4+1?UqCcJKZzIDTPvIdO zh7DSB1lx^fK4I7)&+i#5#Pnmd9SVH8f1vXz!9F4*+W@)^IC+MGINcqIgXnEY69!v0>VDV(aAoE25Icc(WWX3@_hBK#i{02DdH5p6>Jg@?rh2xHqrhF0 z_|>bu=k^bY7P_MsJgteaA>a1A;ko*`{CVti*??f6;rFuN3w{s#o%Xx&x60q@`WuXD zBh}ddOXn{|Ft>*MLixq^Nqb*>pRkY9*ZEWBPpY4ckLw;sJobJ}ecaru>CNn=_4fQA z|3UnN;0NRP4d0i1FZ|x>`=UqbkK!LuANBU=d-}hN@4~uj9u_}TJ`^Y(+CJ=gQ1(FF zS=KIZ@Bg~(>$@&I0oA7o)%?GVvDGS(9+gi(cJTS<>w)vGe5WbTz|9ZrtGHe&Gx4B zCP|a9ssBdP4b6?V>zeBd;dR&RlPBg!RbyL&tRbR--_UnWf35gh-Bs09&Q;3Q zzAI%{GOviQPG~Y7%RhHC7kfs^!&Un30WD4OJyoGQ}s9kL%7E&XmCHYI~;t zbj4}q>DbfaQ?93Kw8dJbR-m=j_I#xLDB`2ulT9ZpPfAY;Pf|}-!G?`%`CwU3SxK3^ zOjOo;qUwYMc5GZvw84Ij@t|AV&URj`92IgTAC9M>F^ z9kV*tTVg0ts7m5X_$6&eHAe+UX-5f1YmO8gNj^e3Vv3|k9OfVHE7lhm7fTTzH5@8C zRB$Nl5Dnt!>VxqI2a4K@^hKFP5k;J$hWFL)WA9tNZ+uVtUiN#E_xcO@+&MT&xm0%pO$keeOc)48W%Pxc=19&Arj zeo;P_ZL zvE+u;+SMVeIjiedX;ukVxvtVAD%daBCAd{sF5D?>d?PI=IOwL}l%Pp*Zndt5U2|N6Ts;AcV)(fn?tR1ayS{<{B$gpy@>K>CcCUlI~ zm~P8z%YBxi7S7~uQVJ=Y|0{f!~Oi{x^HwLqRH7*33cg{((g+ydR0aERCUI8@;l@2VfXYM8rabe>7aJ>wO6!P-0iwk@p2JT z(^}A)+)8OR7^DV~foJIbqV9_#*wQ9^QFJ@~cKmJX?cNqWI7{!A%4W5qIkTD9Olj`C zMZHD1(R^KUoeyrYtx?;kY-Bd}HOL#p4T1*awT5dY*NU%ZU#YoVbSd#tZ*5a;Wv#SU z2rjOwMp-)yotb znMxKSqk=E$T3@kVv>sdUu)b+s$+~p#L|xKMX{Jm%9>j)Da5_{ibg3n1`DFL6;pU{+`Nk~kPzbTF5$5qCvV>4rUv6R@( z<@{xYWvUoyj5x+Brc+X-kVqst%^{9^v%g2>`U$%}dxHY}`In7mN1&|#rmBosBx*UneZ7tMEtuQV0SOPtpm z-V|OLE)5rkQ^Tvmlwnq3y>kt7RdeI#^5?2TC81p*`VehMVu*qtVjI#tTN~UNqz%G? ztb&XJtsq+<5y%1sfeis=0R;hJ0ki<4zuG_EzlYzzuiz*11$+m7@{Dvp`846QI^PoC zTwkHDgKw{o&?jQ5$cyS#gr#Hg7!~XF)O#|yeIA(}u^u5F1Ds|~87GY6z$sy8vy<7b zY~$o6#bnjwX7^%un)`rTms_!$%q`4K%SdMs7+v%xx{@xTd()*Zd>1`ULsQX0XjEF? z#E^**PBf?D@tNZj$J565IW{<|9E + + + @@ -48,6 +51,15 @@ + + + + + + + + + @@ -93,15 +105,6 @@ - - - - - - - - - @@ -111,14 +114,41 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + - + - + - + \ No newline at end of file diff --git a/Source/Modulos/Contabilidad/Controller/Contabilidad_controller.dpk b/Source/Modulos/Contabilidad/Controller/Contabilidad_controller.dpk index 60b36b2c..a0025261 100644 --- a/Source/Modulos/Contabilidad/Controller/Contabilidad_controller.dpk +++ b/Source/Modulos/Contabilidad/Controller/Contabilidad_controller.dpk @@ -68,6 +68,8 @@ contains uIEditorCuentas in 'View\uIEditorCuentas.pas', uIEditorSubCuenta in 'View\uIEditorSubCuenta.pas', uIEditorSubCuentas in 'View\uIEditorSubCuentas.pas', - uIEditorElegirEpigrafes in 'View\uIEditorElegirEpigrafes.pas'; + uIEditorElegirEpigrafes in 'View\uIEditorElegirEpigrafes.pas', + uIEditorElegirBalances in 'View\uIEditorElegirBalances.pas', + uIEditorElegirCuentasEspeciales in 'View\uIEditorElegirCuentasEspeciales.pas'; end. diff --git a/Source/Modulos/Contabilidad/Controller/Contabilidad_controller.dproj b/Source/Modulos/Contabilidad/Controller/Contabilidad_controller.dproj index 4d8b436c..f36ed798 100644 --- a/Source/Modulos/Contabilidad/Controller/Contabilidad_controller.dproj +++ b/Source/Modulos/Contabilidad/Controller/Contabilidad_controller.dproj @@ -79,6 +79,8 @@ + + diff --git a/Source/Modulos/Contabilidad/Controller/View/uIEditorBalance.pas b/Source/Modulos/Contabilidad/Controller/View/uIEditorBalance.pas index 04cf0a13..08869ffb 100644 --- a/Source/Modulos/Contabilidad/Controller/View/uIEditorBalance.pas +++ b/Source/Modulos/Contabilidad/Controller/View/uIEditorBalance.pas @@ -3,7 +3,7 @@ unit uIEditorBalance; interface uses - uBizBalances; + uBizBalances, uBalancesController; type IEditorBalance = interface diff --git a/Source/Modulos/Contabilidad/Controller/View/uIEditorBalances.pas b/Source/Modulos/Contabilidad/Controller/View/uIEditorBalances.pas index b6eca8df..459a2541 100644 --- a/Source/Modulos/Contabilidad/Controller/View/uIEditorBalances.pas +++ b/Source/Modulos/Contabilidad/Controller/View/uIEditorBalances.pas @@ -3,14 +3,19 @@ unit uIEditorBalances; interface uses - uBizBalances; + uBizBalances, uBalancesController; type IEditorBalances = interface ['{47A77BA9-3845-469B-A790-81F3C6E0F134}'] + function GetController : IBalancesController; + procedure SetController (const Value : IBalancesController); + property Controller : IBalancesController read GetController write SetController; + function GetBalances: IBizBalance; procedure SetBalances(const Value: IBizBalance); property Balances: IBizBalance read GetBalances write SetBalances; + function ShowModal : Integer; procedure Release; end; diff --git a/Source/Modulos/Contabilidad/Controller/View/uIEditorCuentasEspeciales.pas b/Source/Modulos/Contabilidad/Controller/View/uIEditorCuentasEspeciales.pas index d02623d0..32e2dddd 100644 --- a/Source/Modulos/Contabilidad/Controller/View/uIEditorCuentasEspeciales.pas +++ b/Source/Modulos/Contabilidad/Controller/View/uIEditorCuentasEspeciales.pas @@ -3,14 +3,19 @@ unit uIEditorCuentasEspeciales; interface uses - uBizCuentasEspeciales; + uBizCuentasEspeciales, uCuentasEspecialesController; type IEditorCuentasEspeciales = interface ['{47A77BA9-3845-469B-A790-81F3C6E0F134}'] + function GetController : ICuentasEspecialesController; + procedure SetController (const Value : ICuentasEspecialesController); + property Controller : ICuentasEspecialesController read GetController write SetController; + function GetCuentasEspeciales: IBizCuentaEspecial; procedure SetCuentasEspeciales(const Value: IBizCuentaEspecial); property CuentasEspeciales: IBizCuentaEspecial read GetCuentasEspeciales write SetCuentasEspeciales; + function ShowModal : Integer; procedure Release; end; diff --git a/Source/Modulos/Contabilidad/Controller/View/uIEditorElegirBalances.pas b/Source/Modulos/Contabilidad/Controller/View/uIEditorElegirBalances.pas new file mode 100644 index 00000000..90e7e3d2 --- /dev/null +++ b/Source/Modulos/Contabilidad/Controller/View/uIEditorElegirBalances.pas @@ -0,0 +1,26 @@ +unit uIEditorElegirBalances; + +interface + +uses + uIEditorBalances, uBizBalances, uGUIBase; + +type + IEditorElegirBalances = interface(IEditorBalances) + ['{12716994-A11A-4C05-973B-652468B859D9}'] + function GetBalancesSeleccionados: IBizBalance; + property BalancesSeleccionados: IBizBalance read GetBalancesSeleccionados; + + procedure SetMultiSelect (AValue : Boolean); + function GetMultiSelect : Boolean; + property MultiSelect : Boolean read GetMultiSelect write SetMultiSelect; + + procedure SetMensaje (const AValue: String); + function GetMensaje: String; + property Mensaje : String read GetMensaje write SetMensaje; + end; + + +implementation + +end. diff --git a/Source/Modulos/Contabilidad/Controller/View/uIEditorElegirCuentasEspeciales.pas b/Source/Modulos/Contabilidad/Controller/View/uIEditorElegirCuentasEspeciales.pas new file mode 100644 index 00000000..e35ef97d --- /dev/null +++ b/Source/Modulos/Contabilidad/Controller/View/uIEditorElegirCuentasEspeciales.pas @@ -0,0 +1,26 @@ +unit uIEditorElegirCuentasEspeciales; + +interface + +uses + uIEditorCuentasEspeciales, uBizCuentasEspeciales, uGUIBase; + +type + IEditorElegirCuentasEspeciales = interface(IEditorCuentasEspeciales) + ['{12716994-A11A-4C05-973B-652468B859D9}'] + function GetCuentasEspecialesSeleccionados: IBizCuentaEspecial; + property CuentasEspecialesSeleccionados: IBizCuentaEspecial read GetCuentasEspecialesSeleccionados; + + procedure SetMultiSelect (AValue : Boolean); + function GetMultiSelect : Boolean; + property MultiSelect : Boolean read GetMultiSelect write SetMultiSelect; + + procedure SetMensaje (const AValue: String); + function GetMensaje: String; + property Mensaje : String read GetMensaje write SetMensaje; + end; + + +implementation + +end. diff --git a/Source/Modulos/Contabilidad/Controller/uBalancesController.pas b/Source/Modulos/Contabilidad/Controller/uBalancesController.pas index 3d7f1c82..9ee89c9b 100644 --- a/Source/Modulos/Contabilidad/Controller/uBalancesController.pas +++ b/Source/Modulos/Contabilidad/Controller/uBalancesController.pas @@ -19,6 +19,9 @@ type procedure DescartarCambios(ABalance : IBizBalance); function Localizar(ABalances: IBizBalance; ADescripcion:String): Boolean; function DarListaBalances: TStringList; + + function ExtraerSeleccionados(ABalances: IBizBalance) : IBizBalance; + function ElegirBalance(ABalances : IBizBalance; AMensaje: String; AMultiSelect: Boolean): IBizBalance; end; TBalancesController = class(TObservador, IBalancesController) @@ -45,13 +48,16 @@ type procedure Ver(ABalance: IBizBalance); function Localizar(ABalances: IBizBalance; ADescripcion:String): Boolean; function DarListaBalances: TStringList; + + function ExtraerSeleccionados(ABalances: IBizBalance) : IBizBalance; + function ElegirBalance(ABalances : IBizBalance; AMensaje: String; AMultiSelect: Boolean): IBizBalance; end; implementation uses cxControls, DB, uEditorRegistryUtils, schContabilidadClient_Intf, - uIEditorBalances, uIEditorBalance, uDataModuleContabilidad, + uIEditorBalances, uIEditorBalance, uIEditorElegirBalances, uDataModuleContabilidad, uDAInterfaces, uDataTableUtils, uDialogUtils, uDateUtils, uROTypes, DateUtils, Controls, Windows; @@ -199,6 +205,7 @@ begin if Assigned(AEditor) then with AEditor do begin + Controller := Self; //OJO ORDEN MUY IMPORTANTE Balances := ABalances; ShowModal; Release; @@ -209,6 +216,28 @@ begin end; end; +function TBalancesController.ElegirBalance(ABalances: IBizBalance; AMensaje: String; AMultiSelect: Boolean): IBizBalance; +var + AEditor : IEditorElegirBalances; +begin + Result := NIL; + + CreateEditor('EditorElegirBalances', IEditorElegirBalances, AEditor); + try + with AEditor do + begin + Balances := ABalances; + Controller := Self; + Mensaje := AMensaje; + if IsPositiveResult(ShowModal) then + Result := BalancesSeleccionados; + Release; + end; + finally + AEditor := NIL; + end; +end; + function TBalancesController.Eliminar(ABalance: IBizBalance): Boolean; begin Result := False; @@ -230,6 +259,15 @@ begin end; end; +function TBalancesController.ExtraerSeleccionados(ABalances: IBizBalance): IBizBalance; +var + ASeleccionados : IBizBalance; +begin + ASeleccionados := Self.Buscar(ID_NULO); + CopyDataTableDA3(ABalances.DataTable, ASeleccionados.DataTable, True); + Result := ASeleccionados; +end; + procedure TBalancesController.RecibirAviso(ASujeto: ISujeto; ADataTable: IDAStronglyTypedDataTable); begin inherited; diff --git a/Source/Modulos/Contabilidad/Controller/uCuentasController.pas b/Source/Modulos/Contabilidad/Controller/uCuentasController.pas index 267b9a71..4a579cf4 100644 --- a/Source/Modulos/Contabilidad/Controller/uCuentasController.pas +++ b/Source/Modulos/Contabilidad/Controller/uCuentasController.pas @@ -19,6 +19,10 @@ type procedure DescartarCambios(ACuenta : IBizCuenta); function Localizar(ACuentas: IBizCuenta; ADescripcion:String): Boolean; function DarListaCuentas: TStringList; + + procedure ElegirEpigrafe(ACuenta: IBizCuenta); + procedure ElegirBalance(ACuenta: IBizCuenta); + procedure ElegirCuentaEspecial(ACuenta: IBizCuenta); end; TCuentasController = class(TObservador, ICuentasController) @@ -46,6 +50,10 @@ type procedure Ver(ACuenta: IBizCuenta); function Localizar(ACuentas: IBizCuenta; ADescripcion:String): Boolean; function DarListaCuentas: TStringList; + + procedure ElegirEpigrafe(ACuenta: IBizCuenta); + procedure ElegirBalance(ACuenta: IBizCuenta); + procedure ElegirCuentaEspecial(ACuenta: IBizCuenta); end; implementation @@ -54,7 +62,10 @@ uses cxControls, DB, uEditorRegistryUtils, schContabilidadClient_Intf, uIEditorCuentas, uIEditorCuenta, uDataModuleContabilidad, uDAInterfaces, uDataTableUtils, uDialogUtils, uFactuGES_App, - uDateUtils, uROTypes, DateUtils, Controls, Windows; + uDateUtils, uROTypes, DateUtils, Controls, Windows, + uBizEpigrafes, uEpigrafesController, + uBizBalances, uBalancesController, + uBizCuentasEspeciales, uCuentasEspecialesController; { TCuentasController } @@ -212,6 +223,90 @@ begin end; end; +procedure TCuentasController.ElegirBalance(ACuenta: IBizCuenta); +var + ABalance : IBizBalance; + AController : IBalancesController; +begin + inherited; + try + AController := TBalancesController.Create; + ABalance := (AController.ElegirBalance(AController.BuscarTodos, 'ddddddd', False) as IBizBalance); + + if Assigned(ABalance) then + begin + if Assigned(ACuenta) then + begin + if not ACuenta.DataTable.Editing then + ACuenta.DataTable.Edit; + + ACuenta.ID_BALANCE := ABalance.ID; + ACuenta.BALANCE := ABalance.REF_BALANCE; + ACuenta.Post; + end; + end; + finally + AController := Nil; + ABalance := Nil; + end; +end; + +procedure TCuentasController.ElegirCuentaEspecial(ACuenta: IBizCuenta); +var + ACuentaEspecial : IBizCuentaEspecial; + AController : ICuentasEspecialesController; +begin + inherited; + try + AController := TCuentasEspecialesController.Create; + ACuentaEspecial := (AController.ElegirCuentaEspecial(AController.BuscarTodos, 'ddddddd', False) as IBizCuentaEspecial); + + if Assigned(ACuentaEspecial) then + begin + if Assigned(ACuenta) then + begin + if not ACuenta.DataTable.Editing then + ACuenta.DataTable.Edit; + + ACuenta.ID_CUENTA_ESPECIAL := ACuentaEspecial.ID; + ACuenta.CUENTA_ESPECIAL := ACuentaEspecial.REFERENCIA; + ACuenta.Post; + end; + end; + finally + AController := Nil; + ACuentaEspecial := Nil; + end; +end; + +procedure TCuentasController.ElegirEpigrafe(ACuenta: IBizCuenta); +var + AEpigrafe : IBizEpigrafe; + AController : IEpigrafesController; +begin + inherited; + try + AController := TEpigrafesController.Create; + AEpigrafe := (AController.ElegirEpigrafe(AController.BuscarTodos, 'ddddddd', False) as IBizEpigrafe); + + if Assigned(AEpigrafe) then + begin + if Assigned(ACuenta) then + begin + if not ACuenta.DataTable.Editing then + ACuenta.DataTable.Edit; + + ACuenta.ID_EPIGRAFE := AEpigrafe.ID; + ACuenta.EPIGRAFE := AEpigrafe.DESCRIPCION; + ACuenta.Post; + end; + end; + finally + AController := Nil; + AEpigrafe := Nil; + end; +end; + function TCuentasController.Eliminar(ACuenta: IBizCuenta): Boolean; begin Result := False; diff --git a/Source/Modulos/Contabilidad/Controller/uCuentasEspecialesController.pas b/Source/Modulos/Contabilidad/Controller/uCuentasEspecialesController.pas index 843f0f67..9c395b34 100644 --- a/Source/Modulos/Contabilidad/Controller/uCuentasEspecialesController.pas +++ b/Source/Modulos/Contabilidad/Controller/uCuentasEspecialesController.pas @@ -19,6 +19,9 @@ type procedure DescartarCambios(ACuentaEspecial : IBizCuentaEspecial); function Localizar(ACuentasEspeciales: IBizCuentaEspecial; ADescripcion:String): Boolean; function DarListaCuentasEspeciales: TStringList; + + function ExtraerSeleccionados(ACuentasEspeciales: IBizCuentaEspecial) : IBizCuentaEspecial; + function ElegirCuentaEspecial(ACuentasEspeciales : IBizCuentaEspecial; AMensaje: String; AMultiSelect: Boolean): IBizCuentaEspecial; end; TCuentasEspecialesController = class(TObservador, ICuentasEspecialesController) @@ -45,13 +48,17 @@ type procedure Ver(ACuentaEspecial: IBizCuentaEspecial); function Localizar(ACuentasEspeciales: IBizCuentaEspecial; ADescripcion:String): Boolean; function DarListaCuentasEspeciales: TStringList; + + function ExtraerSeleccionados(ACuentasEspeciales: IBizCuentaEspecial) : IBizCuentaEspecial; + function ElegirCuentaEspecial(ACuentasEspeciales : IBizCuentaEspecial; AMensaje: String; AMultiSelect: Boolean): IBizCuentaEspecial; end; implementation uses cxControls, DB, uEditorRegistryUtils, schContabilidadClient_Intf, - uIEditorCuentasEspeciales, uIEditorCuentaEspecial, uDataModuleContabilidad, + uIEditorCuentasEspeciales, uIEditorCuentaEspecial, uIEditorElegirCuentasEspeciales, + uDataModuleContabilidad, uDAInterfaces, uDataTableUtils, uDialogUtils, uDateUtils, uROTypes, DateUtils, Controls, Windows; @@ -199,6 +206,7 @@ begin if Assigned(AEditor) then with AEditor do begin + Controller := Self; //OJO ORDEN MUY IMPORTANTE CuentasEspeciales := ACuentasEspeciales; ShowModal; Release; @@ -209,6 +217,29 @@ begin end; end; +function TCuentasEspecialesController.ElegirCuentaEspecial(ACuentasEspeciales: IBizCuentaEspecial; AMensaje: String; + AMultiSelect: Boolean): IBizCuentaEspecial; +var + AEditor : IEditorElegirCuentasEspeciales; +begin + Result := NIL; + + CreateEditor('EditorElegirBalances', IEditorElegirCuentasEspeciales, AEditor); + try + with AEditor do + begin + CuentasEspeciales := ACuentasEspeciales; + Controller := Self; + Mensaje := AMensaje; + if IsPositiveResult(ShowModal) then + Result := CuentasEspecialesSeleccionados; + Release; + end; + finally + AEditor := NIL; + end; +end; + function TCuentasEspecialesController.Eliminar(ACuentaEspecial: IBizCuentaEspecial): Boolean; begin Result := False; @@ -230,6 +261,15 @@ begin end; end; +function TCuentasEspecialesController.ExtraerSeleccionados(ACuentasEspeciales: IBizCuentaEspecial): IBizCuentaEspecial; +var + ASeleccionados : IBizCuentaEspecial; +begin + ASeleccionados := Self.Buscar(ID_NULO); + CopyDataTableDA3(ACuentasEspeciales.DataTable, ASeleccionados.DataTable, True); + Result := ASeleccionados; +end; + procedure TCuentasEspecialesController.RecibirAviso(ASujeto: ISujeto; ADataTable: IDAStronglyTypedDataTable); begin inherited; diff --git a/Source/Modulos/Contabilidad/Controller/uEpigrafesController.pas b/Source/Modulos/Contabilidad/Controller/uEpigrafesController.pas index 7b4e5e6e..04ab7686 100644 --- a/Source/Modulos/Contabilidad/Controller/uEpigrafesController.pas +++ b/Source/Modulos/Contabilidad/Controller/uEpigrafesController.pas @@ -14,11 +14,16 @@ type procedure VerTodos(AEpigrafes: IBizEpigrafe); procedure Ver(AEpigrafe: IBizEpigrafe); procedure Anadir(AEpigrafe : IBizEpigrafe); - function Eliminar(AEpigrafe : IBizEpigrafe): Boolean; + function Eliminar(AEpigrafe : IBizEpigrafe): Boolean; function Guardar(AEpigrafe : IBizEpigrafe): Boolean; procedure DescartarCambios(AEpigrafe : IBizEpigrafe); function Localizar(AEpigrafes: IBizEpigrafe; ADescripcion:String): Boolean; function DarListaEpigrafes: TStringList; + + function AsignarPadre(AEpigrafe, AEpigrafePadre: IBizEpigrafe) : IBizEpigrafe; + function ExtraerSeleccionados(AEpigrafes: IBizEpigrafe) : IBizEpigrafe; + function ElegirEpigrafe(AEpigrafes : IBizEpigrafe; AMensaje: String; AMultiSelect: Boolean): IBizEpigrafe; + end; TEpigrafesController = class(TObservador, IEpigrafesController) @@ -46,13 +51,17 @@ type procedure Ver(AEpigrafe: IBizEpigrafe); function Localizar(AEpigrafes: IBizEpigrafe; ADescripcion:String): Boolean; function DarListaEpigrafes: TStringList; + + function AsignarPadre(AEpigrafe, AEpigrafePadre: IBizEpigrafe) : IBizEpigrafe; + function ExtraerSeleccionados(AEpigrafes: IBizEpigrafe) : IBizEpigrafe; + function ElegirEpigrafe(AEpigrafes : IBizEpigrafe; AMensaje: String; AMultiSelect: Boolean): IBizEpigrafe; end; implementation uses cxControls, DB, uEditorRegistryUtils, schContabilidadClient_Intf, - uIEditorEpigrafes, uIEditorEpigrafe, uDataModuleContabilidad, + uIEditorEpigrafes, uIEditorEpigrafe, uIEditorElegirEpigrafes, uDataModuleContabilidad, uDAInterfaces, uDataTableUtils, uDialogUtils, uFactuGES_App, uDateUtils, uROTypes, DateUtils, Controls, Windows; @@ -68,6 +77,22 @@ begin FDataModule := TDataModuleContabilidad.Create(Nil); end; +function TEpigrafesController.AsignarPadre(AEpigrafe, AEpigrafePadre: IBizEpigrafe): IBizEpigrafe; +begin + if Assigned(AEpigrafePadre) then + begin + if Assigned(AEpigrafe) then + begin + if not AEpigrafe.DataTable.Editing then + AEpigrafe.DataTable.Edit; + + AEpigrafe.ID_PADRE := AEpigrafePadre.ID; + AEpigrafe.EPIGRAFE_PADRE := AEpigrafePadre.DESCRIPCION; + AEpigrafe.Post; + end; + end; +end; + function TEpigrafesController.Buscar(ID: Integer): IBizEpigrafe; var Condicion: TDAWhereExpression; @@ -212,6 +237,28 @@ begin end; end; +function TEpigrafesController.ElegirEpigrafe(AEpigrafes: IBizEpigrafe; AMensaje: String; AMultiSelect: Boolean): IBizEpigrafe; +var + AEditor : IEditorElegirEpigrafes; +begin + Result := NIL; + + CreateEditor('EditorElegirEpigrafes', IEditorElegirEpigrafes, AEditor); + try + with AEditor do + begin + Epigrafes := AEpigrafes; + Controller := Self; + Mensaje := AMensaje; + if IsPositiveResult(ShowModal) then + Result := EpigrafesSeleccionados; + Release; + end; + finally + AEditor := NIL; + end; +end; + function TEpigrafesController.Eliminar(AEpigrafe: IBizEpigrafe): Boolean; begin Result := False; @@ -233,6 +280,15 @@ begin end; end; +function TEpigrafesController.ExtraerSeleccionados(AEpigrafes: IBizEpigrafe): IBizEpigrafe; +var + ASeleccionados : IBizEpigrafe; +begin + ASeleccionados := Self.Buscar(ID_NULO); + CopyDataTableDA3(AEpigrafes.DataTable, ASeleccionados.DataTable, True); + Result := ASeleccionados; +end; + procedure TEpigrafesController.FiltrarEjercicio(AEpigrafe: IBizEpigrafe); var Condicion: TDAWhereExpression; diff --git a/Source/Modulos/Contabilidad/Data/uDataModuleContabilidad.dfm b/Source/Modulos/Contabilidad/Data/uDataModuleContabilidad.dfm index be4b1565..a0173477 100644 --- a/Source/Modulos/Contabilidad/Data/uDataModuleContabilidad.dfm +++ b/Source/Modulos/Contabilidad/Data/uDataModuleContabilidad.dfm @@ -156,6 +156,9 @@ inherited DataModuleContabilidad: TDataModuleContabilidad DataType = datAutoInc GeneratorName = 'GEN_CONT_EPIGRAFES_ID' Required = True + DisplayLabel = 'Epigrafes_ID' + ServerAutoRefresh = True + DictionaryEntry = 'Epigrafes_ID' InPrimaryKey = True end item @@ -165,12 +168,6 @@ inherited DataModuleContabilidad: TDataModuleContabilidad DisplayLabel = 'Epigrafes_REF_EPIGRAFE' DictionaryEntry = 'Epigrafes_REF_EPIGRAFE' end - item - Name = 'ID_PADRE' - DataType = datInteger - DisplayLabel = 'Epigrafes_ID_PADRE' - DictionaryEntry = 'Epigrafes_ID_PADRE' - end item Name = 'DESCRIPCION' DataType = datString @@ -183,6 +180,19 @@ inherited DataModuleContabilidad: TDataModuleContabilidad DataType = datInteger DisplayLabel = 'Epigrafes_ID_EJERCICIO' DictionaryEntry = 'Epigrafes_ID_EJERCICIO' + end + item + Name = 'ID_PADRE' + DataType = datInteger + DisplayLabel = 'Epigrafes_ID_PADRE' + DictionaryEntry = 'Epigrafes_ID_PADRE' + end + item + Name = 'EPIGRAFE_PADRE' + DataType = datString + Size = 255 + DisplayLabel = 'Epigrafes_EPIGRAFE_PADRE' + DictionaryEntry = 'Epigrafes_EPIGRAFE_PADRE' end> Params = <> StreamingOptions = [soDisableEventsWhileStreaming] @@ -296,6 +306,13 @@ inherited DataModuleContabilidad: TDataModuleContabilidad DisplayLabel = 'Cuentas_ID_EJERCICIO' DictionaryEntry = 'Cuentas_ID_EJERCICIO' end + item + Name = 'DESCRIPCION' + DataType = datString + Size = 255 + DisplayLabel = 'Cuentas_DESCRIPCION' + DictionaryEntry = 'Cuentas_DESCRIPCION' + end item Name = 'ID_EPIGRAFE' DataType = datInteger @@ -303,11 +320,11 @@ inherited DataModuleContabilidad: TDataModuleContabilidad DictionaryEntry = 'Cuentas_ID_EPIGRAFE' end item - Name = 'DESCRIPCION' + Name = 'EPIGRAFE' DataType = datString Size = 255 - DisplayLabel = 'Cuentas_DESCRIPCION' - DictionaryEntry = 'Cuentas_DESCRIPCION' + DisplayLabel = 'Cuentas_EPIGRAFE' + DictionaryEntry = 'Cuentas_EPIGRAFE' end item Name = 'ID_BALANCE' @@ -315,11 +332,25 @@ inherited DataModuleContabilidad: TDataModuleContabilidad DisplayLabel = 'Cuentas_ID_BALANCE' DictionaryEntry = 'Cuentas_ID_BALANCE' end + item + Name = 'BALANCE' + DataType = datString + Size = 255 + DisplayLabel = 'Cuentas_BALANCE' + DictionaryEntry = 'Cuentas_BALANCE' + end item Name = 'ID_CUENTA_ESPECIAL' DataType = datInteger DisplayLabel = 'Cuentas_ID_CUENTA_ESPECIAL' DictionaryEntry = 'Cuentas_ID_CUENTA_ESPECIAL' + end + item + Name = 'CUENTA_ESPECIAL' + DataType = datString + Size = 255 + DisplayLabel = 'Cuentas_CUENTA_ESPECIAL' + DictionaryEntry = 'Cuentas_CUENTA_ESPECIAL' end> Params = <> StreamingOptions = [soDisableEventsWhileStreaming] diff --git a/Source/Modulos/Contabilidad/Model/schContabilidadClient_Intf.pas b/Source/Modulos/Contabilidad/Model/schContabilidadClient_Intf.pas index 48c6dd03..b17fce7a 100644 --- a/Source/Modulos/Contabilidad/Model/schContabilidadClient_Intf.pas +++ b/Source/Modulos/Contabilidad/Model/schContabilidadClient_Intf.pas @@ -9,12 +9,12 @@ const { Data table rules ids Feel free to change them to something more human readable but make sure they are unique in the context of your application } - RID_Asientos = '{C51C5471-A7F7-4A0B-B124-1FCA17F1EA4D}'; - RID_SubCuentas = '{BBB2A9E5-DAD7-4E8B-A14D-CC7DEAF2D283}'; - RID_Cuentas = '{A0EB7B63-501F-4E40-9872-5E70A1EE346A}'; - RID_CuentasEspeciales = '{8714C12C-03FF-4FB3-98B7-76533DFDD66C}'; - RID_Epigrafes = '{1E81E57B-5402-4881-A28B-2927146E071C}'; - RID_Balances = '{39557F67-321F-41E8-8EE0-CAB8216CD882}'; + RID_Asientos = '{E57138E2-062A-47CC-85D5-D5EDB287F9D9}'; + RID_SubCuentas = '{8CDBD04B-6906-4BD7-9F4B-7F5FE1C3571E}'; + RID_Cuentas = '{613B2477-A125-4854-8C3D-DC612F408E4C}'; + RID_CuentasEspeciales = '{34044D68-7AC8-47CA-8DB3-61B5FB731D5A}'; + RID_Epigrafes = '{94BAE66D-898F-4AA8-B9FF-7A0CD1E5CEF9}'; + RID_Balances = '{ED6CE025-E600-48AA-A8B0-5F3FE58E4B57}'; { Data table names } nme_Asientos = 'Asientos'; @@ -62,19 +62,25 @@ const fld_CuentasID = 'ID'; fld_CuentasREF_CUENTA = 'REF_CUENTA'; fld_CuentasID_EJERCICIO = 'ID_EJERCICIO'; - fld_CuentasID_EPIGRAFE = 'ID_EPIGRAFE'; fld_CuentasDESCRIPCION = 'DESCRIPCION'; + fld_CuentasID_EPIGRAFE = 'ID_EPIGRAFE'; + fld_CuentasEPIGRAFE = 'EPIGRAFE'; fld_CuentasID_BALANCE = 'ID_BALANCE'; + fld_CuentasBALANCE = 'BALANCE'; fld_CuentasID_CUENTA_ESPECIAL = 'ID_CUENTA_ESPECIAL'; + fld_CuentasCUENTA_ESPECIAL = 'CUENTA_ESPECIAL'; { Cuentas field indexes } idx_CuentasID = 0; idx_CuentasREF_CUENTA = 1; idx_CuentasID_EJERCICIO = 2; - idx_CuentasID_EPIGRAFE = 3; - idx_CuentasDESCRIPCION = 4; - idx_CuentasID_BALANCE = 5; - idx_CuentasID_CUENTA_ESPECIAL = 6; + idx_CuentasDESCRIPCION = 3; + idx_CuentasID_EPIGRAFE = 4; + idx_CuentasEPIGRAFE = 5; + idx_CuentasID_BALANCE = 6; + idx_CuentasBALANCE = 7; + idx_CuentasID_CUENTA_ESPECIAL = 8; + idx_CuentasCUENTA_ESPECIAL = 9; { CuentasEspeciales fields } fld_CuentasEspecialesID = 'ID'; @@ -89,16 +95,18 @@ const { Epigrafes fields } fld_EpigrafesID = 'ID'; fld_EpigrafesREF_EPIGRAFE = 'REF_EPIGRAFE'; - fld_EpigrafesID_PADRE = 'ID_PADRE'; fld_EpigrafesDESCRIPCION = 'DESCRIPCION'; fld_EpigrafesID_EJERCICIO = 'ID_EJERCICIO'; + fld_EpigrafesID_PADRE = 'ID_PADRE'; + fld_EpigrafesEPIGRAFE_PADRE = 'EPIGRAFE_PADRE'; { Epigrafes field indexes } idx_EpigrafesID = 0; idx_EpigrafesREF_EPIGRAFE = 1; - idx_EpigrafesID_PADRE = 2; - idx_EpigrafesDESCRIPCION = 3; - idx_EpigrafesID_EJERCICIO = 4; + idx_EpigrafesDESCRIPCION = 2; + idx_EpigrafesID_EJERCICIO = 3; + idx_EpigrafesID_PADRE = 4; + idx_EpigrafesEPIGRAFE_PADRE = 5; { Balances fields } fld_BalancesID = 'ID'; @@ -125,7 +133,7 @@ const type { IAsientos } IAsientos = interface(IDAStronglyTypedDataTable) - ['{5914B799-7DB4-4B85-B63B-BA4CC1827CF3}'] + ['{A91B6648-0B5A-4379-BA46-E7502C4BE3AC}'] { Property getters and setters } function GetIDValue: Integer; procedure SetIDValue(const aValue: Integer); @@ -244,7 +252,7 @@ type { ISubCuentas } ISubCuentas = interface(IDAStronglyTypedDataTable) - ['{C519726C-43A5-4168-AD68-A63176180B09}'] + ['{3EA34CD0-F51B-46B6-BCB6-D0FF0BF60134}'] { Property getters and setters } function GetIDValue: Integer; procedure SetIDValue(const aValue: Integer); @@ -327,7 +335,7 @@ type { ICuentas } ICuentas = interface(IDAStronglyTypedDataTable) - ['{A60C051B-5B76-4B39-8B2B-30EBFCD31798}'] + ['{3266B522-8AD3-4882-86C7-23E7154C83AB}'] { Property getters and setters } function GetIDValue: Integer; procedure SetIDValue(const aValue: Integer); @@ -341,22 +349,34 @@ type procedure SetID_EJERCICIOValue(const aValue: Integer); function GetID_EJERCICIOIsNull: Boolean; procedure SetID_EJERCICIOIsNull(const aValue: Boolean); - function GetID_EPIGRAFEValue: Integer; - procedure SetID_EPIGRAFEValue(const aValue: Integer); - function GetID_EPIGRAFEIsNull: Boolean; - procedure SetID_EPIGRAFEIsNull(const aValue: Boolean); function GetDESCRIPCIONValue: String; procedure SetDESCRIPCIONValue(const aValue: String); function GetDESCRIPCIONIsNull: Boolean; procedure SetDESCRIPCIONIsNull(const aValue: Boolean); + function GetID_EPIGRAFEValue: Integer; + procedure SetID_EPIGRAFEValue(const aValue: Integer); + function GetID_EPIGRAFEIsNull: Boolean; + procedure SetID_EPIGRAFEIsNull(const aValue: Boolean); + function GetEPIGRAFEValue: String; + procedure SetEPIGRAFEValue(const aValue: String); + function GetEPIGRAFEIsNull: Boolean; + procedure SetEPIGRAFEIsNull(const aValue: Boolean); function GetID_BALANCEValue: Integer; procedure SetID_BALANCEValue(const aValue: Integer); function GetID_BALANCEIsNull: Boolean; procedure SetID_BALANCEIsNull(const aValue: Boolean); + function GetBALANCEValue: String; + procedure SetBALANCEValue(const aValue: String); + function GetBALANCEIsNull: Boolean; + procedure SetBALANCEIsNull(const aValue: Boolean); function GetID_CUENTA_ESPECIALValue: Integer; procedure SetID_CUENTA_ESPECIALValue(const aValue: Integer); function GetID_CUENTA_ESPECIALIsNull: Boolean; procedure SetID_CUENTA_ESPECIALIsNull(const aValue: Boolean); + function GetCUENTA_ESPECIALValue: String; + procedure SetCUENTA_ESPECIALValue(const aValue: String); + function GetCUENTA_ESPECIALIsNull: Boolean; + procedure SetCUENTA_ESPECIALIsNull(const aValue: Boolean); { Properties } @@ -366,14 +386,20 @@ type property REF_CUENTAIsNull: Boolean read GetREF_CUENTAIsNull write SetREF_CUENTAIsNull; property ID_EJERCICIO: Integer read GetID_EJERCICIOValue write SetID_EJERCICIOValue; property ID_EJERCICIOIsNull: Boolean read GetID_EJERCICIOIsNull write SetID_EJERCICIOIsNull; - property ID_EPIGRAFE: Integer read GetID_EPIGRAFEValue write SetID_EPIGRAFEValue; - property ID_EPIGRAFEIsNull: Boolean read GetID_EPIGRAFEIsNull write SetID_EPIGRAFEIsNull; property DESCRIPCION: String read GetDESCRIPCIONValue write SetDESCRIPCIONValue; property DESCRIPCIONIsNull: Boolean read GetDESCRIPCIONIsNull write SetDESCRIPCIONIsNull; + property ID_EPIGRAFE: Integer read GetID_EPIGRAFEValue write SetID_EPIGRAFEValue; + property ID_EPIGRAFEIsNull: Boolean read GetID_EPIGRAFEIsNull write SetID_EPIGRAFEIsNull; + property EPIGRAFE: String read GetEPIGRAFEValue write SetEPIGRAFEValue; + property EPIGRAFEIsNull: Boolean read GetEPIGRAFEIsNull write SetEPIGRAFEIsNull; property ID_BALANCE: Integer read GetID_BALANCEValue write SetID_BALANCEValue; property ID_BALANCEIsNull: Boolean read GetID_BALANCEIsNull write SetID_BALANCEIsNull; + property BALANCE: String read GetBALANCEValue write SetBALANCEValue; + property BALANCEIsNull: Boolean read GetBALANCEIsNull write SetBALANCEIsNull; property ID_CUENTA_ESPECIAL: Integer read GetID_CUENTA_ESPECIALValue write SetID_CUENTA_ESPECIALValue; property ID_CUENTA_ESPECIALIsNull: Boolean read GetID_CUENTA_ESPECIALIsNull write SetID_CUENTA_ESPECIALIsNull; + property CUENTA_ESPECIAL: String read GetCUENTA_ESPECIALValue write SetCUENTA_ESPECIALValue; + property CUENTA_ESPECIALIsNull: Boolean read GetCUENTA_ESPECIALIsNull write SetCUENTA_ESPECIALIsNull; end; { TCuentasDataTableRules } @@ -393,22 +419,34 @@ type procedure SetID_EJERCICIOValue(const aValue: Integer); virtual; function GetID_EJERCICIOIsNull: Boolean; virtual; procedure SetID_EJERCICIOIsNull(const aValue: Boolean); virtual; - function GetID_EPIGRAFEValue: Integer; virtual; - procedure SetID_EPIGRAFEValue(const aValue: Integer); virtual; - function GetID_EPIGRAFEIsNull: Boolean; virtual; - procedure SetID_EPIGRAFEIsNull(const aValue: Boolean); virtual; function GetDESCRIPCIONValue: String; virtual; procedure SetDESCRIPCIONValue(const aValue: String); virtual; function GetDESCRIPCIONIsNull: Boolean; virtual; procedure SetDESCRIPCIONIsNull(const aValue: Boolean); virtual; + function GetID_EPIGRAFEValue: Integer; virtual; + procedure SetID_EPIGRAFEValue(const aValue: Integer); virtual; + function GetID_EPIGRAFEIsNull: Boolean; virtual; + procedure SetID_EPIGRAFEIsNull(const aValue: Boolean); virtual; + function GetEPIGRAFEValue: String; virtual; + procedure SetEPIGRAFEValue(const aValue: String); virtual; + function GetEPIGRAFEIsNull: Boolean; virtual; + procedure SetEPIGRAFEIsNull(const aValue: Boolean); virtual; function GetID_BALANCEValue: Integer; virtual; procedure SetID_BALANCEValue(const aValue: Integer); virtual; function GetID_BALANCEIsNull: Boolean; virtual; procedure SetID_BALANCEIsNull(const aValue: Boolean); virtual; + function GetBALANCEValue: String; virtual; + procedure SetBALANCEValue(const aValue: String); virtual; + function GetBALANCEIsNull: Boolean; virtual; + procedure SetBALANCEIsNull(const aValue: Boolean); virtual; function GetID_CUENTA_ESPECIALValue: Integer; virtual; procedure SetID_CUENTA_ESPECIALValue(const aValue: Integer); virtual; function GetID_CUENTA_ESPECIALIsNull: Boolean; virtual; procedure SetID_CUENTA_ESPECIALIsNull(const aValue: Boolean); virtual; + function GetCUENTA_ESPECIALValue: String; virtual; + procedure SetCUENTA_ESPECIALValue(const aValue: String); virtual; + function GetCUENTA_ESPECIALIsNull: Boolean; virtual; + procedure SetCUENTA_ESPECIALIsNull(const aValue: Boolean); virtual; { Properties } property ID: Integer read GetIDValue write SetIDValue; @@ -417,14 +455,20 @@ type property REF_CUENTAIsNull: Boolean read GetREF_CUENTAIsNull write SetREF_CUENTAIsNull; property ID_EJERCICIO: Integer read GetID_EJERCICIOValue write SetID_EJERCICIOValue; property ID_EJERCICIOIsNull: Boolean read GetID_EJERCICIOIsNull write SetID_EJERCICIOIsNull; - property ID_EPIGRAFE: Integer read GetID_EPIGRAFEValue write SetID_EPIGRAFEValue; - property ID_EPIGRAFEIsNull: Boolean read GetID_EPIGRAFEIsNull write SetID_EPIGRAFEIsNull; property DESCRIPCION: String read GetDESCRIPCIONValue write SetDESCRIPCIONValue; property DESCRIPCIONIsNull: Boolean read GetDESCRIPCIONIsNull write SetDESCRIPCIONIsNull; + property ID_EPIGRAFE: Integer read GetID_EPIGRAFEValue write SetID_EPIGRAFEValue; + property ID_EPIGRAFEIsNull: Boolean read GetID_EPIGRAFEIsNull write SetID_EPIGRAFEIsNull; + property EPIGRAFE: String read GetEPIGRAFEValue write SetEPIGRAFEValue; + property EPIGRAFEIsNull: Boolean read GetEPIGRAFEIsNull write SetEPIGRAFEIsNull; property ID_BALANCE: Integer read GetID_BALANCEValue write SetID_BALANCEValue; property ID_BALANCEIsNull: Boolean read GetID_BALANCEIsNull write SetID_BALANCEIsNull; + property BALANCE: String read GetBALANCEValue write SetBALANCEValue; + property BALANCEIsNull: Boolean read GetBALANCEIsNull write SetBALANCEIsNull; property ID_CUENTA_ESPECIAL: Integer read GetID_CUENTA_ESPECIALValue write SetID_CUENTA_ESPECIALValue; property ID_CUENTA_ESPECIALIsNull: Boolean read GetID_CUENTA_ESPECIALIsNull write SetID_CUENTA_ESPECIALIsNull; + property CUENTA_ESPECIAL: String read GetCUENTA_ESPECIALValue write SetCUENTA_ESPECIALValue; + property CUENTA_ESPECIALIsNull: Boolean read GetCUENTA_ESPECIALIsNull write SetCUENTA_ESPECIALIsNull; public constructor Create(aDataTable: TDADataTable); override; @@ -434,7 +478,7 @@ type { ICuentasEspeciales } ICuentasEspeciales = interface(IDAStronglyTypedDataTable) - ['{267A39E7-DD65-4417-B0EF-75BF2C13BB71}'] + ['{BD79A3DF-F270-4E7B-976E-2D213C63187C}'] { Property getters and setters } function GetIDValue: Integer; procedure SetIDValue(const aValue: Integer); @@ -493,7 +537,7 @@ type { IEpigrafes } IEpigrafes = interface(IDAStronglyTypedDataTable) - ['{1F851BD7-9C70-4A5E-B0E6-EF6918802C15}'] + ['{492FACBF-1168-496F-AE21-46479708E154}'] { Property getters and setters } function GetIDValue: Integer; procedure SetIDValue(const aValue: Integer); @@ -503,10 +547,6 @@ type procedure SetREF_EPIGRAFEValue(const aValue: String); function GetREF_EPIGRAFEIsNull: Boolean; procedure SetREF_EPIGRAFEIsNull(const aValue: Boolean); - function GetID_PADREValue: Integer; - procedure SetID_PADREValue(const aValue: Integer); - function GetID_PADREIsNull: Boolean; - procedure SetID_PADREIsNull(const aValue: Boolean); function GetDESCRIPCIONValue: String; procedure SetDESCRIPCIONValue(const aValue: String); function GetDESCRIPCIONIsNull: Boolean; @@ -515,6 +555,14 @@ type procedure SetID_EJERCICIOValue(const aValue: Integer); function GetID_EJERCICIOIsNull: Boolean; procedure SetID_EJERCICIOIsNull(const aValue: Boolean); + function GetID_PADREValue: Integer; + procedure SetID_PADREValue(const aValue: Integer); + function GetID_PADREIsNull: Boolean; + procedure SetID_PADREIsNull(const aValue: Boolean); + function GetEPIGRAFE_PADREValue: String; + procedure SetEPIGRAFE_PADREValue(const aValue: String); + function GetEPIGRAFE_PADREIsNull: Boolean; + procedure SetEPIGRAFE_PADREIsNull(const aValue: Boolean); { Properties } @@ -522,12 +570,14 @@ type property IDIsNull: Boolean read GetIDIsNull write SetIDIsNull; property REF_EPIGRAFE: String read GetREF_EPIGRAFEValue write SetREF_EPIGRAFEValue; property REF_EPIGRAFEIsNull: Boolean read GetREF_EPIGRAFEIsNull write SetREF_EPIGRAFEIsNull; - property ID_PADRE: Integer read GetID_PADREValue write SetID_PADREValue; - property ID_PADREIsNull: Boolean read GetID_PADREIsNull write SetID_PADREIsNull; property DESCRIPCION: String read GetDESCRIPCIONValue write SetDESCRIPCIONValue; property DESCRIPCIONIsNull: Boolean read GetDESCRIPCIONIsNull write SetDESCRIPCIONIsNull; property ID_EJERCICIO: Integer read GetID_EJERCICIOValue write SetID_EJERCICIOValue; property ID_EJERCICIOIsNull: Boolean read GetID_EJERCICIOIsNull write SetID_EJERCICIOIsNull; + property ID_PADRE: Integer read GetID_PADREValue write SetID_PADREValue; + property ID_PADREIsNull: Boolean read GetID_PADREIsNull write SetID_PADREIsNull; + property EPIGRAFE_PADRE: String read GetEPIGRAFE_PADREValue write SetEPIGRAFE_PADREValue; + property EPIGRAFE_PADREIsNull: Boolean read GetEPIGRAFE_PADREIsNull write SetEPIGRAFE_PADREIsNull; end; { TEpigrafesDataTableRules } @@ -543,10 +593,6 @@ type procedure SetREF_EPIGRAFEValue(const aValue: String); virtual; function GetREF_EPIGRAFEIsNull: Boolean; virtual; procedure SetREF_EPIGRAFEIsNull(const aValue: Boolean); virtual; - function GetID_PADREValue: Integer; virtual; - procedure SetID_PADREValue(const aValue: Integer); virtual; - function GetID_PADREIsNull: Boolean; virtual; - procedure SetID_PADREIsNull(const aValue: Boolean); virtual; function GetDESCRIPCIONValue: String; virtual; procedure SetDESCRIPCIONValue(const aValue: String); virtual; function GetDESCRIPCIONIsNull: Boolean; virtual; @@ -555,18 +601,28 @@ type procedure SetID_EJERCICIOValue(const aValue: Integer); virtual; function GetID_EJERCICIOIsNull: Boolean; virtual; procedure SetID_EJERCICIOIsNull(const aValue: Boolean); virtual; + function GetID_PADREValue: Integer; virtual; + procedure SetID_PADREValue(const aValue: Integer); virtual; + function GetID_PADREIsNull: Boolean; virtual; + procedure SetID_PADREIsNull(const aValue: Boolean); virtual; + function GetEPIGRAFE_PADREValue: String; virtual; + procedure SetEPIGRAFE_PADREValue(const aValue: String); virtual; + function GetEPIGRAFE_PADREIsNull: Boolean; virtual; + procedure SetEPIGRAFE_PADREIsNull(const aValue: Boolean); virtual; { Properties } property ID: Integer read GetIDValue write SetIDValue; property IDIsNull: Boolean read GetIDIsNull write SetIDIsNull; property REF_EPIGRAFE: String read GetREF_EPIGRAFEValue write SetREF_EPIGRAFEValue; property REF_EPIGRAFEIsNull: Boolean read GetREF_EPIGRAFEIsNull write SetREF_EPIGRAFEIsNull; - property ID_PADRE: Integer read GetID_PADREValue write SetID_PADREValue; - property ID_PADREIsNull: Boolean read GetID_PADREIsNull write SetID_PADREIsNull; property DESCRIPCION: String read GetDESCRIPCIONValue write SetDESCRIPCIONValue; property DESCRIPCIONIsNull: Boolean read GetDESCRIPCIONIsNull write SetDESCRIPCIONIsNull; property ID_EJERCICIO: Integer read GetID_EJERCICIOValue write SetID_EJERCICIOValue; property ID_EJERCICIOIsNull: Boolean read GetID_EJERCICIOIsNull write SetID_EJERCICIOIsNull; + property ID_PADRE: Integer read GetID_PADREValue write SetID_PADREValue; + property ID_PADREIsNull: Boolean read GetID_PADREIsNull write SetID_PADREIsNull; + property EPIGRAFE_PADRE: String read GetEPIGRAFE_PADREValue write SetEPIGRAFE_PADREValue; + property EPIGRAFE_PADREIsNull: Boolean read GetEPIGRAFE_PADREIsNull write SetEPIGRAFE_PADREIsNull; public constructor Create(aDataTable: TDADataTable); override; @@ -576,7 +632,7 @@ type { IBalances } IBalances = interface(IDAStronglyTypedDataTable) - ['{A661BDD9-9EAC-4ECA-906D-7361D8ABACA6}'] + ['{6C69EE1A-E481-42DA-81A1-573A98D95BF5}'] { Property getters and setters } function GetIDValue: Integer; procedure SetIDValue(const aValue: Integer); @@ -1080,6 +1136,27 @@ begin DataTable.Fields[idx_CuentasID_EJERCICIO].AsVariant := Null; end; +function TCuentasDataTableRules.GetDESCRIPCIONValue: String; +begin + result := DataTable.Fields[idx_CuentasDESCRIPCION].AsString; +end; + +procedure TCuentasDataTableRules.SetDESCRIPCIONValue(const aValue: String); +begin + DataTable.Fields[idx_CuentasDESCRIPCION].AsString := aValue; +end; + +function TCuentasDataTableRules.GetDESCRIPCIONIsNull: boolean; +begin + result := DataTable.Fields[idx_CuentasDESCRIPCION].IsNull; +end; + +procedure TCuentasDataTableRules.SetDESCRIPCIONIsNull(const aValue: Boolean); +begin + if aValue then + DataTable.Fields[idx_CuentasDESCRIPCION].AsVariant := Null; +end; + function TCuentasDataTableRules.GetID_EPIGRAFEValue: Integer; begin result := DataTable.Fields[idx_CuentasID_EPIGRAFE].AsInteger; @@ -1101,25 +1178,25 @@ begin DataTable.Fields[idx_CuentasID_EPIGRAFE].AsVariant := Null; end; -function TCuentasDataTableRules.GetDESCRIPCIONValue: String; +function TCuentasDataTableRules.GetEPIGRAFEValue: String; begin - result := DataTable.Fields[idx_CuentasDESCRIPCION].AsString; + result := DataTable.Fields[idx_CuentasEPIGRAFE].AsString; end; -procedure TCuentasDataTableRules.SetDESCRIPCIONValue(const aValue: String); +procedure TCuentasDataTableRules.SetEPIGRAFEValue(const aValue: String); begin - DataTable.Fields[idx_CuentasDESCRIPCION].AsString := aValue; + DataTable.Fields[idx_CuentasEPIGRAFE].AsString := aValue; end; -function TCuentasDataTableRules.GetDESCRIPCIONIsNull: boolean; +function TCuentasDataTableRules.GetEPIGRAFEIsNull: boolean; begin - result := DataTable.Fields[idx_CuentasDESCRIPCION].IsNull; + result := DataTable.Fields[idx_CuentasEPIGRAFE].IsNull; end; -procedure TCuentasDataTableRules.SetDESCRIPCIONIsNull(const aValue: Boolean); +procedure TCuentasDataTableRules.SetEPIGRAFEIsNull(const aValue: Boolean); begin if aValue then - DataTable.Fields[idx_CuentasDESCRIPCION].AsVariant := Null; + DataTable.Fields[idx_CuentasEPIGRAFE].AsVariant := Null; end; function TCuentasDataTableRules.GetID_BALANCEValue: Integer; @@ -1143,6 +1220,27 @@ begin DataTable.Fields[idx_CuentasID_BALANCE].AsVariant := Null; end; +function TCuentasDataTableRules.GetBALANCEValue: String; +begin + result := DataTable.Fields[idx_CuentasBALANCE].AsString; +end; + +procedure TCuentasDataTableRules.SetBALANCEValue(const aValue: String); +begin + DataTable.Fields[idx_CuentasBALANCE].AsString := aValue; +end; + +function TCuentasDataTableRules.GetBALANCEIsNull: boolean; +begin + result := DataTable.Fields[idx_CuentasBALANCE].IsNull; +end; + +procedure TCuentasDataTableRules.SetBALANCEIsNull(const aValue: Boolean); +begin + if aValue then + DataTable.Fields[idx_CuentasBALANCE].AsVariant := Null; +end; + function TCuentasDataTableRules.GetID_CUENTA_ESPECIALValue: Integer; begin result := DataTable.Fields[idx_CuentasID_CUENTA_ESPECIAL].AsInteger; @@ -1164,6 +1262,27 @@ begin DataTable.Fields[idx_CuentasID_CUENTA_ESPECIAL].AsVariant := Null; end; +function TCuentasDataTableRules.GetCUENTA_ESPECIALValue: String; +begin + result := DataTable.Fields[idx_CuentasCUENTA_ESPECIAL].AsString; +end; + +procedure TCuentasDataTableRules.SetCUENTA_ESPECIALValue(const aValue: String); +begin + DataTable.Fields[idx_CuentasCUENTA_ESPECIAL].AsString := aValue; +end; + +function TCuentasDataTableRules.GetCUENTA_ESPECIALIsNull: boolean; +begin + result := DataTable.Fields[idx_CuentasCUENTA_ESPECIAL].IsNull; +end; + +procedure TCuentasDataTableRules.SetCUENTA_ESPECIALIsNull(const aValue: Boolean); +begin + if aValue then + DataTable.Fields[idx_CuentasCUENTA_ESPECIAL].AsVariant := Null; +end; + { TCuentasEspecialesDataTableRules } constructor TCuentasEspecialesDataTableRules.Create(aDataTable: TDADataTable); @@ -1293,27 +1412,6 @@ begin DataTable.Fields[idx_EpigrafesREF_EPIGRAFE].AsVariant := Null; end; -function TEpigrafesDataTableRules.GetID_PADREValue: Integer; -begin - result := DataTable.Fields[idx_EpigrafesID_PADRE].AsInteger; -end; - -procedure TEpigrafesDataTableRules.SetID_PADREValue(const aValue: Integer); -begin - DataTable.Fields[idx_EpigrafesID_PADRE].AsInteger := aValue; -end; - -function TEpigrafesDataTableRules.GetID_PADREIsNull: boolean; -begin - result := DataTable.Fields[idx_EpigrafesID_PADRE].IsNull; -end; - -procedure TEpigrafesDataTableRules.SetID_PADREIsNull(const aValue: Boolean); -begin - if aValue then - DataTable.Fields[idx_EpigrafesID_PADRE].AsVariant := Null; -end; - function TEpigrafesDataTableRules.GetDESCRIPCIONValue: String; begin result := DataTable.Fields[idx_EpigrafesDESCRIPCION].AsString; @@ -1356,6 +1454,48 @@ begin DataTable.Fields[idx_EpigrafesID_EJERCICIO].AsVariant := Null; end; +function TEpigrafesDataTableRules.GetID_PADREValue: Integer; +begin + result := DataTable.Fields[idx_EpigrafesID_PADRE].AsInteger; +end; + +procedure TEpigrafesDataTableRules.SetID_PADREValue(const aValue: Integer); +begin + DataTable.Fields[idx_EpigrafesID_PADRE].AsInteger := aValue; +end; + +function TEpigrafesDataTableRules.GetID_PADREIsNull: boolean; +begin + result := DataTable.Fields[idx_EpigrafesID_PADRE].IsNull; +end; + +procedure TEpigrafesDataTableRules.SetID_PADREIsNull(const aValue: Boolean); +begin + if aValue then + DataTable.Fields[idx_EpigrafesID_PADRE].AsVariant := Null; +end; + +function TEpigrafesDataTableRules.GetEPIGRAFE_PADREValue: String; +begin + result := DataTable.Fields[idx_EpigrafesEPIGRAFE_PADRE].AsString; +end; + +procedure TEpigrafesDataTableRules.SetEPIGRAFE_PADREValue(const aValue: String); +begin + DataTable.Fields[idx_EpigrafesEPIGRAFE_PADRE].AsString := aValue; +end; + +function TEpigrafesDataTableRules.GetEPIGRAFE_PADREIsNull: boolean; +begin + result := DataTable.Fields[idx_EpigrafesEPIGRAFE_PADRE].IsNull; +end; + +procedure TEpigrafesDataTableRules.SetEPIGRAFE_PADREIsNull(const aValue: Boolean); +begin + if aValue then + DataTable.Fields[idx_EpigrafesEPIGRAFE_PADRE].AsVariant := Null; +end; + { TBalancesDataTableRules } constructor TBalancesDataTableRules.Create(aDataTable: TDADataTable); diff --git a/Source/Modulos/Contabilidad/Model/schContabilidadServer_Intf.pas b/Source/Modulos/Contabilidad/Model/schContabilidadServer_Intf.pas index 3165f1b5..de2088eb 100644 --- a/Source/Modulos/Contabilidad/Model/schContabilidadServer_Intf.pas +++ b/Source/Modulos/Contabilidad/Model/schContabilidadServer_Intf.pas @@ -9,17 +9,17 @@ const { Delta rules ids Feel free to change them to something more human readable but make sure they are unique in the context of your application } - RID_AsientosDelta = '{E5444D5F-9D7A-4EF7-A3EC-54E04047ABB8}'; - RID_SubCuentasDelta = '{06655A2F-ECFC-4984-B5EF-275E3B2F84E3}'; - RID_CuentasDelta = '{FB48551E-0531-4FC3-8494-51ABBA80938C}'; - RID_CuentasEspecialesDelta = '{4A7CF142-4CE5-41BE-863B-A4983EB6D7DC}'; - RID_EpigrafesDelta = '{691EBC10-A868-46C5-9EDF-8E55A27221D0}'; - RID_BalancesDelta = '{C6255FDC-F284-4F1F-9559-685B3FEE30A9}'; + RID_AsientosDelta = '{3CD8F764-C1CA-4895-BA19-D5BF1CB0BA2F}'; + RID_SubCuentasDelta = '{7150FC51-2186-49FF-9063-EC834D78B46A}'; + RID_CuentasDelta = '{11E761CB-D9B2-4C75-B43D-8239557C676B}'; + RID_CuentasEspecialesDelta = '{7C11832B-A8CD-4327-8BF6-6CD33196255E}'; + RID_EpigrafesDelta = '{E94C2735-B84B-4303-B214-1D5015499502}'; + RID_BalancesDelta = '{602255E6-AB54-4FA3-8924-48B151B7B756}'; type { IAsientosDelta } IAsientosDelta = interface(IAsientos) - ['{E5444D5F-9D7A-4EF7-A3EC-54E04047ABB8}'] + ['{3CD8F764-C1CA-4895-BA19-D5BF1CB0BA2F}'] { Property getters and setters } function GetOldIDValue : Integer; function GetOldID_ASIENTO_COMPENSADOValue : Integer; @@ -137,7 +137,7 @@ type { ISubCuentasDelta } ISubCuentasDelta = interface(ISubCuentas) - ['{06655A2F-ECFC-4984-B5EF-275E3B2F84E3}'] + ['{7150FC51-2186-49FF-9063-EC834D78B46A}'] { Property getters and setters } function GetOldIDValue : Integer; function GetOldREF_SUBCUENTAValue : String; @@ -219,24 +219,30 @@ type { ICuentasDelta } ICuentasDelta = interface(ICuentas) - ['{FB48551E-0531-4FC3-8494-51ABBA80938C}'] + ['{11E761CB-D9B2-4C75-B43D-8239557C676B}'] { Property getters and setters } function GetOldIDValue : Integer; function GetOldREF_CUENTAValue : String; function GetOldID_EJERCICIOValue : Integer; - function GetOldID_EPIGRAFEValue : Integer; function GetOldDESCRIPCIONValue : String; + function GetOldID_EPIGRAFEValue : Integer; + function GetOldEPIGRAFEValue : String; function GetOldID_BALANCEValue : Integer; + function GetOldBALANCEValue : String; function GetOldID_CUENTA_ESPECIALValue : Integer; + function GetOldCUENTA_ESPECIALValue : String; { Properties } property OldID : Integer read GetOldIDValue; property OldREF_CUENTA : String read GetOldREF_CUENTAValue; property OldID_EJERCICIO : Integer read GetOldID_EJERCICIOValue; - property OldID_EPIGRAFE : Integer read GetOldID_EPIGRAFEValue; property OldDESCRIPCION : String read GetOldDESCRIPCIONValue; + property OldID_EPIGRAFE : Integer read GetOldID_EPIGRAFEValue; + property OldEPIGRAFE : String read GetOldEPIGRAFEValue; property OldID_BALANCE : Integer read GetOldID_BALANCEValue; + property OldBALANCE : String read GetOldBALANCEValue; property OldID_CUENTA_ESPECIAL : Integer read GetOldID_CUENTA_ESPECIALValue; + property OldCUENTA_ESPECIAL : String read GetOldCUENTA_ESPECIALValue; end; { TCuentasBusinessProcessorRules } @@ -262,30 +268,48 @@ type function GetOldID_EJERCICIOIsNull: Boolean; virtual; procedure SetID_EJERCICIOValue(const aValue: Integer); virtual; procedure SetID_EJERCICIOIsNull(const aValue: Boolean); virtual; - function GetID_EPIGRAFEValue: Integer; virtual; - function GetID_EPIGRAFEIsNull: Boolean; virtual; - function GetOldID_EPIGRAFEValue: Integer; virtual; - function GetOldID_EPIGRAFEIsNull: Boolean; virtual; - procedure SetID_EPIGRAFEValue(const aValue: Integer); virtual; - procedure SetID_EPIGRAFEIsNull(const aValue: Boolean); virtual; function GetDESCRIPCIONValue: String; virtual; function GetDESCRIPCIONIsNull: Boolean; virtual; function GetOldDESCRIPCIONValue: String; virtual; function GetOldDESCRIPCIONIsNull: Boolean; virtual; procedure SetDESCRIPCIONValue(const aValue: String); virtual; procedure SetDESCRIPCIONIsNull(const aValue: Boolean); virtual; + function GetID_EPIGRAFEValue: Integer; virtual; + function GetID_EPIGRAFEIsNull: Boolean; virtual; + function GetOldID_EPIGRAFEValue: Integer; virtual; + function GetOldID_EPIGRAFEIsNull: Boolean; virtual; + procedure SetID_EPIGRAFEValue(const aValue: Integer); virtual; + procedure SetID_EPIGRAFEIsNull(const aValue: Boolean); virtual; + function GetEPIGRAFEValue: String; virtual; + function GetEPIGRAFEIsNull: Boolean; virtual; + function GetOldEPIGRAFEValue: String; virtual; + function GetOldEPIGRAFEIsNull: Boolean; virtual; + procedure SetEPIGRAFEValue(const aValue: String); virtual; + procedure SetEPIGRAFEIsNull(const aValue: Boolean); virtual; function GetID_BALANCEValue: Integer; virtual; function GetID_BALANCEIsNull: Boolean; virtual; function GetOldID_BALANCEValue: Integer; virtual; function GetOldID_BALANCEIsNull: Boolean; virtual; procedure SetID_BALANCEValue(const aValue: Integer); virtual; procedure SetID_BALANCEIsNull(const aValue: Boolean); virtual; + function GetBALANCEValue: String; virtual; + function GetBALANCEIsNull: Boolean; virtual; + function GetOldBALANCEValue: String; virtual; + function GetOldBALANCEIsNull: Boolean; virtual; + procedure SetBALANCEValue(const aValue: String); virtual; + procedure SetBALANCEIsNull(const aValue: Boolean); virtual; function GetID_CUENTA_ESPECIALValue: Integer; virtual; function GetID_CUENTA_ESPECIALIsNull: Boolean; virtual; function GetOldID_CUENTA_ESPECIALValue: Integer; virtual; function GetOldID_CUENTA_ESPECIALIsNull: Boolean; virtual; procedure SetID_CUENTA_ESPECIALValue(const aValue: Integer); virtual; procedure SetID_CUENTA_ESPECIALIsNull(const aValue: Boolean); virtual; + function GetCUENTA_ESPECIALValue: String; virtual; + function GetCUENTA_ESPECIALIsNull: Boolean; virtual; + function GetOldCUENTA_ESPECIALValue: String; virtual; + function GetOldCUENTA_ESPECIALIsNull: Boolean; virtual; + procedure SetCUENTA_ESPECIALValue(const aValue: String); virtual; + procedure SetCUENTA_ESPECIALIsNull(const aValue: Boolean); virtual; { Properties } property ID : Integer read GetIDValue write SetIDValue; @@ -300,22 +324,34 @@ type property ID_EJERCICIOIsNull : Boolean read GetID_EJERCICIOIsNull write SetID_EJERCICIOIsNull; property OldID_EJERCICIO : Integer read GetOldID_EJERCICIOValue; property OldID_EJERCICIOIsNull : Boolean read GetOldID_EJERCICIOIsNull; - property ID_EPIGRAFE : Integer read GetID_EPIGRAFEValue write SetID_EPIGRAFEValue; - property ID_EPIGRAFEIsNull : Boolean read GetID_EPIGRAFEIsNull write SetID_EPIGRAFEIsNull; - property OldID_EPIGRAFE : Integer read GetOldID_EPIGRAFEValue; - property OldID_EPIGRAFEIsNull : Boolean read GetOldID_EPIGRAFEIsNull; property DESCRIPCION : String read GetDESCRIPCIONValue write SetDESCRIPCIONValue; property DESCRIPCIONIsNull : Boolean read GetDESCRIPCIONIsNull write SetDESCRIPCIONIsNull; property OldDESCRIPCION : String read GetOldDESCRIPCIONValue; property OldDESCRIPCIONIsNull : Boolean read GetOldDESCRIPCIONIsNull; + property ID_EPIGRAFE : Integer read GetID_EPIGRAFEValue write SetID_EPIGRAFEValue; + property ID_EPIGRAFEIsNull : Boolean read GetID_EPIGRAFEIsNull write SetID_EPIGRAFEIsNull; + property OldID_EPIGRAFE : Integer read GetOldID_EPIGRAFEValue; + property OldID_EPIGRAFEIsNull : Boolean read GetOldID_EPIGRAFEIsNull; + property EPIGRAFE : String read GetEPIGRAFEValue write SetEPIGRAFEValue; + property EPIGRAFEIsNull : Boolean read GetEPIGRAFEIsNull write SetEPIGRAFEIsNull; + property OldEPIGRAFE : String read GetOldEPIGRAFEValue; + property OldEPIGRAFEIsNull : Boolean read GetOldEPIGRAFEIsNull; property ID_BALANCE : Integer read GetID_BALANCEValue write SetID_BALANCEValue; property ID_BALANCEIsNull : Boolean read GetID_BALANCEIsNull write SetID_BALANCEIsNull; property OldID_BALANCE : Integer read GetOldID_BALANCEValue; property OldID_BALANCEIsNull : Boolean read GetOldID_BALANCEIsNull; + property BALANCE : String read GetBALANCEValue write SetBALANCEValue; + property BALANCEIsNull : Boolean read GetBALANCEIsNull write SetBALANCEIsNull; + property OldBALANCE : String read GetOldBALANCEValue; + property OldBALANCEIsNull : Boolean read GetOldBALANCEIsNull; property ID_CUENTA_ESPECIAL : Integer read GetID_CUENTA_ESPECIALValue write SetID_CUENTA_ESPECIALValue; property ID_CUENTA_ESPECIALIsNull : Boolean read GetID_CUENTA_ESPECIALIsNull write SetID_CUENTA_ESPECIALIsNull; property OldID_CUENTA_ESPECIAL : Integer read GetOldID_CUENTA_ESPECIALValue; property OldID_CUENTA_ESPECIALIsNull : Boolean read GetOldID_CUENTA_ESPECIALIsNull; + property CUENTA_ESPECIAL : String read GetCUENTA_ESPECIALValue write SetCUENTA_ESPECIALValue; + property CUENTA_ESPECIALIsNull : Boolean read GetCUENTA_ESPECIALIsNull write SetCUENTA_ESPECIALIsNull; + property OldCUENTA_ESPECIAL : String read GetOldCUENTA_ESPECIALValue; + property OldCUENTA_ESPECIALIsNull : Boolean read GetOldCUENTA_ESPECIALIsNull; public constructor Create(aBusinessProcessor: TDABusinessProcessor); override; @@ -325,7 +361,7 @@ type { ICuentasEspecialesDelta } ICuentasEspecialesDelta = interface(ICuentasEspeciales) - ['{4A7CF142-4CE5-41BE-863B-A4983EB6D7DC}'] + ['{7C11832B-A8CD-4327-8BF6-6CD33196255E}'] { Property getters and setters } function GetOldIDValue : Integer; function GetOldREFERENCIAValue : String; @@ -383,20 +419,22 @@ type { IEpigrafesDelta } IEpigrafesDelta = interface(IEpigrafes) - ['{691EBC10-A868-46C5-9EDF-8E55A27221D0}'] + ['{E94C2735-B84B-4303-B214-1D5015499502}'] { Property getters and setters } function GetOldIDValue : Integer; function GetOldREF_EPIGRAFEValue : String; - function GetOldID_PADREValue : Integer; function GetOldDESCRIPCIONValue : String; function GetOldID_EJERCICIOValue : Integer; + function GetOldID_PADREValue : Integer; + function GetOldEPIGRAFE_PADREValue : String; { Properties } property OldID : Integer read GetOldIDValue; property OldREF_EPIGRAFE : String read GetOldREF_EPIGRAFEValue; - property OldID_PADRE : Integer read GetOldID_PADREValue; property OldDESCRIPCION : String read GetOldDESCRIPCIONValue; property OldID_EJERCICIO : Integer read GetOldID_EJERCICIOValue; + property OldID_PADRE : Integer read GetOldID_PADREValue; + property OldEPIGRAFE_PADRE : String read GetOldEPIGRAFE_PADREValue; end; { TEpigrafesBusinessProcessorRules } @@ -416,12 +454,6 @@ type function GetOldREF_EPIGRAFEIsNull: Boolean; virtual; procedure SetREF_EPIGRAFEValue(const aValue: String); virtual; procedure SetREF_EPIGRAFEIsNull(const aValue: Boolean); virtual; - function GetID_PADREValue: Integer; virtual; - function GetID_PADREIsNull: Boolean; virtual; - function GetOldID_PADREValue: Integer; virtual; - function GetOldID_PADREIsNull: Boolean; virtual; - procedure SetID_PADREValue(const aValue: Integer); virtual; - procedure SetID_PADREIsNull(const aValue: Boolean); virtual; function GetDESCRIPCIONValue: String; virtual; function GetDESCRIPCIONIsNull: Boolean; virtual; function GetOldDESCRIPCIONValue: String; virtual; @@ -434,6 +466,18 @@ type function GetOldID_EJERCICIOIsNull: Boolean; virtual; procedure SetID_EJERCICIOValue(const aValue: Integer); virtual; procedure SetID_EJERCICIOIsNull(const aValue: Boolean); virtual; + function GetID_PADREValue: Integer; virtual; + function GetID_PADREIsNull: Boolean; virtual; + function GetOldID_PADREValue: Integer; virtual; + function GetOldID_PADREIsNull: Boolean; virtual; + procedure SetID_PADREValue(const aValue: Integer); virtual; + procedure SetID_PADREIsNull(const aValue: Boolean); virtual; + function GetEPIGRAFE_PADREValue: String; virtual; + function GetEPIGRAFE_PADREIsNull: Boolean; virtual; + function GetOldEPIGRAFE_PADREValue: String; virtual; + function GetOldEPIGRAFE_PADREIsNull: Boolean; virtual; + procedure SetEPIGRAFE_PADREValue(const aValue: String); virtual; + procedure SetEPIGRAFE_PADREIsNull(const aValue: Boolean); virtual; { Properties } property ID : Integer read GetIDValue write SetIDValue; @@ -444,10 +488,6 @@ type property REF_EPIGRAFEIsNull : Boolean read GetREF_EPIGRAFEIsNull write SetREF_EPIGRAFEIsNull; property OldREF_EPIGRAFE : String read GetOldREF_EPIGRAFEValue; property OldREF_EPIGRAFEIsNull : Boolean read GetOldREF_EPIGRAFEIsNull; - property ID_PADRE : Integer read GetID_PADREValue write SetID_PADREValue; - property ID_PADREIsNull : Boolean read GetID_PADREIsNull write SetID_PADREIsNull; - property OldID_PADRE : Integer read GetOldID_PADREValue; - property OldID_PADREIsNull : Boolean read GetOldID_PADREIsNull; property DESCRIPCION : String read GetDESCRIPCIONValue write SetDESCRIPCIONValue; property DESCRIPCIONIsNull : Boolean read GetDESCRIPCIONIsNull write SetDESCRIPCIONIsNull; property OldDESCRIPCION : String read GetOldDESCRIPCIONValue; @@ -456,6 +496,14 @@ type property ID_EJERCICIOIsNull : Boolean read GetID_EJERCICIOIsNull write SetID_EJERCICIOIsNull; property OldID_EJERCICIO : Integer read GetOldID_EJERCICIOValue; property OldID_EJERCICIOIsNull : Boolean read GetOldID_EJERCICIOIsNull; + property ID_PADRE : Integer read GetID_PADREValue write SetID_PADREValue; + property ID_PADREIsNull : Boolean read GetID_PADREIsNull write SetID_PADREIsNull; + property OldID_PADRE : Integer read GetOldID_PADREValue; + property OldID_PADREIsNull : Boolean read GetOldID_PADREIsNull; + property EPIGRAFE_PADRE : String read GetEPIGRAFE_PADREValue write SetEPIGRAFE_PADREValue; + property EPIGRAFE_PADREIsNull : Boolean read GetEPIGRAFE_PADREIsNull write SetEPIGRAFE_PADREIsNull; + property OldEPIGRAFE_PADRE : String read GetOldEPIGRAFE_PADREValue; + property OldEPIGRAFE_PADREIsNull : Boolean read GetOldEPIGRAFE_PADREIsNull; public constructor Create(aBusinessProcessor: TDABusinessProcessor); override; @@ -465,7 +513,7 @@ type { IBalancesDelta } IBalancesDelta = interface(IBalances) - ['{C6255FDC-F284-4F1F-9559-685B3FEE30A9}'] + ['{602255E6-AB54-4FA3-8924-48B151B7B756}'] { Property getters and setters } function GetOldIDValue : Integer; function GetOldREF_BALANCEValue : String; @@ -1129,6 +1177,37 @@ begin BusinessProcessor.CurrentChange.NewValueByName[fld_CuentasID_EJERCICIO] := Null; end; +function TCuentasBusinessProcessorRules.GetDESCRIPCIONValue: String; +begin + result := BusinessProcessor.CurrentChange.NewValueByName[fld_CuentasDESCRIPCION]; +end; + +function TCuentasBusinessProcessorRules.GetDESCRIPCIONIsNull: Boolean; +begin + result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_CuentasDESCRIPCION]); +end; + +function TCuentasBusinessProcessorRules.GetOldDESCRIPCIONValue: String; +begin + result := BusinessProcessor.CurrentChange.OldValueByName[fld_CuentasDESCRIPCION]; +end; + +function TCuentasBusinessProcessorRules.GetOldDESCRIPCIONIsNull: Boolean; +begin + result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_CuentasDESCRIPCION]); +end; + +procedure TCuentasBusinessProcessorRules.SetDESCRIPCIONValue(const aValue: String); +begin + BusinessProcessor.CurrentChange.NewValueByName[fld_CuentasDESCRIPCION] := aValue; +end; + +procedure TCuentasBusinessProcessorRules.SetDESCRIPCIONIsNull(const aValue: Boolean); +begin + if aValue then + BusinessProcessor.CurrentChange.NewValueByName[fld_CuentasDESCRIPCION] := Null; +end; + function TCuentasBusinessProcessorRules.GetID_EPIGRAFEValue: Integer; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_CuentasID_EPIGRAFE]; @@ -1160,35 +1239,35 @@ begin BusinessProcessor.CurrentChange.NewValueByName[fld_CuentasID_EPIGRAFE] := Null; end; -function TCuentasBusinessProcessorRules.GetDESCRIPCIONValue: String; +function TCuentasBusinessProcessorRules.GetEPIGRAFEValue: String; begin - result := BusinessProcessor.CurrentChange.NewValueByName[fld_CuentasDESCRIPCION]; + result := BusinessProcessor.CurrentChange.NewValueByName[fld_CuentasEPIGRAFE]; end; -function TCuentasBusinessProcessorRules.GetDESCRIPCIONIsNull: Boolean; +function TCuentasBusinessProcessorRules.GetEPIGRAFEIsNull: Boolean; begin - result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_CuentasDESCRIPCION]); + result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_CuentasEPIGRAFE]); end; -function TCuentasBusinessProcessorRules.GetOldDESCRIPCIONValue: String; +function TCuentasBusinessProcessorRules.GetOldEPIGRAFEValue: String; begin - result := BusinessProcessor.CurrentChange.OldValueByName[fld_CuentasDESCRIPCION]; + result := BusinessProcessor.CurrentChange.OldValueByName[fld_CuentasEPIGRAFE]; end; -function TCuentasBusinessProcessorRules.GetOldDESCRIPCIONIsNull: Boolean; +function TCuentasBusinessProcessorRules.GetOldEPIGRAFEIsNull: Boolean; begin - result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_CuentasDESCRIPCION]); + result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_CuentasEPIGRAFE]); end; -procedure TCuentasBusinessProcessorRules.SetDESCRIPCIONValue(const aValue: String); +procedure TCuentasBusinessProcessorRules.SetEPIGRAFEValue(const aValue: String); begin - BusinessProcessor.CurrentChange.NewValueByName[fld_CuentasDESCRIPCION] := aValue; + BusinessProcessor.CurrentChange.NewValueByName[fld_CuentasEPIGRAFE] := aValue; end; -procedure TCuentasBusinessProcessorRules.SetDESCRIPCIONIsNull(const aValue: Boolean); +procedure TCuentasBusinessProcessorRules.SetEPIGRAFEIsNull(const aValue: Boolean); begin if aValue then - BusinessProcessor.CurrentChange.NewValueByName[fld_CuentasDESCRIPCION] := Null; + BusinessProcessor.CurrentChange.NewValueByName[fld_CuentasEPIGRAFE] := Null; end; function TCuentasBusinessProcessorRules.GetID_BALANCEValue: Integer; @@ -1222,6 +1301,37 @@ begin BusinessProcessor.CurrentChange.NewValueByName[fld_CuentasID_BALANCE] := Null; end; +function TCuentasBusinessProcessorRules.GetBALANCEValue: String; +begin + result := BusinessProcessor.CurrentChange.NewValueByName[fld_CuentasBALANCE]; +end; + +function TCuentasBusinessProcessorRules.GetBALANCEIsNull: Boolean; +begin + result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_CuentasBALANCE]); +end; + +function TCuentasBusinessProcessorRules.GetOldBALANCEValue: String; +begin + result := BusinessProcessor.CurrentChange.OldValueByName[fld_CuentasBALANCE]; +end; + +function TCuentasBusinessProcessorRules.GetOldBALANCEIsNull: Boolean; +begin + result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_CuentasBALANCE]); +end; + +procedure TCuentasBusinessProcessorRules.SetBALANCEValue(const aValue: String); +begin + BusinessProcessor.CurrentChange.NewValueByName[fld_CuentasBALANCE] := aValue; +end; + +procedure TCuentasBusinessProcessorRules.SetBALANCEIsNull(const aValue: Boolean); +begin + if aValue then + BusinessProcessor.CurrentChange.NewValueByName[fld_CuentasBALANCE] := Null; +end; + function TCuentasBusinessProcessorRules.GetID_CUENTA_ESPECIALValue: Integer; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_CuentasID_CUENTA_ESPECIAL]; @@ -1253,6 +1363,37 @@ begin BusinessProcessor.CurrentChange.NewValueByName[fld_CuentasID_CUENTA_ESPECIAL] := Null; end; +function TCuentasBusinessProcessorRules.GetCUENTA_ESPECIALValue: String; +begin + result := BusinessProcessor.CurrentChange.NewValueByName[fld_CuentasCUENTA_ESPECIAL]; +end; + +function TCuentasBusinessProcessorRules.GetCUENTA_ESPECIALIsNull: Boolean; +begin + result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_CuentasCUENTA_ESPECIAL]); +end; + +function TCuentasBusinessProcessorRules.GetOldCUENTA_ESPECIALValue: String; +begin + result := BusinessProcessor.CurrentChange.OldValueByName[fld_CuentasCUENTA_ESPECIAL]; +end; + +function TCuentasBusinessProcessorRules.GetOldCUENTA_ESPECIALIsNull: Boolean; +begin + result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_CuentasCUENTA_ESPECIAL]); +end; + +procedure TCuentasBusinessProcessorRules.SetCUENTA_ESPECIALValue(const aValue: String); +begin + BusinessProcessor.CurrentChange.NewValueByName[fld_CuentasCUENTA_ESPECIAL] := aValue; +end; + +procedure TCuentasBusinessProcessorRules.SetCUENTA_ESPECIALIsNull(const aValue: Boolean); +begin + if aValue then + BusinessProcessor.CurrentChange.NewValueByName[fld_CuentasCUENTA_ESPECIAL] := Null; +end; + { TCuentasEspecialesBusinessProcessorRules } constructor TCuentasEspecialesBusinessProcessorRules.Create(aBusinessProcessor: TDABusinessProcessor); @@ -1432,37 +1573,6 @@ begin BusinessProcessor.CurrentChange.NewValueByName[fld_EpigrafesREF_EPIGRAFE] := Null; end; -function TEpigrafesBusinessProcessorRules.GetID_PADREValue: Integer; -begin - result := BusinessProcessor.CurrentChange.NewValueByName[fld_EpigrafesID_PADRE]; -end; - -function TEpigrafesBusinessProcessorRules.GetID_PADREIsNull: Boolean; -begin - result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_EpigrafesID_PADRE]); -end; - -function TEpigrafesBusinessProcessorRules.GetOldID_PADREValue: Integer; -begin - result := BusinessProcessor.CurrentChange.OldValueByName[fld_EpigrafesID_PADRE]; -end; - -function TEpigrafesBusinessProcessorRules.GetOldID_PADREIsNull: Boolean; -begin - result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_EpigrafesID_PADRE]); -end; - -procedure TEpigrafesBusinessProcessorRules.SetID_PADREValue(const aValue: Integer); -begin - BusinessProcessor.CurrentChange.NewValueByName[fld_EpigrafesID_PADRE] := aValue; -end; - -procedure TEpigrafesBusinessProcessorRules.SetID_PADREIsNull(const aValue: Boolean); -begin - if aValue then - BusinessProcessor.CurrentChange.NewValueByName[fld_EpigrafesID_PADRE] := Null; -end; - function TEpigrafesBusinessProcessorRules.GetDESCRIPCIONValue: String; begin result := BusinessProcessor.CurrentChange.NewValueByName[fld_EpigrafesDESCRIPCION]; @@ -1525,6 +1635,68 @@ begin BusinessProcessor.CurrentChange.NewValueByName[fld_EpigrafesID_EJERCICIO] := Null; end; +function TEpigrafesBusinessProcessorRules.GetID_PADREValue: Integer; +begin + result := BusinessProcessor.CurrentChange.NewValueByName[fld_EpigrafesID_PADRE]; +end; + +function TEpigrafesBusinessProcessorRules.GetID_PADREIsNull: Boolean; +begin + result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_EpigrafesID_PADRE]); +end; + +function TEpigrafesBusinessProcessorRules.GetOldID_PADREValue: Integer; +begin + result := BusinessProcessor.CurrentChange.OldValueByName[fld_EpigrafesID_PADRE]; +end; + +function TEpigrafesBusinessProcessorRules.GetOldID_PADREIsNull: Boolean; +begin + result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_EpigrafesID_PADRE]); +end; + +procedure TEpigrafesBusinessProcessorRules.SetID_PADREValue(const aValue: Integer); +begin + BusinessProcessor.CurrentChange.NewValueByName[fld_EpigrafesID_PADRE] := aValue; +end; + +procedure TEpigrafesBusinessProcessorRules.SetID_PADREIsNull(const aValue: Boolean); +begin + if aValue then + BusinessProcessor.CurrentChange.NewValueByName[fld_EpigrafesID_PADRE] := Null; +end; + +function TEpigrafesBusinessProcessorRules.GetEPIGRAFE_PADREValue: String; +begin + result := BusinessProcessor.CurrentChange.NewValueByName[fld_EpigrafesEPIGRAFE_PADRE]; +end; + +function TEpigrafesBusinessProcessorRules.GetEPIGRAFE_PADREIsNull: Boolean; +begin + result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_EpigrafesEPIGRAFE_PADRE]); +end; + +function TEpigrafesBusinessProcessorRules.GetOldEPIGRAFE_PADREValue: String; +begin + result := BusinessProcessor.CurrentChange.OldValueByName[fld_EpigrafesEPIGRAFE_PADRE]; +end; + +function TEpigrafesBusinessProcessorRules.GetOldEPIGRAFE_PADREIsNull: Boolean; +begin + result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_EpigrafesEPIGRAFE_PADRE]); +end; + +procedure TEpigrafesBusinessProcessorRules.SetEPIGRAFE_PADREValue(const aValue: String); +begin + BusinessProcessor.CurrentChange.NewValueByName[fld_EpigrafesEPIGRAFE_PADRE] := aValue; +end; + +procedure TEpigrafesBusinessProcessorRules.SetEPIGRAFE_PADREIsNull(const aValue: Boolean); +begin + if aValue then + BusinessProcessor.CurrentChange.NewValueByName[fld_EpigrafesEPIGRAFE_PADRE] := Null; +end; + { TBalancesBusinessProcessorRules } constructor TBalancesBusinessProcessorRules.Create(aBusinessProcessor: TDABusinessProcessor); diff --git a/Source/Modulos/Contabilidad/Model/uBizBalances.pas b/Source/Modulos/Contabilidad/Model/uBizBalances.pas index ee8da630..65662a04 100644 --- a/Source/Modulos/Contabilidad/Model/uBizBalances.pas +++ b/Source/Modulos/Contabilidad/Model/uBizBalances.pas @@ -3,7 +3,7 @@ unit uBizBalances; interface uses - uDAInterfaces, uDADataTable, schContabilidadClient_Intf; + uDAInterfaces, uDADataTable, uDBSelectionListUtils, schContabilidadClient_Intf; const BIZ_CLIENT_Balance = 'Client.Balance'; @@ -14,10 +14,17 @@ type function EsNuevo : Boolean; end; - TBizBalance = class(TBalancesDataTableRules, IBizBalance) + TBizBalance = class(TBalancesDataTableRules, IBizBalance, ISeleccionable) protected + FSeleccionableInterface : ISeleccionable; procedure OnNewRecord(Sender: TDADataTable); override; public + property SeleccionableInterface : ISeleccionable read FSeleccionableInterface + write FSeleccionableInterface implements ISeleccionable; + + constructor Create(aDataTable: TDADataTable); override; + destructor Destroy; override; + procedure IniciarValoresBalanceNueva; function EsNuevo : Boolean; end; @@ -29,6 +36,18 @@ implementation uses SysUtils, uDataTableUtils; +constructor TBizBalance.Create(aDataTable: TDADataTable); +begin + inherited; + FSeleccionableInterface := TSeleccionable.Create(aDataTable); +end; + +destructor TBizBalance.Destroy; +begin + FSeleccionableInterface := NIL; + inherited; +end; + function TBizBalance.EsNuevo: Boolean; begin Result := (ID < 0); diff --git a/Source/Modulos/Contabilidad/Model/uBizCuentas.pas b/Source/Modulos/Contabilidad/Model/uBizCuentas.pas index a4156fdd..cf3bbb36 100644 --- a/Source/Modulos/Contabilidad/Model/uBizCuentas.pas +++ b/Source/Modulos/Contabilidad/Model/uBizCuentas.pas @@ -3,7 +3,7 @@ unit uBizCuentas; interface uses - uDAInterfaces, uDADataTable, schContabilidadClient_Intf; + uDAInterfaces, uDADataTable, uDBSelectionListUtils, schContabilidadClient_Intf; const BIZ_CLIENT_Cuenta = 'Client.Cuenta'; @@ -14,10 +14,17 @@ type function EsNuevo : Boolean; end; - TBizCuenta = class(TCuentasDataTableRules, IBizCuenta) + TBizCuenta = class(TCuentasDataTableRules, IBizCuenta, ISeleccionable) protected + FSeleccionableInterface: ISeleccionable; procedure OnNewRecord(Sender: TDADataTable); override; public + property SeleccionableInterface : ISeleccionable read FSeleccionableInterface + write FSeleccionableInterface implements ISeleccionable; + + constructor Create(aDataTable: TDADataTable); override; + destructor Destroy; override; + procedure IniciarValoresCuentaNueva; function EsNuevo : Boolean; end; @@ -29,6 +36,18 @@ implementation uses SysUtils, uDataTableUtils, uFactuGES_App; +constructor TBizCuenta.Create(aDataTable: TDADataTable); +begin + inherited; + FSeleccionableInterface := TSeleccionable.Create(aDataTable); +end; + +destructor TBizCuenta.Destroy; +begin + FSeleccionableInterface := NIL; + inherited; +end; + function TBizCuenta.EsNuevo: Boolean; begin Result := (ID < 0); diff --git a/Source/Modulos/Contabilidad/Model/uBizCuentasEspeciales.pas b/Source/Modulos/Contabilidad/Model/uBizCuentasEspeciales.pas index 221236d0..05fecd16 100644 --- a/Source/Modulos/Contabilidad/Model/uBizCuentasEspeciales.pas +++ b/Source/Modulos/Contabilidad/Model/uBizCuentasEspeciales.pas @@ -3,7 +3,7 @@ unit uBizCuentasEspeciales; interface uses - uDAInterfaces, uDADataTable, schContabilidadClient_Intf; + uDAInterfaces, uDADataTable, uDBSelectionListUtils, schContabilidadClient_Intf; const BIZ_CLIENT_CuentaEspecial = 'Client.CuentaEspecial'; @@ -14,10 +14,17 @@ type function EsNuevo : Boolean; end; - TBizCuentaEspecial = class(TCuentasEspecialesDataTableRules, IBizCuentaEspecial) + TBizCuentaEspecial = class(TCuentasEspecialesDataTableRules, IBizCuentaEspecial, ISeleccionable) protected + FSeleccionableInterface : ISeleccionable; procedure OnNewRecord(Sender: TDADataTable); override; public + property SeleccionableInterface : ISeleccionable read FSeleccionableInterface + write FSeleccionableInterface implements ISeleccionable; + + constructor Create(aDataTable: TDADataTable); override; + destructor Destroy; override; + procedure IniciarValoresCuentaEspecialNueva; function EsNuevo : Boolean; end; @@ -29,6 +36,18 @@ implementation uses SysUtils, uDataTableUtils; +constructor TBizCuentaEspecial.Create(aDataTable: TDADataTable); +begin + inherited; + FSeleccionableInterface := TSeleccionable.Create(aDataTable); +end; + +destructor TBizCuentaEspecial.Destroy; +begin + FSeleccionableInterface := NIL; + inherited; +end; + function TBizCuentaEspecial.EsNuevo: Boolean; begin Result := (ID < 0); diff --git a/Source/Modulos/Contabilidad/Model/uBizEpigrafes.pas b/Source/Modulos/Contabilidad/Model/uBizEpigrafes.pas index 67756ae2..3e6f4a28 100644 --- a/Source/Modulos/Contabilidad/Model/uBizEpigrafes.pas +++ b/Source/Modulos/Contabilidad/Model/uBizEpigrafes.pas @@ -3,7 +3,7 @@ unit uBizEpigrafes; interface uses - uDAInterfaces, uDADataTable, schContabilidadClient_Intf; + uDAInterfaces, uDADataTable, uDBSelectionListUtils, schContabilidadClient_Intf; const BIZ_CLIENT_Epigrafe = 'Client.Epigrafe'; @@ -14,10 +14,17 @@ type function EsNuevo : Boolean; end; - TBizEpigrafe = class(TEpigrafesDataTableRules, IBizEpigrafe) + TBizEpigrafe = class(TEpigrafesDataTableRules, IBizEpigrafe, ISeleccionable) protected + FSeleccionableInterface : ISeleccionable; procedure OnNewRecord(Sender: TDADataTable); override; public + property SeleccionableInterface : ISeleccionable read FSeleccionableInterface + write FSeleccionableInterface implements ISeleccionable; + + constructor Create(aDataTable: TDADataTable); override; + destructor Destroy; override; + procedure IniciarValoresEpigrafeNueva; function EsNuevo : Boolean; end; @@ -29,6 +36,18 @@ implementation uses SysUtils, uDataTableUtils, uFactuGES_App; +constructor TBizEpigrafe.Create(aDataTable: TDADataTable); +begin + inherited; + FSeleccionableInterface := TSeleccionable.Create(aDataTable); +end; + +destructor TBizEpigrafe.Destroy; +begin + FSeleccionableInterface := NIL; + inherited; +end; + function TBizEpigrafe.EsNuevo: Boolean; begin Result := (ID < 0); diff --git a/Source/Modulos/Contabilidad/Servidor/srvContabilidad_Impl.dfm b/Source/Modulos/Contabilidad/Servidor/srvContabilidad_Impl.dfm index 8fcc13d7..35e19e7f 100644 --- a/Source/Modulos/Contabilidad/Servidor/srvContabilidad_Impl.dfm +++ b/Source/Modulos/Contabilidad/Servidor/srvContabilidad_Impl.dfm @@ -7,7 +7,7 @@ object srvContabilidad: TsrvContabilidad ExportedDataTables = <> BeforeAcquireConnection = DataAbstractServiceBeforeAcquireConnection Height = 181 - Width = 282 + Width = 331 object Diagrams: TDADiagrams Left = 150 Top = 90 @@ -21,7 +21,7 @@ object srvContabilidad: TsrvContabilidad item Name = 'Ejercicios_ID' DataType = datAutoInc - GeneratorName = 'GEN_CONT_BALANCES_ID' + GeneratorName = 'GEN_CONT_EJERCICIOS_ID' Required = True DisplayLabel = 'ID' ServerAutoRefresh = True @@ -69,6 +69,7 @@ object srvContabilidad: TsrvContabilidad item Name = 'Epigrafes_ID' DataType = datAutoInc + GeneratorName = 'GEN_CONT_EPIGRAFES_ID' Required = True ServerAutoRefresh = True end @@ -203,6 +204,26 @@ object srvContabilidad: TsrvContabilidad item Name = 'Asientos_HABER' DataType = datCurrency + end + item + Name = 'Epigrafes_EPIGRAFE_PADRE' + DataType = datString + Size = 255 + end + item + Name = 'Cuentas_EPIGRAFE' + DataType = datString + Size = 255 + end + item + Name = 'Cuentas_BALANCE' + DataType = datString + Size = 255 + end + item + Name = 'Cuentas_CUENTA_ESPECIAL' + DataType = datString + Size = 255 end> Left = 150 Top = 24 @@ -374,7 +395,7 @@ object srvContabilidad: TsrvContabilidad Connection = 'IBX' ConnectionType = 'Interbase' Default = True - TargetTable = 'CONT_CUENTAS' + TargetTable = 'V_CONT_CUENTAS' Name = 'IBX' StatementType = stAutoSQL ColumnMappings = < @@ -390,21 +411,33 @@ object srvContabilidad: TsrvContabilidad DatasetField = 'ID_EJERCICIO' TableField = 'ID_EJERCICIO' end + item + DatasetField = 'DESCRIPCION' + TableField = 'DESCRIPCION' + end item DatasetField = 'ID_EPIGRAFE' TableField = 'ID_EPIGRAFE' end item - DatasetField = 'DESCRIPCION' - TableField = 'DESCRIPCION' + DatasetField = 'EPIGRAFE' + TableField = 'EPIGRAFE' end item DatasetField = 'ID_BALANCE' TableField = 'ID_BALANCE' end + item + DatasetField = 'BALANCE' + TableField = 'BALANCE' + end item DatasetField = 'ID_CUENTA_ESPECIAL' TableField = 'ID_CUENTA_ESPECIAL' + end + item + DatasetField = 'CUENTA_ESPECIAL' + TableField = 'CUENTA_ESPECIAL' end> end> Name = 'Cuentas' @@ -428,26 +461,44 @@ object srvContabilidad: TsrvContabilidad DataType = datInteger DictionaryEntry = 'Cuentas_ID_EJERCICIO' end + item + Name = 'DESCRIPCION' + DataType = datString + Size = 255 + DictionaryEntry = 'Cuentas_DESCRIPCION' + end item Name = 'ID_EPIGRAFE' DataType = datInteger DictionaryEntry = 'Cuentas_ID_EPIGRAFE' end item - Name = 'DESCRIPCION' + Name = 'EPIGRAFE' DataType = datString Size = 255 - DictionaryEntry = 'Cuentas_DESCRIPCION' + DictionaryEntry = 'Cuentas_EPIGRAFE' end item Name = 'ID_BALANCE' DataType = datInteger DictionaryEntry = 'Cuentas_ID_BALANCE' end + item + Name = 'BALANCE' + DataType = datString + Size = 255 + DictionaryEntry = 'Cuentas_BALANCE' + end item Name = 'ID_CUENTA_ESPECIAL' DataType = datInteger DictionaryEntry = 'Cuentas_ID_CUENTA_ESPECIAL' + end + item + Name = 'CUENTA_ESPECIAL' + DataType = datString + Size = 255 + DictionaryEntry = 'Cuentas_CUENTA_ESPECIAL' end> end item @@ -503,7 +554,7 @@ object srvContabilidad: TsrvContabilidad Connection = 'IBX' ConnectionType = 'Interbase' Default = True - TargetTable = 'CONT_EPIGRAFES' + TargetTable = 'V_CONT_EPIGRAFES' Name = 'IBX' StatementType = stAutoSQL ColumnMappings = < @@ -515,10 +566,6 @@ object srvContabilidad: TsrvContabilidad DatasetField = 'REF_EPIGRAFE' TableField = 'REF_EPIGRAFE' end - item - DatasetField = 'ID_PADRE' - TableField = 'ID_PADRE' - end item DatasetField = 'DESCRIPCION' TableField = 'DESCRIPCION' @@ -526,6 +573,14 @@ object srvContabilidad: TsrvContabilidad item DatasetField = 'ID_EJERCICIO' TableField = 'ID_EJERCICIO' + end + item + DatasetField = 'ID_PADRE' + TableField = 'ID_PADRE' + end + item + DatasetField = 'EPIGRAFE_PADRE' + TableField = 'EPIGRAFE_PADRE' end> end> Name = 'Epigrafes' @@ -534,8 +589,8 @@ object srvContabilidad: TsrvContabilidad Name = 'ID' DataType = datAutoInc GeneratorName = 'GEN_CONT_EPIGRAFES_ID' - Required = True ServerAutoRefresh = True + DictionaryEntry = 'Epigrafes_ID' InPrimaryKey = True end item @@ -544,11 +599,6 @@ object srvContabilidad: TsrvContabilidad Size = 6 DictionaryEntry = 'Epigrafes_REF_EPIGRAFE' end - item - Name = 'ID_PADRE' - DataType = datInteger - DictionaryEntry = 'Epigrafes_ID_PADRE' - end item Name = 'DESCRIPCION' DataType = datString @@ -559,6 +609,17 @@ object srvContabilidad: TsrvContabilidad Name = 'ID_EJERCICIO' DataType = datInteger DictionaryEntry = 'Epigrafes_ID_EJERCICIO' + end + item + Name = 'ID_PADRE' + DataType = datInteger + DictionaryEntry = 'Epigrafes_ID_PADRE' + end + item + Name = 'EPIGRAFE_PADRE' + DataType = datString + Size = 255 + DictionaryEntry = 'Epigrafes_EPIGRAFE_PADRE' end> end item @@ -611,7 +672,7 @@ object srvContabilidad: TsrvContabilidad item Name = 'ID' DataType = datAutoInc - GeneratorName = 'GEN_CONT_BALANCES_ID' + GeneratorName = 'GEN_CONT_EJERCICIOS_ID' ServerAutoRefresh = True DictionaryEntry = 'Ejercicios_ID' InPrimaryKey = True @@ -667,7 +728,223 @@ object srvContabilidad: TsrvContabilidad end> JoinDataTables = <> UnionDataTables = <> - Commands = <> + Commands = < + item + Params = < + item + Name = 'ID' + DataType = datAutoInc + GeneratorName = 'GEN_CONT_EPIGRAFES_ID' + Value = '' + end + item + Name = 'REF_EPIGRAFE' + Value = '' + end + item + Name = 'DESCRIPCION' + Value = '' + end + item + Name = 'ID_EJERCICIO' + Value = '' + end + item + Name = 'ID_PADRE' + Value = '' + end> + Statements = < + item + Connection = 'IBX' + ConnectionType = 'Interbase' + Default = True + TargetTable = 'CONT_EPIGRAFES' + SQL = + 'INSERT'#10' INTO CONT_EPIGRAFES'#10' (ID, REF_EPIGRAFE, DESCRIPCION,' + + ' ID_EJERCICIO, ID_PADRE)'#10' VALUES'#10' (:ID, :REF_EPIGRAFE, :DESC' + + 'RIPCION, :ID_EJERCICIO, :ID_PADRE)'#10 + StatementType = stSQL + ColumnMappings = <> + end> + Name = 'Insert_Epigrafes' + end + item + Params = < + item + Name = 'OLD_ID' + Value = '' + end> + Statements = < + item + Connection = 'IBX' + ConnectionType = 'Interbase' + Default = True + TargetTable = 'CONT_EPIGRAFES' + SQL = 'DELETE '#10' FROM'#10' CONT_EPIGRAFES'#10' WHERE'#10' (ID = :OLD_ID)'#10 + StatementType = stSQL + ColumnMappings = <> + end> + Name = 'Delete_Epigrafes' + end + item + Params = < + item + Name = 'ID' + Value = '' + end + item + Name = 'REF_EPIGRAFE' + Value = '' + end + item + Name = 'DESCRIPCION' + Value = '' + end + item + Name = 'ID_EJERCICIO' + Value = '' + end + item + Name = 'ID_PADRE' + Value = '' + end + item + Name = 'OLD_ID' + Value = '' + end> + Statements = < + item + Connection = 'IBX' + ConnectionType = 'Interbase' + Default = True + TargetTable = 'CONT_EPIGRAFES' + SQL = + 'UPDATE CONT_EPIGRAFES'#10' SET '#10' ID = :ID,'#10' REF_EPIGRAFE = :R' + + 'EF_EPIGRAFE, '#10' DESCRIPCION = :DESCRIPCION, '#10' ID_EJERCICIO ' + + '= :ID_EJERCICIO, '#10' ID_PADRE = :ID_PADRE'#10' WHERE'#10' (ID = :OL' + + 'D_ID)'#10 + StatementType = stSQL + ColumnMappings = <> + end> + Name = 'Update_Epigrafes' + end + item + Params = < + item + Name = 'ID' + DataType = datAutoInc + GeneratorName = 'GEN_CONT_CUENTAS_ID' + Value = '' + end + item + Name = 'REF_CUENTA' + Value = '' + end + item + Name = 'ID_EJERCICIO' + Value = '' + end + item + Name = 'DESCRIPCION' + Value = '' + end + item + Name = 'ID_EPIGRAFE' + Value = '' + end + item + Name = 'ID_BALANCE' + Value = '' + end + item + Name = 'ID_CUENTA_ESPECIAL' + Value = '' + end> + Statements = < + item + Connection = 'IBX' + ConnectionType = 'Interbase' + Default = True + TargetTable = 'CONT_CUENTAS' + SQL = + 'INSERT'#10' INTO CONT_CUENTAS'#10' (ID, REF_CUENTA, ID_EJERCICIO, DE' + + 'SCRIPCION, ID_EPIGRAFE,'#10' ID_BALANCE, ID_CUENTA_ESPECIAL)'#10' V' + + 'ALUES'#10' (:ID, :REF_CUENTA, :ID_EJERCICIO, :DESCRIPCION, :ID_EP' + + 'IGRAFE,'#10' :ID_BALANCE, :ID_CUENTA_ESPECIAL)'#10 + StatementType = stSQL + ColumnMappings = <> + end> + Name = 'Insert_Cuentas' + end + item + Params = < + item + Name = 'OLD_ID' + Value = '' + end> + Statements = < + item + Connection = 'IBX' + ConnectionType = 'Interbase' + Default = True + TargetTable = 'CONT_CUENTAS' + SQL = 'DELETE '#10' FROM'#10' CONT_CUENTAS'#10' WHERE'#10' (ID = :OLD_ID)'#10 + StatementType = stSQL + ColumnMappings = <> + end> + Name = 'Delete_Cuentas' + end + item + Params = < + item + Name = 'ID' + Value = '' + end + item + Name = 'REF_CUENTA' + Value = '' + end + item + Name = 'ID_EJERCICIO' + Value = '' + end + item + Name = 'DESCRIPCION' + Value = '' + end + item + Name = 'ID_EPIGRAFE' + Value = '' + end + item + Name = 'ID_BALANCE' + Value = '' + end + item + Name = 'ID_CUENTA_ESPECIAL' + Value = '' + end + item + Name = 'OLD_ID' + Value = '' + end> + Statements = < + item + Connection = 'IBX' + ConnectionType = 'Interbase' + Default = True + TargetTable = 'CONT_CUENTAS' + SQL = + 'UPDATE CONT_CUENTAS'#10' SET '#10' ID = :ID,'#10' REF_CUENTA = :REF_C' + + 'UENTA, '#10' ID_EJERCICIO = :ID_EJERCICIO, '#10' DESCRIPCION = :DE' + + 'SCRIPCION, '#10' ID_EPIGRAFE = :ID_EPIGRAFE, '#10' ID_BALANCE = :I' + + 'D_BALANCE,'#10' ID_CUENTA_ESPECIAL = :ID_CUENTA_ESPECIAL'#10' WHERE'#10 + + ' (ID = :OLD_ID)'#10 + StatementType = stSQL + ColumnMappings = <> + end> + Name = 'Update_Cuentas' + end> RelationShips = <> UpdateRules = <> Version = 0 @@ -678,4 +955,26 @@ object srvContabilidad: TsrvContabilidad Left = 48 Top = 88 end + object bpEpigrafes: TDABusinessProcessor + Schema = schContabilidad + InsertCommandName = 'Insert_Epigrafes' + DeleteCommandName = 'Delete_Epigrafes' + UpdateCommandName = 'Update_Epigrafes' + ReferencedDataset = 'Epigrafes' + ProcessorOptions = [poPrepareCommands] + UpdateMode = updWhereKeyOnly + Left = 248 + Top = 24 + end + object bpCuentas: TDABusinessProcessor + Schema = schContabilidad + InsertCommandName = 'Insert_Cuentas' + DeleteCommandName = 'Delete_Cuentas' + UpdateCommandName = 'Update_Cuentas' + ReferencedDataset = 'Cuentas' + ProcessorOptions = [poPrepareCommands] + UpdateMode = updWhereKeyOnly + Left = 248 + Top = 80 + end end diff --git a/Source/Modulos/Contabilidad/Servidor/srvContabilidad_Impl.pas b/Source/Modulos/Contabilidad/Servidor/srvContabilidad_Impl.pas index 12781b30..d8930c0b 100644 --- a/Source/Modulos/Contabilidad/Servidor/srvContabilidad_Impl.pas +++ b/Source/Modulos/Contabilidad/Servidor/srvContabilidad_Impl.pas @@ -23,6 +23,8 @@ type TsrvContabilidad = class(TDataAbstractService, IsrvContabilidad) Diagrams: TDADiagrams; Bin2DataStreamer: TDABin2DataStreamer; + bpEpigrafes: TDABusinessProcessor; + bpCuentas: TDABusinessProcessor; schContabilidad: TDASchema; DataDictionary: TDADataDictionary; procedure DARemoteServiceCreate(Sender: TObject); diff --git a/Source/Modulos/Contabilidad/Views/Contabilidad_view.dpk b/Source/Modulos/Contabilidad/Views/Contabilidad_view.dpk index 3a51d85e..33cb12c4 100644 --- a/Source/Modulos/Contabilidad/Views/Contabilidad_view.dpk +++ b/Source/Modulos/Contabilidad/Views/Contabilidad_view.dpk @@ -98,6 +98,10 @@ contains uViewSubCuentas in 'uViewSubCuentas.pas' {frViewSubCuentas: TFrame}, uEditorSubCuentas in 'uEditorSubCuentas.pas' {fEditorSubCuentas: TfEditorEjercicios}, uEditorSubCuenta in 'uEditorSubCuenta.pas' {fEditorSubCuenta: TfEditorEjercicios}, - uEditorElegirEpigrafes in 'uEditorElegirEpigrafes.pas' {fEditorElegirEpigrafes: TfEditorElegirEpigrafes}; + uEditorElegirEpigrafes in 'uEditorElegirEpigrafes.pas' {fEditorElegirEpigrafes: TfEditorEjercicios}, + uViewBalances in 'uViewBalances.pas' {frViewBalances: TFrame}, + uEditorElegirBalances in 'uEditorElegirBalances.pas' {fEditorElegirBalances: TfEditorEjercicios}, + uViewCuentasEspeciales in 'uViewCuentasEspeciales.pas' {frViewCuentasEspeciales: TFrame}, + uEditorElegirCuentasEspeciales in 'uEditorElegirCuentasEspeciales.pas' {fEditorElegirCuentasEspeciales: TfEditorElegirCuentasEspeciales}; end. diff --git a/Source/Modulos/Contabilidad/Views/Contabilidad_view.dproj b/Source/Modulos/Contabilidad/Views/Contabilidad_view.dproj index 5cd41c35..45c221c5 100644 --- a/Source/Modulos/Contabilidad/Views/Contabilidad_view.dproj +++ b/Source/Modulos/Contabilidad/Views/Contabilidad_view.dproj @@ -122,6 +122,14 @@
fEditorCuentasEspeciales
TfEditorEjercicios
+ +
fEditorElegirBalances
+ TfEditorEjercicios +
+ +
fEditorElegirCuentasEspeciales
+ TfEditorEjercicios +
fEditorElegirEpigrafes
TfEditorEjercicios @@ -142,6 +150,10 @@
fEditorSubCuentas
TfEditorEjercicios
+ +
frViewBalances
+ TFrame +
frViewCuenta
TFrame @@ -150,6 +162,10 @@
frViewCuentas
TFrame
+ +
frViewCuentasEspeciales
+ TFrame +
frViewEpigrafe
TFrame diff --git a/Source/Modulos/Contabilidad/Views/uContabilidadViewRegister.pas b/Source/Modulos/Contabilidad/Views/uContabilidadViewRegister.pas index 51846bb3..74072292 100644 --- a/Source/Modulos/Contabilidad/Views/uContabilidadViewRegister.pas +++ b/Source/Modulos/Contabilidad/Views/uContabilidadViewRegister.pas @@ -8,7 +8,8 @@ procedure UnregisterViews; implementation uses - uEditorRegistryUtils, uEditorBalance, uEditorBalances, uEditorCuentaEspecial, uEditorCuentasEspeciales, + uEditorRegistryUtils, uEditorBalance, uEditorBalances, uEditorElegirBalances, + uEditorCuentaEspecial, uEditorCuentasEspeciales, uEditorElegirCuentasEspeciales, uEditorEpigrafe, uEditorElegirEpigrafes, uEditorEpigrafes, uEditorCuenta, uEditorCuentas, uEditorSubCuenta, uEditorSubCuentas; @@ -17,8 +18,10 @@ procedure RegisterViews; begin EditorRegistry.RegisterClass(TfEditorBalances, 'EditorBalances'); EditorRegistry.RegisterClass(TfEditorBalance, 'EditorBalance'); + EditorRegistry.RegisterClass(TfEditorElegirBalances, 'EditorElegirBalances'); EditorRegistry.RegisterClass(TfEditorCuentasEspeciales, 'EditorCuentasEspeciales'); EditorRegistry.RegisterClass(TfEditorCuentaEspecial, 'EditorCuentaEspecial'); + EditorRegistry.RegisterClass(TfEditorElegirCuentasEspeciales, 'EditorElegirCuentasEspeciales'); EditorRegistry.RegisterClass(TfEditorEpigrafes, 'EditorEpigrafes'); EditorRegistry.RegisterClass(TfEditorEpigrafe, 'EditorEpigrafe'); EditorRegistry.RegisterClass(TfEditorElegirEpigrafes, 'EditorElegirEpigrafes'); @@ -32,8 +35,10 @@ procedure UnregisterViews; begin EditorRegistry.UnRegisterClass(TfEditorBalances); EditorRegistry.UnRegisterClass(TfEditorBalance); + EditorRegistry.UnRegisterClass(TfEditorElegirBalances); EditorRegistry.UnRegisterClass(TfEditorCuentasEspeciales); EditorRegistry.UnRegisterClass(TfEditorCuentaEspecial); + EditorRegistry.UnRegisterClass(TfEditorElegirCuentasEspeciales); EditorRegistry.UnRegisterClass(TfEditorEpigrafes); EditorRegistry.UnRegisterClass(TfEditorEpigrafe); EditorRegistry.UnRegisterClass(TfEditorElegirEpigrafes); diff --git a/Source/Modulos/Contabilidad/Views/uEditorBalances.dfm b/Source/Modulos/Contabilidad/Views/uEditorBalances.dfm index ed080d89..fe21b3ca 100644 --- a/Source/Modulos/Contabilidad/Views/uEditorBalances.dfm +++ b/Source/Modulos/Contabilidad/Views/uEditorBalances.dfm @@ -1,177 +1,1496 @@ -object fEditorBalances: TfEditorBalances - Left = 453 - Top = 234 - BorderIcons = [biSystemMenu] - BorderStyle = bsSingle +inherited fEditorBalances: TfEditorBalances + Left = 489 + Top = 325 Caption = 'Lista de balances' - ClientHeight = 406 - ClientWidth = 959 - Color = clBtnFace - Font.Charset = DEFAULT_CHARSET - Font.Color = clWindowText - Font.Height = -11 - Font.Name = 'MS Sans Serif' - Font.Style = [] - OldCreateOrder = False - Position = poScreenCenter - OnShow = FormShow + ExplicitHeight = 471 PixelsPerInch = 96 TextHeight = 13 - object bAceptar: TButton - Left = 236 - Top = 373 - Width = 75 - Height = 23 - Action = actAceptar - Default = True - TabOrder = 1 + inherited JvNavPanelHeader: TJvNavPanelHeader + Caption = 'Lista de cuentas' + inherited Image1: TImage + Picture.Data = { + 0A54504E474F626A65637489504E470D0A1A0A0000000D494844520000001800 + 0000180806000000E0773DF80000000970485973000017120000171201679FD2 + 520000000467414D410000B18E7CFB5193000001D44944415478DAB5D4BD4B02 + 7118C0F1E737D552D0105843616F838519166551345443A32D2E0DD15863FF41 + 6B2141353544144A2004114144431695841445D00BE950E7905618742F2257CF + D9D9EFCE3BEF4EF001797E9CFAFD1C8A125114A19C43648010A2F98205AF5D7C + 611296C3FE33961802189F5909C13B1383EFF427B05FB94738B40976BB0DC6E7 + 56FEAE7D289EF7EF3E422010280E941ADF589E8754A3AF3820C7F10DA9D798A5 + 785D8D0D6EAB87F5013A8E81D46BDC521C471750C731F0CEC44DC55B1B9A41E0 + 0510848C36B038D15410C7F3C1FAB261BCABC3998BF31969472B070A81D97E52 + D20F62D0E381CCEF5DF3129043CE494F21B03445C4B1D169C360369B95223C27 + C0D17E181CCE36E963A19163C1551A40C731747274019DDDED529C460EBF1CD6 + 01751CCF91D328F40DBA81653905B2976CB10668C5715F5DDEC2D088473AD3C8 + 0ED3681ED08BE3BEBBB997001C1AD98ED79B038AC5F14E9FEE9FF3008D6C3DD4 + 1A03EA38FBCDE501FE6F332F090520236BD755C5013A22A8367D3DF9962C0056 + 2315100C06FFFF21D480D938EE743AAD00E4389E3581E1A149D371FC0E388ECD + 03745C17F0F4FA4CC77164401DD705DC2EAFE9B80CE03FA73AAE0B9C733EB03A + 5A714DA05C5376E00756B52DFEBD3C9AE50000000049454E44AE426082} + end end - object bCancelar: TButton - Left = 321 - Top = 373 - Width = 75 - Height = 23 - Action = actCancelar - Cancel = True - TabOrder = 2 + inherited TBXDock: TTBXDock + inherited tbxMain: TTBXToolbar + ExplicitWidth = 474 + end + inherited tbxFiltro: TTBXToolbar + ExplicitWidth = 269 + inherited tbxEditFiltro: TTBXEditItem + EditOptions = [tboUseEditWhenVertical] + end + inherited TBXItem37: TTBXItem + Visible = False + end + end + inherited TBXTMain2: TTBXToolbar + Left = 275 + DockPos = 275 + ExplicitLeft = 275 + end end - object PageControl1: TPageControl + inline frViewBalances1: TfrViewBalances [3] Left = 0 - Top = 0 - Width = 959 - Height = 406 - ActivePage = TabSheet1 + Top = 102 + Width = 543 + Height = 323 Align = alClient - TabOrder = 0 - ExplicitWidth = 573 - object TabSheet1: TTabSheet - Caption = 'Balances' - ExplicitWidth = 565 - object Label1: TLabel - Left = 6 - Top = 12 - Width = 138 - Height = 13 - Caption = 'Lista de balances disponibles' - end - object bEliminar: TButton - Left = 853 - Top = 90 - Width = 95 - Height = 23 - Action = actEliminar - TabOrder = 0 - end - object bAnadir: TButton - Left = 853 - Top = 31 - Width = 95 - Height = 23 - Action = actAnadir - TabOrder = 1 - end - object Button1: TButton - Left = 853 - Top = 61 - Width = 95 - Height = 23 - Action = actModificar - TabOrder = 2 - end - object ListaBalances: TDBGrid - Left = 3 - Top = 31 - Width = 844 - Height = 289 - DataSource = dsBalances - Options = [dgTitles, dgColumnResize, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgCancelOnExit] - TabOrder = 3 - TitleFont.Charset = DEFAULT_CHARSET - TitleFont.Color = clWindowText - TitleFont.Height = -11 - TitleFont.Name = 'MS Sans Serif' - TitleFont.Style = [] - Columns = < + Font.Charset = DEFAULT_CHARSET + Font.Color = clWindowText + Font.Height = -11 + Font.Name = 'Tahoma' + Font.Style = [] + ParentFont = False + TabOrder = 3 + ReadOnly = False + ExplicitLeft = -11 + ExplicitTop = -150 + inherited cxGrid: TcxGrid + Width = 543 + Height = 195 + inherited cxGridView: TcxGridDBTableView + DataController.Summary.FooterSummaryItems = < item - Expanded = False - FieldName = 'REF_BALANCE' - Title.Caption = 'Referencia' - Width = 110 - Visible = True - end - item - Expanded = False - FieldName = 'NATURALEZA' - Title.Caption = 'Descripci'#243'n' - Width = 154 - Visible = True - end - item - Expanded = False - FieldName = 'NIVEL1' - Visible = True - end - item - Expanded = False - FieldName = 'DESCRIPCION1' - Visible = True - end - item - Expanded = False - FieldName = 'NIVEL2' - Visible = True - end - item - Expanded = False - FieldName = 'DESCRIPCION2' - Visible = True - end - item - Expanded = False - FieldName = 'NIVEL3' - Visible = True - end - item - Expanded = False - FieldName = 'DESCRIPCION3' - Visible = True + Format = '0 ejercicios' + Kind = skCount + Column = frViewBalances1.cxGridViewNATURALEZA end> + inherited cxGridViewID: TcxGridDBColumn + IsCaptionAssigned = True + end + end + end + inherited frViewFiltroBase1: TfrViewFiltroBase + Width = 543 + inherited TBXDockablePanel1: TTBXDockablePanel + inherited dxLayoutControl1: TdxLayoutControl + Width = 543 + inherited txtFiltroTodo: TcxTextEdit + ExplicitWidth = 273 + Width = 273 + end + inherited edtFechaIniFiltro: TcxDateEdit + ExplicitWidth = 121 + Width = 121 + end + inherited edtFechaFinFiltro: TcxDateEdit + Left = 337 + ExplicitLeft = 337 + ExplicitWidth = 121 + Width = 121 + end + end + inherited TBXAlignmentPanel1: TTBXAlignmentPanel + Width = 543 + inherited tbxBotones: TTBXToolbar + Width = 533 + end + end + end + end + inherited pnlAgrupaciones: TTBXDockablePanel + Top = 297 + inherited TBXAlignmentPanel1: TTBXAlignmentPanel + Width = 543 + inherited TBXToolbar1: TTBXToolbar + Width = 533 + end + end + end + inherited dxComponentPrinter: TdxComponentPrinter + inherited dxComponentPrinterLink: TdxGridReportLink + ReportDocument.CreationDate = 39422.603399155090000000 + BuiltInReportLink = True + end + end + inherited cxViewGridPopupMenu: TcxGridPopupMenu + PopupMenus = < + item + GridView = frViewBalances1.cxGridView + HitTypes = [gvhtCell] + Index = 0 + end> + end + inherited dxPrintStyleManager1: TdxPrintStyleManager + inherited dxPrintStyleManager1Style1: TdxPSPrintStyle + BuiltInStyle = True end end end - object ActionList1: TActionList - Left = 144 - Top = 16 - object actAnadir: TAction - Caption = '&A'#241'adir...' - OnExecute = actAnadirExecute - OnUpdate = actAnadirUpdate - end - object actEliminar: TAction - Caption = '&Eliminar' - OnExecute = actEliminarExecute - OnUpdate = actEliminarUpdate - end - object actAceptar: TAction - Caption = 'A&ceptar' - OnExecute = actAceptarExecute - end - object actCancelar: TAction - Caption = '&Cancelar' - OnExecute = actCancelarExecute - end - object actCerrar: TAction - Caption = 'actCerrar' - OnExecute = actCerrarExecute - end - object actModificar: TAction - Caption = '&Modificar...' - OnExecute = actModificarExecute - OnUpdate = actModificarUpdate + inherited EditorActionList: TActionList [4] + inherited actNuevo: TAction + ImageIndex = 22 end end - object dsBalances: TDADataSource - Left = 168 - Top = 16 + inherited SmallImages: TPngImageList [5] + PngImages = < + item + PngImage.Data = { + 89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF + 610000000774494D45000000000000000973942E000000097048597300001712 + 0000171201679FD252000001754944415478DA6364C001D6ECBE900CA4E640B9 + 2921AE0673B1A963C4A739C8598FE1DB8FDF0C33966C67505054C06A08232ECD + 3EF6BA0C250B7F315C7FF88F6179E15F86456BF76135841197CD79737F324C4E + E1008BF345BC63B833959561F13A4C4318D13507BBE833E4CEF9C160ACC1C290 + 60C30296734D5FCD70F2A333564318B1D90CD20C02D72E9C04D33C92A60CAFDF + FF6358B8E71B86218CE87E866986D90E738186A92FC397EF0C0C6B8FA21A0232 + E03FBACD5FBEFF07E30A3F36B801323ABE0C3F7FFF67F8FE938161EFC5EF7043 + C00678586B32F8B7FD61887167836BFEF59B81A12E186180A8BA0F58F3E76FFF + 194EDDFE0136A07DDA1AB001C90FEE3F98131BE4C4A092FD9BA12A8A07AC19E4 + 67582C800CE051F0C1D06C636994020F44902171214E0CCA99BF19E25DB8E09A + 91C301161330CDE040448E46649764D85C473160C6114D0CCD581312B221CEFA + 9C589D8D3521E13204047069C69B99608680002ECD380D4036E4C98B77383583 + 000005100EB8572466A60000000049454E44AE426082} + Name = 'PngImage1' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF + 610000000970485973000017120000171201679FD252000001074944415478DA + 63FCFFFF3F032580912A06303232E2543079D1766F201505C520B02C37CE331A + C400EBC5670054F3960057330631617E0690B2F357EF336CDA7786A1B5289211 + AF01C89A254505183E7FFDC1F0F5DB0F06311101A021F7184E5DBA733927D643 + 0FAB01E89ADF7EF802D6FCF5FB4F866F406CA6AFC21095DBC6B06C7215238601 + C4689EB27807C3B153E7300D2056F38B371F18B62EDA79EDFCF9F9DA700348D4 + CC70E1C2024420022548D68C128D40C906A0E67A5234631860A6A752AF202346 + B466740396C2521AD020B0A49EA622C39C95BB716AC64889C0405C0A541C2501 + 4C2830804F33D6A40C8A09A0A62DF7EEDD03F3AF1FB98D372301A39191E2DC08 + 0029AC32F01825AACD0000000049454E44AE426082} + Name = 'PngImage2' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF + 610000000970485973000017120000171201679FD252000001514944415478DA + 635CB5E3DC7F062C20CCC388918108C0083220D4DD104570F5CEF30CEDFDB319 + CEEF9C4ED0109C06D818AB3278C7941134046E40CBAA0760819A3005B80B6000 + 9F21182EF8F1F30F10FF86E05F7F1882926B883300E60264C0C1805D5F69B802 + 238601E836FF04E2CDA7BF339484C9A368EE59F59261D9C1BB0CE7A75933C20D + F0B4D56698B0E5195617601AF09021DA4998C1297307C38D35A18C60031CCDD4 + C036FF84DAFCE7EF3F307DF0FA7FB001112D57C09A57D4E8800D98BBFA346A18 + 58EA2BC235C39C0FC2671EB0A2B8E0DBCF7F0C5F7FFE05E27F60B65DE26C8801 + 7316ADC11A58AEFE69282E4009C8284506F7F4B90C781349F7CA07FF4106A0DB + FCFD171003E980BCF9840D48F5916148EFBB8E2197EC2BCB1059B290B001512E + 92609BC1B602F1EF3FFFC1F437204EAE5A4CD8007F5B71B8E66F480681407AED + 12C20674CCDE884F0903000B1A00979E81F9710000000049454E44AE426082} + Name = 'PngImage3' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF + 61000000097048597300000E9C00000E9C01079453DD000002574944415478DA + 63FCFFFF3F03258011D9004646468696696B17FFFECAD0DE581A7C0D596155CF + 0AF77F7FFFD975944755A3E8413760EA929DAF393938D62785D8A7C1C48BBB17 + 711BABAB5C7AF9F6FDDFC2446F354206BC75B6D4E35ABCFE90536B49F87190F8 + E4853B2779DA1BE46EDE7FE62ED00015BC06F4CFDBBA24CACF26FAD0A99B5B42 + BDCC7C6BFA563B057B986FFDFDE72FC7D20D072B26D62574E235A0A26DA999B0 + 98E0F2607713F9251B8E85692A4B5698E9AB9AAEDA7EE2DEBB571F3DDAAB226F + E33500044A3B979507B898B6BF78F3FEA3B1B612FF992BF7FF1F3975336E425D + CC52903C4103EAEBEB5998450D8FAA2A889BC94888306CD977664D675964284C + 1D0103EA99F8DDF50C8CD439E3FFFE67CB7DFFE9DB1F7E3E9EC637DF5977DC98 + B3E73C0343E33F9C0670B8AC555292175BC8F6FF9BEEDF6FEF995E7DF8F95941 + 55EDE5AB17AFBEFCFAC7C2F1ECC5FBEF0C4C4C89FF0F47DDC36A8056F2A103FF + DEDEE465FBFFB5F1D577EECB8C8CFFF72AAA6A7CFFF4F842CED54D7907184CE7 + 4631B0B227FC3F1AE38AD5008D981DDFD9BEDE48BABCA1703983DE226E09891F + D754B4756F7DBC7FBAEFF286BCED0C32BD9C0CB222B7FF1F8B93C16A805ED2EE + D74CEFAF445FDC50B48BC172858E34DFFB6582B2DAFB38BEDCFC7166456A0583 + CE0471063EA103FF8FC66A623540C063F55669B6E747AE3DE3E861E5E158A9C8 + FBF1D1FD6F628BF4147977FC7A79D3E3F2736E39060E9E84FF47A202B0C782ED + 627356C6FF935998FEB349737FB9FE95E975F2F32D8DDF98EC9647B1FCFF55F0 + EB1FD31FA08EC2FF87634F6235801C0000382740F0DFD997BD0000000049454E + 44AE426082} + Name = 'PngImage4' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF + 61000000097048597300000AEB00000AEB01828B0D5A000002854944415478DA + A5935D48536118C7FFAFDB8CCD557E7F34B33167F9119617A91596495D781304 + 451021A651362821B1ABA49B6EA4460961D88542055D84DD6545415992174994 + 9625CC8F9C329D9B5F3BE9CED9D9797BCEA1C932A3A0079EC3CBE13CBFE7FF7F + 9FF330CE39FE2798FAB80BA4E61559EB2551E67B07279AE8D51FA98F2CC99546 + 031A3D6E5FF329993F631D80B52227A6D7929F9BAEA459D1D73BE8DC3330D6B8 + 1AD206641414DA5A6224E1E8ECA47779660955D532EF642F1371BD74331A14FA + 9C27A4439F5D88777DAE1B65FD230D11485786B9363D65FD35C1EB4B9817427E + 9F80C335C05BD53E23B2A934132FB23662B71406C2B14698F38AF0E9EB9473E8 + E3C8655BD686D6F858A5DA3F27B04511E37E0195B5C0A00AD6003FE5259758F0 + 3AD1843C15125218CCB6AD707FF34EAC93973217041154ECF608D8770E188BD8 + 5A01A8A1DEC5F60CF4980CB0A890E8A47AFFF477EC3F037C8EBE975F006ADC37 + 60A7351E3D061DE222C522A5270047AD82DBAB27B21AC09EDA373525E9A52BCB + 7E5F4CB4822509BE80848AB3C0C09A806380EE7CA1BDC55EB4CDE17AF2984932 + 75A60CCA088739742A84CE1E49C1010730F41BA03B27CD595C517CB1FFF92B04 + E6035AF142101DCB12DA743AB413243FA468331D0F01E51780D1154057AAF148 + D92E7BE794778E8DB92634C901116FA6451CAA27214EC06802AE5227AA839ED2 + 45A0729AC6A406182DD9329C10A7B7F57D18D63A93DF99D92076905F4FB4DF56 + A08C20ED9476027CD1209C7BD9FBDC947BC1C0E2C9596A4B003E27E2F8E9301E + AEB507B700334968A6631D019C759C5F627780822413BA194312CDFB41958C13 + 7FDB4052739000430ECEDD913F313B568F9B8B326AC8F7CCBFAEB27A073F0058 + 5538F0EAB25B380000000049454E44AE426082} + Name = 'PngImage5' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF + 610000000970485973000017120000171201679FD252000001934944415478DA + 6364C002662430FC47E6672C606064C001C0122726A06AB870818121A1632A98 + 5D169DCD10E58B90B32840358C11A4D920622A5C604145365833482308D4F5E6 + 3134154F62A8EE4805F35B2B66334CDA8B3004C50098E62F2F6E823581347F7F + FB80E1E58DBD0C8BD67D6588F6656258BAF91F7E03AE3D66C009081A800CD61F + B161C0072243F419711AF0F7F777864D275D192282F5B06A5EB1F23C43D7FCD9 + 0CE7774E67C43000A41984B79EF3C36AC08F9F7F18366CB8CC10116EC860E491 + 85EA0298E6BFBFBE33ECB8120E36C071E64DB8E6ED09CA40037E33ECD87E03EC + 02142F206BFEF7FB07C3AE9BF1282E00D90CD20CC6BFFE30EC3B719561CAECE5 + 100374837B503483E8BDF733305C000333DC04198E9EBB893040CBAF1945F3DF + 3FDF190E3C2E041B806EF34F283E73E52EC200758F2A865B3B3A506CB927739E + C1C75383C177F17D0C17745971325CBEF51062004820CF19352F808065E64506 + 172748A0C16CFDF3F71F9806B9E4F683A70803B081E56B2EFEB7B19663D875F4 + 32CEC444D080AED9331808010085EE16005695A1DA0000000049454E44AE4260 + 82} + Name = 'PngImage6' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF + 610000000774494D45000000000000000973942E000000097048597300001712 + 0000171201679FD252000002164944415478DA95D35F4853511CC0F1EFD491DD + D9587F2C83AC8C328DFE4949908BC0AC142A147BC8077B88A01EECA5E718F958 + 410486C384B50A1F7A991023CBEC0F594F81E5D4C211E130D7D4DDCDA15B5EEF + DD5DD74B1B8EA9D90FCEC3EFC0EFC3EF9CF33B06FE46CBE3AE042B886B176B0C + 0B73C342A0A9B17AD9E2FB4F5EE0E878C6E79776C37F03AAAAD2DAD1CDDEDD3B + B96EBB9B425604CC17CB8A4AFBD31EEA6BAC0CFF08A4907F02C962598EE374BD + D58F908C2581442241603C8CCBFD89D86C9C9C9C1C0A365A282DDE446FDF37E6 + AB9277B128F02B10C6DDF385CD074B10D6593019211E9CC2EF1DA5A0C0821895 + 68BE6D5F1A6873BEA6D07A0879951945CD626B1E6C372978BD7EBC5F4710D608 + DC6A712C0EC84A9C7B6DDDECAF3B459E315B3B3B685B9835448DCD30F4BE0FC1 + 94CB9D56672670A5E1A47E590F1EBDE374C3091D88CD4120063359902B4719F9 + D88F201835E0612670E97CA5DE41578F870A6B296BD79B096BC0B8B6C4DF3252 + 4024E81960832071B3FD7926D0587B5C7F32DFE8243FC74214EDD906AB4D4C29 + 1011230487BC1419BFB32BE8E06CE7BE4CE0C299637A07B3928CCF37816F4CD4 + F2040943365234823134C8E1FC094A8A8D4C0DF6B2E5EA8774A0BEFAA80E283A + A21012A791E6E6B4618249FF08AFEC97292B2CA7B64221BFAC9C90E74DFA289F + AB3A42FFB07FD90FE5B255A510B754379D062C1CD3E5E240AC931D9537B03537 + 19FE00839434866373C4BA0000000049454E44AE426082} + Name = 'PngImage7' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF + 610000000774494D45000000000000000973942E000000097048597300001712 + 0000171201679FD252000001724944415478DA6364A0103062135CB1E2C26E20 + E5824F63448401235603809AA381D412374F5506413E2EB0D89FBFFF187EFFF9 + 0BC62F3EFD6728A999C0B0795E15A60150CD1540CD3A7B4FDCC5B0D5D94299E1 + CAD3BF0CDD3D53F280064CC666C06EA066176C36FF05B25F7F6544B11DC50098 + D3C3C3F519D6ECBA8C61BBBDA922C38D17FF41B6C384B6020DF261846AFE0FA4 + AE809C0EB21DDD6610FFCF9F7F0CE91553194CF49518A4558D1836AE59037609 + 23C8E6AB4F2E2C2136DAE4B5AC186E9CD9C570F3C1278801B53D0BFE3715C7E3 + D4F0E5C75F86CFDF8118487FF9F18F61C3BA350C12CA260C3B366F4218408CCD + 17AE3D03D3065A520CEC42AA0C278F1CC4EF02749BBF82F0CFBF0CC7F66E64F8 + C92AC970FDE259DC06A06BAE3DEFC390ABB49EE1FEB5530CCF9F3F6778FA919D + E1F5D3FBD80DC066F3AC743D8680EEB30CAFEE9E61D8BEF72C4CA90CD080A770 + 03A62FDB45542C400D006B062724DFA4366920FD84D86844D68C9212C905001F + 16FA1194E3DBC30000000049454E44AE426082} + Name = 'PngImage8' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF + 610000000774494D45000000000000000973942E000000097048597300001712 + 0000171201679FD2520000015F4944415478DA6364A000FC3060F8CF884D62C5 + 8A0BBB81940BB258E7FC99286A8EBF9CCEC06EE4C5C088457334905AE2E6A9CA + 20C8C70516FBF3F71F8399770E44D3F9FF0C3F0D19219AE76D6364C4A2B902A8 + 5967EF89BB2806B7F54D6738E7C4C1F073793F58B3D1537986F33BA76318B01B + A8D905D9E6DF7FFE82B1437011C3B91DD31818BA8AC07246FB7EA01A00737A78 + B83EC39A5D9731C205E40274003700A8F93F90BA02723AC876649BFF02D920FE + 9F3FFF18D22BA63298E82B3148AB1A316C5CB38661F5B92A064690CD579F5C58 + 4228CAB6EC3E893D166A7B16FC6F2A8EC7A9F1CB8FBF0C9FBFFF65F08E2CC01E + 0B20038849342017608D055C2E80D9FC19487FF9F18F2125B3147B2C6033005D + 73ED791F86E7B334B1C702BA01E89ABF02F1AC743D8680EEB30CAFEE9E61D8BE + F72C4CA9CCE679554FE1064C5FB68B98A0801900D60C6230FA26B54903E92744 + E946B219C661244123560000C9AFE6B31530CB2E0000000049454E44AE426082} + Name = 'PngImage9' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF + 610000000970485973000017120000171201679FD2520000016A4944415478DA + 63FCFFFF3F03082CDD7212C22000627C2D18616C905E466403A27DCCF16A06AA + 61E89DB290E1FCCEE98C241BF0EFDF3F86E5DB4E33488B093314D5F5810D21DA + 0090E6DF7FFE31ACD97596C1C9429BE1E6BD176043CEED98C688D3804D0F0E30 + F45E6A02B37779EC62E05CC0C6B058EA38D80B3080D30090E6805D4E182E7911 + FC91E1C4E5C70C8F1E3F6298B774137603609AFFA4FC013B1B64738BB13743CD + D9AD0C8FFDDF81C5B6EC3B85DB00A6594C289A91C13DEF3740F1BF0C3B0F9DC5 + 6D0048C1EFDF7F21F49F7F50FA2FC31F181F2877E0E445EC068479988015F02C + E640B1F98EE72BB066CDDD120C676D1E311C3D7B05BB0181CE8660DB049773C3 + FD8DAC3957BB80219A379FE1D4C5EBD80DF0B1D7032B165BCD8B110330CD200B + CE5FBD85DD00776B1DB002E9F502609B13CF8781E50C840DE09A41165CB97907 + BB014EE69A1801060B44986610C06980ADB11AC3A63D2789C994D80D404EA6C4 + 0090010087546EF0ACB0C7920000000049454E44AE426082} + Name = 'PngImage10' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF + 610000000970485973000017120000171201679FD252000001024944415478DA + 63FCFFFF3F03258071D400064674018780D0A7823C7C09EB97CCDD8D4B535EC3 + C493AF1EDC305B3E7F1A2323BA66090111A9272F9F301CD9BE99119701110999 + FF416A0E6FDB843000A4F9CFCF1F52F834C2808DA72FD8DF700348D18C6C08D8 + 004B77AF69F292F299308987CF1F4E979256DEB076DEE45D207E7052AEDBB3A7 + 770390D58000DC0B20FFCC98D0CE70E1053FC3DBBF3F191E7F66603831A310C5 + B6E533A6311C7CC080228F624046C534B82408AC690C856B9611976140970719 + 20ACA0CB30A53E13624068693F5CF2F2E3F70C37E7A5C163019BFCD7AD4D0C2B + 164C07A72146981F999998C17EFCFBEF2FD630C0260F3660C0933200BCB3BCE1 + CDA578040000000049454E44AE426082} + Name = 'PngImage11' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF + 610000000970485973000017120000171201679FD252000001C04944415478DA + 63FCFFFF3F0325801164C0C20D47A381F41292353332C6800D58B0FEC8FF8440 + 1BA234FDF9FB8FE1F79FBF60EC105CC4806200A3E14C86FFE7D3C13408E0627F + 3C12CF70ECEC0D86AAB659D80D4007FF806AFEFC41D80CC2672FDFC1340019C8 + 7A2C6178F2F22B98ADAE20C0D09869CCE06E29CD2068B788E1D9AE48868BD7EF + 117601C8E673D7DF309846AF6310E66767B8BE3E8441CC6929C3C36D610CD76E + 3FC46DC0CBB7DF19EA679C613870E619C3C3679F197EFCFA0B36106433C8F97F + 80F8D6FD27B8BD1053BD8F61E9B6DB0C0B9B1C181C4C2518E43D5780C54136CB + 7BAD62B8B12E90E1FEE367D85DF0F75C1A836FDE0E866D471E315C5A15CCF0F1 + CB4F06DBA42D6003EE6E0A6650F65BCB7061B90FC3F357AFB11BF0F3540AC3B1 + 8B2F18A2ABF6313C7BFD8DC1C14412E895E76003AEAEF6077B4123528661FFC4 + F3A806C4F859C1A30839CAE0ECDF10BE41E416860F7F32188E4F453320DCCB9C + 81CB621ED8A6177BA218245C9681D9B7360431A805AC03B37F306430FCF8C3C0 + F0E61B0483D8700382DC4CF0DAFC1B498EDD5785E1FD4A3417F83919319CBA78 + 8BA8FCF0DFCF908171139201A0DC3871C6529273637E46740C00F128724C706C + 80060000000049454E44AE426082} + Name = 'PngImage12' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF + 61000000097048597300000E9C00000E9C01079453DD000002324944415478DA + 63FCFFFF3F03258011640023232386C4922BFF0D9818FFC57EFFFE57FDEFBFFF + CC8CFF19BEF0F1B36D5C73E9EAAAD5613ABF60166318505FFF9F4939F077F98B + 97BF6BEFDCFEC6F9EDDB3F86BF7F810A9918192424D9FEF3F1B32FBFFA93236E + 5528C35FB8018D9B7E2C6DF0E38859759581F5E7BF3FD36EDEF89AF4E51B03E3 + B72F7FC0867EF8F897E1EF3F06867F40ACA1C9F96FE392D5BA5737265D831BE0 + 58F9F0BF83A5F83245796696CB973E87FEF9C70CD6FCE2D92B86E78F6EFCFCF7 + EFEF17360E5E4151590326666626067D7DDE65F57E1CD12806288BB3FF676567 + 66E0E062036B7EFEF425C39307576E8A2A19B9EE6A557DA217B2A88E9B5FBA41 + 405C87C1DC9CEF01D0004514031444391804843918409ADFBFFFCE70E7EA91FB + 9F3FF06BDED9E1F513A450357481341FBBD03D611973362B4B2C067CF8C1C060 + A020C0F0E3FB4F86CF1FDEBCBE7FFD84C3B54DC9D760812B13DACB29CAAAF84A + 58C69AC7C61A8B01CF9FFF61E014646190E365627870FD40C3A535718DC8D1AA + E2B1988F5788E7B998823597A5392FA6010C1F1EC0157FF8F081E1DF9F4F0D1C + EC6AFDA7965A7C02899924ED550746C555793523665D1D2ED440C49690D08149 + D2A9764E3ED90A037DEEFF3696BC7161EA0C4B8836402FF6A41A37AFF0690E2E + 7E3E7B5B9E65C08494084C48BF8832402BF40A0F8F30DB3E0E2E4153277B9E65 + 0DFE9C60A7E34CCA280098ACCDDF3C5A2925C913ACAFCBB51CA6997803ECF7B3 + 301C74FC834D0AC5004A000026261CF09ABF155A0000000049454E44AE426082} + Name = 'PngImage13' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF + 61000000097048597300000AEB00000AEB01828B0D5A000002E64944415478DA + 8D936B4893511CC6FF67DA74BAC9BC9478C9357338CC4B0EBC1709F929A25414 + A13E48082D8CFC20267E1B925DD004B3120C75919AA99B5DADD485E56DA2791D + 739ABA2D9DB7A953379D6EEF5EDFDE14859C810F3C5F0ECFF33BFFF38783E0FF + 425902A13B668448DCB4C5B658709C40D8F0A4563120A97FB1B61F3AAC291008 + EDB1630ED7ECECA97C6F7F6FAEABB72BCDB46902B54CAD5BD4CCF7AAC68772C5 + 6F8A06C8286E05484EAEB3F10BB6A49FE2B2F2C2628318E0C440063300410050 + 910596D4B344F7BBB63169FBA7B4D6E65AA915205320E47A9EF4ECB89A7CCE85 + CDA021950141E2BD2E9049645029E683BB3301EB2AE5F657E15B4955457EAA15 + 205B5095CD8BE33D0C8BE0523C1002B50120E5C12EE03509D8A60078386EC1B7 + F2066DA3A89C8FFE1DBF9076CADFADFA4A467C829E70829C82AE43B79B97150D + B3522956F3F4C9B3030001DD87C3AE49C84CBCBC646640FCA5D29DF3A0B8A09D + 09F62469E1C3A4B4D7F2EAF1A3DA834FA064DC2D2D8E4DB9984E63F922ED2A02 + 161DE04EE1EE13D4ED7CB090CB5CD9C6E1439978A3FE655189D50E52D37263CE + 4486374725C5D2168DF6C88E2CE414ED02942400030246C6A7087149C5688DF0 + 7EC63EE0F38DB3C79974A8ECB70B7459649E0F64F17854767800C588D390830D + 02172A19226F5E58D211DFEB9AF40DD5CFCB46E5DD0568AFECC6C43FFA470747 + 2CEBF420D2048072C57ED3CB2F846005F9D19CBD4E80C96882B9F16942D1DBA7 + FBD15C2B960F77159355056AB919E0E3E24C17F9C58487E1737218966D429386 + 01F235CB8589854D87D3DCD0448613938D61669B89B1C1099552DEB9AA9B9790 + E559D204FA99C5EBF78D0A0FB5D5ABA0BF6F0D7AA66CA1757CC4B862D808E9D6 + 9826C990236927D236A4B748AF92C6F6FF82243F890861AE817CC8001D6A0A74 + 2A478D1AFD7A926CC6FC058E20743BEDFA2F1ECC70B45A0CDA2614CB5AFDFAAD + BE19B3E828E51D009FCFE710C6F546ED680F473DFF3B7E70DAFCFEA8E5BFFA03 + 503A4EA60D6AAC070000000049454E44AE426082} + Name = 'PngImage14' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF + 61000000097048597300000AEB00000AEB01828B0D5A000002E44944415478DA + 8D936B48D35118C6DFB379D9D4C9BC94A8CB399B38CC4B0E9C9A45427D8C5251 + 82FA2021B430F08398F4258650145A615642A12E4A31AF6565795958A69B685E + C7BCB4B92D9D3AA74E7771BAFD37FFFDA728E40A7CE0FDF6FC9E73DE877310FC + 5FA850200CC22C90ECB06EB1EC76870347D8F88C6E7244D4F8D2B06FFA172910 + 082998BBD7154F8A079F11C5E0043002A8D64D2BA8A56AFDB2463BA8928F1537 + BF2D1B21AC0E9780ECEC06323BCE9E17CE61DE4D4C8BA5812F0D996C00380EE0 + 81ECB0A25EC0FBDFF74C4B7E7CCAEDEEAC97B8041408849C906321BD97B24FFB + B36854A43221106B01ECCE007780203F1CCC2AE576BBF09DA8A6BA24C725A048 + 5053C43DCFBD9F98C4210523046A13C0D0320099BCBBF0360920D87B0BBE56B5 + E8DA9AAAF8E8EFEB3FA2864705D65ECC4FCF30E2BE70BB54ECD28F542485D676 + 3E2C482458DDD327CF0E04087CC222597519059917566C34B8F358BC031C94A8 + 8B0F339241FBEB870FEA0FAE40CABFF5A23CEDF2B93C2A3302E9D611307D0002 + 29006EC4D529A4DD2ED6B61DF0A1B279A3F15559854B0739B9C5A92792799D29 + 5969D4650B05791200C31B804A74E046B831C061423E8B3757544FD509EFE5EF + 077CBE76F208DD07DE0C7BC6F82FD3CFC430B95C0F162F9A64715091171981BF + 0761224E5E5AD1E3DF1A3A8C2DB5CF2BA764FDA5680F0EA43B3E469D8A4B5AD5 + 1BA149130DCA35CA66283B1E67C6B2A97EA147C16AB1C2A27C0E9F1C1CD27FEF + AC6F968D8BCB097412755D8F0EF3F7F36962A7F2121D8B3218976E4287860632 + 83FDAC6269D3EB38272193E64B6761988DAC981E55A894B2BE75BD5644C00BC4 + E0E867217738228597E06654C1F090010666DDA05B3E6159336DC4F76BAC3384 + 8968007C8971BE842D62D6C159C5DE5F109564E1F17403C8C64CD0AB26419F72 + CAA2319AB3A4F3B62F7008A19BB9577F71613E52A7C3A04731B9AA339A6F0CCD + DB9A0E03EF04F0F9FC48DC626ED34D0D44AAB5BFD347E76CAD87859DFA0386D8 + 3FA68502A9830000000049454E44AE426082} + Name = 'PngImage0' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF + 61000000097048597300000AEB00000AEB01828B0D5A0000032A4944415478DA + 6D937B4814411CC77FB3B7777A5E7276969AA4648A20A5592A4585FE654122BD + 0CAA3FE2841EA45946697591BD8DB27748A2BDA0A43FA2420C893252D2A244B4 + 7C24495986AFBC3BDDDBDB9DDDBDDDDB663714B366F9B2BB33DFCF777E3BB383 + E0DF66235A19342370912538D0CAB2825BF00A6DA4EF2D1133D5A8AA2AA029EF + 4126B3292B2E21BA70697A5262626A9C393422040D0FBAFCAD6F3BF187C68ED6 + 9F5F472E2992524FBCE2F400735884ED40E6BAE58539F6CCD0B9F323009111C5 + EF075191600C7BA0ABEBAB5AF7A071A4ADBEE71CE7C615849126032823B52D77 + EFBAEBF6BDEBAD164B20E941A092EBF89ED75050960C6ECC805B6060D8E984E7 + 379B9C2D8F3AB71353CD4440CC8ACCE49725D7F2626DB3AC60A028C2535092FF + 4A2FCD5E1A0F2E3C062E9E8171D1034303A3F0E24CF3A7910EF72A1230826813 + BDAFF87CEE85ACCD19269AA2C16030C0093273EDC372C8DE92FFD7EACEDDE902 + 06B3D0F1A41777DEED2D5015F5369A1335BBB6ACFA4056745C24A22903941636 + EBF044C38204BCE003FBEE62B0DAFBC1237A61B8C7A9B69DE979ECF3F836A1A4 + 65F15F4EDD2A880BB606A12B45AD93B02C2BE023D2604D79FB8F02B5F533B022 + 078C9B55BBCF7EEBC43F8424B4243DE19BA37C678CC962844A47B71E204F8212 + 09F1EBF783474E02BBB105BC1207DE711EFACA06BE8B7D520C8A8A0D6F70DCD9 + 951E343B1061598067A54EA8AEBAA4435A0826D22A3976B21406B31B80F76160 + FB3975E8E2E84785F12F460166E3E91D17361D8E5D1E45F332062C8BD07EC300 + D7CA4EC1BEA292BF16B177751D6893304D5E9979E0AD5265354FDBC694B4EC05 + 7599FB57844906093862D04CCEBB913AE4D9F01EBC3E1EBC22AF87635680F1FB + EC4FB95DC922DBD8A105A0008BF1444641DAA1A88C8800CE8F8123656AA59A1F + A740FF9A7AF22CE8B0208AC035F258A8911C20C3D5A9BF72D8CC79C197E3D7CE + CBB12D0D09106862D4A13F9F343133F70E63F18D740F7E818330E3D30FD31CA3 + D5986F5B68B55B532DE128923248269F0EF2DF05856FC58372AF52013C5412AF + EB7FA7516B34512232C2063A944E44C1C82C7B14CEEFF2B793929F92B16E2265 + EA71FE0D330BBCF031BDB9A60000000049454E44AE426082} + Name = 'PngImage15' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF + 61000000097048597300000AEB00000AEB01828B0D5A0000031C4944415478DA + 6D536B481451143E779D5D5D37D95AD354523445905AB32C0A0DFD653F92252B + 8BFA130A3D40F385D1C3B09766A5652548D23B34FA1115624894A0F6502845CB + 079298A5F8CA75737677E6CECCCEA3BB532DAB75868F3B73EFF77DE7CCBDF720 + F8374C045BFC97F8AD3504F8191D0ECEC639B91E32D741407B13154501E4F5ED + AFD3EBD263E2220A37A5C49BCD1B62F481214BD1F4E49CDCDDD18F3FB4F7758F + 8FCC5C9504A98570F9C506FAE01053715A46526166565AE0CA552180C88A24CB + C04B02FCC476181818519A1BDA677A5A862E32365C473482C740A3D5ECCFCECF + A8C9CADF613418FCC80C02853C678EB4425E5502D8300D368E8669AB155EDE7C + 67FDF8A4FF002135FE35884A4E4B787DFA464EB469B9117C341AA2D78008329C + CF6D55CBB39406C11C4BC33C6F87A989597855FEFEF34C9F6D2B319841948E2A + 387639BB327D6FAA8ED2505056F066C18E363DAE05CBBE5C30E7BBE02767071A + 3BA0EFD930EEBF3F9CA748CA5D141A1ED454F5A8383D22260C511A1FA8287CAF + 8ABC037302ECC92E0263D618D879274C0F59959EF2A1A72EBB6B378ADF1CFBE5 + FC9DBC9800A33F2201D547BB3C06A228818B80E55C2A728A4E01B3AB0B689B43 + 19BCF0B51F7FE7E2D1FA94B8AF25B587A274062DD971173C2C1D560D448F5020 + 26B23A1E3D790EA62C6DE09C6761B46AE21B3F2A44A1F0E8156D25F70EA7F807 + F9212C72F0A2C20ACFEB6B3C62F788094E9496C12411B32E0C8E314699BA32FB + 49A2E575C857AF2D3B58B9FB44745238C58A183AAF890BFEFF5259A947CC082C + B893D0EF9C22DDE0BCAD884A8EFB1813375A5637A71525070B3E023084E02631 + 24136E88564D262DADE0E4DD621EB08383F97AC7B8D82BA59363EC731B205F83 + F66C6ADEC6E3E1A921BE8C8C55B1BB54FDD34418DBD642DE3955CCF13C30ED2C + E61A85127251AE7B5FE5E0659101D5B1DB23334D9B96FA721421AA22FC3BEB9F + CC4C27C6FC5BE101FC8012A2995FDC4CA15AA336D7B4C69865DC605881C2343E + 82CEA50AD96F9CC476E3497158AA03166E11EEDCFFBAD11D1481196961271548 + 995100D28B768991E7E45E52F273B236482079B7F32FB7E1BAF0E8F71C040000 + 000049454E44AE426082} + Name = 'PngImage16' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF + 610000000970485973000017120000171201679FD2520000019E4944415478DA + 63FCFFFF3F4341F1F9FF0C6402469801BEFE4A0C0B16DD60583CC71CABC21F3F + FF327CFFF90748FF6128ABBCC2A0A5CEC0B072C752E20C40D6FCE3D71F86BAFA + 1B0CEB963B31A85A241336005DF38FDF7F18DA5AEE3098997032CC5D3D07BF01 + D834FFFCF597A1B7EB3E612FE0D20CC253263C625092FFC5B0F1C06AEC06E0D3 + 0CE2CF99F68C4152EC0BC3AE931B310D983EC908A119AA11A409660008CC9FF9 + 9C4180F72DC3E14B3B500D00019021840048F3F7EF3F19CEDCDE8F6AC09F3F40 + DB7EFC024B82E81FDF816C280D11FFC5F0F9D337B03C08DF7C79126180A7B73C + 86E6CF9FBF43C460867DFB09D70C32ECD1A7F308036CEC44C18A976E9A82D7F9 + 7CFF8DC19A4186BCFE7D0D618089193FD896B5BB67311CDA309341504A87E1C9 + ED930CEF3FFD60F8F0F927C3FD671F1956AD59CDF0EC96105833C8BBEFFFDF44 + 18A0A3CB0976EAB6C30B182E1CDDCBA06768C8B073FD02B8CDF79F7E64E89C34 + 87E1EE456EB06610403140599519EC827D6796312447F833F072B130B0B0B2A1 + 387FF5D6430C37CF72C0F9700318191919F49D72C9CAD200FAC9B5C145016BDA + 0000000049454E44AE426082} + Name = 'PngImage17' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF + 610000000970485973000017120000171201679FD2520000015D4944415478DA + 63FCFFFF3F03082CDD7212C22000627C2D1891F98CC80644FB98E3D50C54C3D0 + 3B6521C3F99DD3194936E0DFBF7F0CCBB79D6690161366B04C57058B715C6060 + 24CA0090E6DF7FFE31ACD9759621A4D68281352A97E1F7B2C90C8B2E10E10298 + E6DFBFFF325C5DC2C1F044E912C39B4B4B19984A3AB17BC171E64DACAEE860D0 + 60D0F399C2F0F2D636868587CC18A41A1A18D218F07801DD669866100E699161 + 10D5F6050726411720DB0CD35CDE369B61DED24DD80DF8FDE72FD856107D6319 + 1786E6ED7B4F311C387911BB01611E260C6E73EF80F9110C1F180C182C18C4D5 + BC5034830C3E7AF60A7603029D0D212E00FA7DEDAA2B0C2D2D210C6B6A9EA068 + 06E15317AF6337C0C75E8F2160D92330FF4E8B0B838B4B0D985D5CE907D70CC2 + E7AFDEC26E80BBB50E5CD11FA84B60E181C0FF18AEDCBC83DD0027734D829A41 + 00A701B6C66A0C9BF69C24265362370094D348012003002CB76B52FA97B19500 + 00000049454E44AE426082} + Name = 'PngImage18' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF + 610000000970485973000017120000171201679FD252000001B04944415478DA + 63FCFFFF3F03258071D400064674018780D0A7823C7C09EB97CCDD8D4B535EC3 + C493AF1EDC305BB1603A2323BA66090111A9272F9F301CD9BE99119701110999 + FF616A189135FFF9F9430A9F4618B0F1F405FB1B6E0021CDD70CF8FF0B09B0D7 + 481C78D50AE2FF7295B1FBC82F7AF0C585F30C8C96EE5ED3E425E533618A1F3E + 7F385D4A5A79C3DA79937781F8C149B96E6627F7F4F8B23ED3DD226BC2F04840 + 96A19CE72DC3E7E387182EDEF8389911E49F1913DA192EBCE06778FBF727C3E3 + CF0C0C276614A2B860F98C690C9BAA5A1854F7F530282A4830DC7FF08261E657 + 318689B76F33820DC8A89806D70C026B1A43E19A65C46518C0F25F3F3048CE28 + 6050BFBC9A61DB7F198693AE390C535AF220068496F6C3355F7EFC9EE1E6BC34 + 782CC0E47F5EBFC060D7E5C170E8BD208301F73B06BE7F1FFD642E316C6604F9 + F1D9D3BB01CC4CCCE070F8FBEF2F4618FC7D723D22F3EF93C4FB37DE301C1296 + D9E8FBE68198BED87F4BFEBF1FED084619087CB4178BB974FFD3D42B8F7E7801 + 6D390A12DB28C4BA51558ECB8F2803D6F1B2C67CFEF5C728EEE7FF62A006701A + 98C0C0202ECBCDB00A00547CD715F016991D0000000049454E44AE426082} + Name = 'PngImage19' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF + 610000000970485973000017120000171201679FD252000001034944415478DA + 636498F123988181610D032A0861C8E058CB400460041AF07F8201AA60C10520 + 91C1C1489201604DC40114D7313234DCF84FB4561868D080BB8E71F3BEBBFF7D + 1C9550E4FFFCFDC7F0E7CF5F86DF60FC0F4C83F8DF7EFC66084FAF6738BF733A + 7603D6DEFBC710B2FB378A61732CFF307888FF061B7AEDEE4B86EAD6C9B80D60 + 9CF993015B803EF0FDCAF0EBF75F863B8FDEE036006403EB9CDF0CA40628D800 + 0F3B05B01F393BEE911C9E6003ECCDA4188E9CBBCFF0F70F3B03A9010A36A0AE + B307ACB8A9BC04C5005C9A91031425B52107283ECDC8018AD500429A41F8D1F3 + F7D80D8005283ECDBF81F8F99B4FD80D8005283100AB01B0002516000097A51A + 7A68BA98860000000049454E44AE426082} + Name = 'PngImage20' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF + 610000000970485973000017120000171201679FD252000001124944415478DA + 63FCFFFF3F03258091620340848147C2FF0B3B1630A24B1223CE08E20CAC0B28 + 0A0098010B361C807BE3E7CF5F0C5FBF7D63F8F2ED3B98D65455C62ADE599ACC + 886240BCBF3D58E19FBFFF18BE7DFFC5F0EDC72F86D6A98B1826D7E760159FD2 + 908B69C0EF3F7F810A7E337C072ABC71FF15C3FC556B1916F69463155FD45B81 + 3060DAF21DFF93835D18BEFF80D8F0FDC71F8647CFDF334C9CB38061E5D446AC + E21B66B7220CE89AB3EE7F6AA80754D16F862F409BDE7FFCC6D0D43F8561DDCC + 76ACE2FB574C4418503771F1FFB4085F86DB0F5EA3847049633BC3C6F97D58C5 + CF6E9B8730A0A86DE6FF6FC0D0FDF4F90BC3E72F5FA1F417867FFFFE33589818 + 601587A78381CF4C941A00005C20FBD97F751C0A0000000049454E44AE426082} + Name = 'PngImage21' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF + 610000000970485973000017120000171201679FD252000002704944415478DA + 8593DB4B545114C6BF333AFB8CCD3853A11686162811410F1118241524984951 + 0F864F520F3DE8D3FC0DD183145949E12814D1850A9CA2871294A8208BC1862E + 2814836578BF4D9A8D9EBD679A4E6B9D33C7697AB0058BBD38ECEFB7D7FA1647 + 936F607AF6410305D7FA17E07C773946A646D1DE0E0483583334F30E4C554145 + 6508E6700B18903C9CAD7BA64E63B0FF39829D8FF0333E83C5D971CA49DCB874 + 16F1AD0DD0D46CC814BD2D6008078BB8764097CFB45AE2C5D9090B30333A8CBB + 1D17D070A20E5DEF7DD481692239D769B2D8F4B7D86D2D85ACD311FF989BC4D2 + FC34BE4F8FE1E69573387AE4100A7D5E5C1BD0A13973AB93B65014374329B2E4 + 5D76CEA1A9562416E2B8DF7511C7EA6BE05D57004DD36C007BC09718A0EB5669 + 01F4EE2CA0F92A01A9D3EABD7B50B2A908C29D0F97CB9501AC3142AC27826432 + 052525FA9EF4A3627B19021B0210C24D10373AA21EDB44769CB7C0663AE16C26 + 7AAF0FD248E2D58BB728DF560AFF7A1FDC04D0751DD73FFAB21EFCBD3AAE9DCD + BC7E590F432A44238328DD528242BF176E9D3AD0056E7FDA687BD0D60BD4D59E + 4265E52D0B104D3442190AD5C58FF13456439E280C7E88A1A828001F01841010 + 1E81075F37DB1EB435692603D2E9DF48A914E48AB2440641944C522AC43E7F43 + 61C00B9FB7003A89798487136559406D4D1389E832CD2B0D099911328481E363 + D3F014084A0F3CD4FEB3E59D0887C3DA2AE06075235D94D68B2B7C2A06290BC4 + 677C7E0179F92E7A596020AFCA12DBFF420650B5FB784ECB9CD2B0C5067D5B4E + 2CF3750CF9F7AF8A7300BB76D459C6392F33C8C87490FE95A65392F8408E3807 + 10910DF85FFC2BE6F80376357B8923C9356C0000000049454E44AE426082} + Name = 'PngImage22' + Background = clWindow + end> + Bitmap = {} + end + inherited LargeImages: TPngImageList [6] + PngImages = < + item + PngImage.Data = { + 89504E470D0A1A0A0000000D4948445200000018000000180806000000E0773D + F80000000774494D45000000000000000973942E000000097048597300001712 + 0000171201679FD252000003CD4944415478DA8D96ED4F53571CC7BF17EC9315 + 11864234C607C6D4E9408621F88CBA88D0C64D48EA906C3E3459F40FD077666F + 7CEB62A2912C43F0A950A12A3001AD2613810908B46869E69E8B2FBA3087F499 + B6F7B63BF7E0BDB6D2A79BDCDE73EEBDE7F339E7777EE7DC3248E1303C346BC9 + A5812FDBED767AAF51D7B9C9F4A07E22595B2655F8DED202642D5E089F3F88B6 + EE415CF8BE857F9C54C2A402DFBD651D7296C8C5FBD3336EE87F7C8206DDBDA4 + 1226197C57493E96662D9A7BF9F810BD861A4BF1EFB4136D5DFDB8D2DC9550C2 + 2482EF2161C9266111E00D470B611C015A75D7E11FD6E2F51B176EF7FC8CA696 + F812261EFCC0F60D502AA451706DB902A7EB5F60D2F32195B8068EC1E5F1C1D0 + CD4B62878B4904F7F8392C3A3922C2C361D280B438736900B6D94FA9E4D5FD5A + C8A46968E9E8C555FDFC9130EFC3856C8984A72F90E0E31C274AD767A3EBF138 + 7A2D6E64AF2D82C99A4E257FDED320C4B1E87C34881BAD3D511226D1840A70E1 + B09AE7269987FB021CBCE49C9C545089AD5B0387CB03E39351E80C0F44892008 + 278207D830BE297F27FAB6DD41E182A4A9CF0698CDF8BDA31A334E2F7E7A6A42 + F36D2395303C3C56B644F69C09BA3139C5E2ECE11C5AE727DA9791274AF8B3C3 + 64A712ABE17338C9C4F70D3D4757DF2FA0829ACF8AE2C2BD410E013F0397C329 + 0A4E9CEB059B5B4005B38110825C083EF25EDFAFFF518959AF86E5E55F387FB9 + 19CCC5EB3D61AD661F14320915683616A2B24C22C2F9DE05FD0B10F4450B9C59 + 6B299C070B23197FE5A082519D0AD6DFFEC677F56F0599194AA8CA8BB1848429 + BDE40768EABEC6EE923431C6E1800C0C1B2D9852AE8E091FB959058F771643A6 + 0974F7BF04535C716A236963D1D6A95173601B9128A1286BA4924DEB58DA98F5 + C891217347096CD29531E16E12FFC1B109DC6A7F3837C9FCAF20397144854315 + 5B91A15C88CC9DD7A864F90A2F8A729538B6F7DD662748C602B9F37AFE74D422 + C2C5348D941CAF55A19A8C840B315855758B4A64996F909FEE84C7350D960D61 + C6C7D1364D7FC829BCFF4A05A97118187901FD1DE3FC85365FA28646BD132E6F + 0005070DC0E6CD5015E6C58C390F9748D2D03F3C8E9B6DD1AB38E66627488E7E + A942D59E2D9090945DA36EA392B2FCEC28F8B31B9598251FA061B335263CEE76 + 2D48BED25462DFF66228E4527CF4C55D2AA1C75B38CD16027F3F2C49059192BA + 9A0AEC2A2B2212193ED174D2673CDCED9DCB96D6F64771E109059192DAEAFDD8 + 515A08B94C0A8EAC5A9A2D6396A4F0A48248C9113292BC651F807C1260FFE735 + F4778D49E129090449E6B25516C7948DD64919A49CD2DF96FF0126B669571175 + 682F0000000049454E44AE426082} + Name = 'PngImage1' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D4948445200000018000000180806000000E0773D + F80000000970485973000017120000171201679FD2520000032A4944415478DA + BD95CD4F134118877F5B0A22D84205341E30087E24021A45893131F1E2C178F1 + 2A26FE07C6C478319E8D9E8C8926EA49E217D1B328F142A24123070B2E6DB76C + 0B5DB6A585B614CA47BB1F6D7D772CDAD22DA0094C32997476F67966DE79F72D + 97CBE5B0958DDB1601C7719B7EE1D18B8F9768E8A17EB660FA2BF537D7AF5DEC + 2F5CCBD8FF22C8C3DF5FBED04D2F73882FAC40CF64114BA6E1F3F9797AC693E4 + EA7F090AE1FB9AEAD9DCD24A1ABA9E81AA6510239920C530CABB71F7E615EE9F + 0425705A6E80753D4B27C8A0AAD24A630EFE5002E25494242E26D994A01C5C55 + 7528AC6BC866B3A8B7D782B35830198A63C829E2D9BDDEFB4EE7F3DBEB0ACCE0 + AAA617C155EA29458546D2867A1B72D90CDEF67F41DFD37E3709DACB0ACCE00C + AA680CAC685A5EA4B13B38D97E00B14412BC57C2C0E0777C7A37545E50166E80 + F302E324EC37CD7775B4223EBF0861621AA35E19636322BE7D18361798C2159D + ED785550024F2C821F9F82673202419882382A221C0897DEC146F0D59014C213 + 0B4BF0D0CE9D8244F020FC3CC127C31819E92DCE2233785AF90B53F360632E43 + 1FD7098A79742E899F047691C0352621264F63C22D3178D177F0F8E540093C95 + 568BE29EA64C512834468A9EEA6CC34C7C1E6E5F082EA3BBA71097C310F9893F + F0B582D7C78EECEFE9EA6883B5C2C2629C5EB373259F9EDDC70F6226364FE020 + C6082E8E87200B0148A25C045F2B983C77FA684BE7E16696D3A9945A10EBBC48 + FB0D8FC617081CA44B0D421483181F19C7AC3C5B023715B43637D109AC58585C + C64A4A29806B043F84394AC561DE4FE560165E418668C083E6F01281A3CED6D2 + E4D8853D0D75D8595DC52ED2C89E2C8D5D14F34834C1B2E5873B00C123232147 + E017A4B2F0B582C14C8E3B5FBDA30A95560BF6EEB6A3916486A4C16187DD5603 + A77B025E2902371FC072740E9E51DFBAF0926A7AE7415FCE6677C052C1C1565D + 81C6FA5AAA2B39D45111CBD2627F7086761E424494E0F30436849B966B4362AD + AC84BDA69A5295C3F2D21295619D95E5C5E40ABC4E3F8B79FB99F68DD8ACBD7A + 728B332B153722B1F987E170181ADD81F1DCE8AECFDE4D410B1B950A6E7BFEF4 + B7B2FD02BC08E5EFAAF547E00000000049454E44AE426082} + Name = 'PngImage2' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D4948445200000018000000180806000000E0773D + F80000000970485973000017120000171201679FD2520000022C4944415478DA + 63FCFFFF3F032D0123CC82D53BCF13655398871123B18683CC46B120D4DD10AF + 06A01A86F6FED90CE7774E27CA12922CF80754B776D7050651415E86A2BA3EA2 + 2C21DA0290E17FFFFE63D8B0F712838DB12AC3CD7B2F88B284280BFEFDFBCFF0 + 0768F89FBF7F19B61EBC0A0E2218A08A0520D0B3EA2131410E06A5E10A704BB1 + 5AD0B2EA0186260E0646869230798286831CD2317B23C3DB3DF98C382D00F141 + 610E0E963FFF18FEFEFBC7306BEB4BA22D3051F8CD1052BD0D6C098605216E06 + D008FDCFF0FBCF5FB0E1A0C89DBBE335410B7EFDF9CF3069DD23866827617022 + 0059F266771E238A0541AEFA0CED6B1E91144440FBC186FF02FA76F69627E020 + 82010C0BFC1C7519DE7EF88661C8B203EFB15A806C388CDEB9FF2458AE6CC679 + 4C0B3C6DB5C061FF179A2C81084CAF3AFC096E4144CB159CC1D49EA60AB6E4E8 + F133D82D70B5D26098B2FD25C120C2E67264FAF4E9B3D82D70325763F8F8F907 + 8605EB8E7F815B40C87010BE78FE1C760BEC4C5418FEFD852451502A82E4E07F + 0CDBCEFE005B00323CBA0D7710954629327CFBF997E1F6B58BD82DB0355261B8 + FFF41D86C6A3B718180A43E419BEFFFA87D5C520F6CFDF08B187B72E61B760DE + 92B5E0B2071DB8FAA73164F8C912653888FDE2FE654C0B181971975BDD2B1FFC + 4FF292061B5030E5264E75715E32608BDE3DBE4ABA05316E52045DFE0B5CB430 + 307C7C4A8605614E1244190E026459106027CE70E8E869066201C916209731C4 + 02140B6805009C1383EFACA508270000000049454E44AE426082} + Name = 'PngImage3' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D4948445200000018000000180806000000E0773D + F8000000097048597300000E9C00000E9C01079453DD000004BF4944415478DA + B5D37B4C53571800F0737A5B6ECB4B2F2D2D2D2053408286870CD4C9C0B89989 + 8ACEB041F035064CEB365800D93235C0EA40FD836D380C085B44C7C30993111E + 93199411DE844029B80908586094577B81963EE8E3EE82D311662A35DB97DCE4 + 3CBE737EB9E77C07120401FECF802B010821A8ACACC7BAC453B54A95E6405AE2 + E111631B7C9E7E331102E87431313C76B1FFAFFD9E071492C0A3A109218D8AD4 + 68C68527040281E1799B9FCF2A738306439314971765244598060C3C9E1406FA + BA73EE36F6045E381DD6B672F39339393457C4BE748BFBFAE08AFBED572E9B04 + 94D7B20647645D7111FB7805E58D359DF2817DB97CBE76795E7246717450E096 + 5C7239E5C7AAA62B99C9260039F977B893B3AA9E84A8FD3603C313BA9FAA5B8F + 9C8F0B2D799A73F6AB627B77676E4750A0375BD43B0ACA6ADA7ECE4C8A085935 + 9097574B1F56C89A2342767A6356E6A0AAB6E3E1AF1DFD5B6E0822D5A1A1C588 + D71B66D7DF7B3BE0E862767BCF20A8691265647D1115BF6A6031522E9784B130 + EB9BEF066DA72C68B5C4F5D2BACF5262DF493F935E78684F804FE9C6F53CF8E7 + 040E6E57B7E04A9572DBB7C951FD26018BCDF8B4FCAC5DDB37F377F86C84AD5D + 0353F79A1FECD9ECC22B3EF8E6AB2EB25925B85327D4F70E8DC5640B22AF3E5D + 640A004EA7FCC046D7A06D216F6D73E230AD417E59BD243CF8353B081128FC43 + 0C6A9BBBEF4BF48CBD2582B085970296904B45611C1BEB225F4F67848A40E0FA + 0A178C4864A0F46EEB2C3E33BF332735BA6B79BEC9C062BD5B482D8A5998D5A1 + 0D8E6C60678B01D14331E81D94246509DE4F052BC26400B8FC821E0E5178D9D9 + 326A5BC516E6737225F0B09BEB1892500FB688E7A5A02E52FD72C08E026F3B1E + 2B92CBC676D3E9664E23A313A85EA7910368A6B1E3602C3A1D5DA0D210B14422 + BBFF6860FC3BD018DEB53AC03797C659E79062CF65C6418346AF981AD3E85438 + 9C56D3692C864A6EE1E0A3D62AA6AD0787261A210D250044BCD45A832DB93413 + A8E70544FB49AD5100DB5FF1D14667CE3732F103056A98EBA322C42D8D9ED239 + 348725AEB39CF56438FA2E5066FAB893B8C27D4C4A1D279770C9DF3E09CCE831 + 8002CF12F5C7B28C022E11BF89508DD489AA1ABE26421D12414998FEEF23BBEA + 6683EF46ED7D09BDACD756A61AE2492A05CAA539A73C3A60EB6F03338623D170 + C4D328E01E5DAF21A47D5A864EE92FACFAE49F12F42F28DA84C93CA9F67E2832 + 3FECA4C30739DD5567F067F3BEB9A90035FF9468388A1A053CF8CD7238FDFB3C + 55A7F2E92C8F1D7B329A42A1BCEE52ED8EC9AC11DE56E61A44EE3833DA13DC5D + 9E50B30CB848023124606514F03AD5D24F99E9B5D42B64FEDD5509834B837E37 + 98660CD8E7B616BF2745DD985C267D977E52745D88D49F0025254F8ED0EFFB22 + F21EFC48C0D52860B9B7347B2D9C896252E70E8B2AE24BC1CE142AD0B97ECD36 + 577DCC3197F3BB71762B8FC3CAD8C0D46D958FF59DEA2A4F2804DED99B009D71 + 0B204803D170EC43E3651A50E88F52F4D55C0B45E563B9F597900031185DF381 + BD85A262DA801F5FBAD8C0020F1EDBA61ACE8D40E50225145722C1804AE39355 + 7480A83FDAF8E287E69FCF275BE7C82EC7D152A1C650F5B529037EEE59D52C5D + 7AD166000C17C85610F94D904F2C0D341ECF79E143FBAFE32F16D672EF3D728C + 4A0000000049454E44AE426082} + Name = 'PngImage4' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D4948445200000018000000180806000000E0773D + F8000000097048597300000AEB00000AEB01828B0D5A0000043D4944415478DA + B5956D6C535518C7FFB7B7ED36B66E5D47D67663731BECD5B18605D8504C084B + 74982DC16468D4F881AD0305E3870550D100EABE482246712A8AA00182BA9828 + 84252006D7264AA2631B461325DD5C9ABDC0686B6F5FB7DEDEE373EF6869C736 + B6189FE4A4A7E79EFBFFF5799EFFE9E11863F83F834BFCF211506AD6A7585DFE + A99E3611BD4B1553DE7FC0DC797B64FC9C13387B883149017C0064549A528F56 + 5A2A9E31AE2CD00EDF700AB62B034DAD22EC8B117E07482B3019F61516E7ED15 + 6F8DA6BB6F79D84D1F0E5A197B8BDB06F06D7A743F5C8827B4997A684A6A804C + 031C7F8D78ED97FA9B5BB130E4531E9B2A2D655D191AA9CAE570201C61CC15C0 + D94911D60EC642DC4915DA9BCA714C97024E6E87C46BA029AE86DA5C08C79F4E + A1F7CAB566AB08DB3DC280C19CA77FBBA42877BB776C940F08018444B0DB3E1C + EE6178AD1B88CAFDE58E02797526D8561BB1324A00519A191A532174E535181A + 1A176C3FF42595EB6360836595E1AB1C9DB660CC39A1EC0F46204E06B0AF4DC2 + BBB17D0A409E1C032AD6E7E3C7223D8C31803C54E999C8B1AC85F3A6CF6BBFFC + 4BB30C3995A2B2D696E6BC2F8602691E6F50D9E79F4298CAD2DE069C4ECC320E + 90E32450BF6605BE37A623231122A9782CAF5A0DF7B44618F869F0FC9A55D94F + BB275DAA6058549EFB66C45BACC085D9654C02C8F1058F268B09DF64A5429B08 + 11A97419463304B707E1E014A669215696093F9EDB097C399701EE01C8714A83 + D60773F1499A1A7C1264D6A0864A54F397A8E65DF3396C4E801C67B4D85F9683 + 4EB50ADC5CE25351B04972CB76865716B2F0BC8083D4DFAA545C2DCEC6BA9868 + 34011096ED18C4E1768657659D2501C8519A2C9DB6AB7A6DB955F8E3376EBE12 + C959F8C238B003E85C3480C497E5E51BCE6C78AA79EBDF17CE21484D5DA80FD3 + 049916B1872047EE0B20F1ACE212F3B71B5B1EDD343E781DA3D7FA93C4C88E1E + 8941CDABA04B5C8F48F289C58BCF2BE76F1E00D55C5DBF42FF5D43D3238F07C3 + 115CEFB90831CAE222816984DD213446818954158E136463ECD413546E428446 + FB2E72FA9C80AF759A37B734D4BC9E663070FDBD5721787C890D955C41B45119 + 3E57F6D29FA31BE8500187E8F1B2B8D80CE459827427014EF0D8FC585DD1C53C + 935E3DEC9CC4B06334A9C6247EC4CAB06776FA1F02D5F4EB8ED3743D77F75EA1 + DE63DB6EE07C1CD05791FB7B6D85B1CAE70FE1D7010722E2DDD2FC13823D1C45 + 039DD4C83C76D61A8197497D3F8DD43B990428BBADF4CE6505602FCAEE7EA826 + BFA56FD0018F371417F747E017A650FB027003F70932482D099FA0A9E5CE9240 + A37127633F739FF16859579ADD3D36E1492A0DB176B72BB7E0E2E23D20450B1C + A0E95ECA86A7526DDEC5582F27A759A6852D330575316708615C1A91B0E50D32 + C9620109BDA9A78F27A9D91D7117D19D6A58AEC6E9340D1AC9350295A796360C + 2D557C76241D34D97E5E4A8F9270ED506EC4FF1E32E05FC9675CEF0AFC725300 + 00000049454E44AE426082} + Name = 'PngImage5' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D4948445200000018000000180806000000E0773D + F80000000970485973000017120000171201679FD2520000027F4944415478DA + 63FCFFFF3F032D0123CC02464646AC0A66243060B820630103230391006EC1C9 + 898CEE406A07B2E4890B40C33AA6A268B8B8229761E9E67F0CD1BE4C1886FD67 + F8E76151C0B0139705FF154C1A18045444212EAFC8061BFEE5C54D86A6E24970 + 0D75BD790C770F4C015BD2B16802C3FFBFBF19FE01F1D7A7BF1836CC69C0F01D + 8A05061153510C7F7D7527032EF0ECF216B025AD73DAC016DCD8D2C870FEC23F + E22C787C6C21C3D64DA70886AFB79F1983988E07D8825B3B3B89B70066092100 + 331C84EFECE923CD027430F9A037410B61A0345C016E095116FCFFFF8F61CA21 + 5F869230798286F7AC7AC8D0317B23C3DB3DF98C445900321C9452A61E0D22DA + 021385DF0C21D5DBC096E0B50066F8BF3FBF18A69F8C2068C1AF3FFF1926AD7B + C410ED24CC70F3DE0BB025382D00451C03D00290E120F6CC33B1382DF8FB0F62 + F8AF3FFF18666F79020E22BC71003210968160ECD91752B05A806C388CDEB9FF + 2458AE6CC6794C0BB0190EF2C5DC2B59700B225AAEE00CA6F63455B025478F9F + C1B4402F740256C341F4BCEBF9283EC0E67264FAF4E9B39816E8067563351CC4 + 5F70AB046E0121C341F8E2F973981668FBB761351C8417DDAD045B00323CBA0D + 7710954629327CFBF997E1F6B58B981668FA346235FCFFBF3F0C8BEFD7321486 + C8337CFFF50FAB8B41EC9FBF11620F6F5DC2B440C3B306ABE120FE92474D0C19 + 7EB244190E62BFB87F19D302559712B8E1E8F4F2E75D0C495ED260030AA6DCC4 + 1944715E32608BDE3DBE8A6981B45E00C3B34B9BB06A3C24798F21C64D8AA0CB + 416C503C7D7C8A6901B8CABC7001BBCB3E7B3E6008739220CA7010C0B00057A5 + 0F03DD2B1FFC0FB013673874F43403B180640B90CB18620100261ED9D6E5FCF2 + FA0000000049454E44AE426082} + Name = 'PngImage6' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D4948445200000018000000180806000000E0773D + F80000000970485973000017120000171201679FD2520000037C4944415478DA + B595DF4F5B6518C73F2DFD4191B66C6C4E8512618376DD28B485B1C126D90F36 + 8D1B1726264B76B53BAF3431DE99F80F18BDD1449399254B644E1747743ADD94 + 48169C428131268366832D631BC838FC687B0A057AEA7B0EB692B562417D9393 + 9C93F33EDFCFFB7D9EE73C47974824F83F976E25A0E59BCE75D1DEFBF00CD72F + 7FA4CB0A70E268DD9AC4450C454F17F2E63BEF6784FC2780EAEDCFF3580A6784 + FC2B403CAE70EEBB007BFD4E22D15846C8BA01AA783C9EE0FC956E0EECDEC1C2 + E2524648D680E1FB9374760E119A95B1D99FA2AECEC5739BED5C68EBD58AFCE4 + CA1A1096635CBC14D084B7941761CECB25321D66EAFE440A343032811C959124 + 498B39DDF275760055BCE5B3761C9E321CDB1D42DC844EA7435114E6E57946FB + 4778187C44D3613F66B3414BDBC5B6AEEC0167CF77905FBC096F4D3936430EF7 + C2301E5D7E67B5409E3EC648D720F353111A1ADC28A226DFB607B203A839FFE1 + 4A0FF5C71B291169B1EBE14E086E882C0813E488E70D3630CA53F48B4EF2EE72 + 512852F6FDD5EEEC00EAE973375AA93C50C55C04CC0A8C89D3CB4B5060165D24 + C242E2DE4A98B1BE2114D1413E7F053FFEDC9B1DE0E34F2E535A5341597529C3 + 63301703530E3C9B07361308034C2E08A09009DD1A606CE801FB1AABF8E9D7BE + 7F06A8C5FAFCC235AC22FFAE3D2E46C661711136E5C266711905A8C0080BC255 + 707A9E4737832CCE84D95959C6D540FFEA80E32FD56A1FD0E8F8B45683FD279B + 90643D2191A62DA2B076215C201C6C109738070392CC2F5F75E0F26CC5969FCB + B59EDF5607BC7AB84673B0245A51EDFF925D4E0A859389591D46B1F519E1C022 + F2633588B489E79B771E70B73B48B5AF428B09DC185C1DF0CA419FB651854833 + B2E6C2DFBC1BEB461BB373A20E8A0EBB69B9931E4F4DD37BA90B5FA59D2F4F9F + E575DF755AF3DE5E1DD0BCBFFACF39B3EC22223EB6E488F01CF163C9B7109989 + 30D0D6A7C544676EE1609CA6E2DB58BC47986CFF9463AD957F0F78F9054F4A3C + 098A2B097E17436C38389A9A455B9D0E0C7A3D5F7CF02E45917BD497C6707B8C + E4541DD320C5AF756406BCD8B0334D3C39399F0427EF4FBD518FD751AB419C6E + 03267F730A920638B4C7BD26F1E4BE336FED4B41563A490334D63AB52075AEA8 + 814BF1BF84944422A37872AD846C739B18948CE980BDBE726D22AE77F59C3A99 + 829C934AD201997E1E6B5D55D1560A771C659BC7CB1F1C73BA92B5793DE80000 + 000049454E44AE426082} + Name = 'PngImage7' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D4948445200000018000000180806000000E0773D + F8000000097048597300000B3A00000B3A01647F570D000002724944415478DA + 63FCFFFF3F032D01235D2C606464C42AB978D3F10C0E76EEE9E4181CEAAE0731 + 1B9F05AB775E3A1DE2A66B822E0EF2F3BF7FFF19FEFEFB8742FF03D217AE3F67 + E89DB19261F3BC2AFC16C05C0FB480E1E0E97B0CAFDF7FC5E95A51416E067D0D + 49B02513E6AC66D0D3353A03F481295E0B40AEB73751341115E2818BFDFB0F72 + 2DC4A5A82E87E0CBB75E3014D6F6309CDF391D6C204E0B905D4FACE120B9C9F3 + D6C05D8FD70264D713133C5A2AE20CD7EEBC44713D4E0BD05D4F8CCB4172A965 + 5318FC3C6C18EEDDBDCEC0C6C6CEA0A363C400348311C30264D7136BF88D7BAF + C129C7232C99C152959B61FDFA350C17AE3D63D834B712AB05FF41AE07197EF8 + CC7D82C1A3A620C2905E3115C570297975866DDBF7A35A50DBB3E03F30821880 + AE671012E0C69AC681086BFACFAE9ECED0589D07371C04502C689EB8E4FFEF3F + 7FC9C9B070C0CCCCC2202EA30C371C04E016D4F52EFCDF541C4FD0901FBFFE31 + 7CFFFD1F4CFFF8FD8FE1CF5F18FB3FC3E68D88A0F1F27444F5013116A01B0EA6 + A18683F0FE9DEBC0110B321C2388401650143EB060E2E063E0E6E165E0E1E621 + DE07845CFE1D2A7EE1C82686EF7F9818787878C0961C3A749AB005840C5FF4D5 + 8E61C1850B0C4BB5DE30DC38B585E10D304973F3F2822D397BEE067E0B8871B9 + F76901B0DAB9AAAF181E9CDFC670FFD173065E5E3EB025376F3DC16D01B1C1E2 + 9D21C43083D59481B5790BC38B2BDB192E5EB9C1C0C7C7CFF0F1CB7FD4FA0066 + 0138D9C10C40321C268E6C3848FC75B127D841300B4E9FBBC8C0CA210A361C24 + 8E62415D411CC3EC95BBC94E41CF9F3F07275398E12816C08A0A4A92A8B28621 + 43828F3E4AB90FB7809600004F6ECDEFF6DCFB3B0000000049454E44AE426082} + Name = 'PngImage8' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D4948445200000018000000180806000000E0773D + F8000000097048597300000B3A00000B3A01647F570D000002954944415478DA + B5955F6852511CC7BF3E9882694B723D6450D4A21ED61FB3879EEA295CABA058 + D1CB6A23A315C2A441AC4123368A82FE5011066D63D1ECAF6058291643AC8D60 + 966EB5FE3E64D4966B7B1841B1997A4FF75CF14E773DFE1978E070EE3D1E3F9F + EF399C9FCA082190C964284523F73A88AC54020A8F9E3323A7E0B6EB558352A1 + B2150BAF991C00852B0779742EC143EFDB40CDB64AA3241DDF398EC066F74ABE + 6399372AC2E93B53904ACF0BE00F7CC5C4E45FC99AB15FA3B054AD07ECE781C6 + CB4084876FD743D1DC01D97E736E014DBFC5B8DCA8D3CE17E7387E6D824FCE71 + 9CB083CE07BD387CA94AF84CE1FC88E8EE3550D45961F04411F2DAD882F4F42C + 78821FBB1D3E58E2EF10BD7A425CA7708FC0507F26B7203D3DEB78C423DABA12 + 38DD8868D02D1C0DF6D4C2B0D3CA16CC4E9F2D3927BC13F43CF2C3526B02EE5E + 037E8401F34940AB83C1740C2DC78F0AB74922484F9F0B4EFB1DD70B74D95D59 + 7717ACDF88AC75C00B084D4FE12F5F8799C7439B6EA10AAB962DC291E6EB30ED + 3B84CD152A389D0EB4E9E3D23A3875A19BACAD34804F0F6D994A4C3B939A8EC8 + 987378FA9975B0D770168FBB5A9282F62B3D24164FA0D8565EBE985907BB9E8D + CF085A2FDE226D4D07F302A7FF71988A11619C8E7178EAF531EB40BF64697182 + D9703AF6FAFCCC3A90088A3E9FD41131EAA0E01D644B9E7C267833D0C7AC8382 + 04B9E0B4BF0FF533EB20AF201F7C8A7FAE0E94096B3B2BC6F12DE446F87B046A + B5062AB51A9FBF8CB00585C0E97C75831637E49B206F7F82B1610F86863F41A3 + 5980DF7F8800A7AC0C413C91064883A7E6D3E1747EA2297945538240700872A5 + 4E8467085AAD0770F3FEF3B95C26A14522110C7EF899011705A99F8A39D3F9B6 + 62F506D4ED5827F9E71204A56CFF01E5E2820611E3A8010000000049454E44AE + 426082} + Name = 'PngImage9' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D4948445200000018000000180806000000E0773D + F80000000970485973000017120000171201679FD2520000029E4944415478DA + 63FCFFFF3F032D0123B2054BB79C24CBB6DE290B19CEEF9CCE882C063317C382 + 681F73920C07EA619016136628AAEB43B184AA1618682A30BC7EFB19C512AA58 + F0F7EF3F8615DB4F33D818AB337CF9F613C5128A2D0019FEF7EF7F86D5BBCE30 + 38596833FCFAFD07C592733BA6319265C1FF7FFF19FE02F11FA00520F6BABDE7 + C0918C0E48B2E0D687070C53AF4E62B8F0F6020348B59BB41F43A1661603EF12 + 0E8637E15F188E9C7FC0F0F5DB5786B76FDF82D5CF5BBA89780BE6DC58C0B0FD + D9620C4B4F3FBFCFF0E4EB038697219FC0C1F5E7DF3F30BD79EF29E22D38FDEA + 0283F906230CC303551CC1F4FA3BFB199E057E801BFE0F18275B0F9C26DE0287 + CD4E0C879E1F6028D56B606834AC021B62BEC582415D44106EC123FF7770C341 + 71B3E3D019E22C38F5F20283FB7627860D6EFB18CC8575A0A9E61F83D5762B14 + 0BEEFBBC811B0E8AF83D47CF116741FED12206676064BA49DAC00D1758CE8511 + 5C773D5FC30D07A9D97FE202610B400A6BCEB430D4E95532FC03CA234722321B + E6F2B92FA631C408A581C50E9DBE84DF82084F5370068219C4BF9413C3D5F7BC + DFC033DAD467ED60B164E112B0FA6367AFE0B720D4CD04C595422BB8E1A9E6E6 + 9BF70C5BACF7C00D7FCEFE942160971343B16E1D83277B3058CFE98BD7F15B10 + E46C84121CA2AB79512CD868B10B6CF8DC97D319BA2F3530D8493A30F42A2E84 + EB3977E5267E0BFC1C0D50C25A722D3FDC0274004A454DC67D0CAEAC81703D17 + AFDFC66F81B79D1E4A10C96C106490E15600E75A74806E3828C2AFDCBC83DF02 + 0F6B1D942092DF2CCC70DBE315C3F2D74B18763DDDC400D265206CC020CA2187 + 61380810B4C0C5520B45132C4271255564C389B2C0DE541D258DC33210580C4B + 9E40369C280B6C8C54C125222500AF05D82A0F7200CC0200F191E9EFB5062090 + 0000000049454E44AE426082} + Name = 'PngImage10' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D4948445200000018000000180806000000E0773D + F8000000097048597300004E2000004E2001167D99DE0000035A4944415478DA + ED954D4C134114C7DFEC6E0B420B085A6A040DD88A45C0C4602D4A2D281F5589 + F1AB6AA2094A4C5502DC34F160EAD11BF1E4498D462F1A43FC408BA052C11435 + F8890AA222A2601B6B2D94B26DB73BEEB4168B16E1E2C1C4974C7627F37BFFFF + CB9B995D843186BF19E8BFC1940653012693897AF9CEAEA5696825732FE72B6B + 3877F2B6F01A982A77435595F48F0646A351E4E3E3342CE7BDFBD1F6F1E7024D + 957CE6BCED6FCC66EF6485D71D3DDE617FDFAD9ECC00E96B6BC5727FAC9A65DD + 41718EF795A6CBE6F9699A6925738F67ACE091A5A5235AB2C1502DA1E3F108E1 + A219A0CA4A530C15CFE68F7986DB0814F0072AAC2DD71BC9A276FDA69D98E7CE + 7198DFDC616E6C8866A0D6EB13C448E48AB6078278A5209E22888F05C531E075 + F76E5CBB11660B4AD716D30C732BC0F37A6B5363535403B56090F2BB01D209E2 + 4AA96C99DB1D6A0BE251455BD395C6C8E4253A5D929491248F70CCD7A796CBDF + A219E495EE8A4F605CEE09060683412C92CED6F03CB64C26FE830F9F6B4A187C + D41D144EDECAFBF7D50889AC41039D4EC7C83354050850B0721FEB392441D892 + 1827C62C93E892393F7F3863B1F822049142A110CB6473553C254AA431041806 + 80E3001266A7D8ED036FFA3A3333F94237CB1103B4AD72DF0A0A51EDD18AE91F + EA3F2191CCBADA7CE9ECCD88EA614B556DC9E0A7B71BE7CF997FE0579E773B2E + 386C0EAB5CA962D1DE9A835AD273B25873B41E66C602385900DB28C0C008C0F3 + 0127F49C3282D3ED2F7FD16626170C6FDB53534CE140F39FF8A10FB6D573E6A5 + DE463B761FC061F17C39C0A03B34C209244892F9702924C5607DD6E2A501719C + A4793A7C863203D05C450ED6166AE1C8B17A9821F4718C9B5811097A580CC7AA + F38070E1980E1FDC2C7966567ED1AAD50F4945E1707943C3EE9998402A229196 + 9A06D3E159AF6719D2EB6B63B20A942D19E5C6C2746908F0064209E449E0272E + 1BBC3D5F37D865BD6BCCC9CDE5E4694AB3667F3D4CC5B73E7EB020784CD76EDC + BE70C4EBE9D96ABA0831B470DC9CE2F1EA084CFAF9CDE95C33EAF8D49E9D9D0D + 0AC5224D5C72AA85984CC6B37E9FCAD1FFBA7BFCA269CACA14CB57569CEEEC68 + 2EECEBED1B4F50E6A8067BBA7B770F753F89FC4453E5DB77AE1A1D1EBE13C986 + F9AE675D455FDEBDEA0DEEC1BFFF47FBE70DBE03EC16D6DE8FAAF1BC00000000 + 49454E44AE426082} + Name = 'PngImage11' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D4948445200000018000000180806000000E0773D + F80000000970485973000017120000171201679FD252000003784944415478DA + B5566B48544114FE362D31A3C78F104C7B50145A902FECE15299D12668ADBA61 + AE925AA405811585F4A31745FD308A0A42DB5EBBE96E56AE9AAF30CD2CC5C79A + BB998FCCEDA5640F15823233DC7B9BB9EBBDEEB65BAD5207863967E6CCF7CD39 + 6766EE15B12C8BFF29224AA0CCAF89237DD63F051689E21323C5D91CC1F5BC6A + 96186302A0EB68EC0CC3C2C430309918B34E7A2AF2DD2751A23A21B22210F965 + 9A17EB5304DD9ECD34256382FF25C11EA84D82DB8A6B9CDEFF301E771FE8A0D4 + 94E0E1ED745B020A36F69DD39EC5F4552A7CAA88437155A37D02478421FE96E0 + E6366293C610FD5E75D3F822A0E096B9363116E0C4765FA74677690CCA6B0D63 + 23287EDC850B375BF0A4AD177D9FBF63DA94499086CCC1B15D0198E2EA2C44E1 + 21D1E04DF16654D6373B4E702CF3098E663422FFAC049215B35050F5165BD22A + B8B9D0200FA84FAE11A2F00ACBC1CB42191EE99E395E03D76597F1FD8709BB36 + FB207DEF320E689A58C9CD393B89D0551243C6F81A985357D3D4EA5804F47424 + 1DA982BAD488C329FE48952FC6FDDA77901D28177C68CE79F0F91177D09E2B45 + DDD3F6BF13F005A5EDC730C3919C57B7C063E6645434F40804AF8B64233B67B1 + 28528B67B736A2B1A5E3F704F412D1313EDCEE8F0388492B87FE793FC2C45E50 + 1C0A86A7E4A64060BC1B2D6CC447560083261CFAF64E5B82046930B7800233FC + 1927FADAE462E85A7BB9B9B6DC284C759B08CF0D390241475EA4E0CBF7CD1D46 + FB04F4FA0F356CB75AE0BE2E1B43A4C854CA2E4AA02A3222ABE4A54060D044C0 + 89149BFAFAC616A1E146185A3B5FD912C46F5C8989810A7C23EF8AC9E22229B4 + 1D38AED07360625F77246E5A0065A111F7EB7AE03C4184D80DF3B047EE8D3A6F + 4F81D4455B694B200F5F0E97A02BF85293387A4B99D14233BF1C45ABB490A65B + 321B29CA73C84C48B54F10131664B573BB4056F3E6776778C447BF74EE9F09A2 + D707622AB9407D95F1E6428F000D5B00FFFA06D5FB8CA685CA8E3307A1D877CA + 6A4C2090860660C66A1537D853160B8FF51AC1E9457E14164AB582AD5787C34F + 5E840CC34E6ED7ECE057B0FD1FC0F4BD0778BDD380EB060B8288103F3B69F8F3 + EB49D36229DBB78A7145556D3F024A5058A973E89B604F86A242B02D7C01AE92 + 636C5303FAD1CFD196667D1B1C1A3741EC9DD348F40597168D6C3F92E2A4A31F + 7DF207306E605E3200E1FF6727C90CAFFF0482645308AD8246DC000000004945 + 4E44AE426082} + Name = 'PngImage12' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D4948445200000018000000180806000000E0773D + F8000000097048597300000E9C00000E9C01079453DD000003DC4944415478DA + BD947F4C1B6518C79F7BEF8EFBD56BAFC7951F33BA75E9822B88520C88D92C93 + 05C410CA70986D3261B1DB3F261B24D3F92331F2A799C6B0F96B666668165D88 + 12E7FE598CC14C639C43D0988D41B69974DD5A680B584A5B68EFFA7AAD81306C + 8D0BE2935CEE9E7B9FE7FB79DEF779DF97C018C35A1AF1BF020882C81978E004 + A6EB6BA106236D0B42E4BD080045E3AA8A35ECA3587A607709717531F60ECD7F + 0378FFDBF806A9807E2734956898F027A94844054D03C86310701C02AB950B47 + E3DA075D4EEEA5BB069CB898DCC671D03F3E1655BCDE0548A520F3A4D332DFFA + 9BA208D8B2D5047351B5EB48BDD09B13F0E27B41E7A580E5870B3D849AF64F5F + 49BA522AEE1B198E48B11806DE40416C4EBDA380A9192D03E278048D0DE61BDE + 49B2FAE5ED309515B0AFD7838D14FFEE3C6DE9AEAD559B6211AD7F642842A91A + B1243E3D1D85D999202416E2C08B0A30BC5907109999382A045C5E2674B6DAE0 + 93AC8096377EC7452C8F79237DB6AC5CAC1BBA14165329B4243EE10B82DF3B06 + 34237E93C2DA607C36F4B849595F67B26C22B03E0B399F82E626F9B3A76CB027 + 27A0D0600235F9D7325034B5241E0C84E1E6F591A02E7870F058D599F4F87AE7 + 295654882F8B37D434D08CA4C7226869967F7CA6143D9A1320911C305C5EC65F + 140F8713E0B9368C3535F5E4D069D7F9E53DB0EF38D526291BFB8DCAFD603090 + B0C3257DB7A79474660534BF12C0884A81C9844056988C7824A24168D283FDDE + AB472F7FD17164E52EB3B77D7C1FCF291EB9F8613D8F84D656F3B95D25A83927 + E076488375051498440C825E5178568399D0ED9F3DD7475CE35FB97D2B01B627 + 3EB218154B405E570D160B05AD2D52DF4E1BDA97133039A3427AD714EA0D33EA + 907455A169350E40BA075EB37CBA12B0A9ADEF1E91C9BF251557C1462B03CEAD + E25BED65E8705640E5013F9E5767F553A4014AA9A07700B4E43CA49271482EC4 + E7584172FD76A66E7039A0F2D9F35588CCFB49904BC1F1100F763B77F0390779 + 3C2BA0F11830E274805EF4037F3BD731F5428F757EF91FC7DEAFBB04B3ED6D82 + 12A0A9D1A4996554ED76D0C35901FF74D965B347BA6F725AD8F73D27592BD3B9 + 9DED66DF956B0B9547DB8489FF0450D171712F6750FA106D440F3EC0E9CBC39C + 7CBE266FFF5DDFA6D9CCDE71B98867F02F2C5F50C43024EC6C312646C763F6E3 + 9DD28D5503CADB7F1568160D7086C27A8AD42FB97A51CDB75087DD0EAA373DBE + 6A40C5FEB10F395674CB324B6C731A4010D09B7E0FF56ACFD34462D580C70E85 + 369BCC7874730987CB4AD9D1C980FAFA0BDBD9CF97C7AC0AE03C3423EDDA2D9C + 5414FADCAD089CEDAE20FE58199313B016B6E6803F0192C0D6E065D4DD9D0000 + 000049454E44AE426082} + Name = 'PngImage13' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D4948445200000018000000180806000000E0773D + F8000000097048597300000AEB00000AEB01828B0D5A0000053A4944415478DA + AD956B50546518C79F73CE2ECB5ED9B3ECB22C48800A02CA45101BBCA005D9D4 + 4C17758C6FD57899FAE0D4871AB3CC6B5FD2748CA91877600AB3A949CA4427E3 + A65C1409729565B92CEEB2807B935DD80BECB2B773F6F4420A5841493D33E7D3 + 7BDEDFEF39FFF799F760F058C5601F2BAB443E079B0C077DF250304086432117 + CDC6AD3EA77FACAC6CAF77EAA5B93BB07F8B3EFD55A37872CC95C7E5725E6671 + 584F4570D871188E7182815068D2E3354E38DC17273C8E2B9DC33A4D735599E7 + B10495E76FC63B6CCED7F8A4708F58267A429620C5C4B1628C601310F006C06E + 1A656CF7ECA151B3ADDB366256EA07BB2EFEF4CD19FBF427FF13FCA4F29214A3 + 88BD9218F2CDB4DCA531B1F1122C40B0C11B02A0C37F74C822502A011F63EA37 + 33BACEBB8377BBD5A75B9B7EF956A3B9E15C50B063C77922AF20622B29979CC8 + 29484D4C7F428647E038DCF703BC70E826681A34F0F9B15720398F0452C0000F + 0FC1B0C640AB9A3ABA55ED8DEFFD5C5D797541C1A7E5D5F2E024766C59CEB29D + F96B5388380E0BC351CFEE2040E187B3024516096C1680044958FE71467D4D1D + AAABAE52B65D6F38BAA0E0E8890B05B21871E5AAC28C94D8043926A601F80480 + 651260DB47B382F47C12BC14008ED6A2793458D4FDE196CBB53D576BBE7B635E + C1543C2B32A8ED4B33932A5617670929161F761EB9396F330F6519EB49A06C56 + 4655D3EA3A5B7162DF0282C3112969A9AFA7E7A794E61467478E072360FD66E5 + CC7A6671E634746E4D0956AD2301BC4EE8ACFDD5AF2C3DF2C9BC824D9B0EB30A + 3624EF589EBDBC3CB7389B1F2004A06A76CEAC2B5BFA66BA9E5B1B3693601DB6 + 30B7EB5B3D155F1C2B5DF00C0E1CAE2C8C8E8B399BFB744EA2302E16333B3020 + D08E680EC09EE3B367B0BD98041A4D2A9A5AF08469E8EAE8635A2E5D19BCF07D + D9A90505EF1CA84814F1F92757ADCFDC96929F8A8F4DA2F9F7014421C1C62DCA + 9958B622C154518866754E80A6454D55559EA96F69AA3E3EAF40B57FCB726D50 + C0D2466DD9268D4F7C376B6396589A28C7EC1E0218344D7DEDB371BD84040CC6 + 80C31F64746A1DEABECE5873F9EBB33A9DFAB3BF15B41F78A690C7659A3D9152 + D044AE8500AE08B1F83266C593692C91428A071836BA0470E0A2B1E4A10747E1 + 38C6BD8C65C014EEBCFE9BA3B1EEC7DAB6EB57CA298A6AFB8BA0637FF18B3C11 + 5D91B03A534684ECA0712583C61D0316271EE408E4DEA495295162B904E39242 + 60B1D998DFE367D04507F6210BD577476DBD73BBF9467B5BED799FC7D38470EE + 47041D1F146D1788C22715B9EB92843C0A5CDA4EE8B708A163221E8C7E4269F3 + B0FB2339FC2269AC224D1EAF904444B2591E97276C1A1A720E1B740383035DB7 + 7A7B54F5341DB88D702E987BD94D752E10D3A58ABC8D4922AE7F1A6E30B2C130 + 26048DD50A23E38EE7CBEB354D19196B93A3158A748C2696D1B43F0AC5002EF7 + 98C334ACEFF47ADD030835821EDF432EF630733E9FFA217ECD3A998817828981 + 2ED0E93130B824A0350D41B7590F6E7FF0B9BA2E67CD833DE8E6017410403CE0 + 4C4D68706A90E0CF3F1CD5C1E2A24801D1B0243707F85C149AF60E188609E877 + 4483D6A8875E8BDEE5F4516F35F6B8CEC1220AEB39FE2CB3247B25F0055C14CB + 2D1834B2C0E010836678007AAD7ABBCB1B3C78AD775CB918F8B4A0FE5409B366 + 752A50860E1832A1CC4705A0351B416DEC7721F8FBD7FAC6CF2C163E2D38B4EF + 6D2647781F12682F82F3A0CF6C821EF3008C7A03AF2E36964704BB77EF629688 + F9407A6CE01CB987E006704FFA76D575BBBFFCAFF06941494949915020688811 + F1E15E4F2BD82CFA5D63DDEE732A80D0FF21F81D69327688E78891A000000000 + 49454E44AE426082} + Name = 'PngImage14' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D4948445200000018000000180806000000E0773D + F8000000097048597300000AEB00000AEB01828B0D5A000005234944415478DA + AD956B4C53671880DF7329BD9CB6B4A5174A454005112F205E16DCD46C3097ED + C7B2690CFFB665BAE80FB3FDD8E2DC8C739AFD984EE3C8326203D9702E5B069B + 139D8E9B82283299454AB9147B81DA9BB4D00BB4F476DAB3AF80896E02D3ED24 + 5F4E4ECEF99EE7FDDEEF7DBF83C1135D0CF6B9BA4E18F2B0C4896848118B46C4 + 8958CC1767E1CE90373C5E59B92F98FCE8E119D8BF459FFAB6553435EE5BC7E5 + B25F23D9E4F3296C56068663EC6824169B0A04AD931EFFF9C980E7728FC5A0BB + 5657197822414DED4D95C7E57D93120BDE11C9848B6599524C942EC208160191 + 6004DCB631C675CF1D1BB3BBFA5CA376B571B8F7FCAFDF9F764F2F7921F809F5 + 05294613FB2472F1DEFCE225F27495048B102C08C600E2899908490265251262 + 6C4376C6D07377F86E9FF65447DBEF3FE87437BCF30A76EEAC25D695A4BC2E56 + 488E1795E465AD582CC353701CEE870106BD00D1F84C0E481C40CC678087C7C0 + A233C7356D5D7D9A5BAD1F5EAAAFB932AFE0CBAA7A45740A3BBAB468E9DB1B36 + E612196C12C311D11F05E81E07F044101F9B192C12408224647882D15ED5C69A + EAEBD49DD75B8ECC2B3872FC5C894C2EAA59B5A520373D53818950C41401E098 + 0218F2CD940B8F35B38A200D80A37769BC3838B44389F68B8DFD571A7EDC33A7 + 20999EE505F48E25ABB3ABD796AD11D024056EEFC2BBC6E502D02E27A369E8F0 + 9DA93EBE7F1EC1E194DCFCBCB7566CC8AD282A2BE44C445360EF6737E704EB5A + 7470E9B73D4071D043D00B3D8D7F84D5159F7E31A760EBD6C364C973393B9715 + 2EAB2A2E2BA422041F4AB6AAE78D3E295009019C1607D3DDDC11A8FEFA68C5BC + 0B3E78B8664B5A86FC4CF10B4559828C74ECBE77E1B6C9498D436FD720D37EE1 + F2F0B99F2A4FCE3BE3FD83D559428A3AB1EAD9D5DB7337E4E1E353A8FE4300A9 + 6C00394A059B98ED83590A8DEE4EEF24E8DAB5745DCDE9E6F6B6FA63730A3407 + B62DD347F9A43E75DB76A92AEB83359BD788A4590ACC1D208041D5244896650A + 2A4FD4033896DC7C063CE12863D01A50F44DD6868BDF9D3118B45F3D5670EBE0 + 8B5B785CE65A8023051D67234470658CA464CCF267F249A1528A4718549B0C0E + 5CB4021E1A3824C03311641C265BA2E7FA9F9ED6A65F1A3BAF5FAEA269BAF31F + 82AE0365AFF284F1EACCB5AB6544CC0D3A5F0EE8FC727078F1289BAF0866AFCC + 4D15292418572C0092C5C2C28130830E3A708F38E8C13B5AE79DEE6B376E7536 + D68602813684F33F22E8FAB874075F9838A12CDE942DE0D1E0D3F7C09043005D + 932AB08609B52BC01AE2B0A95269BA325FA1524A52382C32E00B246C23235E8B + D9601A36F5DE1EE8D734C7E3916E8443ADF850DB2423E78BE215CA759BB385DC + F034DC6C6581795C003AA71346273CAF5435EBDA0A0A36E6A429952BB038B134 + 1E0FA7A23480CF3FEEB1598C3DC1A0DF8450A368841E70B10739A728FA67D5FA + 4D32212F0693A65E30183130FB24A0B78D409FDD08FE70F4E5A65E6FC3EC1CB4 + C5903C2488590E3A57219A2C24F8FB0F4773A8AC94C3275A1615170185DADCAF + BF03660B01439E34D05B8D30E030FABC21FADDD67EDFD9059BE03117D67FEC25 + 6651E14AA0F85C9496DB306C25C1EC1181CE628201A7D1ED0B460F5D1D98503F + 0D7C5AD07CB29C59BF360F6873178CD850CEC7F8A0B75B416B1DF221F8475707 + 274E3F2D7C5AF0C9FEF79822C17DC88C07119C0783761BF4DB4D30168CBCF1B4 + 697944B07BF72E6691880271C005DED17B086E06FF546857539FFF9BFF0A9F16 + 949797970AF8FC16B990827BFD1DE07218778DF7F9CF6A0062FF87E02F9F6855 + 88E7298D620000000049454E44AE426082} + Name = 'PngImage0' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D4948445200000018000000180806000000E0773D + F8000000097048597300000AEB00000AEB01828B0D5A000005A34944415478DA + 8D960B50546514C7CFBDFB625958DC455049C8074A3C44B490C67C8C5A098A8E + 8E61A0E68C363A4C884C5A3E7240D1F1C13496A58E634FCD0AABC9416DB29C18 + D9626C542052234904158170A10576F7DEBBDF7D75BEBB0B3E82F49BF9CF7767 + F7DCFFEF7CCF731918B8E950C1283B6AB8D96C8C62F5AC4994149EF0A4197F6B + 4575A13894D29F81AAAAC00C601EA6D3416A5090F9F9509B65AA2D3C74C490E8 + C121C19620D6E316E4F616678FCBD973C3E5723B445E2CC7F81A94F7710034EB + B17ABD7E516C42744E424AECA8F8F1234D23C63CC10C8D8900539001BC5E1E5A + 6EFD0DF57537D53F6A1BF9FADAC66B6D8D1DC7144529C3776F51DF8100D43CCD + 1E11B626754A52C69CACA9831252464358B815581DA305CB8A028AAA804F26E0 + 1638686DBBAB5EB9F417549EAA71D6573595096E72103DAEF442EE07B0A8F1B6 + 48EB96CC97A6A72F58362B3866F43046A763FBD2A1C6C5F90ED8F8EEB3C0893C + 78509C28809BF74243FD6DF5E7D2AA9ECB3F5DFF9678C91E0C6FF0FBDF034418 + 0CBA4DF397CE5CBD7CCD7C4B544C24A36391C930BDB940D19A735AE0EB7B9F06 + 0FE1347935103EFB38B8D3D0AE3A3EAD72D59737BD8361FB513DBD0093C1C02E + 9B38257157DE9625914F258F445F06588645E1D46048515E399C2E3D08F372F2 + 20B7244933778B5EF05210422888230234D5DC81F3876B9B3AEA5DEBD1F73402 + 240A181E3ED476287BD5EC3959AFA6B366B34903E8581DF66C9F396D14B0724F + 3CB87D1E70138F96B936020471124E57B7176A8F5F93AE7F7FFB33C9236D4440 + 07CE33A4C7A5C41ECDDF9A13999C1AA7654DB3A7806DF9157DE6BD80FE5AD4AA + 0EE071148244A0F9421B5C3DD2D0E469E65620C0C1982C86E21973D336BF5698 + 6D1844774C20FB9D05950F98D31D24490A88921C90FF39B7E02DB0AF6C418080 + 001F74B5F640DD478DA2EBF79E4259944B98109BE5544E6E46E6E2D5E98CDEA0 + 031617F7ED75171ECB9C2A7F7D21985FB901BCE407705E011A4BEFA8CE739D47 + 245E59C9D822C2AAF28AB3274E9FFB0C43E77EDF869AC736F71109DED85C0CCC + 92BAC0088876465ACF38D5B613CE5F658FFC1C631F32A8A660D7D209A93393B4 + 1D7968F3953E407FA6D243CF9B0A77009F558D009F66EE9345E83CD705EDDF74 + D6CA6E790263B5592A96AD9B37EDC5ECC98C04321045842FB7DE8413C7DE7FA4 + 39ED0B8B77C13F0BCE6BD3A3017C22749C76A9DD673DD58AA0A432C1A1410766 + 2C9A949BB576B60E8218201844213FEC76C1E71FEEFD5F73AAED3B4BA0655E05 + F81040307BA18B40676997CAFF269C54457521C31AD8E58993461F78796346A8 + 2DC61A18A61F72699F0A1FECDFDD6758F06651BFDBB431E34704F8DFE11A04E8 + FECACD49B7E5125556B7D383161F1963FB62F6EA2929492FC4323E55BC079125 + 683C6C85F7DEDEAE01E8822AD957B5E9E051DAB468BDDF5CC445F73838953B2B + FCA276AB5BF01C545240A8C1ACDB903C2B6EFDF455A966A3DD0082ECD3168B42 + 44EC5D47A361CF8E426D41DD8B2EF6ED169A756FE634195F1B016F19D72DD5C9 + 5B41828F11E0E9BDECE22DB6A092B4A5E3D3C7A63FA9978D0AC35388F6B27F67 + E8BF4ED602DB321D81D1899A4445F2F76E51E52A0442CAC5E340A010439BEFBF + 4D8DA8CCC1636D45E316C4260E993458279914C6171809096CBFF09393E166C6 + 59CDD01730A72324682E54119138C845F52E6C432F074A7AB8E0846255586C1F + 655D1B3D6D5842449A5DCFD870573DB026FE7511E994507311FF6B2720541322 + 568BD56A3BD0ABFA3B943050C9B4A266996C8615F6C4B099D6849060D3082303 + 363CD1264583116AEA45E05DEC9B7C2AA9177BA4EBF2192CFD9FE0BB9528FE51 + 45DF801AC31AD9857AAB3ED318AE8F3344E843749178EF5A8021DDA24ADA4549 + 724A3DB24BF95375AB65B8A02703F5587A54D1EF6DF477FAC91285953A99D1C3 + 38303276BC074D8A0CBC4A54271EFACBA8AB18D30EFE4F97FF340AF8172272E4 + FE66E507F40000000049454E44AE426082} + Name = 'PngImage16' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D4948445200000018000000180806000000E0773D + F8000000097048597300000AEB00000AEB01828B0D5A000005A14944415478DA + 8D960B50546514C7CFBD771FC0C2E22E026A8A2F140145B490C65047AC0445D3 + F111A463A38DE608CA949A1A83864C2AD5E8543A4D33659AD360E3E8A036D958 + 069B943D80C8576E12A8BCC28559D8C7DDBBDF7D75BECB2EBE60F49BF9CFBD77 + F7DCFFEF7CE77B5D06066E1C2A0C65450D0F0D350C6375AC5194141FF19166FC + AD0DD58DE2514A7F06AAAA0233807924C7415A4848E8F31116D30C4B54C4A8D8 + 1183C3C34C21ACC72DC81DAD0E97D3E1FAD7E974DB449F7801E3EB50DE2701D0 + ACC7EB74BA25F14923F29252E3C7244E1E6D1C35EE2966485C341843F4E0F5FA + A0F5F67F60BF7E4BBD56DFE8B3D737DE686FEC3CA6284A05BE7B9BFA0E04A0E6 + E9D6E8C882B48C89D9F396CD1894943A1622A3CCC0728C162C2B0A28AA027E99 + 805BE0A1ADFDAE7AE58F7FA0FA4C9DC35ED35421B8C921F4B81284DC0F605193 + 2D31E6A29CA5B3B216AD9C1316377628C3716C5F3AD4B864A30DB61D781678D1 + 071E142F0AE0F679A1C17E47FDA9BCC675F9879B278997ECC3F0865EFF7B8068 + BD9EDBBE7045E6BA55050B4DC3E262188E4526C30473D12EBB0A2AB5E0B57B13 + C14378F06A201E3C7E1E5A1A3A54DB17354EFB85A6FD18F231CA150418F57A76 + E5D48CE43DF945AFC44C48198DBE0CB00C8BC2D260888A5192224169810DCE96 + 1F820579F9F0D2CE58F02284F68482782240535D0BFCF2697D53A7DDB9197DCF + 2240A280E151432C9FE4AE9D3B6FD96B596C68A85103702C87572C11CB8084CF + 7E4584F736546900DA2824638BB1B70708E2252C578F17EA8FDF906E7E7BE74B + C9236D434027D619B21252E38F6EDC9517939296A0654DB32F2DBCD8EFFCA500 + 3AD892A4C0D2570B21219F0737027CD80B4122D0FC5B3B5C3DD2D0E469E65723 + C0C6184DFA92D9F3D3776C28CED50FA2332690FDBB85D57DD9DEDF82E6A2246B + 5AF5FA56B0AE69458080003F74B7B9E0FA678DA2F32F57B12CCA654CB8C57426 + 6F7D76CEF275598C4ECF01CBB25A0FCADEB8F408E061733170BFBEF06D80BC6B + 1A80F70AD058DEA23A2ABB8E483E650D63898EACC92FC99D3A6BFE338C36B808 + A0A37F606BED038081CCA9FC44822D3B4AA07BF1AFDA1A693BE750DB4F392EC9 + 1EF939C61A3BA8AE70CF8A29699913B5A9884B09449C31878BEC7D80FE4CA587 + EEB7179742FB822A0488D055D90D1D27BAEA65B73C85315B4C552BDF5C30F3C5 + DCE98C0432109C2DA22CC189DD2D1AE049CDDB722AB5ECFD7E113ACF3AD59EF3 + 9E5A4550D298B0889083B3974C5BBF6CD35C0E421820184421DFED75C2A9631F + 3D91792BCD1CEB4F307BA19B405779B7EAFB5338AD8AEA6286D5B3AB92A78D3D + F8F2B6EC084B9CB9370BD4CFFB49BFD3F4C3F7773F98399AD3C1F54BBD89F10D + 02F47CEDE6A53B72992AABBBE9424B8C89B37C35775D46EAC417E219BF2AF641 + 08968ABE4402CF3D4747C2077B77DDCB9C9605CD8580B98883EDB1F12A7F5EB8 + A8F6A8453859AA2920421FCABD95322761F3ACB569A106AB1E04D9AF0D163515 + E5205004B97C02EC2B2DD6CC5B727ED4B20E664E93F1B713F056F03DD27519B3 + 80CF11E0096E7689264B4859FA8AC959E3B346EA6483C2F8E460B77BCD697DC3 + 4E3EAD05DFCAFE5E7BA6A2334EBBBA4595AF1208B9201E0702C518D67CFF6E6A + 40E50C1E6FD93969517C72ECB4C19C6454187FA02724D083A8D3D3D1FCBC66E8 + 0F98D31E1234176A88486CE477F52EBC835E3694F4F0811381A7C272EB18F3A6 + 1133872645A75B758C0567D50363D23B2E222D093517F1BF0E02422D2162AD58 + AB7600DDAABF4109031D9966D41CA345BFDA9A1C99694E0A0F338E323060C195 + 6C543418A1A65E04DEC56B935F2576D125DD94CFE1D17F18DFAD46F91E77E8EB + 51E35803BB5867D6E518A27409FA685D381783FBAE0918D223AAA443942487E4 + 929DCADFAA5BADC0013D1D388FA5C71DFAC1467FA79F2CC3F0A44E617430090C + 8C15B729A322834F25AA0317FD65D4558CE980DE4F97471A05FC0F622CD6FE88 + 2F15D20000000049454E44AE426082} + Name = 'PngImage15' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D4948445200000018000000180806000000E0773D + F80000000970485973000017120000171201679FD252000002814944415478DA + 63FCFFFF3F032D0123C8822F5C7FFED767DC625876E301458645692830B0B2FF + 67E8ECD06184391CCC282EBAF6DFC7478B21AA671BC3F36D5E040DFAF3E71FC3 + EFBF7F19FEFDFB0F66FF01B275A20E32AC28E766F0F2F26250538B63387F7E3A + 235E0B3AD73F25CAD571D6BC60DA28E108C3A783A160365116E07339C4D540FC + 07C1364B3EC6D0E0AFCDF0EBD72F8679F3FA48B7009FE1206C957682A1CA5395 + E1E7AFDF0C4B974CA65E10051AB28169FBACD30CC5CE0A401FFC6658BD6A06F1 + 3E20E4F2DF50BE73DE59862C2B09A0057F18B66C9E4F9C05C41A0E4A45EE8517 + 18524C44C03ED8B573097E0B40C9AF7BE333A282C8550D92DEBD4B2F31C4E9F1 + 03E3E017C3C1FDAB705BF0748B2786EB103EC04CFF3039FF8A2B0CE11A9C601F + 1C3FBA1EB7050F37BAE3351C3DB8FE41732CC882402516B005674F6FC16E0138 + BB032D2107C00C07E583CB1777E1B6E02FD07520853F7FFE82D0504DE86C506A + 8188C1F81039909A5BD7F763B7006678754D0159BE5056B303EB7FFCE038A605 + 6E6EC05CF813E292D6B60A9002AC86FCFEF593E1F7CF9F0CBF8018C4CE2E3A0A + 16BF7DF30083AC822558FFCB6767302DB0B757807BB3BBA70E6C0137373758B3 + 868605C3D9B37B310CFFF3FB17437EF969B805E252266033DEBFB9886981A5A5 + 343C0C274D6A065B2025A5C42029A9C8A0AB6BCD307B563586E1BF81EA4B6A2F + C22D1014D107B3B15A606C2C0A8DC4DF0C336674802D303676061BAEA666C450 + 90EB8461F81F20AE68BE4E9C053ABA02F0208216B70C09097560C385852519C2 + 8395300C07D1B59D77095BC0C8C8C8505478F5BF82222B72718B35CC910DFF07 + CC78F53D0F88B300040C0C32A8D202B87061066A9D4C4B40730B0038C31BFE85 + 5838D40000000049454E44AE426082} + Name = 'PngImage17' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D4948445200000018000000180806000000E0773D + F80000000970485973000017120000171201679FD2520000026D4944415478DA + B5966D48535118C7FF138A455F84588C0A7A27AA1163CDB69168929851CB5806 + 81D5878A7C29412428484264A85006814342E805112DE8436F94F43E74393775 + ABC1552C87B5EA6286B7B01AB4BBD3CE8D0DC57976B7D9038773B8F79CDFEF9C + F33C17AE821082FF198AE982F607CE946C4DCD3731D8D5A2A063FFDA73E4C9FB + 469C8CB0E30A4AF61A928247D660F9D225A8BE7019366F0B0CD595C8186B43AB + 4D9024F322D06E5C8521F75D2CAB2A85E94026E010C00533D1CD09E99D4014C3 + E87CE482F2A717D93B8A305AA381A97F4282D3484B40E1A248F0BAE33486825A + 188D464C0A5FF1A3AA002A9EC0C7837D457957C7124A6A958DD896AF4146C08D + 1B1E23D46A35789E87D56A452010483EC9244C20465A28B27B6767650CFEE5D7 + 38BE8F7F46AF5026C1559BCDB1AA922D48040F0A1E145B57E06C7D2BAEB5DF4B + 4E20176E7778F0F0A54B9E205E0EA6DF793C38DDC463BB5BFE0992D97974DED3 + 9E01798254E0B4745FF47A120BA2354EFB70E47D435D09FE902294177630E1B4 + D95D6FD88243BBB324F8AEEB01E95959A8166F3F4E4137F509CEC515B0AC3922 + C1D7D574CFC8CF95DC050885C370F4FBD88283057A69277432ED2FD51FC5999C + 85F03FE7E00F2A71E7C322D435DF8A9D303A2F3A767939B6C0B253175BD4D556 + 0197E3154EE95663D0FF1B8E491EE50D7D73C2693FE01B660BF6E569638B8E9F + 3886D1110E2B5504872D7AE8CD179970DABCDC085BB027678B34B1F8F604BED9 + CC385FBA1586FD4D33123F179C26DC37FC8E2D28DCAE99B5482E9C464241BE69 + 53CA705982DCAC0DFFEA5F24B36A9C7E132CB82C41B66E3DEE3FEB433AC114D0 + 3F84F988A8E02F75743575B8E251160000000049454E44AE426082} + Name = 'PngImage18' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D4948445200000018000000180806000000E0773D + F8000000097048597300004E2000004E2001167D99DE000004124944415478DA + ED955F4C5B551CC77FF7DEFE61D0C204D7758139C15684752C1A565A47D7A983 + 1664449D75337301A7D68D8CBD69F4C11463627858427C30DD8B3A0C8B0FBA10 + 71B8F247470706A6996E93617173C060A56D645DD7526EDBDB7BBCE75E6F2D5A + 46E2E29BBFE4E49ED3F33DDFCFEFFCEE39B7044208FECB20FE07AC0A584DE070 + 38C889EB011345C1101EC798786D77D747DF72DDE46A6B1B0F1E54DE1560B7DB + A57136DB4033B17373FEB9BF262872978F898D5C73B9622B257EB4ED83B1C0B4 + 47BF1280B0B6B6CAD4892C3D4D477873868DD76C543D90A028C9101E47A34BC6 + 1FDD83639916DB6C2D0A2A0785B12E1380686A72C8C91CBA72297A67188B9289 + 64C3E8E0D7BD78D2F4F4B3FB11CB7431887D6ECCD5DB9D09A0B75A7365843494 + E91D70E64D9C790167BEC49B2340F5DF9D397D46D41A6BEA9EA024926F922C6B + 1DEDEBEDCB08D07380827F02083367AE55AAB64522425908966818EEEBE94D5F + BCD56C5EAB9428F2C38CE4D625F797B733012A6A5ECAC9958422CB00369B4D26 + 55AE33B02C72AF64FEA75E3CD724D7D88C6F903B79DBCF9FD7138474940798CD + 6689BAB8CC4800C1671EA7A36F2A08E4CECB96215A921752057D373ADDEE789A + 21A1D168642A5561194B4AF3280449890480610072D7150402B3D7A62E9494B0 + D5119AC100E285A6D71F27097224533233F3334E85E2FEAF064E7DDA2F663F57 + 21DC01DB867AE7A60D9B0EA7EBF3E6273EFB708DFF45DF758F90C9AB47DE30E1 + 9AE3C191B60EB82F0B204803F8170166C3003FCF0661F2633B042309CB956117 + BE60E83897EC6B4E07CC3BDF85503F9DD2FB16A2606F7F14C8DDCDFCDCE9CB1C + 605FF361249A57AA01BC11A189001C18E27ABB06D6CA91B574F3634959B66260 + E709278890E91E9AD737BE550E64FD81947957DD6E200A353A64AA36C13BED1D + B086ABE312B37C0738A83B32686FA900AC1303EB87D5592988BAA41408CBBE94 + F97B1A9D50226EA272E78E277FC03B102314135A20BA1C50AC2DE6C745EB8B40 + D48F3F9805AF580BF9BEDF7B93374FF4B3BC9E8E45B711566BABBCD4A81D2CB6 + D8AB372A05C3585200E02736BF18F2C36F278F7AC747CFD9755BB630EA22ADCB + 70A803B05E1EFE1D2C6D55BC398EEE636C4A3FF4D3F70FF1C7B4EE99BD0F8763 + D1C9E71D9F839CE2DE605096DA0D16E3FADF0E069F5A5CB839525E5E0E1ACD23 + 86ECFCF56EA3FD18B4BCBF19FC37A6F9CCF14E30A82AAA033A112F5B98F9D593 + BA6886DA5A4DD5F6864F2E8C0D544F5D9D4A01B4BA32EFA4E76AF3BCE762FA27 + 9AB4ECDDBFE340E897B37B923EE81CF0420F57B646EE0E8990A2CBC2255EF5FF + 60A548580BF7708F2FB0399344CD87003AF1EFDC1146E9907B01A0D1F1004CCC + 254E70E62FA7CFA543FE3560726B3E3A7BE916EE2A38C0E2DFE731A4A1E21E4A + 745CF86CE838F32B77D3FC01CF05F8A9B438C37F0000000049454E44AE426082} + Name = 'PngImage19' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D4948445200000018000000180806000000E0773D + F80000000970485973000017120000171201679FD252000001B74944415478DA + B5943D2C044114C7DF6A5CA150894204052AD14B7C14D7701D9D44EB4A854434 + BE3A89E28A0BD128080DA7388ABB444E88904B705710111FA5467D91DB9D9D31 + 6F6677CFB9B998DD75AFD8F9DCFF6FDEBCFDAFC118834686810063BB3CC9FB47 + 8AF52988475241C585B6036089C1DA0D7345FE88478C7F030841FF5137CB0A60 + F5395C2156FA95597A80D3F377161BEBF953C7223694BE4C20361563D324109B + 598442762B3800D75110C54DCB167D14C638CEDEC0CE7E3A3800D76C14E4E284 + C81641160761A4CFF2C100388745213617B628942DC2019801952D9180ECE55D + 30804D2950CAE0F0D586E98BDAFA27064A106D3321775DD4074C8C763B93F2E4 + 16BF92965D06F5FC5118FE84ABDB077DC0F88804C8821271E7AD074D10C61F6C + B639E501A2439D62567E2D4464D09EFC08A4EC65B0DC6754D520B997A9DAD0D5 + D10B61FC719FD9AC0096D6376A5E5C5B988730FEF00086A1FE9F9DE4DE42F9C3 + 37C0AF3F7C035C7FE049F1C41240C518A1652703D71F5A00953F4C47D86BC555 + 71805303D71F5A00953F4C2703B7B5BCB104E48B4FFA00953F7E9E5C05283EBE + F8ABC16F7FE8843640E50FDDF0008D8C6F397A5EEFE9EAF0950000000049454E + 44AE426082} + Name = 'PngImage20' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D4948445200000018000000180806000000E0773D + F80000000970485973000017120000171201679FD2520000018C4944415478DA + 63FCFFFF3F032D01E3A8054459C0C8C8C860E091F0FFC28E058C843490AA8E3E + 16187A26D22C9C864910812CA079102DD87000251E40E23F7FFE62F8F90B827F + C0D8405A47439528753D15A98C2816C4FBDBA3D8FEFBCF5F08FEFD17CEEE98B1 + 9461626D1651EA26D565E3B6009BA64BB75E306CD8B183617A733E51EA66B414 + 60B7009BA6DF7FFE315CBFF78A61F9860D0C0BBACB8952B7B0A70261C1FCF5FB + FF270438E0D404A2EF3C7ACB307FC54A861593EB8852B7724A3DC282192B76FE + 4F0A76C6A9E91750ECD1F30F0CD3162C625833BD8928759BE6B4212C98B868F3 + FF9450379C9A40F8C59BCF0C7D336633AC9FDD4694BA5D4B7A111674CD59FB3F + 2DCC13A7A65FBFFF30BCFBF89DA175E21486CD73BB88527778F51484054D5397 + FFCF8CF4C1A9E9D7AFBF0C5FBEFF62A8EDEC61D8B6B09F2875A737CF415850DD + BFF07F76B43F3889E103152D1D0CDB164D204A1D4A5151D231FBFF2F600EFCF5 + EB37C3F71F3F187EFCF809A47F42E89F20FA0730DCFF8035DB599912A50E6E01 + 2DC1D0B7000029AD9AF9DFD03E1F0000000049454E44AE426082} + Name = 'PngImage21' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D4948445200000018000000180806000000E0773D + F80000000970485973000017120000171201679FD252000002694944415478DA + B594CB6B134118C0BFB9743D6841A48A1E5A1FF1502A5AA555A3584544BDE829 + 1E04C58B87E4A247FF84EAA168AD90A017C17A908882082A8A50A15AAD448B0F + D0F8A8252D4A1A2D096477670DE37C3B997D249B6636E007C37C330BBFDF3CBE + 59C21803F305615A9411E061E75F7972C233AE7E6B25080A60943073031F4492 + C0BE240005F4909B4B59CB029A4FB1B64709400906423197A28BA7072137F72B + 347C64D22062073C50823D6B4F08733169F7083F9BBA0385D96F502E2EF0F607 + F4D2028CDDBE09EBD7AD8223E792F6BC5EFAEDFB3E742F0BE9749A10E3393067 + D5C704B8AD230EA6C94F25E3AE6646BFAA0CBF3E320885AE9810B01B42605F28 + 17689A18A2404BBB82A9A51794E1AB97AF84F7ED0355419323CAFF5801F3B9EF + A1E0183E01C2B162B08AF0B29D1D552B2BF3704609BEB1732D509302A57FFD02 + 59FBDED2C45C56D6A5F39D4DE1DB36F5D870D3B4EC3EB36497E788F83BC05A8F + 6F276C78585C78FCB2D845EA8C9B378A81683F58D472E0D84F903EFF1D600C9D + 24ECF0C1534DEBBB52A9701007EA149E3C18879ECD117E2C964F3246B7B426F0 + C211F4ECE924F4F675DB70AFE471A93BBCA0168EA097E36F21BA672BE8BAE193 + DC9F8F841304C1B17FF3FA23EC3BB0838FA94F7277AE4B5DD0088E731FDE656D + 81789CAEE4D6F41A35C162705C69F6D3B423F04A463F773417D4C2CB6543801D + 9105B3B99F3E81945C9B5AB6B8C0811862B5A65CB5078E2D9F2FD409AEBCD26C + 38E681025538CE178B259FC00B0F14ECDF7B5C198E7760188623A885070A76EF + 8C29C331A420081E28E8EF3DAA0C9702F9E70C7A3F758209230661A311BC4EF0 + 3FE21F497E40FE838101750000000049454E44AE426082} + Name = 'PngImage22' + Background = clWindow + end> + Bitmap = {} + end + inherited JvFormStorage: TJvFormStorage [7] + end + inherited StatusBarImages: TPngImageList + Top = 232 + end + inherited dsDataTable: TDADataSource [10] end end diff --git a/Source/Modulos/Contabilidad/Views/uEditorBalances.pas b/Source/Modulos/Contabilidad/Views/uEditorBalances.pas index 7c8cf6ea03cd8d4585af6189f5826260fcf54545..d51a2027160c6b0e0e57a14f32578d382521a8d9 100644 GIT binary patch literal 4306 zcmbtX-EP}96z+9^yu-N|5Igf6w3i8r!H%84Me~C=?Y66ek!XjTOllP6BrW_TqDN=4D8yXiY5GvSaVo>pTVa*Z4o}CKC~%`kr&i>*D&Z}ooi%*y z#MnjAW3-VHnVDm&kzdFjT^o}@4qsUuJIhyIEywpQz^f(RXaLVXQ zp#f38Rq`%agXK`YZ&!oF>DQ`oJsJ)9ndS5OQ>#*scP4eonE`;D*ym)bT^@jCg z=>wL3Ep9SdTgi?al+H}md$w^jm?l=`PU-ojHA|IB$i?pQXxiR{>jrr~MR1{Sjf0IV zIfn=ALwJE>jDDFR-V63CL95#N<#Aa!vtSnizw#{H!2zsS){3djWRf5NJ<9c5v3GEI zvYJ=esW#Zv-lq%_g|qT=6ODQqLRV)%#&%X2QRhd6GIhe0#gM%ZFHA!ER@v+xawIa* z^=wrodPxZs9n=mV%dJUdT3YGTeR^x|I#a0;B3!t* z`Bf&a>rduZErs){5uF4}4{6e-Y>jx*nos<`uGMz8#xoA!GOe{Ob;4yqr_zNRkAb)9 zPTPZ>#OT7Itg}+CT&h%uFCz3-kFRJ)OJ!XtvJD48Vstqc`Z!YeD1ut|_IW9n#>ZZp zBQi^Ak!o^7<~UOerG@?WNf3aVspKg~M`fOU?Ii1&mp6F7uJI*^%w8*3W~Qi(A5_aj zLW!cfk)wNiu)48^r~%2Pbr1AtXvs>E#(}3htDK}L!mVE_oG1>DrdR_R9c)0`y&5** z^s!|E@}XlW<78)WaR+Nr0}X@6c2!oTvbiP!a>lfNlSbScCA=imSYw!#J#r&U{{Va+}#B5~#Ec=`^s=?^6LzEe>3zamFZ(@YFU zbZ`KH+!;iOidXi-cUQFEPiKpdtmuc`o&Bvpn?$ws`2POx4uIP-4s;fD=rg^4jfQT} z4K#aJ>08M;Qu!C_8ENBaP!wveW!hm2+4wHGTj_5QS)mGvc9BT5BBT3tr1#DZ-HHd& zNZ?Wnlq@_#f`LRTkk0IeO$kBY|0vA=bvNSF$KG$I=>xe=2rcRF4)UU>=jw-iqXGNsbMYi(uoN zK#OXj`){S~1mAKzgR`~>TA}AB2^k<=)T*5St;M$~m(5uU%Ncr7kuiGF)U$Ey^5z{F z+Lt_~GUQ=FKhPe1PoRxJA^q_px3UmE`$Yfz;%s;|23}Nnw4z&$|3v3T#2$Cijn>^{ zOp}eAn!e3@WzwQ8l;&wAd)rE?w4ZIKh=w;%n>2~%r*1za5aWkufIcCYR_2CvgEyul z_F-#yo5iu|L1@&0HtIdJq!=ye%~3S)hCXwq*`gZo*i`HX3eiPMYu z{aEB8HF*DFC9k|rEf$!lbwNJ}U#Vsyd>=5zX1N6%_9>=73{qKEA4Rjgk~1VZCZ_)Q zUM8ih=(X~}M;=|C;EwhAtns!tYDOKH&9j#8IQ6&a(A;`RZxo)2a2blXP6%K#VEe(DP!i|MO zyOi~qN~H#*|70^H7_^Y+s;Q{rQ@80jq``r0NTZgGkbWahAw)?u!flkomYJ@J*Sh;c lm*rAf{cw8Dqf-URhwwqR@?F*4;0}Z%sEPl5o+q9?`xie)guVa( literal 5572 zcmd^D&2Aev5WXAmJItYgr9$2~0osEKw~!?{5a2Y0B46 z8!058@h%x*HERpSd$JnCFAgan@{@FND1wp%aQc)#R`?FXA;4y{2@FHxG%Fzy>Gc;u z#U(~7L5WvuGy-nXWa@J=gcmPP&%QZjaI#l#^VhVs)`@rs&x5nzj0w4PAytu^!cSX2 z=WO(qmWog-@!A&Ir++2uQBoSuc zF+ow)nuUl6-^7)n59yssq~2r$c!gOemPo7lHhV*rMXR?IxkxOn#<9pqVgN6VNLMQ2 zSB!7XY?s=sGhc&l*0wtUccDI(Uhq@lP$3+n8NlR%2$Ru7SaHL}L*goC?PMTN!?89V3;!rZ^A)1siE>?#u0)72OZi3dGOV`dz5`_i z?nIL_vZ9uV%u4hSCCAHLI}>4Pp7JA_EFLihk%m%)(i!whlrG^JxIpq{1Ayedv8)H4vhW)kqQW%9ph50 zQauUdajc>bosv`8+UFmo(-I<3=6JZQK{cz}Splrex|I!KR&v%a3$}$zd=r6}XiFyM zue#$7PUkgaFVab7sU61-TSAOkLZ1sM{@hp3Xfmbq!w!a=W#?>U_EtbIVPXi1pGBDzC8G;QMmHo*fTysmL_IHD)fhFg%AU z*`&2}wl41-<(-jOn0odMpd}N`k&5{P*fGzu}Gqh^cR&6y63yK+Y@ zpvO~$yjm!;E>2IqlMBsL6&7@w5PZK##ZsRP;N*9@-|%H->FAck*8r+G6cFa@e2r+! z{BY8zv&n4o^K{+^yF!mrI-WLmp>(%S7adm)i}dj(SOr>iRUjl3C!c;WP57K987reK zQ_BQp!wC>c(KvZDKKiRbR)Z=SQIEXEjtXj%4Gq^AX(PwlB^JJiGloXDEvW{>o*`6i zN;3`r3~QCS|5XZ_(`l!b?ip9dN7dG=gg!LTWZ^N=ss~2nP1zC}Ws<9H;Gi+AQJRfh?wQOiR$Q05lys*( z_!q8F + inherited cxGridViewID: TcxGridDBColumn + IsCaptionAssigned = True + end + end + end + inherited frViewFiltroBase1: TfrViewFiltroBase + Width = 543 + ExplicitWidth = 543 + inherited TBXDockablePanel1: TTBXDockablePanel + ExplicitWidth = 543 + inherited dxLayoutControl1: TdxLayoutControl + Width = 543 + ExplicitWidth = 543 + inherited txtFiltroTodo: TcxTextEdit + ExplicitWidth = 273 + Width = 273 + end + inherited edtFechaIniFiltro: TcxDateEdit + ExplicitWidth = 121 + Width = 121 + end + inherited edtFechaFinFiltro: TcxDateEdit + Left = 337 + ExplicitLeft = 337 + ExplicitWidth = 121 + Width = 121 + end + end + inherited TBXAlignmentPanel1: TTBXAlignmentPanel + Width = 543 + ExplicitWidth = 543 + inherited tbxBotones: TTBXToolbar + Width = 533 + ExplicitWidth = 533 + end + end + end + end + inherited pnlAgrupaciones: TTBXDockablePanel + Top = 297 + ExplicitTop = 297 + ExplicitWidth = 543 + inherited TBXAlignmentPanel1: TTBXAlignmentPanel + Width = 543 + ExplicitWidth = 543 + inherited TBXToolbar1: TTBXToolbar + Width = 533 + ExplicitWidth = 533 + end + end + end + inherited dxComponentPrinter: TdxComponentPrinter + inherited dxComponentPrinterLink: TdxGridReportLink + ReportDocument.CreationDate = 39422.701746956020000000 + BuiltInReportLink = True + end + end + inherited cxViewGridPopupMenu: TcxGridPopupMenu + PopupMenus = < + item + GridView = frViewCuentasEspeciales1.cxGridView + HitTypes = [gvhtCell] + Index = 0 + end> + end + inherited dxPrintStyleManager1: TdxPrintStyleManager + inherited dxPrintStyleManager1Style1: TdxPSPrintStyle + BuiltInStyle = True end end end - object ActionList1: TActionList - Left = 144 - Top = 16 - object actAnadir: TAction - Caption = '&A'#241'adir...' - OnExecute = actAnadirExecute - OnUpdate = actAnadirUpdate - end - object actEliminar: TAction - Caption = '&Eliminar' - OnExecute = actEliminarExecute - OnUpdate = actEliminarUpdate - end - object actAceptar: TAction - Caption = 'A&ceptar' - OnExecute = actAceptarExecute - end - object actCancelar: TAction - Caption = '&Cancelar' - OnExecute = actCancelarExecute - end - object actCerrar: TAction - Caption = 'actCerrar' - OnExecute = actCerrarExecute - end - object actModificar: TAction - Caption = '&Modificar...' - OnExecute = actModificarExecute - OnUpdate = actModificarUpdate + inherited EditorActionList: TActionList [4] + inherited actNuevo: TAction + ImageIndex = 22 end end - object dsCuentasEspeciales: TDADataSource - Left = 168 - Top = 16 + inherited SmallImages: TPngImageList [5] + PngImages = < + item + PngImage.Data = { + 89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF + 610000000774494D45000000000000000973942E000000097048597300001712 + 0000171201679FD252000001754944415478DA6364C001D6ECBE900CA4E640B9 + 2921AE0673B1A963C4A739C8598FE1DB8FDF0C33966C67505054C06A08232ECD + 3EF6BA0C250B7F315C7FF88F6179E15F86456BF76135841197CD79737F324C4E + E1008BF345BC63B833959561F13A4C4318D13507BBE833E4CEF9C160ACC1C290 + 60C30296734D5FCD70F2A333564318B1D90CD20C02D72E9C04D33C92A60CAFDF + FF6358B8E71B86218CE87E866986D90E738186A92FC397EF0C0C6B8FA21A0232 + E03FBACD5FBEFF07E30A3F36B801323ABE0C3F7FFF67F8FE938161EFC5EF7043 + C00678586B32F8B7FD61887167836BFEF59B81A12E186180A8BA0F58F3E76FFF + 194EDDFE0136A07DDA1AB001C90FEE3F98131BE4C4A092FD9BA12A8A07AC19E4 + 67582C800CE051F0C1D06C636994020F44902171214E0CCA99BF19E25DB8E09A + 91C301161330CDE040448E46649764D85C473160C6114D0CCD581312B221CEFA + 9C589D8D3521E13204047069C69B99608680002ECD380D4036E4C98B77383583 + 000005100EB8572466A60000000049454E44AE426082} + Name = 'PngImage1' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF + 610000000970485973000017120000171201679FD252000001074944415478DA + 63FCFFFF3F032580912A06303232E2543079D1766F201505C520B02C37CE331A + C400EBC5670054F3960057330631617E0690B2F357EF336CDA7786A1B5289211 + AF01C89A254505183E7FFDC1F0F5DB0F06311101A021F7184E5DBA733927D643 + 0FAB01E89ADF7EF802D6FCF5FB4F866F406CA6AFC21095DBC6B06C7215238601 + C4689EB27807C3B153E7300D2056F38B371F18B62EDA79EDFCF9F9DA700348D4 + CC70E1C2024420022548D68C128D40C906A0E67A5234631860A6A752AF202346 + B466740396C2521AD020B0A49EA622C39C95BB716AC64889C0405C0A541C2501 + 4C2830804F33D6A40C8A09A0A62DF7EEDD03F3AF1FB98D372301A39191E2DC08 + 0029AC32F01825AACD0000000049454E44AE426082} + Name = 'PngImage2' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF + 610000000970485973000017120000171201679FD252000001514944415478DA + 635CB5E3DC7F062C20CCC388918108C0083220D4DD104570F5CEF30CEDFDB319 + CEEF9C4ED0109C06D818AB3278C7941134046E40CBAA0760819A3005B80B6000 + 9F21182EF8F1F30F10FF86E05F7F1882926B883300E60264C0C1805D5F69B802 + 238601E836FF04E2CDA7BF339484C9A368EE59F59261D9C1BB0CE7A75933C20D + F0B4D56698B0E5195617601AF09021DA4998C1297307C38D35A18C60031CCDD4 + C036FF84DAFCE7EF3F307DF0FA7FB001112D57C09A57D4E8800D98BBFA346A18 + 58EA2BC235C39C0FC2671EB0A2B8E0DBCF7F0C5F7FFE05E27F60B65DE26C8801 + 7316ADC11A58AEFE69282E4009C8284506F7F4B90C781349F7CA07FF4106A0DB + FCFD171003E980BCF9840D48F5916148EFBB8E2197EC2BCB1059B290B001512E + 92609BC1B602F1EF3FFFC1F437204EAE5A4CD8007F5B71B8E66F480681407AED + 12C20674CCDE884F0903000B1A00979E81F9710000000049454E44AE426082} + Name = 'PngImage3' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF + 61000000097048597300000E9C00000E9C01079453DD000002574944415478DA + 63FCFFFF3F03258011D9004646468696696B17FFFECAD0DE581A7C0D596155CF + 0AF77F7FFFD975944755A3E8413760EA929DAF393938D62785D8A7C1C48BBB17 + 711BABAB5C7AF9F6FDDFC2446F354206BC75B6D4E35ABCFE90536B49F87190F8 + E4853B2779DA1BE46EDE7FE62ED00015BC06F4CFDBBA24CACF26FAD0A99B5B42 + BDCC7C6BFA563B057B986FFDFDE72FC7D20D072B26D62574E235A0A26DA999B0 + 98E0F2607713F9251B8E85692A4B5698E9AB9AAEDA7EE2DEBB571F3DDAAB226F + E33500044A3B979507B898B6BF78F3FEA3B1B612FF992BF7FF1F3975336E425D + CC52903C4103EAEBEB5998450D8FAA2A889BC94888306CD977664D675964284C + 1D0103EA99F8DDF50C8CD439E3FFFE67CB7DFFE9DB1F7E3E9EC637DF5977DC98 + B3E73C0343E33F9C0670B8AC555292175BC8F6FF9BEEDF6FEF995E7DF8F95941 + 55EDE5AB17AFBEFCFAC7C2F1ECC5FBEF0C4C4C89FF0F47DDC36A8056F2A103FF + DEDEE465FBFFB5F1D577EECB8C8CFFF72AAA6A7CFFF4F842CED54D7907184CE7 + 4631B0B227FC3F1AE38AD5008D981DDFD9BEDE48BABCA1703983DE226E09891F + D754B4756F7DBC7FBAEFF286BCED0C32BD9C0CB222B7FF1F8B93C16A805ED2EE + D74CEFAF445FDC50B48BC172858E34DFFB6582B2DAFB38BEDCFC7166456A0583 + CE0471063EA103FF8FC66A623540C063F55669B6E747AE3DE3E861E5E158A9C8 + FBF1D1FD6F628BF4147977FC7A79D3E3F2736E39060E9E84FF47A202B0C782ED + 627356C6FF935998FEB349737FB9FE95E975F2F32D8DDF98EC9647B1FCFF55F0 + EB1FD31FA08EC2FF87634F6235801C0000382740F0DFD997BD0000000049454E + 44AE426082} + Name = 'PngImage4' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF + 61000000097048597300000AEB00000AEB01828B0D5A000002854944415478DA + A5935D48536118C7FFAFDB8CCD557E7F34B33167F9119617A91596495D781304 + 451021A651362821B1ABA49B6EA4460961D88542055D84DD6545415992174994 + 9625CC8F9C329D9B5F3BE9CED9D9797BCEA1C932A3A0079EC3CBE13CBFE7FF7F + 9FF330CE39FE2798FAB80BA4E61559EB2551E67B07279AE8D51FA98F2CC99546 + 031A3D6E5FF329993F631D80B52227A6D7929F9BAEA459D1D73BE8DC3330D6B8 + 1AD206641414DA5A6224E1E8ECA47779660955D532EF642F1371BD74331A14FA + 9C27A4439F5D88777DAE1B65FD230D11485786B9363D65FD35C1EB4B9817427E + 9F80C335C05BD53E23B2A934132FB23662B71406C2B14698F38AF0E9EB9473E8 + E3C8655BD686D6F858A5DA3F27B04511E37E0195B5C0A00AD6003FE5259758F0 + 3AD1843C15125218CCB6AD707FF34EAC93973217041154ECF608D8770E188BD8 + 5A01A8A1DEC5F60CF4980CB0A890E8A47AFFF477EC3F037C8EBE975F006ADC37 + 60A7351E3D061DE222C522A5270047AD82DBAB27B21AC09EDA373525E9A52BCB + 7E5F4CB4822509BE80848AB3C0C09A806380EE7CA1BDC55EB4CDE17AF2984932 + 75A60CCA088739742A84CE1E49C1010730F41BA03B27CD595C517CB1FFF92B04 + E6035AF142101DCB12DA743AB413243FA468331D0F01E51780D1154057AAF148 + D92E7BE794778E8DB92634C901116FA6451CAA27214EC06802AE5227AA839ED2 + 45A0729AC6A406182DD9329C10A7B7F57D18D63A93DF99D92076905F4FB4DF56 + A08C20ED9476027CD1209C7BD9FBDC947BC1C0E2C9596A4B003E27E2F8E9301E + AEB507B700334968A6631D019C759C5F627780822413BA194312CDFB41958C13 + 7FDB4052739000430ECEDD913F313B568F9B8B326AC8F7CCBFAEB27A073F0058 + 5538F0EAB25B380000000049454E44AE426082} + Name = 'PngImage5' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF + 610000000970485973000017120000171201679FD252000001934944415478DA + 6364C002662430FC47E6672C606064C001C0122726A06AB870818121A1632A98 + 5D169DCD10E58B90B32840358C11A4D920622A5C604145365833482308D4F5E6 + 3134154F62A8EE4805F35B2B66334CDA8B3004C50098E62F2F6E823581347F7F + FB80E1E58DBD0C8BD67D6588F6656258BAF91F7E03AE3D66C009081A800CD61F + B161C0072243F419711AF0F7F777864D275D192282F5B06A5EB1F23C43D7FCD9 + 0CE7774E67C43000A41984B79EF3C36AC08F9F7F18366CB8CC10116EC860E491 + 85EA0298E6BFBFBE33ECB8120E36C071E64DB8E6ED09CA40037E33ECD87E03EC + 02142F206BFEF7FB07C3AE9BF1282E00D90CD20CC6BFFE30EC3B719561CAECE5 + 100374837B503483E8BDF733305C000333DC04198E9EBB893040CBAF1945F3DF + 3FDF190E3C2E041B806EF34F283E73E52EC200758F2A865B3B3A506CB927739E + C1C75383C177F17D0C17745971325CBEF51062004820CF19352F808065E64506 + 172748A0C16CFDF3F71F9806B9E4F683A70803B081E56B2EFEB7B19663D875F4 + 32CEC444D080AED9331808010085EE16005695A1DA0000000049454E44AE4260 + 82} + Name = 'PngImage6' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF + 610000000774494D45000000000000000973942E000000097048597300001712 + 0000171201679FD252000002164944415478DA95D35F4853511CC0F1EFD491DD + D9587F2C83AC8C328DFE4949908BC0AC142A147BC8077B88A01EECA5E718F958 + 410486C384B50A1F7A991023CBEC0F594F81E5D4C211E130D7D4DDCDA15B5EEF + DD5DD74B1B8EA9D90FCEC3EFC0EFC3EF9CF33B06FE46CBE3AE042B886B176B0C + 0B73C342A0A9B17AD9E2FB4F5EE0E878C6E79776C37F03AAAAD2DAD1CDDEDD3B + B96EBB9B425604CC17CB8A4AFBD31EEA6BAC0CFF08A4907F02C962598EE374BD + D58F908C2581442241603C8CCBFD89D86C9C9C9C1C0A365A282DDE446FDF37E6 + AB9277B128F02B10C6DDF385CD074B10D6593019211E9CC2EF1DA5A0C0821895 + 68BE6D5F1A6873BEA6D07A0879951945CD626B1E6C372978BD7EBC5F4710D608 + DC6A712C0EC84A9C7B6DDDECAF3B459E315B3B3B685B9835448DCD30F4BE0FC1 + 94CB9D56672670A5E1A47E590F1EBDE374C3091D88CD4120063359902B4719F9 + D88F201835E0612670E97CA5DE41578F870A6B296BD79B096BC0B8B6C4DF3252 + 4024E81960832071B3FD7926D0587B5C7F32DFE8243FC74214EDD906AB4D4C29 + 1011230487BC1419BFB32BE8E06CE7BE4CE0C299637A07B3928CCF37816F4CD4 + F2040943365234823134C8E1FC094A8A8D4C0DF6B2E5EA8774A0BEFAA80E283A + A21012A791E6E6B4618249FF08AFEC97292B2CA7B64221BFAC9C90E74DFA289F + AB3A42FFB07FD90FE5B255A510B754379D062C1CD3E5E240AC931D9537B03537 + 19FE00839434866373C4BA0000000049454E44AE426082} + Name = 'PngImage7' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF + 610000000774494D45000000000000000973942E000000097048597300001712 + 0000171201679FD252000001724944415478DA6364A0103062135CB1E2C26E20 + E5824F63448401235603809AA381D412374F5506413E2EB0D89FBFFF187EFFF9 + 0BC62F3EFD6728A999C0B0795E15A60150CD1540CD3A7B4FDCC5B0D5D94299E1 + CAD3BF0CDD3D53F280064CC666C06EA066176C36FF05B25F7F6544B11DC50098 + D3C3C3F519D6ECBA8C61BBBDA922C38D17FF41B6C384B6020DF261846AFE0FA4 + AE809C0EB21DDD6610FFCF9F7F0CE91553194CF49518A4558D1836AE59037609 + 23C8E6AB4F2E2C2136DAE4B5AC186E9CD9C570F3C1278801B53D0BFE3715C7E3 + D4F0E5C75F86CFDF8118487FF9F18F61C3BA350C12CA260C3B366F4218408CCD + 17AE3D03D3065A520CEC42AA0C278F1CC4EF02749BBF82F0CFBF0CC7F66E64F8 + C92AC970FDE259DC06A06BAE3DEFC390ABB49EE1FEB5530CCF9F3F6778FA919D + E1F5D3FBD80DC066F3AC743D8680EEB30CAFEE9E61D8BEF72C4CA90CD080A770 + 03A62FDB45542C400D006B062724DFA4366920FD84D86844D68C9212C905001F + 16FA1194E3DBC30000000049454E44AE426082} + Name = 'PngImage8' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF + 610000000774494D45000000000000000973942E000000097048597300001712 + 0000171201679FD2520000015F4944415478DA6364A000FC3060F8CF884D62C5 + 8A0BBB81940BB258E7FC99286A8EBF9CCEC06EE4C5C088457334905AE2E6A9CA + 20C8C70516FBF3F71F8399770E44D3F9FF0C3F0D19219AE76D6364C4A2B902A8 + 5967EF89BB2806B7F54D6738E7C4C1F073793F58B3D1537986F33BA76318B01B + A8D905D9E6DF7FFE82B1437011C3B91DD31818BA8AC07246FB7EA01A00737A78 + B83EC39A5D9731C205E40274003700A8F93F90BA02723AC876649BFF02D920FE + 9F3FFF18D22BA63298E82B3148AB1A316C5CB38661F5B92A064690CD579F5C58 + 4228CAB6EC3E893D166A7B16FC6F2A8EC7A9F1CB8FBF0C9FBFFF65F08E2CC01E + 0B20038849342017608D055C2E80D9FC19487FF9F18F2125B3147B2C6033005D + 73ED791F86E7B334B1C702BA01E89ABF02F1AC743D8680EEB30CAFEE9E61D8BE + F72C4CA9CCE679554FE1064C5FB68B98A0801900D60C6230FA26B54903E92744 + E946B219C661244123560000C9AFE6B31530CB2E0000000049454E44AE426082} + Name = 'PngImage9' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF + 610000000970485973000017120000171201679FD2520000016A4944415478DA + 63FCFFFF3F03082CDD7212C22000627C2D18616C905E466403A27DCCF16A06AA + 61E89DB290E1FCCEE98C241BF0EFDF3F86E5DB4E33488B093314D5F5810D21DA + 0090E6DF7FFE31ACD97596C1C9429BE1E6BD176043CEED98C688D3804D0F0E30 + F45E6A02B37779EC62E05CC0C6B058EA38D80B3080D30090E6805D4E182E7911 + FC91E1C4E5C70C8F1E3F6298B774137603609AFFA4FC013B1B64738BB13743CD + D9AD0C8FFDDF81C5B6EC3B85DB00A6594C289A91C13DEF3740F1BF0C3B0F9DC5 + 6D0048C1EFDF7F21F49F7F50FA2FC31F181F2877E0E445EC068479988015F02C + E640B1F98EE72BB066CDDD120C676D1E311C3D7B05BB0181CE8660DB049773C3 + FD8DAC3957BB80219A379FE1D4C5EBD80DF0B1D7032B165BCD8B110330CD200B + CE5FBD85DD00776B1DB002E9F502609B13CF8781E50C840DE09A41165CB97907 + BB014EE69A1801060B44986610C06980ADB11AC3A63D2789C994D80D404EA6C4 + 0090010087546EF0ACB0C7920000000049454E44AE426082} + Name = 'PngImage10' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF + 610000000970485973000017120000171201679FD252000001024944415478DA + 63FCFFFF3F03258071D400064674018780D0A7823C7C09EB97CCDD8D4B535EC3 + C493AF1EDC305B3E7F1A2323BA66090111A9272F9F301CD9BE99119701110999 + FF416A0E6FDB843000A4F9CFCF1F52F834C2808DA72FD8DF700348D18C6C08D8 + 004B77AF69F292F299308987CF1F4E979256DEB076DEE45D207E7052AEDBB3A7 + 770390D58000DC0B20FFCC98D0CE70E1053FC3DBBF3F191E7F66603831A310C5 + B6E533A6311C7CC080228F624046C534B82408AC690C856B9611976140970719 + 20ACA0CB30A53E13624068693F5CF2F2E3F70C37E7A5C163019BFCD7AD4D0C2B + 164C07A72146981F999998C17EFCFBEF2FD630C0260F3660C0933200BCB3BCE1 + CDA578040000000049454E44AE426082} + Name = 'PngImage11' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF + 610000000970485973000017120000171201679FD252000001C04944415478DA + 63FCFFFF3F0325801164C0C20D47A381F41292353332C6800D58B0FEC8FF8440 + 1BA234FDF9FB8FE1F79FBF60EC105CC4806200A3E14C86FFE7D3C13408E0627F + 3C12CF70ECEC0D86AAB659D80D4007FF806AFEFC41D80CC2672FDFC1340019C8 + 7A2C6178F2F22B98ADAE20C0D09869CCE06E29CD2068B788E1D9AE48868BD7EF + 117601C8E673D7DF309846AF6310E66767B8BE3E8441CC6929C3C36D610CD76E + 3FC46DC0CBB7DF19EA679C613870E619C3C3679F197EFCFA0B36106433C8F97F + 80F8D6FD27B8BD1053BD8F61E9B6DB0C0B9B1C181C4C2518E43D5780C54136CB + 7BAD62B8B12E90E1FEE367D85DF0F75C1A836FDE0E866D471E315C5A15CCF0F1 + CB4F06DBA42D6003EE6E0A6650F65BCB7061B90FC3F357AFB11BF0F3540AC3B1 + 8B2F18A2ABF6313C7BFD8DC1C14412E895E76003AEAEF6077B4123528661FFC4 + F3A806C4F859C1A30839CAE0ECDF10BE41E416860F7F32188E4F453320DCCB9C + 81CB621ED8A6177BA218245C9681D9B7360431A805AC03B37F306430FCF8C3C0 + F0E61B0483D8700382DC4CF0DAFC1B498EDD5785E1FD4A3417F83919319CBA78 + 8BA8FCF0DFCF908171139201A0DC3871C6529273637E46740C00F128724C706C + 80060000000049454E44AE426082} + Name = 'PngImage12' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF + 61000000097048597300000E9C00000E9C01079453DD000002324944415478DA + 63FCFFFF3F03258011640023232386C4922BFF0D9818FFC57EFFFE57FDEFBFFF + CC8CFF19BEF0F1B36D5C73E9EAAAD5613ABF60166318505FFF9F4939F077F98B + 97BF6BEFDCFEC6F9EDDB3F86BF7F810A9918192424D9FEF3F1B32FBFFA93236E + 5528C35FB8018D9B7E2C6DF0E38859759581F5E7BF3FD36EDEF89AF4E51B03E3 + B72F7FC0867EF8F897E1EF3F06867F40ACA1C9F96FE392D5BA5737265D831BE0 + 58F9F0BF83A5F83245796696CB973E87FEF9C70CD6FCE2D92B86E78F6EFCFCF7 + EFEF17360E5E4151590326666626067D7DDE65F57E1CD12806288BB3FF676567 + 66E0E062036B7EFEF425C39307576E8A2A19B9EE6A557DA217B2A88E9B5FBA41 + 405C87C1DC9CEF01D0004514031444391804843918409ADFBFFFCE70E7EA91FB + 9F3FF06BDED9E1F513A450357481341FBBD03D611973362B4B2C067CF8C1C060 + A020C0F0E3FB4F86CF1FDEBCBE7FFD84C3B54DC9D760812B13DACB29CAAAF84A + 58C69AC7C61A8B01CF9FFF61E014646190E365627870FD40C3A535718DC8D1AA + E2B1988F5788E7B998823597A5392FA6010C1F1EC0157FF8F081E1DF9F4F0D1C + EC6AFDA7965A7C02899924ED550746C555793523665D1D2ED440C49690D08149 + D2A9764E3ED90A037DEEFF3696BC7161EA0C4B8836402FF6A41A37AFF0690E2E + 7E3E7B5B9E65C08494084C48BF8832402BF40A0F8F30DB3E0E2E4153277B9E65 + 0DFE9C60A7E34CCA280098ACCDDF3C5A2925C913ACAFCBB51CA6997803ECF7B3 + 301C74FC834D0AC5004A000026261CF09ABF155A0000000049454E44AE426082} + Name = 'PngImage13' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF + 61000000097048597300000AEB00000AEB01828B0D5A000002E64944415478DA + 8D936B4893511CC6FF67DA74BAC9BC9478C9357338CC4B0EBC1709F929A25414 + A13E48082D8CFC20267E1B925DD004B3120C75919AA99B5DADD485E56DA2791D + 739ABA2D9DB7A953379D6EEF5EDFDE14859C810F3C5F0ECFF33BFFF38783E0FF + 425902A13B668448DCB4C5B658709C40D8F0A4563120A97FB1B61F3AAC291008 + EDB1630ED7ECECA97C6F7F6FAEABB72BCDB46902B54CAD5BD4CCF7AAC68772C5 + 6F8A06C8286E05484EAEB3F10BB6A49FE2B2F2C2628318E0C440063300410050 + 910596D4B344F7BBB63169FBA7B4D6E65AA915205320E47A9EF4ECB89A7CCE85 + CDA021950141E2BD2E9049645029E683BB3301EB2AE5F657E15B4955457EAA15 + 205B5095CD8BE33D0C8BE0523C1002B50120E5C12EE03509D8A60078386EC1B7 + F2066DA3A89C8FFE1DBF9076CADFADFA4A467C829E70829C82AE43B79B97150D + B3522956F3F4C9B3030001DD87C3AE49C84CBCBC646640FCA5D29DF3A0B8A09D + 09F62469E1C3A4B4D7F2EAF1A3DA834FA064DC2D2D8E4DB9984E63F922ED2A02 + 161DE04EE1EE13D4ED7CB090CB5CD9C6E1439978A3FE655189D50E52D37263CE + 4486374725C5D2168DF6C88E2CE414ED02942400030246C6A7087149C5688DF0 + 7EC63EE0F38DB3C79974A8ECB70B7459649E0F64F17854767800C588D390830D + 02172A19226F5E58D211DFEB9AF40DD5CFCB46E5DD0568AFECC6C43FFA470747 + 2CEBF420D2048072C57ED3CB2F846005F9D19CBD4E80C96882B9F16942D1DBA7 + FBD15C2B960F77159355056AB919E0E3E24C17F9C58487E1737218966D429386 + 01F235CB8589854D87D3DCD0448613938D61669B89B1C1099552DEB9AA9B9790 + E559D204FA99C5EBF78D0A0FB5D5ABA0BF6F0D7AA66CA1757CC4B862D808E9D6 + 9826C990236927D236A4B748AF92C6F6FF82243F890861AE817CC8001D6A0A74 + 2A478D1AFD7A926CC6FC058E20743BEDFA2F1ECC70B45A0CDA2614CB5AFDFAAD + BE19B3E828E51D009FCFE710C6F546ED680F473DFF3B7E70DAFCFEA8E5BFFA03 + 503A4EA60D6AAC070000000049454E44AE426082} + Name = 'PngImage14' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF + 61000000097048597300000AEB00000AEB01828B0D5A000002E44944415478DA + 8D936B48D35118C6DFB379D9D4C9BC94A8CB399B38CC4B0E9C9A45427D8C5251 + 82FA2021B430F08398F4258650145A615642A12E4A31AF6565795958A69B685E + C7BCB4B92D9D3AA74E7771BAFD37FFFDA728E40A7CE0FDF6FC9E73DE877310FC + 5FA850200CC22C90ECB06EB1EC76870347D8F88C6E7244D4F8D2B06FFA172910 + 082998BBD7154F8A079F11C5E0043002A8D64D2BA8A56AFDB2463BA8928F1537 + BF2D1B21AC0E9780ECEC06323BCE9E17CE61DE4D4C8BA5812F0D996C00380EE0 + 81ECB0A25EC0FBDFF74C4B7E7CCAEDEEAC97B8041408849C906321BD97B24FFB + B36854A43221106B01ECCE007780203F1CCC2AE576BBF09DA8A6BA24C725A048 + 5053C43DCFBD9F98C4210523046A13C0D0320099BCBBF0360920D87B0BBE56B5 + E8DA9AAAF8E8EFEB3FA2864705D65ECC4FCF30E2BE70BB54ECD28F542485D676 + 3E2C482458DDD327CF0E04087CC222597519059917566C34B8F358BC031C94A8 + 8B0F339241FBEB870FEA0FAE40CABFF5A23CEDF2B93C2A3302E9D611307D0002 + 29006EC4D529A4DD2ED6B61DF0A1B279A3F15559854B0739B9C5A92792799D29 + 5969D4650B05791200C31B804A74E046B831C061423E8B3757544FD509EFE5EF + 077CBE76F208DD07DE0C7BC6F82FD3CFC430B95C0F162F9A64715091171981BF + 0761224E5E5AD1E3DF1A3A8C2DB5CF2BA764FDA5680F0EA43B3E469D8A4B5AD5 + 1BA149130DCA35CA66283B1E67C6B2A97EA147C16AB1C2A27C0E9F1C1CD27FEF + AC6F968D8BCB097412755D8F0EF3F7F36962A7F2121D8B3218976E4287860632 + 83FDAC6269D3EB38272193E64B6761988DAC981E55A894B2BE75BD5644C00BC4 + E0E867217738228597E06654C1F090010666DDA05B3E6159336DC4F76BAC3384 + 8968007C8971BE842D62D6C159C5DE5F109564E1F17403C8C64CD0AB26419F72 + CAA2319AB3A4F3B62F7008A19BB9577F71613E52A7C3A04731B9AA339A6F0CCD + DB9A0E03EF04F0F9FC48DC626ED34D0D44AAB5BFD347E76CAD87859DFA0386D8 + 3FA68502A9830000000049454E44AE426082} + Name = 'PngImage0' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF + 61000000097048597300000AEB00000AEB01828B0D5A0000032A4944415478DA + 6D937B4814411CC77FB3B7777A5E7276969AA4648A20A5592A4585FE654122BD + 0CAA3FE2841EA45946697591BD8DB27748A2BDA0A43FA2420C893252D2A244B4 + 7C24495986AFBC3BDDDBDB9DDDBDDDDB663714B366F9B2BB33DFCF777E3BB383 + E0DF66235A19342370912538D0CAB2825BF00A6DA4EF2D1133D5A8AA2AA029EF + 4126B3292B2E21BA70697A5262626A9C393422040D0FBAFCAD6F3BF187C68ED6 + 9F5F472E2992524FBCE2F400735884ED40E6BAE58539F6CCD0B9F323009111C5 + EF075191600C7BA0ABEBAB5AF7A071A4ADBEE71CE7C615849126032823B52D77 + EFBAEBF6BDEBAD164B20E941A092EBF89ED75050960C6ECC805B6060D8E984E7 + 379B9C2D8F3AB71353CD4440CC8ACCE49725D7F2626DB3AC60A028C2535092FF + 4A2FCD5E1A0F2E3C062E9E8171D1034303A3F0E24CF3A7910EF72A1230826813 + BDAFF87CEE85ACCD19269AA2C16030C0093273EDC372C8DE92FFD7EACEDDE902 + 06B3D0F1A41777DEED2D5015F5369A1335BBB6ACFA4056745C24A22903941636 + EBF044C38204BCE003FBEE62B0DAFBC1237A61B8C7A9B69DE979ECF3F836A1A4 + 65F15F4EDD2A880BB606A12B45AD93B02C2BE023D2604D79FB8F02B5F533B022 + 078C9B55BBCF7EEBC43F8424B4243DE19BA37C678CC962844A47B71E204F8212 + 09F1EBF783474E02BBB105BC1207DE711EFACA06BE8B7D520C8A8A0D6F70DCD9 + 951E343B1061598067A54EA8AEBAA4435A0826D22A3976B21406B31B80F76160 + FB3975E8E2E84785F12F460166E3E91D17361D8E5D1E45F332062C8BD07EC300 + D7CA4EC1BEA292BF16B177751D6893304D5E9979E0AD5265354FDBC694B4EC05 + 7599FB57844906093862D04CCEBB913AE4D9F01EBC3E1EBC22AF87635680F1FB + EC4FB95DC922DBD8A105A0008BF1444641DAA1A88C8800CE8F8123656AA59A1F + A740FF9A7AF22CE8B0208AC035F258A8911C20C3D5A9BF72D8CC79C197E3D7CE + CBB12D0D09106862D4A13F9F343133F70E63F18D740F7E818330E3D30FD31CA3 + D5986F5B68B55B532DE128923248269F0EF2DF05856FC58372AF52013C5412AF + EB7FA7516B34512232C2063A944E44C1C82C7B14CEEFF2B793929F92B16E2265 + EA71FE0D330BBCF031BDB9A60000000049454E44AE426082} + Name = 'PngImage15' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF + 61000000097048597300000AEB00000AEB01828B0D5A0000031C4944415478DA + 6D536B481451143E779D5D5D37D95AD354523445905AB32C0A0DFD653F92252B + 8BFA130A3D40F385D1C3B09766A5652548D23B34FA1115624894A0F6502845CB + 079298A5F8CA75737677E6CECCCEA3BB532DAB75868F3B73EFF77DE7CCBDF720 + F8374C045BFC97F8AD3504F8191D0ECEC639B91E32D741407B13154501E4F5ED + AFD3EBD263E2220A37A5C49BCD1B62F481214BD1F4E49CDCDDD18F3FB4F7758F + 8FCC5C9504A98570F9C506FAE01053715A46526166565AE0CA552180C88A24CB + C04B02FCC476181818519A1BDA677A5A862E32365C473482C740A3D5ECCFCECF + A8C9CADF613418FCC80C02853C678EB4425E5502D8300D368E8669AB155EDE7C + 67FDF8A4FF002135FE35884A4E4B787DFA464EB469B9117C341AA2D78008329C + CF6D55CBB39406C11C4BC33C6F87A989597855FEFEF34C9F6D2B319841948E2A + 387639BB327D6FAA8ED2505056F066C18E363DAE05CBBE5C30E7BBE02767071A + 3BA0EFD930EEBF3F9CA748CA5D141A1ED454F5A8383D22260C511A1FA8287CAF + 8ABC037302ECC92E0263D618D879274C0F59959EF2A1A72EBB6B378ADF1CFBE5 + FC9DBC9800A33F2201D547BB3C06A228818B80E55C2A728A4E01B3AB0B689B43 + 19BCF0B51F7FE7E2D1FA94B8AF25B587A274062DD971173C2C1D560D448F5020 + 26B23A1E3D790EA62C6DE09C6761B46AE21B3F2A44A1F0E8156D25F70EA7F807 + F9212C72F0A2C20ACFEB6B3C62F788094E9496C12411B32E0C8E314699BA32FB + 49A2E575C857AF2D3B58B9FB44745238C58A183AAF890BFEFF5259A947CC082C + B893D0EF9C22DDE0BCAD884A8EFB1813375A5637A71525070B3E023084E02631 + 24136E88564D262DADE0E4DD621EB08383F97AC7B8D82BA59363EC731B205F83 + F66C6ADEC6E3E1A921BE8C8C55B1BB54FDD34418DBD642DE3955CCF13C30ED2C + E61A85127251AE7B5FE5E0659101D5B1DB23334D9B96FA721421AA22FC3BEB9F + CC4C27C6FC5BE101FC8012A2995FDC4CA15AA336D7B4C69865DC605881C2343E + 82CEA50AD96F9CC476E3497158AA03166E11EEDCFFBAD11D1481196961271548 + 995100D28B768991E7E45E52F273B236482079B7F32FB7E1BAF0E8F71C040000 + 000049454E44AE426082} + Name = 'PngImage16' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF + 610000000970485973000017120000171201679FD2520000019E4944415478DA + 63FCFFFF3F4341F1F9FF0C6402469801BEFE4A0C0B16DD60583CC71CABC21F3F + FF327CFFF90748FF6128ABBCC2A0A5CEC0B072C752E20C40D6FCE3D71F86BAFA + 1B0CEB963B31A85A241336005DF38FDF7F18DA5AEE3098997032CC5D3D07BF01 + D834FFFCF597A1B7EB3E612FE0D20CC253263C625092FFC5B0F1C06AEC06E0D3 + 0CE2CF99F68C4152EC0BC3AE931B310D983EC908A119AA11A409660008CC9FF9 + 9C4180F72DC3E14B3B500D00019021840048F3F7EF3F19CEDCDE8F6AC09F3F40 + DB7EFC024B82E81FDF816C280D11FFC5F0F9D337B03C08DF7C79126180A7B73C + 86E6CF9FBF43C460867DFB09D70C32ECD1A7F308036CEC44C18A976E9A82D7F9 + 7CFF8DC19A4186BCFE7D0D618089193FD896B5BB67311CDA309341504A87E1C9 + ED930CEF3FFD60F8F0F927C3FD671F1956AD59CDF0EC96105833C8BBEFFFDF44 + 18A0A3CB0976EAB6C30B182E1CDDCBA06768C8B073FD02B8CDF79F7E64E89C34 + 87E1EE456EB06610403140599519EC827D6796312447F833F072B130B0B0B2A1 + 387FF5D6430C37CF72C0F9700318191919F49D72C9CAD200FAC9B5C145016BDA + 0000000049454E44AE426082} + Name = 'PngImage17' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF + 610000000970485973000017120000171201679FD2520000015D4944415478DA + 63FCFFFF3F03082CDD7212C22000627C2D1891F98CC80644FB98E3D50C54C3D0 + 3B6521C3F99DD3194936E0DFBF7F0CCBB79D6690161366B04C57058B715C6060 + 24CA0090E6DF7FFE31ACD9759621A4D68281352A97E1F7B2C90C8B2E10E10298 + E6DFBFFF325C5DC2C1F044E912C39B4B4B19984A3AB17BC171E64DACAEE860D0 + 60D0F399C2F0F2D636868587CC18A41A1A18D218F07801DD669866100E699161 + 10D5F6050726411720DB0CD35CDE369B61DED24DD80DF8FDE72FD856107D6319 + 1786E6ED7B4F311C387911BB01611E260C6E73EF80F9110C1F180C182C18C4D5 + BC5034830C3E7AF60A7603029D0D212E00FA7DEDAA2B0C2D2D210C6B6A9EA068 + 06E15317AF6337C0C75E8F2160D92330FF4E8B0B838B4B0D985D5CE907D70CC2 + E7AFDEC26E80BBB50E5CD11FA84B60E181C0FF18AEDCBC83DD0027734D829A41 + 00A701B6C66A0C9BF69C24265362370094D348012003002CB76B52FA97B19500 + 00000049454E44AE426082} + Name = 'PngImage18' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF + 610000000970485973000017120000171201679FD252000001B04944415478DA + 63FCFFFF3F03258071D400064674018780D0A7823C7C09EB97CCDD8D4B535EC3 + C493AF1EDC305BB1603A2323BA66090111A9272F9F301CD9BE99119701110999 + FF616A189135FFF9F9430A9F4618B0F1F405FB1B6E0021CDD70CF8FF0B09B0D7 + 481C78D50AE2FF7295B1FBC82F7AF0C585F30C8C96EE5ED3E425E533618A1F3E + 7F385D4A5A79C3DA79937781F8C149B96E6627F7F4F8B23ED3DD226BC2F04840 + 96A19CE72DC3E7E387182EDEF8389911E49F1913DA192EBCE06778FBF727C3E3 + CF0C0C276614A2B860F98C690C9BAA5A1854F7F530282A4830DC7FF08261E657 + 318689B76F33820DC8A89806D70C026B1A43E19A65C46518C0F25F3F3048CE28 + 6050BFBC9A61DB7F198693AE390C535AF220068496F6C3355F7EFC9EE1E6BC34 + 782CC0E47F5EBFC060D7E5C170E8BD208301F73B06BE7F1FFD642E316C6604F9 + F1D9D3BB01CC4CCCE070F8FBEF2F4618FC7D723D22F3EF93C4FB37DE301C1296 + D9E8FBE68198BED87F4BFEBF1FED084619087CB4178BB974FFD3D42B8F7E7801 + 6D390A12DB28C4BA51558ECB8F2803D6F1B2C67CFEF5C728EEE7FF62A006701A + 98C0C0202ECBCDB00A00547CD715F016991D0000000049454E44AE426082} + Name = 'PngImage19' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF + 610000000970485973000017120000171201679FD252000001034944415478DA + 636498F123988181610D032A0861C8E058CB400460041AF07F8201AA60C10520 + 91C1C1489201604DC40114D7313234DCF84FB4561868D080BB8E71F3BEBBFF7D + 1C9550E4FFFCFDC7F0E7CF5F86DF60FC0F4C83F8DF7EFC66084FAF6738BF733A + 7603D6DEFBC710B2FB378A61732CFF307888FF061B7AEDEE4B86EAD6C9B80D60 + 9CF993015B803EF0FDCAF0EBF75F863B8FDEE036006403EB9CDF0CA40628D800 + 0F3B05B01F393BEE911C9E6003ECCDA4188E9CBBCFF0F70F3B03A9010A36A0AE + B307ACB8A9BC04C5005C9A91031425B52107283ECDC8018AD500429A41F8D1F3 + F7D80D8005283ECDBF81F8F99B4FD80D8005283100AB01B0002516000097A51A + 7A68BA98860000000049454E44AE426082} + Name = 'PngImage20' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF + 610000000970485973000017120000171201679FD252000001124944415478DA + 63FCFFFF3F03258091620340848147C2FF0B3B1630A24B1223CE08E20CAC0B28 + 0A0098010B361C807BE3E7CF5F0C5FBF7D63F8F2ED3B98D65455C62ADE599ACC + 886240BCBF3D58E19FBFFF18BE7DFFC5F0EDC72F86D6A98B1826D7E760159FD2 + 908B69C0EF3F7F810A7E337C072ABC71FF15C3FC556B1916F69463155FD45B81 + 3060DAF21DFF93835D18BEFF80D8F0FDC71F8647CFDF334C9CB38061E5D446AC + E21B66B7220CE89AB3EE7F6AA80754D16F862F409BDE7FFCC6D0D43F8561DDCC + 76ACE2FB574C4418503771F1FFB4085F86DB0F5EA3847049633BC3C6F97D58C5 + CF6E9B8730A0A86DE6FF6FC0D0FDF4F90BC3E72F5FA1F417867FFFFE33589818 + 601587A78381CF4C941A00005C20FBD97F751C0A0000000049454E44AE426082} + Name = 'PngImage21' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF + 610000000970485973000017120000171201679FD252000002704944415478DA + 8593DB4B545114C6BF333AFB8CCD3853A11686162811410F1118241524984951 + 0F864F520F3DE8D3FC0DD183145949E12814D1850A9CA2871294A8208BC1862E + 2814836578BF4D9A8D9EBD679A4E6B9D33C7697AB0058BBD38ECEFB7D7FA1647 + 936F607AF6410305D7FA17E07C773946A646D1DE0E0483583334F30E4C554145 + 6508E6700B18903C9CAD7BA64E63B0FF39829D8FF0333E83C5D971CA49DCB874 + 16F1AD0DD0D46CC814BD2D6008078BB8764097CFB45AE2C5D9090B30333A8CBB + 1D17D070A20E5DEF7DD481692239D769B2D8F4B7D86D2D85ACD311FF989BC4D2 + FC34BE4F8FE1E69573387AE4100A7D5E5C1BD0A13973AB93B65014374329B2E4 + 5D76CEA1A9562416E2B8DF7511C7EA6BE05D57004DD36C007BC09718A0EB5669 + 01F4EE2CA0F92A01A9D3EABD7B50B2A908C29D0F97CB9501AC3142AC27826432 + 052525FA9EF4A3627B19021B0210C24D10373AA21EDB44769CB7C0663AE16C26 + 7AAF0FD248E2D58BB728DF560AFF7A1FDC04D0751DD73FFAB21EFCBD3AAE9DCD + BC7E590F432A44238328DD528242BF176E9D3AD0056E7FDA687BD0D60BD4D59E + 4265E52D0B104D3442190AD5C58FF13456439E280C7E88A1A828001F01841010 + 1E81075F37DB1EB435692603D2E9DF48A914E48AB2440641944C522AC43E7F43 + 61C00B9FB7003A89798487136559406D4D1389E832CD2B0D099911328481E363 + D3F014084A0F3CD4FEB3E59D0887C3DA2AE06075235D94D68B2B7C2A06290BC4 + 677C7E0179F92E7A596020AFCA12DBFF420650B5FB784ECB9CD2B0C5067D5B4E + 2CF3750CF9F7AF8A7300BB76D459C6392F33C8C87490FE95A65392F8408E3807 + 10910DF85FFC2BE6F80376357B8923C9356C0000000049454E44AE426082} + Name = 'PngImage22' + Background = clWindow + end> + Bitmap = {} + end + inherited LargeImages: TPngImageList [6] + PngImages = < + item + PngImage.Data = { + 89504E470D0A1A0A0000000D4948445200000018000000180806000000E0773D + F80000000774494D45000000000000000973942E000000097048597300001712 + 0000171201679FD252000003CD4944415478DA8D96ED4F53571CC7BF17EC9315 + 11864234C607C6D4E9408621F88CBA88D0C64D48EA906C3E3459F40FD077666F + 7CEB62A2912C43F0A950A12A3001AD2613810908B46869E69E8B2FBA3087F499 + B6F7B63BF7E0BDB6D2A79BDCDE73EEBDE7F339E7777EE7DC3248E1303C346BC9 + A5812FDBED767AAF51D7B9C9F4A07E22595B2655F8DED202642D5E089F3F88B6 + EE415CF8BE857F9C54C2A402DFBD651D7296C8C5FBD3336EE87F7C8206DDBDA4 + 1226197C57493E96662D9A7BF9F810BD861A4BF1EFB4136D5DFDB8D2DC9550C2 + 2482EF2161C9266111E00D470B611C015A75D7E11FD6E2F51B176EF7FC8CA696 + F812261EFCC0F60D502AA451706DB902A7EB5F60D2F32195B8068EC1E5F1C1D0 + CD4B62878B4904F7F8392C3A3922C2C361D280B438736900B6D94FA9E4D5FD5A + C8A46968E9E8C555FDFC9130EFC3856C8984A72F90E0E31C274AD767A3EBF138 + 7A2D6E64AF2D82C99A4E257FDED320C4B1E87C34881BAD3D511226D1840A70E1 + B09AE7269987FB021CBCE49C9C545089AD5B0387CB03E39351E80C0F44892008 + 278207D830BE297F27FAB6DD41E182A4A9CF0698CDF8BDA31A334E2F7E7A6A42 + F36D2395303C3C56B644F69C09BA3139C5E2ECE11C5AE727DA9791274AF8B3C3 + 64A712ABE17338C9C4F70D3D4757DF2FA0829ACF8AE2C2BD410E013F0397C329 + 0A4E9CEB059B5B4005B38110825C083EF25EDFAFFF518959AF86E5E55F387FB9 + 19CCC5EB3D61AD661F14320915683616A2B24C22C2F9DE05FD0B10F4450B9C59 + 6B299C070B23197FE5A082519D0AD6DFFEC677F56F0599194AA8CA8BB1848429 + BDE40768EABEC6EE923431C6E1800C0C1B2D9852AE8E091FB959058F771643A6 + 0974F7BF04535C716A236963D1D6A95173601B9128A1286BA4924DEB58DA98F5 + C891217347096CD29531E16E12FFC1B109DC6A7F3837C9FCAF20397144854315 + 5B91A15C88CC9DD7A864F90A2F8A729538B6F7DD662748C602B9F37AFE74D422 + C2C5348D941CAF55A19A8C840B315855758B4A64996F909FEE84C7350D960D61 + C6C7D1364D7FC829BCFF4A05A97118187901FD1DE3FC85365FA28646BD132E6F + 0005070DC0E6CD5015E6C58C390F9748D2D03F3C8E9B6DD1AB38E66627488E7E + A942D59E2D9090945DA36EA392B2FCEC28F8B31B9598251FA061B335263CEE76 + 2D48BED25462DFF66228E4527CF4C55D2AA1C75B38CD16027F3F2C49059192BA + 9A0AEC2A2B2212193ED174D2673CDCED9DCB96D6F64771E109059192DAEAFDD8 + 515A08B94C0A8EAC5A9A2D6396A4F0A48248C9113292BC651F807C1260FFE735 + F4778D49E129090449E6B25516C7948DD64919A49CD2DF96FF0126B669571175 + 682F0000000049454E44AE426082} + Name = 'PngImage1' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D4948445200000018000000180806000000E0773D + F80000000970485973000017120000171201679FD2520000032A4944415478DA + BD95CD4F134118877F5B0A22D84205341E30087E24021A45893131F1E2C178F1 + 2A26FE07C6C478319E8D9E8C8926EA49E217D1B328F142A24123070B2E6DB76C + 0B5DB6A585B614CA47BB1F6D7D772CDAD22DA0094C32997476F67966DE79F72D + 97CBE5B0958DDB1601C7719B7EE1D18B8F9768E8A17EB660FA2BF537D7AF5DEC + 2F5CCBD8FF22C8C3DF5FBED04D2F73882FAC40CF64114BA6E1F3F9797AC693E4 + EA7F090AE1FB9AEAD9DCD24A1ABA9E81AA6510239920C530CABB71F7E615EE9F + 0425705A6E80753D4B27C8A0AAD24A630EFE5002E25494242E26D994A01C5C55 + 7528AC6BC866B3A8B7D782B35830198A63C829E2D9BDDEFB4EE7F3DBEB0ACCE0 + AAA617C155EA29458546D2867A1B72D90CDEF67F41DFD37E3709DACB0ACCE00C + AA680CAC685A5EA4B13B38D97E00B14412BC57C2C0E0777C7A37545E50166E80 + F302E324EC37CD7775B4223EBF0861621AA35E19636322BE7D18361798C2159D + ED785550024F2C821F9F82673202419882382A221C0897DEC146F0D59014C213 + 0B4BF0D0CE9D8244F020FC3CC127C31819E92DCE2233785AF90B53F360632E43 + 1FD7098A79742E899F047691C0352621264F63C22D3178D177F0F8E540093C95 + 568BE29EA64C512834468A9EEA6CC34C7C1E6E5F082EA3BBA71097C310F9893F + F0B582D7C78EECEFE9EA6883B5C2C2629C5EB373259F9EDDC70F6226364FE020 + C6082E8E87200B0148A25C045F2B983C77FA684BE7E16696D3A9945A10EBBC48 + FB0D8FC617081CA44B0D421483181F19C7AC3C5B023715B43637D109AC58585C + C64A4A29806B043F84394AC561DE4FE560165E418668C083E6F01281A3CED6D2 + E4D8853D0D75D8595DC52ED2C89E2C8D5D14F34834C1B2E5873B00C123232147 + E017A4B2F0B582C14C8E3B5FBDA30A95560BF6EEB6A3916486A4C16187DD5603 + A77B025E2902371FC072740E9E51DFBAF0926A7AE7415FCE6677C052C1C1565D + 81C6FA5AAA2B39D45111CBD2627F7086761E424494E0F30436849B966B4362AD + AC84BDA69A5295C3F2D21295619D95E5C5E40ABC4E3F8B79FB99F68DD8ACBD7A + 728B332B153722B1F987E170181ADD81F1DCE8AECFDE4D410B1B950A6E7BFEF4 + B7B2FD02BC08E5EFAAF547E00000000049454E44AE426082} + Name = 'PngImage2' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D4948445200000018000000180806000000E0773D + F80000000970485973000017120000171201679FD2520000022C4944415478DA + 63FCFFFF3F032D0123CC82D53BCF13655398871123B18683CC46B120D4DD10AF + 06A01A86F6FED90CE7774E27CA12922CF80754B776D7050651415E86A2BA3EA2 + 2C21DA0290E17FFFFE63D8B0F712838DB12AC3CD7B2F88B284280BFEFDFBCFF0 + 0768F89FBF7F19B61EBC0A0E2218A08A0520D0B3EA2131410E06A5E10A704BB1 + 5AD0B2EA0186260E0646869230798286831CD2317B23C3DB3DF98C382D00F141 + 610E0E963FFF18FEFEFBC7306BEB4BA22D3051F8CD1052BD0D6C098605216E06 + D008FDCFF0FBCF5FB0E1A0C89DBBE335410B7EFDF9CF3069DD23866827617022 + 0059F266771E238A0541AEFA0CED6B1E91144440FBC186FF02FA76F69627E020 + 82010C0BFC1C7519DE7EF88661C8B203EFB15A806C388CDEB9FF2458AE6CC679 + 4C0B3C6DB5C061FF179A2C81084CAF3AFC096E4144CB159CC1D49EA60AB6E4E8 + F133D82D70B5D26098B2FD25C120C2E67264FAF4E9B3D82D70325763F8F8F907 + 8605EB8E7F815B40C87010BE78FE1C760BEC4C5418FEFD852451502A82E4E07F + 0CDBCEFE005B00323CBA0D7710954629327CFBF997E1F6B58BD82DB0355261B8 + FFF41D86C6A3B718180A43E419BEFFFA87D5C520F6CFDF08B187B72E61B760DE + 92B5E0B2071DB8FAA73164F8C912653888FDE2FE654C0B181971975BDD2B1FFC + 4FF292061B5030E5264E75715E32608BDE3DBE4ABA05316E52045DFE0B5CB430 + 307C7C4A8605614E1244190E026459106027CE70E8E869066201C916209731C4 + 02140B6805009C1383EFACA508270000000049454E44AE426082} + Name = 'PngImage3' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D4948445200000018000000180806000000E0773D + F8000000097048597300000E9C00000E9C01079453DD000004BF4944415478DA + B5D37B4C53571800F0737A5B6ECB4B2F2D2D2D2053408286870CD4C9C0B89989 + 8ACEB041F035064CEB365800D93235C0EA40FD836D380C085B44C7C30993111E + 93199411DE844029B80908586094577B81963EE8E3EE82D311662A35DB97DCE4 + 3CBE737EB9E77C07120401FECF802B010821A8ACACC7BAC453B54A95E6405AE2 + E111631B7C9E7E331102E87431313C76B1FFAFFD9E071492C0A3A109218D8AD4 + 68C68527040281E1799B9FCF2A738306439314971765244598060C3C9E1406FA + BA73EE36F6045E381DD6B672F39339393457C4BE748BFBFAE08AFBED572E9B04 + 94D7B20647645D7111FB7805E58D359DF2817DB97CBE76795E7246717450E096 + 5C7239E5C7AAA62B99C9260039F977B893B3AA9E84A8FD3603C313BA9FAA5B8F + 9C8F0B2D799A73F6AB627B77676E4750A0375BD43B0ACA6ADA7ECE4C8A085935 + 9097574B1F56C89A2342767A6356E6A0AAB6E3E1AF1DFD5B6E0822D5A1A1C588 + D71B66D7DF7B3BE0E862767BCF20A8691265647D1115BF6A6031522E9784B130 + EB9BEF066DA72C68B5C4F5D2BACF5262DF493F935E78684F804FE9C6F53CF8E7 + 040E6E57B7E04A9572DBB7C951FD26018BCDF8B4FCAC5DDB37F377F86C84AD5D + 0353F79A1FECD9ECC22B3EF8E6AB2EB25925B85327D4F70E8DC5640B22AF3E5D + 640A004EA7FCC046D7A06D216F6D73E230AD417E59BD243CF8353B081128FC43 + 0C6A9BBBEF4BF48CBD2582B085970296904B45611C1BEB225F4F67848A40E0FA + 0A178C4864A0F46EEB2C3E33BF332735BA6B79BEC9C062BD5B482D8A5998D5A1 + 0D8E6C60678B01D14331E81D94246509DE4F052BC26400B8FC821E0E5178D9D9 + 326A5BC516E6737225F0B09BEB1892500FB688E7A5A02E52FD72C08E026F3B1E + 2B92CBC676D3E9664E23A313A85EA7910368A6B1E3602C3A1D5DA0D210B14422 + BBFF6860FC3BD018DEB53AC03797C659E79062CF65C6418346AF981AD3E85438 + 9C56D3692C864A6EE1E0A3D62AA6AD0787261A210D250044BCD45A832DB93413 + A8E70544FB49AD5100DB5FF1D14667CE3732F103056A98EBA322C42D8D9ED239 + 348725AEB39CF56438FA2E5066FAB893B8C27D4C4A1D279770C9DF3E09CCE831 + 8002CF12F5C7B28C022E11BF89508DD489AA1ABE26421D12414998FEEF23BBEA + 6683EF46ED7D09BDACD756A61AE2492A05CAA539A73C3A60EB6F03338623D170 + C4D328E01E5DAF21A47D5A864EE92FACFAE49F12F42F28DA84C93CA9F67E2832 + 3FECA4C30739DD5567F067F3BEB9A90035FF9468388A1A053CF8CD7238FDFB3C + 55A7F2E92C8F1D7B329A42A1BCEE52ED8EC9AC11DE56E61A44EE3833DA13DC5D + 9E50B30CB848023124606514F03AD5D24F99E9B5D42B64FEDD5509834B837E37 + 98660CD8E7B616BF2745DD985C267D977E52745D88D49F0025254F8ED0EFFB22 + F21EFC48C0D52860B9B7347B2D9C896252E70E8B2AE24BC1CE142AD0B97ECD36 + 577DCC3197F3BB71762B8FC3CAD8C0D46D958FF59DEA2A4F2804DED99B009D71 + 0B204803D170EC43E3651A50E88F52F4D55C0B45E563B9F597900031185DF381 + BD85A262DA801F5FBAD8C0020F1EDBA61ACE8D40E50225145722C1804AE39355 + 7480A83FDAF8E287E69FCF275BE7C82EC7D152A1C650F5B529037EEE59D52C5D + 7AD166000C17C85610F94D904F2C0D341ECF79E143FBAFE32F16D672EF3D728C + 4A0000000049454E44AE426082} + Name = 'PngImage4' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D4948445200000018000000180806000000E0773D + F8000000097048597300000AEB00000AEB01828B0D5A0000043D4944415478DA + B5956D6C535518C7FFB7B7ED36B66E5D47D67663731BECD5B18605D8504C084B + 74982DC16468D4F881AD0305E3870550D100EABE482246712A8AA00182BA9828 + 84252006D7264AA2631B461325DD5C9ABDC0686B6F5FB7DEDEE373EF6869C736 + B6189FE4A4A7E79EFBFFF5799EFFE9E11863F83F834BFCF211506AD6A7585DFE + A99E3611BD4B1553DE7FC0DC797B64FC9C13387B883149017C0064549A528F56 + 5A2A9E31AE2CD00EDF700AB62B034DAD22EC8B117E07482B3019F61516E7ED15 + 6F8DA6BB6F79D84D1F0E5A197B8BDB06F06D7A743F5C8827B4997A684A6A804C + 031C7F8D78ED97FA9B5BB130E4531E9B2A2D655D191AA9CAE570201C61CC15C0 + D94911D60EC642DC4915DA9BCA714C97024E6E87C46BA029AE86DA5C08C79F4E + A1F7CAB566AB08DB3DC280C19CA77FBBA42877BB776C940F08018444B0DB3E1C + EE6178AD1B88CAFDE58E02797526D8561BB1324A00519A191A532174E535181A + 1A176C3FF42595EB6360836595E1AB1C9DB660CC39A1EC0F46204E06B0AF4DC2 + BBB17D0A409E1C032AD6E7E3C7223D8C31803C54E999C8B1AC85F3A6CF6BBFFC + 4BB30C3995A2B2D696E6BC2F8602691E6F50D9E79F4298CAD2DE069C4ECC320E + 90E32450BF6605BE37A623231122A9782CAF5A0DF7B44618F869F0FC9A55D94F + BB275DAA6058549EFB66C45BACC085D9654C02C8F1058F268B09DF64A5429B08 + 11A97419463304B707E1E014A669215696093F9EDB097C399701EE01C8714A83 + D60773F1499A1A7C1264D6A0864A54F397A8E65DF3396C4E801C67B4D85F9683 + 4EB50ADC5CE25351B04972CB76865716B2F0BC8083D4DFAA545C2DCEC6BA9868 + 34011096ED18C4E1768657659D2501C8519A2C9DB6AB7A6DB955F8E3376EBE12 + C959F8C238B003E85C3480C497E5E51BCE6C78AA79EBDF17CE21484D5DA80FD3 + 049916B1872047EE0B20F1ACE212F3B71B5B1EDD343E781DA3D7FA93C4C88E1E + 8941CDABA04B5C8F48F289C58BCF2BE76F1E00D55C5DBF42FF5D43D3238F07C3 + 115CEFB90831CAE222816984DD213446818954158E136463ECD413546E428446 + FB2E72FA9C80AF759A37B734D4BC9E663070FDBD5721787C890D955C41B45119 + 3E57F6D29FA31BE8500187E8F1B2B8D80CE459827427014EF0D8FC585DD1C53C + 935E3DEC9CC4B06334A9C6247EC4CAB06776FA1F02D5F4EB8ED3743D77F75EA1 + DE63DB6EE07C1CD05791FB7B6D85B1CAE70FE1D7010722E2DDD2FC13823D1C45 + 039DD4C83C76D61A8197497D3F8DD43B990428BBADF4CE6505602FCAEE7EA826 + BFA56FD0018F371417F747E017A650FB027003F70932482D099FA0A9E5CE9240 + A37127633F739FF16859579ADD3D36E1492A0DB176B72BB7E0E2E23D20450B1C + A0E95ECA86A7526DDEC5582F27A759A6852D330575316708615C1A91B0E50D32 + C9620109BDA9A78F27A9D91D7117D19D6A58AEC6E9340D1AC9350295A796360C + 2D557C76241D34D97E5E4A8F9270ED506EC4FF1E32E05FC9675CEF0AFC725300 + 00000049454E44AE426082} + Name = 'PngImage5' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D4948445200000018000000180806000000E0773D + F80000000970485973000017120000171201679FD2520000027F4944415478DA + 63FCFFFF3F032D0123CC02464646AC0A66243060B820630103230391006EC1C9 + 898CEE406A07B2E4890B40C33AA6A268B8B8229761E9E67F0CD1BE4C1886FD67 + F8E76151C0B0139705FF154C1A18045444212EAFC8061BFEE5C54D86A6E24970 + 0D75BD790C770F4C015BD2B16802C3FFBFBF19FE01F1D7A7BF1836CC69C0F01D + 8A05061153510C7F7D7527032EF0ECF216B025AD73DAC016DCD8D2C870FEC23F + E22C787C6C21C3D64DA70886AFB79F1983988E07D8825B3B3B89B70066092100 + 331C84EFECE923CD027430F9A037410B61A0345C016E095116FCFFFF8F61CA21 + 5F869230798286F7AC7AC8D0317B23C3DB3DF98C445900321C9452A61E0D22DA + 021385DF0C21D5DBC096E0B50066F8BF3FBF18A69F8C2068C1AF3FFF1926AD7B + C410ED24CC70F3DE0BB025382D00451C03D00290E120F6CC33B1382DF8FB0F62 + F8AF3FFF18666F79020E22BC71003210968160ECD91752B05A806C388CDEB9FF + 2458AE6CC6794C0BB0190EF2C5DC2B59700B225AAEE00CA6F63455B025478F9F + C1B4402F740256C341F4BCEBF9283EC0E67264FAF4E9B39816E8067563351CC4 + 5F70AB046E0121C341F8E2F973981668FBB761351C8417DDAD045B00323CBA0D + 7710954629327CFBF997E1F6B58B981668FA346235FCFFBF3F0C8BEFD7321486 + C8337CFFF50FAB8B41EC9FBF11620F6F5DC2B440C3B306ABE120FE92474D0C19 + 7EB244190E62BFB87F19D302559712B8E1E8F4F2E75D0C495ED260030AA6DCC4 + 1944715E32608BDE3DBE8A6981B45E00C3B34B9BB06A3C24798F21C64D8AA0CB + 416C503C7D7C8A6901B8CABC7001BBCB3E7B3E6008739220CA7010C0B00057A5 + 0F03DD2B1FFC0FB013673874F43403B180640B90CB18620100261ED9D6E5FCF2 + FA0000000049454E44AE426082} + Name = 'PngImage6' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D4948445200000018000000180806000000E0773D + F80000000970485973000017120000171201679FD2520000037C4944415478DA + B595DF4F5B6518C73F2DFD4191B66C6C4E8512618376DD28B485B1C126D90F36 + 8D1B1726264B76B53BAF3431DE99F80F18BDD1449399254B644E1747743ADD94 + 48169C428131268366832D631BC838FC687B0A057AEA7B0EB692B562417D9393 + 9C93F33EDFCFFB7D9EE73C47974824F83F976E25A0E59BCE75D1DEFBF00CD72F + 7FA4CB0A70E268DD9AC4450C454F17F2E63BEF6784FC2780EAEDCFF3580A6784 + FC2B403CAE70EEBB007BFD4E22D15846C8BA01AA783C9EE0FC956E0EECDEC1C2 + E2524648D680E1FB9374760E119A95B1D99FA2AECEC5739BED5C68EBD58AFCE4 + CA1A1096635CBC14D084B7941761CECB25321D66EAFE440A343032811C959124 + 498B39DDF275760055BCE5B3761C9E321CDB1D42DC844EA7435114E6E57946FB + 4778187C44D3613F66B3414BDBC5B6AEEC0167CF77905FBC096F4D3936430EF7 + C2301E5D7E67B5409E3EC648D720F353111A1ADC28A226DFB607B203A839FFE1 + 4A0FF5C71B291169B1EBE14E086E882C0813E488E70D3630CA53F48B4EF2EE72 + 512852F6FDD5EEEC00EAE973375AA93C50C55C04CC0A8C89D3CB4B5060165D24 + C242E2DE4A98B1BE2114D1413E7F053FFEDC9B1DE0E34F2E535A5341597529C3 + 63301703530E3C9B07361308034C2E08A09009DD1A606CE801FB1AABF8E9D7BE + 7F06A8C5FAFCC235AC22FFAE3D2E46C661711136E5C266711905A8C0080BC255 + 707A9E4737832CCE84D95959C6D540FFEA80E32FD56A1FD0E8F8B45683FD279B + 90643D2191A62DA2B076215C201C6C109738070392CC2F5F75E0F26CC5969FCB + B59EDF5607BC7AB84673B0245A51EDFF925D4E0A859389591D46B1F519E1C022 + F2633588B489E79B771E70B73B48B5AF428B09DC185C1DF0CA419FB651854833 + B2E6C2DFBC1BEB461BB373A20E8A0EBB69B9931E4F4DD37BA90B5FA59D2F4F9F + E575DF755AF3DE5E1DD0BCBFFACF39B3EC22223EB6E488F01CF163C9B7109989 + 30D0D6A7C544676EE1609CA6E2DB58BC47986CFF9463AD957F0F78F9054F4A3C + 098A2B097E17436C38389A9A455B9D0E0C7A3D5F7CF02E45917BD497C6707B8C + E4541DD320C5AF756406BCD8B0334D3C39399F0427EF4FBD518FD751AB419C6E + 03267F730A920638B4C7BD26F1E4BE336FED4B41563A490334D63AB52075AEA8 + 814BF1BF84944422A37872AD846C739B18948CE980BDBE726D22AE77F59C3A99 + 829C934AD201997E1E6B5D55D1560A771C659BC7CB1F1C73BA92B5793DE80000 + 000049454E44AE426082} + Name = 'PngImage7' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D4948445200000018000000180806000000E0773D + F8000000097048597300000B3A00000B3A01647F570D000002724944415478DA + 63FCFFFF3F032D01235D2C606464C42AB978D3F10C0E76EEE9E4181CEAAE0731 + 1B9F05AB775E3A1DE2A66B822E0EF2F3BF7FFF19FEFEFB8742FF03D217AE3F67 + E89DB19261F3BC2AFC16C05C0FB480E1E0E97B0CAFDF7FC5E95A51416E067D0D + 49B02513E6AC66D0D3353A03F481295E0B40AEB73751341115E2818BFDFB0F72 + 2DC4A5A82E87E0CBB75E3014D6F6309CDF391D6C204E0B905D4FACE120B9C9F3 + D6C05D8FD70264D713133C5A2AE20CD7EEBC44713D4E0BD05D4F8CCB4172A965 + 5318FC3C6C18EEDDBDCEC0C6C6CEA0A363C400348311C30264D7136BF88D7BAF + C129C7232C99C152959B61FDFA350C17AE3D63D834B712AB05FF41AE07197EF8 + CC7D82C1A3A620C2905E3115C570297975866DDBF7A35A50DBB3E03F30821880 + AE671012E0C69AC681086BFACFAE9ECED0589D07371C04502C689EB8E4FFEF3F + 7FC9C9B070C0CCCCC2202EA30C371C04E016D4F52EFCDF541C4FD0901FBFFE31 + 7CFFFD1F4CFFF8FD8FE1CF5F18FB3FC3E68D88A0F1F27444F5013116A01B0EA6 + A18683F0FE9DEBC0110B321C2388401650143EB060E2E063E0E6E165E0E1E621 + DE07845CFE1D2A7EE1C82686EF7F9818787878C0961C3A749AB005840C5FF4D5 + 8E61C1850B0C4BB5DE30DC38B585E10D304973F3F2822D397BEE067E0B8871B9 + F76901B0DAB9AAAF181E9CDFC670FFD173065E5E3EB025376F3DC16D01B1C1E2 + 9D21C43083D59481B5790BC38B2BDB192E5EB9C1C0C7C7CFF0F1CB7FD4FA0066 + 0138D9C10C40321C268E6C3848FC75B127D841300B4E9FBBC8C0CA210A361C24 + 8E62415D411CC3EC95BBC94E41CF9F3F07275398E12816C08A0A4A92A8B28621 + 43828F3E4AB90FB7809600004F6ECDEFF6DCFB3B0000000049454E44AE426082} + Name = 'PngImage8' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D4948445200000018000000180806000000E0773D + F8000000097048597300000B3A00000B3A01647F570D000002954944415478DA + B5955F6852511CC7BF3E9882694B723D6450D4A21ED61FB3879EEA295CABA058 + D1CB6A23A315C2A441AC4123368A82FE5011066D63D1ECAF6058291643AC8D60 + 966EB5FE3E64D4966B7B1841B1997A4FF75CF14E773DFE1978E070EE3D1E3F9F + EF399C9FCA082190C964284523F73A88AC54020A8F9E3323A7E0B6EB558352A1 + B2150BAF991C00852B0779742EC143EFDB40CDB64AA3241DDF398EC066F74ABE + 6399372AC2E93B53904ACF0BE00F7CC5C4E45FC99AB15FA3B054AD07ECE781C6 + CB4084876FD743D1DC01D97E736E014DBFC5B8DCA8D3CE17E7387E6D824FCE71 + 9CB083CE07BD387CA94AF84CE1FC88E8EE3550D45961F04411F2DAD882F4F42C + 78821FBB1D3E58E2EF10BD7A425CA7708FC0507F26B7203D3DEB78C423DABA12 + 38DD8868D02D1C0DF6D4C2B0D3CA16CC4E9F2D3927BC13F43CF2C3526B02EE5E + 037E8401F34940AB83C1740C2DC78F0AB74922484F9F0B4EFB1DD70B74D95D59 + 7717ACDF88AC75C00B084D4FE12F5F8799C7439B6EA10AAB962DC291E6EB30ED + 3B84CD152A389D0EB4E9E3D23A3875A19BACAD34804F0F6D994A4C3B939A8EC8 + 987378FA9975B0D770168FBB5A9282F62B3D24164FA0D8565EBE985907BB9E8D + CF085A2FDE226D4D07F302A7FF71988A11619C8E7178EAF531EB40BF64697182 + D9703AF6FAFCCC3A90088A3E9FD41131EAA0E01D644B9E7C267833D0C7AC8382 + 04B9E0B4BF0FF533EB20AF201F7C8A7FAE0E94096B3B2BC6F12DE446F87B046A + B5062AB51A9FBF8CB00585C0E97C75831637E49B206F7F82B1610F86863F41A3 + 5980DF7F8800A7AC0C413C91064883A7E6D3E1747EA2297945538240700872A5 + 4E8467085AAD0770F3FEF3B95C26A14522110C7EF899011705A99F8A39D3F9B6 + 62F506D4ED5827F9E71204A56CFF01E5E2820611E3A8010000000049454E44AE + 426082} + Name = 'PngImage9' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D4948445200000018000000180806000000E0773D + F80000000970485973000017120000171201679FD2520000029E4944415478DA + 63FCFFFF3F032D0123B2054BB79C24CBB6DE290B19CEEF9CCE882C063317C382 + 681F73920C07EA619016136628AAEB43B184AA1618682A30BC7EFB19C512AA58 + F0F7EF3F8615DB4F33D818AB337CF9F613C5128A2D0019FEF7EF7F86D5BBCE30 + 38596833FCFAFD07C592733BA6319265C1FF7FFF19FE02F11FA00520F6BABDE7 + C0918C0E48B2E0D687070C53AF4E62B8F0F6020348B59BB41F43A1661603EF12 + 0E8637E15F188E9C7FC0F0F5DB5786B76FDF82D5CF5BBA89780BE6DC58C0B0FD + D9620C4B4F3FBFCFF0E4EB038697219FC0C1F5E7DF3F30BD79EF29E22D38FDEA + 0283F906230CC303551CC1F4FA3BFB199E057E801BFE0F18275B0F9C26DE0287 + CD4E0C879E1F6028D56B606834AC021B62BEC582415D44106EC123FF7770C341 + 71B3E3D019E22C38F5F20283FB7627860D6EFB18CC8575A0A9E61F83D5762B14 + 0BEEFBBC811B0E8AF83D47CF116741FED12206676064BA49DAC00D1758CE8511 + 5C773D5FC30D07A9D97FE202610B400A6BCEB430D4E95532FC03CA234722321B + E6F2B92FA631C408A581C50E9DBE84DF82084F5370068219C4BF9413C3D5F7BC + DFC033DAD467ED60B164E112B0FA6367AFE0B720D4CD04C595422BB8E1A9E6E6 + 9BF70C5BACF7C00D7FCEFE942160971343B16E1D83277B3058CFE98BD7F15B10 + E46C84121CA2AB79512CD868B10B6CF8DC97D319BA2F3530D8493A30F42A2E84 + EB3977E5267E0BFC1C0D50C25A722D3FDC0274004A454DC67D0CAEAC81703D17 + AFDFC66F81B79D1E4A10C96C106490E15600E75A74806E3828C2AFDCBC83DF02 + 0F6B1D942092DF2CCC70DBE315C3F2D74B18763DDDC400D265206CC020CA2187 + 61380810B4C0C5520B45132C4271255564C389B2C0DE541D258DC33210580C4B + 9E40369C280B6C8C54C125222500AF05D82A0F7200CC0200F191E9EFB5062090 + 0000000049454E44AE426082} + Name = 'PngImage10' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D4948445200000018000000180806000000E0773D + F8000000097048597300004E2000004E2001167D99DE0000035A4944415478DA + ED954D4C134114C7DFEC6E0B420B085A6A040DD88A45C0C4602D4A2D281F5589 + F1AB6AA2094A4C5502DC34F160EAD11BF1E4498D462F1A43FC408BA052C11435 + F8890AA222A2601B6B2D94B26DB73BEEB4168B16E1E2C1C4974C7627F37BFFFF + CB9B995D843186BF19E8BFC1940653012693897AF9CEAEA5696825732FE72B6B + 3877F2B6F01A982A77435595F48F0646A351E4E3E3342CE7BDFBD1F6F1E7024D + 957CE6BCED6FCC66EF6485D71D3DDE617FDFAD9ECC00E96B6BC5727FAC9A65DD + 41718EF795A6CBE6F9699A6925738F67ACE091A5A5235AB2C1502DA1E3F108E1 + A219A0CA4A530C15CFE68F7986DB0814F0072AAC2DD71BC9A276FDA69D98E7CE + 7198DFDC616E6C8866A0D6EB13C448E48AB6078278A5209E22888F05C531E075 + F76E5CBB11660B4AD716D30C732BC0F37A6B5363535403B56090F2BB01D209E2 + 4AA96C99DB1D6A0BE251455BD395C6C8E4253A5D929491248F70CCD7A796CBDF + A219E495EE8A4F605CEE09060683412C92CED6F03CB64C26FE830F9F6B4A187C + D41D144EDECAFBF7D50889AC41039D4EC7C83354050850B0721FEB392441D892 + 1827C62C93E892393F7F3863B1F822049142A110CB6473553C254AA431041806 + 80E3001266A7D8ED036FFA3A3333F94237CB1103B4AD72DF0A0A51EDD18AE91F + EA3F2191CCBADA7CE9ECCD88EA614B556DC9E0A7B71BE7CF997FE0579E773B2E + 386C0EAB5CA962D1DE9A835AD273B25873B41E66C602385900DB28C0C008C0F3 + 0127F49C3282D3ED2F7FD16626170C6FDB53534CE140F39FF8A10FB6D573E6A5 + DE463B761FC061F17C39C0A03B34C209244892F9702924C5607DD6E2A501719C + A4793A7C863203D05C450ED6166AE1C8B17A9821F4718C9B5811097A580CC7AA + F38070E1980E1FDC2C7966567ED1AAD50F4945E1707943C3EE9998402A229196 + 9A06D3E159AF6719D2EB6B63B20A942D19E5C6C2746908F0064209E449E0272E + 1BBC3D5F37D865BD6BCCC9CDE5E4694AB3667F3D4CC5B73E7EB020784CD76EDC + BE70C4EBE9D96ABA0831B470DC9CE2F1EA084CFAF9CDE95C33EAF8D49E9D9D0D + 0AC5224D5C72AA85984CC6B37E9FCAD1FFBA7BFCA269CACA14CB57569CEEEC68 + 2EECEBED1B4F50E6A8067BBA7B770F753F89FC4453E5DB77AE1A1D1EBE13C986 + F9AE675D455FDEBDEA0DEEC1BFFF47FBE70DBE03EC16D6DE8FAAF1BC00000000 + 49454E44AE426082} + Name = 'PngImage11' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D4948445200000018000000180806000000E0773D + F80000000970485973000017120000171201679FD252000003784944415478DA + B5566B48544114FE362D31A3C78F104C7B50145A902FECE15299D12668ADBA61 + AE925AA405811585F4A31745FD308A0A42DB5EBBE96E56AE9AAF30CD2CC5C79A + BB998FCCEDA5640F15823233DC7B9BB9EBBDEEB65BAD5207863967E6CCF7CD39 + 6766EE15B12C8BFF29224AA0CCAF89237DD63F051689E21323C5D91CC1F5BC6A + 96186302A0EB68EC0CC3C2C430309918B34E7A2AF2DD2751A23A21B22210F965 + 9A17EB5304DD9ECD34256382FF25C11EA84D82DB8A6B9CDEFF301E771FE8A0D4 + 94E0E1ED745B020A36F69DD39EC5F4552A7CAA88437155A37D02478421FE96E0 + E6366293C610FD5E75D3F822A0E096B9363116E0C4765FA74677690CCA6B0D63 + 23287EDC850B375BF0A4AD177D9FBF63DA94499086CCC1B15D0198E2EA2C44E1 + 21D1E04DF16654D6373B4E702CF3098E663422FFAC049215B35050F5165BD22A + B8B9D0200FA84FAE11A2F00ACBC1CB42191EE99E395E03D76597F1FD8709BB36 + FB207DEF320E689A58C9CD393B89D0551243C6F81A985357D3D4EA5804F47424 + 1DA982BAD488C329FE48952FC6FDDA77901D28177C68CE79F0F91177D09E2B45 + DDD3F6BF13F005A5EDC730C3919C57B7C063E6645434F40804AF8B64233B67B1 + 28528B67B736A2B1A5E3F704F412D1313EDCEE8F0388492B87FE793FC2C45E50 + 1C0A86A7E4A64060BC1B2D6CC447560083261CFAF64E5B82046930B7800233FC + 1927FADAE462E85A7BB9B9B6DC284C759B08CF0D390241475EA4E0CBF7CD1D46 + FB04F4FA0F356CB75AE0BE2E1B43A4C854CA2E4AA02A3222ABE4A54060D044C0 + 89149BFAFAC616A1E146185A3B5FD912C46F5C8989810A7C23EF8AC9E22229B4 + 1D38AED07360625F77246E5A0065A111F7EB7AE03C4184D80DF3B047EE8D3A6F + 4F81D4455B694B200F5F0E97A02BF85293387A4B99D14233BF1C45ABB490A65B + 321B29CA73C84C48B54F10131664B573BB4056F3E6776778C447BF74EE9F09A2 + D707622AB9407D95F1E6428F000D5B00FFFA06D5FB8CA685CA8E3307A1D877CA + 6A4C2090860660C66A1537D853160B8FF51AC1E9457E14164AB582AD5787C34F + 5E840CC34E6ED7ECE057B0FD1FC0F4BD0778BDD380EB060B8288103F3B69F8F3 + EB49D36229DBB78A7145556D3F024A5058A973E89B604F86A242B02D7C01AE92 + 636C5303FAD1CFD196667D1B1C1A3741EC9DD348F40597168D6C3F92E2A4A31F + 7DF207306E605E3200E1FF6727C90CAFFF0482645308AD8246DC000000004945 + 4E44AE426082} + Name = 'PngImage12' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D4948445200000018000000180806000000E0773D + F8000000097048597300000E9C00000E9C01079453DD000003DC4944415478DA + BD947F4C1B6518C79F7BEF8EFBD56BAFC7951F33BA75E9822B88520C88D92C93 + 05C410CA70986D3261B1DB3F261B24D3F92331F2A799C6B0F96B666668165D88 + 12E7FE598CC14C639C43D0988D41B69974DD5A680B584A5B68EFFA7AAD81306C + 8D0BE2935CEE9E7B9FE7FB79DEF779DF97C018C35A1AF1BF020882C81978E004 + A6EB6BA106236D0B42E4BD080045E3AA8A35ECA3587A607709717531F60ECD7F + 0378FFDBF806A9807E2734956898F027A94844054D03C86310701C02AB950B47 + E3DA075D4EEEA5BB069CB898DCC671D03F3E1655BCDE0548A520F3A4D332DFFA + 9BA208D8B2D5047351B5EB48BDD09B13F0E27B41E7A580E5870B3D849AF64F5F + 49BA522AEE1B198E48B11806DE40416C4EBDA380A9192D03E278048D0DE61BDE + 49B2FAE5ED309515B0AFD7838D14FFEE3C6DE9AEAD559B6211AD7F642842A91A + B1243E3D1D85D999202416E2C08B0A30BC5907109999382A045C5E2674B6DAE0 + 93AC8096377EC7452C8F79237DB6AC5CAC1BBA14165329B4243EE10B82DF3B06 + 34237E93C2DA607C36F4B849595F67B26C22B03E0B399F82E626F9B3A76CB027 + 27A0D0600235F9D7325034B5241E0C84E1E6F591A02E7870F058D599F4F87AE7 + 295654882F8B37D434D08CA4C7226869967F7CA6143D9A1320911C305C5EC65F + 140F8713E0B9368C3535F5E4D069D7F9E53DB0EF38D526291BFB8DCAFD603090 + B0C3257DB7A79474660534BF12C0884A81C9844056988C7824A24168D283FDDE + AB472F7FD17164E52EB3B77D7C1FCF291EB9F8613D8F84D656F3B95D25A83927 + E076488375051498440C825E5178568399D0ED9F3DD7475CE35FB97D2B01B627 + 3EB218154B405E570D160B05AD2D52DF4E1BDA97133039A3427AD714EA0D33EA + 907455A169350E40BA075EB37CBA12B0A9ADEF1E91C9BF251557C1462B03CEAD + E25BED65E8705640E5013F9E5767F553A4014AA9A07700B4E43CA49271482EC4 + E7584172FD76A66E7039A0F2D9F35588CCFB49904BC1F1100F763B77F0390779 + 3C2BA0F11830E274805EF4037F3BD731F5428F757EF91FC7DEAFBB04B3ED6D82 + 12A0A9D1A4996554ED76D0C35901FF74D965B347BA6F725AD8F73D27592BD3B9 + 9DED66DF956B0B9547DB8489FF0450D171712F6750FA106D440F3EC0E9CBC39C + 7CBE266FFF5DDFA6D9CCDE71B98867F02F2C5F50C43024EC6C312646C763F6E3 + 9DD28D5503CADB7F1568160D7086C27A8AD42FB97A51CDB75087DD0EAA373DBE + 6A40C5FEB10F395674CB324B6C731A4010D09B7E0FF56ACFD34462D580C70E85 + 369BCC7874730987CB4AD9D1C980FAFA0BDBD9CF97C7AC0AE03C3423EDDA2D9C + 5414FADCAD089CEDAE20FE58199313B016B6E6803F0192C0D6E065D4DD9D0000 + 000049454E44AE426082} + Name = 'PngImage13' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D4948445200000018000000180806000000E0773D + F8000000097048597300000AEB00000AEB01828B0D5A0000053A4944415478DA + AD956B50546518C79F73CE2ECB5ED9B3ECB22C48800A02CA45101BBCA005D9D4 + 4C17758C6FD57899FAE0D4871AB3CC6B5FD2748CA91877600AB3A949CA4427E3 + A65C1409729565B92CEEB2807B935DD80BECB2B773F6F4420A5841493D33E7D3 + 7BDEDFEF39FFF799F760F058C5601F2BAB443E079B0C077DF250304086432117 + CDC6AD3EA77FACAC6CAF77EAA5B93BB07F8B3EFD55A37872CC95C7E5725E6671 + 584F4570D871188E7182815068D2E3354E38DC17273C8E2B9DC33A4D735599E7 + B10495E76FC63B6CCED7F8A4708F58267A429620C5C4B1628C601310F006C06E + 1A656CF7ECA151B3ADDB366256EA07BB2EFEF4CD19FBF427FF13FCA4F29214A3 + 88BD9218F2CDB4DCA531B1F1122C40B0C11B02A0C37F74C822502A011F63EA37 + 33BACEBB8377BBD5A75B9B7EF956A3B9E15C50B063C77922AF20622B29979CC8 + 29484D4C7F428647E038DCF703BC70E826681A34F0F9B15720398F0452C0000F + 0FC1B0C640AB9A3ABA55ED8DEFFD5C5D797541C1A7E5D5F2E024766C59CEB29D + F96B5388380E0BC351CFEE2040E187B3024516096C1680044958FE71467D4D1D + AAABAE52B65D6F38BAA0E0E8890B05B21871E5AAC28C94D8043926A601F80480 + 651260DB47B382F47C12BC14008ED6A2793458D4FDE196CBB53D576BBE7B635E + C1543C2B32A8ED4B33932A5617670929161F761EB9396F330F6519EB49A06C56 + 4655D3EA3A5B7162DF0282C3112969A9AFA7E7A794E61467478E072360FD66E5 + CC7A6671E634746E4D0956AD2301BC4EE8ACFDD5AF2C3DF2C9BC824D9B0EB30A + 3624EF589EBDBC3CB7389B1F2004A06A76CEAC2B5BFA66BA9E5B1B3693601DB6 + 30B7EB5B3D155F1C2B5DF00C0E1CAE2C8C8E8B399BFB744EA2302E16333B3020 + D08E680EC09EE3B367B0BD98041A4D2A9A5AF08469E8EAE8635A2E5D19BCF07D + D9A90505EF1CA84814F1F92757ADCFDC96929F8A8F4DA2F9F7014421C1C62DCA + 9958B622C154518866754E80A6454D55559EA96F69AA3E3EAF40B57FCB726D50 + C0D2466DD9268D4F7C376B6396589A28C7EC1E0218344D7DEDB371BD84040CC6 + 80C31F64746A1DEABECE5873F9EBB33A9DFAB3BF15B41F78A690C7659A3D9152 + D044AE8500AE08B1F83266C593692C91428A071836BA0470E0A2B1E4A10747E1 + 38C6BD8C65C014EEBCFE9BA3B1EEC7DAB6EB57CA298A6AFB8BA0637FF18B3C11 + 5D91B03A534684ECA0712583C61D0316271EE408E4DEA495295162B904E39242 + 60B1D998DFE367D04507F6210BD577476DBD73BBF9467B5BED799FC7D38470EE + 47041D1F146D1788C22715B9EB92843C0A5CDA4EE8B708A163221E8C7E4269F3 + B0FB2339FC2269AC224D1EAF904444B2591E97276C1A1A720E1B740383035DB7 + 7A7B54F5341DB88D702E987BD94D752E10D3A58ABC8D4922AE7F1A6E30B2C130 + 26048DD50A23E38EE7CBEB354D19196B93A3158A748C2696D1B43F0AC5002EF7 + 98C334ACEFF47ADD030835821EDF432EF630733E9FFA217ECD3A998817828981 + 2ED0E93130B824A0350D41B7590F6E7FF0B9BA2E67CD833DE8E6017410403CE0 + 4C4D68706A90E0CF3F1CD5C1E2A24801D1B0243707F85C149AF60E188609E877 + 4483D6A8875E8BDEE5F4516F35F6B8CEC1220AEB39FE2CB3247B25F0055C14CB + 2D1834B2C0E010836678007AAD7ABBCB1B3C78AD775CB918F8B4A0FE5409B366 + 752A50860E1832A1CC4705A0351B416DEC7721F8FBD7FAC6CF2C163E2D38B4EF + 6D2647781F12682F82F3A0CF6C821EF3008C7A03AF2E36964704BB77EF629688 + F9407A6CE01CB987E006704FFA76D575BBBFFCAFF06941494949915020688811 + F1E15E4F2BD82CFA5D63DDEE732A80D0FF21F81D69327688E78891A000000000 + 49454E44AE426082} + Name = 'PngImage14' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D4948445200000018000000180806000000E0773D + F8000000097048597300000AEB00000AEB01828B0D5A000005234944415478DA + AD956B4C53671880DF7329BD9CB6B4A5174A454005112F205E16DCD46C3097ED + C7B2690CFFB665BAE80FB3FDD8E2DC8C739AFD984EE3C8326203D9702E5B069B + 139D8E9B82283299454AB9147B81DA9BB4D00BB4F476DAB3AF80896E02D3ED24 + 5F4E4ECEF99EE7FDDEEF7DBF83C1135D0CF6B9BA4E18F2B0C4896848118B46C4 + 8958CC1767E1CE90373C5E59B92F98FCE8E119D8BF459FFAB6553435EE5BC7E5 + B25F23D9E4F3296C56068663EC6824169B0A04AD931EFFF9C980E7728FC5A0BB + 5657197822414DED4D95C7E57D93120BDE11C9848B6599524C942EC208160191 + 6004DCB631C675CF1D1BB3BBFA5CA376B571B8F7FCAFDF9F764F2F7921F809F5 + 05294613FB2472F1DEFCE225F27495048B102C08C600E2899908490265251262 + 6C4376C6D07377F86E9FF65447DBEF3FE87437BCF30A76EEAC25D695A4BC2E56 + 488E1795E465AD582CC353701CEE870106BD00D1F84C0E481C40CC678087C7C0 + A233C7356D5D7D9A5BAD1F5EAAAFB932AFE0CBAA7A45740A3BBAB468E9DB1B36 + E612196C12C311D11F05E81E07F044101F9B192C12408224647882D15ED5C69A + EAEBD49DD75B8ECC2B3872FC5C894C2EAA59B5A520373D53818950C41401E098 + 0218F2CD940B8F35B38A200D80A37769BC3838B44389F68B8DFD571A7EDC33A7 + 20999EE505F48E25ABB3ABD796AD11D024056EEFC2BBC6E502D02E27A369E8F0 + 9DA93EBE7F1EC1E194DCFCBCB7566CC8AD282A2BE44C445360EF6737E704EB5A + 7470E9B73D4071D043D00B3D8D7F84D5159F7E31A760EBD6C364C973393B9715 + 2EAB2A2E2BA422041F4AB6AAE78D3E295009019C1607D3DDDC11A8FEFA68C5BC + 0B3E78B8664B5A86FC4CF10B4559828C74ECBE77E1B6C9498D436FD720D37EE1 + F2F0B99F2A4FCE3BE3FD83D559428A3AB1EAD9D5DB7337E4E1E353A8FE4300A9 + 6C00394A059B98ED83590A8DEE4EEF24E8DAB5745DCDE9E6F6B6FA63730A3407 + B62DD347F9A43E75DB76A92AEB83359BD788A4590ACC1D208041D5244896650A + 2A4FD4033896DC7C063CE12863D01A50F44DD6868BDF9D3118B45F3D5670EBE0 + 8B5B785CE65A8023051D67234470658CA464CCF267F249A1528A4718549B0C0E + 5CB4021E1A3824C03311641C265BA2E7FA9F9ED6A65F1A3BAF5FAEA269BAF31F + 82AE0365AFF284F1EACCB5AB6544CC0D3A5F0EE8FC727078F1289BAF0866AFCC + 4D15292418572C0092C5C2C28130830E3A708F38E8C13B5AE79DEE6B376E7536 + D68602813684F33F22E8FAB874075F9838A12CDE942DE0D1E0D3F7C09043005D + 932AB08609B52BC01AE2B0A95269BA325FA1524A52382C32E00B246C23235E8B + D9601A36F5DE1EE8D734C7E3916E8443ADF850DB2423E78BE215CA759BB385DC + F034DC6C6581795C003AA71346273CAF5435EBDA0A0A36E6A429952BB038B134 + 1E0FA7A23480CF3FEEB1598C3DC1A0DF8450A368841E70B10739A728FA67D5FA + 4D32212F0693A65E30183130FB24A0B78D409FDD08FE70F4E5A65E6FC3EC1CB4 + C5903C2488590E3A57219A2C24F8FB0F4773A8AC94C3275A1615170185DADCAF + BF03660B01439E34D05B8D30E030FABC21FADDD67EDFD9059BE03117D67FEC25 + 6651E14AA0F85C9496DB306C25C1EC1181CE628201A7D1ED0B460F5D1D98503F + 0D7C5AD07CB29C59BF360F6873178CD850CEC7F8A0B75B416B1DF221F8475707 + 274E3F2D7C5AF0C9FEF79822C17DC88C07119C0783761BF4DB4D30168CBCF1B4 + 697944B07BF72E6691880271C005DED17B086E06FF546857539FFF9BFF0A9F16 + 949797970AF8FC16B990827BFD1DE07218778DF7F9CF6A0062FF87E02F9F6855 + 88E7298D620000000049454E44AE426082} + Name = 'PngImage0' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D4948445200000018000000180806000000E0773D + F8000000097048597300000AEB00000AEB01828B0D5A000005A34944415478DA + 8D960B50546514C7CFBDFB625958DC455049C8074A3C44B490C67C8C5A098A8E + 8E61A0E68C363A4C884C5A3E7240D1F1C13496A58E634FCD0AABC9416DB29C18 + D9626C542052234904158170A10576F7DEBBDF7D75BEBB0B3E82F49BF9CF7767 + F7DCFFEF7CCF731918B8E950C1283B6AB8D96C8C62F5AC4994149EF0A4197F6B + 4575A13894D29F81AAAAC00C601EA6D3416A5090F9F9509B65AA2D3C74C490E8 + C121C19620D6E316E4F616678FCBD973C3E5723B445E2CC7F81A94F7710034EB + B17ABD7E516C42744E424AECA8F8F1234D23C63CC10C8D8900539001BC5E1E5A + 6EFD0DF57537D53F6A1BF9FADAC66B6D8D1DC7144529C3776F51DF8100D43CCD + 1E11B626754A52C69CACA9831252464358B815581DA305CB8A028AAA804F26E0 + 1638686DBBAB5EB9F417549EAA71D6573595096E72103DAEF442EE07B0A8F1B6 + 48EB96CC97A6A72F58362B3866F43046A763FBD2A1C6C5F90ED8F8EEB3C0893C + 78509C28809BF74243FD6DF5E7D2AA9ECB3F5DFF9678C91E0C6FF0FBDF034418 + 0CBA4DF397CE5CBD7CCD7C4B544C24A36391C930BDB940D19A735AE0EB7B9F06 + 0FE1347935103EFB38B8D3D0AE3A3EAD72D59737BD8361FB513DBD0093C1C02E + 9B38257157DE9625914F258F445F06588645E1D46048515E399C2E3D08F372F2 + 20B7244933778B5EF05210422888230234D5DC81F3876B9B3AEA5DEBD1F73402 + 240A181E3ED476287BD5EC3959AFA6B366B34903E8581DF66C9F396D14B0724F + 3CB87D1E70138F96B936020471124E57B7176A8F5F93AE7F7FFB33C9236D4440 + 07CE33A4C7A5C41ECDDF9A13999C1AA7654DB3A7806DF9157DE6BD80FE5AD4AA + 0EE071148244A0F9421B5C3DD2D0E469E65620C0C1982C86E21973D336BF5698 + 6D1844774C20FB9D05950F98D31D24490A88921C90FF39B7E02DB0AF6C418080 + 001F74B5F640DD478DA2EBF79E4259944B98109BE5544E6E46E6E2D5E98CDEA0 + 031617F7ED75171ECB9C2A7F7D21985FB901BCE407705E011A4BEFA8CE739D47 + 245E59C9D822C2AAF28AB3274E9FFB0C43E77EDF869AC736F71109DED85C0CCC + 92BAC0088876465ACF38D5B613CE5F658FFC1C631F32A8A660D7D209A93393B4 + 1D7968F3953E407FA6D243CF9B0A77009F558D009F66EE9345E83CD705EDDF74 + D6CA6E790263B5592A96AD9B37EDC5ECC98C04321045842FB7DE8413C7DE7FA4 + 39ED0B8B77C13F0BCE6BD3A3017C22749C76A9DD673DD58AA0A432C1A1410766 + 2C9A949BB576B60E8218201844213FEC76C1E71FEEFD5F73AAED3B4BA0655E05 + F81040307BA18B40676997CAFF269C54457521C31AD8E58993461F78796346A8 + 2DC61A18A61F72699F0A1FECDFDD6758F06651BFDBB431E34704F8DFE11A04E8 + FECACD49B7E5125556B7D383161F1963FB62F6EA2929492FC4323E55BC079125 + 683C6C85F7DEDEAE01E8822AD957B5E9E051DAB468BDDF5CC445F73838953B2B + FCA276AB5BF01C545240A8C1ACDB903C2B6EFDF455A966A3DD0082ECD3168B42 + 44EC5D47A361CF8E426D41DD8B2EF6ED169A756FE634195F1B016F19D72DD5C9 + 5B41828F11E0E9BDECE22DB6A092B4A5E3D3C7A63FA9978D0AC35388F6B27F67 + E8BF4ED602DB321D81D1899A4445F2F76E51E52A0442CAC5E340A010439BEFBF + 4D8DA8CCC1636D45E316C4260E993458279914C6171809096CBFF09393E166C6 + 59CDD01730A72324682E54119138C845F52E6C432F074A7AB8E0846255586C1F + 655D1B3D6D5842449A5DCFD870573DB026FE7511E994507311FF6B2720541322 + 568BD56A3BD0ABFA3B943050C9B4A266996C8615F6C4B099D6849060D3082303 + 363CD1264583116AEA45E05DEC9B7C2AA9177BA4EBF2192CFD9FE0BB9528FE51 + 45DF801AC31AD9857AAB3ED318AE8F3344E843749178EF5A8021DDA24ADA4549 + 724A3DB24BF95375AB65B8A02703F5587A54D1EF6DF477FAC91285953A99D1C3 + 38303276BC074D8A0CBC4A54271EFACBA8AB18D30EFE4F97FF340AF8172272E4 + FE66E507F40000000049454E44AE426082} + Name = 'PngImage16' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D4948445200000018000000180806000000E0773D + F8000000097048597300000AEB00000AEB01828B0D5A000005A14944415478DA + 8D960B50546514C7CFBD771FC0C2E22E026A8A2F140145B490C65047AC0445D3 + F111A463A38DE608CA949A1A83864C2AD5E8543A4D33659AD360E3E8A036D958 + 069B943D80C8576E12A8BCC28559D8C7DDBBDF7D75BECB2EBE60F49BF9CFBD77 + F7DCFFEF7CE77B5D06066E1C2A0C65450D0F0D350C6375AC5194141FF19166FC + AD0DD58DE2514A7F06AAAA0233807924C7415A4848E8F31116D30C4B54C4A8D8 + 1183C3C34C21ACC72DC81DAD0E97D3E1FAD7E974DB449F7801E3EB50DE2701D0 + ACC7EB74BA25F14923F29252E3C7244E1E6D1C35EE2966485C341843F4E0F5FA + A0F5F67F60BF7E4BBD56DFE8B3D737DE686FEC3CA6284A05BE7B9BFA0E04A0E6 + E9D6E8C882B48C89D9F396CD1894943A1622A3CCC0728C162C2B0A28AA027E99 + 805BE0A1ADFDAE7AE58F7FA0FA4C9DC35ED35421B8C921F4B81284DC0F605193 + 2D31E6A29CA5B3B216AD9C1316377628C3716C5F3AD4B864A30DB61D781678D1 + 071E142F0AE0F679A1C17E47FDA9BCC675F9879B278997ECC3F0865EFF7B8068 + BD9EDBBE7045E6BA55050B4DC3E262188E4526C30473D12EBB0A2AB5E0B57B13 + C14378F06A201E3C7E1E5A1A3A54DB17354EFB85A6FD18F231CA150418F57A76 + E5D48CE43DF945AFC44C48198DBE0CB00C8BC2D260888A5192224169810DCE96 + 1F820579F9F0D2CE58F02284F68482782240535D0BFCF2697D53A7DDB9197DCF + 2240A280E151432C9FE4AE9D3B6FD96B596C68A85103702C87572C11CB8084CF + 7E4584F736546900DA2824638BB1B70708E2252C578F17EA8FDF906E7E7BE74B + C9236D434027D619B21252E38F6EDC9517939296A0654DB32F2DBCD8EFFCA500 + 3AD892A4C0D2570B21219F0737027CD80B4122D0FC5B3B5C3DD2D0E469E65723 + C0C6184DFA92D9F3D3776C28CED50FA2332690FDBB85D57DD9DEDF82E6A2246B + 5AF5FA56B0AE69458080003F74B7B9E0FA678DA2F32F57B12CCA654CB8C57426 + 6F7D76CEF275598C4ECF01CBB25A0FCADEB8F408E061733170BFBEF06D80BC6B + 1A80F70AD058DEA23A2ABB8E483E650D63898EACC92FC99D3A6BFE338C36B808 + A0A37F606BED038081CCA9FC44822D3B4AA07BF1AFDA1A693BE750DB4F392EC9 + 1EF939C61A3BA8AE70CF8A29699913B5A9884B09449C31878BEC7D80FE4CA587 + EEB7179742FB822A0488D055D90D1D27BAEA65B73C85315B4C552BDF5C30F3C5 + DCE98C0432109C2DA22CC189DD2D1AE049CDDB722AB5ECFD7E113ACF3AD59EF3 + 9E5A4550D298B0889083B3974C5BBF6CD35C0E421820184421DFED75C2A9631F + 3D91792BCD1CEB4F307BA19B405779B7EAFB5338AD8AEA6286D5B3AB92A78D3D + F8F2B6EC084B9CB9370BD4CFFB49BFD3F4C3F7773F98399AD3C1F54BBD89F10D + 02F47CEDE6A53B72992AABBBE9424B8C89B37C35775D46EAC417E219BF2AF641 + 08968ABE4402CF3D4747C2077B77DDCB9C9605CD8580B98883EDB1F12A7F5EB8 + A8F6A8453859AA2920421FCABD95322761F3ACB569A106AB1E04D9AF0D163515 + E5205004B97C02EC2B2DD6CC5B727ED4B20E664E93F1B713F056F03DD27519B3 + 80CF11E0096E7689264B4859FA8AC959E3B346EA6483C2F8E460B77BCD697DC3 + 4E3EAD05DFCAFE5E7BA6A2334EBBBA4595AF1208B9201E0702C518D67CFF6E6A + 40E50C1E6FD93969517C72ECB4C19C6454187FA02724D083A8D3D3D1FCBC66E8 + 0F98D31E1234176A88486CE477F52EBC835E3694F4F0811381A7C272EB18F3A6 + 1133872645A75B758C0567D50363D23B2E222D093517F1BF0E02422D2162AD58 + AB7600DDAABF4109031D9966D41CA345BFDA9A1C99694E0A0F338E323060C195 + 6C543418A1A65E04DEC56B935F2576D125DD94CFE1D17F18DFAD46F91E77E8EB + 51E35803BB5867D6E518A27409FA685D381783FBAE0918D223AAA443942487E4 + 929DCADFAA5BADC0013D1D388FA5C71DFAC1467FA79F2CC3F0A44E617430090C + 8C15B729A322834F25AA0317FD65D4558CE980DE4F97471A05FC0F622CD6FE88 + 2F15D20000000049454E44AE426082} + Name = 'PngImage15' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D4948445200000018000000180806000000E0773D + F80000000970485973000017120000171201679FD252000002814944415478DA + 63FCFFFF3F032D0123C8822F5C7FFED767DC625876E301458645692830B0B2FF + 67E8ECD06184391CCC282EBAF6DFC7478B21AA671BC3F36D5E040DFAF3E71FC3 + EFBF7F19FEFDFB0F66FF01B275A20E32AC28E766F0F2F26250538B63387F7E3A + 235E0B3AD73F25CAD571D6BC60DA28E108C3A783A160365116E07339C4D540FC + 07C1364B3EC6D0E0AFCDF0EBD72F8679F3FA48B7009FE1206C957682A1CA5395 + E1E7AFDF0C4B974CA65E10051AB28169FBACD30CC5CE0A401FFC6658BD6A06F1 + 3E20E4F2DF50BE73DE59862C2B09A0057F18B66C9E4F9C05C41A0E4A45EE8517 + 18524C44C03ED8B573097E0B40C9AF7BE333A282C8550D92DEBD4B2F31C4E9F1 + 03E3E017C3C1FDAB705BF0748B2786EB103EC04CFF3039FF8A2B0CE11A9C601F + 1C3FBA1EB7050F37BAE3351C3DB8FE41732CC882402516B005674F6FC16E0138 + BB032D2107C00C07E583CB1777E1B6E02FD07520853F7FFE82D0504DE86C506A + 8188C1F81039909A5BD7F763B7006678754D0159BE5056B303EB7FFCE038A605 + 6E6EC05CF813E292D6B60A9002AC86FCFEF593E1F7CF9F0CBF8018C4CE2E3A0A + 16BF7DF30083AC822558FFCB6767302DB0B757807BB3BBA70E6C0137373758B3 + 868605C3D9B37B310CFFF3FB17437EF969B805E252266033DEBFB9886981A5A5 + 343C0C274D6A065B2025A5C42029A9C8A0AB6BCD307B563586E1BF81EA4B6A2F + C22D1014D107B3B15A606C2C0A8DC4DF0C336674802D303676061BAEA666C450 + 90EB8461F81F20AE68BE4E9C053ABA02F0208216B70C09097560C385852519C2 + 8395300C07D1B59D77095BC0C8C8C8505478F5BF82222B72718B35CC910DFF07 + CC78F53D0F88B300040C0C32A8D202B87061066A9D4C4B40730B0038C31BFE85 + 5838D40000000049454E44AE426082} + Name = 'PngImage17' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D4948445200000018000000180806000000E0773D + F80000000970485973000017120000171201679FD2520000026D4944415478DA + B5966D48535118C7FF138A455F84588C0A7A27AA1163CDB69168929851CB5806 + 81D5878A7C29412428484264A85006814342E805112DE8436F94F43E74393775 + ABC1552C87B5EA6286B7B01AB4BBD3CE8D0DC57976B7D9038773B8F79CDFEF9C + F33C17AE821082FF198AE982F607CE946C4DCD3731D8D5A2A063FFDA73E4C9FB + 469C8CB0E30A4AF61A928247D660F9D225A8BE7019366F0B0CD595C8186B43AB + 4D9024F322D06E5C8521F75D2CAB2A85E94026E010C00533D1CD09E99D4014C3 + E87CE482F2A717D93B8A305AA381A97F4282D3484B40E1A248F0BAE33486825A + 188D464C0A5FF1A3AA002A9EC0C7837D457957C7124A6A958DD896AF4146C08D + 1B1E23D46A35789E87D56A452010483EC9244C20465A28B27B6767650CFEE5D7 + 38BE8F7F46AF5026C1559BCDB1AA922D48040F0A1E145B57E06C7D2BAEB5DF4B + 4E20176E7778F0F0A54B9E205E0EA6DF793C38DDC463BB5BFE0992D97974DED3 + 9E01798254E0B4745FF47A120BA2354EFB70E47D435D09FE902294177630E1B4 + D95D6FD88243BBB324F8AEEB01E95959A8166F3F4E4137F509CEC515B0AC3922 + C1D7D574CFC8CF95DC050885C370F4FBD88283057A69277432ED2FD51FC5999C + 85F03FE7E00F2A71E7C322D435DF8A9D303A2F3A767939B6C0B253175BD4D556 + 0197E3154EE95663D0FF1B8E491EE50D7D73C2693FE01B660BF6E569638B8E9F + 3886D1110E2B5504872D7AE8CD179970DABCDC085BB027678B34B1F8F604BED9 + CC385FBA1586FD4D33123F179C26DC37FC8E2D28DCAE99B5482E9C464241BE69 + 53CA705982DCAC0DFFEA5F24B36A9C7E132CB82C41B66E3DEE3FEB433AC114D0 + 3F84F988A8E02F75743575B8E251160000000049454E44AE426082} + Name = 'PngImage18' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D4948445200000018000000180806000000E0773D + F8000000097048597300004E2000004E2001167D99DE000004124944415478DA + ED955F4C5B551CC77FF7DEFE61D0C204D7758139C15684752C1A565A47D7A983 + 1664449D75337301A7D68D8CBD69F4C11463627858427C30DD8B3A0C8B0FBA10 + 71B8F247470706A6996E93617173C060A56D645DD7526EDBDB7BBCE75E6F2D5A + 46E2E29BBFE4E49ED3F33DDFCFEFFCEE39B7044208FECB20FE07AC0A584DE070 + 38C889EB011345C1101EC798786D77D747DF72DDE46A6B1B0F1E54DE1560B7DB + A57136DB4033B17373FEB9BF262872978F898D5C73B9622B257EB4ED83B1C0B4 + 47BF1280B0B6B6CAD4892C3D4D477873868DD76C543D90A028C9101E47A34BC6 + 1FDD83639916DB6C2D0A2A0785B12E1380686A72C8C91CBA72297A67188B9289 + 64C3E8E0D7BD78D2F4F4B3FB11CB7431887D6ECCD5DB9D09A0B75A7365843494 + E91D70E64D9C790167BEC49B2340F5DF9D397D46D41A6BEA9EA024926F922C6B + 1DEDEBEDCB08D07380827F02083367AE55AAB64522425908966818EEEBE94D5F + BCD56C5EAB9428F2C38CE4D625F797B733012A6A5ECAC9958422CB00369B4D26 + 55AE33B02C72AF64FEA75E3CD724D7D88C6F903B79DBCF9FD7138474940798CD + 6689BAB8CC4800C1671EA7A36F2A08E4CECB96215A921752057D373ADDEE789A + 21A1D168642A5561194B4AF3280449890480610072D7150402B3D7A62E9494B0 + D5119AC100E285A6D71F27097224533233F3334E85E2FEAF064E7DDA2F663F57 + 21DC01DB867AE7A60D9B0EA7EBF3E6273EFB708DFF45DF758F90C9AB47DE30E1 + 9AE3C191B60EB82F0B204803F8170166C3003FCF0661F2633B042309CB956117 + BE60E83897EC6B4E07CC3BDF85503F9DD2FB16A2606F7F14C8DDCDFCDCE9CB1C + 605FF361249A57AA01BC11A189001C18E27ABB06D6CA91B574F3634959B66260 + E709278890E91E9AD737BE550E64FD81947957DD6E200A353A64AA36C13BED1D + B086ABE312B37C0738A83B32686FA900AC1303EB87D5592988BAA41408CBBE94 + F97B1A9D50226EA272E78E277FC03B102314135A20BA1C50AC2DE6C745EB8B40 + D48F3F9805AF580BF9BEDF7B93374FF4B3BC9E8E45B711566BABBCD4A81D2CB6 + D8AB372A05C3585200E02736BF18F2C36F278F7AC747CFD9755BB630EA22ADCB + 70A803B05E1EFE1D2C6D55BC398EEE636C4A3FF4D3F70FF1C7B4EE99BD0F8763 + D1C9E71D9F839CE2DE605096DA0D16E3FADF0E069F5A5CB839525E5E0E1ACD23 + 86ECFCF56EA3FD18B4BCBF19FC37A6F9CCF14E30A82AAA033A112F5B98F9D593 + BA6886DA5A4DD5F6864F2E8C0D544F5D9D4A01B4BA32EFA4E76AF3BCE762FA27 + 9AB4ECDDBFE340E897B37B923EE81CF0420F57B646EE0E8990A2CBC2255EF5FF + 60A548580BF7708F2FB0399344CD87003AF1EFDC1146E9907B01A0D1F1004CCC + 254E70E62FA7CFA543FE3560726B3E3A7BE916EE2A38C0E2DFE731A4A1E21E4A + 745CF86CE838F32B77D3FC01CF05F8A9B438C37F0000000049454E44AE426082} + Name = 'PngImage19' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D4948445200000018000000180806000000E0773D + F80000000970485973000017120000171201679FD252000001B74944415478DA + B5943D2C044114C7DF6A5CA150894204052AD14B7C14D7701D9D44EB4A854434 + BE3A89E28A0BD128080DA7388ABB444E88904B705710111FA5467D91DB9D9D31 + 6F6677CFB9B998DD75AFD8F9DCFF6FDEBCFDAFC118834686810063BB3CC9FB47 + 8AF52988475241C585B6036089C1DA0D7345FE88478C7F030841FF5137CB0A60 + F5395C2156FA95597A80D3F377161BEBF953C7223694BE4C20361563D324109B + 598442762B3800D75110C54DCB167D14C638CEDEC0CE7E3A3800D76C14E4E284 + C81641160761A4CFF2C100388745213617B628942DC2019801952D9180ECE55D + 30804D2950CAE0F0D586E98BDAFA27064A106D3321775DD4074C8C763B93F2E4 + 16BF92965D06F5FC5118FE84ABDB077DC0F88804C8821271E7AD074D10C61F6C + B639E501A2439D62567E2D4464D09EFC08A4EC65B0DC6754D520B997A9DAD0D5 + D10B61FC719FD9AC0096D6376A5E5C5B988730FEF00086A1FE9F9DE4DE42F9C3 + 37C0AF3F7C035C7FE049F1C41240C518A1652703D71F5A00953F4C47D86BC555 + 71805303D71F5A00953F4C2703B7B5BCB104E48B4FFA00953F7E9E5C05283EBE + F8ABC16F7FE8843640E50FDDF0008D8C6F397A5EEFE9EAF0950000000049454E + 44AE426082} + Name = 'PngImage20' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D4948445200000018000000180806000000E0773D + F80000000970485973000017120000171201679FD2520000018C4944415478DA + 63FCFFFF3F032D01E3A8054459C0C8C8C860E091F0FFC28E058C843490AA8E3E + 16187A26D22C9C864910812CA079102DD87000251E40E23F7FFE62F8F90B827F + C0D8405A47439528753D15A98C2816C4FBDBA3D8FEFBCF5F08FEFD17CEEE98B1 + 9461626D1651EA26D565E3B6009BA64BB75E306CD8B183617A733E51EA66B414 + 60B7009BA6DF7FFE315CBFF78A61F9860D0C0BBACB8952B7B0A70261C1FCF5FB + FF270438E0D404A2EF3C7ACB307FC54A861593EB8852B7724A3DC282192B76FE + 4F0A76C6A9E91750ECD1F30F0CD3162C625833BD8928759BE6B4212C98B868F3 + FF9450379C9A40F8C59BCF0C7D336633AC9FDD4694BA5D4B7A111674CD59FB3F + 2DCC13A7A65FBFFF30BCFBF89DA175E21486CD73BB88527778F51484054D5397 + FFCF8CF4C1A9E9D7AFBF0C5FBEFF62A8EDEC61D8B6B09F2875A737CF415850DD + BFF07F76B43F3889E103152D1D0CDB164D204A1D4A5151D231FBFF2F600EFCF5 + EB37C3F71F3F187EFCF809A47F42E89F20FA0730DCFF8035DB599912A50E6E01 + 2DC1D0B7000029AD9AF9DFD03E1F0000000049454E44AE426082} + Name = 'PngImage21' + Background = clWindow + end + item + PngImage.Data = { + 89504E470D0A1A0A0000000D4948445200000018000000180806000000E0773D + F80000000970485973000017120000171201679FD252000002694944415478DA + B594CB6B134118C0BFB9743D6841A48A1E5A1FF1502A5AA555A3584544BDE829 + 1E04C58B87E4A247FF84EAA168AD90A017C17A908882082A8A50A15AAD448B0F + D0F8A8252D4A1A2D096477670DE37C3B997D249B6636E007C37C330BBFDF3CBE + 59C21803F305615A9411E061E75F7972C233AE7E6B25080A60943073031F4492 + C0BE240005F4909B4B59CB029A4FB1B64709400906423197A28BA7072137F72B + 347C64D22062073C50823D6B4F08733169F7083F9BBA0385D96F502E2EF0F607 + F4D2028CDDBE09EBD7AD8223E792F6BC5EFAEDFB3E742F0BE9749A10E3393067 + D5C704B8AD230EA6C94F25E3AE6646BFAA0CBF3E320885AE9810B01B42605F28 + 17689A18A2404BBB82A9A51794E1AB97AF84F7ED0355419323CAFF5801F3B9EF + A1E0183E01C2B162B08AF0B29D1D552B2BF3704609BEB1732D509302A57FFD02 + 59FBDED2C45C56D6A5F39D4DE1DB36F5D870D3B4EC3EB36497E788F83BC05A8F + 6F276C78585C78FCB2D845EA8C9B378A81683F58D472E0D84F903EFF1D600C9D + 24ECF0C1534DEBBB52A9701007EA149E3C18879ECD117E2C964F3246B7B426F0 + C211F4ECE924F4F675DB70AFE471A93BBCA0168EA097E36F21BA672BE8BAE193 + DC9F8F841304C1B17FF3FA23EC3BB0838FA94F7277AE4B5DD0088E731FDE656D + 81789CAEE4D6F41A35C162705C69F6D3B423F04A463F773417D4C2CB6543801D + 9105B3B99F3E81945C9B5AB6B8C0811862B5A65CB5078E2D9F2FD409AEBCD26C + 38E681025538CE178B259FC00B0F14ECDF7B5C198E7760188623A885070A76EF + 8C29C331A420081E28E8EF3DAA0C9702F9E70C7A3F758209230661A311BC4EF0 + 3FE21F497E40FE838101750000000049454E44AE426082} + Name = 'PngImage22' + Background = clWindow + end> + Bitmap = {} + end + inherited JvFormStorage: TJvFormStorage [7] + end + inherited StatusBarImages: TPngImageList + Top = 232 + end + inherited dsDataTable: TDADataSource [10] end end diff --git a/Source/Modulos/Contabilidad/Views/uEditorCuentasEspeciales.pas b/Source/Modulos/Contabilidad/Views/uEditorCuentasEspeciales.pas index 1b0b895782daebca1556fa4cacce7aadc14a0c6d..a26f32c30bdda89945c6dc7af9a29a6e99af676b 100644 GIT binary patch literal 4885 zcmcIo$!;4*5cOGr{-F*5L@Epg`zXN(xJjU3Ef8fVIT@{)Ce_KXd(zWGNjCgJIp>xf z48$LlU&yPTRh%Iu9by>fOfR*(s(Mx9fB*iPYUL=MgvuE^N~LxpnIy3cl!#<^=LfgXSRqXoLCil4QEoPyf_w4oS86< zWM=AgxybHa>cw;kJhHdz;hV7ueuFE+H|))gu>Ab9mxZ;dlS=^S!dw}aCijk4p#dZ`iVz0-8SzuM{lwMp~vr?giUaXGBv+5?m9K`Vq zafiLR94uVP1rV?g#RiVC^vehtuwmmPG7%mNj_}v2mxXnG-Heh8z#zGA&X( z%Xs$?BiV_r=NpWqw-j(@cZw6Gv9!srE(;`@+t!SHeF$akTc|<47+Vv_FtyT`&Ft3P zb!Ji{u()|~^Q#P8*Po27S_$XPCpvDxa!AuM^@}>sH5^xv5so#kR@=EE)JDdLFAuugI3DAR74Gk*_293-H0bd zc8_W@*8_K+%9Zh{rp*zVm9$84*-$=-)KY0-pFRl&QganN=jb?%qfIB-&N#in{<_7N z;8uIBTpF1qM`4h?9uhbL^nyy*+k@AoH$ZCNlBk82VTYY(T)O0LrN2RB zg-RrvUm(#~jqc~Uuy=0gRy>eKHKbag{s9&V79>J}+F)Rs8XAVbP}R4;bY5CTybGPC z)Y;I{FS~yq6Ng$!I($plHqA(=aJqkDoHLmogKZ1;AzDM;~u)m{iqUKDAd)Rp*(b^X<%5 z(j6#-rmX{Nx8F!rR^3>HzL%u$qd{v8t%mHXb~rXQ+{&7&16G((>%*I=tLV^=#IAo0 zv-I=nyA0A=11U5;r(W0Rurl=rnY$&Kx1~$vbv?hi*^NXjLWBL!j}qIP+K|j#TSC?^ zENbT>B76$6%qBIg$>o?}5Xa;iMfnZP8dq|T;=_pApWMqJby=s$5c|Tj;!D6=pNz|B zd8g;p0W3V_`u3dv$HdUwclQ4IiU3PNHwNFMmN1S<646ow-~P})?)7MI;G_=Jw?8#r z&W0awp%s2-n<(598N7oo2H6 ZG`_{#KcKstSq-r(T)}UjC$(3v{sT94bJYL< literal 6170 zcmeHL&2Aev5WXAmJItYgr9$2~0osEKw~!?{5a2Y096p~l>bpoec77Ifw zFL5xT@tk z^W(A3; z-%f2x5EU`nADBW>_?m@?2`GZ|y4zF&e$5BM^zB(Kr^C zI0o?Ch;*eQo?@VDCcD;VZGA9ivjYkYAiGi@8hX)mW3G@JqZz>DiYO+diE!eM1I}+U zid=F-VZ_QPN&8Q(iox8;u`{d^d9WA}`>Zsa7G4PZjye3QKNh!5edymU4(JY-5V85a zJ2rFxhivTUSRwT&Nw9)Xhj6$1qRkjv6b7S2NM)+U-NH0hlp#c8DXcAAWzOkj$1{pB zC8)MY8;c}D%DSH~g*%o#VPTD7Z-G=EqcKfMzYt&wcd@Ot&q6$bJ)hinAqbeecgqp@Mss7(%GGOJPNvS zO3~5!4lETkj#i9=v+46m7>{EWy*tWF)ustI}ebtqa6m@ABXf zW)05WYC*rq5}$bBIl2ZlNjS964tw(!#$Kco>!=XK8MX;w)DwQQkPa?4(leMWqA~X<1QW|TMYyQ$OW zt7D*99ZmB<_?SGbz0X_9MNoAeOxkOaK)ru6tol2?FG~(yrpUFti))T4DmA2s`@uBfepfQ|M%Jojg0f955J^#7xQ{saYl3%&(qKe&<2@cJ zsYQvJs9TJ*kz<`D4t|6SMpnmTtLo|l#k@MWy7L|jvy}q>J1#GS^@4u5U_4OjPfsd` zsf3=3sQ9wvz1U-%-!(E*EjDxcH9XZChQnHwtwc?QW+?F9KhJL3R4S+IdUpi$ms|7d zbe!4dJyhc$Y9TgC(|DU>ldtvk0Cvwez?_j@t)?)9sh^^j1?VZO63^M;A<6lTpe~v@ zI44hy(Wc7C{tHA5%S;$axj7Q+ke*67E6)-9i;$KXJ&tL}=xvOdVQIvBB#LQXZCLX3 zUO8_8KjP(xDF3S)XHcYpn&XdYUzoqR{T`D?x}C~nC`X4P%u%Y*DGT~X(s82&3M ztfPJW40GrTUZI`(iA1}WPPiURdF9)614oflx}d8HJLUA`!FJbO>nP(OEuBaI^z!=; DvZ1ns diff --git a/Source/Modulos/Contabilidad/Views/uEditorElegirBalances.dfm b/Source/Modulos/Contabilidad/Views/uEditorElegirBalances.dfm new file mode 100644 index 00000000..4e5eaef0 --- /dev/null +++ b/Source/Modulos/Contabilidad/Views/uEditorElegirBalances.dfm @@ -0,0 +1,257 @@ +inherited fEditorElegirBalances: TfEditorElegirBalances + Caption = 'Seleccionar pedido de cliente' + ClientWidth = 656 + ExplicitWidth = 664 + ExplicitHeight = 240 + PixelsPerInch = 96 + TextHeight = 13 + object JvgWizardHeader1: TJvgWizardHeader [0] + Left = 0 + Top = 27 + Width = 656 + Height = 60 + CaptionFont.Charset = DEFAULT_CHARSET + CaptionFont.Color = clWindowText + CaptionFont.Height = -11 + CaptionFont.Name = 'Tahoma' + CaptionFont.Style = [fsBold] + CommentFont.Charset = DEFAULT_CHARSET + CommentFont.Color = clWindowText + CommentFont.Height = -11 + CommentFont.Name = 'Tahoma' + CommentFont.Style = [] + SymbolFont.Charset = DEFAULT_CHARSET + SymbolFont.Color = clHighlightText + SymbolFont.Height = -35 + SymbolFont.Name = 'Wingdings' + SymbolFont.Style = [fsBold] + Captions.Strings = ( + 'Seleccione el pedido de proveedor') + Comments.Strings = ( + ' ') + Gradient.FromColor = clHighlight + Gradient.ToColor = clWindow + Gradient.Active = False + Gradient.Orientation = fgdVertical + BufferedDraw = False + ExplicitTop = 16 + end + inherited JvNavPanelHeader: TJvNavPanelHeader + Width = 656 + Caption = 'Lista de pedidos de proveedor' + Visible = False + ExplicitWidth = 656 + inherited Image1: TImage + Left = 629 + ExplicitLeft = 629 + end + end + inherited TBXDock: TTBXDock + Top = 87 + Width = 656 + ExplicitTop = 87 + ExplicitWidth = 656 + inherited tbxMain: TTBXToolbar + Align = alRight + ExplicitWidth = 126 + inherited TBXItem2: TTBXItem + Visible = False + end + inherited TBXItem5: TTBXItem + Visible = False + end + inherited TBXItem4: TTBXItem + Visible = False + end + inherited TBXItem6: TTBXItem + Visible = False + end + inherited TBXItem36: TTBXItem + Action = actAnchoAuto2 + end + end + inherited tbxFiltro: TTBXToolbar + Left = 126 + Top = 23 + DockPos = 115 + DockRow = 1 + ExplicitLeft = 126 + ExplicitTop = 23 + inherited TBXItem34: TTBXItem + Action = actQuitarFiltro2 + end + end + inherited tbxMenu: TTBXToolbar + ExplicitWidth = 656 + end + end + inherited StatusBar: TJvStatusBar + Width = 656 + Visible = False + ExplicitWidth = 656 + end + inline frViewBarraSeleccion1: TfrViewBarraSeleccion [4] + Left = 0 + Top = 376 + Width = 656 + Height = 49 + Align = alBottom + Font.Charset = DEFAULT_CHARSET + Font.Color = clWindowText + Font.Height = -11 + Font.Name = 'Tahoma' + Font.Style = [] + ParentFont = False + TabOrder = 4 + ReadOnly = False + ExplicitTop = 376 + ExplicitWidth = 656 + inherited JvFooter1: TJvFooter + Width = 656 + ExplicitWidth = 656 + inherited bSeleccionar: TJvFooterBtn + Left = 444 + ExplicitLeft = 444 + end + inherited bCancelar: TJvFooterBtn + Left = 548 + ExplicitLeft = 548 + end + end + inherited BarraSeleccionActionList: TActionList + inherited actSeleccionar: TAction + OnExecute = frViewBarraSeleccion1actSeleccionarExecute + OnUpdate = frViewBarraSeleccion1actSeleccionarUpdate + end + inherited actCancelar: TAction + OnExecute = frViewBarraSeleccion1actCancelarExecute + end + end + end + inherited frViewBalances1: TfrViewBalances [5] + Top = 162 + Width = 656 + Height = 214 + ExplicitTop = 162 + ExplicitWidth = 656 + ExplicitHeight = 214 + inherited cxGrid: TcxGrid + Width = 656 + Height = 86 + ExplicitWidth = 656 + ExplicitHeight = 86 + inherited cxGridView: TcxGridDBTableView + DataController.Summary.DefaultGroupSummaryItems = < + item + Format = ',0.00 '#8364';-,0.00 '#8364 + Kind = skSum + Position = spFooter + end> + DataController.Summary.FooterSummaryItems = < + item + Format = '0 pedidos' + Kind = skCount + end> + inherited cxGridViewID: TcxGridDBColumn + IsCaptionAssigned = True + end + end + end + inherited frViewFiltroBase1: TfrViewFiltroBase + Width = 656 + ExplicitWidth = 656 + inherited TBXDockablePanel1: TTBXDockablePanel + ExplicitWidth = 656 + inherited dxLayoutControl1: TdxLayoutControl + Width = 656 + ExplicitWidth = 656 + inherited edtFechaFinFiltro: TcxDateEdit + Left = 290 + ExplicitLeft = 290 + ExplicitWidth = 421 + Width = 421 + end + end + inherited TBXAlignmentPanel1: TTBXAlignmentPanel + Width = 656 + ExplicitWidth = 656 + inherited tbxBotones: TTBXToolbar + Width = 646 + ExplicitWidth = 646 + end + end + end + end + inherited pnlAgrupaciones: TTBXDockablePanel + Top = 188 + ExplicitTop = 188 + ExplicitWidth = 656 + inherited TBXAlignmentPanel1: TTBXAlignmentPanel + Width = 656 + ExplicitWidth = 656 + inherited TBXToolbar1: TTBXToolbar + Width = 646 + ExplicitWidth = 646 + end + end + end + inherited dxComponentPrinter: TdxComponentPrinter + inherited dxComponentPrinterLink: TdxGridReportLink + BuiltInReportLink = True + end + end + inherited cxViewGridPopupMenu: TcxGridPopupMenu + PopupMenus = < + item + GridView = frViewBalances1.cxGridView + HitTypes = [gvhtCell] + Index = 0 + end> + end + inherited dxPrintStyleManager1: TdxPrintStyleManager + inherited dxPrintStyleManager1Style1: TdxPSPrintStyle + BuiltInStyle = True + end + end + end + inherited EditorActionList: TActionList [8] + Left = 112 + Top = 192 + inherited actDuplicar: TAction + Visible = False + end + end + inherited dsDataTable: TDADataSource + Left = 8 + Top = 192 + end + inherited JvFormStorage: TJvFormStorage [12] + end + inherited GridPopupMenu: TPopupMenu + Left = 80 + Top = 192 + end + object EditorSeleccionActionList: TActionList + Images = SmallImages + Left = 152 + Top = 192 + object actBuscar2: TAction + Category = 'Buscar' + Caption = 'Buscar' + ImageIndex = 10 + ShortCut = 114 + end + object actQuitarFiltro2: TAction + Category = 'Buscar' + Caption = 'Quitar filtro y ver todo' + ImageIndex = 19 + OnExecute = actQuitarFiltro2Execute + end + object actAnchoAuto2: TAction + Category = 'Ver' + Caption = 'Ancho autom'#225'tico' + ImageIndex = 21 + OnExecute = actAnchoAuto2Execute + end + end +end diff --git a/Source/Modulos/Contabilidad/Views/uEditorElegirBalances.pas b/Source/Modulos/Contabilidad/Views/uEditorElegirBalances.pas new file mode 100644 index 00000000..d4bcf9c6 --- /dev/null +++ b/Source/Modulos/Contabilidad/Views/uEditorElegirBalances.pas @@ -0,0 +1,126 @@ +unit uEditorElegirBalances; + +interface + +uses + Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, + Dialogs, DB, uDADataTable, Menus, JvAppStorage, JvAppRegistryStorage, + JvComponentBase, JvFormPlacement, ImgList, PngImageList, StdActns, + ActnList, uCustomView, uViewBase, uViewGridBase, uViewGrid, + ComCtrls, TB2ExtItems, TBXExtItems, TBX, TB2Item, TB2Dock, TB2Toolbar, + pngimage, ExtCtrls, JvExControls, JvComponent, + JvNavigationPane, uViewBarraSeleccion, JvgWizardHeader, StdCtrls, + uBizBalances, uIEditorElegirBalances, + JvExComCtrls, JvStatusBar, uEditorBalances, uViewBalances, + JSDialog, uDAInterfaces; + +type + TfEditorElegirBalances = class(TfEditorBalances, IEditorElegirBalances) + frViewBarraSeleccion1: TfrViewBarraSeleccion; + JvgWizardHeader1: TJvgWizardHeader; + EditorSeleccionActionList: TActionList; + actBuscar2: TAction; + actQuitarFiltro2: TAction; + actAnchoAuto2: TAction; + procedure frViewBarraSeleccion1actSeleccionarUpdate(Sender: TObject); + procedure frViewBarraSeleccion1actCancelarExecute(Sender: TObject); + procedure frViewBarraSeleccion1actSeleccionarExecute(Sender: TObject); + procedure FormShow(Sender: TObject); + procedure actAnchoAuto2Execute(Sender: TObject); + procedure actQuitarFiltro2Execute(Sender: TObject); + protected + procedure SetMultiSelect (AValue : Boolean); + function GetMultiSelect : Boolean; + function GetBalancesSeleccionados: IBizBalance; + procedure SetViewGrid(const Value: IViewGridBase); override; + procedure SetMensaje (const AValue: String); + function GetMensaje: String; + public + property Mensaje : String read GetMensaje write SetMensaje; + property BalancesSeleccionados: IBizBalance read GetBalancesSeleccionados; + property MultiSelect : Boolean read GetMultiSelect write SetMultiSelect; + end; + +implementation + +uses + uEditorGridBase, cxGridCustomTableView, uIntegerListUtils, uDBSelectionListUtils, + uGridUtils, uEditorBase, uBalancesController; + +{$R *.dfm} + +{ TfEditorElegirBalances } + +procedure TfEditorElegirBalances.actAnchoAuto2Execute(Sender: TObject); +begin + inherited; + actAnchoAuto.Execute; +end; + +procedure TfEditorElegirBalances.actQuitarFiltro2Execute(Sender: TObject); +begin + inherited; + actQuitarFiltro.Execute; +end; + +procedure TfEditorElegirBalances.FormShow(Sender: TObject); +begin + inherited; + EditorActionList.State := asSuspended; +end; + +procedure TfEditorElegirBalances.frViewBarraSeleccion1actCancelarExecute( + Sender: TObject); +begin + inherited; + Close; +end; + +procedure TfEditorElegirBalances.frViewBarraSeleccion1actSeleccionarExecute( + Sender: TObject); +begin + inherited; + ModalResult := mrOk; +end; + +procedure TfEditorElegirBalances.frViewBarraSeleccion1actSeleccionarUpdate( + Sender: TObject); +begin + inherited; + (Sender as TAction).Enabled := (ViewGrid._FocusedView.Controller.SelectedRowCount > 0) +end; + +function TfEditorElegirBalances.GetBalancesSeleccionados: IBizBalance; +begin + SeleccionarFilasDesdeGrid(ViewGrid._FocusedView, (Balances as ISeleccionable).SelectedRecords); + // En SelectedRecords tengo los ID de las filas seleccionadas del grid + Result := (Controller as IBalancesController).ExtraerSeleccionados(Balances) as IBizBalance; +end; + +function TfEditorElegirBalances.GetMensaje: String; +begin + Result := JvgWizardHeader1.Comments.Text; +end; + +function TfEditorElegirBalances.GetMultiSelect: Boolean; +begin + Result := ViewGrid.MultiSelect; +end; + +procedure TfEditorElegirBalances.SetMensaje(const AValue: String); +begin + JvgWizardHeader1.Comments.Text := AValue; +end; + +procedure TfEditorElegirBalances.SetMultiSelect(AValue: Boolean); +begin + ViewGrid.MultiSelect := AValue; +end; + +procedure TfEditorElegirBalances.SetViewGrid(const Value: IViewGridBase); +begin + inherited; + ViewGrid.OnDblClick := frViewBarraSeleccion1.actSeleccionar.OnExecute; +end; + +end. diff --git a/Source/Modulos/Contabilidad/Views/uEditorElegirCuentasEspeciales.dfm b/Source/Modulos/Contabilidad/Views/uEditorElegirCuentasEspeciales.dfm new file mode 100644 index 00000000..1a010de7 --- /dev/null +++ b/Source/Modulos/Contabilidad/Views/uEditorElegirCuentasEspeciales.dfm @@ -0,0 +1,257 @@ +inherited fEditorElegirCuentasEspeciales: TfEditorElegirCuentasEspeciales + Caption = 'Seleccionar pedido de cliente' + ClientWidth = 656 + ExplicitWidth = 664 + ExplicitHeight = 240 + PixelsPerInch = 96 + TextHeight = 13 + object JvgWizardHeader1: TJvgWizardHeader [0] + Left = 0 + Top = 27 + Width = 656 + Height = 60 + CaptionFont.Charset = DEFAULT_CHARSET + CaptionFont.Color = clWindowText + CaptionFont.Height = -11 + CaptionFont.Name = 'Tahoma' + CaptionFont.Style = [fsBold] + CommentFont.Charset = DEFAULT_CHARSET + CommentFont.Color = clWindowText + CommentFont.Height = -11 + CommentFont.Name = 'Tahoma' + CommentFont.Style = [] + SymbolFont.Charset = DEFAULT_CHARSET + SymbolFont.Color = clHighlightText + SymbolFont.Height = -35 + SymbolFont.Name = 'Wingdings' + SymbolFont.Style = [fsBold] + Captions.Strings = ( + 'Seleccione el pedido de proveedor') + Comments.Strings = ( + ' ') + Gradient.FromColor = clHighlight + Gradient.ToColor = clWindow + Gradient.Active = False + Gradient.Orientation = fgdVertical + BufferedDraw = False + ExplicitTop = 16 + end + inherited JvNavPanelHeader: TJvNavPanelHeader + Width = 656 + Caption = 'Lista de pedidos de proveedor' + Visible = False + ExplicitWidth = 656 + inherited Image1: TImage + Left = 629 + ExplicitLeft = 629 + end + end + inherited TBXDock: TTBXDock + Top = 87 + Width = 656 + ExplicitTop = 87 + ExplicitWidth = 656 + inherited tbxMain: TTBXToolbar + Align = alRight + ExplicitWidth = 126 + inherited TBXItem2: TTBXItem + Visible = False + end + inherited TBXItem5: TTBXItem + Visible = False + end + inherited TBXItem4: TTBXItem + Visible = False + end + inherited TBXItem6: TTBXItem + Visible = False + end + inherited TBXItem36: TTBXItem + Action = actAnchoAuto2 + end + end + inherited tbxFiltro: TTBXToolbar + Left = 126 + Top = 23 + DockPos = 115 + DockRow = 1 + ExplicitLeft = 126 + ExplicitTop = 23 + inherited TBXItem34: TTBXItem + Action = actQuitarFiltro2 + end + end + inherited tbxMenu: TTBXToolbar + ExplicitWidth = 656 + end + end + inherited StatusBar: TJvStatusBar + Width = 656 + Visible = False + ExplicitWidth = 656 + end + inline frViewBarraSeleccion1: TfrViewBarraSeleccion [4] + Left = 0 + Top = 376 + Width = 656 + Height = 49 + Align = alBottom + Font.Charset = DEFAULT_CHARSET + Font.Color = clWindowText + Font.Height = -11 + Font.Name = 'Tahoma' + Font.Style = [] + ParentFont = False + TabOrder = 4 + ReadOnly = False + ExplicitTop = 376 + ExplicitWidth = 656 + inherited JvFooter1: TJvFooter + Width = 656 + ExplicitWidth = 656 + inherited bSeleccionar: TJvFooterBtn + Left = 444 + ExplicitLeft = 444 + end + inherited bCancelar: TJvFooterBtn + Left = 548 + ExplicitLeft = 548 + end + end + inherited BarraSeleccionActionList: TActionList + inherited actSeleccionar: TAction + OnExecute = frViewBarraSeleccion1actSeleccionarExecute + OnUpdate = frViewBarraSeleccion1actSeleccionarUpdate + end + inherited actCancelar: TAction + OnExecute = frViewBarraSeleccion1actCancelarExecute + end + end + end + inherited frViewCuentasEspeciales1: TfrViewCuentasEspeciales [5] + Top = 162 + Width = 656 + Height = 214 + ExplicitTop = 162 + ExplicitWidth = 656 + ExplicitHeight = 214 + inherited cxGrid: TcxGrid + Width = 656 + Height = 86 + ExplicitWidth = 656 + ExplicitHeight = 86 + inherited cxGridView: TcxGridDBTableView + DataController.Summary.DefaultGroupSummaryItems = < + item + Format = ',0.00 '#8364';-,0.00 '#8364 + Kind = skSum + Position = spFooter + end> + DataController.Summary.FooterSummaryItems = < + item + Format = '0 pedidos' + Kind = skCount + end> + inherited cxGridViewID: TcxGridDBColumn + IsCaptionAssigned = True + end + end + end + inherited frViewFiltroBase1: TfrViewFiltroBase + Width = 656 + ExplicitWidth = 656 + inherited TBXDockablePanel1: TTBXDockablePanel + ExplicitWidth = 656 + inherited dxLayoutControl1: TdxLayoutControl + Width = 656 + ExplicitWidth = 656 + inherited edtFechaFinFiltro: TcxDateEdit + Left = 225 + ExplicitLeft = 225 + ExplicitWidth = 421 + Width = 421 + end + end + inherited TBXAlignmentPanel1: TTBXAlignmentPanel + Width = 656 + ExplicitWidth = 656 + inherited tbxBotones: TTBXToolbar + Width = 646 + ExplicitWidth = 646 + end + end + end + end + inherited pnlAgrupaciones: TTBXDockablePanel + Top = 188 + ExplicitTop = 188 + ExplicitWidth = 656 + inherited TBXAlignmentPanel1: TTBXAlignmentPanel + Width = 656 + ExplicitWidth = 656 + inherited TBXToolbar1: TTBXToolbar + Width = 646 + ExplicitWidth = 646 + end + end + end + inherited dxComponentPrinter: TdxComponentPrinter + inherited dxComponentPrinterLink: TdxGridReportLink + BuiltInReportLink = True + end + end + inherited cxViewGridPopupMenu: TcxGridPopupMenu + PopupMenus = < + item + GridView = frViewCuentasEspeciales1.cxGridView + HitTypes = [gvhtCell] + Index = 0 + end> + end + inherited dxPrintStyleManager1: TdxPrintStyleManager + inherited dxPrintStyleManager1Style1: TdxPSPrintStyle + BuiltInStyle = True + end + end + end + inherited EditorActionList: TActionList [8] + Left = 112 + Top = 192 + inherited actDuplicar: TAction + Visible = False + end + end + inherited dsDataTable: TDADataSource + Left = 8 + Top = 192 + end + inherited JvFormStorage: TJvFormStorage [12] + end + inherited GridPopupMenu: TPopupMenu + Left = 80 + Top = 192 + end + object EditorSeleccionActionList: TActionList + Images = SmallImages + Left = 152 + Top = 192 + object actBuscar2: TAction + Category = 'Buscar' + Caption = 'Buscar' + ImageIndex = 10 + ShortCut = 114 + end + object actQuitarFiltro2: TAction + Category = 'Buscar' + Caption = 'Quitar filtro y ver todo' + ImageIndex = 19 + OnExecute = actQuitarFiltro2Execute + end + object actAnchoAuto2: TAction + Category = 'Ver' + Caption = 'Ancho autom'#225'tico' + ImageIndex = 21 + OnExecute = actAnchoAuto2Execute + end + end +end diff --git a/Source/Modulos/Contabilidad/Views/uEditorElegirCuentasEspeciales.pas b/Source/Modulos/Contabilidad/Views/uEditorElegirCuentasEspeciales.pas new file mode 100644 index 00000000..288f131c --- /dev/null +++ b/Source/Modulos/Contabilidad/Views/uEditorElegirCuentasEspeciales.pas @@ -0,0 +1,126 @@ +unit uEditorElegirCuentasEspeciales; + +interface + +uses + Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, + Dialogs, DB, uDADataTable, Menus, JvAppStorage, JvAppRegistryStorage, + JvComponentBase, JvFormPlacement, ImgList, PngImageList, StdActns, + ActnList, uCustomView, uViewBase, uViewGridBase, uViewGrid, + ComCtrls, TB2ExtItems, TBXExtItems, TBX, TB2Item, TB2Dock, TB2Toolbar, + pngimage, ExtCtrls, JvExControls, JvComponent, + JvNavigationPane, uViewBarraSeleccion, JvgWizardHeader, StdCtrls, + uBizCuentasEspeciales, uIEditorElegirCuentasEspeciales, + JvExComCtrls, JvStatusBar, uEditorCuentasEspeciales, uViewCuentasEspeciales, + JSDialog, uDAInterfaces; + +type + TfEditorElegirCuentasEspeciales = class(TfEditorCuentasEspeciales, IEditorElegirCuentasEspeciales) + frViewBarraSeleccion1: TfrViewBarraSeleccion; + JvgWizardHeader1: TJvgWizardHeader; + EditorSeleccionActionList: TActionList; + actBuscar2: TAction; + actQuitarFiltro2: TAction; + actAnchoAuto2: TAction; + procedure frViewBarraSeleccion1actSeleccionarUpdate(Sender: TObject); + procedure frViewBarraSeleccion1actCancelarExecute(Sender: TObject); + procedure frViewBarraSeleccion1actSeleccionarExecute(Sender: TObject); + procedure FormShow(Sender: TObject); + procedure actAnchoAuto2Execute(Sender: TObject); + procedure actQuitarFiltro2Execute(Sender: TObject); + protected + procedure SetMultiSelect (AValue : Boolean); + function GetMultiSelect : Boolean; + function GetCuentasEspecialesSeleccionados: IBizCuentaEspecial; + procedure SetViewGrid(const Value: IViewGridBase); override; + procedure SetMensaje (const AValue: String); + function GetMensaje: String; + public + property Mensaje : String read GetMensaje write SetMensaje; + property CuentasEspecialesSeleccionados: IBizCuentaEspecial read GetCuentasEspecialesSeleccionados; + property MultiSelect : Boolean read GetMultiSelect write SetMultiSelect; + end; + +implementation + +uses + uEditorGridBase, cxGridCustomTableView, uIntegerListUtils, uDBSelectionListUtils, + uGridUtils, uEditorBase, uCuentasEspecialesController; + +{$R *.dfm} + +{ TfEditorElegirCuentasEspeciales } + +procedure TfEditorElegirCuentasEspeciales.actAnchoAuto2Execute(Sender: TObject); +begin + inherited; + actAnchoAuto.Execute; +end; + +procedure TfEditorElegirCuentasEspeciales.actQuitarFiltro2Execute(Sender: TObject); +begin + inherited; + actQuitarFiltro.Execute; +end; + +procedure TfEditorElegirCuentasEspeciales.FormShow(Sender: TObject); +begin + inherited; + EditorActionList.State := asSuspended; +end; + +procedure TfEditorElegirCuentasEspeciales.frViewBarraSeleccion1actCancelarExecute( + Sender: TObject); +begin + inherited; + Close; +end; + +procedure TfEditorElegirCuentasEspeciales.frViewBarraSeleccion1actSeleccionarExecute( + Sender: TObject); +begin + inherited; + ModalResult := mrOk; +end; + +procedure TfEditorElegirCuentasEspeciales.frViewBarraSeleccion1actSeleccionarUpdate( + Sender: TObject); +begin + inherited; + (Sender as TAction).Enabled := (ViewGrid._FocusedView.Controller.SelectedRowCount > 0) +end; + +function TfEditorElegirCuentasEspeciales.GetCuentasEspecialesSeleccionados: IBizCuentaEspecial; +begin + SeleccionarFilasDesdeGrid(ViewGrid._FocusedView, (CuentasEspeciales as ISeleccionable).SelectedRecords); + // En SelectedRecords tengo los ID de las filas seleccionadas del grid + Result := (Controller as ICuentasEspecialesController).ExtraerSeleccionados(CuentasEspeciales) as IBizCuentaEspecial; +end; + +function TfEditorElegirCuentasEspeciales.GetMensaje: String; +begin + Result := JvgWizardHeader1.Comments.Text; +end; + +function TfEditorElegirCuentasEspeciales.GetMultiSelect: Boolean; +begin + Result := ViewGrid.MultiSelect; +end; + +procedure TfEditorElegirCuentasEspeciales.SetMensaje(const AValue: String); +begin + JvgWizardHeader1.Comments.Text := AValue; +end; + +procedure TfEditorElegirCuentasEspeciales.SetMultiSelect(AValue: Boolean); +begin + ViewGrid.MultiSelect := AValue; +end; + +procedure TfEditorElegirCuentasEspeciales.SetViewGrid(const Value: IViewGridBase); +begin + inherited; + ViewGrid.OnDblClick := frViewBarraSeleccion1.actSeleccionar.OnExecute; +end; + +end. diff --git a/Source/Modulos/Contabilidad/Views/uEditorElegirEpigrafes.dfm b/Source/Modulos/Contabilidad/Views/uEditorElegirEpigrafes.dfm index 33db41c3..a1136b64 100644 --- a/Source/Modulos/Contabilidad/Views/uEditorElegirEpigrafes.dfm +++ b/Source/Modulos/Contabilidad/Views/uEditorElegirEpigrafes.dfm @@ -165,8 +165,8 @@ inherited fEditorElegirEpigrafes: TfEditorElegirEpigrafes Width = 656 ExplicitWidth = 656 inherited edtFechaFinFiltro: TcxDateEdit - Left = 294 - ExplicitLeft = 294 + Left = 290 + ExplicitLeft = 290 ExplicitWidth = 421 Width = 421 end diff --git a/Source/Modulos/Contabilidad/Views/uEditorElegirEpigrafes.pas b/Source/Modulos/Contabilidad/Views/uEditorElegirEpigrafes.pas index 874c91d0..47cef19a 100644 --- a/Source/Modulos/Contabilidad/Views/uEditorElegirEpigrafes.pas +++ b/Source/Modulos/Contabilidad/Views/uEditorElegirEpigrafes.pas @@ -94,7 +94,7 @@ function TfEditorElegirEpigrafes.GetEpigrafesSeleccionados: IBizEpigrafe; begin SeleccionarFilasDesdeGrid(ViewGrid._FocusedView, (Epigrafes as ISeleccionable).SelectedRecords); // En SelectedRecords tengo los ID de las filas seleccionadas del grid -// Result := (Controller as IEpigrafesController).ExtraerSeleccionados(Epigrafes) as IBizEpigrafe; + Result := (Controller as IEpigrafesController).ExtraerSeleccionados(Epigrafes) as IBizEpigrafe; end; function TfEditorElegirEpigrafes.GetMensaje: String; diff --git a/Source/Modulos/Contabilidad/Views/uEditorEpigrafe.pas b/Source/Modulos/Contabilidad/Views/uEditorEpigrafe.pas index 18fcc004..fb488c93 100644 --- a/Source/Modulos/Contabilidad/Views/uEditorEpigrafe.pas +++ b/Source/Modulos/Contabilidad/Views/uEditorEpigrafe.pas @@ -122,6 +122,8 @@ end; procedure TfEditorEpigrafe.SetController(const Value: IEpigrafesController); begin FController := Value; + if Assigned(ViewEpigrafe) then + ViewEpigrafe.Controller := FController; end; procedure TfEditorEpigrafe.SetViewEpigrafe(const Value: IViewEpigrafe); diff --git a/Source/Modulos/Contabilidad/Views/uViewBalances.dfm b/Source/Modulos/Contabilidad/Views/uViewBalances.dfm new file mode 100644 index 00000000..2e0d3cad --- /dev/null +++ b/Source/Modulos/Contabilidad/Views/uViewBalances.dfm @@ -0,0 +1,117 @@ +inherited frViewBalances: TfrViewBalances + inherited cxGrid: TcxGrid + inherited cxGridView: TcxGridDBTableView + DataController.KeyFieldNames = 'ID' + DataController.Summary.FooterSummaryItems = < + item + Format = '0 ejercicios' + Kind = skCount + Column = cxGridViewNATURALEZA + end> + OptionsBehavior.PullFocusing = True + object cxGridViewID: TcxGridDBColumn + DataBinding.FieldName = 'ID' + OnCustomDrawCell = cxGridViewIDCustomDrawCell + BestFitMaxWidth = 22 + MinWidth = 22 + Options.HorzSizing = False + Width = 22 + IsCaptionAssigned = True + end + object cxGridViewREF_BALANCE: TcxGridDBColumn + DataBinding.FieldName = 'REF_BALANCE' + Visible = False + end + object cxGridViewNATURALEZA: TcxGridDBColumn + DataBinding.FieldName = 'NATURALEZA' + PropertiesClassName = 'TcxTextEditProperties' + SortIndex = 0 + SortOrder = soAscending + Width = 304 + end + object cxGridViewNIVEL1: TcxGridDBColumn + DataBinding.FieldName = 'NIVEL1' + end + object cxGridViewDESCRIPCION1: TcxGridDBColumn + DataBinding.FieldName = 'DESCRIPCION1' + PropertiesClassName = 'TcxTextEditProperties' + Width = 118 + end + object cxGridViewNIVEL2: TcxGridDBColumn + DataBinding.FieldName = 'NIVEL2' + end + object cxGridViewDESCRIPCION2: TcxGridDBColumn + DataBinding.FieldName = 'DESCRIPCION2' + end + object cxGridViewNIVEL3: TcxGridDBColumn + DataBinding.FieldName = 'NIVEL3' + end + object cxGridViewDESCRIPCION3: TcxGridDBColumn + DataBinding.FieldName = 'DESCRIPCION3' + end + end + end + inherited frViewFiltroBase1: TfrViewFiltroBase + inherited TBXDockablePanel1: TTBXDockablePanel + inherited dxLayoutControl1: TdxLayoutControl + inherited txtFiltroTodo: TcxTextEdit + ExplicitWidth = 273 + Width = 273 + end + inherited edtFechaIniFiltro: TcxDateEdit + ExplicitWidth = 121 + Width = 121 + end + inherited edtFechaFinFiltro: TcxDateEdit + ExplicitWidth = 121 + Width = 121 + end + end + end + end + inherited pnlAgrupaciones: TTBXDockablePanel + ExplicitWidth = 554 + end + inherited dxComponentPrinter: TdxComponentPrinter + inherited dxComponentPrinterLink: TdxGridReportLink + ReportDocument.CreationDate = 38673.842406053240000000 + BuiltInReportLink = True + end + end + inherited dxPrintStyleManager1: TdxPrintStyleManager + inherited dxPrintStyleManager1Style1: TdxPSPrintStyle + BuiltInStyle = True + end + end + object PngImageList: TPngImageList + PngImages = < + item + PngImage.Data = { + 89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF + 610000000970485973000017120000171201679FD2520000022E4944415478DA + 8D93CF6BD36018C7BF6997A45DD376EA70CA18D31D44981741280C44119DA83D + C87619781A1EFD1BC49B2028B28353141111A43BE8CD934E65A8D4A1686B61B5 + A31DD8CCBAFEDAACEDF226B389EFFB26CBCC54E6030FEFCB4B3E9FE79B9744B0 + 2C0B8220E0F7BA3AB2D75A282DE07F4AD82C60F0851B8F50530BF85EF98A6236 + 8DCCAB69B0B366BD8C95B24ACF4BB877FD226AFD635EC13A5CF99243A356869A + 4D51F8398799EC476D09E5621E0F6F5EC6C8D938EE7C503604EB7055CDA34127 + A8B90C3ECD3CE570A35AA2FD0DCB4B2AEE4F5CC29953C35094102667655B706D + 7480C3F97412AD951AAAC502E6DEBCE47031974673B942BB8AA9DB57103F7D12 + 9D9D413ED4154C8C0BD6FCE7AD2F6C2816C3CE9E6E8862077C3E9F57307CE2FC + 1F80655A308C35E844C7B3273318D8D78FE8B6282449A41211B7DE05FE2D304D + 13866EC34433F0FAC55BF4EDE945A42B0C910A6459C6DD94F27781D936F964B2 + AADB02DAEF9329ECEEED4138A240944548B2840773DBBD02B637596C6238205D + 352AD175643E66B1A3BB0B0A15489204292061AAB0CB2B68D3C96B34367120BE + 3AB2F96C01E1A8825028083920F35778BCD8B721387E6C9C42060788465C50A3 + 12B24AB0582C2110946907282C61BA3588442221B882C343E75C50A30093B104 + 84D849EAD53AFC1D7E0ECFFA631C76FF0526387470D4135977405B62A0D56CB2 + C791891C71618FE0C0FEB873618623B2E33361FB679B4A340A1FF5C01E41928C + 6DF9256E8659FD02D3B7960923D6946A0000000049454E44AE426082} + Name = 'PngImage0' + Background = clWindow + end> + Left = 160 + Top = 32 + Bitmap = {} + end +end diff --git a/Source/Modulos/Contabilidad/Views/uViewBalances.pas b/Source/Modulos/Contabilidad/Views/uViewBalances.pas new file mode 100644 index 00000000..527dff8d --- /dev/null +++ b/Source/Modulos/Contabilidad/Views/uViewBalances.pas @@ -0,0 +1,82 @@ +unit uViewBalances; + +interface + +uses + Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, + Dialogs, uViewGrid, cxStyles, cxCustomData, cxGraphics, cxFilter, cxData, + cxDataStorage, cxEdit, DB, cxDBData, uDADataTable, cxGridLevel, + cxClasses, cxControls, cxGridCustomView, cxGridCustomTableView, + cxGridTableView, cxGridDBTableView, cxGrid, uBizBalances, ActnList, Menus, + cxGridBandedTableView, cxGridDBBandedTableView, JvComponent, + JvFormAutoSize, PngImageList, ImgList, dxPSGlbl, dxPSUtl, dxPSEngn, + dxPrnPg, dxBkgnd, dxWrap, dxPrnDev, dxPSCompsProvider, dxPSFillPatterns, + dxPSEdgePatterns, cxIntlPrintSys3, dxPSCore, dxPScxCommon, dxPScxGridLnk, + cxGridCustomPopupMenu, cxGridPopupMenu, uViewFiltroBase, TB2Item, TBX, + TB2Toolbar, TBXDkPanels, TB2Dock, dxPgsDlg, uDAInterfaces, cxCalendar, + cxImageComboBox, cxTextEdit; + +type + IViewBalances = interface(IViewGrid) + ['{E1960F7E-97F6-4BF6-82AA-82E60C220B33}'] + function GetBalances: IBizBalance; + procedure SetBalances(const Value: IBizBalance); + property Balances: IBizBalance read GetBalances write SetBalances; + end; + + TfrViewBalances = class(TfrViewGrid, IViewBalances) + cxGridViewDESCRIPCION1: TcxGridDBColumn; + cxGridViewNATURALEZA: TcxGridDBColumn; + cxGridViewID: TcxGridDBColumn; + PngImageList: TPngImageList; + cxGridViewREF_BALANCE: TcxGridDBColumn; + cxGridViewNIVEL1: TcxGridDBColumn; + cxGridViewNIVEL2: TcxGridDBColumn; + cxGridViewDESCRIPCION2: TcxGridDBColumn; + cxGridViewNIVEL3: TcxGridDBColumn; + cxGridViewDESCRIPCION3: TcxGridDBColumn; + procedure cxGridViewIDCustomDrawCell(Sender: TcxCustomGridTableView; ACanvas: TcxCanvas; + AViewInfo: TcxGridTableDataCellViewInfo; var ADone: Boolean); + protected + FBalances: IBizBalance; + function GetBalances: IBizBalance; virtual; + procedure SetBalances(const Value: IBizBalance); virtual; + public + property Balances: IBizBalance read GetBalances write SetBalances; + end; + +implementation +{$R *.dfm} + +{ TfrViewBalances } + +{ +******************************* TfrViewBalances ******************************* +} +function TfrViewBalances.GetBalances: IBizBalance; +begin + Result := FBalances; +end; + +procedure TfrViewBalances.SetBalances(const Value: IBizBalance); +begin + FBalances := Value; + if Assigned(FBalances) then + dsDataSource.DataTable := FBalances.DataTable; +end; + + +procedure TfrViewBalances.cxGridViewIDCustomDrawCell( + Sender: TcxCustomGridTableView; ACanvas: TcxCanvas; + AViewInfo: TcxGridTableDataCellViewInfo; var ADone: Boolean); +var + R : TRect; +begin + inherited; + R := AViewInfo.ContentBounds; + ACanvas.FillRect(R); + ACanvas.DrawImage(PngImageList, R.Left, R.Top, 0); + ADone := True; +end; + +end. diff --git a/Source/Modulos/Contabilidad/Views/uViewCuenta.dfm b/Source/Modulos/Contabilidad/Views/uViewCuenta.dfm index 67792f8d..715203a5 100644 --- a/Source/Modulos/Contabilidad/Views/uViewCuenta.dfm +++ b/Source/Modulos/Contabilidad/Views/uViewCuenta.dfm @@ -73,7 +73,7 @@ inherited frViewCuenta: TfrViewCuenta end object eBalance: TcxDBTextEdit Left = 107 - Top = 140 + Top = 144 Anchors = [akLeft, akTop, akRight] DataBinding.DataField = 'BALANCE' DataBinding.DataSource = DADataSource @@ -86,7 +86,7 @@ inherited frViewCuenta: TfrViewCuenta StyleDisabled.LookAndFeel.NativeStyle = True StyleFocused.LookAndFeel.NativeStyle = True StyleHot.LookAndFeel.NativeStyle = True - TabOrder = 5 + TabOrder = 6 Width = 322 end object eEpigrafe: TcxDBTextEdit @@ -116,6 +116,24 @@ inherited frViewCuenta: TfrViewCuenta Caption = 'Elegir ep'#237'grafe' TabOrder = 1 end + object BitBtn2: TBitBtn + Left = 354 + Top = 113 + Width = 75 + Height = 25 + Action = actCuentaEspecial + Caption = 'Cuenta especial' + TabOrder = 5 + end + object BitBtn3: TBitBtn + Left = 354 + Top = 144 + Width = 75 + Height = 25 + Action = actBalance + Caption = 'Balance' + TabOrder = 7 + end object dxLayoutControlCuentaGroup_Root: TdxLayoutGroup ShowCaption = False Hidden = True @@ -154,15 +172,41 @@ inherited frViewCuenta: TfrViewCuenta Control = eDescripcion ControlOptions.ShowBorder = False end - object dxLayoutControlCuentaItem2: TdxLayoutItem - Caption = 'Cuenta especial:' - Control = eCuentaEspecial - ControlOptions.ShowBorder = False + object dxLayoutControlCuentaGroup3: TdxLayoutGroup + ShowCaption = False + Hidden = True + LayoutDirection = ldHorizontal + ShowBorder = False + object dxLayoutControlCuentaItem2: TdxLayoutItem + AutoAligns = [aaVertical] + AlignHorz = ahClient + Caption = 'Cuenta especial:' + Control = eCuentaEspecial + ControlOptions.ShowBorder = False + end + object dxLayoutControlCuentaItem7: TdxLayoutItem + ShowCaption = False + Control = BitBtn2 + ControlOptions.ShowBorder = False + end end - object dxLayoutControlCuentaItem4: TdxLayoutItem - Caption = 'Balance:' - Control = eBalance - ControlOptions.ShowBorder = False + object dxLayoutControlCuentaGroup4: TdxLayoutGroup + ShowCaption = False + Hidden = True + LayoutDirection = ldHorizontal + ShowBorder = False + object dxLayoutControlCuentaItem4: TdxLayoutItem + AutoAligns = [aaVertical] + AlignHorz = ahClient + Caption = 'Balance:' + Control = eBalance + ControlOptions.ShowBorder = False + end + object dxLayoutControlCuentaItem8: TdxLayoutItem + ShowCaption = False + Control = BitBtn3 + ControlOptions.ShowBorder = False + end end end end @@ -178,6 +222,14 @@ inherited frViewCuenta: TfrViewCuenta Caption = 'Elegir ep'#237'grafe' OnExecute = actElegirEpigrafeExecute end + object actBalance: TAction + Caption = 'Balance' + OnExecute = actBalanceExecute + end + object actCuentaEspecial: TAction + Caption = 'Cuenta especial' + OnExecute = actCuentaEspecialExecute + end end object LargeImages: TPngImageList Height = 24 diff --git a/Source/Modulos/Contabilidad/Views/uViewCuenta.pas b/Source/Modulos/Contabilidad/Views/uViewCuenta.pas index f5dcccee..169b4c2f 100644 --- a/Source/Modulos/Contabilidad/Views/uViewCuenta.pas +++ b/Source/Modulos/Contabilidad/Views/uViewCuenta.pas @@ -5,7 +5,7 @@ interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, uViewBase, ExtCtrls, StdCtrls, Buttons, DB, uDADataTable, - DBCtrls, Grids, DBGrids, uBizCuentas, Mask, ComCtrls, uCustomView, + DBCtrls, Grids, DBGrids, uBizCuentas, uCuentasController, Mask, ComCtrls, uCustomView, JvComponent, JvFormAutoSize, cxControls, cxContainer, cxEdit, cxTextEdit, cxDBEdit, dxLayoutControl, uDAInterfaces, cxGraphics, cxDropDownEdit, cxImageComboBox, cxMaskEdit, cxCalendar, ActnList, ImgList, PngImageList; @@ -13,6 +13,10 @@ uses type IViewCuenta = interface(IViewBase) ['{F44F8AEF-CB9C-44D5-93DA-53D6AB6A2D29}'] + function GetController : ICuentasController; + procedure SetController (const Value : ICuentasController); + property Controller : ICuentasController read GetController write SetController; + function GetCuenta: IBizCuenta; procedure SetCuenta(const Value: IBizCuenta); property Cuenta: IBizCuenta read GetCuenta write SetCuenta; @@ -38,28 +42,62 @@ type BitBtn1: TBitBtn; dxLayoutControlCuentaItem6: TdxLayoutItem; dxLayoutControlCuentaGroup2: TdxLayoutGroup; + dxLayoutControlCuentaItem7: TdxLayoutItem; + BitBtn2: TBitBtn; + dxLayoutControlCuentaGroup3: TdxLayoutGroup; + dxLayoutControlCuentaItem8: TdxLayoutItem; + BitBtn3: TBitBtn; + dxLayoutControlCuentaGroup4: TdxLayoutGroup; + actBalance: TAction; + actCuentaEspecial: TAction; procedure actElegirEpigrafeExecute(Sender: TObject); + procedure actBalanceExecute(Sender: TObject); + procedure actCuentaEspecialExecute(Sender: TObject); protected FCuenta: IBizCuenta; + FController : ICuentasController; function GetCuenta: IBizCuenta; procedure SetCuenta(const Value: IBizCuenta); + function GetController : ICuentasController; + procedure SetController (const Value : ICuentasController); + public + property Controller : ICuentasController read GetController write SetController; property Cuenta: IBizCuenta read GetCuenta write SetCuenta; end; implementation {$R *.dfm} +uses uBizEpigrafes; + { TfrViewCuenta } { ******************************* TfrViewCuenta ******************************** } +procedure TfrViewCuenta.actBalanceExecute(Sender: TObject); +begin + inherited; + Controller.ElegirBalance(Cuenta); +end; + +procedure TfrViewCuenta.actCuentaEspecialExecute(Sender: TObject); +begin + inherited; + Controller.ElegirCuentaEspecial(Cuenta); +end; + procedure TfrViewCuenta.actElegirEpigrafeExecute(Sender: TObject); begin inherited; -//Seleccion de epigrafe + Controller.ElegirEpigrafe(Cuenta); +end; + +function TfrViewCuenta.GetController: ICuentasController; +begin + Result := FController; end; function TfrViewCuenta.GetCuenta: IBizCuenta; @@ -67,6 +105,11 @@ begin Result := FCuenta; end; +procedure TfrViewCuenta.SetController(const Value: ICuentasController); +begin + FController := Value; +end; + procedure TfrViewCuenta.SetCuenta(const Value: IBizCuenta); begin FCuenta := Value; diff --git a/Source/Modulos/Contabilidad/Views/uViewCuentasEspeciales.dfm b/Source/Modulos/Contabilidad/Views/uViewCuentasEspeciales.dfm new file mode 100644 index 00000000..9f4a874b --- /dev/null +++ b/Source/Modulos/Contabilidad/Views/uViewCuentasEspeciales.dfm @@ -0,0 +1,97 @@ +inherited frViewCuentasEspeciales: TfrViewCuentasEspeciales + inherited cxGrid: TcxGrid + inherited cxGridView: TcxGridDBTableView + DataController.KeyFieldNames = 'ID' + DataController.Summary.FooterSummaryItems = < + item + Format = '0 ejercicios' + Kind = skCount + Column = cxGridViewDESCRIPCION + end> + OptionsBehavior.PullFocusing = True + object cxGridViewID: TcxGridDBColumn + DataBinding.FieldName = 'ID' + OnCustomDrawCell = cxGridViewIDCustomDrawCell + BestFitMaxWidth = 22 + MinWidth = 22 + Options.HorzSizing = False + Width = 22 + IsCaptionAssigned = True + end + object cxGridViewREFERENCIA: TcxGridDBColumn + DataBinding.FieldName = 'REFERENCIA' + Visible = False + end + object cxGridViewDESCRIPCION: TcxGridDBColumn + DataBinding.FieldName = 'DESCRIPCION' + PropertiesClassName = 'TcxTextEditProperties' + SortIndex = 0 + SortOrder = soAscending + Width = 304 + end + end + end + inherited frViewFiltroBase1: TfrViewFiltroBase + inherited TBXDockablePanel1: TTBXDockablePanel + inherited dxLayoutControl1: TdxLayoutControl + inherited txtFiltroTodo: TcxTextEdit + ExplicitWidth = 273 + Width = 273 + end + inherited edtFechaIniFiltro: TcxDateEdit + ExplicitWidth = 121 + Width = 121 + end + inherited edtFechaFinFiltro: TcxDateEdit + ExplicitWidth = 121 + Width = 121 + end + end + end + end + inherited pnlAgrupaciones: TTBXDockablePanel + ExplicitWidth = 554 + end + inherited dxComponentPrinter: TdxComponentPrinter + inherited dxComponentPrinterLink: TdxGridReportLink + ReportDocument.CreationDate = 38673.842406053240000000 + BuiltInReportLink = True + end + end + inherited dxPrintStyleManager1: TdxPrintStyleManager + inherited dxPrintStyleManager1Style1: TdxPSPrintStyle + BuiltInStyle = True + end + end + object PngImageList: TPngImageList + PngImages = < + item + PngImage.Data = { + 89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF + 610000000970485973000017120000171201679FD2520000022E4944415478DA + 8D93CF6BD36018C7BF6997A45DD376EA70CA18D31D44981741280C44119DA83D + C87619781A1EFD1BC49B2028B28353141111A43BE8CD934E65A8D4A1686B61B5 + A31DD8CCBAFEDAACEDF226B389EFFB26CBCC54E6030FEFCB4B3E9FE79B9744B0 + 2C0B8220E0F7BA3AB2D75A282DE07F4AD82C60F0851B8F50530BF85EF98A6236 + 8DCCAB69B0B366BD8C95B24ACF4BB877FD226AFD635EC13A5CF99243A356869A + 4D51F8398799EC476D09E5621E0F6F5EC6C8D938EE7C503604EB7055CDA34127 + A8B90C3ECD3CE570A35AA2FD0DCB4B2AEE4F5CC29953C35094102667655B706D + 7480C3F97412AD951AAAC502E6DEBCE47031974673B942BB8AA9DB57103F7D12 + 9D9D413ED4154C8C0BD6FCE7AD2F6C2816C3CE9E6E8862077C3E9F57307CE2FC + 1F80655A308C35E844C7B3273318D8D78FE8B6282449A41211B7DE05FE2D304D + 13866EC34433F0FAC55BF4EDE945A42B0C910A6459C6DD94F27781D936F964B2 + AADB02DAEF9329ECEEED4138A240944548B2840773DBBD02B637596C6238205D + 352AD175643E66B1A3BB0B0A15489204292061AAB0CB2B68D3C96B34367120BE + 3AB2F96C01E1A8825028083920F35778BCD8B721387E6C9C42060788465C50A3 + 12B24AB0582C2110946907282C61BA3588442221B882C343E75C50A30093B104 + 84D849EAD53AFC1D7E0ECFFA631C76FF0526387470D4135977405B62A0D56CB2 + C791891C71618FE0C0FEB873618623B2E33361FB679B4A340A1FF5C01E41928C + 6DF9256E8659FD02D3B7960923D6946A0000000049454E44AE426082} + Name = 'PngImage0' + Background = clWindow + end> + Left = 160 + Top = 32 + Bitmap = {} + end +end diff --git a/Source/Modulos/Contabilidad/Views/uViewCuentasEspeciales.pas b/Source/Modulos/Contabilidad/Views/uViewCuentasEspeciales.pas new file mode 100644 index 00000000..cd6cc515 --- /dev/null +++ b/Source/Modulos/Contabilidad/Views/uViewCuentasEspeciales.pas @@ -0,0 +1,76 @@ +unit uViewCuentasEspeciales; + +interface + +uses + Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, + Dialogs, uViewGrid, cxStyles, cxCustomData, cxGraphics, cxFilter, cxData, + cxDataStorage, cxEdit, DB, cxDBData, uDADataTable, cxGridLevel, + cxClasses, cxControls, cxGridCustomView, cxGridCustomTableView, + cxGridTableView, cxGridDBTableView, cxGrid, uBizCuentasEspeciales, ActnList, Menus, + cxGridBandedTableView, cxGridDBBandedTableView, JvComponent, + JvFormAutoSize, PngImageList, ImgList, dxPSGlbl, dxPSUtl, dxPSEngn, + dxPrnPg, dxBkgnd, dxWrap, dxPrnDev, dxPSCompsProvider, dxPSFillPatterns, + dxPSEdgePatterns, cxIntlPrintSys3, dxPSCore, dxPScxCommon, dxPScxGridLnk, + cxGridCustomPopupMenu, cxGridPopupMenu, uViewFiltroBase, TB2Item, TBX, + TB2Toolbar, TBXDkPanels, TB2Dock, dxPgsDlg, uDAInterfaces, cxCalendar, + cxImageComboBox, cxTextEdit; + +type + IViewCuentasEspeciales = interface(IViewGrid) + ['{E1960F7E-97F6-4BF6-82AA-82E60C220B33}'] + function GetCuentasEspeciales: IBizCuentaEspecial; + procedure SetCuentasEspeciales(const Value: IBizCuentaEspecial); + property CuentasEspeciales: IBizCuentaEspecial read GetCuentasEspeciales write SetCuentasEspeciales; + end; + + TfrViewCuentasEspeciales = class(TfrViewGrid, IViewCuentasEspeciales) + cxGridViewDESCRIPCION: TcxGridDBColumn; + cxGridViewID: TcxGridDBColumn; + PngImageList: TPngImageList; + cxGridViewREFERENCIA: TcxGridDBColumn; + procedure cxGridViewIDCustomDrawCell(Sender: TcxCustomGridTableView; ACanvas: TcxCanvas; + AViewInfo: TcxGridTableDataCellViewInfo; var ADone: Boolean); + protected + FCuentasEspeciales: IBizCuentaEspecial; + function GetCuentasEspeciales: IBizCuentaEspecial; virtual; + procedure SetCuentasEspeciales(const Value: IBizCuentaEspecial); virtual; + public + property CuentasEspeciales: IBizCuentaEspecial read GetCuentasEspeciales write SetCuentasEspeciales; + end; + +implementation +{$R *.dfm} + +{ TfrViewCuentasEspeciales } + +{ +******************************* TfrViewCuentasEspeciales ******************************* +} +function TfrViewCuentasEspeciales.GetCuentasEspeciales: IBizCuentaEspecial; +begin + Result := FCuentasEspeciales; +end; + +procedure TfrViewCuentasEspeciales.SetCuentasEspeciales(const Value: IBizCuentaEspecial); +begin + FCuentasEspeciales := Value; + if Assigned(FCuentasEspeciales) then + dsDataSource.DataTable := FCuentasEspeciales.DataTable; +end; + + +procedure TfrViewCuentasEspeciales.cxGridViewIDCustomDrawCell( + Sender: TcxCustomGridTableView; ACanvas: TcxCanvas; + AViewInfo: TcxGridTableDataCellViewInfo; var ADone: Boolean); +var + R : TRect; +begin + inherited; + R := AViewInfo.ContentBounds; + ACanvas.FillRect(R); + ACanvas.DrawImage(PngImageList, R.Left, R.Top, 0); + ADone := True; +end; + +end. diff --git a/Source/Modulos/Contabilidad/Views/uViewEpigrafe.dfm b/Source/Modulos/Contabilidad/Views/uViewEpigrafe.dfm index 60886c2c..27099e9b 100644 --- a/Source/Modulos/Contabilidad/Views/uViewEpigrafe.dfm +++ b/Source/Modulos/Contabilidad/Views/uViewEpigrafe.dfm @@ -76,6 +76,7 @@ inherited frViewEpigrafe: TfrViewEpigrafe Top = 28 Width = 75 Height = 25 + Action = actElegirEpigrafe Caption = 'Elegir ep'#237'grafe' TabOrder = 1 end diff --git a/Source/Modulos/Contabilidad/Views/uViewEpigrafe.pas b/Source/Modulos/Contabilidad/Views/uViewEpigrafe.pas index 040e3517..f08d0454 100644 --- a/Source/Modulos/Contabilidad/Views/uViewEpigrafe.pas +++ b/Source/Modulos/Contabilidad/Views/uViewEpigrafe.pas @@ -5,7 +5,7 @@ interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, uViewBase, ExtCtrls, StdCtrls, Buttons, DB, uDADataTable, - DBCtrls, Grids, DBGrids, uBizEpigrafes, Mask, ComCtrls, uCustomView, + DBCtrls, Grids, DBGrids, uBizEpigrafes, uEpigrafesController, Mask, ComCtrls, uCustomView, JvComponent, JvFormAutoSize, cxControls, cxContainer, cxEdit, cxTextEdit, cxDBEdit, dxLayoutControl, uDAInterfaces, cxGraphics, cxDropDownEdit, cxImageComboBox, cxMaskEdit, cxCalendar, ActnList, ImgList, PngImageList; @@ -13,11 +13,15 @@ uses type IViewEpigrafe = interface(IViewBase) ['{F44F8AEF-CB9C-44D5-93DA-53D6AB6A2D29}'] + function GetController : IEpigrafesController; + procedure SetController (const Value : IEpigrafesController); + property Controller : IEpigrafesController read GetController write SetController; + function GetEpigrafe: IBizEpigrafe; procedure SetEpigrafe(const Value: IBizEpigrafe); property Epigrafe: IBizEpigrafe read GetEpigrafe write SetEpigrafe; end; - + TfrViewEpigrafe = class(TfrViewBase, IViewEpigrafe) DADataSource: TDADataSource; dxLayoutControlEpigrafeGroup_Root: TdxLayoutGroup; @@ -37,10 +41,14 @@ type actElegirEpigrafe: TAction; procedure actElegirEpigrafeExecute(Sender: TObject); protected + FController : IEpigrafesController; FEpigrafe: IBizEpigrafe; function GetEpigrafe: IBizEpigrafe; procedure SetEpigrafe(const Value: IBizEpigrafe); + function GetController : IEpigrafesController; + procedure SetController (const Value : IEpigrafesController); public + property Controller : IEpigrafesController read GetController write SetController; property Epigrafe: IBizEpigrafe read GetEpigrafe write SetEpigrafe; end; @@ -54,9 +62,18 @@ implementation } procedure TfrViewEpigrafe.actElegirEpigrafeExecute(Sender: TObject); +var + AEpigrafe : IBizEpigrafe; begin inherited; -// + AEpigrafe := (Controller.ElegirEpigrafe(Controller.BuscarTodos, 'ddddddd', False) as IBizEpigrafe); + Controller.AsignarPadre(Epigrafe, AEpigrafe); + AEpigrafe := Nil; +end; + +function TfrViewEpigrafe.GetController: IEpigrafesController; +begin + Result := FController; end; function TfrViewEpigrafe.GetEpigrafe: IBizEpigrafe; @@ -64,6 +81,11 @@ begin Result := FEpigrafe; end; +procedure TfrViewEpigrafe.SetController(const Value: IEpigrafesController); +begin + FController := Value; +end; + procedure TfrViewEpigrafe.SetEpigrafe(const Value: IBizEpigrafe); begin FEpigrafe := Value; diff --git a/Source/Servidor/FactuGES_Server.RES b/Source/Servidor/FactuGES_Server.RES index d03d90b1c3c196f8bbaf194d79c4f4c0f33c44cc..fec17d2823d501bba69bbaee67b11c301780716f 100644 GIT binary patch delta 77 zcmdn6m2t&Z#tnBO7}rd`8zB!Q|3*YJ@=T75RAziJxi+$zIfp@Q^6yAl;VgzyhE#?! fATDOmVNhT&U@)6(7^Tl{&S1r0$Y3%#Gs+zRVTTwd delta 85 zcmZ3nm2m?Q-HBk_GWl+VJdpew5zQzxIWkh2@!jOw$ZF;y2F=O8BV{FX88R7OG88c+ nGvqVmFr+dRGw3iVFc>hHPS%dn=d@t3VlZZ~WMG(_808KCM1dLs diff --git a/Source/Servidor/FactuGES_Server.rc b/Source/Servidor/FactuGES_Server.rc index 568fa50c..72b4d756 100644 --- a/Source/Servidor/FactuGES_Server.rc +++ b/Source/Servidor/FactuGES_Server.rc @@ -14,7 +14,7 @@ BEGIN BEGIN VALUE "FileVersion", "1.0.0.0\0" VALUE "ProductVersion", "1.0.0.0\0" - VALUE "CompileDate", "miércoles, 05 de diciembre de 2007 18:39\0" + VALUE "CompileDate", "jueves, 06 de diciembre de 2007 17:14\0" END END BLOCK "VarFileInfo"