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

IBDEI06C.m

Go to the documentation of this file.
IBDEI06C ; ; 04-NOV-2021
 ;;3.0;IB ENCOUNTER FORM IMP/EXP;;NOV 04, 2021
 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,15073,1,4,0)
 ;;=4^Z85.850
 ;;^UTILITY(U,$J,358.3,15073,2)
 ;;=^5063449
 ;;^UTILITY(U,$J,358.3,15074,0)
 ;;=Z85.858^^95^934^10
 ;;^UTILITY(U,$J,358.3,15074,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15074,1,3,0)
 ;;=3^Personal hx of malig neop of endocrine glands
 ;;^UTILITY(U,$J,358.3,15074,1,4,0)
 ;;=4^Z85.858
 ;;^UTILITY(U,$J,358.3,15074,2)
 ;;=^5063450
 ;;^UTILITY(U,$J,358.3,15075,0)
 ;;=Z86.61^^95^934^2
 ;;^UTILITY(U,$J,358.3,15075,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15075,1,3,0)
 ;;=3^Personal hx of central nervous system infections
 ;;^UTILITY(U,$J,358.3,15075,1,4,0)
 ;;=4^Z86.61
 ;;^UTILITY(U,$J,358.3,15075,2)
 ;;=^5063472
 ;;^UTILITY(U,$J,358.3,15076,0)
 ;;=Z87.09^^95^934^27
 ;;^UTILITY(U,$J,358.3,15076,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15076,1,3,0)
 ;;=3^Personal hx of respiratory system diseases NEC
 ;;^UTILITY(U,$J,358.3,15076,1,4,0)
 ;;=4^Z87.09
 ;;^UTILITY(U,$J,358.3,15076,2)
 ;;=^5063481
 ;;^UTILITY(U,$J,358.3,15077,0)
 ;;=Z87.01^^95^934^26
 ;;^UTILITY(U,$J,358.3,15077,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15077,1,3,0)
 ;;=3^Personal hx of pneumonia (recurrent)
 ;;^UTILITY(U,$J,358.3,15077,1,4,0)
 ;;=4^Z87.01
 ;;^UTILITY(U,$J,358.3,15077,2)
 ;;=^5063480
 ;;^UTILITY(U,$J,358.3,15078,0)
 ;;=Z86.010^^95^934^3
 ;;^UTILITY(U,$J,358.3,15078,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15078,1,3,0)
 ;;=3^Personal hx of colonic polyps
 ;;^UTILITY(U,$J,358.3,15078,1,4,0)
 ;;=4^Z86.010
 ;;^UTILITY(U,$J,358.3,15078,2)
 ;;=^5063456
 ;;^UTILITY(U,$J,358.3,15079,0)
 ;;=Z87.440^^95^934^28
 ;;^UTILITY(U,$J,358.3,15079,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15079,1,3,0)
 ;;=3^Personal hx of urinary tract infections
 ;;^UTILITY(U,$J,358.3,15079,1,4,0)
 ;;=4^Z87.440
 ;;^UTILITY(U,$J,358.3,15079,2)
 ;;=^5063495
 ;;^UTILITY(U,$J,358.3,15080,0)
 ;;=Z87.441^^95^934^25
 ;;^UTILITY(U,$J,358.3,15080,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15080,1,3,0)
 ;;=3^Personal hx of nephrotic syndrome
 ;;^UTILITY(U,$J,358.3,15080,1,4,0)
 ;;=4^Z87.441
 ;;^UTILITY(U,$J,358.3,15080,2)
 ;;=^5063496
 ;;^UTILITY(U,$J,358.3,15081,0)
 ;;=Z91.81^^95^934^4
 ;;^UTILITY(U,$J,358.3,15081,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15081,1,3,0)
 ;;=3^Personal hx of falling
 ;;^UTILITY(U,$J,358.3,15081,1,4,0)
 ;;=4^Z91.81
 ;;^UTILITY(U,$J,358.3,15081,2)
 ;;=^5063625
 ;;^UTILITY(U,$J,358.3,15082,0)
 ;;=R09.1^^95^935^6
 ;;^UTILITY(U,$J,358.3,15082,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15082,1,3,0)
 ;;=3^Pleurisy
 ;;^UTILITY(U,$J,358.3,15082,1,4,0)
 ;;=4^R09.1
 ;;^UTILITY(U,$J,358.3,15082,2)
 ;;=^95428
 ;;^UTILITY(U,$J,358.3,15083,0)
 ;;=J91.0^^95^935^3
 ;;^UTILITY(U,$J,358.3,15083,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15083,1,3,0)
 ;;=3^Malignant pleural effusion
 ;;^UTILITY(U,$J,358.3,15083,1,4,0)
 ;;=4^J91.0
 ;;^UTILITY(U,$J,358.3,15083,2)
 ;;=^336603
 ;;^UTILITY(U,$J,358.3,15084,0)
 ;;=J90.^^95^935^5
 ;;^UTILITY(U,$J,358.3,15084,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15084,1,3,0)
 ;;=3^Pleural effusion, not elsewhere classified
 ;;^UTILITY(U,$J,358.3,15084,1,4,0)
 ;;=4^J90.
 ;;^UTILITY(U,$J,358.3,15084,2)
 ;;=^5008310
 ;;^UTILITY(U,$J,358.3,15085,0)
 ;;=J91.8^^95^935^4
 ;;^UTILITY(U,$J,358.3,15085,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15085,1,3,0)
 ;;=3^Pleural effusion in other conditions classified elsewhere
 ;;^UTILITY(U,$J,358.3,15085,1,4,0)
 ;;=4^J91.8
 ;;^UTILITY(U,$J,358.3,15085,2)
 ;;=^5008311
 ;;^UTILITY(U,$J,358.3,15086,0)
 ;;=J93.0^^95^935^10
 ;;^UTILITY(U,$J,358.3,15086,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15086,1,3,0)
 ;;=3^Spontaneous tension pneumothorax
 ;;^UTILITY(U,$J,358.3,15086,1,4,0)
 ;;=4^J93.0
 ;;^UTILITY(U,$J,358.3,15086,2)
 ;;=^269987
 ;;^UTILITY(U,$J,358.3,15087,0)
 ;;=J93.11^^95^935^8
 ;;^UTILITY(U,$J,358.3,15087,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15087,1,3,0)
 ;;=3^Primary spontaneous pneumothorax
 ;;^UTILITY(U,$J,358.3,15087,1,4,0)
 ;;=4^J93.11
 ;;^UTILITY(U,$J,358.3,15087,2)
 ;;=^340529
 ;;^UTILITY(U,$J,358.3,15088,0)
 ;;=J93.12^^95^935^9
 ;;^UTILITY(U,$J,358.3,15088,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15088,1,3,0)
 ;;=3^Secondary spontaneous pneumothorax
 ;;^UTILITY(U,$J,358.3,15088,1,4,0)
 ;;=4^J93.12
 ;;^UTILITY(U,$J,358.3,15088,2)
 ;;=^340530
 ;;^UTILITY(U,$J,358.3,15089,0)
 ;;=J93.81^^95^935^2
 ;;^UTILITY(U,$J,358.3,15089,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15089,1,3,0)
 ;;=3^Chronic pneumothorax
 ;;^UTILITY(U,$J,358.3,15089,1,4,0)
 ;;=4^J93.81
 ;;^UTILITY(U,$J,358.3,15089,2)
 ;;=^340531
 ;;^UTILITY(U,$J,358.3,15090,0)
 ;;=J93.82^^95^935^1
 ;;^UTILITY(U,$J,358.3,15090,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15090,1,3,0)
 ;;=3^Air Leak NEC
 ;;^UTILITY(U,$J,358.3,15090,1,4,0)
 ;;=4^J93.82
 ;;^UTILITY(U,$J,358.3,15090,2)
 ;;=^5008314
 ;;^UTILITY(U,$J,358.3,15091,0)
 ;;=J93.9^^95^935^7
 ;;^UTILITY(U,$J,358.3,15091,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15091,1,3,0)
 ;;=3^Pneumothorax, unspecified
 ;;^UTILITY(U,$J,358.3,15091,1,4,0)
 ;;=4^J93.9
 ;;^UTILITY(U,$J,358.3,15091,2)
 ;;=^5008315
 ;;^UTILITY(U,$J,358.3,15092,0)
 ;;=J12.9^^95^936^11
 ;;^UTILITY(U,$J,358.3,15092,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15092,1,3,0)
 ;;=3^Viral pneumonia, unspecified
 ;;^UTILITY(U,$J,358.3,15092,1,4,0)
 ;;=4^J12.9
 ;;^UTILITY(U,$J,358.3,15092,2)
 ;;=^5008169
 ;;^UTILITY(U,$J,358.3,15093,0)
 ;;=J13.^^95^936^7
 ;;^UTILITY(U,$J,358.3,15093,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15093,1,3,0)
 ;;=3^Pneumonia d/t Streptococcus pneumoniae
 ;;^UTILITY(U,$J,358.3,15093,1,4,0)
 ;;=4^J13.
 ;;^UTILITY(U,$J,358.3,15093,2)
 ;;=^5008170
 ;;^UTILITY(U,$J,358.3,15094,0)
 ;;=J15.4^^95^936^9
 ;;^UTILITY(U,$J,358.3,15094,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15094,1,3,0)
 ;;=3^Pneumonia d/t other streptococci
 ;;^UTILITY(U,$J,358.3,15094,1,4,0)
 ;;=4^J15.4
 ;;^UTILITY(U,$J,358.3,15094,2)
 ;;=^5008174
 ;;^UTILITY(U,$J,358.3,15095,0)
 ;;=J15.211^^95^936^8
 ;;^UTILITY(U,$J,358.3,15095,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15095,1,3,0)
 ;;=3^Pneumonia d/t methicillin suscep staph
 ;;^UTILITY(U,$J,358.3,15095,1,4,0)
 ;;=4^J15.211
 ;;^UTILITY(U,$J,358.3,15095,2)
 ;;=^336833
 ;;^UTILITY(U,$J,358.3,15096,0)
 ;;=J15.212^^95^936^6
 ;;^UTILITY(U,$J,358.3,15096,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15096,1,3,0)
 ;;=3^Pneumonia d/t Methicillin resistant Staphylococcus aureus
 ;;^UTILITY(U,$J,358.3,15096,1,4,0)
 ;;=4^J15.212
 ;;^UTILITY(U,$J,358.3,15096,2)
 ;;=^336602
 ;;^UTILITY(U,$J,358.3,15097,0)
 ;;=J15.9^^95^936^1
 ;;^UTILITY(U,$J,358.3,15097,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15097,1,3,0)
 ;;=3^Bacterial Pneumonia,Unspec
 ;;^UTILITY(U,$J,358.3,15097,1,4,0)
 ;;=4^J15.9
 ;;^UTILITY(U,$J,358.3,15097,2)
 ;;=^5008178
 ;;^UTILITY(U,$J,358.3,15098,0)
 ;;=J18.9^^95^936^10
 ;;^UTILITY(U,$J,358.3,15098,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15098,1,3,0)
 ;;=3^Pneumonia, unspecified organism
 ;;^UTILITY(U,$J,358.3,15098,1,4,0)
 ;;=4^J18.9
 ;;^UTILITY(U,$J,358.3,15098,2)
 ;;=^95632
 ;;^UTILITY(U,$J,358.3,15099,0)
 ;;=J09.X1^^95^936^2
 ;;^UTILITY(U,$J,358.3,15099,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15099,1,3,0)
 ;;=3^Flu d/t ident novel influenza A virus w pneumonia
 ;;^UTILITY(U,$J,358.3,15099,1,4,0)
 ;;=4^J09.X1
 ;;^UTILITY(U,$J,358.3,15099,2)
 ;;=^5008144
 ;;^UTILITY(U,$J,358.3,15100,0)
 ;;=J09.X2^^95^936^3
 ;;^UTILITY(U,$J,358.3,15100,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15100,1,3,0)
 ;;=3^Flu d/t ident novel influenza A virus w oth resp manifest
 ;;^UTILITY(U,$J,358.3,15100,1,4,0)
 ;;=4^J09.X2
 ;;^UTILITY(U,$J,358.3,15100,2)
 ;;=^5008145
 ;;^UTILITY(U,$J,358.3,15101,0)
 ;;=J09.X3^^95^936^4
 ;;^UTILITY(U,$J,358.3,15101,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15101,1,3,0)
 ;;=3^Flu d/t ident novel influenza A virus w GI manifest
 ;;^UTILITY(U,$J,358.3,15101,1,4,0)
 ;;=4^J09.X3
 ;;^UTILITY(U,$J,358.3,15101,2)
 ;;=^5008146
 ;;^UTILITY(U,$J,358.3,15102,0)
 ;;=J09.X9^^95^936^5
 ;;^UTILITY(U,$J,358.3,15102,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15102,1,3,0)
 ;;=3^Flu d/t ident novel influenza A virus w oth manifest
 ;;^UTILITY(U,$J,358.3,15102,1,4,0)
 ;;=4^J09.X9
 ;;^UTILITY(U,$J,358.3,15102,2)
 ;;=^5008147
 ;;^UTILITY(U,$J,358.3,15103,0)
 ;;=I26.92^^95^937^10
 ;;^UTILITY(U,$J,358.3,15103,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15103,1,3,0)
 ;;=3^Saddle Embolus of Pulmonary Artery w/o Acute Cor Pulmonale
 ;;^UTILITY(U,$J,358.3,15103,1,4,0)
 ;;=4^I26.92
 ;;^UTILITY(U,$J,358.3,15103,2)
 ;;=^5007149
 ;;^UTILITY(U,$J,358.3,15104,0)
 ;;=I26.99^^95^937^5
 ;;^UTILITY(U,$J,358.3,15104,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15104,1,3,0)
 ;;=3^Pulmonary Embolism w/o Acute Cor Pulmonale NEC
 ;;^UTILITY(U,$J,358.3,15104,1,4,0)
 ;;=4^I26.99
 ;;^UTILITY(U,$J,358.3,15104,2)
 ;;=^5007150
 ;;^UTILITY(U,$J,358.3,15105,0)
 ;;=I27.0^^95^937^3
 ;;^UTILITY(U,$J,358.3,15105,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15105,1,3,0)
 ;;=3^Primary pulmonary hypertension
 ;;^UTILITY(U,$J,358.3,15105,1,4,0)
 ;;=4^I27.0
 ;;^UTILITY(U,$J,358.3,15105,2)
 ;;=^265310
 ;;^UTILITY(U,$J,358.3,15106,0)
 ;;=I27.89^^95^937^7
 ;;^UTILITY(U,$J,358.3,15106,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15106,1,3,0)
 ;;=3^Pulmonary Heart Diseases NEC
 ;;^UTILITY(U,$J,358.3,15106,1,4,0)
 ;;=4^I27.89
 ;;^UTILITY(U,$J,358.3,15106,2)
 ;;=^5007153
 ;;^UTILITY(U,$J,358.3,15107,0)
 ;;=I27.9^^95^937^6
 ;;^UTILITY(U,$J,358.3,15107,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15107,1,3,0)
 ;;=3^Pulmonary Heart Disease,Unspec
 ;;^UTILITY(U,$J,358.3,15107,1,4,0)
 ;;=4^I27.9
 ;;^UTILITY(U,$J,358.3,15107,2)
 ;;=^5007154
 ;;^UTILITY(U,$J,358.3,15108,0)
 ;;=I27.81^^95^937^1
 ;;^UTILITY(U,$J,358.3,15108,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15108,1,3,0)
 ;;=3^Cor Pulmonale (chronic)
 ;;^UTILITY(U,$J,358.3,15108,1,4,0)
 ;;=4^I27.81
 ;;^UTILITY(U,$J,358.3,15108,2)
 ;;=^5007152
 ;;^UTILITY(U,$J,358.3,15109,0)
 ;;=R04.2^^95^937^2
 ;;^UTILITY(U,$J,358.3,15109,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15109,1,3,0)
 ;;=3^Hemoptysis
 ;;^UTILITY(U,$J,358.3,15109,1,4,0)
 ;;=4^R04.2
 ;;^UTILITY(U,$J,358.3,15109,2)
 ;;=^5019175
 ;;^UTILITY(U,$J,358.3,15110,0)
 ;;=I27.20^^95^937^9
 ;;^UTILITY(U,$J,358.3,15110,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15110,1,3,0)
 ;;=3^Pulmonary Hypertension,Unspec
 ;;^UTILITY(U,$J,358.3,15110,1,4,0)
 ;;=4^I27.20
 ;;^UTILITY(U,$J,358.3,15110,2)
 ;;=^5151376
 ;;^UTILITY(U,$J,358.3,15111,0)
 ;;=I27.21^^95^937^4
 ;;^UTILITY(U,$J,358.3,15111,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15111,1,3,0)
 ;;=3^Pulmonary Arterial Hypertension,Secondary
 ;;^UTILITY(U,$J,358.3,15111,1,4,0)
 ;;=4^I27.21
 ;;^UTILITY(U,$J,358.3,15111,2)
 ;;=^5151377
 ;;^UTILITY(U,$J,358.3,15112,0)
 ;;=I27.29^^95^937^8
 ;;^UTILITY(U,$J,358.3,15112,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15112,1,3,0)
 ;;=3^Pulmonary Hypertension,Oth Secondary
 ;;^UTILITY(U,$J,358.3,15112,1,4,0)
 ;;=4^I27.29
 ;;^UTILITY(U,$J,358.3,15112,2)
 ;;=^5151381
 ;;^UTILITY(U,$J,358.3,15113,0)
 ;;=J41.0^^95^938^17
 ;;^UTILITY(U,$J,358.3,15113,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15113,1,3,0)
 ;;=3^Simple chronic bronchitis
 ;;^UTILITY(U,$J,358.3,15113,1,4,0)
 ;;=4^J41.0
 ;;^UTILITY(U,$J,358.3,15113,2)
 ;;=^269946
 ;;^UTILITY(U,$J,358.3,15114,0)
 ;;=J70.5^^95^938^15
 ;;^UTILITY(U,$J,358.3,15114,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15114,1,3,0)
 ;;=3^Respiratory conditions due to smoke inhalation
 ;;^UTILITY(U,$J,358.3,15114,1,4,0)
 ;;=4^J70.5
 ;;^UTILITY(U,$J,358.3,15114,2)
 ;;=^5008293
 ;;^UTILITY(U,$J,358.3,15115,0)
 ;;=J98.11^^95^938^6
 ;;^UTILITY(U,$J,358.3,15115,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15115,1,3,0)
 ;;=3^Atelectasis
 ;;^UTILITY(U,$J,358.3,15115,1,4,0)
 ;;=4^J98.11
 ;;^UTILITY(U,$J,358.3,15115,2)
 ;;=^5008360
 ;;^UTILITY(U,$J,358.3,15116,0)
 ;;=J80.^^95^938^4
 ;;^UTILITY(U,$J,358.3,15116,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15116,1,3,0)
 ;;=3^Acute respiratory distress syndrome
 ;;^UTILITY(U,$J,358.3,15116,1,4,0)
 ;;=4^J80.
 ;;^UTILITY(U,$J,358.3,15116,2)
 ;;=^5008294
 ;;^UTILITY(U,$J,358.3,15117,0)
 ;;=J98.01^^95^938^3
 ;;^UTILITY(U,$J,358.3,15117,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15117,1,3,0)
 ;;=3^Acute bronchospasm
 ;;^UTILITY(U,$J,358.3,15117,1,4,0)
 ;;=4^J98.01
 ;;^UTILITY(U,$J,358.3,15117,2)
 ;;=^334092
 ;;^UTILITY(U,$J,358.3,15118,0)
 ;;=R06.02^^95^938^16
 ;;^UTILITY(U,$J,358.3,15118,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15118,1,3,0)
 ;;=3^Shortness of breath
 ;;^UTILITY(U,$J,358.3,15118,1,4,0)
 ;;=4^R06.02
 ;;^UTILITY(U,$J,358.3,15118,2)
 ;;=^5019181
 ;;^UTILITY(U,$J,358.3,15119,0)
 ;;=R06.82^^95^938^20
 ;;^UTILITY(U,$J,358.3,15119,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15119,1,3,0)
 ;;=3^Tachypnea, not elsewhere classified
 ;;^UTILITY(U,$J,358.3,15119,1,4,0)
 ;;=4^R06.82
 ;;^UTILITY(U,$J,358.3,15119,2)
 ;;=^5019191
 ;;^UTILITY(U,$J,358.3,15120,0)
 ;;=R06.2^^95^938^21
 ;;^UTILITY(U,$J,358.3,15120,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15120,1,3,0)
 ;;=3^Wheezing
 ;;^UTILITY(U,$J,358.3,15120,1,4,0)
 ;;=4^R06.2
 ;;^UTILITY(U,$J,358.3,15120,2)
 ;;=^5019184
 ;;^UTILITY(U,$J,358.3,15121,0)
 ;;=R06.00^^95^938^10
 ;;^UTILITY(U,$J,358.3,15121,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15121,1,3,0)
 ;;=3^Dyspnea, unspecified
 ;;^UTILITY(U,$J,358.3,15121,1,4,0)
 ;;=4^R06.00
 ;;^UTILITY(U,$J,358.3,15121,2)
 ;;=^5019180
 ;;^UTILITY(U,$J,358.3,15122,0)
 ;;=R06.1^^95^938^19
 ;;^UTILITY(U,$J,358.3,15122,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15122,1,3,0)
 ;;=3^Stridor
 ;;^UTILITY(U,$J,358.3,15122,1,4,0)
 ;;=4^R06.1
 ;;^UTILITY(U,$J,358.3,15122,2)
 ;;=^5019183
 ;;^UTILITY(U,$J,358.3,15123,0)
 ;;=R07.1^^95^938^7
 ;;^UTILITY(U,$J,358.3,15123,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15123,1,3,0)
 ;;=3^Chest pain on breathing
 ;;^UTILITY(U,$J,358.3,15123,1,4,0)
 ;;=4^R07.1
 ;;^UTILITY(U,$J,358.3,15123,2)
 ;;=^5019196
 ;;^UTILITY(U,$J,358.3,15124,0)
 ;;=R07.81^^95^938^14
 ;;^UTILITY(U,$J,358.3,15124,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15124,1,3,0)
 ;;=3^Pleurodynia
 ;;^UTILITY(U,$J,358.3,15124,1,4,0)
 ;;=4^R07.81
 ;;^UTILITY(U,$J,358.3,15124,2)
 ;;=^5019198
 ;;^UTILITY(U,$J,358.3,15125,0)
 ;;=R91.1^^95^938^18
 ;;^UTILITY(U,$J,358.3,15125,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15125,1,3,0)
 ;;=3^Solitary pulmonary nodule
 ;;^UTILITY(U,$J,358.3,15125,1,4,0)
 ;;=4^R91.1
 ;;^UTILITY(U,$J,358.3,15125,2)
 ;;=^5019707
 ;;^UTILITY(U,$J,358.3,15126,0)
 ;;=R91.8^^95^938^1
 ;;^UTILITY(U,$J,358.3,15126,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15126,1,3,0)
 ;;=3^Abnormal Finding of Lung Field,Nonspecific NEC
 ;;^UTILITY(U,$J,358.3,15126,1,4,0)
 ;;=4^R91.8
 ;;^UTILITY(U,$J,358.3,15126,2)
 ;;=^5019708
 ;;^UTILITY(U,$J,358.3,15127,0)
 ;;=R93.1^^95^938^2
 ;;^UTILITY(U,$J,358.3,15127,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15127,1,3,0)
 ;;=3^Abnormal findings on dx imaging of heart and cor circ
 ;;^UTILITY(U,$J,358.3,15127,1,4,0)
 ;;=4^R93.1
 ;;^UTILITY(U,$J,358.3,15127,2)
 ;;=^5019714
 ;;^UTILITY(U,$J,358.3,15128,0)
 ;;=R76.12^^95^938^12
 ;;^UTILITY(U,$J,358.3,15128,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15128,1,3,0)
 ;;=3^Nonspec reaction to gamma intrfrn respns w/o actv tubrclosis
 ;;^UTILITY(U,$J,358.3,15128,1,4,0)
 ;;=4^R76.12
 ;;^UTILITY(U,$J,358.3,15128,2)
 ;;=^5019571
 ;;^UTILITY(U,$J,358.3,15129,0)
 ;;=R09.01^^95^938^5
 ;;^UTILITY(U,$J,358.3,15129,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15129,1,3,0)
 ;;=3^Asphyxia
 ;;^UTILITY(U,$J,358.3,15129,1,4,0)
 ;;=4^R09.01
 ;;^UTILITY(U,$J,358.3,15129,2)
 ;;=^11005
 ;;^UTILITY(U,$J,358.3,15130,0)
 ;;=R09.02^^95^938^11
 ;;^UTILITY(U,$J,358.3,15130,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15130,1,3,0)
 ;;=3^Hypoxemia
 ;;^UTILITY(U,$J,358.3,15130,1,4,0)
 ;;=4^R09.02
 ;;^UTILITY(U,$J,358.3,15130,2)
 ;;=^332831
 ;;^UTILITY(U,$J,358.3,15131,0)
 ;;=Z86.718^^95^938^13
 ;;^UTILITY(U,$J,358.3,15131,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15131,1,3,0)
 ;;=3^Personal history of other venous thrombosis and embolism
 ;;^UTILITY(U,$J,358.3,15131,1,4,0)
 ;;=4^Z86.718
 ;;^UTILITY(U,$J,358.3,15131,2)
 ;;=^5063475
 ;;^UTILITY(U,$J,358.3,15132,0)
 ;;=U07.1^^95^938^9
 ;;^UTILITY(U,$J,358.3,15132,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15132,1,3,0)
 ;;=3^Covid-19 Acute Respiratory Disease
 ;;^UTILITY(U,$J,358.3,15132,1,4,0)
 ;;=4^U07.1
 ;;^UTILITY(U,$J,358.3,15132,2)
 ;;=^5159070
 ;;^UTILITY(U,$J,358.3,15133,0)
 ;;=R05.9^^95^938^8
 ;;^UTILITY(U,$J,358.3,15133,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15133,1,3,0)
 ;;=3^Cough,Unspec
 ;;^UTILITY(U,$J,358.3,15133,1,4,0)
 ;;=4^R05.9
 ;;^UTILITY(U,$J,358.3,15133,2)
 ;;=^5161232
 ;;^UTILITY(U,$J,358.3,15134,0)
 ;;=E08.9^^95^939^31
 ;;^UTILITY(U,$J,358.3,15134,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15134,1,3,0)
 ;;=3^Diabetes due to underlying condition w/o complications
 ;;^UTILITY(U,$J,358.3,15134,1,4,0)
 ;;=4^E08.9
 ;;^UTILITY(U,$J,358.3,15134,2)
 ;;=^5002544
 ;;^UTILITY(U,$J,358.3,15135,0)
 ;;=E09.9^^95^939^61
 ;;^UTILITY(U,$J,358.3,15135,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15135,1,3,0)
 ;;=3^Drug/chem induced diabetes mellitus w/o complications
 ;;^UTILITY(U,$J,358.3,15135,1,4,0)
 ;;=4^E09.9
 ;;^UTILITY(U,$J,358.3,15135,2)
 ;;=^5002586
 ;;^UTILITY(U,$J,358.3,15136,0)
 ;;=E08.65^^95^939^1
 ;;^UTILITY(U,$J,358.3,15136,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15136,1,3,0)
 ;;=3^Diabetes due to underlying condition w hyperglycemia
 ;;^UTILITY(U,$J,358.3,15136,1,4,0)
 ;;=4^E08.65
 ;;^UTILITY(U,$J,358.3,15136,2)
 ;;=^5002541
 ;;^UTILITY(U,$J,358.3,15137,0)
 ;;=E09.65^^95^939^58
 ;;^UTILITY(U,$J,358.3,15137,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15137,1,3,0)
 ;;=3^Drug/chem induced diabetes mellitus w hyperglycemia
 ;;^UTILITY(U,$J,358.3,15137,1,4,0)
 ;;=4^E09.65
 ;;^UTILITY(U,$J,358.3,15137,2)
 ;;=^5002583
 ;;^UTILITY(U,$J,358.3,15138,0)
 ;;=E08.10^^95^939^2
 ;;^UTILITY(U,$J,358.3,15138,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15138,1,3,0)
 ;;=3^Diabetes due to underlying condition w ketoacidosis w/o coma
 ;;^UTILITY(U,$J,358.3,15138,1,4,0)
 ;;=4^E08.10
 ;;^UTILITY(U,$J,358.3,15138,2)
 ;;=^5002505
 ;;^UTILITY(U,$J,358.3,15139,0)
 ;;=E09.10^^95^939^41
 ;;^UTILITY(U,$J,358.3,15139,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15139,1,3,0)
 ;;=3^Drug/chem diabetes w ketoacidosis w/o coma
 ;;^UTILITY(U,$J,358.3,15139,1,4,0)
 ;;=4^E09.10
 ;;^UTILITY(U,$J,358.3,15139,2)
 ;;=^5002547
 ;;^UTILITY(U,$J,358.3,15140,0)
 ;;=E08.01^^95^939^3
 ;;^UTILITY(U,$J,358.3,15140,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15140,1,3,0)
 ;;=3^Diabetes due to underlying condition w hyprosm w coma
 ;;^UTILITY(U,$J,358.3,15140,1,4,0)
 ;;=4^E08.01
 ;;^UTILITY(U,$J,358.3,15140,2)
 ;;=^5002504
 ;;^UTILITY(U,$J,358.3,15141,0)
 ;;=E09.01^^95^939^37
 ;;^UTILITY(U,$J,358.3,15141,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15141,1,3,0)
 ;;=3^Drug/chem diabetes w hyperosmolarity w coma
 ;;^UTILITY(U,$J,358.3,15141,1,4,0)
 ;;=4^E09.01