ࡱ> q  =bjbjt+t+ `AA+]DDDD$zzzzP|Fzj * * * $L%/!U!U!UKlU x_ i$lmfiAiDD* * D* DR* L%J&TDDDDL%  R#/D"L%* $Vzz.%CARER ASSESSMENT AND SUPPORT PLAN The Purpose of a Carers Assessment A Carers Assessment aims to: Establish whether or not a carer is eligible for support; Establish whether or not the caring role is sustainable; Look at the support needs a carer has and how these may be met; Determine what would help a carer to look after their own health and well being; Look at what, if any, services are to be provided by social services for the person cared for or for the carer themselves. What action could follow the assessment? Sign posting or a referral to a local or national organisation for help or support. This can include advice, information, advocacy, and support; Different or additional services arranged through community care services for the person cared for; Benefits advice; Services provided directly to the carer themselves. The Carers Support Plan The Support Plan should be completed with the carer and practitioner to complete together and the carer should receive a signed copy; The Support Plan gives details of any agreed action following the assessment, who is responsible and the time scales for this action. Carers Information Pack All carers should be offered a copy of the Information Pack. This includes carers who refuse an assessment. 1.CARER'S DetailsFamily Name:  FORMTEXT      First Name:  FORMTEXT       FORMCHECKBOX Male  FORMCHECKBOX Female DOB :  FORMTEXT      Address: Same Address As User?  FORMCHECKBOX Yes  FORMTEXT      Postcode: FORMTEXT      Telephone: FORMTEXT      Email: FORMTEXT      Mobile: FORMTEXT      Fax: FORMTEXT       For Office Use OnlyCarers Ethnicity: % FORMDROPDOWN Carers Religion: %  FORMDROPDOWN Carer Swift No: FORMTEXT      User Swift No: FORMTEXT      Date Of Referral: FORMTEXT      Date Of Allocation: FORMTEXT      Assessment Completed By: FORMTEXT      Date Of Completion:  FORMTEXT      Job Title: % FORMDROPDOWN Community Team % FORMDROPDOWN  2.Improving CommunicationIs there anything we can do to make it easier for you during the assessment?  FORMCHECKBOX  No  FORMCHECKBOX  YesIf YES please give details. For example you may have sight, hearing or speech difficulties. You may need a spoken or sign language interpreter, Braille, large print etc.  FORMTEXT       3.About the person you care for:Name of Person(s) for Whom You Provide Care: FORMTEXT      Are you a Carer for more than one person?  FORMCHECKBOX  No  FORMCHECKBOX  Yes If "Yes" please give details:  FORMTEXT      What is their relationship to you? e.g. Spouse, partner, relative, friend etc:  FORMTEXT      Does the person get help from anyone else? e.g. from social services, voluntary organisations or other friends or family. Can you give some brief details?  FORMTEXT       Has the person had a Community Care Assessment?  FORMCHECKBOX  No  FORMCHECKBOX  Yes If "No", can you give reasons for this.  FORMTEXT       4.WHAT DO YOU DO FOR THE PERSON YOU CARE FOR?This may include: Personal tasks such as help with washing, using the toilet, or bathing; Practical tasks such as making meals, cleaning or shopping; Nursing help with medication, or using equipment; Watching or supervising somebody who is confused or would be at risk; Helping somebody with everyday activities such as going to the GP, attending college/ place of worship or social activities FORMTEXT       5.YOUR HEALTH. Do you have a disability or any health problems you would like to tell us about? EG, back problems, diabetes, sickle cell anaemia. FORMTEXT       6.HOW CARING AFFECTS YOUR LIFE. Some of this section may be hard to complete as you may feel different things at different times. The person doing the form with you understands this and will be able to help you talk things through. A. HEALTH AND PERSONAL SAFETY. Does caring affect your health? Are you able to get a full nights sleep? Do you feel your safety is at risk in any way?  FORMTEXT      B. RELATIONSHIPS. Do you feel that being a carer has affected your relationship with the person you care for? Or your relationship with others? Do you have other family responsibilities (such as young children) that are affected by caring?  FORMTEXT      C. FINANCE. Would you like information about financial advice services or benefits?  FORMTEXT      D. WORK. Are you in full or part time paid work? Does caring affect your work in any way? Does being a carer stop you from doing paid work?  FORMTEXT      E. EDUCATION AND INTERESTS. Does your caring role affect your ability to study or follow your interests?  FORMTEXT      F. SPACE AND EQUIPMENT. Is there enough space at home to care for the person? Do you have the right equipment or adaptations? Do they have access around their home? Can you manage the repairs/garden/cleaning?  FORMTEXT      G. EMERGENCIES AND LONG TERM PLANS. Do you feel you have enough help if you needed to take a break from caring at short notice (for example if you were unwell yourself)? Have you been able to make any longer term plans?  FORMTEXT      H. TAKING A BREAK. Do you have regular time for yourself? Can you tell us about this? If you do not have any time to yourself can you tell us why this is?  FORMTEXT       7.WHAT WOULD HELP YOU IN YOUR CARING ROLE? Thinking about the questions in the last sections what sort of things would help you. This could include help with practical tasks, more opportunities for a break, or the chance to meet other carers. You may have needs that are to do with your ethnic or cultural background, your religion, your age, your sexuality or to do with being male or female. FORMTEXT       8.CONFIDENTIALITY AND INFORMATION SHARING When arranging additional support for you we may need to share some of the information that you have given us with other departments or organisations. Please let us know if you do not wish this to happen. We will respect your views unless we believe that yours or other peoples safety is at risk.  FORMTEXT       STATEMENT OF NEED & SUPPORT PLANTo be completed by the assessing Care ManagerCarer's Name:  FORMTEXT      Swift No: FORMTEXT       SUMMARY OF CARERS NEEDS Please list needs identified FORMTEXT       OVERALL LEVEL OF RISK IDENTIFIEDLOW  FORMCHECKBOX MODERATE  FORMCHECKBOX SUBSTANTIAL  FORMCHECKBOX CRITICAL  FORMCHECKBOX  SUPPORT PLANActionResponsibilityTime Scale  FORMTEXT       FORMTEXT       FORMTEXT       FORMTEXT       FORMTEXT       FORMTEXT       FORMTEXT       FORMTEXT       FORMTEXT       FORMTEXT       FORMTEXT       FORMTEXT       FORMTEXT       FORMTEXT       FORMTEXT       FORMTEXT       FORMTEXT       FORMTEXT       FORMTEXT       FORMTEXT       FORMTEXT      Overall Objectives of Support Plan:  FORMTEXT       Consent and Information Sharing Have consent issues been discussed? FORMCHECKBOX  Yes  FORMCHECKBOX  No  FORMCHECKBOX  Unable to give consent**If unable to give consent explain why:  FORMTEXT      If  Yes , was consent given for information to be shared as needed? FORMCHECKBOX  Yes FORMCHECKBOX  Yes, with limitations*  FORMCHECKBOX  No FORMCHECKBOX  Not applicable*Requested limitations in information-sharing (detail below) FORMTEXT      Signature of carer assessed: Date:  FORMTEXT      Assessor:  FORMTEXT       Signature:  FORMTEXT       Date:  FORMTEXT       (print name) Team Manager:  FORMTEXT       Signature:  FORMTEXT       Date:  FORMTEXT       (print name)Date Statement of Need Completed  FORMTEXT       Date Statement of Need Sent:  FORMTEXT       PAGE 1 Carers Assessment Freeware #$GHfPjv    $ % / 0  & ( < > L P R n p r ǿܦܘ܋{kjV5CJOJQJUj5CJOJQJUj5CJOJQJUjvCJOJQJUjCJOJQJUjCJOJQJUB*CJOJQJ5B*CJOJQJOJQJ 5OJQJ CJOJQJ5CJOJQJ55CJ(OJQJCJ CJB*CJ(*"#$GHfgk OPij & F hK$$$$l"  $$"#$GHfgk OPijv     1  N P  h   F H X * p r v x ,TV~*RT      [jv        N P 4$$l4;p#$$l4;p#  $K & F  < > Z \ ^ f h j ~    4 6 D H X Z n p ~ Ѹתל׎׀rj{CJOJQJUjCJOJQJUjCJOJQJUjCJOJQJUjCJOJQJUj-5OJQJUj5OJQJU 5OJQJ CJOJQJ5CJOJQJjCJOJQJUjCJOJQJU,  h   F P($$l 4;O&p# $$'$$l4;Op#`$$$l4;Op#F H X * v x 0v $$l4;p#  &$$l4;p#  $$l4 ;O&p#$$$l4 ;O&p#    $ & ( * L P R T p r t v ,.BDRT~Ž{mj CJOJQJUjc CJOJQJUj CJOJQJUj OJQJUjgOJQJUjOJQJUOJQJ5CJOJQJ5B*CJOJQJ56B*CJOJQJ 5OJQJjCJOJQJUjCJOJQJU CJOJQJ* ,TV~*RTۜX|$$l ;$ p#  $$l;$ p#  !$$l ;$ p#  $*,@BPRjln YZhijqrؚ~n~~j 5CJOJQJUj5CJOJQJU5B*CJOJQJOJQJ 5OJQJjCJOJQJUj]CJOJQJUj CJOJQJUj CJOJQJU5CJOJQJjCJOJQJUj: CJOJQJU CJOJQJ*  4$$l 4;p#($$$l4;p#$$l4;p#  $$$l4;p#  45?@ `b<>Z\^lnFɻ۱ɛۋ{sejCJOJQJU5CJOJQJjF5CJOJQJUj5CJOJQJUjoCJOJQJUB*CJOJQJ5B*CJOJQJjCJOJQJU CJOJQJjCJOJQJU5CJOJQJj5CJOJQJUj5CJOJQJU% 4A`b(*6^`b:vlmz<>fhj;H "8":"#6#8#$%%&&&&(N(P(R((j+l+++++!-"-#-0-..       ^`b4~,$$lp#$$lp#$$l4p#($$$$l4p#  $$F &(68LN\^blmnxy ܅{m{jCJOJQJU5B*CJOJQJj CJOJQJUj5CJOJQJUj5CJOJQJUj5CJOJQJUjCJOJQJUj2CJOJQJU CJOJQJjCJOJQJU5CJOJQJ56CJOJQJ*(*6^`b:vl4 & F$ & F$$$lp#  $$lp#$($lm<>fhj;TT$$$lm"$$l"  $$$$l.p#($$$lp# :<>@TVdfj:;<FG     ""&"("6"8":"##$#&#4#խû՟ûՑûՃûujDCJOJQJUjCJOJQJUjXCJOJQJUjCJOJQJUjlCJOJQJU5CJOJQJ5CJjCJOJQJU CJOJQJjCJOJQJU 5B*CJ5B*CJOJQJB*CJOJQJ.; "8":"#6# ƨ$$l"($$$l?"$$l "$$l"$ 4#6#8#$$$$%%%&&&&&&&&(((<(>(L(N(R((h+l+n++++++++!-#-$-.-/- ...\.^.}s5B*CJ$OJQJjCJOJQJUB*CJCJjCJOJQJU 5B*CJB*CJOJQJ5B*CJOJQJjCJOJQJUj0CJOJQJUjCJOJQJUjCJOJQJU5CJOJQJ5CJ CJOJQJ,6#8#$%%&&&&(N(P(R((j+$$$$l"$$ls "$$l "($$$$l" j+l+++++!-"-#-.......\.TT$$$$l "$$$$$l4"($$$l"  ......\.^....//>/@/////6080@0d0v00000 111*1,1:1X1p1r111112<2d2f22222303X3Z333333$4L4N4v444485:5>5555667777"8L888 9 94969t999::;;;R<T<<<<  a\.^....//>/@//ڼxs$$C$$l\;p#$$l;p# $%$$l;p#   ^.......////,/.//@////////////4080@0B0^0`0b0v0x00ۿۑیzozaozozj<5OJQJUj5OJQJU 5OJQJ5B*CJOJQJB*OJQJjCJOJQJU B*OJQJB*CJOJQJ5B*OJQJ5B*CJ OJQJjrCJOJQJUjCJOJQJU CJOJQJjCJOJQJU5CJOJQJCJ56OJQJ$////6080@0d0v00000 1T$&$$l4;p#  $$$$$l    ;p#($%$$l    ;p#   000000000011 11*1,1p1r1t1111111111111111122222*2ỵwkjn"OJQJUj!OJQJUj!OJQJUj !OJQJUOJQJjOJQJU5CJ5CJOJQJ 5B*CJ5B*CJ OJQJj 5OJQJUj$ 5OJQJU 5OJQJj5OJQJUj5OJQJU( 111*1,1:1X1p1r1111x$$l ;p#$$$l4;p#  $$E$$l4\;fp# 112<2d2f22222303X3Z333$$lN ;p#$$l ;p#$$l  ;p#$$$l? ;p#*2,2:2<2>2R2T2b2d2f2h2|2~2222222222222222233 33 3.30323F3H3V3X3Z3\3p3r33333j&OJQJUj&OJQJUj%OJQJUj2%OJQJUj$OJQJUjF$OJQJUj#OJQJU5CJjZ#OJQJUOJQJjOJQJUj"OJQJU0333333333333333344"4$4&4:4<4J4L4N4P4d4f4t4v4x4444444444455&5Յzs CJOJQJjCJOJQJU5CJOJQJjD*OJQJUj)OJQJUjX)OJQJUj(OJQJUjl(OJQJUj'OJQJU5CJj'OJQJUOJQJjOJQJUj 'OJQJU,3333$4L4N4v444485:5>555<*$$l, t;p#*   $1$(($$$l4;p#($$$lN ;p#$&5(56585:5>55555555 6 6(6*6,6J6L6h6j6l6666677 777777777777777"8ĉ}qjv-OJQJUj-OJQJUjOJQJUmHj,OJQJUj,OJQJUj+OJQJUj0+OJQJUjOJQJU55CJOJQJ 5OJQJ5CJOJQJjCJOJQJUj*CJOJQJU,55667777"8L88+$$l,4 t;p#  $1$xx$7$$l,4 t0;{p#E $1$$ $1$(($ "8$8@8B8D8L8N8j8l8n88889 9 99"9$9&909294969p9t9999999999999998:::N:P:^:::::|j~0CJOJQJUj0CJOJQJUj/CJOJQJUjF/OJQJUjOJQJUmHj.OJQJU56CJOJQJ 5OJQJj^.OJQJUj-OJQJUOJQJjOJQJU088 9 94969t99mTDAA$)$$l24 t;p#*+$$l4 t;p#*  $1$(($[$$l,4 tr; up#Et 99::;;;R<T<<<<<<< ==xh&( $ ;dh$$l;p#d$$4$$lM4 t0;p#*::::::;;P;R;f;h;v;;;;;;;;(<*<><@<N<<<<<<<<<<<<<<<< ===}0JOJQJmH 0JOJQJj0JOJQJU CJOJQJ B* OJQJjc2CJOJQJUj2CJOJQJUj1CJOJQJUj@1CJOJQJUj0CJOJQJU 5OJQJOJQJjOJQJU*<<<<<< =======  ======.00 &P P/R . A!"#4$%. 00 &P P/R . A!"#4$%vDText42jDvDeCheck16vDeCheck17aDText13vDeCheck15vDText43vDText44vDText38vDText40vDText39vDText41(D Dropdown10 White BritishBlack CaribbeanBlack British Ghanaian Black African Black OtherBlack British SomaliBlack British EritreanBlack British Nigerian Asian British IndianAsian British PakistaniAsian British Bangladeshi Asian Chinese Asian OtherFilipinoGreek/Greek CypriotTurkish/Turkish CypriotKurdish White IrishOther White BackgroundWhite & Black CaribbeanWhite & Black African White & AsianOther Mixed BackgroundOther Ethnic Group^D Dropdown11 BaptistBuddhistChristian CofEChristian Greek OrthodoxChristian Non-ConformistChristian Roman CatholicChristian -OtherHinduJehovah's WitnessJewishMuslim No ReligionOther RastifarianSikhUnclassified -RefusalvDText45vDText46aDText15aDText16aDText18aDText17Df Dropdown4 Care Manager/SWCommunity Care AssessorOccupational TherapistCommunity Nurse Lead Assessor Key Worker Team ManagerDf Dropdown3 Integrated Assessment NorthIntegrated Assessment SouthIntegrated Assessment CentralCare Management NorthCare Management SouthCare Management CentralResidential and Nursing ReviewSensory Disability I CareWhittington Hospital UCL Hospital"Mental Health Care of Older People!REACH - Community Rehabilitation vDeCheck20vDeCheck21vDText47aDText14vDeCheck20vDeCheck21vDText48vDText49vDText50vDeCheck20vDeCheck21vDText51vDText52vDText87vDText53vDText54vDText55vDText56vDText57vDText58vDText59vDText60vDText61vDText62jDjD`DText2tDeCheck1tDeCheck2tDeCheck3tDeCheck3vDText66vDText69vDText72vDText67vDText70vDText73vDText68vDText71vDText74vDText75vDText79vDText83vDText76vDText80vDText84vDText77vDText81vDText85vDText78vDText82vDText86vDText88tDCheck1tDeCheck1tDeCheck1vDText53tDCheck1tDCheck1tDeCheck1tDeCheck1tDText1vDText34aDText24aDText27aDText30aDText25aDText26aDText31aDText33aDText32 [4@4NormalCJOJQJkHmH @@ Heading 1$$5CJ$OJQJkH:: Heading 2$5OJQJkH<@< Heading 3$$5OJQJkH<< Heading 4$5B*OJQJkH^^ Heading 5$$$$d!%d!&d!'d!-D 5B*CJ$OJQJkHB@B Heading 6$$5B*CJ$OJQJkH>> Heading 7$$5B*OJQJkH<A@<Default Paragraph Font,@,Header  !, @,Footer  !<<Address5 S OJQJkH&)@!& Page Number6B@26 Body Text5OJQJkH:PB: Body Text 2$ CJHOJQJ6Q@R6 Body Text 3 CJOJQJ(U@a( Hyperlink>*B*8V@q8FollowedHyperlink>*B* 0" Q]q!*********- F4#^.0*23&5"8:="&)+-035:<?@BDGj F l;6#j+\./ 113589==#%'(*,/124679;=>ACEFI .<=$.8H$06DPVYir%17@LR]iov  ,2GSYp| e q w  ( 8 ] i o r ~   '39/;A<HNGSYWciHTZ)/1=CEQWZflnz#%179EKNZ`bntvIYiy5EK[u$06COU 5AGxFtFtG$G$FG$FtFtFFFFS$S$FtFtFFFFS$S$G G FtFG G FtFtFtG G FtFtFFtFtFtFtFtFtFtFtFtFtFtFtFG G G G FtFtFtFtFtFtFtFtFtFtFtFtFtFtFtFtFtFtFtFtFtF4G$G$G$FG$G$G$G$FFFFFFFFFF -!  ?b$c"eo QWb$Ďӵ]ky#5K*b$UjeήA6.@H 0(  0(  B S  ?-DText42Check16Check17Text13Text43Text44Text38Text40Text45Text46Text15Text16Text18Text17 Dropdown4 Dropdown3Text47Text50Text51Text52Text87Text53Text54Text55Text56Text57Text58Text59Text60Text61Text62Text4Text2Check1Check2Check3Text66Text69Text72Text67Text70Text73Text68Text71Text74Text75Text79Text83Text76Text80Text84Text77Text81Text85Text78Text82Text86Text63Text88Text34Text24Text27Text30Text25Text26Text31Text33Text32%Zs&A!Gp f s  (0=HXH2F[o&:Ocw%C 5x  !"#$%&'()*+,-./0123456789:;<=>?@ABC7j8S3Zx :BOZj[0DXm$8Lau7VHij>A  u{:AEnter User Namet\\LBI002\DATA\SERVICE_AREAS\SOCIAL_SERVICES\Swift\adults\Workgroup_Templates_adults\CC4 (v3.3) Carers Assessment.dotEnter User Namet\\LBI002\DATA\SERVICE_AREAS\SOCIAL_SERVICES\Swift\adults\Workgroup_Templates_adults\CC4 (v3.3) Carers Assessment.dotEnter User Name|\\LBI002\DATA\SERVICE_AREAS\SOCIAL_SERVICES\Swift\adults\Workgroup_Templates_adults\Copy of CC4 (v3.3) Carers Assessment.dotEnter User Name|\\LBI002\DATA\SERVICE_AREAS\SOCIAL_SERVICES\Swift\adults\Workgroup_Templates_adults\Copy of CC4 (v3.3) Carers Assessment.dotNT USERV\\LBI002\DATA\USERS\HOWARD SMITH\Forms\Final Versions\CC4 (v3.4) Carers Assessment.dotNT USERt\\LBI002\DATA\SERVICE_AREAS\SOCIAL_SERVICES\Swift\adults\Workgroup_Templates_adults\CC4 (v3.5) Carers Assessment.dotLondon Borough Of IslingtonQC:\Documents and Settings\HOWARD SMITH\Desktop\CPA Freeware\Carers Assessment.dotLondon Borough Of IslingtonTC:\Documents and Settings\HOWARD SMITH\Desktop\CPA Freeware\Carers Assessment FW.dotLondon Borough Of IslingtonTC:\Documents and Settings\HOWARD SMITH\Desktop\CPA Freeware\Carers Assessment FW.dotLondon Borough Of IslingtonTC:\Documents and Settings\HOWARD SMITH\Desktop\CPA Freeware\Carers Assessment FW.dot Rn  7z} *:& mo&ȯL \S+ a>/ GXY@ woA9R-\daR^p.i * hhOJQJo(hho(. hhOJQJo(hh5o(() hhOJQJo( hhOJQJo( hhOJQJo(pp5o(()zo(.5o(()hh. |a>/Rn R-\ \S+*:&GXY@7z}aR^mo&woA.i @h 8OJQJo( V``V``V`` i" P K     Custom Popup 1 Custom Popup 1@0 ( Form HelpHelp with this form GetFormHelp ( CC HandbookLink to Com Care HandbookGetComCareHandbookCustom Popup 2 Custom Popup 2@0 ( Form HelpHelp with this form GetFormHelp ( CC HandbookLink to Com Care HandbookGetComCareHandbook (Needs,Actions,Outcomes GetCarerHelp1 (Possible Outcomes GetCarerHelp2 (Services for Carers GetCarerHelp3 (Direct Payments for Carers GetCarerHelp4Custom Popup 3 Custom Popup 3O0 ( Form HelpHelp with this form GetFormHelp ( CC HandbookLink to Com Care HandbookGetComCareHandbook(%%%% %Custom Popup 4 Custom Popup 4e0 ( Form HelpHelp with this form GetFormHelp ( CC HandbookLink to Com Care HandbookGetComCareHandbook (Health and SafetyInfo on safe computer use GetSafetyHelpCustom Popup 5 Custom Popup 5e0 ( Form HelpHelp with this form GetFormHelp (Carers WebHelp!Link to the Carers WebHelp systemGetCarersWebHelp ( CC HandbookLink to Com Care HandbookGetComCareHandbook (Health and SafetyInfo on safe computer use GetSafetyHelp Islington Islington,d 0( Auto Save+Saves document using the Auto Save facilityAutoSaveChoiceV( Spell CheckSpell checks the whole document RunSpellCheckU (HelpForm Help and Com Care HandbookCustom Popup 6Custom Popup 6 Custom Popup 6e0 ( Form HelpHelp with this form GetFormHelp ( CC HandbookLink to Com Care HandbookGetComCareHandbook (Health and SafetyInfo on safe computer use GetSafetyHelpCarers AssessmentCarers Assessment,d  0"( Auto Save+Saves document using the Auto Save facilityAutoSaveChoiceV"( Spell CheckSpell checks the whole document RunSpellCheckU" (HelpForm Help and Com Care HandbookCustom Popup 7Custom Popup 7 Custom Popup 7e 0( Form HelpHelp with this form GetFormHelp( CC HandbookLink to Com Care HandbookGetComCareHandbook(Health and SafetyInfo on safe computer use GetSafetyHelpCarers AssessmentCarers Assessment  0"( Auto Save+Saves document using the Auto Save facilityAutoSaveChoiceV"( Spell CheckSpell checks the whole document RunSpellCheckU" (HelpForm Help and Com Care HandbookCustom Popup 8Custom Popup 8 Custom Popup 8b? 0 ( Form HelpHelp with this form GetFormHelp    Carers AssessmentCarers Assessment  0( Auto Save+Saves document using the Auto Save facilityAutoSaveChoiceV( Spell CheckSpell checks the whole document RunSpellCheckU (HelpForm Help and Com Care HandbookCustom Popup 9Custom Popup 9 Custom Popup 9b?0 ( Form HelpHelp with this form GetFormHelp ( (Carers AssessmentCarers Assessment=0========0"( Auto Save+Saves document using the Auto Save facilityAutoSaveChoiceV"( Spell CheckSpell checks the whole document RunSpellCheckU" (Help Form HelpCustom Popup 10Custom Popup 10 Custom Popup 100Carers AssessmentCarers Assessment`"@S`"`"`"`"`"`"`"`"0( Auto Save+Saves document using the Auto Save facilityAutoSaveChoiceV( Spell CheckSpell checks the whole document RunSpellCheckU (Help Form HelpCustom Popup 11Custom Popup 11 Custom Popup 110Carers AssessmentCarers AssessmentEcvEEEEEEEE0"( Auto Save+Saves document using the Auto Save facilityAutoSaveChoiceV"( Spell CheckSpell checks the whole document RunSpellCheckU" (Help Form HelpCustom Popup 12Custom Popup 12 Custom Popup 120Carers AssessmentCarers Assessmenthhhhhhhhh0"( Auto Save+Saves document using the Auto Save facilityAutoSaveChoiceV"( Spell CheckSpell checks the whole document RunSpellCheckU" (Help Form HelpCustom Popup 13Custom Popup 13 Custom Popup 130Carers AssessmentCarers Assessment0"( Auto Save+Saves document using the Auto Save facilityAutoSaveChoiceV"( Spell CheckSpell checks the whole document RunSpellCheckU" (Help Form HelpCustom Popup 14Custom Popup 14 Custom Popup 140)TemplateProject.modSpellCheck.ProtectForm+TemplateProject.modSpellCheck.RunSpellCheck;TemplateProject.modSpellCheck.ToolsProtectUnprotectDocument)TEMPLATEPROJECT.MODSPELLCHECK.PROTECTFORM+TEMPLATEPROJECT.MODSPELLCHECK.RUNSPELLCHECK;TEMPLATEPROJECT.MODSPELLCHECK.TOOLSPROTECTUNPROTECTDOCUMENT@\\LBI_TREE\HQ-1-6020.ANGH.PRN.lbiNe01:winspoolCanon iR5020/iR6020 PCL5e\\LBI_TREE\HQ-1-6020.ANGH.PRN.(p  4dXA4Canonv Canon iR5020/iR6020 PCL5eddd      d d d d dd@@d  d  d dd d"edd    dd     d!!d      !"#$ddA     A d  @8 4 <*j 1 4 <*j 1AXXd2\SRGBCO~1.ICM\SRGBCO~1.ICM\SRGBCO~1.ICM CONFIDENTIALCONFIDENTIALHArialDefault Settings\\LBI_TREE\HQ-1-6020.ANGH.PRN.(p  4dXA4Canonv Canon iR5020/iR6020 PCL5eddd      d d d d dd@@d  d  d dd d"edd    dd     d!!d      !"#$ddA     A d  @8 4 <*j 1 4 <*j 1AXXd2\SRGBCO~1.ICM\SRGBCO~1.ICM\SRGBCO~1.ICM CONFIDENTIALCONFIDENTIALHArialDefault Settings,#"<111r r r r 44444444ddddddddP@P P P @PPPP0@PP8@PP P"P$P&P(P*PX@P.P0P2P4P6P8P:P<GzTimes New Roman5Symbol3& zArialcCG Times (W1)Times New Roman"V hzf,ԩFkF!i/ 7{ *!V 20d' T"GCC4London Borough Of IslingtonOh+'0 , H T ` lxCC4C4C4C4C4Carers Assessment FW8London Borough Of Islington33dMicrosoft Word 8.0s@@Xh@ܡy@`/՜.+,D՜.+,P  px  Islington Council3 7 ' 1 CC4 Title 6> _PID_GUIDAN{EAE0D545-4A43-42A8-B474-7113F6490278}  !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJLMNOPQRSTUVWXYZ[\]^_`abcdfghijklmnopqrstuvwxyz{|}~ Root Entry FGhg:Data K21Tablee]nWordDocument`SummaryInformation(DocumentSummaryInformation8Macros%#\VVBA$ \ >ThisDocument__SRP_6__SRP_7 !emodHelpS   "$%&'()*+,-./01245689:;<>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnoprstvwxyz{|}~<*h+7N&N~ F}>iCY I.xgk #}>iCY I.*h+7N&N~4PSLSS6" <<<N0{00020906-0000-0000-C000-000000000046}PB "*\Rffff*b4219ed4d$*\Rffff*154219eda5`($` $pl $4  $0`|kIA8du $hs_ $do $@'Hl" @p@0ME" xAlٰAttribute VB_Name = "ThisDocument" Bas0{00020P906-0C$0046} |CreatablFalse ^PredeclaIdTru "@ExposeTemplateD0eriv$eCustomiz2P Sub ~_New() Call ResetToolbars End rU P88i4 a1`<   $ 4[rU @$`prU~}   ( 9i .FAJ Hp0+','<'L@:lN\\ 6\L<,P0$ \L<,KyL'''cc8':hNXX @ME ; " H+ N  \ l`  6( ` "h  V  &Lp  #  0+  " R &L  #  "  8 &L  6 8 @0+H x 0x0ActiveWindow.WindowState = wdWindowStateMaximizeHel@pxh 6 <0<<LLL<4<8<<<PB $*\Rffff*1e41c95d9f*\R1*#d0*\R1*#6d*\R1*#c6*\R1*#17e*\R1*#c1*\R1*#17b*\R0*#11*\R0*#1h p`,kp $0 ``k333 $`$$$`H`H`H`H0P8 8`@l @\ @L @< lp_FFS:\Swift\adults\Help_Files_adults\Carers_Assessments_WebHelp\index.htm@, p( 8hPIS:\Swift\adults\Help_Files_adults\Community Care Handbook August 2004.htm08 @@x x@h @X @H @8 @( @ @0 @H @` @  0`H0 @x lp_F@xh eeds@X m@H @8 _adu@( ions@ @ @ @  @ x P8,S:\Swift\adults\Help_Files_adults\Safety.hlp08 @@x @hh H@X _adu@H Asse@8 H@( du@ Asse@ @ @ @ H  X @H 8 @( p @ @ @ @ @S:@ft\adults\Help_Files_adults\Carers-Services_for_Carers.htmH `\adults\He_F (x ervi@h X H xX @H 8 @( H   `8k*  @ @ @ GS:Hft\adults\Help_Files_adults\Carers-Direct_Payments_for_Carers.htm  xp `x @h X @H 8 @( p @ @ @ @ x,S:(ft\adults\Help_Files_adults\Safety.hlpx @h X @H @8 @( p @ @ @ @  `xk x  0B@  (tonlXGConst HelpFileName As String = "Completing the CC3 Assessment Form.htm"UConst HelpFileAddress As String = "S:\Swift\adults\Help_Files_adults\" & HelpFileName^ActiveDocument.FollowHyperlink Address:=HelpFileAddress,' NewWindow:=True, addhistory:=True)Form Help is not yet set up for this form: P<A@8@ZIS:\Swift\adults\Help_Files_adults\Community Care Handbook August 2004.htm80Z@S:\Swift\adults\Help_Files_adults\Carers-Services_for_Carers.htmhtm  0B@  (lZIS:\Swift\adults\Help_Files_adults\Carers-Possible_Assessment_Outcomes.htm  0B@  (l@ZGS:\Swift\adults\Help_Files_adults\Carers-Direct_Payments_for_Carers.htm  0B@  (l  0B@  (l Z,S:\Swift\adults\Help_Files_adults\Safety.hlpx  0B@0ActiveWindow.WindowState = wdWindowStateMaximizeuH@%Help not yet set up for this functionA@8lu%Help not yet set up for this functionA@8ZFS:\Swift\adults\Help_Files_adults\Carers_Assessments_WebHelp\index.htm S:@Attribute VB_Name = "modHelp" Option PrivaModule Sub GetFormP() MsgBox pro@mpt:=": < is not@ yet sup for th.m", _ tons@:=vbInaS`'CtRFileAs S)ngCyleti the CC3 Asses@sment .htm' LpAddr'S:\Swift\a{ts\f_=s_" &G+ActiveDocu<.FollowHyper link 5:=/'''NewWindow:=True, addtoryK3.St= wdMaximiz En|d ߁@MCareHandbooksOn Err@iGoToAo`foundA aCCWeb/.-Nmunity   Augus@t 2004j S$SA]ECNq&TxitET@I:MF"HWunonRfersZe/E_L_B_Gs_e \Nex/LYC~C,/gY/YeS`afety.Yn? Mp?YK.h⥟U:=& &'cUUU__SRP_8#__SRP_93modSpellCheckS__SRP_abx"$ 4x x6X8#x"$ 8x tx+'''8:hNXX 6X8$y ,xX8tL'''cc8':h NXXx"$ 4x x6X8#x"$ 8x txt$ ,xX8KVL'''cc8':h NXXx"$ 4x x6X8+'''8:hNXX 6X8$V ,xX8\rU $`$`$`$`prU $  "( "0X`hp &x-:3  * 6E0 47h    F   <  `  '  K    ) '  D30 x 83   #  BHP 'X #h  x  6     6  >X T *"   H ` p  8 . 6  W0 6@ 0X B B    ( 0  8 H h :     *  ' D30 x 83   # $        ( " 0 8 @ H &P Dx  , 4  H0 ,x 6 D  A  0  @  H  X Jh  6 B @ <X :X 0 @P <X B 0  W(  #86H 2` 2 xrɄn@ 8L88L8L$> L*LLLLLLLLLLLLLLLLLL<<<<<<<<<<<<<<<<<<<<<<<<<PB *\R1*#d4*\R1*#17e*\R1*#dc*\R1*#10b$*\Rffff*114219ed73*\R0*#16*\R0*#10*\R1*#124*\R1*#123*\R1*#60*\R1*#104*\R1*#103*\R1*#1e*\R1*#d9*\R1*#e8*\R1*#dd*\R1*#5b*\R0*#c*\R1*#63*\R1*#10c*\R1*#5c*\R1*#10a*\R1*#db*\R1*#129*\R1*#ff*\R1*#28*\R1*#168*\R1*#c0*\R1*#17c*\R1*#166*\R0*#2*\R0*#1*\R0*#b*\R0*#11*\R1*#c5*\R1*#91*\R1*#c6*\R1*#c1*\R1*#17b@0$$(h$$ 8`Xkxx`H`x`&t p wit$ l0t$` `kxaa)  Is$ "x $`&t `(p4X` |+0 it )" P $>` k8)"  $ V `keen Yx!$ b`Dk\' @ --0@! h @B@p8 X`p8 X``0@x Islington Spell ChecklXp@t @d @T @D H  8NPd0@h @d @T @D @4 @$ @0 @0 @` @x h@ @ s9@ for@ @ 8 pR  @ @H @` @x @ 48@ @ @t @d @` h@H \ ` N@XO p H NH bx 8 h x R*.48>@P l @@ h 8 @ d h @`O @` \ @Z @ T @P @0 L @H H @D @@ @D L@ 0 @ @  @ @ @ @8 @P @h @ @ @ @ p @`  00H@`x R@@xt @p @` @P @@ @0 @ @  ^P@8 @P @h @ @ @ @ @ @ @ h@00\T^P8@t @p @l h(` $  @X @H @D @4 @$ @ p` XME  < 0 HX:h  ! < D >` @ F @( <h @"5   @( <h 2 0<8(8@X$`>p      "  < ,8h " p (x9    K )  B  hp  x &$  K    "    08,H X` hp x <  "- $0  xZ`ZZZpZIslington Spell CheckelZZZZ if no documents open, quit macro !*There are no open documents to spell check A@8uh#give user the opportunity to Cancel  HThis spell checking program for forms may take a few minutes to complete NC(depending on the length of the form and how many errors are found) NXIt will let you know when it has finished. Please do not try to cancel it in the middle. N NRun Spell Check?' : @ P d <$8'& & Fug 0.q@Check what type of protection - if any - has been applied to doc !<6If not protected, or if protected for tracked changes,\'run spellchecker and quit -------------\c H HQl !<l B@0 a0 B@$h R(L(0 RB@Re !!b !bjDoc *The Spelling and Grammar Check is complete P A@8 beeaThe Spelling Check is complete P A@8h@h8  (otecu  ------------- HQ <don't want to run spellchecker if doc protected for commentswdAllouk !.ns  (rWit -------------  ------------- /If we've got this far, it's protected for forms Now unprotect the document B@True (icatio0Check each section for its protection property -t 7which you can get even after unprotecting the document. MIf the section was protected, call a subroutine to spellcheck the formfields. vb$if it wasn't, spellcheck the section Spellchecking document ...'plete"  ! ! A  2Boolean variable returned by CheckProtectedSection 'procedure if user pressed Cancel button rha !!!  R(ellche !B@ot !!! )User must have pressed the Cancel button,;otherwise 'CheckSpelling' would have reduced the Count to 0------<(Pressing Ignore reduces the count, pressing Cancel doesn't)ed forrhhh bjDoc.re-protect the documentke n  B@4get the user back to where they were in the document you c B@Jn afte R(ting t RB@t. & If objDoc.SpellingChecked = True Thenbrouti !lcheck*The spelling and grammar check is complete P A@8ar =aThe spelling check is complete P A@8h@ End Ifctio  (orForelease variables from memoryecti' h'..l8ZZZcheck only the text formfields, >don't check listboxes and checkboxes - this speeds up the code R( Els " !!2.R-Check to see if the field is a text formfieldtion "!n *ACheck if the field is a 'real' text field (no date, formula etc);%and that it is enabled for text input "!,!n . "!0e =The following subroutine won't be called if Word 97 is in use red R!2$ 8 "A4sing Ih "!(t, 8 "!(6 DIf the current form field contains errors, spellcheck the text in it Next "!!! <The following condition is to allow for a Word 97 bug, whicheset:=:was fixed in 2000; (and in the latest Word 97 patches). If6the formfield is in a table and contains more than one Ap3paragraph, then spellchecking it will crash Word 97 True   R!2$ 8 "!!:!  "!!<!  "A> compl Fug a5Set a range to the formfield's range in case the userchec<accidentally destroys the formfield by overtyping its entiref Remcontentste "!.ur !!2!'& R( "!B@ "$@ "!!! ,User pressed Cancel button. (Pressing Ignore+reduces the count, pressing Cancel doesn't)'u ha5If formfield was destroyed because user overtyped itsentire contents !f'  %B!f'hx  D}'( ( _  ( $ '  D}'((6If formfield was destroyed when the user corrected the>spelling, reinstate it, and put the user's correction into its8result. Note that although Undo reinstates the Formfield9itself, if the Formfield is preceded by a tab, It doesn't?reinstate the objFormField object, hence the need to do a count9(although, as previously stated, in a well-designed form,5formfields should never be preceded by a tab, as it's:better to use table cells (removing borders as necessary). & !!2!_ B@F 9Also due to a Word bug, if the formfield is preceded by a6tab, the text within the formfield may now be selected,without the formfield itself being selected!)Hence the following convoluted workaround !2! LJ B@H LJP B@Nh "$@ %2."hp  "(4hX hP R(h8 h0 h( "l 5This subroutine is called only in Word 2000 and above%objFormField.Range.NoProofing = Falsel X"Unlink formfield (convert to text) "!. "!%RB@T R( B@ !! User pressed Cancel button<(Pressing Ignore reduces the count, pressing Cancel doesn't)'h !f'Undo to reinstate the formfield "$@_ B@F(  "!%R!4(f R(lZ 0.XZ X!  \$T9 C@nna XB@hpuhZ` ^!` PA@8l@  0!  0B@a n  0B@hlAttribute VB_Name = "modSpellCheck" Option Explicit Dim bCancLed As Boolean4objRange0,sCorrectedError:Sng5DocumenjSub Run()Const IsTitlgIIslingt4 Messa0=lngRetVal>LoHSW~qVOriginal u 'if no doces open, quit macro If ts.Count_0 The!MsgBox "re a(#*to s c, ,CEx7Sub End IfM'give us@er the'portunityf w LThis Y program fsms6ak+ few minscomplete" & v bCrLf_ "(deFdm#leph o&f& a/hoAany es%DfMd)It@ will  @you knw@V Dhas finished. PleaseTkt tr?c  in!middle. J1 ?@ = s(Lmpt:=DV<, @{B:=@뀶s:=vbInAFaB+TYesNo@IBI!vbNoņ Set w@RPActCS!n'Bi wha$TypFf!@tdd-& `^3- !,been ap@@J@a l C!. .Pro$T` (T#!`dnot ed, M ( ` 6ack`chs, 'ru~nCVc@]Hap&- bwdNo, wdAllowOnlyRevis`se`cxpG bmarWithB[z@D) Elsee, F`bez  AA.cB.Scr0Updng:Tru Refresh=@DeBҕ#!%CHha&a5# .c *ccL,]kl lw ϤwE2  System.Churs\=NCNormalg B'XVCom!fV'don'`Rapg92P6 ;7B^z fSe= E{r= C4.oycWaцo ?0P+we'm gCtakfar,9\'s T4'NybunE2_{ objP.Ue1"H= Fa s _b C;.x  e  'U!muha0<,V~E 'o@rwiМ ' would`rB+SO08 '(P1a+Ignoc,@;! does1L `4}Nexdre-d< 5He( :=XA2F<,p e0Ӏ'F1)b!AÀ`y weİj]0;#`%%/Remʖ@1pb'`3= `'_/s~bO1̰)Y:V߅aW› ݔ"$W?5 rz  variables from memory bCancelled = False sCorrectedError`vbNullString Set ob@jRange8Noth .Doc * End Sub Private Che@ckProtlSaion(Z (As  );DimxFormField  Count#LolngPos! 'cB only the @text f0f 0s,don't listbtoxaj -is spee ds up&codApplicatn.Scre enUpdngc EachYoIn..xs ' to see if<^ Ga h If.TypYArwdUATAInput ThenC H'rea l'Dg(no 9e,Sula `etc);Pt hat is end i N-(/RegrrA/ AhK.>EK4B5llow@ subroutine w~be ca>Word 97AWin uA@)@ Left$(!~Vers, 1)}"8"VC@ TurnNoof@$Off?ņ2@E IfJJ>CSp} F ~>L@}uageID wdEng`hUKr e'hcu`oh cQcontai&n 0T*';`diqa8gI.owNa ;bug, whicFhA'waix`( 2000;\ (Yals"tF pats). 4 !Jv=aa &' hani'paragraph,an(,>alwill crasheo-_W" _/g.oOP61 ?>Ta#>ia:97Bugka{|ndyj!hHnx ExڅE'a rgb@N>'sGcTasZ0)r&/!O %'pll:, rePt!it,Q<dc۠ inf. @sult. 0…t although UndofZ elf,& LcedQ9y B, It F?6W.QC@Z, pcsn0 aP(sPvioususAd` n wb-@ign F,??6Hne-x p it'H 'bett_0 tQPs (rv[b'`ne]sary).E  Do While Not objFormFieldCount = _  "lSection.Range.s.>Doc .Undo(Loop 'Also due to a Word bug, if@ the ff is precedey a!)tab,text within&may now be seled(!out)!itf!in g"!#HencCtkllowconvolutjworkarEIf S+Amk}0 Then AMoveRight unit:=wdCharacterLefP, Extend:=TrueEnd If 'Us$erss0CaElttoF'@(PressAIgnore reducesc,#ADdoeshn'tcib!== 5A~ c'#TQ@'!reinstP X:$'%ԿfVB4y.A3@Nz :7S CThoolshtUnpro ument('pim o@!5 F 'Q= A|ve On B GoToMl !`.cType wd4 @TWs Dialogs(wdT8 Use .!"s1R@.ShowC5QJ104"Exit/G P :SMsgBox .De scripP, vbInQQbDA! kOwdA{OJV"s|g<TJY !axs,8e`zC4 b7H4$h,hx(DtlH4$-tx"$ 4x <ltxV$'dx"$ 4x x5d0'Dcdx"$ 4x x6dD cl8$ xdDRi8 -dh"$ ,h ldhe3'':4N$$:TNDD 6D$E *# *# *# *# *#__SRP_b7YmodAutoSave (__SRP_c= __SRP_dq`, `=, `=, `=$! `$I `pk p  XrU~}  2i )) Qq : (4d0:dh@d<d&O(  P X "` Dh (  4c :c @cX <c &O   " /  ( 8 @ H P ` xZ$ Auto Save Z Z Z (`5saves the current document in the naming convention:-ons:4FamilyName, FirstName, FormIdentifier (eg CC3), DateZZZZZDim FamilyName As StringDim FirstName As String 0%2!4', 0%2!4'." t 0%r'Adid the user enter something in the first two fields on the form?#if not, send them back to try again ,$6 .$6 7Please enter a Family Name and a First Name on the form: >< @A@8 0%2B@Ju`hX+remove any spaces and convert to ProperCase ,$6 D$B', .$6 D$B'.<set up the Date part of the filename, in the format ##.##.##E***N/B do not try to use Format(date) - it contains "/" characters***cc Z$F. Z$H. Z$L$J'(assemble the filename ,,  .   ( ()'"7Please open the correct client's folder before saving. N N Or create a new one if necessary'*c *: P< @A@8Gopen the MSWord SaveAs... dialog box and inserts the assembled filename V R%Tcc "9 X95Z'&5'$npdid the user cancel? & Autosave cancelled: P< @A@8uaif not, then Save the document  $^ X`    /C"#$%&()*+,-.!012D45678B:;<=>?@A3WEFUHIJKLNOPQRSTGVhiYZ[\]f_`abcdeXgjmklnorU~}  -i1.Y.. 0A1a2// 3* 4444 i55Q66 7i7 77 7+'++# 8i8 -dh"$ ,h ldhe3'':4N$$:TNDD 6D$E *# *# *# *# *# *# *1x2 7''$:4NDD@xMT@^qt6D$lth"$ 4Qh d_ <ldql?l'h"$ h  khu _ K'd't'''''''''$'D_ 6D$td h"$ h hh"$ h h)dh_ h ,ldh'h"$ h  kh3'':4N$$@:TNDD 6D$3'':4N$$@:TNDD 6D$#h"$ Th lhl'`h"$ <h Q`lh#h"$ Th lh'D_ 5D_ x"$  h_ pQh[\pXp <k p  X6d`hp h X` ,ld)h` h"$ h hW'd't'''''''''$'Dhp h Xh6D$td6d`hp h X` ,ld)h`X pX'$cD_ 6D$ l | h"$ h hh"$ h h'h"$ h  kh3'':4N$$@:TNDD 6D$3'':4N$$@:TNDD 6D$#h"$ Th lh  T c= c= $ 8 \Xplx\h`D$td< l"$ l l,hlH l Qh[dxl`\x (l\F6\lx tl 4l\Zx dkZlATl"$ l lT #P02TPl x lx l l lx l l6\hlx l Xh ,l\)lhTl"$ l lT #P0\Lhx h pL l\@DHx H LD l@2TP) lhLHD x ! ylx Ql0\hlH l h ("l\qt)lh l"$ l lW''''''''''' '0lx l Xl60 #Zlxl"$ kZl:6\hlx l Xh ,l\)lh5 wT_ >TJ:Thl_ Pl 8#h >T)lh$qplp!'0lp % 50$qp5lt\hlH l h ("l\)lhVZ'0_ 50<\hl"$ <l h ("l\)lh8\'' 0l"$ <l l60 8\c '0l"$ <l l60 $Zlxl"$ kZlf>L(0hl"$ <l h 8"QLx)lh50x p l"$ l l x`N<0d`xXTPlhLHD0 8$ (xH Qx9ptxH x t 8&p x')xtp x"$ x xK'''''''' '0'@'P'`_ X6`P@0 )x_ Xx ,lx _ >$ x"$ kxF'`_ 5`KptxH x t 8&p @' )xtp x"$ x x$D Pxtp`P@0 @t"$ 4QtxKpx <lp,lt"$ tt 0(Qlht cX%h)p'Hh 4*5H h'Hx 5H<D +tt ,,''$'4@>DFH t6qwerty 0B@\h   The document has been saved. NWould you like to close it?: b d < @$8'& & f 0B@Bhrelease variables from memory h'l?Run this subroutine direct from the IDE in order to disable the?built-in MSWord 'Save' menu items. Users will therefore have to3use the AutoSave button on the 'Islington' toolbar. RSaveFileMenu Bar7~%%(0 Save As...FileMenu Bar7~%%(0Save as HTML...FileMenu Bar7~%%(0 Versions...FileMenu Bar7~%%(0SaveStandard7~%(0nlX>Run this subroutine direct from the IDE in order to enable the"built-in MSWord 'Save' menu items. RSaveFileMenu Bar7~%%(0 Save As...FileMenu Bar7~%%(0Save as HTML...FileMenu Bar7~%%(0 Versions...FileMenu Bar7~%%(0SaveStandard7~%(0nl 0! B@naA hluAttribute VB_Name = "modAutoSave" Option PrivaModule Public Const iTiltlvp rDFormIdentifier As$ SngFa0mily}irstSub Main() 'ss the currv documinnong confvn:-B, F:^(eg CC3), D Dim Doc Q i lngRetVa2lLoFi LLLL*LL*LLLLL"@d @` @P H$ Auto Save 8@@ @<  @88 @( @0 @H !@` @ @x @ 8DBZFHLJ@ @ @ @ @ x @h @Pd @h` @\ @X @T @P @L NPVRXbdfH`-@D hP @R@hx t8`<$ N@d @` @\ @L @H @8 @( @    R0 @( x *#t`<$\@X d @@ ` *#@p \ @ L @H @ 8 R4@( = @  p 0 P @x @t H@`(P (ME o  (0"8 <@ :    N(N@EX Hp *,Nb3B 255 B LX@ J]r!X *. N;Phpx   <3  &4h0h |Ep   0 $ @ H "P FX F***N/BBb@@AL A`at(d`{) - `"tCs "/" characters Acdv=y(!) & "."MonthlRight (Year, 2\assemb@V`=DGE , " (#"(D=)ȋ Uope#co ct cli`X's fHoldpbe ke @p.vbCXrLf" fcre@) a neRwre !qe Isary LfӋ[`Inza`_<MSWord As... dialog bӠu!qinte1dle!I With App@.DA# :i.B5B#8bqQ= wdTyp'= splayȀ! stjcancel <> -1 -ss ledGoG EQ l Q '5Y/n;zϢKylepN7aNPQ R<:=Ppw@"`[|qwi)P3(V^7has be3Qd@1d _"Would you likeUcloit?CaxQuesA +UYesNo.*o vb@'#\C1 s(aby 7r e!ovariaM Cp mdr, I= Null_D!-Sub;``:sQRun`"is subroutine02rPl fqSIDE_Jp]di2k% bч-a$A'%' nu^ems. U@s will1rNh` qbq 5'Isl z'olbar. -D .CommGBars("Me")pntr|ol@aE  Enad@sFa4"! P  0HTMLPVooooVw`'[/-St ard toc&T'_+''" o'#' '_"oK_" _"le).W"Tru0ۯ,,!-?"g,___Q/"nd@5"A?0-"I?ChpoiceA"TRPfa@x""UJma.ShowcqsCaGqVR i !C ? D1Di iDDD!E'a   $N8<(@`d"$ 4d ` 8< l>8)d`<5@N8<(@`d"$ 4d ` 8< l>8)d`<5@EP%`d"$ 4d ,`@`)d`5@NMP@@ @:(]/M@ :]/6@\3'':( N0:P N@@ 6@B<(@`d"$ 4d ` 8< )d`<5@5MP@@ @ `6@5MP@@ @ `6@@    @ :P :(x  xh`1l6@xh]*#8*#d*#`*#\*#X*#T*#Pll*#L*1x28d`\XTPL!*#8*#d*1h28d.'':( N@@@hMP@ 6@;: 0/25@ 0@aa3A withAei%e.fя "T*crtop@l1))?*?*`$57qAD@(.cAs.SetFt&szAsj~ Call u7MJpb   0 (@ h    6 6 @ $H p >x PF(`P ,    X 0)\C\X~UR"BWk;z 9HDpvScaiA3S'8x@ %wcaiA3S'8 0)\C\X 88G48<@DHLPSPSSS6" LL 0{DFB15010-293E-4F2A-A49C-057C81DB23F6}{06927D94-F208-40A4-AC2D-54DB38B9B0B6}PB $*\Rffff*174219eda5*\R0*#1b*\R0*#1a*\R1*#17b*\R1*#c1*\R1*#17e*\R1*#c6*\R0*#b*\R0*#1$*\Rffff*184219eda5*\R0*#11*\R0*#20($X0 $d`xkf`k11 p`(xk:aves`as p`n co$Di$As S$ht@x hP80Nbd8ft@x @t @d @T @D @4 @$ @& @  t@x `0h\ ME@ "  "  ( J8   0   0 (@ h    6 6 @ $H p >x PF(`P ,    ( 0 P h X `         & " ( 8` A@tl` 0B@j   .Your changes to this document have been saved. NWould you like to close it?: b d < @$8'& & f 0B@Ba A@thl*Just Saves the ActiveDocument as per usual"and informs the user on completionDim lngRetVal As LongDim FamilyName As StringDim FirstName As String0FamilyName = ActiveDocument.FormFields(1).Result/FirstName = ActiveDocument.FormFields(2).ResultOn Error GoTo someproblemhere8'is there something in the first two fields on the form?I'if not then it has NOT been saved before, so send LIG4Qiy89)a<9)@9) D)IQ`1 H)Ii` L)I`qP9)d?T lx"$ x $ x x"$ 4x xJ'$'4:TNDD   *#t *Fd^i/t6dD4$T]/d\0'4'D'dx"$ 4x x6dD4lx"$ xx($txdD4$\( lx"$ x($ xHDLKrU \$`$)`$i`prU~} & 1 i a ) K 9iA aEE1Fi'Q'Md9x"$ 4Qx[pt"$ t )ptTpf(%     x:This subroutine is not called by any event or by any other@procedure. Run it 'manually' from the VBA editor *only* when youBneed to create/re-create the Islington toolbar within the template 0 R(t 0Z@Z`<CREATES A PERMANENT CUSTOM TOOLBAR NAMED "Carers Assessment".9,9d9     9n v!< Set aBtn = .Add(Type:=msoControlButton, temporary:=False)(XU With aBtn .FaceId = 162 ) .Style = msoButtonIconAndCaption" .Caption = "Needs Select"7 .TooltipText = "Opens the Needs Selector Tool"A+ .OnAction = "InitialiseNeedsInput"xt6 End With% n7.z lh z9V9 9 Auto Save9++Saves document using the Auto Save facility9AutoSaveChoice9 VBA tou$p@$`@ x0R@x d @t @p @8X @PH @h8 @( nnn$`$H `$h`@ @0 @ ``$H!0`$+`$5(nnR0 `nnnX(DXnh(@@x @p @@l @hO @D@@d @` @^ @X @N`p`Xd @` =`(^ `X f\P`@Ln</`ME U " B @ FP H  9  RT $<8 HPX"!`    B   0  (P >x 2  < ( 0 8 @  H 4 `    <        (   8 P <X x     x    "    2"+630 hx  !JReset[)ssSwenUpdbeBb'pr  Eac #%IswRCuSIf a.!<> "~" TR$(U@ c_NPal) 0O gBuilt= ?)`Standard"at g0 s lt~EPv(1r IfuNqYQgIsO $ __SRP_2 f__SRP_3_VBA_PROJECTMdirf8%H%:X$%tx"$ x t ,lp=l)xtp<p:X$%tx"$ x t HQp$)xt $ ,$ d$ !$  $xl Qx <xfH%'%'%'%X% $lx=hx6 lh  |(XV% X%          <xfH%'%'%'%X% $lx=hx6 lh  |(XU% X%       <xfH%'%'%'%X % $lx=hx6 lh  |     @($ hl$xtpl  x"$ x x2px"$ 4x 0!Qp[ltxhdt ld=/d+`t l`^t xk^3dt ld"=Xt lX#=2dX t  t  thT x"$ x x$ 0lhtdXxpfrU $`$`p0* pHdTemplateProjectQH@  = | PB J< 9stdole>stdoleP f%\epmsoButtonIconAndCaption1lCaptionx TooltipTextb?OnAction BeginGroupmsoControlPopupl) (ResetToolbars4TScreenUpdating! aToolbarmsoBarTypeNormalBuiltIna modHelp (GetFormHelp HelpFileNamejHelpFileAddressFollowHyperlink-Address NewWindow addhistory ActiveWindow+ WindowState|wdWindowStateMaximizeU(GetComCareHandbookCCHandbookNamejCCHandbookAddress modSpellCheckF bCancelledcobjRangeyRange sCorrectedError*objDoc+Documentj (RunSpellCheck$1IsTitle Message objSection{SectionGobjOriginalRangen DocumentsCount0vvbNo%ProtectionTypewdNoProtectionwdAllowOnlyRevisionsW2OptionsCheckGrammarWithSpelling CheckGrammar CheckSpellingW ScreenRefreshA SpellingErrorsU=SystemaCursorlwdCursorNormalSwdAllowOnlyCommentsR SelectionZ wdCursorWait Unprotect?SpellingCheckedz StatusBarʜSectionsProtectedForFormsCheckProtectedSection&$ProtectfwdAllowOnlyFormFields!noresetg objFormField FormFieldobjFormFieldCountlngPos6wdFieldFormTextInputk\ TextInputC wdRegularTextEnabled۪VersionTurnNoProofingOff$3 LanguageID wdEnglishUK  ParagraphsfTablesWord97TableBugWorkaroundM" IsObjectValidoWords8vbTabc9UndoÞ MoveRightunit wdCharacterMoveLeftvExtend?Fields7Unlink0(ToolsProtectUnprotectDocument!oDocErrMesswdDialogToolsProtectDocument3Erro Description  (ProtectForm'cmdCancel_Click\ cmdSave_Clicksomeproblemhere~ SavecmSaveAsISetFocuscmSaveAs_Click&8BuiltInDocumentProperties_wdPropertyTitle[nHide9zItemzUserFormNLabel1,Label2,Label3,cmdSave cmdCancelLabel4,Click _B_var_TrimmT_B_var_StrConv{ _B_var_Datev _B_var_Right9 _B_str_LeftV _B_str_MidX Document_New;E GetCarerHelp1 GetCarerHelp2 GetCarerHelp3 GetCarerHelp4Path2Password (disableSave( (enableSave] (GetSafetyHelp5notfoundASafetyFileAddresse(GetCarersWebHelp2CCWebHelpAddress frmSaveChoice(AutoSaveChoice_B_var_lngRetVal-nd_^q  l @0ers AssessmentA stdole`MSFormsC ThisDocument< _Evaluate Officeu TemplateProjectEModule1b modAutoSave-(iTitlet(a^  *\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#D:\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{595CCF78-1B81-42CA-B519-5D6F51E0B564}#2.0#0#C:\WINDOWS\system32\MSForms.TWD#Microsoft Forms 2.0 Object Library*\G{15D39D2A-D226-11D7-BF93-000802E20D08}#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#D:\Program Files\Microsoft Office\Office\mso97.dll#Microsoft Office 8.0 Object LibraryPB ThisDocument b4219ed4d*Dk 0modHelp 1e41c95d9f*DHmodSpellCheck 114219ed73*DɄ`n@modAutoSave 184219eda5*D:x!frmSaveChoice 174219eda5*DwxG ModCreateToolbar 154219eda5*DpF00H`xFKND!d! ٙ$J(L"ǝ^=|I.<XVKYKDnm(_dviJ|$Z9g_L'}h0G Wordk VBAWin16~Win32Mac$Copy of CC4 (v3.1) Carers AssessmentA stdole`MSFormsC ThisDocument< _Evaluate Officeu TemplateProjectEModule1b modAutoSave-(iTitlet(FormIdentifierph (AutoSaveMainчDocName׷iName lngRetValFileDate  SavePromptA (FamilyNameI (FirstNameActiveDocument\ FormFields-|ResulturTrim@MsgBoxRpromptmbuttons] vbExclamationTitle~StrConvx' vbProperCaseDayMonthRight Year6nvbCrLf vbInformationn Application*DialogswdDialogFileSaveAsNwdTypeDocument%&DisplaySaveAsf;FileNamej FileFormat vbQuestionvbYesNovbYesa? vbNullString AutoSaveStart SaveChoicegShow ModCreateToolbar2L (CreateToolbar CustomizationContext΀ myToolbar% CommandBaraBtnCommandBarControlP CommandBars AddrPositionmsoBarFloatingMenuBar߫ temporaryVisibleTop5 ProtectionmsoBarNoCustomizevmsoBarNoChangeDock^msoBarNoChangeVisible msoBarNoMove>ControlsKmsoControlButtonnFaceIdiStyl*\G{00020430-C 0046}#2.0#0#C:\WINNT\System32\c2.tlb#OLE Autom`ation/MSFor ms>SFErms/| rF595CCF78-1B81-42CA-B519-5D6F51E0B564 FDOWS\sG4.TWD#MicrosPoft > a Ob Library:0 j@15D39D2A-D226-11D7-BF93802E 20D08@TEMP\VBE\<EX<.E .`M nOfficnOkfiTcn)*2DF8D04C-5BFA-101@B-BDE5*A*Am42*D:\gram F`iles\G\mso97.d llP 8.0ERP³ThisDocumentN2@1Th@6sDcuQ@enTHB1@B,Bk "B +BmodHPelp 2mdepOM!m(B @SpellChec$k2FbSp`7lUCe 9kn`~Ʉ% #lSave 2A)t`Sav/3 -:#/frmaCho@S#J#fzeodWG/.wc:ModCreToolbar2 a.C`etT br/5m! Fo!arU~~~~~~~q       __SRP_0^__SRP_1tfrmSaveChoice >NMfz  "-?@Label1!-6S` y0Label2Label3{lFWJOcmdSave cmdCancelcmSaveAsLabel4cmdCancel_ClickcmSaveAs_Click \#=h8+3qQ @G?,2qLQ =This seems to be a new form, which has not been saved before. *Please enter a Family Name and First Name, 3then try AutoSave again - selecting the top button.noreset GetCarerHelp3 Your changes have been saved. "Do you want to close the document? Please Try Again ,There is a problem with saving the document. "Try clicking the top choice buttonƏYl| Standard Formatting  w h )Form Help is not yet set up for this form2 `http://netitweb/about_service_areas/social_services/policies_procedures/Community Care Handbook/ Community Care Handbook.htm *The Spelling and Grammar Check is complete  0 F/ F? {http://netitweb/about_service_areas/social_services/policies_procedures/Community Care Handbook/Community Care Handbook.htmb Fl F Islington Spell Check *There are no open documents to spell check Run Spell Check? F& HThis spell checking program for forms may take a few minutes to complete# C(depending on the length of the form and how many errors are found). XIt will let you know when it has finished. Please do not try to cancel it in the middle. F The Spelling Check is complete5 Fu F Spellchecking document ...^ F *The spelling and grammar check is complete The spelling check is complete' F  h P 8X FM F\ F   fĤIx8<*h+7N&N~}>iCY I. Document_New& IS:\Swift\adults\Help_Files_adults\Community Care Handbook August 2004.htm Needs,Actions,Outcomes GetCarerHelp1 Possible Outcomes GetCarerHelp2 Services for Carers Direct Payments for Carers GetCarerHelp4 GetCarerHelp1 GetCarerHelp2 GetCarerHelp3 GetCarerHelp4# CS:\Swift\adults\Help_Files_adults\Carers-Needs_Actions_Outcomes.htm& IS:\Swift\adults\Help_Files_adults\Carers-Possible_Assessment_Outcomes.htm Save" @S:\Swift\adults\Help_Files_adults\Carers-Services_for_Carers.htm% GS:\Swift\adults\Help_Files_adults\Carers-Direct_Payments_for_Carers.htm AutoSaveMain  -Your changes to the document have been saved. qwerty disableSave enableSave File Menu BarK)^rU ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~e 9aL4 \   A Q8a Y JyFa 9aYa BqCCLya 1  qKa Y8 1  $Copy of CC4 (v3.1) Carers Assessment ThisDocumentTemplateProjectModule1 modAutoSaveModCreateToolbarmodHelp modSpellCheck SaveChoiceF=C:\Program Files\Common Files\Microsoft Shared\VBA\VBA332.dllVBA ) Q( F4D:\Program Files\Microsoft Office\Office\MSWORD8.OLBWord A i80FC:\WINNT\System32\stdole2.tlbstdole aH`<.PC:\WINNT\System32\MSForms.TWDMSForms A!iX.E .`M *& C:\TEMP\VBE\MSForms.EXD I!qhL-[DR 2D:\Program Files\Microsoft Office\Office\mso97.dllOffice )x CreateToolbar ResetToolbars  Fy Fyp F Islington F F FFaceIdStyle Auto Save F +Saves document using the Auto Save facility AutoSaveStart Spell Check) F Spell checks the whole document RunSpellCheck Help Form Help and Com Care Handbook CommandBarControlsAddType temporary Form Help Help with this form GetFormHelp CC Handbook Link to Com Care Handbook GetComCareHandbookk FZ n_AcK7* F>ݝE` FDocument @ AutoSaveMain AutoSaveStart  GetFormHelpGetComCareHandbook RunSpellCheckCheckProtectedSectionY FTurnNoProofingOff( FWord97TableBugWorkaroundToolsProtectUnprotectDocument ProtectForm   VBA332.DLL   8  S P 7Please enter a Family Name and a First Name on the form  n h  b      !   )  cmdSave_Click  k  . ,   ( ) 7Please open the correct client's folder before saving.    Or create a new one if necessary FNameFormat F Autosave cancelled The document has been saved. Would you like to close it?VTjCQ(s'Nΐ?8EqS|H i{CLXb' {gjKЙyY@<9ȏ[qJ eUserForm5ZD;Hxe> F3Dynamic Enabled Save As... Save as HTML... Versions... Health and Safety Info on safe computer use GetSafetyHelp GetSafetyHelp %Help not yet set up for this functione%I | 0)\C\X~UR"BWk;z  9HDpvS ,S:\Swift\adults\Help_Files_adults\Safety.hlp Carers WebHelp !Link to the Carers WebHelp system GetCarersWebHelpGetCarersWebHelp% FS:\Swift\adults\Help_Files_adults\Carers_Assessments_WebHelp\index.htm frmSaveChoice AutoSaveChoicecaiA3S'8=ZKF}2c 1L AutoSaveChoice .Your changes to this document have been saved. Carers Assessment@objSection ( objFormField Q8 9H )X YLQhO(J @ }a'/4(,*What do you want to do?1@Tahomax*aI want to save a NEW version of this document (with a different name, or in a different location)N5Tahomap*[I want to!\CompObj"aVBFrame-PROJECTwmo save the changes I've made to this document (and overwrite the original version) N5Tahoma #{uTahoma #{uTahoma #{uTahoma@.'I want to CANCEL the Auto Save process 5Tahoma2PLabel1{(2Label2E(2Label3E $,cmSaveAs{$,cmdSaves{ , ;,cmdCancel{(2`Label4esEn  Microsoft Forms 2.0 FormEmbedded Object9qVERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} frmSaveChoice Caption = "Your Choice..." ClientHeight = 3510 ClientLeft = 45 ClientTop = 330 ClientWidth = 5715 StartUpPosition = 1 'CenterOwner TypeInfoVer = 10 End ThisDocumentThisDocumentmodHelpmodHelpmodSpellCheckmodSpellCheckfrmSaveChoicefrmSaveChoicemodAutoSavemodAutoSaveModCreateToolbarModCreateToolbarID="{6EEBB18A-6F24-4298-BE45-4C4520417E95}" Document=ThisDocument/&H00000000 Module=modHelp Package={AC9F2F90-E877-11CE-9F68-PROJECTCompObj&jObjectPoolgg00AA00574A4F} Module=modSpellCheck BaseClass=frmSaveChoice Module=modAutoSave Module=ModCreateToolbar Name="TemplateProject" HelpContextID="0" CMG="999B4D6B516B516B516B51" DPB="BFBD6BB7B7FBDCFCDCFCDC" GC="E5E7319D71C272C2723D" [Host Extender Info] &H00000001={3832D640-CF90-11CF-8E43-00A0C911005A};VBE;&H00000000 [Workspace] ThisDocument=88, 88, 608, 528, modHelp=37, 81, 557, 521, modSpellCheck=0, 0, 0, 0, C frmSaveChoice=0, 0, 0, 0, C, 0, 0, 539, 440, I modAutoSave=0, 0, 0, 0, C ModCreateToolbar=22, 22, 561, 462, Z   FMicrosoft Word Document MSWordDocWord.Document.89q