IBDEI09W ; ; 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,24207,0)
;;=J41.0^^74^967^24
;;^UTILITY(U,$J,358.3,24207,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24207,1,3,0)
;;=3^Bronchitis,Chr,Simple
;;^UTILITY(U,$J,358.3,24207,1,4,0)
;;=4^J41.0
;;^UTILITY(U,$J,358.3,24207,2)
;;=^269946
;;^UTILITY(U,$J,358.3,24208,0)
;;=J44.1^^74^967^26
;;^UTILITY(U,$J,358.3,24208,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24208,1,3,0)
;;=3^COPD w/ Acute Exacerbation
;;^UTILITY(U,$J,358.3,24208,1,4,0)
;;=4^J44.1
;;^UTILITY(U,$J,358.3,24208,2)
;;=^5008240
;;^UTILITY(U,$J,358.3,24209,0)
;;=I27.81^^74^967^32
;;^UTILITY(U,$J,358.3,24209,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24209,1,3,0)
;;=3^Cor Pulmonale,Chr
;;^UTILITY(U,$J,358.3,24209,1,4,0)
;;=4^I27.81
;;^UTILITY(U,$J,358.3,24209,2)
;;=^5007152
;;^UTILITY(U,$J,358.3,24210,0)
;;=Q33.0^^74^967^39
;;^UTILITY(U,$J,358.3,24210,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24210,1,3,0)
;;=3^Cystic Lung,Congenital
;;^UTILITY(U,$J,358.3,24210,1,4,0)
;;=4^Q33.0
;;^UTILITY(U,$J,358.3,24210,2)
;;=^5018617
;;^UTILITY(U,$J,358.3,24211,0)
;;=J98.6^^74^967^40
;;^UTILITY(U,$J,358.3,24211,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24211,1,3,0)
;;=3^Diaphragm Disorders
;;^UTILITY(U,$J,358.3,24211,1,4,0)
;;=4^J98.6
;;^UTILITY(U,$J,358.3,24211,2)
;;=^5008364
;;^UTILITY(U,$J,358.3,24212,0)
;;=R53.83^^74^967^43
;;^UTILITY(U,$J,358.3,24212,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24212,1,3,0)
;;=3^Fatigue
;;^UTILITY(U,$J,358.3,24212,1,4,0)
;;=4^R53.83
;;^UTILITY(U,$J,358.3,24212,2)
;;=^5019520
;;^UTILITY(U,$J,358.3,24213,0)
;;=R04.2^^74^967^45
;;^UTILITY(U,$J,358.3,24213,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24213,1,3,0)
;;=3^Hemoptysis
;;^UTILITY(U,$J,358.3,24213,1,4,0)
;;=4^R04.2
;;^UTILITY(U,$J,358.3,24213,2)
;;=^5019175
;;^UTILITY(U,$J,358.3,24214,0)
;;=J91.0^^74^967^79
;;^UTILITY(U,$J,358.3,24214,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24214,1,3,0)
;;=3^Pleural Effusion,Malignant
;;^UTILITY(U,$J,358.3,24214,1,4,0)
;;=4^J91.0
;;^UTILITY(U,$J,358.3,24214,2)
;;=^336603
;;^UTILITY(U,$J,358.3,24215,0)
;;=J90.^^74^967^78
;;^UTILITY(U,$J,358.3,24215,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24215,1,3,0)
;;=3^Pleural Effusion NEC
;;^UTILITY(U,$J,358.3,24215,1,4,0)
;;=4^J90.
;;^UTILITY(U,$J,358.3,24215,2)
;;=^5008310
;;^UTILITY(U,$J,358.3,24216,0)
;;=I10.^^74^967^46
;;^UTILITY(U,$J,358.3,24216,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24216,1,3,0)
;;=3^Hypertension,Essential
;;^UTILITY(U,$J,358.3,24216,1,4,0)
;;=4^I10.
;;^UTILITY(U,$J,358.3,24216,2)
;;=^5007062
;;^UTILITY(U,$J,358.3,24217,0)
;;=R06.89^^74^967^20
;;^UTILITY(U,$J,358.3,24217,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24217,1,3,0)
;;=3^Breathing Abnormalities
;;^UTILITY(U,$J,358.3,24217,1,4,0)
;;=4^R06.89
;;^UTILITY(U,$J,358.3,24217,2)
;;=^5019193
;;^UTILITY(U,$J,358.3,24218,0)
;;=E86.1^^74^967^47
;;^UTILITY(U,$J,358.3,24218,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24218,1,3,0)
;;=3^Hypovolemia
;;^UTILITY(U,$J,358.3,24218,1,4,0)
;;=4^E86.1
;;^UTILITY(U,$J,358.3,24218,2)
;;=^332744
;;^UTILITY(U,$J,358.3,24219,0)
;;=C34.11^^74^967^62
;;^UTILITY(U,$J,358.3,24219,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24219,1,3,0)
;;=3^Malig Neop Upper Lobe,Rt Bronchus/Lung
;;^UTILITY(U,$J,358.3,24219,1,4,0)
;;=4^C34.11
;;^UTILITY(U,$J,358.3,24219,2)
;;=^5000961
;;^UTILITY(U,$J,358.3,24220,0)
;;=C34.12^^74^967^61
;;^UTILITY(U,$J,358.3,24220,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24220,1,3,0)
;;=3^Malig Neop Upper Lobe,Lt Bronchus/Lung
;;^UTILITY(U,$J,358.3,24220,1,4,0)
;;=4^C34.12
;;^UTILITY(U,$J,358.3,24220,2)
;;=^5000962
;;^UTILITY(U,$J,358.3,24221,0)
;;=C34.2^^74^967^55
;;^UTILITY(U,$J,358.3,24221,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24221,1,3,0)
;;=3^Malig Neop Middle Lobe,Bronchus/Lung
;;^UTILITY(U,$J,358.3,24221,1,4,0)
;;=4^C34.2
;;^UTILITY(U,$J,358.3,24221,2)
;;=^267137
;;^UTILITY(U,$J,358.3,24222,0)
;;=C34.31^^74^967^53
;;^UTILITY(U,$J,358.3,24222,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24222,1,3,0)
;;=3^Malig Neop Lower Lobe,Rt Bronchus/Lung
;;^UTILITY(U,$J,358.3,24222,1,4,0)
;;=4^C34.31
;;^UTILITY(U,$J,358.3,24222,2)
;;=^5133321
;;^UTILITY(U,$J,358.3,24223,0)
;;=C34.32^^74^967^52
;;^UTILITY(U,$J,358.3,24223,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24223,1,3,0)
;;=3^Malig Neop Lower Lobe,Lt Bronchus/Lung
;;^UTILITY(U,$J,358.3,24223,1,4,0)
;;=4^C34.32
;;^UTILITY(U,$J,358.3,24223,2)
;;=^5133322
;;^UTILITY(U,$J,358.3,24224,0)
;;=C34.81^^74^967^57
;;^UTILITY(U,$J,358.3,24224,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24224,1,3,0)
;;=3^Malig Neop Overlapping Sites,Rt Bronchus/Lung
;;^UTILITY(U,$J,358.3,24224,1,4,0)
;;=4^C34.81
;;^UTILITY(U,$J,358.3,24224,2)
;;=^5000964
;;^UTILITY(U,$J,358.3,24225,0)
;;=C34.82^^74^967^56
;;^UTILITY(U,$J,358.3,24225,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24225,1,3,0)
;;=3^Malig Neop Overlapping Sites,Lt Bronchus/Lung
;;^UTILITY(U,$J,358.3,24225,1,4,0)
;;=4^C34.82
;;^UTILITY(U,$J,358.3,24225,2)
;;=^5000965
;;^UTILITY(U,$J,358.3,24226,0)
;;=C34.91^^74^967^60
;;^UTILITY(U,$J,358.3,24226,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24226,1,3,0)
;;=3^Malig Neop Unspec Part,Rt Bronchus/Lung
;;^UTILITY(U,$J,358.3,24226,1,4,0)
;;=4^C34.91
;;^UTILITY(U,$J,358.3,24226,2)
;;=^5000967
;;^UTILITY(U,$J,358.3,24227,0)
;;=C34.92^^74^967^59
;;^UTILITY(U,$J,358.3,24227,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24227,1,3,0)
;;=3^Malig Neop Unspec Part,Lt Bronchus/Lung
;;^UTILITY(U,$J,358.3,24227,1,4,0)
;;=4^C34.92
;;^UTILITY(U,$J,358.3,24227,2)
;;=^5000968
;;^UTILITY(U,$J,358.3,24228,0)
;;=C38.4^^74^967^58
;;^UTILITY(U,$J,358.3,24228,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24228,1,3,0)
;;=3^Malig Neop Pleura
;;^UTILITY(U,$J,358.3,24228,1,4,0)
;;=4^C38.4
;;^UTILITY(U,$J,358.3,24228,2)
;;=^267140
;;^UTILITY(U,$J,358.3,24229,0)
;;=C39.9^^74^967^54
;;^UTILITY(U,$J,358.3,24229,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24229,1,3,0)
;;=3^Malig Neop Lower Respiratory Tract
;;^UTILITY(U,$J,358.3,24229,1,4,0)
;;=4^C39.9
;;^UTILITY(U,$J,358.3,24229,2)
;;=^5000972
;;^UTILITY(U,$J,358.3,24230,0)
;;=R76.11^^74^967^103
;;^UTILITY(U,$J,358.3,24230,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24230,1,3,0)
;;=3^Reaction to Skin Test w/o Active TB
;;^UTILITY(U,$J,358.3,24230,1,4,0)
;;=4^R76.11
;;^UTILITY(U,$J,358.3,24230,2)
;;=^5019570
;;^UTILITY(U,$J,358.3,24231,0)
;;=E66.9^^74^967^76
;;^UTILITY(U,$J,358.3,24231,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24231,1,3,0)
;;=3^Obesity,Unspec
;;^UTILITY(U,$J,358.3,24231,1,4,0)
;;=4^E66.9
;;^UTILITY(U,$J,358.3,24231,2)
;;=^5002832
;;^UTILITY(U,$J,358.3,24232,0)
;;=I26.99^^74^967^92
;;^UTILITY(U,$J,358.3,24232,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24232,1,3,0)
;;=3^Pulmonary Embolism w/o Acute Cor Pulmonale
;;^UTILITY(U,$J,358.3,24232,1,4,0)
;;=4^I26.99
;;^UTILITY(U,$J,358.3,24232,2)
;;=^5007150
;;^UTILITY(U,$J,358.3,24233,0)
;;=R09.1^^74^967^80
;;^UTILITY(U,$J,358.3,24233,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24233,1,3,0)
;;=3^Pleurisy
;;^UTILITY(U,$J,358.3,24233,1,4,0)
;;=4^R09.1
;;^UTILITY(U,$J,358.3,24233,2)
;;=^95428
;;^UTILITY(U,$J,358.3,24234,0)
;;=J69.0^^74^967^87
;;^UTILITY(U,$J,358.3,24234,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24234,1,3,0)
;;=3^Pneumonitis d/t Inhalation of Food/Vomit
;;^UTILITY(U,$J,358.3,24234,1,4,0)
;;=4^J69.0
;;^UTILITY(U,$J,358.3,24234,2)
;;=^5008288
;;^UTILITY(U,$J,358.3,24235,0)
;;=J15.9^^74^967^82
;;^UTILITY(U,$J,358.3,24235,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24235,1,3,0)
;;=3^Pneumonia,Bacterial,Unspec
;;^UTILITY(U,$J,358.3,24235,1,4,0)
;;=4^J15.9
;;^UTILITY(U,$J,358.3,24235,2)
;;=^5008178
;;^UTILITY(U,$J,358.3,24236,0)
;;=J18.9^^74^967^84
;;^UTILITY(U,$J,358.3,24236,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24236,1,3,0)
;;=3^Pneumonia,Unspec Organism
;;^UTILITY(U,$J,358.3,24236,1,4,0)
;;=4^J18.9
;;^UTILITY(U,$J,358.3,24236,2)
;;=^95632
;;^UTILITY(U,$J,358.3,24237,0)
;;=J12.9^^74^967^86
;;^UTILITY(U,$J,358.3,24237,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24237,1,3,0)
;;=3^Pneumonia,Viral,Unspec
;;^UTILITY(U,$J,358.3,24237,1,4,0)
;;=4^J12.9
;;^UTILITY(U,$J,358.3,24237,2)
;;=^5008169
;;^UTILITY(U,$J,358.3,24238,0)
;;=J93.9^^74^967^88
;;^UTILITY(U,$J,358.3,24238,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24238,1,3,0)
;;=3^Pneumothorax,Unspec
;;^UTILITY(U,$J,358.3,24238,1,4,0)
;;=4^J93.9
;;^UTILITY(U,$J,358.3,24238,2)
;;=^5008315
;;^UTILITY(U,$J,358.3,24239,0)
;;=J84.10^^74^967^95
;;^UTILITY(U,$J,358.3,24239,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24239,1,3,0)
;;=3^Pulmonary Fibrosis,Unspec
;;^UTILITY(U,$J,358.3,24239,1,4,0)
;;=4^J84.10
;;^UTILITY(U,$J,358.3,24239,2)
;;=^5008300
;;^UTILITY(U,$J,358.3,24240,0)
;;=J84.89^^74^967^48
;;^UTILITY(U,$J,358.3,24240,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24240,1,3,0)
;;=3^Interstitial Pulmonary Disease
;;^UTILITY(U,$J,358.3,24240,1,4,0)
;;=4^J84.89
;;^UTILITY(U,$J,358.3,24240,2)
;;=^5008303
;;^UTILITY(U,$J,358.3,24241,0)
;;=Z01.811^^74^967^89
;;^UTILITY(U,$J,358.3,24241,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24241,1,3,0)
;;=3^Pre-Procedural Respiratory Exam
;;^UTILITY(U,$J,358.3,24241,1,4,0)
;;=4^Z01.811
;;^UTILITY(U,$J,358.3,24241,2)
;;=^5062626
;;^UTILITY(U,$J,358.3,24242,0)
;;=J18.2^^74^967^83
;;^UTILITY(U,$J,358.3,24242,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24242,1,3,0)
;;=3^Pneumonia,Hypostatic,Unspec Organism
;;^UTILITY(U,$J,358.3,24242,1,4,0)
;;=4^J18.2
;;^UTILITY(U,$J,358.3,24242,2)
;;=^5008184
;;^UTILITY(U,$J,358.3,24243,0)
;;=J81.0^^74^967^42
;;^UTILITY(U,$J,358.3,24243,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24243,1,3,0)
;;=3^Edema,Pulmonary,Acute
;;^UTILITY(U,$J,358.3,24243,1,4,0)
;;=4^J81.0
;;^UTILITY(U,$J,358.3,24243,2)
;;=^5008295
;;^UTILITY(U,$J,358.3,24244,0)
;;=J84.112^^74^967^94
;;^UTILITY(U,$J,358.3,24244,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24244,1,3,0)
;;=3^Pulmonary Fibrosis,Idiopathic
;;^UTILITY(U,$J,358.3,24244,1,4,0)
;;=4^J84.112
;;^UTILITY(U,$J,358.3,24244,2)
;;=^340534
;;^UTILITY(U,$J,358.3,24245,0)
;;=I27.0^^74^967^100
;;^UTILITY(U,$J,358.3,24245,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24245,1,3,0)
;;=3^Pulmonary Hypertension,Primary
;;^UTILITY(U,$J,358.3,24245,1,4,0)
;;=4^I27.0
;;^UTILITY(U,$J,358.3,24245,2)
;;=^265310
;;^UTILITY(U,$J,358.3,24246,0)
;;=R09.2^^74^967^104
;;^UTILITY(U,$J,358.3,24246,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24246,1,3,0)
;;=3^Repiratory Arrest
;;^UTILITY(U,$J,358.3,24246,1,4,0)
;;=4^R09.2
;;^UTILITY(U,$J,358.3,24246,2)
;;=^276886
;;^UTILITY(U,$J,358.3,24247,0)
;;=J96.00^^74^967^8
;;^UTILITY(U,$J,358.3,24247,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24247,1,3,0)
;;=3^Acute Respiratory Failure,Unspec
;;^UTILITY(U,$J,358.3,24247,1,4,0)
;;=4^J96.00
;;^UTILITY(U,$J,358.3,24247,2)
;;=^5008347
;;^UTILITY(U,$J,358.3,24248,0)
;;=J30.0^^74^967^107
;;^UTILITY(U,$J,358.3,24248,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24248,1,3,0)
;;=3^Rhinitis,Vasomotor
;;^UTILITY(U,$J,358.3,24248,1,4,0)
;;=4^J30.0
;;^UTILITY(U,$J,358.3,24248,2)
;;=^5008201
;;^UTILITY(U,$J,358.3,24249,0)
;;=J30.9^^74^967^106
;;^UTILITY(U,$J,358.3,24249,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24249,1,3,0)
;;=3^Rhinitis,Allergic,Unspec
;;^UTILITY(U,$J,358.3,24249,1,4,0)
;;=4^J30.9
;;^UTILITY(U,$J,358.3,24249,2)
;;=^5008205
;;^UTILITY(U,$J,358.3,24250,0)
;;=R06.02^^74^967^111
;;^UTILITY(U,$J,358.3,24250,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24250,1,3,0)
;;=3^Shortness of Breath
;;^UTILITY(U,$J,358.3,24250,1,4,0)
;;=4^R06.02
;;^UTILITY(U,$J,358.3,24250,2)
;;=^5019181
;;^UTILITY(U,$J,358.3,24251,0)
;;=J01.90^^74^967^112
;;^UTILITY(U,$J,358.3,24251,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24251,1,3,0)
;;=3^Sinusitis,Acute,Unspec
;;^UTILITY(U,$J,358.3,24251,1,4,0)
;;=4^J01.90
;;^UTILITY(U,$J,358.3,24251,2)
;;=^5008127
;;^UTILITY(U,$J,358.3,24252,0)
;;=J32.9^^74^967^113
;;^UTILITY(U,$J,358.3,24252,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24252,1,3,0)
;;=3^Sinusitis,Chr,Unspec
;;^UTILITY(U,$J,358.3,24252,1,4,0)
;;=4^J32.9
;;^UTILITY(U,$J,358.3,24252,2)
;;=^5008207
;;^UTILITY(U,$J,358.3,24253,0)
;;=G47.9^^74^967^114
;;^UTILITY(U,$J,358.3,24253,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24253,1,3,0)
;;=3^Sleep Disorder,Unspec
;;^UTILITY(U,$J,358.3,24253,1,4,0)
;;=4^G47.9
;;^UTILITY(U,$J,358.3,24253,2)
;;=^5003990
;;^UTILITY(U,$J,358.3,24254,0)
;;=F17.200^^74^967^75
;;^UTILITY(U,$J,358.3,24254,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24254,1,3,0)
;;=3^Nicotine Dependence,Unspec
;;^UTILITY(U,$J,358.3,24254,1,4,0)
;;=4^F17.200
;;^UTILITY(U,$J,358.3,24254,2)
;;=^5003360
;;^UTILITY(U,$J,358.3,24255,0)
;;=F17.201^^74^967^67
;;^UTILITY(U,$J,358.3,24255,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24255,1,3,0)
;;=3^Nicotine Dependence In Remission
;;^UTILITY(U,$J,358.3,24255,1,4,0)
;;=4^F17.201
;;^UTILITY(U,$J,358.3,24255,2)
;;=^5003361
;;^UTILITY(U,$J,358.3,24256,0)
;;=F17.203^^74^967^69
;;^UTILITY(U,$J,358.3,24256,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24256,1,3,0)
;;=3^Nicotine Dependence w/ Withdrawal
;;^UTILITY(U,$J,358.3,24256,1,4,0)
;;=4^F17.203
;;^UTILITY(U,$J,358.3,24256,2)
;;=^5003362
;;^UTILITY(U,$J,358.3,24257,0)
;;=F17.208^^74^967^68
;;^UTILITY(U,$J,358.3,24257,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24257,1,3,0)
;;=3^Nicotine Dependence w/ Nicotine-Induced Disorders
;;^UTILITY(U,$J,358.3,24257,1,4,0)
;;=4^F17.208
;;^UTILITY(U,$J,358.3,24257,2)
;;=^5003363
;;^UTILITY(U,$J,358.3,24258,0)
;;=F17.210^^74^967^70
;;^UTILITY(U,$J,358.3,24258,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24258,1,3,0)
;;=3^Nicotine Dependence,Cigarettes
;;^UTILITY(U,$J,358.3,24258,1,4,0)
;;=4^F17.210
;;^UTILITY(U,$J,358.3,24258,2)
;;=^5003365
;;^UTILITY(U,$J,358.3,24259,0)
;;=F17.211^^74^967^71
;;^UTILITY(U,$J,358.3,24259,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24259,1,3,0)
;;=3^Nicotine Dependence,Cigarettes in Remission
;;^UTILITY(U,$J,358.3,24259,1,4,0)
;;=4^F17.211
;;^UTILITY(U,$J,358.3,24259,2)
;;=^5003366
;;^UTILITY(U,$J,358.3,24260,0)
;;=F17.213^^74^967^74
;;^UTILITY(U,$J,358.3,24260,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24260,1,3,0)
;;=3^Nicotine Dependence,Cigarettes w/ Withdrawal
;;^UTILITY(U,$J,358.3,24260,1,4,0)
;;=4^F17.213
;;^UTILITY(U,$J,358.3,24260,2)
;;=^5003367
;;^UTILITY(U,$J,358.3,24261,0)
;;=F17.218^^74^967^73
;;^UTILITY(U,$J,358.3,24261,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24261,1,3,0)
;;=3^Nicotine Dependence,Cigarettes w/ Other Disorders
;;^UTILITY(U,$J,358.3,24261,1,4,0)
;;=4^F17.218
;;^UTILITY(U,$J,358.3,24261,2)
;;=^5003368
;;^UTILITY(U,$J,358.3,24262,0)
;;=F17.219^^74^967^72
;;^UTILITY(U,$J,358.3,24262,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24262,1,3,0)
;;=3^Nicotine Dependence,Cigarettes w/ Nicotine-Induced Disorders
;;^UTILITY(U,$J,358.3,24262,1,4,0)
;;=4^F17.219
;;^UTILITY(U,$J,358.3,24262,2)
;;=^5003369
;;^UTILITY(U,$J,358.3,24263,0)
;;=J98.09^^74^967^25
;;^UTILITY(U,$J,358.3,24263,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24263,1,3,0)
;;=3^Bronchus Diseases NEC
;;^UTILITY(U,$J,358.3,24263,1,4,0)
;;=4^J98.09
;;^UTILITY(U,$J,358.3,24263,2)
;;=^5008359
;;^UTILITY(U,$J,358.3,24264,0)
;;=A15.0^^74^967^115
;;^UTILITY(U,$J,358.3,24264,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24264,1,3,0)
;;=3^Tuberculosis of Lung
;;^UTILITY(U,$J,358.3,24264,1,4,0)
;;=4^A15.0
;;^UTILITY(U,$J,358.3,24264,2)
;;=^5000062
;;^UTILITY(U,$J,358.3,24265,0)
;;=J05.0^^74^967^49
;;^UTILITY(U,$J,358.3,24265,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24265,1,3,0)
;;=3^Laryngitis,Obstructive,Acute
;;^UTILITY(U,$J,358.3,24265,1,4,0)
;;=4^J05.0
;;^UTILITY(U,$J,358.3,24265,2)
;;=^5008141
;;^UTILITY(U,$J,358.3,24266,0)
;;=J06.9^^74^967^105
;;^UTILITY(U,$J,358.3,24266,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24266,1,3,0)
;;=3^Respiratory Infection,Upper,Acute
;;^UTILITY(U,$J,358.3,24266,1,4,0)
;;=4^J06.9
;;^UTILITY(U,$J,358.3,24266,2)
;;=^5008143
;;^UTILITY(U,$J,358.3,24267,0)
;;=R63.4^^74^967^116
;;^UTILITY(U,$J,358.3,24267,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24267,1,3,0)
;;=3^Weight Loss,Abnormal
;;^UTILITY(U,$J,358.3,24267,1,4,0)
;;=4^R63.4
;;^UTILITY(U,$J,358.3,24267,2)
;;=^5019542
;;^UTILITY(U,$J,358.3,24268,0)
;;=I26.09^^74^967^91
;;^UTILITY(U,$J,358.3,24268,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24268,1,3,0)
;;=3^Pulmonary Embolism w/ Acute Cor Pulmonale
;;^UTILITY(U,$J,358.3,24268,1,4,0)
;;=4^I26.09
;;^UTILITY(U,$J,358.3,24268,2)
;;=^5007147
;;^UTILITY(U,$J,358.3,24269,0)
;;=I26.99^^74^967^93
;;^UTILITY(U,$J,358.3,24269,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24269,1,3,0)
;;=3^Pulmonary Embolism w/o Acute Cor Pulmonale
;;^UTILITY(U,$J,358.3,24269,1,4,0)
;;=4^I26.99
;;^UTILITY(U,$J,358.3,24269,2)
;;=^5007150
;;^UTILITY(U,$J,358.3,24270,0)
;;=I26.01^^74^967^109
;;^UTILITY(U,$J,358.3,24270,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24270,1,3,0)
;;=3^Septic Pulmonary Embolism w/ Acute Cor Pulmonale
;;^UTILITY(U,$J,358.3,24270,1,4,0)
;;=4^I26.01
;;^UTILITY(U,$J,358.3,24270,2)
;;=^5007145
;;^UTILITY(U,$J,358.3,24271,0)
;;=I26.90^^74^967^110
;;^UTILITY(U,$J,358.3,24271,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24271,1,3,0)
;;=3^Septic Pulmonary Embolism w/o Acute Cor Pulmonale
;;^UTILITY(U,$J,358.3,24271,1,4,0)
;;=4^I26.90
;;^UTILITY(U,$J,358.3,24271,2)
;;=^5007148
;;^UTILITY(U,$J,358.3,24272,0)
;;=J06.9^^74^967^9
;;^UTILITY(U,$J,358.3,24272,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24272,1,3,0)
;;=3^Acute Upper Respiratory Infection,Unspec
;;^UTILITY(U,$J,358.3,24272,1,4,0)
;;=4^J06.9
;;^UTILITY(U,$J,358.3,24272,2)
;;=^5008143
;;^UTILITY(U,$J,358.3,24273,0)
;;=E66.01^^74^967^63
;;^UTILITY(U,$J,358.3,24273,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24273,1,3,0)
;;=3^Morbid Obesity
;;^UTILITY(U,$J,358.3,24273,1,4,0)
;;=4^E66.01
;;^UTILITY(U,$J,358.3,24273,2)
;;=^5002826
;;^UTILITY(U,$J,358.3,24274,0)
;;=E66.2^^74^967^64
;;^UTILITY(U,$J,358.3,24274,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24274,1,3,0)
;;=3^Morbid Obesity w/ Alveolar Hypoventilation
;;^UTILITY(U,$J,358.3,24274,1,4,0)
;;=4^E66.2
;;^UTILITY(U,$J,358.3,24274,2)
;;=^5002829
;;^UTILITY(U,$J,358.3,24275,0)
;;=J96.01^^74^967^7
;;^UTILITY(U,$J,358.3,24275,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,24275,1,3,0)
;;=3^Acute Respiratory Failure w/ Hypoxia
;;^UTILITY(U,$J,358.3,24275,1,4,0)
;;=4^J96.01
;;^UTILITY(U,$J,358.3,24275,2)
;;=^5008348
;;^UTILITY(U,$J,358.3,24276,0)
;;=J96.02^^74^967^6
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HIBDEI09W 19756 printed Dec 13, 2024@01:44:31 Page 2
IBDEI09W ; ; 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,24207,0)
+2 ;;=J41.0^^74^967^24
+3 ;;^UTILITY(U,$J,358.3,24207,1,0)
+4 ;;=^358.31IA^4^2
+5 ;;^UTILITY(U,$J,358.3,24207,1,3,0)
+6 ;;=3^Bronchitis,Chr,Simple
+7 ;;^UTILITY(U,$J,358.3,24207,1,4,0)
+8 ;;=4^J41.0
+9 ;;^UTILITY(U,$J,358.3,24207,2)
+10 ;;=^269946
+11 ;;^UTILITY(U,$J,358.3,24208,0)
+12 ;;=J44.1^^74^967^26
+13 ;;^UTILITY(U,$J,358.3,24208,1,0)
+14 ;;=^358.31IA^4^2
+15 ;;^UTILITY(U,$J,358.3,24208,1,3,0)
+16 ;;=3^COPD w/ Acute Exacerbation
+17 ;;^UTILITY(U,$J,358.3,24208,1,4,0)
+18 ;;=4^J44.1
+19 ;;^UTILITY(U,$J,358.3,24208,2)
+20 ;;=^5008240
+21 ;;^UTILITY(U,$J,358.3,24209,0)
+22 ;;=I27.81^^74^967^32
+23 ;;^UTILITY(U,$J,358.3,24209,1,0)
+24 ;;=^358.31IA^4^2
+25 ;;^UTILITY(U,$J,358.3,24209,1,3,0)
+26 ;;=3^Cor Pulmonale,Chr
+27 ;;^UTILITY(U,$J,358.3,24209,1,4,0)
+28 ;;=4^I27.81
+29 ;;^UTILITY(U,$J,358.3,24209,2)
+30 ;;=^5007152
+31 ;;^UTILITY(U,$J,358.3,24210,0)
+32 ;;=Q33.0^^74^967^39
+33 ;;^UTILITY(U,$J,358.3,24210,1,0)
+34 ;;=^358.31IA^4^2
+35 ;;^UTILITY(U,$J,358.3,24210,1,3,0)
+36 ;;=3^Cystic Lung,Congenital
+37 ;;^UTILITY(U,$J,358.3,24210,1,4,0)
+38 ;;=4^Q33.0
+39 ;;^UTILITY(U,$J,358.3,24210,2)
+40 ;;=^5018617
+41 ;;^UTILITY(U,$J,358.3,24211,0)
+42 ;;=J98.6^^74^967^40
+43 ;;^UTILITY(U,$J,358.3,24211,1,0)
+44 ;;=^358.31IA^4^2
+45 ;;^UTILITY(U,$J,358.3,24211,1,3,0)
+46 ;;=3^Diaphragm Disorders
+47 ;;^UTILITY(U,$J,358.3,24211,1,4,0)
+48 ;;=4^J98.6
+49 ;;^UTILITY(U,$J,358.3,24211,2)
+50 ;;=^5008364
+51 ;;^UTILITY(U,$J,358.3,24212,0)
+52 ;;=R53.83^^74^967^43
+53 ;;^UTILITY(U,$J,358.3,24212,1,0)
+54 ;;=^358.31IA^4^2
+55 ;;^UTILITY(U,$J,358.3,24212,1,3,0)
+56 ;;=3^Fatigue
+57 ;;^UTILITY(U,$J,358.3,24212,1,4,0)
+58 ;;=4^R53.83
+59 ;;^UTILITY(U,$J,358.3,24212,2)
+60 ;;=^5019520
+61 ;;^UTILITY(U,$J,358.3,24213,0)
+62 ;;=R04.2^^74^967^45
+63 ;;^UTILITY(U,$J,358.3,24213,1,0)
+64 ;;=^358.31IA^4^2
+65 ;;^UTILITY(U,$J,358.3,24213,1,3,0)
+66 ;;=3^Hemoptysis
+67 ;;^UTILITY(U,$J,358.3,24213,1,4,0)
+68 ;;=4^R04.2
+69 ;;^UTILITY(U,$J,358.3,24213,2)
+70 ;;=^5019175
+71 ;;^UTILITY(U,$J,358.3,24214,0)
+72 ;;=J91.0^^74^967^79
+73 ;;^UTILITY(U,$J,358.3,24214,1,0)
+74 ;;=^358.31IA^4^2
+75 ;;^UTILITY(U,$J,358.3,24214,1,3,0)
+76 ;;=3^Pleural Effusion,Malignant
+77 ;;^UTILITY(U,$J,358.3,24214,1,4,0)
+78 ;;=4^J91.0
+79 ;;^UTILITY(U,$J,358.3,24214,2)
+80 ;;=^336603
+81 ;;^UTILITY(U,$J,358.3,24215,0)
+82 ;;=J90.^^74^967^78
+83 ;;^UTILITY(U,$J,358.3,24215,1,0)
+84 ;;=^358.31IA^4^2
+85 ;;^UTILITY(U,$J,358.3,24215,1,3,0)
+86 ;;=3^Pleural Effusion NEC
+87 ;;^UTILITY(U,$J,358.3,24215,1,4,0)
+88 ;;=4^J90.
+89 ;;^UTILITY(U,$J,358.3,24215,2)
+90 ;;=^5008310
+91 ;;^UTILITY(U,$J,358.3,24216,0)
+92 ;;=I10.^^74^967^46
+93 ;;^UTILITY(U,$J,358.3,24216,1,0)
+94 ;;=^358.31IA^4^2
+95 ;;^UTILITY(U,$J,358.3,24216,1,3,0)
+96 ;;=3^Hypertension,Essential
+97 ;;^UTILITY(U,$J,358.3,24216,1,4,0)
+98 ;;=4^I10.
+99 ;;^UTILITY(U,$J,358.3,24216,2)
+100 ;;=^5007062
+101 ;;^UTILITY(U,$J,358.3,24217,0)
+102 ;;=R06.89^^74^967^20
+103 ;;^UTILITY(U,$J,358.3,24217,1,0)
+104 ;;=^358.31IA^4^2
+105 ;;^UTILITY(U,$J,358.3,24217,1,3,0)
+106 ;;=3^Breathing Abnormalities
+107 ;;^UTILITY(U,$J,358.3,24217,1,4,0)
+108 ;;=4^R06.89
+109 ;;^UTILITY(U,$J,358.3,24217,2)
+110 ;;=^5019193
+111 ;;^UTILITY(U,$J,358.3,24218,0)
+112 ;;=E86.1^^74^967^47
+113 ;;^UTILITY(U,$J,358.3,24218,1,0)
+114 ;;=^358.31IA^4^2
+115 ;;^UTILITY(U,$J,358.3,24218,1,3,0)
+116 ;;=3^Hypovolemia
+117 ;;^UTILITY(U,$J,358.3,24218,1,4,0)
+118 ;;=4^E86.1
+119 ;;^UTILITY(U,$J,358.3,24218,2)
+120 ;;=^332744
+121 ;;^UTILITY(U,$J,358.3,24219,0)
+122 ;;=C34.11^^74^967^62
+123 ;;^UTILITY(U,$J,358.3,24219,1,0)
+124 ;;=^358.31IA^4^2
+125 ;;^UTILITY(U,$J,358.3,24219,1,3,0)
+126 ;;=3^Malig Neop Upper Lobe,Rt Bronchus/Lung
+127 ;;^UTILITY(U,$J,358.3,24219,1,4,0)
+128 ;;=4^C34.11
+129 ;;^UTILITY(U,$J,358.3,24219,2)
+130 ;;=^5000961
+131 ;;^UTILITY(U,$J,358.3,24220,0)
+132 ;;=C34.12^^74^967^61
+133 ;;^UTILITY(U,$J,358.3,24220,1,0)
+134 ;;=^358.31IA^4^2
+135 ;;^UTILITY(U,$J,358.3,24220,1,3,0)
+136 ;;=3^Malig Neop Upper Lobe,Lt Bronchus/Lung
+137 ;;^UTILITY(U,$J,358.3,24220,1,4,0)
+138 ;;=4^C34.12
+139 ;;^UTILITY(U,$J,358.3,24220,2)
+140 ;;=^5000962
+141 ;;^UTILITY(U,$J,358.3,24221,0)
+142 ;;=C34.2^^74^967^55
+143 ;;^UTILITY(U,$J,358.3,24221,1,0)
+144 ;;=^358.31IA^4^2
+145 ;;^UTILITY(U,$J,358.3,24221,1,3,0)
+146 ;;=3^Malig Neop Middle Lobe,Bronchus/Lung
+147 ;;^UTILITY(U,$J,358.3,24221,1,4,0)
+148 ;;=4^C34.2
+149 ;;^UTILITY(U,$J,358.3,24221,2)
+150 ;;=^267137
+151 ;;^UTILITY(U,$J,358.3,24222,0)
+152 ;;=C34.31^^74^967^53
+153 ;;^UTILITY(U,$J,358.3,24222,1,0)
+154 ;;=^358.31IA^4^2
+155 ;;^UTILITY(U,$J,358.3,24222,1,3,0)
+156 ;;=3^Malig Neop Lower Lobe,Rt Bronchus/Lung
+157 ;;^UTILITY(U,$J,358.3,24222,1,4,0)
+158 ;;=4^C34.31
+159 ;;^UTILITY(U,$J,358.3,24222,2)
+160 ;;=^5133321
+161 ;;^UTILITY(U,$J,358.3,24223,0)
+162 ;;=C34.32^^74^967^52
+163 ;;^UTILITY(U,$J,358.3,24223,1,0)
+164 ;;=^358.31IA^4^2
+165 ;;^UTILITY(U,$J,358.3,24223,1,3,0)
+166 ;;=3^Malig Neop Lower Lobe,Lt Bronchus/Lung
+167 ;;^UTILITY(U,$J,358.3,24223,1,4,0)
+168 ;;=4^C34.32
+169 ;;^UTILITY(U,$J,358.3,24223,2)
+170 ;;=^5133322
+171 ;;^UTILITY(U,$J,358.3,24224,0)
+172 ;;=C34.81^^74^967^57
+173 ;;^UTILITY(U,$J,358.3,24224,1,0)
+174 ;;=^358.31IA^4^2
+175 ;;^UTILITY(U,$J,358.3,24224,1,3,0)
+176 ;;=3^Malig Neop Overlapping Sites,Rt Bronchus/Lung
+177 ;;^UTILITY(U,$J,358.3,24224,1,4,0)
+178 ;;=4^C34.81
+179 ;;^UTILITY(U,$J,358.3,24224,2)
+180 ;;=^5000964
+181 ;;^UTILITY(U,$J,358.3,24225,0)
+182 ;;=C34.82^^74^967^56
+183 ;;^UTILITY(U,$J,358.3,24225,1,0)
+184 ;;=^358.31IA^4^2
+185 ;;^UTILITY(U,$J,358.3,24225,1,3,0)
+186 ;;=3^Malig Neop Overlapping Sites,Lt Bronchus/Lung
+187 ;;^UTILITY(U,$J,358.3,24225,1,4,0)
+188 ;;=4^C34.82
+189 ;;^UTILITY(U,$J,358.3,24225,2)
+190 ;;=^5000965
+191 ;;^UTILITY(U,$J,358.3,24226,0)
+192 ;;=C34.91^^74^967^60
+193 ;;^UTILITY(U,$J,358.3,24226,1,0)
+194 ;;=^358.31IA^4^2
+195 ;;^UTILITY(U,$J,358.3,24226,1,3,0)
+196 ;;=3^Malig Neop Unspec Part,Rt Bronchus/Lung
+197 ;;^UTILITY(U,$J,358.3,24226,1,4,0)
+198 ;;=4^C34.91
+199 ;;^UTILITY(U,$J,358.3,24226,2)
+200 ;;=^5000967
+201 ;;^UTILITY(U,$J,358.3,24227,0)
+202 ;;=C34.92^^74^967^59
+203 ;;^UTILITY(U,$J,358.3,24227,1,0)
+204 ;;=^358.31IA^4^2
+205 ;;^UTILITY(U,$J,358.3,24227,1,3,0)
+206 ;;=3^Malig Neop Unspec Part,Lt Bronchus/Lung
+207 ;;^UTILITY(U,$J,358.3,24227,1,4,0)
+208 ;;=4^C34.92
+209 ;;^UTILITY(U,$J,358.3,24227,2)
+210 ;;=^5000968
+211 ;;^UTILITY(U,$J,358.3,24228,0)
+212 ;;=C38.4^^74^967^58
+213 ;;^UTILITY(U,$J,358.3,24228,1,0)
+214 ;;=^358.31IA^4^2
+215 ;;^UTILITY(U,$J,358.3,24228,1,3,0)
+216 ;;=3^Malig Neop Pleura
+217 ;;^UTILITY(U,$J,358.3,24228,1,4,0)
+218 ;;=4^C38.4
+219 ;;^UTILITY(U,$J,358.3,24228,2)
+220 ;;=^267140
+221 ;;^UTILITY(U,$J,358.3,24229,0)
+222 ;;=C39.9^^74^967^54
+223 ;;^UTILITY(U,$J,358.3,24229,1,0)
+224 ;;=^358.31IA^4^2
+225 ;;^UTILITY(U,$J,358.3,24229,1,3,0)
+226 ;;=3^Malig Neop Lower Respiratory Tract
+227 ;;^UTILITY(U,$J,358.3,24229,1,4,0)
+228 ;;=4^C39.9
+229 ;;^UTILITY(U,$J,358.3,24229,2)
+230 ;;=^5000972
+231 ;;^UTILITY(U,$J,358.3,24230,0)
+232 ;;=R76.11^^74^967^103
+233 ;;^UTILITY(U,$J,358.3,24230,1,0)
+234 ;;=^358.31IA^4^2
+235 ;;^UTILITY(U,$J,358.3,24230,1,3,0)
+236 ;;=3^Reaction to Skin Test w/o Active TB
+237 ;;^UTILITY(U,$J,358.3,24230,1,4,0)
+238 ;;=4^R76.11
+239 ;;^UTILITY(U,$J,358.3,24230,2)
+240 ;;=^5019570
+241 ;;^UTILITY(U,$J,358.3,24231,0)
+242 ;;=E66.9^^74^967^76
+243 ;;^UTILITY(U,$J,358.3,24231,1,0)
+244 ;;=^358.31IA^4^2
+245 ;;^UTILITY(U,$J,358.3,24231,1,3,0)
+246 ;;=3^Obesity,Unspec
+247 ;;^UTILITY(U,$J,358.3,24231,1,4,0)
+248 ;;=4^E66.9
+249 ;;^UTILITY(U,$J,358.3,24231,2)
+250 ;;=^5002832
+251 ;;^UTILITY(U,$J,358.3,24232,0)
+252 ;;=I26.99^^74^967^92
+253 ;;^UTILITY(U,$J,358.3,24232,1,0)
+254 ;;=^358.31IA^4^2
+255 ;;^UTILITY(U,$J,358.3,24232,1,3,0)
+256 ;;=3^Pulmonary Embolism w/o Acute Cor Pulmonale
+257 ;;^UTILITY(U,$J,358.3,24232,1,4,0)
+258 ;;=4^I26.99
+259 ;;^UTILITY(U,$J,358.3,24232,2)
+260 ;;=^5007150
+261 ;;^UTILITY(U,$J,358.3,24233,0)
+262 ;;=R09.1^^74^967^80
+263 ;;^UTILITY(U,$J,358.3,24233,1,0)
+264 ;;=^358.31IA^4^2
+265 ;;^UTILITY(U,$J,358.3,24233,1,3,0)
+266 ;;=3^Pleurisy
+267 ;;^UTILITY(U,$J,358.3,24233,1,4,0)
+268 ;;=4^R09.1
+269 ;;^UTILITY(U,$J,358.3,24233,2)
+270 ;;=^95428
+271 ;;^UTILITY(U,$J,358.3,24234,0)
+272 ;;=J69.0^^74^967^87
+273 ;;^UTILITY(U,$J,358.3,24234,1,0)
+274 ;;=^358.31IA^4^2
+275 ;;^UTILITY(U,$J,358.3,24234,1,3,0)
+276 ;;=3^Pneumonitis d/t Inhalation of Food/Vomit
+277 ;;^UTILITY(U,$J,358.3,24234,1,4,0)
+278 ;;=4^J69.0
+279 ;;^UTILITY(U,$J,358.3,24234,2)
+280 ;;=^5008288
+281 ;;^UTILITY(U,$J,358.3,24235,0)
+282 ;;=J15.9^^74^967^82
+283 ;;^UTILITY(U,$J,358.3,24235,1,0)
+284 ;;=^358.31IA^4^2
+285 ;;^UTILITY(U,$J,358.3,24235,1,3,0)
+286 ;;=3^Pneumonia,Bacterial,Unspec
+287 ;;^UTILITY(U,$J,358.3,24235,1,4,0)
+288 ;;=4^J15.9
+289 ;;^UTILITY(U,$J,358.3,24235,2)
+290 ;;=^5008178
+291 ;;^UTILITY(U,$J,358.3,24236,0)
+292 ;;=J18.9^^74^967^84
+293 ;;^UTILITY(U,$J,358.3,24236,1,0)
+294 ;;=^358.31IA^4^2
+295 ;;^UTILITY(U,$J,358.3,24236,1,3,0)
+296 ;;=3^Pneumonia,Unspec Organism
+297 ;;^UTILITY(U,$J,358.3,24236,1,4,0)
+298 ;;=4^J18.9
+299 ;;^UTILITY(U,$J,358.3,24236,2)
+300 ;;=^95632
+301 ;;^UTILITY(U,$J,358.3,24237,0)
+302 ;;=J12.9^^74^967^86
+303 ;;^UTILITY(U,$J,358.3,24237,1,0)
+304 ;;=^358.31IA^4^2
+305 ;;^UTILITY(U,$J,358.3,24237,1,3,0)
+306 ;;=3^Pneumonia,Viral,Unspec
+307 ;;^UTILITY(U,$J,358.3,24237,1,4,0)
+308 ;;=4^J12.9
+309 ;;^UTILITY(U,$J,358.3,24237,2)
+310 ;;=^5008169
+311 ;;^UTILITY(U,$J,358.3,24238,0)
+312 ;;=J93.9^^74^967^88
+313 ;;^UTILITY(U,$J,358.3,24238,1,0)
+314 ;;=^358.31IA^4^2
+315 ;;^UTILITY(U,$J,358.3,24238,1,3,0)
+316 ;;=3^Pneumothorax,Unspec
+317 ;;^UTILITY(U,$J,358.3,24238,1,4,0)
+318 ;;=4^J93.9
+319 ;;^UTILITY(U,$J,358.3,24238,2)
+320 ;;=^5008315
+321 ;;^UTILITY(U,$J,358.3,24239,0)
+322 ;;=J84.10^^74^967^95
+323 ;;^UTILITY(U,$J,358.3,24239,1,0)
+324 ;;=^358.31IA^4^2
+325 ;;^UTILITY(U,$J,358.3,24239,1,3,0)
+326 ;;=3^Pulmonary Fibrosis,Unspec
+327 ;;^UTILITY(U,$J,358.3,24239,1,4,0)
+328 ;;=4^J84.10
+329 ;;^UTILITY(U,$J,358.3,24239,2)
+330 ;;=^5008300
+331 ;;^UTILITY(U,$J,358.3,24240,0)
+332 ;;=J84.89^^74^967^48
+333 ;;^UTILITY(U,$J,358.3,24240,1,0)
+334 ;;=^358.31IA^4^2
+335 ;;^UTILITY(U,$J,358.3,24240,1,3,0)
+336 ;;=3^Interstitial Pulmonary Disease
+337 ;;^UTILITY(U,$J,358.3,24240,1,4,0)
+338 ;;=4^J84.89
+339 ;;^UTILITY(U,$J,358.3,24240,2)
+340 ;;=^5008303
+341 ;;^UTILITY(U,$J,358.3,24241,0)
+342 ;;=Z01.811^^74^967^89
+343 ;;^UTILITY(U,$J,358.3,24241,1,0)
+344 ;;=^358.31IA^4^2
+345 ;;^UTILITY(U,$J,358.3,24241,1,3,0)
+346 ;;=3^Pre-Procedural Respiratory Exam
+347 ;;^UTILITY(U,$J,358.3,24241,1,4,0)
+348 ;;=4^Z01.811
+349 ;;^UTILITY(U,$J,358.3,24241,2)
+350 ;;=^5062626
+351 ;;^UTILITY(U,$J,358.3,24242,0)
+352 ;;=J18.2^^74^967^83
+353 ;;^UTILITY(U,$J,358.3,24242,1,0)
+354 ;;=^358.31IA^4^2
+355 ;;^UTILITY(U,$J,358.3,24242,1,3,0)
+356 ;;=3^Pneumonia,Hypostatic,Unspec Organism
+357 ;;^UTILITY(U,$J,358.3,24242,1,4,0)
+358 ;;=4^J18.2
+359 ;;^UTILITY(U,$J,358.3,24242,2)
+360 ;;=^5008184
+361 ;;^UTILITY(U,$J,358.3,24243,0)
+362 ;;=J81.0^^74^967^42
+363 ;;^UTILITY(U,$J,358.3,24243,1,0)
+364 ;;=^358.31IA^4^2
+365 ;;^UTILITY(U,$J,358.3,24243,1,3,0)
+366 ;;=3^Edema,Pulmonary,Acute
+367 ;;^UTILITY(U,$J,358.3,24243,1,4,0)
+368 ;;=4^J81.0
+369 ;;^UTILITY(U,$J,358.3,24243,2)
+370 ;;=^5008295
+371 ;;^UTILITY(U,$J,358.3,24244,0)
+372 ;;=J84.112^^74^967^94
+373 ;;^UTILITY(U,$J,358.3,24244,1,0)
+374 ;;=^358.31IA^4^2
+375 ;;^UTILITY(U,$J,358.3,24244,1,3,0)
+376 ;;=3^Pulmonary Fibrosis,Idiopathic
+377 ;;^UTILITY(U,$J,358.3,24244,1,4,0)
+378 ;;=4^J84.112
+379 ;;^UTILITY(U,$J,358.3,24244,2)
+380 ;;=^340534
+381 ;;^UTILITY(U,$J,358.3,24245,0)
+382 ;;=I27.0^^74^967^100
+383 ;;^UTILITY(U,$J,358.3,24245,1,0)
+384 ;;=^358.31IA^4^2
+385 ;;^UTILITY(U,$J,358.3,24245,1,3,0)
+386 ;;=3^Pulmonary Hypertension,Primary
+387 ;;^UTILITY(U,$J,358.3,24245,1,4,0)
+388 ;;=4^I27.0
+389 ;;^UTILITY(U,$J,358.3,24245,2)
+390 ;;=^265310
+391 ;;^UTILITY(U,$J,358.3,24246,0)
+392 ;;=R09.2^^74^967^104
+393 ;;^UTILITY(U,$J,358.3,24246,1,0)
+394 ;;=^358.31IA^4^2
+395 ;;^UTILITY(U,$J,358.3,24246,1,3,0)
+396 ;;=3^Repiratory Arrest
+397 ;;^UTILITY(U,$J,358.3,24246,1,4,0)
+398 ;;=4^R09.2
+399 ;;^UTILITY(U,$J,358.3,24246,2)
+400 ;;=^276886
+401 ;;^UTILITY(U,$J,358.3,24247,0)
+402 ;;=J96.00^^74^967^8
+403 ;;^UTILITY(U,$J,358.3,24247,1,0)
+404 ;;=^358.31IA^4^2
+405 ;;^UTILITY(U,$J,358.3,24247,1,3,0)
+406 ;;=3^Acute Respiratory Failure,Unspec
+407 ;;^UTILITY(U,$J,358.3,24247,1,4,0)
+408 ;;=4^J96.00
+409 ;;^UTILITY(U,$J,358.3,24247,2)
+410 ;;=^5008347
+411 ;;^UTILITY(U,$J,358.3,24248,0)
+412 ;;=J30.0^^74^967^107
+413 ;;^UTILITY(U,$J,358.3,24248,1,0)
+414 ;;=^358.31IA^4^2
+415 ;;^UTILITY(U,$J,358.3,24248,1,3,0)
+416 ;;=3^Rhinitis,Vasomotor
+417 ;;^UTILITY(U,$J,358.3,24248,1,4,0)
+418 ;;=4^J30.0
+419 ;;^UTILITY(U,$J,358.3,24248,2)
+420 ;;=^5008201
+421 ;;^UTILITY(U,$J,358.3,24249,0)
+422 ;;=J30.9^^74^967^106
+423 ;;^UTILITY(U,$J,358.3,24249,1,0)
+424 ;;=^358.31IA^4^2
+425 ;;^UTILITY(U,$J,358.3,24249,1,3,0)
+426 ;;=3^Rhinitis,Allergic,Unspec
+427 ;;^UTILITY(U,$J,358.3,24249,1,4,0)
+428 ;;=4^J30.9
+429 ;;^UTILITY(U,$J,358.3,24249,2)
+430 ;;=^5008205
+431 ;;^UTILITY(U,$J,358.3,24250,0)
+432 ;;=R06.02^^74^967^111
+433 ;;^UTILITY(U,$J,358.3,24250,1,0)
+434 ;;=^358.31IA^4^2
+435 ;;^UTILITY(U,$J,358.3,24250,1,3,0)
+436 ;;=3^Shortness of Breath
+437 ;;^UTILITY(U,$J,358.3,24250,1,4,0)
+438 ;;=4^R06.02
+439 ;;^UTILITY(U,$J,358.3,24250,2)
+440 ;;=^5019181
+441 ;;^UTILITY(U,$J,358.3,24251,0)
+442 ;;=J01.90^^74^967^112
+443 ;;^UTILITY(U,$J,358.3,24251,1,0)
+444 ;;=^358.31IA^4^2
+445 ;;^UTILITY(U,$J,358.3,24251,1,3,0)
+446 ;;=3^Sinusitis,Acute,Unspec
+447 ;;^UTILITY(U,$J,358.3,24251,1,4,0)
+448 ;;=4^J01.90
+449 ;;^UTILITY(U,$J,358.3,24251,2)
+450 ;;=^5008127
+451 ;;^UTILITY(U,$J,358.3,24252,0)
+452 ;;=J32.9^^74^967^113
+453 ;;^UTILITY(U,$J,358.3,24252,1,0)
+454 ;;=^358.31IA^4^2
+455 ;;^UTILITY(U,$J,358.3,24252,1,3,0)
+456 ;;=3^Sinusitis,Chr,Unspec
+457 ;;^UTILITY(U,$J,358.3,24252,1,4,0)
+458 ;;=4^J32.9
+459 ;;^UTILITY(U,$J,358.3,24252,2)
+460 ;;=^5008207
+461 ;;^UTILITY(U,$J,358.3,24253,0)
+462 ;;=G47.9^^74^967^114
+463 ;;^UTILITY(U,$J,358.3,24253,1,0)
+464 ;;=^358.31IA^4^2
+465 ;;^UTILITY(U,$J,358.3,24253,1,3,0)
+466 ;;=3^Sleep Disorder,Unspec
+467 ;;^UTILITY(U,$J,358.3,24253,1,4,0)
+468 ;;=4^G47.9
+469 ;;^UTILITY(U,$J,358.3,24253,2)
+470 ;;=^5003990
+471 ;;^UTILITY(U,$J,358.3,24254,0)
+472 ;;=F17.200^^74^967^75
+473 ;;^UTILITY(U,$J,358.3,24254,1,0)
+474 ;;=^358.31IA^4^2
+475 ;;^UTILITY(U,$J,358.3,24254,1,3,0)
+476 ;;=3^Nicotine Dependence,Unspec
+477 ;;^UTILITY(U,$J,358.3,24254,1,4,0)
+478 ;;=4^F17.200
+479 ;;^UTILITY(U,$J,358.3,24254,2)
+480 ;;=^5003360
+481 ;;^UTILITY(U,$J,358.3,24255,0)
+482 ;;=F17.201^^74^967^67
+483 ;;^UTILITY(U,$J,358.3,24255,1,0)
+484 ;;=^358.31IA^4^2
+485 ;;^UTILITY(U,$J,358.3,24255,1,3,0)
+486 ;;=3^Nicotine Dependence In Remission
+487 ;;^UTILITY(U,$J,358.3,24255,1,4,0)
+488 ;;=4^F17.201
+489 ;;^UTILITY(U,$J,358.3,24255,2)
+490 ;;=^5003361
+491 ;;^UTILITY(U,$J,358.3,24256,0)
+492 ;;=F17.203^^74^967^69
+493 ;;^UTILITY(U,$J,358.3,24256,1,0)
+494 ;;=^358.31IA^4^2
+495 ;;^UTILITY(U,$J,358.3,24256,1,3,0)
+496 ;;=3^Nicotine Dependence w/ Withdrawal
+497 ;;^UTILITY(U,$J,358.3,24256,1,4,0)
+498 ;;=4^F17.203
+499 ;;^UTILITY(U,$J,358.3,24256,2)
+500 ;;=^5003362
+501 ;;^UTILITY(U,$J,358.3,24257,0)
+502 ;;=F17.208^^74^967^68
+503 ;;^UTILITY(U,$J,358.3,24257,1,0)
+504 ;;=^358.31IA^4^2
+505 ;;^UTILITY(U,$J,358.3,24257,1,3,0)
+506 ;;=3^Nicotine Dependence w/ Nicotine-Induced Disorders
+507 ;;^UTILITY(U,$J,358.3,24257,1,4,0)
+508 ;;=4^F17.208
+509 ;;^UTILITY(U,$J,358.3,24257,2)
+510 ;;=^5003363
+511 ;;^UTILITY(U,$J,358.3,24258,0)
+512 ;;=F17.210^^74^967^70
+513 ;;^UTILITY(U,$J,358.3,24258,1,0)
+514 ;;=^358.31IA^4^2
+515 ;;^UTILITY(U,$J,358.3,24258,1,3,0)
+516 ;;=3^Nicotine Dependence,Cigarettes
+517 ;;^UTILITY(U,$J,358.3,24258,1,4,0)
+518 ;;=4^F17.210
+519 ;;^UTILITY(U,$J,358.3,24258,2)
+520 ;;=^5003365
+521 ;;^UTILITY(U,$J,358.3,24259,0)
+522 ;;=F17.211^^74^967^71
+523 ;;^UTILITY(U,$J,358.3,24259,1,0)
+524 ;;=^358.31IA^4^2
+525 ;;^UTILITY(U,$J,358.3,24259,1,3,0)
+526 ;;=3^Nicotine Dependence,Cigarettes in Remission
+527 ;;^UTILITY(U,$J,358.3,24259,1,4,0)
+528 ;;=4^F17.211
+529 ;;^UTILITY(U,$J,358.3,24259,2)
+530 ;;=^5003366
+531 ;;^UTILITY(U,$J,358.3,24260,0)
+532 ;;=F17.213^^74^967^74
+533 ;;^UTILITY(U,$J,358.3,24260,1,0)
+534 ;;=^358.31IA^4^2
+535 ;;^UTILITY(U,$J,358.3,24260,1,3,0)
+536 ;;=3^Nicotine Dependence,Cigarettes w/ Withdrawal
+537 ;;^UTILITY(U,$J,358.3,24260,1,4,0)
+538 ;;=4^F17.213
+539 ;;^UTILITY(U,$J,358.3,24260,2)
+540 ;;=^5003367
+541 ;;^UTILITY(U,$J,358.3,24261,0)
+542 ;;=F17.218^^74^967^73
+543 ;;^UTILITY(U,$J,358.3,24261,1,0)
+544 ;;=^358.31IA^4^2
+545 ;;^UTILITY(U,$J,358.3,24261,1,3,0)
+546 ;;=3^Nicotine Dependence,Cigarettes w/ Other Disorders
+547 ;;^UTILITY(U,$J,358.3,24261,1,4,0)
+548 ;;=4^F17.218
+549 ;;^UTILITY(U,$J,358.3,24261,2)
+550 ;;=^5003368
+551 ;;^UTILITY(U,$J,358.3,24262,0)
+552 ;;=F17.219^^74^967^72
+553 ;;^UTILITY(U,$J,358.3,24262,1,0)
+554 ;;=^358.31IA^4^2
+555 ;;^UTILITY(U,$J,358.3,24262,1,3,0)
+556 ;;=3^Nicotine Dependence,Cigarettes w/ Nicotine-Induced Disorders
+557 ;;^UTILITY(U,$J,358.3,24262,1,4,0)
+558 ;;=4^F17.219
+559 ;;^UTILITY(U,$J,358.3,24262,2)
+560 ;;=^5003369
+561 ;;^UTILITY(U,$J,358.3,24263,0)
+562 ;;=J98.09^^74^967^25
+563 ;;^UTILITY(U,$J,358.3,24263,1,0)
+564 ;;=^358.31IA^4^2
+565 ;;^UTILITY(U,$J,358.3,24263,1,3,0)
+566 ;;=3^Bronchus Diseases NEC
+567 ;;^UTILITY(U,$J,358.3,24263,1,4,0)
+568 ;;=4^J98.09
+569 ;;^UTILITY(U,$J,358.3,24263,2)
+570 ;;=^5008359
+571 ;;^UTILITY(U,$J,358.3,24264,0)
+572 ;;=A15.0^^74^967^115
+573 ;;^UTILITY(U,$J,358.3,24264,1,0)
+574 ;;=^358.31IA^4^2
+575 ;;^UTILITY(U,$J,358.3,24264,1,3,0)
+576 ;;=3^Tuberculosis of Lung
+577 ;;^UTILITY(U,$J,358.3,24264,1,4,0)
+578 ;;=4^A15.0
+579 ;;^UTILITY(U,$J,358.3,24264,2)
+580 ;;=^5000062
+581 ;;^UTILITY(U,$J,358.3,24265,0)
+582 ;;=J05.0^^74^967^49
+583 ;;^UTILITY(U,$J,358.3,24265,1,0)
+584 ;;=^358.31IA^4^2
+585 ;;^UTILITY(U,$J,358.3,24265,1,3,0)
+586 ;;=3^Laryngitis,Obstructive,Acute
+587 ;;^UTILITY(U,$J,358.3,24265,1,4,0)
+588 ;;=4^J05.0
+589 ;;^UTILITY(U,$J,358.3,24265,2)
+590 ;;=^5008141
+591 ;;^UTILITY(U,$J,358.3,24266,0)
+592 ;;=J06.9^^74^967^105
+593 ;;^UTILITY(U,$J,358.3,24266,1,0)
+594 ;;=^358.31IA^4^2
+595 ;;^UTILITY(U,$J,358.3,24266,1,3,0)
+596 ;;=3^Respiratory Infection,Upper,Acute
+597 ;;^UTILITY(U,$J,358.3,24266,1,4,0)
+598 ;;=4^J06.9
+599 ;;^UTILITY(U,$J,358.3,24266,2)
+600 ;;=^5008143
+601 ;;^UTILITY(U,$J,358.3,24267,0)
+602 ;;=R63.4^^74^967^116
+603 ;;^UTILITY(U,$J,358.3,24267,1,0)
+604 ;;=^358.31IA^4^2
+605 ;;^UTILITY(U,$J,358.3,24267,1,3,0)
+606 ;;=3^Weight Loss,Abnormal
+607 ;;^UTILITY(U,$J,358.3,24267,1,4,0)
+608 ;;=4^R63.4
+609 ;;^UTILITY(U,$J,358.3,24267,2)
+610 ;;=^5019542
+611 ;;^UTILITY(U,$J,358.3,24268,0)
+612 ;;=I26.09^^74^967^91
+613 ;;^UTILITY(U,$J,358.3,24268,1,0)
+614 ;;=^358.31IA^4^2
+615 ;;^UTILITY(U,$J,358.3,24268,1,3,0)
+616 ;;=3^Pulmonary Embolism w/ Acute Cor Pulmonale
+617 ;;^UTILITY(U,$J,358.3,24268,1,4,0)
+618 ;;=4^I26.09
+619 ;;^UTILITY(U,$J,358.3,24268,2)
+620 ;;=^5007147
+621 ;;^UTILITY(U,$J,358.3,24269,0)
+622 ;;=I26.99^^74^967^93
+623 ;;^UTILITY(U,$J,358.3,24269,1,0)
+624 ;;=^358.31IA^4^2
+625 ;;^UTILITY(U,$J,358.3,24269,1,3,0)
+626 ;;=3^Pulmonary Embolism w/o Acute Cor Pulmonale
+627 ;;^UTILITY(U,$J,358.3,24269,1,4,0)
+628 ;;=4^I26.99
+629 ;;^UTILITY(U,$J,358.3,24269,2)
+630 ;;=^5007150
+631 ;;^UTILITY(U,$J,358.3,24270,0)
+632 ;;=I26.01^^74^967^109
+633 ;;^UTILITY(U,$J,358.3,24270,1,0)
+634 ;;=^358.31IA^4^2
+635 ;;^UTILITY(U,$J,358.3,24270,1,3,0)
+636 ;;=3^Septic Pulmonary Embolism w/ Acute Cor Pulmonale
+637 ;;^UTILITY(U,$J,358.3,24270,1,4,0)
+638 ;;=4^I26.01
+639 ;;^UTILITY(U,$J,358.3,24270,2)
+640 ;;=^5007145
+641 ;;^UTILITY(U,$J,358.3,24271,0)
+642 ;;=I26.90^^74^967^110
+643 ;;^UTILITY(U,$J,358.3,24271,1,0)
+644 ;;=^358.31IA^4^2
+645 ;;^UTILITY(U,$J,358.3,24271,1,3,0)
+646 ;;=3^Septic Pulmonary Embolism w/o Acute Cor Pulmonale
+647 ;;^UTILITY(U,$J,358.3,24271,1,4,0)
+648 ;;=4^I26.90
+649 ;;^UTILITY(U,$J,358.3,24271,2)
+650 ;;=^5007148
+651 ;;^UTILITY(U,$J,358.3,24272,0)
+652 ;;=J06.9^^74^967^9
+653 ;;^UTILITY(U,$J,358.3,24272,1,0)
+654 ;;=^358.31IA^4^2
+655 ;;^UTILITY(U,$J,358.3,24272,1,3,0)
+656 ;;=3^Acute Upper Respiratory Infection,Unspec
+657 ;;^UTILITY(U,$J,358.3,24272,1,4,0)
+658 ;;=4^J06.9
+659 ;;^UTILITY(U,$J,358.3,24272,2)
+660 ;;=^5008143
+661 ;;^UTILITY(U,$J,358.3,24273,0)
+662 ;;=E66.01^^74^967^63
+663 ;;^UTILITY(U,$J,358.3,24273,1,0)
+664 ;;=^358.31IA^4^2
+665 ;;^UTILITY(U,$J,358.3,24273,1,3,0)
+666 ;;=3^Morbid Obesity
+667 ;;^UTILITY(U,$J,358.3,24273,1,4,0)
+668 ;;=4^E66.01
+669 ;;^UTILITY(U,$J,358.3,24273,2)
+670 ;;=^5002826
+671 ;;^UTILITY(U,$J,358.3,24274,0)
+672 ;;=E66.2^^74^967^64
+673 ;;^UTILITY(U,$J,358.3,24274,1,0)
+674 ;;=^358.31IA^4^2
+675 ;;^UTILITY(U,$J,358.3,24274,1,3,0)
+676 ;;=3^Morbid Obesity w/ Alveolar Hypoventilation
+677 ;;^UTILITY(U,$J,358.3,24274,1,4,0)
+678 ;;=4^E66.2
+679 ;;^UTILITY(U,$J,358.3,24274,2)
+680 ;;=^5002829
+681 ;;^UTILITY(U,$J,358.3,24275,0)
+682 ;;=J96.01^^74^967^7
+683 ;;^UTILITY(U,$J,358.3,24275,1,0)
+684 ;;=^358.31IA^4^2
+685 ;;^UTILITY(U,$J,358.3,24275,1,3,0)
+686 ;;=3^Acute Respiratory Failure w/ Hypoxia
+687 ;;^UTILITY(U,$J,358.3,24275,1,4,0)
+688 ;;=4^J96.01
+689 ;;^UTILITY(U,$J,358.3,24275,2)
+690 ;;=^5008348
+691 ;;^UTILITY(U,$J,358.3,24276,0)
+692 ;;=J96.02^^74^967^6