ࡱ> '` ;V\bjbj{P{P *:: O %  J)J)J)8Pndn, :,)Z+p+p+p+K,*u,,7999999$;h8>9i ,K,K,,,9 p+p+^:g1g1g1,X p+ p+7g1,7g1g1 g1p+o Pg&J),Xg1=2t:0:g1?Q-?g1? u1,,g1,,,,,99#/D,,,:,,,, " "  ANOTHER PLANNED PERMANENT LIVING ARRANGEMENTPermanency Goal ApprovalMichigan Department of Human ServicesPlease print or type.Youth s NameAgeDate of Birth FORMTEXT       FORMTEXT       FORMTEXT      SWSS Log NumberCourt File Number FORMTEXT       FORMTEXT      FC WorkerAgency FORMTEXT       FORMTEXT      FC Worker s email addressFC Worker Telephone NumberFC Worker Fax Number FORMTEXT       FORMTEXT       FORMTEXT      The permanency goal of Another Planned Permanent Living Arrangement (APPLA) is appropriate for the above named youth as documented by the following:a.The youth is age 14 or older.b.Reasonable efforts have been made to achieve permanency within the four other permanency goals for the youth and documented in the youths case service reports. Below are the compelling reasons why the respective alternative permanency planning goal is not in the childs best interests.Permanency GoalCompelling ReasonReunification FORMTEXT      Adoption FORMTEXT      Guardianship FORMTEXT      Permanent placement with a fit and willing relative FORMTEXT      c.Describe the search and identification of relatives for placement and other permanency options. FORMTEXT      d.Describe the discussions with the youth regarding permanency options. FORMTEXT      e.The foster parents or caregiver have agreed, in writing, to continue to care for the youth until the youth s foster care case is closed. The signed agreement is located in the youth s case service plan.Foster Care Worker Signature:Print NameDate FORMTEXT       FORMTEXT      Supervisor Signature:Print NameDate FORMTEXT       FORMTEXT      Private PAFC Director Signature (if applicable)Print NameDate FORMTEXT       FORMTEXT      Tribal Designee Signature (if applicable)Print NameDate FORMTEXT       FORMTEXT      DHS Monitor SignaturePrint NameDate FORMTE\   P R f h j t v x z   & ( * 4 6 8 : N P R \ ^ b ҹҹҹҹҹzjh}U h}5CJh}jh7Ujh7Uj.h7Ujh7Ujh]mfUmHnHujPh7Ujh7Uh!eh!eh!e5\ h!e5\h6M h75hkh70Z\|s6<kd$$Ifl4y,y,4 lalf4 $Ifgd7<kdX$$Ifl4y,y,4 lalf4<kd$$Ifl4y,y,4 lalf4 $Ifgd7[T\B  * 2 N pggg $Ifgd(,?kd`$$Ifl4 y,y,4 lalf4yt!e $Ifgd!e<kd$$Ifl4y,y,4 lalf4 $Ifgd7N P x 0bkd$$Ifl4F<Z!y,<      4 lalf4 $Ifgd7bkd$$Ifl4F<Z!y,<      4 lalf4   8 ` b v MD $IfgdVr)Okd$$Ifl40<y,<=4 lalf4 $Ifgd7Okd*$$Ifl40<y,<=4 lalf4 $Ifgd(,v B l GRkd`$$Ifl40<y,<=4 lalf4ytVr) $IfgdVr)Rkd $$Ifl40<y,<=4 lalf4ytVr) $IfgdVr) l n p   "$.Ȝujh]mfUmHnHuj h%Ujh%U h%CJh%jN h}Ujh}Ujzh}U h}5CJh}OJQJjh}Ujh}UmHnHujh}Ujh}Uh}.l n $IfgdVr)ekd$$Ifl4F<Z!y,<      4 lalf4ytVr) SJ $Ifgd7<kdP $$Ifl4py,y,4 lalf4 $Ifgd(,ekd $$Ifl4F<Z!y,<      4 lalf4ytVr) Vbkd $$Ifl4Fy,(    4 lalf4 $Ifgd7<kd $$Ifl4y,y,4 lalf4 @4 $$Ifa$gd7Okd $$Ifl40<y,<=4 lalf4 $$Ifa$gd7bkd $$Ifl40Fy,(    4 lalf4.024FH\^`jlnp246@BDFJ.02<>  󹱹hvjh!eUh6Mjh!eUmHnHuj>h!eUjh!eUh!ejhhkUjxh%Ujh]mfUmHnHuj h%U h%5CJh%jh%U2 24FnpJOkd $$Ifl4h0<y,<=4 lalf4 $$Ifa$gd7Okd $$Ifl4h0<y,<=4 lalf4 $Ifgd7DFHJA $Ifgd(,Okd$$Ifl4h0<y,<=4 lalf4 $Ifgd7 $$Ifa$gd7Okd$$Ifl4h0<y,<=4 lalf4HJLR@SJ $Ifgd_ekd$$Ifl4Fy,(    4 lalf4yt_ $Ifgd_<kdN$$Ifl4y,y,4 lalf4@BDJ $Ifgd_ekd$$Ifl4@Fy,(    4 lalf4yt!e $Ifgd_ $Ifgd_ekd2$$Ifl4Fy,(    4 lalf4yt_-bkd$$Ifl43Fy,(    4 lalf4 $Ifgd7ekd&$$Ifl4@Fy,(    4 lalf4yt_ $Ifgd_ $Ifgd\`Okd4$$Ifl40!y,![ 4 lalf4 $Ifgd(, "$&0246JLNXZ\^JLNjehAUjhAUjhAUjhAU hA5 hA5CJjh_UjhAUmHnHuj[h_UjhAUhAh!eCJOJQJ8  4\ww $Ifgd_ $Ifgd(,vkd$$Ifl4F<&y,<p    4 lalf4pytA\^ww $Ifgd_ $Ifgd(,vkd9$$Ifl4F<&y,<p    4 lalf4pytAww $Ifgd_ $Ifgd(,vkd$$Ifl4F<&y,<p    4 lalf4pytA`vww $Ifgd_ $Ifgd\`vkd$$Ifl4F<&y,<p    4 lalf4pytAww $Ifgd_ $Ifgd\`vkdB$$Ifl4F<&y,<p    4 lalf4pytA*@J $Ifgd_vkd$$Ifl4F<&y,<p    4 lalf4pytAJLNvww $Ifgd_ $Ifgd_vkd$$Ifl4F<&y,<p    4 lalf4pytANPdfhrtvxTTT TTTTT.T0T2TT@TBTLT`TTTTTTDUĽĵijĨĵďĽsn hA5hA5KH \^JaJ h7hAhhA5jhLUjhLUmHnHujhLUUjhLU hL5CJhL hA5CJjhAUjhAUmHnHujKhAUhAjhAU+wn $Ifgd@ $Ifgd_ $Ifgd-vkd)$$Ifl4F<&y,<p    4 lalf4pytAT@Twn $Ifgd@ $Ifgd_ $Ifgd-vkd$$Ifl4F<&y,<p    4 lalf4pytAXT       FORMTEXT      Approved:County Director/County Child Welfare Director/District Manager DateDirector of Bureau of Child WelfareDateDisapproved:County Director/County Child Welfare Director/District Manager DateDirector of Bureau of Child WelfareDateFax form to 517-335-7789.Return response requires 21 days. Signed approval forms will be returned as quickly as possible; forms with inaccurate or incomplete information may delay the approval process.Return form to designated FC worker.Department of Human Services (DHS) will not discriminate against any individual or group because of race, religion, age, national origin, color, height, weight, marital status, sex, sexual orientation, gender identity or expression, political beliefs or disability. If you need help with reading, writing, hearing, etc., under the Americans with Disabilities Act, you are invited to make your needs known to a DHS office in your area.     DHS-343 (Rev. 2-10) Previous edition obsolete. MSWord  PAGE 1 @TBTDTFTHTJT $Ifgd(,vkdy$$Ifl4F<&y,<p    4 lalf4pytAJTLT`TbTTT}=44 $Ifgd7?kd $$Ifl4y,y,4 lalf4ytb4 $Ifgdxkd2 $$Ifl4\ <Z!y,    4 lalf4ytb4TTTTT> $Ifgd7Rkd!$$Ifl40&y,&4 lalf4ytA $Ifgd7 $Ifgd(,Rkd(!$$Ifl40&y,&4 lalf4ytADUFUHUJULUNUhUUUUUULVNVPVRVTVZVpVVVVVVVVWWX:X $IfgdRkd"$$Ifl40&y,&4 lalf4ytA $Ifgd7 $Ifgd7Rkd,"$$Ifl40&y,&4 lalf4ytAhUjUUUUUUf] $IfgdRkd#$$Ifl40&y,&4 lalf4ytA $Ifgd<kd0#$$Ifl4y,y,4 lalf4UUDVNVPVRVTVPG $IfgdRkd$$$Ifl40&y,&4 lalf4ytA $IfgdRkd$$$Ifl40&y,&4 lalf4ytATVVVXVZVVWf]J$d$$If^a$gdZ $Ifgd7<kd%$$Ifl4y,y,4 lalf4 $Ifgd(,Rkd%$$Ifl40&y,&4 lalf4ytAWWX@XBX:bkd\&$$Ifl4F<Z!y,<      4 lalf4 $Ifgd7 $Ifgd[Okd%$$Ifl40<y,<=4 lalf4BXDXFXHXJXLX[wf$If^gd-ukd&$$Ifl4\ <Z!y,    4 lalf4 $Ifgd(, $Ifgd7[[[[[[[[[[[P\R\T\V\(|P|x|||@?>=<gd_gd-<kdl'$$Ifl4y,y,4 lalf4,&P/ =!"#$% V$$Ifl!vh5y,#vy,:V l45y,4alf4V$$Ifl!vh5y,#vy,:V l45y,4alf4V$$Ifl!vh5y,#vy,:V l45y,4alf4V$$Ifl!vh5y,#vy,:V l45y,4alf4\$$Ifl!vh5y,#vy,:V l4 5y,4alf4yt!e$$Ifl!vh5<5 5 #v<#v #v :V l45<5 5 /  4alf4tD.Text4jDjD$$Ifl!vh5<5 5 #v<#v #v :V l45<5 5 / 4alf4z$$Ifl!vh5<5=#v<#v=:V l45<5=/  4alf4tD.Text4tD.Text4z$$Ifl!vh5<5=#v<#v=:V l45<5=/ 4alf4$$Ifl!vh5<5=#v<#v=:V l45<5=/  4alf4ytVr)jD-jD-$$Ifl!vh5<5=#v<#v=:V l45<5=/ 4alf4ytVr)$$Ifl!vh5<5 5 #v<#v #v :V l45<5 5 /  4alf4ytVr)jD-jD jD $$Ifl!vh5<5 5 #v<#v #v :V l45<5 5 / 4alf4ytVr)V$$Ifl!vh5y,#vy,:V l4p5y,4alf4V$$Ifl!vh5y,#vy,:V l45y,4alf4$$Ifl!vh555(#v#v#v(:V l4555(4alf4$$Ifl!vh555(#v#v#v(:V l40555(/ 4alf4$$Ifl!vh5<5=#v<#v=:V l4,5<5=/ 4alf4tDText1z$$Ifl!vh5<5=#v<#v=:V l4h5<5=/ 4alf4tDText1z$$Ifl!vh5<5=#v<#v=:V l4h5<5=/ 4alf4tDText1z$$Ifl!vh5<5=#v<#v=:V l4h5<5=/ 4alf4jDz$$Ifl!vh5<5=#v<#v=:V l4h5<5=/ 4alf4d$$Ifl!vh5y,#vy,:V l45y,/ 4alf4$$Ifl!vh555(#v#v#v(:V l4555(4alf4yt_jD$$Ifl!vh555(#v#v#v(:V l4@555(4alf4yt!e$$Ifl!vh555(#v#v#v(:V l4555(4alf4yt_jD$$Ifl!vh555(#v#v#v(:V l4@555(4alf4yt_$$Ifl!vh555(#v#v#v(:V l43555(4alf4l$$Ifl!vh5!5[ #v!#v[ :V l45!5[ 4alf4$$Ifl!vh5<5p5#v<#vp#v:V l45<5p5/  4alf4pytAjD!tD Text6$$Ifl!vh5<5p5#v<#vp#v:V l45<5p5/ 4alf4pytA$$Ifl!vh5<5p5#v<#vp#v:V l45<5p5/  4alf4pytAjD!tD Text6$$Ifl!vh5<5p5#v<#vp#v:V l45<5p5/ 4alf4pytA$$Ifl!vh5<5p5#v<#vp#v:V l45<5p5/  4alf4pytAjD!tD Text6$$Ifl!vh5<5p5#v<#vp#v:V l45<5p5/ 4alf4pytA$$Ifl!vh5<5p5#v<#vp#v:V l45<5p5/  4alf4pytAjD!tD Text6$$Ifl!vh5<5p5#v<#vp#v:V l45<5p5/ 4alf4pytA$$Ifl!vh5<5p5#v<#vp#v:V l45<5p5/  4alf4pytAjD!tD Text6$$Ifl!vh5<5p5#v<#vp#v:V l45<5p5/ 4alf4pytA$$Ifl!vh5 5 5 5 #v #v :V l45 5 / 4alf4ytb4b$$Ifl!vh5y,#vy,:V l4,5y,4alf4ytb4$$Ifl!vh5&5#v&#v:V l45&5/  4alf4ytA$$Ifl!vh5&5#v&#v:V l45&5/ 4alf4ytA$$Ifl!vh5&5#v&#v:V l45&5/  4alf4ytA$$Ifl!vh5&5#v&#v:V l45&5/ 4alf4ytA\$$Ifl!vh5y,#vy,:V l4,5y,4alf4$$Ifl!vh5&5#v&#v:V l45&5/  4alf4ytA$$Ifl!vh5&5#v&#v:V l45&5/ 4alf4ytA$$Ifl!vh5&5#v&#v:V l45&5/  4alf4ytA$$Ifl!vh5&5#v&#v:V l45&5/ 4alf4ytAV$$Ifl!vh5y,#vy,:V l45y,4alf4l$$Ifl!vh5<5=#v<#v=:V l45<5=4alf4$$Ifl!vh5<5 5 #v<#v #v :V l45<5 5 4alf4$$Ifl!vh5 5 5 5 #v #v :V l45 5 / 4alf4d$$Ifl!vh5y,#vy,:V l45y,/ 4alf4D%8@8 Normal_HmH sH tH B@B Heading 3 $<5CJDA@D Default Paragraph FontVi@V  Table Normal :V 44 la (k(No List @O@ BLANKLINEd CJOJQJJOJ Captions 7pt ^ CJOJQJNON Captions 8pt ^CJOJQJkHNO"N Captions 9pt ^CJOJQJkHJO2J Captions 10pt ^ OJQJkH< @B< Footer   CJOJQJLORL Form Title 10pt$a$ OJQJkHPObP Form Title 11pt$a$CJOJQJkHPOrP Form Title 12pt$a$CJOJQJkH\O\ Form Title 12pt Bld$a$5CJOJQJkHHOH " User Input ^5OJQJkHVOV #Letter Text 10pt$^a$ OJQJkH@O@ Letter Text 11ptCJZOZ Letter Text 12pt$^a$CJOJQJkH4@4 Header  !.)@. Page NumberVOV (VCaptions 9pt Bold dL CJOJQJXOX (VForm Title 10pt Bld d8( 5OJQJPOP (VUser Input 10pt!d8(OJQJRO!R 7User Input Char5OJQJ_HmH sH tH ZO1Z 7Letter Text 10pt CharOJQJ_HmH sH tH HBH /V! Balloon Text$CJOJQJ^JaJ+ t -.GHnopq01;BCWkl#78EYZ     !"%klmnRSTUVt0;@ABVjk  !"#$%&01qvwxyz" ' ( ) * + , - G   ! " # $ % & ( ) , 08 00 0 0 0 0 0 0 0 0 0 0 0 0 0 0 00 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 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 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 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 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 @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 @0 @0 @0 @0 0@000@000@000@000@0@000 BCkl   !klUV0@ABVjk  !, 0000 00300 00 00 00 00 00700 0070000070 00700007@0 0 0 00 00 00 0070070000|c 0000 00700700@0 00 0000D 00D 00700@0 00 0000 00 00700@0 00, 0000 00700700@0 0 NNNQ(.COUWci#/5EQW nzBNTVbh  + FFFFFFFFFFFFFFFFFFFFFFFFFFBIKQ!8@0(  B S  ?Text4Text1Text6, , ) ,  ) , .Hq/1Cl#68EX"%V0B&1qz" G ) , .FHQ/1#6EXij0@Bjkk !!&&A A B E  ' ,  @,+ k6M/V![(Vr)(, -I 19JhQ"X[pAe]mfEhTo7kA1,zv^Lyd%lb4L(V}@]0!e\`_(\Zu--.GHnopq01;BCWkl#78EYZ     !"%klmnRSTUVt0;@ABVjk  !"#$%&01qvwxyz" ' ( ) * + , - G   ! " # $ % & , V.v .t  Spell Check Spell Check!LfQ+!LfQ+!LfQ+!LfQ+!LfQ+0(  Spell CheckForms Spell Check2Module1.FormsSpellCheck2gTemplateProject.MyInfo.MainTEMPLATEPROJECT.MYINFO.MAIN@ ,Ld+  @TUnknownG: Times New Roman5Symbol3& : Arial?5 z Courier New5& zaTahoma"hJѦ\Gf  r c#4d a2QHX?(V*6DHS-0343, Another Planned Permanent Living ArrangementComp$Department Of Information TechnologylOh+'0 DP p |  8DHS-0343, Another Planned Permanent Living ArrangementComp 0343.DOT(Department Of Information Technology29Microsoft Office Word@o@ѡZ@t~xr@?& ՜.+,0D hp  #(Michigan Department of Human Services ' 7DHS-0343, Another Planned Permanent Living Arrangement Title  !"#$%&'()*+,-./0123456789:<=>?@ABCDEFGHIJKLMNPQRSTUVWXYZ[\]^_`abcdefghijklmnpqrstuvxyz{|}~Root Entry F@}l&Data ;nG1TableO~WordDocument*SummaryInformation(oDocumentSummaryInformation8wMacros pjY&`[&VBA pjY&`[&dirMyInfo 2ThisDocument _VBA_PROJECT   !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSUVWXYZ]ݲ0* pHdTemplateProjectQH@  = | AB? J< 9stdole>stdoleP h%^*\G{00020430-C 0046}#2.0#0#C:\WINDOWS\System32\e2.tlb#OLE Automation0MSForms>SFFrms3ED452EE1-E08F-101A-8-02608C4D0BB 4EsEFM20.DLL#Microsoft :" ^ Ob Library/;D1uA00}#0#0j 5926339E-587D-441B-9117 -6D845226AH.TEMP \VBE\E.EXD -.E .``M A|Offic|OfQ@ic| *2DF8D04C-5BFAAY@B-BDE5;AjA{42*gram Files\CommonYShared\ 105O bp 8.0Lb@%5BThisDocumentGU TiDcDuen 2 HB1B%B,!5"B +BBMyInfoGMyIf@#H2N M' u! b55#xME G'5uxMEx @`Enter Personal Information Normal.MyInfo.Main@ >VP1&P ]\P"ngP$y.P&P(P*P,P.P0P2P4P6P8P:P<P>P@PB`P  " (08@HPX`hpx &((0*X&(&&((&P$x&$$&$@&h&(N$0$X&&*$"(0PT$$(H hx <468H6864(6`846 4@ 2x 2 4 2 4X : : 2 H ` & 4 6 8 6P 8 6 4 60 8h 4 6 42H2424(:`: "0284p2420P2402 0X..0.0H6x6 ":>PB>F2`:>66P.2::02p62BF` 4 2 & (@ *h .  2 4 X ` p ]x]]]]]]] ]8]P]h]]]]]]]](]@DEFINE DIALOG BOXF,MyInfo DB@Fm ^YourName DB@Hm8^ YourTitle DB@HmP^ YourOffice DB@Hmi^ YourAddress DB@H2xYourCity DB@HT( YourState DB@HFYourZip DB@Hn(AreaCode DB@HP YourPhone DB@H<YourExt DB@Hr(FAXAC DB@HPYourFax DB@H(YourCO DB@H(YourDI DB@H(YourSEC DB@HT(YourUN DB@H(YourWKR DB@Hm^BossName DB@Hm^ BossTitle DB@Hk  /Enter the following information about yourself. DB@d#2 Name: DB@d;2 Title: DB@dR< Office: DB@dkU Address: DB@d City-ST-Zip: DB@d7 Phone: DB@d>% FAX: DB@dCO-DI-SEC-UN-WKR: DB@dK 6Enter the following information about your supervisor. DB@d2 Name: DB@d 2 Title: DB@d X DB@J"X DB@L DB@N]XF D!R!T.P6GET USER INFO FROM INI FILE AND PUT IT INTO DIALOG BOXUserInfoName MYINFO.ini D%X P(VUserInfoTitle MYINFO.ini D%X P(ZUserInfoAreaCode MYINFO.ini D%X P("UserInfoPhone MYINFO.ini D%X P(\UserInfoYourExt MYINFO.ini D%X P(&UserInfoFaxAC MYINFO.ini D%X P((UserInfoFax MYINFO.ini D%X P(*UserInfoOffice MYINFO.ini D%X P(^UserInfoAddress MYINFO.ini D%X P(`UserInfoCity MYINFO.ini D%X P(bUserInfoState MYINFO.ini D%X P(dUserInfoZip MYINFO.ini D%X P(fUserInfoCO MYINFO.ini D%X P(hUserInfoDI MYINFO.ini D%X P(jUserInfoSEC MYINFO.ini D%X P(lUserInfoUN MYINFO.ini D%X P(nUserInfoWKR MYINFO.ini D%X P(pUserInfo Boss Name MYINFO.ini D%X P(@UserInfo Boss Title MYINFO.ini D%X P(B,DISPLAY DIALOG BOX AND RESPOND TO USER INPUT P D!r%T'  OK BUTTONWRITE NEW USER INFO IN INI FILEUserInfoName P!V MYINFO.ini DB@tUserInfoTitle P!Z MYINFO.ini DB@tUserInfoAreaCode P!" MYINFO.ini DB@tUserInfoPhone P!\ MYINFO.ini DB@tUserInfoYourExt P!& MYINFO.ini DB@tUserInfoFaxAC P!( MYINFO.ini DB@tUserInfoFax P!* MYINFO.ini DB@tUserInfoOffice P!^ MYINFO.ini DB@tUserInfoAddress P!` MYINFO.ini DB@tUserInfoCity P!b MYINFO.ini DB@tUserInfoState P!d MYINFO.ini DB@tUserInfoZip P!f MYINFO.ini DB@tUserInfoCO P!h MYINFO.ini DB@tUserInfoDI P!j MYINFO.ini DB@tUserInfoSEC P!l MYINFO.ini DB@tUserInfoUN P!n MYINFO.ini DB@tUserInfoWKR P!p MYINFO.ini DB@tUserInfo Boss Name P!@ MYINFO.ini DB@tUserInfo Boss Title P!B MYINFO.ini DB@tGet user info from INI fileUserInfoName MYINFO.ini D%X' UserInfoTitle MYINFO.ini D%X' UserInfoAreaCode MYINFO.ini D%X' "UserInfoPhone MYINFO.ini D%X' $UserInfoYourExt MYINFO.ini D%X' &UserInfoFaxAC MYINFO.ini D%X' (UserInfoFax MYINFO.ini D%X' *UserInfoOffice MYINFO.ini D%X' ,UserInfoAddress MYINFO.ini D%X' .UserInfoCity MYINFO.ini D%X' 0UserInfoState MYINFO.ini D%X' 2UserInfoZip MYINFO.ini D%X' 4UserInfoCO MYINFO.ini D%X' 6UserInfoDI MYINFO.ini D%X' 8UserInfoSEC MYINFO.ini D%X' :UserInfoUN MYINFO.ini D%X' <UserInfoWKR MYINFO.ini D%X' >UserInfo Boss Name MYINFO.ini D%X' @UserInfo Boss Title MYINFO.ini D%X' B Update Form with user info WorkerName D%vG workerName  DB@xj WorkerTitle D%vG WorkerTitle  DB@xjWorkerAreaCode D%vGWorkerAreaCode " DB@xj WorkerPhone D%vG WorkerPhone $ DB@xjWorkerExtension D%vGWorkerExtension & DB@xjFaxAC D%vGFaxAC ( DB@xj WorkerFax D%vG WorkerFax * DB@xj Countynumber D%vG Countynumber 6 DB@xjDistrict D%vGDIstrict 8 DB@xjSection D%vGSECtion : DB@xjUnit D%vGUNit < DB@xjWorker D%vGWorker > DB@xj CountyName D%vG CountyName , DB@xj CoAddress D%vG CoAddress . DB@xjCoCity D%vGCoCity 0 DB@xjCoState D%vGCoState 2 DB@xjCoZip D%vGCoZip 4 DB@xjSupervisorName D%vGSupervisorName @ DB@xjSupervisorTitle D%vGSupervisorTitle B DB@xj. Update other Form Fields on Form & Exit Macro- Selected$=GetFormResult$ ("CurrentDate")! TheSerialDate = Today() + 14$ TheDate$ = Date$(TheSerialDate)& SetFormResult "DueDate", TheDate$) EditGoTo "CreateDate" : UnlinkFields EditGoTo "GranteefirstName"- ToolsProtectDocument .NoReset = 1, .Type = 2/ ToolsProtectSection .Section = 2, .Protect = 0d FileClose 2 SelectName = - 1kpoh`(Attribute VB_Name = "MyInfo" Public Sub Main(X) D.nDescription|Enter Personal rma:zProcDataIInvoke _FuncINoi8l..nADim iRet B  User$ATitleAreaCod-PhonYourExtFax|AC Offic $AddressCitByStat Zip ODILSEB;UN WKRBoss|| 'DEFINE DIALOG BOX WordBasic.BeginDialog 582, 300,} G TextBox 109@ A 5@ 18@ I @ey 56 * 83 _[ 105WDi 2A3321A5r 34 _  | 9 7 @ 1$55E [1 Pi 23` 6i`cV3jFAXAC41e lV1@,CO629 *DI7m pV? UN6z4!l1.yVm23n`~64`'Fz7,, c3z#the followin`g infa@bout ys0elf. ", ׂ !:w5f"bC #1z0@8O$351{1A-ST- u5 abm3r13@? gY  ;"C O-DI-T-U,N-@H47224*; supervisor!a 124f6p6iOKButtY48 8pR21 fCanctel3kEndn ҂dlg!u! As Object: Se$t = CurValues. vGET USER INFO FROMI FILE AND@ PUT I NTOzx.t[GetPrivfileS@@ng$](" "'P:qMY.ini"r hl ? pa"4??>? Mpn_1r &.nAC `axU/-Y??>OMA\C$$a&gp Op | DIpp/-UN0 | {p y QaserInfo", "Boss Name`MYINFO.ini") dlgU.Title = WordBasic.[GetPrivateProfileString$]("t| 'DISPLAY DIALOG BOX AND RESPOTO USER INPUT iRet Dialog.p (If 3-1 Then 'OK BUTTON ?WRI@TE NEW3FO6I FILE xSx wYour ?, - -AreaCod|PhonEExtE@FaxACL+@OfficZ|Address0$ L+gCity ? : |StP  z Zo%  CoCity  ! CoStat$c b CoZip  "Supervi8sor<`, Boss! /Titl% b ' Upd. other  FieldsH on& t Macro Rem" SelA}ed$=G$ ("Curre8ntD9'`Serial = Today() + 14$5()lDure",a"GEditGoTo 0"Cre : Unlink'Grante@efirst3"ToolsProtDocum! .No@et`1, .Type@2/ .8= 2 `0 Else#FileClose D c.@- 1$nd #Sub (SLSS<N0{00020906-0000-0000-C000-000000000046}8(%HxAttribute VB_Name = "ThisDocument" Bas0{00020P906-0C$0046} |GlobalSpacFalse dCreatablPredeclaIdTru BExposeTemplateDerivBustomizD2as  *\G{000204EF-0000-0000-C000-000000000046}#4.0#9#C:\Program Files\Common Files\Microsoft Shared\VBA\VBA6\VBE6.DLL#Visual Basic For Applications*\G{00020905-0000-0000-C000-000000000046}#8.2#0#C:\Program Files\Microsoft Office\Office10\MSWORD.OLB#Microsoft Word 10.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{5926339E-587D-441B-9117-6D844445226A}#2.0#0#C:\TEMP\VBE\MSForms.EXD#Microsoft Forms 2.0 Object Library.E .`M &*\G{2DF8D04C-5BFA-101B-BDE5-00AA0044DE52}#2.2#0#C:\Program Files\Common Files\Microsoft Shared\Office10\MSO.DLL#Microsoft Office 8.0 Object Library  AB?5ThisDocument0y4aec2166ThisDocument5% MyInfo0z4aec2166 MyInfouM'8lD5Bca%zf8MZ"H=>0-WordkVBAWin16~Win32MacVBA6#TemplateProjectEstdole`MSFormsCOfficeu ThisDocument< _EvaluateMyInfo@Main,iRet,pUserName\ UserTitleV9AreaCode UserPhoneYourExthLFaxACjYourFaxrN UserOffice0 UserAddressFUserCity UserStateUserZipDUserCOUserDIUserSEC4UserUN0UserWKR,BossNamef BossTitleH WordBasic BeginDialogFTextBoxQOKButton| CancelButton EndDialogmP dlgUserInfo2" CurValuesȤ UserDialogYourName;RGetPrivateProfileString$x YourTitleA# YourPhone YourOffice YourAddressYourCity YourStateYourZipYourCOYourDIYourSECvYourUNVYourWKRnDialogfSetPrivateProfileString=ExistingBookmark SetFormResultDocumentj`   $ID="{9DF8C223-3E90-4E0B-94E5-A1835A6A5017}" Document=ThisDocument/&H00000000 Module=MyInfo Name="TemplateProject" HelpContextID="0" VersionCompatible32="393222000" CMG="2321E8D424D824D824D824D8" DPB="5B59901CC91DC91DC9" GC="93915864916591656E" [PROJECT TPROJECTwm[>CompObj\qHost Extender Info] &H00000001={3832D640-CF90-11CF-8E43-00A0C911005A};VBE;&H00000000 [Workspace] ThisDocument=0, 0, 0, 0, C MyInfo=0, 0, 0, 0, C ThisDocumentThisDocumentMyInfoMyInfo  FMicrosoft Office Word Document MSWordDocWord.Document.89q'` |Bbjbj{P{P *::?$?$cccccd&dmPnPndn,dz,odPsPsPsPsPs.~wyyyyyyyy${h~z-cyPsPsyyzccPsPsAzyyyycPscPsyyyyyyccityPso Pg&&dyyy Wz0zy~y~y~cyyyyyyyyyzzyyyyzyyyyddd$&dddd&ddddcccccc  FORMTEXT        FORMTEXT        FORMTEXT        FORMTEXT        FORMTEXT        FORMTEXT     FORMTEXT        FORMTEXT        FORMTEXT      FORMTEXT        FORMTEXT        FORMTEXT        FORMTEXT     FORMTEXT        FORMTEXT        FORMTEXT     FORMTEXT        FORMTEXT        FORMTEXT     FORMTEXT        FORMTEXT      FORMTEXT        FORMTEXT        FORMTEXT        FORMTEXT        FORMTEXT        FORMTEV\|||&|(|*|>|@|B|L|N|P|R|f|h|v|x|z||||||||||||||||}}}}}(}*}8}:}<}P}R}T}Z}\}^}`}t}j-hYqUj,hYqUj,hYqUj\+hYqUj*hYqUj-*hYqUjg)hYqUjhYqUmHnHuj(hYqUj'hYqUhYqjhYqU3||}:}^}}}}} ~H~j~~~~(Px@hWVUTSRQPOkNMLKJIHGFEDCBAt}v}}}}}}}}}}}}}}}}}}}~~~ ~"~6~8~F~H~J~^~`~b~f~h~j~l~~~~~~~~~觢{pjJ3hYqUj2hYqUjhYq5UmHnHuj1hYq5U hYq5jhYq5Uj^1hYqUj0hYqUj0hYqUj`/hYqUj.hYqUhYqjhYqUj>.hYqU,~~~~~~~~~~~~~~~$&(*>@NPRfhvxzj8hYqUj8hYqUj:7hYqUjq6hYqUj5hYqUj*5hYqUjUmHnHuj4U jUj4hYqUhYqjhYqUjhYqUmHnHu2XT        FORMTEXT        FORMTEXT        FORMTEXT     FORMTEXT        FORMTEXT        FORMTEXT        FORMTEXT        FORMTEXT     FORMTEXT      FORMTEXT        FORMTEXT        FORMTEXT        FORMTEXT     FORMTEXT     FORMTEXT      FORMTEXT        FORMTEXT        FORMTEXT        FORMTEXT        FORMTEXT        FORMTEXT        .0>@BVXfhj~Ȉʈ؈ڈ܈(*,@BDHJLjs>hYqUj=hYqUjl=hYqUj<hYqUj*<hYqUj;hYqUj:hYqUjD:hYqUjhYqUmHnHujhYqUj9hYqUUhYq2hڈ*Lp ,PxȊ@Bjihgfedcba`_^]\[ZYXLNbdflnpr‰։؉ "$(*,.BDFLNPRfhvxzjxDhYqUjChYqUj,ChYqUjlBhYqUjAhYqUjGAhYqUj@hYqUj?hYqUjhYqUmHnHuj!?hYqUhYqjhYqU3ƊȊʊފ.02<>BjFhYqUjHFhYqUjhYqUmHnHujlEhYqUjDhYqUhYqjhYqU(/ =!"#$% Address1 UppercasedEnter the Addressee's mail address (street address, PO Box, etc., where the mail will be delivered). ClientCityDBureau#Enter your Bureau/Office/Unit name.DCareOf UppercaseUEnter the Addressee's Supplemental Address (Example: Suite or Apartment Number, C/O)Address1D CaseNumber Uppercase/Enter the Case Number (Example: V1234567A,B,C)D ClientCity UppercaseEnter the Addressee's City. ClientStateD ClientState Uppercase1Enter the Addressee's 2 digit State Abbreviation. ClientZipD ClientZip UppercaseKEnter the Addressee's Zip Code (+4 if known) (Example: 48909 or 48909-7537)D CoAddress UppercaseaEnter the County's mail address (street address, PO Box, etc., where the mail will be delivered).D CoAreaCodeEnter the County's Area CodeDCoCity UppercaseEnter the County's City.D CoExtensiond8(OJQJ_HmH sH tH XOX CaseNumber1?d8(OJQJ_HmH sH tH XOX ClientCity1@d8(OJQJ_HmH sH tH ZOZ ClientState1Ad8(OJQJ_HmH sH tH ZO"Z ClientZip1BdtCJOJQJ_HmH sH tH VO2V CoAddress1Cd8(OJQJ_HmH sH tH XOBX CoAreaCode1 Dd`CJOJQJ_HmH sH tH PORP CoCity1Ed8(OJQJ_HmH sH tH ZObZ CoExtension1Fd8(OJQJ_HmH sH tH ^Or^ CoPhoneNumber1Gd8(OJQJ_HmH sH tH ROR CoState1Hd8(OJQJ_HmH sH tH ^O^ CoSuppaddress1Id8(OJQJ_HmH sH tH XOX CountyName1Jd8(OJQJ_HmH sH tH \O\ CountyNumber1 Kd`CJOJQJ_HmH sH tH ROR CoZip1LdtCJOJQJ_HmH sH tH NON Date11 Md`CJOJQJ_HmH sH tH TOT District2 Nd`CJOJQJ_HmH sH tH LOL FaxAC Od`CJOJQJ_HmH sH tH VOV FirstName1Pd8(OJQJ_HmH sH tH XOX FirstName21Qd8(OJQJ_HmH sH tH `O"` GranteeAddress1 Rd`CJOJQJ_HmH sH tH \O2\ GranteeCareof Sd`CJOJQJ_HmH sH tH XOBX GranteeCity Td`CJOJQJ_HmH sH tH `OR` GranteeClientID Ud`CJOJQJ_HmH sH tH dObd GranteeFirstName2 Vd`CJOJQJ_HmH sH tH bOrb GranteeLastName1Wd8(OJQJ_HmH sH tH ZOZ GranteeState Xd`CJOJQJ_HmH sH tH VOV GranteeZip Yd`CJOJQJ_HmH sH tH TOT LastName1Zd8(OJQJ_HmH sH tH VOV LastName21[d8(OJQJ_HmH sH tH ROR OtherID1\d8(OJQJ_HmH sH tH ROR Section2 ]d`CJOJQJ_HmH sH tH ^O^ SuperAreaCode1 ^d`CJOJQJ_HmH sH tH `O` SuperExtension1_d8(OJQJ_HmH sH tH dOd SuperPhoneNumber1`d8(OJQJ_HmH sH tH `O` SupervisorName1ad8(OJQJ_HmH sH tH LO"L Unit2 bd`CJOJQJ_HmH sH tH PO2P Worker2 cd`CJOJQJ_HmH sH tH `OB` WorkerAreaCode1 dd`CJOJQJ_HmH sH tH bORb WorkerExtension1ed8(OJQJ_HmH sH tH TObT WorkerFax fd`CJOJQJ_HmH sH tH XOrX WorkerName1gd8(OJQJ_HmH sH tH \O\ WorkerName2hd8(5OJQJ_HmH sH tH ZOZ WorkerPhone1id8(OJQJ_HmH sH tH ^O^ WorkerTitle1jd8(5OJQJ_HmH sH tH LOL Emailkd8(OJQJ_HmH sH tH  04 0Address1BureauCareOf CaseNumber ClientCity ClientState ClientZip CoAddress CoAreaCodeCoCity CoExtension CoPhoneNumber CoState CoSuppaddress CountyName CountyNumberCoZipDate1DistrictEmail/FaxAC FirstName FirstName2GranteeAddress1 GranteeCareof GranteeCityGranteeClientIDGranteeFirstNameGranteeLastName GranteeState GranteeZipLastName LastName2OtherID Section! SuperAreaCode"SuperExtension#SuperPhoneNumber$SupervisorName%Unit&Worker'WorkerAreaCode(WorkerExtension) WorkerFax* WorkerName+ WorkerName2, WorkerPhone- WorkerTitle.0Address1BureauCareOf CaseNumber ClientCity ClientState ClientZip CoAddress CoAreaCodeCoCity CoExtension CoPhoneNumberCoState CoSuppaddress CountyName CountyNumberCoZipDate1DistrictFaxAC FirstName FirstName2GranteeAddress1 GranteeCareof GranteeCityGranteeClientIDGranteeFirstName1GranteeLastName GranteeState GranteeZipLastName LastName2OtherIDSection SuperAreaCodeSuperExtensionSuperPhoneNumberSupervisorNameUnitWorkerWorkerAreaCodeWorkerExtension WorkerFax WorkerName WorkerName2 WorkerPhone WorkerTitleUser Input 10pt(<Pdu$5I]n  4EYm(<Pdx .NDUV\t}~LB '2@BCFHIN v l H@\J@TJTTFUhUUTVWBX[|hB  !"#$%&()/013456789AGB  &(4:<HNP\bdpsu"$035AGIU[]ilnz   ,24@CEQWYekmy"&(4:<HNP\bdpvxFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0Address1BureauCareOf CaseNumber ClientCity ClientState ClientZip CoAddress CoAreaCodeCoCity CoExtension CoPhoneNumberCoState CoSuppaddress CountyName CountyNumberCoZipdate1DistrictEmailFaxAC FirstName FirstName2GranteeAddress1 GranteeCareOf GranteeCityGranteeClientIDGranteeFirstNameGranteeLastName GranteeState GranteeZipLastName LastName2OtherIDSection SuperAreaCodeSuperExtensionSuperPhoneNumberSupervisorNameUnitWorkerWorkerAreaCodeWorkerExtension WorkerFax WorkerName WorkerName2 WorkerPhone WorkerTitle)=Qev%6J^o !5FZn)=Qey  !"#$%&'()*+,-./';Oct#4H\m 3DXl';OcwYq@ ,L(|~UnknownG: Times New Roman5Symbol3& : Arial?5 z Courier New5& zaTahoma"h0@P?Yq2