ࡱ> ILHmq` Rz bjbjqPqPP(::'zzz8\K0v.."PPP % //////$2h)5j/!/PP40(((&PP"j( %((z@(P" shH)z|(!00K0(5*5(5(d(//^K0D   DN RvhQVQNT^:WlQqQOo` gRs^S3uh Qz Ty;NRUSMOQz{|W%USMO %*NNQzW T # NT|5u݋T | NT|5u݋0W@W//f&TcNN NPge YpSN %%Ngbgq %W TlQfN %ICPfN %Q~YHhOo`w['`vsQPge %Qz{N NǏ1000W[ %vQNPge0l YpSNRvUSMOlQz 3ubt1u NǏ200W[  0We^/S QNa lQz t^ g e w~QNa ^:WOo`Y#N 0<@JRTdlr|  J L n p  ƲyeTeTeRU!hNCJOJPJQJ^JaJo('h BhNCJOJPJQJ^JaJo('hS* hNCJOJPJQJ^JaJo('h'z_hNCJOJPJQJ^JaJo(!hNCJOJPJQJ^JaJo('hhNCJOJPJQJ^JaJo('hMshNCJ OJPJQJ^JaJ o(!hNCJ OJPJQJ^JaJ o('h8hNCJ OJPJQJ^JaJ o(0:<FH$Ifgd[l0$$Ifa$gd[l0$a$gdNgdN l x HJTdnp^H5H5$Ifgd[l0$$Ifa$gd[l0kd$$Ifl\mc K t0644 lapr~^H5H5$Ifgd[l0$$Ifa$gd[l0kd$$Ifl\mc K t0644 la^H5H5$Ifgd[l0$$Ifa$gd[l0kd$$Ifl\mc K t0644 la^KK$Ifgd[l0kd$$Ifl\mc K t0644 laq$Ifgd[l0zkd,$$Ifl0m  t0644 lan $G$Ifgd[l0gkd$$Ifl  t0644 lan p $Ifgd[l0gkd$$Ifl  t0644 la   nnnn$$Ifa$gd[l0$Ifgd[l0gkd$$Ifl  t0644 la ~{z t^ g e     PAGE   PAGE 1     " $ ( * . 0 4 6 vqoooooooogdN $DWD`Da$gdNzkdf$$Ifl0/ R 6 t0644 la   $ & * , 0 2 6 8 D F H L N P \ ^ ` b f j l v x z էhsh)0JCJmHnHuh8 0JCJjh8 0JCJUh8 0JCJo(h8 h8 0Jjh8 0JUh4!jh4!UhNh@H4aJo(6 H J L f h j l n p r t v x z gdN $hh]h`ha$ hh]h`h&`#$N00 &P 0p1E2PP/R(:pMA. A!"#$%S $$If!vh55X55 #v#vX#v#v :Vl t6555K5$$If!vh55X55 #v#vX#v#v :Vl t6555K5$$If!vh55X55 #v#vX#v#v :Vl t6555K5$$If!vh55X55 #v#vX#v#v :Vl t6555K5]$$If!vh55x#v#vx:Vl t655G$$If!vh5Q!#vQ!:Vl t65G$$If!vh5Q!#vQ!:Vl t65G$$If!vh5Q!#vQ!:Vl t65]$$If!vh55#v#v:Vl t65R 56 R@R cke$d1$9DH$a$CJPJ_HmH nHsH tH$A@$ ؞k=W[SOFi@F nfhX@a> :_"5@CJOJPJQJnHtHunB@rn ckee,g2$dz&#$+D/0$9DH$a$B*CJzKHPJ RH2phr@r P_.QK0055K005 K0055K005 K00 K005 K00$65K005 K00 (K005K00K005 K0055K005 K0055K000@00#$%*2789?@EFGMNSTU]^_mn  $%&3456789:;>000 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 00000 0 00000 00000 0 0@0I00@0I00@0I00@0I00@0@0@0@0@0@08I00t 000000#$%*2789?@EFGMNSTU]^_mn  &3469>000 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 00000 0 00000 00000 0 |X j0p@pZ0p 00&j0p(q'|X  &&&) z Hpn  6 z  x  !)!!@  @H 0(  0( "  B S  ?="%)*-.1269:;<=>@DGHIJKLNRUYZ\_ln}   #'156;>#'156;>_&'1356>56>pyfF5l a8   ) LrN@4fq$#c(4!![P"%(#<$M$ ''j7(;(*<(D.P_.@H4Z4T6u6m7E919/z;q@>%n?MA6{BSEfI\ L3MbgMy9N:LQU_Q>RS*U-nVQW_Zv]Y_maXbYVf~>gj(+mspl ,`c!Ny`ASuP *66Hh]bPs U?&KNSnx3=)^7Xu[ |*o$NRvz(  AFWordEnvZ FldBJUNIDZ flditemNameflagZ fldQXXXDBName[ fldQXXXDBPath[ fldQxxxFileName0[ fldQXXXIDL[ fldQxxxItemName[ fldQXXXserver[ Temp[ ViewCaoGao 3B747FEB111237F548257C01000E49E7 fldHasFawenSSe.nsf Agri2013\ caogao.doc 218FB9349BABC7CC48257C01000E4A2E fldcaogaoCN=notesserver/O=QN Ng\\-9DK9LXP{z( V P:P(V P:P(VP:P(VP:P(V P:P(VP:P(VP:P(VP:P(VP:P(V P:P(V P:P( " q " Y ]u. ]wQh(&T) a$" Lzi  " uY q q W&q h&YYy&*  &# OA]wQhOA]wQh6P6P6P6P6P0@( WYSbTDFile Print PreviewNewMacros.TDFilePrintPreview( sQ Close DocNewMacros.CloseDoc(p({3_Gcg(a$a$&ii& &YY& $Project.NewMacros.TDFilePrintPreviewProject.NewMacros.ViewFinalProject.NewMacros.ShowRevisionsProject.NewMacros.ClosePreviewProject.ThisDocument.formatProject.NewMacros.CloseDocProject.NewMacros.HideRevisionsProject.NewMacros.showProject.NewMacros.hideProject.NewMacros.DRXGProject.NewMacros.DocClose PROJECT.NEWMACROS.DRXGPROJECT.NEWMACROS.HIDEPROJECT.NEWMACROS.SHOWPROJECT.NEWMACROS.CLOSEDOCPROJECT.NEWMACROS.DOCCLOSEPROJECT.NEWMACROS.VIEWFINALPROJECT.THISDOCUMENT.FORMATPROJECT.NEWMACROS.CLOSEPREVIEWPROJECT.NEWMACROS.HIDEREVISIONS PROJECT.NEWMACROS.SHOWREVISIONS $PROJECT.NEWMACROS.TDFILEPRINTPREVIEW@=PP Unknown Gz Times New Roman5Symbol3& z Arial1NSeN[;5 N[_GB2312;[SOSimSun?5 z Courier New?& Arial Black;ўSOSimHeiYeck\h[{SOArial Unicode MS 1h''((!,!),.:;?]}    & 6"0000 0 0 00000 =@\]^([{  0 0 00000;[UEdZSSF2qHX ?s2Se?z~5]Ξ3*zzSR:glQS蕇eNQi Lenovo UserOh+'0$ 8D d p | ĸֽ շ˾ļƼ˾ĸֽNormal Lenovo User2Microsoft Office Word@@f$)@f$)(՜.+,D՜.+, `hx ƴƼ޹˾ P 19״̬ ĸֽ  !"#$%&'()*+,-./012345679:;<=>?ABCDEFGJKZNOYQRSTUVWX[k\]^l`abcdefghijopqrstuvwxyz{|}~Root Entry F`stdoleP h%^*\G{00020430-C 0046}#2.0#0#C:\WINDOWS\system32\e2.tlb#OLE Automation`nMSFor ms> MSFFrmHs3ED452EE1-E08F-101A-8-02608C4D0BB4EFM20.DLL#MicrosPoft : ^ Ob Libr@ary/;D1?u00}#0#kh0B2233D57-CE2C-4723-A866-249E9CB229116DOCUME~1\Lenovo\LOCALSTemp\VBE\T.exd;@!.E .`M OffDicOf@ic 12DF8D04C -5BFAgB-BDE5IAA421gram Files\CommonhShared\OFFICE115Op& 8.0p@%0N@alúNa@  *\C Alot*u@ ltu@ jG{1CF542E0-D988-B1-B48A@805F98FACE}#6D:\LA\Notesh8\n3e f Class,es @"byThisDocumentGTyi D`c`m6n2` (H1eX",`""+) NewMa!nG NwMa@Hrs&2/_G/f!b%Ev!'ModuleGQ>Evd!C@AaU`$soueq2 oi%%(*a&User1c&UerƢ1d&c&a`arU~~~~~u      y  ) (App  8 aHDocCancel PropertyNamemyRevQrU 0a ) Q #8y K*y *\CNormalrU~~~~~~~~~~~~~~~~~~E Q 3zGŚ9r a  I q a   ) Y 1 I a y a  1   ysDR  ThisDocument NewMacrosEventClassModule UserForm1ProjectF /C:\PROGRA~1\COMMON~1\MICROS~1\VBA\VBA6\VBE6.DLLVBA i  F5C:\Program Files\Microsoft Office\OFFICE11\MSWORD.OLBWord a0FC:\WINDOWS\system32\stdole2.tlbstdoleApp q.E .`M C:\WINDOWS\system32\FM20.DLLMSForms aaW=#,#Gf$) 0C:\DOCUME~1\Lenovo\LOCALS~1\Temp\VBE\MSForms.exd AaiL-[DR?C:\Program Files\Common Files\Microsoft Shared\OFFICE11\MSO.DLLOffice 1YB_D:\Lotus\Notes8\notes32.tlblotus H44 Qyk Fb!NG$.6/E3-Gb[oUkG-`8 FDocumentDocument_Close Document_Openformat D4+=h8+3qNFt@W*=h8+3qig(@f F!=h8+3qClassPgv3+3o VBInternal  p FApp_DocumentBeforeClose r`CloseDocTDFilePrintPreview ClosePreviewGetCustomDocumentProperties ViewFinal ShowRevisions HideRevisionsshowisRevOKhideDRXGDocClose queryclose  >f:yO HideRevisions F Fa AFWordEnve Ff F ViewCaoGao autosofta( Count itemName Value Fb F F Temp over CreateCaoGao EditCaoGao EditTemplate UPDATEDOC fldQxxxFileName temp \ $notes.notessession 4elR^Notes[a,[ňNOTES[7bzoN! /f&TOX[[eNvO9e OAK For Notes fldQXXXserver fldQXXXDBPath fldQXXXDBNameGETDATABASE elSb_hQo`Oo`penc^[ ],NOAK{tXTT|! fldQXXXID "GETDOCUMENTBYUNID vwQXXXByUNIDGETVIEW 8]vƉVvwQXXXByUNID,NOAK{tXTT|!  GETDOCUMENTBYKEY ,elSb_hQo`Oo`ech,NOAK{tXTT|! fldQxxxItemNameGETFIRSTITEM $CREATERICHTEXTITEMEMBEDDEDOBJECTS RemoveEMBEDOBJECT flditemNameflag 1  REPLACEITEMVALUESavel FVBE6.DLL   8   X  r x  S   . U`@<  EyX$ l x  $(x 4 8ArU H4__SRP_3__SRP_4 "$__SRP_5;__SRP_6 _`(!# @4nrU `  a  Q 9a a8 a) `` I[W0   L"Cxx #t02xt'''''0'P'p''''''0'P'p''''''0'P'p''''''0'Pp! p p6>P0pP0pP0pP0'p$ Qp[4$ $ 'xp! p lx /xp2 x:` NPPp$ 4p  0  ,>x1)p5P l0?'':`NPPc0p$ 4p Hp6P0E*p$ 4p <lp&):`NPPp$ 4p p5Pp$ 4p pL($xtpP0pP0pP0pP0 x$ Qxtt t 0t t 8t t t (t @t Dt <ct*px! x p p)xp (txp88HrU D$`$A` $`nrU $`$`$rU~|  ?a )Aa9)A ai9q ayI   !i1i) y a Yq0  0 @  0  T 1lp$ 4p 0lW\Upv)pl5\ kvICxZkvcVMZ@lp$ 4p 0l\A$ F4]3)pl6\$EZ@lp$ 4p 0l\A$`1x)pl6\$ ZdV[Cxh (x pl\$0 P  0   0   0   0   0   0 0  0   |XKj8<:P N@@`d$ 4d ` 0 < , >8F( : ]3)d`<6@(d$ 4d d7'('@`d$ d 8` )d`6@(pzd$ d d*d$ 4d <ldA):PN@@d$ 4d d5@8<:PN@@`d$ 4d ` 0 < , >81)d`<5@ l0#l0l0l0 l0N8<:PN@@`d$ 4d ` 0 < , >81)d`<5@h:PN@@ #8*#l*F( d$ 4d >F]@28d6@((N8<:P N@@`d$ 4d ` 0 < , >81)d`<5@H <:P N@@`d$ 4d ` 0 < 0 )d`<5@d$ 4d dHl<:P N@@`d$ 4d ` 0 < 0 )d`<5@:PN@@ 1'@'`'''''' '@'`''''>#8*#l*F(d$ 4d 28d6 @(`@ `@/:N((:PN@@  hN6@(hqc+'''(:PN@@ 6@(;'': N((:P!N@@^i6@(P]3+P]3)pzd$ 4d d""C88 ##$028:'' '@'`'''''' '@'`'''@'`'''''' '@'`'''''('@%d$ d d6>@(`@ `@`@ `@ /:N((:PN@@  hN6@(c8<:P&N@@`d$ 4d ` 0 < , >8F%:'N(($ 4  0  , l:(N$ 4  0  , l*F%hB)N2)d`<6 @(qc'''*8<:P'N@@`d$ 4d ` 0 < , l8*#:(N(($ 4  0  , l*#+*F 28) d`<6 @(V8<:PN@@`d$ 4d ` 0 < , l80/8)d`<5@c8<:P,N@@`d$ 4d ` 0 < , >8F(%B- N)d`<6@(z :P.%B@/0N0qc '''*8<:P'N@@`d$ 4d ` 0 < , l8*#:(N(($ 4  0  , l*#0*F 28) d`<6 @(g8<:P,N@@`d$ 4d ` 0 < , >8F(%c%0B1 N)d`<6@( qcx +'''(:P2N@@ 6@(c8<:P3N@@`d$ 4d ` 0 < , >8F(% B4N)d`<6@(qcP c8<:P3N@@`d$ 4d ` 0 < , >8F(% B5N)d`<6@( gPA@6 7 A@6 8  *d$ 4d <ld ):PN@@d$ 4d d5@G8d$ 4d l8l*#28d` H <:P N@@`d$ 4d ` 0 < 0 )d`<5@H<:PN@@`d$ 4d ` 0 < 0 )d`<5@d$ 4d dd$ 4d dK(P%:%8d$ 4d >8F@%@B(9Nd5@H <:P N@@`d$ 4d ` 0 < 0 )d`<5@H<:PN@@`d$ 4d ` 0 < 0 )d`<5@d$ 4d dd$ 4d dU(%:%:PN@@ #8*#l*F(%@B9N286@(d8<:P:N@@`d$ 4d ` 0 < , >8F(%:;% <)d`<6@(cP%f% =H<:PN@@`d$ 4d ` 0 < 0 )d`<5@H <:P N@@`d$ 4d ` 0 < 0 )d`<5@d$ 4d d9`d$ d ,` >l)d`-''('@d$ d d6@(Q7'('@`d$ d 8` )d`6@(Xd L 0h,8d`<@(`@ `@`@ `@      /__SRP_7>5NewMacrosn[UserForm1GGThisDocument`(`90$!`$I`$q`$`(`a/$ `$ `$9 `$a `n[bmYG bfxMEH@<> LLLLLLLL`Z ` a D ` h``" % `##```` %`` ` ,, h% %+`  i  0 ` ""  ` `  ` +" ` k `h ```l0 ` P ` `"8 `$ `&  @P0rX% @P0 @P0 8(@`&x X0 @@p @l @\ @hX @ @V h@D @4 @$ @ h hh h h 8 0 `"z(  0(F@(z@ d (@P ` @ P @ @ @< @ 8 @ ( @  @  @P @ @  @8  @P @ @ @ @ @ @ @ p @( ` @@ P @X @ @p 0 @ @  @ @ @ @ @ @0 @H @` @x @ p @ ` @ P @ @  ,~.&>@* @ @8 @P @h @ @p @` @P @@ @0 @ @( @@ @X @p @ @ @ @ @ @ @p @0` @HP @`@ @x0 @ @ @ @ @ @ @ (@  @8 @ @ @@  @ dd@ @ dHdh@ @o X0d0f 0J:T$*\Rffff*0=543a4a87*\R1*#c5*\R0*#13*\R0*#2*\R0*#1*\R0*#146*\G{000204EF-0000-0000-C000-000000000046}#4.0#9#..\..\..\..\Program Files\Common Files\Microsoft Shared\VBA\VBA6\VBE6.DLL#Visual Basic For Applications*#14*\R1*#91*\R1*#166*\R1*#d0*\R1*#c04*\G{000204EF-0000-0000-C000-000000000046}#4.0#9#..\..\..\..\Program Files\Common Files\Microsoft Shared\VBA\VBA6\VBE6.DLL#Visual Basic For Applications*#f*\R1*#cc*\R1*#cd*\R1*#c6*\R1*#c1*\R1*#17b " "   F( Rp  20 @X ` "p$ " ( 8X` hx    "    D R *p     $  $Hp       B  (10 @PX`h ME     "    " (08@H,P"    0 (@ h"x("   @HPX`hp,x  "  (  0  FP "        (    ( 0 @ H P " X ` h p x                (  8  H P  X $h                8 @ H P  p x   B          "     (  8 H P X  p           (8HX `hp " *   " (0 B8@ H(jP  x7   " *)N 8 H` h6&x &N.h H NP Hp  H 2 (&/0 X 2+h  :;     ( 8 @PX` "h  &/  r X h   0V ,cHx  H P .gX 2+ 2c   2c0h p x    *)G H8 *HX   $K H *H ( 8 8UH2d  HH 09@ -Xh7p A"oh@xX@ڹڷⷢʽļ"ӡԤ"ʱŵǷӡͷKIf ActiveDocument.CustomDocumentProperties("״̬").Value <> "ʽļ" Then%2 GoTo EverythingOKrosEnd Ifar Ƿӡͷ? | WebOffice:$z ~icr 0!> @autosoft 0B@Bk j!l(iλͷļڵǩ  fldWenTou B@Selection.Font.Hidden = True$@ !( j!l( F( 0!> @ <autosoft 0B@6kd F(kxxp !A@z|XP'o@x0>ƹڷⷢʽļ"ӡԤ"ʱŵǷӡͷKIf ActiveDocument.CustomDocumentProperties("״̬").Value <> "ʽļ" Then# ActiveDocument.ClosePrintPreview GoTo EverythingOKEnd If 0!> @autosoft 0B@Bk 0B@Wx j!l(  fldWenTou B@Selection.Font.Hidden = False$@ !( j!l( F( 0!> @ <autosoft 0B@6kx !A@z|o]  0!!' '&d]8    0!%!   0!%!4'&z8k0('&kiP j!l9 9qox]]]״̬ 0%!4ʾ޶G|j 0!> @autosoft 0B@BkPautosoft8 l 0B@6 (!' 0(D   B@A 0(D 0(! ActiveWindow.view.ShowAll = True  ((ʾ޶״̬ 0%(4autosoft 0B@Bautosoft8: <l 0B@6x !A@z|o  On Error Resume Next]`]x]]]]]״̬ 0%!4ʾ޶G|j 0!> @autosoft 0B@Bk(A 0(D 0(޶״̬ 0%(4 AFWordEnv 0%2!4 EditCaoGaoK EditGaoZhiK CreateFaWenK CreateGaoZhiKTautosoft8 l 0B@6 (!.X AkSautosoft8: <l 0B@6n !A@z|o']P]pb  .kX !.  ' x k autosoftxk $ B@ B@k !' autosoft !  ! ! !.0k(k  !l B@autosoft ((   B@kk ,  ѭxkxop`' !k@z80'i '   B@b  ' !. xk $ B@ B@hk` !' autosoft $ $ !!B@kd !l !B@H  !( !(  !(kk ,  ѭxhk`XoP0]p޸? (!$ '   ((koA"ox]Temp 0%2!4$over 0( (!jB@B'"zXkP F( ҳãҳüҳ 0!> @autosoft 0B@Bk AFWordEnv 0%2!4鿴ĵ ViewCaoGaoKTĵ CreateCaoGaoK EditCaoGaoK EditTemplateKT H UPDATEDOCKTĵ ] fldQxxxFileName 0%2!4'temp$ \ $ 0!]8Temp 0%2!4'overTemp 0%2(4 0B@ Temp 0%2(4temp$ \   0B@k]P]h]]]]notes.notessession$(. (޷Notes,밲װNOTESͻ!A@zX kP Ƿ񱣴ļ޸ģ , OAK For Notes$z'* * ~queryclose = 0 d * .'" 0B@z k k ״̬$&ʾ޶ HideRevisions (B@*notes.notessession$(.k( .& fldQXXXserver 0%2!4 fldQXXXDBPath 0%2!4 fldQXXXDBName 0%2!4 %0.& &޷ȫϢϢݿ[ fldQXXXDBPath 0%2!4 fldQXXXDBName 0%2!4],OAKԱϵ!A@z k ȫϢϢݿ AFWordEnv 0%2!4 EditTemplate fldQXXXID 0%2!4 &%2. d vwQXXXByUNID &%4.l l޷ȫϢϢݿ[ fldQXXXDBPath 0%2!4 fldQXXXDBName 0%2!4&]ͼvwQXXXByUNID,OAKԱϵ!A@z k fldQXXXID 0%2!4 l%6.  '޷ȫϢϢĵ,OAKԱϵ!A@z( k k fldQxxxItemName 0%2!4 %8. fldQxxxItemName 0%2!4 %:.k '" !<'" ɾļ "$> @ !< @BB @k 0!> @autosoft 0B@Bk 0!\  overTemp 0%2(4 ViewCaoGao AFWordEnv 0%2(4 0(D 0B@ 0!  %F.@d(overTemp 0%2(4 ViewCaoGao AFWordEnv 0%2(4 0(D 0B@temp$ \   %F.@kxflditemNameflag 0%2!41 BH Bn( x AFWordEnv 0%2(4overTemp 0%2(4 0( (!J! (B@Ld (!jB@BkxiphAttribute VB_Name = "NewMacros" Sub CloseDoc() Call querycX End JTTDFilePrintPrevi ewhl On Error GoToHan0dlerf 'ڹڷⷢʽļ"ӡԤ"ʱŵǷ f'If Activument.Cu0stomProperties("״̬").Value <> "7" Th\en(NYv{thingOK ~ Ifa=MsgBox("N?", vbYesNo, "WebOffice:")vbNoO6`YtejonTypTwdNo "Unpro! ("autosoft"t 2 7AWindow.t@.ShowA= TrueG 'λAcAlڵǩ ؇ Se l2.BUWhat:=wdBookmark, :="fldWenTou@&'FowHiddenRK#L Col= RGB(2585, A:Fals:Options.ºDrawAbj6s@" t<= s~ @bowOnlyFormFields,fFzG_ zE_F+7%c b8E*crr{:b~.De0scri'cExitC D[Qي?!{6v݇0, 0D( [k?5|QeB _& }>>aR>tt>?n Funn Get{{0 |ByAs Sng) sDim iAInteg{Q&iD<.Count40wo Vp"kVq j~ \ jp1 iq1<o d item(j).= 獅qo i o`.u"N Ar )CNext  +3cVЩ FinalrWithtGBR saAndComs~ .f!`wdBA a/@m~  ϳl-  1strAuthP 1my'e%%%Pπʾ޶s > o(߬߬!,'fU Ϳ Password@VpF sUser3ApplicaM.eQ< ]eHomeKey UniStory,@ten `wdMovsжo(hF x '.BOa Ϗy#_._>/tNoReseh1On /nޯFm)=sGe= ` O:kQ@>Q3dt=DatD1`lwInteger  Dim myRev As A0isionhautosoftString< notes0Va riant2If ActiveDocument.@CustomProperties("״̬").Value <> "ʾ޶" Then Exit SubYKtel onTypAwd|NoE< Unpract ("u")End IfCall` hide!Shows = 0FalsPrint!$= "؂ L pOrrors NexSelM Case krble@gAFWordEnvhB"EditCaoGao", BZhiACreateFaWen !p Passw@!$:=h, A{:=wdAllowOlnl®sC@(Applicat.Ver) > 9 G@F|ViewFinal Ȇ RE~F΁C5NoReset:=True9FormField9A$tGoTo EverythOK Err_Han dler:Ms gBox .DescripA#!?Gn)b Aqq sU^(Dei^0A v B1!%ao While WC '`7i04Set1B Fav F #@a i + 1 Is No)F"&DostrAuth`rwf E#sOK( )`M%Move0RighLeflIn@#B.c'*!G!ARangߣB1p'51.Index"# !j #I'!3D`"BM5n7 &.3 26" UserName gb_ 0AT ""/+ "? !2E > 30( 'ѭ37w Loop`K Funق~ iI/؇)ڍvperrhPSdt- ":) (ϣB FWRqaTQoT HomeKey UniPawdS tory,ptendp1=S DOT_M?Q?Q* O=! OJ8.\H _JF92I Ig4_: Trim(eLStr)IChr(13)_RN.hsj`7 #` ߆ c,Fw?CFo!olor%Vwd`Black.ikeThrough7ֲ;,BU]rlinMwdNoncXJ2JJJo~sJSub D(RXG=Dxg]= InputИ$("޸@?`,O^@^1Jara q A ocCloseB b4quPc1XPub L g(kX+XD  5L8Temp"0rl[S<Saved ('9Window.2Cc,`q Os.Vpirusrҳ ãҳ$1G 5?_T  ActiveDocument.Unprotect ("autosoft")  End I"f,SelCase Variables("AFWordEnv").Valuex'鿴ĵD"ViewCaoGao"qGoTo EverythingOK' ?CreateA, "Edit `Templ#_ `Upd .GUPDATEDOnC;:V Dim filenamex Asp StrZ=fldQxxx:F$N$ 3If@ Trim(iron$("tl") & "\"C3) <>4Full+ ThenM0str/0AZ-Ȋ = "o}^SavW?E1? '@qb:=\, FILEFORMAT:=wdFormat(IAv,|ntG%@i 3vVcurdbVq PSet n`s4GetObj (""`n.sessiEmpty! .EMBEDDBJECTS'ɾ~хG`p( v)OC†Each obj In oiCallp.Rem'NextW- O|yTypewdNoW L_Wo]$> 0uV(erǩ#~Q` 0TrackƍFazQ,W/!=x!O'(14540\lName, filenx) ElsehPActiveDocument.Variables("Temp")"lue = @"over"%xAFWordEnv AViewCaoGaoGTrackRevisio$ns{FaSav Set objitem.EMBEDOBJECT(1454, "", Pir`on$("v & "\" nd IfCall Qxxx.REPLACEITEMVALUE(fldN0flagN1" /u(Tru EISelectKGoTo ElythingOK ErrHandler: *tr ֐ 4dj5)If Appli(cat.s. Count 1 0Then4I Qui?ICWindow.CloGANsFuno @ C2TCeO"LL*LLLLLL <` @autosoft 0B@Bk 0(Dno F J9H N9L R9P N9T X9V N9Z ^9\ b9` N9d h9fq0 p j!l(no|Attribute VB_Name = "ThisDocument" Bas1Normal.VGlobal!SpaclFalse CreatablPre declaIdTru BExposeTemplateDeriv$Custom izC1 Dim X As @New EvClassModulBP)- SuDb _ClF() Call queryc End Open If GetK-Properties("״̬")޶" Then;[Application.Run ("HideRevis9 s"NGIf Set X.WordC %CInt( VerA) > 10! AftSelectLActj=.VariAf=AF&Env")l@ "ViewCaoGao_L@QtAPrw::="autosoft", NoReset:=, Type:=wdAllowOnlyF1@Fields-CEGIS@_ <> wdNo"@M Unpro/(,rDtÄ ShowF=?r0*V \8TWith OpaLd!A.Ins`TedTextMark wdUnderlin`hColor"ByAuthorD Et lSkeThro8ughSZ #ed3n&2No*n edL!s POuts xBUe_i!D  @&oC4omasQsBoonntOri`∣1s`>>v9HC#OWi@ndow.v t.b! wdMixxedNe_VBA_PROJECTEventClassModule"]1 PROJECTXPROJECTwmay *\G{000204EF-0000-0000-C000-000000000046}#4.0#9#C:\PROGRA~1\COMMON~1\MICROS~1\VBA\VBA6\VBE6.DLL#Visual Basic For Applications*\G{00020905-0000-0000-C000-000000000046}#8.3#0#C:\Program Files\Microsoft Office\OFFICE11\MSWORD.OLB#Microsoft Word 11.0 Object Library*\G{00020430-0000-0000-C000-000000000046}#2.0#0#C:\WINDOWS\system32\stdole2.tlb#OLE Automation*\G{0D452EE1-E08F-101A-852E-02608C4D0BB4}#2.0#0#C:\WINDOWS\system32\FM20.DLL#Microsoft Forms 2.0 Object Library*\G{02233D57-CE2C-4723-A866-249E9CB22911}#2.0#0#C:\DOCUME~1\Lenovo\LOCALS~1\Temp\VBE\MSForms.exd#Microsoft Forms 2.0 Object Library.E .`M &*\G{2DF8D04C-5BFA-101B-BDE5-00AA0044DE52}#2.3#0#C:\Program Files\Common Files\Microsoft Shared\OFFICE11\MSO.DLL#Microsoft Office 8.0 Object Library*\CNormal*\CNormalJ:T*\G{1CF542E0-D988-11CF-B485-00805F98FACE}#6.0#0#D:\Lotus\Notes8\notes32.tlb#Lotus Notes Automation Classes  J:TbThisDocument06543a4a87ThisDocument`0eNewMacros0=543a4a87rNewMacrosf_G EventClassModule0<543a4a87 EventClassModule0UserForm10;543a4a87[UserForm1HahH0=EF.>Ld0D W烏n/&JϚg wIC&t@Uformat Wordk` VBA`Win16~`Win32`Mac`VBA6#` Project-`stdole``MSFormsC`Officeu` Normal` lotus` ThisDocument<` _Evaluate`Xo` EventClassModule`Document_Close7\` (querycloseT` Document_Open`(GetCustomDocumentProperties~` Application*`Run_`Appt`Version`ActiveDocument\` Variablesn`ValueK`Protectf`Password`NoResetg`wdAllowOnlyFormFields!`ProtectionType`wdNoProtection` Unprotect?` (ShowRevisionsu`Options`InsertedTextMarkn`wdInsertedTextMarkUnderline`InsertedTextColorn8` wdByAuthor*``DeletedTextMark`wdDeletedTextMarkStrikeThrough`DeletedTextColor `RevisedPropertiesMark`wdRevisedPropertiesMarkNone`RevisedPropertiesColor`RevisedLinesMark`wdRevisedLinesMarkOutsideBorder|`RevisedLinesColor`wdAutoKV` CommentsColorP` RevisionsBalloonPrintOrientation.`!wdBalloonPrintOrientationPreserve` ActiveWindow+`viewI` RevisionsMode`wdMixedRevisions` NewMacrosj`(CloseDoc `(TDFilePrintPreview` ErrHandler }`MsgBoxR`vbYesNo`vbNo%`ShowAllI` SelectionZ`WhatC`wdGoToBookmarkJ`FontU`Color2F`PrintDrawingObjects` EverythingOK3`Erro` Description ` PrintPreview` (ClosePreviewaw`ClosePrintPreview#` PropertyName`i``CustomDocumentPropertiesޖ`Count0v`ja`itemz` (ViewFinalZ`ShowRevisionsAndCommentsL` RevisionsView`wdRevisionsViewFinal3]` strAuthor`myRev`Revision`wdAllowOnlyRevisionsW2` strUserName͈`UserName\`HomeKey`Unit`wdStory&`Extend?`wdMovez`(show`PrintRevisions` (HideRevisionsi`dt\` intRevCount` autosoftStr`notes`(hide9z` Err_Handlerl`myRev1` NextRevision$`(isRevOKS` MoveRight`MoveLeftv`next1"`Author`Range `Index`TypeText` errhandleZ`next2#`Trim@`ChrK~` Revisions\` RejectAll<)` ColorIndex`wdBlack:` StrikeThrough"` Underline`wdUnderlineNoneP`(DRXG`xgrs`InputBox `(DocClose=`Savedd`VirusProtectionoD` UpdateDoc` filenamex`Environ,`FullNameО`tempstrxL`Save`SaveAsf;`FileNamej` FILEFORMAT` wdFormatDoc`QxxxDocj`vm`curdb`qxxxdb'` GetObjectz`response` vbYesNoCancelq`vbCancel'` GETDATABASE`GETDOCUMENTBYUNID`GETVIEW`GETDOCUMENTBYKEY` GETFIRSTITEMT`CREATERICHTEXTITEMy`EMBEDDEDOBJECTS `IsEmpty `obj`Removeϱ`TrackRevisions` EMBEDOBJECTf`REPLACEITEMVALUEJ` Documents`Quit9`App_DocumentBeforeCloseS`Doc`Documentj`Cancel`Class`DocumentBeforeClose/` UserForm1)`UserFormN` _B_var_TrimmT`_B_str_Environ`_B_var_wdFormatDoc`_B_var_response ` _B_var_objz`s[ H "@(@fNFt@WME PSS Sa0R6" P(N0{FCFB3D2A-A0FA-1068-A738-08002B3371B5}P0 %*-4@ N`xkp()Q %iT $%0 %00@@$% Qx%(P Qx"XhX QxPpF% X800H,@J:T*\R1*#17c*\R1*#17e$*\Rffff*0<543a4a87$*\Rffff*0=543a4a87*\R1*#c08<  "   (08 H] "0 "X'TkHo@8sAttribute VB_Name = "EventClassModule"  Bas0{FCFB3D2A-A0FA-1068-A738-08002B3371B5} |GlobalSpacAIFalse dCreatablPredeclaIdCExposeTemplateDerivCustomiz EPubli@c Withs App As `Word.ationj .VarHelpIBDZ-1 PCAE Sub$_ DocumBe@foreClc(ByVal 3, Cancel Boolean) If q`ueryc31P TheE = TruEnd If #ID="{AF2B1CEC-2864-447D-ABB6-F6BBE25364F0}" Document=ThisDocument/&H00000000 Module=NewMacros Class=EventClassModule Package={AC9F2F90-E877-11CE-9F68-00AA00574A4F} BaseClass=UserForm1 HelpFile="" Name="Project" HelpContextID="0" VersionCompatible32="393222000" CMG="2725331E7D62A066A066A066A066" DPB="4E4C5A47A649CC4ACC4ACC" GC="757761ACAFD2B0D2B02D" [Host Extender Info] &H00000001={3832D640-CF90-11CF-8E43-00A0C911005A};VBE;&H00000000 [Workspace] ThisDocument=0, 0, 0, 0, C NewMacros=0, 0, 0, 0, C EventClassModule=0, 0, 0, 0, C UserForm1=0, 0, 0, 0, C, 22, 29, 858, 497, C ThisDocumentThisDocumentNewMacrosNewMacrosEventClassModuleEventClassModuleUserForm1UserForm1 }t UserForm1shH)shH)f&oCompObja Microsoft Forms 2.0 Embedded Object9qVERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} UserForm1 Caption = "UserForm1" ClientHeight = 3120 ClientLeft = 45 ClientTop = 435 ClientWidth = 4710 StartUpPosition = 1 ' End   FMicrosoft Office Word ĵ MVBFrameCompObjmSWordDocWord.Document.89q