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

IBDEI03U.m

Go to the documentation of this file.
IBDEI03U ; ; 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,9218,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9218,1,3,0)
 ;;=3^Personal Hx of Musculoskeletal/Connective Tissue Disease
 ;;^UTILITY(U,$J,358.3,9218,1,4,0)
 ;;=4^Z87.39
 ;;^UTILITY(U,$J,358.3,9218,2)
 ;;=^5063488
 ;;^UTILITY(U,$J,358.3,9219,0)
 ;;=Z87.820^^45^432^105
 ;;^UTILITY(U,$J,358.3,9219,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9219,1,3,0)
 ;;=3^Personal Hx of TBI
 ;;^UTILITY(U,$J,358.3,9219,1,4,0)
 ;;=4^Z87.820
 ;;^UTILITY(U,$J,358.3,9219,2)
 ;;=^5063514
 ;;^UTILITY(U,$J,358.3,9220,0)
 ;;=Z91.82^^45^432^95
 ;;^UTILITY(U,$J,358.3,9220,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9220,1,3,0)
 ;;=3^Personal Hx of Military Deployment
 ;;^UTILITY(U,$J,358.3,9220,1,4,0)
 ;;=4^Z91.82
 ;;^UTILITY(U,$J,358.3,9220,2)
 ;;=^5063626
 ;;^UTILITY(U,$J,358.3,9221,0)
 ;;=Z91.030^^45^432^5
 ;;^UTILITY(U,$J,358.3,9221,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9221,1,3,0)
 ;;=3^Bee Allergy
 ;;^UTILITY(U,$J,358.3,9221,1,4,0)
 ;;=4^Z91.030
 ;;^UTILITY(U,$J,358.3,9221,2)
 ;;=^5063605
 ;;^UTILITY(U,$J,358.3,9222,0)
 ;;=Z91.038^^45^432^52
 ;;^UTILITY(U,$J,358.3,9222,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9222,1,3,0)
 ;;=3^Insect Allergy NEC
 ;;^UTILITY(U,$J,358.3,9222,1,4,0)
 ;;=4^Z91.038
 ;;^UTILITY(U,$J,358.3,9222,2)
 ;;=^5063606
 ;;^UTILITY(U,$J,358.3,9223,0)
 ;;=Z91.041^^45^432^145
 ;;^UTILITY(U,$J,358.3,9223,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9223,1,3,0)
 ;;=3^Radiographic Dye Allergy
 ;;^UTILITY(U,$J,358.3,9223,1,4,0)
 ;;=4^Z91.041
 ;;^UTILITY(U,$J,358.3,9223,2)
 ;;=^5063608
 ;;^UTILITY(U,$J,358.3,9224,0)
 ;;=Z91.130^^45^432^152
 ;;^UTILITY(U,$J,358.3,9224,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9224,1,3,0)
 ;;=3^Underdose of Med Regiment d/t Age-Related Debility
 ;;^UTILITY(U,$J,358.3,9224,1,4,0)
 ;;=4^Z91.130
 ;;^UTILITY(U,$J,358.3,9224,2)
 ;;=^5063614
 ;;^UTILITY(U,$J,358.3,9225,0)
 ;;=Z91.138^^45^432^153
 ;;^UTILITY(U,$J,358.3,9225,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9225,1,3,0)
 ;;=3^Underdose of Med Regiment for Other Reason
 ;;^UTILITY(U,$J,358.3,9225,1,4,0)
 ;;=4^Z91.138
 ;;^UTILITY(U,$J,358.3,9225,2)
 ;;=^5063615
 ;;^UTILITY(U,$J,358.3,9226,0)
 ;;=Z91.14^^45^432^64
 ;;^UTILITY(U,$J,358.3,9226,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9226,1,3,0)
 ;;=3^Noncompliance w/ Medication Regimen
 ;;^UTILITY(U,$J,358.3,9226,1,4,0)
 ;;=4^Z91.14
 ;;^UTILITY(U,$J,358.3,9226,2)
 ;;=^5063616
 ;;^UTILITY(U,$J,358.3,9227,0)
 ;;=Z91.19^^45^432^63
 ;;^UTILITY(U,$J,358.3,9227,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9227,1,3,0)
 ;;=3^Noncompliance w/ Medical Treatment & Regimen
 ;;^UTILITY(U,$J,358.3,9227,1,4,0)
 ;;=4^Z91.19
 ;;^UTILITY(U,$J,358.3,9227,2)
 ;;=^5063618
 ;;^UTILITY(U,$J,358.3,9228,0)
 ;;=Z93.1^^45^432^45
 ;;^UTILITY(U,$J,358.3,9228,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9228,1,3,0)
 ;;=3^Gastrostomy Status
 ;;^UTILITY(U,$J,358.3,9228,1,4,0)
 ;;=4^Z93.1
 ;;^UTILITY(U,$J,358.3,9228,2)
 ;;=^5063643
 ;;^UTILITY(U,$J,358.3,9229,0)
 ;;=Z93.2^^45^432^51
 ;;^UTILITY(U,$J,358.3,9229,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9229,1,3,0)
 ;;=3^Ileostomy Status
 ;;^UTILITY(U,$J,358.3,9229,1,4,0)
 ;;=4^Z93.2
 ;;^UTILITY(U,$J,358.3,9229,2)
 ;;=^5063644
 ;;^UTILITY(U,$J,358.3,9230,0)
 ;;=Z93.3^^45^432^7
 ;;^UTILITY(U,$J,358.3,9230,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9230,1,3,0)
 ;;=3^Colostomy Status
 ;;^UTILITY(U,$J,358.3,9230,1,4,0)
 ;;=4^Z93.3
 ;;^UTILITY(U,$J,358.3,9230,2)
 ;;=^5063645
 ;;^UTILITY(U,$J,358.3,9231,0)
 ;;=Z94.0^^45^432^56
 ;;^UTILITY(U,$J,358.3,9231,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9231,1,3,0)
 ;;=3^Kidney Transplant Status
 ;;^UTILITY(U,$J,358.3,9231,1,4,0)
 ;;=4^Z94.0
 ;;^UTILITY(U,$J,358.3,9231,2)
 ;;=^5063654
 ;;^UTILITY(U,$J,358.3,9232,0)
 ;;=Z94.1^^45^432^49
 ;;^UTILITY(U,$J,358.3,9232,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9232,1,3,0)
 ;;=3^Heart Transplant Status
 ;;^UTILITY(U,$J,358.3,9232,1,4,0)
 ;;=4^Z94.1
 ;;^UTILITY(U,$J,358.3,9232,2)
 ;;=^5063655
 ;;^UTILITY(U,$J,358.3,9233,0)
 ;;=Z94.2^^45^432^59
 ;;^UTILITY(U,$J,358.3,9233,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9233,1,3,0)
 ;;=3^Lung Transplant Status
 ;;^UTILITY(U,$J,358.3,9233,1,4,0)
 ;;=4^Z94.2
 ;;^UTILITY(U,$J,358.3,9233,2)
 ;;=^5063656
 ;;^UTILITY(U,$J,358.3,9234,0)
 ;;=Z94.3^^45^432^48
 ;;^UTILITY(U,$J,358.3,9234,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9234,1,3,0)
 ;;=3^Heart & Lungs Transplant Status
 ;;^UTILITY(U,$J,358.3,9234,1,4,0)
 ;;=4^Z94.3
 ;;^UTILITY(U,$J,358.3,9234,2)
 ;;=^5063657
 ;;^UTILITY(U,$J,358.3,9235,0)
 ;;=Z94.4^^45^432^58
 ;;^UTILITY(U,$J,358.3,9235,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9235,1,3,0)
 ;;=3^Liver Transplant Status
 ;;^UTILITY(U,$J,358.3,9235,1,4,0)
 ;;=4^Z94.4
 ;;^UTILITY(U,$J,358.3,9235,2)
 ;;=^5063658
 ;;^UTILITY(U,$J,358.3,9236,0)
 ;;=Z94.84^^45^432^149
 ;;^UTILITY(U,$J,358.3,9236,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9236,1,3,0)
 ;;=3^Stem Cell Transplant Status
 ;;^UTILITY(U,$J,358.3,9236,1,4,0)
 ;;=4^Z94.84
 ;;^UTILITY(U,$J,358.3,9236,2)
 ;;=^5063665
 ;;^UTILITY(U,$J,358.3,9237,0)
 ;;=Z96.21^^45^432^6
 ;;^UTILITY(U,$J,358.3,9237,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9237,1,3,0)
 ;;=3^Cochlear Implant Status
 ;;^UTILITY(U,$J,358.3,9237,1,4,0)
 ;;=4^Z96.21
 ;;^UTILITY(U,$J,358.3,9237,2)
 ;;=^5063684
 ;;^UTILITY(U,$J,358.3,9238,0)
 ;;=Z96.41^^45^432^132
 ;;^UTILITY(U,$J,358.3,9238,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9238,1,3,0)
 ;;=3^Presence of Insulin Pump
 ;;^UTILITY(U,$J,358.3,9238,1,4,0)
 ;;=4^Z96.41
 ;;^UTILITY(U,$J,358.3,9238,2)
 ;;=^5063688
 ;;^UTILITY(U,$J,358.3,9239,0)
 ;;=Z96.641^^45^432^140
 ;;^UTILITY(U,$J,358.3,9239,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9239,1,3,0)
 ;;=3^Presence of Right Artificial Hip Jt
 ;;^UTILITY(U,$J,358.3,9239,1,4,0)
 ;;=4^Z96.641
 ;;^UTILITY(U,$J,358.3,9239,2)
 ;;=^5063701
 ;;^UTILITY(U,$J,358.3,9240,0)
 ;;=Z96.642^^45^432^135
 ;;^UTILITY(U,$J,358.3,9240,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9240,1,3,0)
 ;;=3^Presence of Left Artificial Hip Jt
 ;;^UTILITY(U,$J,358.3,9240,1,4,0)
 ;;=4^Z96.642
 ;;^UTILITY(U,$J,358.3,9240,2)
 ;;=^5063702
 ;;^UTILITY(U,$J,358.3,9241,0)
 ;;=Z96.643^^45^432^119
 ;;^UTILITY(U,$J,358.3,9241,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9241,1,3,0)
 ;;=3^Presence of Artificial Hip Jt,Bilateral
 ;;^UTILITY(U,$J,358.3,9241,1,4,0)
 ;;=4^Z96.643
 ;;^UTILITY(U,$J,358.3,9241,2)
 ;;=^5063703
 ;;^UTILITY(U,$J,358.3,9242,0)
 ;;=Z96.651^^45^432^141
 ;;^UTILITY(U,$J,358.3,9242,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9242,1,3,0)
 ;;=3^Presence of Right Artificial Knee Jt
 ;;^UTILITY(U,$J,358.3,9242,1,4,0)
 ;;=4^Z96.651
 ;;^UTILITY(U,$J,358.3,9242,2)
 ;;=^5063705
 ;;^UTILITY(U,$J,358.3,9243,0)
 ;;=Z96.652^^45^432^136
 ;;^UTILITY(U,$J,358.3,9243,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9243,1,3,0)
 ;;=3^Presence of Left Artificial Knee Jt
 ;;^UTILITY(U,$J,358.3,9243,1,4,0)
 ;;=4^Z96.652
 ;;^UTILITY(U,$J,358.3,9243,2)
 ;;=^5063706
 ;;^UTILITY(U,$J,358.3,9244,0)
 ;;=Z96.653^^45^432^120
 ;;^UTILITY(U,$J,358.3,9244,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9244,1,3,0)
 ;;=3^Presence of Artificial Knee Jt,Bilateral
 ;;^UTILITY(U,$J,358.3,9244,1,4,0)
 ;;=4^Z96.653
 ;;^UTILITY(U,$J,358.3,9244,2)
 ;;=^5063707
 ;;^UTILITY(U,$J,358.3,9245,0)
 ;;=Z96.7^^45^432^125
 ;;^UTILITY(U,$J,358.3,9245,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9245,1,3,0)
 ;;=3^Presence of Bone/Tendon Implants NEC
 ;;^UTILITY(U,$J,358.3,9245,1,4,0)
 ;;=4^Z96.7
 ;;^UTILITY(U,$J,358.3,9245,2)
 ;;=^5063716
 ;;^UTILITY(U,$J,358.3,9246,0)
 ;;=Z97.11^^45^432^139
 ;;^UTILITY(U,$J,358.3,9246,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9246,1,3,0)
 ;;=3^Presence of Right Artificial Arm
 ;;^UTILITY(U,$J,358.3,9246,1,4,0)
 ;;=4^Z97.11
 ;;^UTILITY(U,$J,358.3,9246,2)
 ;;=^5063722
 ;;^UTILITY(U,$J,358.3,9247,0)
 ;;=Z97.12^^45^432^134
 ;;^UTILITY(U,$J,358.3,9247,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9247,1,3,0)
 ;;=3^Presence of Left Artificial Arm
 ;;^UTILITY(U,$J,358.3,9247,1,4,0)
 ;;=4^Z97.12
 ;;^UTILITY(U,$J,358.3,9247,2)
 ;;=^5063723
 ;;^UTILITY(U,$J,358.3,9248,0)
 ;;=Z97.13^^45^432^142
 ;;^UTILITY(U,$J,358.3,9248,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9248,1,3,0)
 ;;=3^Presence of Right Artificial Leg
 ;;^UTILITY(U,$J,358.3,9248,1,4,0)
 ;;=4^Z97.13
 ;;^UTILITY(U,$J,358.3,9248,2)
 ;;=^5063724
 ;;^UTILITY(U,$J,358.3,9249,0)
 ;;=Z97.14^^45^432^137
 ;;^UTILITY(U,$J,358.3,9249,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9249,1,3,0)
 ;;=3^Presence of Left Artificial Leg
 ;;^UTILITY(U,$J,358.3,9249,1,4,0)
 ;;=4^Z97.14
 ;;^UTILITY(U,$J,358.3,9249,2)
 ;;=^5063725
 ;;^UTILITY(U,$J,358.3,9250,0)
 ;;=Z97.15^^45^432^116
 ;;^UTILITY(U,$J,358.3,9250,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9250,1,3,0)
 ;;=3^Presence of Artificial Arms,Bilateral
 ;;^UTILITY(U,$J,358.3,9250,1,4,0)
 ;;=4^Z97.15
 ;;^UTILITY(U,$J,358.3,9250,2)
 ;;=^5063726
 ;;^UTILITY(U,$J,358.3,9251,0)
 ;;=Z97.16^^45^432^121
 ;;^UTILITY(U,$J,358.3,9251,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9251,1,3,0)
 ;;=3^Presence of Artificial Legs,Bilateral
 ;;^UTILITY(U,$J,358.3,9251,1,4,0)
 ;;=4^Z97.16
 ;;^UTILITY(U,$J,358.3,9251,2)
 ;;=^5063727
 ;;^UTILITY(U,$J,358.3,9252,0)
 ;;=Z98.61^^45^432^9
 ;;^UTILITY(U,$J,358.3,9252,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9252,1,3,0)
 ;;=3^Coronary Angioplasty Status
 ;;^UTILITY(U,$J,358.3,9252,1,4,0)
 ;;=4^Z98.61
 ;;^UTILITY(U,$J,358.3,9252,2)
 ;;=^5063742
 ;;^UTILITY(U,$J,358.3,9253,0)
 ;;=Z98.62^^45^432^66
 ;;^UTILITY(U,$J,358.3,9253,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9253,1,3,0)
 ;;=3^Peripheral Vascular Angioplasty Status w/o Graft
 ;;^UTILITY(U,$J,358.3,9253,1,4,0)
 ;;=4^Z98.62
 ;;^UTILITY(U,$J,358.3,9253,2)
 ;;=^5063743
 ;;^UTILITY(U,$J,358.3,9254,0)
 ;;=Z98.84^^45^432^4
 ;;^UTILITY(U,$J,358.3,9254,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9254,1,3,0)
 ;;=3^Bariatric Surgery Status
 ;;^UTILITY(U,$J,358.3,9254,1,4,0)
 ;;=4^Z98.84
 ;;^UTILITY(U,$J,358.3,9254,2)
 ;;=^5063749
 ;;^UTILITY(U,$J,358.3,9255,0)
 ;;=Z99.2^^45^432^147
 ;;^UTILITY(U,$J,358.3,9255,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9255,1,3,0)
 ;;=3^Renal Dialysis Dependence
 ;;^UTILITY(U,$J,358.3,9255,1,4,0)
 ;;=4^Z99.2
 ;;^UTILITY(U,$J,358.3,9255,2)
 ;;=^5063758
 ;;^UTILITY(U,$J,358.3,9256,0)
 ;;=Z99.81^^45^432^150
 ;;^UTILITY(U,$J,358.3,9256,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9256,1,3,0)
 ;;=3^Supplemental Oxygen Dependence
 ;;^UTILITY(U,$J,358.3,9256,1,4,0)
 ;;=4^Z99.81
 ;;^UTILITY(U,$J,358.3,9256,2)
 ;;=^5063760
 ;;^UTILITY(U,$J,358.3,9257,0)
 ;;=Z98.1^^45^432^2
 ;;^UTILITY(U,$J,358.3,9257,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9257,1,3,0)
 ;;=3^Arthrodesis Status
 ;;^UTILITY(U,$J,358.3,9257,1,4,0)
 ;;=4^Z98.1
 ;;^UTILITY(U,$J,358.3,9257,2)
 ;;=^5063734
 ;;^UTILITY(U,$J,358.3,9258,0)
 ;;=Z94.7^^45^432^8
 ;;^UTILITY(U,$J,358.3,9258,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9258,1,3,0)
 ;;=3^Corneal Transplant Status
 ;;^UTILITY(U,$J,358.3,9258,1,4,0)
 ;;=4^Z94.7
 ;;^UTILITY(U,$J,358.3,9258,2)
 ;;=^5063661
 ;;^UTILITY(U,$J,358.3,9259,0)
 ;;=Z83.511^^45^432^23
 ;;^UTILITY(U,$J,358.3,9259,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9259,1,3,0)
 ;;=3^Family Hx of Glaucoma
 ;;^UTILITY(U,$J,358.3,9259,1,4,0)
 ;;=4^Z83.511
 ;;^UTILITY(U,$J,358.3,9259,2)
 ;;=^5063382
 ;;^UTILITY(U,$J,358.3,9260,0)
 ;;=Z80.52^^45^432^26
 ;;^UTILITY(U,$J,358.3,9260,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9260,1,3,0)
 ;;=3^Family Hx of Malig Neop of Baldder
 ;;^UTILITY(U,$J,358.3,9260,1,4,0)
 ;;=4^Z80.52
 ;;^UTILITY(U,$J,358.3,9260,2)
 ;;=^5063352
 ;;^UTILITY(U,$J,358.3,9261,0)
 ;;=Z80.51^^45^432^29
 ;;^UTILITY(U,$J,358.3,9261,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9261,1,3,0)
 ;;=3^Family Hx of Malig Neop of Kidney
 ;;^UTILITY(U,$J,358.3,9261,1,4,0)
 ;;=4^Z80.51
 ;;^UTILITY(U,$J,358.3,9261,2)
 ;;=^321159
 ;;^UTILITY(U,$J,358.3,9262,0)
 ;;=Z83.41^^45^432^36
 ;;^UTILITY(U,$J,358.3,9262,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9262,1,3,0)
 ;;=3^Family Hx of Mult Endocrine Neoplasia Syndrome
 ;;^UTILITY(U,$J,358.3,9262,1,4,0)
 ;;=4^Z83.41
 ;;^UTILITY(U,$J,358.3,9262,2)
 ;;=^5063380
 ;;^UTILITY(U,$J,358.3,9263,0)
 ;;=Z81.8^^45^432^43
 ;;^UTILITY(U,$J,358.3,9263,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9263,1,3,0)
 ;;=3^Family Hx of Substance Abuse/Dependence,Psychoactive
 ;;^UTILITY(U,$J,358.3,9263,1,4,0)
 ;;=4^Z81.8
 ;;^UTILITY(U,$J,358.3,9263,2)
 ;;=^5063363
 ;;^UTILITY(U,$J,358.3,9264,0)
 ;;=Z81.4^^45^432^44
 ;;^UTILITY(U,$J,358.3,9264,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9264,1,3,0)
 ;;=3^Family Hx of Substance Abuse/Dependence NEC
 ;;^UTILITY(U,$J,358.3,9264,1,4,0)
 ;;=4^Z81.4
 ;;^UTILITY(U,$J,358.3,9264,2)
 ;;=^5063362
 ;;^UTILITY(U,$J,358.3,9265,0)
 ;;=Z98.0^^45^432^55
 ;;^UTILITY(U,$J,358.3,9265,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9265,1,3,0)
 ;;=3^Intestinal Bypass/Anastomosis Status
 ;;^UTILITY(U,$J,358.3,9265,1,4,0)
 ;;=4^Z98.0
 ;;^UTILITY(U,$J,358.3,9265,2)
 ;;=^5063733
 ;;^UTILITY(U,$J,358.3,9266,0)
 ;;=Z91.128^^45^432^54
 ;;^UTILITY(U,$J,358.3,9266,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9266,1,3,0)
 ;;=3^Intentional Underdose of Meds d/t Other Reasons
 ;;^UTILITY(U,$J,358.3,9266,1,4,0)
 ;;=4^Z91.128
 ;;^UTILITY(U,$J,358.3,9266,2)
 ;;=^5063613
 ;;^UTILITY(U,$J,358.3,9267,0)
 ;;=Z77.120^^45^432^60
 ;;^UTILITY(U,$J,358.3,9267,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9267,1,3,0)
 ;;=3^Mold (Toxic) Contact/Exposure
 ;;^UTILITY(U,$J,358.3,9267,1,4,0)
 ;;=4^Z77.120
 ;;^UTILITY(U,$J,358.3,9267,2)
 ;;=^5063318
 ;;^UTILITY(U,$J,358.3,9268,0)
 ;;=Z86.74^^45^432^103
 ;;^UTILITY(U,$J,358.3,9268,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9268,1,3,0)
 ;;=3^Personal Hx of Sudden Cardiac Arrest 
 ;;^UTILITY(U,$J,358.3,9268,1,4,0)
 ;;=4^Z86.74
 ;;^UTILITY(U,$J,358.3,9268,2)
 ;;=^5063478
 ;;^UTILITY(U,$J,358.3,9269,0)
 ;;=Z86.718^^45^432^111
 ;;^UTILITY(U,$J,358.3,9269,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9269,1,3,0)
 ;;=3^Personal Hx of Venous Thrombosis/Embolism (DVT)
 ;;^UTILITY(U,$J,358.3,9269,1,4,0)
 ;;=4^Z86.718
 ;;^UTILITY(U,$J,358.3,9269,2)
 ;;=^5063475
 ;;^UTILITY(U,$J,358.3,9270,0)
 ;;=Z96.1^^45^432^133
 ;;^UTILITY(U,$J,358.3,9270,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9270,1,3,0)
 ;;=3^Presence of Intraocular Lens
 ;;^UTILITY(U,$J,358.3,9270,1,4,0)
 ;;=4^Z96.1
 ;;^UTILITY(U,$J,358.3,9270,2)
 ;;=^5063682
 ;;^UTILITY(U,$J,358.3,9271,0)
 ;;=Z96.612^^45^432^138
 ;;^UTILITY(U,$J,358.3,9271,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9271,1,3,0)
 ;;=3^Presence of Left Artificial Shoulder Joint
 ;;^UTILITY(U,$J,358.3,9271,1,4,0)
 ;;=4^Z96.612
 ;;^UTILITY(U,$J,358.3,9271,2)
 ;;=^5063693
 ;;^UTILITY(U,$J,358.3,9272,0)
 ;;=Z96.611^^45^432^143
 ;;^UTILITY(U,$J,358.3,9272,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9272,1,3,0)
 ;;=3^Presence of Right Artificial Shoulder Joint
 ;;^UTILITY(U,$J,358.3,9272,1,4,0)
 ;;=4^Z96.611
 ;;^UTILITY(U,$J,358.3,9272,2)
 ;;=^5063692
 ;;^UTILITY(U,$J,358.3,9273,0)
 ;;=Z93.0^^45^432^151
 ;;^UTILITY(U,$J,358.3,9273,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9273,1,3,0)
 ;;=3^Tracheostomy Status
 ;;^UTILITY(U,$J,358.3,9273,1,4,0)
 ;;=4^Z93.0
 ;;^UTILITY(U,$J,358.3,9273,2)
 ;;=^5063642
 ;;^UTILITY(U,$J,358.3,9274,0)
 ;;=Z99.3^^45^432^156
 ;;^UTILITY(U,$J,358.3,9274,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9274,1,3,0)
 ;;=3^Wheelchair Dependence
 ;;^UTILITY(U,$J,358.3,9274,1,4,0)
 ;;=4^Z99.3
 ;;^UTILITY(U,$J,358.3,9274,2)
 ;;=^5063759
 ;;^UTILITY(U,$J,358.3,9275,0)
 ;;=Z83.42^^45^432^21
 ;;^UTILITY(U,$J,358.3,9275,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9275,1,3,0)
 ;;=3^Family Hx of Familial Hypercholesterolemia
 ;;^UTILITY(U,$J,358.3,9275,1,4,0)
 ;;=4^Z83.42
 ;;^UTILITY(U,$J,358.3,9275,2)
 ;;=^8132985
 ;;^UTILITY(U,$J,358.3,9276,0)
 ;;=Z98.890^^45^432^114
 ;;^UTILITY(U,$J,358.3,9276,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9276,1,3,0)
 ;;=3^Postprocedural States/HX of Surgery NEC
 ;;^UTILITY(U,$J,358.3,9276,1,4,0)
 ;;=4^Z98.890
 ;;^UTILITY(U,$J,358.3,9276,2)
 ;;=^5063754
 ;;^UTILITY(U,$J,358.3,9277,0)
 ;;=Z95.1^^45^432^115
 ;;^UTILITY(U,$J,358.3,9277,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9277,1,3,0)
 ;;=3^Presence of Aortocoronary Bypass
 ;;^UTILITY(U,$J,358.3,9277,1,4,0)
 ;;=4^Z95.1
 ;;^UTILITY(U,$J,358.3,9277,2)
 ;;=^5063669
 ;;^UTILITY(U,$J,358.3,9278,0)
 ;;=Z98.2^^45^432^127
 ;;^UTILITY(U,$J,358.3,9278,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9278,1,3,0)
 ;;=3^Presence of Cerebrospinal Fluid Drainage Device
 ;;^UTILITY(U,$J,358.3,9278,1,4,0)
 ;;=4^Z98.2
 ;;^UTILITY(U,$J,358.3,9278,2)
 ;;=^5063735
 ;;^UTILITY(U,$J,358.3,9279,0)
 ;;=Z97.5^^45^432^128
 ;;^UTILITY(U,$J,358.3,9279,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9279,1,3,0)
 ;;=3^Presence of Contraceptive (Intrauterine) Device
 ;;^UTILITY(U,$J,358.3,9279,1,4,0)
 ;;=4^Z97.5
 ;;^UTILITY(U,$J,358.3,9279,2)
 ;;=^5063731
 ;;^UTILITY(U,$J,358.3,9280,0)
 ;;=Z95.5^^45^432^129
 ;;^UTILITY(U,$J,358.3,9280,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9280,1,3,0)
 ;;=3^Presence of Coronary Angioplasty Implant/Graft
 ;;^UTILITY(U,$J,358.3,9280,1,4,0)
 ;;=4^Z95.5
 ;;^UTILITY(U,$J,358.3,9280,2)
 ;;=^5063673
 ;;^UTILITY(U,$J,358.3,9281,0)
 ;;=Z97.2^^45^432^130
 ;;^UTILITY(U,$J,358.3,9281,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9281,1,3,0)
 ;;=3^Presence of Dental Prosthetic Device
 ;;^UTILITY(U,$J,358.3,9281,1,4,0)
 ;;=4^Z97.2
 ;;^UTILITY(U,$J,358.3,9281,2)
 ;;=^5063728
 ;;^UTILITY(U,$J,358.3,9282,0)
 ;;=Z97.4^^45^432^131
 ;;^UTILITY(U,$J,358.3,9282,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9282,1,3,0)
 ;;=3^Presence of External Hearing Aid
 ;;^UTILITY(U,$J,358.3,9282,1,4,0)
 ;;=4^Z97.4
 ;;^UTILITY(U,$J,358.3,9282,2)
 ;;=^5063730
 ;;^UTILITY(U,$J,358.3,9283,0)
 ;;=Z96.622^^45^432^117
 ;;^UTILITY(U,$J,358.3,9283,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9283,1,3,0)
 ;;=3^Presence of Artificial Elbow Joint,Left
 ;;^UTILITY(U,$J,358.3,9283,1,4,0)
 ;;=4^Z96.622
 ;;^UTILITY(U,$J,358.3,9283,2)
 ;;=^5063696
 ;;^UTILITY(U,$J,358.3,9284,0)
 ;;=Z96.632^^45^432^122
 ;;^UTILITY(U,$J,358.3,9284,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9284,1,3,0)
 ;;=3^Presence of Artificial Wrist Joint,Left
 ;;^UTILITY(U,$J,358.3,9284,1,4,0)
 ;;=4^Z96.632
 ;;^UTILITY(U,$J,358.3,9284,2)
 ;;=^5063699
 ;;^UTILITY(U,$J,358.3,9285,0)
 ;;=Z96.621^^45^432^118
 ;;^UTILITY(U,$J,358.3,9285,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9285,1,3,0)
 ;;=3^Presence of Artificial Elbow Joint,Right
 ;;^UTILITY(U,$J,358.3,9285,1,4,0)
 ;;=4^Z96.621
 ;;^UTILITY(U,$J,358.3,9285,2)
 ;;=^5063695
 ;;^UTILITY(U,$J,358.3,9286,0)
 ;;=Z96.631^^45^432^123
 ;;^UTILITY(U,$J,358.3,9286,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9286,1,3,0)
 ;;=3^Presence of Artificial Wrist Joint,Right
 ;;^UTILITY(U,$J,358.3,9286,1,4,0)
 ;;=4^Z96.631
 ;;^UTILITY(U,$J,358.3,9286,2)
 ;;=^5063698
 ;;^UTILITY(U,$J,358.3,9287,0)
 ;;=Z93.6^^45^432^154
 ;;^UTILITY(U,$J,358.3,9287,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9287,1,3,0)
 ;;=3^Urostomy Status