ࡱ> \_[x~o@ !l#bjbj p p Qoo-*M...8YTl5f$|D$Z%Z5Z5Z5Z5Z5Z5$6R99~5-~55 Z% Z% !! 0PQ.!!t505!9 9!9!  ~5~5d. .MICHIGAN FAMILY INDEPENDENCE AGENCY FOSTER CARE FACE SHEET PS Case #: FORMTEXT      PS Case Name: FORMTEXT      Parent/Caretaker Female: FORMTEXT      Parent/Caretaker Male: FORMTEXT      County: FORMTEXT      FIA FC Worker Load #: FORMTEXT      Check if this form is submitted for ISP FORMCHECKBOX or USP FORMCHECKBOX  List all children in the family and indicate if the child is in placement.Placed?YesNo FORMDROPDOWN .FC Case #: FORz    : < P R T ^ ` b d " 6 8 : D F H J h*5jh*Ujh*Ujh*Uj h*Ujh*Ujh*UmHnHujh*Ujh*Uh*OJQJh*7Lz|~tnn$Ifnkd$$Ifl\K#")z_-4 la $$Ifa$0$If$$If9$If#j#hK  : b Pnkd^$$Ifl\O")-4 la8$If"$If5kd$$Ifl"))-4 lab d H cV "$p$If^pa$Hkd$$Ifl0 ")l "-4 la8$If"$IfHkd$$Ifl0 ")l "-4 laH J 8$If"$Ifnkdj$$Ifl\*t"")-4 la      : < P R T ^ ` b d zj" h*UjV h*Uj h*Ujh*UmHnHujE h*UU h*@jY h*Uh*OJQJh*5OJQJjh*U h*5h*jh*Ujh*U0 RL"$If5kd$$Ifl"))-4 la $Ifnkd($$Ifl\xr")-4 la Z[kdT $$IflF"3'"):#e-    4 la"$If "$$Ifa$$If5kd $$Ifl"))-4 la  : b {uouff`$If 8$$Ifa$"$If8$If"p$If]p^ "p$If]pkkd $$Ifl\"D%c)O*"*4 la MTEXT      FC Case Name: FORMTEXT       FORMCHECKBOX  FORMCHECKBOX Primary Provider (MPS)# FORMTEXT      Secondary Provider (MPS)# FORMTEXT      Other Households with Legal Right for Case Planning:Non-Custodial Parent Household # FORMDROPDOWN :Last Name: FORMTEXT      First Name: FORMTEXT       FIA-0144 (Rev. 10-99) MSWord  PAGE 1 !!!R!T!V!`!b!d!h!j!l!n!p!r!v!z!|!~!!!!!!!!!!!!!!!""\"^"z"|"~"""""""""""jh*Ujh*Uh*5OJQJ h*5 h*@j_h*Ujh*UmHnHujh*Uh*OJQJh*jh*U; !E;-'8$If"p$If]p^ "p$If]pkd $$IflִhJ "|$3'")+o-    4 la!H@HNHPHRHfHhHvHxHzHHHHHHýòýڪzljhp[#CJOJQJUjhp[#Ujhp[#Ujhp[#Uj+hp[#Uhp[#jhp[#Uh90J6mHnHu h*0J6jh*0J6U h*5h*OJQJh*jh*UmHnHujh*Uj?h*U&##### # #~xxxxx8$Ifkd$$IflrV ")|Fpp-4 la #####f#h#j#l#(HPHxH~|wuluu|jhfH@C  !&$a$"kd$$IflrV ")|Fpp-4 la 0 / =!"#$%$$If!vh5z55_5#vz#v#v_#v:V l-5z55_54L$$If!vh5)#v):V l-5)4D PSCaseNoEnter PS case number.CaseInfoD PSCaseName'Enter PS case name (primary caretaker).$$If!vh5555#v#v#v#v:V l-5555/ / 4D<ParentCaretakerFemal+Enter parent/caretaker first and last name.b$$If!vh5l 5"#vl #v":V l-5l 5"4D<ParentCaretakerMale+Enter parent/caretaker first and last name.p$$If!vh5l 5"#vl #v":V l-5l 5"/ 4D- CountyName UppercaseEnter the County's Name.D FCWorkerLoadNo'Enter in assigned worker's load number.$$If!vh5555#v#v#v#v:V l-5555/ / 4DeCheck if for ISP DeCheck if for USP$$If!vh5555#v#v#v#v:V l-55554L$$If!vh5)#v):V l-5)4L$$If!vh5)#v):V l-5)4x$$If!vh5:#5e5#v:##ve#v:V l-5:#5e54$$If!vh5"5*55#v"#v*#v#v:V l5"5*554Df dropdown1 12345678910111213141516171819D FCCASENO0Enter child's FC case number. Example C1000000A.D FCCASENAMEEnter child's FC case name.DeCheck18+Has the child been placed? Check yes or no.DeCheck18+Has the child been placed? Check yes or no.$$If!vh555+5o5555#v#v#v+#vo#v#v#v#v:V l-555+5o5555/ / 4mDPrimaryProviderCANozDSecondaryProviderFHN PopUpPrompt1$$If!vh55 55u 5x5#v#v #v#vu #vx#v:V l-55 55u 5x5/ / 4$$If!vh555+5o5555#v#v#v+#vo#v#v#v#v:V l-555+5o55554$$If!vh555+5o5555#v#v#v+#vo#v#v#v#v:V l-555+5o55554$$If!vh555+5o5555#v#v#v+#vo#v#v#v#v:V l-555+5o55554$$If!vh55 55u 5x5#v#v #v#vu #vx#v:V l-55 55u 5x54L$$If!vh5)#v):V l-5)4L$$If!vh5)#v):V l-5)4Df Dropdown2 12345678910111213141516171819DNonCustodialLast1'Enter non-custodial parent's last name.DNonCustodialFirst1(Enter non-custodial parent's first name. PopUpPrompt2$$If!vh5|5F5p55p#v|#vF#vp#v#vp:V l-5|5F5p55p4$$If!vh5|5F5p55p#v|#vF#vp#v#vp:V l-5|5F5p55p4mDPrimaryProviderCANoD FCCASENAMEEnter child's FC case name.D FCCASENO0Enter child's FC case number. Example C1000000A.zDSecondaryP;8@8 Normal_HmH sH tH DA@D Default Paragraph FontVi@V  Table Normal :V 44 la (k@(No List 4@4 Header  !J @J Footerdt !CJOJQJkHPOP BLANKLINEdx5CJOJQJkHTO"T Captions 6ptd(CJ OJQJkHDO!2D Captions 6pt bold5`OB` Captions 6pt boxd<5CJ OJQJkHDO!RD Captions 6pt Nbox<DO!bD Captions 7pt dtCJDOarD Captions 7pt Bold5`O` Captions 7pt boxdt<5CJOJQJkH^O^ 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 Nbox!5BO"B Captions 10pt" OJQJkHLO!2L Captions 10pt 2 line #<^OB^ Captions 10pt Bold$d`(5OJQJkHXORX Captions 10pt box%d`P OJQJkHHOAbH Captions 10pt Nbox&P5FOrF Captions 11pt'CJOJQJkHROAR Captions 11pt Bold(dCJLOL Date 08pt )d8(5CJOJQJkH6O6 Date 09pt*CJ6O6 Date 10pt+CJ2O2 Date 11pt,CJROR Form Title 10pt-$d8a$ OJQJkH^O^ Form Title 10pt Bld.$d8a$5OJQJkHVOV Form Title 11pt/$d$a$CJOJQJkHLOL Form Title 11pt Bld0d$CJVOV Form Title 12pt1$da$CJOJQJkHbO"b Form Title 12pt Bld2$da$5CJOJQJkHTO2T Letter Text 10pt3$d$a$ OJQJkHFO1BF Letter Text 11pt4dCJXORX Letter Text 12pt5$da$CJOJQJkH.)@a. Page NumberHOrH Small Blank Line 7CJTOT User Input 10pt8d8( OJQJkHTOT User Input 11pt9d$5CJOJQJkH\O\ User input 12pt:d((5CJOJQJkH@&=>?@ABMao$%M_fxy{|1CUVWXp   AL`l90( $0( 00(00( 0( 0, 0(0( 0, "0( 80( "0( 80( 0, "0( 80( 0, "0( 80( 0, "0( 80( "0( 80( 0, "0( 80( "0( 80( 0, 0( 0, "0( 0, 0( "0( "0( 0, 0( "0( "0( 0( 0, "0( "0( 80( "0( 80( 80( 80( 0( 0, "0( "0( 80( "0( 80( 80( 0, "0( "0( 80( "0( 80( 80( 80( 0( 0, "0( "0( 80( "0( 80( 80( 80( 0( 0, "0( "0( 80( "0( 80( 80( 80( 0( 0, "0( "0( 80( 80( 80( 80( 0, "0( 0, 0( 0, "0( "0( 80( #0( 80( 0, 80( 80( 80( 80( 80( 0, "0@0}|0@0}|0b,,,/MY_o{"M]fv )/1ACSp|.>LX^lx~FFFFFFG$G$S$FFG$G$FFS$FF&(/!PSCaseNo PSCaseNameParentCaretakerFemalParentCaretakerMale CountyNameFCWorkerLoadNo dropdown1 Dropdown2Np/`#?M`o#0pL_l Sandy Cain Sandy Cain Sandy Cain Sandy Cain Sandy Cain Sandy Cain Sandy Cain AdministratorFIA MaldonadoD9*=>?ABMao$%M_fxy{|1CUVWXp   AL`lV,!(!@V+!(!@V*!(!@V)!(!@V(!(!@V'!(!@V&!(!@V%!(!@V$!(!@V#!(!@V "!(!@V!!(!@V"!(!@V#!(!@V$!(!@V%!(!@ FC FACE SHEET TOOLSFC FACE SHEET TOOLSf~|_~|_~|_~|_~| 0  Clear Case InfoClear Case InfoClearCaseInfo.MAIN" Change Case Info Case Info CaseInfo.MAIN"  Add FC Case Add FCCaseAddFCCase.MAIN" Add Non-Custodial Non CustodialNonCustodial.MAIN"  Remove Row Remove RowRemoveRow.MAIN"(TemplateProject.ToolHelp.MAIN Tool Help ToolHelp.MAIN1 ( Check SpellingNewMacros.CheckSpelling(p(p-'TemplateProject.NewMacros.CheckSpelling'TemplateProject.AddSocWkContactRow.MAIN$TemplateProject.AddChildInfoRow.MAIN#TemplateProject.AddSvcReferral.MAIN"TemplateProject.SvcRefHeading.MAIN"TemplateProject.ClearCaseInfo.MAIN!TemplateProject.PopUpPrompt2.MAIN!TemplateProject.PopUpPrompt1.MAIN!TemplateProject.NonCustodial.MAIN TemplateProject.LegalStatus.MAINTemplateProject.RemoveRow.MAINTemplateProject.IdentInfo.MAINTemplateProject.AddFCCase.MAINTemplateProject.ToolHelp.MAINTemplateProject.CaseInfo.MAINTemplateProject.test.MAINTEMPLATEPROJECT.TEST.MAINTEMPLATEPROJECT.CASEINFO.MAINTEMPLATEPROJECT.TOOLHELP.MAINTEMPLATEPROJECT.ADDFCCASE.MAINTEMPLATEPROJECT.IDENTINFO.MAINTEMPLATEPROJECT.REMOVEROW.MAIN TEMPLATEPROJECT.LEGALSTATUS.MAIN!TEMPLATEPROJECT.NONCUSTODIAL.MAIN!TEMPLATEPROJECT.POPUPPROMPT1.MAIN!TEMPLATEPROJECT.POPUPPROMPT2.MAIN "TEMPLATEPROJECT.CLEARCASEINFO.MAIN!"TEMPLATEPROJECT.SVCREFHEADING.MAIN"#TEMPLATEPROJECT.ADDSVCREFERRAL.MAIN#$TEMPLATEPROJECT.ADDCHILDINFOROW.MAIN$'TEMPLATEPROJECT.ADDSOCWKCONTACTROW.MAIN%'TEMPLATEPROJECT.NEWMACROS.CHECKSPELLING@Z_`(ZZ(`` ` UnknownG: Times New Roman5Symbol3& : Arial?5 z Courier New"h*| fL:Yr4d H(?9FCFACE, Foster Care Face Sheet Sandy Cain MaldonadoDIL@LNormalOh+'0  8 D P \hpxFCFACE, Foster Care Face SheetCFA Sandy Caintand0144 Ca MaldonadoDt4ldMicrosoft Word 10.0@ @@-g<@nQ՜.+,0 hp  State Of Michiganr{ FCFACE, Foster Care Face Sheet Title  "#$%&'()*+,-/0123456789:;<=>?@ABCDEFGHIJLMNOPQRTUVWXYZ]^tabcdpfghijklmnoqrsuwvz{|}~Root Entry F`dQ`Data !1Table.YWordDocumentQSummaryInformation(KDocumentSummaryInformation8SMacros+)QP3QVBAQP3Qdir>test  J__SRP_0e__SRP_1 'c  !"#$%&()*+,-./0123456789:;<=>?@BDEFGHIJKLMOQSUWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~:0* pHdTemplateProjectQH@  = | 7 J< 9stdole>stdoleP f%\*\G{00020430-C 0046}#2.0#0#C:\WINNT\System32\STDOLE2.TLB# Automation#/MSForms>!SFErms/z pF26408BC2-0870-11D3-A6MBC1923E 36822 FDOWS\SYSTEM\3.TWD#Microsoft = ` Ob LibrarFy90j?C21149E3-E43E?@1-89BE6008929C4B?:P\VBE xp(6 << <7$*\Rffff*4037ffc245 `@@0@$(`PME " (8H B@( B@ B@,l@8hAttribute VB_Name = "test" Public Sub MAIN() WordBasic.LineD own 2 *EditClear TDUpPEnd rU K)^ rU~~~~~~~~~~~~~~~~~~~~~~~~~~~~1 {jX0%   9  i ia  i  a  i 1Y  `i Aa  i !a  Hy,Y,)  0144FAC ThisDocumentTemplateProjectModule1AddSocWkContactRowAddChildInfoRowAddSvcReferral SvcRefHeading ClearCaseInfo PopUpPrompt2 PopUpPrompt1 NonCustodial LegalStatus RemoveRow IdentInfo AddFCCaseToolHelpCaseInfotestF=C:\Program Files\Common Files\Microsoft Shared\VBA\VBA332.dllVBA Y  ( F4C:\Program Files\Microsoft Office\Office\MSWORD8.OLBWord q 80FC:\WINNT\System32\STDOLE2.TLBstdole HI>`KC:\WINNT\System32\MSForms.TWDMSForms aAX.E .`M I>`KC:\TEMP\VBE\MSForms.EXDHideText iAhL-[DR 2C:\Program Files\Microsoft Office\Office\MSO97.DLLOffice axMAIN  F  F  ViewToolbars ColorButtons LargeButtonsToolTips FC FACE SHEET ToolsToolbarShow Database Drawing Forms CaseInfo BeginDialog YourFCCNoTextBox YourFCCN YourFCWLNo YourFCWN YourPSCNo YourPSCN YourCTNO YourHAL YourHAF YourDC 0Enter the following information about this case. FC Case No.: FC Case Name: FC Load No.: FC Worker Name: PS Case No.: PS Case Name: Court ID No.:  Household Assess Last Name:  Household Assess First Name: Date Completed:OKButton CancelButton EndDialog CurValues UserDialog GetPrivateProfileString$ UserInfo FCCaseNo C:\Windows\CaseInfo.ini YourFCCNo FCCaseNameYourFCCN FCLoadNo YourFCWLNo FCWorkerNameYourFCWN PSCaseNo YourPSCNo PSCaseNameYourPSCN COURTNOYourCTNO HouseholdLastYourHAL HouseholdFirstYourHAF DCompletedYourDCDialog SetPrivateProfileString FCCASENO ExistingBookmark SetFormResult FCCASENAME MatchCase FCWORKERLOADNO FCWORKERNAME PSCASENO PSCASENAME HOUSEHOLDASSESSEDLST HOUSEHOLDASSESSEDFST DATECOMPLETED YourPOSA YourPOSW FIA FC Load No.: FIA FC Worker Name: POS Agency Name: POS Worker Name: Household Assess First Name: C:\winnt\caseinfo.ini POSAgencyNameYourPOSA POSWorkerNameYourPOSW POSagencyname POSworkername POSA POSW Add Foster Care Case .**To Add Additional Row for Foster Care Case** *After entering Secondary Provider (MPS#),  +Click ADD FC CASE Button on FIA-144 Toolbar   c:\windows\ caseinfo.ini FileFind SearchName SearchPathNameSubDirTitleAuthorKeywordsSubjectOptions PatternMatch DateSavedFrom DateSavedToSavedByDateCreatedFrom DateCreatedToViewSortByListBy SelectedFile c:\windows\caseinfo.iniKill c:\winnt\ c:\winnt\caseinfo.ini C:\caseinfo.ini c:\ c:\caseinfo.ini NewMacros CheckSpellingk Fu F F POSa POSwS      *Add row to III. Social Work Contact Table 'TemplateProject.AddSocWkContactRow.MAIN 1Add row to Children Information table (Landscape) $TemplateProject.AddChildInfoRow.MAIN4Adds a row to A. Service Referral Table (Landscape) #TemplateProject.AddSvcReferral.MAINEAdd heading row if Service Referral table expands to a second page. "TemplateProject.SvcRefHeading.MAIN #Remove a single row from any table.PRemove previous Case Information from file so that new information may be added. "TemplateProject.ClearCaseInfo.MAIN ,View instructions for using FIA-144 buttons. !TemplateProject.PopUpPrompt2.MAIN -View instructions for using FIA-#### buttons. !TemplateProject.PopUpPrompt1.MAIN9Add Additional Non-custodial parent household information !TemplateProject.NonCustodial.MAIN #Add a row to I. Legal Status table  TemplateProject.LegalStatus.MAINTemplateProject.RemoveRow.MAIN5Add a row to Identifying Information Child(ren) tableTemplateProject.IdentInfo.MAINAdd FC Case RowsTemplateProject.AddFCCase.MAIN ,View instructions for using FIA-#### buttonsTemplateProject.ToolHelp.MAINSEnter Case Information, i.e., FC Case Name, FC Case Number, FC Worker Load #, etc. TemplateProject.CaseInfo.MAIN %Macro recorded 10/09/99 by Sandy Cain 'TemplateProject.NewMacros.CheckSpellingrU $`1  prU~}  ,,,)&$'hx"$ 4x x5h3D'Hhx"$ <x x6hH8DHhx"$ <x x6hH# x"$ <x x*2x"__SRP_2Am__SRP_3 C__SRP_4NT__SRP_5 Pm$ x k2xx"$ 4x x^]'''''''''' 'H'hx"$ 4x x6hH 8:XNhhcHx"$ 4x x6hH$^ @ xhH krU~} krU $`prU~} krU $`px7__SRP_6RT__SRP_7TeCaseInfoy\&ToolHelpVxBp`P6 LLL<<<7$*\Rffff*1837fd42a0*\R1*#17b*\R1*#c1*\R1*#c1*\R1*#c1 `@HohhSEnter Case Information, i.e., FC Case Name, FC Case Number, FC Worker Load #, etc. TemplateProject.CaseInfo.MAIN@l PhPdP`P\PXPTPPPLPHD@@ PD` Z@Z$P8 h@(0  @@ @X @p @ @ (@  0 MEi " (08@HP` "9h 1(=&=(=&=@(=h&=&=&=&=$=0N=*=,=.=02=`*=,=,=0=(.=X.=778  @4P <p>F@@F>FBF>F8@Fx>F:F:F@F 26 &>=@=@>= B=X >= >= @= >=` :=8:= @=` "` :B <B :B >B :B <B :BH 6B 6B <B "6V:VBV >Vh6V:V6V .VX.VBV 4P XZZZZZ Z8ZPZhZZZZ B@e, DEFINE DIALOG BOXI^CaseInfo B@o  YourFCCNo B@8 YourFCCN B@P  YourFCWLNo B@h YourFCWN B@  YourPSCNo B@ YourPSCN B@ YourCTNO B@^YourPOSA B@^YourPOSW B@fYourDC B@(fYourHAF B@k  0Enter the following information about this case. B@f# FC Case No.: B@f; FC Case Name: B@fS FIA FC Load No.: B@fk FIA FC Worker Name: B@f PS Case No.: B@f PS Case Name: B@f  Court ID No.: B@f$-JT POS Agency Name: B@fT POS Worker Name: B@fJ Household Assess First Name: B@f Date Completed: B@f^X B@dJX B@E8 B@JLZE !!.6GET USER INFO FROM INI FILE AND PUT IT INTO DIALOG BOX8LUserInfoFCLoadNoC:\caseinfo.ini % ( UserInfo FCWorkerNameC:\caseinfo.ini % ( UserInfoPSCaseNoC:\caseinfo.ini % ( UserInfo PSCaseNameC:\caseinfo.ini % (UserInfoCOURTNOC:\caseinfo.ini % (\cUserInfoPOSWC:\caseinfo.ini % ( UserInfoPOSa !C:\caseinfo.ini B@ %UserInfoHouseholdFirstC:\caseinfo.ini % (eholUserInfo DCompletedC:\caseinfo.ini % (UserInfoFCCaseNo !C:\caseinfo.ini B@(UserInfo FCCaseName !C:\caseinfo.ini B@,DISPLAY DIALOG BOX AND RESPOND TO USER INPUTF  !%'  OK BUTTONWRITE NEW USER INFO IN INI FILEOUserInfoFCLoadNo !C:\caseinfo.ini B@B@UserInfo FCWorkerName !C:\caseinfo.ini B@i UserInfoPSCaseNo !C:\caseinfo.ini B@inUserInfoPSCaseNo !C:\caseinfo.ini B@ntUserInfo PSCaseName !C:\caseinfo.ini B@UserInfoCOURTNO !C:\caseinfo.ini B@UserInfoPOSw !C:\caseinfo.ini B@ B@UserInfoPOSaC:\caseinfo.ini %' asUserInfoHouseholdFirst !C:\caseinfo.ini B@orkeUserInfo DCompleted !C:\caseinfo.ini B@UserInfoFCCaseNoC:\caseinfo.ini %' B@UserInfo FCCaseNameC:\caseinfo.ini %' aseiUserInfoFCLoadNoC:\caseinfo.ini %' C:Get user info from INI fileUserInfo FCWorkerNameC:\caseinfo.ini %' UserInfoPSCaseNoC:\caseinfo.ini %' ' UserInfo PSCaseNameC:\caseinfo.ini %' %UserInfoCOURTNOC:\caseinfo.ini %' ini UserInfoPOSWC:\caseinfo.ini %' %UserInfoHouseholdFirstC:\caseinfo.ini %' UserInfo DCompletedC:\caseinfo.ini %' eUserInfoFCCaseNoC:\caseinfo.ini % (ol Update Form with user infoFCCASENO %FFCCASENO  B@g FCCASENAME %F FCCASENAME  B@gFCWORKERLOADNO %FFCWORKERLOADNO  B@g FCWORKERNAME %F FCWORKERNAME  B@gPSCASENO %FPSCASENO  B@g PSCASENAME %F PSCASENAME  B@gCOURTNO %FCOURTNO  B@gPOSA %FPOSA  B@gPOSW %FPOSW  B@gHOUSEHOLDASSESSEDFST %FHOUSEHOLDASSESSEDFST  B@g DATECOMPLETED %F DATECOMPLETED  B@g. Update other Form Fields on Form & Exit Macroa h l OPEN FC FACE SHEET TOOLS UserInfo FCCaseNameC:\caseinfo.ini % (xUserInfoPOSAC:\caseinfo.ini % (Attribute VB_Name = "CaseInfo" Public Sub MAI`N() D.rDescriptionEnt(er  rma2, i.e.p, FC4umberWork?Load #, etc. vProcDataInvoke _FuncTe@mplate"ject..LDim iRet UserF`CCNo$ WLWNPS CCTNOOSA WDC 'OPENFACE SHEET TOOLS dBasic.ViewToolbars ColorButtons:=1, Large0, Tip 'DEFINE DIALOG BOXIBeginDialog 58`5, 35ɇ G#TextBox 1 32, 26 18, "8YouCX^ 56{ 8$ jW 7@ 104WN122}\ 5BA  7B 7Z20@6i]P@ Yu22 !W5e! 4 !10& DCR 107,, 413Athe following info$ about this c. 9!R` 39 Fo.:w5n1o8 IAAsBN `"`fAAx13xPS317"Cut ID ov 1 d2034/M Agency B92B+"B5" e eted)OKc26@B8@W21 kCancel4!On Error ResuN`adEndcccdlg As Ob: Set I= 'CurValue\s.! G`USER INFO FROM I FILE AND@ PUT I@NTOJ .&G[GetPriv#sfileStr`9$](" ";Pr9NoC:\9;.ini"ُCNg{A$e1_CqX 46, 2NEWoZSAL6BDf to brAup npop-!een.(75(3. Ente*rcAVi@Vrm"aºandWick OK1i=TheIwilHl finAVtokT2 *BADD Addi'Xal gs|1~4'#>A>= I7* Non-Custod` Parent Household8NON-CUSTOamT 42kREMOVE a Row from@Table**^24cD ROW_MOK14K88, 30aEnd c dlgUserAs ObbA: SI= 'CurValpues.! GET USERcPFROM ILE AND PdIT`TOJI`SPLAY"RESPO  `| G(3If"`-1 ln 'OK @BUTTON#'vG`Kr`Ӡ8INIne Upd o`or Form FieP"& Exit Macro ,` If rU $` prU~} # %%%)& A&q&&&')'I'q''__SRP_16m__SRP_17__SRP_18m__SRP_19' (I((((1)q))))!****+ ,(:h%:X!%:H%(8%:(%:%:%:%(%(%:%(%:%:%:%:x%:h%(X%(H%(8%((%x"$ @x. x%:h"%x"$ @xx%T$ xkrU $`)prU~}  " 1# $$q 9i)D1(XF%(Hp%:8%h"$ @hh=(X %(H %(8%(( %:%h"$ @hh=(X;%(H %(8%(( %:%h"$ @hh=(X;%(H.%(8%(( %:%h"$ @hh7(X^%(HR%(8N%((%h"$ @h h7(X%(HR%(8X%((%h"$ @h hh"$ @h h2h"$ @hW W 4h66 @h"$ @hW lh5lDX]/\,lhkrU $__SRP_1am__SRP_1bXAddFCCase IdentInfo `9  pxpj (<<< <7 `rU~} X 1 q a 1 i Q1i Q1yY !q 9iQ )i Q Iy A!q!!!I)Q!1"A Yy""Q+-A-@9(0%( %(%@"$ @@ @1(0I%( ^%:%@"$ @@@=(0%( %( %(%: %@"$ @@ @=(0%( 8%( %(%: %@"$ @@ @=(0%( P%( %(%: %@"$ @@ @=(0%( h%( %(%: %@"$ @@ @=(0%( %( %(%:%@"$ @@ @=(0%( %( %(%:%@"$ @@ @=(0%( %( %(%:%@"$ @@ @=(0%( %(^%(%:%@"$ @@ @=(0%( %(^%(%:%@"$ @@ @=(0%( %(f%(%:%@"$ @@ @=(0k%( %(%( %:%@"$ @@@=(0%( #%(%( %:%@"$ @@@=(0%( ;%(%( %:%@"$ @@@=(0%( S%(%( %:%@"$ @@@=(0%( k%(%( %:%@"$ @@@=(0%( %(%( %:%@"$ @@@=(0%( %(%( %:%@"$ @@@=(0%( %(%( %:%@"$ @@@=(0%( %(T%( %:%@"$ @@@=(0%( %(T%( %: %@"$ @@@=(0%( %(%( %:#%@"$ @@@7(0^%( %(X%(%@"$ @@$@7(0%( %(X%(%@"$ @@%@K@"$ @@&@2@"$ @@W'W(4@6F:)%:0*%: +%:U%@"$ @@%-@5F:)%:0*%: .%:U%@"$ @@%/@5F:)%:0*%: 0%:U%@"$ @@%1@5F:)%:0*%: 2%:U%@"$ @@%3@5F:)%:0*%: 4%:U%@"$ @@%5@5F:)%:0*%: 6%:U%@"$ @@%7@5F:)%:0*%: 8%:U%@"$ @@%9@5F:)%:0*%: P%:U%@"$ @@%;@5F:)%:0*%: Q%:U%@"$ @@%=@5F:)%:0*%: B%:U%@"$ @@%C@56 @@"$ @@WD(l@5lD0]/\=:0*%: +%W-%:U%@"$ @@E@5=:0*%: .%W/%:U%@"$ @@E@5=:0*%: 0%W1%:U%@"$ @@E@5=:0*%: 2%W3%:U%@"$ @@E@5=:0*%: 4%W5%:U%@"$ @@E@5=:0*%: 4%W5%:U%@"$ @@E@5=:0*%: 6%W7%:U%@"$ @@E@5=:0*%: 8%W9%:U%@"$ @@E@5=:0*%: V%W;%:U%@"$ @@E@5=:0*%: W%W=%:U%@"$ @@E@5=:0*%: B%WC%:U%@"$ @@E@5B:)%:0*%: +%:U%@"$ @@`1h@5B:)%:0*%: .%:U%@"$ @@`1d@5B:)%:0*%: 0%:U%@"$ @@`1`@5B:)%:0*%: 2%:U%@"$ @@`1\@5B:)%:0*%: 4%:U%@"$ @@`1X@5B:)%:0*%: 6%:U%@"$ @@`1T@5B:)%:0*%: 8%:U%@"$ @@`1P@5B:)%:0*%: V%:U%@"$ @@`1L@5B:)%:0*%: Q%:U%@"$ @@`1H@5B:)%:0*%: B%:U%@"$ @@`1D@5*:0H%@"$ @@I@\,:0H%h@@"$ @@J@*:0K%@"$ @@I@\,:0K%d@@"$ @@J@*:0L%@"$ @@I@\m,:0L%`@@"$ @@J@*:0M%@"$ @@I@\,:0M%\@@"$ @@J@*:0N%@"$ @@I@\,:0N%X@@"$ @@J@*:0O%@"$ @@I@\o,:0O%T@@"$ @@J@*:08%@"$ @@I@\,:08%P@@"$ @@J@*:0P%@"$ @@I@\,:0P%L@@"$ @@J@*:0Q%@"$ @@I@\q,:0Q%H@@"$ @@J@*:0T%@"$ @@I@\,:0T%D@@"$ @@J@T< DLhTXH\d`lP@kx22p$Add FC Case RowsTemplateProject.AddFCCase.MAIN@HME3 "   ( 8 HXh    2 0 @ P4`   6  4  X h2x     0 0 @ P0`     0@ B@ 2 B@"_ B@:dCare B@:4 B@8  B@,: B@(ement B@$ B@& B@( B@* B@, B@0 B@.fieldno468 B@2 B@: B@: B@. 1FCCaseNo468 B@2 B@: B@: B@. 1FCCaseName468 B@2 B@: B@. PlacedYes468 B@2 B@: B@.PlacedNo468 B@2 B@: B@: B@: B@: B@.1CANo468 B@2 B@: B@: B@.1FHNo468 B@2 B@, B@< B@< B@< B@< B@( B@. B@,@n B@>l Attribute VB_Name = "AddFCCase" Public Sub MAIN() D.tDescri ption FC  RowsfProcData?Invok@e_Func?Template"ject..pMWordBasic.FileS ave ToolsUnprot=Document !NextCellTab/pliLine0Up 2 Down 1, 1 9!elD EditCopy #PastrBCharRighBtCWW6_8lear-WW7AutoTE :="fieldno", Cont:=6InsertAs:=0|, V.$1N$)$I. PlacedYesitmD?2rtD.G#~?7H[1CA&"1FH$ʍPrev-#+a ⚪UD±@ NoReseB, Type:=`End xph;?(<<      !"#$%&'()*+,-./012356789:;<=>?@ABCDEFGHJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijlmnopqrstuvwxyz{|}~< <7 `xp$5Add a row to Identifying Information Child(ren) tableTemplateProject.IdentInfo.MAINHME "   (8P`0p 0 6 (68 p6 4    0 @Pp B@  B@" B@:L B@J B@0 B@,Name1468 B@2 B@:Date2468 B@2 B@: CaseNumber1468 B@2 B@:_ EnteredCare468 B@2 B@: ToPlacement468 B@2 B@:\\1 DatePlace468 B@2 B@<" B@< B@< B@<! B@<@n B@> @#lױAttribute VB_Name = "IdentInfo" Public Sub MAIN() D.tDescri ptionAdd a row to ifying rmaNChild(ren) tablemXProcDatadInvok@e_FuncdTemplate"ject..MWordBasic.FileSave ToolsUnprot Docum} NextCell TVInsertRqNums:="9CharRight 1 LineUp WW7_EditAuto:T8 Ā'1"@, Cont :=0,;A7<:=0Y0e2XUCase@Hber2rEHredCare33ToPlace?AfBnPrevA`goIg NoReset@R, Type:=2 End NewMacros RemoveRow4>LegalStatusICNonCustodial#kx p>L ,6 LLLL<0<4<8<<<7$*\Rffff*3f37ffc1ea*\R1*#17b*\R1*#c1*\R1*#17e*\R1*#c6*\R1*#1e*\R1*#129*\R1*#a4*\R1*#5b*\R1*#166*\R1*#91`80O$ `k,O$%Macro recorded 10/09/99 by Sandy Cain'TemplateProject.NewMacros.CheckSpellingP  l@x @h @8X @hH @D @4 @2 @ @ @ @ @ @ M@ @( @@ @ 88xME"   ,8 h $ 3p8 #*  ](888lp CheckSpelling Macro& Macro recorded 10/09/99 by Sandy Cain  B@x    B@$  (cord l! S B@a B@h @ n B@ B@DZAttribute VB_Name = "NewMacros" Sub CheckSpelling()  h.Descri`ption recorded 10/09/99 by Sandy CainfQProcData]Invoke _Func]Te@mplate"ject.. _' ' #Q ActiveDocument.Unprot>Sel~.HomeKey Unit:=wdStory End, ExtendLanguageIDwdEng@lishUSI(f OsGrammarWithTrue Then P6P Else  nd IfM@lM Passw:="", No0ReseKA', Type:= _C(wdAllowOnlyFormFields Q xpn#+(<<< <7 `xp$#Remove a single row from any table.TemplateProject.RemoveRow.MAIN0HME "   (8Xh B@"G B@$  B@@n B@> l Attribute VB_Name = "RemoveRow" Public Sub MAIN() D.tDescri ption a single row from any table.Pro cDataRInvoke_FuncRTemplate"ject.-.M WordBasic.ToolsUnprot-Document !Selu D rt ,B+ NoReset:=1, Type:=2 End xpl#(<<< <7 `xHp$#Add a row to I. Legal Status table TemplateProject.LegalStatus.MAIN0HME "   (8 P4` 6 6 (68 p6    ( B@  B@" B@:L B@J B@: LegalName468 B@2 B@:X Initialdate468 B@2 B@: Wardshipdate468 B@2 B@: WardshipType468 B@2 B@:todial NextCrtDate468 B@2< B@<B@< B@<B@< B@<  B@<@n B@>lAttribute VB_Name = "LegalStatus" Public Sub MAIN() ".xDescriptionAdd a row to I.   tab leProcDataRInvoke_FuncRTemplate"ject..OWordBasic.FileSave ToolsU nprotCDocument NextCel l TWInsertRiNum0s:="9WW7_EditAutoT, ^", ContA :=0, 2Ac-:=1O2Initiald3Wardship?o4Type4rrtPrevMЭ@I NoRes$et, AD:=@2 End xpb;(<<< <7 `xp$9Add Additional Non-custodial parent household informationB#!TemplateProject.NonCustodial.MAINHME "  (8P` x      < P `<p     B@ enteri B@"ry Pro B@( L B@J B@,' B@0 B@&x B@( B@< B@: B@0 B@* B@: B@: B@.Noncustodiallast1468 B@2 B@: B@:Noncustodialfirst1468 B@22. B@<ry B@<S\F B@<FCS B@D\@n B@>lAttribute VB_Name = "NonCustodial" Public Sub MAIN()  ".zDescriptionAdd iHal -c parent household informa,q\ProcDatahInvoke_FunchTemplateA"ject. .PWordBasic.FileSave ToolsUnprot"Doc$umP LineDown 1 TableInsertRow Nums:=":UpCharRight 39, EditCopy?PrevCellNext 655Past@D:WW6B_+lear WW7AutoT# @EgFl@1", ContA:=0, CRAsP:= \&_ first ]bLeft 4RɟReset@, Type:=@2 End PopUpPrompt1 PopUpPrompt2 " ThisDocument_VBA_PROJECT!%x>p`Z (6 L<7$*\Rffff*1937fd4368*\R1*#17b*\R1*#c1 `Hk@l ` $-View instructions for using FIA-#### buttons.!TemplateProject.PopUpPrompt1.MAIN@$X@@h @0X @HH @`8 @x( @ @ @ xME " *1(L=XH=J=7@7`  4 < 26(@ "` 4Z@DEFINE DIALOG BOXFpAdd Foster Care Case B@  .**To Add Additional Row for Foster Care Case** B@fB@$;  *After entering Secondary Provider (MPS#), B@f;. +Click ADD FC CASE Button on FIA-144 Toolbar B@f ^RN B@RX B@N B@ZXE !!.6GET USER INFO FROM INI FILE AND PUT IT INTO DIALOG BOX,DISPLAY DIALOG BOX AND RESPOND TO USER INPUTP  !%'A  OK BUTTONGet user info from INI fileVR1. Update other Form Fields on Form & Exit MacroKBa8h0l( Attribute VB_Name = "PopUpPrompt1" Public Sub MAIN()  ".zDescriptionView in struc&s for using FIA-# tons.ePcData\Invoke_Func\Template"jec4t. .PDi@m iRet'DEFINE DIALOG BOX WordBasic.BeginDialog 582, 11"Add Foster Carese+ @Text 90, 5013, "**To i~al Row )***5*&3C*AfEenSecondary vidS(MPS#)@L S(46SCk ADD FC CASE B4ut@d pi144 Toolbar)OK 35=M78, 21@Cancel 4 8 aEndCa odlgUs erInfRs Obz: Set = GcCurValues.A 'GET USER INF@O FROM@ILE AND PUT INTO DISPL AYB RESPO@  Ao@$!#(/IfB -1 Then 'OK BUTTONG;nuABf.file@' Upd! othForm Fieldsp& Exit Macro 0 Els @Z If@ndz x7pfS(<<< <7 `@ ` $,View instructions for using FIA-144 buttons.!TemplateProject.PopUpPrompt2.MAINxME " 2(L`:P@`   < 2(@ "` 4Z@DEFINE DIALOG BOXFpAdd Non-Custodial Parent Row B@15_gt_  .**To Add Additional Row(s) for Non-Custodial** B@f;  After entering First Name, B@f;0 1Click ADD NON-CUSTODIAL Button on FIA-144 Toolbar B@f^RN B@hRX B@h B@$ ZXE !!.6GET USER INFO FROM INI FILE AND PUT IT INTO DIALOG BOXl,DISPLAY DIALOG BOX AND RESPOND TO USER INPUT  !%'  OK BUTTONGet user info from INI file. Update other Form Fields on Form & Exit Macroa8h0l( Attribute VB_Name = "PopUpPrompt2" Public Sub MAIN()  ".zDescriptionView in struc&s for using FIA-144 tons.dOcData[Invoke_Func[Tem plate"jehct. .PDim iRet'DEFINE DIALOG BOX WordBasic.BeginDialog 582, 11"Add Non-Custod Parent Row/ !Text 9 0, 5013, "**To K#ial(Ls).***5 *3G*Afte$r Derirst ݀8 K)!48 LCk ADD NON- CUSTOF B4utd @phTo olbar&OKY 35@;AM7@21 Cancel5 4 8 aEnda ndlgUserInfPs ObAz: SHet = aCurValues.A 'GET USER INFO FROM@ILE AND PUT INTOʈDIS0PLAYB RExSPO@  $!#(/If -1 Then 'OK BUTTONBG;uABf!.file@' Upd othForm Fieldsp& Exit Macro Els @ZH If@nd xpr# (SLSS<N0{00020906-0000-0000-C000-000000000046}8($HMExAttribute VB_Name = "ThisDocument" Bas0{00020P906-0C$0046} |CreatablFalse ^PredeclaIdTru "@ExposeTemplateD0eriv$eCustomiz2x!pda^  *\G{000204EF-0000-0000-C000-000000000046}#3.0#9#C:\Program Files\Common Files\Microsoft Shared\VBA\VBA332.dll#Visual Basic For Applications*\G{00020905-0000-0000-C000-000000000046}#8.0#409#C:\Program Files\Microsoft Office\Office\MSWORD8.OLB#Microsoft Word 8.0 Object Library*\G{00020430-0000-0000-C000-000000000046}#2.0#0#C:\WINNT\System32\STDOLE2.TLB#OLE Automation*\G{26408BC2-0870-11D3-A630-BC1923E36822}#2.0#0#C:\WINDOWS\SYSTEM\MSForms.TWD#Microsoft Forms 2.0 Object Library*\G{C21149E3-E43E-11D1-89BE-006008929C4B}#2.0#0#C:\TEMP\VBE\MSForms.EXD#Microsoft Forms 2.0 Object Library.E .`M *\G{2DF8D04C-5BFA-101B-BDE5-00AA0044DE52}#2.0#0#C:\Program Files\Microsoft Office\Office\MSO97.DLL#Microsoft Office 8.0 Object Library7  pThisDocument 2237fa5f5b*Dr$AddSocWkContactRow b37fd429e*D|;AddChildInfoRow 3337fa5f5b*DB~0AddSvcReferral c37fd429e*DFxHW SvcRefHeading d37fd429e*DHz` ClearCaseInfo 1a37fd4386*DZdx PopUpPrompt2 f37fd429e*DfPopUpPrompt1 1937fd4368*D` NonCustodial 1137fd429e*DbLegalStatus 1237fd429e*DlRemoveRow 1337fd429e*Dn+IdentInfo 1437fd429e*Dh?AddFCCase 1537fd429e*Dj  ToolHelp 1637fd429e*D8 test 4037ffc245*Dh CaseInfo 1837fd42a0*DP`NewMacros 3f37ffc1ea*D>L h 8P`x0H(b{4`K*b{4`K,b{4`K.b{4`K0b{4`K2b{4`K4b{4`K6b{4`K8b{4`K:b{4`Kb{4`K@b{4`KBb{4`K't@|0I"Fb{4`Kx04f~0߼"hh:REM Wordk VBAWin16~Win32Mac0144FAC stdole`MSFormsC ThisDocument< _Evaluate Officeu TemplateProjectEModule1b AddSocWkContactRow_hMAIN, WordBasicFileSave ToolsUnprotectDocument(TableSelectRowEditCopy.LineDownx EditPasteLineUpK WW6_EditClear0 CharRightPWW7_EditAutoTextCContextXnInsertAsInsertrNextCellPrevCellyToolsProtectDocument-0NoResetg AddChildInfoRow^CharLeft AddSvcReferral} SvcRefHeadingi&TableInsertRowQNumRows CenterPara InsertPara,TableInsertCells ShiftCells(TableMergeCellst BorderRight_ ClearCaseInfohFileFind SearchName֡ SearchPath.SubDir+Title~AuthorKeywordsTSubjectRPOptions MatchCase PatternMatch DateSavedFromu= DateSavedTojdSavedByDateCreatedFrom DateCreatedToViewISortByoListBy+ SelectedFile\Kill PopUpPrompt2iRet,p BeginDialogFOKButton| CancelButton EndDialogmP dlgUserInfo2" CurValuesȤ UserDialogDialogf PopUpPrompt1 NonCustodial8 LegalStatus>C RemoveRow0^TableDeleteRowA IdentInfoh AddFCCase TableSplit ToolHelpT ViewToolbars| ColorButtons} LargeButtonsSWToolTips5+Toolbar2Show CaseInfo UserFCCNoBUserFCCN7 UserFCWLNoyUserFCWN UserPSCNoOUserPSCNqUserCTNOUserHALօUserHAFЅUserDCHide9zTextBoxQ YourFCCNo+GetPrivateProfileString$xYourFCCN. YourFCWLNoYourFCWN0 YourPSCNo9YourPSCNP<YourCTNO~9YourHALYYourHAFYYourDCSetPrivateProfileString=ExistingBookmark SetFormResult test4 EditClearDocumentjUserPOSAPUserPOSWeYourPOSA/)YourPOSWD) NewMacrosj (CheckSpellingW SelectionZHomeKeyUnitwdStory&EndKey5Extend?wdExtendd LanguageID wdEnglishUSCheckGrammarWithSpellingActiveDocument\ CheckGrammarProtectfPasswordwdAllowOnlyFormFields! Unprotect?' C  GI    [ "".2ClearCaseInfo SvcRefHeading$'(AddSvcReferralg AddChildInfoRow &(      !"#$%&')*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefhijklmnopqrstuvwxyz{|}~=(6 LL7$*\Rffff*1a37fd4386*\R1*#17b*\R1*#c1*\R1*#c1 `x0(kZp$PRemove previous Case Information from file so that new information may be added."TemplateProject.ClearCaseInfo.MAINZ($0@x ^`bdfhjlnfprtvxz|~^`bdfhjlnfprtvxz|~^`bdfhjlnfprtvxz|~@h @X @H @8 @( @  @8 @P @h @ @ @ @ @ @ @x @(h @@X @`H @x8 @( (ME "@% lH@c:\caseinfo.ini B@  ^c:\` caseinfo.inibdfhjlnfprtvxz|~ B@\ ̱Attribute VB_Name = "ClearCaseInfo" Public Sub MAIN(), ".|DescriptionRemove previous  rmaFfrom file so that new is!may be added.sProcDataInvoke _FuncTe@mplate"ject. .QWordBasic.FDFind$ S~ch:=" ",Patbhc:\ cCW.iniubDir:=0, Title Autho "Keyw8s ;LO Match%extÃAtern }eSavedFg ToByCre ! ViewBSort4, Lis(SelTM QKill "I GEWub x/pzK (<<< <7 `x@@Hp$EAdd heading row if Service Referral table expands to a second page. "TemplateProject.SvcRefHeading.MAINHMEA "   (8P2`  2  2( ` p 2   2 0 @ P2`   2   20 h x2   4 ( 8 H4X     0@ Xhx4 4(8 B@  B@" B@$L B@J B@Dsvcrefh1468 B@2 B@N B@:svcrefh2468 B@2 B@, B@NSvcR B@:4svcrefh3468 B@2SvcR B@N4 B@P8 B@:svcrefh4468 B@28 B@N B@PD B@:svcrefh5468 B@2B@2 B@NB@: B@PB@: B@:B@:svcrefh6468 B@2 B@N6 B@PB@2 B@:svcrefh7468 B@24 B@N8 B@P  B@:B@<svcrefh8468 B@2 B@N( B@:svcrefh9468 B@2 B@N B@P B@: svcrefh10468 B@2q B@N B@P B@: svcrefh11468 B@2 B@N B@PAdd Instruction Row B@(T B@R B@D B@0 B@V B@: B@0 B@V B@X B@D SvcRefH12468 B@2 B@: svcrefH13468 B@2@n B@>DlAttribute VB_Name = "SvcRefHeading" Public Sub MAIN(), ".|DescriptionAdd h row if Service erral table expands to a second page. }hProcDatatInvok@e_FunctTemplate"ject. .QWordBasic.FileSave ToolsUnprot"Document \SelRow @Insert Nums:="t.AddFlAttribute VB_Name = "AddSvcReferral" Public Sub MAIN(X) ".~Descriptions a row to A. Service  Table (Lands`cape)lWProcDatacInvoke_FunccTemplate"jec4t. .RWordBasic.FileSave ToolsUnprot#Document NextCell WW7_EditAutoT :="F1", Cont :=1, InsertAs:=0 <22a2n3?_K4?5?f6?_27?8 _X.?9 10 ~t Prev Ù Ш` NoRese, Type:=2 End  x.p~J(6 << <7$*\Rffff*3337fa5f5b `xBp$1Add row to Children Information table (Landscape)$TemplateProject.AddChildInfoRow.MAIN H@ME "   (48 p4 4 4 H4X 4 B@  B@" B@: ChildInfo2468 B@2 B@:14 ChildInfo3468 B@2y B@:Forms ChildInfo4468 B@29_99 B@: ChildInfo5468 B@2 B@: ChildInfo6468 B@2 B@: ChildInfo7468 B@2 B@D@n B@>lAttribute VB_Name = "AddChildInfoRow" Public Sub MAIN() ".Description row to ren" rmaDtable (Landscape)iTProcData`Invoke _Func`Te@mplate"ject. .SWordBasic.FileSa`ve ToolsUnprot#Docum ent Ne@xtCell WW7_EditAPutoT :="2", Cont :=0,~sertAs:=1>33c34ۀ`M567CharLeft 30 NoReset, Type:=2 End xp|AddSocWkContactRow&PROJECT*^PROJECTwmiCompObjj      !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}3;(<<< <7 `x