%@LANGUAGE="VBSCRIPT"%> <% function TestCaptcha(byval valSession, byval valCaptcha) dim tmpSession valSession = Trim(valSession) valCaptcha = Trim(valCaptcha) if (valSession = vbNullString) or (valCaptcha = vbNullString) then TestCaptcha = false else tmpSession = valSession valSession = Trim(Session(valSession)) Session(tmpSession) = vbNullString if valSession = vbNullString then TestCaptcha = false else valCaptcha = Replace(valCaptcha,"i","I") if StrComp(valSession,valCaptcha,1) = 0 then TestCaptcha = true else TestCaptcha = false end if end if end if end function %>
EHS has recently been awarded several NHS contracts.
Child Immunisation programme - two programmes to identify unimunisated patients and perform a patient contact strategy.
Diabetes Performance Management Tool - System development, implementation and training for GP practices.
Diabetic Retinopathy - Contacting patients and scheduling appointments to increase uptake.
Dental Health Programme - Scheduling appointments for NHS Dental Practices.
Cytology Programme - Identify and contact hard-to-reach women for Cervical screening.
Smoking Cessation - Contacting patients to establish quit status and Scheduling clinics.