ࡱ>   bdgxP   B5;L=>5 G8A;>( "framCaption, c><cmdDefaultn (b28cmdOkox1(`28lblCmdOk 9:;<=>?@ Microsoft Forms 2.0 FormEmbedded Object9qZ[\]^_`VERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} frmDoubleVal Caption = " " ClientHeiVBFrame.-frmHintIr6@z6f3o50 T8\pUser Ba=P23)% 0-'  .+/(&*4-B0=830=D>@<0F8>==K5+0B. 8 B@83>=><5B@8O Commands Engineering Information Math & Trig Financial Date & Time StatisticalPALO TemplModeASAP Utilities PI DataLink PI-DatalinkEPMXLL'EVFunctions (Deprecated) EPMFunctions Excellerator WSP (General) Controller think-cellEmpty/ IBM Cognos Office Reporting BI AJedox&Financial Consolidation$WSP (Saturation Line)&WSP (Double-phase area)/ WSP (Sublimation and Melting LinWSP (MetaStable) WSP (Source) WSP (Gases) WSP (System) User DefinedMulTEx 568<%Essbase Menu FunctionsEssbase Add-InAll-$C=:F88 MyAddinXCEL10;0=A>2K5 >BG5BK ARM BDR-2010ASCCBExcelAddIn1! # >?>;=5=85) 8@0<840 2000T/'8A;5==K5 <5B>4K Oracle IRM Add-in StatistiskTeknisk/ Cognos Controller Link for MicroAnalysisTGKLib Tagetik functions&Proryv Telescope Office) "5;5A:>? D8AZRandomPI-PCXL Add-InTM1XLCubed(Aspen Simulation Workbook)Genic ExcelAddIn Functions GdmFunctionsTR.CO.XllAddin Adfin macro Adfin Bonds Adfin Common Adfin Options"Adfin TermStructure Adfin SwapsAdfin Forex & MM Adfin Zero Coupon Adfin CreditAdfin Equities Adfin Commodities!Adfin Advanced API$Thomson Reuters EikonRLMOUseful functions5!:;>=5=85 (@CAA:89)O XYZ[\EmptyeJedox/ Z[\EmptyeJedoxMulTEx RDF Commands Data FactoryReport Factory7><>I=8: (!  v600xlwings_XCELE?@545;5==K5 ?>;L7>20B5;5<1=p/8@"1 Tahoma1 Tahoma1 Tahoma1 Tahoma1" Arial Cyr1 Helv1* MS Sans Serif1 Helv1 Tahoma1 Arial1 Tahoma1 Tahoma1  Arial1 Arial1 Arial1> Calibri1 Tahoma1  Tahoma1  Tahoma1 Verdana1"  Arial Cyr1  Palatino1"$ Arial Cyr1  Tahoma1 Helv1? Tahoma1Q Tahoma1  Tahoma1  Tahoma1 Tahoma16 Tahoma1? Tahoma1 Tahoma1  Tahoma1  Tahoma1  Calibri1 Calibri1  Tahoma1 Tahoma1  Tahoma1 Tahoma1  Tahoma1? Tahoma1 Tahoma18 Tahoma1? Tahoma1 Tahoma1 Marlett1 Tahoma1> Tahoma1  Tahoma1  Tahoma1  Tahoma1? Tahoma1? Tahoma1> Tahoma1&6 Wingdings 21h> Cambria1,> Calibri1> Calibri1> Calibri1 Calibri1< Calibri1? Calibri14 Calibri14 Calibri1  Calibri1 Calibri1 Calibri1  Calibri1> Tahoma1 Tahoma1 Tahoma1< Franklin Gothic Medium1  Tahoma15 Calibri1: Calibri1 Tahoma1&6 Wingdings 21> Tahoma1  Segoe UI1. Times New Roman1. Times New Roman1Tahoma1 Tahoma1h Calibri1Calibri1Tahoma3#,##0\ " ";\-#,##0\ " "=#,##0\ " ";[Red]\-#,##0\ " "?#,##0.00\ " ";\-#,##0.00\ " "I"#,##0.00\ " ";[Red]\-#,##0.00\ " "q*6_-* #,##0\ " "_-;\-* #,##0\ " "_-;_-* "-"\ " "_-;_-@_-k)3_-* #,##0\ _ _-;\-* #,##0\ _ _-;_-* "-"\ _ _-;_-@_-,>_-* #,##0.00\ " "_-;\-* #,##0.00\ " "_-;_-* "-"??\ " "_-;_-@_-{+;_-* #,##0.00\ _ _-;\-* #,##0.00\ _ _-;_-* "-"??\ _ _-;_-@_-/#,##0"@.";\-#,##0"@."9#,##0"@.";[Red]\-#,##0"@.";#,##0.00"@.";\-#,##0.00"@."E #,##0.00"@.";[Red]\-#,##0.00"@."k3_-* #,##0"@."_-;\-* #,##0"@."_-;_-* "-""@."_-;_-@_-k3_-* #,##0_@_._-;\-* #,##0_@_._-;_-* "-"_@_._-;_-@_-{;_-* #,##0.00"@."_-;\-* #,##0.00"@."_-;_-* "-"??"@."_-;_-@_-{;_-* #,##0.00_@_._-;\-* #,##0.00_@_._-;_-* "-"??_@_._-;_-@_-!"$"#,##0_);[Red]\("$"#,##0\){;_-* #,##0.00[$ -1]_-;\-* #,##0.00[$ -1]_-;_-* "-"??[$ -1]_- 0.0%0.0%_);\(0.0%\)#,##0;\(#,##0\)@;_-* #,##0.00\ _$_-;\-* #,##0.00\ _$_-;_-* "-"??\ _$_-;_-@_- #.##0\.00 #\.00 \$#\.00#\. General_)k3_-* #,##0"."_-;\-* #,##0"."_-;_-* "-""."_-;_-@_-{;_-* #,##0.00"."_-;\-* #,##0.00"."_-;_-* "-"??"."_-;_-@_-\$#,##0\ ;\(\$#,##0\)S'#,##0.000[$@.-419];\-#,##0.000[$@.-419]>9_-* #,##0.0\ _$_-;\-* #,##0.0\ _$_-;_-* "-"??\ _$_-;_-@_-0.0#,##0.0_);\(#,##0.0\)#,##0_ ;[Red]\-#,##0\ #,##0_);[Blue]\(#,##0\),'_-* #,##0_-;\-* #,##0_-;_-* "-"_-;_-@_-4/_-* #,##0.00_-;\-* #,##0.00_-;_-* "-"??_-;_-@_-#,##0__\ \ \ \ 50_-""* #,##0_-;\-""* #,##0_-;_-""* "-"_-;_-@_-=8_-""* #,##0.00_-;\-""* #,##0.00_-;_-""* "-"??_-;_-@_-C#,##0.00"B.@.";\-#,##0.00"B.@."#,##0.0;[Red]#,##0.0k3_-* #,##0__._-;\-* #,##0__._-;_-* "-"__._-;_-@_-{;_-* #,##0.00__._-;\-* #,##0.00__._-;_-* "-"??__._-;_-@_- \(#,##0.0\)#,##0\ "?.";\-#,##0\ "?."&!#,##0______;;"------------ "#,##0.000_ ;\-#,##0.000\ !#,##0.00_ ;[Red]\-#,##0.00\  #,##0.000 0.000w9_-* #,##0\ _@_._-;\-* #,##0\ _@_._-;_-* "-"\ _@_._-;_-@_-A_-* #,##0.00\ _@_._-;\-* #,##0.00\ _@_._-;_-* "-"??\ _@_._-;_-@_-83_-* #,##0\ _$_-;\-* #,##0\ _$_-;_-* "-"\ _$_-;_-@_-#,##0.00_ ;\-#,##0.00\  #,##0.0 %#\.00#"0";"0";"5B"5"AB8=0";"AB8=0";">6L")":;";":;";"K:;"Y*[$ -2]\ ###,000_);[Red]\([$ -2]\ ###,000\)u8_-""* #,##0.00_-;\-""* #,##0.00_-;_-""* "-"??_-;_-@_-"$"#,##0;[Red]"$"#,##0\- 0.000000000 mmmm\ yyyy #,##0.00001               1    & & & & & & & & & & & & %  %  %  %  %  %  %  %  %  %  %  %  F  F  F  F  F  F  G  4            +   +  +  ,                    HU  HU  !1UU 7 F  F  F  F  F  F     @  A     #   I1 $ J ; P < P =  =   @ @  # @ @ + E a C ff : ?   1  1  1 % %       1 "4 "4   K  ( ( ( (    1   1     "4  1  1    1 %  1        N1 >  D     B `  L  # *  # @ @ *  #(@ @ * M  1 1  1  1a  1a 1a 1  1( q q q q q q  q  q  q*  q 1/  1  1(  1  1Q Q Q 1q#  1   @  + 1 1   1  1< 1  1<  1  / 1 1 1  1a 1  1 1  )  1 1  !  !  !  1! 1 1  ) 31    1  1    1    1  *  1!  1  1  1  1   1      1  (  )    1  1 31  ! 1 @  1@ @   1    1            1    1    1        1   41  4  1@  4  @  4  @  4  1@  4  1  )  1  4  1(    1(@  4 1 @  1@ @  1 @  1 1  1@ @  1    1@   1@ @  q*  1  ,  1< 1/     51   @   1H  ! @    1 @  1@   1   1 @  1@ @   * 61# @   1@   1    1<  1Q  1 @   1    1   71       71   71                 q    1  1   1 1 1*   1@   1@   1@   1*    1@    1@   51    1@    1A    1A  1a    Q Q & Q( '1!  1Q# 1 1  1a   1@   @    1   @    1    1@    @    @    1@   1@   (( )1( )1 *1( , -1( .   1 )1( /1( @  /1(@ @  /1( 01@ @  )1( @  11@ @  01@ @  11 @  11 1  + /1 @  /1 1  * /1 1  ) /1 @  1  , /1   /1    1A( 1A) /1+ )1( @  11@ @  11 @  11@ @  01@ @  8! 41   1@    1@    @    @    1@    1(@    1  1      1@    1@   1  1# 1@   1@   1@   1@   1 9  1    )  1      *    *    *    *  1  +    *  1  +  1  *    +    + 1  +  1  + 1  +  @ @   3 O  1    1  , O1@ @  1  ) P! 1  + + + 1|   |@   |@   / / 21a  /1)  11 11 21! 10  1! 21a /1=  21! 1  1@   1@   1  * 1       1  +  1  +     1   1  )  1  ) 1@   1@   @ @  1   1   1@   1@    1    )  @  )  q    q@    q   71!   71  !)@   )@    * 71   7   71   7   71   7   71  7 1 @  71        ! 1! 1 1 1 1 1 3 1!  1 ! ||u]}(}  0_-;}(} ff0_-;}(} ff0_-;}(} ;s0_-; 1  1 2 1_Stage1>_Model_RAB >9_PR.PROG.WARM.NOTCOMBI.2012.2.16_v1.4(04.04.11) E_Model_RAB >9_=8302_PR.PROG.WARM.NOTCOMBI.2012.2.16_v1.4(04.04.11) ID_Model_RAB_MRSK_svod_PR.PROG.WARM.NOTCOMBI.2012.2.16_v1.4(04.04.11) K_Model_RAB_MRSK_svod_=8302_PR.PROG.WARM.NOTCOMBI.2012.2.16_v1.4(04.04.11) =_,_1 (2)_PR.PROG.WARM.NOTCOMBI.2012.2.16_v1.4(04.04.11) D_,_1 (2)_=8302_PR.PROG.WARM.NOTCOMBI.2012.2.16_v1.4(04.04.11) ?_?@ 5 B0@8D RAB_PR.PROG.WARM.NOTCOMBI.2012.2.16_v1.4(04.04.11) F_?@ 5 B0@8D RAB_=8302_PR.PROG.WARM.NOTCOMBI.2012.2.16_v1.4(04.04.11) D_ 0AG5B RAB_22072008_PR.PROG.WARM.NOTCOMBI.2012.2.16_v1.4(04.04.11) K_ 0AG5B RAB_22072008_=8302_PR.PROG.WARM.NOTCOMBI.2012.2.16_v1.4(04.04.11) {_ 0AG5B RAB_5= 8 -!_A 2010 3>40_14.04.2009_A> A3;06_version 3.0_157 $!_PR.PROG.WARM.NOTCOMBI.2012.2.16_v1.4(04.04.11)  _ 0AG5B RAB_5= 8 -!_A 2010 3>40_14.04.2009_A> A3;06_version 3.0_157 $!_=8302_PR.PROG.WARM.NOTCOMBI.2012.2.16_v1.4(04.04.11)  20% - :F5=B1 20% - :F5=B2! 20% - :F5=B3" 20% - :F5=B4# 20% - :F5=B5$ 20% - :F5=B6% 40% - :F5=B1& 40% - :F5=B2' 40% - :F5=B3( 40% - :F5=B4) 40% - :F5=B5* 40% - :F5=B6+ 60% - :F5=B1, 60% - :F5=B2- 60% - :F5=B3. 60% - :F5=B4/ 60% - :F5=B50 60% - :F5=B6 1Action 2Cells 3Cells 2$4Cells_TEPLO.PREDEL.2016.M(v1.0)5 Currency [0]6 currency17 Currency28 currency39 currency4 :DblClick;Followed Hyperlink <Formuls =Header >Header 3%? Header_TEPLO.PREDEL.2016.M(v1.0)@ Hyperlink Anormal7BNormal_10;0=A 4;O 70;82:8 CNormal1 DNormal2 EPercent1 FTitle GTitle 2 HTitle 4I:F5=B1J:F5=B2K:F5=B3L:F5=B4M:F5=B5N:F5=B6O2>4  2>4 PK2>4Q KG8A;5=85R, 8?5@AAK;:0S 8?5@AAK;:0 2#T8?5@AAK;:0 2 2U 8?5@AAK;:0 3V 8?5@AAK;:0 4W 8?5@AAK;:0 5gX18?5@AAK;:0_KRU.TARIFF.TE.FACT(v0.5)_import_02.02Y 03>;>2>:Z 03>;>2>: 1[ 03>;>2>: 2\ 03>;>2>: 3] 03>;>2>: 4%^03>;>2>:!B>;1F0_=0G5=85 `B>3)a>=B@>;L=0O OG59:0b0720=85c 59B@0;L=K9$1KG=K9d 1KG=K9 10e 1KG=K9 10 2f 1KG=K9 12g 1KG=K9 12 2!h1KG=K9 12 3 2i 1KG=K9 14j 1KG=K9 14 2ck/1KG=K9 14_UPDATE.WARM.CALC.INDEX.2015.TO.1.2.3l 1KG=K9 2( 1KG=K9 2!m1KG=K9 2 10 2n 1KG=K9 2 2o 1KG=K9 2 3p 1KG=K9 2 6q 1KG=K9 2 7r 1KG=K9 2 8?s1KG=K9 2_13 09 24 0;0=A (3)t 1KG=K9 20u 1KG=K9 21v 1KG=K9 22w 1KG=K9 23x 1KG=K9 3y 1KG=K9 3 2z 1KG=K9 3 3{ 1KG=K9 3 3 2| 1KG=K9 4} 1KG=K9 4 2/~1KG=K9 4_!?@02>G=8:8 1KG=K9 5 1KG=K9_20E2-1KG=K9_46EE(v6.1.1)#1KG=K9_FORM3.1#1KG=K9_Forma_1=1KG=K9_GP.CALC.FINPOK(v1.0)_-1KG=K9_KRU.TARIFF.TE.FACT(v0.5)_import_02.02?1KG=K9_PREDEL.JKH.2010(v1.3)-1KG=K9_PRIL1.ELECTR%1KG=K9_proverka+1KG=K9_#_?@>5:B3G!1KG=K9_=25AB8F88 !5B8 !1KBK -!?1KG=K9_>=8B>@8=3 8=25AB8F89s71KG=K9_D>@<0 1 2>4>?@>2>4 4;O >@3_CALC.KV.4.78(v1.0) 2!1KG=K9_$>@<03 T B:@K202H0OAO 38?5@AAK;:0  ;>E>9 >OA=5=85 @8<5G0=85%!2O70==0O OG59:0!B8;L 1-"5:AB ?@54C?@5645=8O$>@<C;0C$>@<C;0_>=8B>@8=3 8=25AB8F89'$>@<C;00>=B@>;L%>@>H89XTableStyleMedium2PivotStyleMedium983ffff̙̙3f3fff3f3f33333f33333\`Wsmod_01Fumod_Loadw =AB@C:F8O$M>3 >1=>2;5=8OG_ "8BC;L=K9~ !?@02>G=8:8&03@C7:0 40==KE!2>4 vCO1 +0CO2tQ ><<5=B0@88Y@>25@:0pet_unionTEHSHEETmodProv modfrmReestrmodfrmMultiAdd" @>25@:0_backnmodfrmMonthYearChooseAllSheetsInThisWorkbookmodfrmDateChoosemodfrmCheckUpdatesmod_Coms*modUpdTemplMain REESTR_MORREESTR_FILTEREDV REESTR_ORG REESTR_ORG_EEmodCommandButtonȋmodInfomodServiceModuleŐmodInstructionmod_wb'mod_TitUmod_00mod_04mod_03ܝmod_02  et_union_vZmodfrmDoubleVal(   b  &&  _prd2: ! ;    add_01;  add_03; & add_03_block;   add_04;& add_04_block;+" add_coms;: +AllSheetsInThisWorkbook.cmdGetListAllSheetsanscount( CheckBC_List01; (chkGetUpdatesValue:^'chkNoUpdatesValue:`code:date: *DocProp_TemplateCode:%DocProp_Version: dt_03; *  dt_04;  end_01_1: end_01_2: end_02:end_03_1:end_03_2:*end_04:end_Coms:  end_EU:-end_EUV: FirstLine:$ frm_Months; GetCode Getversion ht_03;  ht_04; ! Instr_1;! Instr_2;!! Instr_3;",! Instr_4;-8! Instr_5;9D! Instr_6;EJ! Instr_7;K[! Instr_8;\j% Instruction.BlockClick+ Instruction.chkUpdates_Click- Instruction.cmdGetUpdate_Click it_03; * it_04; % LIST_ORG_EE; % mod_Load.cmdLoad_Click% mod_Load.cmdPath_Click8 )modInstruction.cmdShowHideUpdateLog_Click/ modInstruction.Process_Page_Back0 !modInstruction.Process_Page_First/ modInstruction.Process_Page_Last/ modInstruction.Process_Page_Next2 #modUpdTemplLogger.cmdClearLog_Click  Months;   Period;" pIns_ws_01_1: " pIns_ws_01_2:" pIns_ws_01_3:prd: ! prim_03;-0! prim_04;pthLoad: ! Quarter;" Quarter2;) REESTR_FILTERED;   REGION;V! region_name:  SAPBEXrevision  SAPBEXsysIDBW25 SAPBEXwbID479GSPMTNK9HM4ZSIVE5K2SH6 SphereList: # SphereList_ru: " SphereReestr: ! tit_Ruk_FIO:  UpdStatus:& vdet_list_ee;# vdet_list_gas:* vdet_list_hot_vs;' vdet_list_tbo;& vdet_list_vo; & vdet_list_vs;( vdet_list_warm;version:8 XML_MR_MO_OKTMO_LIST_TAG_NAMES; Years;  Years2;Sff`+*@ oa$'  "p !"#$   :{gbm]NҚҌ7Fnm]NҚҌ7PNG  IHDR VόsRGBgAMA a cHRMz&u0`:pQ< pHYs&?KIDATXG՗rWHnC\&y sw܄CI(IaxZ3#H#kDlK2^}_0ײ$cbTyO 'tŶ7bm en1[7ָng-xB9O)DU(њ*kh0A`bKt>1w5T+ggu3QS2i??mD&")ȦrOe y&D j0@34iz)Uo%3(X/&'4 j_ @rrˍGMVU1.κ>P=]w~hİYZÀV{u```oc}Mm!H$Mn<4]~@@OΎLG}T}b v>% ]p(Qk7-H963{oD .2~1!J4(q^ WV&Cb[R= |R.F.TmĄX]yV(҃|X̏li")JgGCQ K.IENDB`b p<VFn p<VPNG  IHDR VόsRGBgAMA a cHRMz&u0`:pQ< pHYs&?HIDATXG՗rSGs܆p"e #@&B $c[ΪȲA%&!&,LՔ3s'_TL4vq1TFJ|TKOO3Y{-uL*0Ucs)|kG-<>x>sq|<[X>KSʤMemS2#X˦-;lP~zoq׊91axSSU[WKKjYZm^gGIy|wx' l̘Qv\蝙UW;[jwgG?wvն~UTj3»D>t]tmbO9/ftPjuuY4ˆ/Uٞ9$`'' ҃MOljLs xJYmn8}`;2 nݺL&~ wE:F:i,kVp*Dt]NlV N$Y d2Yv8iϓ?g2+D4%,;I-_d˖-QUUDsF2ěo)4 iBN)t:ߔBDaTVﻺ]txƧ &b ]VL!L$€}l6(]WhAQi H [opDQb1q@,իy/0 ɇ @N"L)Aիr$67A{1 C ;#>e,1^mߋD&":EDyH$k׮7 I]7n| n:eM|뺸rJ_QN),QkAUULNN"N$k#2M6= 4+l]E_D  ˎ2Mc믿uE]}uDp!D"+WB ]ŗ_~ [)Sב!,FqEܼyBB bq0Ӄ0%@DH&bbSSS8<Ѩl>Y":* !}wT*%&ʼXZ5~f͚F/K^ޗU(pر2Lυ1@4\zϟǢEf{Xߊ+iZh<''Ļn;WܪU6\9ף 555"IIBy'TM2/_{+[CchijÇ155l6+&ʼ/.p,M-l&rKI|eJ1_9\Z1Xz5y^lmW\A?Ţ8w,}+u>+ uWW.\x<0Fr#v//( g}&yXi>88uV\)pȏ ى&Qh(L"L@ΰ|ϩ)9r?c~=zDb 噾8xPWW'Ju]ĉ8wEA,,L1ahh?bHt!& ?_|s̩JrԹ{..]˗/_~cLH\nrJ6|hhI$K$g}"eYH$-d6E:£M ?fHDhcݳMQ1vcCCCރnyuwwD%" DQ1%}}O i 匱$- : e}Yd $eX"x3зo0f̘P^=8` $ >|0߿??j֬e3KINӧOmM=/_SN2% 8)Zh|.H(($*++áCݻC=M21x˖-Lwxko#@?A:5j4t)e?&&!O>,O.?ɺ`M2Y ;3 ھV̙+ )aDE@YfzjXr#Q&؝ỳRDgvD$&2Ac2RڹOXal3gfaS(!`ѯmNxHeB۷xXo߾xڵkvڅc: l`k;+ŦT .]xdbrEXv{1i_ZB>}QHp[9OBȈ RS}_Bǹt@pH5x)k('؎;|EmDUHwڕ/Ic_|Me k$}-9`%0 Q/B_ |L=hxZBjyZӠAШQФI#IϞ=C^BNB֭;|ƒQ ^Iϓ'O|@iܸq/}3l0X9dmٲbmڴ 'OÛ$YXySzQ 4J1bD2dCQ C9 k-\J' @e$ME~ĉ0Q ,p֑K<([p&[50ZA"<>uTJ 6!&i4hPݛ6|җM|1aK t7F۴ft!֭[NB/ȑ#3d NQM<6cS(}ɓ lI+Lwa ,[(8p.D.\d̑k` V0c?sF&3ŋ4rDLDeL"߿pTc#ѣpmJl l`k;\qq?XQ}O4ɿӰ`H$Zi"R ׯ_/_1ľ?KJJxvdky9唈Q^JOQ8{(Ͻ{L`c坏smfm% D`d 8|P"ΝpʕPVV消ٹakҥ?J͛Np 3_%]AsS@bAyP̡q$Q=zԏ.bĴdɒ?d…LR6%R( K Y db:sa IDATxwUu{?ۦa`af:4Q@؍F$5j_K/J4D)CCq:Ӟs3wP^g9sy^ګma$7?%::!S)/r).^ڬ[Q%Zk57Zc+$&nA 6!$B @"pCT|Ois,@X;UH[;f[}س9/B+`aw"0KLpjI}{^&}>bEw|[бZefr(;i6-;+?T}Ky^PgʎROJn UGg>‹nw{xțZNrsJ…ʗ[D=DeL2܂` /oPJVI+iT ag +jBغ6%Gc~Q[p7rGux֟ZF5nzݛlV|&/96ڌ'wE*%B }0$OGmyO+6eK.{H=:6[ gJ FGH$$RJ'o\6B84]":+XC Eɲ8MtݘvK!Kc&-Z~Lc;Zq7@&]yo}SxdG/s`{lz'ϝw_Y2gt/̧=od.>!&r,`-h?~{jMY~ X3-Xkڐe8Kiwb΍oګݰK6XqҪΟ\|'Oy~)IOHyG,XSy)+jpTjJßhRExqm 0t>5Hi1ax58z`=(>ig-y$4&: \o>}_=xO%(:XV=W{Ė/'m~\/8y˺Z,GQd)ᅛ tQ2]#S./O|"I]e%'ߟ";3YkZ7UXkM8j3I F'v+>/|cio?_voOU|FDQEsgUqoU6?{@!B Dށ,s 7E)) I&cTUڀw2 k_‚uWM6R xJRU&1J蓏+okn{nU&'_&z^/tIhzkm3px.@INV,'zLپWټ׃$GC\" `@))%J)¨ ڇ0s>뤕K7mkwۆċ/+˻gYI=uG,\Os̙j4P~9m Dic4KNʀaqhrf 4I0DZ@X ,B E fؔt㖾gg]}]o}ݾw|jus~ E72] |~|>Y"j5K$C$MD@ڒ%{+%cAƸm"fβJcX 0w;3(lsa0 T=QjFsN#vWbC^zq$@1~ɡ OX%B D*4~-`P !<XdjsD*Bvr^wѿW~[&AO# @@^m !l^zV6N@M1xBb H c k4@!AEMHb|$G'IRN %e ROCk߅ZN yឥ! @\t0!t1ACoW-;> x0i )/=^EҒo!Fktfq|z_ PeHX+JSAaT)(*%29"˙PJ)U)S(1IFÏX28jm9%XH'Ppmuk~}ϿW=ch0|Z@t`2'7]x܂OqK:3drRέЉI|Y Vc8kƀFb^C1BQXKQX9̟ޕ )nFqDz<aS2dJ`+ i7 |SY8VD8ZHH,^0vX88___\̛DA`e g_a{/_ ?\Z)d0 |[}/M E>BwY˭{Rcl=/ ڢ@uLXk:k^PӖ"hopbAa\7I rhvO4Ԥ)EOF vNM^:4ۃ2+mW)QiqvA:= @QBBT#t3&M.f;EsOtA >MR ?_$9t?Ӗ*LuDxLLAQ&t\\ȊSZ S;lfk/\fw~x $ͭmZ nծٳj ,[>29EWo? },X(foQ}-jj٘Jo`s[K970*ocЧV}<7E <ЗKg7?JZg8?{tedV [SO9ALWg$vI[ڒ S]X0.NLg14ڲ;Λ7>[۬̚_#\XN=9   %,Zv',-U* ¨W|-̚_1Q Dx/=w(P^QB-HxurY#5np]W|W }ҁ' /|n~k>2goWߗ :xcS+{xc24D;ݙr|6"TH2:IA%u;ĭz#J`YaJw=ytc;[RPHH t}ARt/./՞.T P$+{Ps >ʊ>t+˯TKKT  +xIu < jQA9TUDĝ:h>k^wݏ|]-_Ͻ ?;7+.7iWHV>ܸb?t5;(62BWo$Zq8!bRs Z lngnz`c;ٖCۃLB FS_IϏ|4۽o|>GT,D" P}5GxC/쌢|@/-aQ&G#tƬ^;J+ÚĆ*!Vy$VD^,y8_-UjO(݇ gEw7_uݒ*p>iFWoZTLH0qxAztl֗|㝘,AHw|$ɭ +:io{2h mas^v~tߺ;nSnԞ?}2@P2?*@u--\wHmTO ԇN5KyߓZs?5UsmFA.D7!-a%Nrr# Li;jxu>AvUN%ozk~ו7qJ?&CM} i @}[fluz'?'CX%6W7vUVSٶ?pԯm^ 0h aoƝ|˖`~kd})(R>cÍAhH] 3EHI3ˁPA41_' K;,;r'{7nKUw!鐙 Gp|ho;׽/r_RaQ:uH]~\wdY统~ߝ6H]߀:qNV'I\/C1quba GK{}[1IɴI-W^oG!awvqw6NtGj$n[g"1/I +}"AI+rLr4{Cځl O]7QJRXDEQ^x% ?iyT}73e1ZUȼvLUI[-nBnܜN껩WeX5h 6 !7ǞWF֜yo}5\DR)n~̙zG끢Sgwݽ`WyŦ4z冱d=EdlN5ʀ3fg|;P.rl(0H),6OX2wV8+u r 7}-5彈9uړ2e9wN87w\۸id(jtwn/~^@[s{':Nwb৵4O~Ӯ:W|Wga3L%za z@`U_2M^[.Y +HդVkw^"rmЇQ8{紀E% <%tV>5tKI-p8"uc}y>v}}}ߥHI1Uu83w\o&Jkmod~a$!gspAYq̜{Js-㴜\DS q">Va׷^kGzق7“$/ V̬F0Ơyih (Y ﲈ yp/Z1֊Gw$nHfͅ??0}ln}7J0\DHYr pZ4cp?~I\uc|qfq9q5,AAPݭGnMn` ![ԆO>1Yri;}>׾ ?S\Ojԁ= }gu ەe_;jr}IE},-&R2s,%#J-Snu0И=r^ЮqqxBGй/׾#F`XjmsF=!,/ (HnPhMsll原Np0{9mL"36lCsW0< IDATG-?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcefghijklmnopqrstuvwxyz{|}~lKGy m) K3/R$(#3֖ްXƳeFZe "g͊ŧ~rwٌZ%.G]X y"pwqJNQL+Úh]P.?j!"9Yif96l馇[; tt[7)Ӄ9dޒ1fo0yоuo=ݢK.4q?$FE\"ˌWݷ<2 @#,;rr5)[eFgx@d.1]$q4%/ "'s i;n2,q)^ˆ_&i&|w dI4m!5c9d;u%0B0(a&g-\b{{F =$Nj5E,vTCMkIc,BvEAe}ll߷C:fOG<%EgrIt){йksD^Vx EyqahɌd)k zd@`HI]W zދkAb|L, %哛R-n<,(5뎇rߓG$Ի&H O{ٛm'R y$5Fj&}isI3 c :6/.pW_?w=7?74'Z[v4]h"C*5u)m,];&6m*ОLy۞QY4# 6L$gږ.( In Vy̚dkĢl ] /8Wmۓn-j)Js̷ƐZ 12 wC2])*'f ÓvXY,Gy0X/<4Ly.A`A."FXM{K&:x^uxKzw46WjF>^z )@~I֮§@a4Y0yV±m;v.] ݶ6{wM"PBkW<`Bƺ0mpSVSDS"%i>p' (%\ 0Df:c0IBr9|FkVܶur-^\kt3hmd[qeY78 YK1e!ko6ф.[<jUMM-@Z*60OI {m7|fA-9h%bX3cE+\LBSueۥX$q[L%W\dc,  6|m{8ZQ3=M3ܧEJA  U%k3pyts@c<}6mFY|h?{9~0[dn'Ҵ EN1yf=xzt͑Ձ{F(k{0-O-q.dk֫ PR)YS;(\)! Z}DPzXXri`9MSYKi5ֹ>]j`=F~yJmǍ j>tj0@*u|E 2ɳ?r:z" j44$ kGbP@Le]XCG}~J-XSh32 |[,a{]RʙJ\K*^>ٕ*\5aׇN6xP?= b`Eeiך &|;u]TwX њ[AXo]'yGg}>%\2,nWBU{g酠xXCEM2x#%ʲ~H< p dYkI'D*UN.%L1ƒg9y.Y CjuBx+1{\)56dztL< Bk^g u_G'],io``QGDyS=W/'y5su &Z&'wLPRw jţ?JlmP"]gwPXU9繟H 'X\ V<=E j4G\ӸR50 ,KNRS] hT"f[O+gJkKs0Ɍy$(!r(eE=Z 1l\]?SA F s̉ќ'k7fFkʵ3YNZkCw~FQ.?t9\emk:iH{~}{bOEQY.Uj!`Vş|n\;)<ؿ$o:X#Z|3e,k5 $L=Nbw(4I"Y?Z߽vS%h_O>GV;F{$XY&/npJNEH,RDOn 0D@ T<+A4r*;s+<1egNzg\[^H8f;ajHDaHXi J@ohJǏ5VY^Ѝ9JNstgs=jD ",%fQݱyOkzQ]zhetphUg|۲w|犓ΈOo60 f/K?e'ZR t=9~lieYNfdz2{ά|QcΥN뭽s>C,N D^讫WlcWU!O &PW=A FblJˢ yѿʭ.ppgz'53?z#[| [mMN /8rmi~l?'?bwTrlj|Qs*.^w$R=@\Ю>r`lMO{l}=֎ˑ^g4FN5:͡d0ά [}ىP~C9R)=F+W8@ įU"L7*t"jrR\ {;V;S+")3FR).9e/q-7}=͛)v`褁/?brZ,^bÌ#3қޢw|f=dXp5{CK͛\4/$njQDNB W~:X7T^]Ӟp=cܵuu2zNnLWnv@ P@SF5:qhp0W*qc5ng,1S{? D6\vIlog^laaQA E qƼƯ:SsKKр ,je|"@F)nt- Nv;ˮr3_^DV.$rw̚f0U[99-KOvO w 6acc:ߺ/g22Z:ǐ.:[ٞgAy3)'LLh`-><]QŪʳ,+^|'ΚxCTo,-fݔ0sI3e'y<6Zvy_趦|K°pѲjp9oϞuϳx-a1zU鶘;X# *੃Z t?[]osظwU~#|]ytue$˒-/`p͒%l@!KHii&MNi6t6 % mZ'46 ^`,[.ZG~[{H66%stfi4rw߽[ =cgulu:;ʱaL"~d/292Vs\[|(68xtCRH$R/\B^IC4ngwRE(->x+!]Cs1$,hc]=^(WKo/|q`gqmG}+eϧL;')dZmT֊6uB@,loQKCu%X"K%z=Ɨ?~l``@W-JɛD]n™N$f%j@}+la0(T:A4RE"A@(É` x%AMcdzU ݳcU oуwڼi ;ה@.5x hǷ)w~%;wБJc]|a.~ۺ)PYT{ǢHdsCR´L KV`QR'ʶ BnR>KT,e. @ 2ʁ[RWuFKjfE|锧;Yf;9E_Zia&6z>fmR?RB:ip'B!(r ^p /1~ޥKB )Fn3k 7IDATaX T@{{*?Ab ɯ,+XԞ{9I粌rNuCوehϦ#ZE02jʱAb.@Y6$eнJaǕEwc0~os_\Qam]w]t[6 cƇvNySD[ e>7/KUƈ#=Th+a 1X"L?| qZ A CA089B!&W.pޞd0(j ;tq). 37ܸGEYfQ(]DE,6[)Dj 6hϦ`UP2>eg]0>tl\Ss3@i7@A&B))91fZ*߻s;pô`ʲuͫڦ -t j^\,FuK=XƠl u\[,(K@ZX9+?v,7/juZwvo׳fy5D1AT`DWlѥHV*ϜJjvN Dpa>L,j "@I Giy#G 8v۶a.c+j)l25r I; jPd,pp Q]I7ſ+.92O A"tK)!C=GJZ&0 [Z҆zT4+la *hIǰnEal"0H(' v񲦾qQY4ew6LhV! .uئ+ߧ83" $W!Htc_]K&gsXD 5@Q@A 5}txˇNx~G{,t'3RyUQ@HáɫmlPc: h ` 鴡ѯzJ&͗]†=SJF7xEgLm'vR?e靹#\Y26D)2A9Bi6)i=YDOM.O"C$ 8'=B5S fWBQ8 A>,_m/䃆E4~siC+k q}oY]3$2d b)<X"E3d Z4:ZpS)T0 ?B4 bDyKk2X +8,F*Y=R)b:4N 1=lmoΞ~Jg; E$$(QFH.q D <\TW+NH486![:B΃HB'PItX$_ P+VV}VmYaK+bȼR! x˗~7ыι--Qzb(UJB1`UښJalj6By|+X 9Z t1|~i~m) L"D7ւ^sp J::pG=3=fn*YgZDq@}O- \~jb12:ڻA@+Ru&+Bt(UNch>wJBAOX0 ;Ҟhܺ2qDy MWP~͇_U{{zw߿b=8 f~491gG6_\@V@hm|`aRz%a`2 6Fj:gTC D@H=6@A,;A')X*Ya M@5kukO/P:6۴uRu1-.gOAtLZfZu{,io3NKHA J@D/;Q%_ɲ@MPA"BxBhZ Uѫ&+]\AtGzMfAk}4=28/Q-$UPx0m~w^3sa[˅R]F"ZHAdeLu()s Ls aiyRg9OK 5ߘ{m G06# [oź+{^t_|tgζD݁$@Lݸ_{Cmb|4y^R^{)/[[o<_G/Y}}9\1w p M)1гԴTQMy, QS]RC$0\!pt^ iH̱T}Aa ܻ=f ~p*LOejY"!h~.z2k{+{Xܩ ~H)JKo{])' * *Ԍi _sӻfheضUTuW1> Q "1z?~y s|.Jo%MfDQz"aT#/eW3;z$,'3yC紙4)k0Tjݖ!=JV8JnKƻo]R6mmheJ&ahQ]ՑMUPXÇlü >te'#>9d@xeqc}v??X@:onܜvr8]p9$C ˾e5OmPy'?W^iZ|i[tK}G\F8!&$<ڐ̵m cׁ jJ kxᘏ7/ *5^@y"ʣ`ydxtž}F>w @ ~L3yqѲNbNޫf'k4SK$y=κ$ٰZ*v-w|_sZyV=B=;ܶuuw|IRn*m2',"ߺ ܑS&aZR\>lpP-*9RT% xAęQ4lb8\9[tz]ܹڧd.KO}SGz,bqP䳙L"ƝX,ASJLڼ/^(<(ťTԸ,,i ;ug*qGz&%7]DEJ6ιzʽ{nWgO}_UcӄDX,rg_'&P =E q<'3X9anU":.B[QJTxo= 3ۚy~*߳w;Wd*I_ ԔqW? ' '=8-jIWcS^ ?St,WN:ZjIENDB`b]S@bD&?9Fn1S@bD&?PNG  IHDR s+sRGBgAMA a cHRMz&u0`:pQ< pHYs!!IDAT(S=K@_jb؂GU{ģj "RTjQQ"-nQD쎓D]a>̔)/$&6%KݹMK=doE o^/)_X+Gž1c4xR߹3b@D+VlӴ% oAW;g֔ڔ`,Кal2J_K7=?A{"E.6dNjɆ Tzcji0Xh5'նNuia$?5S9<ؗ U2/B8!xYgWIoGXIo`-M: Q49Q&:RBZ <BW.#W%^ޒd?9gIENDB`S AA@A@   _ "  &/ /",!"! 5A?C1;8:0 !0E0 (/:CB8O)1/=20@L$52@0;L0@B?@5;L09N=LN;L23CAB!5=BO1@L:BO1@L>O1@L5:01@L  C:>2>48B5;L _" /  ><<5=B0@88add_coms08<5=>20=85 >@30=870F8808<5=>20=85 480?07>=008<5=>20=85 ;8AB0 !C1J5:B $" (01;>= ?@54=07=0G5= 4;O @0AGQB0  =0 CA;C38 ?> ?5@540G5 M;5:B@8G5A:>9 M=5@388 (4;O A5B52KE >@30=870F89) " K1>@ >@30=870F89 >ACI5AB2;O5BAO ?> 40==K< @55AB@0 >@30=870F89 $!" >AA8815B 4>ABC?=KE >1=>2;5=89, 25@A8O >BGQB0 0:BC0;L=0= 7028A8<>AB8 >B 2K1>@0 D>@<8@C5BAO A>AB02 8 AB@C:BC@0 ;8AB>2$0<8;8O, 8<O, >BG5AB2>(:>4) =><5@ B5;5D>=0end_EUREGIONMonthsYearsPeriodQuarterQuarter2 frm_Months!G5BG8:8 SphereList SphereList_ru vdet_list_vo vdet_list_gasvdet_list_hot_vsvdet_list_warm vdet_list_tbo vdet_list_vs vdet_list_ee;B09A:89 :@091 3>4 I :20@B0; ORG_REESTR? - B5:CI89 @55AB@::070=85 CA;C3 2 AD5@5 2>4>>B2545=8O 8 >G8AB:8 AB>G=KE 2>4 07>A=0165=85-:070=85 CA;C3 2 AD5@5 3>@OG53> 2>4>A=0165=8O 5@540G0+!1KB#0E>@>=5=85 B25@4KE 1KB>2KE >BE>4>2$:070=85 CA;C3 2 AD5@5 2>4>A=0165=8O 538>=0;L=0O 35=5@0F8Oa<C@A:0O >1;0ABLXML_MR_MO_OKTMO_LIST_TAG_NAMES2 3>40 ?>;C3>485 II :20@B0;I:070=85 CA;C3 2 AD5@5 2>4>A=0165=8O, 2>4>>B2545=8O 8 >G8AB:8 AB>G=KE 2>4>AB02:0 3>@OG59 2>4K5@540G0"#B8;870F8O B25@4KE 1KB>2KE >BE>4>2::070=85 CA;C3 2 AD5@5 2>4>A=0165=8O 8 >G8AB:8 AB>G=KE 2>4!1KB>20O :><?0=8O@E0=35;LA:0O >1;0ABLNSRF3 3>40 9 <5AOF52 III :20@B0;*:070=85 CA;C3 2 AD5@5 >G8AB:8 AB>G=KE 2>4&?@>872>4AB2> :><18=8@>20==0O 2K@01>B:00#B8;870F8O (70E>@>=5=85) B25@4KE 1KB>2KE >BE>4>2"@0=A?>@B8@>2:0 2>4K-!AB@0E0=A:0O >1;0ABLMR_NAME3>4 IV :20@B0;VO >4>>B2545=85:070=85 CA;C3 ?> ?5@5:0G:58?@>872>4AB2> (=5:><18=8@>20==0O 2K@01>B:0)+?5@540G0+A1KBI#B8;870F8O (70E>@>=5=85) B25@4KE 1KB>2KE >BE>4>2 8 8=K5 284K 45OB5;L=>AB8!B0=F8O - ?>AB02I8: --5;3>@>4A:0O >1;0ABL OKTMO_MR_NAMEGAS3?@>872>4AB2> (=5:><18=8@>20==0O 2K@01>B:0)+?5@540G0!5B520O :><?0=8O@O=A:0O >1;0ABLMO_NAMEHOT_VS>@OG55 2>4>A=0165=85/?@>872>4AB2> (=5:><18=8@>20==0O 2K@01>B:0)+A1KB;048<8@A:0O >1;0ABL OKTMO_NAMEWARM"5?;>A=0165=85*?@>872>4AB2> (=5:><18=8@>20==0O 2K@01>B:0)>;3>3@04A:0O >1;0ABLTBO>;>3>4A:0O >1;0ABLVS%>;>4=>5 2>4>A=0165=85>@>=56A:0O >1;0ABLEE-;5:B@>M=5@35B8:0 3.09:>=C@ 3. >A:20SOCIAL!>F80;L=K5 CA;C383.!0=:B-5B5@1C@3>4 EDUC_FOOD=@54?@8OB8O >1I5AB25==>3> ?8B0=8O ?@8 CG@5645=8OE >1@07>20=8O2@59A:0O 02B>=><=0O >1;0ABL0109:0;LA:89 :@09STAT20=>2A:0O >1;0ABL@:CBA:0O >1;0ABLAUTO075<=K9 02B>B@0=A?>@B010@48=>-0;:0@A:0O @5A?C1;8:0Years2Years3WATER 5G=>9 B@0=A?>@B0;8=8=3@04A:0O >1;0ABL RIVERPORT  5G=>9 ?>@B0;C6A:0O >1;0ABL0<G0BA:89 :@090@0G052>-'5@:5AA:0O @5A?C1;8:05<5@>2A:0O >1;0ABL8@>2A:0O >1;0ABL>AB@><A:0O >1;0ABL@0A=>40@A:89 :@09@0A=>O@A:89 :@09C@30=A:0O >1;0ABLC@A:0O >1;0ABL5=8=3@04A:0O >1;0ABL8?5F:0O >1;0ABL03040=A:0O >1;0ABL>A:>2A:0O >1;0ABLC@<0=A:0O >1;0ABL5=5F:89 02B>=><=K9 >:@C38653>@>4A:0O >1;0ABL>23>@>4A:0O >1;0ABL>2>A818@A:0O >1;0ABL<A:0O >1;0ABL@5=1C@3A:0O >1;0ABL@;>2A:0O >1;0ABL5=75=A:0O >1;0ABL 5@<A:89 :@09@8<>@A:89 :@09A:>2A:0O >1;0ABL 5A?C1;8:0 4K35O 5A?C1;8:0 ;B09 5A?C1;8:0 0H:>@B>AB0= 5A?C1;8:0 C@OB8O 5A?C1;8:0 035AB0= 5A?C1;8:0 =3CH5B8O 5A?C1;8:0 0;<K:8O 5A?C1;8:0 0@5;8O 5A?C1;8:0 ><8 5A?C1;8:0 0@89 -; 5A?C1;8:0 >@4>28O! 5A?C1;8:0 !525@=0O A5B8O-;0=8O 5A?C1;8:0 "0B0@AB0= 5A?C1;8:0 "K20 5A?C1;8:0 %0:0A8O >AB>2A:0O >1;0ABL O70=A:0O >1;0ABL!0<0@A:0O >1;0ABL!0@0B>2A:0O >1;0ABL!0E0;8=A:0O >1;0ABL!25@4;>2A:0O >1;0ABL!<>;5=A:0O >1;0ABL!B02@>?>;LA:89 :@09"0<1>2A:0O >1;0ABL"25@A:0O >1;0ABL"><A:0O >1;0ABL"C;LA:0O >1;0ABL"N<5=A:0O >1;0ABL#4<C@BA:0O @5A?C1;8:0#;LO=>2A:0O >1;0ABL%010@>2A:89 :@09!%0=BK-0=A89A:89 02B>=><=K9 >:@C3'5;O18=A:0O >1;0ABL'5G5=A:0O @5A?C1;8:0'C20HA:0O @5A?C1;8:0'C:>BA:89 02B>=><=K9 >:@C3/<0;>-5=5F:89 02B>=><=K9 >:@C3/@>A;02A:0O >1;0ABL5@8>4.#B25@645=> ?> <5B>48:5 4>;3>A@>G=>9 8=45:A0F88#B25@645=> ?> <5B>48:5 RAB! ?.?.!?@02>G=8: A5B52KE >@30=870F890 AG5B 8=KE 8AB>G=8:>21.4n0 AG5B ?;0BK 70 B5E=>;>38G5A:>5 ?@8A>548=5=85 : M;5:B@8G5A:8< A5BO< < (70?>;=O5BAO ?> A5B52K</-! >@30=870F8O<)1.3E@82;5G5==K9 :0?8B0;1.2.2!>1AB25==K9 :0?8B0;1.2.1#!B@C:BC@0 8AB>G=8:>2 D8=0=A8@>20=8O1.2>E>4 =0 :0?8B0;1.1.4>72@0B :0?8B0;01.1.3@81K;L1.1.2 <>@B870F8O1.1.1'0 AG5B @53C;8@C5<KE B0@8D>2 (=04102>:)1.1L@>5:B8@C5<K5 @0AE>4K =0 @50;870F8N 8=25AB8F8>==>9 ?@>3@0<<K =0 >BG5B=K9 3>4B>3> ?> AC1J5:BC $$0:B;0=08<5=>20=85 AB0BL8F***  B5E=8G5A:><C ?5@52>>@C65=8N >B=>A8BAO :><?;5:A <5@>?@8OB89 ?> ?>2KH5=8N B5E=8:>-M:>=><8G5A:8E ?>:070B5;59 >A=>2=KE A@54AB2 8;8 8E >B45;L=KE G0AB59 =0 >A=>25 2=54@5=8O ?5@54>2>9 B5E=8:8 8 B5E=>;>388, <5E0=870F88, 02B><0B870F88 ?@>872>4AB20, <>45@=870F88 8 70<5=K <>@0;L=> CAB0@52H53> 8 D878G5A:8 87=>H5==>3> >1>@C4>20=8O.H**  @5:>=AB@C:F88 >B=>A8BAO ?5@5CAB@>9AB2> ACI5AB2CNI8E >1J5:B>2 >A=>2=KE A@54AB2, A2O70==>5 A A>25@H5=AB2>20=85< ?@>872>4AB20 8 ?>2KH5=85< 53> B5E=8:>-M:>=><8G5A:8E ?>:070B5;59 8 >ACI5AB2;O5<>5 ?> ?@>5:BC @5:>=AB@C:F88 >A=>2=KE A@54AB2 2 F5;OE C25;8G5=85 ?@>?CA:=>9 A?>A>1=>AB8 A5B8, C;CGH5=8O :0G5AB20 8 ?>2KH5=8O =0456=>AB8.*  @01>B0< ?> 4>AB@>9:5, 4>>1>@C4>20=8N, <>45@=870F88 >B=>AOBAO @01>BK, 2K720==K5 87<5=5=85< B5E=>;>38G5A:>3> 8;8 A;C651=>3> =07=0G5=8O >1>@C4>20=8O, 740=8O, A>>@C65=8O 8;8 8=>3> >1J5:B0 0<>@B878@C5<KE >A=>2=KE A@54AB2, ?>2KH5==K<8 =03@C7:0<8 8 (8;8) 4@C38<8 =>2K<8 :0G5AB20<8.>1028BLr_1_4>2>5 AB@>8B5;LAB2>****r_1_3"5E=8G5A:>5 ?5@52>>@C65=85***r_1_2 5:>=AB@C:F8O**r_1_1(>AB@>9:0, 4>>1>@C4>20=85, <>45@=870F8O*05@8>4 (3>4 4>;3>A@>G=>3> ?5@8>40 @53C;8@>20=8O).0 AG5B ?;0BK 70 B5E=>;>38G5A:>5 ?@8A>548=5=85(0 AG5B @53C;8@C5<KE B0@8D>2 ?> ?5@540G5B>3>%;0= ?> 22>4C =0 ?5@8>4 @53C;8@>20=8O&2>48<0O <>I=>ABL, ?@>BO65==>ABL A5B595AOF 8 3>4 >:>=G0=8O ?@>5:B05AOF 8 3>4 =0G0;0 ?@>5:B0 @8<5G0=85$878G5A:85 ?0@0<5B@K >1J5:B0!@>:8 2K?>;=5=8O @01>B608<5=>20=85 :><?0=88, 8=25AB8F8>==>3> ?@>5:B0 8 @01>B! ?/?50 AG5B @53C;8@C5<KE 4>;3>A@>G=KE B0@8D>2 ?> ?5@540G5:20@B0;1.02.03.0D. 53C;8@CNI8EAO <5B>4>< 4>E>4=>AB8 8=25AB8@>20==>3> :0?8B0;0 (RAB)add_01 !?@02>G=8:8end_EUVNET.INVadd_03CO1 add_03_blockadd_04CO2 add_04_blockM#B25@645=> ?> <5B>4C 8=45:A0F88 8;8 <5B>4C M:>=><8G5A:8 >1>A=>20==KE @0AE>4>2S. 53C;8@CNI8EAO <5B>4>< 8=45:A0F88 8;8 <5B>4>< M:>=><8G5A:8 >1>A=>20==KE @0AE>4>2F!. 53C;8@CNI8EAO <5B>4>< 8=45:A0F88 =0 >A=>25 4>;3>A@>G=KE ?0@0<5B@>22@>5:B=0O A<5B=0O AB>8<>ABL 2A53>, BKA @C1 157 !<AB>G=8:8 D8=0=A8@>20=8O 2 >BG5B=>< ?5@8>45, BKA @C1 157 !;0=, BKA @C1 157 !$0:B, BKA @C1 157 !1.1.01.2.01.3.01.4.0!:@KBL ?@8<5G0=8O}****  =>2><C AB@>8B5;LAB2C >B=>AOBAO <5@>?@8OB8O ?> AB@>8B5;LAB2C =>2KE >1J5:B>2 >A=>2=KE A@54AB2, =5 A2O70==K5 A *,** 8 ***0B0 A>AB02;5=8O >BG5B0 0AG5B=K5 ;8ABK !:@KBK5 ;8ABK "8BC;L=K9et_unionTEHSHEETAllSheetsInThisWorkbookmodfrmCheckUpdatesmodUpdTemplMain REESTR_MOREESTR_FILTERED REESTR_ORGmodCommandButtonmodProvmodInfomodServiceModulemodInstructionmod_wbmod_Titmod_Comsmod_00 =AB@C:F8O>3 >1=>2;5=8O 0B0/@5<O !>>1I5=85!B0BCAmodfrmMonthYearChoosemod_04mod_03mod_02mod_01!2>4 et_union_vmodfrmDoubleVal 57C;LB0B ?@>25@:8:!AK;:0@8G8=022.12.22.32.4 (B@51C5BAO >1=>2;5=85)N" 0 @01>G5< <5AB5 4>;65= 1KBL CAB0=>2;5= MS Office 2003 SP3, 2007 SP3, 2010, 2013 A ?>;=>9 25@A859 MS Excel " 0:@>AK 2> 2@5<O @01>BK 4>;6=K 1KBL 2:;NG5=K (!) " ;O :>@@5:B=>9 @01>BK >BGQB0 B@51C5BAO 2K1@0BL =87:89 C@>25=L 157>?0A=>AB8 ( <5=N MS Excel 2003: !5@28A | 0:@>A | 57>?0A=>ABL | 2K1@0BL ?C=:B 87:0O 157>?0A=>ABL | OK) ( <5=N MS Excel 2007/2010/2013: 0@0<5B@K Excel | &5=B@ C?@02;5=8O 157>?0A=>ABLN | 0@0<5B@K F5=B@0 C?@02;5=8O 157>?0A=>ABLN | 0@0<5B@K <0:@>A>2 | :;NG8BL 2A5 <0:@>AK | ) " A;8 K @01>B05B5 2 B01;8G=>< ?@>F5AA>@5 MS Excel 2007 8 2KH5, B> <>65B5 8A?>;L7>20BL 4;O @01>BK D>@<0B XLSB (2>8G=0O :=830 Excel). @8 @01>B5 2 D>@<0B5 XLSB 70<5B=> 1KAB@55 ?@>8AE>48B A>E@0=5=85 D09;0, 0 B0:65 C<5=LH05BAO @07<5@ ?> A@02=5=8N A D>@<0B0<8 XLS 8 XLSM " 5 @5:><5=4C5BAO A=8<0BL 70I8BC A ;8AB>2 8 :0:8<-;81> >1@07>< <>48D8F8@>20BL 70I8I05<K5 D>@<C;K 8 @0AGQB=K5 ?>;O, 2 ?@>B82=>< A;CG05, >BGQB 1C45B >B:;>=Q= A8AB5<>9 " @8 A>E@0=5=88 =5 A;54C5B 2K18@0BL D>@<0B XLSX (=830 Excel), B0: :0: 2 C:070==>< D>@<0B5 <0:@>AK, =5>1E>48<K5 4;O @01>BK >BGQB0, 1572>72@0B=> C40;ONBAOA! - ?@54=07=0G5==K< 5 4;O 70?>;=5=8O - A D>@<C;0<8 8 :>=AB0=B0<8 - >1O70B5;L=K5 4;O 70?>;=5=8O - B>;L:> ?> 42>9=><C :;8:CA;8 2 ?@54;>65==>< 0< A?8A:5 =5>1E>48<0O >@30=870F8O,  / >BACBAB2CNB, >1=>28B5 @55AB@K A ?><>ILN :=>?>:  @57C;LB0B5 A8=E@>=870F88 A 107>9 40==KE A?8A>: >@30=870F89 ( /) 1C45B 70<5=Q= 0:BC0;L=K< (<5E0=87< A8=E@>=870F88 B@51C5B ?>4:;NG5=8O : A5B8 =B5@=5B 8 >A=>20= =0 8A?>;L7>20=88 ?@>B>:>;0 HTTPS (TCP ?>@B 443)) A;8 ?>A;5 >1=>2;5=8O 0< =5 C40;>AL =09B8 =5>1E>48<CN >@30=870F8N 2 A?8A:5, >1@0B8B5AL : >B25BAB25==><C 70 ?>445@60=85 @55AB@0 0H53> @538>=0. =D>@<0F8O > @538>=0;L=KE >@30=0E @53C;8@>20=8O 4>ABC?=0 ?> AAK;:5:+http://www.fstrf.ru/regions/region/showlistY" @8 A>E@0=5=88 H01;>=0 >ACI5AB2;O5BAO ?@>25@:0 :>@@5:B=>AB8 40==KE, 2 B>< G8A;5 =0 =0;8G85 7=0G5=89 2 OG59:0E, >1O70B5;L=KE 4;O 70?>;=5=8O " A;8 :0:0O-B> OG59:0 =5 C4>2;5B2>@O5B CA;>28N ?@>25@:8, =0 ;8AB @>25@:0 4>102;O5BAO 38?5@AAK;:0 =0 40==CN OG59:C 8 C:07K205BAO ?@8G8=0 >H81:8 "  :>;>=:5 !B0BCA 4;O :064>3> A>>1I5=8O 2>7<>6=K 2 7=0G5=8O: >H81:0 8 ?@54C?@5645=85 " @8 =0;8G88 A>>1I5=89 A> AB0BCA>< H81:0 H01;>= 1C45B >B:;>=Q= A8AB5<>9 8 =5 1C45B 703@C65= 2 E@0=8;8I5 40==KE, A>>1I5=8O A> AB0BCA>< @54C?@5645=85 =>AOB 8=D>@<0F8>==K9 E0@0:B5@, 8 B0:>9 H01;>= 1C45B ?@8=OB A8AB5<>9 Web-A09B:@8 =0;8G88 ?>4:;NG5=8O : =B5@=5B, <>6=> 02B><0B8G5A:8 ?@>25@OBL =0;8G85 4>ABC?=KE >1=>2;5=89. K15@8B5 A?>A>1 >?>25I5=8O > =0;8G88 >1=>2;5=89 4;O >BGQB0:.?@>25@OBL 4>ABC?=K5 >1=>2;5=8O (@5:><5=4C5BAO)y:=8:>340 =5 ?@>25@OBL =0;8G85 >1=>2;5=89 (=5 @5:><5=4C5BAO)@>25@:0 @>25@:0_backmodfrmDateChoose$: http://eias.ru/?page=show_distrs 8AB@81CB82K:.http://support.eias.ru/index.php?a=add&catid=5>1028BL :><<5=B0@89 3.!520AB>?>;L 5A?C1;8:0 @K<E-mail: modfrmReestrmodfrmMultiAdd4. 87<. (, :<)< - 2K1>@ =5>1E>48<>3> 7=0G5=8O 87 D>@<K ?@8 2K45;5=88 OG59:8#03@C7:0 40==KE 87 H01;>=>2 NET.INV0?:0 A H01;>=0<8$09; 57C;LB0B 703@C7:81.0.1Y>=8B>@8=3 8=25AB8F8>==KE ?@>3@0<< AC1J5:B>2 >AA89A:>9 $545@0F88 ?> A5B52K< >@30=870F8O<0;LO=>2 0:A8< 8:>;0528Gpalyanovmn@fas.gov.ru-(01;>=K 70 1, 2, 3, 4 :20@B0;K ?@54AB02;ONBAO 2 $! >AA88 =0@0AB0NI8< 8B>3><, =5 ?>74=55 45 4=59 ?> 8AB5G5=88 >G5@54=>3> :20@B0;0. (01;>= 70 3>4 ?@54AB02;O5BAO ?> @57C;LB0B0< 8A?>;=5=8O 8=25AB8F8>==KE ?@>3@0<< 70 ?@54K4CI89 :0;5=40@=K9 3>4, =5 ?>74=55 15 0?@5;O 3>40, A;54CNI53> 70 >BG5B=K<. (01;>=K 70?>;=ONBAO 2 >B=>H5=88 2A5E B5@@8B>@80;L=KE A5B52KE >@30=870F89, 2=5 7028A8<>AB8 >B B>3>, :5< CB25@645=K 8=25AB8F8>==K5 ?@>3@0<<K: 8=8AB5@AB2>< M=5@35B8:8 >AA89A:>9 $545@0F88 8;8 C?>;=><>G5==K< >@30=>< 8A?>;=8B5;L=>9 2;0AB8 AC1J5:B0 >AA89A:>9 $545@0F88;8:>2A:89 <C=8F8?0;L=K9 @09>= ;8:>2A:>597605405 ""5?;>2>4>:0=0;" 2102421361 210201001C@=0@A:89 <C=8F8?0;L=K9 @09>= C@=0@A:>597610151 "-=5@3>AB@>9<>=B06" 2104007597 210401001 >@>4 ;0BK@L97704000-# ";0BK@A:85 3>@>4A:85 M;5:B@8G5A:85 A5B8" 2122000259 212201001 >@>4 0=0H97707000, "0=0HA:85 3>@>4A:85 M;5:B@8G5A:85 A5B8" 2123008814 212301001& "><18=0B AB@>8B5;L=KE <0B5@80;>2" 2123006648>@>4 >2>G51>:A0@A:97710000.# "><<C=0;L=K5 A5B8 3>@>40 >2>G51>:A0@A:0" 2124000310 212401001 "-!AB@>9" 2124006023 " 538>=-!5BL" 2130176672 213001001  "!# " 2127311917) "" ?;NA" $8;80; 0@89 -; 8 'C20H88 6315376946 213043001  "%8<?@><" 2124009521*$8;80;  " CA84@>" - "'51>:A0@A:0O -!" 2460066195 212402001>@>4 '51>:A0@K97701000 "07?@>< M=5@3>A1KB" 7705750968 772901001 ">AM=5@3>A1KB" 7736520080 997650001( "1>@>=M=5@3>" D8;80; ">;3>-OBA:89" 7704726225 526343001$ "'51>:A0@A:>5  8<. ..'0?0520" 2130095159& "'C20HA:0O M=5@3>A1KB>20O :><?0=8O" 2128700232 2130500015 "'C20HE;51>?@>4C:B" - D8;80; '51>:A0@A:89 M;520B>@ 2130092180>@L:>2A:0O 48@5:F8O   7708503727 525745022* "'51>:A0@A:89 M;5:B@>0??0@0B=K9 702>4" 2128000600>075==>5 ?@54?@8OB85 'C20HA:>9 5A?C1;8:8 "M@>?>@B '51>:A0@K" 2130080265!8@>2A:89 D8;80;  "-!-0@0=B" 5024173259 434543001% "2B>B@0=A?>@B=>5 ?@54?@8OB85 !2" 2128001682 212801001  "'-!" 21290566845 >A:>2A:>5 3>@>4A:>5 M=5@3>A1KB>2>5 ?@54?@8OB85 7743628060 774301001c ?> AB@>8B5;LAB2C 4>@>3, 8=65=5@=KE A5B59 8 A>>@C65=89 ">@8AA" (D8;80; AD0;LB>15B>==K9 702>4" 2127008364 "!-M=5@3>" 2130148361 ">;3>AB0;L:>=AB@C:F8O" 2130059640 "-!-0@0=B" 502401001 "><<C=0;L=K5 B5E=>;>388" 2128051193  "><=BC@" 2130148330  "C?>;" 2130078570 "03=8B-=5@3>" 7715902899 231001001 "56 538>=">@3&5=B@" 2127323180  "-!" 2130194618* "0F8>=0;L=0O M;5:B@>A5B520O :><?0=8O" 2130122187) "57028A8<0O M=5@3>A1KB>20O :><?0=8O" 2130091901 "8653>@>4-=5@3>"@594" 5261082487 526101001 "@><>38AB8:0" 2130090305* "@><KH;5==0O M=5@3>A1KB>20O :><?0=8O" 1833045576 526001001 " --=5@3>" 7706525041  "  !" 5907024108 " CAM=5@3>@5AC@A" 7706288496 770601001 " CAM=5@3>A1KB" 7706284124 770401001 "! " 2130176577! "!525@=K5 M;5:B@8G5A:85 A5B8" 2130168304 "!5BLA5@28A" 2130178253 "!B@>8B5;L=K5 B5E=>;>388" 2130003905( ""5@@8B>@80;L=K5 M;5:B@8G5A:85 A5B8" 2130178599! ""@0=A=5DBL-;5:B@>A5BL!5@28A" 6311049306 631101001 ""@0=A=5DBLM=5@3>" 7703552167 772301001 "# "5@20O ?;>I04:0" 2130109549  "#AB@0" 2130036788 "'---;5:B@>A5B8" 2116000596 211601001/ "'51>:A0@A:0O =57028A8<0O A5B520O :><?0=8O" 2130195072 "- ">2>A5BL" 2124039614 "- ! !" 5258057402 "-;5:B@>30@0=B" 2130185973 "-;5:B@>A5B8" 2130188879& "-;5:B@>B5E<>=B06;01>@0B>@8O ?;NA" 2130149911 "-=5@3> ;NA" 2130194752 "-=5@3>-:B82" 2130149887 "-=5@3>-"@0=78B" 2130102046 "-=5@3>0:B82" 2130177740 "-=5@3>A5BL" 2130022930 "-=5@3>A>N7" 2130156482 ".6=K5 M;5:B@8G5A:85 A5B8" 2130205059  "/=B0@L" 2130092542> "56@538>=0;L=0O @0A?@545;8B5;L=0O A5B520O :><?0=8O >;38" 6450925977 213002001  "$! -!" 4716016979 772801001'!0@0B>2A:89 D8;80;  "07?@>< M=5@3>" 7736186950 645243001 >@>4 (C<5@;O97713000/# "(C<5@;8=A:85 3>@>4A:85 M;5:B@8G5A:85 A5B8" 2125000641 2125010011@5A8=A:89 <C=8F8?0;L=K9 @09>= 1@5A8=A:>597613151  "-=5@38O" 2105005793 210501001>7;>2A:89 <C=8F8?0;L=K9 @09>==4@552>-070@A:>5976194057# "8;8I=>-:><<C=0;L=>5 E>7O9AB2> >7;>2A:>3> @09>=0" 2107005654 210701001 >7;>2A:>597619101"-" !" 2107903464!><A><>;LA:89 <C=8F8?0;L=K9 @09>= ><A><>;LA:>597621425 "-=5@3>A5@28A" 2108002335 210801001#@0A=>0@<59A:89 <C=8F8?0;L=K9 @09>=@0A=>0@<59A:>597624430# % @0A=>0@<59A:>3> @09>=0 2109000362 210901001>@30CHA:89 <C=8F8?0;L=K9 @09>=>;LH5AC=4K@A:>597632420)# % ">@30CHA:>5" >@30CHA:>3> @09>=0 2112000281 211201001 >@30CHA:>597632435>A:0:0A8=A:>597632440>@5F:89 <C=8F8?0;L=K9 @09>=>@5F:>597635455 ">@5F:03@>?@><M=5@3>" 2113000414 211301001#@<0@A:89 <C=8F8?0;L=K9 @09>= #@<0@A:>597638151" "#@<0@A:85 M;5:B@8G5A:85 A5B8" 2114903377 211401001 '51>:A0@A:89 <C=8F8?0;L=K9 @09>=C@<0=-!N:B5@A:>597644420 ! "!>;=5G=K9 15@53" 2116480110 C35ALA:>597644442 ""5?;>M=5@3>A5BL" 2116499262!8=LO;->:@>2A:>597644456; "'51>:A0@A:89 M;5:B@><5E0=8G5A:89 702>4 - -=5@3>!5@28A" 2116499209 (C<5@;8=A:89 <C=8F8?0;L=K9 @09>= CAA:>-;30H8=A:>597650440# ""5?;> ?;NA" 2118003232 211801001 (C<5@;8=A:>597650460# "-=5@35B8:" 2118001891 "-;5:B@>A5BL" 2118002782/4@8=A:89 <C=8F8?0;L=K9 @09>= /4@8=A:>597653101 "/4@8=03@>?@><AB@>9" 2119900860 211901001/4@8=A:>5  % 2119000178/=B8:>2A:89 <C=8F8?0;L=K9 @09>= /=B8:>2A:>597658445 2121001316 212101001"mod_Load03@C7:0 40==KE REESTR_ORG_EE2/28/2020 12:31:30 PM @>25@:0 4>ABC?=KE >1=>2;5=89... =D>@<0F8O2/28/2020 12:31:32 PM45B 4>ABC?=KE >1=>2;5=89 4;O >BGQB0 A :>4>< NET.INV!=4@552 ;048<8@ 5>=84>28G(8352) 22-69-713.11.4.11.4.2>:070BL ?@8<5G0=8O4/29/2021 1:36:46 PM4/29/2021 1:36:48 PM1/2HB/2/0,4HB/:<] 0A?@545;8B5;L=K9 ?C=:B (A>2<5I5==0O A B@0=AD>@<0B>@=>9 ?>4AB0=F859) B8?0 "-2E1000-10/0,4 015;L 22C-10 3E240 L=2E200 <9!B@>8B5;LAB2> "-3 2 <8:@>@09>=5 "@5<OG52>" 3. '51>:A0@KL!B@>8B5;LAB2> -10 >B "-2 4> "-3 2 <8:@>@09>=5 "@5<OG52>" 3. '51>:A0@K /=20@L 2021 5:01@L 2021 x`Du?q2d 8  '   GJ { $UZCe  {" {$%&&)4*O+]+Q,_,-*; cTNUVvWXsY:VZk[2J\9]/^^-` ` a c c defzghmijrkQlXmmccB~-z4nA_)k:~yw T8 it  dMbP?_*+%&?'?(?)?"~-z?? &U} $ } $ } $  >@d&&& mod_01b(b(//ggD T8 Xv  dMbP?_*+%&?'?(?)?"??&U} $ >@d   mod_Loadb(b(//ggD T8  lg|+9  dMbP?_*+%&ffffff?'ffffff?(?)?MHP LaserJet Professional M11324 4XSDDMHP LaserJet Professional M1132  0Z(d/4" d333333?333333?&43cU} IR} R} IR} IR} mR} R} mR} mS} $ R} $ T} $ Rl@J@h@x@@@,`,`,` ` ` ` ` ,`, , ,`;``, ```````, , , ,`, Q TPE / >4 H01;>=0: @#B@+>4 H01;>=0: NET.INV2UUUUUUUUUUUUUUVUU9 #5@A8O @# B@ 5@A8O 1.2.14WWWWVVVVVVVVVVVUUUVVVVX2VVVVVVVVVVVVVVVVVVVVVVYZY>=8B>@8=3 8=25AB8F8>==KE ?@>3@0<< AC1J5:B>2 >AA89A:>9 $545@0F88 ?> A5B52K< >@30=870F8O<6Y YY8Z[\]]]]]]]]]]]]]]]]]]]]]^Z_`] Q.^8Z_`]^8Z_`]^8 Z_`]^8 Z_`]^8 Z_`]^8 Z_`]a8 Z_`]^8Z_`]^8Z_`]^8Z_`]^8Z_`]^8Z_`b^8Z_`bcccccccccccccccccccc^Z_`[ dR eSfffffff] gR eThhhhhhhh^Z_`[ iR jUfffffff] kR jVhhhhhhhh^Z_`[] ln]]]]]]]] ]]]]]]]]^Z_`[,llllllll]]]]]]]]]]^8Z_`[]]]]]]]]]]]]]]]]]]]]^8Z_`[]]]]]]]]]]]]]]]]]]]]^8Z_`[]]]]]]]]]]]]]]]]]]]]^8Z_`[]]]]]]]]]]]]]]]]]]]]^8Z_`[]]]]]]]]]]]]]]]]]]]]^8Z_`[]]]]]]]]]]]]]]]]]]]]^8Z_`[]]]]]]]]]]]]]]]]]]]]^8Z_`[]]]]]]]]]]]]]]]]]]]]^DZ l@,<R<<<<<<<<<<<<<XB<<<<<<< `!`"`#`$`%`&,`'`(`), *,`+`,`-`.`/`0`1, 2, 3, 4, 5,`6, 7Y`8`9,`:,`;,`<,`=+`>, ?, 8 Z_`bcccccccccccccccccccc^8!Z_`bcccccccccccccccccccc^"Z_`[ "W."^8#Z_`[^8$Z_`[^8%Z_`[^8&Z_`[^'Z_`[ 'X.'^8(Z_`[^8)Z_`[^8*Z_`[^8+Z_`b^8,Z_`b^-Z_`[ -Y.-^8.Z_`[^8/Z_`[^80Z_`[^81Z_`[^82Z_`[^83Z_`[^84Z_`[^85Z_`[^86Z_`[^87Z_`b^88Z_`b^9Z_`[ 9Z 9 9e(9^:Z_`[ :d : :c(:^8;Z_`[mnopnnnnnnnnnnnnnnnn^<Z_`[<^=Z_`[=^8>Z_`[]]]]]]]]]]]]]]]]]]]]^8?Z_`[]]]]]]]]]]]]]]]]]]]]^DZ l<<R<<<<R<<<<<R<<<<<<<<<<<hh<<@, A,`B, CT`D`E `FI`G`H`I, JA `K `L,`M,`N,`O, P, Q, R, S, T, U, V, W, X,`Y, Z`[`\@],@^,@_,@8@Z_`[]]]]]]]]]]]]]]]]]]]]^8AZ_`[]]]]]]]]]]]]]]]]]]]]^8BZ_`[]]]]]]]]]]]]]]]]]]]]^8CZ_`bcccccccccccccccccccc^8DZ_`bcccccccccccccccccccc^8EZ_`[qqqqqqqqqqqqqqqqqqqq^8FZ_`[qqqqqqqqqqqqqqqqqqqq^8GZ_`[qqqqqqqqqqqqqqqqqqqq^8HZ_`[qqqqqqqqqqqqqqqqqqqq^8IZ_`[rrrrrrrrrrrrrrrrrrrr^8JZ_`[rrrrrrrrrrrrrrrrrrrr^KZ_`[ Kb K Ku(K^LZ_`[ Lj L Lv(L^8MZ_`[^NZ_`[ Nw.N^8OZ_`[^8PZ_`[^8QZ_`[^8RZ_`[^8SZ_`[^8TZ_`[^8UZ_`[^8VZ_`[]]]]]]]]]]]]]]]]]]]]^8WZ_`[]]]]]]]]]]]]]]]]]]]]^8XZ_`[]]]]]]]]]]]]]]]]]]]]^8YZ_`[]]]]]]]]]]]]]]]]]]]]^8ZZ_`bcccccccccccccccccccc^8[Z_`bcccccccccccccccccccc^\Z_`[ \[.\^8]Z_`[]]]ssssssstttttt]]]]^^Z_`[u ^\,^t]]]]^ ^T]8_Z_`[]]]ssssssstttttt]]]]^D l<<<<<<<<<<<hh<R<<<<<<<<<<<<<R<``,a,b,c,d,e,f,g,h,iX@j@k@`Z_`[] `^,`^8aZ_`[]]]]]]]]]]]]]]]]]]]]^8bZ_`[]]]]]]]]]]]]]]]]]]]]^8cZ_`[]]]]]]]]]]]]]]]]]]]]^8dZ_`[]]]]]]]]]]]]]]]]]]]]^8eZ_`[]]]]]]]]]]]]]]]]]]]]^8fZ_`[]]]]]]]]]]]]]]]]]]]]^8gZ_`[]]]]]]]]]]]]]]]]]]]]^8hZ_`[]]]]]]]]]]]]]]]]]]]]^8iZ_`[]]]]]]]]]]]]]]]]]]]]^8jZ_`[]]]]]]]]]]]]]]]]]]]]^8kZvwxyyyyyyyyyyyyyyyyyyyyzR<<<<<<<<<< v y U,z=(   P  z $жжp? InstrBlock_8"PK![Content_Types].xmlJ0*miG]`Hm6 Xwt?. g#Wi3E).+7 >ON ޑ1ˋz "+R RhB.} /<^ITխ%rHK4uK~I0xM e`|X}đ I`߽N4aG2$RKIZ)4(M9`ctB{m:f@`3n|O,ܗr޾jxR0T ,0@}WBLǬ5vPK!߱2drs/shapexml.xmlUYn0/;O, "$]eHwh >Rg(Yqm@9yofg\%7Vhi@ WNd@uL%LjCᖞG_3b*δ!Bl4s56x.kM,ͬlװ,v+=RK7!eS)5:/c-YY/7i6U ]{Nmq`NQ^_G>;ڲ!ق,6:uf;|"Emnz jHldb.8gBdL@3l:"rٴ늮_=ntA'-֩ɏ4%j9 ]J6!mڃnJbް1xtzn7ga{Ѥ {J{-Er%Ef6HCLjﲃV TǂUH]A ~¸ߪr!R!)ۄrz2DŽ,ߡdRUB"Gq'Ĝ/h_/6LOwTjH/deXRi DaC e8%/=o>:Cɢ0b.wɏ%+V\"r w9g^ `f D8{fK\TבsJ7Jr}WbH@`OM2'q,H,9!4@LE/ۯ۟_o'x}`5*g]Id+PK!+drs/downrev.xmll_O0M5 J1 }wlamI[.{t2mt*tF@ÁI*Z(YZvaMX$XšQc) a;"樥-2 4u)\QAea\n!t #7flwb%E3 'xQ~T1ne//WDNbД3ֱVԮK|"sV3gkxXj#E,_p`[xMEWNPK-![Content_Types].xmlPK-!1_a ._rels/.relsPK-!߱2)drs/shapexml.xmlPK-!+drs/downrev.xmlPKi k]*P"`' #+ " <1=>2;5=85<T  Q  z $жж? InstrBlock_7"!PK![Content_Types].xmlJ0*miG]`Hm6 Xwt?. g#Wi3E).+7 >ON ޑ1ˋz "+R RhB.} /<^ITխ%rHK4uK~I0xM e`|X}đ I`߽N4aG2$RKIZ)4(M9`ctB{m:f@`3n|O,ܗr޾jxR0T ,0@}WBLǬ5vPK!adrs/shapexml.xmlUn0 ;q:i:Ea9-'Beɓݶ; }OQ`+Vk ݴŰc4DmnM2IFXUD%\:ѳuJc*aR+)t$16\(ADZ1s@j1Kӯ%y&k hln8KsWjhvc˥.CDmQֳZR<ֲ[߬!*|.0M\+1zܭR;)Z0lu#>\ϨBԵvXлP6'+e:#u|+E|N':hU5:ɏL`tdH"ڤD Zxo۴67o <_C[= S}ml;Fe*~EDj6tڣ&[fӔ@F)B0h!2ցA,Z0 Mߊfa}},.fWR.nImkW)~Mq 7|9UV̾+сPK!Қ"+drs/downrev.xmlTPN1}71MZV@Dh}@^veٯw@ ֙ss:4$.7CÀH8)fv3б($Qlvz%O h72.ʤc*KUhS[CsUҀU"x!|dT&og ժj9+T8j@ll{[D8ڽn$O+ἴb(3$ Sc.W}`$(b1Lyd#I8C[N+*1en +pPK-![Content_Types].xmlPK-!1_a ._rels/.relsPK-!a)drs/shapexml.xmlPK-!Қ"+drs/downrev.xmlPKfi ]*Q"` #+ "&<M>=AC;LB0F8O ?> <5B>4>;>388 70?>;=5=8O<T& R  zP $жж? InstrBlock_5"PK![Content_Types].xmlJ0*miG]`Hm6 Xwt?. g#Wi3E).+7 >ON ޑ1ˋz "+R RhB.} /<^ITխ%rHK4uK~I0xM e`|X}đ I`߽N4aG2$RKIZ)4(M9`ctB{m:f@`3n|O,ܗr޾jxR0T ,0@}WBLǬ5vPK!~_drs/shapexml.xmlUn1#m6i !AA-=#gכXڋqGg*!DjaF۴ B"33|sIXUL%\%:jӳG[(IxL{{tJFpl19Wtk5x.mMlͰ6繬5],#à=tKyBTS6ZN2`h٫. X<ϲ^kQ͵-vwF3|*{UJנ絠V{WX 9Ke$:}(u2K)q|PVQⅩ`O_"Ҙ6)Q,Vz?z|OkV}f auԐێ rhqnch0{S@&N{TBtHQD-J&"c](*IP۝$`lZκ- cc7EQL OOMZU ỢH }iȔɘE`L6 Ff1k)mm!"EBNT[昐a %(ɝ.000?sxdRCz%3Êf8%!IQb0Z3L ##?-un!}M`!29+DBFH<;}ث^!0𓭓3mm៓*22b s@S1a,\c.0bL2'qg,O/H,P?({|_ooyyY^?'x_Z//?jVʟNw0 _]p~ @ᰊ=d@څZzPK!)drs/downrev.xmll]O0M1N""!$cƻڵl1=,.xsޏtVM*C,V;˻1͹vV28j';ڍqGĆ gPxPD! =w5GG,7dD /-P\R?[P/"v$K:X/O@̛e}3:C[3Qӗ/ QzȇH "znE==>-B5E=8G5A:85 :>=AC;LB0F88<T'< S  z $жж? InstrBlock_4"PK![Content_Types].xmlJ0*miG]`Hm6 Xwt?. g#Wi3E).+7 >ON ޑ1ˋz "+R RhB.} /<^ITխ%rHK4uK~I0xM e`|X}đ I`߽N4aG2$RKIZ)4(M9`ctB{m:f@`3n|O,ܗr޾jxR0T ,0@}WBLǬ5vPK!q"b=drs/shapexml.xmlUn0 ;q4i:Ea9-'Beɓ^vgHh,lɏ'j`+6Ic^ߎ8:1ԃ\nq<"3Aij ]hEȦZ%C6Ш͌j :UE+ 'o?1B2H?t13jEeYQ~P2yvAcͤirZ/dPߋ:J ~y Yy_Uhމ]r!&vxl2-g^L6Uqe2.grd|lʌa~zdH]W(j39Ha@ZL~H]Y7bw?`RD #oifM!Qv&ڨw6ffi@GV Z4[;Q]B [a6Q̭H|H*=]1JRQgceTO#Wq+PL7 &1bR[B.L<{D7: kRk,E%ɉ錾Uίǧ?G (Yp6P})ya28ee5֮+#89PK-![Content_Types].xmlPK-!1_a ._rels/.relsPK-!q"b=)drs/shapexml.xmlPK-!M.drs/downrev.xmlPKadf]*S"`i& #+< "<@>25@:0 >BGQB0<T< T  z $жж? InstrBlock_3"PK![Content_Types].xmlJ0*miG]`Hm6 Xwt?. g#Wi3E).+7 >ON ޑ1ˋz "+R RhB.} /<^ITխ%rHK4uK~I0xM e`|X}đ I`߽N4aG2$RKIZ)4(M9`ctB{m:f@`3n|O,ܗr޾jxR0T ,0@}WBLǬ5vPK!y">drs/shapexml.xmlUn0 ;q~u4][[<(%ORvZ${P`aHIۡY 8IO"dƍZzPUcF!=?hSbS1Z.'o2!B.B:v.V*6CqD9ؚQ%6lSYAb3YlǜBC{޷_p}R6ZN/<ҲW= *\zL^k:B :FQOm,7{_16wbVA襠P6#)eFux*u4HM(q|PQʔ.fW8-JKޏwN+3ũ^#De+z2 񾁊"M(s t ijt_HN֪I0G DƺPT>h:50Ѫ7κ-3c{EQH O>ZUچ]RBQkFÁ4ddH|a0T#vPǝ9~ qCHCW Nže YdRB$GrK9V1^Ol^Ԑ^$EFܰ,˔NÆApR;J[^3|)+8tifh '-%X,&R&GpH'נ_{/2vu%L -"{RW^GFL`(}W 0@VaĎdN(OXnXgQDE$h]/??߫[?Wz?h;XkhA/7)rg1 (ٹ(KYPK!.drs/downrev.xmlDPN0|GE:)R*DK?$Ρvd4׳ ;;3U#KR cs#Ps28~o@*VYXX7KIE}p)AeA\F܎t%m$wؚƆ\tyS*ypC+񜉨8J)drs/shapexml.xmlPK-!.drs/downrev.xmlPK_a]*T"`- #+< "<% 01>B0 A @55AB@0<8<T< U  z $жж? InstrBlock_2"PK![Content_Types].xmlJ0*miG]`Hm6 Xwt?. g#Wi3E).+7 >ON ޑ1ˋz "+R RhB.} /<^ITխ%rHK4uK~I0xM e`|X}đ I`߽N4aG2$RKIZ)4(M9`ctB{m:f@`3n|O,ܗr޾jxR0T ,0@}WBLǬ5vPK!íAdrs/shapexml.xmlUn1W;X',,!MUM+ _o=C/VZJayxR*U {fv曙y*ɔ+ iu?HB Cz{sע:b&!]pKϟca*iCt\֩Tl4): 6)s5Jl R ff؎8wvo7}.ecz6l`8^%FyezTAT.`q$`-Ɲ= 9WB46Zʿnb9-kVv^{,*H"CJYg&vHRDcJ;)8ei:4%!"!%G;x[CDρ ulز -NPVGL y@Gsp!v7:lG5OL+$N' TkvpؠdU#2ցAٮAAx謃@23ֽzgPDuXM-E|&Ef8KCL,o]RBn@RzM>!"EVMH*-sLb % 9;^`tbtH")2Jfe!&pJ$6 BQb5bCg(dF G b /B]ezb)erw)]yr*B*c7XxZdOnYْz!?'!Upmdf~EɀYdE-nl@lI"nE醍t zqEdU@Hu/w=_~,G~]~3oO9 TvV?-H'W9%[e)+PK!(Mz)drs/downrev.xmllN0 xHܱvC,&6QJBMセ>߱Of^5V9G>0S*]p|-o: ja'-ˋ2DvkW026JlZJ%[iQQi /3bK&)QiPV>2?XfRj?_j5__`N,6%vP$8=gOoSeN )B,tZa ;J7&}"m5{EnP1[-yn*2ɩヷ' w>*QqPK-![Content_Types].xmlPK-!1_a ._rels/.relsPK-!íA)drs/shapexml.xmlPK-!(Mz)drs/downrev.xmlPK]_]*U"`$ #+< "<)#A;>2=K5 >1>7=0G5=8O<T< V A"??&*tick_circle_3887PAGE_LAST_INACTIVEtick_circle_3887.png[E3E]&V"`< W A"??(*tick_circle_3887PAGE_FIRST_INACTIVEtick_circle_3887.png)E3E]&W"`< X A"??&*tick_circle_3887PAGE_BACK_INACTIVEtick_circle_3887.pngEE]&X"`< Y A"??&*tick_circle_3887PAGE_NEXT_INACTIVEtick_circle_3887.pngE:E]&Y"`< Z  zP ? cmdGetUpdate"PK![Content_Types].xmlJ0*miG]`Hm6 Xwt?. g#Wi3E).+7 >ON ޑ1ˋz "+R RhB.} /<^ITխ%rHK4uK~I0xM e`|X}đ I`߽N4aG2$RKIZ)4(M9`ctB{m:f@`3n|O,ܗr޾jxR0T ,0@}WBLǬ5vPK!/''drs/shapexml.xmlUKn1 q&MPM|=k$gU7Ԍ;H6qa`,H>QG\N~ęЉIl˙SPF/GoN2t]1{_k5EnB636[;ܜCRYĨAFh2N"IZ3ZdP7ރ. zdPY> \;/EGу]rH&wE ^|>Q2p+'1*g7ŕp_̮,)[wf h rRcXs2=;0S\6v!?Qԛj|WH26A2HV"hDzjFFx?l2* [$>:Oz :bLϤRΎ'ʲEs0S]y{F$զ-m=!^Xd.">QNC!3HQr*kTQjSI?ݻfmˆ\D܄gCpʘ[b"xeK$&j =m~~~~NهS%*ifCixڔڟ$y(Yɔ?PK!(drs/downrev.xmlT[O1M͘b[DnRF"hvmI[¯w@֙sӞFQWVΗp`2Ҧ9M@|&5Vy ڍzr!"UR/ oؕ2eipt9M`h3IT XIr⺖e&Ο9; AgN,NnG!)>M ˕\,uQ!vº9sVg7zXZڊC YyayVݼǃٯcmC)ͺIsSp7PK-![Content_Types].xmlPK-!1_a ._rels/.relsPK-!/'')drs/shapexml.xmlPK-!(~drs/downrev.xmlPKb td]*Z"`! #-< "<1=>28BL<T<' ' [   ?*, cmdShowHideUpdateLog!:@KBL ;>3 >1=>2;5=8O"!PK![Content_Types].xmlJ0*miG]`Hm6 Xwt?. g#Wi3E).+7 >ON ޑ1ˋz "+R RhB.} /<^ITխ%rHK4uK~I0xM e`|X}đ I`߽N4aG2$RKIZ)4(M9`ctB{m:f@`3n|O,ܗr޾jxR0T ,0@}WBLǬ5vPK!U)c.drs/shapexml.xmlUn7;Zɖl ^S'\'s1j s-Iyo&($haF @5|3qxhV(6Icދ8:1ԣ߼:xęSPFυ?<8:ɍeB>*b{_[-gJњ[ǭR St^V'z-WZ˅Oj ~j΄R!Dʬ)j)1jp|" $PxeN}]HLG䥒QouDoVQ2ڶ;v{eDWkb^vގK:7g27e ^\gJ&y1Jۘ7ԓm^N^Z&S>g }8KKէśo_sogQJoyk1?{lf1@ߕ&u [RԈלGbs"E5.Dn3kGӟL؛jbWH2:](w]}K=},Q }AJSavQ̭H|H&S!BGT{LY6~Mvnb*k061޳T wBzaȄ'J?4t˃T%S1&8;S>CG^#Iؿ%SK,9Z(c~)/ 77Fr6.ȋp[0/\]z JC[TBS]ѽFMLj  Z˳lH^ 82zԬIu883QW1^j AO 74#`HܽL A'keP.I&Cmx>?4H7j PK! )drs/downrev.xmlT[O1M1He)MD"hvݍvӖe"fwiΗ0"iJ=\@7 tr~6nR6"41~!#B(ckip[y)9As]$D{ u#^?|!cyE^hgن㲔*IkD~3Ӆ(~2[rc1.`jfDaݮΝՑC -lE{n<ROio~@ J'<{'PK-![Content_Types].xmlPK-!1_a ._rels/.relsPK-!U)c.)drs/shapexml.xmlPK-! )drs/downrev.xmlPK |bkd]*["`8 #3< $</>:070BL ;>3 >1=>2;5=8O<T< \ ^A ?? B5ABPict 9B5AB]&\"`< ] ^A ?? B5ABPict 9B5AB]&]"`< ^ ^A ?? B5ABPict 9B5AB]&^"`< _  z0  $жж? InstrBlock_1" PK![Content_Types].xmlJ0*miG]`Hm6 Xwt?. g#Wi3E).+7 >ON ޑ1ˋz "+R RhB.} /<^ITխ%rHK4uK~I0xM e`|X}đ I`߽N4aG2$RKIZ)4(M9`ctB{m:f@`3n|O,ܗr޾jxR0T ,0@}WBLǬ5vPK!_Gdrs/shapexml.xmlUn1#m6m~M)B9Ī^l !OH*$x1co Yic|3󍽻7%pcV1oFpTaL//6v(IxLҽ'tJFpl19Wtk5x.mMlͰ6繬mEQf YjGà=MuKBT}S6Z2`h٫. XdY/Zq5FO{ l/uvBϠ΃1"ق,1:/uf8hU_gN uӪ4jr^ B۔(C##uvq=cpźx aleL(#|@#l:Fȡi^"N5;Q2 YF խz'j7)j7BUIlAvy謋@в0=zmPDuXe-Ez$Ef8KC&L(§-RLciBWR[<!"EӝMHg*-sLȰIU YHNsp|=pzxeRCz%SÊ7cf8% iaT;Jlfp_Wp %ˆx'%_X,&N)CD$dHrʳ3Pٷ8Y_He% @%7wd^qL\Axqg~EɀYB֮,AI"n^%邍t8"* AtKy}Y~GyS^[^~8O:Tqh \C(Y1+Y Q7PK!H-drs/downrev.xmlTP]O0}7?47bBT$F}]:~)A{Gtʊ4B+"TBe o1Jx`fٔOSkl\FD g;WO(q.$] XGˊ^{ސJ^(|!絸E\n$Kv_K-=./'Zw"3n cF# ɚ[' ,u;\Ź6$]_ [tH[ z/ijí+A.G^a򟎞BESN}PK-![Content_Types].xmlPK-!1_a ._rels/.relsPK-!_G)drs/shapexml.xmlPK-!H-drs/downrev.xmlPK]]*_"`٨ #+< "<-"5E=8G5A:85 B@51>20=8O<T< ` jA ??  icon1InstrImg_1icon1vv\]6`"`Y; #+< a jA ??  icon2InstrImg_2icon2T]@_M]6a"` #+< b jA ??  icon3InstrImg_3icon3T_a]6b"`ْ #+< c jA  ??  icon4InstrImg_4icon4Tb3dM]6c"`Y #+< d jA  ??  icon5InstrImg_5icon5Tdf]6d"`y #+< e jA  ??  icon7InstrImg_7icon7g3&i ]6e"`Y #+< f ^A ?? B5ABPict 9B5AB]&f"`< g ^A ?? B5ABPict 9B5AB  ]&g"`< h rA  ?? icon8InstrImg_8icon8.png"i3l ]6h"`) #+< i A ??$ check_yeschkGetUpdatesTruecheck_yes.jpgk^@|_ ]6i"` #,< j A??$ check_nochkNoUpdatesFalsecheck_no.pngk`M|a]6j"` #,< k A ??" check_yeschkNoUpdatesTruecheck_yes.jpgk`M|a]6k"` #,< l A??& check_nochkGetUpdatesFalsecheck_no.pngk^@|_ ]6l"`靦 #,< m A??  icon11cmdGetUpdateImgicon11.pngbtd]6m"`I #-< n A??0 icon13cmdShowHideUpdateLogImgicon13.png b kd]6n"`隦 #3< o l1@~?cmdAct_1"A;PK![Content_Types].xmlJ0*miG]`Hm6 Xwt?. g#Wi3E).+7 >ON ޑ1ˋz "+R RhB.} /<^ITխ%rHK4uK~I0xM e`|X}đ I`߽N4aG2$RKIZ)4(M9`ctB{m:f@`3n|O,ܗr޾jxR0T ,0@}WBLǬ5vPK!$N-drs/shapexml.xmlUK6 xa+ +$&炖(XTICJ-3MRͮ2!|sbJ pUJeA߽RJcbR+^ζə*mP66uyز-' 6-s5ˠ2l[a8 lg8lù%tuR{QmtۯJ-gY>?ū( ã ʳI<?9}41lLٍt:`veBºwFokCDU8I)X hmu^"#z p*Z#[&ԗ SK~n QE `_{Euޫmmڧ&jFP :IYSSDbr CRBT(%P {# $b_޼y:% B*ֈ[Boz?dN(vY ޲F@ l_~ydB ڡD©Rp官cHxg}PK!. Xz&drs/downrev.xml|PN0}7k⛴`)H!hbAM@n[Xۥ-l^|{ι=w:tMрQ&ye6Ow䲶F Q뫩5+uX-A'R@B3gl ݖNhk3R-+J٨Re^ H6$j|6?P}>bBt{ AuB>yy=p&v\@< HϷA9f&+; g5qE)}EV^Q<F#Г8qSd\h|ԫ w PK-![Content_Types].xmlPK-!1_a ._rels/.relsPK-!$N-)drs/shapexml.xmlPK-!. Xz&drs/downrev.xmlPK0 ]o"`< " <:BC0;L=0<T < p rA??icon15cmdAct_2icon15.png]&p"`< q pPePP? cmdNoAct_1"PK![Content_Types].xmlJ0*miG]`Hm6 Xwt?. g#Wi3E).+7 >ON ޑ1ˋz "+R RhB.} /<^ITխ%rHK4uK~I0xM e`|X}đ I`߽N4aG2$RKIZ)4(M9`ctB{m:f@`3n|O,ܗr޾jxR0T ,0@}WBLǬ5vPK!bMdrs/shapexml.xmlU]n0 ~;zoIu][[Pl9*Ki?v(0`hdC<8)ɏdZtk3DBbzu9إ:R&1sKϟRc*ɵ!`Bb;W&9/%Wʹ)aS0^ N`KYjsQ}oM!EEJG{b,n{ҡȫ.r)C}5@/x˿9roLdx%ډJ/nnDҝ-IcJYgƉ"m&EzU2ǯHn(q|P71m&iL iL۔(V@ȉ>H%HSŧ&nBPc=[ɍm͞P aԈ97j4a ot ijb]H2FaYcVƜ$lEIl⁀,u\ 8(vt᫢HBkFCiȄɘp]ARLcM#S4qC(b>JDŽאt 85wa(Sf;O&5N()VԾ3)Н] w1~Ci=63K#F9ڷd݅K.pr]+ҐE&G0!$%7B_g砲{S+A9j <o_K(Ui Jءjngab|_ICX9i FC̺JnS[W%Q* ݐ5>嘮fJdo3Ie"M=~gR j/{Z1y7w*IT:ؤu}lŜJR[WoY1Hłp48^܍ONE nG$:PK-![Content_Types].xmlPK-!1_a ._rels/.relsPK-!bM)drs/shapexml.xmlPK-!lX&drs/downrev.xmlPK ]*q"`I=̫ #-< "<)"@51C5BAO >1=>2;5=85<U< r vA??icon16cmdNoAct_2icon16.png! ]&r"`<  s rp ef?cmdNoInet_1"]WPK![Content_Types].xmlJ0*miG]`Hm6 Xwt?. g#Wi3E).+7 >ON ޑ1ˋz "+R RhB.} /<^ITխ%rHK4uK~I0xM e`|X}đ I`߽N4aG2$RKIZ)4(M9`ctB{m:f@`3n|O,ܗr޾jxR0T ,0@}WBLǬ5vPK!ssdrs/shapexml.xmlV_4G;X~&ͦ٦tۥet{iu`߀H'߈)!vgqNlInBbJ*u%Բ_cJcbR+^N0U!B 0 rD-WaH\֦afUm@y#$ȶʮ8wAB^7XMJ-i> 񼮧IA,/6zA|~W-AGy<68s2 ٖ448uRk]usվ0{.o^"&xRX*R?S}>d%cit8*۞-lb ]^}AaBzbjɟm[{WwCbv{MP0:]Clw=NH @I,#! 7DlX)v^:(.Mh)1`r10Y|6˲}t76z cJ!"IC7kmDȦI%`O< xCDbr TRbP_%/00|%/Kp{2Upk5A<yc-`^GI"n򚕠[qҾWBPv~ӽ~~~ O@zopL=J_ORpΙc8=PK!&drs/downrev.xmlTOO1&~fL l$t¶%me>=7ߛyOU4AZ9ﯷ\2Z2K͘RSܭ|NDgPxQD!w2c(mNSk4W `@/5N(VRlVOS |0,kg ^6_ C;7v)?= leKCbd T{f"ԈjOԋ,sҷ$V* z"+.Za`zNPK-![Content_Types].xmlPK-!1_a ._rels/.relsPK-!ss)drs/shapexml.xmlPK-!&drs/downrev.xmlPKL]s"`< "<%H81:0 ?>4:;NG5=8O<T<" " t fx]?cmdNoInet_2"rlPK![Content_Types].xmlJ0*miG]`Hm6 Xwt?. g#Wi3E).+7 >ON ޑ1ˋz "+R RhB.} /<^ITխ%rHK4uK~I0xM e`|X}đ I`߽N4aG2$RKIZ)4(M9`ctB{m:f@`3n|O,ܗr޾jxR0T ,0@}WBLǬ5vPK!O? drs/shapexml.xmlVn6}/`He"/_b}.hPJҷPc#29C̡?jIvXUN㻈 ] ߗ*Ԋ-4Ci26L( , m5w 65s54lk( mc8+s7o5tmq) ^ 79PڝӅ}A[ŗa::yI܊qy>W@__:}vdߚ ن5Hm <{T,FKmQ*Sf`Q2GXk21)@Qelur}sL <:\\;B[ SV3JՕB?lcFq4^$Hz"H<.gI.`ޟf[d-/'o[ &+wW:0 )B^j)J47fICvLt0Хcu^ t97h$d(8q2_^(?)}Nǃޠws"7qCs::bNBZ ٮ/Jῖ*%%#$Z/p@{|s_QI R4 krj2)R? Sˍi{9ul#ZO,=<7 J5ln+^Rb`6}/y T/d3 PKmm;|Yh8&0T FQ+WpYZW s92'qdžWK3&ʈ c @ $MĘO M:u\9s gay%ZLPK!u.drs/downrev.xmllQO0M5H'8Πhl-[\ۥ-l@1{{:iUEVºhЙK`0{?8u+pp 7Nj! 8z@ ZhIc(7WA*^j|൸+D=]*G<}&>靱ӓvt ċh,'_gǜA7øD>S $Vƺ`0TK|i"4M2S!6z,0 {F}.za=ᓓ_PK-![Content_Types].xmlPK-!1_a ._rels/.relsPK-!O? )drs/shapexml.xmlPK-!u.drs/downrev.xmlPKaU]t"`< <!<V< u A"??* tick_circle_3887PAGE_LASTtick_circle_3887.png|E,E]6u"`귽 #6< v A"??* tick_circle_3887PAGE_FIRSTtick_circle_3887.pngJE,E]6v"`Aܷ #5< w A"??* tick_circle_3887PAGE_BACKtick_circle_3887.png!E|E]6w"`跽 #4< x A"??* tick_circle_3887PAGE_NEXTtick_circle_3887.pngEE]6x"`!ҷ #7<  " y c xi(kLY(kLY>YY??"PAGE_NUMBER_AREA"+%PK![Content_Types].xmlJ0*miG]`Hm6 Xwt?. g#Wi3E).+7 >ON ޑ1ˋz "+R RhB.} /<^ITխ%rHK4uK~I0xM e`|X}đ I`߽N4aG2$RKIZ)4(M9`ctB{m:f@`3n|O,ܗr޾jxR0T ,0@}WBLǬ5vPK!Yqdrs/shapexml.xmlUo0~GI] !Z&;c_ϝfJR|՛}VX'.uJХR %%3͙2Z }3{j6 (h};MW֢ai؆yu-ہF%YZ ~gR"*k*eA:܀窚 &iG( fI(DxQL?91˲z/;Yv9Js?>:t-iXiMA)bԏv :DȺv|q3I/k?u`aRCs]3s ɭR&9됆)lဗmt_\HhTMGM8Ghl %%(2))A! #i9ACfB>ʶG/kqwJF[`4;Dr o:$J9^]+KuAoïs޻AJ>K Y aC(~tԦ*@g~CB B+P'IBp FL}QQT -3/;%BvJKh^֬rf1d29Cؽϰ^%Dx{;?çR.l)Y0+(Q4l<Ƞ 6P$-%u m(s~J=C{%60W`ME긨p~z|F:<4ThW ;Y"wSP cGP1, Ԙ0,&gޕT3/5VTKLɕ\ Q̦ 1ĎiJ 1'J~AɞPK!ǵI%drs/downrev.xml\]O0M1NR@#/֭kO!!wyyxکmu $tfJ >?:тN8N|V/vKDqfˤPL#t*CjK[qUcJHt y#RdbI|=^z=g=ᘾvSr8ʽ V;/,`0 Va<>IL ?@8 22>45shpHelp><>IL ?@8 22>45B2]&z"`P>@d^^9999::::NU(,-8``MMKKKKLLLLMM\\"&''7''yK ,http://www.fstrf.ru/regions/region/showlistyK phttp://www.fstrf.ru/regions/region/showlistyX;H,]ą'c''yK ,http://www.fstrf.ru/regions/region/showlistyK phttp://www.fstrf.ru/regions/region/showlistyX;H,]ą'cb''http://www.fstrf.ru/regions/region/showlist::yK !http://eias.ru/?page=show_distrsyK Zhttp://eias.ru/?page=show_distrsyX;H,]ą'cL::http://eias.ru/?page=show_distrs 99yK /http://support.eias.ru/index.php?a=add&catid=5yK vhttp://support.eias.ru/index.php?a=add&catid=5yX;H,]ą'ch99http://support.eias.ru/index.php?a=add&catid=5LLyK vasilyev@fas.gov.ruyK mailto:vasilyev@fas.gov.ru?subject=>=AC;LB0F8O%20?>%20@01>B5%20A%20>BGQB><yX;H,]ą'c2LLvasilyev@fas.gov.ruLLyK palyanovmn@fas.gov.ruyK mailto:palyanovmn@fas.gov.ru?subject=>=AC;LB0F8O%20?>%20@01>B5%20A%20>BGQB><yX;H,]ą'c2LLvasilyev@fas.gov.ruG ?> 42>9=><C :;8:C@a InstructionggT T8 RT  dMbP?_*+%&?'?(?)?MHP LaserJet Professional M11324 4XSDDMHP LaserJet Professional M1132  0Z(d/4" dXX??&cU} <} P<} <} } $ @@ == => =? < < < < < < < < < < < <Jd****y y ܈a (  ) " ܈ 3 j(kpG(kpGGd? cmdClearLog3"U @CPK![Content_Types].xmlJ0*miG]`Hm6 Xwt?. g#Wi3E).+7 >ON ޑ1ˋz "+R RhB.} /<^ITխ%rHK4uK~I0xM e`|X}đ I`߽N4aG2$RKIZ)4(M9`ctB{m:f@`3n|O,ܗr޾jxR0T ,0@}WBLǬ5vPK!`drs/shapexml.xmlVɎ7?{faZ#Am̂Rdd_|1 5Ak!Y۫W\5muO.IQ2w8se^:bWW;aX.A+`J6.L+5J c@XآF p2p \%%||YJ^񨰦ܨՀ02mQ,&t|IZ]$ٸ@Q?⩰Iz9Kx:I}<ײrk2qߊ;ٴڔy#JOKUyj7;aygY-2r^V4kMZc,@+j60)`j`R091Ev>c$A2c%Y$&rTHG 4[wҜ [F>d k)J)Q؏ (֣W'XYk-+Tf\ 5Wؘ$,]ӱ`8\r,C_ :dH?–rH];FB3Uǣh\J"CZI*dlWٕ*}vADy{3670\ܩZx  ǷZZ5&4E`EO&,}cĞ/]ҿ|EoS(ʑ>m- /kH#F%G>lY:ƞJVruk‘{%ߞjIg~0q"ͅ,nP~ED}H'3 ~P=>¨Uي:|P:oGmn I<&sƧ lr|B&YeP(bM7p$3 (Ȝ:QaboN#jl0M~PK-![Content_Types].xmlPK-!1_a ._rels/.relsPK-!`)drs/shapexml.xmlPK-!1r8,drs/downrev.xmlPK8&]*`Է #8 $<#G8AB8BL 8AB>@8N <X>@d7modUpdTemplLoggerb(b(ggT T8 juRz  dMbP?_*+%&M&d2?'M&d2?(M&d2?)M&d2?M\\!,_\HP LaserJet MFP   4dXXCourierHelvetica X@PJL SET GUISTARTJOB=1 @PJL SET GUIENDJOB=1 FC:\WINDOWS\SYSTEM32\SPOOL\DRIVERS\X64\3\HPSW642A_X64CFG.XMLC:\Users\>;L7>20B5;L\AppData\Local\HP\HPLASE~1> C<>;G0=8N 2Arial||||" dXX `? `?&`cU} } m } I} m} } $} } } I} } } } $          ,@ @  <@  @      < ,   < @            CV 5@A8O 1.2.1 t    &&&'(  & )  (  [     *~ @ H      +  *#    +  *$    + -,,, *& @ *h>44>(44  0&(  R & C  r ]F&! P>@d  2     7&|H81:0'>?CA:05BAO 22>4 =5 1>;55 900 A8<2>;>2!    =8<0=85!K15@8B5 7=0G5=85 87 A?8A:072545==>5 7=0G5=85 =525@=>. K15@8B5 7=0G5=85 87 A?8A:0#X   =8<0=85!K15@8B5 7=0G5=85 87 A?8A:072545==>5 7=0G5=85 =525@=>. K15@8B5 7=0G5=85 87 A?8A:0#C  ws_TitggT T8 ǔ  dMbP?_*+%&M&d2?'M&d2?(M&d2?)M&d2?M\\!,_\HP LaserJet MFP   4dXXCourierHelvetica X@PJL SET GUISTARTJOB=1 @PJL SET GUIENDJOB=1 FC:\WINDOWS\SYSTEM32\SPOOL\DRIVERS\X64\3\HPSW642A_X64CFG.XMLC:\Users\>;L7>20B5;L\AppData\Local\HP\HPLASE~1> C<>;G0=8N 2Arial||||" `XX `? `?&`cU} $ } } } } @} } } $ } $   /     ,@ ,@ ,@  `  ,@    ,@  ,@ ` ,@  ,@ ,@  ,@ ,@~ 00     . .  .  . 1  234  PP   . . . . 1  234  PP   . .  .  . 1  234 g      ' DD D ? "#AB@0"2130036788213001001  PP .D888   PPH@0(  >@d :    7^ ?> 42>9=><C :;8:C F?> 42>9=><C :;8:Cws_01ggT T8    dMbP?_*+%&?'?(?)?MHP LaserJet Professional M11324 4XSDDMHP LaserJet Professional M1132  0Z(d/4" dXX??&cU} } m } I} m} } $} } } } m5} !} *} $          ,@ @  @  @  *  @      o    &&&&(  & p (   q  r ( P9(  9 " 8 3 U(kpG(kpGGd? cmdPath3"m @[PK![Content_Types].xmlJ0*miG]`Hm6 Xwt?. g#Wi3E).+7 >ON ޑ1ˋz "+R RhB.} /<^ITխ%rHK4uK~I0xM e`|X}đ I`߽N4aG2$RKIZ)4(M9`ctB{m:f@`3n|O,ܗr޾jxR0T ,0@}WBLǬ5vPK!2C drs/shapexml.xmlVˎ6?ܤ]DbLL1t2Z,u(R%WWI鮟mZ@, 'v,ˀD繗O+A\Rɔv.3J9O۳#J@(S>|ɚ1ȬP`i(Hiam=tLV Lj.Q+]ũwD'AԚ3iЉmWjʅ8 )8+I)bp&ת ֙nPy>IFa^$^jҍ܍wʻZuÉ$|RTi/ߚ۟?3پj~_ysjyۼ"ngb//(T%(]JۦM}/W,Io4zԣDB,icνY/TvgZG0Rb5-@.B^/Pg b'׊!LXXUxXH.sN?@Vڤt" 2c+I78uvΰ~ј R]baya2grK$}qkvxvV qlV7Ը]mnv iFgS KZs1=v5ݧBvRJNL#д-٥W)}GNsON ޑ1ˋz "+R RhB.} /<^ITխ%rHK4uK~I0xM e`|X}đ I`߽N4aG2$RKIZ)4(M9`ctB{m:f@`3n|O,ܗr޾jxR0T ,0@}WBLǬ5vPK!xk0drs/shapexml.xmlV͎6;=Ė6VNX` v71%V"U)M.E.Ȍk)V#X%G.%20$zw'GD'JAD'f3PЦJSfs8E3 æ)4gpnU:\ UdDI+XA+8j:Tn]` MAȫZJk3uN*h&?#_Aa/Pu,SZEVj|ic'?Փ >]։4>?=%OVO/ l5,W3ŒF'x(Vd:eP׉j% Ar0AjLצ ,&X6G0ū^_ۈ k&ZX|_HΏJSa@7JN࠱>Β0huvB"lߩ gYhcjoT9VS\tXecw@AfLhjCx.͒L}Oher T屍!BU/6z< M.'竍T[a M(LLpкL](!N|Q](ab[]!V"'dlzr[p_&~mY&5Ս/UtaFxJT#Ƈ}G*EVP2׬~4DJT3>UGv1[fKu@>/a] /^׋;?OnH?+%<{:0eaO9!N#*1 5.T~3f8 YMmfza@Y. DW?dCN.5;(_bI|zzA!z__=/=Ϣ蚙sH8  jYŖPK!-drs/downrev.xml\QO0M5M:#)ɐ}[5l+^0t:oUEv:i4~/"tj2 绫\g2Z0脃l'it"vk_ nJ]Z ]B,7Vq4pU0FTqv$oE-K]v}@d8 88 "  7 ws_Loadb(b(ggD T8    dMbP?_*+%&M&d2?'M&d2?(M&d2?)M&d2?M\\!,_\HP LaserJet MFP   4dXXCourierHelvetica X@PJL SET GUISTARTJOB=1 @PJL SET GUIENDJOB=1 FC:\WINDOWS\SYSTEM32\SPOOL\DRIVERS\X64\3\HPSW642A_X64CFG.XMLC:\Users\>;L7>20B5;L\AppData\Local\HP\HPLASE~1> C<>;G0=8N 2Arial||||" VXX `? `?&`cU} } }  } -} } } } $      ,`,`@,` ,@ '   ,@,@,@,@,@,@,@,@,@  d!2>4=K5 40==K5 ?> 8=25AB8F8>==K< ?@>3@0<<0< AC1J5:B>2 >AA89A:>9 $545@0F88 ?> A5B52K< >@30=870F8O<: CF@ 2 C> 3>4C !2>4=K5 40==K5 ?> 8=25AB8F8>==K< ?@>3@0<<0< AC1J5:B>2 >AA89A:>9 $545@0F88 ?> A5B52K< >@30=870F8O<: 'C20HA:0O @5A?C1;8:0 2 2021 3>4C          $ " " " $ " " " B ?@@@@@@ @"@$@     p= Wӽ@   LL L        p= Wӽ@                !- )\µ@ D D D D !  D D !  D D ! )\µ@ D D -  D D D D !   DD!   DD!   DD  ! )\µ@ D D   Z    )\µ@ Z!  DD Z   Z  !   D D   Z    Z!  DDZ   Z    D   Z     D  Z     D    Z     D  Z    !!  D D   #!  D D   #!  D D  #! DD #    D    Z     D  Z     D    Z     D  Z    !#  % X  Z  Z  Z#  %XZ Z Z  !# Q@ % X  Z  Z  Q@Z#  %XZ Z  Z2? B,bP=f:\          <   @0  A :B >A  :> 45  8   5B  > 87  <:  0H  @  1;  2   3    H  i(    PH`0(  >@<d2222   7ws_02ggD T8 1O)  dMbP?_*+%      !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefhijklmnopqrstuvwxyz{|}~&M&d2?'M&d2?(M&d2?)M&d2?M\\!,_\HP LaserJet MFP   4dXXCourierHelvetica X@PJL SET GUISTARTJOB=1 @PJL SET GUIENDJOB=1 FC:\WINDOWS\SYSTEM32\SPOOL\DRIVERS\X64\3\HPSW642A_X64CFG.XMLC:\Users\>;L7>20B5;L\AppData\Local\HP\HPLASE~1> C<>;G0=8N 2Arial||||" -XX `? `?&`cU} $ } } } } I*} } } } $ 1     @,`,, , ,@  , ,@,@,@,@,`,`,,@,@,@,@J`,,@,`,@,@7>=8B>@8=3 8=25AB8F8>==KE ?@>3@0<< A5B52KE :><?0=89 70 C>@@C>@ 3>4@2[3>4 =5 >?@545;5=]@B@?>=8B>@8=3 8=25AB8F8>==KE ?@>3@0<< A5B52KE :><?0=89 70 2021 3>4.2                        m                % % % % % % % % % % % %   ~ G?G@H@H@H@H@H@H @H"@H$@H&@H(@H*@H,@H.@H0@H1@H2@H3@H4@   IZS. 53C;8@CNI8EAO <5B>4>< 8=45:A0F88 8;8 <5B>4>< M:>=><8G5A:8 >1>A=>20==KE @0AE>4>2. J        -5                            ) -=r_1_1-BY         ) -=r_1_2-BY     ) -=r_1_3-BY            ) -=r_1_4-BY  2KLMMMMMNNNNNNNNNNNNO  5.6666666666666666667I ZF!. 53C;8@CNI8EAO <5B>4>< 8=45:A0F88 =0 >A=>25 4>;3>A@>G=KE ?0@0<5B@>2.J K  p= Wӽ@ -5p= Wӽ@)\µ@Q@(   L  ) -=r_1_1-BY   M  ) -=r_1_2-BY   N  ) -=r_1_3-BY   O  p= Wӽ@) -=r_1_4-BYp= Wӽ@)\µ@Q@  2KLMMMMMNNNNNNNNNNNNO  U%?Z :$ 5 >?@545;5=>B  "#AB@0".     -x    | .LMMMMMNNNNNNNNNNNNO   .}}MMMNNNNNNNNNNNN~      -x  D"l6` 6J6bb ,`!,@",@#,`$,@%,@&,`'e(),@*h`+,@,,@-,.,/,0 ,`    !.   !!! !.!}}MMMNNNNNNNNNNNN~  "" " "" """" -x"""""""""""""""""""""""""""""""""" "  ### #".#  $$$ $.$}}MMMNNNNNNNNNNNN~  %% % %% %p= Wӽ@"%%% -x%%%%p= Wӽ@%%%%%)\µ@%%%%%%%%%%%%%%%%%%Q@%%%%% %  &&& &#.& '' 'g ' ' '  '  '  '  ' ~ '%A'-'Q@%D'D'D'D'-''D'D'D'D'~ 'D"'!'أp= @% D'D'' ''(( (g ( ( (  (  (  (  ( ~ (Aw@(-(Ry{@'D(D(D(D(-((D(D(D(D(~ (((Ry{@'D(( (( ))) ).)PP * *5.*66666666666666666672+ , ,,,  - -,-  . .,.  / /,/  0%& @bbbbbgabJ6LLLL, %        5   45    >2  ;3 G= 0@ @> E  >4 4  = 5 ]      HPHp!0(  >@dA      + ++ )!!$$))               7h,,yK >:070BL ?@8<5G0=8O 'CO1'!$I$452,,>:070BL ?@8<5G0=8O|H81:0'>?CA:05BAO 22>4 =5 1>;55 900 A8<2>;>2! '('( )^ ?> 42>9=><C :;8:C2>$$))!!|H81:040B0 2 D>@<0B5 5AOF, 3333'>?CA:05BAO 22>4 =5 1>;55 900 A8<2>;>2!'( H81:0.>?CA:05BAO 22>4 B>;L:> =5>B@8F0B5;L=KE G8A5;!; yCxD'('(F?> 42>9=><C :;8:C2>''F?> 42>9=><C :;8:C2>((ws_03ggT T8 o5XM  dMbP?_*+%&ףp= ?'{Gz?(~?)~?MHP LaserJet Professional M11324 4XSDDMHP LaserJet Professional M1132  0Z(d/4" XX `? `?&`cU} } } } } I*} } m#} } $        @ ,` , ,  ,  ,@    ,@   ,@ ,@ ,@ ,@ ,` ` ,@ ,@ , , , ,7>=8B>@8=3 8=25AB8F8>==KE ?@>3@0<< A5B52KE :><?0=89 70 C>@@C>@ 3>4@2[3>4 =5 >?@545;5=]@B@?>=8B>@8=3 8=25AB8F8>==KE ?@>3@0<< A5B52KE :><?0=89 70 2021 3>46:                        m                     % % % % % % % % % % % % % % % %   ?@@@@@@ @"@$@&@(@*@,@.@0@1@2@3@4@5@6@7@8@   IZ D. 53C;8@CNI8EAO <5B>4>< 4>E>4=>AB8 8=25AB8@>20==>3> :0?8B0;0 (RAB)6 J        -5                                   )-=r_1_1-BY               )-=r_1_2-BY     )-=r_1_3-BY       )-=r_1_4-BY  : 8669999999999999666666667:  {$4   4   4   4   %4 8A>Seeee>R>TTTT  )       =>  8=  8@  =>  0?  0   )    @  4  = 5 ]PH0(  >@dA                     7dyK !:@KBL ?@8<5G0=8O 'CO2'!$I$22.!:@KBL ?@8<5G0=8O|H81:0'>?CA:05BAO 22>4 =5 1>;55 900 A8<2>;>2! ws_04ggD T8 VX  dMbP?_*+%&?'?(?)?MHP LaserJet Professional M11324 4XSDDMHP LaserJet Professional M1132  0Z(d/4" dXX??&cU} } } $} } } } $        @ @ ` ,@X@           f  b,,,PH0(  >@d 7F ?> 42>9=><C :;8:C ws_ComsggT T8  jl  dMbP?_*+%&?'?(?)?MCanon MG3000 series ߁ 4dA415 A< 4"x6"BJDM Rt,T`ORl,T`ORlRt,TT`ORl,TT,TT`ORlXX' @8<5@ 1' d Rt Rt@  Rt dCanon MG3000 series ߁ 4dA4,0?" d,,??&cU} >} >} I&>} d>} ?} >} $ >       @ ,@ ` h@ @AB C H  DEE FI FJ  F?,V>(  R  C  ]F! d ZR  C  ]F! d ZR  C   ]F! d >@dA    7G ?> 42>9=><C :;8:CSheetCheckBeforeSave1ggT T8 .6u=  dMbP?_*+%,&?'?(?)?MHP LaserJet Professional M11324 4XSDDMHP LaserJet Professional M1132  0Z(d/4" d??&U} $} } $ . :@<,@,@,@, ,@ , ,@ ,,, , , , , , , , , , , ,@ , ,@ ,     g        g. ' )DD D      g    - D D D D -  D D D D      2       -x    | .LMMMMMNNNNNNNNNNNNO   .}}MMMNNNNNNNNNNNN~      -x    !.   .}}MMMNNNNNNNNNNNN~      -x    ".   .}}MMMNNNNNNNNNNNN~      -x    #.   .PP      g-DDDD-DDDD'DDD'DDD     ::*KDbbbbbbbb" ,! ," ,# ,$ ,% ,& ,' ,( ,) ,* ,+ ,- ,@         -                                                 !!! !| 6!LMMMMMNNNNNNNNNNNNNNNN  """ "6"}}MMMNNNNNNNNNNNN~}}}}  ## # ## # ### -############################################## #  $$$ $|!6$LMMMMMNNNNNNNNNNNNNNNN  %%% %6%}}MMMNNNNNNNNNNNN~}}}}  && & && &#&&& -&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&& &  ''' '|"6'LMMMMMNNNNNNNNNNNNNNNN  ((( (6(}}MMMNNNNNNNNNNNN~}}}}  )) ) )) )&))) -)))))))))))))))))))))))))))))))))))))))))))))) )  *** *|#6*LMMMMMNNNNNNNNNNNNNNNN +++ +6+PPPPPP -%kjjkjjkjjkjj$  %  $ٹ(   ع A??$CalendarSmallshCalendarCalendarSmall.bmps]&` ٹ A"??"><>IL ?@8 22>45shpHelp><>IL ?@8 22>45,y]&`>@dA b  +""%%((+++7|H81:0'>?CA:05BAO 22>4 =5 1>;55 900 A8<2>;>2!8>   #$)*&' !""%%((++ ?> 42>9=><C :;8:C2> %%""((++H81:0.>?CA:05BAO 22>4 B>;L:> =5>B@8F0B5;L=KE G8A5;! yCxD  ^?> 42>9=><C :;8:C2> |H81:040B0 2 D>@<0B5 5AOF, 3333'>?CA:05BAO 22>4 =5 1>;55 900 A8<2>;>2! |H81:040B0 2 D>@<0B5 5AOF, 3333'>?CA:05BAO 22>4 =5 1>;55 900 A8<2>;>2! |H81:040B0 2 D>@<0B5 5AOF, 3333'>?CA:05BAO 22>4 =5 1>;55 900 A8<2>;>2! |H81:040B0 2 D>@<0B5 5AOF, 3333'>?CA:05BAO 22>4 =5 1>;55 900 A8<2>;>2!  et_unionb(b(//ggD T8 WRҲD  dMbP?_*+%,&?'?(?)?MHP LaserJet Professional M11324 4XSDDMHP LaserJet Professional M1132  0Z(d/4" d??&cU} }  } } $ } } $ }  }  } $} } $ } m } I!} } m} } $C} I} } $ W,@,@,@,@,@,@,@,@,@ ,@ ,@ ,@ @ ,@,@,@ ,@ ,@ ,@ ,@ ,@ ,@ ,@ ,@ ,@ ,@ ,@ ,@ ,@ ,@ ,@ ,@  &~  ' ( ) * + , - . / 0 1 2 3 4 5 6 s 7 ~ |@ 8 9 9   :  ;  < = > ? @ A B C D E  ~ @ F G H     I J K L M N O P  ~ @ Q R S   T  U V W X Y Z  ~ @ [ \   ]  ^  _  ` a b c d  ~ @  [   e  =   f  g h i  ~ @    j  k   l  m n ~ @    o  p   q  r ~ @    s  L t ~ @   u v  w ~ @   x y z ~ @   { ~ @   | } ~ ~ @    h~ @  ~ @                ~ T@~ T@     ~ X@~ X@ ~ \@~ \@ ~ `@~ `@ ~ d@~ d@ ~ h@~ h@ ~ l@~ l@ ~ p@~ p@ ~ t@~ t@ ~ x@~ x@   D(l lrbFbT*B*PF********* ,@!,@",@#,@$,@%,@&,@',@(,@),@*,@+,@,,@-,@.,@/,@0,@1,@2,@3,@4,@5,@6,@7,@8,@9,@:,@;,@<,@=,@>,@?,@  ! "" ## $ %% && '' ' (( ( )) ** ++ ,, - . / 0 1 2 3 4 5 6 7 8i 9 : ; < = > ?Dl00@,@A,@B,@C,@D,@E,@F,@G,@H,@I,@J,@K,@L,@M,@N,@O,@P,@Q,@R,@S,@T,@U,@V,@ @ A B C D E F G H I J K L M N O P Q R S T U V2(  ~  <p X? ]4@ 8s H(x 6  <SphereReestr <  =4@59>@d44"#'('(7  =8<0=85!K15@8B5 7=0G5=85 87 A?8A:072545==>5 7=0G5=85 =525@=>. K15@8B5 7=0G5=85 87 A?8A:0#X  =8<0=85!K15@8B5 7=0G5=85 87 A?8A:072545==>5 7=0G5=85 =525@=>. K15@8B5 7=0G5=85 87 A?8A:0#C)l8'(   =8<0=85!K15@8B5 7=0G5=85 87 A?8A:072545==>5 7=0G5=85 =525@=>. K15@8B5 7=0G5=85 87 A?8A:0E!I :20@B0;?>;C3>4859 <5AOF523>4 TEHSHEETb(b(//ggD T8   dMbP?_*+%&?'?(?)?"??&U} $ JPH0(  >@d7 modProvb(b(//ggD T8   dMbP?_*+%&?'?(?)?MPDFConverterS 4dXXA4PRIVB0''''P4(KL " dXX??&U} $ } $ >@d7 modfrmReestrb(b(//ggD T8   dMbP?_*+%&?'?(?)?"??&U} $ PH0(  >@d7modfrmMultiAddb(b(//ggD T8    dMbP?_*+%&?'?(?)?MHP LaserJet Professional M11324 4XOvx` ;1@SDDMHP LaserJet Professional M1132  0Z(d/4" d,,??&cU} >} >} I&>} d>} ?} >} $ >       @ ,@ ` h@ @AB C H  DEE FI FJ  F?,V>(  R  C  ]F! d ZR  C  ]F! d ZR  C   ]F! d >@dA    7G ?> 42>9=><C :;8:CSheetCheckBeforeSave0b(b(//ggD T8   dMbP?_*+%&?'?(?)?"??&U} $ PH0(  >@  7modfrmMonthYearChooseb(b(//ggD T8   dMbP?_*+%&?'?(?)?MB?@028BL 2 OneNote 2010 / 4dXXA4DINU" ¬QSMTJSend To Microsoft OneNote 2010 DriverRESDLLUniresDLLPaperSizeLETTEROrientationPORTRAITResolutionDPI600ColorMode24bpp" dXX??&U} } $} $ ;X@      :' :( ; D <  ) *  +  3 E k  l  `  @ _ , a - 9 . / 0 1  2 4 5 6 7 8 : A B C F GBX  ܌ (  P " ܌ 3 (S(kpG(kpGGd?( cmdGetListAllSheets3"l @ZPK![Content_Types].xmlJ0*miG]`Hm6 Xwt?. g#Wi3E).+7 >ON ޑ1ˋz "+R RhB.} /<^ITխ%rHK4uK~I0xM e`|X}đ I`߽N4aG2$RKIZ)4(M9`ctB{m:f@`3n|O,ܗr޾jxR0T ,0@}WBLǬ5vPK!1g drs/shapexml.xmlVnI}_iۉ1ʆEq噞 nx#? _VuDtNUٽU%B[jQ3*wN8T R+?VJ mPv1/GM Q=ҵP(ʹ;%:d'v[-poBs"\eFWh9:ϲl<ߝn帽`(M8w!ƭa{nnt[m8[ c~.Jd뢴/M%UHҺgN,,m)bR?7m O +ӘG)9촃)l}m J1E*]Pvn>m}S`"d;hPHGg[aMh9[ӂ aG$Ayt<yAcb(FUz%瓅ťu%OA؎HE*vnx+RC2Y1W83ڽ,]1)ƾf_2ݗO(7צ Һ[Kq(v_P/TK_7` "B}Of|Xz~IFSDSrJo:Sp8#xN>~-)ᔹu-2H5vC/UaN777?|~o>766m/^m6_X󍎛w$"$'T-m~d)L_ 4PK!;M drs/downrev.xmlTQO0M5M A !&FAm k;+ o=;Yk*S>hgD.0eSi[X< (m&+g 0^_M8s] F!6sR:VfF"I_ˆMn7FjKJYRՏ.A7mЇ9qL@ ,y-e@P?jKMaJjn90'uՑ&A$I`49 E^G q/PK-![Content_Types].xmlPK-!1_a ._rels/.relsPK-!1g )drs/shapexml.xmlPK-!;M drs/downrev.xmlPKO-]*`ӷ #  $<5!D>@<8@>20BL A?8A:8 ;8AB>2<X>@d7AllSheetsInThisWorkbookb(b(//ggD T8   dMbP?_*+%&?'?(?)?"??&U} $ PH 0(  >@d7modfrmDateChooseb(b(//ggD T8   dMbP?_*+%&?'?(?)?MPDFConverterS 4dXXA4PRIVB0''''P4(KL " dXX??&U} $ PH00(  >@d modfrmCheckUpdatesb(b(//ggD T8    dMbP?_*+%&?'?(?)?"??&U} $ PH@0(  >@d...7 mod_Comsb(b(//ggD T8 v  dMbP?_*+%&?'?(?)?M6Microsoft XPS Document WriterX 4dXXA4DINU"L r SMTJMicrosoft XPS Document WriterInputBinFORMSOURCERESDLLUniresDLLInterleavingOFFImageTypeJPEGMedOrientationPORTRAITCollateOFFResolutionOption1PaperSizeLETTERColorMode24bpp MXDW" dXX??&U} $ } #$ } $$ $PHP 0(   >@d   modUpdTemplMainb(b(//ggD T8 R  dMbP?_*+%&?'?(?)?"??&U} $      ZPH`$0(  $>@d  REESTR_MOb(b(//ggD T8  h<  dMbP?_*+%&?'?(?)?"??&U} $            ~ ?       B~ @       b~ @       N~ @       N~ @       g~ @       N~ @       N~  @       g~ "@       b~ $@       BppppppppppPHp,0(  ,>@d REESTR_FILTEREDb(b(//ggD T8   dMbP?_*+%&?'?(?)?MJEPSON Stylus Pro 3800us Pro 38l 4dhh EPSON Stylus Pro 3800  %s%04xECFNP@4  hhL hh q**** q****d 2u" d??&U} $ } I} $ } I} $ } $} $         PH00(  0>@d  REESTR_ORGb(b(//ggD T8 ,CK*;K\km3~/  dMbP?_*+%&?'?(?)?MJEPSON Stylus Pro 3800us Pro 38l 4dhh EPSON Stylus Pro 3800  %s%04xECFNP@4  hhL hh q**** q****d 2u" d??&U} $ } I} $ } I} $ } $} $              ~ ? x y z { | } g~ @ ~      g~ @       g~ @       g~ @       g~ @       g~ @       g~  @       g~ "@       g~ $@       B~ &@       b~ (@       N~ *@       B~ ,@       b~ .@       X~ 0@       g~ 1@       B~ 2@       b~ 3@       N~ 4@       N~ 5@       g~ 6@       g~ 7@       N~ 8@       g~ 9@       g~ :@       g~ ;@       g~ <@       N~ =@       g~ >@       g~ ?@       NDlppppppppppppppppppppppppppppppp !"#$%&'()*+,-./0123456789:;<=>?~ @@       g~ !@@ ! ! ! ! ! ! !g~ "A@ " " " " " " "g~ #A@ # # # # # # #N~ $B@ $ $ $ $ $ $ $g~ %B@ % % % % % % %g~ &C@ & & & & & & &g~ 'C@ ' ' ' ' ' ' 'N~ (D@ ( ( ( ( ( ( (g~ )D@ ) ) ) ) ) ) )g~ *E@ * * * * * * *g~ +E@ + + + + + + +N~ ,F@ , , , , , , ,N~ -F@ - - - - - - -g~ .G@ . . . . . . .N~ /G@ / / / / / / /N~ 0H@ 0 0 0 0 0 0 0g~ 1H@ 1 1 1 1 1 1 1g~ 2I@ 2 2 2 2 2 2 2N~ 3I@ 3 3 3 3 3 3 3N~ 4J@ 4 4 4 4 4 4 4g~ 5J@ 5 5 5 5 5 5 5g~ 6K@ 6 6 6 6 6 6 6g~ 7K@ 7 7 7 7 7 7 7g~ 8L@ 8 8 8 8 8 8 8g~ 9L@ 9 9 9 9 9 9 9g~ :M@ : : : : : : :g~ ;M@ ; ; ; ; ; ; ;N~ <N@ < < < < < < <g~ =N@ = = = = = = =g~ >O@ > > > > > >  >g~ ?O@ ? ? ? ?  ?  ? ?gDlppppppppppppppppppppppppppppppp@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_~ @P@ @ @ @ @  @  @ @g~ A@P@ A A A A A A Ag~ BP@ B B B B B B Bg~ CP@ C C C C C C Cg~ DQ@ D D D D D D Dg~ E@Q@ E E E E E E Eg~ FQ@ F F F F F F Fg~ GQ@ G G G G G G Gg~ HR@ H H H H H H Hg~ I@R@ I I I I I I Ig~ JR@ J J J J  J! J Jg~ KR@ K K K K" K# K Kg~ LS@ L L L L$ L% L Lg~ M@S@ M M M M& M' M( Mg~ NS@ N N N N N N NB~ OS@ O O O O O O Ob~ PT@ P P P P) P* P+ Pg~ Q@T@ Q Q Q Q Q Q QB~ RT@ R R R R R R RX~ ST@ S S S S S S Sg~ TU@ T T T T T T Tb~ U@U@ U U U U U U UN~ VU@ V V V V, V- V. Vg~ WU@ W/ W/ W0 W1 W2 W3 Wg~ XV@ X4 X5 X6 X7 X8 X9 Xg~ Y@V@ Y: Y; Y< Y= Y> Y? Yg~ ZV@ Z: Z@ ZA Z= Z> Z? Zg~ [V@ [: [@ [A [B [C [? [g~ \W@ \D \E \F \G \H \I \g~ ]@W@ ]J ]K ]L ]M ]N ]O ]g~ ^W@ ^P ^Q ^R ^S ^T ^U ^g~ _W@ _P _V _W _S _T _U _gDlppppppppppppppppppppppppppppppp`abcdefghijklmnopqrstuvwxyz{|}~~ `X@ `P `X `Y `S `T `U `g~ a@X@ aZ a[ a\ a] a^ a_ ag~ bX@ b` ba bb bc bd be bg~ cX@ cf cg ch ci cj c  cg~ dY@ df dk dl dm dn d  dg~ e@Y@ ef eo ep eq er e  eg~ fY@ fs ft fu fv fw fx fB~ gY@ gs gt gu gv gw gx gb~ hZ@ hs hy hz h{ h| hx hg~ i@Z@ is iy iz i} i~ ix ig~ jZ@ j j j j j j jg~ kZ@ k k k k k k kg~ l[@ l l l l l l lg~ m@[@ m m m m m m mN~ n[@ n n n n n n nN~ o[@ o o o o o o og~ p\@ p p p p p p pg~ q@\@ q q q q q q qN~ r\@ r r r r r r rg~ s\@ s s s s s s sg~ t]@ t t t t t t tg~ u@]@ u u u ui uj u  ug~ v]@ v v v v v v vg~ w]@ w w w w w w wN~ x^@ x x x x x x xg~ y@^@ y y y y= y> y? yg~ z^@ z z z z z z zg~ {^@ { { { {v {w {x {b~ |_@ | | | |v |w |x |B~ }@_@ } } } }1 }2 }3 }g~ ~_@ ~ ~ ~ ~{ ~| ~x ~g~ _@    S T U gDlppppppppppppppppppppppppppppppp~ `@    M N O g~ `@       g~ @`@       g~ ``@       g~ `@       g~ `@       N~ `@       g~ `@       g~ a@       g~ a@       N~ @a@       g~ `a@       g~ a@       g~ a@       g~ a@       N~ a@       g~ b@       g~ b@       g~ @b@       N~ `b@       N~ b@    ] ^ _ g~ b@       g~ b@       N~ b@       N~ c@       g~ c@       g~ @c@       N~ `c@       N~ c@       g~ c@       g~ c@       g~ c@       gDlppppppppppppppppppppppppppppppp~ d@       g~ d@    { | } g~ @d@    m n   g~ `d@       g~ d@       g~ d@       N~ d@       g~ d@    c d e g~ e@       g~ e@        g~ @e@         g~ `e@    q r   g~ e@         g~ e@       g~ e@       g~ e@       g~ f@    } ~ x g~ f@       g~ @f@    7 8 9 g~ `f@       g~ f@       g~ f@       g~ f@       g~ f@    G H I g~ g@       g~ g@       g~ @g@      !  g~ `g@       g~ g@    " #  g~ g@       g~ g@    $ %  g~ g@    B C ? gDlppppppppppppppppppppppppppppppp~ h@    & ' ( g~ h@       B~ @h@       b~ `h@    ) * + g~ h@       X~ h@       B~ h@       N~ h@       g~ i@       b~ i@    , - . g~ @i@       b~ `i@       B~ i@       gpppppppppppp>@d REESTR_ORG1b(b(//ggD T8   dMbP?_*+%&ffffff?'ffffff?(?)?MPDFConverterS 4dXXA4PRIVB0''''P4(KL " dXX333333?333333?&43U} $ PH80(  8>@d modCommandButtonb(b(//ggD T8 ތ  dMbP?_*+%&?'?(?)?"??&U} $ } mf} $   ! " f(PH@0(  @>@d  modInfob(b(//ggD T8   dMbP?_*+%&?'?(?)?"??&U} $ PHD0(  D>@d modServiceModuleb(b(//ggD T8 ב  dMbP?_*+%&?'?(?)?"??&U} $ PHH0(  H>@d modInstructionb(b(//ggD T8    dMbP?_*+%&?'?(?)?"??&U} $ PHL0(  L>@d  mod_wbb(b(//ggD T8 9  dMbP?_*+%&?'?(?)?"??&U} $ PHP0(  P>@d  mod_Titb(b(//ggD T8 g  dMbP?_*+%&?'?(?)?"??&U} $ PHX0(  X>@d    mod_00b(b(//ggD T8   dMbP?_*+%&?'?(?)?"??&U} $ PH\0(  \>@d  7 mod_04b(b(//ggD T8   dMbP?_*+%&?'?(?)?"??&U} $ PH`0(  `>@d  7 mod_03b(b(//ggD T8   dMbP?_*+%&?'?(?)?"??&U} $ PH d0(  d>@d  7 mod_02b(b(//ggD T8 Y  dMbP?_*+%&ffffff?'ffffff?(?)?"333333?333333?&<3U "PH0l0(  l>@7 et_union_vb(b(//ggD T8 l  dMbP?_*+%&?'?(?)?"??&U} $ PH@p0(  p>@...7modfrmDoubleValb(b(//ggD -B0=830` __SRP_1a/__SRP_1bF8>modClassifierValidate,C<  !"#$%&'()*+,-.0123456789:;<=?@ABDEFGHIJKLMNOQRSTUVWXYZ[\^_`abcdefghijklmnopqrstvwxyz{|}~8 dd#<c6]E"h]6*FlaG;N+xlaG;N+c6]E"h]6*MEPSLSS6""<<<N0{00020819-0000-0000-C000-000000000046} &@`@xk8 ,` <i. F5 2` @ i. 2 6`xk@Di8 ` i.  <`pxkH%@8 %"h %(( @x (@x `@(@x @@L87B^$*\Rffff*1162f10178$*\Rffff*1262f101784 " "  (0H "  PXp " x" "x (B@*oX@ . (B@0o0 . (B@4בo 8 . (B@:o` (B@>o@8dAttribute VB_Name = ""  Bas|0{00020819-u 0C$0046} |GlobalSpacAFalse dCreatablPredeclaIdTru B@ExposeTemplateD0eriv$Bus`tomizD2O@ption /licit P"& Sub Workbook@_Activ () mod_wb.P_Wb MXEnd!BeforeCld(Cancel As Boolean+BC*d,  #.]n t!P0Save(ByVal pAsUI0*4SEg7Open^AGrU 9H  &)9/4Qy0` ` ` `` I WX$l=xx$ dx$$} x0 @  0   \("lk l=xx$ px ($} xX$l=xx$ hx$$} x444448rU @$`8(A`< I#(`@$I#,`D( I#$`H,nrU~| ED 0  0   0 @  0   0 P  D H D F (rzk J DX D J$0 D J$9 zkx J(r'BiXR ---------------------------------------------------------------------------------R ---------------------------------------------------------------------------------R ----------------------------- ---------------------------------R ---------------------------------------------------------------------------------R --------------------------------------------------------------------------------- ''L N $BR@d8T0k(T 'LVR'L P W ! 10-12 ! ! ZA@XkhV`VXzPiH '@'\ ^ $BRdTkT'\VR'\ P S ! 9 ! ! ZA@XkVVzi )'` b$BRdTkxTp'`V`RX'` P Y ! 7-8 ! ! ZA@XkVVzi )P'd f $BR0d(T kT'dVR'd Prrrr Z ! 7-11 ! ! ZA@XrrrrkPVHV@z8i0R ---------------------------------------------------------------------------------R ---------------------------------------------------------------------------------R ----------------------------- ---------------------------------R ---------------------------------------------------------------------------------R --------------------------------------------------------------------------------- rrr 'h jrrrrV k j%n!pX $BrrrRdTkT'hVR'h Pr  ! ' j!r'! t v A@Xrk( j!xB@zr jB@zrVVzi rrr(hrrrr'| jrrrrVk j%n!p$~  j%n!p$~ GTjrrrr  W 0 dxME(0l6 < <+B` @ iD`iFiHF5`J1-+L@` #iN(riP  X +\`  :i^BiP  ------+`P`  Qib(----iP  ------+d`  hif----iP  ------+hh`  )j8@----%iP   +|`  )j8%iP  R+` 8 )jX` %iP  +`  ##)j@%iP  R+ ` X )jx %+ `  )jA@%+ ` ( 3)jH%P@h`@%( P7B^*\R1*#278$*\Rffff*1F62f10186I .B 8P X` ":   (8@x    X X XX X X `B     B   ( 08@HP X|h B 0H Phpx  HPX`h pB      X X( X X X0  B     ,   ( 0 8 @ H P X  ` ^p         B 8 P  X h p jx ,   ( 0 8 @ H P X  ` ^p      B 8P  Xhp ,x  ``h x B    ,8@HP X`hpx `  (0 X8 X X X@ X 0B  *(  Xhp ,x( 8HPX` 0hB  *   j ,` 8  2(B  `*h   ,  :(hpxx( .( (0]'B F FGzj D 21-'B". , 76-zkj%n!pX $BrrrRdTkT'|VR'| Prrrr  ! ' j!r'! t v A@Xk( j!xB@z jB@zVVzi *' jVk j%n!pX $BRPdHT@k8T0'V R' P  ! ' j!r'! t v A@Xk j!xB@z jB@zVpVhz`iX *' jVk j%n!pX  $BRdTkT'VR' Pcba`_^  ! ' j!r'! t v A@Xk j!xB@z jB@z{iVVziR ---------------------------------------------------------------------------------R ---------------------------------------------------------------------------------R -------------------- , -----------------------R ---------------------------------------------------------------------------------R ---------------------------------------------------------------------------------) , ! !'[n jr4mFalseIf U<= 0 OrTheitP),0 ' % GTrZ' q` k,  @Ex%End If7 (>7V@: A1A  FoLa= 1 8To "MidK,D , 1) < "0"_Z > "9"XC'ANext ZbAԁQC-??K, ?^ .cC5F@ub 3INN_On`YmT calA}MsgBoxShowa Ė }-QGV hWdh0`2dGorErrHandler Ed Sucpcess":_a CUp '= ! c "!;@!  a10-12! P@"mvbCritical, "@)Kd lOU *zte_KPP**z***G*/oօ`, 9 *)*!&*%o*b@  **v/**y!@ "q*A*9*****S*nUp*;`@Kp*ο***OKTMO**) +++ ?+?+6+, 7, 8_+_+в?V?V _+S+ +_V Vj=++s+c+7-8+++ϐ+++ V͇+`ŏ+_OKAT++*+WW +++ +1= !OO bC*OoWsBDI ,, , CW,,,,-11,,,,,,,eanUp: Exit Function  Endh ' -Ms l Uqs Public blnValidate_INN_OnShe@et(rngingRIF     !"#$%&'()*+,-./0123456789:;<=>?@ABCDEGHKVuLMNOPQRSTUpvXYZ[\h^_`abcdefgWijklmnorstz{|}~ange As , _ OpalMsgBoxShowBool = True)A#@ FalsFeIf P(I@s Noth@, The@(GoTo CUpA/@v?"v O@e O@;0M@ )6]6), 7, 86tv' 5y6M71vE_?7w"&_7_7_7s/w#_7_7_744/w"_7/w28J_7oaOKAT_7 O_7_7_7 A _7_70^/-?w_7O'_7S711o7o7 ??onPo7o7oVio7o7 `7&o7o7o7o7$o7o7o7o7o71n&"в Exit Function Endh ' -Mj , gq Uu͙w Public strValidate_INN_OnSheet(rngingRange As )AStr U = " ] !"/ If Is Noth The GoTo CleanUpADIfbln3Len_Number(C+4.cells(1, 1D). ue)0 2)/FalseErrHandler@0#11 3 SuccessB9:An"UDJaH68! B9'" &p5.0Addr"'?:BYFϿYYKPPYgeY(*YYYaALCase_JlVl" Or _"S&QN`ulv…l9, 9_lLlbe g.[,8bijQbBFbb΃ccOKTMO_c?1b:#1^ $^ ^^(^at(^7, n8(KYE^(dr; (u.( OZlS )Z}) ZuZ__SRP_44 C2__SRP_45PmodUpdTemplMain . ly__SRP_28] 0   0 h  0   0   0   0   0      4rU D0D` ! 0&&,D` 0,D` 0,D`) 0,!D`I 04ID`i =4qD`i =4D`i =4D`i =,D `i=,D `i=,9D `i=nrU )p ;1;IXa &8"  ` hx  :"   2 " X `p $x"$       0 8 0Hx    .    P(  8 X `  Dh    0   ( 0 @ PP  9GUdm#`3+Y@%H$$O F ipHOx ipHO3+Y@%H$$OME, SLSS 0<<6<6" P<0<4<8<<<N0{00020820-0000-0000-C000-000000000046}x b <@"Dx@8 @ % ` ` )A % P` (d)H% ` h ` l )----%i   (i H i  ``` %` 0` p ` p[[)%ii```! 8!% X%` ``  h` t)))%i0i!p`",$` @@A)%i ii `0 `2 4x% 8Act% N` xi": V@ `|   `  iD(ih ij  ,p ` (  irHi  `t  x `  ==){--%i i( i`|`~, `  $$i  i i  A@ H A@0   h `t ( `  !)  %  %  ` h -i  ` **?ih ri  0  %b` 4@b8@b(@@8 h( x (P`  0@ %h  %8  ( @ Pd`," 7B^(*\Rffff*1962f10178\0*\R1*#3c8$*\Rffff*1862f10178$*\Rffff*1962f10178*\R1*#136X i  ( 0     &0 X:h  * T   x  6,@ Xp   4  > ,@ p  x          (   0( X ` h p x   (     " "  8 " @ X ` h p x     2     $ @ ` Dx     2   0@ 8p ( 8 . 8 @ ` h :p       (  0 @ 6P  *& . 8  &H p 4       * 0 8 @HP2X "    4  ,(X 0p     <4 @ H P X hpx    B      (  "0 jX   &8"Px  "     4 - ((8`h  p ""000:8x (    X "  x @  "     (8@ HhD $( $8(`J* $(HP&  "    H@X ` $hB       2"$ H ` hp  x   ,  <08 P p   B V XX >     ( 8 @ H X `h p      6 L0 B          !0!8!@!`!h!p!x!! !!! ! !!!!! "  ! ! !8" #0# 8# H# B  P# X#  `# p### # ##### B  # # # ##$ $@$`$ $ $4$ $(%@%H%`%%%% % & &8&X&x&& & && ' ''' '0' @'xp]@8 ]@` ]@]@ ]@(  ! ( ! ( ! ( ! ( ! (o@3 ( ) A@o,  P A@`o H R8]p]]]]  Vk Version %' ' ! ! A@Vdx  ... A@ J  B@ Wait for response...Vd> C   %'k(d ) ...k !' ' !' , ! A@ offlineOfflineA@dActA@kVd  CurrentVersion %!pX ' , ! A@VPkH$  $  # ,  A@ ActA@VXkP ! A@ : ! A@ : !X   A@ NoActA@ ! ( ! ( !  ! ( !X ( : !X   ( : ! (! d  (!  (  (rrr  (Hk@  B@ !-- ... A@   A@------d! A@kkkTTVxRp A@V@V8o0 " "-- ... A@------   A@R -o 0------R]]]] ]@]`]x]    rrrrV k .j%n  4 !  %' X False 6 , A@d8 ! '( !'r+  Ϧ&    A@()       $ !  . L "." BKP.   $'d .BKP. ''|kd    $.BKP. ' tkH !$  You use Excel 97-2003B@zd You use Excel 2007-2010 ( k (* (" :  A@n# H  ! B@ :  A@̶* ... A@ x .jB@z  \  ! B@  ( ( B@z'$ 7   A@ NkTTVR# A@ VhV`oX  R]P      &   $$'" " : TXkPdH (&% ! Z (!*A@X% ! A@k V T " A@V R V Vx  (F@L ( Ѓ  . (, o@   !!hR ]0]H]`] '$A@4 xls...   ! \UPDATE. .TO. .Z : XX .xls'0 0' 0   %<'2   , ... 2$~ !'$R kx  >B@@1  (&  55 0DF !B%.8 8N !'$V k 8B@zE 8 %H Ѕ   8%JB@L 8 %He  8%JB@Ld 1 !'$V kx  : 0'$TH T@ V8 R0  (& $ v (!*A@X $ A@VViQ ()  "' R0:00:1$T modUpdTemplMain.ApplyUpdate B@Po0  !X   $~ A@ZNkk $ERR $ A@6 (. " ") vA@Xd0 $ A@ $ \A@X ActA@ Force update "version" fieldversion %`!b!x B@^=" " & GetVersion()version %`!b%n(dversion %`!b!x B@f  Force update "code" fieldcode %`!b!x B@^=" : " & GetCode()code %`!b%n(dcode %`!b!x B@fk8o0 @ jZA STR_LOGGING_SHEET_NAME D  h lB@nko ]h'p t v!x t$v! r'pzk ti+ ` ...R]H ]` zVpkh z!'| |.$'~  | ~ $'@ q 6 Determine the Excel version and file extension/format0 z !$  You use Excel 97-2003.xls'/'dh You use Excel 2007-2010< 51 = xlOpenXMLWorkbook (without macro's in 2007-2010, xlsx)P 52 = xlOpenXMLWorkbookMacroEnabled (with or without macro's in 2007-2010, xlsm) R 50 = xlExcel12 (Excel Binary Workbook in 2007-2010 with or without macro's, xlsb)7 56 = xlExcel8 (97-2003 format in Excel 2007-2010, xls)53KT.xlsx'3'4KT5.xlsm'4'd.xlsx'3'k8KT.xls'A8'Sp.xlsb'2'nPkHq@T8T0V(R VVo/ ::F strCurrentVersion < strNewVersion, TRUE, FALSE "x Rh] ]P ] .$' .$' ''t t  t b t$X t$X 'V t$X t$X e'Vk t 'tp   D'kHV@R8'V(V i ]  !`?"3DUf !p\   !pREF   !p#   !pxls   !p/   !!   !?   B@?k o( R !'  Error 2023 'khV`RX 'VHV@i8 R(  B@^A hActKTFcmdAct_1 %(cmdAct_2 %( cmdNoAct_1 %(? cmdNoAct_2 %(D cmdNoInet_1 %( cmdNoInet_2 %( ! !  cmdGetUpdate? @>  NO_UPDATES % !(kNoActKTF cmdAct_1 %(?cmdAct_2 %(+D cmdNoAct_1 %( cmdNoAct_2 %( cmdNoInet_1 %( cmdNoInet_2 %(OfflineKTF@>cmdAct_1 %(cmdAct_2 %(@@ cmdNoAct_1 %( cmdNoAct_2 %( cmdNoInet_1 %( cmdNoInet_2 %(nVRVV  B@fiֶAttribute VB_Name = "modUpdTemplMain" Bas0{00020820-C$0046} |GlobaBlSpacIFalse dCre atablPr@edeclaI"dTru BEx0poseateDerivBustomizD2Option /licit 1 P)- gstrN@ewVersAs SngE Code Repsult+PatchFileG7tvi$Set5TMInfo.' $@ub@= Sub @#_TVI_(ByRef ASYNC_kM) A !.lng,SizAzs I LVV= M. Desc|riqtURL-@r@ority1AOEnd^' Ap( @ `PoCheck_c _ExecuZ@9Val wbBook!8WorkbS` is,2 Bg, c *1`I FJLcmd"FDors_COk_Handler(Thisec&", _; c*blnShowMess ag|,lean@?'AsyncRequesx0  Don +Orror GoTo Err$0aaDim ^AG UO)s*#vb'VbMsgBox#hCurrent If[Is Nothing Then C!3Up!YW7Uw ##sׁЃ3L -=KVySSDDG5Doa!!E E " &?r0\/"HSz>e + 8@0"offline"A Availabil_Status "Od%y4Actc '?15;EJF\U lp= CxZh.C͜jiesD("").0ue3$ ]$$i CiiERR|OR_{7Q"opqe CIs_1Z!J^,;9%'G 0q@4"153" ,8", STR_FORM_STATUS_INF0O $' `Set_Update_Availability_Status "Ac t"ZGoTo CleanUpEnd If lbInfo_Add "   " & tviResult.strVersionA 3-2:.Descript .0, (e2CStr(clngFileSize)q" Nommodz_Templ_Defines.LNG_UPDATE_MODULE_SIZxE =KaH/ZNEW_VERSION_URLtxNewtIf )*> 0 Then S(;>v bNull@uingG f8 oB16q . frmCheck0s.Show vbModal cuBLNѠLLPTrueu gE...IniisWorkbook, lCodeǒ'sMN 0WARNING 2#G4ixSuccessa:qKzErrHandler 09o _ERROR/G! Sub ' " ?pPublic  cmdPerform'_Ctk_ (2Pm "w!_!U!gn!y! v Iv$ H(ByRef wbBB& As g'_{ByVal#})StrI, ? On 0 or r! 1 1DimBackupNamew(CurrentWBPathP?uq7 _okQ?0%/ 1 Exteno nF0( atNumLoaaN4Is Noth` OrLen(`yE) oz0?rw;; &C!Setq%{=&1'  p ÿ` l=P App 7a.GetSaveA*s!n` (.Fs, )-"`0AT R "`+ @ "FaP"(eAbL Z,C O_Z{` 13 1:.2*.S' Π Sr ` __Q_v/_-n$"p)4GO6<, 4 Cf  S Mid5;+ 7K) - * ) + 1<) <>1Z(' '`~ In]( @6 0 ., ".")  "." strBackupFileNa me = L& "BKP." &` Mid(@\Extension, 2, Len0) - 1)Else0y.z vWnd If c/_ , 1, _'p pՒ|)"]E\>If val(Applicat.Ver) < 12 ThenT' You use Excel 97-2003 @ 10EwbC5Workbook.Chec kComp bilityFapO.,EnableEvents I DisplayAler %lbInfo_Add " @ : N}, STR_FORM_STATUS_INLFOC'  @  C JSaveAs E:=\Format:=_ CMFBB 6D// .# 2..."-- CSet wbUpd PngSIM$ .4Curr`SWBPatht\G!_>G7.78eTru$eActivat ' \0i/Download_Be1,Tem x@teCodeNewĕ DŽGoTo SuccessD:fCleanUp ErrHand Q HQPERR 0Otrw #go ' @ID Y Start-(D,OHQInP( , "iX"b 60X-  1g3|AScree@3sRQAMsgBox " S _-!3vbCritpl, m@odGlob.sMSGBOX_WARNING_TITLE9/4=yCQGR)AaCq,QI$/GB /ZE9\/n.CalculIoonxlAuto icQ@5NS{JP9\Pr_ Fun`j/JF=J`WAOO Fg6')HIaIE1wrW?`:@H!K/%wsShe[sbNWithq>sa 5^vbPNullR omizya' !0 x ""h Kill .'!@Mid ., 1, 3"I lQ4.R4 c"gvH (.|"") i    S_INFOG# te,v 9rs<3' iND CSen_Availability_Pptus "`jn' 0ce uAe "vers" fielBÎlUNPROTECT_SHEET!is.AP^ ).Ref@ToRange.pahren"- sucells("1).aula."=""@AP*& GetV ()w C , W codeRO_U l!lC u}/GAPPr\5g\"WW\ߧ;_d/_OpẠcblnpLogToRP'a d[M=r"@.eoPG  aMLOGGzB6_NAMRz8@`2` ger.@ =m lbh%,qcB5iyPDaӍ vF} Is}oQ:@)1p @gm lngIC@ounterLongppbma = 0 s.b - 1Rn(h).nav=AV '  t ǵCe N`| ёB c `^2_A{__Ex(tenq\_ at@PXSourc~e;00 By&5?a  a S2/s//efa!Num!A&RW!1Dimq!Origaq As String Dim lngExtPositionLotIf wbSourceBook Is Noth~ ThenD GoTo CleanUp"End IfstrOrigFileName = Q.n*! = InRev( D, ".")]Workb]Mid.1, - 1) ' A' Determine the Excel versamfd@ exten /@formatWXith n val(ApplHica.V') < 12 H@You us<9@7-2003$ > ؃>".pxls"FJNum-41B4 ElseE 'N K1051xlOpenXMLY (w:out macro's in FT, #xf '( 52MEn abled or m 0h@Q(CjBinar|y +&,bE68 (a z; =Sel@ect Ca@q.GcU C51v>xFvASPwB52.HasVBProjA%v auJmJ hMKk K U S #G #6?(Hc!( b^3FiB#3! !"Su`ccess!D:CfErrHl> ,,YL/= &"R3!>5<wd = Tru&wo9BP!=V+ PLoo1 ld~H_ W A 1An%+I@qIPrivate `JBrBrokeBnќsInACv&e|tBwb }#qO }/{a!0?>1Dtd5'+N?Q%Q% &gGet_Cals_(I`#v1.I#:"3`f2023"9vbNullSER^99=a9 {9"SUpd;_Availability_Statusq]7 D%modServiceModule.UNPROTECT_SHEETru25T"D"J q_In.Shapes("cmd0_1").VisiHLOJ2O`OFNoj ? s No In le = Fal se Instruction.Shapes("cmdNoInet_2"). Visibf AlveSheet.nam $`And _GUCaller_N2nUpdate" Then/' @frmHint.lblReference.capmodInfo.wLabel_C(U, "NO_UPDATPES")/E]IBfCaseoyy":v_~1ԏ6Tru /7ݓWOffline?XҴO ...'' >B@B >B@ >. TTT@@"du'xME$ 060l<11<"<@6 <(<,<0<4<8<<<   0@+`@)`h%)x%)==== ii "`t`` p %``` ` ` @ % `% % p` ::) %)%i P%`$+4`)%)%i6 )X`! @i``+ `%`$ >(%pon.Cx %xP07B^*\R1*#3c6*\R1*#278*\R5*#83*\R5*#6b$*\Rffff*1762f10178$*\Rffff*1G62f1018a L @` @ @ B,  @HPX`h px     B  6H`h p     (   "  H X  $`   "   (0 8HP Xpx X       2(`p     h  *(X p$ > 8H Xh  $p  D   (H `         ( 0 BP h p x              0  @ P `                  ( 8 @ H P X B,`    "  4 (2 X ` Bh p x   2          ( 0 @ xpF "+" , "%2B": =========================================================: ================== URL =====================: =========================VR.>. VVi Attribute VB_Name = "modInvokeHTTPServer" Option Explicit@Base 1 ' "+" , "%2fBhJ =5< hq0 URL`< Pub FuncstrQuery_Data(ByVal wsOutputSheet As Works, _ !rngStartRange!Ref KXMLTagQs()S@ng AOf!pxUrl!AADim lngIC@ounterA L(ongJRo`wOffsY w`bBookA_bNumberOfnFieldRsApayC alculPreferenceRequest,U@(1CblnSuccessfulD'4lean @@vbNull hOrror GoTo ErrHandler IfUIs Nothing ONrUQsUB7dV(O)0) LenAJCThe 1End IfeFE= 1  ' @,  ׀#((H)m Next] a qR= DgdDStatuYa' C@heck Imn gConneÙC r`G!e.@TIsOnLinFal L8rNla 7' Rdobj," MS2.$kDOMDocu8menD S  = CreateObj`("+ .3.0"r) Xt= STR_a_REQUEST_BASE_x_Cyv= b#A aP DNSx...A[#= Lk)^aa kTry'C' 00Ky -!1 +*tS%=!Se(nd_t(, ,ah q3DD ) &b > H=b#_STATUS_OK &d7+i7N L/Z)3P2.)EleB*"Y? N  .ChildNodes ?Æpk9nt.Qgth >8= 0G (ࡢ, ` ``$ _4st!0dTrue%Exxit `2I :Vk'A% D4=;sx.paಡ'@ d.#`R.S ?xlManualS'@q .AcvUScQiceModule.UNPROTECT_SHETET_ +."(z.cells(1, 1)O4 S;Used. +_s.M - ? o)).Crxtos' ] " M".6ma!8"@rBBBBB 7Cup1`VEPVVJU b rec$IP@kZ?=mXX.Itemn mQ4 ̟M&yh {01,v').u rec.getElementsByTagName(strXMLhs(lngJCounter)).Item(0).Text uN P2(RowOffset =F+ 1( @IiEnd If ' $Delete_Existing__In_Workboo k wbB, t OfRangeIf R> 0 Then ' QA=wsOutputS heet.,(rngStart.cells(1, 1), _%,WNumberOfQueryFieldsnsW'Forg1 To UBd̋)3.u _ By#XUrlStr*a!2On BhECUDim frmProgr+XmmIBaV 8modAn@imated!sEffects.BLN_SHOW@_PROGRS_`FORM_CUREQUESTS`8lTrnS@ = Try_Shotw__ l 3JB$a PP! <.Open "GET"a`,, Fad|*sEF !S 4i3L(ongi`)-10Do Whileready@te <> 4 >i! i (i >6 v  oEvALooTl0.HidRU; 2={ sponse 81B; staMod1aL*D@ebug.P5tH tYose5,%,^Z_ AF_STATUS_BAD_3!sCl?YW/W!6orm60 h`X-WnMR_MO_OKTPL@WN}0saR&?SJґoWRegjᜡ#X!fP,)O 8xg`:d&qGpTemp@xeC1o14Lenw)pBM= 7Service07ule.varG et5q@3pert$y(paP~t,@ "Vers0"n' 1URL} = 155kC_9'NAME &ROPARAM_1!& "&"ǯsM_29QSL S3:)q?:3-,` "#ZX`IrivנψW(B4qǿ|diag9}Qp= New dDialogus.Configure " ... e 1$r^([`G2iSe]t diag = Nothing Set Try_Show_Progres@s_Form GoTo Clea nUp : End Function  1p(F` &n|(udrW#xME icit@Base 1 ' "+" , "%2BhJ  Pub FuncUpdate_Organiza_List(ByVal wsT As Worksheet, _ %!strR\eg&Sn g4%A[vitySphereN'.)POrror GoTo err] Dim wbkbook sTeh x rngRang8 @7XML_DataTag8s(" Url,TemplqbCod4Set,=c.paHren RfeD!9)'1B)ANSRF@ 2MR_N(AMEV 3B OKPTMO_ 4CO-[5H6 RGE7 INN 8Q KPP 9 V8DET , 8= AiceModule.varGetDocum7Property(k:, "Ve4rsd"7 'w- G)@b.M"`Ree8").Ref)`To"T.xueD &Lv"p_A?=" Hs& "&K|ASo6aa$=ALL T>C i'a# AIf3a ge TRAN_ORGS?@" Then cgPres`<101diRSbTa _IDer ' `URL-7@/9"5 55"SPHERE6j,. ApElse, M,OT-tr-},@(~@='t7C~*~`; A t  5uo8z sC End If fn#gD("Av2Inr1OInvoke.@QueryrrQO# _e O $_"LIBPP;T??P0$JCl eanUp :?6STR_UPDATE_FAILEDs4 "%Q#'N//` OCMRpȦP Sh@mW x/9/ C@wbpThisqU-Nothi  4Loc@vP5yErrHand ű1"Zb xIs nav9&1Q!  a Di: +q )]- J K?DžE.cells.b RIFP؉= 1 0͟xm!(, 1)ß Next 11Rhb4)7.Worksheets (strSName) Set rngRange = wsx.< Loc al\dUpdate_MRMO_ListlmodInvokeHTTPServer.QueryP_ROKT/(d, _N =EO\RegionH*XML_DataTag,sW*GoTo C@leanUp ErrHand0ler:PpSTR_UPDATE_FAILED  D@nd FunctI h  R   (F` hpx       !"#$%&')*+,-./0123456789:;<=>?@ABCDFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~modScrolling-*SheetCheckBeforeSave1,$ws_Coms"{ SheetCheckBeforeSave0, M(x  HH H H  @H H  @ HH H H H   @H (H 08H @H HP  X h x > >qwW*d<xME (<6<y' M ITIf KMSLLHOOKSTRUC2T3ptP mouseData4 flags tod#dwExtraInfoHaVBA7Pub DeclartrSafe FunctGetFocuib "Jr32p" ()Co"SetdowsHookEx L &Alias " AByVal Lid E, ClpfnPtrhdwThr`eadId0CallNext0 ($hQ)nCode(wParamGlAny%UnhTXW'AVuFrom`Point uxlE;+%.yoDu &aPcbqbaak-Jae)ae`e>_ __岖(^pr>b;ÓNZl Lng oJamA@ 6h֜Find2glpClass"SSng1lp $v !CAProcAlpPrevWndIMWhmMSG-M#S!# #v|?ev??l ? ?u?J+8Const WH_MOUSE_LLe`14 |BMsWHEE&H20AHC_@ACTION(0GmLngMaYvcol t@"Ce' = o ==R'Sub A1 (frmU0Flor)H1O rror GoTo ErrHa ndlerDim blnApaaA,Enable@Events6f erenc҆Bo0oleaact$rlaMSs.= 0)A Pk 9= New i O O " . CsFa4zaResu0SS@ Each rXIn s 1Q()"ListBox0" OrComboQ >.`*.ADddb, CY(B!AAıa S_#W#&g p 3HD(X>, p ressOf B8G^@(.HiAa'b, 0 fX kcedv5C1Up W6:((.. @AUnA'pNot }8Ϗx;1 TieRef we+Xzq ,ErrHandler Dim mCtl As MSForms.ControlxidxtLongIf nCode = HC_ACTIO@N Then<  @wParamBWM_MOUS@EWHEEL J  #(Win64E Set= cols(CStr(/dowFromPoint(lh.pt.`XY)))E#Else 4Q, /.ndrwxNoZIs phing kv.Locked A#.Enabl?AmouseData x> 0,$ListIndex+. = - 1J N<Count %+ @@IfEEIMFProcCallNextHoo@kEx(0,ê, C, ByValuAGoTo CleanUp :D @!FunctioPublic  blnIs_UserA_Lo aded(C stName@)Boo"ClngIBYergGAFaD I=o %a}7Xf().n9= iU5TrupExitf# y8 a6I+Sub5ose.+9z&_"YCUnl6G&"A5 PSLSSp " D( " 0 8>X "  @x] !wsmod$'' !'!  .P_WS_Activ !B@oxX  . B@+ strCN = Replace(Me.CodeName, "ws", "mod")t|Y Me.Application.Run "'" & ThisWorkbook.name & "'!" & strCN & ".P_WS_BDC", Target, Cancelo !wsmod$'' !'! .P_WS_Ch  !B@ndoHH !wsmod$'' !'!  .P_WS_Deactiv !B@o !wsmod$'' !'! .P_WS_FH  !B@o` !wsmod$'' !'!  .P_WS_SCh  !B@o2Attribute VB_Name = "ws_Coms" Basx0{00020820- C$0046} |GlobaBlSpacFalse dCre atablPr@edeclaI"dTru BExposeTemplateDer iv$BustomizD2Option /licit Dim strCN As Sng P,0 Sub Worksheet_ActivA () = ReFce(M@e.Code,"mod"QApp:a@.Run "'" @& This0book.n& ! K.P_WS>*MEndMUBefore(DouaCk(ByVal Target;Range, CancelBoole_"@1G#CCh?;AB<[sesCh1 /Dea~cOuO@OeFollowHyperlinoO&_/ "ii "YFH #H_/_Sele`/on_H_H_aSsH4(=d #xME PSLSS!G >.<jstrCk B@@oL]] !B!p  !D!p (0 < <!x.H H!F'@ H B@^ 0 <%n(pkHL["modfrmMonthYearChoose.cmdSelect - J!LH @G H B@fjm ( A@rmop0 B@moPL@ N B@P N B@R Ok7 frmT.cmdOk.Left = (frmT.Width - frmT.cmdOk.Width) / 2: frmT.lblCmdOk.Left = (frmT.Width - frmT.cmdOk.Width) / 2 N!T!V  N!X N!T!9 5Z(\q0  N!T(k N!openA@^ R00:00:00$T iFormVisible B@PHL[ !! N!.UserForm_Initialize:  J!` -  J!LH@'8! Application.EnableEvents = TrueoP R$b'4 R$d'6  (0 B@fo 2G|j !B! '4 B@fop 2G|j !D!p'6 B@fo0 !B! !B( B@&d !B! !B(koP !B!  !B( B@*dp !B! !B(kHo@ !D!p !D(po !D!p !D(po ]P]h]]]'2 6 !D(p 4 !B('2oPHAttribute VB_Name = "modfrmMonthYearChoo se" Bas0{0002`0820-C$0046} |GlobalSpacIFalse dCreatablPredeclaIdTru BExpTemplateDeriveBustomizD2Option /licit @ Pub STR_SELECT_MONTHYEAR As Sng ' 'Dim blnCalenBdange$Boolean 'E - +, > int|Integer '$ //? - /FrmEnEv D-IJub UserForm_Show_Handler() If grngT Is Nothi@O0ThenBActmCell.L(ockp _A SetD= " EndoC AO.A& "  Sub0cmdOk_C~k 0 O@rror GoTo err$]wsTFWorkshee MWsProtM .Ҝ= 3cby.Value & " &txt<!a@2 12K#.=C.p@tn [d= B.ectCentsServiceModule.UNPROTAkSHEET!'#E.cBs(1, 1)=raaG@#5nd$5a6:Debug eT.ASel `r"`+Err.DescriF y_ ) @@     2 @ HbP  ( "  0@ "H P` x "   " 8@ "HPh x " "  "@HPX`h p x   x] &% ange] !DTr7 rTHeight` < 20BTA x WiREs .cTF DF2FP=.Sp)10c!(qSwvbNulls,If1iVisiSs , "open"@qy3OnTiNow + "Q("00:"")0K/B3=)BThis]book.naV!QA .+le:"YG DNumby/F@1 FFFx=Cp&CCon "tP2V6r5= f(= af4qSl= = @.MakeՒBc 0 o_Chє+ 3YYExi^t .uListIndex%1a/ / ! x/ 3@/ * 17 .~ AMinusFM?= GO oEr spivn&Sn!E!7a -> r KPl )? ? R[?_?0$Y_Up3o^h_ oe3ovOnjH;/ aj1V@?n,+a$' ߾7PciT Dim j As Integer intWeekDayp CounttsPrevMonthaNThisNpblnCalendarChange = Truefrm:Ye oose.txt .Valu.-cb?.ListIndex`1 - 1!DFalsD End Sub 2d9$*\Rffff*1562f10178*\R0*#e$*\Rffff*1462f10178*\R1*#317*\R1*#136*\R1*#129*\R1*#136*\R1*#2d8*\R1*#11c*\R1*#4e*\R1*#3c4*\R1*#318$*\Rffff*1662f10178$*\Rffff*1>62f1017b*\R0*#14*\R3*#22*\R0*#f*\R1*#3c7*\R1*#12d*\R0*#16*\R1*#65*\R0*#94     ( 8 "  HP Xx#(,d (08  @-P  h%x    < u(xx'5d7#<EKpH,idia F?}@;q*x?}@;q*EKpH,idiaMEx  @[LSSj8l4060(8< :>"PPLL * "LL<|<N0{00020820-0000-0000-C000-000000000046}qb|BCFormulas,% aq1sw2de3 `HLlk`)  % It%`@b O\%%`V `T `P %`  %`,``Zkd ) 8@ %i ,` h'ink i ` l<i X %` <`dSer` it g`' H% N%` (Fac` 83)`@ iceM `t_un % GoTo% rget %`.Mer`.Cou`_`tion`y Th``cati`.Ena` `` p!!:) n mo %) % H(iceM%`@ ink"`hLin,` tBB[) Is  %ishT.i  sT.Shai .T HH. % NhTarg%`  .V`"? `$" &  `x)   %i2 H i4p)i098, H%n%`elp`6Hj``G . `WHkP |** iB x  B@^)O  G% IP t %`Dr, ``V@k J)I @ H ing %iNh  = "i  .Sha t  %,P( `  ZiR le =i  ion ,TP ` h  miV  iR )O  n%i B@ H %% 0  %`sh XX `  )  %i  iZ N % H0 > % P 21)% p Hj %   %``G` `N!`&` H``G ` `  .)shpH %i N.<% H% 8p  %`b`rCho`dndle``f `h0`e``j n ` X cc)x N %ip( H%`@  `r! ` 8{{)X%n % Hx <%`@ < ^p`NN)Z  %i2   i@in!  % P%`b`G`d``!F`p h%P ^`Yhk)5  %iPp f`@H\k@)5 `h %i 9i8E!i   ht %`p ` P)Opx!%i ! 8`  ) %iH%`shpH,` x )%ii  '!mo` rm_S,`J4k8 9) X`%i---i  ,8` @M)O!%iP(% )p  (% &%vA@ % `  ,` xf)%)0%i b R %,@` H??t)hpIsDa %i p %` %` 8` `Z```$,` AAi`i )x %)G%i H` %` ` `j` ``$,H`Fd+  i" @)O`h%i  N t0%,$H`   )! %i  ` & ` )(cro' %)*  %i,G H %,.` ` 9)IowBl%iN i  / %,b `hE(k( I)O H P *%ip PBi  t ,% 8!` //h)!! %i:   HX!% x!D % ! %`< `>`@ F0# ` (" tt)H"P" %iH   H"% " %`:`>0`J`` R$!` p#!mm )## %iT#HEiV#XE(JiX$ iZ   HP$% \p$%`^K@D t(%"` "x % % N %8M% v%#` # x%XM% 4%% z% % |&$` $ ~&%` H&%)h& % 4&% &% X'&` &&)'' %iX 4P'% l ('` ''T )'' %i`E  H(%`Q )(` `((++h )(HR % (%` `` ` ,>))` H) ) )h)p)  %i  ,`**` ))*SS ))* % %) *  % H@* %`T,++` * + )**T %i  ` ,+,` @+, )`+h+ %i 6,,-` + -GG )++ %),, %i @, Wi  ` , % -.` ,.''V ),- %i& H@- %` [` ([` 0./` -/} i-i  ` .0` p. 0%% ).  % H.\% . %,/1` /h/$1$$ )8/@/  %)I`/p/% %)/  % /  % /^ %` ,p02`00 (2 i P0i  ,03` 0,355 iD0i a,x14` 0104 )P1X1a %i ,(25`PTk145 ) 11 %i 2 i b,36`nkh2 86;;* ) 22c %i   Oxot2% Ip2% l3 % h@3 (3`d8e`R`e`\ 47` 3<7!!e )O3@f%`` H@4% `4 % 4xg % 4 % 4 %` h, x58` 5 @8 i@5ii  `,79` 5x6D9|| )55 %iR6i (6 iP68i 6  %)6  %` k` l H68l%`@ ```( p70 % 7 % 7(m % 7 %`<,8h9:` 08x8H:99 i:P8 )p88 % %)8 n % H8% N8%`@ 0o`< Ho`> o H9o %`<,F(:;` 9L;V )99 %i p H:p%`@ ,H:<` h::P<s ):: % %):  % H:%`@ Xq,N;=` 8;`;T=!! )X;h;q % %);  % H;%`@ ,X=>`fk<x<X>44 ) (<0< %iR X< iT<r %)<  % Ip<% O\<%`<V `@R VgL0="  % HP= %,Z>?` =\?-- )== %i t H=t%`@ \P>0>`^ u`@u,`X?@`Xlk>>`@ ) >> % %)? v % Ip8?%`@^ ,d(@A`aDk??dA ' ) ?? % %)?  % Ip@?%`@^ A,"(AB` h@@hB""G )@@x? % %)@ > %` @` ? HAx.%`@ ,hC``\ khAAlC..i ) AA  % %)A @  % IpA%`@^ %n VXB % T0B %`B8B%bxBCbzCB~B&-X=ph9) >``*B(@P %0. x138@X'.0(: (;X?hB`47B(A`( +/(2p0: )x5!+&$ 0# ,8(%HX HD,%hb `bDz FE % aq1sw2de3xlNone 0.@ E( P xFF`F0FE ED!p'@p 9@HF` 9@P @F@ @F< %@, @( xG @HGGxGGhH `H`Gz GGxG@?G`G.$@p %@Gl %nHG @hO 0HG@d >G @HI8IPI IH`x%nH@l 6x~z?d@\ @hIL @I< @I, @I !@I @I !@I @J l@(J @@J @XJ @pJ !@J .$@J|  @Jl @\  8KKKLLKKh `pKl KKKpK6`h<8K$@d @T @@0LD `D@4 8P Lh8N@MMXM(MN8NPQRM x0EXNL %@Md j@` 2@MX 2@pM@ @M0 @M @N ^<Ca@N @0P xlCa@O :@  %hNPN`>H%N8NGNN`H%NhN!B9XON`H%xON.B9&@`P @N G@(O MG@@O c@P BOpO`JH%OXOh O|O`oAni%OOThen .@Sx s = PtO` H% PO- (RpP`G %hQPncelKe@HPl able@h '@xPX H@PH !L@P8 j@P( @Q (/@P @ Q odul@ te -@8Q .@R @xQ QPQ @Q QxQ QxQ N @Q 8.QQ'@ RQ HRQ @ -XR@R`H%xR(RGRpR`-%RXRleVal.RR`r - H%RRHH- TR` %@TROJ @S @0S st@HS @`S @xS ( @S @S @S V @S| !@Sx @Tt @p :l8T`+H% T L+1U1U@UXUUHV UhX `Tx 0UUXB`DT @Uh @pUX @UH @@@U8 H@V( @$ !@U %n@V @ @0V @ ==================H WPWWhWW0Wh  `Wz (@WW  Wb.@p  @W` @P '@@ ! x @YhXXXXPXXJ Excel  @XYx ====XlX`====H%XX @h 6@f @Y`  YX@\O 0YY ExcelY! &@pYX @T el 2@YP @YL `&@H XZZpZ`xXZ@h P[\[[P[h[h$`8[x$x[P[8[@\h @[X !@[H @[8 @( $@$ ====@0\ ====@H\ @@@ AB]AAX]_^]]]0^]a8](h0N h]x0]%` %H]]"x]] tp]  %H^X]@^` @\ N%^LdNJ@]D @X^4 j?@^0 n@0_, "x" @(O a0^ @p^ A@^ B@^ `!@^ $@H_ @^ B@@_ @_ B@^@_ @ @`_ p@x_t p@_d @T %n@aP 9@_@ @_0 H@` @ ` @8` @P` @h` @` @` H%@` @` %n@` %n@` @ap @(a` @@aP !@Xa@ @pa0 %@a @ :0^ @  ]f   @b?bcXccc(cb@cb(dbZ % dbxbH %bbcb: tb %bdule.A@pc` arge@\ ame,^`NfX@cX @fH @D @@c@ @c< @f8 @d( @d H!@0d %n@Hd ?@`d '@xd @d ws_@d @d @d @d ====@ex ====@ eh '@8eX @PeH p@he8 @e( %b@e elDi@e @e @e @e .@f  @(f @@f '@Xf !@pf H%@x ?@t @fd ==@fT ==@D ==g<0<<X<8=Pj0hhhHhig`hg(g % gxg Ex %gg&hg th Exc % ig Z@xh` @0iX @T ^XZNf @h8 @h( xls@h @h @`i B@,@Hi B@@O Hli%@i xlsM@i @xi @i @i !B@hj B@0@ B@B@i| @jl @ j\ @8jL @< @8 @j( l@j X@j (==@j ====@j (@j @k @(k %n@@k @Xk @pk @kx H%@kh ?@kX @kH @k8 !@l( B@@l @0l x'@ Bi(B@@?m ?Xmmmnmmm8m(`md % `lx0m  %Hmmd jxml! tpmb  %Xm(p@m` @\ lngT^bf.Value = @X gTR @`nH e + @n8 ntTC@0n( @Hn !L@n @xn 5@n "@ @ 2`3H332x32h2poo(po`qpxoooh $``oz oxo9p`o9@pL 9@pH r9J @F !@q@ @@p0 p@Xp @pp @ q @p 9@8q H@ Taho@p ~qp9@xq Pqp @ @@ Dqp%@ @q pqxq$9@ 9tqq$9q*|9z@ DD`hB8B(AB8BDD@p`mB7B^*\R1*#278*\R1*#3c6*\R1*#3c8*\R1*#      !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~  %  8 HPX `<x   %    < 0 8  @ P p ,     X V0 f < 0 8 X "x  J  Z p ,x $   &  4@ x F     ( 0 VI@  H(F6X1  8  H P X +` <a  0 , $ H P &p 4 T h   > ?   H> -H B1h   =    XL  HP (Fp 6X 1     + <a8  2x?  H>-(H1H =  & H > V8iPYp  (NB  (  0 N@(y     ' b (F6X/   + <a8 ?x  H>-@1 P=`   n (F6X0/h,a   + <a ?0 P H>`-B1 = @H P X `  |   %(/Hh p x ,B  J    (B  @H P*` 0 (0 8 @2H   "    <  8X`&p  8&  $ H`&p  & 8Xx"24  X:h .  (@P `Hh   6 620 h  x    J !  L! 6X!  !"! L! " $ "H"  # (# # D# $ $ *0$ `$ "x$ $ $ >$ %  %(%8%H%P% >h%% >%%p&  2x& b& j' *' (' ' $'  (  8(H(P( 2`( X( ,(  ) () V8) ) )  ,))x) $h** 4* *++ ,+  +  ++ 6+  .(, 0X, , *, F, @- PH- - - - - 0- . *. R@. .. *. . / L/ <h/ / D/ &/ B 0 Zh0 V0  1 (1 @1 X1 p1 $x1 ,1 t1 H2 P2 *p2 2 $2 2 2 3 L3 h3 0p3 3 3 $3 >3 * 4 $P4 x4 4 P4 4 D4 085 h5 p5 5 "5 5  55556 06  H6X6 2`6,6  6 `6 87 @7X7`7 h7 p7x7 88 (888H8X8 `8 "  h8p8 x888 .8F8  09 @9 X9`9h9p9x99 9 9:9 99: .: r8: |:B 0;@; H;h;;.;*; < < @<hH< < <<< x= = === > 0> &@>  |h>  > > ? 0?  @? H?  X?`?h?p? x?  "?t? (@ 8@ @@ H@,P@ @@ $@ @"  @@ @.A@AHA XA4pA A A AA (A*B0B PB0pB^B "C,(C  DXCC8C C C D D8D@DHD "PD 8xD*D FD (E0E  "8E `E pE .E4E*E F(F 0F 8F @FHF (PF .xF F FF|F XG :`G 0GVG  D(HpH8H H H H HIII   I0ID8IIIlI *(J XJ 4xJ ^J DK XK`KhK pKxK8KK RK 0L 0PL VLL L>L (M8M@MHM  PM XM" xMM (M M0 M 2M  N(N&10N(%XN*/N2/N0/N2/O0/PO O NP `P  hPpP >#P  PP P PH^P 0Q8Q @Q ,XQB QQ Q Q .QQ QQ Q 4QB  R  R  (RHR `R hR<pR RR @R $S (S HSB hSS SSS S SS S T T(T0T8T @T HT@PT TT T T"  T T TTU"U0UHU "`UU UU &U(U  6V 68VpV6VVHV(W 0W 8WPW `W xWW$WW W W 6X  .@X .pXFXXYY YY 8Z HZXZ pZzZ [ [ ([ 0[ @[ H[P[ X[`[ h[t[[ \ .\  8\ H\X\  h\"x\  \>\L\ @]8H]F] ] .] :^  "@^h^^^^  ^^"^ ^"^  _  (_FH_ ____ _ ._ `  $` @`P``a a  a a(a 0Ha xaa(a a,a bb b b b(bb $b b Xb"  PcXc `chc"pccc "ccc dd & d(Hd pd"d  6d 6de68epeHee e ee f f@f$`ff f f f  0f 0gF0gxgg0h 8h@h h hh iz i i i i i i ii ij jx jj j .j  j jj  k"k@kXk*pk (k  kk kk l"l 8lHl`lpl xl l  (ll0lll&m  (m&8m&`mmm  n (n 0n8n Pn Xn `n <pn"  nn nno  o o0o DHoooooooooo oo rohpppxpppppppp  pppppppqqq q8q Pq  ,Xqqqqqqqqqqqq q q r r r (r  h0r  rrrrrrrrr rs(s0s 8s @s~Hs s s s"  tt t0t  HtXt pt xttttttttt t tt  tuu u8u@uHuPuXu "`uu$uu u uu&v(v0v8v@vHvhvpvxvv v v~v w & w Hw Phw w w w x  x (x Hx Px hx (x <x x (x y $8y V`y Ny @z "Hz pz z z z z z z z Bz H@{ { { { P{ { B| dH| | | | | L| ,@} Pp} } @} J~ nX~ ~ ~ ~ f h "p     0  . "P" x $ Ȁ؀  0P p 8Lȁ0  8"Hp  0 @Ȃ $ 0 XH < < X <H  <p F 6 .0 l` Ї    ( H (X:< >@X p&$   (8 @ H P"p "$ ؊    *0"H J\xȋЋ؋ &"   ( @ HP`x   "   ، 0P 0X  ,B Ѝ ؍    Vp  ȎЎ؎ $B   ( N(@11ȏ Џ ؏  8B  0 8@ H X hp А   : 4P $B  ȑ J Dh LB   0@ H X xFГؓ 448p  Д 4 0  P*`( "4 8 @`p &  ؖ$( "8` h Hp D LB$ Php ( &И 44P  ؙ 4 H  .h" *К"(@PXp4x ț Л &  H  .h"" $ 8HPh p BxB ȝ Н ؝     ( 08@ BH  B  ,B  08 @ H Pp x    :"  ( &@ h( 08@\P   ȡ ,B    ( 0H PX ` PhB   Ȣ Т .آ     :N(h px   X" (8 @ P  `p   Ȥ  6 HP X `hx D    L8 *" Ȧ Цئ   ( 8@ P  X  h x  (ȧЧا ( |    ,   $    ( H Php  x     " H  P h p  x   0 Ъ       4 P X `  h ,p  $  ث  ( 0  8@ HPX` h p>x  Ь "$. ج  ( 8 H  h x     ȭ ح   8 @ Xp x"   Ю    0  @PX 6` (`Я 0 @ P` x: Ȱ ذ  6 @ P ` p  4 б   (8@ H`hx    Ȳ в   B BX "" ȳ гس   (@ P ` &h"   ش2 8 HX J`"  ȵ (е"     0  @ Ph    ȶ ж ض 4"  ( 0 08h    ȷ ط  (  0  @ X p     и     0  H ` x    ع  "(( "P x  غ  8 P ` p     лػ  (@X p м 0 P p    Ƚн ؽ  8 Ph Ⱦ  (@ ,H"x  ȿ    08@HPX` h &p"    .4 @ H P ` 6p < 6"  ( 08@P  X&x6  *0@HP Xh, :.0  2H $4 ( 08@ B   LPX ` h 2 B     .  8 HX h   < 40h    B   ( @ P p,x  .48 Xh p x B    ( *8 h px N *` N (B    (H PX` h 0B     N @ X hB     4&F  hT    &F@  T  ( 0 48 4p~ ( 0 @P X`h p x       0 .@" p         ( 8 Xhx    ( 8 " @PX`x "     .  (08Ph     >  >0 @pB       (H8       J 8@` h $B  @  BB  H P,h.   ,. @  H,X.   ,. @  H,h.   ,. H  P,h.  (   0 ,@B  px 0     &B 8H .QPJ1    N (0 ,8B hp x   B D((`Gx7  4L    ( 88X p         01 @H "  P Xp , (( 8@H  `*" "( 8 @ H PB  p x    6 ( 0 H Nh ^  H \B h 8X0B  ( @FX 0  : (8P X  (` @   >    8  HX p x             (H hpx hL  @ P  `px4   LHP X`  h   > 8 T@   B  (0 8X p  (8HP  hx  <   ( 0"@.h   V (0H hx   ,B    8 &P.x     F hp  6B     0H `4h  :   $(B  PX `   ,   (08X *` "  " & "( "P $x ( B   #@`x   2" &L   0(8P h>x !       ( 0 8@H h  :B    20H`h Lp  (vn`tpxtv`zX  j X p x  ,   ,B  ( 0P h 2" .V   ( >0B  px   2-   (0 @ H.VP    2B   (@` x  . :( hp x N    (  60 B  h p  x      >"    4 (   `  8p  4   J   0 @   X  `   p  x         21        x]DhB%]DB ]D ]DB8`L(]F !x.Hge_Han]F H!F'@]F H!x.N /] F N!!']8F N!!&']PF %n %'strC]h]]] N!! B H shCalendar % N!<!99&q@ @G H B@^j shCalendar H%B@k HshpHelp % N!99&q @G H B@^jshpHelp H%B@k` HshLink % N!99&q @G H B@^jshLink H%B@kk <    <(& modServiceModule.RowsAutofit grngT.<'k8 'Q If Left(Target.cells(1, 1).Value, 4) = "http" Then '(FaceId=610,1741,2934,2083)O If modServiceModule.blnShpExists(et_union, "shLink") = False Then GoTo end__ If (Not Target.MergeCells Or IsNull(Target.MergeCells)) And Target.Count > 1 Then GoTo end_6 If Application.CutCopyMode = xlCopy Then GoTo end_ With Application .EnableEvents = True .ScreenUpdating = True End WithD If wsT.ProtectContents Then modServiceModule.UNPROTECT_SHEET wsTT If modServiceModule.blnShpExists(wsT, "shLink") Then wsT.Shapes("shLink").Delete% Set shT = ShGetOnFaceId(wsT, 610) If Not shT Is Nothing Then shT.name = "shLink" With wsT.Shapes("shLink") .Top = Target.Top. .Left = Target.Left + Target.Width + 2 .Visible = msoTrue? .OnAction = "'" & wb.name & "'!modInfo.FollowHyperlink" End With End If GoTo end_ End If %n!m/d/yyyy7) -> (FaceId=1106,1098,3821) %n!GHj shpHelp %GHj ! !$ !x GHj N!! GHj N!99&q H!FG H B@^j HshpHelp %GshpHelp H%B@j) ' 1 - Excel& Set shT = ShGetOnFaceId(wsT, 1106) If Not shT Is Nothing Then shT.name = "shpHelp" With wsT.Shapes("shpHelp") .Top = Target.Top. .Left = Target.Left + Target.Width + 2 .Visible = msoTrueN .OnAction = "'" & wb.name & "'!modfrmDateChoose.UserForm_Show_Handler" End With End If7 2 - et_unionshpHelp %B@ HB@ %n.<#* shpHelp H%' N!('!modfrmDateChoose.UserForm_Show_Handler9 !9 ! !  9 9qH %n! mmmm yyyye<) -> (FaceId=1106,1098,3821) %n!GHj shpHelp %GHj ! !$ !x GHj N!! GHj N!99&q H!FG H B@^j HshpHelp %GshpHelp H%B@j+ et_unionshpHelp %B@ HB@ %n.<#* shpHelp H%' N!-'!modfrmMonthYearChoose.UserForm_Show_Handler9 !9 ! !  9 9q0H(  e ->  %n!GHj %n.<  N%`!b(  N%`!b!B@  N%`!b!' !  <%n! <%n! <!!!x    H%! '    <%n! <%n! <!!!x   <!!!x  H%(@d8.<'k ? B@Z %{DOWN} N!B@   %n!p$$ %n!Z!ffeV shpHelp %GHj ! !$ !x GHj ! GHj 99&q H!FG H B@^j HshpHelp %GshpHelp H%B@j\UPDshpHelp %B@ HB@: %n.<#* shpHelp H%  ' N!&'!modfrmMultiAdd.UserForm_Show_Handler9 !9 ! !  9 9qp Hh   H!ws_03 H!ws_04 %n!  ! e shpHelp %GHj ! !$ !x GHj ! GHj %n!! GHj  99&q0 H!FG H B@^j 8 HshpHelp %GshpHelp H%B@jLshpHelp %B@ HB@ %n.<#* shpHelp H%V8 ' N!''!modfrmDoubleVal.UserForm_Show_Handler9V !9 ! !  9 9qHk-------------------------HxLp[ !! !.General_Ws_SCh:  J!` -  J!L on ' H!' H N!5 G 9j5& G 9&jqo & vA@L0 %n!!'HzLi  F`L   ##.##.#### $="+2 $0 $ $. $b0 $ $b. $d'ldkkHL[modServiceModule.strIsDate - J!LcodeHxip %` 8L( Z]@F$./ /_SHE n]`  $$G$'jk`2 ]x  $$G$'j k `]F'  $$G$'jk`- ]F'  $$G$'jsik]F !x.H z]F H!x.N Y]F N!!'.xls]F N!!&'h]0F H!F'@]H ook (w]h]]F %n!'2ookMac]F %n!'6m) ]Ex]F'' macro'] 8 5]PF' - 0,]h G 'j' N  %b  N%`!b. !x.ls !!x'd[AddDelDinamRowBlock -  HHk@/ / /=============================================== %n!p'  !r$$#'d` 'kP    H%l!G   H%l!!!x'j:kF lngEnd = lngR + intS - 1 ' ( )@/=============================================== %n!p ? % !p[]G'j?  ' v If modServiceModule.blnIsHLColor(wsT.cells(lngR - intS, intC)) And' modServiceModule.blnIsHLColor(wsT.cells(lngR - 1, intC)) And' Len(Trim(wsT.cells(lngR - 1, intC).Value)) = 0 Theny Set rngTT = wsEU.Range(wsEU.cells(rngAdd.Row, intC - 1), wsEU.cells(rngAdd.Row + (intS - 1), rngAdd.Columns.Count)) rngTT.Copy> rngTT.Copy Destination:=wsT.cells(lngR - intS, intC - 1) CC ' $ With wsT.Range("A" & lngR - 1) .UnMerge: .Value = strAddRange? End With@8 Else ' , G'j N! ? G9j G9&jq @G H B@^j  :      H%B@A@ :      H%l B@i :      H%l!!G :      H%l!(jA@, ' \ modProv.AddDelCellCheck colorCyan, wsT.Range(lngR & ":" & intS * glngAdd + (lngR - 1))i    H%n!pG    H%n B@j "x" - ?# ' " With wsT.Range("A" & lngEnd) .UnMerge .Value = vbNullString; End With   '+ If Len(Trim(strBlockColumn)) = 0 Then?R modServiceModule.Renum wsT.cells(lngR, intC), True, intS, strBlockColumn    H%n   B@? ElseO modServiceModule.RenumBlock wsT.cells(lngR, intC), True, strBlockColumn End IfA?% -  '?    H%n %G     H%n    H%n B@j GHj    H%n!   H%n      H%n H%l l   H%n   H%n H%lB@xBkpkh' End IfKCd/ strAddRange = wsT.Range("A" & lngEnd).ValueA' ' 8* If Not Len(Trim(strAddRange)) = 0 Then# ' :? strS = Replace(wsT.CodeName, "ws_", "end_") 'end-?9 If Not modServiceModule.IsNameExists(wb, strS) ThenJ Debug.Print " " & strS & " " & wsT.name GoTo end_ End IfA@D) intEnd = wsT.Range(strS).Column - 1$ ' L If Not modServiceModule.blnIsHLColor(wsT.cells(lngEnd + 1, intC)) Then{ӛ8( Do While Not rngT.Rows.Count = 1# wsT.Rows(lngR + 1).DeleteA LoopF Set rngTT = wsT.Range(wsT.Range("G" & lngR), rngT.cells(1, 1))?6 modServiceModule.UnmergeRngValInAllCells rngTT> ' , ? For intC1 = 7 To intEnd:; If Not wsT.cells(lngR + 1, intC1).MergeCells Then BS If wsT.cells(lngR, intC1).Value = wsT.cells(lngR + 1, intC1).Value ThenP wsT.cells(lngR, intC1).Cut Destination:=wsT.cells(lngR + 1, intC1)? End If End If Next wsT.Rows(lngR).Delete% lngEnd1 = wsT.Range(strS).Row?m modServiceModule.MergeAllCellsInRngVal wsT.Range(wsT.Range("G" & lngR), wsT.cells(lngEnd1, intC - 1))xB ' $ With wsT.Range("A" & lngEnd) .UnMerge .Value = strAddRange End With 'E modServiceModule.Renum wsT.cells(lngR, intC + 1), False, intSxB) ' Else ' 8 Do While Not rngT.Rows.Count = rngAdd.Rows.Count# wsT.Rows(lngR + 1).Delete? lngEnd = lngEnd - 1XB LoopA@DJ Set rngTT = wsT.Range(rngT.cells(1, 1), wsT.cells(lngEnd, intEnd))= modServiceModule.UnmergeRngValInAllCells rngTT, False* modServiceModule.CreateRngHL rngTT End If ' A Else N! G9j G9&jq @G H B@^j :     H%B@ + If Len(Trim(strBlockColumn)) = 0 Then#?@>   H%n   B@xB ElseZ modServiceModule.RenumBlock wsT.cells(lngR, intC + 1), False, strBlockColumn, intS End IfkkHL  $  :  J!` $  :  J!L Z !A@X:H @G H B@fj N! G9j G9&jqoL]F !x.H]0F H!F'@]H %n!p$GHj %n!p %n!p. $ '>  : @G H B@^j  9 9 9qkxHpLh[%modServiceModule.SetRngIndentLevel - J!L:H  @G H B@fj?o( Excel lrngT - , strAddRange - ( ), blnMsg - v 0 - , >0 - - `A?L]0F !x.H]PF H!x.N]pF !' ] - ]-   N%`!b!!x'" "    '$?' $ N!2 N!47* - xlsB xlsM $ ' !$ 0 Excel ! &6 Excel 2007  Z !A@XDkHxdp 0 ! & xlsB? ( Z !$X * (? NB@, N! b2 NB@% xlsB ! & ' N! ' \ !A@X B@. H!FG H B@fj !B!x B@0?d NB@Bkkkk $ e C " ! &! Excel Z !A@X A $ 'k?H?L?[lngCheckExcelMaxRows - J!LHx?ip? >lngBlock - @?]F !x.H]F H!ws_dt_$'?]]   %b  H%l!  H%l!!x  'kP>@ ( 2 4 % %n!8 4 % %n!:'   $'@ %n(?  .$$ %n(p %n!p  .$ $ " %n(p?General %n( %n!p %n(:> ,    %n! H%l%n@9<85Z(\5Z(@> %n!p9p??q;k;d; &#  4 % %n!p'? $< 4 % %n!Z!'k: (B? 4 `D 6 4 6 % %n %> 6 % %n$$< 6 % %n!p': 6'4y9k9k99k9 4 % %n! 4 % !%n!p'kP9dH9 %n!'    H%l!%n! G 4   H%l% !%n!p'jk8 $ $$<G0'j@?  .$$ %n(p %n!p  .$ $  %n(p?> ,    %n! H%l%n@95Z(\5Z( %n!p9pq6k6k6?d6   3#   !   ! H%n!p'>    H%l!%n! G   H%l!%n!p'j $ $$<?  ! H%n!8  .$$  ! H%n(p  ! H%n!p  .$ $   ! H%n(pD  ! H%n!p   H%l!%n(pk4k44d4'6 6 %n!p$$b 6 %n!p'<8 $ $$< $@.0GxjXB`D 6 %n!8  .$$ 6 %n(p 6 %n!p  .$ $  6 %n(pk 3'4 6 %n!G 6 %n!!!x'4j 6 4 '6@@2k2k2o2 Excel Lp2 NG .Nj] ] F''D*xlCalculationManual BG 'Dj&xlCalculationAutomatic: B'B 5, DG D9,j>TB5 BG B9j@5 BG B9jB 5& BG B9&jD ?5F BG B9FjH 5H BG B9HjJ c ?5J BG B9JjJ If Not .EnableMacroAnimations = blnFast Then .EnableMacroAnimations = blnFast ' - 2010G If Not .EnableCancelKey = blnFast Then .EnableCancelKey = blnFast 'q/ B H N!J H!LG H(LjN 0/k(/H /L/[ !)!modServiceModule.SetAccelerationState -  J!LH.o. &  Lh.] ' N H%.?z8.L0.'i .-  L- R$-GHj R$<G'PjH-L-[(modfrmDoubleVal.blnRealPositiveNumber - J!LHH-i@-:  strRngName - strVal -  (( ?Lx,] ] ]8 NG .Nj V N%`!b. !x.H?  !n!xA?  %n!p R: 'Ty+k++H+L+[+modServiceModule.lngValidValInListExists - J!LHh+i`+  :P L+] ] 8 ?]X ]x  XB`D]   ]  :](-  @@]@ !x.H H!x.N %n!'! %n!'!/ / pA/===============================================>'  %n!p+ ? N  %b[ AddDelDinamRowBlock -  |(k(  N%`!b. !!x'd  !r$$#'   H%l!   H%l!!!x'k(k(    '\B/===============================================( Excel (========================================   N!46 - @@ !$ 0 Excel ! &6 Excel 2007  Z !A@X@@|`&dX&0 ! & xlsM? ( Z !$X * (GCB NB@,4 NB@ (% xlsM ! &  N!  \ !A@X !B!x B@0 ?d$ NB@Bk$d$|$k$k$    e" ! &! Excel Z !A@X|$k#(======================================== ( @@ (&? H B@^? %n!p:   :      H%B@ :      H%l  N%`!bB@d"  :     H%B@ :     H%l  N%`!bB@k0" H G   H%nB@Hj?   H%nA@, "x" -  A  H%l BC@\ 9pq`! Z$B   H%n  B@d!   H%n Z B@^?k  -   H%n!p   H%n!p. $ '   H%n? 9 9 9q0 H G   H%nB@Hj G|j<8 ?     H%n      H%n H%l l   H%n   H%n H%lB@k'|dA  H%l!p' :     H%B@ Z$:   H%n  B@d0   H%n Z  B@^k|k|L  $  :  J!` $  :  J!L Z !A@XXB`DoH : QmodServiceModule.AddDelDinamColBlock Target, Replace(wsT.CodeName, "ws_", "add_")XL]]]  ]@X]p]- ]] !x.H H!x.N? %n!'b"? %n!'d" _h' H!ws_end_$'j/ / ?/==============================================='  %n!p+ N  %b[ AddDelDinamRowBlock -  |(k   N%`!b. !!x'd : !r$$#'  b H%l!?  b H%l!!!x'?kpkh d   '?========================) Excel )========================================= d  N!47 - !$ ?3 Excel ! &6 Excel 2007  Z !A@XVD|d3 ! & xlsM? ( Z !$X * (CB NB@,4 NB@ (% xlsM ! &  N!  \ !A@X !B!x B@0 ?d0 NB@Bkd|kk d   e% ! &! Excel Z !A@X|`kX(======================================== ( @@ (&? H B@^? %n!p:  N%`!bB@ d H%B@A b  H%l B@lA?  B@& ""d  ! d H%B@ Cd %n!!!x'f f bB d H%B@ f 'fkkx! 'h b h d H%n!Z!b h 'h b h d H%n!p'f?  d j H%l! f b h  H%n(p f 'fw wsT.cells(lngTR + 2, intC).Value =' CStr(wsT.cells(lngTR + 2, intTC - 1).Value + 1) & "." & intC - (intTC - 1)HL[ J!L?Ho5 ("", "") L0]F !x.HeD]F H!F'@] HB@z9 ( @G H B@^j %n! p$  9 999t9v99x |9zr9pq   %n!  p  p e  9 999t9v99x |9zqH !ZBTahoma9 9\9~99999 9 .ColorIndex = 5@;s$@9Dq% dp  9 999t9v99x |9zq k p$r'r9d p'rk " r'$  H!'! !r r p !B@ !ZTahoma9 9\9~99999 .ColorIndex = 5?;s$@99q | L , $  :  J!` $  :  J!L ZA@Xo0 "x" - L ]`F !x.H?]F H!F'@ (: @G H B@^j 5B@ 9 999t9v99x |9z 5(9pq  !Z? Wingdings 29 9\9~99999 .Color = 5921370 'ff9.9xlUnderlineStyleNoneq0   !C@  l  C@B9999 9CB999qx |p Lh , $  :  J!` $  :  J!L ZA@Xo' C'lngBlock - ?JSub Renum(rngT As Range, add As Boolean, Optional lngBlock As Integer = 1) On Error Resume Next Dim strS As StringA? Dim intD As Integer: rngT.NumberFormat = "@" ' ? If add Then! ' 6 strS = rngT.Offset(-lngBlock, 0).cells(1, 1).Value! '  If lngBlock > 1 Then For intD = 1 To lngBlockP If modServiceModule.blnIsHLColor(rngT.Offset(-intD, 0).cells(1, 1)) ThenG If IsNumeric(Left(rngT.Offset(-intD, 0).cells(1, 1), 1)) Then: strS = rngT.Offset(-intD, 0).cells(1, 1).Value lngBlock = intD Exit For End IfC End If? Next End If< If rngT.Offset(-lngBlock, 0).cells(1, 1).MergeCells Then?B strS = rngT.Offset(-lngBlock, 0).MergeArea.cells(1, 1).Value End IfJ If Len(Trim(strS)) = 0 Or Not IsNumeric(Left(strS, 1)) Then strS = "0"< rngT.cells(1, 1).Value = Left(strS, InStrRev(strS, "."))^ rngT.cells(1, 1).Value = rngT.cells(1, 1).Value & (Mid(strS, InStrRev(strS, ".") + 1) + 1) ' Else intD = 1B?F Do While Not Left(Trim(rngT.cells(intD, 1).Value), 8) = ""& strS = rngT.cells(intD, 1).ValueI If Len(Trim(strS)) = 0 Or Not IsNumeric(Left(strS, 1)) Then Exit Do: If rngT.cells(intD, 1).Value.HasFormula = False ThenC rngT.cells(intD, 1).Value = Left(strS, InStrRev(strS, "."))h rngT.cells(intD, 1).Value = rngT.cells(intD, 1).Value & (Mid(strS, InStrRev(strS, ".") + 1) - 1) End If: lngBlock = 1` If rngT.cells(intD, 1).MergeCells Then lngBlock = rngT.cells(intD, 1).MergeArea.Rows.CountB intD = intD + lngBlock: Loop End If:End Sub) rngR - :'strAddress - ?intC - - Bp %n!G|j:]h]>]] A]8 !x.DTEHSHEET %.P@> %n!'b %n!'d@?  B@^ P B@^  P%l!@G@  P%l(j  P%l$  P%l- A  P,lXB`Dk} 2  P%l  P,l3.  P%l'(B?dh}) ' 9 wsTeh.Range(strAddress) = wsTeh.Range(strAddress) - 1 '  lngR = lngTRQ Do While wsTarget.cells(lngR, intTC).Borders(xlEdgeBottom).Weight <> xlMedium5' wsTarget.cells(lngR, intTC).NumberFormat = "@" If Len(Trim(wsTarget.cells(lngR, intTC).Value)) > 0 And' InStr(1, wsTarget.cells(lngR, intTC).Value, ".") = 0 And' wsTarget.cells(lngR, intTC).HasFormula = False Then6 wsTarget.cells(lngR, intTC).NumberFormat = "@"Q wsTarget.cells(lngR, intTC).Value = wsTarget.cells(lngR, intTC).Value - 16 strS = CStr(wsTarget.cells(lngR, intTC).Value)x ElseIf Len(Trim(wsTarget.cells(lngR, intTC).Value)) > 0 And' InStr(1, wsTarget.cells(lngR, intTC).Value, ".") <> 0 And' wsTarget.cells(lngR, intTC).HasFormula = False Then6 wsTarget.cells(lngR, intTC).NumberFormat = "@"`D@ arr_strS = Split(wsTarget.cells(lngR, intTC).Value, ".")0 wsTarget.cells(lngR, intTC).Value = strS( For intI = 1 To UBound(arr_strS)f wsTarget.cells(lngR, intTC).Value = wsTarget.cells(lngR, intTC).Value & "." & arr_strS(intI)`D Next End If lngR = lngR + 1 A' lngR = lngR + intC Loop"  P%lX   P,l@ ? %n!p$'p+ : %n p $X '? X  X '? G|j ? b'  d %n!p$b  d %n! p   d %n(p X  X ':ku   'ukuou ?  p?  4B@o`u  :R u 4GRj;>@>]] 4!x.@A TemplateOperationMode$X '   x  ~  z     4B@CBk0tR(to t /   N!<>  NB@A?ksds N!  NB@:kskxsops/ ]  !! !(B  A@l ':dr !( 'kr %n  B@n3 opr%  &8R(r]'  Rqkq  Title Subject Company Comments  %!p''dhq  %!p'>'k@qV8qR0q'V qiq  'Rp GRj Title Subject Company Comments  %!p'dPp  %!p'k0pV(pR p'Vpip2 ]]@ NB@z9]*  !* '  N!`? X   @0XB`D  2ko : 'in4 . -  8R@n] ! %l.R R!x!'.RznRm'imD , ?= NOTE: , F : "1.2.4.64.x", x - , ?]]]](' Gzj % B@H? .? %n!pX  !!x !!xz(lk l %n!8? %n!dX ' A  %n!pX ' = Gzj ?.'?'$  $  b $ '$?  $xkkkk   $   $  $X'   $ $X ' B@HGeneral (' -   X  %n(p  %n!pX '?dj %n!pX ' = Gzj>'$  $ .b $ '$D  $Gxjpi   $  $$X'   $ $X ' B@H?@ (! -?   X  %n(p  %n!pX '?khihB , = NOTE: , F : "1.2.4.64.x", x - , & &&@]0]Ph?]]?'   Gzj   %n% .  %n!8 %n!dX ' G ? %n!pX ' C Gzj?.''$  $  b $ '$  $xfkee   $   $  $X'?   $ $X '' , 8 %n!pX  b? B@HGeneral () -  X  %n(p % .   'd   X 'dd %n!pX ' G Gzj'$  $ .b $ '$?  $Gxjc   $  $$X'   $ $X '' ,  %n!pX  b  X  %n(p B@Hu>@>@ (# -? % .   'b   X 'kbib; SheetName wb?L0b]'H  N!J: !X "?'HzakaaLa'Hia<************************************************************ <************************************************************CB & L`]0'$ %n!!'Dz`L`'$ip`  4rngFrom - ; rngFrom - ; strMsg - ? H?] *!x.H (!x B@^ , G ',jzC (!x! *!x! (General9 =(' H!'! *%r<>"";' H!'! *%r;" ,")9:CBq^d^ (General9=( *%r<>""; *%r;" ,")9:`DqH^k@^o8^ :&  L]]'. N H%.Bz]L]'.i]J strName wb08]] 'b  N%`.@>2]0]'bV\2\4\4\  !6X  !6X # CB'bk\V\Vx\ip\ Q  >@>]@!]`!!]!!]! !x.H   ! !!r'< B@\? < H%l.  %nB@ %n!8 %n!:'>A?  D > (:&$ ZBZkZ : @ '@ @ %n(D  B %n!D (D+ ID ZkZkYBYYoY F / $ UnmergeRngValInAllCells!DBL0Y]x"]"]""":]#]# >@> .H? H!.BdX !x.HDkX ( (: (& H B@^ H  ! ! !!x '> 'J.  ! ! !!x  -   H%n!D$ J$   H%n!8 >$LpWkhW    H%n.+ ? !8 !:'>% :dV !D'J ID '> J$zC.LVkVkxV )   H%n!D J J$   H%n!: > >$e- ?    H%n$N.:dU !n!x.LUkU B@P tB?) rngT.BorderAround 1, xlThin, 15 >$ General9 >9:qTkT  ! !!x > ?. 'J '>dT   H%n.- ? !8pA !:'>' d T !D'J ID J$.LSkSkSkSkSLSSSkSHSLS)modServiceModule.MergeAllCellsInRngVal - J!LA@X>H@S (zCo(S  0xlNone0#]8$X$]x$]$ !x.H .\  %n!p'D? ( (&DC H B@^ H!'^ ` H(: HB@H B@H?@> 5B@zC 5(?58G 9pj9 dC@b9qQ TxlNoneG|j T$~blue 5B@? l  5B@?5(:5(5(5( 5(5(?5(XB`D5( =?%5(@>9qP T$~cyan T$~yellowe 5B@ V0#,##0.009   fl  0h999999999999999999999999j5B@5((B?5(XB`D5(5(5(. !5(?5(5(AD\BdO V9 V@ ll  n900h5B@?5(zC5((B?5(`D5( X5(' 900 !5(h5(5(kNkN p5(? T$~yellowG 5(j9qM T$~greene  V0@@#,##0.009 V@e V9kXM r5( D9pq8Mk0M d B@bal ^ H( \B@z?oL<************************************************************<************************************************************@? $]$]% ^.N  N!J u) B@z? nB@H?Tahoma !Z( !Z(\ choK (%]h%]%]% ^.x@? 4 x!JB 4B@z z 4!'$  4!'$ !A1 z(? z? 4oJD ?% ^A@~?@>o0J! &VI]p&]& GVj !. (&itu 4 !J? 4!b! ! 4B@z? ( tkXI 4<8 B@zV0IV(I (&=@>oI. &]8' X !!x % !%( X %.4 4!b( 4B@z?E12:G12 4%lB@H  5(<8 5( 9 999t9v99x |9z95Z(~  7(  7(  7( t a d 7(8 7(  7(? d 7(:8 7(  7(;@>  7(8 7(  7(  7(8 7(  7( 200 d 7(8 7(q FE12 4%l(pF12 4%l(p G12 4%l(p5@12:12 4%(BD:D 4%(R:@E:E 4%(GzY@F:F 4%(G:G 4%(E13:G13 4%lB@H Tahoma5Z(: 5Z( 5Z(\?5Z(5Z(pA?5Z(XB`D5Z(5Z(?@> 5Z(:05Z( 9 9  7(?  7(  7(BDB  7(t   7(8 7(?  7(=@> d 7(??8 7(B  7(  7(qC1E13 4%l(pbmi2F13 4%l(p3G13 4%l(p?E10:G10 4%lB@H B@P 5Z(~5(@> 5(B 5( 9 9  7(  7(  7( d 7(?8 7(  7(BDB d 7(n"8 7(  7(?  7(>@>8 7(A?  7(B  7(8 7(  7(q@ E10 4%l(p5@10:10 4%( nA:C 4%B@H !(1:6 4%B@H !( (?? 4!nB@HD !ZTahoma9 9\99999q?o? Autofit X'B]']( !x.H !B@  ! ! !!x  >  H%!  G   H%(j>o> 08.09.2011/AutoFit ?6 /rngT - ? (L=](](]((D]( !x. !!' Target !!!x'$  B@^B# Target9  %nGeneral9 9 99 !9  ! %n9pqp<  %!B@(  %n!', 1 ?  %n(p%  %!(, , . @?       %!!     %( se=  %! G  %(jk::|:L:  $  :  J!` $  :  J!L Z !A@Xo0: )'> %n!!  %n!!?'>k9i9 + <@rngT - )L9](*]H* !x.H %n!p$GHj (? (& H B@^B  % ! %n! 'd88 % !!'k8  ! H%n!! %n!!b  ! H%n!p %n!p?  ! H%n.B  %n(p: B@H:H@7k87  ':  ! H%n!G  ! H%n!!'j6 : ! %n! 'd6 %n! !!!x 'BkP6  ! H%n!! !!b  ! H%n!p %n!pA  ! H%n.  %n(p: B@HH5k5  ! H%n!  '?dP5  ! H%n!  ! H%n!!!x ':k54H4! Application.EnableEvents = True# Application.ScreenUpdating = Truez4L4  $  :  J!` $  :  J!L Z !A@XonHFi3G***********************************************************************?$ CutCopy &?@>G***********************************************************************" Range Object Available`*L2']* %n!'z2L2'i2 ?) +L@2 !!r'z(2L 2 'i2G*********************************************************************** : 01.10.2012 +reAL`1]`,]x,-********************************************* %n!p$# !r$ $' %n!p$e  !r$ $ 'k0  ./k/ %n!p$# !r$ $' %n!p$e  !r$ $ 'k.  ..k.-********************************************* %n!pX %n!pX   !r$ $&  !r$ $'k-  .-d-'z-k--'   Z !A@X  B@d0-[ k-z-L-'[ J!Li, `D 23.06.2012' ( ) ,](-]H-]`-]x- !x.H H B@f !&'? !' (& ( HB@z?A1 H%lB@H> B@mp? %n!!'?A@ H B@^  %n!( H B@f?A@ H B@^?  %n!(\B H B@f B@H H B@f  (  (&@>o*-]. '    B GA@jp*oh*0.].]. !x.H H B@^le !!x G   %(j  ? 5B@: 9p9 7(? 7(>> 7((B? 7(Bq`) ! 9 99q0)()o )8********************************************************ŀ?8********************************************************9 wsT, rngTarget.L@(]//]/ H!F' H B@^ H!$. dP' .@?k8'k0'('H 'L'C Debug.Print "modServiceModule.rngFindAsLink - " & Err.Description?H& G H B@fji&  /H& $ $  'i&< , . .  andp0 ? D $  $  b D $  $  $ $'D0%? D $  $  b`D D $  $  $ $'D$ D$ $  b? D$ $ $ $'D@$ +  D $  $  b D $  $  $ $'D# +  D $  $  b D $  $  $ $'DB0# +  D $ $  b@> D $ $  $ $'D" +  D$  $  b D$  $  $ $'D?0" D$'D D$<G D $'Dj D'i! 03.09.2013% `D0L! %n!!l7 %n!!h'k(!L !i! 03.09.2013 :x1L  %n!!l/? %n!!h' G $'j:k8 H0 L( H Debug.Print "modServiceModule.strListInRngExists - " & Err.DescriptiontBHi% (2L]2]2]2]3]H3`3]x3 !x.H H!x.N  %'   %n!p'R? $=#%  $'  N%`!b.  !n!x- Debug.Print rngT.cells(lngR, 1).Value  %n!p R'ykd  ;  ;$'?    R $'yHk@8d0 R G'jkkkHL[.blnValidValInListExists - J!LHi3]3$]4$tB](4H4]h444]4AllSheetsInThisWorkbook N%J.H >" 2: H!!!x H%B@''  N! !b! C ? !A  H%l(p  'dA ? !B  H%l(p  'ko 4L]`5'   v!x $v! B' z(k L[!modServiceModule.blnFormLoaded - J!L>i  GblnLookAtPart - 'strVal' strVal & "*"XstrLookIn - (Formulas), (Values) (Comments) , . ( Function strGetRngValForFind(rngT As Range) As String)BblnVis - , .. U rngTarget 255 @>Formulasx5Lp]6F !']6F !&']6F !x.H]6F H!F'@]7F'"LookAt=xlWhole - 1, xlPart - 2](7F'&;LookIn:=xlFormulas(-4123),xlValues(-4163),xlComments(-4144)]@7F'"'SearchOrder = xlByRows=1, xlByColumns=26?@>]X7]x777]7 G (j G (&j? @G H B@^j G'j ValuesGC'F CommentsG0'jj?  4 rngTarget  %". ? H! %".'k! ()  !r !r5# ,  ? %n!r !%n!rG$j:   %& !!   $N.d .DCkpkh !! :  $N. d( . C?@>kkk$ G !(j G !(jkkk(x ! !!x  ! !!x  H%n.s R, %n . 0 24 %*.  . !r'<_  %6. Gxj  $N.5 !r <d :.. H13:H18 (2007x32)'(kk  G !(j G !(j?k0H(L [ !!modServiceModule.rngGetOnValue J!L[ %rHN If Not rngGetOnValue Is Nothing Then Debug.Print rngGetOnValue.Address(0, 0) G (j G (&j @G H B@fj?i B 7L  GHj> G .j]8F !x.HXB`D]8F H!x.N]8F H!F'@]9F N!!'< ]9F N!!&'>?]09]P9 N!B <G9j >G9&jq @G H B@^j> N!!@B@B N!!@ :5(`DqH , %n D04 %*.  .8? !r'<?_ Gxj 8 %n$N.8:,  D04 %*.>  !r <@@k@ H8 L0  [ !!modServAnSh.rngGetOnColor:  J!` -  J!LH N!!@B@B? @G H B@fjDB N! <G9j >G9&jq` iX ?% `Dh9L ]9F !x.H]:F H!F'@ @G H B@^j %n!p$GHj %n!p$GHj %n!8 %n!:'F?d  %n!p'Fk H L [ !(!modServiceModule.strGetRngValForFind -  J!LH @G H B@fjih / (:L ]:F !x.H?]:F H!F'@ @G H B@^j !n!x L %J.Hd %n % G .HjkXHPLH[&modServiceModule.rngGetTypeAllValid - J!L:H @G H B@fj?i `D:L];F !x.H:];F H!F'@ @G H B@^j !n!x ? P %J.Nd %n!pG 'Nj:kHLH @G H B@fjTBi$ =@>blnErr - strErrType - : "#/0!" - ? "#/!", "#!" -  "#?" - ? "#!" - DB "#!" - ! "#!" -  " ";?L]<F !x.H?]<F H!x.N]<F N!!']=F H!F'@]=8=> G (j? @G H B@^j !n!x @> X %J.d %n!8G .jk RGHj. X %J.V VGHj:  V: %n!r !%n!rG$j@B T  %ZD   $N.d .kk$HLH @G H B@fjDC G (jix3 ;@>X=L(+ If Not rngT.HasFormula Then Exit FunctionA?@>]=F !x.H]>F H!F'@]>]X>]p> @G H B@^j9-.. - formulahidden " Error 2007+\F +\F#/0!+\l #/0! - 2007 Error 2042+\F +\F#/!+\l #/! - 2042  \ \yk Error 2029+\F +\F#?+\k #! - 2029 Error 2000+\F +\F#!+\m #! - 2000 Error 2036+\F +\F#!+\n #! - 2036 Error 2023+\F +\F#!+\o #! - 2023: Error 2015+\F +\F#!+\k #! - 2015:]+\F +\F +\s : %n!pX $\  %n!:X $\B ^ $\'^ ^'ZHxLp[mod_Test.strRngErrVal - J!LH8 @G H B@fjCBi& >L] ?F !x.H]@?F H!F'@ @G H B@^j !n!x b %J.`dH %n!p G .`j?kHLH @G H B@fj:i7 ( + )X?L]?F !x.H]@F H!F'@ @G H B@^j !n!x ? $.d d? d $`$N.dCCd $`.dkd %n!p G .dj?kxHpLhH` @G H B@fji8+ (@L]@F !']@F !&']@F !x.H?]AF H!F'@ G (j G (&jR= @G H B@^j !n!x f %J."@>d !! !!G ."j?4 If rngT.Hidden Then Set rngGetTypeVisible = rngTC\BkHLG Debug.Print "modServiceModule.rngGetTypeVisible - " & Err.DescriptionH( G (j`D G (&j @G H B@fji/ ?(AL]AF !x.H?]AF H!F'@]AB @G H B@^j L %J.V8# V V %d.V: V |?  V$  %n!r !%n!r  % %n!p$XB`D h h $N.hd .hkkkxpkhk`HXLP[rngGetTypeAllNotEmptyValid - J!LH @G H B@fj?iAttribute VB_Name = "modServiceModule"  Bas0{00020820-;C$0046} |GlobalSpacI False dCr@eatablPredeclaDIdTru BE xposeTemplateDerivBust0omizD2Op tion /licit P"& Const MODE_UNDEFINED_PROTECTION_ENABLED As Long[0 TES,T_ 1DI S 82 RELEXASE$33ub6 Sub General_Ws_SCh(ByVal Target1Range@) ODrror GoTo err_A Dim wsT Worksheet: SA=4.prnS bl@nWsProBoolean: G=.ect@]tentsA!BBbbookb6AppEnqrng;intCAIntegera'!If N%@6w &Cu 4py yxpy ThenAa ' `,Shp 9, "shCalendar")& c W0ith E 8`C .3 End %@ 'W6UND{_SHEETAY!T4s(.Delet3AIf' &)sT)pHelp?)c`c %_?))]?)% ?).?)pe")D('p''Link''B*aPP?'e?'@Bs = 'A('AgDIsAhio.A3argCHWibd:> 0 10 r__ BZdZ× Y1a aÛ ET`pi_']4'y= ShGetOns"("!4q .nԼsh" ? ".Top+1/+E3:+ @VisimsoZOnAca`"'" &z & "'!Info.FollowHyperlqVAqu0BSt!D.NumberFormatq m/d/yE< -> E e=1106,1098,38|21 #F.Lockǂ" a&@on'{@V@@.@X@ Coen@)ʣp"Y0ښ_rS0Ap >AAv/@shr7 v3'`W- P+0DfDa)=D Nothing Then ' shT.name = "shpHelp"pWith wsT.Shapes(B)D .TopzTarget 6Left8 D+ *Wid^+ 2 0VisiblmsoTrue OnActionQ"'" & wb& "'!modfrmDateChoose.UserForm_Show_Handlern End q10If ' 2 - etx_unO.0CopyPa stsSet grngTcells(1, 1) ' > 8'B .UUDB=EBтD Al7GoTo end_AElseIfO.NumbaA"m yB" '@q-> (FaceId=1106,1098,38<21#Locked ) ServiceModule.blnShpExists(E,)lFa@6U(@ 1 `mApplicaAp.CutXyuxlPC$Pb.Ena~EventsScreenUpd= b GAj1"jrotec,nt n.UNPROTECT_ SHEET! c ^4 3" AN.Dele{'c)"@MonthYear&ˤ"Len(strL@t)e0]' FHDkI؂Wc@qN`s.RefersToRange.WrapTexae_[EntireColumn.Au toFitdb=l9/+}S'C&r  sz intjCg!p. g^+ 2NArea1 spM- 1 g3 53=+23s(O Q6 NpXC>AS G~T   T}D /   5wu,0us]N[Pause 0.)YiSKeys "%{DOWN}", SQ ԁC(Trimuq&Value), 8Qw""rB=.FMor@,10053222BeT^<3GṒ1UpIpy cS_hJ__W awPnToobP tֿ{΂@ S `MultiAddՂ1OFO{ _O{BzM O{ t>(CodesP4"ws_03"q<__04"xBa12\AY3)b2 T ,nNp'7A׷rgeCells Or IsNu ll(Tat.Me)) And \Count > 1 Then GoTo e@nd_ If Application.CutCopyMode = xln(Notcc(1, 1).Interior.ColorIndexJc Y&owOaWith  .Enable@Events&FalseScr@eenUpdang E* wwsT.ProxtecuV)modServiceule.UNPROTECT_SHEET #blnShpE@xists(, "shpHelp")z .Sh apes( .D0eletgPet_un PasG Set grngT?~e ' Bb+adOnAc@"'" & wb.name@"'!@GfrmDoumVal.UserForm_Show_Handler"TopG.aLeftGB+Wid+ 2aF Visi msoTruM IfA'- err_:A DebugiThisWo@rkbookD! HMe.General_Ws_SCh: DAErr.NumberU -B Descrip0&on 0[0?+@}B:b.~ cz-m`Z@EnEv#Xnr ScUp 8CA G6 Sub0' '  #^ P@Qic FunVstrNUInR0angevBhAs bs StringAOn /ord ?1 @Pa .I2?3`~tdJDwpIsDate(` `#BBLenE)@08A"G Lik@e "##.B##"хZ+C!]  `IIf(qDay"0", vb& cg g.jl Month  KO Year& e:C'A)CC@H"^gA?`d&$4@ 0a$aѶ3Su b AddkDi,RowBloc k2(By0^ varParamArrq&Varia8nt)!3 ' BhDim 8: Qn"= (0) 'rm /p va q@p B?2/UBd( )0SIsA(17… 1 '@ zRz{ N P" Bumn ơ` r(2 I 2 ' Y PbRenuma Boolean: F= %}o;0'a2Io)(3? <- w$8lngP$pVLong: I= 07q 3 or(4  4? . щsheet 35Q=6.par@Q >s b0Ze=Yc?robnWsq$T`@F;3A'CwsEUFXTTFU@RA!RQMUPlp@C1ger: ?eD5q-,)1 hOffs`,$= 2 'G 1qI0 d ,b S="S1 '80 7e`ObӀQ16!@0908R6 gSv𢄢wb, 0`"ՌTj@ QsQ.Ref`ersTo1 ߲m$5 Ar?ngAdd.Rows.Count (ElsehDebug.Print "DelDinamBlock - " & strJRange" "GoTo end_End If ' / 3=+If rngT.cells(1, 1).Value = "" Then ' 8 T Le n(wColuhmn)0 S Split(4ress, "$")(1) 1 HwsT.KSlngR).MeprgeCpg  @uA' AreaΈ ! l' A=R +- 1 ' nQ ( C'pq#'ȌuNotv OF Offset(0, -[]:v8!Ȫ@ L ''ŭ MBmodServiceModule.blnIsHLor(g[çRm,XC)) A@t ^ [TrimEd = ^e Se/T $wsEURBca`aaKC1), 2I(dDnN)Gd TT`pyD0 AC Dest@tion:=X+b f' ÀdWith`o<"A5| .Unq @@}@""xaj da J" , |c\vRcg 37 1!b.Apcaa'EWU@EnEv#.EnableEvents Fa&ʤ#ScUp$ScreenUpd ngm eWsPr|b^UNPROTECT_SHEET/3?(5& ,":6M*!+ @)).Insert Shift:=xlDowrn Do UpyO~1\ 7!g2tire`.Hiddma (,/ ?3EnL= 0'#} !cp86 v.P+pmChe0colorCyanC8 1`gWFJ_ N(CsteDC r '"x"G  ? ' H!:H@4GRHvbNullS:tgM8'E>Renum=uR>V!d!gۏ)~ tC fTrueS,w ?gR_!0rQ 垦 1#n {Bt0$ b-⡘Ed 74' ListInRngExms+(1 XJ.pIn@MtLevelπZ'O"tCi 3 ."JSLP/jvLZ>@TCR/I'@qT.parp5w>Boolean: W㳁@ectContsxB %PPTS1 RbB3er/Alig="x@4.HorizalkLefМ6.# S(1J@5*B@h= ;d;; 23'@ CEx@ u T a_[(qɡ0R@`_0$@ -  ,  >00   ÃDFuncQU CheckMaxRᙲ`=R˷ange, st rAddR As String, Optional blnMsghBoolean = True)HLong On Error GoTo 0err_*Di m wsTXWorksheet: Set*= rngT.parent.b-boo:k,bvG *ln0gRow.: VSBlockCount/ '- DMax's:= wb.Names().RefersTo.2.S <=nb* g/a + ( 0- 1)CheckExcele"0 If&> 65500 And n (*FileFormat <> 52) Then ' JS xlsB (M C@.)'-' /val(ApplicaA.VP@) < 12B$y )E  Box " B}m O !" &` vbCrDK " @2007D@",it3l, "!",EEEkIfE3nd&ElseUD"("j"d::"#"!B?"OKCanT`YA+ )pvbOKJ; @DisplayAlertsFaWSav!H`^s:=\ull3<"b`a:=~5ha*aeJi^ B?caA`I -1I'O'"(In>fbu``Go modServiceModule.@Ac 1erjState ( ENob.ProtectConts3 PROTECT_SHEETa,i'` i9s91n? )Qui# `#(Clobj*l +ni! Ș> 1048Ő# '@ ⡆ ` G!CJ. p " q2 $NR$Cr7H ZiZtQJ :QDebug$iy"_wsm/p.Descri?PNPqFunca 'yz}c"u Sub Renum(QywpC(@I1xgera,$}lumnaSR|VResume Nex-{*S:SRe Sce(ѕCodFeAODws_!"pdt_"Do u`Ra1,q 110FIsExists(This%?R6Ss E sT.1S+D]eC #Q sNumberT0= "@.'Ā ;1b"Offset(- , 0).Tls(1,.HasulaK?<Localb Mid, Len-AM? T Value"LeftIn*Rev".")"!c& ( )ŀ1D& " G  Gen0mlL 9 m'@p "E, W 0^ W &@) > 0 1 Then: For intD =M8oX F modServiceModule.blnIsHLColor(rngT.Offset(-O, 0).cells(1,p 1))yWIsNumeric`(LeftH& ` strSdF.Value qG=Exit End Next  j*MY.Merg|eC][GA8reamJ+El6sWRe.Row 8wsT.Range(@* umn &R)?6'@ _EBUCKnE@mLen(PTrim4S= 0 Or NoNA@Q) '  ` &{pT  pCVa, B{)-uSsa=C_Ib6'm|e-|'$HasAQulaL/x@(AA26 ol@[TPC[iC-D  _s1 ), 8) "ĀE :1u#=(?fsfphr RPight^2 .0"4Do7P"0A,).+2&A#= ++ogm+s) !0MD`TJIMs.Couno!b+L8oop ? A1Sub '{x Ex( @ SetAceratioate(Opal Fast As Boolean True$, 6wbWorkbook#hingROn HErrGo eepA@#Sub m  7 } Public FuncShpEx ists(N As a, strShapeN2$St9g)A Bo oleanA(On> -sH@F( Dim shTA BC3 @TrueF =.B s(I!)A +t0c@F4#AO=' L( FRNRealPositive@NumberAVal"R%%C]\Left, 1) "-"C[*P@Iseric~) ,J Y"VfrmD*o@Fe. - -Vd5UR@r aX  @]p\'QERngV-3G@=$0clng@idInLcd be>, ℡Ob}Fwb!%#`6hinnLo|ngGmmx!rngqRangm`R!E K|IsAaJr=Ga vb.A/bv0).RefersTof = .par? ?"Ts' f^tPT^wb2]%0qxGQ"5]`=ĕkRrI5&B堙 `"HSN!'H0` W0Wd. UE!0 !SplitC.ress, "$")(1@ )BSЭ().MergeCellseG%D OngRDA I Rc@E!=>R +.S1?))1r졵 p Ex3=?`Qu > 65500 A Fileq <> 52 ' D 7val(Ap`cR.V0y) < 1&MsgBox "U3J4 p!vbCrޏ" ip A/ 2007 `",  cal&1!2" +  ( p7O`7    p " xlsM?", vbOKCancel +0Critical, "x!") =N Then B ApplVtion.DisplayAlerts.False*@wb.SavAs FileFormat:=52#]TruKMsgBox "( y u !"l &s_6i" bFullNameInf[ +If Workbooks.Count 1 QuitK.E *C$lo` H nd8 IfExit SubE>EHA 9lngRintS > 10485006l k " ( ほ Ex@R6907'=$ vEnableEven ScreenUpdatingmodServiceModule.UNPROTECT_SHEET wsTE' /Not rngT.ls(1, 1).Value ""/0^ g5Add@54 .Rows(":& ":a:* + - ).Ins Shif@zxl8DowSgs(str@Range).RefersToapy Des"#on:=AO[lo*eso@8 Is ActiveSheetO("AAK `)e .UnMergfYvbNStrg '0%&Le@n(TrimQC)_pRenubm*), B,S (7* Block fC fA;' -m 1 AQtCDC)`!Re~ce(`p.Ww)%&%+CU@V DqAlignm0Tp HxlCerhHorizontablLefr IdQLev-="01 e#1 rO5enntO5R@&UR= %piu'* ry+%u\# IsT.47o0 !<, ).PAutolW 窒?gRE=`&|S bc1(H3y@pe:=xlDefaul61s|'ˤq`gp% *HcFw"bpQ (R1 ).TetJGG?@G G3, "G!oGQMGs!HtH E werr_:`Chr(13")"[ : Err.Numbery*"Îcripqߡ0@ 's`o@1! p!DinamHColTapmt, UCode!Tws_T"add_"PTPub֥! k( 9, O al .rBYOn `or GoTo 1Di nbVsTesAu@  '@L03TRLong,~ ! 5TCAInteger'Nr$eS 'Dqc 0Xt wSA@Pwb. as().RefersToBC UOzlumn"sunt E<'OsGOAeSplit(CB`ress$")(1BY$S@llR).MergeCmJT&Z Area, G?/KA3@= TC +Sh1 @l @D E x B A @$> 65500 A/tFileFormat <> 52BL ' - _val(Ap5cation.V@A) < 1 !NMsg@Box "Ee !SD $!A[vbCr;_ A a" a^ 2007 ! iticalJ@.|!=d@VE*(]m4e&&r""a@0 xlsM?OKCanC+ vbOK` I6DisyAlerts,DSaveAs G:=52c' Truh B9J BI @ @GQ\ull,`%Inf^@U?b0=WorkbolokĚ&1l,,Q8aaݣe6y<0g;;a "݂EpiOd@:{:b FY??W_Sa1EnableEvenK19ScreenUpdOng3UNPROTECT_SHEET hU'xoon"y ylpy rx(R).InsP?> `sAutofit .sv"A4bv0n1), 30orCt0teDCЋ ' "bW'?W-i}$ Cos etv4 7 zNPPT6o`o Wh0s> QOHF NŁLoop?s9:'ry uQR D% %oA U, p-!QFont#lo@rIndexa51 Q+  0B1' C s`To')ߡ ?6C70N1+q '2 h0 CStrnt)@P".3>C S8Q  NexbGo err_:Err.Descripa # 'pw8 є9 pq9)1 PubliJc =HL" #B, O2alNqPiQ>On p or c s 6imAqvsheet: ǀ!;parY!DblnWsProtABoolean: W=R$ectC-]`%T` 1q%ActivasDbbJg"`` %3Ep7"5LeftaN, 7qWithRW-.HorizalAlignmpxlC|erfOFo .WrapText = True .Orientatio nh0\AddI ndhTFalsb,Level bShrinkTo Fi fReadingOrder4xlContAnValue"r"End WXith EIf rngT.cells(1, 1).Colum9 A2_+ڀ (InStr'strN, "", vbCompare) <> 0 Or ) Then?\UG.HorizzalAlignmxlLeftVertic Cerw =1rm f C.F@namB|Tahoma} .Siz9 Bold ;@vikethroughOupe@rscripϢSubTOutli neA)OhadojwUr @xlFStyleS5@l'ãorAx 57@o@RGB(591575)EOV' @AϣSSfWBottom 7SD%kS.{'!IfaK`Aq(C7)@4"{&, Na` ActiveSheet.Hy`U1@Hks.chor:=!, ress:="% [Chr(39) & wsT.bm& "' 1e ' For intD = 1 To lngB lock  If modServiceModule.blnIsHLColor(rngT.Of@fset(-, 0).cells(1, 1))` ThenIsNumeric`(LeftEI ` strS.Value x ]Exit 】 End Æ Next  V.MergeCx "Area Æ[%Len(Trim(Am= 0 Or Not kGd`"0"=8Z{InStrRev      !"#$%&'()*+,-./0123567H9:;<=>?@ABCDEFG4IJKLMNOPQRSTUVY[\]y_`abcdeXghijklmnopqrstuvwxZz{|}~, "p."))'&` (Mid +('Elsņ)1 Do WhileA?.H! CC8), 8)"DÅ=@DbDo!.Has@\mula@Fa uv9C w::- [|:b,n)BmRow@s.CounH bJ+ dLoopBIaSub   `R - B"@NAddress% C`-  Ren umbAR As Range, € Boole8an,String, Op@tionala#CIntegerI1 On Err@Res`B é 6R umn <> 8BW B`a(xim wsTat Worksheet,ehj-a DTLo_aE`%T,I ~ N"arr_!()kSet=iR.pareM `= isAbook.Ss("TEHSHEET",AiZp,  .l!1UNPROTECT_F TehSPr@eh.%q]$D).berAKatQ"@"s1/ = FV7p_Leq@l-", vbT0Com1)A 0" S00@/5rue7 p@p#B3." &As"Cq'`HPHmG0J Dq_o/\'OdH29=1UTR$z>tB9TC).Borders(xlEdgeBottom).Weigh$xlMedium0dR(_%d & 26)d) >AХ& 'A$ ^  $&Frm8 ?oT* y hW{CS( ,'! A,?et ?:-@ 3@_ W m_ O@ gA0Splitg&n1mO(`[sr$UB d(13 ?=&PN5(Iڀ"@8IfF }FRp1PC4V'RRR OXsCLngsj S 'u=N2_$"1,Զ 1).Value, 2) ' strS = CStr(Replace(rngR.cells(1,, JN, vbNullRing) CLngb(c) -I IfPv0 Then Exit Sub' :lTRDo While Len(Trim(wsTarg eta, intTC]<> 20 G +[.IndentLevel>1Z9 8 &{ 9 EndQf++jC Loop V' @VPublicA` UNPROTECT_SHEET(ByRef@8Sheet As Works, _%Optiona0l ByA>Pa@sswordS tr@@2gPAS@SWORD)Aws.Unprotect 21@31 003-blnDraw1*Obj#@Boolean@?j@%EnableAutoFilterU&@UTrue **O lrror GoTo ErrHandleraa` ReBPreserveK1j wb.Avate<:pattern_W= "*" +p+ "!*",For Each \In AasIf C() Like 6Then vUBound()X SetW) =2#End IfNextAW?@'E' ¬ @' J -  (  xRt(n, wsBAEOn ErBrGoToHandlerArngk=@.(n.}e@[J$XE .parent P0Noth s!ExditF} :P " ^6`7 1 , 2 a2NOTE:  , L@ : "1.2.4.64.x", x -  `C @Lo?RENUMBER_ADD_C ELLS(%-ToRenumer8 @ gbD1Has%8= Tr?=' A'6D) '@f8 "aTL= w/J4 o>r)A  W)u.xt ip&0Do Wh@ile In0,(~3=i24r iqr 9) <= ur DoW LxoopsS6Int(Mid( @, A) ODF)bFAτ$, 3 ?5te8< w;.at!EHGenTl"'Ԡc-ߵVO>1&-+ UMr/^ ^oEls$?\4@J66re}b63cS44 - 4i, "."?4?4-:<54B32i2r00,i0d0. 0zzo0eQ#lo0g0@?0#55^n?,r(0001000,ߡԡ࿡𿡿 忡DREMOVEpN` 񃕄b?RowoQ"emovendU,5r wsWorkSheet As* 0s0)4String Dim rngCell0Range.strPreviousNumberValue ~, BFormula# Kfix1 >Sub2lngpLong, i SRENUMBER_REMOVE_CELLS = ""If NCol <= 0 Or1Row|Re movedo I@s Noth Then Exit Functi4on*S= .cs(91,=).Offset(1, 0)"M=1).Has= TrG = C Q(W) ' ?C{ :LeTn(U)l0[ F&Sx.xEiA Do While InC+- i+( =+ 1U7Di7  CDoEnd IfCLoopCC7CIn`t(MidOQ, < )"TLu?DJ, V?2fN-E CPO , : \Afb!@)) > 0 %.Select7z.Úat,"General"d - }uC\&&q7D* K u"̓? 3'DC - 1E|lsP)Ub3zLDqzz"."_y _`?rz8{) i888C(8,^18@rO;3rt3%";K.ser;P&")?G1 QK .NumberFormat = "Gen`eral"hulaLocal=(" & _F rngTo.Address(Fals(e,  )P"<>";+h;2<@strMsgE"")End W8ithIf  Sub '  Public Function IsShapeExists(wsT As Worksheet, CQName S@tring)B@ooleanMOn Error GoTo err Dim sh?)" :TrDue Set=J F.s( C)Xtb;:MBkAMPE>BQYMP SAED weOVVbALUbookU[ST1KUXHandler1WnamEFQIsACXE Yb.A XBWr2Prr DZ +FZ CAUp BL3M 3f Len( CH(,.RefersTo))50 OrFIn 1, , "#") > 0 T4heV _3 !Fo*Js@ r t M $xSub UnmergeRngValInAllCellTs(!atAORHangOp~a l bln`IDayD@K "a emp&vA2^FlngIDCoun"Long!maS`A=°.parent%` Each I.n%`BJnOnColumnKrC.Le&LaA-SqKяrL{eintCaIntegere=p'RaM$=Is Noth Rf~EnableEvYzScreenUpdngmodServiceModule.UNPROTECT_SHEETq13?F!g?1:Ic#4+'cX&sphQBM= vbNull!p aE Uu ! Row j 9  2n(Trim(gL, ).ID$AAU e0~( bhFS)lkDLR GyO!4 '0J=74tC)2it<.x+y@mF'@6s9<  IDa_, o -5G| MO1P ., intC).ID = strpAnd _  Not Len(Trim())0) Or\(wsT.cells(lngRFormula LocalF #oFnThen '  Set rngT`Union( , )Else If,l.Count21 JB!hingGoTo next_R EIfk.Merge ' 'BorderArWd 1, xlTH, 15&6 y]7 WithE .@Number}aI"General" ЅBKIJ7kADaLt.Row +.Mst2 ]xC= vbNullStr΀@F@$7 Ҷ ' ZHas{D1PZ JJ6'(OO ?KlU& ID :5!WrM q $:N c%gbendb@ err_bMsgBox "modServiceModuleÅAllCaInRngV@- " & Err.Descript @ B Applica!.DisplayAlert"s@XTru Sub (Pub  C reate@ Color± As Range, O߂ ?aSe "xlNone",2d!S =0 "id(Iu?`( b@lnSave ue Boolearn`Fa`z"A-D imaAWork sheetmpjeWsVisibl Integer)Bakpare ntP= ActiveS1uC}Pd1). !EnaP Ev !9ScreenUpngVN+UNPROTECT_SHEE^Ta1Z=.4Qe=o 8SelecAm#T1m4"Q 3let.Qriord.Index xB,Vqv.V `.ked6A/._}Y}8sqR5= U5R Exit:qLCaseq"blue"Uob  %Add Type:=xleInputOnly, rEStyl$opC@torpBetwP$Q IgnoreBlaLnkInPDropdowA9 Tit6&sY Sor/)BM0essa@p xon.XO@Showlu1<++37?(Ro&}y/$cyan" ï&"yiow&R:68DU8B6.`p0"#,##0.00+teDe`cimal`+d+p,/ 1H:="l 29 o.o2 22x?R(0b(F/ # A/mh !Y5j 53w* 4*,@-,c*teTУ@gth?U0A0)>rtStop, _ Operator:=xlLessEqual, Formula1:="900" .Validation.IgnoreBlank = TrueRnCellDropdown,putTitl e("}Error&n)Mpag*strcMsg[1" !CShowIE=End IfW .Interior.ColorIndexcCyanE If LCase(DB )@ "yjow" Then Y .Locked@FalsĂ%With AEgreen  Selec ? +iat+0 .@NumberG#,##0.JD# @F E gOGA; uGEPOF.BorderArou1, xlTh@in, 15 wsT.VisibbjintWsmp.A,vat 6 !Sub 2 !'*6   @o Pu`blic `EtAllTahoma()`@Dim ws As WorksheetbbookSet wb`Jb!e$I Each In. s j( ccs.C45Font.nam!>"cLSizA98Nex! 3' #HFix#HylPinksb$ "$b9EsB l"sSh&E(bhlf !( = )A)C B*EM+`+ ,`.!hl.CAddr@;Chr(39) & 1& 0"!A1B/hl? 00GTa1 4! XHide_Grid_Lines_CallerC5l+v' "B4à!s(Byq-G 4bNOn iGoTo CleanUp16"8 awb@Is Not`Lgh ?09= "eAppBaҋScXUpng@!> )Q ) 'Tab w<> modDe fa.wLighxtBrAu)wr 4Xqs Win`.Display!;es v;*iws Z4!{T:ONj'QZA& (f0pICreACheck ( [X,NSString)exO(v_P1 Z2&.s.A(Af0:=3eCut))[pSO d#= 24oA !YRange("E12:G12") g  Opy patxlSo@G HorizmalAlignmen1xlCerVerticoAhWrapTo= . Ori@<0H!] Level\Sh$kToFi! }Readp&Oa P hMerg>eά9 hBo.l3G s(xlDiagonHalDB).`StyxlNon_alUp? ?erEdgePLeftC inuouwWeMr0| sZ56_ To b "  O E Bottom/nt/ӹ Medium- oeRQ! |neStyle = xlContinuous  .Borders(xlEdgeRight). WeMediumbColor Indexj56^jInsideVerticalp).Li) =Thin#rVEnd` With!wsSheet.Range("E12").Valu" "F G + .1ows("12:RowH21.75 r~DiagonalDownͅUp_LefKg To ѭxj2LBottom- _e֫ aeV'DU.l:'51~LvF2C3פ0@0L`.MergDqBold yTru(w,Interiotr.J2^&patnASolidr.PCxlAu &a|'AAA=AlD>Bxl'!ROB'toBaBc?50<5?<"E4> _J)+%_ ,oH`c K( o{    OOs*OO GGJ f80:1K c EA:CoNP@.Ere.HiddeGLy:6 o  ActiveWinБ.DisplayGrids@O cells.Y;Y"% Q.͛SOSu.(b.S_ #\ a']fit PubPlic  0s(rngT As , OptPal dblR2HDo15b)a Dim*2W0orksulngR1Long11Set= .parb"#&3!A FiFor "  Tos+sNu - 1 IfA.Ps(!)%< Th,ws~T_&"QN ex k '08.09.201` H3 6' @X '@rngT -<  p Public Sub AutoFitRowMerged(LAs Range) On Error GoTo er@r_ Dim wsTa6t 1WorksheetlngBRLongintRCInteger, %A %dblRHD"oUe Set7= T.parent ' <=lArea.r '< \Js.xCou0  modServiceModule.UNPROTECT_SHE ET^g'h B'With.@cells(7, 1g .NumberFormat = "Ge@neral"A% .HorizontalAlignmAL= xlL efjVertic C@ erDWrapTexTrudColumnWid)PValue&EJ1q 3End> < @nC=).@Entire.Į 'tv=NAHeigh 1R-1).E5"" '<@ qJ 6s(@ ..Hidd#h=R `tb_+ (Z-DIfG!)C)&False ThenA <1`)'= c-/ < 15  15ADIfaNRiExit !:AMsgBox "" & C@hr(13) " A: h*! `"vs Description, vbCrii, "A!q`$'`VVF Func bl nIsHLEor̲ABoolea"4)J7A a/"l1.arioBrtterP183 AoWPaBIndex{7 `[e6  !b! D c$ @`s`})`UniqCheck*a0^! `!*Ca3Len(TrimQsF))f023xndbA4pp|a"QableEv@[s V 9ScreenUpd ngYkk '0IaPk 2>Not#yOffset(- 0).wCAk 1 Jby)۰>p1CQEpHBM$e}1&o While7Fg )W1or-233gR_'Wc~dIW#`L+@gTx$ y =INullStriSMSelec 䞤&1Cbf!u! %sLoop1*)) D rI)+ )/PC;# E **R,cv[*x(=e!(g((Dvb(( e(@k(UH? M$]IvI VuH?8s /m!%6G.P' ``w<`zyAיy RŅ `&pp '*/ˆ CutCopy `Z* ' Range Object Available Public Function CheckRngR(rngPT As)Boolean On Error GoTo 0err_* = Truh Dim lngRILong= n.cells(1, 1).RowExit n: oFals8End   @菒GetMergeAreaAddressStriq^$0.1%vbNul>l"NE?W01.10.2012[¢ ^OWblnCompareDhateCV1A±,%B2Opal MsgADD#WstrMoAdA 'jQA If Le@n(Trim1ʾValue))A00 The  B'= " AAS V " & Replace I, "$", )C6)ctEg Nopt Is!0vǀ.s  "  "AXIf!a)#m&SetF@)81A msgw 3233#2|33q3D33cJ4 4?}4'm(;aCY[Z> *M@J"p:]c^"  _ 1G.pO331 r2w[ kCi7r}} P^Ӆ.@Boxb8NCritical 5I!C modServiceM@odule.]Highl0c Debug.P}tBM ?z׊_ V p.DescrimQ aA23.06w`aab( p_$Subc&r_6o, vvintColorIndexIntegercqPin&keswsWorksheet qAppScreenUpdatOgEnEventsO  Iq _;!n PROTECT_SHEET p, Pu`` DoHend c ANCI@te0HLNaܒr1rK!A 3! K1FR.G*g'r'0nQCc6umns7unt > 1o"Borders(xlInsideVertical).LineStyle = xlNon e  For Each r@ngT Inarget: W it6 .Validation.Delet 2uvbNullString6LockedTru2Borders(xlE@dgeTop 1> (Bottom#+*ColorIndex@15+End.Interio>r !pa tnExlLightDownFP$BNex  PSub  '*4`z wsT, 8Public FuncFindAsk( As Range,AWorksheet)UOn Err@GoTo` err_AD,imB ,mpA blnWsP@rotectBooleaBmJ=#. ContsA modServiceModule.UNPROTECT_SH8EET Se t"=GetTypemulas(@R.Used%B@)A If Is Notho Then nd~mp Ӏ@x(1#".x alC5.parent.name &  a\ "!"f5.Address(Fals6), vbTQXCom) b0"C D A 3e D'H= Un aGB'B!E@ '%!pIfg't 1AQ:`e Debug@Fint "sD- A+ Zs0cripd e`< b8LRᮣA ynP, p  ` -y`IsArr(varT!iVarianCvjvResuK(E`EB ay ~`BWs}(LBound, 1)c <@D*㪊 ` , ! . . O"strTrimPlus(` ow s C0 ' >Do WhiIn !v, Chr(810)8.7<>$ 0Q = Replace ;41LooC2D'p  32       >' 16'   4?R@O D c + &5 _ _ _ }$&/ $ ** e+ */ / /  * O!o5e5   V+++_) /@U/@a  1ND#0}IsN]ric#j" "G uT/\'}l03.09.28013@mKCml`mm#\#idInRngExists1nC\ _ A@.cells1>)ס`Ӓҋ'1\Qp0pu ﰂ/ Lp"OŽal `Absolute&sԃ_(3)} ozk?ኾ BMid2L, 220P鷀 If 0GoTo end_err_: ' Debug.Print "modServiceModule.strListInRngExs - " & Err.DescriptionEnd Func0e Public: blnValidIn(rngT As Range) BooleaOnor sMtim wbWorkbook5 D s' sheet 4mp5 Arr(>tStg , alngbR Lon Set wG= >.parenH b = H  O, True)If Len() > 0 TheT /D$cells(1, 1).@5ue ftE @%"=" '| A}Midz2- DhEb@.Names ).RefersT6oo F]= ,1 .B5.Cou[A 4ȃ  (AMB T  @4ZY kF t 3aNexBHacElse '9!o`Nopt InW(B!NupmberInteger '"VTech! =,!, cl_l&%pnCol@  A¹wb.Fs("A#"!' %0`.Rdow 2:Used""3M)zxletZQ_:23= !:EachCIn "sq1 ' | :  / T.Tab Index <> cLightBrown08' qbQC . Tj>n0bPO + 1%sS- ' o ("B  w 6 iO BJK q <1,R'֛q P np"mLoaded(By!YYqy3S2?31>vC?3JGFaWlP =o 0rs30dǰ(QbC).a! yyxayaaW_R?XCz A' -շLAt0Partp '0' @ p# "*"7A-1!(ulas),`a(@ues) [࿀`ms `P' , . B$ Х .t (D 0VEGet Find d,cVisacO=, .. F2 @# 1arg @ $  255 ^F @@ Ou6e #A, ORal1؈" ;u7, /^fW" "E"p1rC^6?CQ1QC-AppEnEvC4 : e= aQ.Enab0leEv';ScU<b;Scr@eenUpd n@g!: ' WsPr@W T3ectCroБntbx`_LA!In!teger: intLA = 1 'LookAt=xlWhole - 1, xlPart,2 DimI As InI -4123In:Formulas(2),xl Value63Comment44)cSO cSearch OrdertxlByRows=ByColumns=rngVisLRangebT , " %strA String If blnAppEnEv Then lication.Ena`bleEvtYFalsCScUpScreenUpd"ng 9@WsProtmodServiceModule.UNPROTECT_SHEET wsTC|Bx-O@'@;In:"n"A |63: uO 44 N.H@!'  '  AwTarget Set3= NMGetTypein(@ A;Is 0hE/f.UsedB = T4ru‹ End@!C'?I (.A-a1#.Address?f4f2 .4,  !5' 75 Each23'IT.cells(|1).Me`;AreaGoTo next__i v!rsect!@@1„T) >-c'@tire@.HiddI$2aZa= Un  Eđag a:R q$#$##~a## $? $ q o/ u&X:!NZ''`"qgg'"9`?+= kS/otPaPdpyU I s_R*_RTBbE.!+dLs.CounqEs  ) iSVfa TSFind(What:=@ut, Aft= K, lqHA, 3x:=r, 2SO5qb_ WTK PoOnR~ U>P AdWDosVo*HT4h]Q Exit  =MT;Do / p Whi@UT(esQE?@e'.&. Ї H13:H18qp (2007x32Rjy.1'w?b yu1?g`?P2n`?OpoIa = endz err3>Debug.P0isWorkb@2.name & "!ong!"0Err.DescripQi(U (0, 00pF'Y,__FVOQNţs,V Func '  Q.x %W!o`r(lngL@ong, ORa>lZAOn or" "Q1/ QR_AвSel:'/m]=X4Dh *sheet:`tS.parq2b%A->bl<4As Boan: MW=2otC~o0u`&oolean: blnEnEv = wb.Application.EnableEvents  DimScUp As B&ScreenU$pdngrngT~Range!strASt ri*WithC  IfT0hen Fals[** pEnd 910W@sProt modServiceModule.UNPROTECT_SHEET wsTN'ʁFindFormat.Crs. .Interior.Colo@rIndex^l4 PL4Yp WhileNB# QAndC(DE <> K| IfAGoTo end_err_:Debug.PisWorkbw.name & "![ AnSh.#: " eErr.Number -Descrip`znNn, Pa h= gmR!Func ' @ e;TRngVaoV)On /or C@?Aa >sheet:Bqmpar? d0̼sTIotectCo$`sIs"r.@!*]@Len(Trim)@0Pd@^Tj Hasd{ 2$jLocalE&`wm;?}?}d<-E 1+p&SpecialC"xriBp,` 6 $ListInpKxsts8)) 8 ali~d "/J? m"^ "-u[?...-'-, q. Pub` _7 BlaHnks/-ge/-rr`c^)` /-/-g]/-``1%XO-k#e /-l!-C,,7ïf= *@[o*C+*%%%$rSS {&'u/ U;G ^' "#/0!" /!Ā"#r #? u^ 0d`  x2 P "dpd{I7!"d,$ OalRrrp!808;;%hhqb @k Dim blnAppEnEv As Bo@olean: = wb.lication.EnableEventsWsProt *sT.@ectCont xrngF7Range, T` If Then  = False65modServiceModule.UNPROTECT_SHEET wsTFarget.cells.Count > 1 & SetZGetTypeFormulasCSpecialC!(x)$E\ y>(1, 1).xHas2B?/nnd,NkErrGoTo end_V6@hingF;16<8F Is T"< EachCInFIiIAddre"sa.MeqArea †?nexLt_^A s|trJAm@:N@RngVal(m)2CE*ML@XUn@CЄ AVG Eh &z:aN'aIerr_`LB?OsNs, TruH{76 B Funca ' Z % ?F)!SDtrdOn Cor "`!$'+X{Exit ` Worksheet: 9=`par  ,lCode(8, 3 #CintCIger>p '.. - fhidd8 ' 8   /Ab F"520p07":< 2)AD0`%= "#/0!&"an`'  l- 2A4.2 ̀0$/>423291 nD?!29400ktѼc05360C N4:336 6 23  ^hS4'23715 QtP '15F15n]pC!7 xS ' ` !K= LBd(A) +o UϞ 1NIn_qCqZ@ue).,+)0 Or  Local?![;$ F &3fshoR\0 DyƐ/!aPmebug` "Е_Test.1- " PX.Descrip|/2/$'$ f@d <؀Ԙ@sta (BybypBBt#Q1QtQ}`{~%~w~byң)0#u ?lѶv( JLenJ164b 1C-*ϫn&&& 1&兆 (SHd(  'Blanks 'ge'ִnge On Error GoTo err_Dim wsT As Worksheet: SetT= rngT.parent\blnWsProthBoo@lean: *=t.@ectCoDnt;s >If'Then modServiceModule.UNPROTECT_SHEETK9=cells.Count > 1 H "GetTypeNotBlanks c Formulas(%)Ny Is 0hing67Union1 %,/`stantEF GEls l&"nd Ra>)AB9Ap`pEnEvDž=B @lica..HEna@Ev ScUpScreenUpdng(z% H"{qFaD[ gDbsU;]eDCSp@ecialC(~xHlDT >tireRow.Hidd`A@YColumnǂKK ' @iÃv Debugi".-#$%- " &.Descrip#u DGc/E LF =__WD ( ƎҎAlBl`?Emptid|Ft5|jF@FqQmTm"KR':OO&vF7ls7``[iPon) '`6 7F ?~05AJY/ng=~qFI hSS@;/k ` EachiInF E?B00@A`ddresTMergeAreao`aF strListInRngEx!cmp))0 aQ RTrimQ 0 @} 8!Y= M-%3 gd) R02mpW_NexC kbc_cO /ca _!//\_T 0 `  0   lK  c/x 0$1 2Qx/pr  Jpr  Ä x! Qxlh l  lhkrkr l $ fl  kf   l  f l  kf  l  f l  kf  l  f l  kf G l  f l  kf v l  f l  kf  l  cl  xH Qx[`t\ft kf t  t\i^Xx 0$1 2x P 3TT ,4lX>*#LlP*#H 9 2XLPH)xT 4l4Fl`\t$XPLHxTTKDpz.F`%pH p@tp5@/pz/<T(}tp@0  0 (   0 P   0 X  0   0   0   X$lCx lxFh%H 5@ $(}x lCxK clH $ll=tl\t\Fqp6\\"lplplp\'\%k%'l%'|%'%'%'%'%c%c %'%'%c%c,%k<%lxFL%H 86< ,Ftxl\0   0   0 8   lCh.K c (lh0lh0lh0lh 0|1h@dH \drU !DDG9-qGI4(FF G9G7CQ# K (AKiKK K LAL 4LRLLMMNNN1SOOQOqO PPP Q9QqQ)FDDi@?J!RyRR?SS T9TTuy)ay((I4aD W    W    W    _    _    _    _    _    _  _  _  _  _  _    _    _    _   Xh l xK xadt5d` t k`pbXt $lX=\X!`X\ X  k`pVX&` X\ X  k`pTXb(@%( %xad XX+` $ 4>1P)X6d- X\ X  lXY%`Ct$ k`/X\ QX      ckbt$ <:@%Xt Xdu)X5d%`Ct$ k`/X\ QX      ckbet$ <:@%Xt Xdu)X5d%`Ct$ k`/WX\ QX      ckbt$ <:@%Xt Xdu)X5dvcyyk@%"X, c= ~I(@%( %xad XXA:]3X6d.C(@%( %xad XXAX6d+A`CV=XX$ lX=k`/XqSxadxa @xav"0'6 d@0, X\ X  lXX\ QX      c` t k`]t$ %`Ct$ k`/<:@%Xt Xdu)X5d?:@%X$ Xd')X5d '0%'@%t |>(@%( %xad XX X6d-:@%Xt Xd|X5d1\ l*#x*Fd%|,T2x5dxad~*j@%|,~5d=xadxaz(@*j0%|,6d@%|,.c|I(@%( %xad XXA: ]3X6d C(@%( %xad XXAX6dA`CV=XX$ lX=k`/XSxadxa @xav"0'6 d@0], X\ X  lXX\ QXt t   t  ct` t k`t$ %`Ct$ k`/R <:@%Xt Xdu)X5d?:@%X$ Xd')X5d '0%'@%t |>(@%( %xad XX X6d-:@%Xt XdpX5d1\ l*#x!*Fd%p,T2x5dxad~*j@%p,~5d=xadxaz(@*j0%p,6d@%p,.cplPJ[C(@%( %xad XXAX6d >(@%( %xad XX X6dVf %lPF@%X\ Xda ll,)Xl6dilPF@%X\ Xda lla hh)Xlh6dYlPF@%X\ Xda llaBt)Xl6d(@%( %"Xad XXA"U(%(H%"Xa A""Xai lla hha(v"i(U)Xlh6d(c Byk kD@%Xt XdA#B~X6d dF oy(@%( %"Xad XXA"U(%(H%"Xa A""Xai lla hha(v"i(U)Xlh6d(cy"Xadi XXa avo"k %kD@%lt lC#)Xl6d du c= ~+`?$ ' c0%:@$%X\ X X(@%( %xad XX=  % & :']/(X%(8%xa( =(A)ff]/')X6d(A`CV=XX$ lX=k`/X`Sxadxa @xav"0'6 d@0* X! X  lXX! QX      c` t k`Ht$ %`Ct$ k`/<:@%Xt Xdu)X5d?:@%X$ Xd')X5d '0%'@%t |>(@%( %xad XX X6d-:@%Xt XdX5d1\ l*#x**Fd%,T2x5dxad~*j@%,~5d=xadxaz(@*j0%,6d@%,.ct 4l+0xt 4lx,0H(@%( %xad XXA"( ]/xa" X'(2xX6 dXHA`CV=XX$ lX=k`/XSxadxa @xav"0'6 d@0Z* X! X  lX\(@%( %xad XX=-A.$]/ĄX6dX! QX      c` t k`Kt$ %`Ct$ k`/<:@%Xt Xdu)X5d?:@%X$ Xd')X5d '0%'@%t |>(@%( %xad XX X6d-:@%Xt XdX5d1\ l*#x/*Fd%,T2x5dxad~*j@%,~5d=xadxaz(@*j0%,6d@%,.cX 0$1 2X x H 3 4 3ll ,4|t Hl5*#lx*#6*#l#*#7*#l*#8*#xl|*#t*#p 9 2xx|tp)XlX\ QXl`l  k`kV+ kVl  ` l  k`kTZkT l  clAhl}T|tplPt\xx|xtpXlhd(d-K[J(X%(8%H ah $$=?A?`1x$6h//) d(Fx $h0 `  0   0  DA4 ld5D1h@dH dDA4 ld5D :T l/H,FlhdD40   0 8  0   0 @  tKepzpH Qp[lthedt Hld 0/dVpz/ th,pz/t0}lhtdp0   0 H  0   KApz.F`%pH p@tp5@MpzRNta@K#@1dldJB(0%(%H aL HHA `1`H6L(dM0@L & L: C]35L('LdM0@ =`1d6LGldF0%Ht HLa l)H6L7\laL HHav"H6LdLl\i0%(%laL HHA l`F]3H6Lpz \fsldDv8:0DNLLld E6 Yh6LlhL\lhdsl`l\lh0gpzs \fJ l`ld0pz1@ 3HH ,4Fl@*# 9 2@H/ DF*l`dh%'(ptx,@HL0 3  0 4  0 x5  0 7  0 h9  0 (:  0 :   l t-KTta`p5`Xp $lX=\X!TX\ X  kTpVXT p kTpRkVX! X  XkRp$ 2ta` XXa8v"X6`8"(%t` x5``C((%(%ta` XX8ABX6`8` ltx pT c= x((%(%t` L5` lLcTlLH O((%(%Ha` XX8Al@(%(%Hai a |A\@/L<)X6`8|l\bB!8H$ \l80/8@ lxc3 '%'%'%'(%'8%'H%'X%'h%'x%'%'%'%'%'%'%'%'%'%'%'(%'%'%'%'%'%'%'%'(%lHlxX0$1 2Qx)X> lHx H TkRsp$ kVX! X  X/(@}(xLtp\H@ 8X`8|l\L<0 X=  < l t-Kta`p5`\ p k\p^k^]p$ 2ta` XXaHv"X6`H"8%t` x5` M(8%(%ta` XXHA (]tX6`H  ltxk^2p$ / <0}xpt$X`H$ l t-Kta`p5`\ p k\p^k^]p$ 2ta` XXaHv"X6`H-@CDD+\ltXXQ@x/DX lxc|@ltX`t 'x%'%'%'%'%'%'%'%'%'%'%'(%'8%'H%'X%'h%'x%'%'%'%'%'%'%'%'%'%'%'(%Q@[8lx<0$1 2Qtx)X<8@ltX`Q@xXM((%(%ta` XXHAd T(]tX6`Hd ltxk^p$ / 8$0}xpt8 DX@<8t`HdTD0 (@   l t-Kta`p5`\ p k\p^k^]p$ "D%t` X5` lXc ,lX0$ dQ,X0 lXclXT( (D%(%Ta` 00At@(%(%Tai ,,a Ad@3)0,6`tdP+\T$ 4lPJ(D%(%Ta` 00=  %(]/td'T/P06 ` lxc '%' %'0%'@%'P%'`%'p%'%'%'%'%'%'%'%'%'%'%' %'0%'@%'%'%'%'%'%'%'4%'D%lT,lx00$1 2Qx)0, lTx T( 1P 300 ,4AlP*#  9 2P 0k^p$ / p<}$x(XTpt@ P 0,`tdT      !"#$%&'()*+,-./0123456789:;<=>?@ABC?__SRP_21$3^(ProgressDialogue"2f^mod_00dodQmodHTTPGlobals?BB=8I =`U=@ >`Y   =4 ?`]=08  @`a=8I A`e=8 B`i=8 C`m=n Y8 ` =0#,A `90#< `Q9) 00Y(8 ` 1q=4  `1=4I ` =, `8Ph @pHH "..,(,X*F((Hhx        ( 8 H Xhpx  @H H H H  H  H H H H (H  @ H H H  H  H (H 0H 8(@H H P *X@ *  @ "  8Ph <$ 80hp " x  "  8Ph <$ 40hp " x  @ "  ( @ P h   <  $   4( ` h " p      rU @, `a14A `e=0, `i00( `m8 `q==<A `u1Q =0(< `yi =0 `}) Y8 ` =0#,A `90#< `Q9) 00Y(8 ` 1q=4  `1=4I ` =, `=< `i=#04  `  aq1sw2de3=<I `) Y aq1sw2de3 =4 `)=Y#4 `=8  ` yY#8I ` y=Y/< ` ) =Y0})@ ` IY=)=04  `i=0HI `((==08 `  )0=Y#4 `=#@  ` 9 Q i ==8I ` =0#8 ` )=Y0#4 `  =4 `  @I !`   1 xlNone0 =$ "`$ #`$ $`,I %`yY4 &`yY =Y04 '` .@=, (`=4I )`=#8 *` ==4 +` =#4 ,`=0DI -`  Q ==#4 .` &=, /`   *, 0`!=DI 1` %===, 2`) /#, 3`-! 004  4`1=08I 5` 5A  =04 6`9=#, 7`=)=Y,  8`A#LI 9`E9q    Formulas =0=< :` I (=4 ;`M=08  <`QJ2%.g%cId 0GetTickCount~8GetTickCount}\$SetWindowLongPtrA} HGetWindowLongPtrA|pSetWindowLongA|GetWindowLongA| SetWindowPos|FindWindowA|8AnimateWindow |\ $GetCursorPos|H SetLayeredWindowAttributes|l ReleaseCapture|2SendMessageA }SetWindowLongA}GetWindowLongA}@PSetWindowPosd, FindWindowA}PAnimateWindowpGetCursorPos}SetLayeredWindowAttributes}ReleaseCapture} t SendMessageA xRRME PSPSSS<@d<<@ 0{BA173E39-A48A-4C18-BE56-FA9F3E0E66CB}{28238B41-C1A3-43DA-84D2-B6C36D89B2C5}0%*H]%bp btbvbz`z+|P +|H$%( BPLBLBxLBLBXLbCbCBLBLB@LBHLBhLBLBLBLL%dhj083)hliceM+H  i%ii+h(p  iHi.Ena+  ii%i+H  ihi+  ishT.iij(ilH. ihTargi .Vi+(  ii+h $  ii%nielp+0  H  )( %+ p l  i i i i 0  + p :  i i ( i i+ 0  iP ip i+  i i%+0 P , ip i ij il i i i> + p P i i+P p i&i0i )%+x ii8p iXi +  ii8iXi N` `i `$`p X%n%  i`  i i`$`p %  'i` Xi `$`p % P i``   Pi.0i )%i    X       x i 8i Xi  A i  A h i `  ` ,! i , p%)0 %`$ >h% $ i& %0 %*j`HjlbnP brx bxB(LBLBLBLB0LBLbCBLB LBpLBLb(0hhx XPpH @Px0 (x`PPP8hXp0 0*$8py7B^(*\Rffff*0>62f10178\0 N   0   "    * "P X h       @  0 @ " H P h p .  :  .0 ` 6    "      "( 0@ "H P` "hpx " . Z L( Lx < 4"@ P`hpx ."   ^" @H`x 4B  B(0 8@ H X h p 2       " (  8 H(X      x] 8$ ,] `]@P]@x]  (pP`]D( %]D(% ]D% ]DP% !]D% lend]D% 9&]Dx%2 ; - ]D% ]D% ]D0% ]DX]D]D]D]D]D ]D ]D]D@@]D  7 ]DHeft ]Dhh - ]Dpidth]D: ]Dk.Le]Didth^^0px  HPh8(0  0    0  Px#***********************************   ]@xX3&]@H#***********************************  ]](]@  $'$ $  '$   $$'pna  $'p  A@  !j !l    A@d  !!V'$F !!'p $2 '$ p'p  pX $X    A@ko`]  $'  '   A@ X  A@o]H]`]x  $'$ $  '$   $$'prg  $'p  A@  !j !l    A@d !!V'$F !!'p $2 '$ p'p  p $    A@ ko]  $'%n  '   A@0   A@o]  $'$ $ '$   $$'p  $'p  A@  !j !l    A@d  !!V'$F !!'p $'$ p'p  p $    A@ko]8  $'  '   A@   A@oPA   A@o#*********************************** !| Already initializedkp  !$' !V (VA@A@ X  A@ (I/ - B@o CloseMode:p  vbFormControlMenu = 0' The User had clicked at the [x] symbol vbFormCode = 13 The Unload command was called from insode the code vbAppWindows = 2( the actual windows environment was quit vbAppTaskManager = 3/ the application was closed by the task manager X   A@ (oP  A@rko  A@o  A@oXA@oA@ oh(Title will be the title of the dialogue.SStatus will be the label above the progress bar, and can be changed with SetStatus.EMin is the progress bar minimum value, only set by calling configure.EMax is the progress bar maximum value, only set by calling configure.6calling Configure sets the current value equal to Min..calling Configure resets the current run time. "  (  't  'v  'x |'zox'Set the label text above the status barx   (A@m WSet the value of the status bar, a long which is snapped to a value between Min and Max  t G t' j  v G v' j]8P  'x x t  v t ' $   " ( A@m(-Returns the current value of the progress barh x' m R ]8]P j.>d j.>kx  ...'' >B@B >B@ >. T T V R .>. V V i p j l & '& & ' G''& F''lj l & b l j(p l 'l l' G''lj DoEvents k o Attribute VB_Name = "ProgressDialogue"  Bas0{BA173E39-A48A-4C18-BE56-FA9F3E0E66CB}{28238B41-C1A3-43DA-84D2-B6C36D89B2C5} dGlobaBlSpacoFalse Cre atablPr@edeclaI"dTru BEx0pose0TemplateDerivCustomizD O@ption 1licit I'ementsD IBar Pub gfrm A  '  lng Long(Z^ Cancell_'Boolean, showTi|LeftAD Value_MinimumA, ax0Curr X6wMsg/ wParal&Any2nam)6Ukng % /kaUWi?ndowLong Lib "user32" Alias "GetWiA" (ByVal hWn d As , &nIndex*") Private Declare Function SyPoN j~IntAfterjX Y c 3cywFlags ghFቨ.dlllpClassName9StringNlp(pAnimJdXwTi"IydEBooleanE@Cursor@z&F(lpPoint?POINTAPI)Layered6At@MbutecrKe~bAlphaA"Bytea>F)Sub ReEseCaptu (7ndMes0sageIKSewMsg2q@wParamGlAnyj]#E@}If '* #If V`BA7 A264 TheCi)PtrElseK)!$**&  e!6MoveFormOnScreepn(Op@TocX!'^ = Fa`9Dim i/+"១jpaCoordin tw_i @ (#, GWL_STYLEDa@$Not WS_CAPTION"1D@BORDERc j` 毡Cq , i EX, 0A%G@!i * #Oa&!$0,.X YBSWP_NOSIZE Or OWNERZ" FRAMECHANGEDcRa,ApplicaC.A veJ.Hei`ght: !%W0idth Int(i / 2 x+ 5'  j*t#CLng(j), i&@!%@1A2A63` Transp ~ 3ZQ0caU'255D 1Re_(1= 0C0T'tQ@0EX_LAYERT 4+eeaSt, LWA_ALPHA X#S$FFnFFq aF3 !F'oF4v#Q(_WoF]oF oF0}.LoFf\IfoFrf &oF oFbYoFoFoFVoFHoFoFDoF ODoF> oF#oFndUjEBWoVXEEEBÁy$E27E1A.EY)d&EruEx+EE,t ? x(EubEEEE2Yd,@"DD>TQGZ?(BBBf ?b0BUCA??6BBBBERCBB@ ?dow.Width i = Int(i / 2)\j\j \@SetWinPos ihWnd, 0, j, iSWP_NOSIZE Or OWNERZ`ORDER FRAMECHANGEDEnd If Sub PrivPate  TranspareOptiona l ByVLayered As1= 255pDim Ret 0Long6= Go (pGWL_EXSTYLEO qWS_LAYER]##,?;UAttribute, LWA@_ALPHA #ublic MoveIt(!YCall@leaseCapture ndMessageE*WM_NCLBUTTONDn, HTC@APTION@y&'*nIProgrBar_Initiali ze*$If m@odAnim@{dFormsEffects.bln8UpdAIsGdTrue Then ExitE' Already id Sɂ@F@i(vbNullSjng, Me.cT[CHeight - 20CAg.OnScreen FalsdÀH 245DA! CLngC)@, AW_OhMAL_TIME VER_PTI|VE*d3*' A- fe.Repaint!,UA {CQueryClose(C`ancelv e ger, Mo,deB0'G: D '@ vb!ControlMe,nu 31'D User had cgkat the [x] symbol'1 = 1 L Unloaommawas cmfromLsA Fc% App8s 2a !actuws environm@ 8quib'ATaskMan`wr3ppa!Bc(d byt QJJ8HID»`NALNE|GA_L_w``Cr_KeyDown6(cC-`MSm=sMnEShif FA %7 ed:_ "&A Do0/0RRun  # v= (- )p ہ292 * s A' `urn}Ae V +p+0 z+ ()!1; *)EFuncTry_1f_E_A|On Error GoToHp)lerw11i) bg10$gfrme Is NothW[$ a = New DgCQEb1N7$WТQ .\" ...", -10, b1.1eForm = diag 0GoTo Success0:tCleanUp ErrHandler8SetNothin*Try_Show_Progr~_'xZWEnd Function P ublicb MTick(Op!al lng As Long 1) If r gfrm< Is W ThZe1  %= g*+ *9> 10$- :"=  "$Do WhilRe<> 7 _.ValuerP'Zb107J1 J,'AI DoEventAHLoo nIfqSub , .value  %n!p$GHj %n!Z!\ GHj %n!! 4  %n!8*  %n!:$=( %n!:<>$#'0  0 ($#'0  0 !$#X '2 2 ' $'2 2 N %H 2 N%J.\'. !G (j !&G (&j \B@zV 0 !$#X \%lC@HC@qkkkHk** %n!p$$'. B@.******D If wsT.ProtectContents Then modServiceModule.UNPROTECT_SHEET wsT(  Ndt_ *  %bdt_ *  N!%l  N!%&E - A@  , %GHj I modServiceModule.AddDelDinamRowBlock Target, strAdd, strBlockColumn  , D B@X HB@z ' H   (  b d H%nB@H Hkkd  H!ws_add_$ B@` k   %n!!  %n!Z! Wingdings 2 %n!pe-'.) modServiceModule.SetAccelerationStateD If wsT.ProtectContents Then modServiceModule.UNPROTECT_SHEET wsT b  , D B@X'dX  , B@` k8_header:_multi:kHL  $  :  J!` $  :  J!L Z !A@XHp H!FG H B@fj B@.   (&A@o(L]F !x.Hp]8F H!x.N'p]XF H!F'@]pF !'b]F !'d]]F %n!p'R] NTemplateOperationMode %G|j# If Not Selection Is Nothing ThenA@ If blnUndo Then GoTo end_****" strA = Selection.Address(0, 0)% If Selection.cells.Count = 1 Then' strVal = Target.cells(1, 1).Value+ modServiceModule.SetAccelerationState & Application.Undo: blnUndo = TrueJ If Len(strVal) = 0 Then Target.cells(1, 1).Value = strVal: GoTo end_( Application.SendKeys strVal, False( Application.SendKeys "{TAB}", Truean modServiceModule.Pause 0.1 blnUndo = False( t Elsero%' strA = Selection.Address(0, 0)'' For Each rngT In wsT.Range(strA)ma' blnUndo = False' rngT.Select' mod_01.P_WS_Ch rngT' ' Next  A@ End If wsT.Activate wsT.Range(strA).Select End If ! !x GHj& abel a7 ( ) %n %'< < nl %n!p GHjMa %n %=  ( ;d#xME PSLSS<6 (H&X Z8 @  6H Z 0 J \`  2(   0(  X *h@  6 @@`  ( * , ,8 hXp F 6 PH *       .   P` *@   Z  @       @ LH D  8   P( (x  f  h  n : F8              "  "   (Hh   ""0 8@ H `   8 0  8P   V     ( ! " !! ! 8! H! P!*X! ! ! ! !!xohhLX]F !&']F !x.H](F H!x.N]HF H!F'@]`F %n!'b]xF %n!'d]F H!ws_ $'* |P]Fadd_ * ', ]F %n%r'. ]] ]@`]]a , Z !A@X !G (j  %n(pHk0 ' S Set rngF = modServiceModule.rngGetOnValue(wb.Names(strA).RefersToRange, strVal)) modServiceModule.SetAccelerationStateD If wsT.ProtectContents Then modServiceModule.UNPROTECT_SHEET wsTV If Not rngF Is Nothing Then wsT.Range("W" & lngTR).Value = rngF.Offset(0, 1).Value, <  G  <(jk  %n!m/d/yyyy7 B@. %n!d ############# '..' Z !A@X  %n(pH k  %n!p % %n(p %n!p# '..' Z !A@XHX kP " ' 2- $ If intTC = 13 Or intTC = 14 Then% Set rngF = wsT.cells(lngTR, 13)% Set rngT = wsT.cells(lngTR, 14)J If Not Len(rngF.Value) = 0 And' Not Len(rngT.Value) = 0 Then@ If Not modServiceModule.blnCompareDates(rngF, rngT) Then/ modServiceModule.SetAccelerationStateJ If wsT.ProtectContents Then modServiceModule.UNPROTECT_SHEET wsT# rngT.Value = vbNullString End If End If End IfH k  %n!mmm-yy5 B@. H!FG H B@^j %n!d ############$ ', ' Z !A@X  %n(pHkS Target.cells(1, 1).Value = modServiceModule.strIsDate(Target.cells(1, 1).Value) %n!p$ ', ' Z !A@XHkHk '  If intTC = 8 ThenE If Application.EnableEvents Then Application.EnableEvents = False= Target.cells(1, 1).Value = Trim(Target.cells(1, 1).Value)1 If Not Len(Target.cells(1, 1).Value) = 0 ThenJ Set rngF = modServiceModule.rngCheckUniqValInCol(Target.cells(1, 1))! If Not rngF Is Nothing Then` For Each rngT In rngF ' . b' If rngT.Offset(0, -1).Value = Target.Offset(0, -1).cells(1, 1).Value Then '. h MsgBox " '" & rngT.Address(0, 0) & "'", vbCritical, "!"3 Target.cells(1, 1).Value = vbNullString@ If wsT Is ActiveSheet Then Target.cells(1, 1).Select GoTo end_' End If Next End If End If End IfHL  $  :  J!` $  :  J!L Z !A@XHP b d H%n B@l @G H B@fj B@.ooxL]F !l!x.H]F H!x.N] F H!F'@]8]P---------------- !  N %H N%JB@H|kk---------------- !l%n!'b !l%n!'d B@. @G H B@^j/  !l%n!p $@  N H!ws_prim_$ %b H!ws_prim_$ H%l B@kpkhH`LX[ !! ! .P_WS_FH:  J!` -  J!L MsgBox "" & Chr(13) & " : " & Err.Number & Chr(13) &' " : " & Err.Description, vbCritical, "!" HX H!FG H B@fj B@. H G b d H%nB@johL]F !x.H%n  B@HL[ H! .P_WS_SCh -  J!L$ Hp H!FG H B@fj B@. o80SAttribute VB_Name = "mod@_00" Bast0{00020820- C$0046} |Global!SpacFalse dCreatablPre declaIdTru BExposeTemplateDeriv$Bustom izD2Option /licit Pub Sub P_WS_Activ(wsT As Worksheet) EndBDC(ByVal TargetRange, CancelBoolean$ OArror GoTo er@r_ Dim blnAppScUp: ,= [ag.ScreenUpdngE0: SK@&A=).p`n@A wb")(S2 h(1X2CU( ^! tc2@ 's ,ServiceModule.SExists(wbcD" eb.fe Ż yI ɵEnaEvas== D Np`5c/Sap7 RB.Rp0v!Withq]mpJ.A(? "11))J .Sel`Ah]vAiIf?u>C.'Ā#4rim4).D, 8441o  (etAc@JerRSt';@`.r~UNPROTECT_SHEETWW3 @Ismd0wb`4|dt k0sF!'wb.*OsP(U!",D)p[ hingUu` a - 1 1aa샒fPe R  mCheckDEx`Maxs4 btxQ0%q3!  DelDinamp{?rh}ddArray -h8&_=7gz0021aeUq?MOR `TR,+!C3w > S'@E O.HK%i; "ndQ'䑍rH7a;/./!xlNon0  &OP("WP7d0s 2" Aˏc"#O 9 4 Cab1~,S?P߲?P ~?PTSSK$ 8):k 5dd501C$}$k@Cey+'_head`ti: End If GoTo end_perr_:TMsgBox "" & Chr(13)"D 4: 8Err.Number R"@8Description, vbCritical, "2!"If Not wsT.ProtectContents Then modServiceModule.PROTECT_SHEET, TruetSetAcc eleraHState FalsaApplN .ScreenUpdng = blnScUp,D Sub]Pub  P_WS_Ch(ByVal Target As Range)On qor ̀Ƀ' 0 Dim_Worksheet: Y =&.pa.rbbook b+P @0 WsTA Boolean:5D= ]lngTRLong: $Row intT C I@mger: C Column rngFA H4, TstrASQStriDtls(1, 1). CG nAk varGetDoc umWIperty(wbTemtplOe")X2ExitA+ 'S@c IsA~h/ @  #eUndoH'0=l.Address(0, 0F.!@.Count1Ecu )y'" $`Qg gBK@ r #Len((0Cei9{@c:df♄ SA Keys ,%{Y"{TAB}"eDause 0.16= DE'$ @Ag37F Eacrh#`Inbqb%A{<$ Av*D =. &_0<1.GNe|xt!DǂA@Xv_A OB =:Me C0ells! AeȤ#V> #V= ' @!n`' (  + E4>7Lis@tInRng|sxts($"gZA) > #Z `!vbNullÓ`(1nOxidInr { 3@ ~ 2||A BV9EnableEvUt|5`U? #G1t,' 0 u"b$O3FpkIdOnuec. Names;.RefersTor3,I#26oVt? 7Q|UNo D%0 FiG">W២~du1.Offseth w'8fF&'% gT ABgdbl@Width5 0n= sQ%Ip'%ԭ Xmas"mP/d/y"9'ooT@W"##: A'..'/9絟4uYH4ŝ4:UIsDdT$&TCAgKKT4'PdDD2-6 13 Or14tY= E!>b7m`3BvT#4qBc5Fw`T?v,ǑhComs()k#OO Oe.OT& $0/5auC'"???(Gmm-yyGGev If wsT.ProtectContents Then modServiceModule.UNPROTECT_SHEETrTarget.cells(1, 1).Text = "#"5 MsgBox " ', '", vbCritical,3`!"MValuevbNullString.GoTo end_End If ',strIsDate()-LenZ0X`?,FE' 5intTC/8/ ' @U Applotion.EnableEvV= FalsecTrim^"0Not %` Set rngF7~CheckUniqInCol#BDA!Is hLMFor EachT In '^   . *@ 7T.Offset(0, -yh/)~B'   e% '" &b.Address!0)"( E˂ ! 2ActiveShe@?B SeligH EiFN@Eqh e0rr_:*'Chr(13b& A: Err.Numb.Q_LTC' /d[AdlRig|ht%oS) a1)p(" Q 1 IsN Twb, Replace8.Codews_"p8_").PVisi. (me, 25s 1Z O[AC[Debug1nt)is(Q;./& "!ZMe.HFHC\ZB*Z]" -^[ @gccccccugc'!c+LH<^OaOaOateEa(`߀C.=uk.Show dSCha{'oa ~11oaet^sT5Sa!4Genol_Ws_`d j*I*17(q&a_H___}18__SRP_384!J__SRP_39hWrapper;__SRP_6rU~| 98pB H rU 8nrU~|  yC)FDD9C DGa0   0   &   (8X h x&   T B  `h  p "   `( B    , ,0 P X`hp lx B    : H:X>  B      (8 Xh;C0dӥxMEP'0l0 < > LL0+X ` @)Z `h%i\ x% ^ %+` ` )b $N%)d 8@@%if `^ )h %%+l ` 2)b ^ %)d  %if @)h `hH%in 4 )p 8%%+r (`  E)b  <>%)d @H#%if h2 )h  N%in )p j%it B@z)v %%+x @` h V)b %)d %if )h % ^ % n8%+| `  l)b %)d %if )h %idexME(6 << <hH8PH:@H> hHB H D H H H L @8HN @HR XH !T  MO_REESTR?HHH(H<xH@ HF H J (H P hHHT hHhxhP@@(< %h ! -!https://eias.ru/procwsxls/p_NSRF=p_TC=GET_UPDATE_INFO?P_TC=P_V=P_NSRF= P_ENTITY=P_EXTENDED_INFO= GET_UPDATE?p_TC=p_V=P_NSRF= P_ENTITY=P_EXTENDED_INFO=x07B^$*\Rffff*1@62f1017d%% $, <&H p N N X Pp J H NX  8 Xp x]$ !No (. '', )!"  ]$ !]$ -!5 DNS, ]$https://eias.ru/procwsxls/]$ MO_REESTR?(]$p_NSRF=PD]$p_TC=@G -, strURL modInvokeHTTPServer.strQuery_Org_ListG======================================================================= 8JPublic Const STR_HTTP_REQUEST_PROC_ORG_NAME As String = "ORG_STAT_REESTR?"DPublic Const STR_HTTP_REQUEST_PROC_ORG_PARAM_1 As String = "p_NSRF="TPSBPublic Const STR_HTTP_REQUEST_PROC_ORG_PARAM_2 As String = "p_TC="G=======================================================================e e]$GET_UPDATE_INFO?xBe]$P_TC=h]$P_V=]$P_NSRF=s]$ P_ENTITY=2]$P_EXTENDED_INFO=he]$ GET_UPDATE?]$p_TC=Che]$p_V=@]$P_NSRF=]$ P_ENTITY=h]$P_EXTENDED_INFO=PNAttribute VB_Name = "modHTTPGlobals" Option Explicit  Pub, Const STR_UPDATE_FAILED As$ Sng !" '  *6 (. '', \1 )!SUCCESS ` 3 g#INET_CONNECTION_IS_OFFL k-큔- ' DNS, ? h ΁_REQUEST_BASE_URL_1 Ihttps://eias.ru/procw`sxls/LPROC_MR_M O_OKT@NALMERE R?`(NPARAM ,p_NSRF =u2'p_TC] -,Z strN Invoke-Server.Query_Or g_Lis'=?A$@ίaOORG_aASXTAT@b' _|0C/&*c&$ @b_X@XGwdINF~O0(,YY )PDP2_ *P_Vc3+dPm8 4- ENTITY x 5n XTENDED_!8A ??+?f-=Mf_=I=C ng<_<}E(c i ^oo n 8)p X% ^ x% n%+~ H`  )b %)d (0%if P)h px%in )p %it )v % ^ ate% n@ents%+ ` )b X%)d _h%%+ H `  ) @  %+ ` )  %+ P ` ix  8iX H p%+ ` i  i e + 0 `  i bln+ `0k `h Sel+  ` i modSi Stat+ ` `X 0k `* h 0 T+ ` i* seHH P  ` 0 (@V P  %H Hx 0` l h rn  ' Nex^ EnIf@`d te@` strA@P  @@ !@0 G`p `x` l G` % = @d @` @P A@X@@ @0 ` (  7B^*\R1*#278*\R3*#92$*\Rffff*0w62f10178*\R1*#3c7*\R1*#12d*\R1*#136*\R0*#e9 J B  PX 2`  px     B     $ 8HPX h    B     , 08@ P hx   B   B      ( 0 B  8 @ H ` h p x  B            B       ( 0  8 @ H P X ` B  h p x    $       J h p x   B    A             B  ( 0 8 X B` h p <x           B       ( H P X  h x  D      D , `] Z !!x " trA ^ Z ^ !p \  X  ^ ! ^ !6%.X d X ^ ! ^ !6%$N.X kk ^ @d ^ Z ^ !p \  X  ^ ! ^ !6%.X l dP X ^ ! ^ !6%$N.X ndk k ^ kiN r1, r2 = v2%R h $j % b d f $X $&.` h e b d f $X $&.` d( b d f $X  h $&.` kzR.` iZ r1, r2 = v2 and r3 = v3Rh p $j  b d f $X  h n $X $&.l p eR b d f $X  h n $X $&.l d b d f $X  h n $X  p $&.l kzR.l if r1, r2 = v2 and r3 = v3 and r4 = v4R v $j  b d f $X  h n $X  p t $X $&.r v e b d f $X  h n $X  p t $X $&.r d` b d f $X  h n $X  p t $X  v $&.r kzR.r i(]] RX'x b d f h $` .n nzd ^ n x ^ !pX 'x ^ kHz@R8 z Y('x i @]`]RX'| b d f h n p $l .n nzd ^ n | ^ !pX '| ^ khz`RX z Y('| i@]](R X'~ b d f h n p t v $r .n nzd ^ n ~ ^ !pX '~ ^ kzxRp z Y('~ iXHRH b d $&. z(R . iR B@ ' zR' iH R ! B@' zR' ix ]0 x! !  . z(k  ' iP $ $j  ' d ' kd ' ki R' zhk` CurrentVersion %(pz0R( J!` JB@B2 $   0 00CurrentVersion l p !B@' kk2xip0 `]p CurrentVersion %' 0 (1.0' $ 'k  ' zi   % ' i ]H Version ^%'* ` X '* * $ '* k0 ( * ' zi` R' * zk * Version ^%(pzR J!` JB@B2 * $   2 22Version l * p ^!B@' kk2i}Attribute VB_Name = "Wrapper" ' , : Function GetFilterRange(r As  , v Variant) Dim` cellIf r.Columnsunt > 1 Then16' <! For Each/In r 0<.Valu=v-m Is NothingSet8Worksheeto( u)@0Else 1Un( Y,A.[,ndI ENext A+&Kl@kn?&ukkRowsk@jbjh?A$E8xy & r1, !f!q r2 'v2 Publ8ic Bn1(r1f,2!!, Opal r3&͉On Err GoToAHandle@ECIsMissw(r3) xv InsectE`,z(r22)3_`   -3dz$Exit5 *(:SD Jj JJ `:@= v3?L2?LC!oK:LO4OOg8(r4OhO2)O<3 ])4k@1?kU/c#ooo v/;"P4_,_,_,>_,tA&Q2_,Q[Q+2Y,41S4-•x 3-;SR+-r,.|r5.GVVV5.y VLV''4 ]05_0)1_03? ? )? > 1q11P35_3 _3_3[3! _3V3Sum(r D+cjs,a6!_,[, CDbl(0#s{ `"+pvЁ0,Qag"o + 3 =~"V@(xlPNumpo"i"?|o"d"O _MO/$/$/$/$OQf/$ /$a)$L`=$颵 Exit Function ElseH4For Each cell In s|FSumValueFilt@er2 = "+@ CDbl(.T)NextUEnd If   ErrHandler:zDCV$(xlNumgP P`ublicU3(r1 As Range, fv2 Variant 3v N4  Opal r5)qlDim sc On yGxoTo 3Kd0bSeCasqGettDAB,X v2A=34r5If+s Is Nothing TheD?@1M??@SPBPEx @InsectV]wAVo @q k2iLaAn : irivateiTryExecute(btBnTCommvBarButtonBBooleaCWW.D c!G 8TruĕFaœryRun__AApp`aK. AOnA= eFtoPLookupMenu(ByRef parent35ca”aStry6OtlAg 0 Code($C$ t$' 1= veOSnt FSR5# # vbAx=1$a#q^#r"#u#$1#;etQ !?\n$ R !1Tn/nL2cAnDocumentProperties("Version").Value = strCode  Exit Funct(ErrHandler:D $If &.@Number5 Then2 0Clear  Onor GoTo S2YVarType ()_vbStringf AveWorkbook.CustomD.Add name:=~8, _7NLinkToCont:=False4%p:=mso͞yr(:=1lSetwPTrux@hnd If@ED x2xA@ 0   0   0 (  0 @  0 $  0 H  0   0 H   0  0 P  0   KMA:P%`d $ d `0`1h)d`50oChh mCh lhFPlL,}lhd`00   KH<:P%`d$ Hd `0`1h)d`50l Chh jCh lhFPlL,}lhd`00 `        rU <`=/P`==/``__SRP_76modUpdTemplLogger$I__SRP_18$__SRP_19&-==/=/p` !1==/=/=/H!`==/XI`==/=/hq` !1==/=/=/@`==,`a=A, `a=A, `q/0,9 `/(a `0$ `,`0/$`(`0nrU I4aW0   0   0 h  0   @000000046}rU @8` a9yY,A`eyY4` l9yY$`in% R'd#xME (SLSS<N0{00020REESTR_FILTERED frmDateChooseHPmodUpd_Templ_Caller(modDefines  820-0000-0000-C000-000000000046}@(%H@07B^xAttribute VB_Name = "REESTR_FILTERED" Bas0{00020820-C$0046} |GlobaBlSpacIFalse dCre atablPr@edeclaI"dTru BExposeTemplateDer ivBustomizD2\d d}xME(<<< < +7B^  "  "( 0@ "HP` " hp "  "  "  "  " ( "0 8H "P Xh 2p D D >8 $x" " " " " (8 "@H<8dbW#<!jWR@QCU 1ѭ F&HC T   4%n(p h   4%n(p 4 B@fVkVxRpVhV` !(&oH- STR_LOGGING_SHEET_NAMEB@z  lB@ oAttribute VB_Name = "modUpdTemplLogger" " Bas0{00020820v-C$0046} |GlobalSpacAIFalse dCreatablPredeclaIdTru BExposeateDerivBustomizD2Option /licit Pub Sub Add_Sng(ByVal strMessage As  , _  wbBookWorkb3ExtendedStatuse7)6IfE = {_C_Defines.STR_FORM_STATUS_ERROR Then-SHEET_LOGAE|#WARNING$$S_INFO?$AB#nd IfwA_^,t, C ESubLClexar(CSNFO\rror GoTo ErrHandlera8DUIs Nothing SetcdshisYEDim wsShewcsarngRanfblnScree2nat`feren gU 9= .App`w on. adServiceModule.Exists(+Vh`^GT_#`NAME3)DF&!߆" B7 G, .U(.Rows.Count > 2 "C"UNPROTECT(!AW:`.(dA.cells(3, 1)xKq? ' Col(umn))- .Entire`-.Delet@'C .&%, !, 'y%rzaA}'t:"_3re6E ttoJ?p:?ptkINlO/M3tpQ7OMKMIkIIm lngLastb"owwLong!!KN⒯K AKKpdzKK^Kr3KQt4 {H_H_HhPf! =WH='R#EL+ 1J .uNow(u MM, 2)'vg}Os(, >3C2_F_Yet_F c~D FuUpFFv|F,ngG}cFcmdQr3icks' 1/'.#`qB      !"#$%'()+,-./012456g7f9:;Q=>?@ABCDFGHIJKLMNOP8RSTUVWXYZ[\]^_`abcdehikvmnopqrstujwxyz{|}~@$|H$  B @  F  J  N  R @  V  Z  ^  b @  f  j  n  r @  v z ). %  P().H%  ).%  ).%  `).%  ).%  X0).P0 %  ).wb.N%  ().  wsT%  h).n ws%  ).%  `8).X%  ).'%  0).(%  p). %  ).ntTC%  h@).`TR, %  ).Then%  8).0dule%  x). wsT%  ).%  pH).h!F%  ).%  @).8ls(1%  ).%  ). %  xP).ps Th%  )..Val%  H ).@ = m%  ).%  ).%  X).x.%  ).", v%  P().H %  ).' %  ).%  `). %  ).f%  X0).P%  ). %  (). N%%  h).%% %xX@ ( @ @ Hh@ p  @ `@8@ @@@ 0@  P@ @@ XP (  @__(X "`hx $" " " "  "(0@ "HP` "hp $" " " "( "08H "PXh "px &" " " " 0 "8@P "X`p "x "" " " " (8 "@HX "`hx " $" " "  "(0@ "HP` "hp " 0 B B .h $ "    "    "    "  ( 8 " @ H X " ` h x "    $ "    "    "    " ( 0 @ " H P ` " h p  "    $ "    "    "   ( " 0 8 H " P X h " p x  "    & "    "    "   0 " 8 @ P " X ` p " x   "    " "    "  "  (8 " @HX " `hx "  "  $"  "   " (0@ " HP` " hp "  " x A@r`oX@ B@.u>o8 B@ o .  B@ op@ B@hoP A@r o0 B@lo B@n.o@ B@&o B@* o B@jo, " " /LabelX_Y:= - X - ,> - Y - /8 ""  //  B@ o@@ B@ o  B@ o B@ o B@ o@ B@ o B@ o //  B@ o8 B@ o@ B@ o B@ o B@ o  B@ o@  B@ ox //  B@ o0  B@ o  B@ o@  B@ o  B@ o B@ o $ B@ op // @ ( B@ o( , B@ o 0 B@ o 4 B@ o@ 8 B@ o < B@ o @ B@ oh //  D B@ o @ H B@ o L B@ o P B@ o T B@ o@ X B@ o \ B@ o` //  ` B@ o d B@ o@ h B@ o l B@ nro p B@ o t B@ ox@ x B@ oX* " " /LabelX_Y:; - X - ,< - Y - /(  //  B@~ o  B@~ oP B@~ o B@~ o  B@~ o B@~ o B@~ o` // X B@~ o B@~ o( B@~ o B@~ o B@~ o`  B@~ ox  B@~ oX // 0 B@~ o  B@~ o  B@~ oh  B@~ o  B@~ o8 B@~ op $ B@~ oP //  ( B@~ op , B@~ o 0 B@~ o@ 4 B@~ o 8 B@~ o < B@~ ohx @ B@~ oH //  D B@~ oH H B@~ o L B@~ o P B@~ o T B@~ o X B@~ o`P \ B@~ o@ //  ` B@~ o  d B@~ o h B@~ o l B@~ oX p B@~ ox t B@~ oX( x B@~ o80jAttribute VB_Name = "frmDateChoo se" Bas0{8F0E45FE-A10F-41E5-891D-643B47B84D96}{179DD0A5-DEE8-4FBC-A4D3-67C73BA9191C} d@GlobalSpacoFalse CreatablPredeHclaIdTru BExpqA0TemplD eriveCu@stomizD Option 1licit  P#' Sub lblCl>_Ck() Unload MSEndUserForm_Activ%(mod._Handler ,InitialxizeG E.Query>(Cancel As Integer, ModeHG8!@H>cbMonth_Chang= EmdjHidexB#Minus@P % Pl$~ spinYear(_SDownH Up ;"Up> txtAr ' " " /LabelX_Y : '  @ - X`, PY /  "" :B# // +B1_1z[BE+ Vn2  2 3  Z3 4  4 5 l1_50ak467.Bm67ick]!7' .w((82(Y r(p  2_(蕟(2_(p  (2_( (2(R(|2_( (2_( (((3((6lp3((3(Q(??3([#3_(p?;(3( (3()))4)lp4)ߏ)#4)))oo4)4)   z ) Choose.LabelClick_Handler 4_6 End Sub PrivaLte87_n() modfrmDD7 ' // w5_12w75_24,2,34,3,44,4,545649\5_s J,' 6 J6 6_Q6_QQ=Q Q6_Q Q6QJ!' " " X_Y: ' @ X- X`î, Y@/ @ K_C1`lDb1(ByVal Cancel As MSForms.ReturnBooleanX @ {P1q5u1_3_zO>j1@>?li<5 /e?1_C<6?????e/_F<7?????5ݚT@;2;;;"$;2;???? ?;;?L;os;"2;w;<;2;2`%dddӿ;|;v;p֯?3;""""" 3y33;????7w3w????7;<4^^^^^lick_Handler Label3_4 End Sub Private85_DblC(ByVal Cancel As MSForms.ReturnBoolean) modfrmDChopose. 5U6_6A7A7A' // 4_1]SJ4_2  3 3 4 4_w@ w_Z4_w4_wg|w_w'5_w?E@ [55_w=}2}_w_5Z55_y\w5__w|\w5_w1}1w5_;  5;?c3;;owubS6;? ? ? ?  y6;????7;"6_;"""" {;????6;|ow????6;<;????6ow<ow????6;@i`attri B@ x%  `i X@+<i0ii`ownW`7B^I :BP h p    8 X `hpx D"      @`    B  $ HP X x  xp3 xs:any (attribR]At Vhk`VERSION+DESCRIPTION_UPDATE+FILE_UPDATE_SIZE+NEW_VERSION_URL+UPDATE_PRIORITY+    % 'VRVVi>      !"#$%&'()*+,-./0123579;=>?@ABCDEFGHIJKLNOPQRSUVWYZ[\]^_`abcdefgijklmnopqstuvwxyz{|}~ R(]( VkVERSION+ DESCRIPTION_UPDATE+FILE_UPDATE_SIZE+NEW_VERSION_URL+ UPDATE_PRIORITY+   B@  V@R8V0V(o   ` R  Vk 0   % '< VRxVpVhi`XAttribute VB_Name = "modUpd_Templ_Caller" Option Explicit@Base 1 '   PubP Func`Query_Last_Verss_Info(ByVal strateCode As Sng, _ $NblnShowMessag&BooleanATrue)0T/CC1Orror GoTo ErrHand# Dim[XMLTags(5,\If Len(p)D0 Then 1CQUpEnd I^f 31"VERSION C2DESCRIPT _UPPDATE 3 FILE _SIZR 4B NEW__URLA_PRIORIT>Y 3TDJHTTP_Request.tvi @7KE,A , =)sZ w:D @eC 7Subync_F]ɂ6 ɡWW@oWm*WWWmes(WsWxWTAsg8UsU5aRWR`H u#KLFileN?S̪Ia =]YXOr&Ĵ?a:i. E ?E"UpL dxME(6 << <r#C PC꘎(C4 P%C&C xC C @C CH aq1sw2de3%p"C$C (C xCꘄ(C +C C h ChxP(x(P@ph`7B^$*\Rffff*1562f10178    ( 8 H  X h  x           8x]$"3 ]$$]$#]$]$( (]$Ptrib]$(]$%xx]$(Ph]$&VERS]$]$+xION_]$]$ATE_]$]$@]$ x@]$ aq1sw2de3h1@Attribute VB_Name = "modDefines" Option Explicit Pub, Const colorCyan As Long34HYel(low L6LGree L5%Whir2$Red n+7y17Dark ^:Lig@htBlue =7row w40PPink'8ale <2Pf 43GBr3 xC Nyy Q5 O @S ]114gPASSWORD ASS"aq1sw2de3@ rU~| #"prU "n__SRP_224J__SRP_23,06fmodGlobals)<__SRP_248JrU~| %$p4rU $8n Gdb#xME __SRP_25/V:rREESTR_MOzk<modCommandButton"(sEI__SRP_36 bM(SLSS<N0{00020820-0000-0000-C000-000000000046}@(%H@07B^ xpAttribute VB_Name = "REESTR_MO" " Bas0{00020820v-C$0046} |GlobalSpacAFalse dCreatablPredeclaIdTru B@ExposeTemplateD0eriv$Bus`tomizD2O@ption /licit rU 7VVI4a SphereList Z%`!b.H !n!x ( !n!x H  !n!x  %n!p +  REESTR_ORG_ $  Z %H REESTR_ORG Z%J.H ` H( Z!!x Z% HB@REESTR_ORG (2) Z%J.H3 REESTR_ORG_ $  H( $ H(d REESTR_ORG_ $  Z%J.Hk GG H region_name Z%`!b%n!p $  D%F +  $  < ! REESTR_ORG_ $  Z & B@( L k < !'   $  < ! ' yk REESTR_ORG Z %H REESTR_ORG Z%J.H (0  B@z $ H( wsT.Delete (@ B@* k (&  < ! ZLastUpdateDate_ReestrOrg %b  B@^0 : $RLastUpdateDate_ReestrOrg %l(p   B@fk    :   \ (! A@Xkd : < ! v (!*A@X kXHPLH[2modCommandButton.cmdUpdateOrgData_Click_Handler - J!LH  B@z  (  (&   ' !  G   (jip/' PPublic Sub cmdUpdateOrgData_Click_Handler(ByVal wsOwnerSheet As Worksheet,' Optional ByRef cmdUpdateOrgData As CommandButton = Nothing,' Optional ByVal blnShowSuccessMessageBox As Boolean = True) On Error GoTo err_ Dim wbThis As Workbook Dim wsT As WorFdC4xME ("0l6 <l@^%{s}%  @ꀚ@ REESTR_MO% H PH @ @h$ @*hpH H ( @6, @ . @22 @REESTR_FILTERED %ʐ x(Hj0@ 8@<`@ 0H @H   @ @`H.K4* @ 0 @@h8x`@Ph(Hp   ...`P8%7B^$*\Rffff*1762f10178*\R1*#278$*\Rffff*1662f10178(( " 0P X(p$"* (H `p   "  0 &@h >@THx]$^%{s}P5 Ctrl+Alt+s] x$ ]  -C], ]8$ +] ATE_]` ]$REESTR_FILTERED]$ REESTR_MO1@]$ ]$]]@]]$ h]$@?]$ ...h ]$ ]( //]( //]( //](0 / - /](1 / - /](E True - , XֳAttribute VB_Name = "modGlobals" Option Explicit Pub, Const STR_REGULATOR_KEY_COMBIN ATION^%{s}" 'Ctrl+Alt+sgfrmProgress As I Bar ' vglnBg 2LongQ' -   gstrEORG_RANG@E_NAMEoSng ' &#ACTIVE_SPHER BrngT7Range7 XdblColWidthDoubl ΒFILT\D_S0HEET~REO {MOMO ' $AeMainSheetc! CheckBELowImpactWarningsCounterW Critical\ GwAdd`MSGBOX_I NFORM_TITL =p >W@ARNING€QCMD_BUTTON_UPDATE_IS#_PROGRESS_C APbv*1 ... : Xe FgblnTe@stMode#B@ooleanFeV a Z iAGd3intDay*I`7g7 ' //F41@Moni' tYe"' 4X ' ( /  - A Y_ B  g `6CalendarCh@%7!.' True C,  @"@: 5d]#<g?˾MbH F0Է)BBq.x0Է)BBq.g?˾MbHME( SLSS060 < P :X : ,   L  p x 2 J p      * B .8 h Jp 0      ( 8 B@ 4  ,  * H ` *h  <    * 0 J8  Z : |0 >    2 zH            Z 8 @ P (p *  * X X h"     < 6  X$x     H  0 H@    (        *8hxZ    00` h 0p        ( @ Pxp.  **L]]] ]8]P]p]  !x.Z    !' H   (k R0:00:1$T  B@" / ( (&hksheet% Dim strUpdateReestrResult As String Dim strCmdCaption As String Dim rngR As Range: Dim arr_strSphere() As String, arr_strResult() As String/ Dim intI As Integer, strTargetRange As String" Set wbThis = wsOwnerSheet.parent) If Not cmdUpdateOrgData Is Nothing Then, strCmdCaption = cmdUpdateOrgData.captionK cmdUpdateOrgData.caption = STR_CMD_BUTTON_UPDATE_IS_IN_PROGRESS_CAPTION End IfP Application.Wait (Now + TimeValue("0:00:1")) ' " Application.EnableEvents = False$ Application.ScreenUpdating = False5 Set rngR = wbThis.Names("SphereList").RefersToRange' ReDim arr_strSphere(rngR.cells.Count)' ReDim arr_strResult(rngR.cells.Count)" For intI = 1 To rngR.cells.Count3 arr_strSphere(intI) = rngR.cells(intI, 1).Valuev Y If Not modServiceModule.SheetExists("REESTR_ORG_" & arr_strSphere(intI), wbThis) Then/ Set wsT = wbThis.Worksheets("REESTR_ORG")" wsT.Visible = xlSheetVisible8 wsT.Copy after:=wbThis.Sheets(wbThis.Sheets.Count)3 Set wsT = wbThis.Worksheets("REESTR_ORG (2)").4 wsT.name = "REESTR_ORG_" & arr_strSphere(intI)% wsT.Visible = xlSheetVeryHidden ElseF Set wsT = wbThis.Worksheets("REESTR_ORG_" & arr_strSphere(intI)) End If= arr_strResult(intI) = modHTTPServerCaller.Update_Organization_List(wsT,' wbThis.Names("region_name").RefersToRange.Value,' arr_strSphere(intI))C If arr_strResult(intI) = modHTTPGlobals.STR_UPDATE_SUCCESS Thenj modfrmReestr.Define_Range "REESTR_ORG_" & arr_strSphere(intI), wbThis ' End If Next# ' ; strUpdateReestrResult = modHTTPGlobals.STR_UPDATE_SUCCESS' For intI = 1 To UBound(arr_strResult)D If arr_strResult(intI) <> modHTTPGlobals.STR_UPDATE_SUCCESS Then* strUpdateReestrResult = vbNullString Exit For End If Next< If modServiceModule.SheetExists("REESTR_ORG", wbThis) Then- Set wsT = wbThis.Worksheets("REESTR_ORG")% Application.DisplayAlerts = False wsOwnerSheet.Activate# wsT.Visible = xlSheetVeryHidden' wsT.Delete$ Application.DisplayAlerts = True5 AllSheetsInThisWorkbook.cmdGetListAllSheets_Click End If# Application.ScreenUpdating = TrueC If strUpdateReestrResult = modHTTPGlobals.STR_UPDATE_SUCCESS ThenT If modServiceModule.IsNameExists(wbThis, "LastUpdateDate_ReestrOrg") = True Then3 modServiceModule.UNPROTECT_SHEET wsOwnerSheetv Application.Range("LastUpdateDate_ReestrOrg").Value = " : " & Now()7 modServiceModule.PROTECT_SHEET wsOwnerSheet, True End If+ If blnShowSuccessMessageBox = True Thent MsgBox " : " & strUpdateReestrResult, vbInformation, modGlobals.STR_MSGBOX_INFORMATION_TITLE End If Else MsgBox " : " & modHTTPGlobals.STR_INET_CONNECTION_IS_OFFLINE, vbExclamation, modGlobals.STR_MSGBOX_WARNING_TITLE End If GoTo end_err_:T Debug.Print "modCommandButton.cmdUpdateOrgData_Click_Handler - " & Err.Descriptionend_: wsOwnerSheet.Activate! Application.EnableEvents = True# Application.ScreenUpdating = True$ ' R If Not cmdUpdateOrgData Is Nothing Then cmdUpdateOrgData.caption = strCmdCaptionEnd Sub  ++PRX]](]@ 0 !x.Z region_name 0 %l%n!p$ 0 B@z Z !A@X region_name H%lB@H region_name 0 %l B@|XkP .  . !'  . (k R0:00:1$T  B@" / (& ?? (! region_name Z%`!b!p Z D%V'  (&! .   . ( 0 B@zk  < ! (& (! Z%J & B@2  ZLastUpdateDate_MO %b 0 B@^ Z!(* /: $RLastUpdateDate_MO %l(p Z!( 0  B@fk (&   //:   \ (! A@Xkd //:   v (!*A@XkX HB@zV@R8 (& (VV! . G  . (jo6Attribute VB_Name = "modCommandButton"  Bas0{00020820-;C$0046} |GlobalSpacI False dCr@eatablPredeclaDIdTru BE xposeTemplateDerivBust0omizD2Op tion /li`cit 1 ' PubA% Func-strCmdUpd!POrgD_Ck_Hler(ByVal wsOwnerSheet As Works, _8 &C0ByRef c\Nothing7/blnShowSuccessMageBoxBooleanv)S@ng6O_rror GoTo err;ADim wbThisA DbookFsTI\C[ReeRes|ulBTeCaC\rngR!Rang@ a' Sphere(1, CC%intIInteger, TargetG  SD?=J.pn If pzIsA; ThenA ˁ=.c"G9STR_CMD_BUTTON_UPDATE_IS_IN_PROGRESS_CAPTION End If!QaAppaad.Wait (Now + Time@Jue("0:00:1")) '@ q En}Events )ScreenBF`! 0bA`0BQ.s("@List"). m ersToEReE.cells.Count) o GFdH=x 1 e aa Q$Ua) (A, 1).-I@ServiceModule."ExREE!@ORG_" & ,Dw)O Zow)Ɯ "b#awsT.Visi\xl cT *py After:=fs(O(/ %R_` (2)Kn!eryHiddt#{ E!_'rcw8KC#@ HTTP ePrCalj.U_Ylant;_a0(/d _t6regz_635(1,oLu/t;\ӑs.QSUCCQ#*10frmj.D@efine_#a"_%_gU6 '@낊@S0'Nexvd' 0Wgu= "/_'$KUB`Pd(7'b* <>R_o2o? PvbNullGwMt p f8fkiRRtR"?Q}o=.QGeG kDisyA9KnQ7.Av@:6.oHhH'QDelet"s h sIn A.Get=qCAQoiccz**?#2#se.IsHI, "La|st&;bQ"O!w >"UNTECT_SHEETA(_R#}."*ٓ: | (b 6 5, "ofP„=Msg!"H , vbInfhormB#,a IM SGBOXFORMA_TITLEs x_ \ PET_CONN OFFLINE Ex c WARNING q V GoTo end_ err_:Debug.Print "modCommandButton.cmdUpdateOrgData_C@lick_HBler - " & Err.DescriptionwsOwnerSheet.`ActivLwAppJa0.EnableEvents = True "Screening$str2C= #bReeResult0' If Not Is hIThenx.caX );_ P vbNullPMt  B | K2I QtQ"?P<"UNTECT_SHEETʝ!))}A(1rcP-" ɲ:bP(!8a q6 u,K odћMsg"cԀH%֔ , vbInformi, YBMSGBOX`FORMA_TITLE?{ hw O&pET_CONNOFFLINE Excla dGlobals.STR_MSGBOX_WARNING_TITLE ' E nd If4GoTo end_@ err_: Debug.Print "modCommandButton.cmdUpdateOrgData_C@lick_H!ler - " & Err.DescriptionakawsOwnerSheet.`ActivO{AppNa4.EnableEvents = True#Screen1Hing' If Not Q l Is h+Then.can:strCmdC*Sub 0@ P4ubs +Ree#MO(ByVal wsT As Works, 'O*ByRef? z@5@EA?A.blnShowSuc cessMageBoxABooleanAw)K Onor BĖ pDim JCMR esultAStg ewbThisUbookSet D=^_Tit.parE@Len(Trim(wsRange("reg_name").cells(1, 1).!Cue));0 ; AuMsgH" ", vbCritical, "!" T.Select{ServiceM odule#Hixghl`@ ExitXc5mke\k:5=T?En&v (raCMD_BUTTON_UPDATE_IS_IN_PROGRESS_CAPTION  IWa(Now + Time8("0:00:1" 9' !|z$a a FO`C&S[= `5HTTP5erCal.c`_MR`List(R EE!SHEET_NAMEyiCc.N@\s ^ersToOC^__C@$)C3Tg(vOjXA |d>:dYSUCCX2"qv& 1%frm3.Sh(ape$_"OKTP!%dP.gsO&?O&rUp)FIs#Csts(@LpLast3-O>"Rb UN0=TECT_r.$Uwb^. > yT \\" @ /:D( _A2NOit,W& p{{Z%kd1/ҕ/.0{Ql@InformB,!).INFOR"P L"L L"L"L<N0{00020820-0000-0000-C000-000000000046}h@b: P Hb> 4 @ %% 0P` `!! )O! %i.  @ %`B _FIL` RE *` Lkd*)O 0 % >``x khDD8)O  @  % Ix8% tXp% 4` l|)Oon_n %i. .( :h` Dk(p)O HPame %i8 pi. < !`,RG_`T B@( `V `X `Z ``\ ( `^ '`` ! ,n `  ti| i~ i  `T (,l ` `x1iT oduli icat`'" &` Hvice,j P` | Bi0me &i etCo,D `  Liooksi plic%b6 (pHb8 Hb< (PHh`((Px PPh(pF .L (`@ p @n p , - . . ''!' quirY , '' @ 8x  P @0 \ @H L @` < @ , @  %@ @  @  @8 out @P  @ @ @ @h @ @ @  Jed@ er a   p@ l @\ ` @L pP P8 L (6 Zt@ l @ \ @XL req@H @8 @(( @0 ser < XR : v8 \@p %@ @ @ ques@@j D l n p @ p@ @ actr t ^J@@H %@` @x %@ est.@t @d @T @P uest@L @ H @D  xP(D` x7B^*\h < 2`   L    ( " 0 V8 T p 6*X  0 *    "   (  0D @$   &$'   , J@   (  0  J >p 6      @ H  \X 6*  $( <( 5h      *( @ 8 H P X ` h (1p  "( $E    "    "   ( 6*8  p    $'  3 <  . $'3. 0$'@3h    * JO   D( Dp   6o X` @1h yp yx  08@ H P` (p&  @1" 8P ,X    0   (p<8    @1 @ X Wh   N\  ,(z8 X  ` px  D  +     .B     (H`h p `h p 4xB      0H P B  X`x B   (HX`hpx]Dp , - . . ''!x]D' (Z]DY , '']D P(](: xL`]F 0 .@ ] F N!$D 'B ]8 2 B  region_name @ %l%n!pprd @ %l%n!p_prd2 @ %l%n!pGHjJ. $  region_name @ %l%n!p .NET.INV.(_prd2 @ %l%n!p)prd @ %l%n!p'_name (!b% ($  MsgBox " '" & strS & "'" & vbCrLf &' " . ' '", vbInformation  B  N! ' ' \A@X N!  N! $ B  N! NB@ %k`HXLP [ !!mod_wb.P_Wb_BC:  J!` -  J!LT.DeH (@ght = 1335 ClientLeft = 45 ClientTop = 375 ClientWidth = 3240 StartUpPosition = 1 'CenterOwner TypeInfoVer = 18 End 4  @ }WR KQDBTahoma4ho, 20"OuTahomaOk lblReference{  Microsoft Forms 2.0 FormEmb ( oPP Application.OnKey "{DELETE}", "'" & wb.name & "'!modServiceModule.OnKeyDelete"M Application.OnKey "{DEL}", "'" & wb.name & "'!modServiceModule.OnKeyDelete"rOrgj Application.OnKey STR_REGULATOR_KEY_COMBINATION, "'" & wb.name & "'!modfrmSecretCode.frmSecretCode_Show" NTemplateOperationMode %G|jv) If Application.Workbooks.Count > 1 Then# Application.CutCopyMode = Falsendler  End IfoL] ]@ N F B@H  . (,32 L (J $ - A1 (& NStatus %Status N,.k% ' C Set rngT = modServiceModule.rngGetTypeFormulas(modProv.UsedRange)Nothin If rngT Is Nothing Then! For Each wsT In wb.Worksheets* If wsT.Visible = xlSheetVisible ThenD Set rngT = modServiceModule.rngGetTypeVisible(wsT.UsedRange)% 8 If rngT Is Nothing Then Set rngT = wsT.UsedRangeio/ modProv.AddDelCellCheck colorCyan, rngT End Ifing, a Next A Instruction.Activatetr End IfV mod_wb.P_Wb_BP wb, True ' othi NTemplateOperationMode %G|jti (!. N region_name %b_BUT region_name N%`!b%n!pX If ` N%J(itkpkhk` (!. NchkGetUpdatesValue %b FalsechkGetUpdatesValue N%`!b%n!py N B@hikkkHL[mod_wb.P_Wb_Open - J!LH` N %Hells.C N%J B@f To k !(&o`o Exit Sub NTemplateOperationMode %G|jul B@N sts("R L (J & ar N B@P tI (! Status N,.ets( (! d 6 Z t < A@Xd / .. 100 . R 0  Z t < A@Xk` N%JB@z & a (! eStatus N,.Shee : v t < A@X N%JB@zSet dorStatus N,.e(in 8 \ < A@X kxLp]Status N%', , - v t !A@X'.|k=-------------------------------------------------------------= " " 8]]]]]] ]8 (]Pb '` N!$@.xlsm !$ '` k !$ -$ Excel 2007 222 N! \ N!d T Excel 97-2003(*.xls), *.xls, Excel (*.xlsm), *.xlsmf ` h  %'T d 222 N! \ N!d ! Excel 97-2003(*.xls), *.xlsf ` h  %'T k T False'.'8H k T $j 'T T $D ' T $@. T T  $'T kP  !$ -$ Excel 2007 .xlsm .xls T .xls'T k d # Excel 2003 .xls T .xls'T k@ k8 * T $l 'V V T $n '\ '^ \  p B . ? r t $X'^ b H k@ k8  ^  ( !$ .$ Excel 2007 .xlsm'.F'8 T 4v ^B@dp '.F'8 T 8VelvetSweatshopx z v ^B@k d # Excel 2003 '.F'8 T  ^! ^B@k (d'.F'8kpkh=-------------------------------------------------------------HL: . ( : J!`X )( :  J!LX ) v !A@X'.F'8F (HP ( (&o(( hR]'n | \*.xls*$~'T ~ | T 'n k T b ~'T ~ | T 'n kPHB@R8: . ( : J!`X )( :  J!LX ) vA@XBBi-  ]]\ 'l '  T b  T '  T $'l ki $@"   $'k` $"   $@'k  'j iP $@.xls.xls'D $@.xlsme.xlsm'D d'D kiAttribute VB_Name = "mod@_wb" Bast0{00020820- C$0046} |Global!SpacFalse dCreatablPre declaIdTru BExposeTemplateDeriv$Bustom izD2Option /licit P"& Const SAVE_STATUS_CRITICAL_IMPACT_WARNING As Sng , -  . . ''!ɗXSUCCESSR("E*" LOWaA L=F ! NF;;S%M9AGE_TITLEK;!L Dim blnWbB@Ont Boolean ' '\0@' HP6IMub Sub P_Wb@_BC(wbWorkbook, Cancel@) Orror GoTo err_A+0wsTi)sheet: Setj =_E strFileFo(rmaST: A = GetE`xtens@a`.n@"G aIf Len( )_0 Or  ".Range("reg@ "_ ").@ ls(1, 1).Valueprd+1_ 2WThen.nd.B!+g+_B & ".NET.INV.("@!Vm)N 3App P"a!.EnEv0ents3 iDisyAler ' MsgBox "8`y#ze e'&& "vbCxrLf!`" @jd|'", vbInfYH A`QNot![S `(_7bY> A<Rwb .SaveRe (cegFul", A],B)mGcEnd |If!aR:Debug.pThis@!.DH: 9 Err.Number " -RADescriq e0%g%Cu%la%5  `ROSb_ActivyS Ip$OnKey "{DELETE}p"' 'aServiceModule.RDelete`/%&-7 STR_REGULATOR_KEY_COMBINATION,3] frmSecretCode._Shojwrl " +var]Docum?Prop=y;ՒO02B`e"=W2B2fr @6Y&s.Cous> 15dCu pyG'BY. sP n ?rr#r3rngThc-  Die` heck&ites<YCalcuPH dxlAuc ' @ S p +@RefereStyxlA1S `;A1 S#enUpd_ϑ0^#IspO#"StatusR";QDP+C(i0 q%GxN#'<d0ѭ R#Ar=/cpp/Typs(Pv.UbGcDBIs chNib) Each In\/$sAp}.Visi#xlShk I ( A?/ p "/BAddPCellC1/ colorCyan, Fc:2>NexҥIru[on.[ӥeDP4iP@, $'ƴ´ PO@oP^oPoPoPoP`P#s.g2Te|stMX1@!KYIsExists?XPD52aCStr.smBsTo-Bys(1, 1).Value)) = 0 Then wb.Worksheets(""isiblefxlS<V vEnd If.' If modGlobals.gblnTestModhFe,Service#ule.IsNameExiswb, "chkGetU@pdates"QTru K V vt.RefersToRange.cell q"y" f=TemplMain.Check_F_ExecutiʍUCustomieq@Statusb1 'Cm< 10MsgBox SAVE_STATUS_CRITICAL_IMPAWWARNING,H vb% +O@KOnly,cMESSAGE_TpITLE0>lse% F .. B.wLfxb%/"  w_FCr 6Activ;dME@ CLow_C _CKC;LOWp:Exclam"j:-#& V`2p0SUCC@NRInrQvOnqaor edI`Dim sb7MI;gerd=K:;D> J Q t " ϰ+ 0+O!8This^.n_=ffX'- P< > 8 "9 "e7CrFileSt0g! Pathm PY1For#Lo>naf rExtensA uInd{%u uW@ae)iEnaEvps0?r' dex)3-ChoosNeQ1 \= 2nLRighFtvB#, 5".xlsm" A!val(I VqP) >9- 2 /Tpry ` '}!2007 !b2@ P!st"=ZGS%1(In zal=J#& "\Qg, ]g?q0:=" 97- 3(*!r, )@ m~m@ o C "$:=! titlePёvT?pV?"as! Vi.b.meo O  31/ Qdex a&_H@3>"G+ݏdZ= J $u1 @{0QK(t#wX= &_~ AsNBleName, 1) = "." Then strFit Left(H, Len @) -xEnd If '  If val(Application.Vers) >0= 12' Excel 2007 c*S ExtenN <>xlsm" AS $&(":  PElse^3^^Not ``")׾PCmm@, qEPathHGetA DblnIndzor  ExisƙA,])Write TrueC AIAbYesMsgBox(" B2  D;.  ?", vbQudes +No, "@䀼l@+2Fa1@ GoTo Choos~eAFA ' )IfEIMDnDisplayAlerts@,'t tt t\Gt!#Can!= a;: Save0AsUImAActiveWorkbook.C ):=x,Format:=52, CreateBackup:=3{ {e3b 6, Password:="VelvetSw shopQ=Res" _, ReadOnlyRecommende`  )PaE C(A> ?'& && AAc>'#(=yeRIC+'-7 a`=bA err_:qPK ^K !| . (: " & CStr(Err.Numbe$r) ")"(bSDescripSDs!U~la9Th!vyz@: gMndEnableEvenBP)ScreenUprdngG'!Sub Kt PuBb FunPKon a)3qByV alpQq As Aping, FXull)qB ooleabOn v" Handp^1Dimv?W VhT`Dir & "\*.Њ*"{d = &'_,5G1Do WhA %g `PLooVpCpr 6”66666:9666R ?R P @ J*.@ A谹 D腉Privv/?w(-/ !+intI!IntegeConst STRSLASHP"\ BvbN c^= 0v&In@(+ 1 ,6Pc Do?j 22E$2> 0ؚHP !b'2C(AGDG Right%""Yv=  #r = DsgJ*F 41ܟ!qo 57z m/62 GetFileExtension = "" End If Functp 0   0   0 P   B[8% AFbc dd0 $q")FDDemem hffh9i &aiOyi__SRP_1d7>hSmod_Tit@'__SRP_32Z\r| __SRP_33rU D4`a)I=Y#,A`e)=Y,`i)=Y4`m)I=Y#8` q) I=Y#0A` u9Q#,`x00,`|q00,`q00na A :]3)rU 3,I ()FDD9i@?JJ? (aU7Q#771SYVUAF1W 6VX (1;q\\ :@ <a]]Q^#16*\R1*#136*\R1*#121*\R1*#11c*\R0*#f*\R0*#1*\R0*#17$*\Rffff*1?62f1017d$*\Rffff*1@62f1017d$*\Rffff*1862f10178*\R1*#2ea$*\Rffff*1562f10178*\R1*#2f2*\R1*#92$*\Rffff*1A62f1017d$*\Rffff*1B62f1017d4w "  "   "  (0 8@PXpx .       %(.H x(b  L H3 H  P  :h  R{ rU 8 AIQ#y# (947-7)67 8188 (1;i@?Q?? @ ( B[8% AFbc dd0 $q")FDDemem hffh9i &aiOyijiC kYV l m!m% &I8a WW0 x  h0'll $ l(\]35l,00$} lLK l  p! p $p  p! p p p! p p&n p$ knp':\%(<%pH pp'l $ (\]35(n Cl $ kn/(<%(%:\ %pH p a  a A K#J/)p6  5L%:\ %pH p d)p(nCl $ kn/(<%(%:\%pH p a  a A :]3)p6   p$ dp1 pp ,l*#  2p(nl C$ kn/]E:\%pH p dl=$ )p p p p,}xt< p 0 `  D 'll $ l(\]35l, H! H TH  H! H Hl $ lva':\%((%HH HHvd3'':8NLL:\ Nll !6lL.<'':\NLL"#*#$*Fl !/6lL.:\ %HH H d%)HVv&':\%((%HH HH3'':8NLL0:\'Nll !6lL.:\ %HH H d%)HV':\%((%HH HH3'':8NLL@:\(Nll !6lLKQ*:\%HH HlUpH5l kOH )$* +H ''>FL0:\,Nll !H6lLkJH! H HpoH >FlL - L:\.]/ H! H dl / 8'/H6lL8p1 H! H dl / /H9y H 0H L '%:(0%kD8%:\1%l2*#l*Fl%H! H |L`12H6lLy H 0H L '%:(0%kD8%:\3%l2*#l*Fl%H! H |L`12H6lL l40p |5>15>1(M\@l - l:86]35lL&lJM\@l 7 l`15l1 H! H dl / /Hl.=l8= l8*1l80 l8*1x5>1llt5kpp kK<'':89NLL$:\:Nll^!6lLIp  k8 H! H H1 H! H dl / /H l.0pW 'T%'d%'t%'%'%f(%'%'%'%(84%lF\%H)$* H+H Hp\ 'T%'d%'t%'%'%f%f%:;%:(<%(88%lF\%H)$* H+H HpzP H)$* H+H  'T%'d%'t%'%'%'%'%'%'(%lPi8%lF\%)$* H+ )H H! H HHp P HH L  ,'':\=NLL0>lP#*#?*#@*#HlL*#D?*Fl !2 LHD)H6lLp H! H HH! H H H! H H8D 4}< LHDHlL0 h ( d#<x,,XHAIm@ F:F+NR⶷<x:F+NR⶷ktf) % ItB@(  %%@hpH% x%@8  x%@d J@` @P\ @hX @T @P @L @H @D @@ @> X x@XXp P  x%p @ @ @(< @, H@( \X < @$ @ " H@ @ @p  @ 0@ @ 0@0 w@H .W@` @x ȳ@ F@ x x+@ h @ X @ H F@ 8 x+@ ( @8  @P  @h x+@ @ @ w@ L@ @ @ m@( x @@ h @X X @H F@D H@ 4 @ $ ȳ@  m@  @ @ h@0 w@ h `x+%P $@r` JZ@ F@ @ @ h@ @ @P @x` 7B^*\R1*#3c6*\R1*#278*\R1*#2ec$*\Rffff*1=62f1017a*\R1*#3c8*\R1*#129$*\Rffff*1462f10178*\R1*#3c7*\R1*#12d*\R1*#136*\R0*#14*\R0*  $ * %   0  8 H  X %h . R  (08@H P h %& (b  %( HP X` h    P X "  `h "  px "      <}  0 8 HXxohhoXLH]X]x%]]b] ]@]X !x.H H!x.Net_union N%J. (. (& H B@^--------------- N region_name %b  region_name H%l %&.  %n!p$E If Not modServiceModule.blnFormLoaded("MessageDialogue") Then+ \ !A@X'  End If H %  < ! %n!pG N B@jl ; region_name H%l5B@m r5(:5(mq ` ( ` ( (prd H%lB@H' For Each wsT In wb.WorksheetsL If wsT.Tab.ColorIndex = xlNone Then wsT.Visible = xlSheetVisible  NextkkHkk------------------------------ - Nprd %b prd H%l %&.  %n!p$ (_prd2 H%lB@H kHkk---------------Hx ( (& H B@f|@L8  $  :  J!` $  :  J!L Z !A@XHopoo@Lp]F !x.H  B@H8L0[ !! H! .P_WS_SCh -  J!LH H!FG H B@fj B@.oAttribute VB_Name = "mod_Tit" Basx0{00020820- C$0046} |GlobaBlSpacFalse dCre atablPr@edeclaI"dTru BExposeTemplateDer iv$BustomizD2Option /licit Pub Sub P_WS_Activ(wsT As Worksheet) E$nd BDC(ByVal @TargetRange, CancelBoolean$Ch$ O]rror GoTo err_F Di0m wb+book6B1, w8sEUE B6 IS ec.EstrM R Sng, O OKTMrngAA lLongpblnBDI6SKRAb=U.pn{nb8=@D.os("eth_un"RApp}aA.EnEvents  Scre enUpd ngI @ServiceModule.UNPROTECT_SHEET\fT@'-  ԑAIf IsExists(wb, "reg@_n~") Thdena #:=Inters=(UAT.3( N Not c Is hiG fLen(TrimD .^ls(@1, 1).@cue))&0 'ad @CFormLoaded("MessageDialogueC MsgBox " ", vbInf BB`+! TQIf0'@CommandButton.iCmdJeOr$gD _CRk_"Hler, , ' HTTPCs.STR_UPDATE_SUCCESS+!+54f4O Main.Che(ck_sk, f 'h- kW8ith!cO Gin &DeletƇZior.ColorIndexcGv) MeA.Lock͉ i:iiws_01.VisixlSh,X@m Q=prd").S cBSE * 5 Eac InxS$TabxlNone'2Nex 3#o|nd oQ U  ?0W - :\/W2X6VD.V/VV/Vנ aX/Vl/V -Vy7$Vo{$ _ 2x$u)! EGO e:  )nye R>yK1 ut QaUd" & Chr(13)"D : Err.Number* " !eDesc ri⩁hCritpical^hHc! CDeaeƐOp'FHHyperlink՟iHSϫ H`ϫC"et:"?@(p\FGeneral_Ws>_`C:Debug.Print$F )<(6@4$L}4 \hXlp`tdxT$<( D@4$0 p  0   t l xKBxadt5dlx`$ ``}\` $ ` Xt 4H LL , l\ *#TlX*#P *#DlH*#@ 2\TXPDH@)`L> t k> t$  c=``+>$ |`v@,}tx4 \XTPHD@`Ld0rU 2@,2`a=4A2`e1I#,2`i1,2`m=,2`q1,A2`u1nrU~| yCC Dy#YD ()FDD9-!EEAFFF G9G7hCxxl h  h:X]/HCDDmodDocProperties"#__SRP_1en__SRP_1f=5IMessageWindowvJ oa"DocProp_TemplateCode -   Version$  CurrentVersion$  Status$  < I - , A@ ;/  DocProp_Version %b CurrentVersionDocProp_Version %`!b!pA@ ' kp DocProp_TemplateCode %b VersionDocProp_TemplateCode %`!b!pA@ k" \A@XdA DocProp_Version %b CurrentVersion$ DocProp_Version %`!b(pk DocProp_TemplateCode %b Version$ DocProp_TemplateCode %`!b(pkko+ h Version$  VersionA@ k CurrentVersion$  VersionA@ k Status$  Status1A@ kh XsltDocFilePath$  XsltDocFilePathA@ k XslViewFilePath$  XslViewFilePathA@ k RootDocFilePath$  RootDocFilePathA@ k` HtmlTempFilePath$  HtmlTempFilePathA@ k XMLTempFilePath$  XMLTempFilePathA@ C k Keywords$  KeywordsA@ Nothinkho`' IR  Title Subject Company CommentsSe  %!p' uld  %!p' ngkzR' ip' moXR0 Title Subject Company Comments p  %(pAcd p  %(pk|R J!` JB@B2h p$    l pp !B@ p$  e(!.  l pp !B@_BUT p$   p$   p$  e  l pp !B@p p$   p$  e  l pp !B@% p$  ed  l pX p !B@kd2 J!L v t J! A@XkoxwAttribute VB_Name = "modDocProperties" Option Explicit 8 '*RX 6U. (BC, ,    - /?Ȁr `: _0VersЀTempla@teCode/ P( dxME00> P"LL<4<8<<<( H h`Pk@ ) `****%  ` (($)%+ X`8k L)08%i  ` ""\)E %ioaip hX%F H%@X 8p  \X@hx @Ph H@X @H @D @4 @$ @ %@ @ %@( @ @@ @ @ @ @ @ F@ @ 8` l @h %@X @H @8 X 7B^*\R1*#3c8$*\Rffff*1362f10178*\R1*#136$*\Rffff*1462f10178*\R1*#3c7*\R1*#12d*\R1*#136*\R1*#2d8*\R1*#2d9*\R1*#278*\R0*#1*\R0*#17 ~ \ h 8p  \   & (" j P  6$%B}@(%@}0+0 H8$%B(%@ `h p 2x"    &(H Pp (" ("@ (H"p (" (" H  Pp  .B  N(10 H 1P h p x   . "   N   8  @ X ` h p     ,   , 6(  ,` $  ,    . 8 @ H  P p x  xV**************************************************************************************%1 V**************************************************************************************-| , , , - %n :E DocProp_Version -ubu Sub Check erites(wbBook As Workb) I f Get um(entyD , "$")" Ohr _ ZCurr7StatusEThenEC'g@ q g-Fs , ǢSetRequiredCustomLC COB@G xExC ZServiceModu le.IsAExisth\a@> @+'yD'@l., ThisE=. s(" .Ref@OToRange.ValueEnd DUEF !VMsgBox "k jEx", vbInformaa Els"' အB~* Bb ?@ABCDEFGHIJKLMNOPRSTUVWXYZ[\]^_`abcdefgijklmnopqrsuvwxyz{|}~ "  (8@Xh  "  0 8<H$  4(`h "  p  @ "   8 H ` x  <  $   @ X 4p   "      ( 0 "8 @ H ` *h "     E7d}saSetWindowLongPtrAW}<WWGetWindowLongPtrA|d(SetWindowLongA|PGetWindowLongA|tSetWindowPos|FindWindowA|AnimateWindow|GetCursorPos|8SetLayeredWindowAttributes|h$ReleaseCapture|TSendMessageA}xSetWindowLongA}GetWindowLongA}SetWindowPosFindWindowA}<AnimateWindow`(GetCursorPos}LSetLayeredWindowAttributes}pReleaseCapture}SendMessageA xRpRMEPSPSSS@d<<< 0{35F5C060-A863-416E-9A6D-1C84087E4131}{867CACAD-844E-4624-967D-C6DDB2BC37AD}XBLBPLBLBLBLb0CbXCB@LBLBLBLBLBLB0LB LLJdhjhl +X  ii8 i+(  i i+xP  i8iX i +t  iioni+8  iX`ixijiliiion$+X  ixih+8   iiiA@ +x  )%+`$  ii i@nrevi T +` x<  i i i@ i+  i i i+ @  i` i+  i i ij il@ i` i i+  i i+ ` ( i i i( L ) %+ h p i i i i (+h iiii` Xi `$`p % P i` i `$`p % H )i` @i `$`p 8%  i`  @  i.i  H) (%i      80%`8 %BLBLB(LBxLBLBLbCBhLBLBLBLb`0XxPH@@p8(0Phh x@!php 8\H7B^(*\Rffff*0O62f10178\0%  ".0.`,,*F (h      <0  p 8  "     "    "(  0 @ "H  P ` "h  p   x]D,h% ]D% x]D% ]D% ]D(% ]DP% ']D%2 ; - ]Dx% ]D% ]D% ]D]D0]D]DX]D]D@]D]Dh]D@]D ]D]D]D]D]D]D0p^^p  Xx8``      (  (@#***********************************V  ]@]@ #***********************************X  ]]]  $'$ $  '$   $$'p  $'p  A@  !j !l    A@d !!V'$F !!'px $ !V '$ p ! 'p $G'$j pG'pj  pX $X    A@ko]8  $'   '   A@ X  A@o`XP]]]  $'$ $  '$   $$'p  $'p  A@  !j !l    A@dp !!V'$F !!'p $ !V '$ p ! 'p $G'$j pG'pj  p $    A@ko]p  $'  '   A@   A@o]   $'$@ $ '$   $$'p  $'p  A@  !j !l    A@d( !!V'$F !!'p $ !V '$ p ! 'p $G'$j pG'pj  p $    A@kPoH@]  $'  '   A@   A@oA   A@o#*********************************** |  Already initializedk0  !$' !V (VA@A@ X  A@' "/ -  B@ R00:00:02$T modInfo.Close_Hint B@Po@@ X   A@' o G A@rjoH A@ro A@ro A@r oxpAttribute VB_Name = "frmHint" Basx0{35F5C060-A863-416E-9A6D-1C84087E4131}{867CACAD-844E-4624-967D-C6DDB2BC37AD} dGlobal!SpacoFalse CreatablPre declaIdTru BExpose0TemplateDerivCustomizD Op tion 1licit P#' Const AW_OPTIPMAL_EP300& ' HOR_POSITIV&H1 ' !NEGA!2VEL!4@$  8@CENTERM@@0 A @H4IDO0 ; - IPACUATC2C'@ B4SLE%4 %'P BLENDA8G Q GWL_STYLE As Long(-16)M EXC= (-20NWS_CA@XON &HC 0 BORD36&HbqEX_LAYEREhM SWP_NO-1n SIZ=MOdi2SHOWWINDOW-4 FRAMECPHANGd2tO WNERZc!= \&H Dh4-LWA_COLOR(KEY11ALPHAWM_NCLBUTTONAHTE<= hType POINTAPI` XE@YaEnd #If VBA7 Then AWin64dpŤD PtrSafe FunctaSet`dowW Lib "user32" Alias "A" (ByVapl hW`P, nIndex%dwNe M )h ^Gy_ "_J#E_*`j//+ ,   @#|If1 ?*3*PnopV _(gX()In,tAfter&66c^, cy5wFla|gsU ?8Find77wlpClass%SPnglp]olAni>m ?odw>wMsg a wParamU, l&Any1dUmj{ing ) i!i_X S ; n f_1yU_Q(/Q5 /Q/Q/QBS*&N.dllƈ'PiPP6 '?PgX$ByVal dwTime As @Long, FPlagsX) Boolean Private Declare Function GetCursorPos& Lib "user32.dll" (lpPointPOINTAPI)PSetLayeredWindowAttribute]YCompObj7aVBFrame9"ProgressDialogue"@z6>6f>hWnd\ crKey bAlpha Byte{%QSub ReseCap%p A@rXkoAttribute VB_Name = "modInfo" Basx0{00020820- C$0046} |GlobaBlSpacFalse dCre atablPr@edeclaI"dTru BExposeTemplateDer iv$BustomizD2Option /licit Pub Sub Instr() ' MsgBox " !  []", vbrma8, "! frmHint.lblReference.caOc;EndS ZD,, )2 @  0O#FuncW@QGet_L@abel_C5(ByVal wsOwnerSheet As Works, _  !Cat@hegoryS1ng)I O{rror GoTo ErrHandlerDim wbBolokAA#bASK(D=-.p@nŽ Ifn" Then .zTITLE C QC%.Ns(}).Range(p"B2"X) EuMETHODFS4`WIf!adA.%'aR'NO_UPDATES'O'3!]3"?N5,2d.a_CleanUp!c'a: AzCl _`KScrolling.blnIs_UserForm_Lo@aded("")b Unl?eE. A@|HdxMEPSPSSS<<<<| 0{5E8021DE-0A0F-4D09-9E82-14D0C347BF94}{36554ADB-01AD-4BB5-AD1F-F7F37306FEC4}8  @      (). % h  % %(h@h 7B^  "  "( 0@ "H P` " hp "  " x B@ oX@ A@ro8 B@ o . B@ ox( B@ oXh B@ o80ʱAttribute VB_Name = "frmCheckUpdates" Bas0{5E8021DE-0A0F-4D09-9E82-1C347BF94}{36554ADB-01AD-4BB5-AD1F-F7F37306FEC4} d@GlobalSpacoFalse CreatablPredeHclaIdTru BExpose0TemplADerivCustomizD Option 2licit P$( Sub cmdCanHcel_Ck() mo*d.s_Handler End*2Escape /Unload 1Ins8talf* *txtURL_DblCBByVal H As MSForms.ReturnBoolea>nK I:UserA_InitializeVd c Termin PrU )IDaWWW_0   0 GetUpdatesValue %l(pychkNoUpdatesValue %l(p chkGetUpdatesFalse %( chkGetUpdatesTrue %( chkNoUpdatesFalse %( chkNoUpdatesTrue %(dychkGetUpdatesValue %l(p chkNoUpdatesValue %l(p chkGetUpdatesFalse %( chkGetUpdatesTrue %( chkNoUpdatesFalse %( chkNoUpdatesTrue %(kkVRVV $  B@fk ( (&!lo p]'p t v!x ! t$v! r'pzk tiAttribute VB_Name = "modfrmCheckUpdates"D Bas0{00020820-C$ 0046} |GlobalSpacIFalse dCreatablPredeclaIdTru BExpose TemplnDerivBust0omizD2Op tion /licit Pub Sub cmdInsta$ll_C k_Handler(") O rror GoTo xErr€_R_Defines.BLN_INSTALL_UP`DATES|SAVE_MODULE .chkSaveAuto-Modulep.ValU$*CleanUpA),: BIf blnIs_UserForm_Lo aded( !name)4 Then Unl  L End Ixf ^A%KbCance?b"bďmb 4JJAtr,txtURL_DbRl\By`G 0 As MSA?s.ReturnBoo!Ia App daj.ThisWorkbook.FollowHyperlink-@.C.TexpFNInitialize?q#u!%a`2qLNG_pj_SIZE > 0dW '  bm.SetFoco`?t. 6o quction.Range("chkGetUpdatesValue"). = " y" ws InstrNovvbNullS`tringS hapes Falsisiblbemso(DTr C!iC+!dEEnd __SRP_16Q__SRP_17R'hmodfrmDoubleVal L3!k  B@fko modInstruction %J. m %J.4A@ o`modInstruction %J. m %J.4A@  A@ o0R  ! PAGE_FIRSTYVkA@ A@ VRVVA@ oR ! PAGE_LASTVpkhA@  A@ mVHR@V8V0A@ o  R ! PAGE_NEXTVkA@   A@ VRVVA@ o`R ! PAGE_BACK%V`kXA@   A@ V8R0V(V A@ o =========================RmodInstruction %J.  %J.4% $ ' A@ A@ VxRpVhV`oXRH. .4V0R(V Vo ========================= R]]] !&'* (p !', etUp (& % ( & sTru'& kh &  oUpd  '& kH 4  TrueR k  B@^ 4 B@^  &  %Rk `  ((  B@z ( & D  !%lB@H B@p ` 4( 4B@z t 4B@x $  ($v 4B@z &  4%.(  ( x99 9q & A@. A@0 A@2  &  A@0 k & A@2 kxVpRhV`VX 4 4 B@fk0 * (& , (oR 4 B@^ " 4 PAGE_LAST % 4 PAGE_NEXT % 4PAGE_LAST_INACTIVE % 4PAGE_NEXT_INACTIVE %R8k0 4 PAGE_LAST 4%( 4 PAGE_NEXT 4%( 4 PAGE_LAST_INACTIVE 4%( 4 PAGE_NEXT_INACTIVE 4%(VRVxVp 4 4 B@fkHo@0R0 4 B@^ " 4 PAGE_FIRST % 4 PAGE_BACK % 4PAGE_FIRST_INACTIVE % 4PAGE_BACK_INACTIVE %Rhk` 4 PAGE_FIRST 4%( 4 PAGE_BACK 4%( 4 PAGE_FIRST_INACTIVE 4%( 4 PAGE_BACK_INACTIVE 4%(VRVV 4 4 B@fkxopR`]]]]  4R(k  4 %Rk 4%.( ( !: ! !d'6 6 /$'8 8 $8 ' 8 $8 ' VxRpVhV`oXXRH]]] 4Rk 4 B@^ 4 %Rk 4%.( & /  '6 6 ( !: ! (dVRVxVp 4 4 B@fkHo@R0]H]h 4Rk 4 B@^'t ( 4! ( ! ( B@k ( VRxVpVh 4 4 B@fk@o8 8 0d#LH)@7w F,rqjUMIÿf$x,rqjUMIÿf$H)@7wME PSLSS06<6"<<N0{00020820-0000-0000-C000-000000000046}" 4H@MANUAL_SECTION_H% %PAGE_NUMBER_AREAv %@%  ` `  4 %  %  `` d)  ` h/  ` l6  ` pJ  `` t^ " ` xr  ` |  `    ` ` QQi&  ( %`* `, 0 0 `  i4  2  ` p i4 K  X `  !!.`t ( ====%`6  8 P 8 .  `  ""Oi& H`t0 ( %`6 ====  ` q ( `(%`t,$ ` i  ( %`t @%b p(Hb PH"58h@b <@b @@`0`X Hp   8HpP`"7B^*\R1*#3c6$*\Rffff*0z62f10178D  0 PX`h " p x     ((8 `(h&       " "0PX " `"h  "       ( 08@HP " X ` h      "      ( 8 @HPX` " h p x      "   " Hhpx   "       "      (0  8 H  X h  x     (0  8 H$X               ( 8@  HX`  hx      "           * *@ p x       "          , * @ H P X  ` p   "              8 P h      "            ( @ X p x  "       0 P` h x   B      (HX ` p x  xp]DMANUAL_SECTION_H! ]DPAGE_NUMBER_AREAp0]@]@]@]@] !  %H ! %J.4 %J. B@^ 4! ` $ 4(cmdShowHideUpdateLog %B@H ! (ddcmdShowHideUpdateLog %B@H ! (d ` 4(! 4B@zR(]]  Rk't (  ! ( ! t 'tk ( t'$ VRx'$ VhV`iXPµAttribute VB_Name = "modInstruct@ion" Bas0{00020820-C$0046} |Global!SpacFalse dCreatablPre declaIdTru BExposeTemplateDerivBustomLizD2Op /licit 1 P)- Co BlockYfi@x As SngMANUAL_SECTION_agesBarPAGE_NUMBER_AREA>ws?tainerSheetWorks YlngCurrentP@ aLongGo&uMubG Sub cmdShowHideUpdELog_C@k()K Dim ws!,@¡. If ServiceModule.Exists(_z_DefBs.STR_LOGGING_SHEET_NAME, ThisGbook)enA SOE(= .Tj@> 8""%?UNPROT7OC CMD2.VisiCxl"'Th @Bery:dAC b0apes("q?").Sele>cgA +.Character@s.Textd p %Es wsi=%,%/:AvaEnd [c;;Wb% ! p"qD/te_All_%_{s!r]S( CT?fe`t_.[PRe@ren_`})x-ߢm_RReazd*_3 wProcessFirst On Erro@r GoToAHandleraaI|Nopp@a!.CaljFIRST"XNCleanUp!$Vnn n#0 rr :DFinaliz{*cJLa??1?=LA/ /f/ge5pQ1fs;N@R!!cNEX!f !-4+ "%"q,?? :Bac3_2_2_2Y2BACKO2O24""X-?#7??Up?5' =b$dQ5I ##c #PaXoToT?b =6k(mOSs>YA::)uLƺ= [hiyr[ /$/$"$Vo#V$m#v>(ByValh`͡a 77AshpSh 1AkScreePCBoo!8HnEnEv s_1Q= .+:{Q|d  6`\01T<= 0|=3F[f>CountPage Then lngTo 4= XCtEn0d If$ If wsSheet Is Nothing Or _:wsCont`ainerLGokErrHan0dler; gmodServiceModule.UNPROTECT_SHEET gB 4fblnShpExists( f, strBlockPrefix &)Falss 0.Visible%xlUWActivateShapes.Range(A rray(^).SelectCion.CopyA}\(,. &xPasC+KpPeryHidd  SshpfN*@=Wit h E .TDop120Left20kmsoTrubGA Updh_a_BarNext_Brols_ility EBackAU"Wp 1H T baCleanUp :"`юxR,F*Applicat]Scree6y= k!)EnavEvent>s@DH)SuRbPrbw  2(ByVal `BAs Boo()aaOn `)or B(*n#O#-N)"PAGE_LAS@>>gG^%>_b% Y1?7 LbW77 7 ?777FI6R7" et7BACK2oog"P`   q /7(-t4P\q7NC?4X 37!17v 777777oRead֑(_m _mDim"Ier 9LongƠpL>tpɐzqStr~T)1q4`p9?0?09s/ O ۯ]. 1ru=ֱ.Frame.CharactxersB& @StA G/"Aurrq0&(LBd6)aMUOCQ 22t1 2/,",,c )_c[c- -ck)QM? B/--A+cSheet Is Nothing Then GoTo ErrHandlerPEnd If$ modServiceModule.UNPROTECT_SHEE0T ws^If dblnShpExists(/, strBlockPagesBar) = Fa(lse)SshpH?\.Shapes(bR ContentlngD& " /" & Co8unt 5.TextFrame.Characters % .CleanUp :  ㎹, TrueAySub#Private  Delete_In2uction_As()On8or -KDim fAs [EVIVer Long;q?""= 0 F5Each0In_ InStr(1n@Hrefix) > 0ȵ .ZEe N*?H?H HFunbFFhI ?JJyJ|ainer_W?EckA E? _F_Fa+ 1C H`n1#r aN "i Da   0 `  0   0   0   0 `  0   0   0   0   0 0  0   0 X  0   0        _rU P$`a$A`e$`i$`m$`q$A`u$`y$`|$`(A `( `( `$  `(I `$`(`(nLd:^xME <%n(pjk`kXHPLH[&modfrmDoubleVal.cmdOk_Click_Handler - J!LH H!F G H B@fjk ( NA@roL N B@P N B@R Ok7 frmT.cmdOk.Left = (frmT.Width - frmT.cmdOk.Width) / 2: frmT.lblCmdOk.Left = (frmT.Width - frmT.cmdOk.Width) / 2 N!T!V  N!X N!T!9 5Z(\q  N!T(kh N!openA@^ R00:00:00$T iFormVisible B@PHL[ !! N!.UserForm_Initialize:  J!` -  J!LH'8! Application.EnableEvents = TrueoXX < >!G >.<jk <%n!p %9 <%n!p/  <%n!p/$# F !B (p <%n!p/$# F !D (p d8 <%n!p F !B (pkk F B@4 ooAttribute VB_Name = "modfrmDoubleVal" Bas0{00020820-C$0046} |GlobaBlSpacIFalse dCre8ataPr@edeclaI"d#Tru BExposeTemplateDer ivBustomizD2Option /licit Dim blnFrmEnEv As Boolean  Pic Sub tbxChaPnge(TUserForm, ctrl Control)  O2rror GoTo erLr_ If8T4he5 C= 'h  nd !End IfACNot ~ServiceMo dule.RealPositJ@Number/.TextBox1.ue) C!f C4.nĔ 2" % Msg@ " 1 @ F", vbCr'cal, "=@!Z*Se@tFocus) IQ= w 28vbNullSngAw LWGVXy E1EDyi(7eD,e)Z2Zk-L  Z:Debug.Print.f - " & Err.Descrip0e`& -l!nlblCmdOk_MouseDown_ HandlXBy@W ButtyvInteger, ShifttXaSingl:eEYG"wL.c"Ck P(EObject: ] b=-wsWorkshee WsPr|ota&$RgrngT Is =`h!j! = .pn Any = ? !entDs Len(Trim)r0ʊa^Isca} k}C# B9!}0!!S ЄBBYcZYYSor% kUNPROTECT_SHEET&(cells(`1, 1)F]Nostr&Plus#nSx"sz y 43o 4& "/Q&_. { }\_\`GGOe~r\!\q+As>D!/!!,G~a KApppZa .EnEvqI`FUnloadU\_InalizegY0gZ^ Ani mdsEffYs.VStyleRessCa#1 ' O`k ' s.$Le0q= s1Wixdth") / 2%xth" Height < 2^|WiRE aD.vcTpT DFF.Sp10c qSw۠A $iVisib$u open 1QY'OnTiNow + A("00:""~)®Q::Thisqbook{D!DB.+e:F1`Z "==p&77/ Show625B_ϊS AcqC`a.LockbFwYQ= 7!Kij1@K18yX.\)]|InStrok! !/СC#xMEPSLSS<< <6<<N0{00020820-0000-0000-C000-000000000046}h > X%%)Nx? %)@ % hii(ijHil 55`N @ HrmDo%`   X8 iN  : .%b8 hX$< 07B^ "   (0 8 @ `Vx    0VP   0  "    "(0 8PX  ` p    V  ( 0P Vh   , ~   :   0  8 H X " `h p   > @0 HX hx   2  b hp (x " $  ,0 6P6 "   "  0 x]L` 8'8HHk@ N!B !p %Ph @ !TextBox2: 1 Z !A@X N!B B@'8  N!D (pHkk @ !TextBox1GHj N!D !p %P: 2 Z !A@XHPkHH@L8[modfrmDoubleVal.tbxChange - J!LHo < B@on ohL]F F .N]] <mo <!x.H H!F' N!B !p$ N!B !p$<: 1 Z !A@X Hk N!D !p$ N!D !p$<: 2 Z !A@XH8k0k( H B@^ N!B !p % <%n(p* N!D !p %G <%n!p/ N!D !p %frmDoubleValtut modUpd_Templ_HTTP_Request4WS^__SRP_48K__SRP_49(SPSSS0{484039C1-61E8-4905-872B-ADB3269F6246}{0FAEFB72-D1B8-40DF-90DC-38C536475217}  H @ L    " @  @i%iij il % %@@@@ 7B^! "( "08P "X`h "p x "  "  "  "(x !J < B@> oP@ !J < B@> o(A@o A@rxop A@roP@ < B@!o0   j l < B@D (po@ < B@ oAttribute VB_Name = "frmDoubleVal" Bas0{484039C1-61E8-4905-872B-ADB3269F6246}{0FAEFB7 2-D1BJ0DF-90DC-38C536475217} dGlobalSpacAoFalse CreataPredeclaId#Tru BExpose Template DerivCu@stomizDO@ption 0licit P"& Sub TextBox1_Change() mod! .tbx Me,.ActDControl End&-2-cmdDefault_C6k.@OkV%For mHideUn0load7lblCl@ik $W_Handler md8MouseDown(ByA Butt@yAs Integer, Shift XSingl@t YR?' +, B, X, Y0User`_InitipalizTMhNrU~| IH     *( rU H4$H`$H`$H`$H`2*\R0*#1$*\Rffff*1H62f1018a$*\Rffff*1962f10178< x0J6b@lfVB(PpT@jV0ZH80 Lh T 6 DH 2 @  t Z   z Tp b:Dn0 : :  (08@HPX :` : B     (t@cld0xME( 11<00 0:6 <,<0<4<8<<<   O@CT PCV CZ 0C^ C ` X,C d .C h @0Cj 1C2Cp Cr Cv Cz 0C| HCꘀ pCꘄ Cꘆ Cꘊ C ꘎ C"ꘐ C#ꘔ C%ꘘ C' 8(@ %%(%†  ,@`@% (.@hulti bod+ ` + X` + ` + ` + `  `X77)e of xiourc`ty un   ``terb ` ! `he r` s no`8`>.  %+ `@)xeps  `ihe ri  he ser@%``the r`quir`on. ` ot iH ` he s req%`  he s%  tha%` `he H`  all`8`ptab  e fo %+ 8 ` aai  out i i not` a c`rent  ce. x `` sted er a `  kno 0 8%  `x ) he p%ithe  ` ` ) ( :%i uest`  ent+ `  i   seri req+ `  )@H ser%)hpof t%ited i  reques+ `p i  act) @Hr en`%i nted`%` est.N dCP eCR (CX xC\ Cb -C f /C l h3Cn Ct Cx C~ XCꘂ Cꘈ Cꘌ C!ꘒ HC$ꘖ pC& `)@„ *@ 0+@ 8$-@… ,/@H8@p8 PH` 08(XXx p  X0h`  X 0x4^7B^*\R5*#83*\R5*#6b(*\Rffff*1962f10178\0*\R1*#3c8*\R0*#1*\R0*#0 B8 @ $H p x B  4   B     (08@ BH P X ` hpx : : 4"@ P X ` p0|   ( 8 H X h x  6  "0 X hx  P  V ` hpx "        (  8HP Xhp x      $     @0 Bp L R N`         ( 8  H ` p    d   P( x V       0 @ X  d`         V  x     Z Z0 4 B     !! !  ! 0!0|P!!!! ! ! " " " 0" @" 6X"""" "  " ("###  # @#X#`# "h# ## # $## $ $"($ P$`$h$  p$$$ $$$ $$$ $$$% % %  %  (%8%@% H%P%X%`%h% p% $% %% @%B&L`&R&N'  X' h' p' '''' ' ' ' ' ' '(( ( (@(X(`(h( 4p(( ( ( ( () )()0)8)@) 2H)B) ) ) )) 6) )0|**** * **** * "*  + (+8+ $H+p+ + ++ +++  + :, H, P,X,h,x, , , , , ,, <,", -H(-p-px--v-h.:p..B./B/P/DX// / /////@/ 0(0H0P0X0 0`0"00 000000 "1 11 ( 1 H1 X1 `1 $h1B1 1 1 1  1 1 11122 2B$02 P2 X2 x2  2 2  2 222 2 2 22333 B$3 @3 H3  P3 ,`3D3333  3 4 4  4(404 84H4 X4xpq === These constants and corresponding values indicate HTTP status codes returned by servers on the Internet. ===]$d1 The request can be continued.]$e98 The server has switched protocols in an upgrade header.$ ]$:$ The request completed successfully.]$0O The request has been fulfilled and resulted in the creation of a new resource.]$(1Y The request has been accepted for processing, but the processing has not been completed.]$P0t The returned meta information in the entity-header is not the definitive set available from the originating server.]$3T The server has fulfilled the request, but there is no new information to send back.]$x6 The request has been completed, and the client program should reset the document view that caused the request to be sent to allow the user to easily initiate another input action.]$08C The server has fulfilled the partial GET request for the resource.N]$</ Duedded Object9qVERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} frmHint Caption = "" ClientHeight = 1065 ClientLeft = 45 ClientTop = 375 ClientWidth = 3210 StartUpPosition = 1 'CenterOwner TypeInfoVer = 13 End 4,J  @}*R KQDBTahoma\, 0@lblString a World Wide Web Distributed Authoring and Versioning (WebDAV) operation, this indicates multiple status codes for a single response. The response body contains Extensible Markup Language (XML) that describes the status codes. For more information, see HTTP Extensions for Distributed Authoring.L]$,2> The requested resource is available at one or more locations.]$-X= The requested resource has been assigned to a new permanent Uniform Resource Identifier (URI), and any future references to this resource should be done using one of the returned URIs.(]$.1B The requested resource resides temporarily under a different URI.B@P]$/8 The response to the request can be found under a different URI and should be retrieved using a GET HTTP verb on that resource.! ]$05. The requested resource has not been modified.]$1@2W The requested resource must be accessed through the proxy given by the location field.]$3;D The redirected request keeps the same HTTP verb. HTTP/1.1 behavior.]$h4H The request could not be processed by the server due to invalid syntax.]$/5 The requested resource requires user authentication.]$4& Not implemented in the HTTP protocol.]$2: The server understood the request, but cannot fulfill it.]$2B The server has not found anything that matches the requested URI.]$3# The HTTP verb used is not allowed.]$ 82 No responses acceptable to the client were found.]$7 Proxy authentication required.]$08. The server timed out waiting for the request.]$H1 The request could not be completed due to a conflict with the current state of the resource. The user should resubmit with more information.]$X<a The requested resource is no longer available at the server, and no forwarding address is known.]$p8G The server cannot accept the request without a defined content length.]$7x The precondition given in one or more of the request header fields evaluated to false when it was tested on the server.]$:o The server cannot process the request because the request entity is larger than the server is able to process.]$5g The server cannot service the request because the request URI is longer than the server can interpret.]$: The server cannot service the request because the entity of the request is in a format not supported by the requested resource for the requested method.]$3B The request should be retried after doing the appropriate action.]$5^ The server encountered an unexpected condition that prevented it from fulfilling the request.]$ 6O The server does not support the functionality required to fulfill the request.]$4 The server, while acting as a gateway or proxy, received an invalid response from the upstream server it accessed in attempting to fulfill the request.]$H8' The service is temporarily overloaded.]$81 The request was timed out waiting for a gateway.]$p8\ The server does not support the HTTP protocol version that was used in the request message.4 ===================================================4 ===================================================]@]@8]@`]@]@]@]@8]@4 ===================================================4 ===================================================R Version %!p' V R V V i R CurrentVersion %!p' V R Vx Vp ih XRX  region_name %`!b%n!p' V R V V i R ' V R V V i R ' V R V V ix 4 ===================================================4 ===================================================-  #R ]   URL-  > @  & B  & D  & F  & H  ' d R k (  (  (  (  (   t / , t$R k t$ t+  tMSXML2.XMLHTTP.3.0$.   +  + '  HTTP-... $  A@Q" ' R0:00:1$T 2modUpd_Templ_HTTP_Request.Get_Update_Info_Response B@PTTVR. VpVho`RP]P]h]]]]  !& !, k !*. k !k !!hk` !!! It's OK !!! t !!! ] t !!% .$  %% !d' d ""$  %% !d'd ""$  %% !d' d " "$  %% !d'd& " "$  %% !d'd! " " tk8  (d X (k  ( (  (  ( Return results  B@  B@Tpkh`^ =============================================================================================  '  $  A@W" ' R0:00:1$T 2modUpd_Templ_HTTP_Request.Get_Update_Info_Response B@Pd  Unable to retrieve infooffline ( Return results  B@  B@k^ =============================================================================================d0   Sorry...d  '  Try later ... R0:00:1$T 2modUpd_Templ_HTTP_Request.Get_Update_Info_Response B@PkkxkpThT`VXRP. V@V8o0S ==================================================================================S ==================================================================================-  %%R]]] ] ]0 ]h   URL-    > @  & B  & D  & F  & H  'd(R k] (  (  (  (  ( t / , t$RPkH t '! Check Internet Connection Status !k]   HTTP Request] ] MSXML2.XMLHTTP.3.0$. + +' DNS...    HTTP-...   $ $'  k xkp !XkP !!0k( !!!'yk R Rk] ] ]( ]@ ]X !!! t !!! ]p t !!% .$ %% !d' X ""$ %% !d'X ""$ %% !d' X " "$ %% !d'X& " "$ %% !d'X! " " tk  (dh X (kP  ( (  (  (TTVR   v (!* B@ offline (kV- ""offline (  (  (  (   v (!* B@ kVV ' i+ ,    R`]0 ]H ]`       URL-    J L  & N  & P  & R  & T  'd`RXkP]  ] ] ] ] MSXML2.XMLHTTP.3.0$. + + DNS...   h HTTP-...  $ $ '  k ! ' d '# .... '   VTxkph   KT5 Successful, , ... ' X KT@ [HTTP_STATUS_NO_CONTENT}' z KTg : -: [HTTP_STATUS_PROXY_AUTH_REQ]' KTn : -: [HTTP_STATUS_BAD_GATEWAY]' t KT2 : [HTTP_STATUS_NOT_FOUND}' 2KT: : [HTTP_STATUS_BAD_REQUEST]' v KT9 : [HTTP_STATUS_BAD_METHOD]' S- : [ ]' nXRPTH ' V8R0 7 : [UNDEFINED]' k v (!* B@ VVi* ,8 RX  R0k(  %`B@Ro  ]H ' ! \Save.txt   Vo HTTP-  &` RXGET  B@ B@" !,' VR 2' VV i  HTTP- !!! R GET   B@ B@"  !*. !,' (!.[ !dk k V R 2'V V i  $$ tR ]x !&' NEVER_SHOW_MESSAGES %bNEVER_SHOW_MESSAGES %`!b%n!pYESV k k  (& $X' V R V V (&i Attribute VB_Name = "modUpd_Templ_HTTP_Request" Option Explicit@Base 1 ' === The constants and corresponding val i ,cah -tus)des returned by servers {the IHntet.l Pub Cn H_STATUS_CONTINUE As Lou= 100 '` can be:ntinued.(SWITCH_PROTOCOLS,1,W has switchbprotocolsy upgrade( her9OK22_ goet9successfully0CREATEDJ 2r3been fillAutulin fcreaˆof a newYsourceY ACCtEP 2 jS a5pfor VA9, B!-not@x.cF#PARTIALC3"Dmetar-@ m<@e@ty-u is AFdefinitivet available fromB-orig3HogpPAYMP48Nix Ta"FORBID 6D4`stood2"d,P74 itQ2FOUN[?c 0@Y,enс`n-Br= STR _}_PROCb_1)UPD5(_NAME &"/ROC_GET_UPDATE_INFO_PARAM _1 & TEMPLlCODEL"&"_  STR_HTTP_REQUEST_PR2 VERSIONEb3 bREGKa40ENTITY a50XTENDEDՁElseGoTo ErrHandlernd If  tviASYNC_Result.lngFileSize = 0strDescription@ vbNullS tring VeDrs& New URLUpdatePriority A%ReDim /;XMLTagNames(UBound(H ))A For EIC@ ter@1 US  ' , C @If Len!( ))0 Th$enC w EDxAR<K>Ja Next) CGSet obj)|` Cre@1Object("MS@* 2..3.0"*,2Base>(21AΉBASE__12o" $RequestCH@ ' := !-<...Sendk %,*DOMDocument, N")f`#@, TrueR  T 0 Attempt:+!Applica!.OnTime @Now + AValue("0:00:1"), "mod@s_Tl).Get_Av_Infoponse" a[Successc:CleanpUp 盂4SNothD `gSub PubU   u($UOn! @*As LocdMaxESFF˩10J pI+ Iso2&I e.a`AdyStA$48L#B_TP.s0us@5_STATUS_OK#:TryJDNSEP5!x7P-M s)0L1 )_0/ / .%BEleBOB@ 5.ChildNodes@Cx.rgth >Љ,  NIt's O~K%OOOE wg _oz0ontd - 'my AArec p:uI).=fOF|.I_ fL=" .ge sBy1))0).T2`  "bۨc2زG3V  /tr-w4[ /d + 5O) 9gI3pB@?A#?a0&pCLng  ~ 81 rCcn = strMaxVersion tviASYNC_Re sult.NewURL $xUpdatePriorityz &> ' RetuPrn rs#modHTempl Main. _TVI_Set Ł!>Check_"Ws ThisWorkbook, False, 8Tru(,GoTo SuccesVEnd If TryNextDNS: ' =Y3lngEyquestCounter#gU+ 1 If U <= UB d(CBase)Veƛ A0Send$ obj XMLHTTP,JDOMDocument, _GEM(,x) &C@)z ' 8 AtttUN Applicat.OnTime @Now + Value("0:00:1"), j"_B_CJ.GetD_InfosponseZ"M&E @Unable tomtrieve fi E 'Descrip"offlinz zFzzvCJtx8cw5 `nK> 34j' Sorry...3AVNAH@ lr \\e\?L6' D@ CleanUp ErrHandlero `NothingA `ASubII-| _ PP @ Pub0N 0FuncACQueryJ(ByR efW^TagNames() As SHng]]y}BypSRR(CodeOLal blnShHowM0}agBoo b TđWQ On "or$w#DimA Url "q7fIxLo$NumberOfBFields!S(Rc3 0qx<(2x Qfu>lqLen}) > 0QH' a"s@#u-"$ e = STRTmEQUEST_PROC_GET_UPDATE_INFO_NAMEz~O_PARAM_1aTEMDPLCOD1"|&"o o ` 2VERSION`'o o e 3REGw,4ENTITYP  C5XTENDEDBA hR2 Zߡ+Dc({7 14P4FileSizze:0;vbNullF=`oi5-o3(1FC@= 1 7R) QxY, @ 6 Sg 낋q+obNjP]MS2.;1.XcGć$p CreoO$bj(".3.0"_DeURL(1) = STR_HTTP_REQUEST_BASE__1 strBas2`blnSuccessfulRe questFa lse B' D NS..."Fo r lng>Co unterELB d() To Uh On ErrLGo'TryNextf' -DB AStatusAKSend_M(objX$ML, DOMDocument,h) &Url)HIf Not;0_STATUS_OK Then n End If+N Ishin"gnt.=Elfe>MLR.ChildNod ese.Length >= 0cLTTruc Exit CmgG:AľqA Handler,F# IFDimaSMaxVersion As StrE DescriptFileSizeNewd 2UpdatePriorityKZD77 ہ2!.I猀;oy_ - $HrecMS2<.I`Z$dSe4t =_^.Item((7= .getsByTagNa\me!@s ) 0).T@#W "|")A s(2) FK  3   KV4+ xIb?%52 pI'eiCG Ra%ARtviResult.+H0!EB&oaD= CLngbn g>) aeN=kO~`*;cYBaCleanU8p W[4_howMPagePg^mod _TemplԞ.MESSAGE_BOX_WRAPPER"UPDATE_FAILED, vbExcla$ma^, Glob0.MSGARNING_TITLEqb= "offliLne-5$ O3r' 89 2 "Ȁ;_ j n=@N8ullGoj} vb?s.?= ??ѵ?4INET_CONNEC@TION_IFLFL`od_~W o))bPQ`uery_ {_Info+:0Func$.' bQVG, Pubplic :(ByValQFFn, _)QF?63P Cp?6E)mI `}PTpLong?Fp'Z) > A`DODw' ёlp 0 "_PROC_G,4INAMEm}PAR0AM_1TEMPL!NCODx"&"OOA2`>& !/  # 3* REG;Poo O A 4h]LATE_ENTITY & "&B"(_ STR_HTTP_REQUEST_PROC_GET_UPD~PAR0AM_5t(TEMPXTENDED_INFOElseGoTo ErrHandlernd If  Dim lngRequestStatus As Long '  3FileNum-MbytData()Byt5str My StringobjXM&L~ MS2.;Ondor Resume Next Set = CreateObject(" &.3.0") )0 RBaseURL(1) = BASE__1^2 '  W DNS...F@9eCounter"$LBd() ̀wUN2 L78TryL' ^-zD! =Send_Aq_č(_, C0F)@Url` a@ NotQ$_STATUS_OK ThenFˎ3Eȵ ȡN(.respon@seBodyAI f Q ) > (100 M xM(N8h]%`#A(!h= FreeOpeBn)Fulla]BBinary Access Writee % Pub*um, 1,)"ClosNea/! ",Su ,'I:A JG(8USelp C jH#aK=.ful, @@//, pC0AA`LQuery_Upd @"7 "NO_C4ONTP D* 6[ }`XY`_AUTH0%: & V!-X: ]sBAD_GWAYB@9 ) `WNOT_FOUr  >) ב.sQ%y~.<(P8Save(ByVal  0KVѷB~oQ a PPathA:\;" .txt" шOutput P`t ## 12 cP&riv8e*фByRefs& BȫN!o.""0, F:R}xs`c@R Ks?FNnNst9f OBGB`_-_[  DOMDocn)X//!Q7P4Gp@;blnAsync#Boolean = False) As Long On Error GoTo(HandlertobjXMLHTTP.Open "GET", strUrl, blnAsyncReque stbsendIf * Th en7 Set ADOMDocument+Uresponse\ lngS k_ /stat us1EmodGHlob.gaT!]ModeTrueI Debug.PriCL.Texz End If2傫CUpX:]_STATUS_BAD_REQUEST%*#7Functio Public  MESSAGE_BOX_WRAPPER(ByValAr@PromptASt9g, _A?9OpvbMsgBoxStylePreferenceVYvbOKOnlyTitl-"0"Re8sulBiA5 DimppPa7ScreenUpd@ngA3ԏ  = A.CServiceule.IsNameExists(ThisWorkbook, "NEVER_SHOW_vrS<=  .I s(.R5sToRange.cells(1,0 1).D`b= "YES"jc+[aE^aw 6E!U J(>cU, tM""C)cM o 'j 6 y>` q$!H`0IH`  p$qH`<H`  Q  p0H` ) 4H `y1=Y04H `yQY,9H `Y;DaH `Yy  =q=0H ` i0nD d}LoadKeyboardLayoutPtrA|@WLoadKeyboardLayoutA|h,GetKeyState}TLoadKeyboardLayoutA}t cGetKeyStatemod_KLrAllSheetsInThisWorkbook0I__SRP_2L__SRP_3N# gxME( L@ L+   i st cit+ H,  i (itC+ T  i C+ (t i it0+ h i om t+  i s no  (i h  xL LxPHHP7B^ 06 & (0  8 H X h @pHx H  H  @H H    B   8 " @P X$h &   0 ( PH]P]x]  HpXHH((   $ G' jiruL ru00000419A - ene00000409A - k0H(L [mod_KL.GetKeyboardLayout - J!LHo۲Attribute VB_Name = "mod_KL" ' Option PrivaModule,Explicit Const VK_NUMLOCK!&H90SCPROLL1C APITA14K#IfA7 Then Win64Declare PtrSafe FuncLoadKeyboardLayout Lib "user32" Al ias _2 ")A" (ByVal pwszKLID As Sng, flags Lo4ng)j #Elsg`[Y * B^End If^/Get\StJ[DQv@GIIntegerAFJMuunG)v( FŞ'?[  C PubǾblnH(lng.Booxleabln)5@v1Bn Trru"Z !D ]Sub S@Ho(hstrKLA@hA@ "ru")On Error GoTo err?s@`Call w("0419", &H1) ' #[Ar Xen"  0 l fndB :@Debug.]ntE.0i- " &".DescriⲠ /.. |pd#<ZhB@ Fr!A|4xr!A|4ZhB@ME(SLSS6"N0{00020820-0000-0000-C000-000000000046} * ` `h@% % % @@x@d`p7B^$*\Rffff*0v62f101784 "  0     "#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_abcdefghijklmopqrstuvxyz{|}~x  B@oXPAttribute VB_Name = "AllSheetsInThisWorkbook" Bas0{00020820-C$0046} |GlobaBlsSpacIFalse dCre atablPr@edeclaI"dTru BExposeTemplateDer ivBustomizD2Option /licit Pub Sub cmdGetList() modServiceModule . End+ rU 0qI4a0   XrU @$`anrU H!II4aInstruction!__SRP_12__SRP_13^lmodInternetConnectionState6"  "  " InstrBlock_ " %! ! (@kX " InstrBlock_  %! ! (@kA@ VRVVA1 %lB@H  B@f (&7 (o  !A@ o`% / y un0R  ( (&  B@^  chkGetUpdatesFalseKTchkGetUpdatesFalse %! erb chkGetUpdatesFalse %( chkGetUpdatesTrue %( chkNoUpdatesFalse %( chkNoUpdatesTrue %(kychkGetUpdatesValue %l(p chkNoUpdatesValue %l(pchkNoUpdatesFalseKTchkNoUpdatesFalse %!  chkGetUpdatesFalse %( chkGetUpdatesTrue %( chkNoUpdatesFalse %( chkNoUpdatesTrue %(k chkGetUpdatesValue %l(pychkNoUpdatesValue %l(pn@V8R0V(V   B@f ( (&o B@o˶Attribute VB_Name = "Instruction" Bas0{00020820-CA$0046} |G lobalSpacFalse dCreatablPredec$laIdTru BExposeTemplateDerivBustomizD)2Op /licit P#"& Co colorDisSelect A@s LongT15790320  7389@695 ' 16761200 H11996 CSub Works@heet_AvN() Rearrange_Shapes ` End @ uvb4A AOn ErrorDsuNex@ Dim lngICounter< BB6S@ngAmodServiceModule.UNPROTECT_SHEET  .3(íBlock_1").H eight]364.5 F@. )= @2 To 8  If #blnShpExist4s(," (& C5( - 1)) Thenv B\AlIfB%$HE?% - Top/^ + _c _+@ZOrdYmsoSendToBack# _^h H9vY, !Zq'P'qshpStar(t_C`skp' frmReg _ow 'SʀBeforeDo e# ByVal Targe"R, CancelwBooleanbNot.ls(1, [.I}ior.CIndex>`hDefines.Yellowa' H*=F#a]i#Bgf#AfGo`{Handler3Numaa[dC GLzvbNull iApp7aA.ScreenUpdd EnEvents*f1Len"(Cal@) > 0,A Left0, 6(5NPY#sY' $Q - ( I`ssuerToCwq  0]":U a7A= Mid r)20D}jIoo 0g"(2}$' ` p $h$=| 1Fh60[J6o3b4.;o_X).Rows.Hidden5GQ d L# SiVng_F+u%Dt@e_All_h_PagPRePreS' ` 0 ! S).Fill.eW.RGBs ng%"?5=2_oc[CQgUpqrr[? %)A1Eoy.oy4gy)V~[u4Il[#x' Q&lchkbaes~ ]_b_' ʐ+HHD/pi(ÂYsonU_wUw$m9rp?OOR$ ~ 3e bGetTK HI&e1VisiA [ˏT! ("J !Gstruction.Shapes("chkNoUpdatesFalse").Visible = msoTrue InZ End If NRangeGetValu"y": 9vbNullS tring!Case 0f vA Then$ #s$!C&!!E;qK5$Ԑ!Sele ctA&GoTo CleanUpErrHandpler:D BmodServiceModule.PROTECT_ SHEET, CApplicaBEnaEventsScr|ee@&@ꀰ 1ub Pub Sub cmd_C@k()A0) kTempl Main.CheckFor$n_ ` *      0`` WW0 0  0 p  0  0 h  0   0 08)dJ#<AMf]q$e FƻlNB5A1>xƻlNB5A1>AMf]q$eME PSLSS0l6"<<<N0{00020820-0000-0000-C000-000000000046}(% p` t  `` `t`N h` x()@H! %i. V  ` dGG/` `N t`"  0` hv  ` pl(({i !  ` p%b (Cb pCp(0h0%@0(@|`P7B^*\R1*#278$*\Rffff*0x62f101784 0 " HPX " ` h px  ( ." ( 60Rh*     " @ X "  h(p  "          8 P   ,`  *@X$h  $         :H`0p  0    0 @ P` h"  ,"        ,8(h((&*(@h,((( &0 X (` *          "   0 @ x]D]DpH(!3 7389695 16761200 119167960A@ o p]]  B@^@B@ InstrBlock_1 %(V t  InstrBlock_ t X  % InstrBlock_ t X 'Nk N %!V InstrBlock_ t %(V: N %! N %!V InstrBlock_ t %( InstrBlock_ t %B@  t  B@foPublic Sub shpStart_Click() frmRegion.ShowEnd Sub %n!! ! DoubleClick'.k8o0hR ]]] 'N (& ( ! !$'N  B@^% Caller- (Event Issuer) NInstrBKTF ! $' InstrIKTF ! $' n$ " "ngInstr_ " %l!(kh "Instr_  %l!( B@   B@ k4  0   44(rU @$`t$A`a4`x 1I#$`e$`i(A`ma$`qn@[i d <CCCǺW&*=h8+3qzZ4N^2WxzZ4N^2WCCCǺW&ME PSS S16"ction A 3 return True if the flags indicate a LAN connectionstrBlo   ' %ih@]/ pass an empty variable into which the API will 0 return the flags associated with the connection A 5 return True if the flags indicate a modem connection   '" i]/ pass an empty variable into which the API will0 return the flags associated with the connection A 5 return True if the flags indicate a proxy connectionse   '$ i, no flags needed here - the API returns TruetesTru% if there is a connection of any type%$ '& i0]p/ pass an empty variable into which the API will0 return the flags associated with the connection A / return True if the flags include RAS installed   '( i(]] Build a string for display $     ,)You have a network connection configured. R ',kx    ,3The local system connects to the Internet via a LAN',k    ,, and uses a proxy server. ',d ,.',k    ,:The local system uses a modem to connect to the Internet. ',kX    ,%The connection is currently offline. ',k    ,AThe local system's modem is busy with a non-Internet connection. ',k    ,4Remote Access Services are installed on this system.',k@d8"Not connected to the internet now.',k ,' i.Attribute VB_Name = "modInternetConnectionState" Op4 Explicit  '<A Copyright 1996-20 11/Randy Birch, All R's ReservHed.?Sopages may also contain other as by  author@`Dis: You can freel y use8isBde Iyour own] apas, inot reproduceor publish5on any web site,nline Rice, d2e a8s s*me@dia wiRut express permissBW'#IfA7 And Win64 ThBeOPriv@ Declare PtrSafe Fun­ GFed Lib "win?t" _ (ByRef dwFlags As Long, ByValE) #ElsgM%g#t#@KIf@2c@/systemAs a tbe} @Ac&7E@st INTERNET_CONNECTION_M0ODEME &H17LAN `s o A$3 2 ex>y[ PR(OXY4No lD |_&B&_BUS 8 RAS_INST ALLED-0  _OFFLIN:E*2?;@=FIGUR4acmblnIsOnLj(bBoolea u `xqNfqSng80"NotedPi now."D~ Fའn oTruaEeri.t 8ViaN Dim ' pa`empty variablC@QwhicAe APIllc@return`e f`oci`>d¬"gુCa (, 0&) 'ɢ " ifindicUa q6_1=B_Pq p| \MPodem gbANKet-DDfaYsJ)0k'Z )//IPro,xy//n/n 9/o /c/ss/vA/dDr~///qc/y/^rc _00[V0O'2p noTBneedpSe -<ӑ-s O'>ШaW, oftypR0?Fe.0&E /&i^>`mInstLed%%UPc%UUaK%%gкUUinclu@pa!U o%c%0?%I? wringSxa_TW@Msga*' Bpuild`3P fplay #_R&)X~bt%/N[X(A =# & "ha v work0figur" & vbCrL@S# ?Ar? 9 p8`͑dsŐ vyK !_Z_PROXY T@hen strMsg = @& ", and uses a proxy server. "rElse.VIfZIf dwFlags A NTERNET_CONNECTION_MOD EM local syste"mmod to connect the InternetgQOFFLINERDion is currentP|4dK` InternetGetConnectedState| DInternetGetConnectedState xME0x+ @  i` i ȁ+ 0 irBloi  HC PC pC(Cut y` C+ + @ ` on +"  `''''+$  `+& 0 +(  `erne+ //`tern`, C C (C C0 Hp(@P p7B^ F DP B F >( <h : < >( Fh @HH < @ :P  D      0 @ BP.X B   6 60 :@  B   6 6 <(h x B   6 6 <P ` Bh 2p ,  B   6 6@x 6  B  "  0  >@    B    * (  0 @  H  HX    4    P X  `  Bp   *     x?'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''= Copyright 1996-2011 VBnet/Randy Birch, All Rights Reserved.@< Some pages may also contain other copyrights by the author.strBlo?'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''7 Distribution: You can freely use this code in your own6 applications, but you may not reproduce4 or publish this code on any web site,6 online service, or distribute as source7 on any media without express permission.?'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''     6 Local system uses a modem to connect to the Internet.]D4 Local system uses a LAN to connect to the Internet.]D = Local system uses a proxy server to connect to the Internet.]D No longer used.]DH ]D(]D P]D@p  "Not connected to the internet now.'dh'kXiP](/ pass an empty variable into which the API will 0 return the flags associated with the connely offlineAH_BUS!1MN's M@'busy with@non-EMES1+RAS_INST ALLEDNRemote Access S@i@ are installed Uth.ڟp"Not8ia nowGE@GetNetCCStrin!G FunctP IProgressBar!__SRP_26`z__SRP_27U n modAnimatedFormsEffects0Ž<<< N0{FCFB3D2A-A0FA-1068-A738-08002B3371B5}P B` @i `i 6i  the Aph  i ,!p`h @$i ue e  ` 0  ` 4i.i * ` `8) %i , ` <  (` @# h` (' (` , +%(` h@% h@D7B^*\R4*#d$*\Rffff*1762f101784/ . Z0 L L <0" p  ^"    4B 0 8 " @ H "  P X "  ` h " p x "   "   "   (Title will be the title of the dialogue.SStatus will be the label above the progress bar, and can be changed with SetStatus.lEMin is the progress bar minimum value, only set by calling configure.EMax is the progress bar maximum value, only set by calling configure.7 D6calling Configure sets the current value equal to Min.C oxWSet the value of the status bar, a long which is snapped to a value between Min and Maxm-Returns the current value of the progress barm`oo ooop(o`hoPHײAttribute VB_Name = "IProgressBar" Bas0{FCFB3D2A-A0FA-1068-A738-08002B3371B5} |GlobalSpacFalse dCreatablPredeclaIdCExposeTemplate DerivCu@stomiz E'TitMwill be thofdialogue. 'S@tatus label abovpr bar, and can,changMwith Set%*Min is6 minimum value, only @set by)lling con figurNMaxaxcaCA'current$ equal to @02Public Sub (ByVCBTAs Sng, _  AD Lo 7) E@V@'@SBOJ m&sja l whichHsna,ppb.a2between2BmS D4perty L@_3ue5new_& 'ReturnQP*ˉ}OGF) ;A@P``/InitVize(%QueryCl k(CancY IntegeWpMode KeyDownd#CdMSForms. ;Shi\ft? JKk:Deactiv !SShowHid'rU ' A)AQA@@4yAA  &W&&&W&&&W&&&0   0   0   0 `  0   0   0   0   0 (  0 h   rU &@0&` (A&h! (&h%($&`0,&`4I)&&4A&`8iI$&`<$&`@$&`)$A&`-nL8 dX#ff*0]62f10178\0?2 &0 8@HPX` "h..,, *PF ( 0@`p        0 @<P<      ( 0 8@ @HH PH X`H hH px H  H H H H (H H H H  H  H  @  H H H  H H H  H ((0H 8H @H HH P H X H ` h " p x   @ "     8Ph      $  Hh p$  o@CompObjMaVBFrameOLfrmCheckUpdates >66z-^: .,od`}orSetWindowLongPtrAed}<|GetWindowLongPtrA|d(SetWindowLongA|P GetWindowLongA|$tSetWindowPos|FindWindowA| AnimateWindow|GetCursorPos|8SetLayeredWindowAttributes|h$ReleaseCapture|TSendMessageA: |xDrawMenuBar|GetSystemMenu|DeleteMenu|GetSystemMetrics|<GetLayeredWindowAttributes}l(SetWindowLongA}XGetWindowLongA}|SetWindowPosFindWindowA}AnimateWindowGetCursorPos}@SetLayeredWindowAttributes}p,ReleaseCapture}\SendMessageA}B DrawMenuBar}GetSystemMenu}DeleteMenu}GetSystemMetrics}DlGetLayeredWindowAttributesxRRME0(@d<< <('. " 0 P 2 H" 6 p" ʐLʐ"Lʐ"Lʐ@L8 "C: #C< Cʐ8#Lʐ`#L> 0Cꐚ#Cʐ#LʐLʐ#Lʐ$Lʐ Lʐ($LʐP$LB CD x$CH $P`H d hj8hl(hJ +   iii+`(  ii+@P  ii RiR+t  iRiR+  i Ri@Rij`RilRiRiRiR+`   i@i+   "iii+h @   )` %+( $  i i i i h T +( x  i i i i+L h   i+N    i iP +R H   iT h iV i+X    i+Z H (  ih i\  i^  i` hhJ +8X iXixi+| ii+8X ixiijiliir, wiprox+x il thi8+X  i waii8iot s )====%+, i i@i`i==== \+ i  i@i`%i +L  i+N `  i@ iP ' +R  iT ====iV ====i====+X `@ i+Z  0 i&i\  i^  H i`  b ` Mid if   :i ih i HTTP.3.0`t` ' %`d ...`f $ `j " `l  8 iX ih xio``P ::iih 8 i  !`t` !%`d OK`f  `j !`l  P^ip"ih !i"` (;i0ih Pi %`t ` %`d  `f X `j  `l  hiih ^ =i========`====+r h(iH i+t iRespi Uiv offl+r Hih^ =i====+t (i Si iv  x hHHiz x ^h GGi| i~  i ` `  P iN  i   p!0! i P!i R!iN !K ꀾ ( 4 x ʐLʐLʐLʐhLʐLꐔCꐘCʐXLʐLʐLʐLʐHL@ pCF $J #x$ "p(  p" X h x#$#h!P$# h @ H"$` ("@H""( ($h `#8#hP!p!0 ($.-!p!$$7B^(*\Rff8 X`   < H  8P    "        "( @ H P X ` h p x         8 P X ` h p $x     $   (  0 @ H ` 4x      0 H  8`   4    " (8Ph p 2x  <  @  "( @H P X`hp x     0HPX` h$p  $   (8@X4p  (@8X4  " 0H`  .h  <   0 B 8@X B `h @ B  B   " ( 0     ( >0 8p      * 8 @ P 8X  8 (  6 8 $@ Bh  (  * F ` p (x  4 , F X h (p   (  H &0 X 6`  0 H  F( p x      d 8 @ P " ` p x        8 H `p     @X `h p    F H P X ` Fh    . " (!(8!0`! ! ! $! $! $ ".H"x" " R" &" &# N@# # # # # # $ :$ P$ X$ h$ $ $" $$$ $$ $$ ($"  %(% 0%@%X%p%%%% % %f% P&X&h&x]$!J -] !] ]  "] (] P] H"] x]$,p"$ ]$$ ]$$ ]$"$ 1@]$$ ]$"$ ]$$2 ; - ]D@]$"$ ]Dh]$#$ ]D]$$ ]$8#]$]$`#]D]$0]$#]$X]$#]$]$@]$ #]$]$$]$]$ ]$($%) ]$H) ]DP$]Dp]D`]@x$]@^ ^8p ] $] $  @` h ( h (     ]  ]   8X`` $X 'd ' < in pixels$X 'f ' < in pixelso@     r]H]`]x]]]]  $'turn Tr t  't   t$'  $' A@ d f A@b  e !n p  Evaluate ratio d !'j flags f !V'l e connd'j 'l k  !j h !  !nect !j h !  j X'td !j'tags kx !l h !V  !V% i !l h !V  l X'd( !l'$ k tG2'tj G2'j  tX X    A@d !'tF !V' t h ! 't  h !V ' tG'tj G'j !j t   !jX X    A@d  tX X    A@kpkho` ]  $'  '   A@ X  A@o  ]`]x]]]]]  $'t t  't   t$'  $' A@ d f A@b  !n p  Evaluate ratio d !'j f !V'l d'j 'l k  !j h !  ! !j h !  j X'td8 !j'tk  !l h !V  !V !l h !V  l X'd !l'k tG2'tj G2'j  t     A@ dH !'tF !V' t h ! 't  h !V ' tG'tj G'j !j t   !j     A@d`  t     A@k ko ]  $'  '   A@X X  A@o+ Public Sub MoveIt(ByVal ihWnd As LongPtr) Call ReleaseCapture6 SendMessage ihWnd, WM_NCLBUTTONDOWN, HTCAPTION, 0& End Sub ]x]]]]]]  $'t t 't   t$'  $' A@ d f A@b  !n p  Evaluate ratio d !'j f !V'l d'j 'l k  !j h !  ! !j h !  j X'td@ !j'tk( !l h !V  !V !l h !V  l X'd !l'k tG2'tj G2'j  t     A@dP !'tF !V' t h ! 't  h !V ' tG'tj G'j !j t   !j     A@dh  t     A@k( k o  (]  $'  '   A@ X  A@o ( Public Sub MoveIt(ByVal ihWnd As Long) Call ReleaseCapture6 SendMessage ihWnd, WM_NCLBUTTONDOWN, HTCAPTION, 0& End Sub    $'r i h   v A@ix p   $'r iH    v A@i  (  z $'A   A@o Public Sub iFormVisible(Optional strFrmCap As String, Optional strVisible As String = vbNullString, Optional intInd As Integer = 3) On Error GoTo err_ Dim intX As Integer Dim btOpacity As Byte7 If Len(strFrmCap) > 0 Then gstrFrmCaption = strFrmCap1 If Len(strVisible) = 0 Then strVisible = "show" If gintInd = 0 Then gintInd = intInd Else# If gintInd < 1 Then gintInd = 1 End If2 ihWnd = FindWindow(vbNullString, gstrFrmCaption)1 aStyle = AliasGetWindowLong(ihWnd, GWL_EXSTYLE)" aStyle = aStyle Or WS_EX_LAYERED/ AliasSetWindowLong ihWnd, GWL_EXSTYLE, aStyle If strVisible = "open" Then; SetLayeredWindowAttributes CLng(ihWnd), 0, 0, LWA_ALPHA! ElseIf strVisible = "show" Then$ For intX = 0 To 255 Step gintInd@ SetLayeredWindowAttributes CLng(ihWnd), 0, intX, LWA_ALPHA Next" ElseIf strVisible = "close" Then- If gintInd > 1 Then gintInd = gintInd - 1% For intX = 255 To 0 Step -gintInd@ SetLayeredWindowAttributes CLng(ihWnd), 0, intX, LWA_ALPHA Next! gstrFrmCaption = vbNullString gintInd = 0! ElseIf strVisible = "hide" ThenA Call GetLayeredWindowAttributes(CLng(ihWnd), 0, btOpacity, 0) If Not btOpacity = 155 Then/ If gintInd > 1 Then gintInd = gintInd - 1) For intX = 255 To 150 Step -gintIndB SetLayeredWindowAttributes CLng(ihWnd), 0, intX, LWA_ALPHA Next? SetLayeredWindowAttributes CLng(ihWnd), 0, 150, LWA_ALPHA End If End If GoTo end_err_:^ Debug.Print ThisWorkbook.name & "!modAnimatedFormsEffects.iFormVisible - " & Err.Descriptionend_:End Sub L]8 ]P |  G | 'F j ~ Gshow'~ j H  'H d H  G'H jk  F $'  $r 'J J 'J   J A@t  ~ open X A@ ~ showe  H X  A@0 ~ closee X AZ  H  G H  'H j  X H  X  A@ 'F 'H ~ hidee X AZ  d H  G H  'H j  d H  X  A@? SetLayeredWindowAttributes CLng(ihWnd), 0, 150, LWA_ALPHAkkHL[ !(!modAnimatedFormsEffects.iFormVisible -  J!LHHo@  ( h  N!$'1  $r 'J 0  A@   SetBit WS_SYSMENU, False SetBit WS_THICKFRAME, False SetBit WS_MINIMIZEBOX, False SetBit WS_MAXIMIZEBOX, False   J A@t . N!V N(VK aStyle = AliasGetWindowLong(ihWnd, GWL_EXSTYLE) '  SetBit WS_EX_APPWINDOW, False SetBit WS_EX_TOOLWINDOW, FalseG AliasSetWindowLong ihWnd, GWL_EXSTYLE, aStyle ' ' If mbCloseBtn Then If Not blnOn Then GetSystemMenu ihWnd, 1 Else4 DeleteMenu GetSystemMenu(ihWnd, 0), SC_CLOSE, 0& End If DrawMenuBar ihWndop  J 'J d( J 'J ko! p!L N! ( N! N! ( N! ! N! ( N! ! N! ( N! ( N! ! N! ( N! N! (H L [ !,!modAnimatedFormsEffects.ResizeFormCaption:  J!` -  J!LHoAttribute VB_Name = "modAnimatedFormsEffects" Option Explicit Pub Const BLN_SHOW_PROGRESS_FORM_ON_UPDATE_REQUESTS As BooleanqFalse ' @-ab lnUpdPr@ogressIsInitializedT7 ͇1dHint.-DLHelpReference%Docume'LVכ0pAW_OPTIM(AL_@E@g300& '  HOR_P@OSITIV &H1 '@ @SNEGAF2O@PVE 4O# O J 8ACENTERL@? 0 @ OHIDDN0D ; - πriv@WS_MAXIMIZEBOXLong)x @AC0u 2' Bq INr q tSL4 P THICKFRA|ME `BPLEND8 ` GWL_STYLI `(-16) EX#= (-20-.CA iONC0 4SYSMENU", BORDL`F9" @EX_LA0YEREH SWP_NOJ>1- cS`H")1RMOD2WINDOW"41 b:CHANG2OWNERZ = &H`KH4 LWA_COLORKEYRALPHA-WM_NCLBUTTOANA1 ' e HTE= 2 MI>APP-DEdTOOL H8SC_CLOS7F06gstrFrm,Ca0Sng0vIn2{IntegerAType POINTAPI vKY52 E#IfPA7 THhen dzihW2PtaStyle!Win64XPdDeclar trSafe@ FunctaSDet0dowd Lib "user32" Alias "MA" ((Byz L , ecnPex UdwNer )A @/ + G/ / M/ / m #EО ///+ dtr/ ,  "J -|If1 ?*3*Pos)_(g0%)In,tAfte~r&&:f:c^,cy5wFlagsU ?828Find77wlpClassφJlp]PSwAAD ?dwTi0 !!_W/ _J 'C ursor lpPo`YW%%Layp4&O! crKe^!bAlphaq Bytze  `-Sub Releaseiup\ZZ(`GS0^ndM0age&R^> e wMsg a6`ParamUl&Any__ DrawMenuBar P" (ByVal hWnd As LongPtr)X Private De@clare Safe Function GetSystemMenu Lib "@user32, bRevert9{DeletexynPosi^ wFlagsJ-trics32Alias "nInxdexBɁ=?LayeredWi@ndowAt/buteRef pcrKeyE!AOBbAlphaBytedN-Boolean #Elseublic i5aStxyle Set8YJAR0‹]EdwNewc \&Gi&# >KF a2InxtAfter0X Y cVecJH,0E+wa@@=FY#&.dll" DjG*lpClassNamJS`anglp# +,RE&EA-kSub R aseCaptundMessagfe$&GSe{qwMsg^wParamlAnyCuDrawBaru? _X|y؀f(x+xnxA҉a++ >_w_wb:_w"/3vSHvvvhv Ifs543f_Display_Resolu1%lngScrWidth-Heigh֚69=(0) ' < in pixelsSo32(1)]E  #If VBA7 Th2e !@X644 q Ps[MoveFormOnPeen45*, _ cfrmO`bject? $Op1al4To[Q = Fa Dim ICounyP JpaCoordin la!:T)dblXRa|Dopa YUB#Swb(, GWL_STYLE{A0%Not WS_CAPTION (BORDERsV= ,7Oo, EXB , 0@<~ *>n b 8p6Appqn.St" *xlMaxim0izedF7' Evaluar)e G =Y / { HJ!EC[+ {1o fFS:cGJ.X + A T+ 20 l>=O A== CInt((:-)v" @شoordinates.X @End IfxI f paCY + frmForm.Height 20 >= Application4Then lngJCounter = @CInt(( _- _) / dblYRY)MElse[ U6JIJ<= 0 [U = 50!d o SetWindowPos ihWnd, 0, CLng(%}4) $ SWP_NOSIZ E Or OWNERZORDER FRAMECHANGEDa eIqWidth:AB5yGFwI/ 2 Gwv2t@ HFDfm  ـ߁ hTwTOuaSubcOQPub  Transparent(ByValn As LongPtr, ~_AO bject? OpCLayeredABytem255WDim RetdX= GŇ(DGWL_EXSTYdlng8_2_ߘ_/7___K?H_d%_w <_f*_y*lx_ &Ɛ)Xrdڟ@ "' ? ? ? 5 ZORDER Or SWP_FRAMECHANG ED Enpd If< 4,S ub4 Public * SetTransparent(ByVa l ihWAs LongPtrx, _8m8frmForm :@Object 9O`ptionuBL@ayeredBByte = 255)?Dim R= A fo= CI`(m -k )`%fDA ) e  G.Y.DHZY #t  2{ Y 1PF<= 0250  H t84yPpl?gU5"rNOSIZENOiERNOH9k;p):QH SUq)/ 2]0VXs@-2?? 2?Sl? 2 r'YD$p 3@G//,(?10WoWnd t*!/E( "?Q !  #pAVBA7C4t(%FuncAPlias(nIndexu&)Ptr ? :b, "u n  , Style(     O υ V ngT x) End Function Public AliasSetWindowLong(DhWAs , nIndex AStyle) G?\, 7& #IfSub MoveForm(strFrmCapnStringi= F(vbNull#, Call Releas"e*ureJSendMessage *, WM_NCLBUTTONDOWN, HTCAPTIO0& [Sub\'\i[Vis@ible(O[alDa,  = fintʁIntege r3n' On Error GoTo err_ ' Dhim X btOpacity1BytD If Len`) > 0 Then zg f=G8G6))@E;= "show" g7=D BEls+ E < 1)F1F 8ސ :Ya5=CGJDGWL_EXSTYLECg Or WS_LAYERDE- !F Ak0-d (,`^: `- 2!hid!@W}0(BD#Z)Not G= 1=aa(.Ac./15U/// Ia SDE gFBóndij:Debug.P@tjisWorkbook.name & "!modAnimatedSmsEff ects. - "`.Desxcribh n_ kkks(bS?xkn^konp/k$axkuk?0o1m' k 'kJkv6kk8kSQ:1kH!)"k(kQgk`, k fk_k_kEWk [ykAok ok?okA P%A ?(^@/kS?A/tWndkRt F jZPGZZ)o8=WQC (66) o߅܅|AozoaO@o(^uo1101a =?φESt07111?)3@jow/.&.mo# n# DRo 4o]/o/o/o/o/oBon' 0q  ht00m2(frmTqObjzsblnoqkoon $Fap S', a.c) ' 6 aStyle = AliasGetWindowLong(ihWnd, GWL_STYLE) ' SetBit WS_CAPTION, blnOn ' ' NSYSMENU, False THICKFRAMEMINIMIZEHBOX AX W t,' w frmT.Height- 17efEX EX_APPWI0NDOW~TO|OLD"_@'7$If mbCloseBtn 0Then=No&tF @SystemMenu-]1 B E DeleteB E0), SC_CLOS0& nd IfBDrawBarCAESubIB Private (ByVal lngAs , CBoolean)?> Or A? A-T H ;5C$ 8ublicB8ResizeFormCapti(on(aY Ob0ject`xError GoTo` err_(`frae.Topa0BbiWidtheelbl`>im.L< - 25UqLefzC c#'`" " >&ca#'nd "'!(:Debu$g. NntgisWorkbook .name "!modAnimRBd4sEff2s.6:B Gg6.Number !DescrviB>9e@@Iws_Titw __SRP_30:H__SRP_31Het_union<N@`Av FZRvb؞D,Yn:xZRvb؞D,Yn:N@`AvME PSLSS0l06""<N0{00020820-0000-0000-C000-000000000046} @`xk` ` d)$ %i.  0`tkh ) (| % ` pl)Send% `tkp) Dele %(%@0x%0 %hP @x hP@ x8 %  @t hP@ x8 %  @t xP@t`07B^*\R1*#278*\R1*#2ec$*\Rffff*1<62f1017a$*\Rffff*1=62f1017a4 "( "  08P "  X`p "  x "   xp B@oP@  . B@ o(  B@6 o0  B@oh  B@: oH@Attribute VB_Name = "ws_@Tit" Bast0{00020820- C$0046} |Global!SpacFalse dCreatablPre declaIdTru BExposeTemplateDeriv$Bustom izD2Option 1 6licit  P)- Sub Worksheet_Activ () mod.P_WS M`End"Before(DouC8k(ByVal Target As Range, C ancelBo olean;BD&C  ChgSChD`FollowHyperlin6FFHSelebonk2S2rU 1I 2yJJ)JI4a0`` ``` 0I000 00W0000X$l=xx$ `x$$} x0 @  \$ l xlxt$ ht$(}xt0 0  \$ l xlxt$ tt$(}xt444448rU 0@$0``4A0`d 1I#,0`h$1,0`l(1,0`p,1n<jxd#<qa>H| Ft'JTPxt'JTPqa>H|ME(SLSS6"N0{00020820-0000-0000-C000-000000000046}(%H` % %`h8@``07B^$*\Rffff*1>62f1017b4xphðAttribute VB_Name = "et_union"  Bas|0{00020820-; C$0046} |GlobalSpac False dCr@eatablPredeclaDIdTru BE xposeTemplateDeriv$Bust0omizD2Opt 1 6licit rU 5iLLI4a`rU 4@n__SRP_34;]__SRP_35BTEHSHEET_Q'mod_Coms[Q( d#xME PSLSS<<6?@ABCDEFGHIJLMNOPQRSTUVXYZ[\^_`abcdefghijklmnopqrstuvwxyz{|}~AUTO %n!pWATEReeA TRAN_ORGS? SphereReestr H%l(p %n!pSOCIAL %n!p EDUC_FOODe8 OTHER_ORGS? SphereReestr H%l(pk B@HoOAttribute VB_Name = "TEHSHEET"  Bas|0{00020820-; C$0046} |GlobalSpac False dCr@eatablPredeclaDIdTru BE xposeTemplateDeriv$Bust0omizD2Op tion /licit P"& Sub cmdSetSph ere_Ck() If SelecIs Nothing The&itDim wb As Workbook sT shee? rng RangY D  =+= w$=.pnB = @' /mo6rviceModule.IsqExists(wb, "=L")6 @t"wb. s( .RefersTo/C0 C(Intjor.ColorIndex}xlNon; Offset(0, 1). &EndfAL@R umnsunt > 2p A@ 1 nO215=O_ruH#  '@ CReestr`X~ B=#BLb=("L2").dak"gb$cells(1;Value@@"VO" Or4 _! dGAS?B HOT_VßWARM  !ladd_comsD B@X !l%n!pre !lD B@XkH ( (& H B@f H G b d H%nB@j|PLH  $  :  J!` $  :  J!L Z !A@X HooAttribute VB_Name = "mod_Coms"  Bas|0{00020820-; C$0046} |GlobalSpac False dCr@eatablPredeclaDIdTru BE xposeTemplateDeriv$Bust0omizD2Op tion /licit Pub Sub P_WS_Activ(wsT As Worksheet) EndBDC(ByVal TargetRange, CancelBoolea"n$ OArror GoTo err_ !Dim >: S) =0.pn_ b+book bV  blnWsPro($: G=A.ectCon tents&lngTRLong: $9ls(1, 1).Row intTC Iger: C Column@strAddSD= Recej.Code, "ws_"add_"BZ', AIf Left(Trim( o.2uue), 8)T"" Or Bm A;rior@'lor IndexxlNone AKtF^.nWingds 2"^") The`) Q.m ' A%AppEdag.EnAjEvC do )Ia ServiceModule.UNPROTECT_SHEETM# $5 - d !0 : N\NVCheckEx .Max@Us8l, K!=0'tnd5 SDelDi5 Block2 ArrayB !Ifae :A -# o* .*, cExitEa" MsgBox "" & Chr(13) " A: Err.Nupmber*W>"PED escrib, vbCriticaltA!@ ,:Ch*qc@AM5f`A,AeMe`Cellsi|Count > 1Qe: '@C <> 9-vQU'>9Scr@eenUpdAng@'7@@@bp~6sAutofC -, 303cOJ` 3 E66 66 6 686666cRLoDeaϏÏO9cE#FHN9Hyperlink9a 9e6#95O;PO;N;rHAA>񝊂??.}Y@ )u O+76nbwTM'UqI0IsHL orum 5^qkq"c"!`'@EƷR >"r"7M1Or.geyJEn.Q?EEE"AIs BeS3\3%b),3).Shoŏ0III)-S_ M(et_union_v1+ws_01 " __SRP_3a eK__SRP_3bWm(gd5#xME PSLSS<6      ( "   "      (H  h x $ $( @ H P `p( @H " P XhxohhLX]F !x.HN]F H!x.NH]0F H!F'@]HF %n!'b]`F %n!'d]xF H!ws_add_$', , &5 %n!p$$ %n!!  %n!Z! Wingdings 2 %n!p'.$ (GetS @G H B@^jE -   , %GHj%n %n , D B@pk(H  (n! H B@f|L  $  :  J!` $  :  J!L Z !A@XWATERH`oXLH]]]0 !x.Hte !'b !'d ! !x G|jB ! G|j& ( (&8 If blnWsProt Then modServiceModule.UNPROTECT_SHEET wsT  B@lH ( (&SLSS<N0{00020820-0000-0000-C000-000000000046}@(%H@07B^xAttribute VB_Name = "et_union_v"D Bas0{00020820-C$ 0046} |GlobalSpacFalse dCreatablPredeclaIdTru BExposeTemplate`DerivBustomizD28*zd#<ZJ IAX FLl{F|xLl{F|ZJ IAXME PSLSS0l06"<<N0{00020820-0000-0000-C000-000000000046} @` ` ` d)! %i. ! 0` h )( % p` l ` p)% ` t)8E %h@%0p@% %@@@x` p7B^*\R1*#278*\R1*#2ec$*\Rffff*1A62f1017d4 "  "  (0H "  PXh " px "   "  x B@0oX@  . B@:\Wo0  B@6 \o0 B@8 opp  B@oP  B@: !o0(Attribute VB_Name = "ws_ 01" Basp0{0002`0820- C$0046} |GlobalSpacFalse CreatablPredeclaIdTru BExposeTemplateDeriv$BustomizD2Option /licit` P"& Sub Worksheet_Activ () mod.PH_WS MXE nd"BeforeDouC8k(ByVal Target As Range, CancelBoolean:BDC ?ChNChq DeaGcHFollowHyperlinGF+FH+Sele+on*DSQDrU ;\\I4a0`` ```` :I::: :I::W::::W:0   0 @  0   0 0  0 p  0   4444440rU :@$:``4A:`d 1I#,:`h$1$:`l(,:`p,1,A:`t01nd8A d5#<mc B@C3 Fs5 @gzblxsws_02 ag] __SRP_3e|ml__SRP_3fmws_03 j 5 @gzblmc B@C3ME PSLSS0l06""<N0{00020820-0000-0000-C000-000000000046} @`xk` ` d) %i.  0` h )( % p`xkl ` p)% ` t)8 %h@%0p@% % @x h @x `@@@x` p7B^*\R1*#278*\R1*#2ec$*\Rffff*1C62f10182$*\Rffff*1D62f101824 " "  (0H "  PXh "px "   "  x B@oX@  . B@o0  B@6 o0 B@8 opp  B@oP  B@: o0(Attribute VB_Name = "ws_ 02" Basp0{0002`0820- C$0046} |GlobalSpacFalse CreatablPredeclaIdTru BExposeTemplateDeriv$BustomizD2Option /licit` P"& Sub Worksheet_Activ () mod.PH_WS MXE nd"BeforeDouC8k(ByVal Target As Range, CancelBoolean:BDC ?ChNChq DeaGcHFollowHyperlinGF+FH+Sele+on*DSQDrU ?I @9_^^I4a0`` ```` >I>>> >I>>W>>>>W>X$l=xx$ `x$$} x0 @  0   X$l=xx$ lx$$} x0 p  0   4444440rU >@$>``4A>`d 1I#,>`h$1$>`l(,>`p,1,A>`t01nd8A d#<>0IȸLdG F9՚Nwox9՚Nwo>0IȸLdGME PSLSS0l06""<N0{00020820-0000-0000-C000-000000000046} @`xk` ` d) %i.  0` h )( % p`xkl ` p)% ` t)8 %h@%0p@% % @x h @x `@@@x` p7B^*\R1*#278*\R1*#2ec$*\Rffff*1:62f1017a$*\Rffff*1;62f1017a4 " "  (0H "  PXh "px "   "  x B@oX@  . B@o0  B@6 o0 B@8 opp  B@oP  B@: o0(Attribute VB_Name = "ws_ 03" Basp0{0002`0820- C$0046} |GlobalSpacFalse CreatablPredeclaIdTru BExposeTemplateDeriv$BustomizD2Option /licit` P"& Sub Worksheet_Activ () mod.PH_WS MXE nd"BeforeDouC8k(ByVal Target As Range, CancelBoolean:BDC ?ChNChq DeaGcHFollowHyperlinGF+FH+Sele+on*DSQDrU -HI .HGGI4a0`` ```` ,I,,, ,I,,W,,,,W,X$l=xx$ `x__SRP_2cl__SRP_2dhpmws_04 < clsUpdater$$} x0 @  0   X$l=xx$ lxٰv$$} x0 p  0   4444440rU ,@$,``4A,`d 1I#,,`h$1$,`l(,,`p,1,A,`t01nT(]d#xME PSLSS?@ACDEFGHJKLMNOPQRSTVWXYZ[]^_`abcdefghijklmnopqrstuvwxyz{|}~@`@@