IBDEI04D ; ; 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,10519,1,4,0)
;;=4^R45.851
;;^UTILITY(U,$J,358.3,10519,2)
;;=^5019474
;;^UTILITY(U,$J,358.3,10520,0)
;;=T14.91XA^^45^454^4
;;^UTILITY(U,$J,358.3,10520,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10520,1,3,0)
;;=3^Suicide Attempt,Initial Encntr
;;^UTILITY(U,$J,358.3,10520,1,4,0)
;;=4^T14.91XA
;;^UTILITY(U,$J,358.3,10520,2)
;;=^5151779
;;^UTILITY(U,$J,358.3,10521,0)
;;=T14.91XD^^45^454^6
;;^UTILITY(U,$J,358.3,10521,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10521,1,3,0)
;;=3^Suicide Attempt,Subsequent Encntr
;;^UTILITY(U,$J,358.3,10521,1,4,0)
;;=4^T14.91XD
;;^UTILITY(U,$J,358.3,10521,2)
;;=^5151780
;;^UTILITY(U,$J,358.3,10522,0)
;;=T14.91XS^^45^454^5
;;^UTILITY(U,$J,358.3,10522,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10522,1,3,0)
;;=3^Suicide Attempt,Sequela
;;^UTILITY(U,$J,358.3,10522,1,4,0)
;;=4^T14.91XS
;;^UTILITY(U,$J,358.3,10522,2)
;;=^5151781
;;^UTILITY(U,$J,358.3,10523,0)
;;=Z91.52^^45^454^1
;;^UTILITY(U,$J,358.3,10523,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10523,1,3,0)
;;=3^Personal Hx of Non-Suicidal Self-Harm
;;^UTILITY(U,$J,358.3,10523,1,4,0)
;;=4^Z91.52
;;^UTILITY(U,$J,358.3,10523,2)
;;=^5161318
;;^UTILITY(U,$J,358.3,10524,0)
;;=Z91.51^^45^454^2
;;^UTILITY(U,$J,358.3,10524,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10524,1,3,0)
;;=3^Personal Hx of Suicidal Behavior
;;^UTILITY(U,$J,358.3,10524,1,4,0)
;;=4^Z91.51
;;^UTILITY(U,$J,358.3,10524,2)
;;=^5161317
;;^UTILITY(U,$J,358.3,10525,0)
;;=N17.0^^45^455^3
;;^UTILITY(U,$J,358.3,10525,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10525,1,3,0)
;;=3^Acute Kidney Failure w/ Tubular Necrosis
;;^UTILITY(U,$J,358.3,10525,1,4,0)
;;=4^N17.0
;;^UTILITY(U,$J,358.3,10525,2)
;;=^5015598
;;^UTILITY(U,$J,358.3,10526,0)
;;=N17.1^^45^455^1
;;^UTILITY(U,$J,358.3,10526,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10526,1,3,0)
;;=3^Acute Kidney Failure w/ Acute Cortical Necrosis
;;^UTILITY(U,$J,358.3,10526,1,4,0)
;;=4^N17.1
;;^UTILITY(U,$J,358.3,10526,2)
;;=^5015599
;;^UTILITY(U,$J,358.3,10527,0)
;;=N17.2^^45^455^2
;;^UTILITY(U,$J,358.3,10527,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10527,1,3,0)
;;=3^Acute Kidney Failure w/ Medullary Necrosis
;;^UTILITY(U,$J,358.3,10527,1,4,0)
;;=4^N17.2
;;^UTILITY(U,$J,358.3,10527,2)
;;=^5015600
;;^UTILITY(U,$J,358.3,10528,0)
;;=N17.8^^45^455^4
;;^UTILITY(U,$J,358.3,10528,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10528,1,3,0)
;;=3^Acute Kidney Failure,Other
;;^UTILITY(U,$J,358.3,10528,1,4,0)
;;=4^N17.8
;;^UTILITY(U,$J,358.3,10528,2)
;;=^5015601
;;^UTILITY(U,$J,358.3,10529,0)
;;=N17.9^^45^455^5
;;^UTILITY(U,$J,358.3,10529,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10529,1,3,0)
;;=3^Acute Kidney Failure,Unspec
;;^UTILITY(U,$J,358.3,10529,1,4,0)
;;=4^N17.9
;;^UTILITY(U,$J,358.3,10529,2)
;;=^338532
;;^UTILITY(U,$J,358.3,10530,0)
;;=I20.0^^45^456^4
;;^UTILITY(U,$J,358.3,10530,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10530,1,3,0)
;;=3^Unstable Angina
;;^UTILITY(U,$J,358.3,10530,1,4,0)
;;=4^I20.0
;;^UTILITY(U,$J,358.3,10530,2)
;;=^5007076
;;^UTILITY(U,$J,358.3,10531,0)
;;=I20.1^^45^456^1
;;^UTILITY(U,$J,358.3,10531,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10531,1,3,0)
;;=3^Angina Pectoris w/ Documented Spasm
;;^UTILITY(U,$J,358.3,10531,1,4,0)
;;=4^I20.1
;;^UTILITY(U,$J,358.3,10531,2)
;;=^5007077
;;^UTILITY(U,$J,358.3,10532,0)
;;=I20.8^^45^456^2
;;^UTILITY(U,$J,358.3,10532,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10532,1,3,0)
;;=3^Angina Pectoris,Other Forms
;;^UTILITY(U,$J,358.3,10532,1,4,0)
;;=4^I20.8
;;^UTILITY(U,$J,358.3,10532,2)
;;=^5007078
;;^UTILITY(U,$J,358.3,10533,0)
;;=I20.9^^45^456^3
;;^UTILITY(U,$J,358.3,10533,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10533,1,3,0)
;;=3^Angina Pectoris,Unspec
;;^UTILITY(U,$J,358.3,10533,1,4,0)
;;=4^I20.9
;;^UTILITY(U,$J,358.3,10533,2)
;;=^5007079
;;^UTILITY(U,$J,358.3,10534,0)
;;=J40.^^45^457^17
;;^UTILITY(U,$J,358.3,10534,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10534,1,3,0)
;;=3^Bronchitis
;;^UTILITY(U,$J,358.3,10534,1,4,0)
;;=4^J40.
;;^UTILITY(U,$J,358.3,10534,2)
;;=^17164
;;^UTILITY(U,$J,358.3,10535,0)
;;=J41.0^^45^457^20
;;^UTILITY(U,$J,358.3,10535,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10535,1,3,0)
;;=3^Bronchitis,Simple Chronic
;;^UTILITY(U,$J,358.3,10535,1,4,0)
;;=4^J41.0
;;^UTILITY(U,$J,358.3,10535,2)
;;=^269946
;;^UTILITY(U,$J,358.3,10536,0)
;;=J41.1^^45^457^19
;;^UTILITY(U,$J,358.3,10536,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10536,1,3,0)
;;=3^Bronchitis,Mucopurulent Chronic
;;^UTILITY(U,$J,358.3,10536,1,4,0)
;;=4^J41.1
;;^UTILITY(U,$J,358.3,10536,2)
;;=^269949
;;^UTILITY(U,$J,358.3,10537,0)
;;=J41.8^^45^457^18
;;^UTILITY(U,$J,358.3,10537,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10537,1,3,0)
;;=3^Bronchitis,Mixed Simple & Mucopurulent Chronic
;;^UTILITY(U,$J,358.3,10537,1,4,0)
;;=4^J41.8
;;^UTILITY(U,$J,358.3,10537,2)
;;=^5008233
;;^UTILITY(U,$J,358.3,10538,0)
;;=J42.^^45^457^21
;;^UTILITY(U,$J,358.3,10538,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10538,1,3,0)
;;=3^Bronchitis,Unspec Chronic
;;^UTILITY(U,$J,358.3,10538,1,4,0)
;;=4^J42.
;;^UTILITY(U,$J,358.3,10538,2)
;;=^5008234
;;^UTILITY(U,$J,358.3,10539,0)
;;=J43.0^^45^457^29
;;^UTILITY(U,$J,358.3,10539,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10539,1,3,0)
;;=3^Emphysema,Pulmonary,Unilateral
;;^UTILITY(U,$J,358.3,10539,1,4,0)
;;=4^J43.0
;;^UTILITY(U,$J,358.3,10539,2)
;;=^5008235
;;^UTILITY(U,$J,358.3,10540,0)
;;=J43.1^^45^457^28
;;^UTILITY(U,$J,358.3,10540,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10540,1,3,0)
;;=3^Emphysema,Panlobular
;;^UTILITY(U,$J,358.3,10540,1,4,0)
;;=4^J43.1
;;^UTILITY(U,$J,358.3,10540,2)
;;=^5008236
;;^UTILITY(U,$J,358.3,10541,0)
;;=J43.2^^45^457^26
;;^UTILITY(U,$J,358.3,10541,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10541,1,3,0)
;;=3^Emphysema,Centrilobular
;;^UTILITY(U,$J,358.3,10541,1,4,0)
;;=4^J43.2
;;^UTILITY(U,$J,358.3,10541,2)
;;=^5008237
;;^UTILITY(U,$J,358.3,10542,0)
;;=J43.8^^45^457^27
;;^UTILITY(U,$J,358.3,10542,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10542,1,3,0)
;;=3^Emphysema,Other
;;^UTILITY(U,$J,358.3,10542,1,4,0)
;;=4^J43.8
;;^UTILITY(U,$J,358.3,10542,2)
;;=^87569
;;^UTILITY(U,$J,358.3,10543,0)
;;=J43.9^^45^457^30
;;^UTILITY(U,$J,358.3,10543,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10543,1,3,0)
;;=3^Emphysema,Unspec
;;^UTILITY(U,$J,358.3,10543,1,4,0)
;;=4^J43.9
;;^UTILITY(U,$J,358.3,10543,2)
;;=^5008238
;;^UTILITY(U,$J,358.3,10544,0)
;;=J44.0^^45^457^23
;;^UTILITY(U,$J,358.3,10544,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10544,1,3,0)
;;=3^COPD w/ (Acute) Lower Resp Infection
;;^UTILITY(U,$J,358.3,10544,1,4,0)
;;=4^J44.0
;;^UTILITY(U,$J,358.3,10544,2)
;;=^5008239
;;^UTILITY(U,$J,358.3,10545,0)
;;=J45.20^^45^457^5
;;^UTILITY(U,$J,358.3,10545,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10545,1,3,0)
;;=3^Asthma,Mild Intermittent,Uncompl
;;^UTILITY(U,$J,358.3,10545,1,4,0)
;;=4^J45.20
;;^UTILITY(U,$J,358.3,10545,2)
;;=^5008242
;;^UTILITY(U,$J,358.3,10546,0)
;;=J45.21^^45^457^3
;;^UTILITY(U,$J,358.3,10546,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10546,1,3,0)
;;=3^Asthma,Mild Intermittent w/ Acute Exacerbation
;;^UTILITY(U,$J,358.3,10546,1,4,0)
;;=4^J45.21
;;^UTILITY(U,$J,358.3,10546,2)
;;=^5008243
;;^UTILITY(U,$J,358.3,10547,0)
;;=J45.22^^45^457^4
;;^UTILITY(U,$J,358.3,10547,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10547,1,3,0)
;;=3^Asthma,Mild Intermittent w/ Status Asthmaticus
;;^UTILITY(U,$J,358.3,10547,1,4,0)
;;=4^J45.22
;;^UTILITY(U,$J,358.3,10547,2)
;;=^5008244
;;^UTILITY(U,$J,358.3,10548,0)
;;=J45.31^^45^457^6
;;^UTILITY(U,$J,358.3,10548,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10548,1,3,0)
;;=3^Asthma,Mild Persistent w/ Acute Exacerbation
;;^UTILITY(U,$J,358.3,10548,1,4,0)
;;=4^J45.31
;;^UTILITY(U,$J,358.3,10548,2)
;;=^5008246
;;^UTILITY(U,$J,358.3,10549,0)
;;=J45.32^^45^457^7
;;^UTILITY(U,$J,358.3,10549,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10549,1,3,0)
;;=3^Asthma,Mild Persistent w/ Status Asthmaticus
;;^UTILITY(U,$J,358.3,10549,1,4,0)
;;=4^J45.32
;;^UTILITY(U,$J,358.3,10549,2)
;;=^5008247
;;^UTILITY(U,$J,358.3,10550,0)
;;=J45.40^^45^457^10
;;^UTILITY(U,$J,358.3,10550,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10550,1,3,0)
;;=3^Asthma,Moderate Persistent,Uncomplicated
;;^UTILITY(U,$J,358.3,10550,1,4,0)
;;=4^J45.40
;;^UTILITY(U,$J,358.3,10550,2)
;;=^5008248
;;^UTILITY(U,$J,358.3,10551,0)
;;=J44.9^^45^457^24
;;^UTILITY(U,$J,358.3,10551,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10551,1,3,0)
;;=3^COPD,Unspec
;;^UTILITY(U,$J,358.3,10551,1,4,0)
;;=4^J44.9
;;^UTILITY(U,$J,358.3,10551,2)
;;=^5008241
;;^UTILITY(U,$J,358.3,10552,0)
;;=J44.1^^45^457^22
;;^UTILITY(U,$J,358.3,10552,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10552,1,3,0)
;;=3^COPD w/ Acute Exacerbation
;;^UTILITY(U,$J,358.3,10552,1,4,0)
;;=4^J44.1
;;^UTILITY(U,$J,358.3,10552,2)
;;=^5008240
;;^UTILITY(U,$J,358.3,10553,0)
;;=J47.0^^45^457^15
;;^UTILITY(U,$J,358.3,10553,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10553,1,3,0)
;;=3^Bronchiectasis w/ Acute Lower Resp Infection
;;^UTILITY(U,$J,358.3,10553,1,4,0)
;;=4^J47.0
;;^UTILITY(U,$J,358.3,10553,2)
;;=^5008258
;;^UTILITY(U,$J,358.3,10554,0)
;;=J47.1^^45^457^14
;;^UTILITY(U,$J,358.3,10554,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10554,1,3,0)
;;=3^Bronchiectasis w/ Acute Exacerbation
;;^UTILITY(U,$J,358.3,10554,1,4,0)
;;=4^J47.1
;;^UTILITY(U,$J,358.3,10554,2)
;;=^5008259
;;^UTILITY(U,$J,358.3,10555,0)
;;=J47.9^^45^457^16
;;^UTILITY(U,$J,358.3,10555,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10555,1,3,0)
;;=3^Bronchiectasis,Uncomplicated
;;^UTILITY(U,$J,358.3,10555,1,4,0)
;;=4^J47.9
;;^UTILITY(U,$J,358.3,10555,2)
;;=^5008260
;;^UTILITY(U,$J,358.3,10556,0)
;;=J45.41^^45^457^8
;;^UTILITY(U,$J,358.3,10556,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10556,1,3,0)
;;=3^Asthma,Moderate Persistent w/ Acute Exacerbation
;;^UTILITY(U,$J,358.3,10556,1,4,0)
;;=4^J45.41
;;^UTILITY(U,$J,358.3,10556,2)
;;=^5008249
;;^UTILITY(U,$J,358.3,10557,0)
;;=J45.42^^45^457^9
;;^UTILITY(U,$J,358.3,10557,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10557,1,3,0)
;;=3^Asthma,Moderate Persistent w/ Status Asthmaticus
;;^UTILITY(U,$J,358.3,10557,1,4,0)
;;=4^J45.42
;;^UTILITY(U,$J,358.3,10557,2)
;;=^5008250
;;^UTILITY(U,$J,358.3,10558,0)
;;=J45.51^^45^457^12
;;^UTILITY(U,$J,358.3,10558,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10558,1,3,0)
;;=3^Asthma,Severe Persistent w/ Acute Exacerbation
;;^UTILITY(U,$J,358.3,10558,1,4,0)
;;=4^J45.51
;;^UTILITY(U,$J,358.3,10558,2)
;;=^5008252
;;^UTILITY(U,$J,358.3,10559,0)
;;=J45.52^^45^457^13
;;^UTILITY(U,$J,358.3,10559,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10559,1,3,0)
;;=3^Asthma,Severe Persistent w/ Status Asthmaticus
;;^UTILITY(U,$J,358.3,10559,1,4,0)
;;=4^J45.52
;;^UTILITY(U,$J,358.3,10559,2)
;;=^5008253
;;^UTILITY(U,$J,358.3,10560,0)
;;=J45.901^^45^457^1
;;^UTILITY(U,$J,358.3,10560,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10560,1,3,0)
;;=3^Asthma w/ Acute Exacerbation,Unspec
;;^UTILITY(U,$J,358.3,10560,1,4,0)
;;=4^J45.901
;;^UTILITY(U,$J,358.3,10560,2)
;;=^5008254
;;^UTILITY(U,$J,358.3,10561,0)
;;=J45.902^^45^457^2
;;^UTILITY(U,$J,358.3,10561,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10561,1,3,0)
;;=3^Asthma w/ Status Asthmaticus,Unspec
;;^UTILITY(U,$J,358.3,10561,1,4,0)
;;=4^J45.902
;;^UTILITY(U,$J,358.3,10561,2)
;;=^5008255
;;^UTILITY(U,$J,358.3,10562,0)
;;=J45.990^^45^457^31
;;^UTILITY(U,$J,358.3,10562,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10562,1,3,0)
;;=3^Exercised Induced Bronchospasm
;;^UTILITY(U,$J,358.3,10562,1,4,0)
;;=4^J45.990
;;^UTILITY(U,$J,358.3,10562,2)
;;=^329926
;;^UTILITY(U,$J,358.3,10563,0)
;;=J45.998^^45^457^11
;;^UTILITY(U,$J,358.3,10563,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10563,1,3,0)
;;=3^Asthma,Other
;;^UTILITY(U,$J,358.3,10563,1,4,0)
;;=4^J45.998
;;^UTILITY(U,$J,358.3,10563,2)
;;=^5008257
;;^UTILITY(U,$J,358.3,10564,0)
;;=J45.991^^45^457^25
;;^UTILITY(U,$J,358.3,10564,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10564,1,3,0)
;;=3^Cough Variant Asthma
;;^UTILITY(U,$J,358.3,10564,1,4,0)
;;=4^J45.991
;;^UTILITY(U,$J,358.3,10564,2)
;;=^329927
;;^UTILITY(U,$J,358.3,10565,0)
;;=I50.1^^45^458^14
;;^UTILITY(U,$J,358.3,10565,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10565,1,3,0)
;;=3^Left Ventricular Failure
;;^UTILITY(U,$J,358.3,10565,1,4,0)
;;=4^I50.1
;;^UTILITY(U,$J,358.3,10565,2)
;;=^5007238
;;^UTILITY(U,$J,358.3,10566,0)
;;=I50.20^^45^458^12
;;^UTILITY(U,$J,358.3,10566,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10566,1,3,0)
;;=3^Heart Failure,Systolic,Unspec
;;^UTILITY(U,$J,358.3,10566,1,4,0)
;;=4^I50.20
;;^UTILITY(U,$J,358.3,10566,2)
;;=^5007239
;;^UTILITY(U,$J,358.3,10567,0)
;;=I50.21^^45^458^9
;;^UTILITY(U,$J,358.3,10567,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10567,1,3,0)
;;=3^Heart Failure,Systolic,Acute
;;^UTILITY(U,$J,358.3,10567,1,4,0)
;;=4^I50.21
;;^UTILITY(U,$J,358.3,10567,2)
;;=^5007240
;;^UTILITY(U,$J,358.3,10568,0)
;;=I50.22^^45^458^11
;;^UTILITY(U,$J,358.3,10568,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10568,1,3,0)
;;=3^Heart Failure,Systolic,Chronic
;;^UTILITY(U,$J,358.3,10568,1,4,0)
;;=4^I50.22
;;^UTILITY(U,$J,358.3,10568,2)
;;=^5007241
;;^UTILITY(U,$J,358.3,10569,0)
;;=I50.23^^45^458^10
;;^UTILITY(U,$J,358.3,10569,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10569,1,3,0)
;;=3^Heart Failure,Systolic,Acute on Chronic
;;^UTILITY(U,$J,358.3,10569,1,4,0)
;;=4^I50.23
;;^UTILITY(U,$J,358.3,10569,2)
;;=^5007242
;;^UTILITY(U,$J,358.3,10570,0)
;;=I50.30^^45^458^4
;;^UTILITY(U,$J,358.3,10570,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10570,1,3,0)
;;=3^Heart Failure,Diastolic,Unspec
;;^UTILITY(U,$J,358.3,10570,1,4,0)
;;=4^I50.30
;;^UTILITY(U,$J,358.3,10570,2)
;;=^5007243
;;^UTILITY(U,$J,358.3,10571,0)
;;=I50.31^^45^458^1
;;^UTILITY(U,$J,358.3,10571,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10571,1,3,0)
;;=3^Heart Failure,Diastolic,Acute
;;^UTILITY(U,$J,358.3,10571,1,4,0)
;;=4^I50.31
;;^UTILITY(U,$J,358.3,10571,2)
;;=^5007244
;;^UTILITY(U,$J,358.3,10572,0)
;;=I50.32^^45^458^3
;;^UTILITY(U,$J,358.3,10572,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10572,1,3,0)
;;=3^Heart Failure,Diastolic,Chronic
;;^UTILITY(U,$J,358.3,10572,1,4,0)
;;=4^I50.32
;;^UTILITY(U,$J,358.3,10572,2)
;;=^5007245
;;^UTILITY(U,$J,358.3,10573,0)
;;=I50.33^^45^458^2
;;^UTILITY(U,$J,358.3,10573,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10573,1,3,0)
;;=3^Heart Failure,Diastolic,Acute on Chronic
;;^UTILITY(U,$J,358.3,10573,1,4,0)
;;=4^I50.33
;;^UTILITY(U,$J,358.3,10573,2)
;;=^5007246
;;^UTILITY(U,$J,358.3,10574,0)
;;=I50.40^^45^458^8
;;^UTILITY(U,$J,358.3,10574,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10574,1,3,0)
;;=3^Heart Failure,Systolic & Diastolic,Unspec
;;^UTILITY(U,$J,358.3,10574,1,4,0)
;;=4^I50.40
;;^UTILITY(U,$J,358.3,10574,2)
;;=^5007247
;;^UTILITY(U,$J,358.3,10575,0)
;;=I50.41^^45^458^5
;;^UTILITY(U,$J,358.3,10575,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10575,1,3,0)
;;=3^Heart Failure,Systolic & Diastolic,Acute
;;^UTILITY(U,$J,358.3,10575,1,4,0)
;;=4^I50.41
;;^UTILITY(U,$J,358.3,10575,2)
;;=^5007248
;;^UTILITY(U,$J,358.3,10576,0)
;;=I50.42^^45^458^7
;;^UTILITY(U,$J,358.3,10576,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10576,1,3,0)
;;=3^Heart Failure,Systolic & Diastolic,Chronic
;;^UTILITY(U,$J,358.3,10576,1,4,0)
;;=4^I50.42
;;^UTILITY(U,$J,358.3,10576,2)
;;=^5007249
;;^UTILITY(U,$J,358.3,10577,0)
;;=I50.43^^45^458^6
;;^UTILITY(U,$J,358.3,10577,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10577,1,3,0)
;;=3^Heart Failure,Systolic & Diastolic,Acute on Chronic
;;^UTILITY(U,$J,358.3,10577,1,4,0)
;;=4^I50.43
;;^UTILITY(U,$J,358.3,10577,2)
;;=^5007250
;;^UTILITY(U,$J,358.3,10578,0)
;;=I50.9^^45^458^13
;;^UTILITY(U,$J,358.3,10578,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10578,1,3,0)
;;=3^Heart Failure,Unspec
;;^UTILITY(U,$J,358.3,10578,1,4,0)
;;=4^I50.9
;;^UTILITY(U,$J,358.3,10578,2)
;;=^5007251
;;^UTILITY(U,$J,358.3,10579,0)
;;=I09.81^^45^458^15
;;^UTILITY(U,$J,358.3,10579,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10579,1,3,0)
;;=3^Rheumatic Heart Failure
;;^UTILITY(U,$J,358.3,10579,1,4,0)
;;=4^I09.81
;;^UTILITY(U,$J,358.3,10579,2)
;;=^5007059
;;^UTILITY(U,$J,358.3,10580,0)
;;=E86.0^^45^459^1
;;^UTILITY(U,$J,358.3,10580,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10580,1,3,0)
;;=3^Dehydration
;;^UTILITY(U,$J,358.3,10580,1,4,0)
;;=4^E86.0
;;^UTILITY(U,$J,358.3,10580,2)
;;=^332743
;;^UTILITY(U,$J,358.3,10581,0)
;;=E86.1^^45^459^4
;;^UTILITY(U,$J,358.3,10581,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10581,1,3,0)
;;=3^Hypovolemia
;;^UTILITY(U,$J,358.3,10581,1,4,0)
;;=4^E86.1
;;^UTILITY(U,$J,358.3,10581,2)
;;=^332744
;;^UTILITY(U,$J,358.3,10582,0)
;;=E86.9^^45^459^5
;;^UTILITY(U,$J,358.3,10582,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10582,1,3,0)
;;=3^Volume Depletion,Unspec
;;^UTILITY(U,$J,358.3,10582,1,4,0)
;;=4^E86.9
;;^UTILITY(U,$J,358.3,10582,2)
;;=^332840
;;^UTILITY(U,$J,358.3,10583,0)
;;=E87.0^^45^459^2
;;^UTILITY(U,$J,358.3,10583,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10583,1,3,0)
;;=3^Hyperosmolality & Hpernatremia
;;^UTILITY(U,$J,358.3,10583,1,4,0)
;;=4^E87.0
;;^UTILITY(U,$J,358.3,10583,2)
;;=^5003018
;;^UTILITY(U,$J,358.3,10584,0)
;;=E87.1^^45^459^3
;;^UTILITY(U,$J,358.3,10584,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10584,1,3,0)
;;=3^Hypo-osmolality & Hyponatremia
;;^UTILITY(U,$J,358.3,10584,1,4,0)
;;=4^E87.1
;;^UTILITY(U,$J,358.3,10584,2)
;;=^5003019
;;^UTILITY(U,$J,358.3,10585,0)
;;=E10.10^^45^460^18
;;^UTILITY(U,$J,358.3,10585,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10585,1,3,0)
;;=3^DM Type 1 w/ Ketoacidosis w/o Coma
;;^UTILITY(U,$J,358.3,10585,1,4,0)
;;=4^E10.10
;;^UTILITY(U,$J,358.3,10585,2)
;;=^5002587
;;^UTILITY(U,$J,358.3,10586,0)
;;=E10.11^^45^460^17
;;^UTILITY(U,$J,358.3,10586,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10586,1,3,0)
;;=3^DM Type 1 w/ Ketoacidosis w/ Coma
;;^UTILITY(U,$J,358.3,10586,1,4,0)
;;=4^E10.11
;;^UTILITY(U,$J,358.3,10586,2)
;;=^5002588
;;^UTILITY(U,$J,358.3,10587,0)
;;=E10.21^^45^460^8
;;^UTILITY(U,$J,358.3,10587,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10587,1,3,0)
;;=3^DM Type 1 w/ Diab Nephropathy
;;^UTILITY(U,$J,358.3,10587,1,4,0)
;;=4^E10.21
;;^UTILITY(U,$J,358.3,10587,2)
;;=^5002589
;;^UTILITY(U,$J,358.3,10588,0)
;;=E10.22^^45^460^3
;;^UTILITY(U,$J,358.3,10588,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10588,1,3,0)
;;=3^DM Type 1 w/ Diab CKD
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HIBDEI04D 19771 printed Dec 13, 2024@01:41:23 Page 2
IBDEI04D ; ; 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,10519,1,4,0)
+2 ;;=4^R45.851
+3 ;;^UTILITY(U,$J,358.3,10519,2)
+4 ;;=^5019474
+5 ;;^UTILITY(U,$J,358.3,10520,0)
+6 ;;=T14.91XA^^45^454^4
+7 ;;^UTILITY(U,$J,358.3,10520,1,0)
+8 ;;=^358.31IA^4^2
+9 ;;^UTILITY(U,$J,358.3,10520,1,3,0)
+10 ;;=3^Suicide Attempt,Initial Encntr
+11 ;;^UTILITY(U,$J,358.3,10520,1,4,0)
+12 ;;=4^T14.91XA
+13 ;;^UTILITY(U,$J,358.3,10520,2)
+14 ;;=^5151779
+15 ;;^UTILITY(U,$J,358.3,10521,0)
+16 ;;=T14.91XD^^45^454^6
+17 ;;^UTILITY(U,$J,358.3,10521,1,0)
+18 ;;=^358.31IA^4^2
+19 ;;^UTILITY(U,$J,358.3,10521,1,3,0)
+20 ;;=3^Suicide Attempt,Subsequent Encntr
+21 ;;^UTILITY(U,$J,358.3,10521,1,4,0)
+22 ;;=4^T14.91XD
+23 ;;^UTILITY(U,$J,358.3,10521,2)
+24 ;;=^5151780
+25 ;;^UTILITY(U,$J,358.3,10522,0)
+26 ;;=T14.91XS^^45^454^5
+27 ;;^UTILITY(U,$J,358.3,10522,1,0)
+28 ;;=^358.31IA^4^2
+29 ;;^UTILITY(U,$J,358.3,10522,1,3,0)
+30 ;;=3^Suicide Attempt,Sequela
+31 ;;^UTILITY(U,$J,358.3,10522,1,4,0)
+32 ;;=4^T14.91XS
+33 ;;^UTILITY(U,$J,358.3,10522,2)
+34 ;;=^5151781
+35 ;;^UTILITY(U,$J,358.3,10523,0)
+36 ;;=Z91.52^^45^454^1
+37 ;;^UTILITY(U,$J,358.3,10523,1,0)
+38 ;;=^358.31IA^4^2
+39 ;;^UTILITY(U,$J,358.3,10523,1,3,0)
+40 ;;=3^Personal Hx of Non-Suicidal Self-Harm
+41 ;;^UTILITY(U,$J,358.3,10523,1,4,0)
+42 ;;=4^Z91.52
+43 ;;^UTILITY(U,$J,358.3,10523,2)
+44 ;;=^5161318
+45 ;;^UTILITY(U,$J,358.3,10524,0)
+46 ;;=Z91.51^^45^454^2
+47 ;;^UTILITY(U,$J,358.3,10524,1,0)
+48 ;;=^358.31IA^4^2
+49 ;;^UTILITY(U,$J,358.3,10524,1,3,0)
+50 ;;=3^Personal Hx of Suicidal Behavior
+51 ;;^UTILITY(U,$J,358.3,10524,1,4,0)
+52 ;;=4^Z91.51
+53 ;;^UTILITY(U,$J,358.3,10524,2)
+54 ;;=^5161317
+55 ;;^UTILITY(U,$J,358.3,10525,0)
+56 ;;=N17.0^^45^455^3
+57 ;;^UTILITY(U,$J,358.3,10525,1,0)
+58 ;;=^358.31IA^4^2
+59 ;;^UTILITY(U,$J,358.3,10525,1,3,0)
+60 ;;=3^Acute Kidney Failure w/ Tubular Necrosis
+61 ;;^UTILITY(U,$J,358.3,10525,1,4,0)
+62 ;;=4^N17.0
+63 ;;^UTILITY(U,$J,358.3,10525,2)
+64 ;;=^5015598
+65 ;;^UTILITY(U,$J,358.3,10526,0)
+66 ;;=N17.1^^45^455^1
+67 ;;^UTILITY(U,$J,358.3,10526,1,0)
+68 ;;=^358.31IA^4^2
+69 ;;^UTILITY(U,$J,358.3,10526,1,3,0)
+70 ;;=3^Acute Kidney Failure w/ Acute Cortical Necrosis
+71 ;;^UTILITY(U,$J,358.3,10526,1,4,0)
+72 ;;=4^N17.1
+73 ;;^UTILITY(U,$J,358.3,10526,2)
+74 ;;=^5015599
+75 ;;^UTILITY(U,$J,358.3,10527,0)
+76 ;;=N17.2^^45^455^2
+77 ;;^UTILITY(U,$J,358.3,10527,1,0)
+78 ;;=^358.31IA^4^2
+79 ;;^UTILITY(U,$J,358.3,10527,1,3,0)
+80 ;;=3^Acute Kidney Failure w/ Medullary Necrosis
+81 ;;^UTILITY(U,$J,358.3,10527,1,4,0)
+82 ;;=4^N17.2
+83 ;;^UTILITY(U,$J,358.3,10527,2)
+84 ;;=^5015600
+85 ;;^UTILITY(U,$J,358.3,10528,0)
+86 ;;=N17.8^^45^455^4
+87 ;;^UTILITY(U,$J,358.3,10528,1,0)
+88 ;;=^358.31IA^4^2
+89 ;;^UTILITY(U,$J,358.3,10528,1,3,0)
+90 ;;=3^Acute Kidney Failure,Other
+91 ;;^UTILITY(U,$J,358.3,10528,1,4,0)
+92 ;;=4^N17.8
+93 ;;^UTILITY(U,$J,358.3,10528,2)
+94 ;;=^5015601
+95 ;;^UTILITY(U,$J,358.3,10529,0)
+96 ;;=N17.9^^45^455^5
+97 ;;^UTILITY(U,$J,358.3,10529,1,0)
+98 ;;=^358.31IA^4^2
+99 ;;^UTILITY(U,$J,358.3,10529,1,3,0)
+100 ;;=3^Acute Kidney Failure,Unspec
+101 ;;^UTILITY(U,$J,358.3,10529,1,4,0)
+102 ;;=4^N17.9
+103 ;;^UTILITY(U,$J,358.3,10529,2)
+104 ;;=^338532
+105 ;;^UTILITY(U,$J,358.3,10530,0)
+106 ;;=I20.0^^45^456^4
+107 ;;^UTILITY(U,$J,358.3,10530,1,0)
+108 ;;=^358.31IA^4^2
+109 ;;^UTILITY(U,$J,358.3,10530,1,3,0)
+110 ;;=3^Unstable Angina
+111 ;;^UTILITY(U,$J,358.3,10530,1,4,0)
+112 ;;=4^I20.0
+113 ;;^UTILITY(U,$J,358.3,10530,2)
+114 ;;=^5007076
+115 ;;^UTILITY(U,$J,358.3,10531,0)
+116 ;;=I20.1^^45^456^1
+117 ;;^UTILITY(U,$J,358.3,10531,1,0)
+118 ;;=^358.31IA^4^2
+119 ;;^UTILITY(U,$J,358.3,10531,1,3,0)
+120 ;;=3^Angina Pectoris w/ Documented Spasm
+121 ;;^UTILITY(U,$J,358.3,10531,1,4,0)
+122 ;;=4^I20.1
+123 ;;^UTILITY(U,$J,358.3,10531,2)
+124 ;;=^5007077
+125 ;;^UTILITY(U,$J,358.3,10532,0)
+126 ;;=I20.8^^45^456^2
+127 ;;^UTILITY(U,$J,358.3,10532,1,0)
+128 ;;=^358.31IA^4^2
+129 ;;^UTILITY(U,$J,358.3,10532,1,3,0)
+130 ;;=3^Angina Pectoris,Other Forms
+131 ;;^UTILITY(U,$J,358.3,10532,1,4,0)
+132 ;;=4^I20.8
+133 ;;^UTILITY(U,$J,358.3,10532,2)
+134 ;;=^5007078
+135 ;;^UTILITY(U,$J,358.3,10533,0)
+136 ;;=I20.9^^45^456^3
+137 ;;^UTILITY(U,$J,358.3,10533,1,0)
+138 ;;=^358.31IA^4^2
+139 ;;^UTILITY(U,$J,358.3,10533,1,3,0)
+140 ;;=3^Angina Pectoris,Unspec
+141 ;;^UTILITY(U,$J,358.3,10533,1,4,0)
+142 ;;=4^I20.9
+143 ;;^UTILITY(U,$J,358.3,10533,2)
+144 ;;=^5007079
+145 ;;^UTILITY(U,$J,358.3,10534,0)
+146 ;;=J40.^^45^457^17
+147 ;;^UTILITY(U,$J,358.3,10534,1,0)
+148 ;;=^358.31IA^4^2
+149 ;;^UTILITY(U,$J,358.3,10534,1,3,0)
+150 ;;=3^Bronchitis
+151 ;;^UTILITY(U,$J,358.3,10534,1,4,0)
+152 ;;=4^J40.
+153 ;;^UTILITY(U,$J,358.3,10534,2)
+154 ;;=^17164
+155 ;;^UTILITY(U,$J,358.3,10535,0)
+156 ;;=J41.0^^45^457^20
+157 ;;^UTILITY(U,$J,358.3,10535,1,0)
+158 ;;=^358.31IA^4^2
+159 ;;^UTILITY(U,$J,358.3,10535,1,3,0)
+160 ;;=3^Bronchitis,Simple Chronic
+161 ;;^UTILITY(U,$J,358.3,10535,1,4,0)
+162 ;;=4^J41.0
+163 ;;^UTILITY(U,$J,358.3,10535,2)
+164 ;;=^269946
+165 ;;^UTILITY(U,$J,358.3,10536,0)
+166 ;;=J41.1^^45^457^19
+167 ;;^UTILITY(U,$J,358.3,10536,1,0)
+168 ;;=^358.31IA^4^2
+169 ;;^UTILITY(U,$J,358.3,10536,1,3,0)
+170 ;;=3^Bronchitis,Mucopurulent Chronic
+171 ;;^UTILITY(U,$J,358.3,10536,1,4,0)
+172 ;;=4^J41.1
+173 ;;^UTILITY(U,$J,358.3,10536,2)
+174 ;;=^269949
+175 ;;^UTILITY(U,$J,358.3,10537,0)
+176 ;;=J41.8^^45^457^18
+177 ;;^UTILITY(U,$J,358.3,10537,1,0)
+178 ;;=^358.31IA^4^2
+179 ;;^UTILITY(U,$J,358.3,10537,1,3,0)
+180 ;;=3^Bronchitis,Mixed Simple & Mucopurulent Chronic
+181 ;;^UTILITY(U,$J,358.3,10537,1,4,0)
+182 ;;=4^J41.8
+183 ;;^UTILITY(U,$J,358.3,10537,2)
+184 ;;=^5008233
+185 ;;^UTILITY(U,$J,358.3,10538,0)
+186 ;;=J42.^^45^457^21
+187 ;;^UTILITY(U,$J,358.3,10538,1,0)
+188 ;;=^358.31IA^4^2
+189 ;;^UTILITY(U,$J,358.3,10538,1,3,0)
+190 ;;=3^Bronchitis,Unspec Chronic
+191 ;;^UTILITY(U,$J,358.3,10538,1,4,0)
+192 ;;=4^J42.
+193 ;;^UTILITY(U,$J,358.3,10538,2)
+194 ;;=^5008234
+195 ;;^UTILITY(U,$J,358.3,10539,0)
+196 ;;=J43.0^^45^457^29
+197 ;;^UTILITY(U,$J,358.3,10539,1,0)
+198 ;;=^358.31IA^4^2
+199 ;;^UTILITY(U,$J,358.3,10539,1,3,0)
+200 ;;=3^Emphysema,Pulmonary,Unilateral
+201 ;;^UTILITY(U,$J,358.3,10539,1,4,0)
+202 ;;=4^J43.0
+203 ;;^UTILITY(U,$J,358.3,10539,2)
+204 ;;=^5008235
+205 ;;^UTILITY(U,$J,358.3,10540,0)
+206 ;;=J43.1^^45^457^28
+207 ;;^UTILITY(U,$J,358.3,10540,1,0)
+208 ;;=^358.31IA^4^2
+209 ;;^UTILITY(U,$J,358.3,10540,1,3,0)
+210 ;;=3^Emphysema,Panlobular
+211 ;;^UTILITY(U,$J,358.3,10540,1,4,0)
+212 ;;=4^J43.1
+213 ;;^UTILITY(U,$J,358.3,10540,2)
+214 ;;=^5008236
+215 ;;^UTILITY(U,$J,358.3,10541,0)
+216 ;;=J43.2^^45^457^26
+217 ;;^UTILITY(U,$J,358.3,10541,1,0)
+218 ;;=^358.31IA^4^2
+219 ;;^UTILITY(U,$J,358.3,10541,1,3,0)
+220 ;;=3^Emphysema,Centrilobular
+221 ;;^UTILITY(U,$J,358.3,10541,1,4,0)
+222 ;;=4^J43.2
+223 ;;^UTILITY(U,$J,358.3,10541,2)
+224 ;;=^5008237
+225 ;;^UTILITY(U,$J,358.3,10542,0)
+226 ;;=J43.8^^45^457^27
+227 ;;^UTILITY(U,$J,358.3,10542,1,0)
+228 ;;=^358.31IA^4^2
+229 ;;^UTILITY(U,$J,358.3,10542,1,3,0)
+230 ;;=3^Emphysema,Other
+231 ;;^UTILITY(U,$J,358.3,10542,1,4,0)
+232 ;;=4^J43.8
+233 ;;^UTILITY(U,$J,358.3,10542,2)
+234 ;;=^87569
+235 ;;^UTILITY(U,$J,358.3,10543,0)
+236 ;;=J43.9^^45^457^30
+237 ;;^UTILITY(U,$J,358.3,10543,1,0)
+238 ;;=^358.31IA^4^2
+239 ;;^UTILITY(U,$J,358.3,10543,1,3,0)
+240 ;;=3^Emphysema,Unspec
+241 ;;^UTILITY(U,$J,358.3,10543,1,4,0)
+242 ;;=4^J43.9
+243 ;;^UTILITY(U,$J,358.3,10543,2)
+244 ;;=^5008238
+245 ;;^UTILITY(U,$J,358.3,10544,0)
+246 ;;=J44.0^^45^457^23
+247 ;;^UTILITY(U,$J,358.3,10544,1,0)
+248 ;;=^358.31IA^4^2
+249 ;;^UTILITY(U,$J,358.3,10544,1,3,0)
+250 ;;=3^COPD w/ (Acute) Lower Resp Infection
+251 ;;^UTILITY(U,$J,358.3,10544,1,4,0)
+252 ;;=4^J44.0
+253 ;;^UTILITY(U,$J,358.3,10544,2)
+254 ;;=^5008239
+255 ;;^UTILITY(U,$J,358.3,10545,0)
+256 ;;=J45.20^^45^457^5
+257 ;;^UTILITY(U,$J,358.3,10545,1,0)
+258 ;;=^358.31IA^4^2
+259 ;;^UTILITY(U,$J,358.3,10545,1,3,0)
+260 ;;=3^Asthma,Mild Intermittent,Uncompl
+261 ;;^UTILITY(U,$J,358.3,10545,1,4,0)
+262 ;;=4^J45.20
+263 ;;^UTILITY(U,$J,358.3,10545,2)
+264 ;;=^5008242
+265 ;;^UTILITY(U,$J,358.3,10546,0)
+266 ;;=J45.21^^45^457^3
+267 ;;^UTILITY(U,$J,358.3,10546,1,0)
+268 ;;=^358.31IA^4^2
+269 ;;^UTILITY(U,$J,358.3,10546,1,3,0)
+270 ;;=3^Asthma,Mild Intermittent w/ Acute Exacerbation
+271 ;;^UTILITY(U,$J,358.3,10546,1,4,0)
+272 ;;=4^J45.21
+273 ;;^UTILITY(U,$J,358.3,10546,2)
+274 ;;=^5008243
+275 ;;^UTILITY(U,$J,358.3,10547,0)
+276 ;;=J45.22^^45^457^4
+277 ;;^UTILITY(U,$J,358.3,10547,1,0)
+278 ;;=^358.31IA^4^2
+279 ;;^UTILITY(U,$J,358.3,10547,1,3,0)
+280 ;;=3^Asthma,Mild Intermittent w/ Status Asthmaticus
+281 ;;^UTILITY(U,$J,358.3,10547,1,4,0)
+282 ;;=4^J45.22
+283 ;;^UTILITY(U,$J,358.3,10547,2)
+284 ;;=^5008244
+285 ;;^UTILITY(U,$J,358.3,10548,0)
+286 ;;=J45.31^^45^457^6
+287 ;;^UTILITY(U,$J,358.3,10548,1,0)
+288 ;;=^358.31IA^4^2
+289 ;;^UTILITY(U,$J,358.3,10548,1,3,0)
+290 ;;=3^Asthma,Mild Persistent w/ Acute Exacerbation
+291 ;;^UTILITY(U,$J,358.3,10548,1,4,0)
+292 ;;=4^J45.31
+293 ;;^UTILITY(U,$J,358.3,10548,2)
+294 ;;=^5008246
+295 ;;^UTILITY(U,$J,358.3,10549,0)
+296 ;;=J45.32^^45^457^7
+297 ;;^UTILITY(U,$J,358.3,10549,1,0)
+298 ;;=^358.31IA^4^2
+299 ;;^UTILITY(U,$J,358.3,10549,1,3,0)
+300 ;;=3^Asthma,Mild Persistent w/ Status Asthmaticus
+301 ;;^UTILITY(U,$J,358.3,10549,1,4,0)
+302 ;;=4^J45.32
+303 ;;^UTILITY(U,$J,358.3,10549,2)
+304 ;;=^5008247
+305 ;;^UTILITY(U,$J,358.3,10550,0)
+306 ;;=J45.40^^45^457^10
+307 ;;^UTILITY(U,$J,358.3,10550,1,0)
+308 ;;=^358.31IA^4^2
+309 ;;^UTILITY(U,$J,358.3,10550,1,3,0)
+310 ;;=3^Asthma,Moderate Persistent,Uncomplicated
+311 ;;^UTILITY(U,$J,358.3,10550,1,4,0)
+312 ;;=4^J45.40
+313 ;;^UTILITY(U,$J,358.3,10550,2)
+314 ;;=^5008248
+315 ;;^UTILITY(U,$J,358.3,10551,0)
+316 ;;=J44.9^^45^457^24
+317 ;;^UTILITY(U,$J,358.3,10551,1,0)
+318 ;;=^358.31IA^4^2
+319 ;;^UTILITY(U,$J,358.3,10551,1,3,0)
+320 ;;=3^COPD,Unspec
+321 ;;^UTILITY(U,$J,358.3,10551,1,4,0)
+322 ;;=4^J44.9
+323 ;;^UTILITY(U,$J,358.3,10551,2)
+324 ;;=^5008241
+325 ;;^UTILITY(U,$J,358.3,10552,0)
+326 ;;=J44.1^^45^457^22
+327 ;;^UTILITY(U,$J,358.3,10552,1,0)
+328 ;;=^358.31IA^4^2
+329 ;;^UTILITY(U,$J,358.3,10552,1,3,0)
+330 ;;=3^COPD w/ Acute Exacerbation
+331 ;;^UTILITY(U,$J,358.3,10552,1,4,0)
+332 ;;=4^J44.1
+333 ;;^UTILITY(U,$J,358.3,10552,2)
+334 ;;=^5008240
+335 ;;^UTILITY(U,$J,358.3,10553,0)
+336 ;;=J47.0^^45^457^15
+337 ;;^UTILITY(U,$J,358.3,10553,1,0)
+338 ;;=^358.31IA^4^2
+339 ;;^UTILITY(U,$J,358.3,10553,1,3,0)
+340 ;;=3^Bronchiectasis w/ Acute Lower Resp Infection
+341 ;;^UTILITY(U,$J,358.3,10553,1,4,0)
+342 ;;=4^J47.0
+343 ;;^UTILITY(U,$J,358.3,10553,2)
+344 ;;=^5008258
+345 ;;^UTILITY(U,$J,358.3,10554,0)
+346 ;;=J47.1^^45^457^14
+347 ;;^UTILITY(U,$J,358.3,10554,1,0)
+348 ;;=^358.31IA^4^2
+349 ;;^UTILITY(U,$J,358.3,10554,1,3,0)
+350 ;;=3^Bronchiectasis w/ Acute Exacerbation
+351 ;;^UTILITY(U,$J,358.3,10554,1,4,0)
+352 ;;=4^J47.1
+353 ;;^UTILITY(U,$J,358.3,10554,2)
+354 ;;=^5008259
+355 ;;^UTILITY(U,$J,358.3,10555,0)
+356 ;;=J47.9^^45^457^16
+357 ;;^UTILITY(U,$J,358.3,10555,1,0)
+358 ;;=^358.31IA^4^2
+359 ;;^UTILITY(U,$J,358.3,10555,1,3,0)
+360 ;;=3^Bronchiectasis,Uncomplicated
+361 ;;^UTILITY(U,$J,358.3,10555,1,4,0)
+362 ;;=4^J47.9
+363 ;;^UTILITY(U,$J,358.3,10555,2)
+364 ;;=^5008260
+365 ;;^UTILITY(U,$J,358.3,10556,0)
+366 ;;=J45.41^^45^457^8
+367 ;;^UTILITY(U,$J,358.3,10556,1,0)
+368 ;;=^358.31IA^4^2
+369 ;;^UTILITY(U,$J,358.3,10556,1,3,0)
+370 ;;=3^Asthma,Moderate Persistent w/ Acute Exacerbation
+371 ;;^UTILITY(U,$J,358.3,10556,1,4,0)
+372 ;;=4^J45.41
+373 ;;^UTILITY(U,$J,358.3,10556,2)
+374 ;;=^5008249
+375 ;;^UTILITY(U,$J,358.3,10557,0)
+376 ;;=J45.42^^45^457^9
+377 ;;^UTILITY(U,$J,358.3,10557,1,0)
+378 ;;=^358.31IA^4^2
+379 ;;^UTILITY(U,$J,358.3,10557,1,3,0)
+380 ;;=3^Asthma,Moderate Persistent w/ Status Asthmaticus
+381 ;;^UTILITY(U,$J,358.3,10557,1,4,0)
+382 ;;=4^J45.42
+383 ;;^UTILITY(U,$J,358.3,10557,2)
+384 ;;=^5008250
+385 ;;^UTILITY(U,$J,358.3,10558,0)
+386 ;;=J45.51^^45^457^12
+387 ;;^UTILITY(U,$J,358.3,10558,1,0)
+388 ;;=^358.31IA^4^2
+389 ;;^UTILITY(U,$J,358.3,10558,1,3,0)
+390 ;;=3^Asthma,Severe Persistent w/ Acute Exacerbation
+391 ;;^UTILITY(U,$J,358.3,10558,1,4,0)
+392 ;;=4^J45.51
+393 ;;^UTILITY(U,$J,358.3,10558,2)
+394 ;;=^5008252
+395 ;;^UTILITY(U,$J,358.3,10559,0)
+396 ;;=J45.52^^45^457^13
+397 ;;^UTILITY(U,$J,358.3,10559,1,0)
+398 ;;=^358.31IA^4^2
+399 ;;^UTILITY(U,$J,358.3,10559,1,3,0)
+400 ;;=3^Asthma,Severe Persistent w/ Status Asthmaticus
+401 ;;^UTILITY(U,$J,358.3,10559,1,4,0)
+402 ;;=4^J45.52
+403 ;;^UTILITY(U,$J,358.3,10559,2)
+404 ;;=^5008253
+405 ;;^UTILITY(U,$J,358.3,10560,0)
+406 ;;=J45.901^^45^457^1
+407 ;;^UTILITY(U,$J,358.3,10560,1,0)
+408 ;;=^358.31IA^4^2
+409 ;;^UTILITY(U,$J,358.3,10560,1,3,0)
+410 ;;=3^Asthma w/ Acute Exacerbation,Unspec
+411 ;;^UTILITY(U,$J,358.3,10560,1,4,0)
+412 ;;=4^J45.901
+413 ;;^UTILITY(U,$J,358.3,10560,2)
+414 ;;=^5008254
+415 ;;^UTILITY(U,$J,358.3,10561,0)
+416 ;;=J45.902^^45^457^2
+417 ;;^UTILITY(U,$J,358.3,10561,1,0)
+418 ;;=^358.31IA^4^2
+419 ;;^UTILITY(U,$J,358.3,10561,1,3,0)
+420 ;;=3^Asthma w/ Status Asthmaticus,Unspec
+421 ;;^UTILITY(U,$J,358.3,10561,1,4,0)
+422 ;;=4^J45.902
+423 ;;^UTILITY(U,$J,358.3,10561,2)
+424 ;;=^5008255
+425 ;;^UTILITY(U,$J,358.3,10562,0)
+426 ;;=J45.990^^45^457^31
+427 ;;^UTILITY(U,$J,358.3,10562,1,0)
+428 ;;=^358.31IA^4^2
+429 ;;^UTILITY(U,$J,358.3,10562,1,3,0)
+430 ;;=3^Exercised Induced Bronchospasm
+431 ;;^UTILITY(U,$J,358.3,10562,1,4,0)
+432 ;;=4^J45.990
+433 ;;^UTILITY(U,$J,358.3,10562,2)
+434 ;;=^329926
+435 ;;^UTILITY(U,$J,358.3,10563,0)
+436 ;;=J45.998^^45^457^11
+437 ;;^UTILITY(U,$J,358.3,10563,1,0)
+438 ;;=^358.31IA^4^2
+439 ;;^UTILITY(U,$J,358.3,10563,1,3,0)
+440 ;;=3^Asthma,Other
+441 ;;^UTILITY(U,$J,358.3,10563,1,4,0)
+442 ;;=4^J45.998
+443 ;;^UTILITY(U,$J,358.3,10563,2)
+444 ;;=^5008257
+445 ;;^UTILITY(U,$J,358.3,10564,0)
+446 ;;=J45.991^^45^457^25
+447 ;;^UTILITY(U,$J,358.3,10564,1,0)
+448 ;;=^358.31IA^4^2
+449 ;;^UTILITY(U,$J,358.3,10564,1,3,0)
+450 ;;=3^Cough Variant Asthma
+451 ;;^UTILITY(U,$J,358.3,10564,1,4,0)
+452 ;;=4^J45.991
+453 ;;^UTILITY(U,$J,358.3,10564,2)
+454 ;;=^329927
+455 ;;^UTILITY(U,$J,358.3,10565,0)
+456 ;;=I50.1^^45^458^14
+457 ;;^UTILITY(U,$J,358.3,10565,1,0)
+458 ;;=^358.31IA^4^2
+459 ;;^UTILITY(U,$J,358.3,10565,1,3,0)
+460 ;;=3^Left Ventricular Failure
+461 ;;^UTILITY(U,$J,358.3,10565,1,4,0)
+462 ;;=4^I50.1
+463 ;;^UTILITY(U,$J,358.3,10565,2)
+464 ;;=^5007238
+465 ;;^UTILITY(U,$J,358.3,10566,0)
+466 ;;=I50.20^^45^458^12
+467 ;;^UTILITY(U,$J,358.3,10566,1,0)
+468 ;;=^358.31IA^4^2
+469 ;;^UTILITY(U,$J,358.3,10566,1,3,0)
+470 ;;=3^Heart Failure,Systolic,Unspec
+471 ;;^UTILITY(U,$J,358.3,10566,1,4,0)
+472 ;;=4^I50.20
+473 ;;^UTILITY(U,$J,358.3,10566,2)
+474 ;;=^5007239
+475 ;;^UTILITY(U,$J,358.3,10567,0)
+476 ;;=I50.21^^45^458^9
+477 ;;^UTILITY(U,$J,358.3,10567,1,0)
+478 ;;=^358.31IA^4^2
+479 ;;^UTILITY(U,$J,358.3,10567,1,3,0)
+480 ;;=3^Heart Failure,Systolic,Acute
+481 ;;^UTILITY(U,$J,358.3,10567,1,4,0)
+482 ;;=4^I50.21
+483 ;;^UTILITY(U,$J,358.3,10567,2)
+484 ;;=^5007240
+485 ;;^UTILITY(U,$J,358.3,10568,0)
+486 ;;=I50.22^^45^458^11
+487 ;;^UTILITY(U,$J,358.3,10568,1,0)
+488 ;;=^358.31IA^4^2
+489 ;;^UTILITY(U,$J,358.3,10568,1,3,0)
+490 ;;=3^Heart Failure,Systolic,Chronic
+491 ;;^UTILITY(U,$J,358.3,10568,1,4,0)
+492 ;;=4^I50.22
+493 ;;^UTILITY(U,$J,358.3,10568,2)
+494 ;;=^5007241
+495 ;;^UTILITY(U,$J,358.3,10569,0)
+496 ;;=I50.23^^45^458^10
+497 ;;^UTILITY(U,$J,358.3,10569,1,0)
+498 ;;=^358.31IA^4^2
+499 ;;^UTILITY(U,$J,358.3,10569,1,3,0)
+500 ;;=3^Heart Failure,Systolic,Acute on Chronic
+501 ;;^UTILITY(U,$J,358.3,10569,1,4,0)
+502 ;;=4^I50.23
+503 ;;^UTILITY(U,$J,358.3,10569,2)
+504 ;;=^5007242
+505 ;;^UTILITY(U,$J,358.3,10570,0)
+506 ;;=I50.30^^45^458^4
+507 ;;^UTILITY(U,$J,358.3,10570,1,0)
+508 ;;=^358.31IA^4^2
+509 ;;^UTILITY(U,$J,358.3,10570,1,3,0)
+510 ;;=3^Heart Failure,Diastolic,Unspec
+511 ;;^UTILITY(U,$J,358.3,10570,1,4,0)
+512 ;;=4^I50.30
+513 ;;^UTILITY(U,$J,358.3,10570,2)
+514 ;;=^5007243
+515 ;;^UTILITY(U,$J,358.3,10571,0)
+516 ;;=I50.31^^45^458^1
+517 ;;^UTILITY(U,$J,358.3,10571,1,0)
+518 ;;=^358.31IA^4^2
+519 ;;^UTILITY(U,$J,358.3,10571,1,3,0)
+520 ;;=3^Heart Failure,Diastolic,Acute
+521 ;;^UTILITY(U,$J,358.3,10571,1,4,0)
+522 ;;=4^I50.31
+523 ;;^UTILITY(U,$J,358.3,10571,2)
+524 ;;=^5007244
+525 ;;^UTILITY(U,$J,358.3,10572,0)
+526 ;;=I50.32^^45^458^3
+527 ;;^UTILITY(U,$J,358.3,10572,1,0)
+528 ;;=^358.31IA^4^2
+529 ;;^UTILITY(U,$J,358.3,10572,1,3,0)
+530 ;;=3^Heart Failure,Diastolic,Chronic
+531 ;;^UTILITY(U,$J,358.3,10572,1,4,0)
+532 ;;=4^I50.32
+533 ;;^UTILITY(U,$J,358.3,10572,2)
+534 ;;=^5007245
+535 ;;^UTILITY(U,$J,358.3,10573,0)
+536 ;;=I50.33^^45^458^2
+537 ;;^UTILITY(U,$J,358.3,10573,1,0)
+538 ;;=^358.31IA^4^2
+539 ;;^UTILITY(U,$J,358.3,10573,1,3,0)
+540 ;;=3^Heart Failure,Diastolic,Acute on Chronic
+541 ;;^UTILITY(U,$J,358.3,10573,1,4,0)
+542 ;;=4^I50.33
+543 ;;^UTILITY(U,$J,358.3,10573,2)
+544 ;;=^5007246
+545 ;;^UTILITY(U,$J,358.3,10574,0)
+546 ;;=I50.40^^45^458^8
+547 ;;^UTILITY(U,$J,358.3,10574,1,0)
+548 ;;=^358.31IA^4^2
+549 ;;^UTILITY(U,$J,358.3,10574,1,3,0)
+550 ;;=3^Heart Failure,Systolic & Diastolic,Unspec
+551 ;;^UTILITY(U,$J,358.3,10574,1,4,0)
+552 ;;=4^I50.40
+553 ;;^UTILITY(U,$J,358.3,10574,2)
+554 ;;=^5007247
+555 ;;^UTILITY(U,$J,358.3,10575,0)
+556 ;;=I50.41^^45^458^5
+557 ;;^UTILITY(U,$J,358.3,10575,1,0)
+558 ;;=^358.31IA^4^2
+559 ;;^UTILITY(U,$J,358.3,10575,1,3,0)
+560 ;;=3^Heart Failure,Systolic & Diastolic,Acute
+561 ;;^UTILITY(U,$J,358.3,10575,1,4,0)
+562 ;;=4^I50.41
+563 ;;^UTILITY(U,$J,358.3,10575,2)
+564 ;;=^5007248
+565 ;;^UTILITY(U,$J,358.3,10576,0)
+566 ;;=I50.42^^45^458^7
+567 ;;^UTILITY(U,$J,358.3,10576,1,0)
+568 ;;=^358.31IA^4^2
+569 ;;^UTILITY(U,$J,358.3,10576,1,3,0)
+570 ;;=3^Heart Failure,Systolic & Diastolic,Chronic
+571 ;;^UTILITY(U,$J,358.3,10576,1,4,0)
+572 ;;=4^I50.42
+573 ;;^UTILITY(U,$J,358.3,10576,2)
+574 ;;=^5007249
+575 ;;^UTILITY(U,$J,358.3,10577,0)
+576 ;;=I50.43^^45^458^6
+577 ;;^UTILITY(U,$J,358.3,10577,1,0)
+578 ;;=^358.31IA^4^2
+579 ;;^UTILITY(U,$J,358.3,10577,1,3,0)
+580 ;;=3^Heart Failure,Systolic & Diastolic,Acute on Chronic
+581 ;;^UTILITY(U,$J,358.3,10577,1,4,0)
+582 ;;=4^I50.43
+583 ;;^UTILITY(U,$J,358.3,10577,2)
+584 ;;=^5007250
+585 ;;^UTILITY(U,$J,358.3,10578,0)
+586 ;;=I50.9^^45^458^13
+587 ;;^UTILITY(U,$J,358.3,10578,1,0)
+588 ;;=^358.31IA^4^2
+589 ;;^UTILITY(U,$J,358.3,10578,1,3,0)
+590 ;;=3^Heart Failure,Unspec
+591 ;;^UTILITY(U,$J,358.3,10578,1,4,0)
+592 ;;=4^I50.9
+593 ;;^UTILITY(U,$J,358.3,10578,2)
+594 ;;=^5007251
+595 ;;^UTILITY(U,$J,358.3,10579,0)
+596 ;;=I09.81^^45^458^15
+597 ;;^UTILITY(U,$J,358.3,10579,1,0)
+598 ;;=^358.31IA^4^2
+599 ;;^UTILITY(U,$J,358.3,10579,1,3,0)
+600 ;;=3^Rheumatic Heart Failure
+601 ;;^UTILITY(U,$J,358.3,10579,1,4,0)
+602 ;;=4^I09.81
+603 ;;^UTILITY(U,$J,358.3,10579,2)
+604 ;;=^5007059
+605 ;;^UTILITY(U,$J,358.3,10580,0)
+606 ;;=E86.0^^45^459^1
+607 ;;^UTILITY(U,$J,358.3,10580,1,0)
+608 ;;=^358.31IA^4^2
+609 ;;^UTILITY(U,$J,358.3,10580,1,3,0)
+610 ;;=3^Dehydration
+611 ;;^UTILITY(U,$J,358.3,10580,1,4,0)
+612 ;;=4^E86.0
+613 ;;^UTILITY(U,$J,358.3,10580,2)
+614 ;;=^332743
+615 ;;^UTILITY(U,$J,358.3,10581,0)
+616 ;;=E86.1^^45^459^4
+617 ;;^UTILITY(U,$J,358.3,10581,1,0)
+618 ;;=^358.31IA^4^2
+619 ;;^UTILITY(U,$J,358.3,10581,1,3,0)
+620 ;;=3^Hypovolemia
+621 ;;^UTILITY(U,$J,358.3,10581,1,4,0)
+622 ;;=4^E86.1
+623 ;;^UTILITY(U,$J,358.3,10581,2)
+624 ;;=^332744
+625 ;;^UTILITY(U,$J,358.3,10582,0)
+626 ;;=E86.9^^45^459^5
+627 ;;^UTILITY(U,$J,358.3,10582,1,0)
+628 ;;=^358.31IA^4^2
+629 ;;^UTILITY(U,$J,358.3,10582,1,3,0)
+630 ;;=3^Volume Depletion,Unspec
+631 ;;^UTILITY(U,$J,358.3,10582,1,4,0)
+632 ;;=4^E86.9
+633 ;;^UTILITY(U,$J,358.3,10582,2)
+634 ;;=^332840
+635 ;;^UTILITY(U,$J,358.3,10583,0)
+636 ;;=E87.0^^45^459^2
+637 ;;^UTILITY(U,$J,358.3,10583,1,0)
+638 ;;=^358.31IA^4^2
+639 ;;^UTILITY(U,$J,358.3,10583,1,3,0)
+640 ;;=3^Hyperosmolality & Hpernatremia
+641 ;;^UTILITY(U,$J,358.3,10583,1,4,0)
+642 ;;=4^E87.0
+643 ;;^UTILITY(U,$J,358.3,10583,2)
+644 ;;=^5003018
+645 ;;^UTILITY(U,$J,358.3,10584,0)
+646 ;;=E87.1^^45^459^3
+647 ;;^UTILITY(U,$J,358.3,10584,1,0)
+648 ;;=^358.31IA^4^2
+649 ;;^UTILITY(U,$J,358.3,10584,1,3,0)
+650 ;;=3^Hypo-osmolality & Hyponatremia
+651 ;;^UTILITY(U,$J,358.3,10584,1,4,0)
+652 ;;=4^E87.1
+653 ;;^UTILITY(U,$J,358.3,10584,2)
+654 ;;=^5003019
+655 ;;^UTILITY(U,$J,358.3,10585,0)
+656 ;;=E10.10^^45^460^18
+657 ;;^UTILITY(U,$J,358.3,10585,1,0)
+658 ;;=^358.31IA^4^2
+659 ;;^UTILITY(U,$J,358.3,10585,1,3,0)
+660 ;;=3^DM Type 1 w/ Ketoacidosis w/o Coma
+661 ;;^UTILITY(U,$J,358.3,10585,1,4,0)
+662 ;;=4^E10.10
+663 ;;^UTILITY(U,$J,358.3,10585,2)
+664 ;;=^5002587
+665 ;;^UTILITY(U,$J,358.3,10586,0)
+666 ;;=E10.11^^45^460^17
+667 ;;^UTILITY(U,$J,358.3,10586,1,0)
+668 ;;=^358.31IA^4^2
+669 ;;^UTILITY(U,$J,358.3,10586,1,3,0)
+670 ;;=3^DM Type 1 w/ Ketoacidosis w/ Coma
+671 ;;^UTILITY(U,$J,358.3,10586,1,4,0)
+672 ;;=4^E10.11
+673 ;;^UTILITY(U,$J,358.3,10586,2)
+674 ;;=^5002588
+675 ;;^UTILITY(U,$J,358.3,10587,0)
+676 ;;=E10.21^^45^460^8
+677 ;;^UTILITY(U,$J,358.3,10587,1,0)
+678 ;;=^358.31IA^4^2
+679 ;;^UTILITY(U,$J,358.3,10587,1,3,0)
+680 ;;=3^DM Type 1 w/ Diab Nephropathy
+681 ;;^UTILITY(U,$J,358.3,10587,1,4,0)
+682 ;;=4^E10.21
+683 ;;^UTILITY(U,$J,358.3,10587,2)
+684 ;;=^5002589
+685 ;;^UTILITY(U,$J,358.3,10588,0)
+686 ;;=E10.22^^45^460^3
+687 ;;^UTILITY(U,$J,358.3,10588,1,0)
+688 ;;=^358.31IA^4^2
+689 ;;^UTILITY(U,$J,358.3,10588,1,3,0)
+690 ;;=3^DM Type 1 w/ Diab CKD