Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Routine: IBDEI06O

IBDEI06O.m

Go to the documentation of this file.
IBDEI06O ; ; 01-AUG-2022
 ;;3.0;IB ENCOUNTER FORM IMP/EXP;;AUG 01, 2022
 Q:'DIFQR(358.3)  F I=1:2 S X=$T(Q+I) Q:X=""  S Y=$E($T(Q+I+1),4,999),X=$E(X,4,999) S:$A(Y)=126 I=I+1,Y=$E(Y,2,999)_$E($T(Q+I+1),5,999) S:$A(Y)=61 Y=$E(Y,2,999) X NO E  S @X=Y
Q Q
 ;;^UTILITY(U,$J,358.3,16190,0)
 ;;=R20.3^^56^656^87
 ;;^UTILITY(U,$J,358.3,16190,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16190,1,3,0)
 ;;=3^Hyperesthesia
 ;;^UTILITY(U,$J,358.3,16190,1,4,0)
 ;;=4^R20.3
 ;;^UTILITY(U,$J,358.3,16190,2)
 ;;=^60011
 ;;^UTILITY(U,$J,358.3,16191,0)
 ;;=R21.^^56^656^150
 ;;^UTILITY(U,$J,358.3,16191,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16191,1,3,0)
 ;;=3^Rash
 ;;^UTILITY(U,$J,358.3,16191,1,4,0)
 ;;=4^R21.
 ;;^UTILITY(U,$J,358.3,16191,2)
 ;;=^5019283
 ;;^UTILITY(U,$J,358.3,16192,0)
 ;;=R22.0^^56^656^109
 ;;^UTILITY(U,$J,358.3,16192,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16192,1,3,0)
 ;;=3^Localized Swelling/Mass/Lump,Head
 ;;^UTILITY(U,$J,358.3,16192,1,4,0)
 ;;=4^R22.0
 ;;^UTILITY(U,$J,358.3,16192,2)
 ;;=^5019284
 ;;^UTILITY(U,$J,358.3,16193,0)
 ;;=R22.1^^56^656^112
 ;;^UTILITY(U,$J,358.3,16193,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16193,1,3,0)
 ;;=3^Localized Swelling/Mass/Lump,Neck
 ;;^UTILITY(U,$J,358.3,16193,1,4,0)
 ;;=4^R22.1
 ;;^UTILITY(U,$J,358.3,16193,2)
 ;;=^5019285
 ;;^UTILITY(U,$J,358.3,16194,0)
 ;;=R22.2^^56^656^115
 ;;^UTILITY(U,$J,358.3,16194,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16194,1,3,0)
 ;;=3^Localized Swelling/Mass/Lump,Trunk
 ;;^UTILITY(U,$J,358.3,16194,1,4,0)
 ;;=4^R22.2
 ;;^UTILITY(U,$J,358.3,16194,2)
 ;;=^5019286
 ;;^UTILITY(U,$J,358.3,16195,0)
 ;;=R22.31^^56^656^114
 ;;^UTILITY(U,$J,358.3,16195,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16195,1,3,0)
 ;;=3^Localized Swelling/Mass/Lump,Right Upper Limb
 ;;^UTILITY(U,$J,358.3,16195,1,4,0)
 ;;=4^R22.31
 ;;^UTILITY(U,$J,358.3,16195,2)
 ;;=^5019288
 ;;^UTILITY(U,$J,358.3,16196,0)
 ;;=R22.32^^56^656^111
 ;;^UTILITY(U,$J,358.3,16196,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16196,1,3,0)
 ;;=3^Localized Swelling/Mass/Lump,Left Upper Limb
 ;;^UTILITY(U,$J,358.3,16196,1,4,0)
 ;;=4^R22.32
 ;;^UTILITY(U,$J,358.3,16196,2)
 ;;=^5019289
 ;;^UTILITY(U,$J,358.3,16197,0)
 ;;=R22.33^^56^656^107
 ;;^UTILITY(U,$J,358.3,16197,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16197,1,3,0)
 ;;=3^Localized Swelling/Mass/Lump,Bilateral Upper Limb
 ;;^UTILITY(U,$J,358.3,16197,1,4,0)
 ;;=4^R22.33
 ;;^UTILITY(U,$J,358.3,16197,2)
 ;;=^5019290
 ;;^UTILITY(U,$J,358.3,16198,0)
 ;;=R22.42^^56^656^110
 ;;^UTILITY(U,$J,358.3,16198,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16198,1,3,0)
 ;;=3^Localized Swelling/Mass/Lump,Left Lower Limb
 ;;^UTILITY(U,$J,358.3,16198,1,4,0)
 ;;=4^R22.42
 ;;^UTILITY(U,$J,358.3,16198,2)
 ;;=^5134179
 ;;^UTILITY(U,$J,358.3,16199,0)
 ;;=R22.41^^56^656^113
 ;;^UTILITY(U,$J,358.3,16199,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16199,1,3,0)
 ;;=3^Localized Swelling/Mass/Lump,Right Lower Limb
 ;;^UTILITY(U,$J,358.3,16199,1,4,0)
 ;;=4^R22.41
 ;;^UTILITY(U,$J,358.3,16199,2)
 ;;=^5134178
 ;;^UTILITY(U,$J,358.3,16200,0)
 ;;=R22.43^^56^656^108
 ;;^UTILITY(U,$J,358.3,16200,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16200,1,3,0)
 ;;=3^Localized Swelling/Mass/Lump,Bilateral Lower Limb
 ;;^UTILITY(U,$J,358.3,16200,1,4,0)
 ;;=4^R22.43
 ;;^UTILITY(U,$J,358.3,16200,2)
 ;;=^5019291
 ;;^UTILITY(U,$J,358.3,16201,0)
 ;;=R22.9^^56^656^116
 ;;^UTILITY(U,$J,358.3,16201,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16201,1,3,0)
 ;;=3^Localized Swelling/Mass/Lump,Unspec
 ;;^UTILITY(U,$J,358.3,16201,1,4,0)
 ;;=4^R22.9
 ;;^UTILITY(U,$J,358.3,16201,2)
 ;;=^5019292
 ;;^UTILITY(U,$J,358.3,16202,0)
 ;;=R23.0^^56^656^60
 ;;^UTILITY(U,$J,358.3,16202,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16202,1,3,0)
 ;;=3^Cyanosis
 ;;^UTILITY(U,$J,358.3,16202,1,4,0)
 ;;=4^R23.0
 ;;^UTILITY(U,$J,358.3,16202,2)
 ;;=^5019293
 ;;^UTILITY(U,$J,358.3,16203,0)
 ;;=R23.1^^56^656^132
 ;;^UTILITY(U,$J,358.3,16203,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16203,1,3,0)
 ;;=3^Pallor
 ;;^UTILITY(U,$J,358.3,16203,1,4,0)
 ;;=4^R23.1
 ;;^UTILITY(U,$J,358.3,16203,2)
 ;;=^5019294
 ;;^UTILITY(U,$J,358.3,16204,0)
 ;;=R23.2^^56^656^79
 ;;^UTILITY(U,$J,358.3,16204,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16204,1,3,0)
 ;;=3^Flushing
 ;;^UTILITY(U,$J,358.3,16204,1,4,0)
 ;;=4^R23.2
 ;;^UTILITY(U,$J,358.3,16204,2)
 ;;=^47184
 ;;^UTILITY(U,$J,358.3,16205,0)
 ;;=R23.4^^56^656^153
 ;;^UTILITY(U,$J,358.3,16205,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16205,1,3,0)
 ;;=3^Skin Texture Changes
 ;;^UTILITY(U,$J,358.3,16205,1,4,0)
 ;;=4^R23.4
 ;;^UTILITY(U,$J,358.3,16205,2)
 ;;=^5019296
 ;;^UTILITY(U,$J,358.3,16206,0)
 ;;=R26.0^^56^656^46
 ;;^UTILITY(U,$J,358.3,16206,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16206,1,3,0)
 ;;=3^Ataxic Gait
 ;;^UTILITY(U,$J,358.3,16206,1,4,0)
 ;;=4^R26.0
 ;;^UTILITY(U,$J,358.3,16206,2)
 ;;=^5019304
 ;;^UTILITY(U,$J,358.3,16207,0)
 ;;=R26.1^^56^656^134
 ;;^UTILITY(U,$J,358.3,16207,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16207,1,3,0)
 ;;=3^Paralytic Gait
 ;;^UTILITY(U,$J,358.3,16207,1,4,0)
 ;;=4^R26.1
 ;;^UTILITY(U,$J,358.3,16207,2)
 ;;=^5019305
 ;;^UTILITY(U,$J,358.3,16208,0)
 ;;=R26.81^^56^656^162
 ;;^UTILITY(U,$J,358.3,16208,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16208,1,3,0)
 ;;=3^Unsteadiness on Feet
 ;;^UTILITY(U,$J,358.3,16208,1,4,0)
 ;;=4^R26.81
 ;;^UTILITY(U,$J,358.3,16208,2)
 ;;=^5019307
 ;;^UTILITY(U,$J,358.3,16209,0)
 ;;=R26.89^^56^656^33
 ;;^UTILITY(U,$J,358.3,16209,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16209,1,3,0)
 ;;=3^Abnormalities of Gait and Mobility NEC
 ;;^UTILITY(U,$J,358.3,16209,1,4,0)
 ;;=4^R26.89
 ;;^UTILITY(U,$J,358.3,16209,2)
 ;;=^5019308
 ;;^UTILITY(U,$J,358.3,16210,0)
 ;;=R26.9^^56^656^34
 ;;^UTILITY(U,$J,358.3,16210,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16210,1,3,0)
 ;;=3^Abnormalities of Gait and Mobility,Unspec
 ;;^UTILITY(U,$J,358.3,16210,1,4,0)
 ;;=4^R26.9
 ;;^UTILITY(U,$J,358.3,16210,2)
 ;;=^5019309
 ;;^UTILITY(U,$J,358.3,16211,0)
 ;;=R27.0^^56^656^45
 ;;^UTILITY(U,$J,358.3,16211,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16211,1,3,0)
 ;;=3^Ataxia,Unspec
 ;;^UTILITY(U,$J,358.3,16211,1,4,0)
 ;;=4^R27.0
 ;;^UTILITY(U,$J,358.3,16211,2)
 ;;=^5019310
 ;;^UTILITY(U,$J,358.3,16212,0)
 ;;=R27.8^^56^656^104
 ;;^UTILITY(U,$J,358.3,16212,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16212,1,3,0)
 ;;=3^Lack of Coordination NEC
 ;;^UTILITY(U,$J,358.3,16212,1,4,0)
 ;;=4^R27.8
 ;;^UTILITY(U,$J,358.3,16212,2)
 ;;=^5019311
 ;;^UTILITY(U,$J,358.3,16213,0)
 ;;=R27.9^^56^656^105
 ;;^UTILITY(U,$J,358.3,16213,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16213,1,3,0)
 ;;=3^Lack of Coordination,Unspec
 ;;^UTILITY(U,$J,358.3,16213,1,4,0)
 ;;=4^R27.9
 ;;^UTILITY(U,$J,358.3,16213,2)
 ;;=^5019312
 ;;^UTILITY(U,$J,358.3,16214,0)
 ;;=R29.0^^56^656^159
 ;;^UTILITY(U,$J,358.3,16214,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16214,1,3,0)
 ;;=3^Tetany
 ;;^UTILITY(U,$J,358.3,16214,1,4,0)
 ;;=4^R29.0
 ;;^UTILITY(U,$J,358.3,16214,2)
 ;;=^118032
 ;;^UTILITY(U,$J,358.3,16215,0)
 ;;=R29.1^^56^656^122
 ;;^UTILITY(U,$J,358.3,16215,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16215,1,3,0)
 ;;=3^Meningismus
 ;;^UTILITY(U,$J,358.3,16215,1,4,0)
 ;;=4^R29.1
 ;;^UTILITY(U,$J,358.3,16215,2)
 ;;=^5019313
 ;;^UTILITY(U,$J,358.3,16216,0)
 ;;=R29.5^^56^656^161
 ;;^UTILITY(U,$J,358.3,16216,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16216,1,3,0)
 ;;=3^Transient Paralysis
 ;;^UTILITY(U,$J,358.3,16216,1,4,0)
 ;;=4^R29.5
 ;;^UTILITY(U,$J,358.3,16216,2)
 ;;=^5019316
 ;;^UTILITY(U,$J,358.3,16217,0)
 ;;=R34.^^56^656^42
 ;;^UTILITY(U,$J,358.3,16217,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16217,1,3,0)
 ;;=3^Anuria and Oliguria
 ;;^UTILITY(U,$J,358.3,16217,1,4,0)
 ;;=4^R34.
 ;;^UTILITY(U,$J,358.3,16217,2)
 ;;=^5019333
 ;;^UTILITY(U,$J,358.3,16218,0)
 ;;=R39.12^^56^656^145
 ;;^UTILITY(U,$J,358.3,16218,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16218,1,3,0)
 ;;=3^Poor Urinary Stream
 ;;^UTILITY(U,$J,358.3,16218,1,4,0)
 ;;=4^R39.12
 ;;^UTILITY(U,$J,358.3,16218,2)
 ;;=^5019342
 ;;^UTILITY(U,$J,358.3,16219,0)
 ;;=R39.14^^56^656^77
 ;;^UTILITY(U,$J,358.3,16219,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16219,1,3,0)
 ;;=3^Feeling of Incomplete Bladder Emptying
 ;;^UTILITY(U,$J,358.3,16219,1,4,0)
 ;;=4^R39.14
 ;;^UTILITY(U,$J,358.3,16219,2)
 ;;=^5019344
 ;;^UTILITY(U,$J,358.3,16220,0)
 ;;=R41.4^^56^656^126
 ;;^UTILITY(U,$J,358.3,16220,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16220,1,3,0)
 ;;=3^Neurologic Neglect Syndrome
 ;;^UTILITY(U,$J,358.3,16220,1,4,0)
 ;;=4^R41.4
 ;;^UTILITY(U,$J,358.3,16220,2)
 ;;=^303316
 ;;^UTILITY(U,$J,358.3,16221,0)
 ;;=R41.81^^56^656^35
 ;;^UTILITY(U,$J,358.3,16221,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16221,1,3,0)
 ;;=3^Age-Related Cognitive Decline
 ;;^UTILITY(U,$J,358.3,16221,1,4,0)
 ;;=4^R41.81
 ;;^UTILITY(U,$J,358.3,16221,2)
 ;;=^5019440
 ;;^UTILITY(U,$J,358.3,16222,0)
 ;;=R41.0^^56^656^65
 ;;^UTILITY(U,$J,358.3,16222,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16222,1,3,0)
 ;;=3^Disorientation/Confusion/Delrium,Unspec
 ;;^UTILITY(U,$J,358.3,16222,1,4,0)
 ;;=4^R41.0
 ;;^UTILITY(U,$J,358.3,16222,2)
 ;;=^5019436
 ;;^UTILITY(U,$J,358.3,16223,0)
 ;;=R41.82^^56^656^37
 ;;^UTILITY(U,$J,358.3,16223,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16223,1,3,0)
 ;;=3^Altered Mental Status,Unspec
 ;;^UTILITY(U,$J,358.3,16223,1,4,0)
 ;;=4^R41.82
 ;;^UTILITY(U,$J,358.3,16223,2)
 ;;=^5019441
 ;;^UTILITY(U,$J,358.3,16224,0)
 ;;=R43.0^^56^656^40
 ;;^UTILITY(U,$J,358.3,16224,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16224,1,3,0)
 ;;=3^Anosmia
 ;;^UTILITY(U,$J,358.3,16224,1,4,0)
 ;;=4^R43.0
 ;;^UTILITY(U,$J,358.3,16224,2)
 ;;=^7949
 ;;^UTILITY(U,$J,358.3,16225,0)
 ;;=R43.1^^56^656^136
 ;;^UTILITY(U,$J,358.3,16225,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16225,1,3,0)
 ;;=3^Parosmia
 ;;^UTILITY(U,$J,358.3,16225,1,4,0)
 ;;=4^R43.1
 ;;^UTILITY(U,$J,358.3,16225,2)
 ;;=^5019451
 ;;^UTILITY(U,$J,358.3,16226,0)
 ;;=R43.2^^56^656^133
 ;;^UTILITY(U,$J,358.3,16226,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16226,1,3,0)
 ;;=3^Parageusia
 ;;^UTILITY(U,$J,358.3,16226,1,4,0)
 ;;=4^R43.2
 ;;^UTILITY(U,$J,358.3,16226,2)
 ;;=^5019452
 ;;^UTILITY(U,$J,358.3,16227,0)
 ;;=R43.9^^56^656^154
 ;;^UTILITY(U,$J,358.3,16227,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16227,1,3,0)
 ;;=3^Smell and Taste Disturbances,Unspec
 ;;^UTILITY(U,$J,358.3,16227,1,4,0)
 ;;=4^R43.9
 ;;^UTILITY(U,$J,358.3,16227,2)
 ;;=^5019454
 ;;^UTILITY(U,$J,358.3,16228,0)
 ;;=R44.0^^56^656^47
 ;;^UTILITY(U,$J,358.3,16228,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16228,1,3,0)
 ;;=3^Auditory Hallucinations
 ;;^UTILITY(U,$J,358.3,16228,1,4,0)
 ;;=4^R44.0
 ;;^UTILITY(U,$J,358.3,16228,2)
 ;;=^5019455
 ;;^UTILITY(U,$J,358.3,16229,0)
 ;;=R44.2^^56^656^82
 ;;^UTILITY(U,$J,358.3,16229,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16229,1,3,0)
 ;;=3^Hallucinations NEC
 ;;^UTILITY(U,$J,358.3,16229,1,4,0)
 ;;=4^R44.2
 ;;^UTILITY(U,$J,358.3,16229,2)
 ;;=^5019457
 ;;^UTILITY(U,$J,358.3,16230,0)
 ;;=R44.3^^56^656^83
 ;;^UTILITY(U,$J,358.3,16230,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16230,1,3,0)
 ;;=3^Hallucinations,Unspec
 ;;^UTILITY(U,$J,358.3,16230,1,4,0)
 ;;=4^R44.3
 ;;^UTILITY(U,$J,358.3,16230,2)
 ;;=^5019458
 ;;^UTILITY(U,$J,358.3,16231,0)
 ;;=R45.0^^56^656^125
 ;;^UTILITY(U,$J,358.3,16231,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16231,1,3,0)
 ;;=3^Nervousness
 ;;^UTILITY(U,$J,358.3,16231,1,4,0)
 ;;=4^R45.0
 ;;^UTILITY(U,$J,358.3,16231,2)
 ;;=^5019461
 ;;^UTILITY(U,$J,358.3,16232,0)
 ;;=R47.01^^56^656^43
 ;;^UTILITY(U,$J,358.3,16232,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16232,1,3,0)
 ;;=3^Aphasia
 ;;^UTILITY(U,$J,358.3,16232,1,4,0)
 ;;=4^R47.01
 ;;^UTILITY(U,$J,358.3,16232,2)
 ;;=^5019488
 ;;^UTILITY(U,$J,358.3,16233,0)
 ;;=R47.9^^56^656^156
 ;;^UTILITY(U,$J,358.3,16233,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16233,1,3,0)
 ;;=3^Speech Disturbances,Unspec
 ;;^UTILITY(U,$J,358.3,16233,1,4,0)
 ;;=4^R47.9
 ;;^UTILITY(U,$J,358.3,16233,2)
 ;;=^5019494
 ;;^UTILITY(U,$J,358.3,16234,0)
 ;;=R49.8^^56^656^168
 ;;^UTILITY(U,$J,358.3,16234,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16234,1,3,0)
 ;;=3^Voice and Resonance Disorders NEC
 ;;^UTILITY(U,$J,358.3,16234,1,4,0)
 ;;=4^R49.8
 ;;^UTILITY(U,$J,358.3,16234,2)
 ;;=^5019505
 ;;^UTILITY(U,$J,358.3,16235,0)
 ;;=R53.0^^56^656^119
 ;;^UTILITY(U,$J,358.3,16235,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16235,1,3,0)
 ;;=3^Malig Neop Related Fatigue
 ;;^UTILITY(U,$J,358.3,16235,1,4,0)
 ;;=4^R53.0
 ;;^UTILITY(U,$J,358.3,16235,2)
 ;;=^5019515
 ;;^UTILITY(U,$J,358.3,16236,0)
 ;;=R53.83^^56^656^75
 ;;^UTILITY(U,$J,358.3,16236,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16236,1,3,0)
 ;;=3^Fatigue NEC
 ;;^UTILITY(U,$J,358.3,16236,1,4,0)
 ;;=4^R53.83
 ;;^UTILITY(U,$J,358.3,16236,2)
 ;;=^5019520
 ;;^UTILITY(U,$J,358.3,16237,0)
 ;;=R53.1^^56^656^169
 ;;^UTILITY(U,$J,358.3,16237,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16237,1,3,0)
 ;;=3^Weakness
 ;;^UTILITY(U,$J,358.3,16237,1,4,0)
 ;;=4^R53.1
 ;;^UTILITY(U,$J,358.3,16237,2)
 ;;=^5019516
 ;;^UTILITY(U,$J,358.3,16238,0)
 ;;=R53.81^^56^656^118
 ;;^UTILITY(U,$J,358.3,16238,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16238,1,3,0)
 ;;=3^Malaise NEC
 ;;^UTILITY(U,$J,358.3,16238,1,4,0)
 ;;=4^R53.81
 ;;^UTILITY(U,$J,358.3,16238,2)
 ;;=^5019518
 ;;^UTILITY(U,$J,358.3,16239,0)
 ;;=R53.82^^56^656^53
 ;;^UTILITY(U,$J,358.3,16239,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16239,1,3,0)
 ;;=3^Chronic Fatigue,Unspec
 ;;^UTILITY(U,$J,358.3,16239,1,4,0)
 ;;=4^R53.82
 ;;^UTILITY(U,$J,358.3,16239,2)
 ;;=^5019519
 ;;^UTILITY(U,$J,358.3,16240,0)
 ;;=R54.^^56^656^36
 ;;^UTILITY(U,$J,358.3,16240,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16240,1,3,0)
 ;;=3^Age-Related Physical Debility
 ;;^UTILITY(U,$J,358.3,16240,1,4,0)
 ;;=4^R54.
 ;;^UTILITY(U,$J,358.3,16240,2)
 ;;=^5019521
 ;;^UTILITY(U,$J,358.3,16241,0)
 ;;=R60.0^^56^656^68
 ;;^UTILITY(U,$J,358.3,16241,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16241,1,3,0)
 ;;=3^Edema,Localized
 ;;^UTILITY(U,$J,358.3,16241,1,4,0)
 ;;=4^R60.0
 ;;^UTILITY(U,$J,358.3,16241,2)
 ;;=^5019532
 ;;^UTILITY(U,$J,358.3,16242,0)
 ;;=R60.1^^56^656^67
 ;;^UTILITY(U,$J,358.3,16242,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16242,1,3,0)
 ;;=3^Edema,Generalized
 ;;^UTILITY(U,$J,358.3,16242,1,4,0)
 ;;=4^R60.1
 ;;^UTILITY(U,$J,358.3,16242,2)
 ;;=^5019533
 ;;^UTILITY(U,$J,358.3,16243,0)
 ;;=R60.9^^56^656^69
 ;;^UTILITY(U,$J,358.3,16243,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16243,1,3,0)
 ;;=3^Edema,Unspec
 ;;^UTILITY(U,$J,358.3,16243,1,4,0)
 ;;=4^R60.9
 ;;^UTILITY(U,$J,358.3,16243,2)
 ;;=^5019534
 ;;^UTILITY(U,$J,358.3,16244,0)
 ;;=R61.^^56^656^89
 ;;^UTILITY(U,$J,358.3,16244,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16244,1,3,0)
 ;;=3^Hyperhidrosis,Generalized
 ;;^UTILITY(U,$J,358.3,16244,1,4,0)
 ;;=4^R61.
 ;;^UTILITY(U,$J,358.3,16244,2)
 ;;=^331970
 ;;^UTILITY(U,$J,358.3,16245,0)
 ;;=R63.0^^56^656^39
 ;;^UTILITY(U,$J,358.3,16245,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16245,1,3,0)
 ;;=3^Anorexia
 ;;^UTILITY(U,$J,358.3,16245,1,4,0)
 ;;=4^R63.0
 ;;^UTILITY(U,$J,358.3,16245,2)
 ;;=^7939
 ;;^UTILITY(U,$J,358.3,16246,0)
 ;;=R63.1^^56^656^142
 ;;^UTILITY(U,$J,358.3,16246,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16246,1,3,0)
 ;;=3^Polydipsia
 ;;^UTILITY(U,$J,358.3,16246,1,4,0)
 ;;=4^R63.1
 ;;^UTILITY(U,$J,358.3,16246,2)
 ;;=^186699
 ;;^UTILITY(U,$J,358.3,16247,0)
 ;;=R63.2^^56^656^143
 ;;^UTILITY(U,$J,358.3,16247,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16247,1,3,0)
 ;;=3^Polyphagia
 ;;^UTILITY(U,$J,358.3,16247,1,4,0)
 ;;=4^R63.2
 ;;^UTILITY(U,$J,358.3,16247,2)
 ;;=^5019540
 ;;^UTILITY(U,$J,358.3,16248,0)
 ;;=R63.4^^56^656^32
 ;;^UTILITY(U,$J,358.3,16248,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16248,1,3,0)
 ;;=3^Abnormal Weight Loss
 ;;^UTILITY(U,$J,358.3,16248,1,4,0)
 ;;=4^R63.4
 ;;^UTILITY(U,$J,358.3,16248,2)
 ;;=^5019542
 ;;^UTILITY(U,$J,358.3,16249,0)
 ;;=R63.5^^56^656^31
 ;;^UTILITY(U,$J,358.3,16249,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16249,1,3,0)
 ;;=3^Abnormal Weight Gain
 ;;^UTILITY(U,$J,358.3,16249,1,4,0)
 ;;=4^R63.5
 ;;^UTILITY(U,$J,358.3,16249,2)
 ;;=^5019543
 ;;^UTILITY(U,$J,358.3,16250,0)
 ;;=R64.^^56^656^49
 ;;^UTILITY(U,$J,358.3,16250,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16250,1,3,0)
 ;;=3^Cachexia
 ;;^UTILITY(U,$J,358.3,16250,1,4,0)
 ;;=4^R64.
 ;;^UTILITY(U,$J,358.3,16250,2)
 ;;=^17920
 ;;^UTILITY(U,$J,358.3,16251,0)
 ;;=R68.3^^56^656^54
 ;;^UTILITY(U,$J,358.3,16251,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16251,1,3,0)
 ;;=3^Clubbing of Fingers
 ;;^UTILITY(U,$J,358.3,16251,1,4,0)
 ;;=4^R68.3
 ;;^UTILITY(U,$J,358.3,16251,2)
 ;;=^5019553
 ;;^UTILITY(U,$J,358.3,16252,0)
 ;;=R73.01^^56^656^93
 ;;^UTILITY(U,$J,358.3,16252,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16252,1,3,0)
 ;;=3^Impaired Fasting Glucose
 ;;^UTILITY(U,$J,358.3,16252,1,4,0)
 ;;=4^R73.01
 ;;^UTILITY(U,$J,358.3,16252,2)
 ;;=^5019561
 ;;^UTILITY(U,$J,358.3,16253,0)
 ;;=R73.02^^56^656^94
 ;;^UTILITY(U,$J,358.3,16253,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16253,1,3,0)
 ;;=3^Impaired Glucose Tolerance (oral)
 ;;^UTILITY(U,$J,358.3,16253,1,4,0)
 ;;=4^R73.02
 ;;^UTILITY(U,$J,358.3,16253,2)
 ;;=^5019562
 ;;^UTILITY(U,$J,358.3,16254,0)
 ;;=R73.09^^56^656^18
 ;;^UTILITY(U,$J,358.3,16254,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16254,1,3,0)
 ;;=3^Abnormal Glucose NEC
 ;;^UTILITY(U,$J,358.3,16254,1,4,0)
 ;;=4^R73.09
 ;;^UTILITY(U,$J,358.3,16254,2)
 ;;=^5019563
 ;;^UTILITY(U,$J,358.3,16255,0)
 ;;=R73.9^^56^656^88
 ;;^UTILITY(U,$J,358.3,16255,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16255,1,3,0)
 ;;=3^Hyperglycemia,Unspec
 ;;^UTILITY(U,$J,358.3,16255,1,4,0)
 ;;=4^R73.9
 ;;^UTILITY(U,$J,358.3,16255,2)
 ;;=^5019564
 ;;^UTILITY(U,$J,358.3,16256,0)
 ;;=R76.11^^56^656^146
 ;;^UTILITY(U,$J,358.3,16256,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16256,1,3,0)
 ;;=3^Positive PPD
 ;;^UTILITY(U,$J,358.3,16256,1,4,0)
 ;;=4^R76.11
 ;;^UTILITY(U,$J,358.3,16256,2)
 ;;=^5019570
 ;;^UTILITY(U,$J,358.3,16257,0)
 ;;=R79.1^^56^656^3
 ;;^UTILITY(U,$J,358.3,16257,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16257,1,3,0)
 ;;=3^Abnormal Coagulation Profile
 ;;^UTILITY(U,$J,358.3,16257,1,4,0)
 ;;=4^R79.1
 ;;^UTILITY(U,$J,358.3,16257,2)
 ;;=^5019591
 ;;^UTILITY(U,$J,358.3,16258,0)
 ;;=R82.5^^56^656^73
 ;;^UTILITY(U,$J,358.3,16258,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16258,1,3,0)
 ;;=3^Elevated Urine Levels of Drug/Meds/Biol Subst
 ;;^UTILITY(U,$J,358.3,16258,1,4,0)
 ;;=4^R82.5
 ;;^UTILITY(U,$J,358.3,16258,2)
 ;;=^5019605
 ;;^UTILITY(U,$J,358.3,16259,0)
 ;;=R82.6^^56^656^29
 ;;^UTILITY(U,$J,358.3,16259,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16259,1,3,0)
 ;;=3^Abnormal Urine Levels of Subst of Nonmed Source
 ;;^UTILITY(U,$J,358.3,16259,1,4,0)
 ;;=4^R82.6
 ;;^UTILITY(U,$J,358.3,16259,2)
 ;;=^5019606
 ;;^UTILITY(U,$J,358.3,16260,0)
 ;;=R82.90^^56^656^28
 ;;^UTILITY(U,$J,358.3,16260,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16260,1,3,0)
 ;;=3^Abnormal Urine Findings,Unspec
 ;;^UTILITY(U,$J,358.3,16260,1,4,0)
 ;;=4^R82.90
 ;;^UTILITY(U,$J,358.3,16260,2)
 ;;=^5019609