IBDEI0DU ; ; 03-MAY-2022
;;3.0;IB ENCOUNTER FORM IMP/EXP;;MAY 03, 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,34704,1,4,0)
;;=4^Z91.51
;;^UTILITY(U,$J,358.3,34704,2)
;;=^5161317
;;^UTILITY(U,$J,358.3,34705,0)
;;=A15.0^^105^1435^91
;;^UTILITY(U,$J,358.3,34705,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34705,1,3,0)
;;=3^Tuberculosis of Lung
;;^UTILITY(U,$J,358.3,34705,1,4,0)
;;=4^A15.0
;;^UTILITY(U,$J,358.3,34705,2)
;;=^5000062
;;^UTILITY(U,$J,358.3,34706,0)
;;=B20.^^105^1435^34
;;^UTILITY(U,$J,358.3,34706,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34706,1,3,0)
;;=3^HIV Disease
;;^UTILITY(U,$J,358.3,34706,1,4,0)
;;=4^B20.
;;^UTILITY(U,$J,358.3,34706,2)
;;=^5000555
;;^UTILITY(U,$J,358.3,34707,0)
;;=B02.9^^105^1435^100
;;^UTILITY(U,$J,358.3,34707,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34707,1,3,0)
;;=3^Zoster w/o Complications
;;^UTILITY(U,$J,358.3,34707,1,4,0)
;;=4^B02.9
;;^UTILITY(U,$J,358.3,34707,2)
;;=^5000501
;;^UTILITY(U,$J,358.3,34708,0)
;;=A60.9^^105^1435^2
;;^UTILITY(U,$J,358.3,34708,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34708,1,3,0)
;;=3^Anogenital Herpesviral Infection,Unspec
;;^UTILITY(U,$J,358.3,34708,1,4,0)
;;=4^A60.9
;;^UTILITY(U,$J,358.3,34708,2)
;;=^5000359
;;^UTILITY(U,$J,358.3,34709,0)
;;=A60.04^^105^1435^37
;;^UTILITY(U,$J,358.3,34709,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34709,1,3,0)
;;=3^Herpesviral Vulvovaginitis
;;^UTILITY(U,$J,358.3,34709,1,4,0)
;;=4^A60.04
;;^UTILITY(U,$J,358.3,34709,2)
;;=^5000356
;;^UTILITY(U,$J,358.3,34710,0)
;;=A60.01^^105^1435^35
;;^UTILITY(U,$J,358.3,34710,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34710,1,3,0)
;;=3^Herpesviral Infection of Penis
;;^UTILITY(U,$J,358.3,34710,1,4,0)
;;=4^A60.01
;;^UTILITY(U,$J,358.3,34710,2)
;;=^5000353
;;^UTILITY(U,$J,358.3,34711,0)
;;=B00.1^^105^1435^36
;;^UTILITY(U,$J,358.3,34711,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34711,1,3,0)
;;=3^Herpesviral Vesicular Dermatitis
;;^UTILITY(U,$J,358.3,34711,1,4,0)
;;=4^B00.1
;;^UTILITY(U,$J,358.3,34711,2)
;;=^5000468
;;^UTILITY(U,$J,358.3,34712,0)
;;=B97.89^^105^1435^96
;;^UTILITY(U,$J,358.3,34712,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34712,1,3,0)
;;=3^Viral Agent Cause of Disease
;;^UTILITY(U,$J,358.3,34712,1,4,0)
;;=4^B97.89
;;^UTILITY(U,$J,358.3,34712,2)
;;=^5000879
;;^UTILITY(U,$J,358.3,34713,0)
;;=B97.10^^105^1435^24
;;^UTILITY(U,$J,358.3,34713,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34713,1,3,0)
;;=3^Enterovirus Cause of Disease
;;^UTILITY(U,$J,358.3,34713,1,4,0)
;;=4^B97.10
;;^UTILITY(U,$J,358.3,34713,2)
;;=^5000861
;;^UTILITY(U,$J,358.3,34714,0)
;;=B34.9^^105^1435^97
;;^UTILITY(U,$J,358.3,34714,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34714,1,3,0)
;;=3^Viral Infection,Unspec
;;^UTILITY(U,$J,358.3,34714,1,4,0)
;;=4^B34.9
;;^UTILITY(U,$J,358.3,34714,2)
;;=^5000603
;;^UTILITY(U,$J,358.3,34715,0)
;;=A69.20^^105^1435^53
;;^UTILITY(U,$J,358.3,34715,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34715,1,3,0)
;;=3^Lyme Disease,Unspec
;;^UTILITY(U,$J,358.3,34715,1,4,0)
;;=4^A69.20
;;^UTILITY(U,$J,358.3,34715,2)
;;=^5000375
;;^UTILITY(U,$J,358.3,34716,0)
;;=A69.22^^105^1435^55
;;^UTILITY(U,$J,358.3,34716,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34716,1,3,0)
;;=3^Neurologic Disorders d/t Lyme Disease
;;^UTILITY(U,$J,358.3,34716,1,4,0)
;;=4^A69.22
;;^UTILITY(U,$J,358.3,34716,2)
;;=^5000377
;;^UTILITY(U,$J,358.3,34717,0)
;;=A69.21^^105^1435^54
;;^UTILITY(U,$J,358.3,34717,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34717,1,3,0)
;;=3^Meningitis d/t Lyme Disease
;;^UTILITY(U,$J,358.3,34717,1,4,0)
;;=4^A69.21
;;^UTILITY(U,$J,358.3,34717,2)
;;=^5000376
;;^UTILITY(U,$J,358.3,34718,0)
;;=A69.29^^105^1435^20
;;^UTILITY(U,$J,358.3,34718,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34718,1,3,0)
;;=3^Conditions d/t Lyme Disease
;;^UTILITY(U,$J,358.3,34718,1,4,0)
;;=4^A69.29
;;^UTILITY(U,$J,358.3,34718,2)
;;=^5000379
;;^UTILITY(U,$J,358.3,34719,0)
;;=A69.23^^105^1435^5
;;^UTILITY(U,$J,358.3,34719,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34719,1,3,0)
;;=3^Arthritis d/t Lyme Disease
;;^UTILITY(U,$J,358.3,34719,1,4,0)
;;=4^A69.23
;;^UTILITY(U,$J,358.3,34719,2)
;;=^5000378
;;^UTILITY(U,$J,358.3,34720,0)
;;=A51.0^^105^1435^32
;;^UTILITY(U,$J,358.3,34720,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34720,1,3,0)
;;=3^Genital Syphilis,Primary
;;^UTILITY(U,$J,358.3,34720,1,4,0)
;;=4^A51.0
;;^UTILITY(U,$J,358.3,34720,2)
;;=^5000272
;;^UTILITY(U,$J,358.3,34721,0)
;;=A52.3^^105^1435^57
;;^UTILITY(U,$J,358.3,34721,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34721,1,3,0)
;;=3^Neurosyphilis,Unspec
;;^UTILITY(U,$J,358.3,34721,1,4,0)
;;=4^A52.3
;;^UTILITY(U,$J,358.3,34721,2)
;;=^5000298
;;^UTILITY(U,$J,358.3,34722,0)
;;=A52.10^^105^1435^56
;;^UTILITY(U,$J,358.3,34722,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34722,1,3,0)
;;=3^Neurosyphilis Symptomatic,Unspec
;;^UTILITY(U,$J,358.3,34722,1,4,0)
;;=4^A52.10
;;^UTILITY(U,$J,358.3,34722,2)
;;=^5000291
;;^UTILITY(U,$J,358.3,34723,0)
;;=A52.9^^105^1435^52
;;^UTILITY(U,$J,358.3,34723,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34723,1,3,0)
;;=3^Late Syphilis,Unspec
;;^UTILITY(U,$J,358.3,34723,1,4,0)
;;=4^A52.9
;;^UTILITY(U,$J,358.3,34723,2)
;;=^5000308
;;^UTILITY(U,$J,358.3,34724,0)
;;=A53.9^^105^1435^84
;;^UTILITY(U,$J,358.3,34724,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34724,1,3,0)
;;=3^Syphilis,Unspec
;;^UTILITY(U,$J,358.3,34724,1,4,0)
;;=4^A53.9
;;^UTILITY(U,$J,358.3,34724,2)
;;=^5000310
;;^UTILITY(U,$J,358.3,34725,0)
;;=B37.3^^105^1435^19
;;^UTILITY(U,$J,358.3,34725,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34725,1,3,0)
;;=3^Candidiasis Vulva/Vagina
;;^UTILITY(U,$J,358.3,34725,1,4,0)
;;=4^B37.3
;;^UTILITY(U,$J,358.3,34725,2)
;;=^5000615
;;^UTILITY(U,$J,358.3,34726,0)
;;=B58.9^^105^1435^89
;;^UTILITY(U,$J,358.3,34726,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34726,1,3,0)
;;=3^Toxoplasmosis,Unspec
;;^UTILITY(U,$J,358.3,34726,1,4,0)
;;=4^B58.9
;;^UTILITY(U,$J,358.3,34726,2)
;;=^5000733
;;^UTILITY(U,$J,358.3,34727,0)
;;=A59.01^^105^1435^90
;;^UTILITY(U,$J,358.3,34727,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34727,1,3,0)
;;=3^Trichomonal Vulvovaginitis
;;^UTILITY(U,$J,358.3,34727,1,4,0)
;;=4^A59.01
;;^UTILITY(U,$J,358.3,34727,2)
;;=^121763
;;^UTILITY(U,$J,358.3,34728,0)
;;=B59.^^105^1435^70
;;^UTILITY(U,$J,358.3,34728,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34728,1,3,0)
;;=3^Pneumocystosis
;;^UTILITY(U,$J,358.3,34728,1,4,0)
;;=4^B59.
;;^UTILITY(U,$J,358.3,34728,2)
;;=^5000734
;;^UTILITY(U,$J,358.3,34729,0)
;;=H83.09^^105^1435^51
;;^UTILITY(U,$J,358.3,34729,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34729,1,3,0)
;;=3^Labyrinthitis,Unspec Ear
;;^UTILITY(U,$J,358.3,34729,1,4,0)
;;=4^H83.09
;;^UTILITY(U,$J,358.3,34729,2)
;;=^5006897
;;^UTILITY(U,$J,358.3,34730,0)
;;=H83.01^^105^1435^50
;;^UTILITY(U,$J,358.3,34730,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34730,1,3,0)
;;=3^Labyrinthitis,Right Ear
;;^UTILITY(U,$J,358.3,34730,1,4,0)
;;=4^H83.01
;;^UTILITY(U,$J,358.3,34730,2)
;;=^5006894
;;^UTILITY(U,$J,358.3,34731,0)
;;=H83.03^^105^1435^48
;;^UTILITY(U,$J,358.3,34731,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34731,1,3,0)
;;=3^Labyrinthitis,Bilateral
;;^UTILITY(U,$J,358.3,34731,1,4,0)
;;=4^H83.03
;;^UTILITY(U,$J,358.3,34731,2)
;;=^5006896
;;^UTILITY(U,$J,358.3,34732,0)
;;=H83.02^^105^1435^49
;;^UTILITY(U,$J,358.3,34732,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34732,1,3,0)
;;=3^Labyrinthitis,Left Ear
;;^UTILITY(U,$J,358.3,34732,1,4,0)
;;=4^H83.02
;;^UTILITY(U,$J,358.3,34732,2)
;;=^5006895
;;^UTILITY(U,$J,358.3,34733,0)
;;=J01.91^^105^1435^81
;;^UTILITY(U,$J,358.3,34733,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34733,1,3,0)
;;=3^Sinusitis,Acute Recurrent Unspec
;;^UTILITY(U,$J,358.3,34733,1,4,0)
;;=4^J01.91
;;^UTILITY(U,$J,358.3,34733,2)
;;=^5008128
;;^UTILITY(U,$J,358.3,34734,0)
;;=J03.90^^105^1435^88
;;^UTILITY(U,$J,358.3,34734,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34734,1,3,0)
;;=3^Tonsillitis,Acute Unspec
;;^UTILITY(U,$J,358.3,34734,1,4,0)
;;=4^J03.90
;;^UTILITY(U,$J,358.3,34734,2)
;;=^5008135
;;^UTILITY(U,$J,358.3,34735,0)
;;=J01.90^^105^1435^82
;;^UTILITY(U,$J,358.3,34735,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34735,1,3,0)
;;=3^Sinusitis,Acute Unspec
;;^UTILITY(U,$J,358.3,34735,1,4,0)
;;=4^J01.90
;;^UTILITY(U,$J,358.3,34735,2)
;;=^5008127
;;^UTILITY(U,$J,358.3,34736,0)
;;=J20.1^^105^1435^10
;;^UTILITY(U,$J,358.3,34736,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34736,1,3,0)
;;=3^Bronchitis,Acute d/t Hemophilus Influenza
;;^UTILITY(U,$J,358.3,34736,1,4,0)
;;=4^J20.1
;;^UTILITY(U,$J,358.3,34736,2)
;;=^5008187
;;^UTILITY(U,$J,358.3,34737,0)
;;=J20.0^^105^1435^11
;;^UTILITY(U,$J,358.3,34737,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34737,1,3,0)
;;=3^Bronchitis,Acute d/t Mycoplasma Pneumonia
;;^UTILITY(U,$J,358.3,34737,1,4,0)
;;=4^J20.0
;;^UTILITY(U,$J,358.3,34737,2)
;;=^5008186
;;^UTILITY(U,$J,358.3,34738,0)
;;=J20.2^^105^1435^6
;;^UTILITY(U,$J,358.3,34738,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34738,1,3,0)
;;=3^Bonchitis,Acute d/t Streptococcus
;;^UTILITY(U,$J,358.3,34738,1,4,0)
;;=4^J20.2
;;^UTILITY(U,$J,358.3,34738,2)
;;=^5008188
;;^UTILITY(U,$J,358.3,34739,0)
;;=J20.4^^105^1435^13
;;^UTILITY(U,$J,358.3,34739,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34739,1,3,0)
;;=3^Bronchitis,Acute d/t Parainfluenza Virus
;;^UTILITY(U,$J,358.3,34739,1,4,0)
;;=4^J20.4
;;^UTILITY(U,$J,358.3,34739,2)
;;=^5008190
;;^UTILITY(U,$J,358.3,34740,0)
;;=J20.3^^105^1435^8
;;^UTILITY(U,$J,358.3,34740,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34740,1,3,0)
;;=3^Bronchitis,Acute d/t Coxsackievirus
;;^UTILITY(U,$J,358.3,34740,1,4,0)
;;=4^J20.3
;;^UTILITY(U,$J,358.3,34740,2)
;;=^5008189
;;^UTILITY(U,$J,358.3,34741,0)
;;=J20.9^^105^1435^7
;;^UTILITY(U,$J,358.3,34741,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34741,1,3,0)
;;=3^Bronchitis,Acute Unspec
;;^UTILITY(U,$J,358.3,34741,1,4,0)
;;=4^J20.9
;;^UTILITY(U,$J,358.3,34741,2)
;;=^5008195
;;^UTILITY(U,$J,358.3,34742,0)
;;=J20.8^^105^1435^12
;;^UTILITY(U,$J,358.3,34742,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34742,1,3,0)
;;=3^Bronchitis,Acute d/t Oth Spec Organisms
;;^UTILITY(U,$J,358.3,34742,1,4,0)
;;=4^J20.8
;;^UTILITY(U,$J,358.3,34742,2)
;;=^5008194
;;^UTILITY(U,$J,358.3,34743,0)
;;=J20.5^^105^1435^14
;;^UTILITY(U,$J,358.3,34743,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34743,1,3,0)
;;=3^Bronchitis,Acute d/t Respiratory Syncytial Virus
;;^UTILITY(U,$J,358.3,34743,1,4,0)
;;=4^J20.5
;;^UTILITY(U,$J,358.3,34743,2)
;;=^5008191
;;^UTILITY(U,$J,358.3,34744,0)
;;=J20.7^^105^1435^9
;;^UTILITY(U,$J,358.3,34744,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34744,1,3,0)
;;=3^Bronchitis,Acute d/t Echovirus
;;^UTILITY(U,$J,358.3,34744,1,4,0)
;;=4^J20.7
;;^UTILITY(U,$J,358.3,34744,2)
;;=^5008193
;;^UTILITY(U,$J,358.3,34745,0)
;;=J20.6^^105^1435^15
;;^UTILITY(U,$J,358.3,34745,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34745,1,3,0)
;;=3^Bronchitis,Acute d/t Rhinovirus
;;^UTILITY(U,$J,358.3,34745,1,4,0)
;;=4^J20.6
;;^UTILITY(U,$J,358.3,34745,2)
;;=^5008192
;;^UTILITY(U,$J,358.3,34746,0)
;;=J18.9^^105^1435^71
;;^UTILITY(U,$J,358.3,34746,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34746,1,3,0)
;;=3^Pneumonia,Unspec Organism
;;^UTILITY(U,$J,358.3,34746,1,4,0)
;;=4^J18.9
;;^UTILITY(U,$J,358.3,34746,2)
;;=^95632
;;^UTILITY(U,$J,358.3,34747,0)
;;=J18.8^^105^1435^72
;;^UTILITY(U,$J,358.3,34747,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34747,1,3,0)
;;=3^Pneumonia,Unspec Organism NEC
;;^UTILITY(U,$J,358.3,34747,1,4,0)
;;=4^J18.8
;;^UTILITY(U,$J,358.3,34747,2)
;;=^5008185
;;^UTILITY(U,$J,358.3,34748,0)
;;=J11.00^^105^1435^31
;;^UTILITY(U,$J,358.3,34748,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34748,1,3,0)
;;=3^Flu d/t Unidentified Flu Virus w/ Unspec Type Pneumonia
;;^UTILITY(U,$J,358.3,34748,1,4,0)
;;=4^J11.00
;;^UTILITY(U,$J,358.3,34748,2)
;;=^5008156
;;^UTILITY(U,$J,358.3,34749,0)
;;=J12.9^^105^1435^73
;;^UTILITY(U,$J,358.3,34749,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34749,1,3,0)
;;=3^Pneumonia,Viral Unspec
;;^UTILITY(U,$J,358.3,34749,1,4,0)
;;=4^J12.9
;;^UTILITY(U,$J,358.3,34749,2)
;;=^5008169
;;^UTILITY(U,$J,358.3,34750,0)
;;=J10.08^^105^1435^44
;;^UTILITY(U,$J,358.3,34750,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34750,1,3,0)
;;=3^Influenza d/t Oth ID'd Influenza Virus w/ Oth Pneumonia
;;^UTILITY(U,$J,358.3,34750,1,4,0)
;;=4^J10.08
;;^UTILITY(U,$J,358.3,34750,2)
;;=^5008150
;;^UTILITY(U,$J,358.3,34751,0)
;;=J10.00^^105^1435^43
;;^UTILITY(U,$J,358.3,34751,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34751,1,3,0)
;;=3^Influenza d/t Oth ID'd Flu Virus w/ Unspec Type Pneumonia
;;^UTILITY(U,$J,358.3,34751,1,4,0)
;;=4^J10.00
;;^UTILITY(U,$J,358.3,34751,2)
;;=^5008148
;;^UTILITY(U,$J,358.3,34752,0)
;;=J11.08^^105^1435^46
;;^UTILITY(U,$J,358.3,34752,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34752,1,3,0)
;;=3^Influenza d/t Unident Flu Virus w/ Spec Pneumonia
;;^UTILITY(U,$J,358.3,34752,1,4,0)
;;=4^J11.08
;;^UTILITY(U,$J,358.3,34752,2)
;;=^5008157
;;^UTILITY(U,$J,358.3,34753,0)
;;=J10.1^^105^1435^45
;;^UTILITY(U,$J,358.3,34753,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34753,1,3,0)
;;=3^Influenza d/t Oth ID'd Influenza Virus w/ Oth Resp Manifest
;;^UTILITY(U,$J,358.3,34753,1,4,0)
;;=4^J10.1
;;^UTILITY(U,$J,358.3,34753,2)
;;=^5008151
;;^UTILITY(U,$J,358.3,34754,0)
;;=J10.01^^105^1435^42
;;^UTILITY(U,$J,358.3,34754,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34754,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,34754,1,4,0)
;;=4^J10.01
;;^UTILITY(U,$J,358.3,34754,2)
;;=^5008149
;;^UTILITY(U,$J,358.3,34755,0)
;;=J11.1^^105^1435^47
;;^UTILITY(U,$J,358.3,34755,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34755,1,3,0)
;;=3^Influenza d/t Unident Influenza Virus w/ Oth Resp Manifest
;;^UTILITY(U,$J,358.3,34755,1,4,0)
;;=4^J11.1
;;^UTILITY(U,$J,358.3,34755,2)
;;=^5008158
;;^UTILITY(U,$J,358.3,34756,0)
;;=N12.^^105^1435^92
;;^UTILITY(U,$J,358.3,34756,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34756,1,3,0)
;;=3^Tubulo-Interstitial Nephritis
;;^UTILITY(U,$J,358.3,34756,1,4,0)
;;=4^N12.
;;^UTILITY(U,$J,358.3,34756,2)
;;=^5015575
;;^UTILITY(U,$J,358.3,34757,0)
;;=N11.9^^105^1435^93
;;^UTILITY(U,$J,358.3,34757,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34757,1,3,0)
;;=3^Tubulo-Interstitial Nephritis,Chronic
;;^UTILITY(U,$J,358.3,34757,1,4,0)
;;=4^N11.9
;;^UTILITY(U,$J,358.3,34757,2)
;;=^5015574
;;^UTILITY(U,$J,358.3,34758,0)
;;=N13.6^^105^1435^78
;;^UTILITY(U,$J,358.3,34758,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34758,1,3,0)
;;=3^Pyonephrosis
;;^UTILITY(U,$J,358.3,34758,1,4,0)
;;=4^N13.6
;;^UTILITY(U,$J,358.3,34758,2)
;;=^101552
;;^UTILITY(U,$J,358.3,34759,0)
;;=N30.91^^105^1435^22
;;^UTILITY(U,$J,358.3,34759,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34759,1,3,0)
;;=3^Cystitis w/ Hematuria,Unspec
;;^UTILITY(U,$J,358.3,34759,1,4,0)
;;=4^N30.91
;;^UTILITY(U,$J,358.3,34759,2)
;;=^5015643
;;^UTILITY(U,$J,358.3,34760,0)
;;=N30.90^^105^1435^23
;;^UTILITY(U,$J,358.3,34760,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34760,1,3,0)
;;=3^Cystitis w/o Hematuria,Unspec
;;^UTILITY(U,$J,358.3,34760,1,4,0)
;;=4^N30.90
;;^UTILITY(U,$J,358.3,34760,2)
;;=^5015642
;;^UTILITY(U,$J,358.3,34761,0)
;;=N41.9^^105^1435^41
;;^UTILITY(U,$J,358.3,34761,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34761,1,3,0)
;;=3^Inflammatory Disease of Prostate,Unspec
;;^UTILITY(U,$J,358.3,34761,1,4,0)
;;=4^N41.9
;;^UTILITY(U,$J,358.3,34761,2)
;;=^5015694
;;^UTILITY(U,$J,358.3,34762,0)
;;=N70.91^^105^1435^80
;;^UTILITY(U,$J,358.3,34762,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34762,1,3,0)
;;=3^Salpingitis,Unspec
;;^UTILITY(U,$J,358.3,34762,1,4,0)
;;=4^N70.91
;;^UTILITY(U,$J,358.3,34762,2)
;;=^5015806
;;^UTILITY(U,$J,358.3,34763,0)
;;=N70.93^^105^1435^79
;;^UTILITY(U,$J,358.3,34763,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34763,1,3,0)
;;=3^Salpingitis & Oophoritis,Unspec
;;^UTILITY(U,$J,358.3,34763,1,4,0)
;;=4^N70.93
;;^UTILITY(U,$J,358.3,34763,2)
;;=^5015808
;;^UTILITY(U,$J,358.3,34764,0)
;;=N70.92^^105^1435^58
;;^UTILITY(U,$J,358.3,34764,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34764,1,3,0)
;;=3^Oophoritis,Unspec
;;^UTILITY(U,$J,358.3,34764,1,4,0)
;;=4^N70.92
;;^UTILITY(U,$J,358.3,34764,2)
;;=^5015807
;;^UTILITY(U,$J,358.3,34765,0)
;;=N73.9^^105^1435^40
;;^UTILITY(U,$J,358.3,34765,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34765,1,3,0)
;;=3^Inflammatory Disease Female Pelvic,Unspec
;;^UTILITY(U,$J,358.3,34765,1,4,0)
;;=4^N73.9
;;^UTILITY(U,$J,358.3,34765,2)
;;=^5015820
;;^UTILITY(U,$J,358.3,34766,0)
;;=A56.11^^105^1435^39
;;^UTILITY(U,$J,358.3,34766,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34766,1,3,0)
;;=3^Inflammatory Disease Chlamydial Female Pelvic
;;^UTILITY(U,$J,358.3,34766,1,4,0)
;;=4^A56.11
;;^UTILITY(U,$J,358.3,34766,2)
;;=^5000342
;;^UTILITY(U,$J,358.3,34767,0)
;;=N73.5^^105^1435^67
;;^UTILITY(U,$J,358.3,34767,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34767,1,3,0)
;;=3^Peritonitis Female Pelvic,Unspec
;;^UTILITY(U,$J,358.3,34767,1,4,0)
;;=4^N73.5
;;^UTILITY(U,$J,358.3,34767,2)
;;=^5015817
;;^UTILITY(U,$J,358.3,34768,0)
;;=N72.^^105^1435^38
;;^UTILITY(U,$J,358.3,34768,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34768,1,3,0)
;;=3^Inflammatory Disease Cervix Uteri
;;^UTILITY(U,$J,358.3,34768,1,4,0)
;;=4^N72.
;;^UTILITY(U,$J,358.3,34768,2)
;;=^5015812
;;^UTILITY(U,$J,358.3,34769,0)
;;=N76.3^^105^1435^99
;;^UTILITY(U,$J,358.3,34769,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34769,1,3,0)
;;=3^Vulvitis,Subacute & Chronic
;;^UTILITY(U,$J,358.3,34769,1,4,0)
;;=4^N76.3
;;^UTILITY(U,$J,358.3,34769,2)
;;=^5015829
;;^UTILITY(U,$J,358.3,34770,0)
;;=N76.1^^105^1435^95
;;^UTILITY(U,$J,358.3,34770,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34770,1,3,0)
;;=3^Vaginitis,Subacute & Chronic
;;^UTILITY(U,$J,358.3,34770,1,4,0)
;;=4^N76.1
;;^UTILITY(U,$J,358.3,34770,2)
;;=^5015827
;;^UTILITY(U,$J,358.3,34771,0)
;;=N76.2^^105^1435^98
;;^UTILITY(U,$J,358.3,34771,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34771,1,3,0)
;;=3^Vulvitis,Acute
;;^UTILITY(U,$J,358.3,34771,1,4,0)
;;=4^N76.2
;;^UTILITY(U,$J,358.3,34771,2)
;;=^5015828
;;^UTILITY(U,$J,358.3,34772,0)
;;=N76.0^^105^1435^94
;;^UTILITY(U,$J,358.3,34772,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34772,1,3,0)
;;=3^Vaginitis,Acute
;;^UTILITY(U,$J,358.3,34772,1,4,0)
;;=4^N76.0
;;^UTILITY(U,$J,358.3,34772,2)
;;=^5015826
;;^UTILITY(U,$J,358.3,34773,0)
;;=M00.20^^105^1435^3
;;^UTILITY(U,$J,358.3,34773,1,0)
;;=^358.31IA^4^2
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HIBDEI0DU 19785 printed Nov 22, 2024@16:56:56 Page 2
IBDEI0DU ; ; 03-MAY-2022
+1 ;;3.0;IB ENCOUNTER FORM IMP/EXP;;MAY 03, 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,34704,1,4,0)
+2 ;;=4^Z91.51
+3 ;;^UTILITY(U,$J,358.3,34704,2)
+4 ;;=^5161317
+5 ;;^UTILITY(U,$J,358.3,34705,0)
+6 ;;=A15.0^^105^1435^91
+7 ;;^UTILITY(U,$J,358.3,34705,1,0)
+8 ;;=^358.31IA^4^2
+9 ;;^UTILITY(U,$J,358.3,34705,1,3,0)
+10 ;;=3^Tuberculosis of Lung
+11 ;;^UTILITY(U,$J,358.3,34705,1,4,0)
+12 ;;=4^A15.0
+13 ;;^UTILITY(U,$J,358.3,34705,2)
+14 ;;=^5000062
+15 ;;^UTILITY(U,$J,358.3,34706,0)
+16 ;;=B20.^^105^1435^34
+17 ;;^UTILITY(U,$J,358.3,34706,1,0)
+18 ;;=^358.31IA^4^2
+19 ;;^UTILITY(U,$J,358.3,34706,1,3,0)
+20 ;;=3^HIV Disease
+21 ;;^UTILITY(U,$J,358.3,34706,1,4,0)
+22 ;;=4^B20.
+23 ;;^UTILITY(U,$J,358.3,34706,2)
+24 ;;=^5000555
+25 ;;^UTILITY(U,$J,358.3,34707,0)
+26 ;;=B02.9^^105^1435^100
+27 ;;^UTILITY(U,$J,358.3,34707,1,0)
+28 ;;=^358.31IA^4^2
+29 ;;^UTILITY(U,$J,358.3,34707,1,3,0)
+30 ;;=3^Zoster w/o Complications
+31 ;;^UTILITY(U,$J,358.3,34707,1,4,0)
+32 ;;=4^B02.9
+33 ;;^UTILITY(U,$J,358.3,34707,2)
+34 ;;=^5000501
+35 ;;^UTILITY(U,$J,358.3,34708,0)
+36 ;;=A60.9^^105^1435^2
+37 ;;^UTILITY(U,$J,358.3,34708,1,0)
+38 ;;=^358.31IA^4^2
+39 ;;^UTILITY(U,$J,358.3,34708,1,3,0)
+40 ;;=3^Anogenital Herpesviral Infection,Unspec
+41 ;;^UTILITY(U,$J,358.3,34708,1,4,0)
+42 ;;=4^A60.9
+43 ;;^UTILITY(U,$J,358.3,34708,2)
+44 ;;=^5000359
+45 ;;^UTILITY(U,$J,358.3,34709,0)
+46 ;;=A60.04^^105^1435^37
+47 ;;^UTILITY(U,$J,358.3,34709,1,0)
+48 ;;=^358.31IA^4^2
+49 ;;^UTILITY(U,$J,358.3,34709,1,3,0)
+50 ;;=3^Herpesviral Vulvovaginitis
+51 ;;^UTILITY(U,$J,358.3,34709,1,4,0)
+52 ;;=4^A60.04
+53 ;;^UTILITY(U,$J,358.3,34709,2)
+54 ;;=^5000356
+55 ;;^UTILITY(U,$J,358.3,34710,0)
+56 ;;=A60.01^^105^1435^35
+57 ;;^UTILITY(U,$J,358.3,34710,1,0)
+58 ;;=^358.31IA^4^2
+59 ;;^UTILITY(U,$J,358.3,34710,1,3,0)
+60 ;;=3^Herpesviral Infection of Penis
+61 ;;^UTILITY(U,$J,358.3,34710,1,4,0)
+62 ;;=4^A60.01
+63 ;;^UTILITY(U,$J,358.3,34710,2)
+64 ;;=^5000353
+65 ;;^UTILITY(U,$J,358.3,34711,0)
+66 ;;=B00.1^^105^1435^36
+67 ;;^UTILITY(U,$J,358.3,34711,1,0)
+68 ;;=^358.31IA^4^2
+69 ;;^UTILITY(U,$J,358.3,34711,1,3,0)
+70 ;;=3^Herpesviral Vesicular Dermatitis
+71 ;;^UTILITY(U,$J,358.3,34711,1,4,0)
+72 ;;=4^B00.1
+73 ;;^UTILITY(U,$J,358.3,34711,2)
+74 ;;=^5000468
+75 ;;^UTILITY(U,$J,358.3,34712,0)
+76 ;;=B97.89^^105^1435^96
+77 ;;^UTILITY(U,$J,358.3,34712,1,0)
+78 ;;=^358.31IA^4^2
+79 ;;^UTILITY(U,$J,358.3,34712,1,3,0)
+80 ;;=3^Viral Agent Cause of Disease
+81 ;;^UTILITY(U,$J,358.3,34712,1,4,0)
+82 ;;=4^B97.89
+83 ;;^UTILITY(U,$J,358.3,34712,2)
+84 ;;=^5000879
+85 ;;^UTILITY(U,$J,358.3,34713,0)
+86 ;;=B97.10^^105^1435^24
+87 ;;^UTILITY(U,$J,358.3,34713,1,0)
+88 ;;=^358.31IA^4^2
+89 ;;^UTILITY(U,$J,358.3,34713,1,3,0)
+90 ;;=3^Enterovirus Cause of Disease
+91 ;;^UTILITY(U,$J,358.3,34713,1,4,0)
+92 ;;=4^B97.10
+93 ;;^UTILITY(U,$J,358.3,34713,2)
+94 ;;=^5000861
+95 ;;^UTILITY(U,$J,358.3,34714,0)
+96 ;;=B34.9^^105^1435^97
+97 ;;^UTILITY(U,$J,358.3,34714,1,0)
+98 ;;=^358.31IA^4^2
+99 ;;^UTILITY(U,$J,358.3,34714,1,3,0)
+100 ;;=3^Viral Infection,Unspec
+101 ;;^UTILITY(U,$J,358.3,34714,1,4,0)
+102 ;;=4^B34.9
+103 ;;^UTILITY(U,$J,358.3,34714,2)
+104 ;;=^5000603
+105 ;;^UTILITY(U,$J,358.3,34715,0)
+106 ;;=A69.20^^105^1435^53
+107 ;;^UTILITY(U,$J,358.3,34715,1,0)
+108 ;;=^358.31IA^4^2
+109 ;;^UTILITY(U,$J,358.3,34715,1,3,0)
+110 ;;=3^Lyme Disease,Unspec
+111 ;;^UTILITY(U,$J,358.3,34715,1,4,0)
+112 ;;=4^A69.20
+113 ;;^UTILITY(U,$J,358.3,34715,2)
+114 ;;=^5000375
+115 ;;^UTILITY(U,$J,358.3,34716,0)
+116 ;;=A69.22^^105^1435^55
+117 ;;^UTILITY(U,$J,358.3,34716,1,0)
+118 ;;=^358.31IA^4^2
+119 ;;^UTILITY(U,$J,358.3,34716,1,3,0)
+120 ;;=3^Neurologic Disorders d/t Lyme Disease
+121 ;;^UTILITY(U,$J,358.3,34716,1,4,0)
+122 ;;=4^A69.22
+123 ;;^UTILITY(U,$J,358.3,34716,2)
+124 ;;=^5000377
+125 ;;^UTILITY(U,$J,358.3,34717,0)
+126 ;;=A69.21^^105^1435^54
+127 ;;^UTILITY(U,$J,358.3,34717,1,0)
+128 ;;=^358.31IA^4^2
+129 ;;^UTILITY(U,$J,358.3,34717,1,3,0)
+130 ;;=3^Meningitis d/t Lyme Disease
+131 ;;^UTILITY(U,$J,358.3,34717,1,4,0)
+132 ;;=4^A69.21
+133 ;;^UTILITY(U,$J,358.3,34717,2)
+134 ;;=^5000376
+135 ;;^UTILITY(U,$J,358.3,34718,0)
+136 ;;=A69.29^^105^1435^20
+137 ;;^UTILITY(U,$J,358.3,34718,1,0)
+138 ;;=^358.31IA^4^2
+139 ;;^UTILITY(U,$J,358.3,34718,1,3,0)
+140 ;;=3^Conditions d/t Lyme Disease
+141 ;;^UTILITY(U,$J,358.3,34718,1,4,0)
+142 ;;=4^A69.29
+143 ;;^UTILITY(U,$J,358.3,34718,2)
+144 ;;=^5000379
+145 ;;^UTILITY(U,$J,358.3,34719,0)
+146 ;;=A69.23^^105^1435^5
+147 ;;^UTILITY(U,$J,358.3,34719,1,0)
+148 ;;=^358.31IA^4^2
+149 ;;^UTILITY(U,$J,358.3,34719,1,3,0)
+150 ;;=3^Arthritis d/t Lyme Disease
+151 ;;^UTILITY(U,$J,358.3,34719,1,4,0)
+152 ;;=4^A69.23
+153 ;;^UTILITY(U,$J,358.3,34719,2)
+154 ;;=^5000378
+155 ;;^UTILITY(U,$J,358.3,34720,0)
+156 ;;=A51.0^^105^1435^32
+157 ;;^UTILITY(U,$J,358.3,34720,1,0)
+158 ;;=^358.31IA^4^2
+159 ;;^UTILITY(U,$J,358.3,34720,1,3,0)
+160 ;;=3^Genital Syphilis,Primary
+161 ;;^UTILITY(U,$J,358.3,34720,1,4,0)
+162 ;;=4^A51.0
+163 ;;^UTILITY(U,$J,358.3,34720,2)
+164 ;;=^5000272
+165 ;;^UTILITY(U,$J,358.3,34721,0)
+166 ;;=A52.3^^105^1435^57
+167 ;;^UTILITY(U,$J,358.3,34721,1,0)
+168 ;;=^358.31IA^4^2
+169 ;;^UTILITY(U,$J,358.3,34721,1,3,0)
+170 ;;=3^Neurosyphilis,Unspec
+171 ;;^UTILITY(U,$J,358.3,34721,1,4,0)
+172 ;;=4^A52.3
+173 ;;^UTILITY(U,$J,358.3,34721,2)
+174 ;;=^5000298
+175 ;;^UTILITY(U,$J,358.3,34722,0)
+176 ;;=A52.10^^105^1435^56
+177 ;;^UTILITY(U,$J,358.3,34722,1,0)
+178 ;;=^358.31IA^4^2
+179 ;;^UTILITY(U,$J,358.3,34722,1,3,0)
+180 ;;=3^Neurosyphilis Symptomatic,Unspec
+181 ;;^UTILITY(U,$J,358.3,34722,1,4,0)
+182 ;;=4^A52.10
+183 ;;^UTILITY(U,$J,358.3,34722,2)
+184 ;;=^5000291
+185 ;;^UTILITY(U,$J,358.3,34723,0)
+186 ;;=A52.9^^105^1435^52
+187 ;;^UTILITY(U,$J,358.3,34723,1,0)
+188 ;;=^358.31IA^4^2
+189 ;;^UTILITY(U,$J,358.3,34723,1,3,0)
+190 ;;=3^Late Syphilis,Unspec
+191 ;;^UTILITY(U,$J,358.3,34723,1,4,0)
+192 ;;=4^A52.9
+193 ;;^UTILITY(U,$J,358.3,34723,2)
+194 ;;=^5000308
+195 ;;^UTILITY(U,$J,358.3,34724,0)
+196 ;;=A53.9^^105^1435^84
+197 ;;^UTILITY(U,$J,358.3,34724,1,0)
+198 ;;=^358.31IA^4^2
+199 ;;^UTILITY(U,$J,358.3,34724,1,3,0)
+200 ;;=3^Syphilis,Unspec
+201 ;;^UTILITY(U,$J,358.3,34724,1,4,0)
+202 ;;=4^A53.9
+203 ;;^UTILITY(U,$J,358.3,34724,2)
+204 ;;=^5000310
+205 ;;^UTILITY(U,$J,358.3,34725,0)
+206 ;;=B37.3^^105^1435^19
+207 ;;^UTILITY(U,$J,358.3,34725,1,0)
+208 ;;=^358.31IA^4^2
+209 ;;^UTILITY(U,$J,358.3,34725,1,3,0)
+210 ;;=3^Candidiasis Vulva/Vagina
+211 ;;^UTILITY(U,$J,358.3,34725,1,4,0)
+212 ;;=4^B37.3
+213 ;;^UTILITY(U,$J,358.3,34725,2)
+214 ;;=^5000615
+215 ;;^UTILITY(U,$J,358.3,34726,0)
+216 ;;=B58.9^^105^1435^89
+217 ;;^UTILITY(U,$J,358.3,34726,1,0)
+218 ;;=^358.31IA^4^2
+219 ;;^UTILITY(U,$J,358.3,34726,1,3,0)
+220 ;;=3^Toxoplasmosis,Unspec
+221 ;;^UTILITY(U,$J,358.3,34726,1,4,0)
+222 ;;=4^B58.9
+223 ;;^UTILITY(U,$J,358.3,34726,2)
+224 ;;=^5000733
+225 ;;^UTILITY(U,$J,358.3,34727,0)
+226 ;;=A59.01^^105^1435^90
+227 ;;^UTILITY(U,$J,358.3,34727,1,0)
+228 ;;=^358.31IA^4^2
+229 ;;^UTILITY(U,$J,358.3,34727,1,3,0)
+230 ;;=3^Trichomonal Vulvovaginitis
+231 ;;^UTILITY(U,$J,358.3,34727,1,4,0)
+232 ;;=4^A59.01
+233 ;;^UTILITY(U,$J,358.3,34727,2)
+234 ;;=^121763
+235 ;;^UTILITY(U,$J,358.3,34728,0)
+236 ;;=B59.^^105^1435^70
+237 ;;^UTILITY(U,$J,358.3,34728,1,0)
+238 ;;=^358.31IA^4^2
+239 ;;^UTILITY(U,$J,358.3,34728,1,3,0)
+240 ;;=3^Pneumocystosis
+241 ;;^UTILITY(U,$J,358.3,34728,1,4,0)
+242 ;;=4^B59.
+243 ;;^UTILITY(U,$J,358.3,34728,2)
+244 ;;=^5000734
+245 ;;^UTILITY(U,$J,358.3,34729,0)
+246 ;;=H83.09^^105^1435^51
+247 ;;^UTILITY(U,$J,358.3,34729,1,0)
+248 ;;=^358.31IA^4^2
+249 ;;^UTILITY(U,$J,358.3,34729,1,3,0)
+250 ;;=3^Labyrinthitis,Unspec Ear
+251 ;;^UTILITY(U,$J,358.3,34729,1,4,0)
+252 ;;=4^H83.09
+253 ;;^UTILITY(U,$J,358.3,34729,2)
+254 ;;=^5006897
+255 ;;^UTILITY(U,$J,358.3,34730,0)
+256 ;;=H83.01^^105^1435^50
+257 ;;^UTILITY(U,$J,358.3,34730,1,0)
+258 ;;=^358.31IA^4^2
+259 ;;^UTILITY(U,$J,358.3,34730,1,3,0)
+260 ;;=3^Labyrinthitis,Right Ear
+261 ;;^UTILITY(U,$J,358.3,34730,1,4,0)
+262 ;;=4^H83.01
+263 ;;^UTILITY(U,$J,358.3,34730,2)
+264 ;;=^5006894
+265 ;;^UTILITY(U,$J,358.3,34731,0)
+266 ;;=H83.03^^105^1435^48
+267 ;;^UTILITY(U,$J,358.3,34731,1,0)
+268 ;;=^358.31IA^4^2
+269 ;;^UTILITY(U,$J,358.3,34731,1,3,0)
+270 ;;=3^Labyrinthitis,Bilateral
+271 ;;^UTILITY(U,$J,358.3,34731,1,4,0)
+272 ;;=4^H83.03
+273 ;;^UTILITY(U,$J,358.3,34731,2)
+274 ;;=^5006896
+275 ;;^UTILITY(U,$J,358.3,34732,0)
+276 ;;=H83.02^^105^1435^49
+277 ;;^UTILITY(U,$J,358.3,34732,1,0)
+278 ;;=^358.31IA^4^2
+279 ;;^UTILITY(U,$J,358.3,34732,1,3,0)
+280 ;;=3^Labyrinthitis,Left Ear
+281 ;;^UTILITY(U,$J,358.3,34732,1,4,0)
+282 ;;=4^H83.02
+283 ;;^UTILITY(U,$J,358.3,34732,2)
+284 ;;=^5006895
+285 ;;^UTILITY(U,$J,358.3,34733,0)
+286 ;;=J01.91^^105^1435^81
+287 ;;^UTILITY(U,$J,358.3,34733,1,0)
+288 ;;=^358.31IA^4^2
+289 ;;^UTILITY(U,$J,358.3,34733,1,3,0)
+290 ;;=3^Sinusitis,Acute Recurrent Unspec
+291 ;;^UTILITY(U,$J,358.3,34733,1,4,0)
+292 ;;=4^J01.91
+293 ;;^UTILITY(U,$J,358.3,34733,2)
+294 ;;=^5008128
+295 ;;^UTILITY(U,$J,358.3,34734,0)
+296 ;;=J03.90^^105^1435^88
+297 ;;^UTILITY(U,$J,358.3,34734,1,0)
+298 ;;=^358.31IA^4^2
+299 ;;^UTILITY(U,$J,358.3,34734,1,3,0)
+300 ;;=3^Tonsillitis,Acute Unspec
+301 ;;^UTILITY(U,$J,358.3,34734,1,4,0)
+302 ;;=4^J03.90
+303 ;;^UTILITY(U,$J,358.3,34734,2)
+304 ;;=^5008135
+305 ;;^UTILITY(U,$J,358.3,34735,0)
+306 ;;=J01.90^^105^1435^82
+307 ;;^UTILITY(U,$J,358.3,34735,1,0)
+308 ;;=^358.31IA^4^2
+309 ;;^UTILITY(U,$J,358.3,34735,1,3,0)
+310 ;;=3^Sinusitis,Acute Unspec
+311 ;;^UTILITY(U,$J,358.3,34735,1,4,0)
+312 ;;=4^J01.90
+313 ;;^UTILITY(U,$J,358.3,34735,2)
+314 ;;=^5008127
+315 ;;^UTILITY(U,$J,358.3,34736,0)
+316 ;;=J20.1^^105^1435^10
+317 ;;^UTILITY(U,$J,358.3,34736,1,0)
+318 ;;=^358.31IA^4^2
+319 ;;^UTILITY(U,$J,358.3,34736,1,3,0)
+320 ;;=3^Bronchitis,Acute d/t Hemophilus Influenza
+321 ;;^UTILITY(U,$J,358.3,34736,1,4,0)
+322 ;;=4^J20.1
+323 ;;^UTILITY(U,$J,358.3,34736,2)
+324 ;;=^5008187
+325 ;;^UTILITY(U,$J,358.3,34737,0)
+326 ;;=J20.0^^105^1435^11
+327 ;;^UTILITY(U,$J,358.3,34737,1,0)
+328 ;;=^358.31IA^4^2
+329 ;;^UTILITY(U,$J,358.3,34737,1,3,0)
+330 ;;=3^Bronchitis,Acute d/t Mycoplasma Pneumonia
+331 ;;^UTILITY(U,$J,358.3,34737,1,4,0)
+332 ;;=4^J20.0
+333 ;;^UTILITY(U,$J,358.3,34737,2)
+334 ;;=^5008186
+335 ;;^UTILITY(U,$J,358.3,34738,0)
+336 ;;=J20.2^^105^1435^6
+337 ;;^UTILITY(U,$J,358.3,34738,1,0)
+338 ;;=^358.31IA^4^2
+339 ;;^UTILITY(U,$J,358.3,34738,1,3,0)
+340 ;;=3^Bonchitis,Acute d/t Streptococcus
+341 ;;^UTILITY(U,$J,358.3,34738,1,4,0)
+342 ;;=4^J20.2
+343 ;;^UTILITY(U,$J,358.3,34738,2)
+344 ;;=^5008188
+345 ;;^UTILITY(U,$J,358.3,34739,0)
+346 ;;=J20.4^^105^1435^13
+347 ;;^UTILITY(U,$J,358.3,34739,1,0)
+348 ;;=^358.31IA^4^2
+349 ;;^UTILITY(U,$J,358.3,34739,1,3,0)
+350 ;;=3^Bronchitis,Acute d/t Parainfluenza Virus
+351 ;;^UTILITY(U,$J,358.3,34739,1,4,0)
+352 ;;=4^J20.4
+353 ;;^UTILITY(U,$J,358.3,34739,2)
+354 ;;=^5008190
+355 ;;^UTILITY(U,$J,358.3,34740,0)
+356 ;;=J20.3^^105^1435^8
+357 ;;^UTILITY(U,$J,358.3,34740,1,0)
+358 ;;=^358.31IA^4^2
+359 ;;^UTILITY(U,$J,358.3,34740,1,3,0)
+360 ;;=3^Bronchitis,Acute d/t Coxsackievirus
+361 ;;^UTILITY(U,$J,358.3,34740,1,4,0)
+362 ;;=4^J20.3
+363 ;;^UTILITY(U,$J,358.3,34740,2)
+364 ;;=^5008189
+365 ;;^UTILITY(U,$J,358.3,34741,0)
+366 ;;=J20.9^^105^1435^7
+367 ;;^UTILITY(U,$J,358.3,34741,1,0)
+368 ;;=^358.31IA^4^2
+369 ;;^UTILITY(U,$J,358.3,34741,1,3,0)
+370 ;;=3^Bronchitis,Acute Unspec
+371 ;;^UTILITY(U,$J,358.3,34741,1,4,0)
+372 ;;=4^J20.9
+373 ;;^UTILITY(U,$J,358.3,34741,2)
+374 ;;=^5008195
+375 ;;^UTILITY(U,$J,358.3,34742,0)
+376 ;;=J20.8^^105^1435^12
+377 ;;^UTILITY(U,$J,358.3,34742,1,0)
+378 ;;=^358.31IA^4^2
+379 ;;^UTILITY(U,$J,358.3,34742,1,3,0)
+380 ;;=3^Bronchitis,Acute d/t Oth Spec Organisms
+381 ;;^UTILITY(U,$J,358.3,34742,1,4,0)
+382 ;;=4^J20.8
+383 ;;^UTILITY(U,$J,358.3,34742,2)
+384 ;;=^5008194
+385 ;;^UTILITY(U,$J,358.3,34743,0)
+386 ;;=J20.5^^105^1435^14
+387 ;;^UTILITY(U,$J,358.3,34743,1,0)
+388 ;;=^358.31IA^4^2
+389 ;;^UTILITY(U,$J,358.3,34743,1,3,0)
+390 ;;=3^Bronchitis,Acute d/t Respiratory Syncytial Virus
+391 ;;^UTILITY(U,$J,358.3,34743,1,4,0)
+392 ;;=4^J20.5
+393 ;;^UTILITY(U,$J,358.3,34743,2)
+394 ;;=^5008191
+395 ;;^UTILITY(U,$J,358.3,34744,0)
+396 ;;=J20.7^^105^1435^9
+397 ;;^UTILITY(U,$J,358.3,34744,1,0)
+398 ;;=^358.31IA^4^2
+399 ;;^UTILITY(U,$J,358.3,34744,1,3,0)
+400 ;;=3^Bronchitis,Acute d/t Echovirus
+401 ;;^UTILITY(U,$J,358.3,34744,1,4,0)
+402 ;;=4^J20.7
+403 ;;^UTILITY(U,$J,358.3,34744,2)
+404 ;;=^5008193
+405 ;;^UTILITY(U,$J,358.3,34745,0)
+406 ;;=J20.6^^105^1435^15
+407 ;;^UTILITY(U,$J,358.3,34745,1,0)
+408 ;;=^358.31IA^4^2
+409 ;;^UTILITY(U,$J,358.3,34745,1,3,0)
+410 ;;=3^Bronchitis,Acute d/t Rhinovirus
+411 ;;^UTILITY(U,$J,358.3,34745,1,4,0)
+412 ;;=4^J20.6
+413 ;;^UTILITY(U,$J,358.3,34745,2)
+414 ;;=^5008192
+415 ;;^UTILITY(U,$J,358.3,34746,0)
+416 ;;=J18.9^^105^1435^71
+417 ;;^UTILITY(U,$J,358.3,34746,1,0)
+418 ;;=^358.31IA^4^2
+419 ;;^UTILITY(U,$J,358.3,34746,1,3,0)
+420 ;;=3^Pneumonia,Unspec Organism
+421 ;;^UTILITY(U,$J,358.3,34746,1,4,0)
+422 ;;=4^J18.9
+423 ;;^UTILITY(U,$J,358.3,34746,2)
+424 ;;=^95632
+425 ;;^UTILITY(U,$J,358.3,34747,0)
+426 ;;=J18.8^^105^1435^72
+427 ;;^UTILITY(U,$J,358.3,34747,1,0)
+428 ;;=^358.31IA^4^2
+429 ;;^UTILITY(U,$J,358.3,34747,1,3,0)
+430 ;;=3^Pneumonia,Unspec Organism NEC
+431 ;;^UTILITY(U,$J,358.3,34747,1,4,0)
+432 ;;=4^J18.8
+433 ;;^UTILITY(U,$J,358.3,34747,2)
+434 ;;=^5008185
+435 ;;^UTILITY(U,$J,358.3,34748,0)
+436 ;;=J11.00^^105^1435^31
+437 ;;^UTILITY(U,$J,358.3,34748,1,0)
+438 ;;=^358.31IA^4^2
+439 ;;^UTILITY(U,$J,358.3,34748,1,3,0)
+440 ;;=3^Flu d/t Unidentified Flu Virus w/ Unspec Type Pneumonia
+441 ;;^UTILITY(U,$J,358.3,34748,1,4,0)
+442 ;;=4^J11.00
+443 ;;^UTILITY(U,$J,358.3,34748,2)
+444 ;;=^5008156
+445 ;;^UTILITY(U,$J,358.3,34749,0)
+446 ;;=J12.9^^105^1435^73
+447 ;;^UTILITY(U,$J,358.3,34749,1,0)
+448 ;;=^358.31IA^4^2
+449 ;;^UTILITY(U,$J,358.3,34749,1,3,0)
+450 ;;=3^Pneumonia,Viral Unspec
+451 ;;^UTILITY(U,$J,358.3,34749,1,4,0)
+452 ;;=4^J12.9
+453 ;;^UTILITY(U,$J,358.3,34749,2)
+454 ;;=^5008169
+455 ;;^UTILITY(U,$J,358.3,34750,0)
+456 ;;=J10.08^^105^1435^44
+457 ;;^UTILITY(U,$J,358.3,34750,1,0)
+458 ;;=^358.31IA^4^2
+459 ;;^UTILITY(U,$J,358.3,34750,1,3,0)
+460 ;;=3^Influenza d/t Oth ID'd Influenza Virus w/ Oth Pneumonia
+461 ;;^UTILITY(U,$J,358.3,34750,1,4,0)
+462 ;;=4^J10.08
+463 ;;^UTILITY(U,$J,358.3,34750,2)
+464 ;;=^5008150
+465 ;;^UTILITY(U,$J,358.3,34751,0)
+466 ;;=J10.00^^105^1435^43
+467 ;;^UTILITY(U,$J,358.3,34751,1,0)
+468 ;;=^358.31IA^4^2
+469 ;;^UTILITY(U,$J,358.3,34751,1,3,0)
+470 ;;=3^Influenza d/t Oth ID'd Flu Virus w/ Unspec Type Pneumonia
+471 ;;^UTILITY(U,$J,358.3,34751,1,4,0)
+472 ;;=4^J10.00
+473 ;;^UTILITY(U,$J,358.3,34751,2)
+474 ;;=^5008148
+475 ;;^UTILITY(U,$J,358.3,34752,0)
+476 ;;=J11.08^^105^1435^46
+477 ;;^UTILITY(U,$J,358.3,34752,1,0)
+478 ;;=^358.31IA^4^2
+479 ;;^UTILITY(U,$J,358.3,34752,1,3,0)
+480 ;;=3^Influenza d/t Unident Flu Virus w/ Spec Pneumonia
+481 ;;^UTILITY(U,$J,358.3,34752,1,4,0)
+482 ;;=4^J11.08
+483 ;;^UTILITY(U,$J,358.3,34752,2)
+484 ;;=^5008157
+485 ;;^UTILITY(U,$J,358.3,34753,0)
+486 ;;=J10.1^^105^1435^45
+487 ;;^UTILITY(U,$J,358.3,34753,1,0)
+488 ;;=^358.31IA^4^2
+489 ;;^UTILITY(U,$J,358.3,34753,1,3,0)
+490 ;;=3^Influenza d/t Oth ID'd Influenza Virus w/ Oth Resp Manifest
+491 ;;^UTILITY(U,$J,358.3,34753,1,4,0)
+492 ;;=4^J10.1
+493 ;;^UTILITY(U,$J,358.3,34753,2)
+494 ;;=^5008151
+495 ;;^UTILITY(U,$J,358.3,34754,0)
+496 ;;=J10.01^^105^1435^42
+497 ;;^UTILITY(U,$J,358.3,34754,1,0)
+498 ;;=^358.31IA^4^2
+499 ;;^UTILITY(U,$J,358.3,34754,1,3,0)
+500 ;;=3^Influenza d/t Oth ID'd Flu Virus w/ Same Oth ID'd Flu Virus Pneumonia
+501 ;;^UTILITY(U,$J,358.3,34754,1,4,0)
+502 ;;=4^J10.01
+503 ;;^UTILITY(U,$J,358.3,34754,2)
+504 ;;=^5008149
+505 ;;^UTILITY(U,$J,358.3,34755,0)
+506 ;;=J11.1^^105^1435^47
+507 ;;^UTILITY(U,$J,358.3,34755,1,0)
+508 ;;=^358.31IA^4^2
+509 ;;^UTILITY(U,$J,358.3,34755,1,3,0)
+510 ;;=3^Influenza d/t Unident Influenza Virus w/ Oth Resp Manifest
+511 ;;^UTILITY(U,$J,358.3,34755,1,4,0)
+512 ;;=4^J11.1
+513 ;;^UTILITY(U,$J,358.3,34755,2)
+514 ;;=^5008158
+515 ;;^UTILITY(U,$J,358.3,34756,0)
+516 ;;=N12.^^105^1435^92
+517 ;;^UTILITY(U,$J,358.3,34756,1,0)
+518 ;;=^358.31IA^4^2
+519 ;;^UTILITY(U,$J,358.3,34756,1,3,0)
+520 ;;=3^Tubulo-Interstitial Nephritis
+521 ;;^UTILITY(U,$J,358.3,34756,1,4,0)
+522 ;;=4^N12.
+523 ;;^UTILITY(U,$J,358.3,34756,2)
+524 ;;=^5015575
+525 ;;^UTILITY(U,$J,358.3,34757,0)
+526 ;;=N11.9^^105^1435^93
+527 ;;^UTILITY(U,$J,358.3,34757,1,0)
+528 ;;=^358.31IA^4^2
+529 ;;^UTILITY(U,$J,358.3,34757,1,3,0)
+530 ;;=3^Tubulo-Interstitial Nephritis,Chronic
+531 ;;^UTILITY(U,$J,358.3,34757,1,4,0)
+532 ;;=4^N11.9
+533 ;;^UTILITY(U,$J,358.3,34757,2)
+534 ;;=^5015574
+535 ;;^UTILITY(U,$J,358.3,34758,0)
+536 ;;=N13.6^^105^1435^78
+537 ;;^UTILITY(U,$J,358.3,34758,1,0)
+538 ;;=^358.31IA^4^2
+539 ;;^UTILITY(U,$J,358.3,34758,1,3,0)
+540 ;;=3^Pyonephrosis
+541 ;;^UTILITY(U,$J,358.3,34758,1,4,0)
+542 ;;=4^N13.6
+543 ;;^UTILITY(U,$J,358.3,34758,2)
+544 ;;=^101552
+545 ;;^UTILITY(U,$J,358.3,34759,0)
+546 ;;=N30.91^^105^1435^22
+547 ;;^UTILITY(U,$J,358.3,34759,1,0)
+548 ;;=^358.31IA^4^2
+549 ;;^UTILITY(U,$J,358.3,34759,1,3,0)
+550 ;;=3^Cystitis w/ Hematuria,Unspec
+551 ;;^UTILITY(U,$J,358.3,34759,1,4,0)
+552 ;;=4^N30.91
+553 ;;^UTILITY(U,$J,358.3,34759,2)
+554 ;;=^5015643
+555 ;;^UTILITY(U,$J,358.3,34760,0)
+556 ;;=N30.90^^105^1435^23
+557 ;;^UTILITY(U,$J,358.3,34760,1,0)
+558 ;;=^358.31IA^4^2
+559 ;;^UTILITY(U,$J,358.3,34760,1,3,0)
+560 ;;=3^Cystitis w/o Hematuria,Unspec
+561 ;;^UTILITY(U,$J,358.3,34760,1,4,0)
+562 ;;=4^N30.90
+563 ;;^UTILITY(U,$J,358.3,34760,2)
+564 ;;=^5015642
+565 ;;^UTILITY(U,$J,358.3,34761,0)
+566 ;;=N41.9^^105^1435^41
+567 ;;^UTILITY(U,$J,358.3,34761,1,0)
+568 ;;=^358.31IA^4^2
+569 ;;^UTILITY(U,$J,358.3,34761,1,3,0)
+570 ;;=3^Inflammatory Disease of Prostate,Unspec
+571 ;;^UTILITY(U,$J,358.3,34761,1,4,0)
+572 ;;=4^N41.9
+573 ;;^UTILITY(U,$J,358.3,34761,2)
+574 ;;=^5015694
+575 ;;^UTILITY(U,$J,358.3,34762,0)
+576 ;;=N70.91^^105^1435^80
+577 ;;^UTILITY(U,$J,358.3,34762,1,0)
+578 ;;=^358.31IA^4^2
+579 ;;^UTILITY(U,$J,358.3,34762,1,3,0)
+580 ;;=3^Salpingitis,Unspec
+581 ;;^UTILITY(U,$J,358.3,34762,1,4,0)
+582 ;;=4^N70.91
+583 ;;^UTILITY(U,$J,358.3,34762,2)
+584 ;;=^5015806
+585 ;;^UTILITY(U,$J,358.3,34763,0)
+586 ;;=N70.93^^105^1435^79
+587 ;;^UTILITY(U,$J,358.3,34763,1,0)
+588 ;;=^358.31IA^4^2
+589 ;;^UTILITY(U,$J,358.3,34763,1,3,0)
+590 ;;=3^Salpingitis & Oophoritis,Unspec
+591 ;;^UTILITY(U,$J,358.3,34763,1,4,0)
+592 ;;=4^N70.93
+593 ;;^UTILITY(U,$J,358.3,34763,2)
+594 ;;=^5015808
+595 ;;^UTILITY(U,$J,358.3,34764,0)
+596 ;;=N70.92^^105^1435^58
+597 ;;^UTILITY(U,$J,358.3,34764,1,0)
+598 ;;=^358.31IA^4^2
+599 ;;^UTILITY(U,$J,358.3,34764,1,3,0)
+600 ;;=3^Oophoritis,Unspec
+601 ;;^UTILITY(U,$J,358.3,34764,1,4,0)
+602 ;;=4^N70.92
+603 ;;^UTILITY(U,$J,358.3,34764,2)
+604 ;;=^5015807
+605 ;;^UTILITY(U,$J,358.3,34765,0)
+606 ;;=N73.9^^105^1435^40
+607 ;;^UTILITY(U,$J,358.3,34765,1,0)
+608 ;;=^358.31IA^4^2
+609 ;;^UTILITY(U,$J,358.3,34765,1,3,0)
+610 ;;=3^Inflammatory Disease Female Pelvic,Unspec
+611 ;;^UTILITY(U,$J,358.3,34765,1,4,0)
+612 ;;=4^N73.9
+613 ;;^UTILITY(U,$J,358.3,34765,2)
+614 ;;=^5015820
+615 ;;^UTILITY(U,$J,358.3,34766,0)
+616 ;;=A56.11^^105^1435^39
+617 ;;^UTILITY(U,$J,358.3,34766,1,0)
+618 ;;=^358.31IA^4^2
+619 ;;^UTILITY(U,$J,358.3,34766,1,3,0)
+620 ;;=3^Inflammatory Disease Chlamydial Female Pelvic
+621 ;;^UTILITY(U,$J,358.3,34766,1,4,0)
+622 ;;=4^A56.11
+623 ;;^UTILITY(U,$J,358.3,34766,2)
+624 ;;=^5000342
+625 ;;^UTILITY(U,$J,358.3,34767,0)
+626 ;;=N73.5^^105^1435^67
+627 ;;^UTILITY(U,$J,358.3,34767,1,0)
+628 ;;=^358.31IA^4^2
+629 ;;^UTILITY(U,$J,358.3,34767,1,3,0)
+630 ;;=3^Peritonitis Female Pelvic,Unspec
+631 ;;^UTILITY(U,$J,358.3,34767,1,4,0)
+632 ;;=4^N73.5
+633 ;;^UTILITY(U,$J,358.3,34767,2)
+634 ;;=^5015817
+635 ;;^UTILITY(U,$J,358.3,34768,0)
+636 ;;=N72.^^105^1435^38
+637 ;;^UTILITY(U,$J,358.3,34768,1,0)
+638 ;;=^358.31IA^4^2
+639 ;;^UTILITY(U,$J,358.3,34768,1,3,0)
+640 ;;=3^Inflammatory Disease Cervix Uteri
+641 ;;^UTILITY(U,$J,358.3,34768,1,4,0)
+642 ;;=4^N72.
+643 ;;^UTILITY(U,$J,358.3,34768,2)
+644 ;;=^5015812
+645 ;;^UTILITY(U,$J,358.3,34769,0)
+646 ;;=N76.3^^105^1435^99
+647 ;;^UTILITY(U,$J,358.3,34769,1,0)
+648 ;;=^358.31IA^4^2
+649 ;;^UTILITY(U,$J,358.3,34769,1,3,0)
+650 ;;=3^Vulvitis,Subacute & Chronic
+651 ;;^UTILITY(U,$J,358.3,34769,1,4,0)
+652 ;;=4^N76.3
+653 ;;^UTILITY(U,$J,358.3,34769,2)
+654 ;;=^5015829
+655 ;;^UTILITY(U,$J,358.3,34770,0)
+656 ;;=N76.1^^105^1435^95
+657 ;;^UTILITY(U,$J,358.3,34770,1,0)
+658 ;;=^358.31IA^4^2
+659 ;;^UTILITY(U,$J,358.3,34770,1,3,0)
+660 ;;=3^Vaginitis,Subacute & Chronic
+661 ;;^UTILITY(U,$J,358.3,34770,1,4,0)
+662 ;;=4^N76.1
+663 ;;^UTILITY(U,$J,358.3,34770,2)
+664 ;;=^5015827
+665 ;;^UTILITY(U,$J,358.3,34771,0)
+666 ;;=N76.2^^105^1435^98
+667 ;;^UTILITY(U,$J,358.3,34771,1,0)
+668 ;;=^358.31IA^4^2
+669 ;;^UTILITY(U,$J,358.3,34771,1,3,0)
+670 ;;=3^Vulvitis,Acute
+671 ;;^UTILITY(U,$J,358.3,34771,1,4,0)
+672 ;;=4^N76.2
+673 ;;^UTILITY(U,$J,358.3,34771,2)
+674 ;;=^5015828
+675 ;;^UTILITY(U,$J,358.3,34772,0)
+676 ;;=N76.0^^105^1435^94
+677 ;;^UTILITY(U,$J,358.3,34772,1,0)
+678 ;;=^358.31IA^4^2
+679 ;;^UTILITY(U,$J,358.3,34772,1,3,0)
+680 ;;=3^Vaginitis,Acute
+681 ;;^UTILITY(U,$J,358.3,34772,1,4,0)
+682 ;;=4^N76.0
+683 ;;^UTILITY(U,$J,358.3,34772,2)
+684 ;;=^5015826
+685 ;;^UTILITY(U,$J,358.3,34773,0)
+686 ;;=M00.20^^105^1435^3
+687 ;;^UTILITY(U,$J,358.3,34773,1,0)
+688 ;;=^358.31IA^4^2