Template  Learning disab health assessmt Saved on 8.9.2004 at 10:44
HEATH
^tclabbr(1361)
Teetotaller
^tclabbr(1362)
Trivial
^tclabbr(1363)
Light
^tclabbr(1364)
Moderate
^tclabbr(1365)
Heavy
^tclabbr(1366)
Very Heavy
^tclabbr(1367)
Stopped
^tclabbr(1368)
Gkw
^tclabbr(1369)
Suspect Alcohol
^tclabbr(1371)
Never
^tclabbr(1377)
Ex-Trivial
^tclabbr(1378)
Ex-Light
^tclabbr(1379)
Ex- Moderate
^tclabbr(1381)
Ex Impossible
^tclabbr(1382)
Avoids Exer
^tclabbr(1383)
Light Exercise
^tclabbr(1384)
Moderate Exer
^tclabbr(1385)
Heavy Exercise
^tclabbr(1386)
Athlete
^tclabbr(1387)
Not Known
^tclabbr(1388)
Aerobic 0/Wk
^tclabbr(1389)
Aerobic 1/Wk
^tclabbr(2431)
Regular
^tclabbr(2432)
Irregular
^tclabbr(2433)
Reg. Irreg.
^tclabbr(2434)
No Gallop Rhyt
^tclabbr(2469)
Systolic BP
^tclabbr(3930)
Incontinent
^tclabbr(3931)
Occasional Acc
^tclabbr(3932)
Fully Continen
^tclabbr(3940)
Incontinent
^tclabbr(3941)
Occasion Accid
^tclabbr(3942)
Fully Continen
^tclabbr(4661)
Not Done
^tclabbr(4662)
Negative
^tclabbr(4663)
Trace
^tclabbr(4664)
+
^tclabbr(4665)
++
^tclabbr(4666)
+++
^tclabbr(4667)
++++
^tclabbr(4668)
Glycosuria
^tclabbr(4669)
Urine Dipstick 
^tclabbr("136A")
Ex-Trivial Drin
^tclabbr("136B")
Ex-Light Drinke
^tclabbr("136C")
Ex-Moderate Dri
^tclabbr("136D")
Ex-Heavy Drinke
^tclabbr("136E")
Ex-Very Heavy D
^tclabbr("136F")
Spirit drinker
^tclabbr("136G")
Beer drinker
^tclabbr("136H")
Drinks Beer And
^tclabbr("136I")
Drinks wine
^tclabbr("136J")
Social drinker
^tclabbr("136K")
Alcohol Intake 
^tclabbr("136L")
Alcohol Intake 
^tclabbr("136M")
Current Non Dri
^tclabbr("136N")
Light drinker
^tclabbr("136O")
Moderate Drinke
^tclabbr("136P")
Heavy drinker
^tclabbr("136Q")
Very Heavy Drin
^tclabbr("136Z")
Just Drinks
^tclabbr("137A")
Ex-Heavy
^tclabbr("137B")
Ex-Very Heavy
^tclabbr("137F")
Unknown
^tclabbr("137G")
Preparation
^tclabbr("137H")
Pipe Smoker
^tclabbr("137I")
Passive smoker
^tclabbr("137J")
Cigar smoker
^tclabbr("137K")
Stopped on
^tclabbr("137L")
Non-Smoker
^tclabbr("137M")
Rolls Own Cigs
^tclabbr("137N")
Ex pipe smoker
^tclabbr("137O")
Ex Cigar Smoker
^tclabbr("137P")
Cig Smoker
^tclabbr("137R")
Current Smoker
^tclabbr("137S")
Ex smoker
^tclabbr("137W")
Chews tobacco
^tclabbr("138A")
Aerobic 2/Wk
^tclabbr("138B")
Aerobic 3+/Wk
^tclabbr("138C")
Anaerobic 0/Wk
^tclabbr("138D")
Anaerobic 1/Wk
^tclabbr("138E")
Anaerobic 2/Wk
^tclabbr("138F")
Anaerobic 3/Wk
^tclabbr("138G")
Attends Exercis
^tclabbr("138H")
Enjoys Intermed
^tclabbr("138I")
Fitt Activ 0 
^tclabbr("138J")
Fitt Activi 1
^tclabbr("138K")
Fitt Activi 2 
^tclabbr("138L")
Fitt Activ 3 
^tclabbr("138M")
Fitt Activi 4
^tclabbr("138N")
Fitt Activi 5
^tclabbr("138O")
Inadeq Exercis
^tclabbr("138Z")
Nos
^tclabbr("13A1")
Vegetarian
^tclabbr("13A2")
Vegan
^tclabbr("13A3")
Wt Reducing
^tclabbr("13A4")
Low fat diet
^tclabbr("13A5")
Low salt diet
^tclabbr("13A6")
Milk Free
^tclabbr("13A7")
Egg Free
^tclabbr("13A8")
High Fibre
^tclabbr("13A9")
Minimal Residue
^tclabbr("13AA")
Semisolid diet
^tclabbr("13AB")
Diabetic Lipid 
^tclabbr("13AC")
Diabetic Weight
^tclabbr("13AZ")
Nos
^tclabbr("13C1")
Fully Mobile
^tclabbr("13C2")
Outside With Aid
^tclabbr("13C3")
Mobile In Home
^tclabbr("13C4")
Needs Aid In House
^tclabbr("13C5")
Confined To Chair
^tclabbr("13C6")
Bed-Ridden
^tclabbr("13C7")
Car Owner
^tclabbr("13C8")
Has Access To Car
^tclabbr("13C9")
Other Transport
^tclabbr("13CB")
Public Transport
^tclabbr("13CZ")
Mobility NOS
^tclabbr("13p1")
4 Weeks
^tclabbr("1B71")
No Visual Sympt
^tclabbr("1B72")
Diplopia/Double
^tclabbr("1B73")
Flashing Lights
^tclabbr("1B74")
Floaters seen
^tclabbr("1B75")
Loss of vision
^tclabbr("1B76")
Temporary Visua
^tclabbr("1B77")
Deteriorating V
^tclabbr("1B78")
Scotopic Sensit
^tclabbr("1B79")
Visual Perceptu
^tclabbr("1B7A")
Patient Concern
^tclabbr("1B7Z")
Visual Symptom 
^tclabbr("1B93")
Difficult Speech
^tclabbr("1C11")
Hearing Normal
^tclabbr("1C12")
Difficulty
^tclabbr("1C13")
Deafness
^tclabbr("1C14")
"Blocked Ear"
^tclabbr("1C15")
Popping In Ear
^tclabbr("1C16")
Deteriorating H
^tclabbr("1C17")
Hearing Aid Pro
^tclabbr("1C18")
Diff Hearing Wt
^tclabbr("1C19")
Difficulty Hear
^tclabbr("1C1Z")
Nos
^tclabbr("1FB")
Diet poor
^tclabbr("243Z")
Pulse Rhythm N
^tclabbr("246A")
Diastolic BP
^tclabbr("2D6")
O/E Ear discharg
^tclabbr("2D63")
O/E waxy dischar
^tclabbr("442W")
Serum TSH 
^tclabbr("466A")
Urine Clinitest
^tclabbr("466Z")
Nos.
^tclabbr("67A3")
In pregnancy
^tclabbr("8B2B")
Replace. Therapy
^tclabbr("8CA4")
Advised on diet
^tclabbr("8CAL")
Cessation advice
^tclabbr("8H7i")
Cessatn.advisor
^tclabbr("8HTK")
Smoking clinic
^tclabbr("9HB0")
LD Plan Declined
^tclabbr("9HB1")
LD Plan Offered
^tclabbr("9HB2")
LD Plan Reviewed
^tclabbr("DAVIEDA1")
Daily Excercise
^tclabbr("DAVIERE1")
R act exercise
^tclabbr("EGTON1025")
Current Smoker 
^tclabbr("EGTON1027")
Ex Rolls ups
^tclabbr("EGTON322")
X Smoker
^tclabbr("EGTON418")
Alcohol Intake
^tclabbr("EGTON421")
Advised Wt Reducing
^tclabbr("EGTON422")
Low Fat
^tclabbr("EGTON423")
Sugar Free
^tclabbr("EMISEX2")
Exercise Sessio
^tclabbr("EMISSMRE1")
Smoker (Read Co
^tclabbr("PATELGL1")
Gluten Free
^tclabbr("PATELNO1")
Normal Diet
^tclabbr("PATELUN1")
Unbalanced Diet
*
*
^tclall(136)
Alcohol consumption
^tclall(136,7)
PN
^tclall(138)
Exercise grading
^tclall(138,7)
P
^tclall(138,8)
M..
^tclall(229)
O/E - height
^tclall(229,7)
VN
^tclall(242)
O/E - pulse rate
^tclall(242,7)
YN
^tclall(242,8)
M..
^tclall(243)
O/E - pulse rhythm
^tclall(243,7)
Y
^tclall(243,8)
M..
^tclall(393)
Bowels - assessment
^tclall(393,7)
G
^tclall(394)
Bladder - assessment
^tclall(394,7)
G
^tclall(466)
Urine test for glucose
^tclall(466,7)
M?
^tclall(611)
General contraceptive advice
^tclall(611,7)
O
^tclall(611,8)
.NL
^tclall(679)
Health education - subject
^tclall(679,7)
P
^tclall(1361)
Teetotaller
^tclall(1361,7)
P 
^tclall(1362)
Trivial drinker - <1u/day
^tclall(1362,7)
P 
^tclall(1363)
Light drinker - 1-2u/day
^tclall(1363,7)
P 
^tclall(1364)
Moderate drinker - 3-6u/day
^tclall(1364,7)
P 
^tclall(1365)
Heavy drinker - 7-9u/day
^tclall(1365,7)
P 
^tclall(1365,8)
.NL
^tclall(1366)
Very heavy drinker - >9u/day
^tclall(1366,7)
P 
^tclall(1366,8)
.NL
^tclall(1367)
Stopped drinking alcohol
^tclall(1367,7)
P 
^tclall(1367,8)
M..
^tclall(1368)
Alcohol consumption unknown
^tclall(1368,7)
P 
^tclall(1369)
Suspect alcohol abuse - denied
^tclall(1369,7)
P 
^tclall(1369,8)
.NL
^tclall(1371)
Never smoked tobacco
^tclall(1371,7)
P 
^tclall(1377)
Ex-trivial smoker (<1/day)
^tclall(1377,7)
P 
^tclall(1378)
Ex-light smoker (1-9/day)
^tclall(1378,7)
P 
^tclall(1379)
Ex-moderate smoker (10-19/day)
^tclall(1379,7)
P 
^tclall(1379,8)
M..
^tclall(1381)
Exercise physically impossible
^tclall(1381,7)
P
^tclall(1382)
Avoids even trivial exercise
^tclall(1382,7)
P
^tclall(1383)
Enjoys light exercise
^tclall(1383,7)
P
^tclall(1384)
Enjoys moderate exercise
^tclall(1384,7)
P
^tclall(1385)
Enjoys heavy exercise
^tclall(1385,7)
P
^tclall(1386)
Competitive athlete
^tclall(1386,7)
P
^tclall(1387)
Exercise grading unknown
^tclall(1387,7)
P
^tclall(1388)
Aerobic exercise 0 times/week
^tclall(1388,7)
P
^tclall(1389)
Aerobic exercise 1 time/week
^tclall(1389,7)
P
^tclall(2291)
O/E-height > 20% below average
^tclall(2291,7)
VT
^tclall(2292)
O/E - height 10-20% < average
^tclall(2292,7)
VT
^tclall(2293)
O/E -height within 10% average
^tclall(2293,7)
VT
^tclall(2294)
O/E-height 10-20% over average
^tclall(2294,7)
VT
^tclall(2295)
O/E -height > 20% over average
^tclall(2295,7)
VT
^tclall(2296)
O/E - loss of height
^tclall(2296,7)
VT
^tclall(2421)
O/E - pulse rate very slow
^tclall(2421,7)
Y
^tclall(2422)
O/E - pulse rate - bradycardia
^tclall(2422,7)
Y
^tclall(2423)
O/E - pulse borderline slow
^tclall(2423,7)
Y
^tclall(2424)
O/E - pulse rate normal
^tclall(2424,7)
Y
^tclall(2425)
O/E - pulse borderline fast
^tclall(2425,7)
Y
^tclall(2426)
O/E - pulse rate tachycardia
^tclall(2426,7)
Y
^tclall(2426,8)
.NL
^tclall(2427)
O/E - pulse rate very fast
^tclall(2427,7)
Y
^tclall(2428)
O/E - pulse rate-pulse deficit
^tclall(2428,7)
Y
^tclall(2429)
O/E pulse rate stable
^tclall(2429,7)
Y
^tclall(2431)
O/E - pulse rhythm regular
^tclall(2431,7)
Y
^tclall(2432)
O/E - pulse irregularly irreg.
^tclall(2432,7)
Y
^tclall(2433)
O/E -pulse regularly irregular
^tclall(2433,7)
Y
^tclall(2433,8)
M..
^tclall(2434)
O/E - no gallop rhythm
^tclall(2434,7)
Y
^tclall(2469)
Systolic blood pressure
^tclall(2469,7)
VN
^tclall(3930)
Bowels: incontinent
^tclall(3930,7)
GI
^tclall(3931)
Bowels: occasional accident
^tclall(3931,7)
GI
^tclall(3932)
Bowels: fully continent
^tclall(3932,7)
GI
^tclall(3940)
Bladder: incontinent
^tclall(3940,7)
GI
^tclall(3941)
Bladder: occasional accident
^tclall(3941,7)
GI
^tclall(3942)
Bladder: fully continent
^tclall(3942,7)
GI
^tclall(4661)
Urine glucose test not done
^tclall(4661,7)
MT
^tclall(4662)
Urine glucose test negative
^tclall(4662,7)
MT
^tclall(4663)
Urine glucose test = trace
^tclall(4663,7)
MT
^tclall(4664)
Urine glucose test = +
^tclall(4664,7)
MT
^tclall(4665)
Urine glucose test = ++
^tclall(4665,7)
MT
^tclall(4666)
Urine glucose test = +++
^tclall(4666,7)
MT
^tclall(4667)
Urine glucose test = ++++
^tclall(4667,7)
MT
^tclall(4668)
Glycosuria
^tclall(4668,7)
MT
^tclall(4669)
Urine dipstick for glucose
^tclall(4669,7)
MT
^tclall(6791)
Health ed. - smoking
^tclall(6791,7)
P
^tclall(6792)
Health ed. - alcohol
^tclall(6792,7)
P
^tclall(6792,8)
M..
^tclall(6793)
Health ed. - cervical cytology
^tclall(6793,7)
P
^tclall(6794)
Health ed. - rubella status
^tclall(6794,7)
P
^tclall(6795)
Health ed. - breast exam.
^tclall(6795,7)
P
^tclall(6796)
Health ed. - donor status
^tclall(6796,7)
P
^tclall(6797)
Health ed. - immunisation
^tclall(6797,7)
P
^tclall(6797,8)
M..
^tclall(6798)
Health ed. - exercise
^tclall(6798,7)
P
^tclall(6799)
Health ed. - diet
^tclall(6799,7)
P
^tclall(6799,8)
M.L
^tclall("136A")
Ex-trivial drinker (<1u/day)
^tclall("136A",7)
P 
^tclall("136B")
Ex-light drinker - (1-2u/day)
^tclall("136B",7)
P 
^tclall("136C")
Ex-moderate drinker - (3-6u/d)
^tclall("136C",7)
P 
^tclall("136D")
Ex-heavy drinker - (7-9u/day)
^tclall("136D",7)
P 
^tclall("136E")
Ex-very heavy drinker-(>9u/d)
^tclall("136E",7)
P 
^tclall("136E",8)
.NL
^tclall("136F")
Spirit drinker
^tclall("136F",7)
P 
^tclall("136G")
Beer drinker
^tclall("136G",7)
P 
^tclall("136H")
Drinks beer and spirits
^tclall("136H",7)
P 
^tclall("136I")
Drinks wine
^tclall("136I",7)
P 
^tclall("136I",8)
M..
^tclall("136J")
Social drinker
^tclall("136J",7)
P 
^tclall("136K")
Alcohol intake above rec limit
^tclall("136K",1)
Alcohol intake above recommended sensible limits
^tclall("136K",7)
P
^tclall("136K",8)
.NL
^tclall("136L")
Alcohol intake within rec limt
^tclall("136L",1)
Alcohol intake within recommended sensible limits
^tclall("136L",7)
P
^tclall("136M")
Current non drinker
^tclall("136M",7)
P
^tclall("136N")
Light drinker
^tclall("136N",7)
P
^tclall("136O")
Moderate drinker
^tclall("136O",7)
P
^tclall("136P")
Heavy drinker
^tclall("136P",7)
P
^tclall("136Q")
Very heavy drinker
^tclall("136Q",7)
P
^tclall("136R")
Binge drinker
^tclall("136R",7)
P
^tclall("136Z")
Alcohol consumption NOS
^tclall("136Z",7)
P 
^tclall("137A")
Ex-heavy smoker (20-39/day)
^tclall("137A",7)
P 
^tclall("137B")
Ex-very heavy smoker (40+/day)
^tclall("137B",7)
P 
^tclall("137F")
Ex-smoker - amount unknown
^tclall("137F",7)
P 
^tclall("137G")
Trying to give up smoking
^tclall("137G",7)
P 
^tclall("137G",8)
MNL
^tclall("137H")
Pipe smoker
^tclall("137H",7)
PN
^tclall("137H",8)
.NL
^tclall("137I")
Passive smoker
^tclall("137I",7)
P 
^tclall("137I",8)
.NL
^tclall("137J")
Cigar smoker
^tclall("137J",7)
PN
^tclall("137J",8)
.NL
^tclall("137K")
Stopped smoking
^tclall("137K",7)
P 
^tclall("137L")
Current non-smoker
^tclall("137L",7)
P 
^tclall("137M")
Rolls own cigarettes
^tclall("137M",7)
PN
^tclall("137M",8)
.NL
^tclall("137N")
Ex pipe smoker
^tclall("137N",7)
PN
^tclall("137O")
Ex cigar smoker
^tclall("137O",7)
PN
^tclall("137P")
Cigarette smoker
^tclall("137P",7)
PN
^tclall("137P",8)
.NL
^tclall("137R")
Current smoker
^tclall("137R",7)
P
^tclall("137R",8)
.NL
^tclall("137S")
Ex smoker
^tclall("137S",7)
P
^tclall("137W")
Chews tobacco
^tclall("137W",7)
P
^tclall("138A")
Aerobic exercise 2 times/week
^tclall("138A",7)
P
^tclall("138B")
Aerobic exercise 3+ times/week
^tclall("138B",7)
P
^tclall("138C")
Anaerobic exercise 0 times/wk
^tclall("138C",7)
P
^tclall("138D")
Anaerobic exercise 1 time/week
^tclall("138D",7)
P
^tclall("138E")
Anaerobic exercise 2 times/wk
^tclall("138E",7)
P
^tclall("138F")
Anaerobic exercise 3+ times/wk
^tclall("138F",7)
P
^tclall("138G")
Attends exercise classes
^tclall("138G",7)
P
^tclall("138H")
Enjoys intermediate exercise
^tclall("138H",7)
P
^tclall("138I")
FITT activity level 0
^tclall("138I",1)
FITT activity level 0; no mod/vig activity of 20 mins duratn
^tclall("138I",7)
P
^tclall("138J")
FITT activity level 1
^tclall("138J",1)
FITT activity level 1; 1-4 occas of mod/vig activit in 4 wks
^tclall("138J",7)
P
^tclall("138K")
FITT activity level 2
^tclall("138K",1)
FITT activity level 2; 5-11 occas of mod/vig activt in 4 wks
^tclall("138K",7)
P
^tclall("138L")
FITT activity level 3
^tclall("138L",1)
FITT activity level 3; 12+ occas of mod activity in 4 weeks
^tclall("138L",7)
P
^tclall("138M")
FITT activity level 4
^tclall("138M",1)
FITT activity level 4; 12+ occas of mod/vig activit in 4 wks
^tclall("138M",7)
P
^tclall("138N")
FITT activity level 5
^tclall("138N",1)
FITT activity level 5; 12+ occas of vig activity in 4 weeks
^tclall("138N",7)
P
^tclall("138O")
Takes inadequate exercise
^tclall("138O",7)
P
^tclall("138Z")
Exercise grading NOS
^tclall("138Z",7)
P
^tclall("13A")
Diet - patient initiated
^tclall("13A",7)
P
^tclall("13A",8)
M..
^tclall("13A1")
Vegetarian diet - no meat
^tclall("13A1",7)
P
^tclall("13A2")
Vegan diet - no dairy produce
^tclall("13A2",7)
P
^tclall("13A3")
Weight reducing diet
^tclall("13A3",7)
P
^tclall("13A3",8)
..L
^tclall("13A4")
Low fat diet
^tclall("13A4",7)
P
^tclall("13A5")
Low salt diet
^tclall("13A5",7)
P
^tclall("13A6")
Milk free diet - allergy
^tclall("13A6",7)
P
^tclall("13A7")
Egg free diet - allergy
^tclall("13A7",7)
P
^tclall("13A8")
High fibre diet
^tclall("13A8",7)
P
^tclall("13A9")
Minimal residue diet
^tclall("13A9",7)
P
^tclall("13AA")
Semisolid diet
^tclall("13AA",7)
P
^tclall("13AB")
Diabetic lipid lowering diet
^tclall("13AB",7)
P
^tclall("13AB",8)
.NL
^tclall("13AC")
Diabetic weight reducing diet
^tclall("13AC",7)
P
^tclall("13AZ")
Patient initiated diet NOS
^tclall("13AZ",7)
P
^tclall("13C")
Mobility - social functioning
^tclall("13C",7)
P
^tclall("13C1")
Fully mobile
^tclall("13C1",7)
P
^tclall("13C2")
Mobile outside with aid
^tclall("13C2",7)
P
^tclall("13C3")
Mobile in home
^tclall("13C3",7)
P
^tclall("13C4")
Needs walking aid in home
^tclall("13C4",7)
P
^tclall("13C5")
Confined to chair
^tclall("13C5",7)
P
^tclall("13C6")
Bed-ridden
^tclall("13C6",7)
P
^tclall("13C7")
Car owner
^tclall("13C7",7)
P
^tclall("13C8")
Has access to a car
^tclall("13C8",7)
P
^tclall("13C9")
Has other personal transport
^tclall("13C9",7)
P
^tclall("13CA")
Housebound
^tclall("13CA",7)
P
^tclall("13CA",8)
M..
^tclall("13CB")
Depends on public transport
^tclall("13CB",7)
P
^tclall("13CC")
Immobile
^tclall("13CC",7)
P
^tclall("13CC",8)
M..
^tclall("13CD")
Mobility very poor
^tclall("13CD",7)
P
^tclall("13CE")
Mobility poor
^tclall("13CE",7)
P
^tclall("13CF")
Transport problems
^tclall("13CF",7)
P
^tclall("13CG")
Mobility fair
^tclall("13CG",7)
P
^tclall("13CH")
Physical activity
^tclall("13CH",7)
P
^tclall("13CI")
Target physical activity
^tclall("13CI",7)
P
^tclall("13CJ")
WHO performance status grade 0
^tclall("13CJ",7)
P
^tclall("13CK")
WHO performance status grade 1
^tclall("13CK",7)
P
^tclall("13CL")
WHO performance status grade 2
^tclall("13CL",7)
P
^tclall("13CM")
WHO performance status grade 3
^tclall("13CM",7)
P
^tclall("13CN")
WHO performance status grade 4
^tclall("13CN",7)
P
^tclall("13CP")
Impaired mobility
^tclall("13CP",7)
P
^tclall("13CQ")
Physical act targ min exercise
^tclall("13CQ",1)
Physical activity target minimal exercise
^tclall("13CQ",7)
P
^tclall("13CR")
Physical act targ light exer
^tclall("13CR",1)
Physical activity target light exercise
^tclall("13CR",7)
P
^tclall("13CS")
Physical act targ mod exercise
^tclall("13CS",1)
Physical activity target moderate exercise
^tclall("13CS",7)
P
^tclall("13CT")
Physical act targ stren exer
^tclall("13CT",1)
Physical activity target strenuous exercise
^tclall("13CT",7)
P
^tclall("13CZ")
Mobility NOS
^tclall("13CZ",7)
P
^tclall("13p1")
Smoking status at 4 weeks
^tclall("13p1",7)
A
^tclall("1B7")
Visual symptoms
^tclall("1B7",7)
Y
^tclall("1B7",8)
M..
^tclall("1B71")
No visual symptom
^tclall("1B71",7)
Y
^tclall("1B72")
Diplopia/double vision
^tclall("1B72",7)
Y
^tclall("1B73")
Flashing lights seen
^tclall("1B73",7)
Y
^tclall("1B73",8)
M..
^tclall("1B74")
Floaters seen
^tclall("1B74",7)
Y
^tclall("1B74",8)
M..
^tclall("1B75")
Loss of vision
^tclall("1B75",7)
Y
^tclall("1B75",8)
M..
^tclall("1B76")
Temporary visual disturbance
^tclall("1B76",7)
Y
^tclall("1B77")
Deteriorating vision
^tclall("1B77",7)
Y
^tclall("1B78")
Scotopic sensitivity
^tclall("1B78",7)
Y
^tclall("1B79")
Visual perceptual weakness
^tclall("1B79",7)
Y
^tclall("1B7A")
Patient concerned about eyesight
^tclall("1B7A",7)
Y
^tclall("1B7Z")
Visual symptom NOS
^tclall("1B7Z",7)
Y
^tclall("1B9")
Speech problem
^tclall("1B9",7)
Y
^tclall("1B9",8)
M..
^tclall("1B91")
No speech problem
^tclall("1B91",7)
Y
^tclall("1B92")
Has a stammer/stutter
^tclall("1B92",7)
Y
^tclall("1B93")
Has difficulty with speech
^tclall("1B93",7)
Y
^tclall("1B94")
Speech limited
^tclall("1B94",7)
Y
^tclall("1B9Z")
Speech problem NOS
^tclall("1B9Z",7)
Y
^tclall("1C1")
Hearing symptoms
^tclall("1C1",7)
Y
^tclall("1C11")
Hearing normal
^tclall("1C11",7)
Y
^tclall("1C12")
Hearing difficulty
^tclall("1C12",7)
Y
^tclall("1C13")
Deafness
^tclall("1C13",7)
Y
^tclall("1C13",8)
MN.
^tclall("1C14")
""Blocked ear""
^tclall("1C14",7)
Y
^tclall("1C15")
Popping sensation in ear
^tclall("1C15",7)
Y
^tclall("1C16")
Deteriorating hearing
^tclall("1C16",7)
Y
^tclall("1C17")
Hearing aid problem
^tclall("1C17",7)
Y
^tclall("1C18")
Diff hearing wth bckgrnd noise
^tclall("1C18",1)
Difficulty hearing with background noise
^tclall("1C18",7)
Y
^tclall("1C19")
Difficulty hearing whispers
^tclall("1C19",7)
Y
^tclall("1C1Z")
Hearing symptom NOS
^tclall("1C1Z",7)
Y
^tclall("1FA")
Diet good
^tclall("1FA",7)
Y
^tclall("1FB")
Diet poor
^tclall("1FB",7)
Y
^tclall("1FC")
Diet average
^tclall("1FC",7)
Y
^tclall("229Z")
O/E - height NOS
^tclall("229Z",7)
Y
^tclall("22A")
O/E - weight
^tclall("22A",7)
VN
^tclall("22A1")
O/E - weight > 20% below ideal
^tclall("22A1",7)
VT
^tclall("22A2")
O/E -weight 10-20% below ideal
^tclall("22A2",7)
VT
^tclall("22A3")
O/E - weight within 10% ideal
^tclall("22A3",7)
VT
^tclall("22A4")
O/E - weight 10-20% over ideal
^tclall("22A4",7)
VT
^tclall("22A4",8)
..L
^tclall("22A5")
O/E - weight > 20% over ideal
^tclall("22A5",7)
VT
^tclall("22A5",8)
..L
^tclall("22A6")
O/E - Underweight
^tclall("22A6",7)
VT
^tclall("22A7")
Baseline weight
^tclall("22A7",7)
V
^tclall("22A8")
Weight loss from baseline weight
^tclall("22A8",7)
V
^tclall("22AZ")
O/E - weight NOS
^tclall("22AZ",7)
VT
^tclall("22K")
Body Mass Index
^tclall("22K",7)
VN
^tclall("22K",8)
M..
^tclall("22K1")
Body Mass Index normal K/M2
^tclall("22K1",7)
Y
^tclall("22K2")
Body Mass Index high K/M2
^tclall("22K2",7)
Y
^tclall("22K3")
Body Mass Index low K/M2
^tclall("22K3",7)
Y
^tclall("22K4")
BMI 25-29 - overweight
^tclall("22K4",1)
Body mass index index 25-29 - overweight
^tclall("22K4",7)
VT
^tclall("22K5")
Body mass index 30+ - obesity
^tclall("22K5",7)
VT
^tclall("22K5",8)
..L
^tclall("22K6")
Body mass index less than 20
^tclall("22K6",7)
VT
^tclall("22K7")
BMI 40+ - severely obese
^tclall("22K7",1)
Body mass index 40+ - severely obese
^tclall("22K7",7)
V
^tclall("22K8")
Body mass index 20-24 - normal
^tclall("22K8",7)
V
^tclall("242Z")
O/E - pulse rate NOS
^tclall("242Z",7)
Y
^tclall("243Z")
O/E - pulse rhythm NOS
^tclall("243Z",7)
Y
^tclall("246A")
Diastolic blood pressure
^tclall("246A",7)
VN
^tclall("2D6")
O/E - discharge from ear
^tclall("2D6",7)
Y
^tclall("2D6",8)
.NL
^tclall("2D61")
O/E - no discharge from ear
^tclall("2D61",7)
Y
^tclall("2D61",8)
.NL
^tclall("2D62")
O/E - serous ear discharge
^tclall("2D62",7)
Y
^tclall("2D62",8)
.NL
^tclall("2D63")
O/E - waxy ear discharge
^tclall("2D63",7)
Y
^tclall("2D63",8)
.NL
^tclall("2D64")
O/E - purulent ear discharge
^tclall("2D64",7)
Y
^tclall("2D64",8)
.NL
^tclall("2D65")
O/E - blood stained ear disch.
^tclall("2D65",7)
Y
^tclall("2D65",8)
.NL
^tclall("2D66")
O/E - blood from ear
^tclall("2D66",7)
Y
^tclall("2D66",8)
.NL
^tclall("2D6Z")
O/E - ear discharge NOS
^tclall("2D6Z",7)
Y
^tclall("2D6Z",8)
.NL
^tclall("2DG")
Hearing aid worn
^tclall("2DG",7)
Y
^tclall("3AB3")
Change in behaviour
^tclall("3AB3",7)
GI
^tclall("442W")
Serum TSH level
^tclall("442W",7)
BN
^tclall("466A")
Urine clinitest
^tclall("466A",7)
BT
^tclall("466Z")
Urine glucose test NOS
^tclall("466Z",7)
BT
^tclall("679A")
Health ed.- drugs of addiction
^tclall("679A",7)
P
^tclall("679B")
Health ed. testicular examin.
^tclall("679B",7)
P
^tclall("679B",8)
..L
^tclall("679C")
Health educn - back problems
^tclall("679C",7)
P
^tclall("679D")
Resuscitation training
^tclall("679D",7)
P
^tclall("679E")
Antenatal education
^tclall("679E",7)
P
^tclall("679F")
Health education - osteoporosis
^tclall("679F",7)
P
^tclall("679G")
Health education - HRT
^tclall("679G",1)
Health education - hormone replacement therapy
^tclall("679G",7)
P
^tclall("679H")
Health education - continence
^tclall("679H",7)
P
^tclall("679I")
Health education - infant massage
^tclall("679I",7)
P
^tclall("679J")
Health education - asthma
^tclall("679J",7)
P
^tclall("679K")
Health education - sexual health
^tclall("679K",7)
P
^tclall("679L")
Health education - diabetes
^tclall("679L",7)
P
^tclall("679M")
Health education - rheumatology
^tclall("679M",7)
P
^tclall("679Z")
Health education - subject NOS
^tclall("679Z",7)
P
^tclall("67A3")
Pregnancy smoking advice
^tclall("67A3",7)
P
^tclall("67A3",8)
M.L
^tclall("8B2B")
Nicotine replacement therapy
^tclall("8B2B",7)
T
^tclall("8CA4")
Patient advised re diet
^tclall("8CA4",7)
T
^tclall("8CA40")
Pt advised re wt reducing diet
^tclall("8CA40",7)
T
^tclall("8CA40",8)
..L
^tclall("8CA41")
Pt advised re diabetic diet
^tclall("8CA41",7)
T
^tclall("8CA42")
Pt advised re gluten free diet
^tclall("8CA42",7)
T
^tclall("8CA43")
Pt advised-phenylal. free diet
^tclall("8CA43",7)
T
^tclall("8CA44")
Pt advised re high fibre diet
^tclall("8CA44",7)
T
^tclall("8CA45")
Pt advised re low residue diet
^tclall("8CA45",7)
T
^tclall("8CA46")
Pt advised re low fat diet
^tclall("8CA46",7)
T
^tclall("8CA47")
Pt advis-low cholesterol diet
^tclall("8CA47",1)
Patient advised re low cholesterol diet
^tclall("8CA47",7)
T
^tclall("8CA48")
Pt advised re low salt diet
^tclall("8CA48",7)
T
^tclall("8CA49")
Pt advised - lactose free diet
^tclall("8CA49",7)
T
^tclall("8CA4A")
Pt advis-low carbohydrate diet
^tclall("8CA4A",7)
T
^tclall("8CA4B")
Pt advised re low protein diet
^tclall("8CA4B",7)
T
^tclall("8CA4C")
Pt advised - high protein diet
^tclall("8CA4C",7)
T
^tclall("8CA4D")
Pt advised re milk free diet
^tclall("8CA4D",7)
T
^tclall("8CA4E")
Pt advised re egg free diet
^tclall("8CA4E",7)
T
^tclall("8CA4F")
Pt advised re vegetarian diet
^tclall("8CA4F",7)
T
^tclall("8CA4G")
Pt advised re vegan diet
^tclall("8CA4G",7)
T
^tclall("8CA4z")
Pt advised re diet NOS
^tclall("8CA4z",7)
T
^tclall("8CAL")
Smoking cessation advice
^tclall("8CAL",7)
T
^tclall("8CAM")
Patient advised about alcohol
^tclall("8CAM",7)
T
^tclall("8H72")
Refer to district nurse
^tclall("8H72",7)
U
^tclall("8H72","C")
Consultants
^tclall("8H72","E")
Referring Doctor
^tclall("8H72","G")
Type Of Referral
^tclall("8H72","H")
Hospital
^tclall("8H72","U")
Urgent/Non-Urgent
^tclall("8H7R")
Refer to chiropodist
^tclall("8H7R",7)
U
^tclall("8H7R","C")
Consultants
^tclall("8H7R","E")
Referring Doctor
^tclall("8H7R","G")
Type Of Referral
^tclall("8H7R","H")
Hospital
^tclall("8H7R","U")
Urgent/Non-Urgent
^tclall("8H7i")
Referral: smok cessatn advisor
^tclall("8H7i",1)
Referral to smoking cessation advisor
^tclall("8H7i",7)
U
^tclall("8HTK")
Referral to stop-smoking clinic
^tclall("8HTK",7)
U
^tclall("8HTK","C")
Consultants
^tclall("8HTK","E")
Referring Doctor
^tclall("8HTK","G")
Type Of Referral
^tclall("8HTK","U")
Urgent/Non-Urgent
^tclall("9HB")
Learning disablts admin status
^tclall("9HB",1)
Learning disabilities administration status
^tclall("9HB",7)
A
^tclall("9HB0")
Learn dis health act plan decl
^tclall("9HB0",1)
Learning disabilities health action plan declined
^tclall("9HB0",7)
A
^tclall("9HB1")
Learn dis health act plan offd
^tclall("9HB1",1)
Learning disabilities health action plan offered
^tclall("9HB1",7)
A
^tclall("9HB2")
Learn dis health act plan revd
^tclall("9HB2",1)
Learning disabilities health action plan reviewed
^tclall("9HB2",7)
A
^tclall("9HB3")
Learning disab health assessmt
^tclall("9HB3",1)
Learning disabilities health assessment
^tclall("9HB3",7)
A
^tclall("DAVIEDA1")
Daily Excercise
^tclall("DAVIEDA1",7)
P
^tclall("DAVIEOC1")
Occasional Drinker
^tclall("DAVIEOC1",7)
P?
^tclall("DAVIERE1")
Regular Active Exercise
^tclall("DAVIERE1",7)
P
^tclall("DOCDI1000000000590")
Template GMS - Smoking status (V2)
^tclall("DOCDI1000000000590",7)
A
^tclall("EGTON1025")
Current Smoker NOS
^tclall("EGTON1025",7)
P
^tclall("EGTON1027")
Ex- Rolled Tobacco Smoker
^tclall("EGTON1027",7)
PN
^tclall("EGTON322")
Ex-Cigarette Smoker
^tclall("EGTON322",7)
PN
^tclall("EGTON418")
Alcohol Intake
^tclall("EGTON418",7)
PN
^tclall("EGTON418",8)
M..
^tclall("EGTON421")
Weight Reducing Diet Advised
^tclall("EGTON421",7)
T
^tclall("EGTON421",8)
..L
^tclall("EGTON422")
Low Fat Diet Advised
^tclall("EGTON422",7)
T
^tclall("EGTON423")
Sugar Free Diet Advised
^tclall("EGTON423",7)
T
^tclall("EMISEX2")
Exercise Sessions
^tclall("EMISEX2",7)
PN
^tclall("EMISHI1")
Hiv Prevention Advice
^tclall("EMISHI1",7)
P
^tclall("EMISLI1")
Lifestyle Advice
^tclall("EMISLI1",7)
P
^tclall("EMISNQDI2")
Difficulty hearing whispers
^tclall("EMISNQDI2",7)
Y
^tclall("EMISNQEM2")
Embarrassed due to hearing difficulty
^tclall("EMISNQEM2",7)
Y
^tclall("EMISNQFE1")
Feels handicapped due to hearing difficulty
^tclall("EMISNQFE1",7)
Y
^tclall("EMISNQFR1")
Frustrated due to hearing difficulty
^tclall("EMISNQFR1",7)
Y
^tclall("EMISNQHE1")
Hearing difficulty with background noise
^tclall("EMISNQHE1",7)
Y
^tclall("EMISNQHE2")
Hearing difficulty causing dispute with family
^tclall("EMISNQHE2",7)
Y
^tclall("EMISNQHE3")
Hearing difficulty hampers personal/ social life
^tclall("EMISNQHE3",7)
Y
^tclall("EMISNQHE4")
Hearing difficulty when with friends/ family
^tclall("EMISNQHE4",7)
Y
^tclall("EMISNQHE5")
Hearing difficulty when listening to TV/ radio
^tclall("EMISNQHE5",7)
Y
^tclall("EMISNQLE1")
Less freq. attendance to religious serv. due to hearing diff
^tclall("EMISNQLE1",7)
Y
^tclall("EMISNQMO1")
Mothers hygiene discussed
^tclall("EMISNQMO1",7)
P
^tclall("EMISNQRE13")
Reducing risk of cot death discussed
^tclall("EMISNQRE13",7)
P
^tclall("EMISQAL1")
Alcohol AUDIT Score
^tclall("EMISQAL1",7)
P
^tclall("EMISQOT3")
Other Alcohol Related Information
^tclall("EMISQOT3",7)
P
^tclall("EMISSMRE1")
Smoker (Read codes)
^tclall("EMISSMRE1",7)
P
^tclall("PATELGL1")
Gluten Free
^tclall("PATELGL1",7)
P
^tclall("PATELNO1")
Normal Diet
^tclall("PATELNO1",7)
P
^tclall("PATELUN1")
Unbalanced Diet
^tclall("PATELUN1",7)
P
*
*
^tclalp(136)
C
^tclalp(138)
C
^tclalp(229)
N
^tclalp(242)
M
^tclalp(243)
M
^tclalp(393)
G
^tclalp(394)
G
^tclalp(466)
N
^tclalp(611)
O
^tclalp(679)
K
^tclalp(1361)
C
^tclalp(1362)
C
^tclalp(1363)
C
^tclalp(1364)
C
^tclalp(1365)
C
^tclalp(1366)
C
^tclalp(1367)
C
^tclalp(1368)
C
^tclalp(1369)
C
^tclalp(1371)
C
^tclalp(1377)
C
^tclalp(1378)
C
^tclalp(1379)
C
^tclalp(1381)
C
^tclalp(1382)
C
^tclalp(1383)
C
^tclalp(1384)
C
^tclalp(1385)
C
^tclalp(1386)
C
^tclalp(1387)
C
^tclalp(1388)
C
^tclalp(1389)
C
^tclalp(2291)
N
^tclalp(2292)
N
^tclalp(2293)
N
^tclalp(2294)
N
^tclalp(2295)
N
^tclalp(2296)
N
^tclalp(2421)
M
^tclalp(2422)
M
^tclalp(2423)
M
^tclalp(2424)
M
^tclalp(2425)
M
^tclalp(2426)
M
^tclalp(2427)
M
^tclalp(2428)
M
^tclalp(2429)
M
^tclalp(2431)
M
^tclalp(2432)
M
^tclalp(2433)
M
^tclalp(2434)
M
^tclalp(2469)
N
^tclalp(3930)
G
^tclalp(3931)
G
^tclalp(3932)
G
^tclalp(3940)
G
^tclalp(3941)
G
^tclalp(3942)
G
^tclalp(4661)
N
^tclalp(4662)
N
^tclalp(4663)
N
^tclalp(4664)
N
^tclalp(4665)
N
^tclalp(4666)
N
^tclalp(4667)
N
^tclalp(4668)
E
^tclalp(4669)
N
^tclalp(6791)
K
^tclalp(6792)
K
^tclalp(6793)
K
^tclalp(6794)
K
^tclalp(6795)
K
^tclalp(6796)
K
^tclalp(6797)
K
^tclalp(6798)
K
^tclalp(6799)
K
^tclalp("136A")
C
^tclalp("136B")
C
^tclalp("136C")
C
^tclalp("136D")
C
^tclalp("136E")
C
^tclalp("136F")
C
^tclalp("136G")
C
^tclalp("136H")
C
^tclalp("136I")
C
^tclalp("136J")
C
^tclalp("136K")
C
^tclalp("136L")
C
^tclalp("136M")
C
^tclalp("136N")
C
^tclalp("136O")
C
^tclalp("136P")
C
^tclalp("136Q")
C
^tclalp("136R")
C
^tclalp("136Z")
C
^tclalp("137A")
C
^tclalp("137B")
C
^tclalp("137F")
C
^tclalp("137G")
C
^tclalp("137H")
C
^tclalp("137I")
C
^tclalp("137J")
C
^tclalp("137K")
C
^tclalp("137L")
C
^tclalp("137M")
C
^tclalp("137N")
C
^tclalp("137O")
C
^tclalp("137P")
C
^tclalp("137R")
C
^tclalp("137S")
C
^tclalp("137W")
C
^tclalp("138A")
C
^tclalp("138B")
C
^tclalp("138C")
C
^tclalp("138D")
C
^tclalp("138E")
C
^tclalp("138F")
C
^tclalp("138G")
C
^tclalp("138H")
C
^tclalp("138I")
C
^tclalp("138J")
C
^tclalp("138K")
C
^tclalp("138L")
C
^tclalp("138M")
C
^tclalp("138N")
C
^tclalp("138O")
C
^tclalp("138Z")
C
^tclalp("13A")
C
^tclalp("13A1")
C
^tclalp("13A2")
C
^tclalp("13A3")
C
^tclalp("13A4")
C
^tclalp("13A5")
C
^tclalp("13A6")
C
^tclalp("13A7")
C
^tclalp("13A8")
C
^tclalp("13A9")
C
^tclalp("13AA")
C
^tclalp("13AB")
C
^tclalp("13AC")
C
^tclalp("13AZ")
C
^tclalp("13C")
C
^tclalp("13C1")
C
^tclalp("13C2")
C
^tclalp("13C3")
C
^tclalp("13C4")
C
^tclalp("13C5")
C
^tclalp("13C6")
C
^tclalp("13C7")
C
^tclalp("13C8")
C
^tclalp("13C9")
C
^tclalp("13CA")
C
^tclalp("13CB")
C
^tclalp("13CC")
C
^tclalp("13CD")
C
^tclalp("13CE")
C
^tclalp("13CF")
C
^tclalp("13CG")
C
^tclalp("13CH")
C
^tclalp("13CI")
C
^tclalp("13CJ")
C
^tclalp("13CK")
C
^tclalp("13CL")
C
^tclalp("13CM")
C
^tclalp("13CN")
C
^tclalp("13CP")
C
^tclalp("13CQ")
C
^tclalp("13CR")
C
^tclalp("13CS")
C
^tclalp("13CT")
C
^tclalp("13CZ")
C
^tclalp("13p1")
A
^tclalp("1B7")
M
^tclalp("1B71")
M
^tclalp("1B72")
M
^tclalp("1B73")
M
^tclalp("1B74")
M
^tclalp("1B75")
M
^tclalp("1B76")
M
^tclalp("1B77")
M
^tclalp("1B78")
M
^tclalp("1B79")
M
^tclalp("1B7A")
M
^tclalp("1B7Z")
M
^tclalp("1B9")
M
^tclalp("1B91")
M
^tclalp("1B92")
M
^tclalp("1B93")
M
^tclalp("1B94")
M
^tclalp("1B9Z")
M
^tclalp("1C1")
M
^tclalp("1C11")
M
^tclalp("1C12")
M
^tclalp("1C13")
M
^tclalp("1C14")
M
^tclalp("1C15")
M
^tclalp("1C16")
M
^tclalp("1C17")
M
^tclalp("1C18")
M
^tclalp("1C19")
M
^tclalp("1C1Z")
M
^tclalp("1FA")
M
^tclalp("1FB")
M
^tclalp("1FC")
M
^tclalp("229Z")
M
^tclalp("22A")
N
^tclalp("22A1")
N
^tclalp("22A2")
N
^tclalp("22A3")
N
^tclalp("22A4")
N
^tclalp("22A5")
N
^tclalp("22A6")
N
^tclalp("22A7")
N
^tclalp("22A8")
N
^tclalp("22AZ")
N
^tclalp("22K")
N
^tclalp("22K1")
M
^tclalp("22K2")
M
^tclalp("22K3")
M
^tclalp("22K4")
N
^tclalp("22K5")
N
^tclalp("22K6")
N
^tclalp("22K7")
N
^tclalp("22K8")
N
^tclalp("242Z")
M
^tclalp("243Z")
M
^tclalp("246A")
N
^tclalp("2D6")
M
^tclalp("2D61")
M
^tclalp("2D62")
M
^tclalp("2D63")
M
^tclalp("2D64")
M
^tclalp("2D65")
M
^tclalp("2D66")
M
^tclalp("2D6Z")
M
^tclalp("2DG")
M
^tclalp("3AB3")
G
^tclalp("442W")
N
^tclalp("466A")
N
^tclalp("466Z")
N
^tclalp("679A")
K
^tclalp("679B")
K
^tclalp("679C")
K
^tclalp("679D")
K
^tclalp("679E")
K
^tclalp("679F")
K
^tclalp("679G")
K
^tclalp("679H")
K
^tclalp("679I")
K
^tclalp("679J")
K
^tclalp("679K")
K
^tclalp("679L")
K
^tclalp("679M")
K
^tclalp("679Z")
K
^tclalp("67A3")
K
^tclalp("8B2B")
G
^tclalp("8CA4")
G
^tclalp("8CA40")
G
^tclalp("8CA41")
G
^tclalp("8CA42")
G
^tclalp("8CA43")
G
^tclalp("8CA44")
G
^tclalp("8CA45")
G
^tclalp("8CA46")
G
^tclalp("8CA47")
G
^tclalp("8CA48")
G
^tclalp("8CA49")
G
^tclalp("8CA4A")
G
^tclalp("8CA4B")
G
^tclalp("8CA4C")
G
^tclalp("8CA4D")
G
^tclalp("8CA4E")
G
^tclalp("8CA4F")
G
^tclalp("8CA4G")
G
^tclalp("8CA4z")
G
^tclalp("8CAL")
G
^tclalp("8CAM")
G
^tclalp("8H72")
G
^tclalp("8H7R")
G
^tclalp("8H7i")
G
^tclalp("8HTK")
G
^tclalp("9HB")
A
^tclalp("9HB0")
A
^tclalp("9HB1")
A
^tclalp("9HB2")
A
^tclalp("9HB3")
A
^tclalp("DAVIEDA1")
C
^tclalp("DAVIEOC1")
C
^tclalp("DAVIERE1")
C
^tclalp("DOCDI1000000000590")
A
^tclalp("EGTON1025")
C
^tclalp("EGTON1027")
C
^tclalp("EGTON322")
C
^tclalp("EGTON418")
C
^tclalp("EGTON421")
C
^tclalp("EGTON422")
C
^tclalp("EGTON423")
C
^tclalp("EMISEX2")
C
^tclalp("EMISHI1")
K
^tclalp("EMISLI1")
K
^tclalp("EMISNQDI2")
M
^tclalp("EMISNQEM2")
M
^tclalp("EMISNQFE1")
M
^tclalp("EMISNQFR1")
M
^tclalp("EMISNQHE1")
M
^tclalp("EMISNQHE2")
M
^tclalp("EMISNQHE3")
M
^tclalp("EMISNQHE4")
M
^tclalp("EMISNQHE5")
M
^tclalp("EMISNQLE1")
M
^tclalp("EMISNQMO1")
K
^tclalp("EMISNQRE13")
K
^tclalp("EMISQAL1")
C
^tclalp("EMISQOT3")
C
^tclalp("EMISSMRE1")
C
^tclalp("PATELGL1")
C
^tclalp("PATELNO1")
C
^tclalp("PATELUN1")
C
*
*
^tclrdn(136,1361)

^tclrdn(136,1362)

^tclrdn(136,1363)

^tclrdn(136,1364)

^tclrdn(136,1365)

^tclrdn(136,1366)

^tclrdn(136,1367)

^tclrdn(136,1368)

^tclrdn(136,1369)

^tclrdn(136,"136A")

^tclrdn(136,"136B")

^tclrdn(136,"136C")

^tclrdn(136,"136D")

^tclrdn(136,"136E")

^tclrdn(136,"136F")

^tclrdn(136,"136G")

^tclrdn(136,"136H")

^tclrdn(136,"136I")

^tclrdn(136,"136J")

^tclrdn(136,"136K")

^tclrdn(136,"136L")

^tclrdn(136,"136M")

^tclrdn(136,"136N")

^tclrdn(136,"136O")

^tclrdn(136,"136P")

^tclrdn(136,"136Q")

^tclrdn(136,"136R")

^tclrdn(136,"136Z")

^tclrdn(136,"DAVIEOC1")

^tclrdn(136,"EGTON418")

^tclrdn(136,"EMISQAL1")

^tclrdn(136,"EMISQOT3")

^tclrdn(138,1381)

^tclrdn(138,1382)

^tclrdn(138,1383)

^tclrdn(138,1384)

^tclrdn(138,1385)

^tclrdn(138,1386)

^tclrdn(138,1387)

^tclrdn(138,1388)

^tclrdn(138,1389)

^tclrdn(138,"138A")

^tclrdn(138,"138B")

^tclrdn(138,"138C")

^tclrdn(138,"138D")

^tclrdn(138,"138E")

^tclrdn(138,"138F")

^tclrdn(138,"138G")

^tclrdn(138,"138H")

^tclrdn(138,"138I")

^tclrdn(138,"138J")

^tclrdn(138,"138K")

^tclrdn(138,"138L")

^tclrdn(138,"138M")

^tclrdn(138,"138N")

^tclrdn(138,"138O")

^tclrdn(138,"138Z")

^tclrdn(138,"DAVIEDA1")

^tclrdn(138,"DAVIERE1")

^tclrdn(138,"EMISEX2")

^tclrdn(229,2291)

^tclrdn(229,2292)

^tclrdn(229,2293)

^tclrdn(229,2294)

^tclrdn(229,2295)

^tclrdn(229,2296)

^tclrdn(229,"229Z")

^tclrdn(242,2421)

^tclrdn(242,2422)

^tclrdn(242,2423)

^tclrdn(242,2424)

^tclrdn(242,2425)

^tclrdn(242,2426)

^tclrdn(242,2427)

^tclrdn(242,2428)

^tclrdn(242,2429)

^tclrdn(242,"242Z")

^tclrdn(243,2431)

^tclrdn(243,2432)

^tclrdn(243,2433)

^tclrdn(243,2434)

^tclrdn(243,"243Z")

^tclrdn(393,3930)

^tclrdn(393,3931)

^tclrdn(393,3932)

^tclrdn(394,3940)

^tclrdn(394,3941)

^tclrdn(394,3942)

^tclrdn(466,4661)

^tclrdn(466,4662)

^tclrdn(466,4663)

^tclrdn(466,4664)

^tclrdn(466,4665)

^tclrdn(466,4666)

^tclrdn(466,4667)

^tclrdn(466,4668)

^tclrdn(466,4669)

^tclrdn(466,"466A")

^tclrdn(466,"466Z")

^tclrdn(679,6791)

^tclrdn(679,6792)

^tclrdn(679,6793)

^tclrdn(679,6794)

^tclrdn(679,6795)

^tclrdn(679,6796)

^tclrdn(679,6797)

^tclrdn(679,6798)

^tclrdn(679,6799)

^tclrdn(679,"679A")

^tclrdn(679,"679B")

^tclrdn(679,"679C")

^tclrdn(679,"679D")

^tclrdn(679,"679E")

^tclrdn(679,"679F")

^tclrdn(679,"679G")

^tclrdn(679,"679H")

^tclrdn(679,"679I")

^tclrdn(679,"679J")

^tclrdn(679,"679K")

^tclrdn(679,"679L")

^tclrdn(679,"679M")

^tclrdn(679,"679Z")

^tclrdn(679,"EMISHI1")

^tclrdn(679,"EMISLI1")

^tclrdn(679,"EMISNQMO1")

^tclrdn(679,"EMISNQRE13")

^tclrdn("137L",1371)

^tclrdn("137L","137S")

^tclrdn("137R","EGTON1025")

^tclrdn("137R","EMISSMRE1")

^tclrdn("137S",1377)

^tclrdn("137S",1378)

^tclrdn("137S",1379)

^tclrdn("137S","137A")

^tclrdn("137S","137B")

^tclrdn("137S","137F")

^tclrdn("137S","137K")

^tclrdn("137S","137N")

^tclrdn("137S","137O")

^tclrdn("137S","EGTON1027")

^tclrdn("137S","EGTON322")

^tclrdn("13A","13A1")

^tclrdn("13A","13A2")

^tclrdn("13A","13A3")

^tclrdn("13A","13A4")

^tclrdn("13A","13A5")

^tclrdn("13A","13A6")

^tclrdn("13A","13A7")

^tclrdn("13A","13A8")

^tclrdn("13A","13A9")

^tclrdn("13A","13AA")

^tclrdn("13A","13AB")

^tclrdn("13A","13AC")

^tclrdn("13A","13AZ")

^tclrdn("13A","PATELGL1")

^tclrdn("13A","PATELNO1")

^tclrdn("13A","PATELUN1")

^tclrdn("13C","13C1")

^tclrdn("13C","13C2")

^tclrdn("13C","13C3")

^tclrdn("13C","13C4")

^tclrdn("13C","13C5")

^tclrdn("13C","13C6")

^tclrdn("13C","13C7")

^tclrdn("13C","13C8")

^tclrdn("13C","13C9")

^tclrdn("13C","13CA")

^tclrdn("13C","13CB")

^tclrdn("13C","13CC")

^tclrdn("13C","13CD")

^tclrdn("13C","13CE")

^tclrdn("13C","13CF")

^tclrdn("13C","13CG")

^tclrdn("13C","13CH")

^tclrdn("13C","13CI")

^tclrdn("13C","13CJ")

^tclrdn("13C","13CK")

^tclrdn("13C","13CL")

^tclrdn("13C","13CM")

^tclrdn("13C","13CN")

^tclrdn("13C","13CP")

^tclrdn("13C","13CQ")

^tclrdn("13C","13CR")

^tclrdn("13C","13CS")

^tclrdn("13C","13CT")

^tclrdn("13C","13CZ")

^tclrdn("1B7","1B71")

^tclrdn("1B7","1B72")

^tclrdn("1B7","1B73")

^tclrdn("1B7","1B74")

^tclrdn("1B7","1B75")

^tclrdn("1B7","1B76")

^tclrdn("1B7","1B77")

^tclrdn("1B7","1B78")

^tclrdn("1B7","1B79")

^tclrdn("1B7","1B7A")

^tclrdn("1B7","1B7Z")

^tclrdn("1B9","1B91")

^tclrdn("1B9","1B92")

^tclrdn("1B9","1B93")

^tclrdn("1B9","1B94")

^tclrdn("1B9","1B9Z")

^tclrdn("1C1","1C11")

^tclrdn("1C1","1C12")

^tclrdn("1C1","1C13")

^tclrdn("1C1","1C14")

^tclrdn("1C1","1C15")

^tclrdn("1C1","1C16")

^tclrdn("1C1","1C17")

^tclrdn("1C1","1C18")

^tclrdn("1C1","1C19")

^tclrdn("1C1","1C1Z")

^tclrdn("1C12","EMISNQDI2")

^tclrdn("1C12","EMISNQEM2")

^tclrdn("1C12","EMISNQFE1")

^tclrdn("1C12","EMISNQFR1")

^tclrdn("1C12","EMISNQHE1")

^tclrdn("1C12","EMISNQHE2")

^tclrdn("1C12","EMISNQHE3")

^tclrdn("1C12","EMISNQHE4")

^tclrdn("1C12","EMISNQHE5")

^tclrdn("1C12","EMISNQLE1")

^tclrdn("22A","22A1")

^tclrdn("22A","22A2")

^tclrdn("22A","22A3")

^tclrdn("22A","22A4")

^tclrdn("22A","22A5")

^tclrdn("22A","22A6")

^tclrdn("22A","22A7")

^tclrdn("22A","22A8")

^tclrdn("22A","22AZ")

^tclrdn("22K","22K1")

^tclrdn("22K","22K2")

^tclrdn("22K","22K3")

^tclrdn("22K","22K4")

^tclrdn("22K","22K5")

^tclrdn("22K","22K6")

^tclrdn("22K","22K7")

^tclrdn("22K","22K8")

^tclrdn("2D6","2D61")

^tclrdn("2D6","2D62")

^tclrdn("2D6","2D63")

^tclrdn("2D6","2D64")

^tclrdn("2D6","2D65")

^tclrdn("2D6","2D66")

^tclrdn("2D6","2D6Z")

^tclrdn("8CA4","8CA40")

^tclrdn("8CA4","8CA41")

^tclrdn("8CA4","8CA42")

^tclrdn("8CA4","8CA43")

^tclrdn("8CA4","8CA44")

^tclrdn("8CA4","8CA45")

^tclrdn("8CA4","8CA46")

^tclrdn("8CA4","8CA47")

^tclrdn("8CA4","8CA48")

^tclrdn("8CA4","8CA49")

^tclrdn("8CA4","8CA4A")

^tclrdn("8CA4","8CA4B")

^tclrdn("8CA4","8CA4C")

^tclrdn("8CA4","8CA4D")

^tclrdn("8CA4","8CA4E")

^tclrdn("8CA4","8CA4F")

^tclrdn("8CA4","8CA4G")

^tclrdn("8CA4","8CA4z")

^tclrdn("8CA4","EGTON421")

^tclrdn("8CA4","EGTON422")

^tclrdn("8CA4","EGTON423")

^tclrdn("9HB","9HB0")

^tclrdn("9HB","9HB1")

^tclrdn("9HB","9HB2")

^tclrdn("9HB","9HB3")

*
*
^tclrup(136,1)

^tclrup(136,13)

^tclrup(138,13)

^tclrup(229,2)

^tclrup(229,22)

^tclrup(242,2)

^tclrup(242,24)

^tclrup(243,24)

^tclrup(393,3)

^tclrup(393,39)

^tclrup(394,3)

^tclrup(394,39)

^tclrup(466,4)

^tclrup(466,46)

^tclrup(611,61)

^tclrup(679,6)

^tclrup(679,67)

^tclrup(1361,136)

^tclrup(1362,136)

^tclrup(1363,136)

^tclrup(1364,136)

^tclrup(1365,136)

^tclrup(1366,136)

^tclrup(1367,136)

^tclrup(1368,136)

^tclrup(1369,136)

^tclrup(1371,1)

^tclrup(1371,13)

^tclrup(1371,137)

^tclrup(1371,"137L")

^tclrup(1371,"EGTON320")

^tclrup(1371,"PAYNESM3")

^tclrup(1377,"137S")

^tclrup(1378,"137S")

^tclrup(1379,"137S")

^tclrup(1381,138)

^tclrup(1382,138)

^tclrup(1383,138)

^tclrup(1384,138)

^tclrup(1385,138)

^tclrup(1386,138)

^tclrup(1387,138)

^tclrup(1388,138)

^tclrup(1389,138)

^tclrup(2291,229)

^tclrup(2292,229)

^tclrup(2293,229)

^tclrup(2294,229)

^tclrup(2295,229)

^tclrup(2296,229)

^tclrup(2421,242)

^tclrup(2422,242)

^tclrup(2423,242)

^tclrup(2424,242)

^tclrup(2425,242)

^tclrup(2426,242)

^tclrup(2427,242)

^tclrup(2428,242)

^tclrup(2429,242)

^tclrup(2431,243)

^tclrup(2432,243)

^tclrup(2433,243)

^tclrup(2434,2)

^tclrup(2434,24)

^tclrup(2434,243)

^tclrup(2469,2)

^tclrup(2469,24)

^tclrup(2469,246)

^tclrup(3930,393)

^tclrup(3931,393)

^tclrup(3932,393)

^tclrup(3940,394)

^tclrup(3941,394)

^tclrup(3942,394)

^tclrup(4661,466)

^tclrup(4662,4)

^tclrup(4662,46)

^tclrup(4662,466)

^tclrup(4663,4)

^tclrup(4663,46)

^tclrup(4663,466)

^tclrup(4664,4)

^tclrup(4664,46)

^tclrup(4664,466)

^tclrup(4665,4)

^tclrup(4665,46)

^tclrup(4665,466)

^tclrup(4666,4)

^tclrup(4666,46)

^tclrup(4666,466)

^tclrup(4667,4)

^tclrup(4667,46)

^tclrup(4667,466)

^tclrup(4668,4)

^tclrup(4668,46)

^tclrup(4668,466)

^tclrup(4669,466)

^tclrup(6791,679)

^tclrup(6792,679)

^tclrup(6793,679)

^tclrup(6794,679)

^tclrup(6795,679)

^tclrup(6796,679)

^tclrup(6797,679)

^tclrup(6798,679)

^tclrup(6799,679)

^tclrup("136A",136)

^tclrup("136B",136)

^tclrup("136C",136)

^tclrup("136D",136)

^tclrup("136E",136)

^tclrup("136F",136)

^tclrup("136G",136)

^tclrup("136H",136)

^tclrup("136I",136)

^tclrup("136J",136)

^tclrup("136K",136)

^tclrup("136L",136)

^tclrup("136M",136)

^tclrup("136N",136)

^tclrup("136O",136)

^tclrup("136P",136)

^tclrup("136Q",136)

^tclrup("136R",136)

^tclrup("136Z",136)

^tclrup("137A","137S")

^tclrup("137B","137S")

^tclrup("137F","137S")

^tclrup("137G",1)

^tclrup("137G",13)

^tclrup("137G",137)

^tclrup("137G","EMISOTS1")

^tclrup("137G","PAYNESM1")

^tclrup("137H",1)

^tclrup("137H",13)

^tclrup("137H",137)

^tclrup("137H","137R")

^tclrup("137H","EGTON326")

^tclrup("137H","PAYNESM3")

^tclrup("137I",1)

^tclrup("137I",13)

^tclrup("137I",137)

^tclrup("137I","137L")

^tclrup("137I","EGTON320")

^tclrup("137I","PAYNESM3")

^tclrup("137J",1)

^tclrup("137J",13)

^tclrup("137J",137)

^tclrup("137J","137R")

^tclrup("137J","EGTON326")

^tclrup("137J","PAYNESM3")

^tclrup("137K",1)

^tclrup("137K",13)

^tclrup("137K",137)

^tclrup("137K","137S")

^tclrup("137K","EGTON327")

^tclrup("137L",1)

^tclrup("137L",13)

^tclrup("137L",137)

^tclrup("137L","EGTON320")

^tclrup("137M",1)

^tclrup("137M",13)

^tclrup("137M",137)

^tclrup("137M","137R")

^tclrup("137M","PAYNESM3")

^tclrup("137N","137S")

^tclrup("137O","137S")

^tclrup("137P",1)

^tclrup("137P",13)

^tclrup("137P",137)

^tclrup("137P","137R")

^tclrup("137P","EGTON320")

^tclrup("137P","EGTON326")

^tclrup("137P","PAYNESM3")

^tclrup("137R",1)

^tclrup("137R",13)

^tclrup("137R",137)

^tclrup("137R","EGTON320")

^tclrup("137S",1)

^tclrup("137S",13)

^tclrup("137S",137)

^tclrup("137S","137L")

^tclrup("137S","EGTON320")

^tclrup("137S","PAYNESM3")

^tclrup("137W",1)

^tclrup("137W",13)

^tclrup("137W",137)

^tclrup("138A",138)

^tclrup("138B",138)

^tclrup("138C",138)

^tclrup("138D",138)

^tclrup("138E",138)

^tclrup("138F",138)

^tclrup("138G",138)

^tclrup("138H",138)

^tclrup("138I",138)

^tclrup("138J",138)

^tclrup("138K",138)

^tclrup("138L",138)

^tclrup("138M",138)

^tclrup("138N",138)

^tclrup("138O",138)

^tclrup("138Z",138)

^tclrup("13A",13)

^tclrup("13A1","13A")

^tclrup("13A2","13A")

^tclrup("13A3","13A")

^tclrup("13A4","13A")

^tclrup("13A5","13A")

^tclrup("13A6","13A")

^tclrup("13A7","13A")

^tclrup("13A8","13A")

^tclrup("13A9","13A")

^tclrup("13AA","13A")

^tclrup("13AB","13A")

^tclrup("13AC","13A")

^tclrup("13AZ","13A")

^tclrup("13C",13)

^tclrup("13C1","13C")

^tclrup("13C2","13C")

^tclrup("13C3","13C")

^tclrup("13C4","13C")

^tclrup("13C5","13C")

^tclrup("13C6","13C")

^tclrup("13C7","13C")

^tclrup("13C8","13C")

^tclrup("13C9","13C")

^tclrup("13CA","13C")

^tclrup("13CB","13C")

^tclrup("13CC","13C")

^tclrup("13CD","13C")

^tclrup("13CE",1)

^tclrup("13CE",13)

^tclrup("13CE","13C")

^tclrup("13CF","13C")

^tclrup("13CG",1)

^tclrup("13CG",13)

^tclrup("13CG","13C")

^tclrup("13CH","13C")

^tclrup("13CI","13C")

^tclrup("13CJ","13C")

^tclrup("13CK","13C")

^tclrup("13CL","13C")

^tclrup("13CM","13C")

^tclrup("13CN","13C")

^tclrup("13CP","13C")

^tclrup("13CQ","13C")

^tclrup("13CR","13C")

^tclrup("13CS","13C")

^tclrup("13CT","13C")

^tclrup("13CZ","13C")

^tclrup("13p1",1)

^tclrup("13p1",13)

^tclrup("13p1","13p")

^tclrup("1B7","1B")

^tclrup("1B71","1B7")

^tclrup("1B72","1B7")

^tclrup("1B73","1B7")

^tclrup("1B74","1B7")

^tclrup("1B75","1B7")

^tclrup("1B76","1B7")

^tclrup("1B77","1B7")

^tclrup("1B78","1B7")

^tclrup("1B79","1B7")

^tclrup("1B7A",1)

^tclrup("1B7A","1B")

^tclrup("1B7A","1B7")

^tclrup("1B7Z","1B7")

^tclrup("1B9","1B")

^tclrup("1B91","1B9")

^tclrup("1B92","1B9")

^tclrup("1B93","1B9")

^tclrup("1B94",1)

^tclrup("1B94","1B")

^tclrup("1B94","1B9")

^tclrup("1B9Z","1B9")

^tclrup("1C1","1C")

^tclrup("1C11","1C1")

^tclrup("1C12","1C1")

^tclrup("1C13","1C1")

^tclrup("1C14","1C1")

^tclrup("1C15","1C1")

^tclrup("1C16","1C1")

^tclrup("1C17","1C1")

^tclrup("1C18","1C1")

^tclrup("1C19","1C1")

^tclrup("1C1Z","1C1")

^tclrup("1FA",1)

^tclrup("1FA","1F")

^tclrup("1FB",1)

^tclrup("1FB","1F")

^tclrup("1FC",1)

^tclrup("1FC","1F")

^tclrup("229Z",229)

^tclrup("22A",22)

^tclrup("22A1","22A")

^tclrup("22A2","22A")

^tclrup("22A3","22A")

^tclrup("22A4","22A")

^tclrup("22A5","22A")

^tclrup("22A6","22A")

^tclrup("22A7","22A")

^tclrup("22A8","22A")

^tclrup("22AZ","22A")

^tclrup("22K",2)

^tclrup("22K",22)

^tclrup("22K1","22K")

^tclrup("22K2","22K")

^tclrup("22K3","22K")

^tclrup("22K4","22K")

^tclrup("22K5","22K")

^tclrup("22K6","22K")

^tclrup("22K7","22K")

^tclrup("22K8","22K")

^tclrup("242Z",242)

^tclrup("243Z",243)

^tclrup("246A",2)

^tclrup("246A",24)

^tclrup("246A",246)

^tclrup("2D6","2D")

^tclrup("2D61","2D6")

^tclrup("2D62","2D6")

^tclrup("2D63","2D6")

^tclrup("2D64","2D6")

^tclrup("2D65","2D6")

^tclrup("2D66","2D6")

^tclrup("2D6Z","2D6")

^tclrup("2DG",2)

^tclrup("2DG","2D")

^tclrup("3AB3",3)

^tclrup("3AB3","3A")

^tclrup("3AB3","3AB")

^tclrup("442W",4)

^tclrup("442W",44)

^tclrup("442W",442)

^tclrup("466A",466)

^tclrup("466Z",466)

^tclrup("679A",679)

^tclrup("679B",679)

^tclrup("679C",679)

^tclrup("679D",679)

^tclrup("679E",679)

^tclrup("679F",679)

^tclrup("679G",679)

^tclrup("679H",679)

^tclrup("679I",679)

^tclrup("679J",679)

^tclrup("679K",6)

^tclrup("679K",67)

^tclrup("679K",679)

^tclrup("679L",679)

^tclrup("679M",679)

^tclrup("679Z",679)

^tclrup("67A3","67A")

^tclrup("8B2B",8)

^tclrup("8B2B","8B")

^tclrup("8B2B","8B2")

^tclrup("8CA4",8)

^tclrup("8CA4","8C")

^tclrup("8CA4","8CA")

^tclrup("8CA40","8CA4")

^tclrup("8CA41","8CA4")

^tclrup("8CA42","8CA4")

^tclrup("8CA43","8CA4")

^tclrup("8CA44","8CA4")

^tclrup("8CA45","8CA4")

^tclrup("8CA46","8CA4")

^tclrup("8CA47","8CA4")

^tclrup("8CA48","8CA4")

^tclrup("8CA49","8CA4")

^tclrup("8CA4A","8CA4")

^tclrup("8CA4B","8CA4")

^tclrup("8CA4C","8CA4")

^tclrup("8CA4D","8CA4")

^tclrup("8CA4E","8CA4")

^tclrup("8CA4F","8CA4")

^tclrup("8CA4G","8CA4")

^tclrup("8CA4z","8CA4")

^tclrup("8CAL",8)

^tclrup("8CAL","8C")

^tclrup("8CAL","8CA")

^tclrup("8CAM",8)

^tclrup("8CAM","8C")

^tclrup("8CAM","8CA")

^tclrup("8H72","8H7")

^tclrup("8H7R","8H7")

^tclrup("8H7i",8)

^tclrup("8H7i","8H")

^tclrup("8H7i","8H7")

^tclrup("8HTK",8)

^tclrup("8HTK","8H")

^tclrup("8HTK","8HT")

^tclrup("9HB",9)

^tclrup("9HB","9H")

^tclrup("9HB0",9)

^tclrup("9HB0","9H")

^tclrup("9HB0","9HB")

^tclrup("9HB1",9)

^tclrup("9HB1","9H")

^tclrup("9HB1","9HB")

^tclrup("9HB2",9)

^tclrup("9HB2","9H")

^tclrup("9HB2","9HB")

^tclrup("9HB3",9)

^tclrup("9HB3","9H")

^tclrup("9HB3","9HB")

^tclrup("DAVIEDA1",138)

^tclrup("DAVIEOC1",136)

^tclrup("DAVIERE1",138)

^tclrup("EGTON1025","137R")

^tclrup("EGTON1027","137S")

^tclrup("EGTON322","137S")

^tclrup("EGTON418",136)

^tclrup("EGTON421","8CA4")

^tclrup("EGTON422","8CA4")

^tclrup("EGTON423","8CA4")

^tclrup("EMISEX2",138)

^tclrup("EMISHI1",679)

^tclrup("EMISLI1",679)

^tclrup("EMISNQDI2","1C12")

^tclrup("EMISNQEM2","1C12")

^tclrup("EMISNQFE1","1C12")

^tclrup("EMISNQFR1","1C12")

^tclrup("EMISNQHE1","1C12")

^tclrup("EMISNQHE2","1C12")

^tclrup("EMISNQHE3","1C12")

^tclrup("EMISNQHE4","1C12")

^tclrup("EMISNQHE5","1C12")

^tclrup("EMISNQLE1","1C12")

^tclrup("EMISNQMO1",679)

^tclrup("EMISNQRE13",679)

^tclrup("EMISQAL1",136)

^tclrup("EMISQOT3",136)

^tclrup("EMISSMRE1","137R")

^tclrup("PATELGL1","13A")

^tclrup("PATELNO1","13A")

^tclrup("PATELUN1","13A")

*
*
^tclsyn("""""BLOCKED EAR""""",0,"1C14")

^tclsyn("AEROBIC EXERCISE 0 TIMES/WEEK",0,1388)

^tclsyn("AEROBIC EXERCISE 1 TIME/WEEK",0,1389)

^tclsyn("AEROBIC EXERCISE 2 TIMES/WEEK",0,"138A")

^tclsyn("AEROBIC EXERCISE 3+ TIMES/WEEK",0,"138B")

^tclsyn("ALCOHOL AUDIT SCORE",0,"EMISQAL1")

^tclsyn("ALCOHOL CONSUMPTION",0,136)

^tclsyn("ALCOHOL CONSUMPTION NOS",0,"136Z")

^tclsyn("ALCOHOL CONSUMPTION UNKNOWN",0,1368)

^tclsyn("ALCOHOL INTAKE",0,"EGTON418")

^tclsyn("ALCOHOL INTAKE ABOVE REC LIMIT",0,"136K")

^tclsyn("ALCOHOL INTAKE WITHIN REC LIMT",0,"136L")

^tclsyn("ANAEROBIC EXERCISE 0 TIMES/WK",0,"138C")

^tclsyn("ANAEROBIC EXERCISE 1 TIME/WEEK",0,"138D")

^tclsyn("ANAEROBIC EXERCISE 2 TIMES/WK",0,"138E")

^tclsyn("ANAEROBIC EXERCISE 3+ TIMES/WK",0,"138F")

^tclsyn("ANTENATAL EDUCATION",0,"679E")

^tclsyn("ATTENDS EXERCISE CLASSES",0,"138G")

^tclsyn("AVOIDS EVEN TRIVIAL EXERCISE",0,1382)

^tclsyn("BASELINE WEIGHT",0,"22A7")

^tclsyn("BED-RIDDEN",0,"13C6")

^tclsyn("BEER DRINKER",0,"136G")

^tclsyn("BINGE DRINKER",0,"136R")

^tclsyn("BLADDER - ASSESSMENT",0,394)

^tclsyn("BLADDER: FULLY CONTINENT",0,3942)

^tclsyn("BLADDER: INCONTINENT",0,3940)

^tclsyn("BLADDER: OCCASIONAL ACCIDENT",0,3941)

^tclsyn("BMI 25-29 - OVERWEIGHT",0,"22K4")

^tclsyn("BMI 40+ - SEVERELY OBESE",0,"22K7")

^tclsyn("BODY MASS INDEX",0,"22K")

^tclsyn("BODY MASS INDEX 20-24 - NORMAL",0,"22K8")

^tclsyn("BODY MASS INDEX 30+ - OBESITY",0,"22K5")

^tclsyn("BODY MASS INDEX HIGH K/M2",0,"22K2")

^tclsyn("BODY MASS INDEX LESS THAN 20",0,"22K6")

^tclsyn("BODY MASS INDEX LOW K/M2",0,"22K3")

^tclsyn("BODY MASS INDEX NORMAL K/M2",0,"22K1")

^tclsyn("BOWELS - ASSESSMENT",0,393)

^tclsyn("BOWELS: FULLY CONTINENT",0,3932)

^tclsyn("BOWELS: INCONTINENT",0,3930)

^tclsyn("BOWELS: OCCASIONAL ACCIDENT",0,3931)

^tclsyn("CAR OWNER",0,"13C7")

^tclsyn("CHANGE IN BEHAVIOUR",0,"3AB3")

^tclsyn("CHEWS TOBACCO",0,"137W")

^tclsyn("CIGAR SMOKER",0,"137J")

^tclsyn("CIGARETTE SMOKER",0,"137P")

^tclsyn("COMPETITIVE ATHLETE",0,1386)

^tclsyn("CONFINED TO CHAIR",0,"13C5")

^tclsyn("CURRENT NON DRINKER",0,"136M")

^tclsyn("CURRENT NON-SMOKER",0,"137L")

^tclsyn("CURRENT SMOKER",0,"137R")

^tclsyn("CURRENT SMOKER NOS",0,"EGTON1025")

^tclsyn("DAILY EXCERCISE",0,"DAVIEDA1")

^tclsyn("DEAFNESS",0,"1C13")

^tclsyn("DEPENDS ON PUBLIC TRANSPORT",0,"13CB")

^tclsyn("DETERIORATING HEARING",0,"1C16")

^tclsyn("DETERIORATING VISION",0,"1B77")

^tclsyn("DIABETIC LIPID LOWERING DIET",0,"13AB")

^tclsyn("DIABETIC WEIGHT REDUCING DIET",0,"13AC")

^tclsyn("DIASTOLIC BLOOD PRESSURE",0,"246A")

^tclsyn("DIET - PATIENT INITIATED",0,"13A")

^tclsyn("DIET AVERAGE",0,"1FC")

^tclsyn("DIET GOOD",0,"1FA")

^tclsyn("DIET POOR",0,"1FB")

^tclsyn("DIFF HEARING WTH BCKGRND NOISE",0,"1C18")

^tclsyn("DIFFICULTY HEARING WHISPERS",0,"1C19")

^tclsyn("DIFFICULTY HEARING WHISPERS",0,"EMISNQDI2")

^tclsyn("DIPLOPIA/DOUBLE VISION",0,"1B72")

^tclsyn("DRINKS BEER AND SPIRITS",0,"136H")

^tclsyn("DRINKS WINE",0,"136I")

^tclsyn("EGG FREE DIET - ALLERGY",0,"13A7")

^tclsyn("EMBARRASSED DUE TO HEARING DIFFICULTY",0,"EMISNQEM2")

^tclsyn("ENJOYS HEAVY EXERCISE",0,1385)

^tclsyn("ENJOYS INTERMEDIATE EXERCISE",0,"138H")

^tclsyn("ENJOYS LIGHT EXERCISE",0,1383)

^tclsyn("ENJOYS MODERATE EXERCISE",0,1384)

^tclsyn("EX CIGAR SMOKER",0,"137O")

^tclsyn("EX PIPE SMOKER",0,"137N")

^tclsyn("EX SMOKER",0,"137S")

^tclsyn("EX- ROLLED TOBACCO SMOKER",0,"EGTON1027")

^tclsyn("EX-CIGARETTE SMOKER",0,"EGTON322")

^tclsyn("EX-HEAVY DRINKER - (7-9U/DAY)",0,"136D")

^tclsyn("EX-HEAVY SMOKER (20-39/DAY)",0,"137A")

^tclsyn("EX-LIGHT DRINKER - (1-2U/DAY)",0,"136B")

^tclsyn("EX-LIGHT SMOKER (1-9/DAY)",0,1378)

^tclsyn("EX-MODERATE DRINKER - (3-6U/D)",0,"136C")

^tclsyn("EX-MODERATE SMOKER (10-19/DAY)",0,1379)

^tclsyn("EX-SMOKER - AMOUNT UNKNOWN",0,"137F")

^tclsyn("EX-TRIVIAL DRINKER (<1U/DAY)",0,"136A")

^tclsyn("EX-TRIVIAL SMOKER (<1/DAY)",0,1377)

^tclsyn("EX-VERY HEAVY DRINKER-(>9U/D)",0,"136E")

^tclsyn("EX-VERY HEAVY SMOKER (40+/DAY)",0,"137B")

^tclsyn("EXERCISE GRADING",0,138)

^tclsyn("EXERCISE GRADING NOS",0,"138Z")

^tclsyn("EXERCISE GRADING UNKNOWN",0,1387)

^tclsyn("EXERCISE PHYSICALLY IMPOSSIBLE",0,1381)

^tclsyn("EXERCISE SESSIONS",0,"EMISEX2")

^tclsyn("FEELS HANDICAPPED DUE TO HEARING DIFFICULTY",0,"EMISNQFE1")

^tclsyn("FITT ACTIVITY LEVEL 0",0,"138I")

^tclsyn("FITT ACTIVITY LEVEL 1",0,"138J")

^tclsyn("FITT ACTIVITY LEVEL 2",0,"138K")

^tclsyn("FITT ACTIVITY LEVEL 3",0,"138L")

^tclsyn("FITT ACTIVITY LEVEL 4",0,"138M")

^tclsyn("FITT ACTIVITY LEVEL 5",0,"138N")

^tclsyn("FLASHING LIGHTS SEEN",0,"1B73")

^tclsyn("FLOATERS SEEN",0,"1B74")

^tclsyn("FRUSTRATED DUE TO HEARING DIFFICULTY",0,"EMISNQFR1")

^tclsyn("FULLY MOBILE",0,"13C1")

^tclsyn("GENERAL CONTRACEPTIVE ADVICE",0,611)

^tclsyn("GLUTEN FREE",0,"PATELGL1")

^tclsyn("GLYCOSURIA",0,4668)

^tclsyn("HAS A STAMMER/STUTTER",0,"1B92")

^tclsyn("HAS ACCESS TO A CAR",0,"13C8")

^tclsyn("HAS DIFFICULTY WITH SPEECH",0,"1B93")

^tclsyn("HAS OTHER PERSONAL TRANSPORT",0,"13C9")

^tclsyn("HEALTH ED. - ALCOHOL",0,6792)

^tclsyn("HEALTH ED. - BREAST EXAM.",0,6795)

^tclsyn("HEALTH ED. - CERVICAL CYTOLOGY",0,6793)

^tclsyn("HEALTH ED. - DIET",0,6799)

^tclsyn("HEALTH ED. - DONOR STATUS",0,6796)

^tclsyn("HEALTH ED. - EXERCISE",0,6798)

^tclsyn("HEALTH ED. - IMMUNISATION",0,6797)

^tclsyn("HEALTH ED. - RUBELLA STATUS",0,6794)

^tclsyn("HEALTH ED. - SMOKING",0,6791)

^tclsyn("HEALTH ED. TESTICULAR EXAMIN.",0,"679B")

^tclsyn("HEALTH ED.- DRUGS OF ADDICTION",0,"679A")

^tclsyn("HEALTH EDUCATION - ASTHMA",0,"679J")

^tclsyn("HEALTH EDUCATION - CONTINENCE",0,"679H")

^tclsyn("HEALTH EDUCATION - DIABETES",0,"679L")

^tclsyn("HEALTH EDUCATION - HRT",0,"679G")

^tclsyn("HEALTH EDUCATION - INFANT MASSAGE",0,"679I")

^tclsyn("HEALTH EDUCATION - OSTEOPOROSIS",0,"679F")

^tclsyn("HEALTH EDUCATION - RHEUMATOLOGY",0,"679M")

^tclsyn("HEALTH EDUCATION - SEXUAL HEALTH",0,"679K")

^tclsyn("HEALTH EDUCATION - SUBJECT",0,679)

^tclsyn("HEALTH EDUCATION - SUBJECT NOS",0,"679Z")

^tclsyn("HEALTH EDUCN - BACK PROBLEMS",0,"679C")

^tclsyn("HEARING AID PROBLEM",0,"1C17")

^tclsyn("HEARING AID WORN",0,"2DG")

^tclsyn("HEARING DIFFICULTY",0,"1C12")

^tclsyn("HEARING DIFFICULTY CAUSING DISPUTE WITH FAMILY",0,"EMISNQHE2")

^tclsyn("HEARING DIFFICULTY HAMPERS PERSONAL/ SOCIAL LIFE",0,"EMISNQHE3")

^tclsyn("HEARING DIFFICULTY WHEN LISTENING TO TV/ RADIO",0,"EMISNQHE5")

^tclsyn("HEARING DIFFICULTY WHEN WITH FRIENDS/ FAMILY",0,"EMISNQHE4")

^tclsyn("HEARING DIFFICULTY WITH BACKGROUND NOISE",0,"EMISNQHE1")

^tclsyn("HEARING NORMAL",0,"1C11")

^tclsyn("HEARING SYMPTOM NOS",0,"1C1Z")

^tclsyn("HEARING SYMPTOMS",0,"1C1")

^tclsyn("HEAVY DRINKER",0,"136P")

^tclsyn("HEAVY DRINKER - 7-9U/DAY",0,1365)

^tclsyn("HIGH FIBRE DIET",0,"13A8")

^tclsyn("HIV PREVENTION ADVICE",0,"EMISHI1")

^tclsyn("HOUSEBOUND",0,"13CA")

^tclsyn("IMMOBILE",0,"13CC")

^tclsyn("IMPAIRED MOBILITY",0,"13CP")

^tclsyn("LEARN DIS HEALTH ACT PLAN DECL",0,"9HB0")

^tclsyn("LEARN DIS HEALTH ACT PLAN OFFD",0,"9HB1")

^tclsyn("LEARN DIS HEALTH ACT PLAN REVD",0,"9HB2")

^tclsyn("LEARNING DISAB HEALTH ASSESSMT",0,"9HB3")

^tclsyn("LEARNING DISABLTS ADMIN STATUS",0,"9HB")

^tclsyn("LESS FREQ. ATTENDANCE TO RELIGIOUS SERV. DUE TO HEARING DIFF",0,"EMISNQLE1")

^tclsyn("LIFESTYLE ADVICE",0,"EMISLI1")

^tclsyn("LIGHT DRINKER",0,"136N")

^tclsyn("LIGHT DRINKER - 1-2U/DAY",0,1363)

^tclsyn("LOSS OF VISION",0,"1B75")

^tclsyn("LOW FAT DIET",0,"13A4")

^tclsyn("LOW FAT DIET ADVISED",0,"EGTON422")

^tclsyn("LOW SALT DIET",0,"13A5")

^tclsyn("MILK FREE DIET - ALLERGY",0,"13A6")

^tclsyn("MINIMAL RESIDUE DIET",0,"13A9")

^tclsyn("MOBILE IN HOME",0,"13C3")

^tclsyn("MOBILE OUTSIDE WITH AID",0,"13C2")

^tclsyn("MOBILITY - SOCIAL FUNCTIONING",0,"13C")

^tclsyn("MOBILITY FAIR",0,"13CG")

^tclsyn("MOBILITY NOS",0,"13CZ")

^tclsyn("MOBILITY POOR",0,"13CE")

^tclsyn("MOBILITY VERY POOR",0,"13CD")

^tclsyn("MODERATE DRINKER",0,"136O")

^tclsyn("MODERATE DRINKER - 3-6U/DAY",0,1364)

^tclsyn("MOTHERS HYGIENE DISCUSSED",0,"EMISNQMO1")

^tclsyn("NEEDS WALKING AID IN HOME",0,"13C4")

^tclsyn("NEVER SMOKED TOBACCO",0,1371)

^tclsyn("NICOTINE REPLACEMENT THERAPY",0,"8B2B")

^tclsyn("NO SPEECH PROBLEM",0,"1B91")

^tclsyn("NO VISUAL SYMPTOM",0,"1B71")

^tclsyn("NORMAL DIET",0,"PATELNO1")

^tclsyn("O/E - BLOOD FROM EAR",0,"2D66")

^tclsyn("O/E - BLOOD STAINED EAR DISCH.",0,"2D65")

^tclsyn("O/E - DISCHARGE FROM EAR",0,"2D6")

^tclsyn("O/E - EAR DISCHARGE NOS",0,"2D6Z")

^tclsyn("O/E - HEIGHT",0,229)

^tclsyn("O/E - HEIGHT 10-20% < AVERAGE",0,2292)

^tclsyn("O/E - HEIGHT NOS",0,"229Z")

^tclsyn("O/E - LOSS OF HEIGHT",0,2296)

^tclsyn("O/E - NO DISCHARGE FROM EAR",0,"2D61")

^tclsyn("O/E - NO GALLOP RHYTHM",0,2434)

^tclsyn("O/E - PULSE BORDERLINE FAST",0,2425)

^tclsyn("O/E - PULSE BORDERLINE SLOW",0,2423)

^tclsyn("O/E - PULSE IRREGULARLY IRREG.",0,2432)

^tclsyn("O/E - PULSE RATE",0,242)

^tclsyn("O/E - PULSE RATE - BRADYCARDIA",0,2422)

^tclsyn("O/E - PULSE RATE NORMAL",0,2424)

^tclsyn("O/E - PULSE RATE NOS",0,"242Z")

^tclsyn("O/E - PULSE RATE TACHYCARDIA",0,2426)

^tclsyn("O/E - PULSE RATE VERY FAST",0,2427)

^tclsyn("O/E - PULSE RATE VERY SLOW",0,2421)

^tclsyn("O/E - PULSE RATE-PULSE DEFICIT",0,2428)

^tclsyn("O/E - PULSE RHYTHM",0,243)

^tclsyn("O/E - PULSE RHYTHM NOS",0,"243Z")

^tclsyn("O/E - PULSE RHYTHM REGULAR",0,2431)

^tclsyn("O/E - PURULENT EAR DISCHARGE",0,"2D64")

^tclsyn("O/E - SEROUS EAR DISCHARGE",0,"2D62")

^tclsyn("O/E - UNDERWEIGHT",0,"22A6")

^tclsyn("O/E - WAXY EAR DISCHARGE",0,"2D63")

^tclsyn("O/E - WEIGHT",0,"22A")

^tclsyn("O/E - WEIGHT 10-20% OVER IDEAL",0,"22A4")

^tclsyn("O/E - WEIGHT > 20% BELOW IDEAL",0,"22A1")

^tclsyn("O/E - WEIGHT > 20% OVER IDEAL",0,"22A5")

^tclsyn("O/E - WEIGHT NOS",0,"22AZ")

^tclsyn("O/E - WEIGHT WITHIN 10% IDEAL",0,"22A3")

^tclsyn("O/E -HEIGHT > 20% OVER AVERAGE",0,2295)

^tclsyn("O/E -HEIGHT WITHIN 10% AVERAGE",0,2293)

^tclsyn("O/E -PULSE REGULARLY IRREGULAR",0,2433)

^tclsyn("O/E -WEIGHT 10-20% BELOW IDEAL",0,"22A2")

^tclsyn("O/E PULSE RATE STABLE",0,2429)

^tclsyn("O/E-HEIGHT 10-20% OVER AVERAGE",0,2294)

^tclsyn("O/E-HEIGHT > 20% BELOW AVERAGE",0,2291)

^tclsyn("OCCASIONAL DRINKER",0,"DAVIEOC1")

^tclsyn("OTHER ALCOHOL RELATED INFORMATION",0,"EMISQOT3")

^tclsyn("PASSIVE SMOKER",0,"137I")

^tclsyn("PATIENT ADVISED ABOUT ALCOHOL",0,"8CAM")

^tclsyn("PATIENT ADVISED RE DIET",0,"8CA4")

^tclsyn("PATIENT CONCERNED ABOUT EYESIGHT",0,"1B7A")

^tclsyn("PATIENT INITIATED DIET NOS",0,"13AZ")

^tclsyn("PHYSICAL ACT TARG LIGHT EXER",0,"13CR")

^tclsyn("PHYSICAL ACT TARG MIN EXERCISE",0,"13CQ")

^tclsyn("PHYSICAL ACT TARG MOD EXERCISE",0,"13CS")

^tclsyn("PHYSICAL ACT TARG STREN EXER",0,"13CT")

^tclsyn("PHYSICAL ACTIVITY",0,"13CH")

^tclsyn("PIPE SMOKER",0,"137H")

^tclsyn("POPPING SENSATION IN EAR",0,"1C15")

^tclsyn("PREGNANCY SMOKING ADVICE",0,"67A3")

^tclsyn("PT ADVIS-LOW CARBOHYDRATE DIET",0,"8CA4A")

^tclsyn("PT ADVIS-LOW CHOLESTEROL DIET",0,"8CA47")

^tclsyn("PT ADVISED - HIGH PROTEIN DIET",0,"8CA4C")

^tclsyn("PT ADVISED - LACTOSE FREE DIET",0,"8CA49")

^tclsyn("PT ADVISED RE DIABETIC DIET",0,"8CA41")

^tclsyn("PT ADVISED RE DIET NOS",0,"8CA4z")

^tclsyn("PT ADVISED RE EGG FREE DIET",0,"8CA4E")

^tclsyn("PT ADVISED RE GLUTEN FREE DIET",0,"8CA42")

^tclsyn("PT ADVISED RE HIGH FIBRE DIET",0,"8CA44")

^tclsyn("PT ADVISED RE LOW FAT DIET",0,"8CA46")

^tclsyn("PT ADVISED RE LOW PROTEIN DIET",0,"8CA4B")

^tclsyn("PT ADVISED RE LOW RESIDUE DIET",0,"8CA45")

^tclsyn("PT ADVISED RE LOW SALT DIET",0,"8CA48")

^tclsyn("PT ADVISED RE MILK FREE DIET",0,"8CA4D")

^tclsyn("PT ADVISED RE VEGAN DIET",0,"8CA4G")

^tclsyn("PT ADVISED RE VEGETARIAN DIET",0,"8CA4F")

^tclsyn("PT ADVISED RE WT REDUCING DIET",0,"8CA40")

^tclsyn("PT ADVISED-PHENYLAL. FREE DIET",0,"8CA43")

^tclsyn("REDUCING RISK OF COT DEATH DISCUSSED",0,"EMISNQRE13")

^tclsyn("REFER TO CHIROPODIST",0,"8H7R")

^tclsyn("REFER TO DISTRICT NURSE",0,"8H72")

^tclsyn("REFERRAL TO STOP-SMOKING CLINIC",0,"8HTK")

^tclsyn("REFERRAL: SMOK CESSATN ADVISOR",0,"8H7i")

^tclsyn("REGULAR ACTIVE EXERCISE",0,"DAVIERE1")

^tclsyn("RESUSCITATION TRAINING",0,"679D")

^tclsyn("ROLLS OWN CIGARETTES",0,"137M")

^tclsyn("SCOTOPIC SENSITIVITY",0,"1B78")

^tclsyn("SEMISOLID DIET",0,"13AA")

^tclsyn("SERUM TSH LEVEL",0,"442W")

^tclsyn("SMOKER (READ CODES)",0,"EMISSMRE1")

^tclsyn("SMOKING CESSATION ADVICE",0,"8CAL")

^tclsyn("SMOKING STATUS AT 4 WEEKS",0,"13p1")

^tclsyn("SOCIAL DRINKER",0,"136J")

^tclsyn("SPEECH LIMITED",0,"1B94")

^tclsyn("SPEECH PROBLEM",0,"1B9")

^tclsyn("SPEECH PROBLEM NOS",0,"1B9Z")

^tclsyn("SPIRIT DRINKER",0,"136F")

^tclsyn("STOPPED DRINKING ALCOHOL",0,1367)

^tclsyn("STOPPED SMOKING",0,"137K")

^tclsyn("SUGAR FREE DIET ADVISED",0,"EGTON423")

^tclsyn("SUSPECT ALCOHOL ABUSE - DENIED",0,1369)

^tclsyn("SYSTOLIC BLOOD PRESSURE",0,2469)

^tclsyn("TAKES INADEQUATE EXERCISE",0,"138O")

^tclsyn("TARGET PHYSICAL ACTIVITY",0,"13CI")

^tclsyn("TEETOTALLER",0,1361)

^tclsyn("TEMPLATE GMS - SMOKING STATUS (V2)",0,"DOCDI1000000000590")

^tclsyn("TEMPORARY VISUAL DISTURBANCE",0,"1B76")

^tclsyn("TRANSPORT PROBLEMS",0,"13CF")

^tclsyn("TRIVIAL DRINKER - <1U/DAY",0,1362)

^tclsyn("TRYING TO GIVE UP SMOKING",0,"137G")

^tclsyn("UNBALANCED DIET",0,"PATELUN1")

^tclsyn("URINE CLINITEST",0,"466A")

^tclsyn("URINE DIPSTICK FOR GLUCOSE",0,4669)

^tclsyn("URINE GLUCOSE TEST = +",0,4664)

^tclsyn("URINE GLUCOSE TEST = ++",0,4665)

^tclsyn("URINE GLUCOSE TEST = +++",0,4666)

^tclsyn("URINE GLUCOSE TEST = ++++",0,4667)

^tclsyn("URINE GLUCOSE TEST = TRACE",0,4663)

^tclsyn("URINE GLUCOSE TEST NEGATIVE",0,4662)

^tclsyn("URINE GLUCOSE TEST NOS",0,"466Z")

^tclsyn("URINE GLUCOSE TEST NOT DONE",0,4661)

^tclsyn("URINE TEST FOR GLUCOSE",0,466)

^tclsyn("VEGAN DIET - NO DAIRY PRODUCE",0,"13A2")

^tclsyn("VEGETARIAN DIET - NO MEAT",0,"13A1")

^tclsyn("VERY HEAVY DRINKER",0,"136Q")

^tclsyn("VERY HEAVY DRINKER - >9U/DAY",0,1366)

^tclsyn("VISUAL PERCEPTUAL WEAKNESS",0,"1B79")

^tclsyn("VISUAL SYMPTOM NOS",0,"1B7Z")

^tclsyn("VISUAL SYMPTOMS",0,"1B7")

^tclsyn("WEIGHT LOSS FROM BASELINE WEIGHT",0,"22A8")

^tclsyn("WEIGHT REDUCING DIET",0,"13A3")

^tclsyn("WEIGHT REDUCING DIET ADVISED",0,"EGTON421")

^tclsyn("WHO PERFORMANCE STATUS GRADE 0",0,"13CJ")

^tclsyn("WHO PERFORMANCE STATUS GRADE 1",0,"13CK")

^tclsyn("WHO PERFORMANCE STATUS GRADE 2",0,"13CL")

^tclsyn("WHO PERFORMANCE STATUS GRADE 3",0,"13CM")

^tclsyn("WHO PERFORMANCE STATUS GRADE 4",0,"13CN")

*
*
^tclvalue(136)
Alcohol~units/week~0~99~0~21~
^tclvalue(229)
Height~cm~0~250~10~250~~
^tclvalue(242)
Pulse~/minute~0~400~0~80
^tclvalue(2469)
BP~mm Hg~0~350
^tclvalue("137H")
Pipe smoker~oz/wk.~0~500~0~10
^tclvalue("137J")
No.Cigars Smoked~/day~0~500~~
^tclvalue("137M")
Rolled tobac.~oz/wk~0~500~~
^tclvalue("137N")
Ex piper~oz/wk.~0~500~~
^tclvalue("137O")
Ex cigar~/day (past)~0~500~~
^tclvalue("137P")
Smokes~/day~0~500~~
^tclvalue("22A")
Wt.~Kg~0~400
^tclvalue("22K")
B.M.I.~~0~100~22.5~~S STR=$J(VAR(1)/((VAR(2)/100)*(VAR(2)/100)),1,1)@22A\N#229\L~AUTO
^tclvalue("246A")
/~mm Hg~0~250
^tclvalue("442W")
TSH~mu/l~0~200~(0.4~5.5U)~
^tclvalue("EGTON1027")
Ex rolled~oz/wk.~0~500~~
^tclvalue("EGTON322")
Ex Smoked~/day (past)~0~500~~
^tclvalue("EGTON418")
Alcohol~units/week~0~3000~0~20
^tclvalue("EMISEX2")
exercise~no. per week~0~100~~
*
*
^tcqasc("E",2)
EA
^tcqasc("E",4)
EC
^tcqasc("E",6)
EB
^tcqasc("E",7)
ED
^tcqasc("E",8)
Ezzzz
^tcqasc("G",2)
GA
^tcqasc("G",4)
GB
^tcqasc("G",5)
GC
^tcqasc("H",1)
HH
^tcqasc("H",2)
HZzz
^tcqasc("H",4)
HB
^tcqasc("H",6)
HC
^tcqasc("H",8)
HD
^tcqasc("H",10)
HE
^tcqasc("H",12)
HF
^tcqasc("H",14)
HG
^tcqasc("HZzz",1)
HZzzB
^tcqasc("HZzz",2)
HZzzA
^tcqasc("U",2)
UA
^tcqasc("U",4)
UB
*
*
^tcqual("E")
Referring Doctor
^tcqual("E","EA")
Dr A K Vora
^tcqual("E","EB")
Dr K C Pourgourides
^tcqual("E","EC")
Dr R P Patel
^tcqual("E","ED")
N.P. J Wallis
^tcqual("E","Ezzzz")
Hospital Admission
^tcqual("EA")
Dr A K Vora
^tcqual("EB")
Dr K C Pourgourides
^tcqual("EC")
Dr R P Patel
^tcqual("ED")
N.P. J Wallis
^tcqual("Ezzzz")
Hospital Admission
^tcqual("G")
Type Of Referral
^tcqual("G","GA")
N.H.S. Referral
^tcqual("G","GB")
Private Referral
^tcqual("G","GC")
Domiciliary Referral
^tcqual("GA")
N.H.S. Referral
^tcqual("GB")
Private Referral
^tcqual("GC")
Domiciliary Referral
^tcqual("H")
Hospital
^tcqual("H","HB")
Queen Elizabeth Psychiatric Hospital
^tcqual("H","HC")
Birmingham Womens Hospital
^tcqual("H","HD")
Birmingham Childrens Hospital
^tcqual("H","HE")
Royal Orthopaedic Hospital
^tcqual("H","HF")
The Priory Hospital
^tcqual("H","HG")
Nuffield Hospital
^tcqual("H","HH")
Birmingham Heartlands Hospital
^tcqual("H","HZzz")
University Hospital Birmingham
^tcqual("HB")
Queen Elizabeth Psychiatric Hospital
^tcqual("HC")
Birmingham Womens Hospital
^tcqual("HD")
Birmingham Childrens Hospital
^tcqual("HE")
Royal Orthopaedic Hospital
^tcqual("HF")
The Priory Hospital
^tcqual("HG")
Nuffield Hospital
^tcqual("HH")
Birmingham Heartlands Hospital
^tcqual("HZzz")
University Hospital Birmingham
^tcqual("HZzz","HZzzA")
Selly Oak Hospital
^tcqual("HZzz","HZzzB")
Queen Elizabeth Medical Centre
^tcqual("HZzzA")
Selly Oak Hospital
^tcqual("HZzzB")
Queen Elizabeth Medical Centre
^tcqual("U")
Urgent/Non-Urgent
^tcqual("U","UA")

^tcqual("U","UB")

^tcqual("UA")
Urgent
^tcqual("UB")
Non-Urgent
*
*
*
*
*
*
*
*
*
*
*
*
^tgtemple("9HB3")

^tgtemple("9HB3",2)
9HB3\Learn Dis Assess\0~140\\\DATE\\\YN
^tgtemple("9HB3",3)
611\Contracep Advice\0~140\\\DATE\\\YN
^tgtemple("9HB3",4)
6795\Breast Exam Advi\0~140\F\\\\\YN
^tgtemple("9HB3",5)
679B\Testicular Advic\0~140\M\\\\\YN
^tgtemple("9HB3",6)
679K\Sexual Hlth Advi\0~140\\\\\\YN
^tgtemple("9HB3",7)
22A\O/E - weight\0~140\\\\\\RECORD
^tgtemple("9HB3",8)
229\O/E - height\0~140\\\\\\RECORD
^tgtemple("9HB3",9)
22K\Body Mass Index\0~140\\\\\\RECORD
^tgtemple("9HB3",10)
2469\Systolic BP\0~140\\\\\\RECORD
^tgtemple("9HB3",11)
246A\Diastolic BP\0~140\\\\\\RECORD
^tgtemple("9HB3",12)
242\O/E - pulse rate\0~140\\\\\\RECORD
^tgtemple("9HB3",13)
243\Pulse Rhythm\0~140\\\\\\PICK
^tgtemple("9HB3",14)
466\Urine Glucose\0~140\\\\\\PICK
^tgtemple("9HB3",15)
442W\Serum TSH level\0~140\\\DATE\\\RECORD
^tgtemple("9HB3",16)
DOCDI1000000000590\Template GMS - Smoking status (V2)\SUBTEMPLATE
^tgtemple("9HB3",17)
136\Alcohol Intake\0~140\\\\\\RECORD
^tgtemple("9HB3",18)
8CAM\Alcohol Advice\0~140\\\\\\YN
^tgtemple("9HB3",19)
13A\Diet\0~140\\\\\\PICK
^tgtemple("9HB3",20)
8CA4\Diet Advice\0~140\\\\\\YN
^tgtemple("9HB3",20.5)
138\Exercise grading\0~140\\\DATE\\\PICK
^tgtemple("9HB3",21)
3AB3\Change in behavi\0~140\\\DATE\\Y~Notes\YN
^tgtemple("9HB3",22)
1B9\Speech problem\0~140\\\DATE\\\PICK
^tgtemple("9HB3",23)
1B7\Visual symptoms\0~140\\\DATE\\\PICK
^tgtemple("9HB3",24)
1C1\Hearing symptoms\0~140\\\DATE\\\PICK
^tgtemple("9HB3",25)
2DG\Hearing aid worn\0~140\\\DATE\\\YN
^tgtemple("9HB3",26)
13C\Mobility Assessm\0~140\\\DATE\\\PICK
^tgtemple("9HB3",27)
8H7R\Ref:Chiropodist\0~140\\\DATE\\\YN
^tgtemple("9HB3",28)
393\Bowels Assessmen\0~140\\\DATE\\\PICK
^tgtemple("9HB3",29)
394\Bladder Assessme\0~140\\\DATE\\\PICK
^tgtemple("9HB3",30)
8H72\Ref: D/N\0~140\\\DATE\\\YN
^tgtemple("9HB3",30.5)
9HB\LD Plan\0~140\\\DATE\\\PICK
^tgtemple("9HB3",31)
9HB3\F/U Learning Dis\0~140\\\DATE\\\DIARY
^tgtemple("DOCDI1000000000590")

^tgtemple("DOCDI1000000000590",1)
13p1\*Smoking status\0~140\\\\\\PICK
^tgtemple("DOCDI1000000000590",1.875)
137G\*Trying to stop\0~140\\\DATE\\\YN
^tgtemple("DOCDI1000000000590",2.75)
8B2B\*On NRT\0~140\\\DATE\\\YN
^tgtemple("DOCDI1000000000590",3.375)
6791\*Smoking advice\0~140\M\\DATE\\\PICK
^tgtemple("DOCDI1000000000590",3.53125)
679\*Smoking advice\8~75\F\\DATE\\\PICK
^tgtemple("DOCDI1000000000590",4)
8H7i\*Smoking referal\0~140\\\DATE\\\PICK
*
*
^tgtpick("9HB3",138,1381)
18
^tgtpick("9HB3",138,1382)
19
^tgtpick("9HB3",138,1383)
20
^tgtpick("9HB3",138,1384)
21
^tgtpick("9HB3",138,1385)
22
^tgtpick("9HB3",243,2431)
1
^tgtpick("9HB3",243,2432)
3
^tgtpick("9HB3",243,2433)
2
^tgtpick("9HB3",243,2434)
4
^tgtpick("9HB3",393,3930)
23
^tgtpick("9HB3",393,3931)
24
^tgtpick("9HB3",393,3932)
25
^tgtpick("9HB3",394,3940)
26
^tgtpick("9HB3",394,3941)
27
^tgtpick("9HB3",394,3942)
28
^tgtpick("9HB3",466,4662)
5
^tgtpick("9HB3",466,4663)
6
^tgtpick("9HB3",466,4664)
8
^tgtpick("9HB3",466,4665)
9
^tgtpick("9HB3",466,4666)
10
^tgtpick("9HB3",466,4667)
11
^tgtpick("9HB3",466,4668)
12
^tgtpick("9HB3","13A","1FA")
1
^tgtpick("9HB3","13A","1FB")
3
^tgtpick("9HB3","13A","1FC")
2
^tgtpick("9HB3","13C","13C1")
14
^tgtpick("9HB3","13C","13CA")
17
^tgtpick("9HB3","13C","13CE")
16
^tgtpick("9HB3","13C","13CG")
15
^tgtpick("9HB3","1B7","1B71")
8
^tgtpick("9HB3","1B7","1B7A")
9
^tgtpick("9HB3","1B9","1B91")
4
^tgtpick("9HB3","1B9","1B92")
7
^tgtpick("9HB3","1B9","1B93")
5
^tgtpick("9HB3","1B9","1B94")
6
^tgtpick("9HB3","1C1","1C11")
10
^tgtpick("9HB3","1C1","1C12")
11
^tgtpick("9HB3","1C1","2D6")
13
^tgtpick("9HB3","1C1","2D63")
12
^tgtpick("9HB3","9HB","9HB0")
31
^tgtpick("9HB3","9HB","9HB1")
29
^tgtpick("9HB3","9HB","9HB2")
30
^tgtpick("DOCDI1000000000590",679,6791)
1
^tgtpick("DOCDI1000000000590",679,"67A3")
3
^tgtpick("DOCDI1000000000590",679,"8CAL")
2
^tgtpick("DOCDI1000000000590",6791,6791)
9
^tgtpick("DOCDI1000000000590",6791,"8CAL")
10
^tgtpick("DOCDI1000000000590","13p1",1371)
104
^tgtpick("DOCDI1000000000590","13p1","137H")
108
^tgtpick("DOCDI1000000000590","13p1","137I")
113
^tgtpick("DOCDI1000000000590","13p1","137J")
109
^tgtpick("DOCDI1000000000590","13p1","137K")
106
^tgtpick("DOCDI1000000000590","13p1","137L")
103
^tgtpick("DOCDI1000000000590","13p1","137M")
110
^tgtpick("DOCDI1000000000590","13p1","137P")
111
^tgtpick("DOCDI1000000000590","13p1","137R")
102
^tgtpick("DOCDI1000000000590","13p1","137S")
107
^tgtpick("DOCDI1000000000590","13p1","137W")
112
^tgtpick("DOCDI1000000000590","8H7i","8H7i")
103
^tgtpick("DOCDI1000000000590","8H7i","8HTK")
104
*
*
*
*
*
*
*
*
^tproread
5
*
*
*
*
**
**