- IBDEI043 ; ; 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,9845,1,4,0)
- ;;=4^N39.43
- ;;^UTILITY(U,$J,358.3,9845,2)
- ;;=^5015682
- ;;^UTILITY(U,$J,358.3,9846,0)
- ;;=N39.44^^45^443^127
- ;;^UTILITY(U,$J,358.3,9846,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,9846,1,3,0)
- ;;=3^Nocturnal Enuresis
- ;;^UTILITY(U,$J,358.3,9846,1,4,0)
- ;;=4^N39.44
- ;;^UTILITY(U,$J,358.3,9846,2)
- ;;=^5015683
- ;;^UTILITY(U,$J,358.3,9847,0)
- ;;=N39.46^^45^443^123
- ;;^UTILITY(U,$J,358.3,9847,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,9847,1,3,0)
- ;;=3^Mixed Incontinence
- ;;^UTILITY(U,$J,358.3,9847,1,4,0)
- ;;=4^N39.46
- ;;^UTILITY(U,$J,358.3,9847,2)
- ;;=^5015685
- ;;^UTILITY(U,$J,358.3,9848,0)
- ;;=R06.01^^45^443^131
- ;;^UTILITY(U,$J,358.3,9848,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,9848,1,3,0)
- ;;=3^Orthopnea
- ;;^UTILITY(U,$J,358.3,9848,1,4,0)
- ;;=4^R06.01
- ;;^UTILITY(U,$J,358.3,9848,2)
- ;;=^186737
- ;;^UTILITY(U,$J,358.3,9849,0)
- ;;=R06.4^^45^443^90
- ;;^UTILITY(U,$J,358.3,9849,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,9849,1,3,0)
- ;;=3^Hyperventilation
- ;;^UTILITY(U,$J,358.3,9849,1,4,0)
- ;;=4^R06.4
- ;;^UTILITY(U,$J,358.3,9849,2)
- ;;=^5019186
- ;;^UTILITY(U,$J,358.3,9850,0)
- ;;=R06.6^^45^443^86
- ;;^UTILITY(U,$J,358.3,9850,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,9850,1,3,0)
- ;;=3^Hiccough
- ;;^UTILITY(U,$J,358.3,9850,1,4,0)
- ;;=4^R06.6
- ;;^UTILITY(U,$J,358.3,9850,2)
- ;;=^5019188
- ;;^UTILITY(U,$J,358.3,9851,0)
- ;;=R07.0^^45^443^155
- ;;^UTILITY(U,$J,358.3,9851,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,9851,1,3,0)
- ;;=3^Sore Throat
- ;;^UTILITY(U,$J,358.3,9851,1,4,0)
- ;;=4^R07.0
- ;;^UTILITY(U,$J,358.3,9851,2)
- ;;=^5019195
- ;;^UTILITY(U,$J,358.3,9852,0)
- ;;=R07.9^^45^443^50
- ;;^UTILITY(U,$J,358.3,9852,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,9852,1,3,0)
- ;;=3^Chest Pain,Unspec
- ;;^UTILITY(U,$J,358.3,9852,1,4,0)
- ;;=4^R07.9
- ;;^UTILITY(U,$J,358.3,9852,2)
- ;;=^5019201
- ;;^UTILITY(U,$J,358.3,9853,0)
- ;;=R09.01^^45^443^44
- ;;^UTILITY(U,$J,358.3,9853,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,9853,1,3,0)
- ;;=3^Asphyxia
- ;;^UTILITY(U,$J,358.3,9853,1,4,0)
- ;;=4^R09.01
- ;;^UTILITY(U,$J,358.3,9853,2)
- ;;=^11005
- ;;^UTILITY(U,$J,358.3,9854,0)
- ;;=R09.3^^45^443^23
- ;;^UTILITY(U,$J,358.3,9854,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,9854,1,3,0)
- ;;=3^Abnormal Sputum
- ;;^UTILITY(U,$J,358.3,9854,1,4,0)
- ;;=4^R09.3
- ;;^UTILITY(U,$J,358.3,9854,2)
- ;;=^5019202
- ;;^UTILITY(U,$J,358.3,9855,0)
- ;;=R12.^^45^443^84
- ;;^UTILITY(U,$J,358.3,9855,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,9855,1,3,0)
- ;;=3^Heartburn
- ;;^UTILITY(U,$J,358.3,9855,1,4,0)
- ;;=4^R12.
- ;;^UTILITY(U,$J,358.3,9855,2)
- ;;=^5019238
- ;;^UTILITY(U,$J,358.3,9856,0)
- ;;=R14.0^^45^443^1
- ;;^UTILITY(U,$J,358.3,9856,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,9856,1,3,0)
- ;;=3^Abdominal Distension
- ;;^UTILITY(U,$J,358.3,9856,1,4,0)
- ;;=4^R14.0
- ;;^UTILITY(U,$J,358.3,9856,2)
- ;;=^5019240
- ;;^UTILITY(U,$J,358.3,9857,0)
- ;;=R14.1^^45^443^81
- ;;^UTILITY(U,$J,358.3,9857,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,9857,1,3,0)
- ;;=3^Gas Pain
- ;;^UTILITY(U,$J,358.3,9857,1,4,0)
- ;;=4^R14.1
- ;;^UTILITY(U,$J,358.3,9857,2)
- ;;=^5019241
- ;;^UTILITY(U,$J,358.3,9858,0)
- ;;=R14.2^^45^443^74
- ;;^UTILITY(U,$J,358.3,9858,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,9858,1,3,0)
- ;;=3^Eructation
- ;;^UTILITY(U,$J,358.3,9858,1,4,0)
- ;;=4^R14.2
- ;;^UTILITY(U,$J,358.3,9858,2)
- ;;=^5019242
- ;;^UTILITY(U,$J,358.3,9859,0)
- ;;=R14.3^^45^443^78
- ;;^UTILITY(U,$J,358.3,9859,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,9859,1,3,0)
- ;;=3^Flatulence
- ;;^UTILITY(U,$J,358.3,9859,1,4,0)
- ;;=4^R14.3
- ;;^UTILITY(U,$J,358.3,9859,2)
- ;;=^5019243
- ;;^UTILITY(U,$J,358.3,9860,0)
- ;;=R15.9^^45^443^80
- ;;^UTILITY(U,$J,358.3,9860,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,9860,1,3,0)
- ;;=3^Full Incontinence of Feces
- ;;^UTILITY(U,$J,358.3,9860,1,4,0)
- ;;=4^R15.9
- ;;^UTILITY(U,$J,358.3,9860,2)
- ;;=^5019247
- ;;^UTILITY(U,$J,358.3,9861,0)
- ;;=R17.^^45^443^103
- ;;^UTILITY(U,$J,358.3,9861,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,9861,1,3,0)
- ;;=3^Jaundice,Unspec
- ;;^UTILITY(U,$J,358.3,9861,1,4,0)
- ;;=4^R17.
- ;;^UTILITY(U,$J,358.3,9861,2)
- ;;=^5019251
- ;;^UTILITY(U,$J,358.3,9862,0)
- ;;=R19.30^^45^443^2
- ;;^UTILITY(U,$J,358.3,9862,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,9862,1,3,0)
- ;;=3^Abdominal Rigidity,Unspec Site
- ;;^UTILITY(U,$J,358.3,9862,1,4,0)
- ;;=4^R19.30
- ;;^UTILITY(U,$J,358.3,9862,2)
- ;;=^5019266
- ;;^UTILITY(U,$J,358.3,9863,0)
- ;;=R19.4^^45^443^48
- ;;^UTILITY(U,$J,358.3,9863,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,9863,1,3,0)
- ;;=3^Bowel Habit Changes
- ;;^UTILITY(U,$J,358.3,9863,1,4,0)
- ;;=4^R19.4
- ;;^UTILITY(U,$J,358.3,9863,2)
- ;;=^5019273
- ;;^UTILITY(U,$J,358.3,9864,0)
- ;;=R19.8^^45^443^62
- ;;^UTILITY(U,$J,358.3,9864,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,9864,1,3,0)
- ;;=3^Digestive System/Abdomen Symptoms NEC
- ;;^UTILITY(U,$J,358.3,9864,1,4,0)
- ;;=4^R19.8
- ;;^UTILITY(U,$J,358.3,9864,2)
- ;;=^5019277
- ;;^UTILITY(U,$J,358.3,9865,0)
- ;;=R20.0^^45^443^38
- ;;^UTILITY(U,$J,358.3,9865,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,9865,1,3,0)
- ;;=3^Anesthesia of Skin
- ;;^UTILITY(U,$J,358.3,9865,1,4,0)
- ;;=4^R20.0
- ;;^UTILITY(U,$J,358.3,9865,2)
- ;;=^5019278
- ;;^UTILITY(U,$J,358.3,9866,0)
- ;;=R20.1^^45^443^91
- ;;^UTILITY(U,$J,358.3,9866,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,9866,1,3,0)
- ;;=3^Hypoesthesia of Skin
- ;;^UTILITY(U,$J,358.3,9866,1,4,0)
- ;;=4^R20.1
- ;;^UTILITY(U,$J,358.3,9866,2)
- ;;=^5019279
- ;;^UTILITY(U,$J,358.3,9867,0)
- ;;=R20.2^^45^443^135
- ;;^UTILITY(U,$J,358.3,9867,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,9867,1,3,0)
- ;;=3^Paresthesia of Skin
- ;;^UTILITY(U,$J,358.3,9867,1,4,0)
- ;;=4^R20.2
- ;;^UTILITY(U,$J,358.3,9867,2)
- ;;=^5019280
- ;;^UTILITY(U,$J,358.3,9868,0)
- ;;=R20.3^^45^443^87
- ;;^UTILITY(U,$J,358.3,9868,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,9868,1,3,0)
- ;;=3^Hyperesthesia
- ;;^UTILITY(U,$J,358.3,9868,1,4,0)
- ;;=4^R20.3
- ;;^UTILITY(U,$J,358.3,9868,2)
- ;;=^60011
- ;;^UTILITY(U,$J,358.3,9869,0)
- ;;=R21.^^45^443^150
- ;;^UTILITY(U,$J,358.3,9869,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,9869,1,3,0)
- ;;=3^Rash
- ;;^UTILITY(U,$J,358.3,9869,1,4,0)
- ;;=4^R21.
- ;;^UTILITY(U,$J,358.3,9869,2)
- ;;=^5019283
- ;;^UTILITY(U,$J,358.3,9870,0)
- ;;=R22.0^^45^443^109
- ;;^UTILITY(U,$J,358.3,9870,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,9870,1,3,0)
- ;;=3^Localized Swelling/Mass/Lump,Head
- ;;^UTILITY(U,$J,358.3,9870,1,4,0)
- ;;=4^R22.0
- ;;^UTILITY(U,$J,358.3,9870,2)
- ;;=^5019284
- ;;^UTILITY(U,$J,358.3,9871,0)
- ;;=R22.1^^45^443^112
- ;;^UTILITY(U,$J,358.3,9871,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,9871,1,3,0)
- ;;=3^Localized Swelling/Mass/Lump,Neck
- ;;^UTILITY(U,$J,358.3,9871,1,4,0)
- ;;=4^R22.1
- ;;^UTILITY(U,$J,358.3,9871,2)
- ;;=^5019285
- ;;^UTILITY(U,$J,358.3,9872,0)
- ;;=R22.2^^45^443^115
- ;;^UTILITY(U,$J,358.3,9872,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,9872,1,3,0)
- ;;=3^Localized Swelling/Mass/Lump,Trunk
- ;;^UTILITY(U,$J,358.3,9872,1,4,0)
- ;;=4^R22.2
- ;;^UTILITY(U,$J,358.3,9872,2)
- ;;=^5019286
- ;;^UTILITY(U,$J,358.3,9873,0)
- ;;=R22.31^^45^443^114
- ;;^UTILITY(U,$J,358.3,9873,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,9873,1,3,0)
- ;;=3^Localized Swelling/Mass/Lump,Right Upper Limb
- ;;^UTILITY(U,$J,358.3,9873,1,4,0)
- ;;=4^R22.31
- ;;^UTILITY(U,$J,358.3,9873,2)
- ;;=^5019288
- ;;^UTILITY(U,$J,358.3,9874,0)
- ;;=R22.32^^45^443^111
- ;;^UTILITY(U,$J,358.3,9874,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,9874,1,3,0)
- ;;=3^Localized Swelling/Mass/Lump,Left Upper Limb
- ;;^UTILITY(U,$J,358.3,9874,1,4,0)
- ;;=4^R22.32
- ;;^UTILITY(U,$J,358.3,9874,2)
- ;;=^5019289
- ;;^UTILITY(U,$J,358.3,9875,0)
- ;;=R22.33^^45^443^107
- ;;^UTILITY(U,$J,358.3,9875,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,9875,1,3,0)
- ;;=3^Localized Swelling/Mass/Lump,Bilateral Upper Limb
- ;;^UTILITY(U,$J,358.3,9875,1,4,0)
- ;;=4^R22.33
- ;;^UTILITY(U,$J,358.3,9875,2)
- ;;=^5019290
- ;;^UTILITY(U,$J,358.3,9876,0)
- ;;=R22.42^^45^443^110
- ;;^UTILITY(U,$J,358.3,9876,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,9876,1,3,0)
- ;;=3^Localized Swelling/Mass/Lump,Left Lower Limb
- ;;^UTILITY(U,$J,358.3,9876,1,4,0)
- ;;=4^R22.42
- ;;^UTILITY(U,$J,358.3,9876,2)
- ;;=^5134179
- ;;^UTILITY(U,$J,358.3,9877,0)
- ;;=R22.41^^45^443^113
- ;;^UTILITY(U,$J,358.3,9877,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,9877,1,3,0)
- ;;=3^Localized Swelling/Mass/Lump,Right Lower Limb
- ;;^UTILITY(U,$J,358.3,9877,1,4,0)
- ;;=4^R22.41
- ;;^UTILITY(U,$J,358.3,9877,2)
- ;;=^5134178
- ;;^UTILITY(U,$J,358.3,9878,0)
- ;;=R22.43^^45^443^108
- ;;^UTILITY(U,$J,358.3,9878,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,9878,1,3,0)
- ;;=3^Localized Swelling/Mass/Lump,Bilateral Lower Limb
- ;;^UTILITY(U,$J,358.3,9878,1,4,0)
- ;;=4^R22.43
- ;;^UTILITY(U,$J,358.3,9878,2)
- ;;=^5019291
- ;;^UTILITY(U,$J,358.3,9879,0)
- ;;=R22.9^^45^443^116
- ;;^UTILITY(U,$J,358.3,9879,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,9879,1,3,0)
- ;;=3^Localized Swelling/Mass/Lump,Unspec
- ;;^UTILITY(U,$J,358.3,9879,1,4,0)
- ;;=4^R22.9
- ;;^UTILITY(U,$J,358.3,9879,2)
- ;;=^5019292
- ;;^UTILITY(U,$J,358.3,9880,0)
- ;;=R23.0^^45^443^60
- ;;^UTILITY(U,$J,358.3,9880,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,9880,1,3,0)
- ;;=3^Cyanosis
- ;;^UTILITY(U,$J,358.3,9880,1,4,0)
- ;;=4^R23.0
- ;;^UTILITY(U,$J,358.3,9880,2)
- ;;=^5019293
- ;;^UTILITY(U,$J,358.3,9881,0)
- ;;=R23.1^^45^443^132
- ;;^UTILITY(U,$J,358.3,9881,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,9881,1,3,0)
- ;;=3^Pallor
- ;;^UTILITY(U,$J,358.3,9881,1,4,0)
- ;;=4^R23.1
- ;;^UTILITY(U,$J,358.3,9881,2)
- ;;=^5019294
- ;;^UTILITY(U,$J,358.3,9882,0)
- ;;=R23.2^^45^443^79
- ;;^UTILITY(U,$J,358.3,9882,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,9882,1,3,0)
- ;;=3^Flushing
- ;;^UTILITY(U,$J,358.3,9882,1,4,0)
- ;;=4^R23.2
- ;;^UTILITY(U,$J,358.3,9882,2)
- ;;=^47184
- ;;^UTILITY(U,$J,358.3,9883,0)
- ;;=R23.4^^45^443^153
- ;;^UTILITY(U,$J,358.3,9883,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,9883,1,3,0)
- ;;=3^Skin Texture Changes
- ;;^UTILITY(U,$J,358.3,9883,1,4,0)
- ;;=4^R23.4
- ;;^UTILITY(U,$J,358.3,9883,2)
- ;;=^5019296
- ;;^UTILITY(U,$J,358.3,9884,0)
- ;;=R26.0^^45^443^46
- ;;^UTILITY(U,$J,358.3,9884,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,9884,1,3,0)
- ;;=3^Ataxic Gait
- ;;^UTILITY(U,$J,358.3,9884,1,4,0)
- ;;=4^R26.0
- ;;^UTILITY(U,$J,358.3,9884,2)
- ;;=^5019304
- ;;^UTILITY(U,$J,358.3,9885,0)
- ;;=R26.1^^45^443^134
- ;;^UTILITY(U,$J,358.3,9885,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,9885,1,3,0)
- ;;=3^Paralytic Gait
- ;;^UTILITY(U,$J,358.3,9885,1,4,0)
- ;;=4^R26.1
- ;;^UTILITY(U,$J,358.3,9885,2)
- ;;=^5019305
- ;;^UTILITY(U,$J,358.3,9886,0)
- ;;=R26.81^^45^443^162
- ;;^UTILITY(U,$J,358.3,9886,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,9886,1,3,0)
- ;;=3^Unsteadiness on Feet
- ;;^UTILITY(U,$J,358.3,9886,1,4,0)
- ;;=4^R26.81
- ;;^UTILITY(U,$J,358.3,9886,2)
- ;;=^5019307
- ;;^UTILITY(U,$J,358.3,9887,0)
- ;;=R26.89^^45^443^33
- ;;^UTILITY(U,$J,358.3,9887,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,9887,1,3,0)
- ;;=3^Abnormalities of Gait and Mobility NEC
- ;;^UTILITY(U,$J,358.3,9887,1,4,0)
- ;;=4^R26.89
- ;;^UTILITY(U,$J,358.3,9887,2)
- ;;=^5019308
- ;;^UTILITY(U,$J,358.3,9888,0)
- ;;=R26.9^^45^443^34
- ;;^UTILITY(U,$J,358.3,9888,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,9888,1,3,0)
- ;;=3^Abnormalities of Gait and Mobility,Unspec
- ;;^UTILITY(U,$J,358.3,9888,1,4,0)
- ;;=4^R26.9
- ;;^UTILITY(U,$J,358.3,9888,2)
- ;;=^5019309
- ;;^UTILITY(U,$J,358.3,9889,0)
- ;;=R27.0^^45^443^45
- ;;^UTILITY(U,$J,358.3,9889,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,9889,1,3,0)
- ;;=3^Ataxia,Unspec
- ;;^UTILITY(U,$J,358.3,9889,1,4,0)
- ;;=4^R27.0
- ;;^UTILITY(U,$J,358.3,9889,2)
- ;;=^5019310
- ;;^UTILITY(U,$J,358.3,9890,0)
- ;;=R27.8^^45^443^104
- ;;^UTILITY(U,$J,358.3,9890,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,9890,1,3,0)
- ;;=3^Lack of Coordination NEC
- ;;^UTILITY(U,$J,358.3,9890,1,4,0)
- ;;=4^R27.8
- ;;^UTILITY(U,$J,358.3,9890,2)
- ;;=^5019311
- ;;^UTILITY(U,$J,358.3,9891,0)
- ;;=R27.9^^45^443^105
- ;;^UTILITY(U,$J,358.3,9891,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,9891,1,3,0)
- ;;=3^Lack of Coordination,Unspec
- ;;^UTILITY(U,$J,358.3,9891,1,4,0)
- ;;=4^R27.9
- ;;^UTILITY(U,$J,358.3,9891,2)
- ;;=^5019312
- ;;^UTILITY(U,$J,358.3,9892,0)
- ;;=R29.0^^45^443^159
- ;;^UTILITY(U,$J,358.3,9892,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,9892,1,3,0)
- ;;=3^Tetany
- ;;^UTILITY(U,$J,358.3,9892,1,4,0)
- ;;=4^R29.0
- ;;^UTILITY(U,$J,358.3,9892,2)
- ;;=^118032
- ;;^UTILITY(U,$J,358.3,9893,0)
- ;;=R29.1^^45^443^122
- ;;^UTILITY(U,$J,358.3,9893,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,9893,1,3,0)
- ;;=3^Meningismus
- ;;^UTILITY(U,$J,358.3,9893,1,4,0)
- ;;=4^R29.1
- ;;^UTILITY(U,$J,358.3,9893,2)
- ;;=^5019313
- ;;^UTILITY(U,$J,358.3,9894,0)
- ;;=R29.5^^45^443^161
- ;;^UTILITY(U,$J,358.3,9894,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,9894,1,3,0)
- ;;=3^Transient Paralysis
- ;;^UTILITY(U,$J,358.3,9894,1,4,0)
- ;;=4^R29.5
- ;;^UTILITY(U,$J,358.3,9894,2)
- ;;=^5019316
- ;;^UTILITY(U,$J,358.3,9895,0)
- ;;=R34.^^45^443^42
- ;;^UTILITY(U,$J,358.3,9895,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,9895,1,3,0)
- ;;=3^Anuria and Oliguria
- ;;^UTILITY(U,$J,358.3,9895,1,4,0)
- ;;=4^R34.
- ;;^UTILITY(U,$J,358.3,9895,2)
- ;;=^5019333
- ;;^UTILITY(U,$J,358.3,9896,0)
- ;;=R39.12^^45^443^145
- ;;^UTILITY(U,$J,358.3,9896,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,9896,1,3,0)
- ;;=3^Poor Urinary Stream
- ;;^UTILITY(U,$J,358.3,9896,1,4,0)
- ;;=4^R39.12
- ;;^UTILITY(U,$J,358.3,9896,2)
- ;;=^5019342
- ;;^UTILITY(U,$J,358.3,9897,0)
- ;;=R39.14^^45^443^77
- ;;^UTILITY(U,$J,358.3,9897,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,9897,1,3,0)
- ;;=3^Feeling of Incomplete Bladder Emptying
- ;;^UTILITY(U,$J,358.3,9897,1,4,0)
- ;;=4^R39.14
- ;;^UTILITY(U,$J,358.3,9897,2)
- ;;=^5019344
- ;;^UTILITY(U,$J,358.3,9898,0)
- ;;=R41.4^^45^443^126
- ;;^UTILITY(U,$J,358.3,9898,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,9898,1,3,0)
- ;;=3^Neurologic Neglect Syndrome
- ;;^UTILITY(U,$J,358.3,9898,1,4,0)
- ;;=4^R41.4
- ;;^UTILITY(U,$J,358.3,9898,2)
- ;;=^303316
- ;;^UTILITY(U,$J,358.3,9899,0)
- ;;=R41.81^^45^443^35
- ;;^UTILITY(U,$J,358.3,9899,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,9899,1,3,0)
- ;;=3^Age-Related Cognitive Decline
- ;;^UTILITY(U,$J,358.3,9899,1,4,0)
- ;;=4^R41.81
- ;;^UTILITY(U,$J,358.3,9899,2)
- ;;=^5019440
- ;;^UTILITY(U,$J,358.3,9900,0)
- ;;=R41.0^^45^443^65
- ;;^UTILITY(U,$J,358.3,9900,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,9900,1,3,0)
- ;;=3^Disorientation/Confusion/Delrium,Unspec
- ;;^UTILITY(U,$J,358.3,9900,1,4,0)
- ;;=4^R41.0
- ;;^UTILITY(U,$J,358.3,9900,2)
- ;;=^5019436
- ;;^UTILITY(U,$J,358.3,9901,0)
- ;;=R41.82^^45^443^37
- ;;^UTILITY(U,$J,358.3,9901,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,9901,1,3,0)
- ;;=3^Altered Mental Status,Unspec
- ;;^UTILITY(U,$J,358.3,9901,1,4,0)
- ;;=4^R41.82
- ;;^UTILITY(U,$J,358.3,9901,2)
- ;;=^5019441
- ;;^UTILITY(U,$J,358.3,9902,0)
- ;;=R43.0^^45^443^40
- ;;^UTILITY(U,$J,358.3,9902,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,9902,1,3,0)
- ;;=3^Anosmia
- ;;^UTILITY(U,$J,358.3,9902,1,4,0)
- ;;=4^R43.0
- ;;^UTILITY(U,$J,358.3,9902,2)
- ;;=^7949
- ;;^UTILITY(U,$J,358.3,9903,0)
- ;;=R43.1^^45^443^136
- ;;^UTILITY(U,$J,358.3,9903,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,9903,1,3,0)
- ;;=3^Parosmia
- ;;^UTILITY(U,$J,358.3,9903,1,4,0)
- ;;=4^R43.1
- ;;^UTILITY(U,$J,358.3,9903,2)
- ;;=^5019451
- ;;^UTILITY(U,$J,358.3,9904,0)
- ;;=R43.2^^45^443^133
- ;;^UTILITY(U,$J,358.3,9904,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,9904,1,3,0)
- ;;=3^Parageusia
- ;;^UTILITY(U,$J,358.3,9904,1,4,0)
- ;;=4^R43.2
- ;;^UTILITY(U,$J,358.3,9904,2)
- ;;=^5019452
- ;;^UTILITY(U,$J,358.3,9905,0)
- ;;=R43.9^^45^443^154
- ;;^UTILITY(U,$J,358.3,9905,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,9905,1,3,0)
- ;;=3^Smell and Taste Disturbances,Unspec
- ;;^UTILITY(U,$J,358.3,9905,1,4,0)
- ;;=4^R43.9
- ;;^UTILITY(U,$J,358.3,9905,2)
- ;;=^5019454
- ;;^UTILITY(U,$J,358.3,9906,0)
- ;;=R44.0^^45^443^47
- ;;^UTILITY(U,$J,358.3,9906,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,9906,1,3,0)
- ;;=3^Auditory Hallucinations
- ;;^UTILITY(U,$J,358.3,9906,1,4,0)
- ;;=4^R44.0
- ;;^UTILITY(U,$J,358.3,9906,2)
- ;;=^5019455
- ;;^UTILITY(U,$J,358.3,9907,0)
- ;;=R44.2^^45^443^82
- ;;^UTILITY(U,$J,358.3,9907,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,9907,1,3,0)
- ;;=3^Hallucinations NEC
- ;;^UTILITY(U,$J,358.3,9907,1,4,0)
- ;;=4^R44.2
- ;;^UTILITY(U,$J,358.3,9907,2)
- ;;=^5019457
- ;;^UTILITY(U,$J,358.3,9908,0)
- ;;=R44.3^^45^443^83
- ;;^UTILITY(U,$J,358.3,9908,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,9908,1,3,0)
- ;;=3^Hallucinations,Unspec
- ;;^UTILITY(U,$J,358.3,9908,1,4,0)
- ;;=4^R44.3
- ;;^UTILITY(U,$J,358.3,9908,2)
- ;;=^5019458
- ;;^UTILITY(U,$J,358.3,9909,0)
- ;;=R45.0^^45^443^125
- ;;^UTILITY(U,$J,358.3,9909,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,9909,1,3,0)
- ;;=3^Nervousness
- ;;^UTILITY(U,$J,358.3,9909,1,4,0)
- ;;=4^R45.0
- ;;^UTILITY(U,$J,358.3,9909,2)
- ;;=^5019461
- ;;^UTILITY(U,$J,358.3,9910,0)
- ;;=R47.01^^45^443^43
- ;;^UTILITY(U,$J,358.3,9910,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,9910,1,3,0)
- ;;=3^Aphasia
- ;;^UTILITY(U,$J,358.3,9910,1,4,0)
- ;;=4^R47.01
- ;;^UTILITY(U,$J,358.3,9910,2)
- ;;=^5019488
- ;;^UTILITY(U,$J,358.3,9911,0)
- ;;=R47.9^^45^443^156
- ;;^UTILITY(U,$J,358.3,9911,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,9911,1,3,0)
- ;;=3^Speech Disturbances,Unspec
- ;;^UTILITY(U,$J,358.3,9911,1,4,0)
- ;;=4^R47.9
- ;;^UTILITY(U,$J,358.3,9911,2)
- ;;=^5019494
- ;;^UTILITY(U,$J,358.3,9912,0)
- ;;=R49.8^^45^443^168
- ;;^UTILITY(U,$J,358.3,9912,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,9912,1,3,0)
- ;;=3^Voice and Resonance Disorders NEC
- ;;^UTILITY(U,$J,358.3,9912,1,4,0)
- ;;=4^R49.8
- ;;^UTILITY(U,$J,358.3,9912,2)
- ;;=^5019505
- ;;^UTILITY(U,$J,358.3,9913,0)
- ;;=R53.0^^45^443^119
- ;;^UTILITY(U,$J,358.3,9913,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,9913,1,3,0)
- ;;=3^Malig Neop Related Fatigue
- ;;^UTILITY(U,$J,358.3,9913,1,4,0)
- ;;=4^R53.0
- ;;^UTILITY(U,$J,358.3,9913,2)
- ;;=^5019515
- ;;^UTILITY(U,$J,358.3,9914,0)
- ;;=R53.83^^45^443^75
- ;;^UTILITY(U,$J,358.3,9914,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,9914,1,3,0)
- ;;=3^Fatigue NEC
- ;;^UTILITY(U,$J,358.3,9914,1,4,0)
- ;;=4^R53.83
- ;;^UTILITY(U,$J,358.3,9914,2)
- ;;=^5019520
- ;;^UTILITY(U,$J,358.3,9915,0)
- ;;=R53.1^^45^443^169
- ;;^UTILITY(U,$J,358.3,9915,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,9915,1,3,0)
- ;;=3^Weakness
- ;;^UTILITY(U,$J,358.3,9915,1,4,0)
- ;;=4^R53.1
- ;;^UTILITY(U,$J,358.3,9915,2)
- ;;=^5019516
- ;;^UTILITY(U,$J,358.3,9916,0)
- ;;=R53.81^^45^443^118
- ;;^UTILITY(U,$J,358.3,9916,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,9916,1,3,0)
- ;;=3^Malaise NEC
- ;;^UTILITY(U,$J,358.3,9916,1,4,0)
- ;;=4^R53.81
- ;;^UTILITY(U,$J,358.3,9916,2)
- ;;=^5019518
- ;;^UTILITY(U,$J,358.3,9917,0)
- ;;=R53.82^^45^443^53
- ;;^UTILITY(U,$J,358.3,9917,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,9917,1,3,0)
- ;;=3^Chronic Fatigue,Unspec
- ;;^UTILITY(U,$J,358.3,9917,1,4,0)
- ;;=4^R53.82
- ;;^UTILITY(U,$J,358.3,9917,2)
- ;;=^5019519
- ;;^UTILITY(U,$J,358.3,9918,0)
- ;;=R54.^^45^443^36
- ;;^UTILITY(U,$J,358.3,9918,1,0)
- ;;=^358.31IA^4^2
- --- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HIBDEI043 19758 printed Jan 18, 2025@02:42:28 Page 2
- IBDEI043 ; ; 01-AUG-2022
- +1 ;;3.0;IB ENCOUNTER FORM IMP/EXP;;AUG 01, 2022
- +2 if 'DIFQR(358.3)
- QUIT
- FOR I=1:2
- SET X=$TEXT(Q+I)
- if X=""
- QUIT
- SET Y=$EXTRACT($TEXT(Q+I+1),4,999)
- SET X=$EXTRACT(X,4,999)
- if $ASCII(Y)=126
- SET I=I+1
- SET Y=$EXTRACT(Y,2,999)_$EXTRACT($TEXT(Q+I+1),5,999)
- if $ASCII(Y)=61
- SET Y=$EXTRACT(Y,2,999)
- XECUTE NO
- IF '$TEST
- SET @X=Y
- Q QUIT
- +1 ;;^UTILITY(U,$J,358.3,9845,1,4,0)
- +2 ;;=4^N39.43
- +3 ;;^UTILITY(U,$J,358.3,9845,2)
- +4 ;;=^5015682
- +5 ;;^UTILITY(U,$J,358.3,9846,0)
- +6 ;;=N39.44^^45^443^127
- +7 ;;^UTILITY(U,$J,358.3,9846,1,0)
- +8 ;;=^358.31IA^4^2
- +9 ;;^UTILITY(U,$J,358.3,9846,1,3,0)
- +10 ;;=3^Nocturnal Enuresis
- +11 ;;^UTILITY(U,$J,358.3,9846,1,4,0)
- +12 ;;=4^N39.44
- +13 ;;^UTILITY(U,$J,358.3,9846,2)
- +14 ;;=^5015683
- +15 ;;^UTILITY(U,$J,358.3,9847,0)
- +16 ;;=N39.46^^45^443^123
- +17 ;;^UTILITY(U,$J,358.3,9847,1,0)
- +18 ;;=^358.31IA^4^2
- +19 ;;^UTILITY(U,$J,358.3,9847,1,3,0)
- +20 ;;=3^Mixed Incontinence
- +21 ;;^UTILITY(U,$J,358.3,9847,1,4,0)
- +22 ;;=4^N39.46
- +23 ;;^UTILITY(U,$J,358.3,9847,2)
- +24 ;;=^5015685
- +25 ;;^UTILITY(U,$J,358.3,9848,0)
- +26 ;;=R06.01^^45^443^131
- +27 ;;^UTILITY(U,$J,358.3,9848,1,0)
- +28 ;;=^358.31IA^4^2
- +29 ;;^UTILITY(U,$J,358.3,9848,1,3,0)
- +30 ;;=3^Orthopnea
- +31 ;;^UTILITY(U,$J,358.3,9848,1,4,0)
- +32 ;;=4^R06.01
- +33 ;;^UTILITY(U,$J,358.3,9848,2)
- +34 ;;=^186737
- +35 ;;^UTILITY(U,$J,358.3,9849,0)
- +36 ;;=R06.4^^45^443^90
- +37 ;;^UTILITY(U,$J,358.3,9849,1,0)
- +38 ;;=^358.31IA^4^2
- +39 ;;^UTILITY(U,$J,358.3,9849,1,3,0)
- +40 ;;=3^Hyperventilation
- +41 ;;^UTILITY(U,$J,358.3,9849,1,4,0)
- +42 ;;=4^R06.4
- +43 ;;^UTILITY(U,$J,358.3,9849,2)
- +44 ;;=^5019186
- +45 ;;^UTILITY(U,$J,358.3,9850,0)
- +46 ;;=R06.6^^45^443^86
- +47 ;;^UTILITY(U,$J,358.3,9850,1,0)
- +48 ;;=^358.31IA^4^2
- +49 ;;^UTILITY(U,$J,358.3,9850,1,3,0)
- +50 ;;=3^Hiccough
- +51 ;;^UTILITY(U,$J,358.3,9850,1,4,0)
- +52 ;;=4^R06.6
- +53 ;;^UTILITY(U,$J,358.3,9850,2)
- +54 ;;=^5019188
- +55 ;;^UTILITY(U,$J,358.3,9851,0)
- +56 ;;=R07.0^^45^443^155
- +57 ;;^UTILITY(U,$J,358.3,9851,1,0)
- +58 ;;=^358.31IA^4^2
- +59 ;;^UTILITY(U,$J,358.3,9851,1,3,0)
- +60 ;;=3^Sore Throat
- +61 ;;^UTILITY(U,$J,358.3,9851,1,4,0)
- +62 ;;=4^R07.0
- +63 ;;^UTILITY(U,$J,358.3,9851,2)
- +64 ;;=^5019195
- +65 ;;^UTILITY(U,$J,358.3,9852,0)
- +66 ;;=R07.9^^45^443^50
- +67 ;;^UTILITY(U,$J,358.3,9852,1,0)
- +68 ;;=^358.31IA^4^2
- +69 ;;^UTILITY(U,$J,358.3,9852,1,3,0)
- +70 ;;=3^Chest Pain,Unspec
- +71 ;;^UTILITY(U,$J,358.3,9852,1,4,0)
- +72 ;;=4^R07.9
- +73 ;;^UTILITY(U,$J,358.3,9852,2)
- +74 ;;=^5019201
- +75 ;;^UTILITY(U,$J,358.3,9853,0)
- +76 ;;=R09.01^^45^443^44
- +77 ;;^UTILITY(U,$J,358.3,9853,1,0)
- +78 ;;=^358.31IA^4^2
- +79 ;;^UTILITY(U,$J,358.3,9853,1,3,0)
- +80 ;;=3^Asphyxia
- +81 ;;^UTILITY(U,$J,358.3,9853,1,4,0)
- +82 ;;=4^R09.01
- +83 ;;^UTILITY(U,$J,358.3,9853,2)
- +84 ;;=^11005
- +85 ;;^UTILITY(U,$J,358.3,9854,0)
- +86 ;;=R09.3^^45^443^23
- +87 ;;^UTILITY(U,$J,358.3,9854,1,0)
- +88 ;;=^358.31IA^4^2
- +89 ;;^UTILITY(U,$J,358.3,9854,1,3,0)
- +90 ;;=3^Abnormal Sputum
- +91 ;;^UTILITY(U,$J,358.3,9854,1,4,0)
- +92 ;;=4^R09.3
- +93 ;;^UTILITY(U,$J,358.3,9854,2)
- +94 ;;=^5019202
- +95 ;;^UTILITY(U,$J,358.3,9855,0)
- +96 ;;=R12.^^45^443^84
- +97 ;;^UTILITY(U,$J,358.3,9855,1,0)
- +98 ;;=^358.31IA^4^2
- +99 ;;^UTILITY(U,$J,358.3,9855,1,3,0)
- +100 ;;=3^Heartburn
- +101 ;;^UTILITY(U,$J,358.3,9855,1,4,0)
- +102 ;;=4^R12.
- +103 ;;^UTILITY(U,$J,358.3,9855,2)
- +104 ;;=^5019238
- +105 ;;^UTILITY(U,$J,358.3,9856,0)
- +106 ;;=R14.0^^45^443^1
- +107 ;;^UTILITY(U,$J,358.3,9856,1,0)
- +108 ;;=^358.31IA^4^2
- +109 ;;^UTILITY(U,$J,358.3,9856,1,3,0)
- +110 ;;=3^Abdominal Distension
- +111 ;;^UTILITY(U,$J,358.3,9856,1,4,0)
- +112 ;;=4^R14.0
- +113 ;;^UTILITY(U,$J,358.3,9856,2)
- +114 ;;=^5019240
- +115 ;;^UTILITY(U,$J,358.3,9857,0)
- +116 ;;=R14.1^^45^443^81
- +117 ;;^UTILITY(U,$J,358.3,9857,1,0)
- +118 ;;=^358.31IA^4^2
- +119 ;;^UTILITY(U,$J,358.3,9857,1,3,0)
- +120 ;;=3^Gas Pain
- +121 ;;^UTILITY(U,$J,358.3,9857,1,4,0)
- +122 ;;=4^R14.1
- +123 ;;^UTILITY(U,$J,358.3,9857,2)
- +124 ;;=^5019241
- +125 ;;^UTILITY(U,$J,358.3,9858,0)
- +126 ;;=R14.2^^45^443^74
- +127 ;;^UTILITY(U,$J,358.3,9858,1,0)
- +128 ;;=^358.31IA^4^2
- +129 ;;^UTILITY(U,$J,358.3,9858,1,3,0)
- +130 ;;=3^Eructation
- +131 ;;^UTILITY(U,$J,358.3,9858,1,4,0)
- +132 ;;=4^R14.2
- +133 ;;^UTILITY(U,$J,358.3,9858,2)
- +134 ;;=^5019242
- +135 ;;^UTILITY(U,$J,358.3,9859,0)
- +136 ;;=R14.3^^45^443^78
- +137 ;;^UTILITY(U,$J,358.3,9859,1,0)
- +138 ;;=^358.31IA^4^2
- +139 ;;^UTILITY(U,$J,358.3,9859,1,3,0)
- +140 ;;=3^Flatulence
- +141 ;;^UTILITY(U,$J,358.3,9859,1,4,0)
- +142 ;;=4^R14.3
- +143 ;;^UTILITY(U,$J,358.3,9859,2)
- +144 ;;=^5019243
- +145 ;;^UTILITY(U,$J,358.3,9860,0)
- +146 ;;=R15.9^^45^443^80
- +147 ;;^UTILITY(U,$J,358.3,9860,1,0)
- +148 ;;=^358.31IA^4^2
- +149 ;;^UTILITY(U,$J,358.3,9860,1,3,0)
- +150 ;;=3^Full Incontinence of Feces
- +151 ;;^UTILITY(U,$J,358.3,9860,1,4,0)
- +152 ;;=4^R15.9
- +153 ;;^UTILITY(U,$J,358.3,9860,2)
- +154 ;;=^5019247
- +155 ;;^UTILITY(U,$J,358.3,9861,0)
- +156 ;;=R17.^^45^443^103
- +157 ;;^UTILITY(U,$J,358.3,9861,1,0)
- +158 ;;=^358.31IA^4^2
- +159 ;;^UTILITY(U,$J,358.3,9861,1,3,0)
- +160 ;;=3^Jaundice,Unspec
- +161 ;;^UTILITY(U,$J,358.3,9861,1,4,0)
- +162 ;;=4^R17.
- +163 ;;^UTILITY(U,$J,358.3,9861,2)
- +164 ;;=^5019251
- +165 ;;^UTILITY(U,$J,358.3,9862,0)
- +166 ;;=R19.30^^45^443^2
- +167 ;;^UTILITY(U,$J,358.3,9862,1,0)
- +168 ;;=^358.31IA^4^2
- +169 ;;^UTILITY(U,$J,358.3,9862,1,3,0)
- +170 ;;=3^Abdominal Rigidity,Unspec Site
- +171 ;;^UTILITY(U,$J,358.3,9862,1,4,0)
- +172 ;;=4^R19.30
- +173 ;;^UTILITY(U,$J,358.3,9862,2)
- +174 ;;=^5019266
- +175 ;;^UTILITY(U,$J,358.3,9863,0)
- +176 ;;=R19.4^^45^443^48
- +177 ;;^UTILITY(U,$J,358.3,9863,1,0)
- +178 ;;=^358.31IA^4^2
- +179 ;;^UTILITY(U,$J,358.3,9863,1,3,0)
- +180 ;;=3^Bowel Habit Changes
- +181 ;;^UTILITY(U,$J,358.3,9863,1,4,0)
- +182 ;;=4^R19.4
- +183 ;;^UTILITY(U,$J,358.3,9863,2)
- +184 ;;=^5019273
- +185 ;;^UTILITY(U,$J,358.3,9864,0)
- +186 ;;=R19.8^^45^443^62
- +187 ;;^UTILITY(U,$J,358.3,9864,1,0)
- +188 ;;=^358.31IA^4^2
- +189 ;;^UTILITY(U,$J,358.3,9864,1,3,0)
- +190 ;;=3^Digestive System/Abdomen Symptoms NEC
- +191 ;;^UTILITY(U,$J,358.3,9864,1,4,0)
- +192 ;;=4^R19.8
- +193 ;;^UTILITY(U,$J,358.3,9864,2)
- +194 ;;=^5019277
- +195 ;;^UTILITY(U,$J,358.3,9865,0)
- +196 ;;=R20.0^^45^443^38
- +197 ;;^UTILITY(U,$J,358.3,9865,1,0)
- +198 ;;=^358.31IA^4^2
- +199 ;;^UTILITY(U,$J,358.3,9865,1,3,0)
- +200 ;;=3^Anesthesia of Skin
- +201 ;;^UTILITY(U,$J,358.3,9865,1,4,0)
- +202 ;;=4^R20.0
- +203 ;;^UTILITY(U,$J,358.3,9865,2)
- +204 ;;=^5019278
- +205 ;;^UTILITY(U,$J,358.3,9866,0)
- +206 ;;=R20.1^^45^443^91
- +207 ;;^UTILITY(U,$J,358.3,9866,1,0)
- +208 ;;=^358.31IA^4^2
- +209 ;;^UTILITY(U,$J,358.3,9866,1,3,0)
- +210 ;;=3^Hypoesthesia of Skin
- +211 ;;^UTILITY(U,$J,358.3,9866,1,4,0)
- +212 ;;=4^R20.1
- +213 ;;^UTILITY(U,$J,358.3,9866,2)
- +214 ;;=^5019279
- +215 ;;^UTILITY(U,$J,358.3,9867,0)
- +216 ;;=R20.2^^45^443^135
- +217 ;;^UTILITY(U,$J,358.3,9867,1,0)
- +218 ;;=^358.31IA^4^2
- +219 ;;^UTILITY(U,$J,358.3,9867,1,3,0)
- +220 ;;=3^Paresthesia of Skin
- +221 ;;^UTILITY(U,$J,358.3,9867,1,4,0)
- +222 ;;=4^R20.2
- +223 ;;^UTILITY(U,$J,358.3,9867,2)
- +224 ;;=^5019280
- +225 ;;^UTILITY(U,$J,358.3,9868,0)
- +226 ;;=R20.3^^45^443^87
- +227 ;;^UTILITY(U,$J,358.3,9868,1,0)
- +228 ;;=^358.31IA^4^2
- +229 ;;^UTILITY(U,$J,358.3,9868,1,3,0)
- +230 ;;=3^Hyperesthesia
- +231 ;;^UTILITY(U,$J,358.3,9868,1,4,0)
- +232 ;;=4^R20.3
- +233 ;;^UTILITY(U,$J,358.3,9868,2)
- +234 ;;=^60011
- +235 ;;^UTILITY(U,$J,358.3,9869,0)
- +236 ;;=R21.^^45^443^150
- +237 ;;^UTILITY(U,$J,358.3,9869,1,0)
- +238 ;;=^358.31IA^4^2
- +239 ;;^UTILITY(U,$J,358.3,9869,1,3,0)
- +240 ;;=3^Rash
- +241 ;;^UTILITY(U,$J,358.3,9869,1,4,0)
- +242 ;;=4^R21.
- +243 ;;^UTILITY(U,$J,358.3,9869,2)
- +244 ;;=^5019283
- +245 ;;^UTILITY(U,$J,358.3,9870,0)
- +246 ;;=R22.0^^45^443^109
- +247 ;;^UTILITY(U,$J,358.3,9870,1,0)
- +248 ;;=^358.31IA^4^2
- +249 ;;^UTILITY(U,$J,358.3,9870,1,3,0)
- +250 ;;=3^Localized Swelling/Mass/Lump,Head
- +251 ;;^UTILITY(U,$J,358.3,9870,1,4,0)
- +252 ;;=4^R22.0
- +253 ;;^UTILITY(U,$J,358.3,9870,2)
- +254 ;;=^5019284
- +255 ;;^UTILITY(U,$J,358.3,9871,0)
- +256 ;;=R22.1^^45^443^112
- +257 ;;^UTILITY(U,$J,358.3,9871,1,0)
- +258 ;;=^358.31IA^4^2
- +259 ;;^UTILITY(U,$J,358.3,9871,1,3,0)
- +260 ;;=3^Localized Swelling/Mass/Lump,Neck
- +261 ;;^UTILITY(U,$J,358.3,9871,1,4,0)
- +262 ;;=4^R22.1
- +263 ;;^UTILITY(U,$J,358.3,9871,2)
- +264 ;;=^5019285
- +265 ;;^UTILITY(U,$J,358.3,9872,0)
- +266 ;;=R22.2^^45^443^115
- +267 ;;^UTILITY(U,$J,358.3,9872,1,0)
- +268 ;;=^358.31IA^4^2
- +269 ;;^UTILITY(U,$J,358.3,9872,1,3,0)
- +270 ;;=3^Localized Swelling/Mass/Lump,Trunk
- +271 ;;^UTILITY(U,$J,358.3,9872,1,4,0)
- +272 ;;=4^R22.2
- +273 ;;^UTILITY(U,$J,358.3,9872,2)
- +274 ;;=^5019286
- +275 ;;^UTILITY(U,$J,358.3,9873,0)
- +276 ;;=R22.31^^45^443^114
- +277 ;;^UTILITY(U,$J,358.3,9873,1,0)
- +278 ;;=^358.31IA^4^2
- +279 ;;^UTILITY(U,$J,358.3,9873,1,3,0)
- +280 ;;=3^Localized Swelling/Mass/Lump,Right Upper Limb
- +281 ;;^UTILITY(U,$J,358.3,9873,1,4,0)
- +282 ;;=4^R22.31
- +283 ;;^UTILITY(U,$J,358.3,9873,2)
- +284 ;;=^5019288
- +285 ;;^UTILITY(U,$J,358.3,9874,0)
- +286 ;;=R22.32^^45^443^111
- +287 ;;^UTILITY(U,$J,358.3,9874,1,0)
- +288 ;;=^358.31IA^4^2
- +289 ;;^UTILITY(U,$J,358.3,9874,1,3,0)
- +290 ;;=3^Localized Swelling/Mass/Lump,Left Upper Limb
- +291 ;;^UTILITY(U,$J,358.3,9874,1,4,0)
- +292 ;;=4^R22.32
- +293 ;;^UTILITY(U,$J,358.3,9874,2)
- +294 ;;=^5019289
- +295 ;;^UTILITY(U,$J,358.3,9875,0)
- +296 ;;=R22.33^^45^443^107
- +297 ;;^UTILITY(U,$J,358.3,9875,1,0)
- +298 ;;=^358.31IA^4^2
- +299 ;;^UTILITY(U,$J,358.3,9875,1,3,0)
- +300 ;;=3^Localized Swelling/Mass/Lump,Bilateral Upper Limb
- +301 ;;^UTILITY(U,$J,358.3,9875,1,4,0)
- +302 ;;=4^R22.33
- +303 ;;^UTILITY(U,$J,358.3,9875,2)
- +304 ;;=^5019290
- +305 ;;^UTILITY(U,$J,358.3,9876,0)
- +306 ;;=R22.42^^45^443^110
- +307 ;;^UTILITY(U,$J,358.3,9876,1,0)
- +308 ;;=^358.31IA^4^2
- +309 ;;^UTILITY(U,$J,358.3,9876,1,3,0)
- +310 ;;=3^Localized Swelling/Mass/Lump,Left Lower Limb
- +311 ;;^UTILITY(U,$J,358.3,9876,1,4,0)
- +312 ;;=4^R22.42
- +313 ;;^UTILITY(U,$J,358.3,9876,2)
- +314 ;;=^5134179
- +315 ;;^UTILITY(U,$J,358.3,9877,0)
- +316 ;;=R22.41^^45^443^113
- +317 ;;^UTILITY(U,$J,358.3,9877,1,0)
- +318 ;;=^358.31IA^4^2
- +319 ;;^UTILITY(U,$J,358.3,9877,1,3,0)
- +320 ;;=3^Localized Swelling/Mass/Lump,Right Lower Limb
- +321 ;;^UTILITY(U,$J,358.3,9877,1,4,0)
- +322 ;;=4^R22.41
- +323 ;;^UTILITY(U,$J,358.3,9877,2)
- +324 ;;=^5134178
- +325 ;;^UTILITY(U,$J,358.3,9878,0)
- +326 ;;=R22.43^^45^443^108
- +327 ;;^UTILITY(U,$J,358.3,9878,1,0)
- +328 ;;=^358.31IA^4^2
- +329 ;;^UTILITY(U,$J,358.3,9878,1,3,0)
- +330 ;;=3^Localized Swelling/Mass/Lump,Bilateral Lower Limb
- +331 ;;^UTILITY(U,$J,358.3,9878,1,4,0)
- +332 ;;=4^R22.43
- +333 ;;^UTILITY(U,$J,358.3,9878,2)
- +334 ;;=^5019291
- +335 ;;^UTILITY(U,$J,358.3,9879,0)
- +336 ;;=R22.9^^45^443^116
- +337 ;;^UTILITY(U,$J,358.3,9879,1,0)
- +338 ;;=^358.31IA^4^2
- +339 ;;^UTILITY(U,$J,358.3,9879,1,3,0)
- +340 ;;=3^Localized Swelling/Mass/Lump,Unspec
- +341 ;;^UTILITY(U,$J,358.3,9879,1,4,0)
- +342 ;;=4^R22.9
- +343 ;;^UTILITY(U,$J,358.3,9879,2)
- +344 ;;=^5019292
- +345 ;;^UTILITY(U,$J,358.3,9880,0)
- +346 ;;=R23.0^^45^443^60
- +347 ;;^UTILITY(U,$J,358.3,9880,1,0)
- +348 ;;=^358.31IA^4^2
- +349 ;;^UTILITY(U,$J,358.3,9880,1,3,0)
- +350 ;;=3^Cyanosis
- +351 ;;^UTILITY(U,$J,358.3,9880,1,4,0)
- +352 ;;=4^R23.0
- +353 ;;^UTILITY(U,$J,358.3,9880,2)
- +354 ;;=^5019293
- +355 ;;^UTILITY(U,$J,358.3,9881,0)
- +356 ;;=R23.1^^45^443^132
- +357 ;;^UTILITY(U,$J,358.3,9881,1,0)
- +358 ;;=^358.31IA^4^2
- +359 ;;^UTILITY(U,$J,358.3,9881,1,3,0)
- +360 ;;=3^Pallor
- +361 ;;^UTILITY(U,$J,358.3,9881,1,4,0)
- +362 ;;=4^R23.1
- +363 ;;^UTILITY(U,$J,358.3,9881,2)
- +364 ;;=^5019294
- +365 ;;^UTILITY(U,$J,358.3,9882,0)
- +366 ;;=R23.2^^45^443^79
- +367 ;;^UTILITY(U,$J,358.3,9882,1,0)
- +368 ;;=^358.31IA^4^2
- +369 ;;^UTILITY(U,$J,358.3,9882,1,3,0)
- +370 ;;=3^Flushing
- +371 ;;^UTILITY(U,$J,358.3,9882,1,4,0)
- +372 ;;=4^R23.2
- +373 ;;^UTILITY(U,$J,358.3,9882,2)
- +374 ;;=^47184
- +375 ;;^UTILITY(U,$J,358.3,9883,0)
- +376 ;;=R23.4^^45^443^153
- +377 ;;^UTILITY(U,$J,358.3,9883,1,0)
- +378 ;;=^358.31IA^4^2
- +379 ;;^UTILITY(U,$J,358.3,9883,1,3,0)
- +380 ;;=3^Skin Texture Changes
- +381 ;;^UTILITY(U,$J,358.3,9883,1,4,0)
- +382 ;;=4^R23.4
- +383 ;;^UTILITY(U,$J,358.3,9883,2)
- +384 ;;=^5019296
- +385 ;;^UTILITY(U,$J,358.3,9884,0)
- +386 ;;=R26.0^^45^443^46
- +387 ;;^UTILITY(U,$J,358.3,9884,1,0)
- +388 ;;=^358.31IA^4^2
- +389 ;;^UTILITY(U,$J,358.3,9884,1,3,0)
- +390 ;;=3^Ataxic Gait
- +391 ;;^UTILITY(U,$J,358.3,9884,1,4,0)
- +392 ;;=4^R26.0
- +393 ;;^UTILITY(U,$J,358.3,9884,2)
- +394 ;;=^5019304
- +395 ;;^UTILITY(U,$J,358.3,9885,0)
- +396 ;;=R26.1^^45^443^134
- +397 ;;^UTILITY(U,$J,358.3,9885,1,0)
- +398 ;;=^358.31IA^4^2
- +399 ;;^UTILITY(U,$J,358.3,9885,1,3,0)
- +400 ;;=3^Paralytic Gait
- +401 ;;^UTILITY(U,$J,358.3,9885,1,4,0)
- +402 ;;=4^R26.1
- +403 ;;^UTILITY(U,$J,358.3,9885,2)
- +404 ;;=^5019305
- +405 ;;^UTILITY(U,$J,358.3,9886,0)
- +406 ;;=R26.81^^45^443^162
- +407 ;;^UTILITY(U,$J,358.3,9886,1,0)
- +408 ;;=^358.31IA^4^2
- +409 ;;^UTILITY(U,$J,358.3,9886,1,3,0)
- +410 ;;=3^Unsteadiness on Feet
- +411 ;;^UTILITY(U,$J,358.3,9886,1,4,0)
- +412 ;;=4^R26.81
- +413 ;;^UTILITY(U,$J,358.3,9886,2)
- +414 ;;=^5019307
- +415 ;;^UTILITY(U,$J,358.3,9887,0)
- +416 ;;=R26.89^^45^443^33
- +417 ;;^UTILITY(U,$J,358.3,9887,1,0)
- +418 ;;=^358.31IA^4^2
- +419 ;;^UTILITY(U,$J,358.3,9887,1,3,0)
- +420 ;;=3^Abnormalities of Gait and Mobility NEC
- +421 ;;^UTILITY(U,$J,358.3,9887,1,4,0)
- +422 ;;=4^R26.89
- +423 ;;^UTILITY(U,$J,358.3,9887,2)
- +424 ;;=^5019308
- +425 ;;^UTILITY(U,$J,358.3,9888,0)
- +426 ;;=R26.9^^45^443^34
- +427 ;;^UTILITY(U,$J,358.3,9888,1,0)
- +428 ;;=^358.31IA^4^2
- +429 ;;^UTILITY(U,$J,358.3,9888,1,3,0)
- +430 ;;=3^Abnormalities of Gait and Mobility,Unspec
- +431 ;;^UTILITY(U,$J,358.3,9888,1,4,0)
- +432 ;;=4^R26.9
- +433 ;;^UTILITY(U,$J,358.3,9888,2)
- +434 ;;=^5019309
- +435 ;;^UTILITY(U,$J,358.3,9889,0)
- +436 ;;=R27.0^^45^443^45
- +437 ;;^UTILITY(U,$J,358.3,9889,1,0)
- +438 ;;=^358.31IA^4^2
- +439 ;;^UTILITY(U,$J,358.3,9889,1,3,0)
- +440 ;;=3^Ataxia,Unspec
- +441 ;;^UTILITY(U,$J,358.3,9889,1,4,0)
- +442 ;;=4^R27.0
- +443 ;;^UTILITY(U,$J,358.3,9889,2)
- +444 ;;=^5019310
- +445 ;;^UTILITY(U,$J,358.3,9890,0)
- +446 ;;=R27.8^^45^443^104
- +447 ;;^UTILITY(U,$J,358.3,9890,1,0)
- +448 ;;=^358.31IA^4^2
- +449 ;;^UTILITY(U,$J,358.3,9890,1,3,0)
- +450 ;;=3^Lack of Coordination NEC
- +451 ;;^UTILITY(U,$J,358.3,9890,1,4,0)
- +452 ;;=4^R27.8
- +453 ;;^UTILITY(U,$J,358.3,9890,2)
- +454 ;;=^5019311
- +455 ;;^UTILITY(U,$J,358.3,9891,0)
- +456 ;;=R27.9^^45^443^105
- +457 ;;^UTILITY(U,$J,358.3,9891,1,0)
- +458 ;;=^358.31IA^4^2
- +459 ;;^UTILITY(U,$J,358.3,9891,1,3,0)
- +460 ;;=3^Lack of Coordination,Unspec
- +461 ;;^UTILITY(U,$J,358.3,9891,1,4,0)
- +462 ;;=4^R27.9
- +463 ;;^UTILITY(U,$J,358.3,9891,2)
- +464 ;;=^5019312
- +465 ;;^UTILITY(U,$J,358.3,9892,0)
- +466 ;;=R29.0^^45^443^159
- +467 ;;^UTILITY(U,$J,358.3,9892,1,0)
- +468 ;;=^358.31IA^4^2
- +469 ;;^UTILITY(U,$J,358.3,9892,1,3,0)
- +470 ;;=3^Tetany
- +471 ;;^UTILITY(U,$J,358.3,9892,1,4,0)
- +472 ;;=4^R29.0
- +473 ;;^UTILITY(U,$J,358.3,9892,2)
- +474 ;;=^118032
- +475 ;;^UTILITY(U,$J,358.3,9893,0)
- +476 ;;=R29.1^^45^443^122
- +477 ;;^UTILITY(U,$J,358.3,9893,1,0)
- +478 ;;=^358.31IA^4^2
- +479 ;;^UTILITY(U,$J,358.3,9893,1,3,0)
- +480 ;;=3^Meningismus
- +481 ;;^UTILITY(U,$J,358.3,9893,1,4,0)
- +482 ;;=4^R29.1
- +483 ;;^UTILITY(U,$J,358.3,9893,2)
- +484 ;;=^5019313
- +485 ;;^UTILITY(U,$J,358.3,9894,0)
- +486 ;;=R29.5^^45^443^161
- +487 ;;^UTILITY(U,$J,358.3,9894,1,0)
- +488 ;;=^358.31IA^4^2
- +489 ;;^UTILITY(U,$J,358.3,9894,1,3,0)
- +490 ;;=3^Transient Paralysis
- +491 ;;^UTILITY(U,$J,358.3,9894,1,4,0)
- +492 ;;=4^R29.5
- +493 ;;^UTILITY(U,$J,358.3,9894,2)
- +494 ;;=^5019316
- +495 ;;^UTILITY(U,$J,358.3,9895,0)
- +496 ;;=R34.^^45^443^42
- +497 ;;^UTILITY(U,$J,358.3,9895,1,0)
- +498 ;;=^358.31IA^4^2
- +499 ;;^UTILITY(U,$J,358.3,9895,1,3,0)
- +500 ;;=3^Anuria and Oliguria
- +501 ;;^UTILITY(U,$J,358.3,9895,1,4,0)
- +502 ;;=4^R34.
- +503 ;;^UTILITY(U,$J,358.3,9895,2)
- +504 ;;=^5019333
- +505 ;;^UTILITY(U,$J,358.3,9896,0)
- +506 ;;=R39.12^^45^443^145
- +507 ;;^UTILITY(U,$J,358.3,9896,1,0)
- +508 ;;=^358.31IA^4^2
- +509 ;;^UTILITY(U,$J,358.3,9896,1,3,0)
- +510 ;;=3^Poor Urinary Stream
- +511 ;;^UTILITY(U,$J,358.3,9896,1,4,0)
- +512 ;;=4^R39.12
- +513 ;;^UTILITY(U,$J,358.3,9896,2)
- +514 ;;=^5019342
- +515 ;;^UTILITY(U,$J,358.3,9897,0)
- +516 ;;=R39.14^^45^443^77
- +517 ;;^UTILITY(U,$J,358.3,9897,1,0)
- +518 ;;=^358.31IA^4^2
- +519 ;;^UTILITY(U,$J,358.3,9897,1,3,0)
- +520 ;;=3^Feeling of Incomplete Bladder Emptying
- +521 ;;^UTILITY(U,$J,358.3,9897,1,4,0)
- +522 ;;=4^R39.14
- +523 ;;^UTILITY(U,$J,358.3,9897,2)
- +524 ;;=^5019344
- +525 ;;^UTILITY(U,$J,358.3,9898,0)
- +526 ;;=R41.4^^45^443^126
- +527 ;;^UTILITY(U,$J,358.3,9898,1,0)
- +528 ;;=^358.31IA^4^2
- +529 ;;^UTILITY(U,$J,358.3,9898,1,3,0)
- +530 ;;=3^Neurologic Neglect Syndrome
- +531 ;;^UTILITY(U,$J,358.3,9898,1,4,0)
- +532 ;;=4^R41.4
- +533 ;;^UTILITY(U,$J,358.3,9898,2)
- +534 ;;=^303316
- +535 ;;^UTILITY(U,$J,358.3,9899,0)
- +536 ;;=R41.81^^45^443^35
- +537 ;;^UTILITY(U,$J,358.3,9899,1,0)
- +538 ;;=^358.31IA^4^2
- +539 ;;^UTILITY(U,$J,358.3,9899,1,3,0)
- +540 ;;=3^Age-Related Cognitive Decline
- +541 ;;^UTILITY(U,$J,358.3,9899,1,4,0)
- +542 ;;=4^R41.81
- +543 ;;^UTILITY(U,$J,358.3,9899,2)
- +544 ;;=^5019440
- +545 ;;^UTILITY(U,$J,358.3,9900,0)
- +546 ;;=R41.0^^45^443^65
- +547 ;;^UTILITY(U,$J,358.3,9900,1,0)
- +548 ;;=^358.31IA^4^2
- +549 ;;^UTILITY(U,$J,358.3,9900,1,3,0)
- +550 ;;=3^Disorientation/Confusion/Delrium,Unspec
- +551 ;;^UTILITY(U,$J,358.3,9900,1,4,0)
- +552 ;;=4^R41.0
- +553 ;;^UTILITY(U,$J,358.3,9900,2)
- +554 ;;=^5019436
- +555 ;;^UTILITY(U,$J,358.3,9901,0)
- +556 ;;=R41.82^^45^443^37
- +557 ;;^UTILITY(U,$J,358.3,9901,1,0)
- +558 ;;=^358.31IA^4^2
- +559 ;;^UTILITY(U,$J,358.3,9901,1,3,0)
- +560 ;;=3^Altered Mental Status,Unspec
- +561 ;;^UTILITY(U,$J,358.3,9901,1,4,0)
- +562 ;;=4^R41.82
- +563 ;;^UTILITY(U,$J,358.3,9901,2)
- +564 ;;=^5019441
- +565 ;;^UTILITY(U,$J,358.3,9902,0)
- +566 ;;=R43.0^^45^443^40
- +567 ;;^UTILITY(U,$J,358.3,9902,1,0)
- +568 ;;=^358.31IA^4^2
- +569 ;;^UTILITY(U,$J,358.3,9902,1,3,0)
- +570 ;;=3^Anosmia
- +571 ;;^UTILITY(U,$J,358.3,9902,1,4,0)
- +572 ;;=4^R43.0
- +573 ;;^UTILITY(U,$J,358.3,9902,2)
- +574 ;;=^7949
- +575 ;;^UTILITY(U,$J,358.3,9903,0)
- +576 ;;=R43.1^^45^443^136
- +577 ;;^UTILITY(U,$J,358.3,9903,1,0)
- +578 ;;=^358.31IA^4^2
- +579 ;;^UTILITY(U,$J,358.3,9903,1,3,0)
- +580 ;;=3^Parosmia
- +581 ;;^UTILITY(U,$J,358.3,9903,1,4,0)
- +582 ;;=4^R43.1
- +583 ;;^UTILITY(U,$J,358.3,9903,2)
- +584 ;;=^5019451
- +585 ;;^UTILITY(U,$J,358.3,9904,0)
- +586 ;;=R43.2^^45^443^133
- +587 ;;^UTILITY(U,$J,358.3,9904,1,0)
- +588 ;;=^358.31IA^4^2
- +589 ;;^UTILITY(U,$J,358.3,9904,1,3,0)
- +590 ;;=3^Parageusia
- +591 ;;^UTILITY(U,$J,358.3,9904,1,4,0)
- +592 ;;=4^R43.2
- +593 ;;^UTILITY(U,$J,358.3,9904,2)
- +594 ;;=^5019452
- +595 ;;^UTILITY(U,$J,358.3,9905,0)
- +596 ;;=R43.9^^45^443^154
- +597 ;;^UTILITY(U,$J,358.3,9905,1,0)
- +598 ;;=^358.31IA^4^2
- +599 ;;^UTILITY(U,$J,358.3,9905,1,3,0)
- +600 ;;=3^Smell and Taste Disturbances,Unspec
- +601 ;;^UTILITY(U,$J,358.3,9905,1,4,0)
- +602 ;;=4^R43.9
- +603 ;;^UTILITY(U,$J,358.3,9905,2)
- +604 ;;=^5019454
- +605 ;;^UTILITY(U,$J,358.3,9906,0)
- +606 ;;=R44.0^^45^443^47
- +607 ;;^UTILITY(U,$J,358.3,9906,1,0)
- +608 ;;=^358.31IA^4^2
- +609 ;;^UTILITY(U,$J,358.3,9906,1,3,0)
- +610 ;;=3^Auditory Hallucinations
- +611 ;;^UTILITY(U,$J,358.3,9906,1,4,0)
- +612 ;;=4^R44.0
- +613 ;;^UTILITY(U,$J,358.3,9906,2)
- +614 ;;=^5019455
- +615 ;;^UTILITY(U,$J,358.3,9907,0)
- +616 ;;=R44.2^^45^443^82
- +617 ;;^UTILITY(U,$J,358.3,9907,1,0)
- +618 ;;=^358.31IA^4^2
- +619 ;;^UTILITY(U,$J,358.3,9907,1,3,0)
- +620 ;;=3^Hallucinations NEC
- +621 ;;^UTILITY(U,$J,358.3,9907,1,4,0)
- +622 ;;=4^R44.2
- +623 ;;^UTILITY(U,$J,358.3,9907,2)
- +624 ;;=^5019457
- +625 ;;^UTILITY(U,$J,358.3,9908,0)
- +626 ;;=R44.3^^45^443^83
- +627 ;;^UTILITY(U,$J,358.3,9908,1,0)
- +628 ;;=^358.31IA^4^2
- +629 ;;^UTILITY(U,$J,358.3,9908,1,3,0)
- +630 ;;=3^Hallucinations,Unspec
- +631 ;;^UTILITY(U,$J,358.3,9908,1,4,0)
- +632 ;;=4^R44.3
- +633 ;;^UTILITY(U,$J,358.3,9908,2)
- +634 ;;=^5019458
- +635 ;;^UTILITY(U,$J,358.3,9909,0)
- +636 ;;=R45.0^^45^443^125
- +637 ;;^UTILITY(U,$J,358.3,9909,1,0)
- +638 ;;=^358.31IA^4^2
- +639 ;;^UTILITY(U,$J,358.3,9909,1,3,0)
- +640 ;;=3^Nervousness
- +641 ;;^UTILITY(U,$J,358.3,9909,1,4,0)
- +642 ;;=4^R45.0
- +643 ;;^UTILITY(U,$J,358.3,9909,2)
- +644 ;;=^5019461
- +645 ;;^UTILITY(U,$J,358.3,9910,0)
- +646 ;;=R47.01^^45^443^43
- +647 ;;^UTILITY(U,$J,358.3,9910,1,0)
- +648 ;;=^358.31IA^4^2
- +649 ;;^UTILITY(U,$J,358.3,9910,1,3,0)
- +650 ;;=3^Aphasia
- +651 ;;^UTILITY(U,$J,358.3,9910,1,4,0)
- +652 ;;=4^R47.01
- +653 ;;^UTILITY(U,$J,358.3,9910,2)
- +654 ;;=^5019488
- +655 ;;^UTILITY(U,$J,358.3,9911,0)
- +656 ;;=R47.9^^45^443^156
- +657 ;;^UTILITY(U,$J,358.3,9911,1,0)
- +658 ;;=^358.31IA^4^2
- +659 ;;^UTILITY(U,$J,358.3,9911,1,3,0)
- +660 ;;=3^Speech Disturbances,Unspec
- +661 ;;^UTILITY(U,$J,358.3,9911,1,4,0)
- +662 ;;=4^R47.9
- +663 ;;^UTILITY(U,$J,358.3,9911,2)
- +664 ;;=^5019494
- +665 ;;^UTILITY(U,$J,358.3,9912,0)
- +666 ;;=R49.8^^45^443^168
- +667 ;;^UTILITY(U,$J,358.3,9912,1,0)
- +668 ;;=^358.31IA^4^2
- +669 ;;^UTILITY(U,$J,358.3,9912,1,3,0)
- +670 ;;=3^Voice and Resonance Disorders NEC
- +671 ;;^UTILITY(U,$J,358.3,9912,1,4,0)
- +672 ;;=4^R49.8
- +673 ;;^UTILITY(U,$J,358.3,9912,2)
- +674 ;;=^5019505
- +675 ;;^UTILITY(U,$J,358.3,9913,0)
- +676 ;;=R53.0^^45^443^119
- +677 ;;^UTILITY(U,$J,358.3,9913,1,0)
- +678 ;;=^358.31IA^4^2
- +679 ;;^UTILITY(U,$J,358.3,9913,1,3,0)
- +680 ;;=3^Malig Neop Related Fatigue
- +681 ;;^UTILITY(U,$J,358.3,9913,1,4,0)
- +682 ;;=4^R53.0
- +683 ;;^UTILITY(U,$J,358.3,9913,2)
- +684 ;;=^5019515
- +685 ;;^UTILITY(U,$J,358.3,9914,0)
- +686 ;;=R53.83^^45^443^75
- +687 ;;^UTILITY(U,$J,358.3,9914,1,0)
- +688 ;;=^358.31IA^4^2
- +689 ;;^UTILITY(U,$J,358.3,9914,1,3,0)
- +690 ;;=3^Fatigue NEC
- +691 ;;^UTILITY(U,$J,358.3,9914,1,4,0)
- +692 ;;=4^R53.83
- +693 ;;^UTILITY(U,$J,358.3,9914,2)
- +694 ;;=^5019520
- +695 ;;^UTILITY(U,$J,358.3,9915,0)
- +696 ;;=R53.1^^45^443^169
- +697 ;;^UTILITY(U,$J,358.3,9915,1,0)
- +698 ;;=^358.31IA^4^2
- +699 ;;^UTILITY(U,$J,358.3,9915,1,3,0)
- +700 ;;=3^Weakness
- +701 ;;^UTILITY(U,$J,358.3,9915,1,4,0)
- +702 ;;=4^R53.1
- +703 ;;^UTILITY(U,$J,358.3,9915,2)
- +704 ;;=^5019516
- +705 ;;^UTILITY(U,$J,358.3,9916,0)
- +706 ;;=R53.81^^45^443^118
- +707 ;;^UTILITY(U,$J,358.3,9916,1,0)
- +708 ;;=^358.31IA^4^2
- +709 ;;^UTILITY(U,$J,358.3,9916,1,3,0)
- +710 ;;=3^Malaise NEC
- +711 ;;^UTILITY(U,$J,358.3,9916,1,4,0)
- +712 ;;=4^R53.81
- +713 ;;^UTILITY(U,$J,358.3,9916,2)
- +714 ;;=^5019518
- +715 ;;^UTILITY(U,$J,358.3,9917,0)
- +716 ;;=R53.82^^45^443^53
- +717 ;;^UTILITY(U,$J,358.3,9917,1,0)
- +718 ;;=^358.31IA^4^2
- +719 ;;^UTILITY(U,$J,358.3,9917,1,3,0)
- +720 ;;=3^Chronic Fatigue,Unspec
- +721 ;;^UTILITY(U,$J,358.3,9917,1,4,0)
- +722 ;;=4^R53.82
- +723 ;;^UTILITY(U,$J,358.3,9917,2)
- +724 ;;=^5019519
- +725 ;;^UTILITY(U,$J,358.3,9918,0)
- +726 ;;=R54.^^45^443^36
- +727 ;;^UTILITY(U,$J,358.3,9918,1,0)
- +728 ;;=^358.31IA^4^2