ࡱ>  t @ Ubjbj5*5* W@W@(79998|=g <9 F<\<\<\<7=>|}>@LtJpppppp$sRś>7=7=>>\<\<!]B]B]B>p\<\<L]B>L]B]BB[C\< {d9-?XBCD 70gBY?YCYC>>]B>>>>>$&@4)B4@4 FOSTER CARE PLACEMENT DECISION NOTICEMichigan Department of Human ServicesThis foster care placement decision notice is being sent to you to notify you of the placement decision made for the child. MCL 722.954a requires to make a placement decision for the child and document the reason(s) for the decision. The statue states that any person who receives this notice may, within 5 business days, request in writing, more specific reasons for the placement decision. If you do not agree with the placement decision, you may request that the childs attorney review the decision to determine whether the decision is in the childs best interest. If the childs attorney disagrees with the placement decision, s/he shall petition the court for a review hearing within 14 days. At the hearing, the court will determine where the child will be placed. The child will remain in their current placement during this procedure and until the court has made a decision.Case Name: FORMTEXT      DOB: FORMTEXT      Case Number #: FORMTEXT      Date of Initial Removal: FORMTEXT      SWSS Log # FORMTEXT      Court File #: FORMTEXT      Child s Current Placement:  FORMDROPDOWN If other, specify: FORMTEXT      Name: FORMTEXT      Address: FORMTEXT      City: FORMTEXT      State: FORMTEXT      Zip Code: FORMTEXT      Placement Decision:  FORMDROPDOWN If other, specify: FORMTEXT      Child will remain in current placement: FORMCHECKBOX Child will be moved to a new placement: FORMCHECKBOX (Check one)Name: FORMTEXT      Address: FORMTEXT      City: FORMTEXT      State: FORMTEXT      Zip Code: FORMTEXT      Rationale for placement decision: (Check all that apply)Best interest of the child FORMCHECKBOX Attempts to identify relatives were unsuccessful FORMCHECKBOX Available relatives do not meet current DHS standards for placement FORMCHECKBOX Identified relatives unable to take placement of child FORMCHECKBOX In determining the most appropriate placement for this child, the following factors were considered as they relate to a goal of permanence for the child.Long range plan for the child. The permanency-planning goal is: FORMTEXT      .Permanent family for the child at earliest possible date. Minimum number of placements for the child. Child s previous placement history. Potential for permanence within the child s kinship network. Case Name: FORMTEXT      Placement decision is based on the following placement selection criteria for this child: (Check all that apply): FORMCHECKBOX Best interest of child and placement meets the needs of the child, including: FORMCHECKBOX Physical and emotional needs of the child. FORMCHECKBOX Special needs of the child. FORMCHECKBOX Specialized services required to meet the needs of the child. FORMCHECKBOX Accessibility of required services to the child. FORMCHECKBOX Placement with relatives: priority is to be given to placement with extended family able to meet the needs of the child. Criminal history, CPS central registry check and written home study are required for all relative placements. FORMCHECKBOX Proximity to the childs family: Placement is in the county of residence or in a contiguous county or the placement is with a relative where there is family agreement for the placement. FORMCHECKBOX Placement with sibling(s): efforts to place sibling groups in the same out-of-home placement must be given priority except when not in the child(ren)s best interest. FORMCHECKBOX Childs and childs familys religious preferences: placement affords the child an opportunity for expression of religious beliefs and practices as identified by childs family. FORMCHECKBOX Least restrictive setting: placement is the most family-like setting to meet the needs of the child. FORMCHECKBOX Continuity of relationships:(NOPQ ; E l    . 0 2 < > ^ ` t v x Ö|u h)hRj>h 7Uj~h 7UhJjhJUjhf)UmHnHujhJE(UhJE(jhJE(Uh)h)5h)hDR5 h)hDRh2}h-0hMhDRh)h45 h)h4 h)h),'(NOPwq$If9kd\$$If9++ 4 9a '$Ifgdxt]9kd$$If9++ 4 9a *$IfgdiptPQ y?9kdx$$If9++ 4 9a$If9kd$$If9P++ 4 9a 0$$Ifa$gdip9kd$$If9++ 4 9a   @ ^ \VV$Ifkd$$If9ֈd4M$+TP 4 9a-$If0$If ( D l z -$Ifgd) 0$Ifgd4-$If0$If`kd$$If94Fd+$      4 9af4$If     $ & D F Z \ ^ h j r  24HJLV䗐|qj h 7Uh)hDRCJj h 7U hRhDR h)hDRj hf)Uh)hDR5jh 7Ujh 7Ujhf)UmHnHujh 7UhJjhJU h)h4h)hRCJOJQJ,l n p r e_$:kd $$If94++ 4 9af4$Ifkdz$$If94ֈ~ dPM$+  8P 4 9af4r  "pg $Ifgdn skd $$If94\ + 2  4 9af4 0$$Ifa$gd-0 -$Ifgd-00$If"$&2Z\^<ukd $$If94h\ #+`9` 4 9af4-$If0$If$If:kd $$If94++ 4 9af4VXrt $&:<>HJTfx𪥪𓋇|Ӌj$h 7Uh5 jh5 U hRhDRjhf)U hDR5h)hDR5jNh 7Ujh 7Ujh 7Ujhf)UmHnHujjh 7UhJ h)hDRjhJU.^`rwukd$$If94h\ #+ 9  4 9af4-$If0$If$If $LN}w}w-$If0$If$Ifukd$$$If94h\ #+ 9  4 9af4NPRTc]#9kd$$If9w++ 4 9a$Ifkd$$If94hֈ #+ 98  4 9af4Tmd $Ifgd-0skd$$If94\ + @  4 9af4 0$$Ifa$gd-0 -$Ifgd-0 0$Ifgd-0HJfhj,.0:<VXlnpz|  ",.øǪßǪÔǪÉǪ~Ǫjbh 7Ujh 7Ujh 7Ujh 7Ujhf)UmHnHuj>h 7UhJjhJUjhf)Ujhf)Ujh)hDRU h)hDRh)hDRCJ/HlnprQ`kd$$If94FH+o^    4 9af4$If-$If0$If:kd<$$If94++ 4 9af4rt6skdL$$If94\H+o^4 9af4$If<$If-$If0$If:kd$$If94++ 4 9af4 >@-$If0$If:kd$$If94++ 4 9af4$If@BDV~}w-$If0$If$Ifukd$$If94h\ !+`9`  4 9af4}w-$If0$If$Ifukd"$$If94h\ !+ 9  4 9af402}w}w-$If0$If$IfukdB$$If94h\ !+ 9  4 9af42468c]#9kd$$If9+++ 4 9a$Ifkd$$If94hֈ u#+ 98( 4 9af48jd-$If:kd$$If94++ 4 9af4Mkd$$If940B'+{'d4 9af4$If0$If   tvx#$%)`aopqtUV`a  ߶{tij&h 7U h=h=h)h=5 h)hXPjhf)UmHnHuj#%h 7UhJjhJU h)hDRj"hf)UjhkUjO!hf)Uj hf)Uhkjhf)Ujh)hkU h)hk)vvpjdp-$If0$If$IfkdI$$If94\=l+`vh`1 4 9af4p(&'vpjdp-$If0$If$Ifkd $$If94\=l+ 1h 1 4 9af4p('()`rsvpjdp-$If0$If$Ifkd!$$If94\=l+ 1h 1 4 9af4p(stuvwvp5p:kd#$$If94++ 4 9af4$Ifkd"$$If94\=l+ vh 1 4 9af4p(wxz?:kd$$$If94++ 4 9af4 d$If7kdy$$$If9++ 4 9a 0d$If:kd!$$$If94++4 9af4U(ppppg d$If0 & Fd$Ifgd)]kd%$$If9F&*+w     4 9a 0d$If -d$If 0 & Fd$If  -$Ifgd=0$d$Ifa$gd= 0d$IfMkdo&$$If940+ 4 9af4fghklz{|}  <=KLM`ϹϮϣϘύςj-hf)Uj:,hf)UjC+hf)UjL*hf)Uj])hf)Uj(hf)Ujh)h4U h)h4 hR5h)h45 h)h=jhJUjhf)UmHnHu/Phij^U d$If7kd'$$If9++ 4 9a 0d$If_kdG'$$If9 F+     4 9ajk} g^ d$IfJkd($$If90=+v`* 4 9a 0d$If -d$If:kd)($$If94++ 4 9af4   : 0d$If -d$If d$If`kd)$$If94F=+`vv(     4 9af4:;<N 0d$If -d$If d$If`kd*$$If94F=+ (v(     4 9af4 0d$If -d$If d$If`kd+$$If94F=+ (v(     4 9af4ZQH 0d$If -d$If:kd1-$$If94++ 4 9af4 d$If`kd,$$If94F=+ (v(     4 9af4pg^ 0d$If -d$If:kde.$$If94++ 4 9af4 d$IfJkd-$$If90=+v`* 4 9aXY\]klmn #$2345;Oxhxixlxmx{x|x}x~xxyyybyڧhn hXP5j4hf)UUj3hf)U hk5jY2hf)Uj%1hf)Uj/hf)Uh)h45 h)h4jh)h4Uj.hf)U7Ypg^ 0d$If -d$If:kd/$$If94++ 4 9af4 d$IfJkd1/$$If90=+v`* 4 9aYZ[\n pg^ 0d$If -d$If:kd0$$If94++ 4 9af4 d$IfJkde0$$If90=+v`* 4 9a !"#5pg^ 0d$If -d$If:kd2$$If94++ 4 9af4 d$IfJkd1$$If90=+v`* 4 9aixpg^ 0d$If -d$If:kd53$$If94++ 4 9af4 d$IfJkd2$$If90=+v`* 4 9a placement preserves and maintains relationships with the psychological parents, friends, teachers, etc. FORMCHECKBOX Availability of placement resources for purposes of timely placement: placement is available to meet the childs needs and is in the childs best interest.Copies of this decision must be mailed to all that are applicable:Childs attorney FORMCHECKBOX Guardian FORMCHECKBOX Guardian Ad Litem FORMCHECKBOX Mother FORMCHECKBOX Father FORMCHECKBOX Attorney for mother FORMCHECKBOX Attorney for father FORMCHECKBOX Prosecutor FORMCHECKBOX All relatives who have expressed an interest FORMCHECKBOX The child, if old enough to express an opinion FORMCHECKBOX Foster Care Worker Signature:Date: FORMTEXT      Foster Care Supervisor Signature:Date: FORMTEXT      DHS Monitor Signature:Date: FORMTEXT      Department of Human Services (DHS) will not discriminate against any individual or group because of race, religiixjxkxlx~xypg^ 0d$If -d$If:kdi4$$If94++ 4 9af4 d$IfJkd4$$If90=+v`* 4 9ayyyy`yaypg^ $Ifgd) 0$Ifgd):kd5$$If94++ 4 9af4 d$IfJkd55$$If90=+v`* 4 9aaybycydyuyyyyyyymd[d[d[d -$Ifgd) 0$Ifgd):kdc6$$If94++ 4 9af4 $Ifgd)Mkd5$$If940B'+{'d4 9af4 byuyvyyyyyyyyyyyyyyyyyyyyyyyyyyzzzzz4z5zCzDzEzQzRz`zazbzgzzzz{jh)hn U h)hn j?hf)Uj>hf)Uj=hf)Uj9hf)Uj'9hf)Uh)hXPCJj]8hf)Uj7hf)Uj6hf)Ujh)hXPU h)hXP.yyyyyyz z4zFzQzczdzFf< 0$Ifgd) -$Ifgd) dzezfzRI $Ifgd)kd[@$$If94֞l"+$  4 9af4fzgzhzzzzz -$Ifgdn 0$Ifgdn -$Ifgd) 0$Ifgd) $Ifgd):kdSA$$If94++ 4 9af4zzzzzzzzzz{{{{| | || |t|v|||||||||||}}}}}}} }⾷|qj h)h4jIh 7UhkjFh 7U h)hkjhf)UmHnHujDh 7UhJjhJU h)hXPh)hn CJOJQJj!Bhf)Uhn jhn U h)hn jh)hn UjAhf)U&zzz^U $Ifgd)kdB$$If94r=(+v, 4 9af4p2zz { { {{|| $Ifgd) -$Ifgd) 0$Ifgd)9kdC$$If9++ 4 9a||||||||e\SJ\SJ $Ifgd) -$Ifgd) 0$Ifgd)kdD$$If94ֈN "|)+ :h*b! 4 9af4| |d|f|h|t|||e\SJ\SJ $Ifgd) -$Ifgd) 0$Ifgd)kdE$$If94ֈN "|)+ :h*b! 4 9af4||||||||e\SJ\SJ $Ifgd) -$Ifgd) 0$Ifgd)kdnG$$If94ֈN "|)+ :h*b! 4 9af4||||||}}e\SJ\SJ $Ifgdk -$Ifgdk 0$IfgdkkdPH$$If94ֈN "|)+ :h*b! 4 9af4}}}}e\"9kdJ$$If9++ 4 9a $Ifgd)kdI$$If94ֈN "|)+ :h*b! 4 9af4}} }CDEFy?9kdL$$If9}++ 4 9a9kdK$$If9++ 4 9a $$Ifa$gdn 9kd4K$$If9++ 4 9a$Ifon, 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.cc. Court Case File (Required) DHS-31 (Rev. 4-08) MS Word  PAGE 1 }~BCFepst&(*>@NPRfhvxzſŲϢӚujjOh_UjNh_Uj3Nh_UjZMh_Uh_jh_Uh`AjhJE(0J8U*h`A0J8mHnHu* hJE(0J8jhJE(0J8UhJE( h)h)h` h)h4 h)h0q h0qh0qUhB:hn ^JaJ(FRSTqrstWPG gd0qgd_MkdL$$If940+N N 4 9af4MkdtL$$If940+N`$ 4 9af4$If$If(Px°6^бBdֲFEDCBA@?>=<;:987654gd_$gd_.&P:p_/ =!"#$%Z$$If!vh5+#v+:V 9 ,5+44 9h$$If!vh5+#v+:V 9 ,5+/ 44 9T$$If!vh5+#v+:V 9 5+44 9Z$$If!vh5+#v+:V 9P ,5+44 9b$$If!vh5+#v+:V 9 5+/ 44 9DText1Enter case nameAutoSaveDdate1&Enter Child's DOB (Example: 4/12/1997)DText2Enter foster care case number$$If!vh5555T55P#v#v#v#vT#v#vP:V 9 5555T55P/  / / /  / / /  / / /  / / /  / / /  44 9$$If!vh55$ 5#v#v$ #v:V 94 55$ 5/  44 9f4Ddate27Enter date child removed from home (Example: 4/12/1997)D7Enter date child removed from home (Example: 4/12/1997)DText3Enter court file number$$If!vh5 5 55855P#v #v #v#v8#v#vP:V 94 5 5 55855P/ / / / / / / / / / / / / / / /  44 9f4d$$If!vh5+#v+:V 94 5+/ 44 9f4 Df Dropdown1 DHS Foster HomePrivate AgencyRelativeLegal Guardian ConfidentialOthertDText8$$If!vh5 52 55#v #v2 #v#v:V 94 ,5 52 55/ 44 9f4V$$If!vh5+#v+:V 94 5+44 9f4DEnter provider's name$$If!vh55955#v#v9#v#v:V 94h ++55955/ 44 9f4DEnter provider's address$$If!vh55955#v#v9#v#v:V 94h ++55955/ 44 9f4jD$$If!vh55955#v#v9#v#v:V 94h ++55955/ 44 9f4tDText4tDText5$$If!vh55955855#v#v9#v#v8#v#v:V 94h ++55955855/ / 44 9f4b$$If!vh5+#v+:V 9w 5+/ 44 9Df DHS Foster HomePrivate AgencyRelativeLegal Guardian ConfidentialOtherjD$$If!vh5 5@ 55#v #v@ #v#v:V 94 ,5 5@ 55/ 44 9f4V$$If!vh5+#v+:V 94 5+44 9f4tDeCheck2$$If!vh55o5^#v#vo#v^:V 9455o5^44 9f4V$$If!vh5+#v+:V 94 5+44 9f4hDe$$If!vh55o5^5#v#vo#v^#v:V 9455o5^544 9f4V$$If!vh5+#v+:V 94 5+44 9f4DEnter provider's name$$If!vh55955 #v#v9#v#v :V 94h ++55955 / 44 9f4DEnter provider's address$$If!vh55955 #v#v9#v#v :V 94h ++5 5955/ 44 9f4jD$$If!vh55955 #v#v9#v#v :V 94h ++55955/ 44 9f4jDjD$$If!vh55955855(#v#v9#v#v8#v#v(:V 94h +55955855(/ / 44 9f4b$$If!vh5+#v+:V 9+ 5+/ 44 9l$$If!vh5{'5d#v{'#vd:V 945{'5d44 9f4V$$If!vh5+#v+:V 94 5+44 9f4hDe$$If!vh5v55h51#vv#v#vh#v1:V 94 ++5v55h5144 9f4p(hDe$$If!vh5v55h51#vv#v#vh#v1:V 94 ++5155h5144 9f4p(hDe$$If!vh5v55h51#vv#v#vh#v1:V 94 ++5155h5144 9f4p(tDeCheck5$$If!vh5v55h51#vv#v#vh#v1:V 94 ++5v55h5144 9f4p(V$$If!vh5+#v+:V 94 5+44 9f4V$$If!vh5+#v+:V 945+44 9f4P$$If!vh5+#v+:V 9 5+44 9V$$If!vh5+#v+:V 94 5+44 9f4DText7&Enter child's permanency planning goal$$If!vh555w#v#v#vw:V 9 555w/ 44 9l$$If!vh55#v#v:V 94 5544 9f4jD$$If!vh555#v#v#v:V 9  555/ 44 9P$$If!vh5+#v+:V 9 5+44 9V$$If!vh5+#v+:V 94 5+44 9f4tDeCheck3f$$If!vh5v5`*#vv#v`*:V 9 5v5`*44 9tDeCheck3y$$If!vh5v5v5(#vv#v(:V 94 +5v5(44 9f4tDeCheck3$$If!vh5v5v5(#vv#v(:V 94 +5(5v5(44 9f4tDeCheck3$$If!vh5v5v5(#vv#v(:V 94 +5(5v5(44 9f4tDeCheck3$$If!vh5v5v5(#vv#v(:V 94 +5(5v5(44 9f4V$$If!vh5+#v+:V 94 5+44 9f4tDeCheck3f$$If!vh5v5`*#vv#v`*:V 9 5v5`*44 9V$$If!vh5+#v+:V 94 5+44 9f4tDeCheck3f$$If!vh5v5`*#vv#v`*:V 9 5v5`*44 9V$$If!vh5+#v+:V 94 5+44 9f4tDeCheck3f$$If!vh5v5`*#vv#v`*:V 9 5v5`*44 9V$$If!vh5+#v+:V 94 5+44 9f4tDeCheck3f$$If!vh5v5`*#vv#v`*:V 9 5v5`*44 9V$$If!vh5+#v+:V 94 5+44 9f4tDeCheck3f$$If!vh5v5`*#vv#v`*:V 9 5v5`*44 9V$$If!vh5+#v+:V 94 5+44 9f4tDeCheck3f$$If!vh5v5`*#vv#v`*:V 9 5v5`*44 9V$$If!vh5+#v+:V 94 5+44 9f4tDeCheck3f$$If!vh5v5`*#vv#v`*:V 9 5v5`*44 9V$$If!vh5+#v+:V 94 5+44 9f4l$$If!vh5{'5d#v{'#vd:V 945{'5d44 9f4d$$If!vh5+#v+:V 94 5+/ 44 9f4DeCheck1+Click on the appropriate living arrangementDeCheck1+Click on the appropriate living arrangementDeCheck1+Click on the appropriate living arrangementDeCheck1+Click on the appropriate living arrangementDeCheck1+Click on the appropriate living arrangementV$$If!v h535585*555585 5 5 #v3#v#v8#v*#v#v#v#v8#v #v #v :V 9 535585*555585 5 5 / / /  44 9kd:$$If9 ~ z6$()+38*8 ,,,,4 9aDeCheck1+Click on the appropriate living arrangementDeCheck1+Click on the appropriate living arrangementDeCheck1+Click on the appropriate living arrangement$$If!vh55$ 55555#v#v$ #v#v#v#v#v:V 94 55$ 55555/ / 44 9f4d$$If!vh5+#v+:V 94 5+/  44 9f4hDetDeCheck4 $$If!vh5v555,5#vv#v#v#v,#v:V 94 5v555,5/ /  / 44 9f4p2p$$If!vh5+#v+:V 9 5+/ / 44 9D7Enter date child removed from home (Example: 4/12/1997)$$If!vh5 5:5h5*5b5!#v #v:#vh#v*#vb#v!:V 94 5 5:5h5*5b5!/ / 44 9f4$$If!vh5 5:5h5*5b5!#v #v:#vh#v*#vb#v!:V 94 5 5:5h5*5b5!44 9f4D7Enter date child removed from home (Example: 4/12/1997)$$If!vh5 5:5h5*5b5!#v #v:#vh#v*#vb#v!:V 94 5 5:5h5*5b5!/ / 44 9f4$$If!vh5 5:5h5*5b5!#v #v:#vh#v*#vb#v!:V 94 5 5:5h5*5b5!44 9f4D7Enter date child removed from home (Example: 4/12/1997)$$If!vh5 5:5h5*5b5!#v #v:#vh#v*#vb#v!:V 94 5 5:5h5*5b5!/ / 44 9f4b$$If!vh5+#v+:V 9 5+/ 44 9b$$If!vh5+#v+:V 9 5+/ 44 9h$$If!vh5+#v+:V 9 ,5+/ 44 9p$$If!vh5+#v+:V 9} 5+/ / 44 9q$$If!vh5N5$#vN#v$:V 94 +5N5$44 9f4q$$If!vh5N5$#vN#v$:V 94 +5N5N44 9f4DAddress1 UppercasedEnter the Addressee's mail address (street address, PO Box, etc.98@8 Normal_HmH sH tH DA@D Default Paragraph FontVi@V  Table Normal :V 44 la (k(No List POP BLANKLINEdx5CJOJQJkHTOT Captions 6ptd(CJ OJQJkHDOD Captions 6pt bold5`O"` Captions 6pt boxd<5CJ OJQJkHDO2D Captions 6pt Nbox<DOBD Captions 7pt dtCJDOARD Captions 7pt Bold5BOqbB Captions 7pt box5^Or^ Captions 7pt NBoxdt<CJOJQJkHPOP Captions 8pt d`CJOJQJkH^O^ Captions 8pt Bold d`5CJOJQJkHFOF Captions 8pt box <DOD Captions 8pt NboxPPOP Captions 9pt dLCJOJQJkHJOJ Captions 9pt BolddLCJFOF Captions 9pt Box dDOD Captions 9pt Nbox5POP Captions 10pt d`( OJQJkH^O^ Captions 10pt Bold!d`(5OJQJkHXO"X Captions 10pt box"d`P OJQJkHHO2H Captions 10pt Nbox#P5J @BJ Footer$dt !CJOJQJkHRORR Form Title 10pt%$d8a$ OJQJkH^Ob^ Form Title 10pt Bld&$d8a$5OJQJkHVOrV Form Title 11pt'$d$a$CJOJQJkHLOaL Form Title 11pt Bld(d$CJVOV Form Title 12pt)$da$CJOJQJkHbOb Form Title 12pt Bld*$da$5CJOJQJkH4@4 Header + !HOH Small Blank Line ,CJXOX User Input 10pt-d8(5OJQJkHTOT User Input 11pt.d$5CJOJQJkH\O\ User input 12pt/d((5CJOJQJkHTOT Letter Text 10pt0$d$a$ OJQJkHFOF Letter Text 11pt1dCJXO"X Letter Text 12pt2$da$CJOJQJkHLO2L Captions 10pt 2 line 3<FOBF Date 08pt45CJOJQJkH6OAR6 Date 09pt5CJ6OAb6 Date 10pt6CJ2Oar2 Date 11pt7CJ.)@. XP Page Number'(NOPQ%&'()*CWbv/0128LMNOVjtDVbcdefgm789:;<Wijkl   BTUVWXYZ7 K M N      % 9 :    # N O P b ~      *     ' defgyxyz{)*+,opqrs /CU`rstuvw 456789:;<=_`ag{|}~pqrs0@*08 0< '08 0< 08 0< 000000 0 08 0< 008 -0008 -0008 -00< 08 08 08 0< 008 -0008 -0008 -00< 08 0< 008 -0008 -00< 08 0< 08 008 -008 0< 08 008 -0 08 0< 08 008 -0 08 0< 08 008 -0008 -0 08 0< 08 0< 008 -0008 -00< 08 0< 008 -008 0< 08 0< 008 -008 08 0< 08 0< 08 008 -008 0< 08 008 -0 08 0< 08 008 -0 08 0< 08 008 -0008 -008 0< 08 0< 008 08 0< 08 0< 0 00 -00 0 0 00 -0 0 0 0 00 -0 0 0 0 00 -0 0 0 0 0 08 0< 008 0< 08 0<  008 -0 008 0<  008 008 008 008 08 0< 0008 00 -0 0 0000 0 0 0 -0h 00h 0l 0 -0 00 0 0 -0 00 0 0 -0 00 0 0 -0 00 0 0 0 -0h 00h 0l 0 0 -0h 00h 0l 0 0 -0h 00h 0l 0 0 -0h 00h 0l 0 0 -0h 00h 0l 0 0 -0h 00h 0l 0 0 -0h 00h 0l 0 0 00 0 0 0 0 00 -0 00 -0 00 -0 00 -0 00 -0 -0 0 00 -0 00 -0 00 -0 -0 0 0 0 0 00 -0 00 -0 0 0 0 00 -0 0 00 -0 0 0 00 -0 0 00 -0 0 0 00 -0 0 00 -0 0 0 00 -0 0 00 -0 0 0 00 -0 0 00 -0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0@0@$00t '(NO'9 : uv|}pq?00 LL00l 00l L00l 00 L00L @0lL @00Pt@00P @00g@0 0$@0 0o@0 0$L; L t @00tQt@0 0 @00g@0 0$@0 0@0 0$L; L t @008Rt0 @00<$0 @00<$0 @00$0 @00$@0 ?00 8L0 ?00XUG0PY?00XUG0PYX'''*#COUbnt '-8DJVbhtDTmyWgBR7 C I % 1 7  ! P `  (  % gw{-CS`p ,2gsyFFFFFFS FFFFFFS FG$G$FFFFFG$G$G$G FFG$G$G$G$G$G$G$G$G$G$G$G$G$G$G$G$G$G$G$G$G$G$FFF"$*!8@0(  B S  ?Text1date1Text2date2Text3 Dropdown1Text8Text4Text5Check2Check5Text7Text9Check3Check4DWuC8  w $ViSJ % (33$CVbu.8KVitSTmfgBS7 J % 8 ! _ ` ' ( $ % vw,-RSop 3gz*//` @h h^h`OJQJo( @#"f)2}5 n  rX;%JE(-0k:4s6 7=`AGLIOXPDRxt]_ipsRA^M0q5AkIJ`n4)'(NOPQ%&'()*CWbv/0128LMNOVjtDVbcdefgm789:;<Wijkl   BTUVWXYZ7 K M N      % 9 :    # N O P b ~      *     ' defgyxyz{)*+,opqrs /CU`rstuvw 456789:;<=_`ag{|}~pqrs8Vs00Vr00Vq00Vp00Vo00Vn00Vm00Vl00Vk00Vj00Vi00Vh00Vg00Vf00Ve00Vd00V c00V!b00V"a00V#`00V$_00V%^00V&]00V'\00V([00V)Z00V*Y00V+X00V,W00V-V00V.U00V/T00V0S00V1R00V20V3Q00V4P00V5O00V6N00V7M00V8L00V9K00V:J00V;I00V<H00V=G00V>F00V?E00V@D00VAC00VBB00VCA00VD@00VE?00VF>00VG=00 AddRowAddRow*% 0 ( TemplateProject.AddRows.MAINAdd Rows AddRows.MAIN((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(Brk RowBrk Row$  ,         0( TemplateProject.RowBreak.MAIN Row Break RowBreak.MAIN((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(WOWToolbar 1 (0031)Toolbar 1 (0031)eifKffKffKffKffKf 0( !TemplateProject.NewParagraph.MAIN New ParagraphNewParagraph.MAIN((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(( TemplateProject.MyInfo.MAINMy Info MyInfo.MAIN((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(( TemplateProject.Correct.MAINCorrect Correct.MAIN((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(( %TemplateProject.InsertCisAddress.MAIN Cis AddressInsertCisAddress.MAIN((ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___wwwp(t!TemplateProject.AutoSave.AutoSave%TemplateProject.SuperPhoneNumber.MAIN%TemplateProject.InsertCisAddress.MAIN%TemplateProject.GranteeFirstName.MAIN$TemplateProject.WorkerExtension.MAIN$TemplateProject.GranteeLastName.MAIN$TemplateProject.GranteeClientID.MAIN$TemplateProject.GranteeAddress1.MAIN$TemplateProject.AddChildInfoRow.MAIN#TemplateProject.WorkerAreaCode.MAIN#TemplateProject.SupervisorName.MAIN#TemplateProject.SuperExtention.MAIN#TemplateProject.AddSvcReferral.MAIN"TemplateProject.SvcRefHeading.MAIN"TemplateProject.SuperAreaCode.MAIN"TemplateProject.GranteeCareof.MAIN"TemplateProject.CoSuppaddress.MAIN"TemplateProject.CoPhoneNumber.MAIN"TemplateProject.ClearCaseInfo.MAIN!TemplateProject.NewParagraph.MAIN!TemplateProject.GranteeState.MAIN!TemplateProject.countynumber.MAIN TemplateProject.WorkerPhone.MAIN TemplateProject.GranteeCity.MAIN TemplateProject.CoExtension.MAIN TemplateProject.ClientState.MAINTemplateProject.WorkerName.MAINTemplateProject.GranteeZip.MAINTemplateProject.CountyName.MAINTemplateProject.CoAreaCode.MAINTemplateProject.ClientCity.MAINTemplateProject.CaseNumber.MAINTemplateProject.WorkerFax.MAINTemplateProject.lastname2.MAINTemplateProject.FirstName.MAINTemplateProject.CoAddress.MAINTemplateProject.ClientZip.MAINTemplateProject.RowBreak.MAINTemplateProject.LastName.MAINTemplateProject.District.MAINTemplateProject.CaseInfo.MAINTemplateProject.Address1.MAINTemplateProject.Section.MAINTemplateProject.OtherID.MAINTemplateProject.CoState.MAINTemplateProject.Correct.MAINTemplateProject.AddRows.MAINTemplateProject.Worker.MAINTemplateProject.MyInfo.MAINTemplateProject.County.MAINTemplateProject.CoCity.MAINTemplateProject.CareOf.MAINTemplateProject.FaxAC.MAINTemplateProject.Date1.MAINTemplateProject.CoZip.MAINTemplateProject.Unit.MAIN8TEMPLATEPROJECT.UNIT.MAINTEMPLATEPROJECT.COZIP.MAINTEMPLATEPROJECT.DATE1.MAINTEMPLATEPROJECT.FAXAC.MAINTEMPLATEPROJECT.CAREOF.MAINTEMPLATEPROJECT.COCITY.MAINTEMPLATEPROJECT.COUNTY.MAINTEMPLATEPROJECT.MYINFO.MAINTEMPLATEPROJECT.WORKER.MAINTEMPLATEPROJECT.ADDROWS.MAINTEMPLATEPROJECT.CORRECT.MAINTEMPLATEPROJECT.COSTATE.MAINTEMPLATEPROJECT.OTHERID.MAINTEMPLATEPROJECT.SECTION.MAINTEMPLATEPROJECT.ADDRESS1.MAINTEMPLATEPROJECT.CASEINFO.MAIN TEMPLATEPROJECT.DISTRICT.MAIN!TEMPLATEPROJECT.LASTNAME.MAIN"TEMPLATEPROJECT.ROWBREAK.MAIN#TEMPLATEPROJECT.CLIENTZIP.MAIN$TEMPLATEPROJECT.COADDRESS.MAIN%TEMPLATEPROJECT.FIRSTNAME.MAIN&TEMPLATEPROJECT.LASTNAME2.MAIN'TEMPLATEPROJECT.WORKERFAX.MAIN(TEMPLATEPROJECT.CASENUMBER.MAIN)TEMPLATEPROJECT.CLIENTCITY.MAIN*TEMPLATEPROJECT.COAREACODE.MAIN+TEMPLATEPROJECT.COUNTYNAME.MAIN,TEMPLATEPROJECT.GRANTEEZIP.MAIN-TEMPLATEPROJECT.WORKERNAME.MAIN. TEMPLATEPROJECT.CLIENTSTATE.MAIN/ TEMPLATEPROJECT.COEXTENSION.MAIN0 TEMPLATEPROJECT.GRANTEECITY.MAIN1 TEMPLATEPROJECT.WORKERPHONE.MAIN2!TEMPLATEPROJECT.AUTOSAVE.AUTOSAVE3!TEMPLATEPROJECT.COUNTYNUMBER.MAIN4!TEMPLATEPROJECT.GRANTEESTATE.MAIN5!TEMPLATEPROJECT.NEWPARAGRAPH.MAIN6"TEMPLATEPROJECT.CLEARCASEINFO.MAIN7"TEMPLATEPROJECT.COPHONENUMBER.MAIN8"TEMPLATEPROJECT.COSUPPADDRESS.MAIN9"TEMPLATEPROJECT.GRANTEECAREOF.MAIN:"TEMPLATEPROJECT.SUPERAREACODE.MAIN;"TEMPLATEPROJECT.SVCREFHEADING.MAIN<#TEMPLATEPROJECT.ADDSVCREFERRAL.MAIN=#TEMPLATEPROJECT.SUPEREXTENTION.MAIN>#TEMPLATEPROJECT.SUPERVISORNAME.MAIN?#TEMPLATEPROJECT.WORKERAREACODE.MAIN@$TEMPLATEPROJECT.ADDCHILDINFOROW.MAINA$TEMPLATEPROJECT.GRANTEEADDRESS1.MAINB$TEMPLATEPROJECT.GRANTEECLIENTID.MAINC$TEMPLATEPROJECT.GRANTEELASTNAME.MAIND$TEMPLATEPROJECT.WORKEREXTENSION.MAINE%TEMPLATEPROJECT.GRANTEEFIRSTNAME.MAINF%TEMPLATEPROJECT.INSERTCISADDRESS.MAING%TEMPLATEPROJECT.SUPERPHONENUMBER.MAIN@ m/D D --p@p pppp(@pp0@p@p|p@@Unknown]z Times New Roman helvetica5Symbol3& z Arial?5 z Courier New"hRFRFB&:g ':g 'r cq#4d-Z3QH?4.DHS-0031, Foster Care Placment Decision NoticeCompdhs aL@LNormal#CJ OJQJ_HmHnHsH tH uDAD Default Paragraph FontViV  Table Normal :V 44 la (k(No List VV Address1d8(OJQJ_HkHmH sH tOh+'0  $ @ L X dpx0DHS-0031, Foster Care Placment Decision NoticeComp DHS-0031dhs2Microsoft Word 10.0@@P/@HB@HB:g՜.+,0( hp  State of Michigan'  /DHS-0031, Foster Care Placment Decision Notice Title  !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{}~*Root Entry Fd@Data Uxi1Table|WordDocumentSummaryInformation(DocumentSummaryInformation8MacrosIG Hrd HrdVBA Hrd Hrddir\ Unit  2CoZip ADate1  P  !"#$%&'()*+,-./013456789:;<=>?@BCDEFGHIJKLMNOQRSTUVWXYZ[\]^`abcdefghijklmopqrstuvwxyz{|~0* pHdTemplateProjectQH@  = | 6{97 J< 9stdole>stdoleP f%\*\G{00020430-C 0046}#2.0#0#C:\WINNT\System32\StdOle2.tlb#OLE Automation/MSForms>SFErms3DD452EE1-E08F-@101A-8-02608C4D0BB4 DDOWS\sEFM20.DLL#Microsoft :" ] Ob Library/;D1tA00}#0#Gk0 A5CCB9B2D-F125-499E-B6EB-2A8120@616E716DOCUME~1\vallejod\LOCALS@A\VBE\T.8exd !3AU0>e)C d`[2[2r1_aMo%@e3^ ^visorsH S]vSo0 7HQ [ _rPaKQh GAGGtG? V _  Q(SvcReferral $Sv0R0f0r0a= (X U_e0r!lp' PcHeadingG0ે H a $i`gg.2/* ?p 1 'o1 % Ux2CU!'U%vaseN$aweN஧&/ x eFaxGeF@3xT.2?!z0lastnu2#ls nu2$/#?!|0FiXrstCda FsrՀ1t1a@e$o#?!~00/d`dress31dd2sQfo?@.J1i1J3`71cB'RowB BkG mhwBBk 92?MDL0( L$(Q?5=FDistrhictsD'/rpc`05=CEPInfoCreI{f5S=Y_JjA/1A..1?5= L%Sect]ғgi ns2__N_OthePrIDGBOhrDTS #__P_Co !C9S __R_Prr@Ar<#-SW_y̝~T_1%`DPT"RPwTQ%S _CV\$5GWe-2X1My3;M~y:':Z  s \ wy Co3 ^PPreOf a*Of@9>a  "Fa߰xACG FaxA@Cxa2 `H1(, H"!+ ADate1Dte1i#i$iCoZipiCoZipii 4&4}UnitGrUn3t3 2 1(1,AutoSaveG3AuTtjSv[22==8'l\c(xMEH 8 " 0Unit  B@oXPiAttribute VB_Name = "Unit" Public Sub MAIN() WordBasic.WW7_EditGoTo Destinat ion:=Endv \c&xMEH 8 " 0cozip  B@oXPoAttribute VB_Name = "CoZip" Public Sub MAIN() WordBasic.WW7_EditGoTo Destination:="cDozEndx \c$xMEH 8 " 0date1  B@oXPlAttribute VB_Name = "Date1" Public Sub MAIN() WordBasic.WW7_EditGoTo Destination:="dEndx \c"FaxAC _CareOf nCoCity}County xMEH 8 " 0FaxAC  B@oXPjAttribute VB_Name = "FaxAC" Public Sub MAIN() WordBasic.WW7_EditGoTo Destina@tion:=Endx \c xMEH 8 " 0careof  B@oXPqAttribute VB_Name = "CareOf" Public Sub MAIN() WordBasic.WW7_EditGoTo Destination:="coEndz \c^xMEH 8 " 0cocity  B@oXPpAttribute VB_Name = "CoCity" Public Sub MAIN() WordBasic.WW7_EditGoTo Destination:="cocEndz \c\xMEH 8 " 0county  B@oXPnAttribute VB_Name = "County" Public Sub MAIN() WordBasic.WW7_EditGoTo Destination:=""cEndz \cXxMEMyInfo-3WorkerAddRowsqCorrect     )+!"#$%&'(.M,-/F0B23456789:;<=>?@ACDEGPHIJKLNbOQXRSTUVWYaZ[\]^_`cjdefghikslmnopqrvwxyz{|}~{'ZxME @`Enter Personal InformationTemplateProject.MyInfo.MAIN@ PVPXP&PZP\@P^P`PbPdPfPhPjPlPnPpPrPPtPvxS0PxPz`& h " (08@HPX`hpx &((8*`&(&&(0&X$&$$& $H&p&(N$8$`&&*$"00XT$$0P p <468P686406h846 4H 2 2 4 2( 4` : : 2 P h & 4 6 8 6X 8 6 4 68 8p 4 6 42P24240:h: "02@4x242 0X2402(0`..0. 0P66 ":>XB>F 2h:>6 6X.2::82x62B Fh 4 2 &  (H *p .  2 4(` h x ]]]]]]]](]@]X]p]]]]]]]]0]H]`DEFINE DIALOG BOXF,MyInfo B@|m ^YourName B@ m8^ YourTitle B@ mP^ YourOffice B@ mi^ YourAddress B@ hxYourCity B@ T( YourState B@ FYourZip B@ n(AreaCode B@ P YourPhone B@ <YourExt B@ r(FAXAC B@ PYourFax B@ (YourCO B@ (YourDI B@ (YourSEC B@ T(YourUN B@ (YourWKR B@ m^BossName B@ m^ BossTitle B@ k  /Enter the following information about yourself. B@d#2 Name: B@d;2 Title: B@dR< Office: B@dkU Address: B@d City-ST-Zip: B@d7 Phone: B@d>% FAX: B@dCO-DI-SEC-UN-WKR: B@dK 6Enter the following information about your supervisor. B@d2 Name: B@d 2 Title: B@d X B@""X B@| B@$]xF !(!*.&6GET USER INFO FROM INI FILE AND PUT IT INTO DIALOG BOXUserInfoName MYINFO.ini %X &(~UserInfoTitle MYINFO.ini %X &(UserInfoAreaCode MYINFO.ini %X &(&UserInfoPhone MYINFO.ini %X &(UserInfoYourExt MYINFO.ini %X &(\UserInfoFaxAC MYINFO.ini %X &(^UserInfoFax MYINFO.ini %X &(`UserInfoOffice MYINFO.ini %X &(UserInfoAddress MYINFO.ini %X &(UserInfoCity MYINFO.ini %X &(UserInfoState MYINFO.ini %X &(UserInfoZip MYINFO.ini %X &(UserInfoCO MYINFO.ini %X &(UserInfoDI MYINFO.ini %X &(UserInfoSEC MYINFO.ini %X &(UserInfoUN MYINFO.ini %X &(UserInfoWKR MYINFO.ini %X &(UserInfo Boss Name MYINFO.ini %X &(vUserInfo Boss Title MYINFO.ini %X &(x,DISPLAY DIALOG BOX AND RESPOND TO USER INPUT & !>%*'  OK BUTTONWRITE NEW USER INFO IN INI FILEUserInfoName &!~ MYINFO.ini B@@UserInfoTitle &! MYINFO.ini B@@UserInfoAreaCode &!& MYINFO.ini B@@UserInfoPhone &! MYINFO.ini B@@UserInfoYourExt &!\ MYINFO.ini B@@UserInfoFaxAC &!^ MYINFO.ini B@@UserInfoFax &!` MYINFO.ini B@@UserInfoOffice &! MYINFO.ini B@@UserInfoAddress &! MYINFO.ini B@@UserInfoCity &! MYINFO.ini B@@UserInfoState &! MYINFO.ini B@@UserInfoZip &! MYINFO.ini B@@UserInfoCO &! MYINFO.ini B@@UserInfoDI &! MYINFO.ini B@@UserInfoSEC &! MYINFO.ini B@@UserInfoUN &! MYINFO.ini B@@UserInfoWKR &! MYINFO.ini B@@UserInfo Boss Name &!v MYINFO.ini B@@UserInfo Boss Title &!x MYINFO.ini B@@Get user info from INI filexUserInfoName MYINFO.ini %X' VUserInfoTitle MYINFO.ini %X' XUserInfoAreaCode MYINFO.ini %X' &UserInfoPhone MYINFO.ini %X' ZUserInfoYourExt MYINFO.ini %X' \UserInfoFaxAC MYINFO.ini %X' ^UserInfoFax MYINFO.ini %X' `UserInfoOffice MYINFO.ini %X' bUserInfoAddress MYINFO.ini %X' dUserInfoCity MYINFO.ini %X' fUserInfoState MYINFO.ini %X' hUserInfoZip MYINFO.ini %X' jUserInfoCO MYINFO.ini %X' lUserInfoDI MYINFO.ini %X' nUserInfoSEC MYINFO.ini %X' pUserInfoUN MYINFO.ini %X' rUserInfoWKR MYINFO.ini %X' tUserInfo Boss Name MYINFO.ini %X' vUserInfo Boss Title MYINFO.ini %X' x Update Form with user info WorkerName %ZG workerName V B@\j WorkerTitle %ZG WorkerTitle X B@\jWorkerAreaCode %ZGWorkerAreaCode & B@\j WorkerPhone %ZG WorkerPhone Z B@\jWorkerExtension %ZGWorkerExtension \ B@\jFaxAC %ZGFaxAC ^ B@\j WorkerFax %ZG WorkerFax z B@\j Countynumber %ZG Countynumber l B@\jDistrict %ZGDIstrict n B@\jSection %ZGSECtion p B@\jUnit %ZGUNit r B@\jWorker %ZGWorker t B@\j CountyName %ZG CountyName b B@\j CoAddress %ZG CoAddress d B@\jCoCity %ZGCoCity f B@\jCoState %ZGCoState h B@\jCoZip %ZGCoZip j B@\jSupervisorName %ZGSupervisorName v B@\jSupervisorTitle %ZGSupervisorTitle x B@\j. 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 = - 1kho`X1Attribute VB_Name = "MyInfo" Public Sub MAIN(X) D.nDescription|Enter Personal rma:zProcDataIInvoke _FuncITe@mplate"ject..wJDim iRet  User$TitleAreaCod!-PhonYo urExtFaxAC  Offic $Ad dressCidtyStbZ$ipCODISEB;UN WKRBoss| |] 'DEFINE DIALOG BOX WordBasic.BeginDialog 582, 300,H G TextBox 109@ A 5@ 18@ KA#g 56 ,u 83 Cb[ 1\05k 2A33y21A5Au 3~4   ~ 9 7 1$55Ŷ [1 Pi23` n6idV3jFAXAC41e w `VV1@,C:O629 *DI7m qV? UN64!l1.{Vym23n`64`z7,4, c3zthe following info$ about yself. ",  !:w5f"bC #10@8O$31{1aA-ST- u5_ abm3r13@ gY  ;"CO-DI-aT-UN-@H47224* superv0isor!a 124f>6p6iOKButt48 8pR21 f@Cancel3GkEndn 1rdlguQ As Ob: SHet = CurValues. vGET USER INF@O FROMI FILE AND PUT I NTOzx.t[GetPrivfileSp@ng$](" "'P:qMY.ini"r hl ? a"4??>? Mpn_1r &.nAC `axU/-Y??>OMA\C$$a&gp Op | DIpp/-UN0 | {p y QaeProfileString$]("UserInfo", "Boss Name0MYINFO.ini") dl g.LTitle = WordBasic.[GetPrivat >e 'DISPLAY DIALOG BOX AND RESPOTO USER INPUT@ iRet Dialog. F(If -1 Then 'OK BUTTON ?WRIT E NEW3FO6I FILE xSx ቟Your , - -AreaCod|PhonEExtE@FaxACL+@OfficZ Ly+[Address0$ City ? : |StP  z ZNE WKR#kNamڈ OfficeAddress|Co%  ACoCity  ! CoSta>t$c b CoZip  "Supervpisor<, Boss! /Titl% b ' Upd. other ! Fields on& t Macro  Rem" Sel}ed$=G $ ("CurrpentD9'S erial = Today()` + 14$k()D|ue`"GEditGoTo "Ct : Unlink'Granteefirst3"ToolsProtDocum .Noet`1, .TypeM@2/ .= 2 `0 Else#FileClose D Gc.@- 1n@d If Sub H 8 " 0worker  B@oXPlAttribute VB_Name = "Worker" Public Sub MAIN() tdBasic.WW7_EditGoTo Destination:="wEndz {VxME @p+Adds row to table FOLLOWING cursor locationTemplateProject.AddRows.MAINh "0@ B@ B@oH@Attribute VB_Name = "AddRows" Public Sub MAIN() D.pDescription~s row to table FOLLOWING cursor loca\NProcDataZInvoke_FuncZTemplateA"ject..KWordBasic.LineDown 1 TInserBt Numt:D="Ends t{sTxME`  @J  " V*h    ]@Q This serves as a replacement to the spell checker within a protected documentCheck spelling now? %L'J J B@j B@N B@Pzl B@xko0Attribute VB_Name = "Correct" Public Sub MAIN() Dim ans Rem This se@rves a replacement to the spell checker within @a proted docu3 ZWordBasic.MsgBox("C?King now ?", 3If4-1en  QATools4UnoDi %St`artOf"S7d>0Pg NoReset:=1, Type:=2 End If \cRxMECoStateOtherIDSection__SRP_0' H 8 "(8costate  B@oPHqAttribute VB_Name = "CoState" Public Sub MAIN() WordBasic.WW7_EditGoTo Destination:="cosEnd| \cPxMEH 8 "(8otherid  B@oPHsAttribute VB_Name = "OtherID" Public Sub MAIN() WordBasic.WW7_EditGoTo Destination:=$"oidEnd| \cNxMEH 8 "(8Section  B@oPHjAttribute VB_Name = "Section" Public Sub MAIN() WordBasic.WW7_EditGoTo Desti$nar:=End| K*srU~~~~~~~~k X_a&Bv  9 Iy! qYIq9a 1Y!Aa!Aa1Iay !9 TemplateProject ThisDocumentSuperPhoneNumberInsertCisAddressGranteeFirstNameWorkerExtensionGranteeLastNameGranteeClientIDGranteeAddress1AddChildInfoRowWorkerAreaCodeSupervisorNameSuperExtentionAddSvcReferral SvcRefHeading SuperAreaCode GranteeCareof CoSuppaddress CoPhoneNumber ClearCaseInfo NewParagraph GranteeState countynumber WorkerPhone GranteeCity CoExtension ClientState WorkerName GranteeZip CountyName CoAreaCode ClientCity CaseNumber WorkerFax lastname2 FirstName CoAddress ClientZipRowBreakLastNameDistrictCaseInfoAddress1SectionOtherIDCoStateCorrectAddRowsWorkerMyInfoCountyCoCityCareOfFaxACDate1CoZipUnitF /C:\PROGRA~1\COMMON~1\MICROS~1\VBA\VBA6\VBE6.DLLVBA Q y0 F5C:\Program Files\Microsoft Office\Office10\MSWORD.OLBWord I q @0FC:\WINNT\System32\StdOle2.tlbstdole Y  P.E .`M C:\WINDOWS\system32\FM20.DLLMSForms 9 9 a `-\%I* anq 2C:\DOCUME~1\vallejod\LOCALS~1\Temp\VBE\MSForms.exd a 9  pL-[DR 2C:\Program Files\Microsoft Office\Office\MSO97.DLLOffice Q y MAIN Module1AutoSave'__SRP_1"__SRP_2T__SRP_3gAddress1      !"#$%&')*+,-./012345689:;<=>?@ABCDEGHIJKLMNOPQRSTUVXYZ[\]^_`abcdeghijklmnopqrstvwxyz{|}~rU trU~| krU $`n\cLxMEH 8 "(8Address1  B@oPHnAttribute VB_Name = "Address1" Public Sub MAIN() WordBasic.WW7_EditGoTo Destination:"= End~ AutoSaveCaseInfo1!District(LastName#7\c78'xMEH 8" . 8HX( Macro copied from one of Sandy's 2/8/06 B@4Co0(Attribute VB_Name = "AutoSave" Sub 8() ' Macro copied from one of Sandy's 2/8/ 06 ActiveDocu ment. End SJxME @`bEnter Personal InformationTemplateProject.CaseInfo.MAINx@ PPPPPP P MP UP@ e`& Pc " (08@HPX `"& (&0(X&(&&& $H Np*,* .P*,44.P   <FHXFJF8HLLHh 2 & FHHFJ Fp H L LP H " B DX B F B0 Dx H H DP " 6 : B8>6:N8NB 4 X` p ]]]]]]]]0]H]`]xOPEN FCTPSA TOOLBAR/ B@ FCTPSA Tools B@DEFINE DIALOG BOXF,CaseInfo B@  YourFCCNo B@ 8 YourFCCN B@ %P  YourFCWLNo B@ i YourFCWN B@   YourPSCNo B@  YourPSCN B@ fYourHAL B@ fYourHAF B@ fYourDC B@ k  0Enter the following information about this case. B@d# FC Case No.: B@d; FC Case Name: B@dR FC Load No.: B@dk FC Worker Name: B@d PS Case No.: B@d PS Case Name: B@d Household Ass'd Last: B@d Household Ass'd First: B@d Date Completed: B@d,X B@" B@$]F !(!*.&6GET USER INFO FROM INI FILE AND PUT IT INTO DIALOG BOXUserInfoFCCaseNoC:\Windows\CaseInfo.ini %X &(,UserInfo FCCaseNameC:\Windows\CaseInfo.ini %X &(.UserInfoFCLoadNoC:\Windows\CaseInfo.ini %X &(0UserInfo FCWorkerNameC:\Windows\CaseInfo.ini %X &(2UserInfoPSCaseNoC:\Windows\CaseInfo.ini %X &(4UserInfo PSCaseNameC:\Windows\CaseInfo.ini %X &(6UserInfo HouseholdLastC:\Windows\CaseInfo.ini %X &(8UserInfoHouseholdFirstC:\Windows\CaseInfo.ini %X &(:UserInfo DCompletedC:\Windows\CaseInfo.ini %X &(<,DISPLAY DIALOG BOX AND RESPOND TO USER INPUT & !>%*'  OK BUTTONWRITE NEW USER INFO IN INI FILEUserInfoFCCaseNo &!,C:\Windows\CaseInfo.ini B@@UserInfo FCCaseName &!.C:\Windows\CaseInfo.ini B@@UserInfoFCLoadNo &!0C:\Windows\CaseInfo.ini B@@UserInfo FCWorkerName &!2C:\Windows\CaseInfo.ini B@@UserInfoPSCaseNo &!4C:\Windows\CaseInfo.ini B@@UserInfo PSCaseName &!6C:\Windows\CaseInfo.ini B@@UserInfo HouseholdLast &!8C:\Windows\CaseInfo.ini B@@UserInfoHouseholdFirst &!:C:\Windows\CaseInfo.ini B@@UserInfo DCompleted &!<C:\Windows\CaseInfo.ini B@@Get user info from INI fileUserInfoFCCaseNoC:\Windows\CaseInfo.ini %X' UserInfo FCCaseNameC:\Windows\CaseInfo.ini %X' UserInfoFCLoadNoC:\Windows\CaseInfo.ini %X' UserInfo FCWorkerNameC:\Windows\CaseInfo.ini %X' UserInfoPSCaseNoC:\Windows\CaseInfo.ini %X' UserInfo PSCaseNameC:\Windows\CaseInfo.ini %X' UserInfo HouseholdLastC:\Windows\CaseInfo.ini %X' UserInfoHouseholdFirstC:\Windows\CaseInfo.ini %X' UserInfo DCompletedC:\Windows\CaseInfo.ini %X'  Update Form with user infoFCCASENO %ZGFCCASENO  B@\j FCCASENAME %ZG FCCASENAME  B@\jFCWORKERLOADNO %ZGFCWORKERLOADNO  B@\j FCWORKERNAME %ZG FCWORKERNAME  B@\jPSCASENO %ZGPSCASENO  B@\j PSCASENAME %ZG PSCASENAME  B@\jHOUSEHOLDASSESSEDLST %ZGHOUSEHOLDASSESSEDLST  B@\jHOUSEHOLDASSESSEDFST %ZGHOUSEHOLDASSESSEDFST  B@\j DATECOMPLETED %ZG DATECOMPLETED  B@\j. Update other Form Fields on Form & Exit Macrod B@B'kxophmAttribute VB_Name = "CaseInfo" Public Sub MAI`N() D.rDescriptionEnter Personal rma:zProcDataIInvoke_FuncITemplateA"ject..yLDim iRet  UserFCCNo$ I WL WNPS HALFDCSelU 'OPEN FCTPSA TOOLBAR WordBasic.ViewToolbars ColorButtons:=1, Large0, Tipc"':=";/s", Show+'DEFINE DIALOG BOXBeginDialog 582, 30 Ʌ 1Text@Box 15 3 265, 18, "Youdka 56,  8/ wW 7@ 10ˀ& N13]\ 5A  2AY1y510QO 24 F i24 $DC@ 4 1079` 4B3;c|the following info} about this c. 19K$,1 FC | No.:w5p!YLoad #Y^k{x 1` PS} ,5,3 1 93(Household AsHs'd`st2B;FirD`eted3IOKc26% 821 EndÏdlgA Oba: SHet I= GCurValues.! GET USER INF@O FROM I FILE AND PUT I@NTO .@G[GetPrivfileSng$]("\NoaC:\Windows\!.ini" p H?u $T???C5?u?oNCp`9Q9_er"\OON OOjS##2bdaDLastooegHAF???KϒGOOHDC??>DCoKCDISPLAYAbCRESPOCPCED * HHIf(x>P?If0-1 Then 'OK BUTTONWRITE NEWXLIN6LYTQH`zHeB,G~OJo<O e4:CN;&HM_R] GW % GEo k SGO"qrA GL >FFFDCr fromr?cqfD)dC:("UserInfo", "FC CaseNXC:\Windows\P.ini"p) N$ = WordBasic.[GetPrivateProfileString$]1amev"jWLNo5lLoad(ՆWjkerNkPSC5k)ց4#'5HALsHouseholdLastdHAF<HFirfDC3DCompleted5 ' Upd Form with @Er &iIfExistBook mark(AASENO") ThDen SetR`esult ,2 yo$_ G AME CC A WORKERLOAD N'f N?!@j#/]4# ?$_ "H HOUSEHOLDASSE@DLST^B_#AnF"F?!DATECOMPLET?@ABCDEFHIJKLMNOPQRSTUWXYZ[\]^_`abcdefgijklmnopqrstuvwyz{|}~H 8 "(8 clientstate  B@oPHvAttribute VB_Name = "ClientState" Public Sub MAIN() WordBasic.WW7_EditGoTo Destinati@on:="csEnd \cjxMEH 8 "(8 coextension  B@oPHtAttribute VB_Name = "CoExtension" Public Sub MAIN() WordBasic.WW7_EditGoTo Destinatr@:="coeEnd \chxMEH 8 "(8 GranteeCity  B@oPHqAttribute VB_Name = "GranteeCity" Public Sub MAIN() WordBasic.WW7_EditGoTo Destination:= End \cfxMEH 8 "(8 workerphone  B@oPHuAttribute VB_Name = "WorkerPhone" Public Sub MAIN() dBasic.WW7_EditGoTo DestinationP:="wpEnd countynumber8GranteeState02GNewParagraphV^ThisDocument15h\cdxMEH 8 "(8 Countynumber  B@oPHtAttribute VB_Name = "countynumber" Public Sub MAIN() WordBasic.WW7_EditGoTo Destination:="C End \cbxMEH 8 "(8 GranteeState  B@oPHrAttribute VB_Name = "GranteeState" Public Sub MAIN() WordBasic.WW7_EditGoTo Destinat ion:= End \c`xMEH 8 " (@`px B@ B@j$ $ B@t( zl B@x B@oŰAttribute VB_Name = "NewParagraph" Public Sub MAIN() WordBasic.ScreenUpdating 0 >ToolsUnprotectDo@cument Insert Chr(13[?P = NoReset:=1, Type:=2 QCharRight 1 End ź#xME (SLSS<N0{00020906-0000-0000-C000-000000000046}8(%HxAttribute VB_Name = "ThisDocument" Bas0{00020P906-0C$0046} |GlobalSpacFalse dCreatablPredeclaIdTru BExposeTemplateDerivBustomizD2_VBA_PROJECTu7ClearCaseInfo46xVCoPhoneNumberCoSuppaddress3;as  *\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.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:\WINNT\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{5CCB9B2D-F125-499E-B6EB-2A8120616E71}#2.0#0#C:\DOCUME~1\vallejod\LOCALS~1\Temp\VBE\MSForms.exd#Microsoft Forms 2.0 Object Library.E .`M *\G{2DF8D04C-5BFA-101B-BDE5-00AA0044DE52}#2.2#0#C:\Program Files\Microsoft Office\Office\MSO97.DLL#Microsoft Office 8.0 Object Library9  6{977 563412/0-.+,!*89ThisDocument0P4b14e8c2ThisDocument% SuperPhoneNumber0Q4b14e8c2 SuperPhoneNumber% InsertCisAddress0R4b14e8c2" InsertCisAddress05 GranteeFirstName0S4b14e8c2^ GranteeFirstNameH%WorkerExtension0T4b14e8c2`WorkerExtension`%GranteeLastName0U4b14e8c2bGranteeLastNamex%GranteeClientID0V4b14e8c2dGranteeClientID%GranteeAddress10W4b14e8c2fGranteeAddress1%AddChildInfoRow1>4b14e8d5hAddChildInfoRow|WorkerAreaCode0Y4b14e8c2|WorkerAreaCodeSupervisorName0Z4b14e8c2~SupervisorNameSuperExtention0[4b14e8c2SuperExtentionAddSvcReferral0]4b14e8c2AddSvcReferral SvcRefHeading0^4b14e8c2SvcRefHeading8 SuperAreaCode0_4b14e8c2SuperAreaCodePGranteeCareof0`4b14e8c2GranteeCareofhCoSuppaddress0a4b14e8c2CoSuppaddressCoPhoneNumber0b4b14e8c2CoPhoneNumberClearCaseInfo0c4b14e8c2ClearCaseInfo NewParagraph0d4b14e8c2NewParagraph`GranteeState0e4b14e8c2GranteeStatebcountynumber0f4b14e8c2LcountynumberdWorkerPhone0g4b14e8c2WorkerPhonefGranteeCity0h4b14e8c2GranteeCityh(CoExtension0i4b14e8c2CoExtensionj@ClientState0j4b14e8c2TClientStatelXWorkerName0k4b14e8c2$WorkerNamenpGranteeZip0l4b14e8c2GranteeZippCountyName0m4b14e8c2*CountyNamerCoAreaCode0n4b14e8c2CoAreaCodetClientCity0o4b14e8c2RClientCityvCaseNumber0p4b14e8c2JCaseNumberxWorkerFax0q4b14e8c2WorkerFaxzlastname20r4b14e8c2lastname2|FirstName0s4b14e8c2FFirstName~0CoAddress0t4b14e8c2CoAddress@HClientZip0u4b14e8c2VClientZipB`RowBreak0v4b14e8c2RowBreakDxMLastName0w4b14e8c2HLastNameFDistrict0x4b14e8c2,DistrictHCaseInfo0y4b14e8c2CaseInfoJY Address10z4b14e8c2PAddress1L Section104b14e8c2.SectionN OtherID114b14e8c2DOtherIDPCoState124b14e8c2FCoStateR Correct134b14e8c2HCorrectT8y%AddRows144b14e8c2RAddRowsVP$ Worker154b14e8c22 WorkerXh# MyInfo164b14e8c2T MyInfoZ'" County174b14e8c2 County\) CoCity184b14e8c2 CoCity^( CareOf194b14e8c2N CareOf ' FaxAC1:4b14e8c2^ FaxAC"& Date11;4b14e8c2 Date1$ CoZip1<4b14e8c2 CoZip& Unit1=4b14e8c20Unit((AutoSave1@4b14e8fbAutoSave8'@=`0 PP`@hX(xpH`H(@hxߐAȝwG;Ouvlj>J}o9A@¯mAO"ƩNEZF=;kCxN-4̞IZ}] IJ-/4wEfCIsBMYNt/N%oͧPF|(}lH7G8il2inwHimqvMaLu$1ۮ(BOvаrpK i:8(9d[E+N ' I"*/r8C4oŞ$);s@N"{Bf-E&]N]Cp MXMB*HfNYQ 1GW>PfAAOSC?3RS_JcU1FHlV)@b>EHET+@hΨ1qMkRSCB@je =!|b@W@DY3J1C_({w4L6@!!DEོa{GOoZn|)5DgLGBQ%=^Ke6)xB!GJU4Ѐ2IIjCм~;7LL*ͯ6,@E}* ۩ވKHO>f wIK1gh)!@W<: c#L$if tj~-F0{,2͵0DWordkVBAWin16~Win32MacVBA6#TemplateProjectEstdole`MSFormsCOfficeu ThisDocument< _EvaluateSuperPhoneNumber\MAIN, WordBasic WW7_EditGoTod DestinationлInsertCisAddress>} WorkerNameJAreaCode PhoneNumber CountyNameDistrict}-SectionGUnitWorker8 ApDistrictApUnitPApWorkerW FsDistrictaFsUnitFsWorker SvDistrict]SvUnit/SvWorker FirstNameLastName CaseNumberA countynumberyxCareOfƻAddress1O ClientCitym ClientState ClientZipGetPrivateProfileString$xExistingBookmark SetFormResultGranteeFirstNameEWorkerExtensionGranteeLastName.GranteeClientIDGranteeAddress1AddChildInfoRow^ToolsUnprotectDocument(NextCellWW7_EditAutoTextCContextXnInsertAsInsertrCharLeftToolsProtectDocument-0NoResetgWorkerAreaCodeSupervisorNameSuperExtentionAddSvcReferral} SvcRefHeadingi&TableSelectRowTableInsertRowQNumRows CenterParaLineUpK InsertPara,LineDownxTableInsertCells ShiftCells( CharRightPTableMergeCellst BorderRight_ SuperAreaCodeq GranteeCareof CoSuppaddress^  CoPhoneNumberx ClearCaseInfohFileFind SearchName֡ SearchPath.SubDir+Title~AuthorKeywordsTSubjectRPOptions MatchCase PatternMatch DateSavedFromu= DateSavedTojdSavedByDateCreatedFrom DateCreatedToViewISortByoListBy+ SelectedFile\Kill NewParagraphqScreenUpdating! ChrK~ GranteeStateM WorkerPhone GranteeCity@ CoExtensionK GranteeZip  CoAreaCode WorkerFaxv lastname2sL CoAddressRowBreakFTableRowHeight"X RulerStyleaLineSpacingRulep LineSpacing LeftIndenti AlignmentI AllowRowSplit{CaseInfoiRet,p UserFCCNoBUserFCCN7 UserFCWLNoyUserFCWN UserPSCNoOUserPSCNqUserHALօUserHAFЅUserDC SelectNameW; ViewToolbars| ColorButtons} LargeButtonsSWToolTips5+Toolbar2Show BeginDialogFTextBoxQOKButton| EndDialogmP dlgUserInfo2" CurValuesȤ UserDialog YourFCCNo+YourFCCN. YourFCWLNoYourFCWN0 YourPSCNo9YourPSCNP<YourHALYYourHAFYYourDCDialogfSetPrivateProfileString= FileClose_OtherIDCoState1Correct'ansxtMsgBoxRStartOfDocument ToolsSpellingAddRowsMyInfo@UserName\ UserTitleV9 UserPhoneYourExthLFaxACjYourFaxrN UserOffice0 UserAddressFUserCity UserStateUserZipDUserCOUserDIUserSEC4UserUN0UserWKR,BossNamef BossTitleHFaxY CancelButtonYourName;R YourTitleA# YourPhone YourOffice YourAddressYourCity YourStateYourZipYourCOYourDIYourSECvYourUNVYourWKRnCountyG8CoCityr7Date11CoZip0DocumentjModule1bAutoSaveActiveDocument\Save(y #%+-'/*173/G"I&'K(M)O3*Q)+S,U-W$.E+/G,0I-1_2a3c4e5g6i7S.8U09_4:} ; B C D E1SFRTUV2W5X6Y8wZmpqrst u!v#x%x[~\cŞxMEH 8 "&   c:\windows\ caseinfo.inid B@c:\windows\caseinfo.ini B@oH@EAttribute VB_Name = "ClearCaseInfo" Public Sub MAIN() WordBasic.File@Find Slch:=" ",! Path c:\wJows\4Jceie.ini0ubDir:=0, Title6Autho" Keywysject Option=`MatchKex#ternDateSavedFrom# LToByC?@ABCDEGHIJKLMNOPQRSTVWXYZ[\]^_`abcdefghijklmnopqrtuvwxyz{|}~H ?8@ "  (@2P  2  2 P ` p2   2  0 @2P   2   2  X h2x   4  ( 84H     0 HXh4x 4( B@j B@ B@ B@vsvcrefh1prt B@nx B@t B@lsvcrefh2prt B@nt B@B@l B@ B@lpsvcrefh3prt B@nSvcR B@p B@t B@lrsvcrefh4prt B@nt B@ B@istowr B@l%Xsvcrefh5prt B@n B@ B@ B@lsvcrefh6prt B@n B@ B@ B@lsvcrefh7prt B@n B@ B@ B@lsvcrefh8prt B@n B@ B@lsvcrefh9prt B@n B@ B@ B@l svcrefh10prt B@n B@ B@ B@l svcrefh11prt B@n B@ B@Add Instruction Row B@ B@ B@v B@ B@ B@l  B@ B@ B@ B@v SvcRefH12prt B@n B@l svcrefH13prt B@nzl B@xoAttribute VB_Name = "SvcRefHeading" Public Sub MAIN() WordBasic.ToolsUnprotectDocu@ment Ba@bleSel7WorkerAreaCodeFAddChildInfoRow =AU\cŐxMEH 8 " (8superextension  B@oPH|Attribute VB_Name = "SuperExtention" Public Sub MAIN() WordBasic.WW7_EditGoTo DestinBar:="sesEnd \cŎxMEH 8 " (8supervisorname  B@oPH{Attribute VB_Name = "Supervisor" Public Sub MAIN() WordBasic.WW7_EditGoTo Destinati@on:="snCEnd \cŌxMEH 8 " (8workerareacode  B@oPH|Attribute VB_Name = "WorkerAreaCode" Public Sub MAIN() dBasic.WW7_EditGoTo Destination:="wacEnd vŊxME(6 << <x `hp%H@6{97$*\Rffff*1>4b14e8d5 "  4( `4p 4 4 84H 4 4 @P B@j B@lR  ChildInfo1prt B@n B@l ChildInfo2prt B@n B@l ChildInfo3prt B@n B@l ChildInfo4prt B@nc: B@ltowrd. ChildInfo5prt B@nr B@l\cisto ChildInfo6prt B@n B@listowr ChildInfo7prt B@nc: B@vd.zl B@x WorkoAttribute VB_Name = "AddChildInfoRow" Public Sub MAIN () WordBasic.ToolsUnprotectDocument BNextCell &WW7_EditAutoT" :="1"@, Cont:=0, InsertAs :=1U>f2c33c34c3567CharLeft( 30RP N@oReset, Type:=2 EndA \cňxMEGranteeAddress1 sGranteeClientID @CGranteeLastName WorkerExtension BEH 8 ""0@GranteeAddress1  B@oH@uAttribute VB_Name = "GranteeAddress1" Public Sub MAIN() WordBasic.WW7_EditGoTo Destination:=End \cņxMEH 8 ""0@GranteeClientID  B@yoH@uAttribute VB_Name = "GranteeClientID" Public Sub MAIN() WordBasic.WW7_EditGoTo Destination:=End \cńxMEH 8 ""0@granteelastname  B@m)oH@~Attribute VB_Name = "GranteeLast" Public Sub MAIN() WordBasic.WW7_EditGoTo Destination:="glnEnd \cłxMEH 8 ""0@workerextension  B@00oH@xAttribute VB_Name = "WorkerExtension" Public Sub MAIN() dBasic.WW7_EditGoTo DestinaBtr:="weEnd \cŀGranteeFirstName"InsertCisAddress"DFSuperPhoneNumber"PROJECTHxMEH 8 ""0@granteefirstname  B@addoH@Attribute VB_Name = "GranteeFirstL" Public Sub MAIN() WordBasic.WW7_EditGoTo Destination:="g5fnEnd \cżDK/žxME0 @_=Retrieves CIS Client address info from c:\glwin\cistowrd.ini px%TemplateProject.InsertCisAddress.MAIN-][P$enP&atP(P*P,P.P0P2P4P6P8P:P<P>P@PBPDPFPHPJPLPNPPPRPTPV` " (08@HPX`hpx>BF`DBB8>@ FBHD FB Dh FBD@ DBDF`@B>0@p> :606h:>: :` > 2 : 2X 6 : 2 6@ :x 2 6 :( :h F F :8 6x 6 . 26P>: ]]]]]]0]H]`]x]]]]]]] ]8]P]h]]]]]]] WorkerInfoNamec:\glwin\cistowrd.ini %X' $ WorkerInfoAreaCodec:\glwin\cistowrd.ini %X' & WorkerInfo PhoneNumberc:\glwin\cistowrd.ini %X' ( WorkerInfo CountyNamec:\glwin\cistowrd.ini %X' * WorkerInfoDistrictc:\glwin\cistowrd.ini %X' ,P WorkerInfoSectionc:\glwin\cistowrd.ini %X' .PPP WorkerInfoUnitc:\glwin\cistowrd.ini %X' 0 WorkerInfoWorkerc:\glwin\cistowrd.ini %X' 2ApWorkerDistrictNumberc:\glwin\cistowrd.ini %X' 4ApWorker UnitNumberc:\glwin\cistowrd.ini %X' 600`ApWorker WorkerNumberc:\glwin\cistowrd.ini %X' 8FsWorkerDistrictNumberc:\glwin\cistowrd.ini %X' :FsWorker UnitNumberc:\glwin\cistowrd.ini %X' <FsWorker WorkerNumberc:\glwin\cistowrd.ini %X' >SvWorkerDistrictNumberc:\glwin\cistowrd.ini %X' @SvWorker UnitNumberc:\glwin\cistowrd.ini %X' BSvWorker WorkerNumberc:\glwin\cistowrd.ini %X' D ClientInfo FirstNamec:\glwin\cistowrd.ini %X' F ClientInfoLastNamec:\glwin\cistowrd.ini %X' H ClientInfo CaseNumberc:\glwin\cistowrd.ini %X' J ClientInfo CountyNumberc:\glwin\cistowrd.ini %X' L ClientInfoCareOfc:\glwin\cistowrd.ini %X' N ClientInfoAddress1c:\glwin\cistowrd.ini %X' P ClientInfoCityc:\glwin\cistowrd.ini %X' R ClientInfoStatec:\glwin\cistowrd.ini %X' T ClientInfoZipc:\glwin\cistowrd.ini %X' V FirstName %ZG FirstName F B@\jLastName %ZGLastName H B@\jAddress1 %ZGAddress1 P B@\j ClientCity %ZG ClientCity R B@\j ClientState %ZG ClientState T B@\j ClientZip %ZG ClientZip V B@\j CaseNumber %ZG CaseNumber J B@\j CountyNumber %ZG CountyNumber L B@\jCareOf %ZGCareOf N B@\j ApDistrict %ZG ApDistrict 4 B@\jApUnit %ZGApUnit 6 B@\jApWorker %ZGApWorker 8 B@\j FsDistrict %ZG FsDistrict : B@\jFsUnit %ZGFsUnit < B@\jFsWorker %ZGFsWorker > B@\j SvDistrict %ZG SvDistrict @ B@\jSvUnit %ZGSvUnit B B@\jSvWorker %ZGSvWorker D B@\j FirstName2 %ZG FirstName2 F B@\j LastName2 %ZG LastName2 H B@\jGranteeFirstName %ZGGranteeFirstName F B@\jGranteeLastName %ZGGranteeLastName H B@\j WorkerName %ZG WorkerName $ B@\jDistrict %ZGDistrict , B@\jSection %ZGSection . B@\jUnit %ZGUnit 0 B@\jWorker %ZGWorker 2 B@\jAreaCode %ZGAreaCode & B@\j PhoneNumber %ZG PhoneNumber ( B@\j CountyName %ZG CountyName * B@\joAttribute VB_Name = "InsertCisAddress" Public Sub MAI`N() ".DescriptionReeves CIS Client a info from c:\\glwin\\cistowrd`.ini wbProcDatanInvoke_FuncnTemplate"jec4t. .TDim Worker$ Are aCodePhoneNumberCountyDUrictS9{Uni 5 Ap Ap$Ap Fs FsIFs Sv SvSv,irsteLaCas ?c?nCarelOf5u1zCity St@gJZip&#q@dBasic.[GetPrivt fileSngP$](" I", "C "w4 HtG J i13 eg r Z ba a Q$   ʼnA 0c D A%_  & H_ D &fA &iC C?Mr &Pwa d YY%foYdjoonola_oOONoԊm Ffurul/Tz___"OH8ooo""lZ Rooo 41/:r OY "/.???"ONAw///" IfEx0QBookmark("7) ThenSetFormResult , V 6H9 "h%)",q??Q"OOnte%#ooa"OOn~t%#&"?>#SN_\, T+Basic.ExistingBookmark("CareOf") Then WordSetFormResult , ^$ 0 If^ApDrict*,  ecUni?!_&-+ke~r\-.Ffs, aF>sz FFs?<_ FSv3F , FSvF FSv d Pho@neNumb"i,  CountyQ}~0 End Sub xMEH 8 ""0@superphonenumber  B@oH@Attribute VB_Name = "SuperPhoneNumber" Public Sub MAIN() WordBasic.WW7_EditGoTo Destination:="spnEnd ID="{306283AF-C805-4FF7-AC2A-87C1CC79A27E}" Document=ThisDocument/&H00000000 Module=SuperPhoneNumber Module=InsertCisAddress Module=GranteeFirstName Module=WorkerExtension Module=GranteeLastName Module=GranteeClientID Module=GranteeAddress1 Module=AddChildInfoRow Module=WorkerAreaCode Module=SupervisorName Module=SuperExtention Module=AddSvcReferral Module=SvcRefHeading Module=SuperAreaCode Module=GranteeCareof Module=CoSuppaddress Module=CoPhoneNumber Module=ClearCaseInfo Module=NewParagraph Module=GranteeState Module=countynumber Module=WorkerPhone Module=GranteeCity Module=CoExtension Module=ClientState Module=WorkerName Module=GranteeZip Module=CountyName Module=CoAreaCode Module=ClientCity Module=CaseNumber Module=WorkerFax Module=lastname2 Module=FirstName Module=CoAddress Module=ClientZip Module=RowBreak Module=LastName Module=District Module=CaseInfo Module=Address1 Module=Section Module=OtherID Module=CoState Module=Correct Module=AddRows Module=Worker Module=MyInfo Module=County Module=CoCity Module=CareOf Module=FaxAC Module=Date1 Module=CoZip Module=Unit Module=AutoSave Name="TemplateProject" HelpContextID="0" VersionCompatible32="393222000" CMG="ACAE535DB349B749B749B749B7" DPB="9C9E636DA35CA45CA45C" GC="8C8E737D936C946C9493" [Host Extender Info] &H00000001={3832D640-CF90-11CF-8E43-00A0C911005A};VBE;&H00000000 ThisDocumentThisDocumentSuperPhoneNumberSuperPhoneNumberInsertCisAddressInsertCisAddressGranteeFirstNameGranteeFirstNameWorkerExtensionWorkerExtensionGranteeLastNamePROJECTwmCompObjjGranteeLastNameGranteeClientIDGranteeClientIDGranteeAddress1GranteeAddress1AddChildInfoRowAddChildInfoRowWorkerAreaCodeWorkerAreaCodeSupervisorNameSupervisorNameSuperExtentionSuperExtentionAddSvcReferralAddSvcReferralSvcRefHeadingSvcRefHeadingSuperAreaCodeSuperAreaCodeGranteeCareofGranteeCareofCoSuppaddressCoSuppaddressCoPhoneNumberCoPhoneNumberClearCaseInfoClearCaseInfoNewParagraphNewParagraphGranteeStateGranteeStatecountynumbercountynumberWorkerPhoneWorkerPhoneGranteeCityGranteeCityCoExtensionCoExtensionClientStateClientStateWorkerNameWorkerNameGranteeZipGranteeZipCountyNameCountyNameCoAreaCodeCoAreaCodeClientCityClientCityCaseNumberCaseNumberWorkerFaxWorkerFaxlastname2lastname2FirstNameFirstNameCoAddressCoAddressClientZipClientZipRowBreakRowBreakLastNameLastNameDistrictDistrictCaseInfoCaseInfoAddress1Address1SectionSectionOtherIDOtherIDCoStateCoStateCorrectCorrectAddRowsAddRowsWorkerWorkerMyInfoMyInfoCountyCountyCoCityCoCityCareOfCareOfFaxACFaxACDate1Date1CoZipCoZipUnitUnitAutoSaveAutoSave  FMicrosoft Word Document MSWordDocWord.Document.89q @ bjbj5*5* W@W@vii|=@ @EEEEE Ot$LR-EEEEEEE {d 0@$ 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        FORMTEXT °İذڰ(*468LN\^`tvıƱαбұ0jVh_UjAUh_UjTh_UjTh_UjeSh_UjRh_UjTRh_UjQh_UjPh_Uh_jh_Uj(Ph_U202@BDXZbdfz|ʲ̲Բֲز "$8:HJL`bprtjX[h_UjZh_UjYh_UjZYh_UjXh_UjHXh_UjWh_Uj Wh_5U h_5jh_5Uh_jh_UjVh_U-"Jr³:\ԼBjܽ"Jr^]\[ZYXWVUTSRQPONMLKJIHG³ijسڳ(*8:<PRZ\^rt¼ļҼԼּjah_UjOah_Uj`h_Uj `h_Ujc_h_Uj^h_Uj'^h_UUj]h_Uj ]h_Uh_jh_Uj9\h_U3       FORMTEXT        FORMTEXT     FORMTEXT        FORMTEXT        FORMTEXT        FORMTEXT        FORMTEXT     FORMTEXT      FORMTEXT        FORMTEXT        FORMTEXT        FORMTEXT     FORMTEXT     FORMTEXT      FORMTEXT        FORMTEXT        FORMTEXT        FORMTEXT        FORMTEXT        46@BDXZhjlнҽڽܽ޽ "$8:HJL`bprtjygh_Ujfh_UjQfh_Ujeh_UjWeh_Ujdh_Ujdh_Ujrch_Ujbh_Uh_jh_UjVbh_U2¾ľؾھjih_Ujmhh_Uh_jh_Ujgh_U ¾`_/ =!"#$%, where the mail will be delivered). ClientCityDCareOf 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  CoAreaCode000Enter the County's Area Code CoPhoneNumberDCoCity UppercaseEnter the County's City.D CoExtensiond8(OJQJ_HkHmH sH tH VOV CoState1?d8(OJQJ_HkHmH sH tH bOb CoSuppaddress1@d8(OJQJ_HkHmH sH tH \O\ CountyName1Ad8(OJQJ_HkHmH sH tH ^O"^ CountyNumberBd8(OJQJ_HkHmH sH tH VO2V CoZip1Cdt CJOJQJ_HkHmH sH tH ROBR Date11Dd8(OJQJ_HkHmH sH tH XORX District1Ed8(OJQJ_HkHmH sH tH PObP FaxAC Fd` CJOJQJ_HkHmH sH tH ZOrZ FirstName1Gd8(OJQJ_HkHmH sH tH \O\ FirstName21Hd8(OJQJ_HkHmH sH tH dOd GranteeAddress1 Id` CJOJQJ_HkHmH sH tH `O` GranteeCareof Jd` CJOJQJ_HkHmH sH tH \O\ GranteeCity Kd` CJOJQJ_HkHmH sH tH hOh GranteeClientIDLd8(5OJQJ_HkHmH sH tH hOh GranteeFirstName1Md8(OJQJ_HkHmH sH tH fOf GranteeLastName1Nd8(OJQJ_HkHmH sH tH ^O^ GranteeState Od` CJOJQJ_HkHmH sH tH ZOZ GranteeZip Pd` CJOJQJ_HkHmH sH tH XOX LastName1Qd8(OJQJ_HkHmH sH tH ZO"Z LastName21Rd8(OJQJ_HkHmH sH tH VO2V OtherID1Sd8(OJQJ_HkHmH sH tH VOBV Section1Td8(OJQJ_HkHmH sH tH bORb SuperAreaCode1Ud8(OJQJ_HkHmH sH tH dObd SuperExtension1Vd8(OJQJ_HkHmH sH tH hOrh SuperPhoneNumber1Wd8(OJQJ_HkHmH sH tH dOd SupervisorName1Xd8(OJQJ_HkHmH sH tH POP Unit1Yd8(OJQJ_HkHmH sH tH TOT Worker1Zd8(OJQJ_HkHmH sH tH dOd WorkerAreaCode1[d8(OJQJ_HkHmH sH tH fOf WorkerExtension1\d8(OJQJ_HkHmH sH tH XOX WorkerFax ]d` CJOJQJ_HkHmH sH tH \O\ WorkerName1^d8(OJQJ_HkHmH sH tH ^O^ WorkerPhone1_d8(OJQJ_HkHmH sH tH ^O^ WorkerTitle1 `d` CJOJQJ_HkHmH sH tH vx}A0H.Address1CareOf CaseNumber ClientCity ClientState ClientZip CoAddress CoAreaCodeCoCity CoExtension CoPhoneNumber CoState CoSuppaddress County CountyName CountyNumberCoZipDate1DistrictFaxAC FirstName FirstName2GranteeAddress1 GranteeCareof GranteeCityGranteeClientIDGranteeFirstNameGranteeLastName GranteeState GranteeZipLastName LastName2OtherID Section! SuperAreaCode"SuperExtension#SuperPhoneNumber$SupervisorName%Unit&Worker'WorkerAreaCode(WorkerExtension) WorkerFax* WorkerName+ WorkerPhone, WorkerTitle-. Address11CareOf1 CaseNumber1 ClientCity1 ClientState1 ClientZip1 CoAddress1 CoAreaCode1CoCity1 CoExtension1CoPhoneNumber1CoState1CoSuppaddress1County CountyName1 CountyNumberCoZip1Date11 District1FaxAC FirstName1 FirstName21GranteeAddress1 GranteeCareof GranteeCityGranteeClientIDGranteeFirstName1GranteeLastName1 GranteeState GranteeZip LastName1 LastName21OtherID1Section1SuperAreaCode1SuperExtension1SuperPhoneNumber1SupervisorName1Unit1Worker1WorkerAreaCode1WorkerExtension1 WorkerFax WorkerName1 WorkerPhone1 WorkerTitle1(<Pau !2FZk} .BVj~%9Mauv Vbyz }0'/7BFQZ[]`aP l r "^NTr@28'swj :Y ixyayydzfzzz||||}}F !"#$%&()*+,-.012345689:;?@ACDEGHIJKLMNRS\b  &(4:<HNP\_amsu  !-02>DFRXZfikw{} ),.:@BNTVbhjv|~ #%179EKMY_amsvFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF.Address1CareOf CaseNumber ClientCity ClientState ClientZip CoAddress CoAreaCodeCoCity CoExtension CoPhoneNumberCoState CoSuppaddressCounty CountyName CountynumberCoZipdate1DistrictFaxAC FirstName FirstName2GranteeAddress1 GranteeCareOf GranteeCityGranteeClientIDGrenteeFirstNameGranteeLastName GranteeState GranteeZipLastName LastName2OtherIDSection SuperAreaCodeSuperExtensionSuperPhoneNumberSupervisorNameUnitWorkerWorkerAreaCodeWorkerExtension WorkerFax WorkerName WorkerPhone WorkerTitle)=Qbv"3G[l~ /CWk&:Nbx  !"#$%&'()*+,-';O`t  1EYj|-AUi}$8L`tx_x@ m/(vpppUnknown]z Times New Roman helvetica5Symbol3& z Arial?5 z Courier New"h0@?_