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

IBDEI0B8.m

Go to the documentation of this file.
IBDEI0B8 ; ; 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,27549,1,3,0)
 ;;=3^Acute Kidney Failure w/ Tubular Necrosis (ATN)
 ;;^UTILITY(U,$J,358.3,27549,1,4,0)
 ;;=4^N17.0
 ;;^UTILITY(U,$J,358.3,27549,2)
 ;;=^5015598
 ;;^UTILITY(U,$J,358.3,27550,0)
 ;;=N20.0^^90^1148^3
 ;;^UTILITY(U,$J,358.3,27550,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27550,1,3,0)
 ;;=3^Calculus of Kidney
 ;;^UTILITY(U,$J,358.3,27550,1,4,0)
 ;;=4^N20.0
 ;;^UTILITY(U,$J,358.3,27550,2)
 ;;=^67056
 ;;^UTILITY(U,$J,358.3,27551,0)
 ;;=J44.9^^90^1149^31
 ;;^UTILITY(U,$J,358.3,27551,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27551,1,3,0)
 ;;=3^COPD,Unspec
 ;;^UTILITY(U,$J,358.3,27551,1,4,0)
 ;;=4^J44.9
 ;;^UTILITY(U,$J,358.3,27551,2)
 ;;=^5008241
 ;;^UTILITY(U,$J,358.3,27552,0)
 ;;=J96.00^^90^1149^9
 ;;^UTILITY(U,$J,358.3,27552,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27552,1,3,0)
 ;;=3^Acute Resp Failure
 ;;^UTILITY(U,$J,358.3,27552,1,4,0)
 ;;=4^J96.00
 ;;^UTILITY(U,$J,358.3,27552,2)
 ;;=^5008347
 ;;^UTILITY(U,$J,358.3,27553,0)
 ;;=J96.90^^90^1149^51
 ;;^UTILITY(U,$J,358.3,27553,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27553,1,3,0)
 ;;=3^Respiratory Failure,Unspec
 ;;^UTILITY(U,$J,358.3,27553,1,4,0)
 ;;=4^J96.90
 ;;^UTILITY(U,$J,358.3,27553,2)
 ;;=^5008356
 ;;^UTILITY(U,$J,358.3,27554,0)
 ;;=J43.9^^90^1149^38
 ;;^UTILITY(U,$J,358.3,27554,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27554,1,3,0)
 ;;=3^Emphysema,Unspec
 ;;^UTILITY(U,$J,358.3,27554,1,4,0)
 ;;=4^J43.9
 ;;^UTILITY(U,$J,358.3,27554,2)
 ;;=^5008238
 ;;^UTILITY(U,$J,358.3,27555,0)
 ;;=J96.20^^90^1149^3
 ;;^UTILITY(U,$J,358.3,27555,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27555,1,3,0)
 ;;=3^Ac/Chr Resp Failure,Unspec
 ;;^UTILITY(U,$J,358.3,27555,1,4,0)
 ;;=4^J96.20
 ;;^UTILITY(U,$J,358.3,27555,2)
 ;;=^5008353
 ;;^UTILITY(U,$J,358.3,27556,0)
 ;;=J69.0^^90^1149^44
 ;;^UTILITY(U,$J,358.3,27556,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27556,1,3,0)
 ;;=3^Pneumonitis d/t Inhalation Food/Vomit
 ;;^UTILITY(U,$J,358.3,27556,1,4,0)
 ;;=4^J69.0
 ;;^UTILITY(U,$J,358.3,27556,2)
 ;;=^5008288
 ;;^UTILITY(U,$J,358.3,27557,0)
 ;;=J98.9^^90^1149^50
 ;;^UTILITY(U,$J,358.3,27557,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27557,1,3,0)
 ;;=3^Respiratory Disorder,Unspec
 ;;^UTILITY(U,$J,358.3,27557,1,4,0)
 ;;=4^J98.9
 ;;^UTILITY(U,$J,358.3,27557,2)
 ;;=^5008366
 ;;^UTILITY(U,$J,358.3,27558,0)
 ;;=J91.8^^90^1149^42
 ;;^UTILITY(U,$J,358.3,27558,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27558,1,3,0)
 ;;=3^Pleur Effus,Oth Cond Class Elsewhere
 ;;^UTILITY(U,$J,358.3,27558,1,4,0)
 ;;=4^J91.8
 ;;^UTILITY(U,$J,358.3,27558,2)
 ;;=^5008311
 ;;^UTILITY(U,$J,358.3,27559,0)
 ;;=J84.10^^90^1149^48
 ;;^UTILITY(U,$J,358.3,27559,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27559,1,3,0)
 ;;=3^Pulmonary Fibrosis,Unspec
 ;;^UTILITY(U,$J,358.3,27559,1,4,0)
 ;;=4^J84.10
 ;;^UTILITY(U,$J,358.3,27559,2)
 ;;=^5008300
 ;;^UTILITY(U,$J,358.3,27560,0)
 ;;=R22.2^^90^1149^56
 ;;^UTILITY(U,$J,358.3,27560,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27560,1,3,0)
 ;;=3^Swelling,Mass & Lump,Trunk
 ;;^UTILITY(U,$J,358.3,27560,1,4,0)
 ;;=4^R22.2
 ;;^UTILITY(U,$J,358.3,27560,2)
 ;;=^5019286
 ;;^UTILITY(U,$J,358.3,27561,0)
 ;;=R06.02^^90^1149^54
 ;;^UTILITY(U,$J,358.3,27561,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27561,1,3,0)
 ;;=3^Shortness of Breath
 ;;^UTILITY(U,$J,358.3,27561,1,4,0)
 ;;=4^R06.02
 ;;^UTILITY(U,$J,358.3,27561,2)
 ;;=^5019181
 ;;^UTILITY(U,$J,358.3,27562,0)
 ;;=J96.10^^90^1149^34
 ;;^UTILITY(U,$J,358.3,27562,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27562,1,3,0)
 ;;=3^Chr Resp Failure
 ;;^UTILITY(U,$J,358.3,27562,1,4,0)
 ;;=4^J96.10
 ;;^UTILITY(U,$J,358.3,27562,2)
 ;;=^5008350
 ;;^UTILITY(U,$J,358.3,27563,0)
 ;;=J96.01^^90^1149^11
 ;;^UTILITY(U,$J,358.3,27563,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27563,1,3,0)
 ;;=3^Acute Resp Failure w/ Hypoxia
 ;;^UTILITY(U,$J,358.3,27563,1,4,0)
 ;;=4^J96.01
 ;;^UTILITY(U,$J,358.3,27563,2)
 ;;=^5008348
 ;;^UTILITY(U,$J,358.3,27564,0)
 ;;=J96.02^^90^1149^10
 ;;^UTILITY(U,$J,358.3,27564,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27564,1,3,0)
 ;;=3^Acute Resp Failure w/ Hypercap
 ;;^UTILITY(U,$J,358.3,27564,1,4,0)
 ;;=4^J96.02
 ;;^UTILITY(U,$J,358.3,27564,2)
 ;;=^5008349
 ;;^UTILITY(U,$J,358.3,27565,0)
 ;;=J96.21^^90^1149^2
 ;;^UTILITY(U,$J,358.3,27565,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27565,1,3,0)
 ;;=3^Ac/Chr Resp Failure w/ Hypoxia
 ;;^UTILITY(U,$J,358.3,27565,1,4,0)
 ;;=4^J96.21
 ;;^UTILITY(U,$J,358.3,27565,2)
 ;;=^5008354
 ;;^UTILITY(U,$J,358.3,27566,0)
 ;;=J96.22^^90^1149^1
 ;;^UTILITY(U,$J,358.3,27566,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27566,1,3,0)
 ;;=3^Ac/Chr Resp Failure w/ Hypercapnia
 ;;^UTILITY(U,$J,358.3,27566,1,4,0)
 ;;=4^J96.22
 ;;^UTILITY(U,$J,358.3,27566,2)
 ;;=^5008355
 ;;^UTILITY(U,$J,358.3,27567,0)
 ;;=J96.11^^90^1149^36
 ;;^UTILITY(U,$J,358.3,27567,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27567,1,3,0)
 ;;=3^Chr Resp Failure w/ Hypoxia
 ;;^UTILITY(U,$J,358.3,27567,1,4,0)
 ;;=4^J96.11
 ;;^UTILITY(U,$J,358.3,27567,2)
 ;;=^5008351
 ;;^UTILITY(U,$J,358.3,27568,0)
 ;;=J96.12^^90^1149^35
 ;;^UTILITY(U,$J,358.3,27568,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27568,1,3,0)
 ;;=3^Chr Resp Failure w/ Hypercap
 ;;^UTILITY(U,$J,358.3,27568,1,4,0)
 ;;=4^J96.12
 ;;^UTILITY(U,$J,358.3,27568,2)
 ;;=^5008352
 ;;^UTILITY(U,$J,358.3,27569,0)
 ;;=J96.91^^90^1149^53
 ;;^UTILITY(U,$J,358.3,27569,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27569,1,3,0)
 ;;=3^Respiratory Failure,Unspec w/ Hypoxia
 ;;^UTILITY(U,$J,358.3,27569,1,4,0)
 ;;=4^J96.91
 ;;^UTILITY(U,$J,358.3,27569,2)
 ;;=^5008357
 ;;^UTILITY(U,$J,358.3,27570,0)
 ;;=J96.92^^90^1149^52
 ;;^UTILITY(U,$J,358.3,27570,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27570,1,3,0)
 ;;=3^Respiratory Failure,Unspec w/ Hypercapnia
 ;;^UTILITY(U,$J,358.3,27570,1,4,0)
 ;;=4^J96.92
 ;;^UTILITY(U,$J,358.3,27570,2)
 ;;=^5008358
 ;;^UTILITY(U,$J,358.3,27571,0)
 ;;=J44.0^^90^1149^30
 ;;^UTILITY(U,$J,358.3,27571,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27571,1,3,0)
 ;;=3^COPD w/ Acute Lower Resp Infection
 ;;^UTILITY(U,$J,358.3,27571,1,4,0)
 ;;=4^J44.0
 ;;^UTILITY(U,$J,358.3,27571,2)
 ;;=^5008239
 ;;^UTILITY(U,$J,358.3,27572,0)
 ;;=J44.1^^90^1149^29
 ;;^UTILITY(U,$J,358.3,27572,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27572,1,3,0)
 ;;=3^COPD w/ Acute Exacerbation
 ;;^UTILITY(U,$J,358.3,27572,1,4,0)
 ;;=4^J44.1
 ;;^UTILITY(U,$J,358.3,27572,2)
 ;;=^5008240
 ;;^UTILITY(U,$J,358.3,27573,0)
 ;;=J45.20^^90^1149^18
 ;;^UTILITY(U,$J,358.3,27573,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27573,1,3,0)
 ;;=3^Asthma,Mild Intermittent,Uncomplicated
 ;;^UTILITY(U,$J,358.3,27573,1,4,0)
 ;;=4^J45.20
 ;;^UTILITY(U,$J,358.3,27573,2)
 ;;=^5008242
 ;;^UTILITY(U,$J,358.3,27574,0)
 ;;=J45.21^^90^1149^16
 ;;^UTILITY(U,$J,358.3,27574,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27574,1,3,0)
 ;;=3^Asthma,Mild Intermittent w/ Acute Exacerbation
 ;;^UTILITY(U,$J,358.3,27574,1,4,0)
 ;;=4^J45.21
 ;;^UTILITY(U,$J,358.3,27574,2)
 ;;=^5008243
 ;;^UTILITY(U,$J,358.3,27575,0)
 ;;=J45.22^^90^1149^17
 ;;^UTILITY(U,$J,358.3,27575,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27575,1,3,0)
 ;;=3^Asthma,Mild Intermittent w/ Status Asthmaticus
 ;;^UTILITY(U,$J,358.3,27575,1,4,0)
 ;;=4^J45.22
 ;;^UTILITY(U,$J,358.3,27575,2)
 ;;=^5008244
 ;;^UTILITY(U,$J,358.3,27576,0)
 ;;=J45.30^^90^1149^21
 ;;^UTILITY(U,$J,358.3,27576,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27576,1,3,0)
 ;;=3^Asthma,Mild Persistent,Uncomplicated
 ;;^UTILITY(U,$J,358.3,27576,1,4,0)
 ;;=4^J45.30
 ;;^UTILITY(U,$J,358.3,27576,2)
 ;;=^5008245
 ;;^UTILITY(U,$J,358.3,27577,0)
 ;;=J45.31^^90^1149^19
 ;;^UTILITY(U,$J,358.3,27577,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27577,1,3,0)
 ;;=3^Asthma,Mild Persistent w/ Acute Exacerbation
 ;;^UTILITY(U,$J,358.3,27577,1,4,0)
 ;;=4^J45.31
 ;;^UTILITY(U,$J,358.3,27577,2)
 ;;=^5008246
 ;;^UTILITY(U,$J,358.3,27578,0)
 ;;=J45.32^^90^1149^20
 ;;^UTILITY(U,$J,358.3,27578,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27578,1,3,0)
 ;;=3^Asthma,Mild Persistent w/ Status Asthmaticus
 ;;^UTILITY(U,$J,358.3,27578,1,4,0)
 ;;=4^J45.32
 ;;^UTILITY(U,$J,358.3,27578,2)
 ;;=^5008247
 ;;^UTILITY(U,$J,358.3,27579,0)
 ;;=J45.40^^90^1149^24
 ;;^UTILITY(U,$J,358.3,27579,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27579,1,3,0)
 ;;=3^Asthma,Moderate Persistent,Uncomplicated
 ;;^UTILITY(U,$J,358.3,27579,1,4,0)
 ;;=4^J45.40
 ;;^UTILITY(U,$J,358.3,27579,2)
 ;;=^5008248
 ;;^UTILITY(U,$J,358.3,27580,0)
 ;;=J45.41^^90^1149^22
 ;;^UTILITY(U,$J,358.3,27580,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27580,1,3,0)
 ;;=3^Asthma,Moderate Persistent w/ Acute Exacerbation
 ;;^UTILITY(U,$J,358.3,27580,1,4,0)
 ;;=4^J45.41
 ;;^UTILITY(U,$J,358.3,27580,2)
 ;;=^5008249
 ;;^UTILITY(U,$J,358.3,27581,0)
 ;;=J45.42^^90^1149^23
 ;;^UTILITY(U,$J,358.3,27581,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27581,1,3,0)
 ;;=3^Asthma,Moderate Persistent w/ Status Asthmaticus
 ;;^UTILITY(U,$J,358.3,27581,1,4,0)
 ;;=4^J45.42
 ;;^UTILITY(U,$J,358.3,27581,2)
 ;;=^5008250
 ;;^UTILITY(U,$J,358.3,27582,0)
 ;;=J45.50^^90^1149^27
 ;;^UTILITY(U,$J,358.3,27582,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27582,1,3,0)
 ;;=3^Asthma,Severe Persistent,Uncomplicated
 ;;^UTILITY(U,$J,358.3,27582,1,4,0)
 ;;=4^J45.50
 ;;^UTILITY(U,$J,358.3,27582,2)
 ;;=^5008251
 ;;^UTILITY(U,$J,358.3,27583,0)
 ;;=J45.51^^90^1149^25
 ;;^UTILITY(U,$J,358.3,27583,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27583,1,3,0)
 ;;=3^Asthma,Severe Persistent w/ Acute Exacerbation
 ;;^UTILITY(U,$J,358.3,27583,1,4,0)
 ;;=4^J45.51
 ;;^UTILITY(U,$J,358.3,27583,2)
 ;;=^5008252
 ;;^UTILITY(U,$J,358.3,27584,0)
 ;;=J45.52^^90^1149^26
 ;;^UTILITY(U,$J,358.3,27584,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27584,1,3,0)
 ;;=3^Asthma,Severe Persistent w/ Status Asthmaticus
 ;;^UTILITY(U,$J,358.3,27584,1,4,0)
 ;;=4^J45.52
 ;;^UTILITY(U,$J,358.3,27584,2)
 ;;=^5008253
 ;;^UTILITY(U,$J,358.3,27585,0)
 ;;=J45.901^^90^1149^14
 ;;^UTILITY(U,$J,358.3,27585,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27585,1,3,0)
 ;;=3^Asthma w/ Acute Exacerbation,Unspec
 ;;^UTILITY(U,$J,358.3,27585,1,4,0)
 ;;=4^J45.901
 ;;^UTILITY(U,$J,358.3,27585,2)
 ;;=^5008254
 ;;^UTILITY(U,$J,358.3,27586,0)
 ;;=J45.902^^90^1149^15
 ;;^UTILITY(U,$J,358.3,27586,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27586,1,3,0)
 ;;=3^Asthma w/ Status Asthmaticus,Unspec
 ;;^UTILITY(U,$J,358.3,27586,1,4,0)
 ;;=4^J45.902
 ;;^UTILITY(U,$J,358.3,27586,2)
 ;;=^5008255
 ;;^UTILITY(U,$J,358.3,27587,0)
 ;;=J45.909^^90^1149^28
 ;;^UTILITY(U,$J,358.3,27587,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27587,1,3,0)
 ;;=3^Asthma,Unspec,Uncomplicated
 ;;^UTILITY(U,$J,358.3,27587,1,4,0)
 ;;=4^J45.909
 ;;^UTILITY(U,$J,358.3,27587,2)
 ;;=^5008256
 ;;^UTILITY(U,$J,358.3,27588,0)
 ;;=J95.01^^90^1149^59
 ;;^UTILITY(U,$J,358.3,27588,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27588,1,3,0)
 ;;=3^Tracheostomy Stoma Hemorrhage
 ;;^UTILITY(U,$J,358.3,27588,1,4,0)
 ;;=4^J95.01
 ;;^UTILITY(U,$J,358.3,27588,2)
 ;;=^5008322
 ;;^UTILITY(U,$J,358.3,27589,0)
 ;;=J95.02^^90^1149^60
 ;;^UTILITY(U,$J,358.3,27589,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27589,1,3,0)
 ;;=3^Tracheostomy Stoma Infection
 ;;^UTILITY(U,$J,358.3,27589,1,4,0)
 ;;=4^J95.02
 ;;^UTILITY(U,$J,358.3,27589,2)
 ;;=^5008323
 ;;^UTILITY(U,$J,358.3,27590,0)
 ;;=J95.03^^90^1149^61
 ;;^UTILITY(U,$J,358.3,27590,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27590,1,3,0)
 ;;=3^Tracheostomy Stoma Malfunction
 ;;^UTILITY(U,$J,358.3,27590,1,4,0)
 ;;=4^J95.03
 ;;^UTILITY(U,$J,358.3,27590,2)
 ;;=^5008324
 ;;^UTILITY(U,$J,358.3,27591,0)
 ;;=J95.04^^90^1149^57
 ;;^UTILITY(U,$J,358.3,27591,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27591,1,3,0)
 ;;=3^Tracheo-Esophageal Fistula Following Tracheostomy
 ;;^UTILITY(U,$J,358.3,27591,1,4,0)
 ;;=4^J95.04
 ;;^UTILITY(U,$J,358.3,27591,2)
 ;;=^5008325
 ;;^UTILITY(U,$J,358.3,27592,0)
 ;;=J95.09^^90^1149^58
 ;;^UTILITY(U,$J,358.3,27592,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27592,1,3,0)
 ;;=3^Tracheostomy Complication,Other
 ;;^UTILITY(U,$J,358.3,27592,1,4,0)
 ;;=4^J95.09
 ;;^UTILITY(U,$J,358.3,27592,2)
 ;;=^5008326
 ;;^UTILITY(U,$J,358.3,27593,0)
 ;;=J95.1^^90^1149^7
 ;;^UTILITY(U,$J,358.3,27593,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27593,1,3,0)
 ;;=3^Acute Pulmonary Insufficiency Following Thoracic Surgery
 ;;^UTILITY(U,$J,358.3,27593,1,4,0)
 ;;=4^J95.1
 ;;^UTILITY(U,$J,358.3,27593,2)
 ;;=^5008327
 ;;^UTILITY(U,$J,358.3,27594,0)
 ;;=J95.2^^90^1149^8
 ;;^UTILITY(U,$J,358.3,27594,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27594,1,3,0)
 ;;=3^Acute Pulmonary Insufficiency Following Non-Thoracic Surgery
 ;;^UTILITY(U,$J,358.3,27594,1,4,0)
 ;;=4^J95.2
 ;;^UTILITY(U,$J,358.3,27594,2)
 ;;=^5008328
 ;;^UTILITY(U,$J,358.3,27595,0)
 ;;=J95.3^^90^1149^37
 ;;^UTILITY(U,$J,358.3,27595,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27595,1,3,0)
 ;;=3^Chronic Pulmonary Insufficiency Following Surgery
 ;;^UTILITY(U,$J,358.3,27595,1,4,0)
 ;;=4^J95.3
 ;;^UTILITY(U,$J,358.3,27595,2)
 ;;=^5008329
 ;;^UTILITY(U,$J,358.3,27596,0)
 ;;=J95.4^^90^1149^33
 ;;^UTILITY(U,$J,358.3,27596,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27596,1,3,0)
 ;;=3^Chemical Pneumonitis d/t Anesthesia
 ;;^UTILITY(U,$J,358.3,27596,1,4,0)
 ;;=4^J95.4
 ;;^UTILITY(U,$J,358.3,27596,2)
 ;;=^5008330
 ;;^UTILITY(U,$J,358.3,27597,0)
 ;;=J95.5^^90^1149^55
 ;;^UTILITY(U,$J,358.3,27597,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27597,1,3,0)
 ;;=3^Subglottic Stenosis,Postprocedural
 ;;^UTILITY(U,$J,358.3,27597,1,4,0)
 ;;=4^J95.5
 ;;^UTILITY(U,$J,358.3,27597,2)
 ;;=^5008331
 ;;^UTILITY(U,$J,358.3,27598,0)
 ;;=J95.61^^90^1149^39
 ;;^UTILITY(U,$J,358.3,27598,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27598,1,3,0)
 ;;=3^Intraop Hemor/Hemtom of Resp Sys Complicating Resp Procedure
 ;;^UTILITY(U,$J,358.3,27598,1,4,0)
 ;;=4^J95.61
 ;;^UTILITY(U,$J,358.3,27598,2)
 ;;=^5008332
 ;;^UTILITY(U,$J,358.3,27599,0)
 ;;=J95.62^^90^1149^40
 ;;^UTILITY(U,$J,358.3,27599,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27599,1,3,0)
 ;;=3^Intraop Hemor/Hemtom of Resp Sys Complicating Oth Procedure
 ;;^UTILITY(U,$J,358.3,27599,1,4,0)
 ;;=4^J95.62
 ;;^UTILITY(U,$J,358.3,27599,2)
 ;;=^5008333
 ;;^UTILITY(U,$J,358.3,27600,0)
 ;;=J95.71^^90^1149^4
 ;;^UTILITY(U,$J,358.3,27600,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27600,1,3,0)
 ;;=3^Accidental Pnctr/Lac of Resp Sys During Resp Procedure
 ;;^UTILITY(U,$J,358.3,27600,1,4,0)
 ;;=4^J95.71
 ;;^UTILITY(U,$J,358.3,27600,2)
 ;;=^5008334
 ;;^UTILITY(U,$J,358.3,27601,0)
 ;;=J95.72^^90^1149^5
 ;;^UTILITY(U,$J,358.3,27601,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27601,1,3,0)
 ;;=3^Accidental Pnctr/Lac of Resp Sys During Oth Procedure
 ;;^UTILITY(U,$J,358.3,27601,1,4,0)
 ;;=4^J95.72
 ;;^UTILITY(U,$J,358.3,27601,2)
 ;;=^5008335
 ;;^UTILITY(U,$J,358.3,27602,0)
 ;;=J95.811^^90^1149^45
 ;;^UTILITY(U,$J,358.3,27602,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27602,1,3,0)
 ;;=3^Pneumothorax,Postprocedural
 ;;^UTILITY(U,$J,358.3,27602,1,4,0)
 ;;=4^J95.811
 ;;^UTILITY(U,$J,358.3,27602,2)
 ;;=^5008336
 ;;^UTILITY(U,$J,358.3,27603,0)
 ;;=J95.812^^90^1149^13
 ;;^UTILITY(U,$J,358.3,27603,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27603,1,3,0)
 ;;=3^Air Leak,Postprocedural
 ;;^UTILITY(U,$J,358.3,27603,1,4,0)
 ;;=4^J95.812
 ;;^UTILITY(U,$J,358.3,27603,2)
 ;;=^5008337
 ;;^UTILITY(U,$J,358.3,27604,0)
 ;;=J95.821^^90^1149^6
 ;;^UTILITY(U,$J,358.3,27604,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27604,1,3,0)
 ;;=3^Acute Postprocedural Respiratory Failure
 ;;^UTILITY(U,$J,358.3,27604,1,4,0)
 ;;=4^J95.821
 ;;^UTILITY(U,$J,358.3,27604,2)
 ;;=^5008338
 ;;^UTILITY(U,$J,358.3,27605,0)
 ;;=J95.822^^90^1149^12
 ;;^UTILITY(U,$J,358.3,27605,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27605,1,3,0)
 ;;=3^Acute and Chronic Postprocedural Respiratory Failure
 ;;^UTILITY(U,$J,358.3,27605,1,4,0)
 ;;=4^J95.822
 ;;^UTILITY(U,$J,358.3,27605,2)
 ;;=^5008339
 ;;^UTILITY(U,$J,358.3,27606,0)
 ;;=J95.830^^90^1149^47
 ;;^UTILITY(U,$J,358.3,27606,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27606,1,3,0)
 ;;=3^Postproc Hemor of Resp Sys Following Resp Sys Procedure
 ;;^UTILITY(U,$J,358.3,27606,1,4,0)
 ;;=4^J95.830
 ;;^UTILITY(U,$J,358.3,27606,2)
 ;;=^5008340
 ;;^UTILITY(U,$J,358.3,27607,0)
 ;;=J95.831^^90^1149^46
 ;;^UTILITY(U,$J,358.3,27607,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27607,1,3,0)
 ;;=3^Postproc Hemor of Resp Sys Following Oth Procedure
 ;;^UTILITY(U,$J,358.3,27607,1,4,0)
 ;;=4^J95.831
 ;;^UTILITY(U,$J,358.3,27607,2)
 ;;=^5008341
 ;;^UTILITY(U,$J,358.3,27608,0)
 ;;=J95.850^^90^1149^41
 ;;^UTILITY(U,$J,358.3,27608,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27608,1,3,0)
 ;;=3^Mechanical Complication of Respirator
 ;;^UTILITY(U,$J,358.3,27608,1,4,0)
 ;;=4^J95.850
 ;;^UTILITY(U,$J,358.3,27608,2)
 ;;=^5008343
 ;;^UTILITY(U,$J,358.3,27609,0)
 ;;=J95.851^^90^1149^62
 ;;^UTILITY(U,$J,358.3,27609,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27609,1,3,0)
 ;;=3^Ventilator Associated Pneumonia
 ;;^UTILITY(U,$J,358.3,27609,1,4,0)
 ;;=4^J95.851
 ;;^UTILITY(U,$J,358.3,27609,2)
 ;;=^336692
 ;;^UTILITY(U,$J,358.3,27610,0)
 ;;=J95.859^^90^1149^49
 ;;^UTILITY(U,$J,358.3,27610,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27610,1,3,0)
 ;;=3^Respirator/Ventilator Complication,Other
 ;;^UTILITY(U,$J,358.3,27610,1,4,0)
 ;;=4^J95.859
 ;;^UTILITY(U,$J,358.3,27610,2)
 ;;=^5008344
 ;;^UTILITY(U,$J,358.3,27611,0)
 ;;=U07.1^^90^1149^32
 ;;^UTILITY(U,$J,358.3,27611,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27611,1,3,0)
 ;;=3^COVID-19
 ;;^UTILITY(U,$J,358.3,27611,1,4,0)
 ;;=4^U07.1
 ;;^UTILITY(U,$J,358.3,27611,2)
 ;;=^5159070
 ;;^UTILITY(U,$J,358.3,27612,0)
 ;;=J12.89^^90^1149^63
 ;;^UTILITY(U,$J,358.3,27612,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27612,1,3,0)
 ;;=3^Viral Pneumonia,Other
 ;;^UTILITY(U,$J,358.3,27612,1,4,0)
 ;;=4^J12.89
 ;;^UTILITY(U,$J,358.3,27612,2)
 ;;=^5008168
 ;;^UTILITY(U,$J,358.3,27613,0)
 ;;=J12.82^^90^1149^43
 ;;^UTILITY(U,$J,358.3,27613,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27613,1,3,0)
 ;;=3^Pneumonia d/t Coronavirus Disease 2019
 ;;^UTILITY(U,$J,358.3,27613,1,4,0)
 ;;=4^J12.82
 ;;^UTILITY(U,$J,358.3,27613,2)
 ;;=^5160183
 ;;^UTILITY(U,$J,358.3,27614,0)
 ;;=Z51.5^^90^1150^1
 ;;^UTILITY(U,$J,358.3,27614,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27614,1,3,0)
 ;;=3^Hospice/Palliative Care
 ;;^UTILITY(U,$J,358.3,27614,1,4,0)
 ;;=4^Z51.5
 ;;^UTILITY(U,$J,358.3,27614,2)
 ;;=^5063063
 ;;^UTILITY(U,$J,358.3,27615,0)
 ;;=B20.^^90^1151^11
 ;;^UTILITY(U,$J,358.3,27615,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27615,1,3,0)
 ;;=3^HIV Disease
 ;;^UTILITY(U,$J,358.3,27615,1,4,0)
 ;;=4^B20.
 ;;^UTILITY(U,$J,358.3,27615,2)
 ;;=^5000555
 ;;^UTILITY(U,$J,358.3,27616,0)
 ;;=R65.10^^90^1151^19
 ;;^UTILITY(U,$J,358.3,27616,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27616,1,3,0)
 ;;=3^SIRS,Non-Infect w/o Acute Organ Dysfx
 ;;^UTILITY(U,$J,358.3,27616,1,4,0)
 ;;=4^R65.10
 ;;^UTILITY(U,$J,358.3,27616,2)
 ;;=^5019545