IBDEI0FG ; ; 03-MAY-2022
;;3.0;IB ENCOUNTER FORM IMP/EXP;;MAY 03, 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,38612,1,4,0)
;;=4^Z89.122
;;^UTILITY(U,$J,358.3,38612,2)
;;=^5063541
;;^UTILITY(U,$J,358.3,38613,0)
;;=Z90.2^^107^1509^24
;;^UTILITY(U,$J,358.3,38613,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,38613,1,3,0)
;;=3^Acquired Absence of Lung (part of)
;;^UTILITY(U,$J,358.3,38613,1,4,0)
;;=4^Z90.2
;;^UTILITY(U,$J,358.3,38613,2)
;;=^5063585
;;^UTILITY(U,$J,358.3,38614,0)
;;=Z90.79^^107^1509^31
;;^UTILITY(U,$J,358.3,38614,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,38614,1,3,0)
;;=3^Acquired Absence of Prostate
;;^UTILITY(U,$J,358.3,38614,1,4,0)
;;=4^Z90.79
;;^UTILITY(U,$J,358.3,38614,2)
;;=^5063596
;;^UTILITY(U,$J,358.3,38615,0)
;;=Z90.722^^107^1509^27
;;^UTILITY(U,$J,358.3,38615,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,38615,1,3,0)
;;=3^Acquired Absence of Ovaries,Bilateral
;;^UTILITY(U,$J,358.3,38615,1,4,0)
;;=4^Z90.722
;;^UTILITY(U,$J,358.3,38615,2)
;;=^5063595
;;^UTILITY(U,$J,358.3,38616,0)
;;=Z90.721^^107^1509^28
;;^UTILITY(U,$J,358.3,38616,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,38616,1,3,0)
;;=3^Acquired Absence of Ovaries,Unilateral
;;^UTILITY(U,$J,358.3,38616,1,4,0)
;;=4^Z90.721
;;^UTILITY(U,$J,358.3,38616,2)
;;=^5063594
;;^UTILITY(U,$J,358.3,38617,0)
;;=Z90.411^^107^1509^29
;;^UTILITY(U,$J,358.3,38617,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,38617,1,3,0)
;;=3^Acquired Absence of Pancreas,Partial
;;^UTILITY(U,$J,358.3,38617,1,4,0)
;;=4^Z90.411
;;^UTILITY(U,$J,358.3,38617,2)
;;=^5063588
;;^UTILITY(U,$J,358.3,38618,0)
;;=Z90.410^^107^1509^30
;;^UTILITY(U,$J,358.3,38618,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,38618,1,3,0)
;;=3^Acquired Absence of Pancreas,Total
;;^UTILITY(U,$J,358.3,38618,1,4,0)
;;=4^Z90.410
;;^UTILITY(U,$J,358.3,38618,2)
;;=^5063587
;;^UTILITY(U,$J,358.3,38619,0)
;;=Z89.441^^107^1509^2
;;^UTILITY(U,$J,358.3,38619,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,38619,1,3,0)
;;=3^Acquired Absence of Ankle,Right
;;^UTILITY(U,$J,358.3,38619,1,4,0)
;;=4^Z89.441
;;^UTILITY(U,$J,358.3,38619,2)
;;=^5063563
;;^UTILITY(U,$J,358.3,38620,0)
;;=Z90.11^^107^1509^4
;;^UTILITY(U,$J,358.3,38620,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,38620,1,3,0)
;;=3^Acquired Absence of Breast & Nipple,Right
;;^UTILITY(U,$J,358.3,38620,1,4,0)
;;=4^Z90.11
;;^UTILITY(U,$J,358.3,38620,2)
;;=^5063582
;;^UTILITY(U,$J,358.3,38621,0)
;;=Z89.021^^107^1509^9
;;^UTILITY(U,$J,358.3,38621,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,38621,1,3,0)
;;=3^Acquired Absence of Finger(s),Right
;;^UTILITY(U,$J,358.3,38621,1,4,0)
;;=4^Z89.021
;;^UTILITY(U,$J,358.3,38621,2)
;;=^5063534
;;^UTILITY(U,$J,358.3,38622,0)
;;=Z89.431^^107^1509^11
;;^UTILITY(U,$J,358.3,38622,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,38622,1,3,0)
;;=3^Acquired Absence of Foot,Right
;;^UTILITY(U,$J,358.3,38622,1,4,0)
;;=4^Z89.431
;;^UTILITY(U,$J,358.3,38622,2)
;;=^5063560
;;^UTILITY(U,$J,358.3,38623,0)
;;=Z89.411^^107^1509^13
;;^UTILITY(U,$J,358.3,38623,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,38623,1,3,0)
;;=3^Acquired Absence of Great Toe,Right
;;^UTILITY(U,$J,358.3,38623,1,4,0)
;;=4^Z89.411
;;^UTILITY(U,$J,358.3,38623,2)
;;=^5063554
;;^UTILITY(U,$J,358.3,38624,0)
;;=Z89.111^^107^1509^15
;;^UTILITY(U,$J,358.3,38624,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,38624,1,3,0)
;;=3^Acquired Absence of Hand,Right
;;^UTILITY(U,$J,358.3,38624,1,4,0)
;;=4^Z89.111
;;^UTILITY(U,$J,358.3,38624,2)
;;=^5063537
;;^UTILITY(U,$J,358.3,38625,0)
;;=Z89.621^^107^1509^17
;;^UTILITY(U,$J,358.3,38625,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,38625,1,3,0)
;;=3^Acquired Absence of Hip Joint,Right
;;^UTILITY(U,$J,358.3,38625,1,4,0)
;;=4^Z89.621
;;^UTILITY(U,$J,358.3,38625,2)
;;=^5063575
;;^UTILITY(U,$J,358.3,38626,0)
;;=Z89.611^^107^1509^21
;;^UTILITY(U,$J,358.3,38626,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,38626,1,3,0)
;;=3^Acquired Absence of Leg Above Knee,Right
;;^UTILITY(U,$J,358.3,38626,1,4,0)
;;=4^Z89.611
;;^UTILITY(U,$J,358.3,38626,2)
;;=^5063572
;;^UTILITY(U,$J,358.3,38627,0)
;;=Z89.511^^107^1509^23
;;^UTILITY(U,$J,358.3,38627,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,38627,1,3,0)
;;=3^Acquired Absence of Leg Below Knee,Right
;;^UTILITY(U,$J,358.3,38627,1,4,0)
;;=4^Z89.511
;;^UTILITY(U,$J,358.3,38627,2)
;;=^5063566
;;^UTILITY(U,$J,358.3,38628,0)
;;=Z89.231^^107^1509^33
;;^UTILITY(U,$J,358.3,38628,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,38628,1,3,0)
;;=3^Acquired Absence of Shoulder,Right
;;^UTILITY(U,$J,358.3,38628,1,4,0)
;;=4^Z89.231
;;^UTILITY(U,$J,358.3,38628,2)
;;=^5063551
;;^UTILITY(U,$J,358.3,38629,0)
;;=Z89.011^^107^1509^37
;;^UTILITY(U,$J,358.3,38629,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,38629,1,3,0)
;;=3^Acquired Absence of Thumb,Right
;;^UTILITY(U,$J,358.3,38629,1,4,0)
;;=4^Z89.011
;;^UTILITY(U,$J,358.3,38629,2)
;;=^5063531
;;^UTILITY(U,$J,358.3,38630,0)
;;=Z89.421^^107^1509^26
;;^UTILITY(U,$J,358.3,38630,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,38630,1,3,0)
;;=3^Acquired Absence of Oth Toe(s),Right
;;^UTILITY(U,$J,358.3,38630,1,4,0)
;;=4^Z89.421
;;^UTILITY(U,$J,358.3,38630,2)
;;=^5063557
;;^UTILITY(U,$J,358.3,38631,0)
;;=Z89.221^^107^1509^39
;;^UTILITY(U,$J,358.3,38631,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,38631,1,3,0)
;;=3^Acquired Absence of Upper Limb Above Elbow,Right
;;^UTILITY(U,$J,358.3,38631,1,4,0)
;;=4^Z89.221
;;^UTILITY(U,$J,358.3,38631,2)
;;=^5063548
;;^UTILITY(U,$J,358.3,38632,0)
;;=Z89.211^^107^1509^41
;;^UTILITY(U,$J,358.3,38632,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,38632,1,3,0)
;;=3^Acquired Absence of Upper Limb Below Elbow,Right
;;^UTILITY(U,$J,358.3,38632,1,4,0)
;;=4^Z89.211
;;^UTILITY(U,$J,358.3,38632,2)
;;=^5063545
;;^UTILITY(U,$J,358.3,38633,0)
;;=Z89.121^^107^1509^44
;;^UTILITY(U,$J,358.3,38633,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,38633,1,3,0)
;;=3^Acquired Absence of Wrist,Right
;;^UTILITY(U,$J,358.3,38633,1,4,0)
;;=4^Z89.121
;;^UTILITY(U,$J,358.3,38633,2)
;;=^5063540
;;^UTILITY(U,$J,358.3,38634,0)
;;=Z90.81^^107^1509^34
;;^UTILITY(U,$J,358.3,38634,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,38634,1,3,0)
;;=3^Acquired Absence of Spleen
;;^UTILITY(U,$J,358.3,38634,1,4,0)
;;=4^Z90.81
;;^UTILITY(U,$J,358.3,38634,2)
;;=^5063597
;;^UTILITY(U,$J,358.3,38635,0)
;;=Z90.3^^107^1509^35
;;^UTILITY(U,$J,358.3,38635,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,38635,1,3,0)
;;=3^Acquired Absence of Stomach (part of)
;;^UTILITY(U,$J,358.3,38635,1,4,0)
;;=4^Z90.3
;;^UTILITY(U,$J,358.3,38635,2)
;;=^5063586
;;^UTILITY(U,$J,358.3,38636,0)
;;=R45.851^^107^1510^3
;;^UTILITY(U,$J,358.3,38636,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,38636,1,3,0)
;;=3^Suicidal Ideations
;;^UTILITY(U,$J,358.3,38636,1,4,0)
;;=4^R45.851
;;^UTILITY(U,$J,358.3,38636,2)
;;=^5019474
;;^UTILITY(U,$J,358.3,38637,0)
;;=T14.91XA^^107^1510^4
;;^UTILITY(U,$J,358.3,38637,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,38637,1,3,0)
;;=3^Suicide Attempt,Initial Encntr
;;^UTILITY(U,$J,358.3,38637,1,4,0)
;;=4^T14.91XA
;;^UTILITY(U,$J,358.3,38637,2)
;;=^5151779
;;^UTILITY(U,$J,358.3,38638,0)
;;=T14.91XD^^107^1510^6
;;^UTILITY(U,$J,358.3,38638,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,38638,1,3,0)
;;=3^Suicide Attempt,Subsequent Encntr
;;^UTILITY(U,$J,358.3,38638,1,4,0)
;;=4^T14.91XD
;;^UTILITY(U,$J,358.3,38638,2)
;;=^5151780
;;^UTILITY(U,$J,358.3,38639,0)
;;=T14.91XS^^107^1510^5
;;^UTILITY(U,$J,358.3,38639,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,38639,1,3,0)
;;=3^Suicide Attempt,Sequela
;;^UTILITY(U,$J,358.3,38639,1,4,0)
;;=4^T14.91XS
;;^UTILITY(U,$J,358.3,38639,2)
;;=^5151781
;;^UTILITY(U,$J,358.3,38640,0)
;;=Z91.52^^107^1510^1
;;^UTILITY(U,$J,358.3,38640,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,38640,1,3,0)
;;=3^Personal Hx of Non-Suicidal Self-Harm
;;^UTILITY(U,$J,358.3,38640,1,4,0)
;;=4^Z91.52
;;^UTILITY(U,$J,358.3,38640,2)
;;=^5161318
;;^UTILITY(U,$J,358.3,38641,0)
;;=Z91.51^^107^1510^2
;;^UTILITY(U,$J,358.3,38641,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,38641,1,3,0)
;;=3^Personal Hx of Suicidal Behavior
;;^UTILITY(U,$J,358.3,38641,1,4,0)
;;=4^Z91.51
;;^UTILITY(U,$J,358.3,38641,2)
;;=^5161317
;;^UTILITY(U,$J,358.3,38642,0)
;;=N17.0^^107^1511^3
;;^UTILITY(U,$J,358.3,38642,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,38642,1,3,0)
;;=3^Acute Kidney Failure w/ Tubular Necrosis
;;^UTILITY(U,$J,358.3,38642,1,4,0)
;;=4^N17.0
;;^UTILITY(U,$J,358.3,38642,2)
;;=^5015598
;;^UTILITY(U,$J,358.3,38643,0)
;;=N17.1^^107^1511^1
;;^UTILITY(U,$J,358.3,38643,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,38643,1,3,0)
;;=3^Acute Kidney Failure w/ Acute Cortical Necrosis
;;^UTILITY(U,$J,358.3,38643,1,4,0)
;;=4^N17.1
;;^UTILITY(U,$J,358.3,38643,2)
;;=^5015599
;;^UTILITY(U,$J,358.3,38644,0)
;;=N17.2^^107^1511^2
;;^UTILITY(U,$J,358.3,38644,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,38644,1,3,0)
;;=3^Acute Kidney Failure w/ Medullary Necrosis
;;^UTILITY(U,$J,358.3,38644,1,4,0)
;;=4^N17.2
;;^UTILITY(U,$J,358.3,38644,2)
;;=^5015600
;;^UTILITY(U,$J,358.3,38645,0)
;;=N17.8^^107^1511^4
;;^UTILITY(U,$J,358.3,38645,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,38645,1,3,0)
;;=3^Acute Kidney Failure,Other
;;^UTILITY(U,$J,358.3,38645,1,4,0)
;;=4^N17.8
;;^UTILITY(U,$J,358.3,38645,2)
;;=^5015601
;;^UTILITY(U,$J,358.3,38646,0)
;;=N17.9^^107^1511^5
;;^UTILITY(U,$J,358.3,38646,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,38646,1,3,0)
;;=3^Acute Kidney Failure,Unspec
;;^UTILITY(U,$J,358.3,38646,1,4,0)
;;=4^N17.9
;;^UTILITY(U,$J,358.3,38646,2)
;;=^338532
;;^UTILITY(U,$J,358.3,38647,0)
;;=I20.0^^107^1512^4
;;^UTILITY(U,$J,358.3,38647,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,38647,1,3,0)
;;=3^Unstable Angina
;;^UTILITY(U,$J,358.3,38647,1,4,0)
;;=4^I20.0
;;^UTILITY(U,$J,358.3,38647,2)
;;=^5007076
;;^UTILITY(U,$J,358.3,38648,0)
;;=I20.1^^107^1512^1
;;^UTILITY(U,$J,358.3,38648,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,38648,1,3,0)
;;=3^Angina Pectoris w/ Documented Spasm
;;^UTILITY(U,$J,358.3,38648,1,4,0)
;;=4^I20.1
;;^UTILITY(U,$J,358.3,38648,2)
;;=^5007077
;;^UTILITY(U,$J,358.3,38649,0)
;;=I20.8^^107^1512^2
;;^UTILITY(U,$J,358.3,38649,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,38649,1,3,0)
;;=3^Angina Pectoris,Other Forms
;;^UTILITY(U,$J,358.3,38649,1,4,0)
;;=4^I20.8
;;^UTILITY(U,$J,358.3,38649,2)
;;=^5007078
;;^UTILITY(U,$J,358.3,38650,0)
;;=I20.9^^107^1512^3
;;^UTILITY(U,$J,358.3,38650,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,38650,1,3,0)
;;=3^Angina Pectoris,Unspec
;;^UTILITY(U,$J,358.3,38650,1,4,0)
;;=4^I20.9
;;^UTILITY(U,$J,358.3,38650,2)
;;=^5007079
;;^UTILITY(U,$J,358.3,38651,0)
;;=J40.^^107^1513^17
;;^UTILITY(U,$J,358.3,38651,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,38651,1,3,0)
;;=3^Bronchitis
;;^UTILITY(U,$J,358.3,38651,1,4,0)
;;=4^J40.
;;^UTILITY(U,$J,358.3,38651,2)
;;=^17164
;;^UTILITY(U,$J,358.3,38652,0)
;;=J41.0^^107^1513^20
;;^UTILITY(U,$J,358.3,38652,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,38652,1,3,0)
;;=3^Bronchitis,Simple Chronic
;;^UTILITY(U,$J,358.3,38652,1,4,0)
;;=4^J41.0
;;^UTILITY(U,$J,358.3,38652,2)
;;=^269946
;;^UTILITY(U,$J,358.3,38653,0)
;;=J41.1^^107^1513^19
;;^UTILITY(U,$J,358.3,38653,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,38653,1,3,0)
;;=3^Bronchitis,Mucopurulent Chronic
;;^UTILITY(U,$J,358.3,38653,1,4,0)
;;=4^J41.1
;;^UTILITY(U,$J,358.3,38653,2)
;;=^269949
;;^UTILITY(U,$J,358.3,38654,0)
;;=J41.8^^107^1513^18
;;^UTILITY(U,$J,358.3,38654,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,38654,1,3,0)
;;=3^Bronchitis,Mixed Simple & Mucopurulent Chronic
;;^UTILITY(U,$J,358.3,38654,1,4,0)
;;=4^J41.8
;;^UTILITY(U,$J,358.3,38654,2)
;;=^5008233
;;^UTILITY(U,$J,358.3,38655,0)
;;=J42.^^107^1513^21
;;^UTILITY(U,$J,358.3,38655,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,38655,1,3,0)
;;=3^Bronchitis,Unspec Chronic
;;^UTILITY(U,$J,358.3,38655,1,4,0)
;;=4^J42.
;;^UTILITY(U,$J,358.3,38655,2)
;;=^5008234
;;^UTILITY(U,$J,358.3,38656,0)
;;=J43.0^^107^1513^29
;;^UTILITY(U,$J,358.3,38656,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,38656,1,3,0)
;;=3^Emphysema,Pulmonary,Unilateral
;;^UTILITY(U,$J,358.3,38656,1,4,0)
;;=4^J43.0
;;^UTILITY(U,$J,358.3,38656,2)
;;=^5008235
;;^UTILITY(U,$J,358.3,38657,0)
;;=J43.1^^107^1513^28
;;^UTILITY(U,$J,358.3,38657,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,38657,1,3,0)
;;=3^Emphysema,Panlobular
;;^UTILITY(U,$J,358.3,38657,1,4,0)
;;=4^J43.1
;;^UTILITY(U,$J,358.3,38657,2)
;;=^5008236
;;^UTILITY(U,$J,358.3,38658,0)
;;=J43.2^^107^1513^26
;;^UTILITY(U,$J,358.3,38658,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,38658,1,3,0)
;;=3^Emphysema,Centrilobular
;;^UTILITY(U,$J,358.3,38658,1,4,0)
;;=4^J43.2
;;^UTILITY(U,$J,358.3,38658,2)
;;=^5008237
;;^UTILITY(U,$J,358.3,38659,0)
;;=J43.8^^107^1513^27
;;^UTILITY(U,$J,358.3,38659,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,38659,1,3,0)
;;=3^Emphysema,Other
;;^UTILITY(U,$J,358.3,38659,1,4,0)
;;=4^J43.8
;;^UTILITY(U,$J,358.3,38659,2)
;;=^87569
;;^UTILITY(U,$J,358.3,38660,0)
;;=J43.9^^107^1513^30
;;^UTILITY(U,$J,358.3,38660,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,38660,1,3,0)
;;=3^Emphysema,Unspec
;;^UTILITY(U,$J,358.3,38660,1,4,0)
;;=4^J43.9
;;^UTILITY(U,$J,358.3,38660,2)
;;=^5008238
;;^UTILITY(U,$J,358.3,38661,0)
;;=J44.0^^107^1513^23
;;^UTILITY(U,$J,358.3,38661,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,38661,1,3,0)
;;=3^COPD w/ (Acute) Lower Resp Infection
;;^UTILITY(U,$J,358.3,38661,1,4,0)
;;=4^J44.0
;;^UTILITY(U,$J,358.3,38661,2)
;;=^5008239
;;^UTILITY(U,$J,358.3,38662,0)
;;=J45.20^^107^1513^5
;;^UTILITY(U,$J,358.3,38662,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,38662,1,3,0)
;;=3^Asthma,Mild Intermittent,Uncompl
;;^UTILITY(U,$J,358.3,38662,1,4,0)
;;=4^J45.20
;;^UTILITY(U,$J,358.3,38662,2)
;;=^5008242
;;^UTILITY(U,$J,358.3,38663,0)
;;=J45.21^^107^1513^3
;;^UTILITY(U,$J,358.3,38663,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,38663,1,3,0)
;;=3^Asthma,Mild Intermittent w/ Acute Exacerbation
;;^UTILITY(U,$J,358.3,38663,1,4,0)
;;=4^J45.21
;;^UTILITY(U,$J,358.3,38663,2)
;;=^5008243
;;^UTILITY(U,$J,358.3,38664,0)
;;=J45.22^^107^1513^4
;;^UTILITY(U,$J,358.3,38664,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,38664,1,3,0)
;;=3^Asthma,Mild Intermittent w/ Status Asthmaticus
;;^UTILITY(U,$J,358.3,38664,1,4,0)
;;=4^J45.22
;;^UTILITY(U,$J,358.3,38664,2)
;;=^5008244
;;^UTILITY(U,$J,358.3,38665,0)
;;=J45.31^^107^1513^6
;;^UTILITY(U,$J,358.3,38665,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,38665,1,3,0)
;;=3^Asthma,Mild Persistent w/ Acute Exacerbation
;;^UTILITY(U,$J,358.3,38665,1,4,0)
;;=4^J45.31
;;^UTILITY(U,$J,358.3,38665,2)
;;=^5008246
;;^UTILITY(U,$J,358.3,38666,0)
;;=J45.32^^107^1513^7
;;^UTILITY(U,$J,358.3,38666,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,38666,1,3,0)
;;=3^Asthma,Mild Persistent w/ Status Asthmaticus
;;^UTILITY(U,$J,358.3,38666,1,4,0)
;;=4^J45.32
;;^UTILITY(U,$J,358.3,38666,2)
;;=^5008247
;;^UTILITY(U,$J,358.3,38667,0)
;;=J45.40^^107^1513^10
;;^UTILITY(U,$J,358.3,38667,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,38667,1,3,0)
;;=3^Asthma,Moderate Persistent,Uncomplicated
;;^UTILITY(U,$J,358.3,38667,1,4,0)
;;=4^J45.40
;;^UTILITY(U,$J,358.3,38667,2)
;;=^5008248
;;^UTILITY(U,$J,358.3,38668,0)
;;=J44.9^^107^1513^24
;;^UTILITY(U,$J,358.3,38668,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,38668,1,3,0)
;;=3^COPD,Unspec
;;^UTILITY(U,$J,358.3,38668,1,4,0)
;;=4^J44.9
;;^UTILITY(U,$J,358.3,38668,2)
;;=^5008241
;;^UTILITY(U,$J,358.3,38669,0)
;;=J44.1^^107^1513^22
;;^UTILITY(U,$J,358.3,38669,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,38669,1,3,0)
;;=3^COPD w/ Acute Exacerbation
;;^UTILITY(U,$J,358.3,38669,1,4,0)
;;=4^J44.1
;;^UTILITY(U,$J,358.3,38669,2)
;;=^5008240
;;^UTILITY(U,$J,358.3,38670,0)
;;=J47.0^^107^1513^15
;;^UTILITY(U,$J,358.3,38670,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,38670,1,3,0)
;;=3^Bronchiectasis w/ Acute Lower Resp Infection
;;^UTILITY(U,$J,358.3,38670,1,4,0)
;;=4^J47.0
;;^UTILITY(U,$J,358.3,38670,2)
;;=^5008258
;;^UTILITY(U,$J,358.3,38671,0)
;;=J47.1^^107^1513^14
;;^UTILITY(U,$J,358.3,38671,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,38671,1,3,0)
;;=3^Bronchiectasis w/ Acute Exacerbation
;;^UTILITY(U,$J,358.3,38671,1,4,0)
;;=4^J47.1
;;^UTILITY(U,$J,358.3,38671,2)
;;=^5008259
;;^UTILITY(U,$J,358.3,38672,0)
;;=J47.9^^107^1513^16
;;^UTILITY(U,$J,358.3,38672,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,38672,1,3,0)
;;=3^Bronchiectasis,Uncomplicated
;;^UTILITY(U,$J,358.3,38672,1,4,0)
;;=4^J47.9
;;^UTILITY(U,$J,358.3,38672,2)
;;=^5008260
;;^UTILITY(U,$J,358.3,38673,0)
;;=J45.41^^107^1513^8
;;^UTILITY(U,$J,358.3,38673,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,38673,1,3,0)
;;=3^Asthma,Moderate Persistent w/ Acute Exacerbation
;;^UTILITY(U,$J,358.3,38673,1,4,0)
;;=4^J45.41
;;^UTILITY(U,$J,358.3,38673,2)
;;=^5008249
;;^UTILITY(U,$J,358.3,38674,0)
;;=J45.42^^107^1513^9
;;^UTILITY(U,$J,358.3,38674,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,38674,1,3,0)
;;=3^Asthma,Moderate Persistent w/ Status Asthmaticus
;;^UTILITY(U,$J,358.3,38674,1,4,0)
;;=4^J45.42
;;^UTILITY(U,$J,358.3,38674,2)
;;=^5008250
;;^UTILITY(U,$J,358.3,38675,0)
;;=J45.51^^107^1513^12
;;^UTILITY(U,$J,358.3,38675,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,38675,1,3,0)
;;=3^Asthma,Severe Persistent w/ Acute Exacerbation
;;^UTILITY(U,$J,358.3,38675,1,4,0)
;;=4^J45.51
;;^UTILITY(U,$J,358.3,38675,2)
;;=^5008252
;;^UTILITY(U,$J,358.3,38676,0)
;;=J45.52^^107^1513^13
;;^UTILITY(U,$J,358.3,38676,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,38676,1,3,0)
;;=3^Asthma,Severe Persistent w/ Status Asthmaticus
;;^UTILITY(U,$J,358.3,38676,1,4,0)
;;=4^J45.52
;;^UTILITY(U,$J,358.3,38676,2)
;;=^5008253
;;^UTILITY(U,$J,358.3,38677,0)
;;=J45.901^^107^1513^1
;;^UTILITY(U,$J,358.3,38677,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,38677,1,3,0)
;;=3^Asthma w/ Acute Exacerbation,Unspec
;;^UTILITY(U,$J,358.3,38677,1,4,0)
;;=4^J45.901
;;^UTILITY(U,$J,358.3,38677,2)
;;=^5008254
;;^UTILITY(U,$J,358.3,38678,0)
;;=J45.902^^107^1513^2
;;^UTILITY(U,$J,358.3,38678,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,38678,1,3,0)
;;=3^Asthma w/ Status Asthmaticus,Unspec
;;^UTILITY(U,$J,358.3,38678,1,4,0)
;;=4^J45.902
;;^UTILITY(U,$J,358.3,38678,2)
;;=^5008255
;;^UTILITY(U,$J,358.3,38679,0)
;;=J45.990^^107^1513^31
;;^UTILITY(U,$J,358.3,38679,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,38679,1,3,0)
;;=3^Exercised Induced Bronchospasm
;;^UTILITY(U,$J,358.3,38679,1,4,0)
;;=4^J45.990
;;^UTILITY(U,$J,358.3,38679,2)
;;=^329926
;;^UTILITY(U,$J,358.3,38680,0)
;;=J45.998^^107^1513^11
;;^UTILITY(U,$J,358.3,38680,1,0)
;;=^358.31IA^4^2
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HIBDEI0FG 19752 printed Dec 13, 2024@01:47:38 Page 2
IBDEI0FG ; ; 03-MAY-2022
+1 ;;3.0;IB ENCOUNTER FORM IMP/EXP;;MAY 03, 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,38612,1,4,0)
+2 ;;=4^Z89.122
+3 ;;^UTILITY(U,$J,358.3,38612,2)
+4 ;;=^5063541
+5 ;;^UTILITY(U,$J,358.3,38613,0)
+6 ;;=Z90.2^^107^1509^24
+7 ;;^UTILITY(U,$J,358.3,38613,1,0)
+8 ;;=^358.31IA^4^2
+9 ;;^UTILITY(U,$J,358.3,38613,1,3,0)
+10 ;;=3^Acquired Absence of Lung (part of)
+11 ;;^UTILITY(U,$J,358.3,38613,1,4,0)
+12 ;;=4^Z90.2
+13 ;;^UTILITY(U,$J,358.3,38613,2)
+14 ;;=^5063585
+15 ;;^UTILITY(U,$J,358.3,38614,0)
+16 ;;=Z90.79^^107^1509^31
+17 ;;^UTILITY(U,$J,358.3,38614,1,0)
+18 ;;=^358.31IA^4^2
+19 ;;^UTILITY(U,$J,358.3,38614,1,3,0)
+20 ;;=3^Acquired Absence of Prostate
+21 ;;^UTILITY(U,$J,358.3,38614,1,4,0)
+22 ;;=4^Z90.79
+23 ;;^UTILITY(U,$J,358.3,38614,2)
+24 ;;=^5063596
+25 ;;^UTILITY(U,$J,358.3,38615,0)
+26 ;;=Z90.722^^107^1509^27
+27 ;;^UTILITY(U,$J,358.3,38615,1,0)
+28 ;;=^358.31IA^4^2
+29 ;;^UTILITY(U,$J,358.3,38615,1,3,0)
+30 ;;=3^Acquired Absence of Ovaries,Bilateral
+31 ;;^UTILITY(U,$J,358.3,38615,1,4,0)
+32 ;;=4^Z90.722
+33 ;;^UTILITY(U,$J,358.3,38615,2)
+34 ;;=^5063595
+35 ;;^UTILITY(U,$J,358.3,38616,0)
+36 ;;=Z90.721^^107^1509^28
+37 ;;^UTILITY(U,$J,358.3,38616,1,0)
+38 ;;=^358.31IA^4^2
+39 ;;^UTILITY(U,$J,358.3,38616,1,3,0)
+40 ;;=3^Acquired Absence of Ovaries,Unilateral
+41 ;;^UTILITY(U,$J,358.3,38616,1,4,0)
+42 ;;=4^Z90.721
+43 ;;^UTILITY(U,$J,358.3,38616,2)
+44 ;;=^5063594
+45 ;;^UTILITY(U,$J,358.3,38617,0)
+46 ;;=Z90.411^^107^1509^29
+47 ;;^UTILITY(U,$J,358.3,38617,1,0)
+48 ;;=^358.31IA^4^2
+49 ;;^UTILITY(U,$J,358.3,38617,1,3,0)
+50 ;;=3^Acquired Absence of Pancreas,Partial
+51 ;;^UTILITY(U,$J,358.3,38617,1,4,0)
+52 ;;=4^Z90.411
+53 ;;^UTILITY(U,$J,358.3,38617,2)
+54 ;;=^5063588
+55 ;;^UTILITY(U,$J,358.3,38618,0)
+56 ;;=Z90.410^^107^1509^30
+57 ;;^UTILITY(U,$J,358.3,38618,1,0)
+58 ;;=^358.31IA^4^2
+59 ;;^UTILITY(U,$J,358.3,38618,1,3,0)
+60 ;;=3^Acquired Absence of Pancreas,Total
+61 ;;^UTILITY(U,$J,358.3,38618,1,4,0)
+62 ;;=4^Z90.410
+63 ;;^UTILITY(U,$J,358.3,38618,2)
+64 ;;=^5063587
+65 ;;^UTILITY(U,$J,358.3,38619,0)
+66 ;;=Z89.441^^107^1509^2
+67 ;;^UTILITY(U,$J,358.3,38619,1,0)
+68 ;;=^358.31IA^4^2
+69 ;;^UTILITY(U,$J,358.3,38619,1,3,0)
+70 ;;=3^Acquired Absence of Ankle,Right
+71 ;;^UTILITY(U,$J,358.3,38619,1,4,0)
+72 ;;=4^Z89.441
+73 ;;^UTILITY(U,$J,358.3,38619,2)
+74 ;;=^5063563
+75 ;;^UTILITY(U,$J,358.3,38620,0)
+76 ;;=Z90.11^^107^1509^4
+77 ;;^UTILITY(U,$J,358.3,38620,1,0)
+78 ;;=^358.31IA^4^2
+79 ;;^UTILITY(U,$J,358.3,38620,1,3,0)
+80 ;;=3^Acquired Absence of Breast & Nipple,Right
+81 ;;^UTILITY(U,$J,358.3,38620,1,4,0)
+82 ;;=4^Z90.11
+83 ;;^UTILITY(U,$J,358.3,38620,2)
+84 ;;=^5063582
+85 ;;^UTILITY(U,$J,358.3,38621,0)
+86 ;;=Z89.021^^107^1509^9
+87 ;;^UTILITY(U,$J,358.3,38621,1,0)
+88 ;;=^358.31IA^4^2
+89 ;;^UTILITY(U,$J,358.3,38621,1,3,0)
+90 ;;=3^Acquired Absence of Finger(s),Right
+91 ;;^UTILITY(U,$J,358.3,38621,1,4,0)
+92 ;;=4^Z89.021
+93 ;;^UTILITY(U,$J,358.3,38621,2)
+94 ;;=^5063534
+95 ;;^UTILITY(U,$J,358.3,38622,0)
+96 ;;=Z89.431^^107^1509^11
+97 ;;^UTILITY(U,$J,358.3,38622,1,0)
+98 ;;=^358.31IA^4^2
+99 ;;^UTILITY(U,$J,358.3,38622,1,3,0)
+100 ;;=3^Acquired Absence of Foot,Right
+101 ;;^UTILITY(U,$J,358.3,38622,1,4,0)
+102 ;;=4^Z89.431
+103 ;;^UTILITY(U,$J,358.3,38622,2)
+104 ;;=^5063560
+105 ;;^UTILITY(U,$J,358.3,38623,0)
+106 ;;=Z89.411^^107^1509^13
+107 ;;^UTILITY(U,$J,358.3,38623,1,0)
+108 ;;=^358.31IA^4^2
+109 ;;^UTILITY(U,$J,358.3,38623,1,3,0)
+110 ;;=3^Acquired Absence of Great Toe,Right
+111 ;;^UTILITY(U,$J,358.3,38623,1,4,0)
+112 ;;=4^Z89.411
+113 ;;^UTILITY(U,$J,358.3,38623,2)
+114 ;;=^5063554
+115 ;;^UTILITY(U,$J,358.3,38624,0)
+116 ;;=Z89.111^^107^1509^15
+117 ;;^UTILITY(U,$J,358.3,38624,1,0)
+118 ;;=^358.31IA^4^2
+119 ;;^UTILITY(U,$J,358.3,38624,1,3,0)
+120 ;;=3^Acquired Absence of Hand,Right
+121 ;;^UTILITY(U,$J,358.3,38624,1,4,0)
+122 ;;=4^Z89.111
+123 ;;^UTILITY(U,$J,358.3,38624,2)
+124 ;;=^5063537
+125 ;;^UTILITY(U,$J,358.3,38625,0)
+126 ;;=Z89.621^^107^1509^17
+127 ;;^UTILITY(U,$J,358.3,38625,1,0)
+128 ;;=^358.31IA^4^2
+129 ;;^UTILITY(U,$J,358.3,38625,1,3,0)
+130 ;;=3^Acquired Absence of Hip Joint,Right
+131 ;;^UTILITY(U,$J,358.3,38625,1,4,0)
+132 ;;=4^Z89.621
+133 ;;^UTILITY(U,$J,358.3,38625,2)
+134 ;;=^5063575
+135 ;;^UTILITY(U,$J,358.3,38626,0)
+136 ;;=Z89.611^^107^1509^21
+137 ;;^UTILITY(U,$J,358.3,38626,1,0)
+138 ;;=^358.31IA^4^2
+139 ;;^UTILITY(U,$J,358.3,38626,1,3,0)
+140 ;;=3^Acquired Absence of Leg Above Knee,Right
+141 ;;^UTILITY(U,$J,358.3,38626,1,4,0)
+142 ;;=4^Z89.611
+143 ;;^UTILITY(U,$J,358.3,38626,2)
+144 ;;=^5063572
+145 ;;^UTILITY(U,$J,358.3,38627,0)
+146 ;;=Z89.511^^107^1509^23
+147 ;;^UTILITY(U,$J,358.3,38627,1,0)
+148 ;;=^358.31IA^4^2
+149 ;;^UTILITY(U,$J,358.3,38627,1,3,0)
+150 ;;=3^Acquired Absence of Leg Below Knee,Right
+151 ;;^UTILITY(U,$J,358.3,38627,1,4,0)
+152 ;;=4^Z89.511
+153 ;;^UTILITY(U,$J,358.3,38627,2)
+154 ;;=^5063566
+155 ;;^UTILITY(U,$J,358.3,38628,0)
+156 ;;=Z89.231^^107^1509^33
+157 ;;^UTILITY(U,$J,358.3,38628,1,0)
+158 ;;=^358.31IA^4^2
+159 ;;^UTILITY(U,$J,358.3,38628,1,3,0)
+160 ;;=3^Acquired Absence of Shoulder,Right
+161 ;;^UTILITY(U,$J,358.3,38628,1,4,0)
+162 ;;=4^Z89.231
+163 ;;^UTILITY(U,$J,358.3,38628,2)
+164 ;;=^5063551
+165 ;;^UTILITY(U,$J,358.3,38629,0)
+166 ;;=Z89.011^^107^1509^37
+167 ;;^UTILITY(U,$J,358.3,38629,1,0)
+168 ;;=^358.31IA^4^2
+169 ;;^UTILITY(U,$J,358.3,38629,1,3,0)
+170 ;;=3^Acquired Absence of Thumb,Right
+171 ;;^UTILITY(U,$J,358.3,38629,1,4,0)
+172 ;;=4^Z89.011
+173 ;;^UTILITY(U,$J,358.3,38629,2)
+174 ;;=^5063531
+175 ;;^UTILITY(U,$J,358.3,38630,0)
+176 ;;=Z89.421^^107^1509^26
+177 ;;^UTILITY(U,$J,358.3,38630,1,0)
+178 ;;=^358.31IA^4^2
+179 ;;^UTILITY(U,$J,358.3,38630,1,3,0)
+180 ;;=3^Acquired Absence of Oth Toe(s),Right
+181 ;;^UTILITY(U,$J,358.3,38630,1,4,0)
+182 ;;=4^Z89.421
+183 ;;^UTILITY(U,$J,358.3,38630,2)
+184 ;;=^5063557
+185 ;;^UTILITY(U,$J,358.3,38631,0)
+186 ;;=Z89.221^^107^1509^39
+187 ;;^UTILITY(U,$J,358.3,38631,1,0)
+188 ;;=^358.31IA^4^2
+189 ;;^UTILITY(U,$J,358.3,38631,1,3,0)
+190 ;;=3^Acquired Absence of Upper Limb Above Elbow,Right
+191 ;;^UTILITY(U,$J,358.3,38631,1,4,0)
+192 ;;=4^Z89.221
+193 ;;^UTILITY(U,$J,358.3,38631,2)
+194 ;;=^5063548
+195 ;;^UTILITY(U,$J,358.3,38632,0)
+196 ;;=Z89.211^^107^1509^41
+197 ;;^UTILITY(U,$J,358.3,38632,1,0)
+198 ;;=^358.31IA^4^2
+199 ;;^UTILITY(U,$J,358.3,38632,1,3,0)
+200 ;;=3^Acquired Absence of Upper Limb Below Elbow,Right
+201 ;;^UTILITY(U,$J,358.3,38632,1,4,0)
+202 ;;=4^Z89.211
+203 ;;^UTILITY(U,$J,358.3,38632,2)
+204 ;;=^5063545
+205 ;;^UTILITY(U,$J,358.3,38633,0)
+206 ;;=Z89.121^^107^1509^44
+207 ;;^UTILITY(U,$J,358.3,38633,1,0)
+208 ;;=^358.31IA^4^2
+209 ;;^UTILITY(U,$J,358.3,38633,1,3,0)
+210 ;;=3^Acquired Absence of Wrist,Right
+211 ;;^UTILITY(U,$J,358.3,38633,1,4,0)
+212 ;;=4^Z89.121
+213 ;;^UTILITY(U,$J,358.3,38633,2)
+214 ;;=^5063540
+215 ;;^UTILITY(U,$J,358.3,38634,0)
+216 ;;=Z90.81^^107^1509^34
+217 ;;^UTILITY(U,$J,358.3,38634,1,0)
+218 ;;=^358.31IA^4^2
+219 ;;^UTILITY(U,$J,358.3,38634,1,3,0)
+220 ;;=3^Acquired Absence of Spleen
+221 ;;^UTILITY(U,$J,358.3,38634,1,4,0)
+222 ;;=4^Z90.81
+223 ;;^UTILITY(U,$J,358.3,38634,2)
+224 ;;=^5063597
+225 ;;^UTILITY(U,$J,358.3,38635,0)
+226 ;;=Z90.3^^107^1509^35
+227 ;;^UTILITY(U,$J,358.3,38635,1,0)
+228 ;;=^358.31IA^4^2
+229 ;;^UTILITY(U,$J,358.3,38635,1,3,0)
+230 ;;=3^Acquired Absence of Stomach (part of)
+231 ;;^UTILITY(U,$J,358.3,38635,1,4,0)
+232 ;;=4^Z90.3
+233 ;;^UTILITY(U,$J,358.3,38635,2)
+234 ;;=^5063586
+235 ;;^UTILITY(U,$J,358.3,38636,0)
+236 ;;=R45.851^^107^1510^3
+237 ;;^UTILITY(U,$J,358.3,38636,1,0)
+238 ;;=^358.31IA^4^2
+239 ;;^UTILITY(U,$J,358.3,38636,1,3,0)
+240 ;;=3^Suicidal Ideations
+241 ;;^UTILITY(U,$J,358.3,38636,1,4,0)
+242 ;;=4^R45.851
+243 ;;^UTILITY(U,$J,358.3,38636,2)
+244 ;;=^5019474
+245 ;;^UTILITY(U,$J,358.3,38637,0)
+246 ;;=T14.91XA^^107^1510^4
+247 ;;^UTILITY(U,$J,358.3,38637,1,0)
+248 ;;=^358.31IA^4^2
+249 ;;^UTILITY(U,$J,358.3,38637,1,3,0)
+250 ;;=3^Suicide Attempt,Initial Encntr
+251 ;;^UTILITY(U,$J,358.3,38637,1,4,0)
+252 ;;=4^T14.91XA
+253 ;;^UTILITY(U,$J,358.3,38637,2)
+254 ;;=^5151779
+255 ;;^UTILITY(U,$J,358.3,38638,0)
+256 ;;=T14.91XD^^107^1510^6
+257 ;;^UTILITY(U,$J,358.3,38638,1,0)
+258 ;;=^358.31IA^4^2
+259 ;;^UTILITY(U,$J,358.3,38638,1,3,0)
+260 ;;=3^Suicide Attempt,Subsequent Encntr
+261 ;;^UTILITY(U,$J,358.3,38638,1,4,0)
+262 ;;=4^T14.91XD
+263 ;;^UTILITY(U,$J,358.3,38638,2)
+264 ;;=^5151780
+265 ;;^UTILITY(U,$J,358.3,38639,0)
+266 ;;=T14.91XS^^107^1510^5
+267 ;;^UTILITY(U,$J,358.3,38639,1,0)
+268 ;;=^358.31IA^4^2
+269 ;;^UTILITY(U,$J,358.3,38639,1,3,0)
+270 ;;=3^Suicide Attempt,Sequela
+271 ;;^UTILITY(U,$J,358.3,38639,1,4,0)
+272 ;;=4^T14.91XS
+273 ;;^UTILITY(U,$J,358.3,38639,2)
+274 ;;=^5151781
+275 ;;^UTILITY(U,$J,358.3,38640,0)
+276 ;;=Z91.52^^107^1510^1
+277 ;;^UTILITY(U,$J,358.3,38640,1,0)
+278 ;;=^358.31IA^4^2
+279 ;;^UTILITY(U,$J,358.3,38640,1,3,0)
+280 ;;=3^Personal Hx of Non-Suicidal Self-Harm
+281 ;;^UTILITY(U,$J,358.3,38640,1,4,0)
+282 ;;=4^Z91.52
+283 ;;^UTILITY(U,$J,358.3,38640,2)
+284 ;;=^5161318
+285 ;;^UTILITY(U,$J,358.3,38641,0)
+286 ;;=Z91.51^^107^1510^2
+287 ;;^UTILITY(U,$J,358.3,38641,1,0)
+288 ;;=^358.31IA^4^2
+289 ;;^UTILITY(U,$J,358.3,38641,1,3,0)
+290 ;;=3^Personal Hx of Suicidal Behavior
+291 ;;^UTILITY(U,$J,358.3,38641,1,4,0)
+292 ;;=4^Z91.51
+293 ;;^UTILITY(U,$J,358.3,38641,2)
+294 ;;=^5161317
+295 ;;^UTILITY(U,$J,358.3,38642,0)
+296 ;;=N17.0^^107^1511^3
+297 ;;^UTILITY(U,$J,358.3,38642,1,0)
+298 ;;=^358.31IA^4^2
+299 ;;^UTILITY(U,$J,358.3,38642,1,3,0)
+300 ;;=3^Acute Kidney Failure w/ Tubular Necrosis
+301 ;;^UTILITY(U,$J,358.3,38642,1,4,0)
+302 ;;=4^N17.0
+303 ;;^UTILITY(U,$J,358.3,38642,2)
+304 ;;=^5015598
+305 ;;^UTILITY(U,$J,358.3,38643,0)
+306 ;;=N17.1^^107^1511^1
+307 ;;^UTILITY(U,$J,358.3,38643,1,0)
+308 ;;=^358.31IA^4^2
+309 ;;^UTILITY(U,$J,358.3,38643,1,3,0)
+310 ;;=3^Acute Kidney Failure w/ Acute Cortical Necrosis
+311 ;;^UTILITY(U,$J,358.3,38643,1,4,0)
+312 ;;=4^N17.1
+313 ;;^UTILITY(U,$J,358.3,38643,2)
+314 ;;=^5015599
+315 ;;^UTILITY(U,$J,358.3,38644,0)
+316 ;;=N17.2^^107^1511^2
+317 ;;^UTILITY(U,$J,358.3,38644,1,0)
+318 ;;=^358.31IA^4^2
+319 ;;^UTILITY(U,$J,358.3,38644,1,3,0)
+320 ;;=3^Acute Kidney Failure w/ Medullary Necrosis
+321 ;;^UTILITY(U,$J,358.3,38644,1,4,0)
+322 ;;=4^N17.2
+323 ;;^UTILITY(U,$J,358.3,38644,2)
+324 ;;=^5015600
+325 ;;^UTILITY(U,$J,358.3,38645,0)
+326 ;;=N17.8^^107^1511^4
+327 ;;^UTILITY(U,$J,358.3,38645,1,0)
+328 ;;=^358.31IA^4^2
+329 ;;^UTILITY(U,$J,358.3,38645,1,3,0)
+330 ;;=3^Acute Kidney Failure,Other
+331 ;;^UTILITY(U,$J,358.3,38645,1,4,0)
+332 ;;=4^N17.8
+333 ;;^UTILITY(U,$J,358.3,38645,2)
+334 ;;=^5015601
+335 ;;^UTILITY(U,$J,358.3,38646,0)
+336 ;;=N17.9^^107^1511^5
+337 ;;^UTILITY(U,$J,358.3,38646,1,0)
+338 ;;=^358.31IA^4^2
+339 ;;^UTILITY(U,$J,358.3,38646,1,3,0)
+340 ;;=3^Acute Kidney Failure,Unspec
+341 ;;^UTILITY(U,$J,358.3,38646,1,4,0)
+342 ;;=4^N17.9
+343 ;;^UTILITY(U,$J,358.3,38646,2)
+344 ;;=^338532
+345 ;;^UTILITY(U,$J,358.3,38647,0)
+346 ;;=I20.0^^107^1512^4
+347 ;;^UTILITY(U,$J,358.3,38647,1,0)
+348 ;;=^358.31IA^4^2
+349 ;;^UTILITY(U,$J,358.3,38647,1,3,0)
+350 ;;=3^Unstable Angina
+351 ;;^UTILITY(U,$J,358.3,38647,1,4,0)
+352 ;;=4^I20.0
+353 ;;^UTILITY(U,$J,358.3,38647,2)
+354 ;;=^5007076
+355 ;;^UTILITY(U,$J,358.3,38648,0)
+356 ;;=I20.1^^107^1512^1
+357 ;;^UTILITY(U,$J,358.3,38648,1,0)
+358 ;;=^358.31IA^4^2
+359 ;;^UTILITY(U,$J,358.3,38648,1,3,0)
+360 ;;=3^Angina Pectoris w/ Documented Spasm
+361 ;;^UTILITY(U,$J,358.3,38648,1,4,0)
+362 ;;=4^I20.1
+363 ;;^UTILITY(U,$J,358.3,38648,2)
+364 ;;=^5007077
+365 ;;^UTILITY(U,$J,358.3,38649,0)
+366 ;;=I20.8^^107^1512^2
+367 ;;^UTILITY(U,$J,358.3,38649,1,0)
+368 ;;=^358.31IA^4^2
+369 ;;^UTILITY(U,$J,358.3,38649,1,3,0)
+370 ;;=3^Angina Pectoris,Other Forms
+371 ;;^UTILITY(U,$J,358.3,38649,1,4,0)
+372 ;;=4^I20.8
+373 ;;^UTILITY(U,$J,358.3,38649,2)
+374 ;;=^5007078
+375 ;;^UTILITY(U,$J,358.3,38650,0)
+376 ;;=I20.9^^107^1512^3
+377 ;;^UTILITY(U,$J,358.3,38650,1,0)
+378 ;;=^358.31IA^4^2
+379 ;;^UTILITY(U,$J,358.3,38650,1,3,0)
+380 ;;=3^Angina Pectoris,Unspec
+381 ;;^UTILITY(U,$J,358.3,38650,1,4,0)
+382 ;;=4^I20.9
+383 ;;^UTILITY(U,$J,358.3,38650,2)
+384 ;;=^5007079
+385 ;;^UTILITY(U,$J,358.3,38651,0)
+386 ;;=J40.^^107^1513^17
+387 ;;^UTILITY(U,$J,358.3,38651,1,0)
+388 ;;=^358.31IA^4^2
+389 ;;^UTILITY(U,$J,358.3,38651,1,3,0)
+390 ;;=3^Bronchitis
+391 ;;^UTILITY(U,$J,358.3,38651,1,4,0)
+392 ;;=4^J40.
+393 ;;^UTILITY(U,$J,358.3,38651,2)
+394 ;;=^17164
+395 ;;^UTILITY(U,$J,358.3,38652,0)
+396 ;;=J41.0^^107^1513^20
+397 ;;^UTILITY(U,$J,358.3,38652,1,0)
+398 ;;=^358.31IA^4^2
+399 ;;^UTILITY(U,$J,358.3,38652,1,3,0)
+400 ;;=3^Bronchitis,Simple Chronic
+401 ;;^UTILITY(U,$J,358.3,38652,1,4,0)
+402 ;;=4^J41.0
+403 ;;^UTILITY(U,$J,358.3,38652,2)
+404 ;;=^269946
+405 ;;^UTILITY(U,$J,358.3,38653,0)
+406 ;;=J41.1^^107^1513^19
+407 ;;^UTILITY(U,$J,358.3,38653,1,0)
+408 ;;=^358.31IA^4^2
+409 ;;^UTILITY(U,$J,358.3,38653,1,3,0)
+410 ;;=3^Bronchitis,Mucopurulent Chronic
+411 ;;^UTILITY(U,$J,358.3,38653,1,4,0)
+412 ;;=4^J41.1
+413 ;;^UTILITY(U,$J,358.3,38653,2)
+414 ;;=^269949
+415 ;;^UTILITY(U,$J,358.3,38654,0)
+416 ;;=J41.8^^107^1513^18
+417 ;;^UTILITY(U,$J,358.3,38654,1,0)
+418 ;;=^358.31IA^4^2
+419 ;;^UTILITY(U,$J,358.3,38654,1,3,0)
+420 ;;=3^Bronchitis,Mixed Simple & Mucopurulent Chronic
+421 ;;^UTILITY(U,$J,358.3,38654,1,4,0)
+422 ;;=4^J41.8
+423 ;;^UTILITY(U,$J,358.3,38654,2)
+424 ;;=^5008233
+425 ;;^UTILITY(U,$J,358.3,38655,0)
+426 ;;=J42.^^107^1513^21
+427 ;;^UTILITY(U,$J,358.3,38655,1,0)
+428 ;;=^358.31IA^4^2
+429 ;;^UTILITY(U,$J,358.3,38655,1,3,0)
+430 ;;=3^Bronchitis,Unspec Chronic
+431 ;;^UTILITY(U,$J,358.3,38655,1,4,0)
+432 ;;=4^J42.
+433 ;;^UTILITY(U,$J,358.3,38655,2)
+434 ;;=^5008234
+435 ;;^UTILITY(U,$J,358.3,38656,0)
+436 ;;=J43.0^^107^1513^29
+437 ;;^UTILITY(U,$J,358.3,38656,1,0)
+438 ;;=^358.31IA^4^2
+439 ;;^UTILITY(U,$J,358.3,38656,1,3,0)
+440 ;;=3^Emphysema,Pulmonary,Unilateral
+441 ;;^UTILITY(U,$J,358.3,38656,1,4,0)
+442 ;;=4^J43.0
+443 ;;^UTILITY(U,$J,358.3,38656,2)
+444 ;;=^5008235
+445 ;;^UTILITY(U,$J,358.3,38657,0)
+446 ;;=J43.1^^107^1513^28
+447 ;;^UTILITY(U,$J,358.3,38657,1,0)
+448 ;;=^358.31IA^4^2
+449 ;;^UTILITY(U,$J,358.3,38657,1,3,0)
+450 ;;=3^Emphysema,Panlobular
+451 ;;^UTILITY(U,$J,358.3,38657,1,4,0)
+452 ;;=4^J43.1
+453 ;;^UTILITY(U,$J,358.3,38657,2)
+454 ;;=^5008236
+455 ;;^UTILITY(U,$J,358.3,38658,0)
+456 ;;=J43.2^^107^1513^26
+457 ;;^UTILITY(U,$J,358.3,38658,1,0)
+458 ;;=^358.31IA^4^2
+459 ;;^UTILITY(U,$J,358.3,38658,1,3,0)
+460 ;;=3^Emphysema,Centrilobular
+461 ;;^UTILITY(U,$J,358.3,38658,1,4,0)
+462 ;;=4^J43.2
+463 ;;^UTILITY(U,$J,358.3,38658,2)
+464 ;;=^5008237
+465 ;;^UTILITY(U,$J,358.3,38659,0)
+466 ;;=J43.8^^107^1513^27
+467 ;;^UTILITY(U,$J,358.3,38659,1,0)
+468 ;;=^358.31IA^4^2
+469 ;;^UTILITY(U,$J,358.3,38659,1,3,0)
+470 ;;=3^Emphysema,Other
+471 ;;^UTILITY(U,$J,358.3,38659,1,4,0)
+472 ;;=4^J43.8
+473 ;;^UTILITY(U,$J,358.3,38659,2)
+474 ;;=^87569
+475 ;;^UTILITY(U,$J,358.3,38660,0)
+476 ;;=J43.9^^107^1513^30
+477 ;;^UTILITY(U,$J,358.3,38660,1,0)
+478 ;;=^358.31IA^4^2
+479 ;;^UTILITY(U,$J,358.3,38660,1,3,0)
+480 ;;=3^Emphysema,Unspec
+481 ;;^UTILITY(U,$J,358.3,38660,1,4,0)
+482 ;;=4^J43.9
+483 ;;^UTILITY(U,$J,358.3,38660,2)
+484 ;;=^5008238
+485 ;;^UTILITY(U,$J,358.3,38661,0)
+486 ;;=J44.0^^107^1513^23
+487 ;;^UTILITY(U,$J,358.3,38661,1,0)
+488 ;;=^358.31IA^4^2
+489 ;;^UTILITY(U,$J,358.3,38661,1,3,0)
+490 ;;=3^COPD w/ (Acute) Lower Resp Infection
+491 ;;^UTILITY(U,$J,358.3,38661,1,4,0)
+492 ;;=4^J44.0
+493 ;;^UTILITY(U,$J,358.3,38661,2)
+494 ;;=^5008239
+495 ;;^UTILITY(U,$J,358.3,38662,0)
+496 ;;=J45.20^^107^1513^5
+497 ;;^UTILITY(U,$J,358.3,38662,1,0)
+498 ;;=^358.31IA^4^2
+499 ;;^UTILITY(U,$J,358.3,38662,1,3,0)
+500 ;;=3^Asthma,Mild Intermittent,Uncompl
+501 ;;^UTILITY(U,$J,358.3,38662,1,4,0)
+502 ;;=4^J45.20
+503 ;;^UTILITY(U,$J,358.3,38662,2)
+504 ;;=^5008242
+505 ;;^UTILITY(U,$J,358.3,38663,0)
+506 ;;=J45.21^^107^1513^3
+507 ;;^UTILITY(U,$J,358.3,38663,1,0)
+508 ;;=^358.31IA^4^2
+509 ;;^UTILITY(U,$J,358.3,38663,1,3,0)
+510 ;;=3^Asthma,Mild Intermittent w/ Acute Exacerbation
+511 ;;^UTILITY(U,$J,358.3,38663,1,4,0)
+512 ;;=4^J45.21
+513 ;;^UTILITY(U,$J,358.3,38663,2)
+514 ;;=^5008243
+515 ;;^UTILITY(U,$J,358.3,38664,0)
+516 ;;=J45.22^^107^1513^4
+517 ;;^UTILITY(U,$J,358.3,38664,1,0)
+518 ;;=^358.31IA^4^2
+519 ;;^UTILITY(U,$J,358.3,38664,1,3,0)
+520 ;;=3^Asthma,Mild Intermittent w/ Status Asthmaticus
+521 ;;^UTILITY(U,$J,358.3,38664,1,4,0)
+522 ;;=4^J45.22
+523 ;;^UTILITY(U,$J,358.3,38664,2)
+524 ;;=^5008244
+525 ;;^UTILITY(U,$J,358.3,38665,0)
+526 ;;=J45.31^^107^1513^6
+527 ;;^UTILITY(U,$J,358.3,38665,1,0)
+528 ;;=^358.31IA^4^2
+529 ;;^UTILITY(U,$J,358.3,38665,1,3,0)
+530 ;;=3^Asthma,Mild Persistent w/ Acute Exacerbation
+531 ;;^UTILITY(U,$J,358.3,38665,1,4,0)
+532 ;;=4^J45.31
+533 ;;^UTILITY(U,$J,358.3,38665,2)
+534 ;;=^5008246
+535 ;;^UTILITY(U,$J,358.3,38666,0)
+536 ;;=J45.32^^107^1513^7
+537 ;;^UTILITY(U,$J,358.3,38666,1,0)
+538 ;;=^358.31IA^4^2
+539 ;;^UTILITY(U,$J,358.3,38666,1,3,0)
+540 ;;=3^Asthma,Mild Persistent w/ Status Asthmaticus
+541 ;;^UTILITY(U,$J,358.3,38666,1,4,0)
+542 ;;=4^J45.32
+543 ;;^UTILITY(U,$J,358.3,38666,2)
+544 ;;=^5008247
+545 ;;^UTILITY(U,$J,358.3,38667,0)
+546 ;;=J45.40^^107^1513^10
+547 ;;^UTILITY(U,$J,358.3,38667,1,0)
+548 ;;=^358.31IA^4^2
+549 ;;^UTILITY(U,$J,358.3,38667,1,3,0)
+550 ;;=3^Asthma,Moderate Persistent,Uncomplicated
+551 ;;^UTILITY(U,$J,358.3,38667,1,4,0)
+552 ;;=4^J45.40
+553 ;;^UTILITY(U,$J,358.3,38667,2)
+554 ;;=^5008248
+555 ;;^UTILITY(U,$J,358.3,38668,0)
+556 ;;=J44.9^^107^1513^24
+557 ;;^UTILITY(U,$J,358.3,38668,1,0)
+558 ;;=^358.31IA^4^2
+559 ;;^UTILITY(U,$J,358.3,38668,1,3,0)
+560 ;;=3^COPD,Unspec
+561 ;;^UTILITY(U,$J,358.3,38668,1,4,0)
+562 ;;=4^J44.9
+563 ;;^UTILITY(U,$J,358.3,38668,2)
+564 ;;=^5008241
+565 ;;^UTILITY(U,$J,358.3,38669,0)
+566 ;;=J44.1^^107^1513^22
+567 ;;^UTILITY(U,$J,358.3,38669,1,0)
+568 ;;=^358.31IA^4^2
+569 ;;^UTILITY(U,$J,358.3,38669,1,3,0)
+570 ;;=3^COPD w/ Acute Exacerbation
+571 ;;^UTILITY(U,$J,358.3,38669,1,4,0)
+572 ;;=4^J44.1
+573 ;;^UTILITY(U,$J,358.3,38669,2)
+574 ;;=^5008240
+575 ;;^UTILITY(U,$J,358.3,38670,0)
+576 ;;=J47.0^^107^1513^15
+577 ;;^UTILITY(U,$J,358.3,38670,1,0)
+578 ;;=^358.31IA^4^2
+579 ;;^UTILITY(U,$J,358.3,38670,1,3,0)
+580 ;;=3^Bronchiectasis w/ Acute Lower Resp Infection
+581 ;;^UTILITY(U,$J,358.3,38670,1,4,0)
+582 ;;=4^J47.0
+583 ;;^UTILITY(U,$J,358.3,38670,2)
+584 ;;=^5008258
+585 ;;^UTILITY(U,$J,358.3,38671,0)
+586 ;;=J47.1^^107^1513^14
+587 ;;^UTILITY(U,$J,358.3,38671,1,0)
+588 ;;=^358.31IA^4^2
+589 ;;^UTILITY(U,$J,358.3,38671,1,3,0)
+590 ;;=3^Bronchiectasis w/ Acute Exacerbation
+591 ;;^UTILITY(U,$J,358.3,38671,1,4,0)
+592 ;;=4^J47.1
+593 ;;^UTILITY(U,$J,358.3,38671,2)
+594 ;;=^5008259
+595 ;;^UTILITY(U,$J,358.3,38672,0)
+596 ;;=J47.9^^107^1513^16
+597 ;;^UTILITY(U,$J,358.3,38672,1,0)
+598 ;;=^358.31IA^4^2
+599 ;;^UTILITY(U,$J,358.3,38672,1,3,0)
+600 ;;=3^Bronchiectasis,Uncomplicated
+601 ;;^UTILITY(U,$J,358.3,38672,1,4,0)
+602 ;;=4^J47.9
+603 ;;^UTILITY(U,$J,358.3,38672,2)
+604 ;;=^5008260
+605 ;;^UTILITY(U,$J,358.3,38673,0)
+606 ;;=J45.41^^107^1513^8
+607 ;;^UTILITY(U,$J,358.3,38673,1,0)
+608 ;;=^358.31IA^4^2
+609 ;;^UTILITY(U,$J,358.3,38673,1,3,0)
+610 ;;=3^Asthma,Moderate Persistent w/ Acute Exacerbation
+611 ;;^UTILITY(U,$J,358.3,38673,1,4,0)
+612 ;;=4^J45.41
+613 ;;^UTILITY(U,$J,358.3,38673,2)
+614 ;;=^5008249
+615 ;;^UTILITY(U,$J,358.3,38674,0)
+616 ;;=J45.42^^107^1513^9
+617 ;;^UTILITY(U,$J,358.3,38674,1,0)
+618 ;;=^358.31IA^4^2
+619 ;;^UTILITY(U,$J,358.3,38674,1,3,0)
+620 ;;=3^Asthma,Moderate Persistent w/ Status Asthmaticus
+621 ;;^UTILITY(U,$J,358.3,38674,1,4,0)
+622 ;;=4^J45.42
+623 ;;^UTILITY(U,$J,358.3,38674,2)
+624 ;;=^5008250
+625 ;;^UTILITY(U,$J,358.3,38675,0)
+626 ;;=J45.51^^107^1513^12
+627 ;;^UTILITY(U,$J,358.3,38675,1,0)
+628 ;;=^358.31IA^4^2
+629 ;;^UTILITY(U,$J,358.3,38675,1,3,0)
+630 ;;=3^Asthma,Severe Persistent w/ Acute Exacerbation
+631 ;;^UTILITY(U,$J,358.3,38675,1,4,0)
+632 ;;=4^J45.51
+633 ;;^UTILITY(U,$J,358.3,38675,2)
+634 ;;=^5008252
+635 ;;^UTILITY(U,$J,358.3,38676,0)
+636 ;;=J45.52^^107^1513^13
+637 ;;^UTILITY(U,$J,358.3,38676,1,0)
+638 ;;=^358.31IA^4^2
+639 ;;^UTILITY(U,$J,358.3,38676,1,3,0)
+640 ;;=3^Asthma,Severe Persistent w/ Status Asthmaticus
+641 ;;^UTILITY(U,$J,358.3,38676,1,4,0)
+642 ;;=4^J45.52
+643 ;;^UTILITY(U,$J,358.3,38676,2)
+644 ;;=^5008253
+645 ;;^UTILITY(U,$J,358.3,38677,0)
+646 ;;=J45.901^^107^1513^1
+647 ;;^UTILITY(U,$J,358.3,38677,1,0)
+648 ;;=^358.31IA^4^2
+649 ;;^UTILITY(U,$J,358.3,38677,1,3,0)
+650 ;;=3^Asthma w/ Acute Exacerbation,Unspec
+651 ;;^UTILITY(U,$J,358.3,38677,1,4,0)
+652 ;;=4^J45.901
+653 ;;^UTILITY(U,$J,358.3,38677,2)
+654 ;;=^5008254
+655 ;;^UTILITY(U,$J,358.3,38678,0)
+656 ;;=J45.902^^107^1513^2
+657 ;;^UTILITY(U,$J,358.3,38678,1,0)
+658 ;;=^358.31IA^4^2
+659 ;;^UTILITY(U,$J,358.3,38678,1,3,0)
+660 ;;=3^Asthma w/ Status Asthmaticus,Unspec
+661 ;;^UTILITY(U,$J,358.3,38678,1,4,0)
+662 ;;=4^J45.902
+663 ;;^UTILITY(U,$J,358.3,38678,2)
+664 ;;=^5008255
+665 ;;^UTILITY(U,$J,358.3,38679,0)
+666 ;;=J45.990^^107^1513^31
+667 ;;^UTILITY(U,$J,358.3,38679,1,0)
+668 ;;=^358.31IA^4^2
+669 ;;^UTILITY(U,$J,358.3,38679,1,3,0)
+670 ;;=3^Exercised Induced Bronchospasm
+671 ;;^UTILITY(U,$J,358.3,38679,1,4,0)
+672 ;;=4^J45.990
+673 ;;^UTILITY(U,$J,358.3,38679,2)
+674 ;;=^329926
+675 ;;^UTILITY(U,$J,358.3,38680,0)
+676 ;;=J45.998^^107^1513^11
+677 ;;^UTILITY(U,$J,358.3,38680,1,0)
+678 ;;=^358.31IA^4^2
