- IBDEI05E ; ; 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,13031,1,3,0)
- ;;=3^62270
- ;;^UTILITY(U,$J,358.3,13032,0)
- ;;=36556^^52^575^9^^^^1
- ;;^UTILITY(U,$J,358.3,13032,1,0)
- ;;=^358.31IA^3^2
- ;;^UTILITY(U,$J,358.3,13032,1,2,0)
- ;;=2^Insertion of Non-Tunneled CV Catheter
- ;;^UTILITY(U,$J,358.3,13032,1,3,0)
- ;;=3^36556
- ;;^UTILITY(U,$J,358.3,13033,0)
- ;;=43752^^52^575^10^^^^1
- ;;^UTILITY(U,$J,358.3,13033,1,0)
- ;;=^358.31IA^3^2
- ;;^UTILITY(U,$J,358.3,13033,1,2,0)
- ;;=2^NG Tube,Req MD Skills & Fluoro Guidance
- ;;^UTILITY(U,$J,358.3,13033,1,3,0)
- ;;=3^43752
- ;;^UTILITY(U,$J,358.3,13034,0)
- ;;=92960^^52^575^5^^^^1
- ;;^UTILITY(U,$J,358.3,13034,1,0)
- ;;=^358.31IA^3^2
- ;;^UTILITY(U,$J,358.3,13034,1,2,0)
- ;;=2^Cardiovrsn,Elctv,Electr Convrsn,Arrhyth,Ext
- ;;^UTILITY(U,$J,358.3,13034,1,3,0)
- ;;=3^92960
- ;;^UTILITY(U,$J,358.3,13035,0)
- ;;=92961^^52^575^6^^^^1
- ;;^UTILITY(U,$J,358.3,13035,1,0)
- ;;=^358.31IA^3^2
- ;;^UTILITY(U,$J,358.3,13035,1,2,0)
- ;;=2^Cardiovrsn,Elctv,Electr Convrsn,Arrhyth,Int
- ;;^UTILITY(U,$J,358.3,13035,1,3,0)
- ;;=3^92961
- ;;^UTILITY(U,$J,358.3,13036,0)
- ;;=93306^^52^575^7^^^^1
- ;;^UTILITY(U,$J,358.3,13036,1,0)
- ;;=^358.31IA^3^2
- ;;^UTILITY(U,$J,358.3,13036,1,2,0)
- ;;=2^Echocardio,Transthor w/ Spectr & Color Flow Dopp
- ;;^UTILITY(U,$J,358.3,13036,1,3,0)
- ;;=3^93306
- ;;^UTILITY(U,$J,358.3,13037,0)
- ;;=93307^^52^575^8^^^^1
- ;;^UTILITY(U,$J,358.3,13037,1,0)
- ;;=^358.31IA^3^2
- ;;^UTILITY(U,$J,358.3,13037,1,2,0)
- ;;=2^Echocardio,Transthor w/o Spectr or Color Flow Dopp
- ;;^UTILITY(U,$J,358.3,13037,1,3,0)
- ;;=3^93307
- ;;^UTILITY(U,$J,358.3,13038,0)
- ;;=99152^^52^576^1^^^^1
- ;;^UTILITY(U,$J,358.3,13038,1,0)
- ;;=^358.31IA^3^2
- ;;^UTILITY(U,$J,358.3,13038,1,2,0)
- ;;=2^Moderate Sedation,Init 15 min
- ;;^UTILITY(U,$J,358.3,13038,1,3,0)
- ;;=3^99152
- ;;^UTILITY(U,$J,358.3,13039,0)
- ;;=99153^^52^576^2^^^^1
- ;;^UTILITY(U,$J,358.3,13039,1,0)
- ;;=^358.31IA^3^2
- ;;^UTILITY(U,$J,358.3,13039,1,2,0)
- ;;=2^Moderate Sedation,Ea Addl 15 Min
- ;;^UTILITY(U,$J,358.3,13039,1,3,0)
- ;;=3^99153
- ;;^UTILITY(U,$J,358.3,13040,0)
- ;;=99605^^52^577^1^^^^1
- ;;^UTILITY(U,$J,358.3,13040,1,0)
- ;;=^358.31IA^3^2
- ;;^UTILITY(U,$J,358.3,13040,1,2,0)
- ;;=2^MTMS by Pharm,F2F,New Pt,1st 15 min
- ;;^UTILITY(U,$J,358.3,13040,1,3,0)
- ;;=3^99605
- ;;^UTILITY(U,$J,358.3,13041,0)
- ;;=99606^^52^577^2^^^^1
- ;;^UTILITY(U,$J,358.3,13041,1,0)
- ;;=^358.31IA^3^2
- ;;^UTILITY(U,$J,358.3,13041,1,2,0)
- ;;=2^MTMS by Pharm,F2F,Est Pt,1st 15 min
- ;;^UTILITY(U,$J,358.3,13041,1,3,0)
- ;;=3^99606
- ;;^UTILITY(U,$J,358.3,13042,0)
- ;;=99607^^52^577^3^^^^1
- ;;^UTILITY(U,$J,358.3,13042,1,0)
- ;;=^358.31IA^3^2
- ;;^UTILITY(U,$J,358.3,13042,1,2,0)
- ;;=2^MTMS by Pharm,F2F,Ea Addl 15 min
- ;;^UTILITY(U,$J,358.3,13042,1,3,0)
- ;;=3^99607
- ;;^UTILITY(U,$J,358.3,13043,0)
- ;;=90471^^52^578^1^^^^1
- ;;^UTILITY(U,$J,358.3,13043,1,0)
- ;;=^358.31IA^3^2
- ;;^UTILITY(U,$J,358.3,13043,1,2,0)
- ;;=2^Immunization Admin,1 Vaccine
- ;;^UTILITY(U,$J,358.3,13043,1,3,0)
- ;;=3^90471
- ;;^UTILITY(U,$J,358.3,13044,0)
- ;;=90658^^52^578^2^^^^1
- ;;^UTILITY(U,$J,358.3,13044,1,0)
- ;;=^358.31IA^3^2
- ;;^UTILITY(U,$J,358.3,13044,1,2,0)
- ;;=2^Flu,Trivalent (IIV3),Split Vaccine
- ;;^UTILITY(U,$J,358.3,13044,1,3,0)
- ;;=3^90658
- ;;^UTILITY(U,$J,358.3,13045,0)
- ;;=E66.9^^53^579^44
- ;;^UTILITY(U,$J,358.3,13045,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,13045,1,3,0)
- ;;=3^Obesity,Unspec
- ;;^UTILITY(U,$J,358.3,13045,1,4,0)
- ;;=4^E66.9
- ;;^UTILITY(U,$J,358.3,13045,2)
- ;;=^5002832
- ;;^UTILITY(U,$J,358.3,13046,0)
- ;;=E66.01^^53^579^42
- ;;^UTILITY(U,$J,358.3,13046,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,13046,1,3,0)
- ;;=3^Morbid Obesity d/t Excess Calories
- ;;^UTILITY(U,$J,358.3,13046,1,4,0)
- ;;=4^E66.01
- ;;^UTILITY(U,$J,358.3,13046,2)
- ;;=^5002826
- ;;^UTILITY(U,$J,358.3,13047,0)
- ;;=E66.3^^53^579^45
- ;;^UTILITY(U,$J,358.3,13047,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,13047,1,3,0)
- ;;=3^Overweight
- ;;^UTILITY(U,$J,358.3,13047,1,4,0)
- ;;=4^E66.3
- ;;^UTILITY(U,$J,358.3,13047,2)
- ;;=^5002830
- ;;^UTILITY(U,$J,358.3,13048,0)
- ;;=E66.2^^53^579^43
- ;;^UTILITY(U,$J,358.3,13048,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,13048,1,3,0)
- ;;=3^Morbid Obesity w/ Alveolar Hypoventilation
- ;;^UTILITY(U,$J,358.3,13048,1,4,0)
- ;;=4^E66.2
- ;;^UTILITY(U,$J,358.3,13048,2)
- ;;=^5002829
- ;;^UTILITY(U,$J,358.3,13049,0)
- ;;=H53.9^^53^579^70
- ;;^UTILITY(U,$J,358.3,13049,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,13049,1,3,0)
- ;;=3^Visual Disturbance,Unspec
- ;;^UTILITY(U,$J,358.3,13049,1,4,0)
- ;;=4^H53.9
- ;;^UTILITY(U,$J,358.3,13049,2)
- ;;=^124001
- ;;^UTILITY(U,$J,358.3,13050,0)
- ;;=G45.9^^53^579^64
- ;;^UTILITY(U,$J,358.3,13050,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,13050,1,3,0)
- ;;=3^Transient Cerebral ischemic Attack,Unspec
- ;;^UTILITY(U,$J,358.3,13050,1,4,0)
- ;;=4^G45.9
- ;;^UTILITY(U,$J,358.3,13050,2)
- ;;=^5003959
- ;;^UTILITY(U,$J,358.3,13051,0)
- ;;=I67.848^^53^579^14
- ;;^UTILITY(U,$J,358.3,13051,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,13051,1,3,0)
- ;;=3^Cerebrovascular Vasospasm/Vasoconstriction NEC
- ;;^UTILITY(U,$J,358.3,13051,1,4,0)
- ;;=4^I67.848
- ;;^UTILITY(U,$J,358.3,13051,2)
- ;;=^5007387
- ;;^UTILITY(U,$J,358.3,13052,0)
- ;;=R26.2^^53^579^20
- ;;^UTILITY(U,$J,358.3,13052,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,13052,1,3,0)
- ;;=3^Difficulty in Walking NEC
- ;;^UTILITY(U,$J,358.3,13052,1,4,0)
- ;;=4^R26.2
- ;;^UTILITY(U,$J,358.3,13052,2)
- ;;=^5019306
- ;;^UTILITY(U,$J,358.3,13053,0)
- ;;=R56.1^^53^579^53
- ;;^UTILITY(U,$J,358.3,13053,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,13053,1,3,0)
- ;;=3^Post Traumatic Seizures
- ;;^UTILITY(U,$J,358.3,13053,1,4,0)
- ;;=4^R56.1
- ;;^UTILITY(U,$J,358.3,13053,2)
- ;;=^5019523
- ;;^UTILITY(U,$J,358.3,13054,0)
- ;;=R56.9^^53^579^17
- ;;^UTILITY(U,$J,358.3,13054,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,13054,1,3,0)
- ;;=3^Convulsions,Unspec
- ;;^UTILITY(U,$J,358.3,13054,1,4,0)
- ;;=4^R56.9
- ;;^UTILITY(U,$J,358.3,13054,2)
- ;;=^5019524
- ;;^UTILITY(U,$J,358.3,13055,0)
- ;;=R42.^^53^579^21
- ;;^UTILITY(U,$J,358.3,13055,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,13055,1,3,0)
- ;;=3^Dizziness and Giddiness
- ;;^UTILITY(U,$J,358.3,13055,1,4,0)
- ;;=4^R42.
- ;;^UTILITY(U,$J,358.3,13055,2)
- ;;=^5019450
- ;;^UTILITY(U,$J,358.3,13056,0)
- ;;=R50.9^^53^579^27
- ;;^UTILITY(U,$J,358.3,13056,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,13056,1,3,0)
- ;;=3^Fever,Unspec
- ;;^UTILITY(U,$J,358.3,13056,1,4,0)
- ;;=4^R50.9
- ;;^UTILITY(U,$J,358.3,13056,2)
- ;;=^5019512
- ;;^UTILITY(U,$J,358.3,13057,0)
- ;;=R25.0^^53^579^5
- ;;^UTILITY(U,$J,358.3,13057,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,13057,1,3,0)
- ;;=3^Abnormal Head Movements
- ;;^UTILITY(U,$J,358.3,13057,1,4,0)
- ;;=4^R25.0
- ;;^UTILITY(U,$J,358.3,13057,2)
- ;;=^5019299
- ;;^UTILITY(U,$J,358.3,13058,0)
- ;;=R25.1^^53^579^66
- ;;^UTILITY(U,$J,358.3,13058,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,13058,1,3,0)
- ;;=3^Tremor,Unspec
- ;;^UTILITY(U,$J,358.3,13058,1,4,0)
- ;;=4^R25.1
- ;;^UTILITY(U,$J,358.3,13058,2)
- ;;=^5019300
- ;;^UTILITY(U,$J,358.3,13059,0)
- ;;=R25.2^^53^579^19
- ;;^UTILITY(U,$J,358.3,13059,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,13059,1,3,0)
- ;;=3^Cramp and Spasm
- ;;^UTILITY(U,$J,358.3,13059,1,4,0)
- ;;=4^R25.2
- ;;^UTILITY(U,$J,358.3,13059,2)
- ;;=^5019301
- ;;^UTILITY(U,$J,358.3,13060,0)
- ;;=R25.3^^53^579^26
- ;;^UTILITY(U,$J,358.3,13060,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,13060,1,3,0)
- ;;=3^Fasciculation
- ;;^UTILITY(U,$J,358.3,13060,1,4,0)
- ;;=4^R25.3
- ;;^UTILITY(U,$J,358.3,13060,2)
- ;;=^44985
- ;;^UTILITY(U,$J,358.3,13061,0)
- ;;=R25.9^^53^579^6
- ;;^UTILITY(U,$J,358.3,13061,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,13061,1,3,0)
- ;;=3^Abnormal Involuntary Movements,Unspec
- ;;^UTILITY(U,$J,358.3,13061,1,4,0)
- ;;=4^R25.9
- ;;^UTILITY(U,$J,358.3,13061,2)
- ;;=^5019303
- ;;^UTILITY(U,$J,358.3,13062,0)
- ;;=R43.0^^53^579^8
- ;;^UTILITY(U,$J,358.3,13062,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,13062,1,3,0)
- ;;=3^Anosmia
- ;;^UTILITY(U,$J,358.3,13062,1,4,0)
- ;;=4^R43.0
- ;;^UTILITY(U,$J,358.3,13062,2)
- ;;=^7949
- ;;^UTILITY(U,$J,358.3,13063,0)
- ;;=R43.1^^53^579^48
- ;;^UTILITY(U,$J,358.3,13063,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,13063,1,3,0)
- ;;=3^Parosmia
- ;;^UTILITY(U,$J,358.3,13063,1,4,0)
- ;;=4^R43.1
- ;;^UTILITY(U,$J,358.3,13063,2)
- ;;=^5019451
- ;;^UTILITY(U,$J,358.3,13064,0)
- ;;=R43.2^^53^579^46
- ;;^UTILITY(U,$J,358.3,13064,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,13064,1,3,0)
- ;;=3^Parageusia
- ;;^UTILITY(U,$J,358.3,13064,1,4,0)
- ;;=4^R43.2
- ;;^UTILITY(U,$J,358.3,13064,2)
- ;;=^5019452
- ;;^UTILITY(U,$J,358.3,13065,0)
- ;;=R26.0^^53^579^13
- ;;^UTILITY(U,$J,358.3,13065,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,13065,1,3,0)
- ;;=3^Ataxic Gait
- ;;^UTILITY(U,$J,358.3,13065,1,4,0)
- ;;=4^R26.0
- ;;^UTILITY(U,$J,358.3,13065,2)
- ;;=^5019304
- ;;^UTILITY(U,$J,358.3,13066,0)
- ;;=R26.1^^53^579^47
- ;;^UTILITY(U,$J,358.3,13066,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,13066,1,3,0)
- ;;=3^Paralytic Gait
- ;;^UTILITY(U,$J,358.3,13066,1,4,0)
- ;;=4^R26.1
- ;;^UTILITY(U,$J,358.3,13066,2)
- ;;=^5019305
- ;;^UTILITY(U,$J,358.3,13067,0)
- ;;=R26.89^^53^579^28
- ;;^UTILITY(U,$J,358.3,13067,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,13067,1,3,0)
- ;;=3^Gait/Mobility Abnormalities NEC
- ;;^UTILITY(U,$J,358.3,13067,1,4,0)
- ;;=4^R26.89
- ;;^UTILITY(U,$J,358.3,13067,2)
- ;;=^5019308
- ;;^UTILITY(U,$J,358.3,13068,0)
- ;;=R26.9^^53^579^29
- ;;^UTILITY(U,$J,358.3,13068,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,13068,1,3,0)
- ;;=3^Gait/Mobility Abnormalities,Unspec
- ;;^UTILITY(U,$J,358.3,13068,1,4,0)
- ;;=4^R26.9
- ;;^UTILITY(U,$J,358.3,13068,2)
- ;;=^5019309
- ;;^UTILITY(U,$J,358.3,13069,0)
- ;;=R27.0^^53^579^12
- ;;^UTILITY(U,$J,358.3,13069,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,13069,1,3,0)
- ;;=3^Ataxia,Unspec
- ;;^UTILITY(U,$J,358.3,13069,1,4,0)
- ;;=4^R27.0
- ;;^UTILITY(U,$J,358.3,13069,2)
- ;;=^5019310
- ;;^UTILITY(U,$J,358.3,13070,0)
- ;;=R27.8^^53^579^37
- ;;^UTILITY(U,$J,358.3,13070,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,13070,1,3,0)
- ;;=3^Lack of Coordination NEC
- ;;^UTILITY(U,$J,358.3,13070,1,4,0)
- ;;=4^R27.8
- ;;^UTILITY(U,$J,358.3,13070,2)
- ;;=^5019311
- ;;^UTILITY(U,$J,358.3,13071,0)
- ;;=R27.9^^53^579^38
- ;;^UTILITY(U,$J,358.3,13071,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,13071,1,3,0)
- ;;=3^Lack of Coordination,Unspec
- ;;^UTILITY(U,$J,358.3,13071,1,4,0)
- ;;=4^R27.9
- ;;^UTILITY(U,$J,358.3,13071,2)
- ;;=^5019312
- ;;^UTILITY(U,$J,358.3,13072,0)
- ;;=R29.5^^53^579^65
- ;;^UTILITY(U,$J,358.3,13072,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,13072,1,3,0)
- ;;=3^Transient Paralysis
- ;;^UTILITY(U,$J,358.3,13072,1,4,0)
- ;;=4^R29.5
- ;;^UTILITY(U,$J,358.3,13072,2)
- ;;=^5019316
- ;;^UTILITY(U,$J,358.3,13073,0)
- ;;=R47.01^^53^579^9
- ;;^UTILITY(U,$J,358.3,13073,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,13073,1,3,0)
- ;;=3^Aphasia
- ;;^UTILITY(U,$J,358.3,13073,1,4,0)
- ;;=4^R47.01
- ;;^UTILITY(U,$J,358.3,13073,2)
- ;;=^5019488
- ;;^UTILITY(U,$J,358.3,13074,0)
- ;;=R59.9^^53^579^22
- ;;^UTILITY(U,$J,358.3,13074,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,13074,1,3,0)
- ;;=3^Enlarged Lymph Nodes,Unspec
- ;;^UTILITY(U,$J,358.3,13074,1,4,0)
- ;;=4^R59.9
- ;;^UTILITY(U,$J,358.3,13074,2)
- ;;=^5019531
- ;;^UTILITY(U,$J,358.3,13075,0)
- ;;=R06.2^^53^579^71
- ;;^UTILITY(U,$J,358.3,13075,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,13075,1,3,0)
- ;;=3^Wheezing
- ;;^UTILITY(U,$J,358.3,13075,1,4,0)
- ;;=4^R06.2
- ;;^UTILITY(U,$J,358.3,13075,2)
- ;;=^5019184
- ;;^UTILITY(U,$J,358.3,13076,0)
- ;;=R06.1^^53^579^63
- ;;^UTILITY(U,$J,358.3,13076,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,13076,1,3,0)
- ;;=3^Stridor
- ;;^UTILITY(U,$J,358.3,13076,1,4,0)
- ;;=4^R06.1
- ;;^UTILITY(U,$J,358.3,13076,2)
- ;;=^5019183
- ;;^UTILITY(U,$J,358.3,13077,0)
- ;;=R04.2^^53^579^30
- ;;^UTILITY(U,$J,358.3,13077,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,13077,1,3,0)
- ;;=3^Hemoptysis
- ;;^UTILITY(U,$J,358.3,13077,1,4,0)
- ;;=4^R04.2
- ;;^UTILITY(U,$J,358.3,13077,2)
- ;;=^5019175
- ;;^UTILITY(U,$J,358.3,13078,0)
- ;;=R04.9^^53^579^59
- ;;^UTILITY(U,$J,358.3,13078,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,13078,1,3,0)
- ;;=3^Respiratory Passage Hemorrhage,Unspec
- ;;^UTILITY(U,$J,358.3,13078,1,4,0)
- ;;=4^R04.9
- ;;^UTILITY(U,$J,358.3,13078,2)
- ;;=^5019178
- ;;^UTILITY(U,$J,358.3,13079,0)
- ;;=R07.9^^53^579^16
- ;;^UTILITY(U,$J,358.3,13079,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,13079,1,3,0)
- ;;=3^Chest Pain,Unspec
- ;;^UTILITY(U,$J,358.3,13079,1,4,0)
- ;;=4^R07.9
- ;;^UTILITY(U,$J,358.3,13079,2)
- ;;=^5019201
- ;;^UTILITY(U,$J,358.3,13080,0)
- ;;=R07.2^^53^579^54
- ;;^UTILITY(U,$J,358.3,13080,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,13080,1,3,0)
- ;;=3^Precordial Pain
- ;;^UTILITY(U,$J,358.3,13080,1,4,0)
- ;;=4^R07.2
- ;;^UTILITY(U,$J,358.3,13080,2)
- ;;=^5019197
- ;;^UTILITY(U,$J,358.3,13081,0)
- ;;=R07.1^^53^579^15
- ;;^UTILITY(U,$J,358.3,13081,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,13081,1,3,0)
- ;;=3^Chest Pain on Breathing
- ;;^UTILITY(U,$J,358.3,13081,1,4,0)
- ;;=4^R07.1
- ;;^UTILITY(U,$J,358.3,13081,2)
- ;;=^5019196
- ;;^UTILITY(U,$J,358.3,13082,0)
- ;;=R07.81^^53^579^52
- ;;^UTILITY(U,$J,358.3,13082,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,13082,1,3,0)
- ;;=3^Pleurodynia
- ;;^UTILITY(U,$J,358.3,13082,1,4,0)
- ;;=4^R07.81
- ;;^UTILITY(U,$J,358.3,13082,2)
- ;;=^5019198
- ;;^UTILITY(U,$J,358.3,13083,0)
- ;;=R07.82^^53^579^32
- ;;^UTILITY(U,$J,358.3,13083,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,13083,1,3,0)
- ;;=3^Intercostal Pain
- ;;^UTILITY(U,$J,358.3,13083,1,4,0)
- ;;=4^R07.82
- ;;^UTILITY(U,$J,358.3,13083,2)
- ;;=^5019199
- ;;^UTILITY(U,$J,358.3,13084,0)
- ;;=R22.2^^53^579^67
- ;;^UTILITY(U,$J,358.3,13084,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,13084,1,3,0)
- ;;=3^Trunk Swelling/Mass/Lump,Localized
- ;;^UTILITY(U,$J,358.3,13084,1,4,0)
- ;;=4^R22.2
- ;;^UTILITY(U,$J,358.3,13084,2)
- ;;=^5019286
- ;;^UTILITY(U,$J,358.3,13085,0)
- ;;=R10.11^^53^579^61
- ;;^UTILITY(U,$J,358.3,13085,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,13085,1,3,0)
- ;;=3^Right Upper Quadrant Pain
- ;;^UTILITY(U,$J,358.3,13085,1,4,0)
- ;;=4^R10.11
- ;;^UTILITY(U,$J,358.3,13085,2)
- ;;=^5019206
- ;;^UTILITY(U,$J,358.3,13086,0)
- ;;=R10.12^^53^579^40
- ;;^UTILITY(U,$J,358.3,13086,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,13086,1,3,0)
- ;;=3^Left Upper Quadrant Pain
- ;;^UTILITY(U,$J,358.3,13086,1,4,0)
- ;;=4^R10.12
- ;;^UTILITY(U,$J,358.3,13086,2)
- ;;=^5019207
- ;;^UTILITY(U,$J,358.3,13087,0)
- ;;=R10.31^^53^579^60
- ;;^UTILITY(U,$J,358.3,13087,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,13087,1,3,0)
- ;;=3^Right Lower Quadrant Pain
- ;;^UTILITY(U,$J,358.3,13087,1,4,0)
- ;;=4^R10.31
- ;;^UTILITY(U,$J,358.3,13087,2)
- ;;=^5019211
- ;;^UTILITY(U,$J,358.3,13088,0)
- ;;=R10.32^^53^579^39
- ;;^UTILITY(U,$J,358.3,13088,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,13088,1,3,0)
- ;;=3^Left Lower Quadrant Pain
- ;;^UTILITY(U,$J,358.3,13088,1,4,0)
- ;;=4^R10.32
- ;;^UTILITY(U,$J,358.3,13088,2)
- ;;=^5019212
- ;;^UTILITY(U,$J,358.3,13089,0)
- ;;=R10.33^^53^579^51
- ;;^UTILITY(U,$J,358.3,13089,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,13089,1,3,0)
- ;;=3^Periumbilical Pain
- ;;^UTILITY(U,$J,358.3,13089,1,4,0)
- ;;=4^R10.33
- ;;^UTILITY(U,$J,358.3,13089,2)
- ;;=^5019213
- ;;^UTILITY(U,$J,358.3,13090,0)
- ;;=R10.13^^53^579^24
- ;;^UTILITY(U,$J,358.3,13090,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,13090,1,3,0)
- ;;=3^Epigastric Pain
- ;;^UTILITY(U,$J,358.3,13090,1,4,0)
- ;;=4^R10.13
- ;;^UTILITY(U,$J,358.3,13090,2)
- ;;=^5019208
- ;;^UTILITY(U,$J,358.3,13091,0)
- ;;=R10.84^^53^579^1
- ;;^UTILITY(U,$J,358.3,13091,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,13091,1,3,0)
- ;;=3^Abdominal Pain,Generalized
- ;;^UTILITY(U,$J,358.3,13091,1,4,0)
- ;;=4^R10.84
- ;;^UTILITY(U,$J,358.3,13091,2)
- ;;=^5019229
- ;;^UTILITY(U,$J,358.3,13092,0)
- ;;=R10.10^^53^579^69
- ;;^UTILITY(U,$J,358.3,13092,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,13092,1,3,0)
- ;;=3^Upper Abdominal Pain,Unspec
- ;;^UTILITY(U,$J,358.3,13092,1,4,0)
- ;;=4^R10.10
- ;;^UTILITY(U,$J,358.3,13092,2)
- ;;=^5019205
- ;;^UTILITY(U,$J,358.3,13093,0)
- ;;=R10.30^^53^579^41
- ;;^UTILITY(U,$J,358.3,13093,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,13093,1,3,0)
- ;;=3^Lower Abdominal Pain,Unspec
- ;;^UTILITY(U,$J,358.3,13093,1,4,0)
- ;;=4^R10.30
- ;;^UTILITY(U,$J,358.3,13093,2)
- ;;=^5019210
- ;;^UTILITY(U,$J,358.3,13094,0)
- ;;=R16.0^^53^579^31
- ;;^UTILITY(U,$J,358.3,13094,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,13094,1,3,0)
- ;;=3^Hepatomegaly NEC
- ;;^UTILITY(U,$J,358.3,13094,1,4,0)
- ;;=4^R16.0
- ;;^UTILITY(U,$J,358.3,13094,2)
- ;;=^5019248
- ;;^UTILITY(U,$J,358.3,13095,0)
- ;;=R16.1^^53^579^62
- ;;^UTILITY(U,$J,358.3,13095,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,13095,1,3,0)
- ;;=3^Splenomegaly NEC
- ;;^UTILITY(U,$J,358.3,13095,1,4,0)
- ;;=4^R16.1
- ;;^UTILITY(U,$J,358.3,13095,2)
- ;;=^5019249
- ;;^UTILITY(U,$J,358.3,13096,0)
- ;;=R19.01^^53^579^58
- ;;^UTILITY(U,$J,358.3,13096,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,13096,1,3,0)
- ;;=3^RUQ Abdominal Swelling/Mass/Lump
- ;;^UTILITY(U,$J,358.3,13096,1,4,0)
- ;;=4^R19.01
- ;;^UTILITY(U,$J,358.3,13096,2)
- ;;=^5019255
- ;;^UTILITY(U,$J,358.3,13097,0)
- ;;=R19.02^^53^579^36
- ;;^UTILITY(U,$J,358.3,13097,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,13097,1,3,0)
- ;;=3^LUQ Abdominal Swelling/Mass/Lump
- ;;^UTILITY(U,$J,358.3,13097,1,4,0)
- ;;=4^R19.02
- ;;^UTILITY(U,$J,358.3,13097,2)
- ;;=^5019256
- ;;^UTILITY(U,$J,358.3,13098,0)
- ;;=R19.03^^53^579^56
- ;;^UTILITY(U,$J,358.3,13098,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,13098,1,3,0)
- ;;=3^RLQ Abdominal Swelling/Mass/Lump
- ;;^UTILITY(U,$J,358.3,13098,1,4,0)
- ;;=4^R19.03
- ;;^UTILITY(U,$J,358.3,13098,2)
- ;;=^5019257
- ;;^UTILITY(U,$J,358.3,13099,0)
- ;;=R19.04^^53^579^34
- ;;^UTILITY(U,$J,358.3,13099,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,13099,1,3,0)
- ;;=3^LLQ Abdominal Swelling/Mass/Lump
- ;;^UTILITY(U,$J,358.3,13099,1,4,0)
- ;;=4^R19.04
- ;;^UTILITY(U,$J,358.3,13099,2)
- ;;=^5134175
- ;;^UTILITY(U,$J,358.3,13100,0)
- ;;=R19.05^^53^579^50
- ;;^UTILITY(U,$J,358.3,13100,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,13100,1,3,0)
- ;;=3^Periumbilic Swelling/Mass/Lump
- ;;^UTILITY(U,$J,358.3,13100,1,4,0)
- ;;=4^R19.05
- ;;^UTILITY(U,$J,358.3,13100,2)
- ;;=^5019258
- ;;^UTILITY(U,$J,358.3,13101,0)
- ;;=R19.06^^53^579^25
- ;;^UTILITY(U,$J,358.3,13101,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,13101,1,3,0)
- ;;=3^Epigastric Swelling/Mass/Lump
- ;;^UTILITY(U,$J,358.3,13101,1,4,0)
- ;;=4^R19.06
- ;;^UTILITY(U,$J,358.3,13101,2)
- ;;=^5019259
- ;;^UTILITY(U,$J,358.3,13102,0)
- ;;=R19.07^^53^579^3
- ;;^UTILITY(U,$J,358.3,13102,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,13102,1,3,0)
- ;;=3^Abdominal/Pelvic Swelling/Mass/Lump,Generalized
- ;;^UTILITY(U,$J,358.3,13102,1,4,0)
- ;;=4^R19.07
- ;;^UTILITY(U,$J,358.3,13102,2)
- ;;=^5019260
- ;;^UTILITY(U,$J,358.3,13103,0)
- ;;=R19.31^^53^579^57
- ;;^UTILITY(U,$J,358.3,13103,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,13103,1,3,0)
- ;;=3^RUQ Abdominal Rigidity
- ;;^UTILITY(U,$J,358.3,13103,1,4,0)
- ;;=4^R19.31
- ;;^UTILITY(U,$J,358.3,13103,2)
- ;;=^5019267
- ;;^UTILITY(U,$J,358.3,13104,0)
- ;;=R19.32^^53^579^35
- ;;^UTILITY(U,$J,358.3,13104,1,0)
- ;;=^358.31IA^4^2
- --- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HIBDEI05E 19772 printed Feb 18, 2025@23:08:21 Page 2
- IBDEI05E ; ; 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,13031,1,3,0)
- +2 ;;=3^62270
- +3 ;;^UTILITY(U,$J,358.3,13032,0)
- +4 ;;=36556^^52^575^9^^^^1
- +5 ;;^UTILITY(U,$J,358.3,13032,1,0)
- +6 ;;=^358.31IA^3^2
- +7 ;;^UTILITY(U,$J,358.3,13032,1,2,0)
- +8 ;;=2^Insertion of Non-Tunneled CV Catheter
- +9 ;;^UTILITY(U,$J,358.3,13032,1,3,0)
- +10 ;;=3^36556
- +11 ;;^UTILITY(U,$J,358.3,13033,0)
- +12 ;;=43752^^52^575^10^^^^1
- +13 ;;^UTILITY(U,$J,358.3,13033,1,0)
- +14 ;;=^358.31IA^3^2
- +15 ;;^UTILITY(U,$J,358.3,13033,1,2,0)
- +16 ;;=2^NG Tube,Req MD Skills & Fluoro Guidance
- +17 ;;^UTILITY(U,$J,358.3,13033,1,3,0)
- +18 ;;=3^43752
- +19 ;;^UTILITY(U,$J,358.3,13034,0)
- +20 ;;=92960^^52^575^5^^^^1
- +21 ;;^UTILITY(U,$J,358.3,13034,1,0)
- +22 ;;=^358.31IA^3^2
- +23 ;;^UTILITY(U,$J,358.3,13034,1,2,0)
- +24 ;;=2^Cardiovrsn,Elctv,Electr Convrsn,Arrhyth,Ext
- +25 ;;^UTILITY(U,$J,358.3,13034,1,3,0)
- +26 ;;=3^92960
- +27 ;;^UTILITY(U,$J,358.3,13035,0)
- +28 ;;=92961^^52^575^6^^^^1
- +29 ;;^UTILITY(U,$J,358.3,13035,1,0)
- +30 ;;=^358.31IA^3^2
- +31 ;;^UTILITY(U,$J,358.3,13035,1,2,0)
- +32 ;;=2^Cardiovrsn,Elctv,Electr Convrsn,Arrhyth,Int
- +33 ;;^UTILITY(U,$J,358.3,13035,1,3,0)
- +34 ;;=3^92961
- +35 ;;^UTILITY(U,$J,358.3,13036,0)
- +36 ;;=93306^^52^575^7^^^^1
- +37 ;;^UTILITY(U,$J,358.3,13036,1,0)
- +38 ;;=^358.31IA^3^2
- +39 ;;^UTILITY(U,$J,358.3,13036,1,2,0)
- +40 ;;=2^Echocardio,Transthor w/ Spectr & Color Flow Dopp
- +41 ;;^UTILITY(U,$J,358.3,13036,1,3,0)
- +42 ;;=3^93306
- +43 ;;^UTILITY(U,$J,358.3,13037,0)
- +44 ;;=93307^^52^575^8^^^^1
- +45 ;;^UTILITY(U,$J,358.3,13037,1,0)
- +46 ;;=^358.31IA^3^2
- +47 ;;^UTILITY(U,$J,358.3,13037,1,2,0)
- +48 ;;=2^Echocardio,Transthor w/o Spectr or Color Flow Dopp
- +49 ;;^UTILITY(U,$J,358.3,13037,1,3,0)
- +50 ;;=3^93307
- +51 ;;^UTILITY(U,$J,358.3,13038,0)
- +52 ;;=99152^^52^576^1^^^^1
- +53 ;;^UTILITY(U,$J,358.3,13038,1,0)
- +54 ;;=^358.31IA^3^2
- +55 ;;^UTILITY(U,$J,358.3,13038,1,2,0)
- +56 ;;=2^Moderate Sedation,Init 15 min
- +57 ;;^UTILITY(U,$J,358.3,13038,1,3,0)
- +58 ;;=3^99152
- +59 ;;^UTILITY(U,$J,358.3,13039,0)
- +60 ;;=99153^^52^576^2^^^^1
- +61 ;;^UTILITY(U,$J,358.3,13039,1,0)
- +62 ;;=^358.31IA^3^2
- +63 ;;^UTILITY(U,$J,358.3,13039,1,2,0)
- +64 ;;=2^Moderate Sedation,Ea Addl 15 Min
- +65 ;;^UTILITY(U,$J,358.3,13039,1,3,0)
- +66 ;;=3^99153
- +67 ;;^UTILITY(U,$J,358.3,13040,0)
- +68 ;;=99605^^52^577^1^^^^1
- +69 ;;^UTILITY(U,$J,358.3,13040,1,0)
- +70 ;;=^358.31IA^3^2
- +71 ;;^UTILITY(U,$J,358.3,13040,1,2,0)
- +72 ;;=2^MTMS by Pharm,F2F,New Pt,1st 15 min
- +73 ;;^UTILITY(U,$J,358.3,13040,1,3,0)
- +74 ;;=3^99605
- +75 ;;^UTILITY(U,$J,358.3,13041,0)
- +76 ;;=99606^^52^577^2^^^^1
- +77 ;;^UTILITY(U,$J,358.3,13041,1,0)
- +78 ;;=^358.31IA^3^2
- +79 ;;^UTILITY(U,$J,358.3,13041,1,2,0)
- +80 ;;=2^MTMS by Pharm,F2F,Est Pt,1st 15 min
- +81 ;;^UTILITY(U,$J,358.3,13041,1,3,0)
- +82 ;;=3^99606
- +83 ;;^UTILITY(U,$J,358.3,13042,0)
- +84 ;;=99607^^52^577^3^^^^1
- +85 ;;^UTILITY(U,$J,358.3,13042,1,0)
- +86 ;;=^358.31IA^3^2
- +87 ;;^UTILITY(U,$J,358.3,13042,1,2,0)
- +88 ;;=2^MTMS by Pharm,F2F,Ea Addl 15 min
- +89 ;;^UTILITY(U,$J,358.3,13042,1,3,0)
- +90 ;;=3^99607
- +91 ;;^UTILITY(U,$J,358.3,13043,0)
- +92 ;;=90471^^52^578^1^^^^1
- +93 ;;^UTILITY(U,$J,358.3,13043,1,0)
- +94 ;;=^358.31IA^3^2
- +95 ;;^UTILITY(U,$J,358.3,13043,1,2,0)
- +96 ;;=2^Immunization Admin,1 Vaccine
- +97 ;;^UTILITY(U,$J,358.3,13043,1,3,0)
- +98 ;;=3^90471
- +99 ;;^UTILITY(U,$J,358.3,13044,0)
- +100 ;;=90658^^52^578^2^^^^1
- +101 ;;^UTILITY(U,$J,358.3,13044,1,0)
- +102 ;;=^358.31IA^3^2
- +103 ;;^UTILITY(U,$J,358.3,13044,1,2,0)
- +104 ;;=2^Flu,Trivalent (IIV3),Split Vaccine
- +105 ;;^UTILITY(U,$J,358.3,13044,1,3,0)
- +106 ;;=3^90658
- +107 ;;^UTILITY(U,$J,358.3,13045,0)
- +108 ;;=E66.9^^53^579^44
- +109 ;;^UTILITY(U,$J,358.3,13045,1,0)
- +110 ;;=^358.31IA^4^2
- +111 ;;^UTILITY(U,$J,358.3,13045,1,3,0)
- +112 ;;=3^Obesity,Unspec
- +113 ;;^UTILITY(U,$J,358.3,13045,1,4,0)
- +114 ;;=4^E66.9
- +115 ;;^UTILITY(U,$J,358.3,13045,2)
- +116 ;;=^5002832
- +117 ;;^UTILITY(U,$J,358.3,13046,0)
- +118 ;;=E66.01^^53^579^42
- +119 ;;^UTILITY(U,$J,358.3,13046,1,0)
- +120 ;;=^358.31IA^4^2
- +121 ;;^UTILITY(U,$J,358.3,13046,1,3,0)
- +122 ;;=3^Morbid Obesity d/t Excess Calories
- +123 ;;^UTILITY(U,$J,358.3,13046,1,4,0)
- +124 ;;=4^E66.01
- +125 ;;^UTILITY(U,$J,358.3,13046,2)
- +126 ;;=^5002826
- +127 ;;^UTILITY(U,$J,358.3,13047,0)
- +128 ;;=E66.3^^53^579^45
- +129 ;;^UTILITY(U,$J,358.3,13047,1,0)
- +130 ;;=^358.31IA^4^2
- +131 ;;^UTILITY(U,$J,358.3,13047,1,3,0)
- +132 ;;=3^Overweight
- +133 ;;^UTILITY(U,$J,358.3,13047,1,4,0)
- +134 ;;=4^E66.3
- +135 ;;^UTILITY(U,$J,358.3,13047,2)
- +136 ;;=^5002830
- +137 ;;^UTILITY(U,$J,358.3,13048,0)
- +138 ;;=E66.2^^53^579^43
- +139 ;;^UTILITY(U,$J,358.3,13048,1,0)
- +140 ;;=^358.31IA^4^2
- +141 ;;^UTILITY(U,$J,358.3,13048,1,3,0)
- +142 ;;=3^Morbid Obesity w/ Alveolar Hypoventilation
- +143 ;;^UTILITY(U,$J,358.3,13048,1,4,0)
- +144 ;;=4^E66.2
- +145 ;;^UTILITY(U,$J,358.3,13048,2)
- +146 ;;=^5002829
- +147 ;;^UTILITY(U,$J,358.3,13049,0)
- +148 ;;=H53.9^^53^579^70
- +149 ;;^UTILITY(U,$J,358.3,13049,1,0)
- +150 ;;=^358.31IA^4^2
- +151 ;;^UTILITY(U,$J,358.3,13049,1,3,0)
- +152 ;;=3^Visual Disturbance,Unspec
- +153 ;;^UTILITY(U,$J,358.3,13049,1,4,0)
- +154 ;;=4^H53.9
- +155 ;;^UTILITY(U,$J,358.3,13049,2)
- +156 ;;=^124001
- +157 ;;^UTILITY(U,$J,358.3,13050,0)
- +158 ;;=G45.9^^53^579^64
- +159 ;;^UTILITY(U,$J,358.3,13050,1,0)
- +160 ;;=^358.31IA^4^2
- +161 ;;^UTILITY(U,$J,358.3,13050,1,3,0)
- +162 ;;=3^Transient Cerebral ischemic Attack,Unspec
- +163 ;;^UTILITY(U,$J,358.3,13050,1,4,0)
- +164 ;;=4^G45.9
- +165 ;;^UTILITY(U,$J,358.3,13050,2)
- +166 ;;=^5003959
- +167 ;;^UTILITY(U,$J,358.3,13051,0)
- +168 ;;=I67.848^^53^579^14
- +169 ;;^UTILITY(U,$J,358.3,13051,1,0)
- +170 ;;=^358.31IA^4^2
- +171 ;;^UTILITY(U,$J,358.3,13051,1,3,0)
- +172 ;;=3^Cerebrovascular Vasospasm/Vasoconstriction NEC
- +173 ;;^UTILITY(U,$J,358.3,13051,1,4,0)
- +174 ;;=4^I67.848
- +175 ;;^UTILITY(U,$J,358.3,13051,2)
- +176 ;;=^5007387
- +177 ;;^UTILITY(U,$J,358.3,13052,0)
- +178 ;;=R26.2^^53^579^20
- +179 ;;^UTILITY(U,$J,358.3,13052,1,0)
- +180 ;;=^358.31IA^4^2
- +181 ;;^UTILITY(U,$J,358.3,13052,1,3,0)
- +182 ;;=3^Difficulty in Walking NEC
- +183 ;;^UTILITY(U,$J,358.3,13052,1,4,0)
- +184 ;;=4^R26.2
- +185 ;;^UTILITY(U,$J,358.3,13052,2)
- +186 ;;=^5019306
- +187 ;;^UTILITY(U,$J,358.3,13053,0)
- +188 ;;=R56.1^^53^579^53
- +189 ;;^UTILITY(U,$J,358.3,13053,1,0)
- +190 ;;=^358.31IA^4^2
- +191 ;;^UTILITY(U,$J,358.3,13053,1,3,0)
- +192 ;;=3^Post Traumatic Seizures
- +193 ;;^UTILITY(U,$J,358.3,13053,1,4,0)
- +194 ;;=4^R56.1
- +195 ;;^UTILITY(U,$J,358.3,13053,2)
- +196 ;;=^5019523
- +197 ;;^UTILITY(U,$J,358.3,13054,0)
- +198 ;;=R56.9^^53^579^17
- +199 ;;^UTILITY(U,$J,358.3,13054,1,0)
- +200 ;;=^358.31IA^4^2
- +201 ;;^UTILITY(U,$J,358.3,13054,1,3,0)
- +202 ;;=3^Convulsions,Unspec
- +203 ;;^UTILITY(U,$J,358.3,13054,1,4,0)
- +204 ;;=4^R56.9
- +205 ;;^UTILITY(U,$J,358.3,13054,2)
- +206 ;;=^5019524
- +207 ;;^UTILITY(U,$J,358.3,13055,0)
- +208 ;;=R42.^^53^579^21
- +209 ;;^UTILITY(U,$J,358.3,13055,1,0)
- +210 ;;=^358.31IA^4^2
- +211 ;;^UTILITY(U,$J,358.3,13055,1,3,0)
- +212 ;;=3^Dizziness and Giddiness
- +213 ;;^UTILITY(U,$J,358.3,13055,1,4,0)
- +214 ;;=4^R42.
- +215 ;;^UTILITY(U,$J,358.3,13055,2)
- +216 ;;=^5019450
- +217 ;;^UTILITY(U,$J,358.3,13056,0)
- +218 ;;=R50.9^^53^579^27
- +219 ;;^UTILITY(U,$J,358.3,13056,1,0)
- +220 ;;=^358.31IA^4^2
- +221 ;;^UTILITY(U,$J,358.3,13056,1,3,0)
- +222 ;;=3^Fever,Unspec
- +223 ;;^UTILITY(U,$J,358.3,13056,1,4,0)
- +224 ;;=4^R50.9
- +225 ;;^UTILITY(U,$J,358.3,13056,2)
- +226 ;;=^5019512
- +227 ;;^UTILITY(U,$J,358.3,13057,0)
- +228 ;;=R25.0^^53^579^5
- +229 ;;^UTILITY(U,$J,358.3,13057,1,0)
- +230 ;;=^358.31IA^4^2
- +231 ;;^UTILITY(U,$J,358.3,13057,1,3,0)
- +232 ;;=3^Abnormal Head Movements
- +233 ;;^UTILITY(U,$J,358.3,13057,1,4,0)
- +234 ;;=4^R25.0
- +235 ;;^UTILITY(U,$J,358.3,13057,2)
- +236 ;;=^5019299
- +237 ;;^UTILITY(U,$J,358.3,13058,0)
- +238 ;;=R25.1^^53^579^66
- +239 ;;^UTILITY(U,$J,358.3,13058,1,0)
- +240 ;;=^358.31IA^4^2
- +241 ;;^UTILITY(U,$J,358.3,13058,1,3,0)
- +242 ;;=3^Tremor,Unspec
- +243 ;;^UTILITY(U,$J,358.3,13058,1,4,0)
- +244 ;;=4^R25.1
- +245 ;;^UTILITY(U,$J,358.3,13058,2)
- +246 ;;=^5019300
- +247 ;;^UTILITY(U,$J,358.3,13059,0)
- +248 ;;=R25.2^^53^579^19
- +249 ;;^UTILITY(U,$J,358.3,13059,1,0)
- +250 ;;=^358.31IA^4^2
- +251 ;;^UTILITY(U,$J,358.3,13059,1,3,0)
- +252 ;;=3^Cramp and Spasm
- +253 ;;^UTILITY(U,$J,358.3,13059,1,4,0)
- +254 ;;=4^R25.2
- +255 ;;^UTILITY(U,$J,358.3,13059,2)
- +256 ;;=^5019301
- +257 ;;^UTILITY(U,$J,358.3,13060,0)
- +258 ;;=R25.3^^53^579^26
- +259 ;;^UTILITY(U,$J,358.3,13060,1,0)
- +260 ;;=^358.31IA^4^2
- +261 ;;^UTILITY(U,$J,358.3,13060,1,3,0)
- +262 ;;=3^Fasciculation
- +263 ;;^UTILITY(U,$J,358.3,13060,1,4,0)
- +264 ;;=4^R25.3
- +265 ;;^UTILITY(U,$J,358.3,13060,2)
- +266 ;;=^44985
- +267 ;;^UTILITY(U,$J,358.3,13061,0)
- +268 ;;=R25.9^^53^579^6
- +269 ;;^UTILITY(U,$J,358.3,13061,1,0)
- +270 ;;=^358.31IA^4^2
- +271 ;;^UTILITY(U,$J,358.3,13061,1,3,0)
- +272 ;;=3^Abnormal Involuntary Movements,Unspec
- +273 ;;^UTILITY(U,$J,358.3,13061,1,4,0)
- +274 ;;=4^R25.9
- +275 ;;^UTILITY(U,$J,358.3,13061,2)
- +276 ;;=^5019303
- +277 ;;^UTILITY(U,$J,358.3,13062,0)
- +278 ;;=R43.0^^53^579^8
- +279 ;;^UTILITY(U,$J,358.3,13062,1,0)
- +280 ;;=^358.31IA^4^2
- +281 ;;^UTILITY(U,$J,358.3,13062,1,3,0)
- +282 ;;=3^Anosmia
- +283 ;;^UTILITY(U,$J,358.3,13062,1,4,0)
- +284 ;;=4^R43.0
- +285 ;;^UTILITY(U,$J,358.3,13062,2)
- +286 ;;=^7949
- +287 ;;^UTILITY(U,$J,358.3,13063,0)
- +288 ;;=R43.1^^53^579^48
- +289 ;;^UTILITY(U,$J,358.3,13063,1,0)
- +290 ;;=^358.31IA^4^2
- +291 ;;^UTILITY(U,$J,358.3,13063,1,3,0)
- +292 ;;=3^Parosmia
- +293 ;;^UTILITY(U,$J,358.3,13063,1,4,0)
- +294 ;;=4^R43.1
- +295 ;;^UTILITY(U,$J,358.3,13063,2)
- +296 ;;=^5019451
- +297 ;;^UTILITY(U,$J,358.3,13064,0)
- +298 ;;=R43.2^^53^579^46
- +299 ;;^UTILITY(U,$J,358.3,13064,1,0)
- +300 ;;=^358.31IA^4^2
- +301 ;;^UTILITY(U,$J,358.3,13064,1,3,0)
- +302 ;;=3^Parageusia
- +303 ;;^UTILITY(U,$J,358.3,13064,1,4,0)
- +304 ;;=4^R43.2
- +305 ;;^UTILITY(U,$J,358.3,13064,2)
- +306 ;;=^5019452
- +307 ;;^UTILITY(U,$J,358.3,13065,0)
- +308 ;;=R26.0^^53^579^13
- +309 ;;^UTILITY(U,$J,358.3,13065,1,0)
- +310 ;;=^358.31IA^4^2
- +311 ;;^UTILITY(U,$J,358.3,13065,1,3,0)
- +312 ;;=3^Ataxic Gait
- +313 ;;^UTILITY(U,$J,358.3,13065,1,4,0)
- +314 ;;=4^R26.0
- +315 ;;^UTILITY(U,$J,358.3,13065,2)
- +316 ;;=^5019304
- +317 ;;^UTILITY(U,$J,358.3,13066,0)
- +318 ;;=R26.1^^53^579^47
- +319 ;;^UTILITY(U,$J,358.3,13066,1,0)
- +320 ;;=^358.31IA^4^2
- +321 ;;^UTILITY(U,$J,358.3,13066,1,3,0)
- +322 ;;=3^Paralytic Gait
- +323 ;;^UTILITY(U,$J,358.3,13066,1,4,0)
- +324 ;;=4^R26.1
- +325 ;;^UTILITY(U,$J,358.3,13066,2)
- +326 ;;=^5019305
- +327 ;;^UTILITY(U,$J,358.3,13067,0)
- +328 ;;=R26.89^^53^579^28
- +329 ;;^UTILITY(U,$J,358.3,13067,1,0)
- +330 ;;=^358.31IA^4^2
- +331 ;;^UTILITY(U,$J,358.3,13067,1,3,0)
- +332 ;;=3^Gait/Mobility Abnormalities NEC
- +333 ;;^UTILITY(U,$J,358.3,13067,1,4,0)
- +334 ;;=4^R26.89
- +335 ;;^UTILITY(U,$J,358.3,13067,2)
- +336 ;;=^5019308
- +337 ;;^UTILITY(U,$J,358.3,13068,0)
- +338 ;;=R26.9^^53^579^29
- +339 ;;^UTILITY(U,$J,358.3,13068,1,0)
- +340 ;;=^358.31IA^4^2
- +341 ;;^UTILITY(U,$J,358.3,13068,1,3,0)
- +342 ;;=3^Gait/Mobility Abnormalities,Unspec
- +343 ;;^UTILITY(U,$J,358.3,13068,1,4,0)
- +344 ;;=4^R26.9
- +345 ;;^UTILITY(U,$J,358.3,13068,2)
- +346 ;;=^5019309
- +347 ;;^UTILITY(U,$J,358.3,13069,0)
- +348 ;;=R27.0^^53^579^12
- +349 ;;^UTILITY(U,$J,358.3,13069,1,0)
- +350 ;;=^358.31IA^4^2
- +351 ;;^UTILITY(U,$J,358.3,13069,1,3,0)
- +352 ;;=3^Ataxia,Unspec
- +353 ;;^UTILITY(U,$J,358.3,13069,1,4,0)
- +354 ;;=4^R27.0
- +355 ;;^UTILITY(U,$J,358.3,13069,2)
- +356 ;;=^5019310
- +357 ;;^UTILITY(U,$J,358.3,13070,0)
- +358 ;;=R27.8^^53^579^37
- +359 ;;^UTILITY(U,$J,358.3,13070,1,0)
- +360 ;;=^358.31IA^4^2
- +361 ;;^UTILITY(U,$J,358.3,13070,1,3,0)
- +362 ;;=3^Lack of Coordination NEC
- +363 ;;^UTILITY(U,$J,358.3,13070,1,4,0)
- +364 ;;=4^R27.8
- +365 ;;^UTILITY(U,$J,358.3,13070,2)
- +366 ;;=^5019311
- +367 ;;^UTILITY(U,$J,358.3,13071,0)
- +368 ;;=R27.9^^53^579^38
- +369 ;;^UTILITY(U,$J,358.3,13071,1,0)
- +370 ;;=^358.31IA^4^2
- +371 ;;^UTILITY(U,$J,358.3,13071,1,3,0)
- +372 ;;=3^Lack of Coordination,Unspec
- +373 ;;^UTILITY(U,$J,358.3,13071,1,4,0)
- +374 ;;=4^R27.9
- +375 ;;^UTILITY(U,$J,358.3,13071,2)
- +376 ;;=^5019312
- +377 ;;^UTILITY(U,$J,358.3,13072,0)
- +378 ;;=R29.5^^53^579^65
- +379 ;;^UTILITY(U,$J,358.3,13072,1,0)
- +380 ;;=^358.31IA^4^2
- +381 ;;^UTILITY(U,$J,358.3,13072,1,3,0)
- +382 ;;=3^Transient Paralysis
- +383 ;;^UTILITY(U,$J,358.3,13072,1,4,0)
- +384 ;;=4^R29.5
- +385 ;;^UTILITY(U,$J,358.3,13072,2)
- +386 ;;=^5019316
- +387 ;;^UTILITY(U,$J,358.3,13073,0)
- +388 ;;=R47.01^^53^579^9
- +389 ;;^UTILITY(U,$J,358.3,13073,1,0)
- +390 ;;=^358.31IA^4^2
- +391 ;;^UTILITY(U,$J,358.3,13073,1,3,0)
- +392 ;;=3^Aphasia
- +393 ;;^UTILITY(U,$J,358.3,13073,1,4,0)
- +394 ;;=4^R47.01
- +395 ;;^UTILITY(U,$J,358.3,13073,2)
- +396 ;;=^5019488
- +397 ;;^UTILITY(U,$J,358.3,13074,0)
- +398 ;;=R59.9^^53^579^22
- +399 ;;^UTILITY(U,$J,358.3,13074,1,0)
- +400 ;;=^358.31IA^4^2
- +401 ;;^UTILITY(U,$J,358.3,13074,1,3,0)
- +402 ;;=3^Enlarged Lymph Nodes,Unspec
- +403 ;;^UTILITY(U,$J,358.3,13074,1,4,0)
- +404 ;;=4^R59.9
- +405 ;;^UTILITY(U,$J,358.3,13074,2)
- +406 ;;=^5019531
- +407 ;;^UTILITY(U,$J,358.3,13075,0)
- +408 ;;=R06.2^^53^579^71
- +409 ;;^UTILITY(U,$J,358.3,13075,1,0)
- +410 ;;=^358.31IA^4^2
- +411 ;;^UTILITY(U,$J,358.3,13075,1,3,0)
- +412 ;;=3^Wheezing
- +413 ;;^UTILITY(U,$J,358.3,13075,1,4,0)
- +414 ;;=4^R06.2
- +415 ;;^UTILITY(U,$J,358.3,13075,2)
- +416 ;;=^5019184
- +417 ;;^UTILITY(U,$J,358.3,13076,0)
- +418 ;;=R06.1^^53^579^63
- +419 ;;^UTILITY(U,$J,358.3,13076,1,0)
- +420 ;;=^358.31IA^4^2
- +421 ;;^UTILITY(U,$J,358.3,13076,1,3,0)
- +422 ;;=3^Stridor
- +423 ;;^UTILITY(U,$J,358.3,13076,1,4,0)
- +424 ;;=4^R06.1
- +425 ;;^UTILITY(U,$J,358.3,13076,2)
- +426 ;;=^5019183
- +427 ;;^UTILITY(U,$J,358.3,13077,0)
- +428 ;;=R04.2^^53^579^30
- +429 ;;^UTILITY(U,$J,358.3,13077,1,0)
- +430 ;;=^358.31IA^4^2
- +431 ;;^UTILITY(U,$J,358.3,13077,1,3,0)
- +432 ;;=3^Hemoptysis
- +433 ;;^UTILITY(U,$J,358.3,13077,1,4,0)
- +434 ;;=4^R04.2
- +435 ;;^UTILITY(U,$J,358.3,13077,2)
- +436 ;;=^5019175
- +437 ;;^UTILITY(U,$J,358.3,13078,0)
- +438 ;;=R04.9^^53^579^59
- +439 ;;^UTILITY(U,$J,358.3,13078,1,0)
- +440 ;;=^358.31IA^4^2
- +441 ;;^UTILITY(U,$J,358.3,13078,1,3,0)
- +442 ;;=3^Respiratory Passage Hemorrhage,Unspec
- +443 ;;^UTILITY(U,$J,358.3,13078,1,4,0)
- +444 ;;=4^R04.9
- +445 ;;^UTILITY(U,$J,358.3,13078,2)
- +446 ;;=^5019178
- +447 ;;^UTILITY(U,$J,358.3,13079,0)
- +448 ;;=R07.9^^53^579^16
- +449 ;;^UTILITY(U,$J,358.3,13079,1,0)
- +450 ;;=^358.31IA^4^2
- +451 ;;^UTILITY(U,$J,358.3,13079,1,3,0)
- +452 ;;=3^Chest Pain,Unspec
- +453 ;;^UTILITY(U,$J,358.3,13079,1,4,0)
- +454 ;;=4^R07.9
- +455 ;;^UTILITY(U,$J,358.3,13079,2)
- +456 ;;=^5019201
- +457 ;;^UTILITY(U,$J,358.3,13080,0)
- +458 ;;=R07.2^^53^579^54
- +459 ;;^UTILITY(U,$J,358.3,13080,1,0)
- +460 ;;=^358.31IA^4^2
- +461 ;;^UTILITY(U,$J,358.3,13080,1,3,0)
- +462 ;;=3^Precordial Pain
- +463 ;;^UTILITY(U,$J,358.3,13080,1,4,0)
- +464 ;;=4^R07.2
- +465 ;;^UTILITY(U,$J,358.3,13080,2)
- +466 ;;=^5019197
- +467 ;;^UTILITY(U,$J,358.3,13081,0)
- +468 ;;=R07.1^^53^579^15
- +469 ;;^UTILITY(U,$J,358.3,13081,1,0)
- +470 ;;=^358.31IA^4^2
- +471 ;;^UTILITY(U,$J,358.3,13081,1,3,0)
- +472 ;;=3^Chest Pain on Breathing
- +473 ;;^UTILITY(U,$J,358.3,13081,1,4,0)
- +474 ;;=4^R07.1
- +475 ;;^UTILITY(U,$J,358.3,13081,2)
- +476 ;;=^5019196
- +477 ;;^UTILITY(U,$J,358.3,13082,0)
- +478 ;;=R07.81^^53^579^52
- +479 ;;^UTILITY(U,$J,358.3,13082,1,0)
- +480 ;;=^358.31IA^4^2
- +481 ;;^UTILITY(U,$J,358.3,13082,1,3,0)
- +482 ;;=3^Pleurodynia
- +483 ;;^UTILITY(U,$J,358.3,13082,1,4,0)
- +484 ;;=4^R07.81
- +485 ;;^UTILITY(U,$J,358.3,13082,2)
- +486 ;;=^5019198
- +487 ;;^UTILITY(U,$J,358.3,13083,0)
- +488 ;;=R07.82^^53^579^32
- +489 ;;^UTILITY(U,$J,358.3,13083,1,0)
- +490 ;;=^358.31IA^4^2
- +491 ;;^UTILITY(U,$J,358.3,13083,1,3,0)
- +492 ;;=3^Intercostal Pain
- +493 ;;^UTILITY(U,$J,358.3,13083,1,4,0)
- +494 ;;=4^R07.82
- +495 ;;^UTILITY(U,$J,358.3,13083,2)
- +496 ;;=^5019199
- +497 ;;^UTILITY(U,$J,358.3,13084,0)
- +498 ;;=R22.2^^53^579^67
- +499 ;;^UTILITY(U,$J,358.3,13084,1,0)
- +500 ;;=^358.31IA^4^2
- +501 ;;^UTILITY(U,$J,358.3,13084,1,3,0)
- +502 ;;=3^Trunk Swelling/Mass/Lump,Localized
- +503 ;;^UTILITY(U,$J,358.3,13084,1,4,0)
- +504 ;;=4^R22.2
- +505 ;;^UTILITY(U,$J,358.3,13084,2)
- +506 ;;=^5019286
- +507 ;;^UTILITY(U,$J,358.3,13085,0)
- +508 ;;=R10.11^^53^579^61
- +509 ;;^UTILITY(U,$J,358.3,13085,1,0)
- +510 ;;=^358.31IA^4^2
- +511 ;;^UTILITY(U,$J,358.3,13085,1,3,0)
- +512 ;;=3^Right Upper Quadrant Pain
- +513 ;;^UTILITY(U,$J,358.3,13085,1,4,0)
- +514 ;;=4^R10.11
- +515 ;;^UTILITY(U,$J,358.3,13085,2)
- +516 ;;=^5019206
- +517 ;;^UTILITY(U,$J,358.3,13086,0)
- +518 ;;=R10.12^^53^579^40
- +519 ;;^UTILITY(U,$J,358.3,13086,1,0)
- +520 ;;=^358.31IA^4^2
- +521 ;;^UTILITY(U,$J,358.3,13086,1,3,0)
- +522 ;;=3^Left Upper Quadrant Pain
- +523 ;;^UTILITY(U,$J,358.3,13086,1,4,0)
- +524 ;;=4^R10.12
- +525 ;;^UTILITY(U,$J,358.3,13086,2)
- +526 ;;=^5019207
- +527 ;;^UTILITY(U,$J,358.3,13087,0)
- +528 ;;=R10.31^^53^579^60
- +529 ;;^UTILITY(U,$J,358.3,13087,1,0)
- +530 ;;=^358.31IA^4^2
- +531 ;;^UTILITY(U,$J,358.3,13087,1,3,0)
- +532 ;;=3^Right Lower Quadrant Pain
- +533 ;;^UTILITY(U,$J,358.3,13087,1,4,0)
- +534 ;;=4^R10.31
- +535 ;;^UTILITY(U,$J,358.3,13087,2)
- +536 ;;=^5019211
- +537 ;;^UTILITY(U,$J,358.3,13088,0)
- +538 ;;=R10.32^^53^579^39
- +539 ;;^UTILITY(U,$J,358.3,13088,1,0)
- +540 ;;=^358.31IA^4^2
- +541 ;;^UTILITY(U,$J,358.3,13088,1,3,0)
- +542 ;;=3^Left Lower Quadrant Pain
- +543 ;;^UTILITY(U,$J,358.3,13088,1,4,0)
- +544 ;;=4^R10.32
- +545 ;;^UTILITY(U,$J,358.3,13088,2)
- +546 ;;=^5019212
- +547 ;;^UTILITY(U,$J,358.3,13089,0)
- +548 ;;=R10.33^^53^579^51
- +549 ;;^UTILITY(U,$J,358.3,13089,1,0)
- +550 ;;=^358.31IA^4^2
- +551 ;;^UTILITY(U,$J,358.3,13089,1,3,0)
- +552 ;;=3^Periumbilical Pain
- +553 ;;^UTILITY(U,$J,358.3,13089,1,4,0)
- +554 ;;=4^R10.33
- +555 ;;^UTILITY(U,$J,358.3,13089,2)
- +556 ;;=^5019213
- +557 ;;^UTILITY(U,$J,358.3,13090,0)
- +558 ;;=R10.13^^53^579^24
- +559 ;;^UTILITY(U,$J,358.3,13090,1,0)
- +560 ;;=^358.31IA^4^2
- +561 ;;^UTILITY(U,$J,358.3,13090,1,3,0)
- +562 ;;=3^Epigastric Pain
- +563 ;;^UTILITY(U,$J,358.3,13090,1,4,0)
- +564 ;;=4^R10.13
- +565 ;;^UTILITY(U,$J,358.3,13090,2)
- +566 ;;=^5019208
- +567 ;;^UTILITY(U,$J,358.3,13091,0)
- +568 ;;=R10.84^^53^579^1
- +569 ;;^UTILITY(U,$J,358.3,13091,1,0)
- +570 ;;=^358.31IA^4^2
- +571 ;;^UTILITY(U,$J,358.3,13091,1,3,0)
- +572 ;;=3^Abdominal Pain,Generalized
- +573 ;;^UTILITY(U,$J,358.3,13091,1,4,0)
- +574 ;;=4^R10.84
- +575 ;;^UTILITY(U,$J,358.3,13091,2)
- +576 ;;=^5019229
- +577 ;;^UTILITY(U,$J,358.3,13092,0)
- +578 ;;=R10.10^^53^579^69
- +579 ;;^UTILITY(U,$J,358.3,13092,1,0)
- +580 ;;=^358.31IA^4^2
- +581 ;;^UTILITY(U,$J,358.3,13092,1,3,0)
- +582 ;;=3^Upper Abdominal Pain,Unspec
- +583 ;;^UTILITY(U,$J,358.3,13092,1,4,0)
- +584 ;;=4^R10.10
- +585 ;;^UTILITY(U,$J,358.3,13092,2)
- +586 ;;=^5019205
- +587 ;;^UTILITY(U,$J,358.3,13093,0)
- +588 ;;=R10.30^^53^579^41
- +589 ;;^UTILITY(U,$J,358.3,13093,1,0)
- +590 ;;=^358.31IA^4^2
- +591 ;;^UTILITY(U,$J,358.3,13093,1,3,0)
- +592 ;;=3^Lower Abdominal Pain,Unspec
- +593 ;;^UTILITY(U,$J,358.3,13093,1,4,0)
- +594 ;;=4^R10.30
- +595 ;;^UTILITY(U,$J,358.3,13093,2)
- +596 ;;=^5019210
- +597 ;;^UTILITY(U,$J,358.3,13094,0)
- +598 ;;=R16.0^^53^579^31
- +599 ;;^UTILITY(U,$J,358.3,13094,1,0)
- +600 ;;=^358.31IA^4^2
- +601 ;;^UTILITY(U,$J,358.3,13094,1,3,0)
- +602 ;;=3^Hepatomegaly NEC
- +603 ;;^UTILITY(U,$J,358.3,13094,1,4,0)
- +604 ;;=4^R16.0
- +605 ;;^UTILITY(U,$J,358.3,13094,2)
- +606 ;;=^5019248
- +607 ;;^UTILITY(U,$J,358.3,13095,0)
- +608 ;;=R16.1^^53^579^62
- +609 ;;^UTILITY(U,$J,358.3,13095,1,0)
- +610 ;;=^358.31IA^4^2
- +611 ;;^UTILITY(U,$J,358.3,13095,1,3,0)
- +612 ;;=3^Splenomegaly NEC
- +613 ;;^UTILITY(U,$J,358.3,13095,1,4,0)
- +614 ;;=4^R16.1
- +615 ;;^UTILITY(U,$J,358.3,13095,2)
- +616 ;;=^5019249
- +617 ;;^UTILITY(U,$J,358.3,13096,0)
- +618 ;;=R19.01^^53^579^58
- +619 ;;^UTILITY(U,$J,358.3,13096,1,0)
- +620 ;;=^358.31IA^4^2
- +621 ;;^UTILITY(U,$J,358.3,13096,1,3,0)
- +622 ;;=3^RUQ Abdominal Swelling/Mass/Lump
- +623 ;;^UTILITY(U,$J,358.3,13096,1,4,0)
- +624 ;;=4^R19.01
- +625 ;;^UTILITY(U,$J,358.3,13096,2)
- +626 ;;=^5019255
- +627 ;;^UTILITY(U,$J,358.3,13097,0)
- +628 ;;=R19.02^^53^579^36
- +629 ;;^UTILITY(U,$J,358.3,13097,1,0)
- +630 ;;=^358.31IA^4^2
- +631 ;;^UTILITY(U,$J,358.3,13097,1,3,0)
- +632 ;;=3^LUQ Abdominal Swelling/Mass/Lump
- +633 ;;^UTILITY(U,$J,358.3,13097,1,4,0)
- +634 ;;=4^R19.02
- +635 ;;^UTILITY(U,$J,358.3,13097,2)
- +636 ;;=^5019256
- +637 ;;^UTILITY(U,$J,358.3,13098,0)
- +638 ;;=R19.03^^53^579^56
- +639 ;;^UTILITY(U,$J,358.3,13098,1,0)
- +640 ;;=^358.31IA^4^2
- +641 ;;^UTILITY(U,$J,358.3,13098,1,3,0)
- +642 ;;=3^RLQ Abdominal Swelling/Mass/Lump
- +643 ;;^UTILITY(U,$J,358.3,13098,1,4,0)
- +644 ;;=4^R19.03
- +645 ;;^UTILITY(U,$J,358.3,13098,2)
- +646 ;;=^5019257
- +647 ;;^UTILITY(U,$J,358.3,13099,0)
- +648 ;;=R19.04^^53^579^34
- +649 ;;^UTILITY(U,$J,358.3,13099,1,0)
- +650 ;;=^358.31IA^4^2
- +651 ;;^UTILITY(U,$J,358.3,13099,1,3,0)
- +652 ;;=3^LLQ Abdominal Swelling/Mass/Lump
- +653 ;;^UTILITY(U,$J,358.3,13099,1,4,0)
- +654 ;;=4^R19.04
- +655 ;;^UTILITY(U,$J,358.3,13099,2)
- +656 ;;=^5134175
- +657 ;;^UTILITY(U,$J,358.3,13100,0)
- +658 ;;=R19.05^^53^579^50
- +659 ;;^UTILITY(U,$J,358.3,13100,1,0)
- +660 ;;=^358.31IA^4^2
- +661 ;;^UTILITY(U,$J,358.3,13100,1,3,0)
- +662 ;;=3^Periumbilic Swelling/Mass/Lump
- +663 ;;^UTILITY(U,$J,358.3,13100,1,4,0)
- +664 ;;=4^R19.05
- +665 ;;^UTILITY(U,$J,358.3,13100,2)
- +666 ;;=^5019258
- +667 ;;^UTILITY(U,$J,358.3,13101,0)
- +668 ;;=R19.06^^53^579^25
- +669 ;;^UTILITY(U,$J,358.3,13101,1,0)
- +670 ;;=^358.31IA^4^2
- +671 ;;^UTILITY(U,$J,358.3,13101,1,3,0)
- +672 ;;=3^Epigastric Swelling/Mass/Lump
- +673 ;;^UTILITY(U,$J,358.3,13101,1,4,0)
- +674 ;;=4^R19.06
- +675 ;;^UTILITY(U,$J,358.3,13101,2)
- +676 ;;=^5019259
- +677 ;;^UTILITY(U,$J,358.3,13102,0)
- +678 ;;=R19.07^^53^579^3
- +679 ;;^UTILITY(U,$J,358.3,13102,1,0)
- +680 ;;=^358.31IA^4^2
- +681 ;;^UTILITY(U,$J,358.3,13102,1,3,0)
- +682 ;;=3^Abdominal/Pelvic Swelling/Mass/Lump,Generalized
- +683 ;;^UTILITY(U,$J,358.3,13102,1,4,0)
- +684 ;;=4^R19.07
- +685 ;;^UTILITY(U,$J,358.3,13102,2)
- +686 ;;=^5019260
- +687 ;;^UTILITY(U,$J,358.3,13103,0)
- +688 ;;=R19.31^^53^579^57
- +689 ;;^UTILITY(U,$J,358.3,13103,1,0)
- +690 ;;=^358.31IA^4^2
- +691 ;;^UTILITY(U,$J,358.3,13103,1,3,0)
- +692 ;;=3^RUQ Abdominal Rigidity
- +693 ;;^UTILITY(U,$J,358.3,13103,1,4,0)
- +694 ;;=4^R19.31
- +695 ;;^UTILITY(U,$J,358.3,13103,2)
- +696 ;;=^5019267
- +697 ;;^UTILITY(U,$J,358.3,13104,0)
- +698 ;;=R19.32^^53^579^35
- +699 ;;^UTILITY(U,$J,358.3,13104,1,0)
- +700 ;;=^358.31IA^4^2