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

IBDEI06V.m

Go to the documentation of this file.
IBDEI06V ; ; 28-OCT-2020
 ;;3.0;IB ENCOUNTER FORM IMP/EXP;;OCT 28, 2020
 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,16509,2)
 ;;=^332831
 ;;^UTILITY(U,$J,358.3,16510,0)
 ;;=J11.2^^80^839^31
 ;;^UTILITY(U,$J,358.3,16510,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16510,1,3,0)
 ;;=3^Influenza w/ GI Manifestation
 ;;^UTILITY(U,$J,358.3,16510,1,4,0)
 ;;=4^J11.2
 ;;^UTILITY(U,$J,358.3,16510,2)
 ;;=^5008159
 ;;^UTILITY(U,$J,358.3,16511,0)
 ;;=J11.89^^80^839^32
 ;;^UTILITY(U,$J,358.3,16511,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16511,1,3,0)
 ;;=3^Influenza w/ Other Manifestation
 ;;^UTILITY(U,$J,358.3,16511,1,4,0)
 ;;=4^J11.89
 ;;^UTILITY(U,$J,358.3,16511,2)
 ;;=^5008163
 ;;^UTILITY(U,$J,358.3,16512,0)
 ;;=J11.00^^80^839^33
 ;;^UTILITY(U,$J,358.3,16512,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16512,1,3,0)
 ;;=3^Influenza w/ Pneumonia
 ;;^UTILITY(U,$J,358.3,16512,1,4,0)
 ;;=4^J11.00
 ;;^UTILITY(U,$J,358.3,16512,2)
 ;;=^5008156
 ;;^UTILITY(U,$J,358.3,16513,0)
 ;;=J04.0^^80^839^34
 ;;^UTILITY(U,$J,358.3,16513,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16513,1,3,0)
 ;;=3^Laryngitis,Acute
 ;;^UTILITY(U,$J,358.3,16513,1,4,0)
 ;;=4^J04.0
 ;;^UTILITY(U,$J,358.3,16513,2)
 ;;=^5008137
 ;;^UTILITY(U,$J,358.3,16514,0)
 ;;=J37.0^^80^839^35
 ;;^UTILITY(U,$J,358.3,16514,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16514,1,3,0)
 ;;=3^Laryngitis,Chronic
 ;;^UTILITY(U,$J,358.3,16514,1,4,0)
 ;;=4^J37.0
 ;;^UTILITY(U,$J,358.3,16514,2)
 ;;=^269902
 ;;^UTILITY(U,$J,358.3,16515,0)
 ;;=R09.81^^80^839^36
 ;;^UTILITY(U,$J,358.3,16515,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16515,1,3,0)
 ;;=3^Nasal Congestion
 ;;^UTILITY(U,$J,358.3,16515,1,4,0)
 ;;=4^R09.81
 ;;^UTILITY(U,$J,358.3,16515,2)
 ;;=^5019203
 ;;^UTILITY(U,$J,358.3,16516,0)
 ;;=J34.2^^80^839^37
 ;;^UTILITY(U,$J,358.3,16516,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16516,1,3,0)
 ;;=3^Nasal Septum,Deviated
 ;;^UTILITY(U,$J,358.3,16516,1,4,0)
 ;;=4^J34.2
 ;;^UTILITY(U,$J,358.3,16516,2)
 ;;=^259087
 ;;^UTILITY(U,$J,358.3,16517,0)
 ;;=J34.3^^80^839^38
 ;;^UTILITY(U,$J,358.3,16517,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16517,1,3,0)
 ;;=3^Nasal Turbinates,Hypertrophy
 ;;^UTILITY(U,$J,358.3,16517,1,4,0)
 ;;=4^J34.3
 ;;^UTILITY(U,$J,358.3,16517,2)
 ;;=^269909
 ;;^UTILITY(U,$J,358.3,16518,0)
 ;;=J00.^^80^839^39
 ;;^UTILITY(U,$J,358.3,16518,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16518,1,3,0)
 ;;=3^Nasopharyngitis,Acute
 ;;^UTILITY(U,$J,358.3,16518,1,4,0)
 ;;=4^J00.
 ;;^UTILITY(U,$J,358.3,16518,2)
 ;;=^5008115
 ;;^UTILITY(U,$J,358.3,16519,0)
 ;;=J31.1^^80^839^40
 ;;^UTILITY(U,$J,358.3,16519,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16519,1,3,0)
 ;;=3^Nasopharyngitis,Chronic
 ;;^UTILITY(U,$J,358.3,16519,1,4,0)
 ;;=4^J31.1
 ;;^UTILITY(U,$J,358.3,16519,2)
 ;;=^269888
 ;;^UTILITY(U,$J,358.3,16520,0)
 ;;=J34.9^^80^839^41
 ;;^UTILITY(U,$J,358.3,16520,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16520,1,3,0)
 ;;=3^Nose & Nasal Sinuse Disorder,Unspec
 ;;^UTILITY(U,$J,358.3,16520,1,4,0)
 ;;=4^J34.9
 ;;^UTILITY(U,$J,358.3,16520,2)
 ;;=^5008212
 ;;^UTILITY(U,$J,358.3,16521,0)
 ;;=Z99.81^^80^839^42
 ;;^UTILITY(U,$J,358.3,16521,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16521,1,3,0)
 ;;=3^Oxygen,Supplemental,Dependence
 ;;^UTILITY(U,$J,358.3,16521,1,4,0)
 ;;=4^Z99.81
 ;;^UTILITY(U,$J,358.3,16521,2)
 ;;=^5063760
 ;;^UTILITY(U,$J,358.3,16522,0)
 ;;=J02.9^^80^839^44
 ;;^UTILITY(U,$J,358.3,16522,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16522,1,3,0)
 ;;=3^Pharyngitis,Acute,Unspec
 ;;^UTILITY(U,$J,358.3,16522,1,4,0)
 ;;=4^J02.9
 ;;^UTILITY(U,$J,358.3,16522,2)
 ;;=^5008130
 ;;^UTILITY(U,$J,358.3,16523,0)
 ;;=J31.2^^80^839^45
 ;;^UTILITY(U,$J,358.3,16523,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16523,1,3,0)
 ;;=3^Pharyngitis,Chronic
 ;;^UTILITY(U,$J,358.3,16523,1,4,0)
 ;;=4^J31.2
 ;;^UTILITY(U,$J,358.3,16523,2)
 ;;=^269886
 ;;^UTILITY(U,$J,358.3,16524,0)
 ;;=J94.9^^80^839^46
 ;;^UTILITY(U,$J,358.3,16524,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16524,1,3,0)
 ;;=3^Pleural Condition,Unspec
 ;;^UTILITY(U,$J,358.3,16524,1,4,0)
 ;;=4^J94.9
 ;;^UTILITY(U,$J,358.3,16524,2)
 ;;=^5008320
 ;;^UTILITY(U,$J,358.3,16525,0)
 ;;=J90.^^80^839^47
 ;;^UTILITY(U,$J,358.3,16525,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16525,1,3,0)
 ;;=3^Pleural Effusion NEC
 ;;^UTILITY(U,$J,358.3,16525,1,4,0)
 ;;=4^J90.
 ;;^UTILITY(U,$J,358.3,16525,2)
 ;;=^5008310
 ;;^UTILITY(U,$J,358.3,16526,0)
 ;;=R09.1^^80^839^48
 ;;^UTILITY(U,$J,358.3,16526,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16526,1,3,0)
 ;;=3^Pleurisy
 ;;^UTILITY(U,$J,358.3,16526,1,4,0)
 ;;=4^R09.1
 ;;^UTILITY(U,$J,358.3,16526,2)
 ;;=^95428
 ;;^UTILITY(U,$J,358.3,16527,0)
 ;;=J16.8^^80^839^50
 ;;^UTILITY(U,$J,358.3,16527,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16527,1,3,0)
 ;;=3^Pneumonia d/t Spec Infectious Organisms
 ;;^UTILITY(U,$J,358.3,16527,1,4,0)
 ;;=4^J16.8
 ;;^UTILITY(U,$J,358.3,16527,2)
 ;;=^5008180
 ;;^UTILITY(U,$J,358.3,16528,0)
 ;;=J17.^^80^839^52
 ;;^UTILITY(U,$J,358.3,16528,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16528,1,3,0)
 ;;=3^Pneumonia in Diseases Classified Elsewhere
 ;;^UTILITY(U,$J,358.3,16528,1,4,0)
 ;;=4^J17.
 ;;^UTILITY(U,$J,358.3,16528,2)
 ;;=^5008181
 ;;^UTILITY(U,$J,358.3,16529,0)
 ;;=J13.^^80^839^51
 ;;^UTILITY(U,$J,358.3,16529,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16529,1,3,0)
 ;;=3^Pneumonia d/t Streptococcus Pneumoniae
 ;;^UTILITY(U,$J,358.3,16529,1,4,0)
 ;;=4^J13.
 ;;^UTILITY(U,$J,358.3,16529,2)
 ;;=^5008170
 ;;^UTILITY(U,$J,358.3,16530,0)
 ;;=J16.0^^80^839^53
 ;;^UTILITY(U,$J,358.3,16530,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16530,1,3,0)
 ;;=3^Pneumonia,Chlamydial
 ;;^UTILITY(U,$J,358.3,16530,1,4,0)
 ;;=4^J16.0
 ;;^UTILITY(U,$J,358.3,16530,2)
 ;;=^5008179
 ;;^UTILITY(U,$J,358.3,16531,0)
 ;;=J14.^^80^839^49
 ;;^UTILITY(U,$J,358.3,16531,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16531,1,3,0)
 ;;=3^Pneumonia d/t Hemophilus Influenzae
 ;;^UTILITY(U,$J,358.3,16531,1,4,0)
 ;;=4^J14.
 ;;^UTILITY(U,$J,358.3,16531,2)
 ;;=^5008171
 ;;^UTILITY(U,$J,358.3,16532,0)
 ;;=Z87.01^^80^839^43
 ;;^UTILITY(U,$J,358.3,16532,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16532,1,3,0)
 ;;=3^Personal Hx of Pneumonia
 ;;^UTILITY(U,$J,358.3,16532,1,4,0)
 ;;=4^Z87.01
 ;;^UTILITY(U,$J,358.3,16532,2)
 ;;=^5063480
 ;;^UTILITY(U,$J,358.3,16533,0)
 ;;=J18.9^^80^839^54
 ;;^UTILITY(U,$J,358.3,16533,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16533,1,3,0)
 ;;=3^Pneumonia,Unspec Organism
 ;;^UTILITY(U,$J,358.3,16533,1,4,0)
 ;;=4^J18.9
 ;;^UTILITY(U,$J,358.3,16533,2)
 ;;=^95632
 ;;^UTILITY(U,$J,358.3,16534,0)
 ;;=J12.9^^80^839^55
 ;;^UTILITY(U,$J,358.3,16534,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16534,1,3,0)
 ;;=3^Pneumonia,Viral,Unspec
 ;;^UTILITY(U,$J,358.3,16534,1,4,0)
 ;;=4^J12.9
 ;;^UTILITY(U,$J,358.3,16534,2)
 ;;=^5008169
 ;;^UTILITY(U,$J,358.3,16535,0)
 ;;=J93.9^^80^839^56
 ;;^UTILITY(U,$J,358.3,16535,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16535,1,3,0)
 ;;=3^Pneumothorax,Unspec
 ;;^UTILITY(U,$J,358.3,16535,1,4,0)
 ;;=4^J93.9
 ;;^UTILITY(U,$J,358.3,16535,2)
 ;;=^5008315
 ;;^UTILITY(U,$J,358.3,16536,0)
 ;;=J33.9^^80^839^57
 ;;^UTILITY(U,$J,358.3,16536,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16536,1,3,0)
 ;;=3^Polyp,Nasal,Unspec
 ;;^UTILITY(U,$J,358.3,16536,1,4,0)
 ;;=4^J33.9
 ;;^UTILITY(U,$J,358.3,16536,2)
 ;;=^5008208
 ;;^UTILITY(U,$J,358.3,16537,0)
 ;;=R09.82^^80^839^58
 ;;^UTILITY(U,$J,358.3,16537,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16537,1,3,0)
 ;;=3^Postnasal Drip
 ;;^UTILITY(U,$J,358.3,16537,1,4,0)
 ;;=4^R09.82
 ;;^UTILITY(U,$J,358.3,16537,2)
 ;;=^97058
 ;;^UTILITY(U,$J,358.3,16538,0)
 ;;=J84.9^^80^839^59
 ;;^UTILITY(U,$J,358.3,16538,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16538,1,3,0)
 ;;=3^Pulmonary Disease,Interstitial,Unspec
 ;;^UTILITY(U,$J,358.3,16538,1,4,0)
 ;;=4^J84.9
 ;;^UTILITY(U,$J,358.3,16538,2)
 ;;=^5008304
 ;;^UTILITY(U,$J,358.3,16539,0)
 ;;=J81.0^^80^839^60
 ;;^UTILITY(U,$J,358.3,16539,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16539,1,3,0)
 ;;=3^Pulmonary Edema,Acute
 ;;^UTILITY(U,$J,358.3,16539,1,4,0)
 ;;=4^J81.0
 ;;^UTILITY(U,$J,358.3,16539,2)
 ;;=^5008295
 ;;^UTILITY(U,$J,358.3,16540,0)
 ;;=J81.1^^80^839^61
 ;;^UTILITY(U,$J,358.3,16540,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16540,1,3,0)
 ;;=3^Pulmonary Edema,Chronic
 ;;^UTILITY(U,$J,358.3,16540,1,4,0)
 ;;=4^J81.1
 ;;^UTILITY(U,$J,358.3,16540,2)
 ;;=^5008296
 ;;^UTILITY(U,$J,358.3,16541,0)
 ;;=J70.9^^80^839^63
 ;;^UTILITY(U,$J,358.3,16541,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16541,1,3,0)
 ;;=3^Respiratory Conditions d/t Unspec External Agent
 ;;^UTILITY(U,$J,358.3,16541,1,4,0)
 ;;=4^J70.9
 ;;^UTILITY(U,$J,358.3,16541,2)
 ;;=^269985
 ;;^UTILITY(U,$J,358.3,16542,0)
 ;;=J98.9^^80^839^64
 ;;^UTILITY(U,$J,358.3,16542,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16542,1,3,0)
 ;;=3^Respiratory Disorder,Unspec
 ;;^UTILITY(U,$J,358.3,16542,1,4,0)
 ;;=4^J98.9
 ;;^UTILITY(U,$J,358.3,16542,2)
 ;;=^5008366
 ;;^UTILITY(U,$J,358.3,16543,0)
 ;;=J06.9^^80^839^65
 ;;^UTILITY(U,$J,358.3,16543,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16543,1,3,0)
 ;;=3^Respiratory Infection,Upper,Acute,Unspec
 ;;^UTILITY(U,$J,358.3,16543,1,4,0)
 ;;=4^J06.9
 ;;^UTILITY(U,$J,358.3,16543,2)
 ;;=^5008143
 ;;^UTILITY(U,$J,358.3,16544,0)
 ;;=J39.9^^80^839^66
 ;;^UTILITY(U,$J,358.3,16544,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16544,1,3,0)
 ;;=3^Respiratory Tract Disease,Upper,Unspec
 ;;^UTILITY(U,$J,358.3,16544,1,4,0)
 ;;=4^J39.9
 ;;^UTILITY(U,$J,358.3,16544,2)
 ;;=^5008232
 ;;^UTILITY(U,$J,358.3,16545,0)
 ;;=J30.9^^80^839^67
 ;;^UTILITY(U,$J,358.3,16545,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16545,1,3,0)
 ;;=3^Rhinitis,Allgeric,Unspec
 ;;^UTILITY(U,$J,358.3,16545,1,4,0)
 ;;=4^J30.9
 ;;^UTILITY(U,$J,358.3,16545,2)
 ;;=^5008205
 ;;^UTILITY(U,$J,358.3,16546,0)
 ;;=J01.91^^80^839^68
 ;;^UTILITY(U,$J,358.3,16546,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16546,1,3,0)
 ;;=3^Sinusitis,Acute,Recurrent,Unspec
 ;;^UTILITY(U,$J,358.3,16546,1,4,0)
 ;;=4^J01.91
 ;;^UTILITY(U,$J,358.3,16546,2)
 ;;=^5008128
 ;;^UTILITY(U,$J,358.3,16547,0)
 ;;=J01.90^^80^839^69
 ;;^UTILITY(U,$J,358.3,16547,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16547,1,3,0)
 ;;=3^Sinusitis,Acute,Unspec
 ;;^UTILITY(U,$J,358.3,16547,1,4,0)
 ;;=4^J01.90
 ;;^UTILITY(U,$J,358.3,16547,2)
 ;;=^5008127
 ;;^UTILITY(U,$J,358.3,16548,0)
 ;;=J32.9^^80^839^70
 ;;^UTILITY(U,$J,358.3,16548,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16548,1,3,0)
 ;;=3^Sinusitis,Chronic,Unspec
 ;;^UTILITY(U,$J,358.3,16548,1,4,0)
 ;;=4^J32.9
 ;;^UTILITY(U,$J,358.3,16548,2)
 ;;=^5008207
 ;;^UTILITY(U,$J,358.3,16549,0)
 ;;=R06.83^^80^839^71
 ;;^UTILITY(U,$J,358.3,16549,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16549,1,3,0)
 ;;=3^Snoring
 ;;^UTILITY(U,$J,358.3,16549,1,4,0)
 ;;=4^R06.83
 ;;^UTILITY(U,$J,358.3,16549,2)
 ;;=^5019192
 ;;^UTILITY(U,$J,358.3,16550,0)
 ;;=R09.3^^80^839^72
 ;;^UTILITY(U,$J,358.3,16550,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16550,1,3,0)
 ;;=3^Sputum,Abnormal
 ;;^UTILITY(U,$J,358.3,16550,1,4,0)
 ;;=4^R09.3
 ;;^UTILITY(U,$J,358.3,16550,2)
 ;;=^5019202
 ;;^UTILITY(U,$J,358.3,16551,0)
 ;;=R06.82^^80^839^73
 ;;^UTILITY(U,$J,358.3,16551,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16551,1,3,0)
 ;;=3^Tachypnea NEC
 ;;^UTILITY(U,$J,358.3,16551,1,4,0)
 ;;=4^R06.82
 ;;^UTILITY(U,$J,358.3,16551,2)
 ;;=^5019191
 ;;^UTILITY(U,$J,358.3,16552,0)
 ;;=J03.90^^80^839^75
 ;;^UTILITY(U,$J,358.3,16552,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16552,1,3,0)
 ;;=3^Tonsillitis,Acute,Unspec
 ;;^UTILITY(U,$J,358.3,16552,1,4,0)
 ;;=4^J03.90
 ;;^UTILITY(U,$J,358.3,16552,2)
 ;;=^5008135
 ;;^UTILITY(U,$J,358.3,16553,0)
 ;;=J35.9^^80^839^74
 ;;^UTILITY(U,$J,358.3,16553,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16553,1,3,0)
 ;;=3^Tonsil & Adenoid Disease,Chronic,Unspec
 ;;^UTILITY(U,$J,358.3,16553,1,4,0)
 ;;=4^J35.9
 ;;^UTILITY(U,$J,358.3,16553,2)
 ;;=^5008218
 ;;^UTILITY(U,$J,358.3,16554,0)
 ;;=R06.2^^80^839^76
 ;;^UTILITY(U,$J,358.3,16554,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16554,1,3,0)
 ;;=3^Wheezing
 ;;^UTILITY(U,$J,358.3,16554,1,4,0)
 ;;=4^R06.2
 ;;^UTILITY(U,$J,358.3,16554,2)
 ;;=^5019184
 ;;^UTILITY(U,$J,358.3,16555,0)
 ;;=J82.81^^80^839^26
 ;;^UTILITY(U,$J,358.3,16555,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16555,1,3,0)
 ;;=3^Eosinophilic Pneumonia,Chronic
 ;;^UTILITY(U,$J,358.3,16555,1,4,0)
 ;;=4^J82.81
 ;;^UTILITY(U,$J,358.3,16555,2)
 ;;=^24374
 ;;^UTILITY(U,$J,358.3,16556,0)
 ;;=J82.82^^80^839^25
 ;;^UTILITY(U,$J,358.3,16556,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16556,1,3,0)
 ;;=3^Eosinophilic Pneumonia,Acute
 ;;^UTILITY(U,$J,358.3,16556,1,4,0)
 ;;=4^J82.82
 ;;^UTILITY(U,$J,358.3,16556,2)
 ;;=^5159205
 ;;^UTILITY(U,$J,358.3,16557,0)
 ;;=J82.83^^80^839^24
 ;;^UTILITY(U,$J,358.3,16557,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16557,1,3,0)
 ;;=3^Eosinophilic Asthma
 ;;^UTILITY(U,$J,358.3,16557,1,4,0)
 ;;=4^J82.83
 ;;^UTILITY(U,$J,358.3,16557,2)
 ;;=^5159206
 ;;^UTILITY(U,$J,358.3,16558,0)
 ;;=J82.89^^80^839^62
 ;;^UTILITY(U,$J,358.3,16558,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16558,1,3,0)
 ;;=3^Pulmonary Eosinophilia,Other,NEC
 ;;^UTILITY(U,$J,358.3,16558,1,4,0)
 ;;=4^J82.89
 ;;^UTILITY(U,$J,358.3,16558,2)
 ;;=^5159207
 ;;^UTILITY(U,$J,358.3,16559,0)
 ;;=R53.0^^80^840^1
 ;;^UTILITY(U,$J,358.3,16559,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16559,1,3,0)
 ;;=3^Fatigue,Cancer Related
 ;;^UTILITY(U,$J,358.3,16559,1,4,0)
 ;;=4^R53.0
 ;;^UTILITY(U,$J,358.3,16559,2)
 ;;=^5019515
 ;;^UTILITY(U,$J,358.3,16560,0)
 ;;=R53.82^^80^840^2
 ;;^UTILITY(U,$J,358.3,16560,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16560,1,3,0)
 ;;=3^Fatigue,Chronic,Unspec
 ;;^UTILITY(U,$J,358.3,16560,1,4,0)
 ;;=4^R53.82
 ;;^UTILITY(U,$J,358.3,16560,2)
 ;;=^5019519
 ;;^UTILITY(U,$J,358.3,16561,0)
 ;;=R53.83^^80^840^3
 ;;^UTILITY(U,$J,358.3,16561,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16561,1,3,0)
 ;;=3^Fatigue,Other
 ;;^UTILITY(U,$J,358.3,16561,1,4,0)
 ;;=4^R53.83
 ;;^UTILITY(U,$J,358.3,16561,2)
 ;;=^5019520
 ;;^UTILITY(U,$J,358.3,16562,0)
 ;;=F51.11^^80^840^7
 ;;^UTILITY(U,$J,358.3,16562,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16562,1,3,0)
 ;;=3^Hypersomnia,Primary
 ;;^UTILITY(U,$J,358.3,16562,1,4,0)
 ;;=4^F51.11
 ;;^UTILITY(U,$J,358.3,16562,2)
 ;;=^5003609
 ;;^UTILITY(U,$J,358.3,16563,0)
 ;;=F51.13^^80^840^4
 ;;^UTILITY(U,$J,358.3,16563,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16563,1,3,0)
 ;;=3^Hypersomina d/t Mental Disorder
 ;;^UTILITY(U,$J,358.3,16563,1,4,0)
 ;;=4^F51.13
 ;;^UTILITY(U,$J,358.3,16563,2)
 ;;=^5003611
 ;;^UTILITY(U,$J,358.3,16564,0)
 ;;=F51.19^^80^840^6
 ;;^UTILITY(U,$J,358.3,16564,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16564,1,3,0)
 ;;=3^Hypersomnia,Other
 ;;^UTILITY(U,$J,358.3,16564,1,4,0)
 ;;=4^F51.19
 ;;^UTILITY(U,$J,358.3,16564,2)
 ;;=^5003612
 ;;^UTILITY(U,$J,358.3,16565,0)
 ;;=F51.05^^80^840^10
 ;;^UTILITY(U,$J,358.3,16565,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16565,1,3,0)
 ;;=3^Insomnia d/t Mental Disorder
 ;;^UTILITY(U,$J,358.3,16565,1,4,0)
 ;;=4^F51.05
 ;;^UTILITY(U,$J,358.3,16565,2)
 ;;=^5003607
 ;;^UTILITY(U,$J,358.3,16566,0)
 ;;=F51.09^^80^840^12
 ;;^UTILITY(U,$J,358.3,16566,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16566,1,3,0)
 ;;=3^Insomnia,Other
 ;;^UTILITY(U,$J,358.3,16566,1,4,0)
 ;;=4^F51.09
 ;;^UTILITY(U,$J,358.3,16566,2)
 ;;=^5003608
 ;;^UTILITY(U,$J,358.3,16567,0)
 ;;=F51.02^^80^840^11
 ;;^UTILITY(U,$J,358.3,16567,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16567,1,3,0)
 ;;=3^Insomnia,Adjustment
 ;;^UTILITY(U,$J,358.3,16567,1,4,0)
 ;;=4^F51.02
 ;;^UTILITY(U,$J,358.3,16567,2)
 ;;=^5003604
 ;;^UTILITY(U,$J,358.3,16568,0)
 ;;=F51.01^^80^840^14
 ;;^UTILITY(U,$J,358.3,16568,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16568,1,3,0)
 ;;=3^Insomnia,Primary
 ;;^UTILITY(U,$J,358.3,16568,1,4,0)
 ;;=4^F51.01
 ;;^UTILITY(U,$J,358.3,16568,2)
 ;;=^5003603
 ;;^UTILITY(U,$J,358.3,16569,0)
 ;;=F51.04^^80^840^15
 ;;^UTILITY(U,$J,358.3,16569,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16569,1,3,0)
 ;;=3^Insomnia,Psychophysiologic
 ;;^UTILITY(U,$J,358.3,16569,1,4,0)
 ;;=4^F51.04
 ;;^UTILITY(U,$J,358.3,16569,2)
 ;;=^5003606
 ;;^UTILITY(U,$J,358.3,16570,0)
 ;;=G47.00^^80^840^16
 ;;^UTILITY(U,$J,358.3,16570,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16570,1,3,0)
 ;;=3^Insomnia,Unspec
 ;;^UTILITY(U,$J,358.3,16570,1,4,0)
 ;;=4^G47.00
 ;;^UTILITY(U,$J,358.3,16570,2)
 ;;=^332924
 ;;^UTILITY(U,$J,358.3,16571,0)
 ;;=F51.03^^80^840^13
 ;;^UTILITY(U,$J,358.3,16571,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16571,1,3,0)
 ;;=3^Insomnia,Paradoxical
 ;;^UTILITY(U,$J,358.3,16571,1,4,0)
 ;;=4^F51.03
 ;;^UTILITY(U,$J,358.3,16571,2)
 ;;=^5003605
 ;;^UTILITY(U,$J,358.3,16572,0)
 ;;=G47.33^^80^840^18
 ;;^UTILITY(U,$J,358.3,16572,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16572,1,3,0)
 ;;=3^Sleep Apnea,Obstructive
 ;;^UTILITY(U,$J,358.3,16572,1,4,0)
 ;;=4^G47.33
 ;;^UTILITY(U,$J,358.3,16572,2)
 ;;=^332763
 ;;^UTILITY(U,$J,358.3,16573,0)
 ;;=G47.30^^80^840^19
 ;;^UTILITY(U,$J,358.3,16573,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16573,1,3,0)
 ;;=3^Sleep Apnea,Unspec
 ;;^UTILITY(U,$J,358.3,16573,1,4,0)
 ;;=4^G47.30
 ;;^UTILITY(U,$J,358.3,16573,2)
 ;;=^5003977
 ;;^UTILITY(U,$J,358.3,16574,0)
 ;;=Z72.820^^80^840^20
 ;;^UTILITY(U,$J,358.3,16574,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16574,1,3,0)
 ;;=3^Sleep Deprivation
 ;;^UTILITY(U,$J,358.3,16574,1,4,0)
 ;;=4^Z72.820
 ;;^UTILITY(U,$J,358.3,16574,2)
 ;;=^5063264
 ;;^UTILITY(U,$J,358.3,16575,0)
 ;;=F51.5^^80^840^21
 ;;^UTILITY(U,$J,358.3,16575,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16575,1,3,0)
 ;;=3^Sleep Disorder,Nightmare
 ;;^UTILITY(U,$J,358.3,16575,1,4,0)
 ;;=4^F51.5
 ;;^UTILITY(U,$J,358.3,16575,2)
 ;;=^5003615
 ;;^UTILITY(U,$J,358.3,16576,0)
 ;;=F51.9^^80^840^22
 ;;^UTILITY(U,$J,358.3,16576,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16576,1,3,0)
 ;;=3^Sleep Disorder,Unspec
 ;;^UTILITY(U,$J,358.3,16576,1,4,0)
 ;;=4^F51.9
 ;;^UTILITY(U,$J,358.3,16576,2)
 ;;=^5003617
 ;;^UTILITY(U,$J,358.3,16577,0)
 ;;=G47.14^^80^840^5
 ;;^UTILITY(U,$J,358.3,16577,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16577,1,3,0)
 ;;=3^Hypersomnia d/t Medical Condition
 ;;^UTILITY(U,$J,358.3,16577,1,4,0)
 ;;=4^G47.14
 ;;^UTILITY(U,$J,358.3,16577,2)
 ;;=^5003972
 ;;^UTILITY(U,$J,358.3,16578,0)
 ;;=G47.10^^80^840^8
 ;;^UTILITY(U,$J,358.3,16578,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16578,1,3,0)
 ;;=3^Hypersomnia,Unspec
 ;;^UTILITY(U,$J,358.3,16578,1,4,0)
 ;;=4^G47.10
 ;;^UTILITY(U,$J,358.3,16578,2)
 ;;=^332926
 ;;^UTILITY(U,$J,358.3,16579,0)
 ;;=G47.01^^80^840^9
 ;;^UTILITY(U,$J,358.3,16579,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16579,1,3,0)
 ;;=3^Insomnia d/t Medical Condition
 ;;^UTILITY(U,$J,358.3,16579,1,4,0)
 ;;=4^G47.01
 ;;^UTILITY(U,$J,358.3,16579,2)
 ;;=^5003969
 ;;^UTILITY(U,$J,358.3,16580,0)
 ;;=G47.00^^80^840^17
 ;;^UTILITY(U,$J,358.3,16580,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,16580,1,3,0)
 ;;=3^Insomnia,Unspec