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

IBDEI09R.m

Go to the documentation of this file.
IBDEI09R ; ; 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,23844,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,23844,1,3,0)
 ;;=3^Personal Hx of Suicidal Behavior     
 ;;^UTILITY(U,$J,358.3,23844,1,4,0)
 ;;=4^Z91.51
 ;;^UTILITY(U,$J,358.3,23844,2)
 ;;=^5161317
 ;;^UTILITY(U,$J,358.3,23845,0)
 ;;=N17.0^^71^938^3
 ;;^UTILITY(U,$J,358.3,23845,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,23845,1,3,0)
 ;;=3^Acute Kidney Failure w/ Tubular Necrosis
 ;;^UTILITY(U,$J,358.3,23845,1,4,0)
 ;;=4^N17.0
 ;;^UTILITY(U,$J,358.3,23845,2)
 ;;=^5015598
 ;;^UTILITY(U,$J,358.3,23846,0)
 ;;=N17.1^^71^938^1
 ;;^UTILITY(U,$J,358.3,23846,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,23846,1,3,0)
 ;;=3^Acute Kidney Failure w/ Acute Cortical Necrosis
 ;;^UTILITY(U,$J,358.3,23846,1,4,0)
 ;;=4^N17.1
 ;;^UTILITY(U,$J,358.3,23846,2)
 ;;=^5015599
 ;;^UTILITY(U,$J,358.3,23847,0)
 ;;=N17.2^^71^938^2
 ;;^UTILITY(U,$J,358.3,23847,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,23847,1,3,0)
 ;;=3^Acute Kidney Failure w/ Medullary Necrosis
 ;;^UTILITY(U,$J,358.3,23847,1,4,0)
 ;;=4^N17.2
 ;;^UTILITY(U,$J,358.3,23847,2)
 ;;=^5015600
 ;;^UTILITY(U,$J,358.3,23848,0)
 ;;=N17.8^^71^938^4
 ;;^UTILITY(U,$J,358.3,23848,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,23848,1,3,0)
 ;;=3^Acute Kidney Failure,Other
 ;;^UTILITY(U,$J,358.3,23848,1,4,0)
 ;;=4^N17.8
 ;;^UTILITY(U,$J,358.3,23848,2)
 ;;=^5015601
 ;;^UTILITY(U,$J,358.3,23849,0)
 ;;=N17.9^^71^938^5
 ;;^UTILITY(U,$J,358.3,23849,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,23849,1,3,0)
 ;;=3^Acute Kidney Failure,Unspec
 ;;^UTILITY(U,$J,358.3,23849,1,4,0)
 ;;=4^N17.9
 ;;^UTILITY(U,$J,358.3,23849,2)
 ;;=^338532
 ;;^UTILITY(U,$J,358.3,23850,0)
 ;;=I20.0^^71^939^4
 ;;^UTILITY(U,$J,358.3,23850,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,23850,1,3,0)
 ;;=3^Unstable Angina
 ;;^UTILITY(U,$J,358.3,23850,1,4,0)
 ;;=4^I20.0
 ;;^UTILITY(U,$J,358.3,23850,2)
 ;;=^5007076
 ;;^UTILITY(U,$J,358.3,23851,0)
 ;;=I20.1^^71^939^1
 ;;^UTILITY(U,$J,358.3,23851,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,23851,1,3,0)
 ;;=3^Angina Pectoris w/ Documented Spasm
 ;;^UTILITY(U,$J,358.3,23851,1,4,0)
 ;;=4^I20.1
 ;;^UTILITY(U,$J,358.3,23851,2)
 ;;=^5007077
 ;;^UTILITY(U,$J,358.3,23852,0)
 ;;=I20.8^^71^939^2
 ;;^UTILITY(U,$J,358.3,23852,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,23852,1,3,0)
 ;;=3^Angina Pectoris,Other Forms
 ;;^UTILITY(U,$J,358.3,23852,1,4,0)
 ;;=4^I20.8
 ;;^UTILITY(U,$J,358.3,23852,2)
 ;;=^5007078
 ;;^UTILITY(U,$J,358.3,23853,0)
 ;;=I20.9^^71^939^3
 ;;^UTILITY(U,$J,358.3,23853,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,23853,1,3,0)
 ;;=3^Angina Pectoris,Unspec
 ;;^UTILITY(U,$J,358.3,23853,1,4,0)
 ;;=4^I20.9
 ;;^UTILITY(U,$J,358.3,23853,2)
 ;;=^5007079
 ;;^UTILITY(U,$J,358.3,23854,0)
 ;;=J40.^^71^940^17
 ;;^UTILITY(U,$J,358.3,23854,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,23854,1,3,0)
 ;;=3^Bronchitis
 ;;^UTILITY(U,$J,358.3,23854,1,4,0)
 ;;=4^J40.
 ;;^UTILITY(U,$J,358.3,23854,2)
 ;;=^17164
 ;;^UTILITY(U,$J,358.3,23855,0)
 ;;=J41.0^^71^940^20
 ;;^UTILITY(U,$J,358.3,23855,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,23855,1,3,0)
 ;;=3^Bronchitis,Simple Chronic
 ;;^UTILITY(U,$J,358.3,23855,1,4,0)
 ;;=4^J41.0
 ;;^UTILITY(U,$J,358.3,23855,2)
 ;;=^269946
 ;;^UTILITY(U,$J,358.3,23856,0)
 ;;=J41.1^^71^940^19
 ;;^UTILITY(U,$J,358.3,23856,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,23856,1,3,0)
 ;;=3^Bronchitis,Mucopurulent Chronic
 ;;^UTILITY(U,$J,358.3,23856,1,4,0)
 ;;=4^J41.1
 ;;^UTILITY(U,$J,358.3,23856,2)
 ;;=^269949
 ;;^UTILITY(U,$J,358.3,23857,0)
 ;;=J41.8^^71^940^18
 ;;^UTILITY(U,$J,358.3,23857,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,23857,1,3,0)
 ;;=3^Bronchitis,Mixed Simple & Mucopurulent Chronic
 ;;^UTILITY(U,$J,358.3,23857,1,4,0)
 ;;=4^J41.8
 ;;^UTILITY(U,$J,358.3,23857,2)
 ;;=^5008233
 ;;^UTILITY(U,$J,358.3,23858,0)
 ;;=J42.^^71^940^21
 ;;^UTILITY(U,$J,358.3,23858,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,23858,1,3,0)
 ;;=3^Bronchitis,Unspec Chronic
 ;;^UTILITY(U,$J,358.3,23858,1,4,0)
 ;;=4^J42.
 ;;^UTILITY(U,$J,358.3,23858,2)
 ;;=^5008234
 ;;^UTILITY(U,$J,358.3,23859,0)
 ;;=J43.0^^71^940^29
 ;;^UTILITY(U,$J,358.3,23859,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,23859,1,3,0)
 ;;=3^Emphysema,Pulmonary,Unilateral
 ;;^UTILITY(U,$J,358.3,23859,1,4,0)
 ;;=4^J43.0
 ;;^UTILITY(U,$J,358.3,23859,2)
 ;;=^5008235
 ;;^UTILITY(U,$J,358.3,23860,0)
 ;;=J43.1^^71^940^28
 ;;^UTILITY(U,$J,358.3,23860,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,23860,1,3,0)
 ;;=3^Emphysema,Panlobular
 ;;^UTILITY(U,$J,358.3,23860,1,4,0)
 ;;=4^J43.1
 ;;^UTILITY(U,$J,358.3,23860,2)
 ;;=^5008236
 ;;^UTILITY(U,$J,358.3,23861,0)
 ;;=J43.2^^71^940^26
 ;;^UTILITY(U,$J,358.3,23861,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,23861,1,3,0)
 ;;=3^Emphysema,Centrilobular
 ;;^UTILITY(U,$J,358.3,23861,1,4,0)
 ;;=4^J43.2
 ;;^UTILITY(U,$J,358.3,23861,2)
 ;;=^5008237
 ;;^UTILITY(U,$J,358.3,23862,0)
 ;;=J43.8^^71^940^27
 ;;^UTILITY(U,$J,358.3,23862,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,23862,1,3,0)
 ;;=3^Emphysema,Other
 ;;^UTILITY(U,$J,358.3,23862,1,4,0)
 ;;=4^J43.8
 ;;^UTILITY(U,$J,358.3,23862,2)
 ;;=^87569
 ;;^UTILITY(U,$J,358.3,23863,0)
 ;;=J43.9^^71^940^30
 ;;^UTILITY(U,$J,358.3,23863,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,23863,1,3,0)
 ;;=3^Emphysema,Unspec
 ;;^UTILITY(U,$J,358.3,23863,1,4,0)
 ;;=4^J43.9
 ;;^UTILITY(U,$J,358.3,23863,2)
 ;;=^5008238
 ;;^UTILITY(U,$J,358.3,23864,0)
 ;;=J44.0^^71^940^23
 ;;^UTILITY(U,$J,358.3,23864,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,23864,1,3,0)
 ;;=3^COPD w/ (Acute) Lower Resp Infection
 ;;^UTILITY(U,$J,358.3,23864,1,4,0)
 ;;=4^J44.0
 ;;^UTILITY(U,$J,358.3,23864,2)
 ;;=^5008239
 ;;^UTILITY(U,$J,358.3,23865,0)
 ;;=J45.20^^71^940^5
 ;;^UTILITY(U,$J,358.3,23865,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,23865,1,3,0)
 ;;=3^Asthma,Mild Intermittent,Uncompl
 ;;^UTILITY(U,$J,358.3,23865,1,4,0)
 ;;=4^J45.20
 ;;^UTILITY(U,$J,358.3,23865,2)
 ;;=^5008242
 ;;^UTILITY(U,$J,358.3,23866,0)
 ;;=J45.21^^71^940^3
 ;;^UTILITY(U,$J,358.3,23866,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,23866,1,3,0)
 ;;=3^Asthma,Mild Intermittent w/ Acute Exacerbation
 ;;^UTILITY(U,$J,358.3,23866,1,4,0)
 ;;=4^J45.21
 ;;^UTILITY(U,$J,358.3,23866,2)
 ;;=^5008243
 ;;^UTILITY(U,$J,358.3,23867,0)
 ;;=J45.22^^71^940^4
 ;;^UTILITY(U,$J,358.3,23867,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,23867,1,3,0)
 ;;=3^Asthma,Mild Intermittent w/ Status Asthmaticus
 ;;^UTILITY(U,$J,358.3,23867,1,4,0)
 ;;=4^J45.22
 ;;^UTILITY(U,$J,358.3,23867,2)
 ;;=^5008244
 ;;^UTILITY(U,$J,358.3,23868,0)
 ;;=J45.31^^71^940^6
 ;;^UTILITY(U,$J,358.3,23868,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,23868,1,3,0)
 ;;=3^Asthma,Mild Persistent w/ Acute Exacerbation
 ;;^UTILITY(U,$J,358.3,23868,1,4,0)
 ;;=4^J45.31
 ;;^UTILITY(U,$J,358.3,23868,2)
 ;;=^5008246
 ;;^UTILITY(U,$J,358.3,23869,0)
 ;;=J45.32^^71^940^7
 ;;^UTILITY(U,$J,358.3,23869,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,23869,1,3,0)
 ;;=3^Asthma,Mild Persistent w/ Status Asthmaticus
 ;;^UTILITY(U,$J,358.3,23869,1,4,0)
 ;;=4^J45.32
 ;;^UTILITY(U,$J,358.3,23869,2)
 ;;=^5008247
 ;;^UTILITY(U,$J,358.3,23870,0)
 ;;=J45.40^^71^940^10
 ;;^UTILITY(U,$J,358.3,23870,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,23870,1,3,0)
 ;;=3^Asthma,Moderate Persistent,Uncomplicated
 ;;^UTILITY(U,$J,358.3,23870,1,4,0)
 ;;=4^J45.40
 ;;^UTILITY(U,$J,358.3,23870,2)
 ;;=^5008248
 ;;^UTILITY(U,$J,358.3,23871,0)
 ;;=J44.9^^71^940^24
 ;;^UTILITY(U,$J,358.3,23871,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,23871,1,3,0)
 ;;=3^COPD,Unspec
 ;;^UTILITY(U,$J,358.3,23871,1,4,0)
 ;;=4^J44.9
 ;;^UTILITY(U,$J,358.3,23871,2)
 ;;=^5008241
 ;;^UTILITY(U,$J,358.3,23872,0)
 ;;=J44.1^^71^940^22
 ;;^UTILITY(U,$J,358.3,23872,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,23872,1,3,0)
 ;;=3^COPD w/ Acute Exacerbation
 ;;^UTILITY(U,$J,358.3,23872,1,4,0)
 ;;=4^J44.1
 ;;^UTILITY(U,$J,358.3,23872,2)
 ;;=^5008240
 ;;^UTILITY(U,$J,358.3,23873,0)
 ;;=J47.0^^71^940^15
 ;;^UTILITY(U,$J,358.3,23873,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,23873,1,3,0)
 ;;=3^Bronchiectasis w/ Acute Lower Resp Infection
 ;;^UTILITY(U,$J,358.3,23873,1,4,0)
 ;;=4^J47.0
 ;;^UTILITY(U,$J,358.3,23873,2)
 ;;=^5008258
 ;;^UTILITY(U,$J,358.3,23874,0)
 ;;=J47.1^^71^940^14
 ;;^UTILITY(U,$J,358.3,23874,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,23874,1,3,0)
 ;;=3^Bronchiectasis w/ Acute Exacerbation
 ;;^UTILITY(U,$J,358.3,23874,1,4,0)
 ;;=4^J47.1
 ;;^UTILITY(U,$J,358.3,23874,2)
 ;;=^5008259
 ;;^UTILITY(U,$J,358.3,23875,0)
 ;;=J47.9^^71^940^16
 ;;^UTILITY(U,$J,358.3,23875,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,23875,1,3,0)
 ;;=3^Bronchiectasis,Uncomplicated
 ;;^UTILITY(U,$J,358.3,23875,1,4,0)
 ;;=4^J47.9
 ;;^UTILITY(U,$J,358.3,23875,2)
 ;;=^5008260
 ;;^UTILITY(U,$J,358.3,23876,0)
 ;;=J45.41^^71^940^8
 ;;^UTILITY(U,$J,358.3,23876,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,23876,1,3,0)
 ;;=3^Asthma,Moderate Persistent w/ Acute Exacerbation
 ;;^UTILITY(U,$J,358.3,23876,1,4,0)
 ;;=4^J45.41
 ;;^UTILITY(U,$J,358.3,23876,2)
 ;;=^5008249
 ;;^UTILITY(U,$J,358.3,23877,0)
 ;;=J45.42^^71^940^9
 ;;^UTILITY(U,$J,358.3,23877,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,23877,1,3,0)
 ;;=3^Asthma,Moderate Persistent w/ Status Asthmaticus
 ;;^UTILITY(U,$J,358.3,23877,1,4,0)
 ;;=4^J45.42
 ;;^UTILITY(U,$J,358.3,23877,2)
 ;;=^5008250
 ;;^UTILITY(U,$J,358.3,23878,0)
 ;;=J45.51^^71^940^12
 ;;^UTILITY(U,$J,358.3,23878,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,23878,1,3,0)
 ;;=3^Asthma,Severe Persistent w/ Acute Exacerbation
 ;;^UTILITY(U,$J,358.3,23878,1,4,0)
 ;;=4^J45.51
 ;;^UTILITY(U,$J,358.3,23878,2)
 ;;=^5008252
 ;;^UTILITY(U,$J,358.3,23879,0)
 ;;=J45.52^^71^940^13
 ;;^UTILITY(U,$J,358.3,23879,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,23879,1,3,0)
 ;;=3^Asthma,Severe Persistent w/ Status Asthmaticus
 ;;^UTILITY(U,$J,358.3,23879,1,4,0)
 ;;=4^J45.52
 ;;^UTILITY(U,$J,358.3,23879,2)
 ;;=^5008253
 ;;^UTILITY(U,$J,358.3,23880,0)
 ;;=J45.901^^71^940^1
 ;;^UTILITY(U,$J,358.3,23880,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,23880,1,3,0)
 ;;=3^Asthma w/ Acute Exacerbation,Unspec
 ;;^UTILITY(U,$J,358.3,23880,1,4,0)
 ;;=4^J45.901
 ;;^UTILITY(U,$J,358.3,23880,2)
 ;;=^5008254
 ;;^UTILITY(U,$J,358.3,23881,0)
 ;;=J45.902^^71^940^2
 ;;^UTILITY(U,$J,358.3,23881,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,23881,1,3,0)
 ;;=3^Asthma w/ Status Asthmaticus,Unspec
 ;;^UTILITY(U,$J,358.3,23881,1,4,0)
 ;;=4^J45.902
 ;;^UTILITY(U,$J,358.3,23881,2)
 ;;=^5008255
 ;;^UTILITY(U,$J,358.3,23882,0)
 ;;=J45.990^^71^940^31
 ;;^UTILITY(U,$J,358.3,23882,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,23882,1,3,0)
 ;;=3^Exercised Induced Bronchospasm
 ;;^UTILITY(U,$J,358.3,23882,1,4,0)
 ;;=4^J45.990
 ;;^UTILITY(U,$J,358.3,23882,2)
 ;;=^329926
 ;;^UTILITY(U,$J,358.3,23883,0)
 ;;=J45.998^^71^940^11
 ;;^UTILITY(U,$J,358.3,23883,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,23883,1,3,0)
 ;;=3^Asthma,Other
 ;;^UTILITY(U,$J,358.3,23883,1,4,0)
 ;;=4^J45.998
 ;;^UTILITY(U,$J,358.3,23883,2)
 ;;=^5008257
 ;;^UTILITY(U,$J,358.3,23884,0)
 ;;=J45.991^^71^940^25
 ;;^UTILITY(U,$J,358.3,23884,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,23884,1,3,0)
 ;;=3^Cough Variant Asthma
 ;;^UTILITY(U,$J,358.3,23884,1,4,0)
 ;;=4^J45.991
 ;;^UTILITY(U,$J,358.3,23884,2)
 ;;=^329927
 ;;^UTILITY(U,$J,358.3,23885,0)
 ;;=I50.1^^71^941^14
 ;;^UTILITY(U,$J,358.3,23885,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,23885,1,3,0)
 ;;=3^Left Ventricular Failure
 ;;^UTILITY(U,$J,358.3,23885,1,4,0)
 ;;=4^I50.1
 ;;^UTILITY(U,$J,358.3,23885,2)
 ;;=^5007238
 ;;^UTILITY(U,$J,358.3,23886,0)
 ;;=I50.20^^71^941^12
 ;;^UTILITY(U,$J,358.3,23886,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,23886,1,3,0)
 ;;=3^Heart Failure,Systolic,Unspec
 ;;^UTILITY(U,$J,358.3,23886,1,4,0)
 ;;=4^I50.20
 ;;^UTILITY(U,$J,358.3,23886,2)
 ;;=^5007239
 ;;^UTILITY(U,$J,358.3,23887,0)
 ;;=I50.21^^71^941^9
 ;;^UTILITY(U,$J,358.3,23887,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,23887,1,3,0)
 ;;=3^Heart Failure,Systolic,Acute
 ;;^UTILITY(U,$J,358.3,23887,1,4,0)
 ;;=4^I50.21
 ;;^UTILITY(U,$J,358.3,23887,2)
 ;;=^5007240
 ;;^UTILITY(U,$J,358.3,23888,0)
 ;;=I50.22^^71^941^11
 ;;^UTILITY(U,$J,358.3,23888,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,23888,1,3,0)
 ;;=3^Heart Failure,Systolic,Chronic
 ;;^UTILITY(U,$J,358.3,23888,1,4,0)
 ;;=4^I50.22
 ;;^UTILITY(U,$J,358.3,23888,2)
 ;;=^5007241
 ;;^UTILITY(U,$J,358.3,23889,0)
 ;;=I50.23^^71^941^10
 ;;^UTILITY(U,$J,358.3,23889,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,23889,1,3,0)
 ;;=3^Heart Failure,Systolic,Acute on Chronic
 ;;^UTILITY(U,$J,358.3,23889,1,4,0)
 ;;=4^I50.23
 ;;^UTILITY(U,$J,358.3,23889,2)
 ;;=^5007242
 ;;^UTILITY(U,$J,358.3,23890,0)
 ;;=I50.30^^71^941^4
 ;;^UTILITY(U,$J,358.3,23890,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,23890,1,3,0)
 ;;=3^Heart Failure,Diastolic,Unspec
 ;;^UTILITY(U,$J,358.3,23890,1,4,0)
 ;;=4^I50.30
 ;;^UTILITY(U,$J,358.3,23890,2)
 ;;=^5007243
 ;;^UTILITY(U,$J,358.3,23891,0)
 ;;=I50.31^^71^941^1
 ;;^UTILITY(U,$J,358.3,23891,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,23891,1,3,0)
 ;;=3^Heart Failure,Diastolic,Acute
 ;;^UTILITY(U,$J,358.3,23891,1,4,0)
 ;;=4^I50.31
 ;;^UTILITY(U,$J,358.3,23891,2)
 ;;=^5007244
 ;;^UTILITY(U,$J,358.3,23892,0)
 ;;=I50.32^^71^941^3
 ;;^UTILITY(U,$J,358.3,23892,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,23892,1,3,0)
 ;;=3^Heart Failure,Diastolic,Chronic
 ;;^UTILITY(U,$J,358.3,23892,1,4,0)
 ;;=4^I50.32
 ;;^UTILITY(U,$J,358.3,23892,2)
 ;;=^5007245
 ;;^UTILITY(U,$J,358.3,23893,0)
 ;;=I50.33^^71^941^2
 ;;^UTILITY(U,$J,358.3,23893,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,23893,1,3,0)
 ;;=3^Heart Failure,Diastolic,Acute on Chronic
 ;;^UTILITY(U,$J,358.3,23893,1,4,0)
 ;;=4^I50.33
 ;;^UTILITY(U,$J,358.3,23893,2)
 ;;=^5007246
 ;;^UTILITY(U,$J,358.3,23894,0)
 ;;=I50.40^^71^941^8
 ;;^UTILITY(U,$J,358.3,23894,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,23894,1,3,0)
 ;;=3^Heart Failure,Systolic & Diastolic,Unspec
 ;;^UTILITY(U,$J,358.3,23894,1,4,0)
 ;;=4^I50.40
 ;;^UTILITY(U,$J,358.3,23894,2)
 ;;=^5007247
 ;;^UTILITY(U,$J,358.3,23895,0)
 ;;=I50.41^^71^941^5
 ;;^UTILITY(U,$J,358.3,23895,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,23895,1,3,0)
 ;;=3^Heart Failure,Systolic & Diastolic,Acute
 ;;^UTILITY(U,$J,358.3,23895,1,4,0)
 ;;=4^I50.41
 ;;^UTILITY(U,$J,358.3,23895,2)
 ;;=^5007248
 ;;^UTILITY(U,$J,358.3,23896,0)
 ;;=I50.42^^71^941^7
 ;;^UTILITY(U,$J,358.3,23896,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,23896,1,3,0)
 ;;=3^Heart Failure,Systolic & Diastolic,Chronic
 ;;^UTILITY(U,$J,358.3,23896,1,4,0)
 ;;=4^I50.42
 ;;^UTILITY(U,$J,358.3,23896,2)
 ;;=^5007249
 ;;^UTILITY(U,$J,358.3,23897,0)
 ;;=I50.43^^71^941^6
 ;;^UTILITY(U,$J,358.3,23897,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,23897,1,3,0)
 ;;=3^Heart Failure,Systolic & Diastolic,Acute on Chronic
 ;;^UTILITY(U,$J,358.3,23897,1,4,0)
 ;;=4^I50.43
 ;;^UTILITY(U,$J,358.3,23897,2)
 ;;=^5007250
 ;;^UTILITY(U,$J,358.3,23898,0)
 ;;=I50.9^^71^941^13
 ;;^UTILITY(U,$J,358.3,23898,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,23898,1,3,0)
 ;;=3^Heart Failure,Unspec
 ;;^UTILITY(U,$J,358.3,23898,1,4,0)
 ;;=4^I50.9
 ;;^UTILITY(U,$J,358.3,23898,2)
 ;;=^5007251
 ;;^UTILITY(U,$J,358.3,23899,0)
 ;;=I09.81^^71^941^15
 ;;^UTILITY(U,$J,358.3,23899,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,23899,1,3,0)
 ;;=3^Rheumatic Heart Failure
 ;;^UTILITY(U,$J,358.3,23899,1,4,0)
 ;;=4^I09.81
 ;;^UTILITY(U,$J,358.3,23899,2)
 ;;=^5007059
 ;;^UTILITY(U,$J,358.3,23900,0)
 ;;=E86.0^^71^942^1
 ;;^UTILITY(U,$J,358.3,23900,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,23900,1,3,0)
 ;;=3^Dehydration
 ;;^UTILITY(U,$J,358.3,23900,1,4,0)
 ;;=4^E86.0
 ;;^UTILITY(U,$J,358.3,23900,2)
 ;;=^332743
 ;;^UTILITY(U,$J,358.3,23901,0)
 ;;=E86.1^^71^942^4
 ;;^UTILITY(U,$J,358.3,23901,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,23901,1,3,0)
 ;;=3^Hypovolemia
 ;;^UTILITY(U,$J,358.3,23901,1,4,0)
 ;;=4^E86.1
 ;;^UTILITY(U,$J,358.3,23901,2)
 ;;=^332744
 ;;^UTILITY(U,$J,358.3,23902,0)
 ;;=E86.9^^71^942^5
 ;;^UTILITY(U,$J,358.3,23902,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,23902,1,3,0)
 ;;=3^Volume Depletion,Unspec
 ;;^UTILITY(U,$J,358.3,23902,1,4,0)
 ;;=4^E86.9
 ;;^UTILITY(U,$J,358.3,23902,2)
 ;;=^332840
 ;;^UTILITY(U,$J,358.3,23903,0)
 ;;=E87.0^^71^942^2
 ;;^UTILITY(U,$J,358.3,23903,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,23903,1,3,0)
 ;;=3^Hyperosmolality & Hpernatremia
 ;;^UTILITY(U,$J,358.3,23903,1,4,0)
 ;;=4^E87.0
 ;;^UTILITY(U,$J,358.3,23903,2)
 ;;=^5003018
 ;;^UTILITY(U,$J,358.3,23904,0)
 ;;=E87.1^^71^942^3
 ;;^UTILITY(U,$J,358.3,23904,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,23904,1,3,0)
 ;;=3^Hypo-osmolality & Hyponatremia
 ;;^UTILITY(U,$J,358.3,23904,1,4,0)
 ;;=4^E87.1
 ;;^UTILITY(U,$J,358.3,23904,2)
 ;;=^5003019
 ;;^UTILITY(U,$J,358.3,23905,0)
 ;;=E10.10^^71^943^18
 ;;^UTILITY(U,$J,358.3,23905,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,23905,1,3,0)
 ;;=3^DM Type 1 w/ Ketoacidosis w/o Coma
 ;;^UTILITY(U,$J,358.3,23905,1,4,0)
 ;;=4^E10.10
 ;;^UTILITY(U,$J,358.3,23905,2)
 ;;=^5002587
 ;;^UTILITY(U,$J,358.3,23906,0)
 ;;=E10.11^^71^943^17
 ;;^UTILITY(U,$J,358.3,23906,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,23906,1,3,0)
 ;;=3^DM Type 1 w/ Ketoacidosis w/ Coma
 ;;^UTILITY(U,$J,358.3,23906,1,4,0)
 ;;=4^E10.11
 ;;^UTILITY(U,$J,358.3,23906,2)
 ;;=^5002588
 ;;^UTILITY(U,$J,358.3,23907,0)
 ;;=E10.21^^71^943^8
 ;;^UTILITY(U,$J,358.3,23907,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,23907,1,3,0)
 ;;=3^DM Type 1 w/ Diab Nephropathy
 ;;^UTILITY(U,$J,358.3,23907,1,4,0)
 ;;=4^E10.21
 ;;^UTILITY(U,$J,358.3,23907,2)
 ;;=^5002589
 ;;^UTILITY(U,$J,358.3,23908,0)
 ;;=E10.22^^71^943^3
 ;;^UTILITY(U,$J,358.3,23908,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,23908,1,3,0)
 ;;=3^DM Type 1 w/ Diab CKD
 ;;^UTILITY(U,$J,358.3,23908,1,4,0)
 ;;=4^E10.22
 ;;^UTILITY(U,$J,358.3,23908,2)
 ;;=^5002590
 ;;^UTILITY(U,$J,358.3,23909,0)
 ;;=E10.29^^71^943^24
 ;;^UTILITY(U,$J,358.3,23909,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,23909,1,3,0)
 ;;=3^DM Type 1 w/ Oth Diab Kidney Compl
 ;;^UTILITY(U,$J,358.3,23909,1,4,0)
 ;;=4^E10.29
 ;;^UTILITY(U,$J,358.3,23909,2)
 ;;=^5002591
 ;;^UTILITY(U,$J,358.3,23910,0)
 ;;=E10.311^^71^943^12
 ;;^UTILITY(U,$J,358.3,23910,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,23910,1,3,0)
 ;;=3^DM Type 1 w/ Diab Retinopathy w/ Macular Edema
 ;;^UTILITY(U,$J,358.3,23910,1,4,0)
 ;;=4^E10.311
 ;;^UTILITY(U,$J,358.3,23910,2)
 ;;=^5002592
 ;;^UTILITY(U,$J,358.3,23911,0)
 ;;=E10.319^^71^943^13
 ;;^UTILITY(U,$J,358.3,23911,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,23911,1,3,0)
 ;;=3^DM Type 1 w/ Diab Retinopathy w/o Macular Edema
 ;;^UTILITY(U,$J,358.3,23911,1,4,0)
 ;;=4^E10.319
 ;;^UTILITY(U,$J,358.3,23911,2)
 ;;=^5002593
 ;;^UTILITY(U,$J,358.3,23912,0)
 ;;=E10.3211^^71^943^19
 ;;^UTILITY(U,$J,358.3,23912,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,23912,1,3,0)
 ;;=3^DM Type 1 w/ Mild Nonp Rtnop w/ Macular Edema,Rt Eye
 ;;^UTILITY(U,$J,358.3,23912,1,4,0)
 ;;=4^E10.3211
 ;;^UTILITY(U,$J,358.3,23912,2)
 ;;=^5138279