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

IBDEI099.m

Go to the documentation of this file.
IBDEI099 ; ; 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,22625,0)
 ;;=A69.29^^71^916^20
 ;;^UTILITY(U,$J,358.3,22625,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22625,1,3,0)
 ;;=3^Conditions d/t Lyme Disease
 ;;^UTILITY(U,$J,358.3,22625,1,4,0)
 ;;=4^A69.29
 ;;^UTILITY(U,$J,358.3,22625,2)
 ;;=^5000379
 ;;^UTILITY(U,$J,358.3,22626,0)
 ;;=A69.23^^71^916^5
 ;;^UTILITY(U,$J,358.3,22626,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22626,1,3,0)
 ;;=3^Arthritis d/t Lyme Disease
 ;;^UTILITY(U,$J,358.3,22626,1,4,0)
 ;;=4^A69.23
 ;;^UTILITY(U,$J,358.3,22626,2)
 ;;=^5000378
 ;;^UTILITY(U,$J,358.3,22627,0)
 ;;=A51.0^^71^916^32
 ;;^UTILITY(U,$J,358.3,22627,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22627,1,3,0)
 ;;=3^Genital Syphilis,Primary
 ;;^UTILITY(U,$J,358.3,22627,1,4,0)
 ;;=4^A51.0
 ;;^UTILITY(U,$J,358.3,22627,2)
 ;;=^5000272
 ;;^UTILITY(U,$J,358.3,22628,0)
 ;;=A52.3^^71^916^57
 ;;^UTILITY(U,$J,358.3,22628,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22628,1,3,0)
 ;;=3^Neurosyphilis,Unspec
 ;;^UTILITY(U,$J,358.3,22628,1,4,0)
 ;;=4^A52.3
 ;;^UTILITY(U,$J,358.3,22628,2)
 ;;=^5000298
 ;;^UTILITY(U,$J,358.3,22629,0)
 ;;=A52.10^^71^916^56
 ;;^UTILITY(U,$J,358.3,22629,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22629,1,3,0)
 ;;=3^Neurosyphilis Symptomatic,Unspec
 ;;^UTILITY(U,$J,358.3,22629,1,4,0)
 ;;=4^A52.10
 ;;^UTILITY(U,$J,358.3,22629,2)
 ;;=^5000291
 ;;^UTILITY(U,$J,358.3,22630,0)
 ;;=A52.9^^71^916^52
 ;;^UTILITY(U,$J,358.3,22630,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22630,1,3,0)
 ;;=3^Late Syphilis,Unspec
 ;;^UTILITY(U,$J,358.3,22630,1,4,0)
 ;;=4^A52.9
 ;;^UTILITY(U,$J,358.3,22630,2)
 ;;=^5000308
 ;;^UTILITY(U,$J,358.3,22631,0)
 ;;=A53.9^^71^916^84
 ;;^UTILITY(U,$J,358.3,22631,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22631,1,3,0)
 ;;=3^Syphilis,Unspec
 ;;^UTILITY(U,$J,358.3,22631,1,4,0)
 ;;=4^A53.9
 ;;^UTILITY(U,$J,358.3,22631,2)
 ;;=^5000310
 ;;^UTILITY(U,$J,358.3,22632,0)
 ;;=B37.3^^71^916^19
 ;;^UTILITY(U,$J,358.3,22632,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22632,1,3,0)
 ;;=3^Candidiasis Vulva/Vagina
 ;;^UTILITY(U,$J,358.3,22632,1,4,0)
 ;;=4^B37.3
 ;;^UTILITY(U,$J,358.3,22632,2)
 ;;=^5000615
 ;;^UTILITY(U,$J,358.3,22633,0)
 ;;=B58.9^^71^916^89
 ;;^UTILITY(U,$J,358.3,22633,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22633,1,3,0)
 ;;=3^Toxoplasmosis,Unspec
 ;;^UTILITY(U,$J,358.3,22633,1,4,0)
 ;;=4^B58.9
 ;;^UTILITY(U,$J,358.3,22633,2)
 ;;=^5000733
 ;;^UTILITY(U,$J,358.3,22634,0)
 ;;=A59.01^^71^916^90
 ;;^UTILITY(U,$J,358.3,22634,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22634,1,3,0)
 ;;=3^Trichomonal Vulvovaginitis
 ;;^UTILITY(U,$J,358.3,22634,1,4,0)
 ;;=4^A59.01
 ;;^UTILITY(U,$J,358.3,22634,2)
 ;;=^121763
 ;;^UTILITY(U,$J,358.3,22635,0)
 ;;=B59.^^71^916^70
 ;;^UTILITY(U,$J,358.3,22635,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22635,1,3,0)
 ;;=3^Pneumocystosis
 ;;^UTILITY(U,$J,358.3,22635,1,4,0)
 ;;=4^B59.
 ;;^UTILITY(U,$J,358.3,22635,2)
 ;;=^5000734
 ;;^UTILITY(U,$J,358.3,22636,0)
 ;;=H83.09^^71^916^51
 ;;^UTILITY(U,$J,358.3,22636,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22636,1,3,0)
 ;;=3^Labyrinthitis,Unspec Ear
 ;;^UTILITY(U,$J,358.3,22636,1,4,0)
 ;;=4^H83.09
 ;;^UTILITY(U,$J,358.3,22636,2)
 ;;=^5006897
 ;;^UTILITY(U,$J,358.3,22637,0)
 ;;=H83.01^^71^916^50
 ;;^UTILITY(U,$J,358.3,22637,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22637,1,3,0)
 ;;=3^Labyrinthitis,Right Ear
 ;;^UTILITY(U,$J,358.3,22637,1,4,0)
 ;;=4^H83.01
 ;;^UTILITY(U,$J,358.3,22637,2)
 ;;=^5006894
 ;;^UTILITY(U,$J,358.3,22638,0)
 ;;=H83.03^^71^916^48
 ;;^UTILITY(U,$J,358.3,22638,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22638,1,3,0)
 ;;=3^Labyrinthitis,Bilateral
 ;;^UTILITY(U,$J,358.3,22638,1,4,0)
 ;;=4^H83.03
 ;;^UTILITY(U,$J,358.3,22638,2)
 ;;=^5006896
 ;;^UTILITY(U,$J,358.3,22639,0)
 ;;=H83.02^^71^916^49
 ;;^UTILITY(U,$J,358.3,22639,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22639,1,3,0)
 ;;=3^Labyrinthitis,Left Ear
 ;;^UTILITY(U,$J,358.3,22639,1,4,0)
 ;;=4^H83.02
 ;;^UTILITY(U,$J,358.3,22639,2)
 ;;=^5006895
 ;;^UTILITY(U,$J,358.3,22640,0)
 ;;=J01.91^^71^916^81
 ;;^UTILITY(U,$J,358.3,22640,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22640,1,3,0)
 ;;=3^Sinusitis,Acute Recurrent Unspec
 ;;^UTILITY(U,$J,358.3,22640,1,4,0)
 ;;=4^J01.91
 ;;^UTILITY(U,$J,358.3,22640,2)
 ;;=^5008128
 ;;^UTILITY(U,$J,358.3,22641,0)
 ;;=J03.90^^71^916^88
 ;;^UTILITY(U,$J,358.3,22641,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22641,1,3,0)
 ;;=3^Tonsillitis,Acute Unspec
 ;;^UTILITY(U,$J,358.3,22641,1,4,0)
 ;;=4^J03.90
 ;;^UTILITY(U,$J,358.3,22641,2)
 ;;=^5008135
 ;;^UTILITY(U,$J,358.3,22642,0)
 ;;=J01.90^^71^916^82
 ;;^UTILITY(U,$J,358.3,22642,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22642,1,3,0)
 ;;=3^Sinusitis,Acute Unspec
 ;;^UTILITY(U,$J,358.3,22642,1,4,0)
 ;;=4^J01.90
 ;;^UTILITY(U,$J,358.3,22642,2)
 ;;=^5008127
 ;;^UTILITY(U,$J,358.3,22643,0)
 ;;=J20.1^^71^916^10
 ;;^UTILITY(U,$J,358.3,22643,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22643,1,3,0)
 ;;=3^Bronchitis,Acute d/t Hemophilus Influenza
 ;;^UTILITY(U,$J,358.3,22643,1,4,0)
 ;;=4^J20.1
 ;;^UTILITY(U,$J,358.3,22643,2)
 ;;=^5008187
 ;;^UTILITY(U,$J,358.3,22644,0)
 ;;=J20.0^^71^916^11
 ;;^UTILITY(U,$J,358.3,22644,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22644,1,3,0)
 ;;=3^Bronchitis,Acute d/t Mycoplasma Pneumonia
 ;;^UTILITY(U,$J,358.3,22644,1,4,0)
 ;;=4^J20.0
 ;;^UTILITY(U,$J,358.3,22644,2)
 ;;=^5008186
 ;;^UTILITY(U,$J,358.3,22645,0)
 ;;=J20.2^^71^916^6
 ;;^UTILITY(U,$J,358.3,22645,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22645,1,3,0)
 ;;=3^Bonchitis,Acute d/t Streptococcus
 ;;^UTILITY(U,$J,358.3,22645,1,4,0)
 ;;=4^J20.2
 ;;^UTILITY(U,$J,358.3,22645,2)
 ;;=^5008188
 ;;^UTILITY(U,$J,358.3,22646,0)
 ;;=J20.4^^71^916^13
 ;;^UTILITY(U,$J,358.3,22646,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22646,1,3,0)
 ;;=3^Bronchitis,Acute d/t Parainfluenza Virus
 ;;^UTILITY(U,$J,358.3,22646,1,4,0)
 ;;=4^J20.4
 ;;^UTILITY(U,$J,358.3,22646,2)
 ;;=^5008190
 ;;^UTILITY(U,$J,358.3,22647,0)
 ;;=J20.3^^71^916^8
 ;;^UTILITY(U,$J,358.3,22647,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22647,1,3,0)
 ;;=3^Bronchitis,Acute d/t Coxsackievirus
 ;;^UTILITY(U,$J,358.3,22647,1,4,0)
 ;;=4^J20.3
 ;;^UTILITY(U,$J,358.3,22647,2)
 ;;=^5008189
 ;;^UTILITY(U,$J,358.3,22648,0)
 ;;=J20.9^^71^916^7
 ;;^UTILITY(U,$J,358.3,22648,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22648,1,3,0)
 ;;=3^Bronchitis,Acute Unspec
 ;;^UTILITY(U,$J,358.3,22648,1,4,0)
 ;;=4^J20.9
 ;;^UTILITY(U,$J,358.3,22648,2)
 ;;=^5008195
 ;;^UTILITY(U,$J,358.3,22649,0)
 ;;=J20.8^^71^916^12
 ;;^UTILITY(U,$J,358.3,22649,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22649,1,3,0)
 ;;=3^Bronchitis,Acute d/t Oth Spec Organisms
 ;;^UTILITY(U,$J,358.3,22649,1,4,0)
 ;;=4^J20.8
 ;;^UTILITY(U,$J,358.3,22649,2)
 ;;=^5008194
 ;;^UTILITY(U,$J,358.3,22650,0)
 ;;=J20.5^^71^916^14
 ;;^UTILITY(U,$J,358.3,22650,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22650,1,3,0)
 ;;=3^Bronchitis,Acute d/t Respiratory Syncytial Virus
 ;;^UTILITY(U,$J,358.3,22650,1,4,0)
 ;;=4^J20.5
 ;;^UTILITY(U,$J,358.3,22650,2)
 ;;=^5008191
 ;;^UTILITY(U,$J,358.3,22651,0)
 ;;=J20.7^^71^916^9
 ;;^UTILITY(U,$J,358.3,22651,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22651,1,3,0)
 ;;=3^Bronchitis,Acute d/t Echovirus
 ;;^UTILITY(U,$J,358.3,22651,1,4,0)
 ;;=4^J20.7
 ;;^UTILITY(U,$J,358.3,22651,2)
 ;;=^5008193
 ;;^UTILITY(U,$J,358.3,22652,0)
 ;;=J20.6^^71^916^15
 ;;^UTILITY(U,$J,358.3,22652,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22652,1,3,0)
 ;;=3^Bronchitis,Acute d/t Rhinovirus
 ;;^UTILITY(U,$J,358.3,22652,1,4,0)
 ;;=4^J20.6
 ;;^UTILITY(U,$J,358.3,22652,2)
 ;;=^5008192
 ;;^UTILITY(U,$J,358.3,22653,0)
 ;;=J18.9^^71^916^71
 ;;^UTILITY(U,$J,358.3,22653,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22653,1,3,0)
 ;;=3^Pneumonia,Unspec Organism
 ;;^UTILITY(U,$J,358.3,22653,1,4,0)
 ;;=4^J18.9
 ;;^UTILITY(U,$J,358.3,22653,2)
 ;;=^95632
 ;;^UTILITY(U,$J,358.3,22654,0)
 ;;=J18.8^^71^916^72
 ;;^UTILITY(U,$J,358.3,22654,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22654,1,3,0)
 ;;=3^Pneumonia,Unspec Organism NEC
 ;;^UTILITY(U,$J,358.3,22654,1,4,0)
 ;;=4^J18.8
 ;;^UTILITY(U,$J,358.3,22654,2)
 ;;=^5008185
 ;;^UTILITY(U,$J,358.3,22655,0)
 ;;=J11.00^^71^916^31
 ;;^UTILITY(U,$J,358.3,22655,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22655,1,3,0)
 ;;=3^Flu d/t Unidentified Flu Virus w/ Unspec Type Pneumonia
 ;;^UTILITY(U,$J,358.3,22655,1,4,0)
 ;;=4^J11.00
 ;;^UTILITY(U,$J,358.3,22655,2)
 ;;=^5008156
 ;;^UTILITY(U,$J,358.3,22656,0)
 ;;=J12.9^^71^916^73
 ;;^UTILITY(U,$J,358.3,22656,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22656,1,3,0)
 ;;=3^Pneumonia,Viral Unspec
 ;;^UTILITY(U,$J,358.3,22656,1,4,0)
 ;;=4^J12.9
 ;;^UTILITY(U,$J,358.3,22656,2)
 ;;=^5008169
 ;;^UTILITY(U,$J,358.3,22657,0)
 ;;=J10.08^^71^916^44
 ;;^UTILITY(U,$J,358.3,22657,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22657,1,3,0)
 ;;=3^Influenza d/t Oth ID'd Influenza Virus w/ Oth Pneumonia
 ;;^UTILITY(U,$J,358.3,22657,1,4,0)
 ;;=4^J10.08
 ;;^UTILITY(U,$J,358.3,22657,2)
 ;;=^5008150
 ;;^UTILITY(U,$J,358.3,22658,0)
 ;;=J10.00^^71^916^43
 ;;^UTILITY(U,$J,358.3,22658,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22658,1,3,0)
 ;;=3^Influenza d/t Oth ID'd Flu Virus w/ Unspec Type Pneumonia
 ;;^UTILITY(U,$J,358.3,22658,1,4,0)
 ;;=4^J10.00
 ;;^UTILITY(U,$J,358.3,22658,2)
 ;;=^5008148
 ;;^UTILITY(U,$J,358.3,22659,0)
 ;;=J11.08^^71^916^46
 ;;^UTILITY(U,$J,358.3,22659,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22659,1,3,0)
 ;;=3^Influenza d/t Unident Flu Virus w/ Spec Pneumonia
 ;;^UTILITY(U,$J,358.3,22659,1,4,0)
 ;;=4^J11.08
 ;;^UTILITY(U,$J,358.3,22659,2)
 ;;=^5008157
 ;;^UTILITY(U,$J,358.3,22660,0)
 ;;=J10.1^^71^916^45
 ;;^UTILITY(U,$J,358.3,22660,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22660,1,3,0)
 ;;=3^Influenza d/t Oth ID'd Influenza Virus w/ Oth Resp Manifest
 ;;^UTILITY(U,$J,358.3,22660,1,4,0)
 ;;=4^J10.1
 ;;^UTILITY(U,$J,358.3,22660,2)
 ;;=^5008151
 ;;^UTILITY(U,$J,358.3,22661,0)
 ;;=J10.01^^71^916^42
 ;;^UTILITY(U,$J,358.3,22661,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22661,1,3,0)
 ;;=3^Influenza d/t Oth ID'd Flu Virus w/ Same Oth ID'd Flu Virus Pneumonia
 ;;^UTILITY(U,$J,358.3,22661,1,4,0)
 ;;=4^J10.01
 ;;^UTILITY(U,$J,358.3,22661,2)
 ;;=^5008149
 ;;^UTILITY(U,$J,358.3,22662,0)
 ;;=J11.1^^71^916^47
 ;;^UTILITY(U,$J,358.3,22662,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22662,1,3,0)
 ;;=3^Influenza d/t Unident Influenza Virus w/ Oth Resp Manifest
 ;;^UTILITY(U,$J,358.3,22662,1,4,0)
 ;;=4^J11.1
 ;;^UTILITY(U,$J,358.3,22662,2)
 ;;=^5008158
 ;;^UTILITY(U,$J,358.3,22663,0)
 ;;=N12.^^71^916^92
 ;;^UTILITY(U,$J,358.3,22663,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22663,1,3,0)
 ;;=3^Tubulo-Interstitial Nephritis
 ;;^UTILITY(U,$J,358.3,22663,1,4,0)
 ;;=4^N12.
 ;;^UTILITY(U,$J,358.3,22663,2)
 ;;=^5015575
 ;;^UTILITY(U,$J,358.3,22664,0)
 ;;=N11.9^^71^916^93
 ;;^UTILITY(U,$J,358.3,22664,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22664,1,3,0)
 ;;=3^Tubulo-Interstitial Nephritis,Chronic
 ;;^UTILITY(U,$J,358.3,22664,1,4,0)
 ;;=4^N11.9
 ;;^UTILITY(U,$J,358.3,22664,2)
 ;;=^5015574
 ;;^UTILITY(U,$J,358.3,22665,0)
 ;;=N13.6^^71^916^78
 ;;^UTILITY(U,$J,358.3,22665,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22665,1,3,0)
 ;;=3^Pyonephrosis
 ;;^UTILITY(U,$J,358.3,22665,1,4,0)
 ;;=4^N13.6
 ;;^UTILITY(U,$J,358.3,22665,2)
 ;;=^101552
 ;;^UTILITY(U,$J,358.3,22666,0)
 ;;=N30.91^^71^916^22
 ;;^UTILITY(U,$J,358.3,22666,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22666,1,3,0)
 ;;=3^Cystitis w/ Hematuria,Unspec
 ;;^UTILITY(U,$J,358.3,22666,1,4,0)
 ;;=4^N30.91
 ;;^UTILITY(U,$J,358.3,22666,2)
 ;;=^5015643
 ;;^UTILITY(U,$J,358.3,22667,0)
 ;;=N30.90^^71^916^23
 ;;^UTILITY(U,$J,358.3,22667,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22667,1,3,0)
 ;;=3^Cystitis w/o Hematuria,Unspec
 ;;^UTILITY(U,$J,358.3,22667,1,4,0)
 ;;=4^N30.90
 ;;^UTILITY(U,$J,358.3,22667,2)
 ;;=^5015642
 ;;^UTILITY(U,$J,358.3,22668,0)
 ;;=N41.9^^71^916^41
 ;;^UTILITY(U,$J,358.3,22668,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22668,1,3,0)
 ;;=3^Inflammatory Disease of Prostate,Unspec
 ;;^UTILITY(U,$J,358.3,22668,1,4,0)
 ;;=4^N41.9
 ;;^UTILITY(U,$J,358.3,22668,2)
 ;;=^5015694
 ;;^UTILITY(U,$J,358.3,22669,0)
 ;;=N70.91^^71^916^80
 ;;^UTILITY(U,$J,358.3,22669,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22669,1,3,0)
 ;;=3^Salpingitis,Unspec
 ;;^UTILITY(U,$J,358.3,22669,1,4,0)
 ;;=4^N70.91
 ;;^UTILITY(U,$J,358.3,22669,2)
 ;;=^5015806
 ;;^UTILITY(U,$J,358.3,22670,0)
 ;;=N70.93^^71^916^79
 ;;^UTILITY(U,$J,358.3,22670,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22670,1,3,0)
 ;;=3^Salpingitis & Oophoritis,Unspec
 ;;^UTILITY(U,$J,358.3,22670,1,4,0)
 ;;=4^N70.93
 ;;^UTILITY(U,$J,358.3,22670,2)
 ;;=^5015808
 ;;^UTILITY(U,$J,358.3,22671,0)
 ;;=N70.92^^71^916^58
 ;;^UTILITY(U,$J,358.3,22671,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22671,1,3,0)
 ;;=3^Oophoritis,Unspec
 ;;^UTILITY(U,$J,358.3,22671,1,4,0)
 ;;=4^N70.92
 ;;^UTILITY(U,$J,358.3,22671,2)
 ;;=^5015807
 ;;^UTILITY(U,$J,358.3,22672,0)
 ;;=N73.9^^71^916^40
 ;;^UTILITY(U,$J,358.3,22672,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22672,1,3,0)
 ;;=3^Inflammatory Disease Female Pelvic,Unspec
 ;;^UTILITY(U,$J,358.3,22672,1,4,0)
 ;;=4^N73.9
 ;;^UTILITY(U,$J,358.3,22672,2)
 ;;=^5015820
 ;;^UTILITY(U,$J,358.3,22673,0)
 ;;=A56.11^^71^916^39
 ;;^UTILITY(U,$J,358.3,22673,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22673,1,3,0)
 ;;=3^Inflammatory Disease Chlamydial Female Pelvic
 ;;^UTILITY(U,$J,358.3,22673,1,4,0)
 ;;=4^A56.11
 ;;^UTILITY(U,$J,358.3,22673,2)
 ;;=^5000342
 ;;^UTILITY(U,$J,358.3,22674,0)
 ;;=N73.5^^71^916^67
 ;;^UTILITY(U,$J,358.3,22674,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22674,1,3,0)
 ;;=3^Peritonitis Female Pelvic,Unspec
 ;;^UTILITY(U,$J,358.3,22674,1,4,0)
 ;;=4^N73.5
 ;;^UTILITY(U,$J,358.3,22674,2)
 ;;=^5015817
 ;;^UTILITY(U,$J,358.3,22675,0)
 ;;=N72.^^71^916^38
 ;;^UTILITY(U,$J,358.3,22675,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22675,1,3,0)
 ;;=3^Inflammatory Disease Cervix Uteri
 ;;^UTILITY(U,$J,358.3,22675,1,4,0)
 ;;=4^N72.
 ;;^UTILITY(U,$J,358.3,22675,2)
 ;;=^5015812
 ;;^UTILITY(U,$J,358.3,22676,0)
 ;;=N76.3^^71^916^99
 ;;^UTILITY(U,$J,358.3,22676,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22676,1,3,0)
 ;;=3^Vulvitis,Subacute & Chronic
 ;;^UTILITY(U,$J,358.3,22676,1,4,0)
 ;;=4^N76.3
 ;;^UTILITY(U,$J,358.3,22676,2)
 ;;=^5015829
 ;;^UTILITY(U,$J,358.3,22677,0)
 ;;=N76.1^^71^916^95
 ;;^UTILITY(U,$J,358.3,22677,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22677,1,3,0)
 ;;=3^Vaginitis,Subacute & Chronic
 ;;^UTILITY(U,$J,358.3,22677,1,4,0)
 ;;=4^N76.1
 ;;^UTILITY(U,$J,358.3,22677,2)
 ;;=^5015827
 ;;^UTILITY(U,$J,358.3,22678,0)
 ;;=N76.2^^71^916^98
 ;;^UTILITY(U,$J,358.3,22678,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22678,1,3,0)
 ;;=3^Vulvitis,Acute
 ;;^UTILITY(U,$J,358.3,22678,1,4,0)
 ;;=4^N76.2
 ;;^UTILITY(U,$J,358.3,22678,2)
 ;;=^5015828
 ;;^UTILITY(U,$J,358.3,22679,0)
 ;;=N76.0^^71^916^94
 ;;^UTILITY(U,$J,358.3,22679,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22679,1,3,0)
 ;;=3^Vaginitis,Acute
 ;;^UTILITY(U,$J,358.3,22679,1,4,0)
 ;;=4^N76.0
 ;;^UTILITY(U,$J,358.3,22679,2)
 ;;=^5015826
 ;;^UTILITY(U,$J,358.3,22680,0)
 ;;=M00.20^^71^916^3
 ;;^UTILITY(U,$J,358.3,22680,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22680,1,3,0)
 ;;=3^Arthritis Streptococcal,Unspec Joint
 ;;^UTILITY(U,$J,358.3,22680,1,4,0)
 ;;=4^M00.20
 ;;^UTILITY(U,$J,358.3,22680,2)
 ;;=^5009645
 ;;^UTILITY(U,$J,358.3,22681,0)
 ;;=M00.80^^71^916^4
 ;;^UTILITY(U,$J,358.3,22681,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22681,1,3,0)
 ;;=3^Arthritis d/t Bacteria,Unspec Joint
 ;;^UTILITY(U,$J,358.3,22681,1,4,0)
 ;;=4^M00.80
 ;;^UTILITY(U,$J,358.3,22681,2)
 ;;=^5009669
 ;;^UTILITY(U,$J,358.3,22682,0)
 ;;=M00.9^^71^916^77
 ;;^UTILITY(U,$J,358.3,22682,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22682,1,3,0)
 ;;=3^Pyogenic Arthritis,Unspec
 ;;^UTILITY(U,$J,358.3,22682,1,4,0)
 ;;=4^M00.9
 ;;^UTILITY(U,$J,358.3,22682,2)
 ;;=^5009693
 ;;^UTILITY(U,$J,358.3,22683,0)
 ;;=M00.00^^71^916^83
 ;;^UTILITY(U,$J,358.3,22683,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22683,1,3,0)
 ;;=3^Staphylococcal Arthritis,Unspec Joint
 ;;^UTILITY(U,$J,358.3,22683,1,4,0)
 ;;=4^M00.00
 ;;^UTILITY(U,$J,358.3,22683,2)
 ;;=^5009597
 ;;^UTILITY(U,$J,358.3,22684,0)
 ;;=M00.10^^71^916^69
 ;;^UTILITY(U,$J,358.3,22684,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22684,1,3,0)
 ;;=3^Pneumococcal Arthritis,Unspec Joint
 ;;^UTILITY(U,$J,358.3,22684,1,4,0)
 ;;=4^M00.10
 ;;^UTILITY(U,$J,358.3,22684,2)
 ;;=^5009621
 ;;^UTILITY(U,$J,358.3,22685,0)
 ;;=M86.20^^71^916^65
 ;;^UTILITY(U,$J,358.3,22685,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22685,1,3,0)
 ;;=3^Osteomyelitis,Subacute,Unspec Site
 ;;^UTILITY(U,$J,358.3,22685,1,4,0)
 ;;=4^M86.20
 ;;^UTILITY(U,$J,358.3,22685,2)
 ;;=^5014535
 ;;^UTILITY(U,$J,358.3,22686,0)
 ;;=M86.10^^71^916^61
 ;;^UTILITY(U,$J,358.3,22686,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22686,1,3,0)
 ;;=3^Osteomyelitis,Acute,Unspec Site
 ;;^UTILITY(U,$J,358.3,22686,1,4,0)
 ;;=4^M86.10
 ;;^UTILITY(U,$J,358.3,22686,2)
 ;;=^5014521
 ;;^UTILITY(U,$J,358.3,22687,0)
 ;;=M86.00^^71^916^60
 ;;^UTILITY(U,$J,358.3,22687,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22687,1,3,0)
 ;;=3^Osteomyelitis,Acute Hematogenous,Unspec Site
 ;;^UTILITY(U,$J,358.3,22687,1,4,0)
 ;;=4^M86.00
 ;;^UTILITY(U,$J,358.3,22687,2)
 ;;=^5014497
 ;;^UTILITY(U,$J,358.3,22688,0)
 ;;=M86.50^^71^916^62
 ;;^UTILITY(U,$J,358.3,22688,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22688,1,3,0)
 ;;=3^Osteomyelitis,Chronic Hematogenous,Unspec Site
 ;;^UTILITY(U,$J,358.3,22688,1,4,0)
 ;;=4^M86.50
 ;;^UTILITY(U,$J,358.3,22688,2)
 ;;=^5014607
 ;;^UTILITY(U,$J,358.3,22689,0)
 ;;=M86.30^^71^916^63
 ;;^UTILITY(U,$J,358.3,22689,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22689,1,3,0)
 ;;=3^Osteomyelitis,Chronic Multifocal,Unspec Site
 ;;^UTILITY(U,$J,358.3,22689,1,4,0)
 ;;=4^M86.30
 ;;^UTILITY(U,$J,358.3,22689,2)
 ;;=^5014559
 ;;^UTILITY(U,$J,358.3,22690,0)
 ;;=M86.8X9^^71^916^66
 ;;^UTILITY(U,$J,358.3,22690,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22690,1,3,0)
 ;;=3^Osteomyelitis,Unspec Sites
 ;;^UTILITY(U,$J,358.3,22690,1,4,0)
 ;;=4^M86.8X9
 ;;^UTILITY(U,$J,358.3,22690,2)
 ;;=^5014655
 ;;^UTILITY(U,$J,358.3,22691,0)
 ;;=M86.60^^71^916^64
 ;;^UTILITY(U,$J,358.3,22691,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22691,1,3,0)
 ;;=3^Osteomyelitis,Chronic,Unspec Site
 ;;^UTILITY(U,$J,358.3,22691,1,4,0)
 ;;=4^M86.60
 ;;^UTILITY(U,$J,358.3,22691,2)
 ;;=^5014630
 ;;^UTILITY(U,$J,358.3,22692,0)
 ;;=M86.40^^71^916^59
 ;;^UTILITY(U,$J,358.3,22692,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22692,1,3,0)
 ;;=3^Osteomyelitis w/ Draining Sinus,Chronic,Unspec Site
 ;;^UTILITY(U,$J,358.3,22692,1,4,0)
 ;;=4^M86.40
 ;;^UTILITY(U,$J,358.3,22692,2)
 ;;=^5014583
 ;;^UTILITY(U,$J,358.3,22693,0)
 ;;=R50.2^^71^916^26
 ;;^UTILITY(U,$J,358.3,22693,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22693,1,3,0)
 ;;=3^Fever,Drug-Induced