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

IBDEI0CZ.m

Go to the documentation of this file.
  1. IBDEI0CZ ; ; 03-MAY-2022
  1. ;;3.0;IB ENCOUNTER FORM IMP/EXP;;MAY 03, 2022
  1. 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
  1. Q Q
  1. ;;^UTILITY(U,$J,358.3,32563,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32563,1,3,0)
  1. ;;=3^Skin/Subcutaneous tissue disorder, unspec
  1. ;;^UTILITY(U,$J,358.3,32563,1,4,0)
  1. ;;=4^L98.9
  1. ;;^UTILITY(U,$J,358.3,32563,2)
  1. ;;=^5009595
  1. ;;^UTILITY(U,$J,358.3,32564,0)
  1. ;;=L20.81^^99^1346^15
  1. ;;^UTILITY(U,$J,358.3,32564,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32564,1,3,0)
  1. ;;=3^Dermatitis,Atopic
  1. ;;^UTILITY(U,$J,358.3,32564,1,4,0)
  1. ;;=4^L20.81
  1. ;;^UTILITY(U,$J,358.3,32564,2)
  1. ;;=^5009108
  1. ;;^UTILITY(U,$J,358.3,32565,0)
  1. ;;=L23.81^^99^1346^7
  1. ;;^UTILITY(U,$J,358.3,32565,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32565,1,3,0)
  1. ;;=3^Dermatitis,Allergic Contact,Animal Dander
  1. ;;^UTILITY(U,$J,358.3,32565,1,4,0)
  1. ;;=4^L23.81
  1. ;;^UTILITY(U,$J,358.3,32565,2)
  1. ;;=^5009123
  1. ;;^UTILITY(U,$J,358.3,32566,0)
  1. ;;=L23.2^^99^1346^8
  1. ;;^UTILITY(U,$J,358.3,32566,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32566,1,3,0)
  1. ;;=3^Dermatitis,Allergic Contact,Cosmetics
  1. ;;^UTILITY(U,$J,358.3,32566,1,4,0)
  1. ;;=4^L23.2
  1. ;;^UTILITY(U,$J,358.3,32566,2)
  1. ;;=^5009117
  1. ;;^UTILITY(U,$J,358.3,32567,0)
  1. ;;=L23.3^^99^1346^9
  1. ;;^UTILITY(U,$J,358.3,32567,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32567,1,3,0)
  1. ;;=3^Dermatitis,Allergic Contact,Drugs on Skin
  1. ;;^UTILITY(U,$J,358.3,32567,1,4,0)
  1. ;;=4^L23.3
  1. ;;^UTILITY(U,$J,358.3,32567,2)
  1. ;;=^5009118
  1. ;;^UTILITY(U,$J,358.3,32568,0)
  1. ;;=L23.6^^99^1346^10
  1. ;;^UTILITY(U,$J,358.3,32568,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32568,1,3,0)
  1. ;;=3^Dermatitis,Allergic Contact,Food on Skin
  1. ;;^UTILITY(U,$J,358.3,32568,1,4,0)
  1. ;;=4^L23.6
  1. ;;^UTILITY(U,$J,358.3,32568,2)
  1. ;;=^5009121
  1. ;;^UTILITY(U,$J,358.3,32569,0)
  1. ;;=L23.5^^99^1346^11
  1. ;;^UTILITY(U,$J,358.3,32569,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32569,1,3,0)
  1. ;;=3^Dermatitis,Allergic Contact,Latex/Rubber
  1. ;;^UTILITY(U,$J,358.3,32569,1,4,0)
  1. ;;=4^L23.5
  1. ;;^UTILITY(U,$J,358.3,32569,2)
  1. ;;=^5009120
  1. ;;^UTILITY(U,$J,358.3,32570,0)
  1. ;;=L23.7^^99^1346^14
  1. ;;^UTILITY(U,$J,358.3,32570,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32570,1,3,0)
  1. ;;=3^Dermatitis,Allergic Contact,Plants
  1. ;;^UTILITY(U,$J,358.3,32570,1,4,0)
  1. ;;=4^L23.7
  1. ;;^UTILITY(U,$J,358.3,32570,2)
  1. ;;=^5009122
  1. ;;^UTILITY(U,$J,358.3,32571,0)
  1. ;;=L23.9^^99^1346^13
  1. ;;^UTILITY(U,$J,358.3,32571,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32571,1,3,0)
  1. ;;=3^Dermatitis,Allergic Contact,Oth Cause
  1. ;;^UTILITY(U,$J,358.3,32571,1,4,0)
  1. ;;=4^L23.9
  1. ;;^UTILITY(U,$J,358.3,32571,2)
  1. ;;=^5009125
  1. ;;^UTILITY(U,$J,358.3,32572,0)
  1. ;;=L23.0^^99^1346^12
  1. ;;^UTILITY(U,$J,358.3,32572,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32572,1,3,0)
  1. ;;=3^Dermatitis,Allergic Contact,Metals
  1. ;;^UTILITY(U,$J,358.3,32572,1,4,0)
  1. ;;=4^L23.0
  1. ;;^UTILITY(U,$J,358.3,32572,2)
  1. ;;=^5009115
  1. ;;^UTILITY(U,$J,358.3,32573,0)
  1. ;;=L27.0^^99^1346^6
  1. ;;^UTILITY(U,$J,358.3,32573,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32573,1,3,0)
  1. ;;=3^Dermatitis d/t Oral Meds
  1. ;;^UTILITY(U,$J,358.3,32573,1,4,0)
  1. ;;=4^L27.0
  1. ;;^UTILITY(U,$J,358.3,32573,2)
  1. ;;=^5009144
  1. ;;^UTILITY(U,$J,358.3,32574,0)
  1. ;;=L27.2^^99^1346^5
  1. ;;^UTILITY(U,$J,358.3,32574,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32574,1,3,0)
  1. ;;=3^Dermatitis d/t Ingested Food
  1. ;;^UTILITY(U,$J,358.3,32574,1,4,0)
  1. ;;=4^L27.2
  1. ;;^UTILITY(U,$J,358.3,32574,2)
  1. ;;=^5009146
  1. ;;^UTILITY(U,$J,358.3,32575,0)
  1. ;;=L51.9^^99^1346^17
  1. ;;^UTILITY(U,$J,358.3,32575,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32575,1,3,0)
  1. ;;=3^Erythema Multiforme
  1. ;;^UTILITY(U,$J,358.3,32575,1,4,0)
  1. ;;=4^L51.9
  1. ;;^UTILITY(U,$J,358.3,32575,2)
  1. ;;=^336759
  1. ;;^UTILITY(U,$J,358.3,32576,0)
  1. ;;=L85.8^^99^1346^18
  1. ;;^UTILITY(U,$J,358.3,32576,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32576,1,3,0)
  1. ;;=3^Keratosis Pilaris
  1. ;;^UTILITY(U,$J,358.3,32576,1,4,0)
  1. ;;=4^L85.8
  1. ;;^UTILITY(U,$J,358.3,32576,2)
  1. ;;=^5009324
  1. ;;^UTILITY(U,$J,358.3,32577,0)
  1. ;;=L29.8^^99^1346^22
  1. ;;^UTILITY(U,$J,358.3,32577,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32577,1,3,0)
  1. ;;=3^Pruritis
  1. ;;^UTILITY(U,$J,358.3,32577,1,4,0)
  1. ;;=4^L29.8
  1. ;;^UTILITY(U,$J,358.3,32577,2)
  1. ;;=^5009152
  1. ;;^UTILITY(U,$J,358.3,32578,0)
  1. ;;=L40.9^^99^1346^24
  1. ;;^UTILITY(U,$J,358.3,32578,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32578,1,3,0)
  1. ;;=3^Psoriasis
  1. ;;^UTILITY(U,$J,358.3,32578,1,4,0)
  1. ;;=4^L40.9
  1. ;;^UTILITY(U,$J,358.3,32578,2)
  1. ;;=^5009171
  1. ;;^UTILITY(U,$J,358.3,32579,0)
  1. ;;=R21.^^99^1346^30
  1. ;;^UTILITY(U,$J,358.3,32579,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32579,1,3,0)
  1. ;;=3^Rash
  1. ;;^UTILITY(U,$J,358.3,32579,1,4,0)
  1. ;;=4^R21.
  1. ;;^UTILITY(U,$J,358.3,32579,2)
  1. ;;=^5019283
  1. ;;^UTILITY(U,$J,358.3,32580,0)
  1. ;;=L50.0^^99^1346^34
  1. ;;^UTILITY(U,$J,358.3,32580,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32580,1,3,0)
  1. ;;=3^Urticaria,Allergic
  1. ;;^UTILITY(U,$J,358.3,32580,1,4,0)
  1. ;;=4^L50.0
  1. ;;^UTILITY(U,$J,358.3,32580,2)
  1. ;;=^5009200
  1. ;;^UTILITY(U,$J,358.3,32581,0)
  1. ;;=L50.5^^99^1346^35
  1. ;;^UTILITY(U,$J,358.3,32581,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32581,1,3,0)
  1. ;;=3^Urticaria,Cholinergic
  1. ;;^UTILITY(U,$J,358.3,32581,1,4,0)
  1. ;;=4^L50.5
  1. ;;^UTILITY(U,$J,358.3,32581,2)
  1. ;;=^265460
  1. ;;^UTILITY(U,$J,358.3,32582,0)
  1. ;;=L50.8^^99^1346^40
  1. ;;^UTILITY(U,$J,358.3,32582,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32582,1,3,0)
  1. ;;=3^Urticaria,Other
  1. ;;^UTILITY(U,$J,358.3,32582,1,4,0)
  1. ;;=4^L50.8
  1. ;;^UTILITY(U,$J,358.3,32582,2)
  1. ;;=^5009203
  1. ;;^UTILITY(U,$J,358.3,32583,0)
  1. ;;=L50.2^^99^1346^36
  1. ;;^UTILITY(U,$J,358.3,32583,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32583,1,3,0)
  1. ;;=3^Urticaria,Cold/Heat
  1. ;;^UTILITY(U,$J,358.3,32583,1,4,0)
  1. ;;=4^L50.2
  1. ;;^UTILITY(U,$J,358.3,32583,2)
  1. ;;=^271938
  1. ;;^UTILITY(U,$J,358.3,32584,0)
  1. ;;=L50.6^^99^1346^37
  1. ;;^UTILITY(U,$J,358.3,32584,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32584,1,3,0)
  1. ;;=3^Urticaria,Contact
  1. ;;^UTILITY(U,$J,358.3,32584,1,4,0)
  1. ;;=4^L50.6
  1. ;;^UTILITY(U,$J,358.3,32584,2)
  1. ;;=^5009202
  1. ;;^UTILITY(U,$J,358.3,32585,0)
  1. ;;=L50.3^^99^1346^38
  1. ;;^UTILITY(U,$J,358.3,32585,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32585,1,3,0)
  1. ;;=3^Urticaria,Dermatographic
  1. ;;^UTILITY(U,$J,358.3,32585,1,4,0)
  1. ;;=4^L50.3
  1. ;;^UTILITY(U,$J,358.3,32585,2)
  1. ;;=^5009201
  1. ;;^UTILITY(U,$J,358.3,32586,0)
  1. ;;=L50.1^^99^1346^39
  1. ;;^UTILITY(U,$J,358.3,32586,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32586,1,3,0)
  1. ;;=3^Urticaria,Idiopathic
  1. ;;^UTILITY(U,$J,358.3,32586,1,4,0)
  1. ;;=4^L50.1
  1. ;;^UTILITY(U,$J,358.3,32586,2)
  1. ;;=^271936
  1. ;;^UTILITY(U,$J,358.3,32587,0)
  1. ;;=L50.4^^99^1346^41
  1. ;;^UTILITY(U,$J,358.3,32587,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32587,1,3,0)
  1. ;;=3^Urticaria,Vibratory
  1. ;;^UTILITY(U,$J,358.3,32587,1,4,0)
  1. ;;=4^L50.4
  1. ;;^UTILITY(U,$J,358.3,32587,2)
  1. ;;=^271939
  1. ;;^UTILITY(U,$J,358.3,32588,0)
  1. ;;=H60.311^^99^1347^26
  1. ;;^UTILITY(U,$J,358.3,32588,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32588,1,3,0)
  1. ;;=3^Otitis Externa Diffused,Right Ear
  1. ;;^UTILITY(U,$J,358.3,32588,1,4,0)
  1. ;;=4^H60.311
  1. ;;^UTILITY(U,$J,358.3,32588,2)
  1. ;;=^5006447
  1. ;;^UTILITY(U,$J,358.3,32589,0)
  1. ;;=H60.312^^99^1347^25
  1. ;;^UTILITY(U,$J,358.3,32589,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32589,1,3,0)
  1. ;;=3^Otitis Externa Diffused,Left Ear
  1. ;;^UTILITY(U,$J,358.3,32589,1,4,0)
  1. ;;=4^H60.312
  1. ;;^UTILITY(U,$J,358.3,32589,2)
  1. ;;=^5006448
  1. ;;^UTILITY(U,$J,358.3,32590,0)
  1. ;;=H60.313^^99^1347^24
  1. ;;^UTILITY(U,$J,358.3,32590,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32590,1,3,0)
  1. ;;=3^Otitis Externa Diffused,Bilateral
  1. ;;^UTILITY(U,$J,358.3,32590,1,4,0)
  1. ;;=4^H60.313
  1. ;;^UTILITY(U,$J,358.3,32590,2)
  1. ;;=^5006449
  1. ;;^UTILITY(U,$J,358.3,32591,0)
  1. ;;=H60.321^^99^1347^29
  1. ;;^UTILITY(U,$J,358.3,32591,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32591,1,3,0)
  1. ;;=3^Otitis Externa Hemorrhagic,Right Ear
  1. ;;^UTILITY(U,$J,358.3,32591,1,4,0)
  1. ;;=4^H60.321
  1. ;;^UTILITY(U,$J,358.3,32591,2)
  1. ;;=^5006451
  1. ;;^UTILITY(U,$J,358.3,32592,0)
  1. ;;=H60.322^^99^1347^28
  1. ;;^UTILITY(U,$J,358.3,32592,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32592,1,3,0)
  1. ;;=3^Otitis Externa Hemorrhagic,Left Ear
  1. ;;^UTILITY(U,$J,358.3,32592,1,4,0)
  1. ;;=4^H60.322
  1. ;;^UTILITY(U,$J,358.3,32592,2)
  1. ;;=^5006452
  1. ;;^UTILITY(U,$J,358.3,32593,0)
  1. ;;=H60.323^^99^1347^27
  1. ;;^UTILITY(U,$J,358.3,32593,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32593,1,3,0)
  1. ;;=3^Otitis Externa Hemorrhagic,Bilateral
  1. ;;^UTILITY(U,$J,358.3,32593,1,4,0)
  1. ;;=4^H60.323
  1. ;;^UTILITY(U,$J,358.3,32593,2)
  1. ;;=^5006453
  1. ;;^UTILITY(U,$J,358.3,32594,0)
  1. ;;=H60.391^^99^1347^32
  1. ;;^UTILITY(U,$J,358.3,32594,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32594,1,3,0)
  1. ;;=3^Otitis Externa Infective,Right Ear
  1. ;;^UTILITY(U,$J,358.3,32594,1,4,0)
  1. ;;=4^H60.391
  1. ;;^UTILITY(U,$J,358.3,32594,2)
  1. ;;=^5006459
  1. ;;^UTILITY(U,$J,358.3,32595,0)
  1. ;;=H60.392^^99^1347^31
  1. ;;^UTILITY(U,$J,358.3,32595,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32595,1,3,0)
  1. ;;=3^Otitis Externa Infective,Left Ear
  1. ;;^UTILITY(U,$J,358.3,32595,1,4,0)
  1. ;;=4^H60.392
  1. ;;^UTILITY(U,$J,358.3,32595,2)
  1. ;;=^5006460
  1. ;;^UTILITY(U,$J,358.3,32596,0)
  1. ;;=H66.91^^99^1347^50
  1. ;;^UTILITY(U,$J,358.3,32596,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32596,1,3,0)
  1. ;;=3^Otitis Media,Unspec,Right Ear
  1. ;;^UTILITY(U,$J,358.3,32596,1,4,0)
  1. ;;=4^H66.91
  1. ;;^UTILITY(U,$J,358.3,32596,2)
  1. ;;=^5006640
  1. ;;^UTILITY(U,$J,358.3,32597,0)
  1. ;;=H66.92^^99^1347^49
  1. ;;^UTILITY(U,$J,358.3,32597,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32597,1,3,0)
  1. ;;=3^Otitis Media,Unspec,Left Ear
  1. ;;^UTILITY(U,$J,358.3,32597,1,4,0)
  1. ;;=4^H66.92
  1. ;;^UTILITY(U,$J,358.3,32597,2)
  1. ;;=^5006641
  1. ;;^UTILITY(U,$J,358.3,32598,0)
  1. ;;=H66.93^^99^1347^48
  1. ;;^UTILITY(U,$J,358.3,32598,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32598,1,3,0)
  1. ;;=3^Otitis Media,Unspec,Bilateral
  1. ;;^UTILITY(U,$J,358.3,32598,1,4,0)
  1. ;;=4^H66.93
  1. ;;^UTILITY(U,$J,358.3,32598,2)
  1. ;;=^5006642
  1. ;;^UTILITY(U,$J,358.3,32599,0)
  1. ;;=H92.01^^99^1347^23
  1. ;;^UTILITY(U,$J,358.3,32599,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32599,1,3,0)
  1. ;;=3^Otalgia,Right Ear
  1. ;;^UTILITY(U,$J,358.3,32599,1,4,0)
  1. ;;=4^H92.01
  1. ;;^UTILITY(U,$J,358.3,32599,2)
  1. ;;=^5006945
  1. ;;^UTILITY(U,$J,358.3,32600,0)
  1. ;;=H92.02^^99^1347^22
  1. ;;^UTILITY(U,$J,358.3,32600,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32600,1,3,0)
  1. ;;=3^Otalgia,Left Ear
  1. ;;^UTILITY(U,$J,358.3,32600,1,4,0)
  1. ;;=4^H92.02
  1. ;;^UTILITY(U,$J,358.3,32600,2)
  1. ;;=^5006946
  1. ;;^UTILITY(U,$J,358.3,32601,0)
  1. ;;=H92.03^^99^1347^21
  1. ;;^UTILITY(U,$J,358.3,32601,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32601,1,3,0)
  1. ;;=3^Otalgia,Bilateral
  1. ;;^UTILITY(U,$J,358.3,32601,1,4,0)
  1. ;;=4^H92.03
  1. ;;^UTILITY(U,$J,358.3,32601,2)
  1. ;;=^5006947
  1. ;;^UTILITY(U,$J,358.3,32602,0)
  1. ;;=H61.21^^99^1347^14
  1. ;;^UTILITY(U,$J,358.3,32602,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32602,1,3,0)
  1. ;;=3^Impacted cerumen, right ear
  1. ;;^UTILITY(U,$J,358.3,32602,1,4,0)
  1. ;;=4^H61.21
  1. ;;^UTILITY(U,$J,358.3,32602,2)
  1. ;;=^5006531
  1. ;;^UTILITY(U,$J,358.3,32603,0)
  1. ;;=H61.22^^99^1347^13
  1. ;;^UTILITY(U,$J,358.3,32603,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32603,1,3,0)
  1. ;;=3^Impacted cerumen, left ear
  1. ;;^UTILITY(U,$J,358.3,32603,1,4,0)
  1. ;;=4^H61.22
  1. ;;^UTILITY(U,$J,358.3,32603,2)
  1. ;;=^5006532
  1. ;;^UTILITY(U,$J,358.3,32604,0)
  1. ;;=H61.23^^99^1347^12
  1. ;;^UTILITY(U,$J,358.3,32604,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32604,1,3,0)
  1. ;;=3^Impacted cerumen, bilateral
  1. ;;^UTILITY(U,$J,358.3,32604,1,4,0)
  1. ;;=4^H61.23
  1. ;;^UTILITY(U,$J,358.3,32604,2)
  1. ;;=^5006533
  1. ;;^UTILITY(U,$J,358.3,32605,0)
  1. ;;=H91.91^^99^1347^10
  1. ;;^UTILITY(U,$J,358.3,32605,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32605,1,3,0)
  1. ;;=3^Hearing loss, unspec, right ear
  1. ;;^UTILITY(U,$J,358.3,32605,1,4,0)
  1. ;;=4^H91.91
  1. ;;^UTILITY(U,$J,358.3,32605,2)
  1. ;;=^5133553
  1. ;;^UTILITY(U,$J,358.3,32606,0)
  1. ;;=H91.92^^99^1347^9
  1. ;;^UTILITY(U,$J,358.3,32606,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32606,1,3,0)
  1. ;;=3^Hearing loss, unspec, left ear
  1. ;;^UTILITY(U,$J,358.3,32606,1,4,0)
  1. ;;=4^H91.92
  1. ;;^UTILITY(U,$J,358.3,32606,2)
  1. ;;=^5133554
  1. ;;^UTILITY(U,$J,358.3,32607,0)
  1. ;;=H91.93^^99^1347^8
  1. ;;^UTILITY(U,$J,358.3,32607,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32607,1,3,0)
  1. ;;=3^Hearing loss, unspec, bilateral
  1. ;;^UTILITY(U,$J,358.3,32607,1,4,0)
  1. ;;=4^H91.93
  1. ;;^UTILITY(U,$J,358.3,32607,2)
  1. ;;=^5006944
  1. ;;^UTILITY(U,$J,358.3,32608,0)
  1. ;;=J02.9^^99^1347^54
  1. ;;^UTILITY(U,$J,358.3,32608,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32608,1,3,0)
  1. ;;=3^Pharyngitis, acute, unspec
  1. ;;^UTILITY(U,$J,358.3,32608,1,4,0)
  1. ;;=4^J02.9
  1. ;;^UTILITY(U,$J,358.3,32608,2)
  1. ;;=^5008130
  1. ;;^UTILITY(U,$J,358.3,32609,0)
  1. ;;=J04.0^^99^1347^15
  1. ;;^UTILITY(U,$J,358.3,32609,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32609,1,3,0)
  1. ;;=3^Laryngitis, acute
  1. ;;^UTILITY(U,$J,358.3,32609,1,4,0)
  1. ;;=4^J04.0
  1. ;;^UTILITY(U,$J,358.3,32609,2)
  1. ;;=^5008137
  1. ;;^UTILITY(U,$J,358.3,32610,0)
  1. ;;=J05.0^^99^1347^16
  1. ;;^UTILITY(U,$J,358.3,32610,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32610,1,3,0)
  1. ;;=3^Laryngitis, acute obstructive (croup)
  1. ;;^UTILITY(U,$J,358.3,32610,1,4,0)
  1. ;;=4^J05.0
  1. ;;^UTILITY(U,$J,358.3,32610,2)
  1. ;;=^5008141
  1. ;;^UTILITY(U,$J,358.3,32611,0)
  1. ;;=H81.11^^99^1347^77
  1. ;;^UTILITY(U,$J,358.3,32611,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32611,1,3,0)
  1. ;;=3^Vertigo,Benign Positional,Right Ear
  1. ;;^UTILITY(U,$J,358.3,32611,1,4,0)
  1. ;;=4^H81.11
  1. ;;^UTILITY(U,$J,358.3,32611,2)
  1. ;;=^5006865
  1. ;;^UTILITY(U,$J,358.3,32612,0)
  1. ;;=H81.12^^99^1347^76
  1. ;;^UTILITY(U,$J,358.3,32612,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32612,1,3,0)
  1. ;;=3^Vertigo,Benign Positional,Left Ear
  1. ;;^UTILITY(U,$J,358.3,32612,1,4,0)
  1. ;;=4^H81.12
  1. ;;^UTILITY(U,$J,358.3,32612,2)
  1. ;;=^5006866
  1. ;;^UTILITY(U,$J,358.3,32613,0)
  1. ;;=H81.13^^99^1347^75
  1. ;;^UTILITY(U,$J,358.3,32613,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32613,1,3,0)
  1. ;;=3^Vertigo,Benign Positional,Bilateral
  1. ;;^UTILITY(U,$J,358.3,32613,1,4,0)
  1. ;;=4^H81.13
  1. ;;^UTILITY(U,$J,358.3,32613,2)
  1. ;;=^5006867
  1. ;;^UTILITY(U,$J,358.3,32614,0)
  1. ;;=H68.002^^99^1347^6
  1. ;;^UTILITY(U,$J,358.3,32614,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32614,1,3,0)
  1. ;;=3^Eustachian Salpingitis,Left Ear
  1. ;;^UTILITY(U,$J,358.3,32614,1,4,0)
  1. ;;=4^H68.002
  1. ;;^UTILITY(U,$J,358.3,32614,2)
  1. ;;=^5006648
  1. ;;^UTILITY(U,$J,358.3,32615,0)
  1. ;;=H68.003^^99^1347^5
  1. ;;^UTILITY(U,$J,358.3,32615,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32615,1,3,0)
  1. ;;=3^Eustachian Salpingitis,Bilateral
  1. ;;^UTILITY(U,$J,358.3,32615,1,4,0)
  1. ;;=4^H68.003
  1. ;;^UTILITY(U,$J,358.3,32615,2)
  1. ;;=^5006649
  1. ;;^UTILITY(U,$J,358.3,32616,0)
  1. ;;=H68.001^^99^1347^7
  1. ;;^UTILITY(U,$J,358.3,32616,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32616,1,3,0)
  1. ;;=3^Eustachian Salpingitis,Right Ear
  1. ;;^UTILITY(U,$J,358.3,32616,1,4,0)
  1. ;;=4^H68.001
  1. ;;^UTILITY(U,$J,358.3,32616,2)
  1. ;;=^5006647
  1. ;;^UTILITY(U,$J,358.3,32617,0)
  1. ;;=H60.91^^99^1347^35
  1. ;;^UTILITY(U,$J,358.3,32617,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32617,1,3,0)
  1. ;;=3^Otitis Externa,Right Ear
  1. ;;^UTILITY(U,$J,358.3,32617,1,4,0)
  1. ;;=4^H60.91
  1. ;;^UTILITY(U,$J,358.3,32617,2)
  1. ;;=^5133524
  1. ;;^UTILITY(U,$J,358.3,32618,0)
  1. ;;=H60.92^^99^1347^34
  1. ;;^UTILITY(U,$J,358.3,32618,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32618,1,3,0)
  1. ;;=3^Otitis Externa,Left Ear
  1. ;;^UTILITY(U,$J,358.3,32618,1,4,0)
  1. ;;=4^H60.92
  1. ;;^UTILITY(U,$J,358.3,32618,2)
  1. ;;=^5133525
  1. ;;^UTILITY(U,$J,358.3,32619,0)
  1. ;;=H60.93^^99^1347^33
  1. ;;^UTILITY(U,$J,358.3,32619,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32619,1,3,0)
  1. ;;=3^Otitis Externa,Bilateral
  1. ;;^UTILITY(U,$J,358.3,32619,1,4,0)
  1. ;;=4^H60.93
  1. ;;^UTILITY(U,$J,358.3,32619,2)
  1. ;;=^5006498
  1. ;;^UTILITY(U,$J,358.3,32620,0)
  1. ;;=H65.31^^99^1347^38
  1. ;;^UTILITY(U,$J,358.3,32620,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32620,1,3,0)
  1. ;;=3^Otitis Media,Mucoid Chronic,Right Ear
  1. ;;^UTILITY(U,$J,358.3,32620,1,4,0)
  1. ;;=4^H65.31
  1. ;;^UTILITY(U,$J,358.3,32620,2)
  1. ;;=^5006598
  1. ;;^UTILITY(U,$J,358.3,32621,0)
  1. ;;=H65.32^^99^1347^37
  1. ;;^UTILITY(U,$J,358.3,32621,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32621,1,3,0)
  1. ;;=3^Otitis Media,Mucoid Chronic,Left Ear
  1. ;;^UTILITY(U,$J,358.3,32621,1,4,0)
  1. ;;=4^H65.32
  1. ;;^UTILITY(U,$J,358.3,32621,2)
  1. ;;=^5006599
  1. ;;^UTILITY(U,$J,358.3,32622,0)
  1. ;;=H65.33^^99^1347^36
  1. ;;^UTILITY(U,$J,358.3,32622,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32622,1,3,0)
  1. ;;=3^Otitis Media,Mucoid Chronic,Bilateral
  1. ;;^UTILITY(U,$J,358.3,32622,1,4,0)
  1. ;;=4^H65.33
  1. ;;^UTILITY(U,$J,358.3,32622,2)
  1. ;;=^5006600
  1. ;;^UTILITY(U,$J,358.3,32623,0)
  1. ;;=H65.01^^99^1347^41
  1. ;;^UTILITY(U,$J,358.3,32623,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32623,1,3,0)
  1. ;;=3^Otitis Media,Serous Acute,Right Ear
  1. ;;^UTILITY(U,$J,358.3,32623,1,4,0)
  1. ;;=4^H65.01
  1. ;;^UTILITY(U,$J,358.3,32623,2)
  1. ;;=^5006570
  1. ;;^UTILITY(U,$J,358.3,32624,0)
  1. ;;=H65.02^^99^1347^40
  1. ;;^UTILITY(U,$J,358.3,32624,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32624,1,3,0)
  1. ;;=3^Otitis Media,Serous Acute,Left Ear
  1. ;;^UTILITY(U,$J,358.3,32624,1,4,0)
  1. ;;=4^H65.02
  1. ;;^UTILITY(U,$J,358.3,32624,2)
  1. ;;=^5006571
  1. ;;^UTILITY(U,$J,358.3,32625,0)
  1. ;;=H65.03^^99^1347^39
  1. ;;^UTILITY(U,$J,358.3,32625,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32625,1,3,0)
  1. ;;=3^Otitis Media,Serous Acute,Bilateral
  1. ;;^UTILITY(U,$J,358.3,32625,1,4,0)
  1. ;;=4^H65.03
  1. ;;^UTILITY(U,$J,358.3,32625,2)
  1. ;;=^5006572
  1. ;;^UTILITY(U,$J,358.3,32626,0)
  1. ;;=H65.111^^99^1347^44
  1. ;;^UTILITY(U,$J,358.3,32626,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32626,1,3,0)
  1. ;;=3^Otitis Media,Serous Allergic,Right Ear
  1. ;;^UTILITY(U,$J,358.3,32626,1,4,0)
  1. ;;=4^H65.111
  1. ;;^UTILITY(U,$J,358.3,32626,2)
  1. ;;=^5006577
  1. ;;^UTILITY(U,$J,358.3,32627,0)
  1. ;;=H65.112^^99^1347^43
  1. ;;^UTILITY(U,$J,358.3,32627,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32627,1,3,0)
  1. ;;=3^Otitis Media,Serous Allergic,Left Ear
  1. ;;^UTILITY(U,$J,358.3,32627,1,4,0)
  1. ;;=4^H65.112
  1. ;;^UTILITY(U,$J,358.3,32627,2)
  1. ;;=^5006578
  1. ;;^UTILITY(U,$J,358.3,32628,0)
  1. ;;=H65.113^^99^1347^42
  1. ;;^UTILITY(U,$J,358.3,32628,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32628,1,3,0)
  1. ;;=3^Otitis Media,Serous Allergic,Bilateral
  1. ;;^UTILITY(U,$J,358.3,32628,1,4,0)
  1. ;;=4^H65.113
  1. ;;^UTILITY(U,$J,358.3,32628,2)
  1. ;;=^5006579
  1. ;;^UTILITY(U,$J,358.3,32629,0)
  1. ;;=H65.21^^99^1347^47
  1. ;;^UTILITY(U,$J,358.3,32629,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32629,1,3,0)
  1. ;;=3^Otitis Media,Serous Chronic,Right Ear
  1. ;;^UTILITY(U,$J,358.3,32629,1,4,0)
  1. ;;=4^H65.21
  1. ;;^UTILITY(U,$J,358.3,32629,2)
  1. ;;=^5006594
  1. ;;^UTILITY(U,$J,358.3,32630,0)
  1. ;;=H65.22^^99^1347^46
  1. ;;^UTILITY(U,$J,358.3,32630,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32630,1,3,0)
  1. ;;=3^Otitis Media,Serous Chronic,Left Ear
  1. ;;^UTILITY(U,$J,358.3,32630,1,4,0)
  1. ;;=4^H65.22
  1. ;;^UTILITY(U,$J,358.3,32630,2)
  1. ;;=^5006595
  1. ;;^UTILITY(U,$J,358.3,32631,0)
  1. ;;=H65.23^^99^1347^45
  1. ;;^UTILITY(U,$J,358.3,32631,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32631,1,3,0)
  1. ;;=3^Otitis Media,Serous Chronic,Bilateral
  1. ;;^UTILITY(U,$J,358.3,32631,1,4,0)
  1. ;;=4^H65.23
  1. ;;^UTILITY(U,$J,358.3,32631,2)
  1. ;;=^5006596
  1. ;;^UTILITY(U,$J,358.3,32632,0)
  1. ;;=H93.12^^99^1347^72
  1. ;;^UTILITY(U,$J,358.3,32632,1,0)
  1. ;;=^358.31IA^4^2