IBDEI025 ; ; 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,4897,1,3,0)
 ;;=3^Meningitis
 ;;^UTILITY(U,$J,358.3,4897,1,4,0)
 ;;=4^G03.9
 ;;^UTILITY(U,$J,358.3,4897,2)
 ;;=^5003729
 ;;^UTILITY(U,$J,358.3,4898,0)
 ;;=G04.90^^32^277^41
 ;;^UTILITY(U,$J,358.3,4898,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4898,1,3,0)
 ;;=3^Encephalitis & Encephalomyelitis
 ;;^UTILITY(U,$J,358.3,4898,1,4,0)
 ;;=4^G04.90
 ;;^UTILITY(U,$J,358.3,4898,2)
 ;;=^5003741
 ;;^UTILITY(U,$J,358.3,4899,0)
 ;;=G93.40^^32^277^42
 ;;^UTILITY(U,$J,358.3,4899,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4899,1,3,0)
 ;;=3^Encephalopathy
 ;;^UTILITY(U,$J,358.3,4899,1,4,0)
 ;;=4^G93.40
 ;;^UTILITY(U,$J,358.3,4899,2)
 ;;=^329917
 ;;^UTILITY(U,$J,358.3,4900,0)
 ;;=I63.81^^32^277^18
 ;;^UTILITY(U,$J,358.3,4900,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4900,1,3,0)
 ;;=3^Lacunar Infarction
 ;;^UTILITY(U,$J,358.3,4900,1,4,0)
 ;;=4^I63.81
 ;;^UTILITY(U,$J,358.3,4900,2)
 ;;=^5157372
 ;;^UTILITY(U,$J,358.3,4901,0)
 ;;=R51.0^^32^277^1
 ;;^UTILITY(U,$J,358.3,4901,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4901,1,3,0)
 ;;=3^Headache w/ Orthostatic Component,NEC
 ;;^UTILITY(U,$J,358.3,4901,1,4,0)
 ;;=4^R51.0
 ;;^UTILITY(U,$J,358.3,4901,2)
 ;;=^5159305
 ;;^UTILITY(U,$J,358.3,4902,0)
 ;;=R51.9^^32^277^1.5
 ;;^UTILITY(U,$J,358.3,4902,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4902,1,3,0)
 ;;=3^Headache,Unspec
 ;;^UTILITY(U,$J,358.3,4902,1,4,0)
 ;;=4^R51.9
 ;;^UTILITY(U,$J,358.3,4902,2)
 ;;=^5159306
 ;;^UTILITY(U,$J,358.3,4903,0)
 ;;=G04.82^^32^277^12
 ;;^UTILITY(U,$J,358.3,4903,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4903,1,3,0)
 ;;=3^Acute Flaccid Myelitis
 ;;^UTILITY(U,$J,358.3,4903,1,4,0)
 ;;=4^G04.82
 ;;^UTILITY(U,$J,358.3,4903,2)
 ;;=^5161156
 ;;^UTILITY(U,$J,358.3,4904,0)
 ;;=L03.90^^32^278^1
 ;;^UTILITY(U,$J,358.3,4904,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4904,1,3,0)
 ;;=3^Cellulitis
 ;;^UTILITY(U,$J,358.3,4904,1,4,0)
 ;;=4^L03.90
 ;;^UTILITY(U,$J,358.3,4904,2)
 ;;=^5009067
 ;;^UTILITY(U,$J,358.3,4905,0)
 ;;=L03.019^^32^278^2
 ;;^UTILITY(U,$J,358.3,4905,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4905,1,3,0)
 ;;=3^Cellulitis,Finger/Paronychia
 ;;^UTILITY(U,$J,358.3,4905,1,4,0)
 ;;=4^L03.019
 ;;^UTILITY(U,$J,358.3,4905,2)
 ;;=^5009021
 ;;^UTILITY(U,$J,358.3,4906,0)
 ;;=L03.119^^32^278^3
 ;;^UTILITY(U,$J,358.3,4906,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4906,1,3,0)
 ;;=3^Cellulitis,Limb
 ;;^UTILITY(U,$J,358.3,4906,1,4,0)
 ;;=4^L03.119
 ;;^UTILITY(U,$J,358.3,4906,2)
 ;;=^5009036
 ;;^UTILITY(U,$J,358.3,4907,0)
 ;;=M72.6^^32^278^4
 ;;^UTILITY(U,$J,358.3,4907,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4907,1,3,0)
 ;;=3^Necrotizing Fasciitis
 ;;^UTILITY(U,$J,358.3,4907,1,4,0)
 ;;=4^M72.6
 ;;^UTILITY(U,$J,358.3,4907,2)
 ;;=^303314
 ;;^UTILITY(U,$J,358.3,4908,0)
 ;;=L01.00^^32^278^5
 ;;^UTILITY(U,$J,358.3,4908,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4908,1,3,0)
 ;;=3^Impetigo
 ;;^UTILITY(U,$J,358.3,4908,1,4,0)
 ;;=4^L01.00
 ;;^UTILITY(U,$J,358.3,4908,2)
 ;;=^5008938
 ;;^UTILITY(U,$J,358.3,4909,0)
 ;;=L02.91^^32^278^6
 ;;^UTILITY(U,$J,358.3,4909,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4909,1,3,0)
 ;;=3^Cutaneous Abscess
 ;;^UTILITY(U,$J,358.3,4909,1,4,0)
 ;;=4^L02.91
 ;;^UTILITY(U,$J,358.3,4909,2)
 ;;=^5009016
 ;;^UTILITY(U,$J,358.3,4910,0)
 ;;=L72.3^^32^278^7
 ;;^UTILITY(U,$J,358.3,4910,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4910,1,3,0)
 ;;=3^Sebaceous Cyst
 ;;^UTILITY(U,$J,358.3,4910,1,4,0)
 ;;=4^L72.3
 ;;^UTILITY(U,$J,358.3,4910,2)
 ;;=^5009281
 ;;^UTILITY(U,$J,358.3,4911,0)
 ;;=R21.^^32^278^8
 ;;^UTILITY(U,$J,358.3,4911,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4911,1,3,0)
 ;;=3^Rash & Oth Non-Specific Skin Eruption
 ;;^UTILITY(U,$J,358.3,4911,1,4,0)
 ;;=4^R21.
 ;;^UTILITY(U,$J,358.3,4911,2)
 ;;=^5019283
 ;;^UTILITY(U,$J,358.3,4912,0)
 ;;=L20.9^^32^278^10
 ;;^UTILITY(U,$J,358.3,4912,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4912,1,3,0)
 ;;=3^Atopic Dermatitis
 ;;^UTILITY(U,$J,358.3,4912,1,4,0)
 ;;=4^L20.9
 ;;^UTILITY(U,$J,358.3,4912,2)
 ;;=^5009113
 ;;^UTILITY(U,$J,358.3,4913,0)
 ;;=L25.9^^32^278^11
 ;;^UTILITY(U,$J,358.3,4913,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4913,1,3,0)
 ;;=3^Contact Dermatitis
 ;;^UTILITY(U,$J,358.3,4913,1,4,0)
 ;;=4^L25.9
 ;;^UTILITY(U,$J,358.3,4913,2)
 ;;=^5133647
 ;;^UTILITY(U,$J,358.3,4914,0)
 ;;=L50.9^^32^278^12
 ;;^UTILITY(U,$J,358.3,4914,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4914,1,3,0)
 ;;=3^Urticaria
 ;;^UTILITY(U,$J,358.3,4914,1,4,0)
 ;;=4^L50.9
 ;;^UTILITY(U,$J,358.3,4914,2)
 ;;=^5009204
 ;;^UTILITY(U,$J,358.3,4915,0)
 ;;=T78.3XXA^^32^278^13
 ;;^UTILITY(U,$J,358.3,4915,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4915,1,3,0)
 ;;=3^Angioedema
 ;;^UTILITY(U,$J,358.3,4915,1,4,0)
 ;;=4^T78.3XXA
 ;;^UTILITY(U,$J,358.3,4915,2)
 ;;=^5054281
 ;;^UTILITY(U,$J,358.3,4916,0)
 ;;=T78.40XA^^32^278^14
 ;;^UTILITY(U,$J,358.3,4916,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4916,1,3,0)
 ;;=3^Allergy
 ;;^UTILITY(U,$J,358.3,4916,1,4,0)
 ;;=4^T78.40XA
 ;;^UTILITY(U,$J,358.3,4916,2)
 ;;=^5054284
 ;;^UTILITY(U,$J,358.3,4917,0)
 ;;=T78.2XXA^^32^278^15
 ;;^UTILITY(U,$J,358.3,4917,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4917,1,3,0)
 ;;=3^Anaphylactic Shock
 ;;^UTILITY(U,$J,358.3,4917,1,4,0)
 ;;=4^T78.2XXA
 ;;^UTILITY(U,$J,358.3,4917,2)
 ;;=^5054278
 ;;^UTILITY(U,$J,358.3,4918,0)
 ;;=B35.9^^32^278^16
 ;;^UTILITY(U,$J,358.3,4918,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4918,1,3,0)
 ;;=3^Dermatophytosis (Tinea)
 ;;^UTILITY(U,$J,358.3,4918,1,4,0)
 ;;=4^B35.9
 ;;^UTILITY(U,$J,358.3,4918,2)
 ;;=^5000607
 ;;^UTILITY(U,$J,358.3,4919,0)
 ;;=L60.0^^32^278^17
 ;;^UTILITY(U,$J,358.3,4919,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4919,1,3,0)
 ;;=3^Ingrown Nail
 ;;^UTILITY(U,$J,358.3,4919,1,4,0)
 ;;=4^L60.0
 ;;^UTILITY(U,$J,358.3,4919,2)
 ;;=^5009234
 ;;^UTILITY(U,$J,358.3,4920,0)
 ;;=B35.1^^32^278^18
 ;;^UTILITY(U,$J,358.3,4920,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4920,1,3,0)
 ;;=3^Tinea Unguium (Onychomycosis)(Finger/Toe)
 ;;^UTILITY(U,$J,358.3,4920,1,4,0)
 ;;=4^B35.1
 ;;^UTILITY(U,$J,358.3,4920,2)
 ;;=^119748
 ;;^UTILITY(U,$J,358.3,4921,0)
 ;;=L89.309^^32^278^19
 ;;^UTILITY(U,$J,358.3,4921,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4921,1,3,0)
 ;;=3^Pressure Ulcer,Buttock
 ;;^UTILITY(U,$J,358.3,4921,1,4,0)
 ;;=4^L89.309
 ;;^UTILITY(U,$J,358.3,4921,2)
 ;;=^5133672
 ;;^UTILITY(U,$J,358.3,4922,0)
 ;;=L89.159^^32^278^20
 ;;^UTILITY(U,$J,358.3,4922,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4922,1,3,0)
 ;;=3^Pressure Ulcer,Sacral Region
 ;;^UTILITY(U,$J,358.3,4922,1,4,0)
 ;;=4^L89.159
 ;;^UTILITY(U,$J,358.3,4922,2)
 ;;=^5009373
 ;;^UTILITY(U,$J,358.3,4923,0)
 ;;=L97.909^^32^278^21
 ;;^UTILITY(U,$J,358.3,4923,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4923,1,3,0)
 ;;=3^Non-Pressure Ulcer,Lower Leg
 ;;^UTILITY(U,$J,358.3,4923,1,4,0)
 ;;=4^L97.909
 ;;^UTILITY(U,$J,358.3,4923,2)
 ;;=^5133687
 ;;^UTILITY(U,$J,358.3,4924,0)
 ;;=B02.9^^32^278^28
 ;;^UTILITY(U,$J,358.3,4924,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4924,1,3,0)
 ;;=3^Zoster w/o Complications
 ;;^UTILITY(U,$J,358.3,4924,1,4,0)
 ;;=4^B02.9
 ;;^UTILITY(U,$J,358.3,4924,2)
 ;;=^5000501
 ;;^UTILITY(U,$J,358.3,4925,0)
 ;;=B00.9^^32^278^29
 ;;^UTILITY(U,$J,358.3,4925,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4925,1,3,0)
 ;;=3^Herpesviral Infection
 ;;^UTILITY(U,$J,358.3,4925,1,4,0)
 ;;=4^B00.9
 ;;^UTILITY(U,$J,358.3,4925,2)
 ;;=^5000480
 ;;^UTILITY(U,$J,358.3,4926,0)
 ;;=L55.9^^32^278^30
 ;;^UTILITY(U,$J,358.3,4926,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4926,1,3,0)
 ;;=3^Sunburn
 ;;^UTILITY(U,$J,358.3,4926,1,4,0)
 ;;=4^L55.9
 ;;^UTILITY(U,$J,358.3,4926,2)
 ;;=^5009213
 ;;^UTILITY(U,$J,358.3,4927,0)
 ;;=L51.1^^32^278^32
 ;;^UTILITY(U,$J,358.3,4927,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4927,1,3,0)
 ;;=3^Stevens-Johnson Syndrome
 ;;^UTILITY(U,$J,358.3,4927,1,4,0)
 ;;=4^L51.1
 ;;^UTILITY(U,$J,358.3,4927,2)
 ;;=^336636
 ;;^UTILITY(U,$J,358.3,4928,0)
 ;;=L10.9^^32^278^33
 ;;^UTILITY(U,$J,358.3,4928,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4928,1,3,0)
 ;;=3^Pemphigus
 ;;^UTILITY(U,$J,358.3,4928,1,4,0)
 ;;=4^L10.9
 ;;^UTILITY(U,$J,358.3,4928,2)
 ;;=^5009090
 ;;^UTILITY(U,$J,358.3,4929,0)
 ;;=L51.9^^32^278^34
 ;;^UTILITY(U,$J,358.3,4929,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4929,1,3,0)
 ;;=3^Erythema Multiforme
 ;;^UTILITY(U,$J,358.3,4929,1,4,0)
 ;;=4^L51.9
 ;;^UTILITY(U,$J,358.3,4929,2)
 ;;=^336759
 ;;^UTILITY(U,$J,358.3,4930,0)
 ;;=L88.^^32^278^35
 ;;^UTILITY(U,$J,358.3,4930,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4930,1,3,0)
 ;;=3^Pyoderma Gangrenosum
 ;;^UTILITY(U,$J,358.3,4930,1,4,0)
 ;;=4^L88.
 ;;^UTILITY(U,$J,358.3,4930,2)
 ;;=^186812
 ;;^UTILITY(U,$J,358.3,4931,0)
 ;;=L90.5^^32^278^36
 ;;^UTILITY(U,$J,358.3,4931,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4931,1,3,0)
 ;;=3^Scar Conditions/Fibrosis of Skin
 ;;^UTILITY(U,$J,358.3,4931,1,4,0)
 ;;=4^L90.5
 ;;^UTILITY(U,$J,358.3,4931,2)
 ;;=^5009455
 ;;^UTILITY(U,$J,358.3,4932,0)
 ;;=B86.^^32^278^9
 ;;^UTILITY(U,$J,358.3,4932,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4932,1,3,0)
 ;;=3^Scabies
 ;;^UTILITY(U,$J,358.3,4932,1,4,0)
 ;;=4^B86.
 ;;^UTILITY(U,$J,358.3,4932,2)
 ;;=^108096
 ;;^UTILITY(U,$J,358.3,4933,0)
 ;;=T30.0^^32^278^31
 ;;^UTILITY(U,$J,358.3,4933,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4933,1,3,0)
 ;;=3^Burn,Unsp Degree
 ;;^UTILITY(U,$J,358.3,4933,1,4,0)
 ;;=4^T30.0
 ;;^UTILITY(U,$J,358.3,4933,2)
 ;;=^5048922
 ;;^UTILITY(U,$J,358.3,4934,0)
 ;;=L97.825^^32^278^22
 ;;^UTILITY(U,$J,358.3,4934,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4934,1,3,0)
 ;;=3^Non-Pressure Ulcer,Oth Part Lt Lower Leg w/ Musl Invlv w/o Necrosis
 ;;^UTILITY(U,$J,358.3,4934,1,4,0)
 ;;=4^L97.825
 ;;^UTILITY(U,$J,358.3,4934,2)
 ;;=^5151481
 ;;^UTILITY(U,$J,358.3,4935,0)
 ;;=L97.826^^32^278^23
 ;;^UTILITY(U,$J,358.3,4935,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4935,1,3,0)
 ;;=3^Non-Pressure Ulcer,Oth Part Lt Lower Leg w/ Bone Invlv w/o Necrosis
 ;;^UTILITY(U,$J,358.3,4935,1,4,0)
 ;;=4^L97.826
 ;;^UTILITY(U,$J,358.3,4935,2)
 ;;=^5151482
 ;;^UTILITY(U,$J,358.3,4936,0)
 ;;=L97.828^^32^278^24
 ;;^UTILITY(U,$J,358.3,4936,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4936,1,3,0)
 ;;=3^Non-Pressure Ulcer,Oth Part Lt Lower Leg w/ Oth Spec Severity
 ;;^UTILITY(U,$J,358.3,4936,1,4,0)
 ;;=4^L97.828
 ;;^UTILITY(U,$J,358.3,4936,2)
 ;;=^5151483
 ;;^UTILITY(U,$J,358.3,4937,0)
 ;;=L97.815^^32^278^25
 ;;^UTILITY(U,$J,358.3,4937,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4937,1,3,0)
 ;;=3^Non-Pressure Ulcer,Oth Part Rt Lower Leg w/ Musl Invlv w/o Necrosis
 ;;^UTILITY(U,$J,358.3,4937,1,4,0)
 ;;=4^L97.815
 ;;^UTILITY(U,$J,358.3,4937,2)
 ;;=^5151478
 ;;^UTILITY(U,$J,358.3,4938,0)
 ;;=L97.816^^32^278^26
 ;;^UTILITY(U,$J,358.3,4938,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4938,1,3,0)
 ;;=3^Non-Pressure Ulcer,Oth Part Rt Lower Leg w/ Bone Invlv w/o Necrosis
 ;;^UTILITY(U,$J,358.3,4938,1,4,0)
 ;;=4^L97.816
 ;;^UTILITY(U,$J,358.3,4938,2)
 ;;=^5151479
 ;;^UTILITY(U,$J,358.3,4939,0)
 ;;=L97.818^^32^278^27
 ;;^UTILITY(U,$J,358.3,4939,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4939,1,3,0)
 ;;=3^Non-Pressure Ulcer,Oth Part Rt Lower Leg w/ Oth Spec Severity
 ;;^UTILITY(U,$J,358.3,4939,1,4,0)
 ;;=4^L97.818
 ;;^UTILITY(U,$J,358.3,4939,2)
 ;;=^5151480
 ;;^UTILITY(U,$J,358.3,4940,0)
 ;;=L98.9^^32^278^37
 ;;^UTILITY(U,$J,358.3,4940,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4940,1,3,0)
 ;;=3^Skin Disorder
 ;;^UTILITY(U,$J,358.3,4940,1,4,0)
 ;;=4^L98.9
 ;;^UTILITY(U,$J,358.3,4940,2)
 ;;=^5009595
 ;;^UTILITY(U,$J,358.3,4941,0)
 ;;=S80.829A^^32^278^38
 ;;^UTILITY(U,$J,358.3,4941,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4941,1,3,0)
 ;;=3^Blister of Lower Leg
 ;;^UTILITY(U,$J,358.3,4941,1,4,0)
 ;;=4^S80.829A
 ;;^UTILITY(U,$J,358.3,4941,2)
 ;;=^5039975
 ;;^UTILITY(U,$J,358.3,4942,0)
 ;;=L60.0^^32^279^1
 ;;^UTILITY(U,$J,358.3,4942,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4942,1,3,0)
 ;;=3^Ingrown Toenail
 ;;^UTILITY(U,$J,358.3,4942,1,4,0)
 ;;=4^L60.0
 ;;^UTILITY(U,$J,358.3,4942,2)
 ;;=^5009234
 ;;^UTILITY(U,$J,358.3,4943,0)
 ;;=M10.9^^32^279^2
 ;;^UTILITY(U,$J,358.3,4943,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4943,1,3,0)
 ;;=3^Gout
 ;;^UTILITY(U,$J,358.3,4943,1,4,0)
 ;;=4^M10.9
 ;;^UTILITY(U,$J,358.3,4943,2)
 ;;=^5010404
 ;;^UTILITY(U,$J,358.3,4944,0)
 ;;=S90.416A^^32^279^3
 ;;^UTILITY(U,$J,358.3,4944,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4944,1,3,0)
 ;;=3^Toe Abrasion,Lesser Toe
 ;;^UTILITY(U,$J,358.3,4944,1,4,0)
 ;;=4^S90.416A
 ;;^UTILITY(U,$J,358.3,4944,2)
 ;;=^5043904
 ;;^UTILITY(U,$J,358.3,4945,0)
 ;;=S90.219A^^32^279^4
 ;;^UTILITY(U,$J,358.3,4945,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4945,1,3,0)
 ;;=3^Toe Contusion,Greater w/ Nail Damage
 ;;^UTILITY(U,$J,358.3,4945,1,4,0)
 ;;=4^S90.219A
 ;;^UTILITY(U,$J,358.3,4945,2)
 ;;=^5137382
 ;;^UTILITY(U,$J,358.3,4946,0)
 ;;=S90.119A^^32^279^5
 ;;^UTILITY(U,$J,358.3,4946,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4946,1,3,0)
 ;;=3^Toe Contusion,Greater w/o Nail Damage
 ;;^UTILITY(U,$J,358.3,4946,1,4,0)
 ;;=4^S90.119A
 ;;^UTILITY(U,$J,358.3,4946,2)
 ;;=^5043862
 ;;^UTILITY(U,$J,358.3,4947,0)
 ;;=S90.229A^^32^279^6
 ;;^UTILITY(U,$J,358.3,4947,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4947,1,3,0)
 ;;=3^Toe Contusion,Lesser w/ Nail Damage
 ;;^UTILITY(U,$J,358.3,4947,1,4,0)
 ;;=4^S90.229A
 ;;^UTILITY(U,$J,358.3,4947,2)
 ;;=^5137388
 ;;^UTILITY(U,$J,358.3,4948,0)
 ;;=S90.129A^^32^279^7
 ;;^UTILITY(U,$J,358.3,4948,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4948,1,3,0)
 ;;=3^Toe Contusion,Lesser w/o Nail Damage
 ;;^UTILITY(U,$J,358.3,4948,1,4,0)
 ;;=4^S90.129A
 ;;^UTILITY(U,$J,358.3,4948,2)
 ;;=^5043871
 ;;^UTILITY(U,$J,358.3,4949,0)
 ;;=S93.106A^^32^279^8
 ;;^UTILITY(U,$J,358.3,4949,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4949,1,3,0)
 ;;=3^Toe Dislocation
 ;;^UTILITY(U,$J,358.3,4949,1,4,0)
 ;;=4^S93.106A
 ;;^UTILITY(U,$J,358.3,4949,2)
 ;;=^5137654
 ;;^UTILITY(U,$J,358.3,4950,0)
 ;;=S92.919A^^32^279^9
 ;;^UTILITY(U,$J,358.3,4950,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4950,1,3,0)
 ;;=3^Toe Fracture
 ;;^UTILITY(U,$J,358.3,4950,1,4,0)
 ;;=4^S92.919A
 ;;^UTILITY(U,$J,358.3,4950,2)
 ;;=^5137644
 ;;^UTILITY(U,$J,358.3,4951,0)
 ;;=S90.929A^^32^279^10
 ;;^UTILITY(U,$J,358.3,4951,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4951,1,3,0)
 ;;=3^Foot Abrasion
 ;;^UTILITY(U,$J,358.3,4951,1,4,0)
 ;;=4^S90.929A
 ;;^UTILITY(U,$J,358.3,4951,2)
 ;;=^5137394
 ;;^UTILITY(U,$J,358.3,4952,0)
 ;;=S90.30XA^^32^279^11
 ;;^UTILITY(U,$J,358.3,4952,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4952,1,3,0)
 ;;=3^Foot Contusion
 ;;^UTILITY(U,$J,358.3,4952,1,4,0)
 ;;=4^S90.30XA
 ;;^UTILITY(U,$J,358.3,4952,2)
 ;;=^5043880
 ;;^UTILITY(U,$J,358.3,4953,0)
 ;;=S93.609A^^32^279^12
 ;;^UTILITY(U,$J,358.3,4953,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4953,1,3,0)
 ;;=3^Foot Sprain
 ;;^UTILITY(U,$J,358.3,4953,1,4,0)
 ;;=4^S93.609A
 ;;^UTILITY(U,$J,358.3,4953,2)
 ;;=^5137690
 ;;^UTILITY(U,$J,358.3,4954,0)
 ;;=S90.519A^^32^279^13
 ;;^UTILITY(U,$J,358.3,4954,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4954,1,3,0)
 ;;=3^Ankle Abrasion
 ;;^UTILITY(U,$J,358.3,4954,1,4,0)
 ;;=4^S90.519A
 ;;^UTILITY(U,$J,358.3,4954,2)
 ;;=^5044003
 ;;^UTILITY(U,$J,358.3,4955,0)
 ;;=S90.00XA^^32^279^14
 ;;^UTILITY(U,$J,358.3,4955,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4955,1,3,0)
 ;;=3^Ankle Contusion
 ;;^UTILITY(U,$J,358.3,4955,1,4,0)
 ;;=4^S90.00XA
 ;;^UTILITY(U,$J,358.3,4955,2)
 ;;=^5043847
 ;;^UTILITY(U,$J,358.3,4956,0)
 ;;=S93.409A^^32^279^15
 ;;^UTILITY(U,$J,358.3,4956,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4956,1,3,0)
 ;;=3^Ankle Sprain
 ;;^UTILITY(U,$J,358.3,4956,1,4,0)
 ;;=4^S93.409A
 ;;^UTILITY(U,$J,358.3,4956,2)
 ;;=^5137675
 ;;^UTILITY(U,$J,358.3,4957,0)
 ;;=S82.109A^^32^279^16
 ;;^UTILITY(U,$J,358.3,4957,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4957,1,3,0)
 ;;=3^Tibia Fracture,Proximal
 ;;^UTILITY(U,$J,358.3,4957,1,4,0)
 ;;=4^S82.109A
 ;;^UTILITY(U,$J,358.3,4957,2)
 ;;=^5136741
 ;;^UTILITY(U,$J,358.3,4958,0)
 ;;=S82.209A^^32^279^17
 ;;^UTILITY(U,$J,358.3,4958,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4958,1,3,0)
 ;;=3^Tibia Fracture,Shaft
 ;;^UTILITY(U,$J,358.3,4958,1,4,0)
 ;;=4^S82.209A
 ;;^UTILITY(U,$J,358.3,4958,2)
 ;;=^5136787
 ;;^UTILITY(U,$J,358.3,4959,0)
 ;;=S82.309A^^32^279^18
 ;;^UTILITY(U,$J,358.3,4959,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4959,1,3,0)
 ;;=3^Tibia Fracture,Distal
 ;;^UTILITY(U,$J,358.3,4959,1,4,0)
 ;;=4^S82.309A
 ;;^UTILITY(U,$J,358.3,4959,2)
 ;;=^5136826
 ;;^UTILITY(U,$J,358.3,4960,0)
 ;;=S89.209A^^32^279^19
 ;;^UTILITY(U,$J,358.3,4960,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4960,1,3,0)
 ;;=3^Fibula Fracture,Proximal
 ;;^UTILITY(U,$J,358.3,4960,1,4,0)
 ;;=4^S89.209A
 ;;^UTILITY(U,$J,358.3,4960,2)
 ;;=^5137313
 ;;^UTILITY(U,$J,358.3,4961,0)
 ;;=S82.409A^^32^279^20
 ;;^UTILITY(U,$J,358.3,4961,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4961,1,3,0)
 ;;=3^Fibula Fracture,Shaft
 ;;^UTILITY(U,$J,358.3,4961,1,4,0)
 ;;=4^S82.409A
 ;;^UTILITY(U,$J,358.3,4961,2)
 ;;=^5136894
 ;;^UTILITY(U,$J,358.3,4962,0)
 ;;=S89.309A^^32^279^21
 ;;^UTILITY(U,$J,358.3,4962,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4962,1,3,0)
 ;;=3^Fibula Fracture,Distal
 ;;^UTILITY(U,$J,358.3,4962,1,4,0)
 ;;=4^S89.309A
 ;;^UTILITY(U,$J,358.3,4962,2)
 ;;=^5137338
 ;;^UTILITY(U,$J,358.3,4963,0)
 ;;=S80.819A^^32^279^22
 ;;^UTILITY(U,$J,358.3,4963,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4963,1,3,0)
 ;;=3^Lower Leg Abrasion
 ;;^UTILITY(U,$J,358.3,4963,1,4,0)
 ;;=4^S80.819A
 ;;^UTILITY(U,$J,358.3,4963,2)
 ;;=^5039966
 ;;^UTILITY(U,$J,358.3,4964,0)
 ;;=S80.10XA^^32^279^23
 ;;^UTILITY(U,$J,358.3,4964,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4964,1,3,0)
 ;;=3^Lower Leg Contusion
 ;;^UTILITY(U,$J,358.3,4964,1,4,0)
 ;;=4^S80.10XA
 ;;^UTILITY(U,$J,358.3,4964,2)
 ;;=^5039897
 ;;^UTILITY(U,$J,358.3,4965,0)
 ;;=S80.219A^^32^279^24
 ;;^UTILITY(U,$J,358.3,4965,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4965,1,3,0)
 ;;=3^Knee Abrasion
 ;;^UTILITY(U,$J,358.3,4965,1,4,0)
 ;;=4^S80.219A
 ;;^UTILITY(U,$J,358.3,4965,2)
 ;;=^5039912
 ;;^UTILITY(U,$J,358.3,4966,0)
 ;;=S80.00XA^^32^279^25
 ;;^UTILITY(U,$J,358.3,4966,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4966,1,3,0)
 ;;=3^Knee Contusion
 ;;^UTILITY(U,$J,358.3,4966,1,4,0)
 ;;=4^S80.00XA
 ;;^UTILITY(U,$J,358.3,4966,2)
 ;;=^5039888
 ;;^UTILITY(U,$J,358.3,4967,0)
 ;;=M22.40^^32^279^26
 ;;^UTILITY(U,$J,358.3,4967,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4967,1,3,0)
 ;;=3^Knee Chondromalacia Patellae
 ;;^UTILITY(U,$J,358.3,4967,1,4,0)
 ;;=4^M22.40
 ;;^UTILITY(U,$J,358.3,4967,2)
 ;;=^5011185
 ;;^UTILITY(U,$J,358.3,4968,0)
 ;;=M25.469^^32^279^27
 ;;^UTILITY(U,$J,358.3,4968,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4968,1,3,0)
 ;;=3^Knee Effusion
 ;;^UTILITY(U,$J,358.3,4968,1,4,0)
 ;;=4^M25.469
 ;;^UTILITY(U,$J,358.3,4968,2)
 ;;=^5011593
 ;;^UTILITY(U,$J,358.3,4969,0)
 ;;=M25.069^^32^279^28
 
--- Routine Detail   --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HIBDEI025   19773     printed  Sep 23, 2025@19:16:07                                                                                                                                                                                                   Page 2
IBDEI025  ; ; 01-AUG-2022
 +1       ;;3.0;IB ENCOUNTER FORM IMP/EXP;;AUG 01, 2022
 +2        if 'DIFQR(358.3)
               QUIT 
           FOR I=1:2
               SET X=$TEXT(Q+I)
               if X=""
                   QUIT 
               SET Y=$EXTRACT($TEXT(Q+I+1),4,999)
               SET X=$EXTRACT(X,4,999)
               if $ASCII(Y)=126
                   SET I=I+1
                   SET Y=$EXTRACT(Y,2,999)_$EXTRACT($TEXT(Q+I+1),5,999)
               if $ASCII(Y)=61
                   SET Y=$EXTRACT(Y,2,999)
               XECUTE NO
              IF '$TEST
                   SET @X=Y
Q          QUIT 
 +1       ;;^UTILITY(U,$J,358.3,4897,1,3,0)
 +2       ;;=3^Meningitis
 +3       ;;^UTILITY(U,$J,358.3,4897,1,4,0)
 +4       ;;=4^G03.9
 +5       ;;^UTILITY(U,$J,358.3,4897,2)
 +6       ;;=^5003729
 +7       ;;^UTILITY(U,$J,358.3,4898,0)
 +8       ;;=G04.90^^32^277^41
 +9       ;;^UTILITY(U,$J,358.3,4898,1,0)
 +10      ;;=^358.31IA^4^2
 +11      ;;^UTILITY(U,$J,358.3,4898,1,3,0)
 +12      ;;=3^Encephalitis & Encephalomyelitis
 +13      ;;^UTILITY(U,$J,358.3,4898,1,4,0)
 +14      ;;=4^G04.90
 +15      ;;^UTILITY(U,$J,358.3,4898,2)
 +16      ;;=^5003741
 +17      ;;^UTILITY(U,$J,358.3,4899,0)
 +18      ;;=G93.40^^32^277^42
 +19      ;;^UTILITY(U,$J,358.3,4899,1,0)
 +20      ;;=^358.31IA^4^2
 +21      ;;^UTILITY(U,$J,358.3,4899,1,3,0)
 +22      ;;=3^Encephalopathy
 +23      ;;^UTILITY(U,$J,358.3,4899,1,4,0)
 +24      ;;=4^G93.40
 +25      ;;^UTILITY(U,$J,358.3,4899,2)
 +26      ;;=^329917
 +27      ;;^UTILITY(U,$J,358.3,4900,0)
 +28      ;;=I63.81^^32^277^18
 +29      ;;^UTILITY(U,$J,358.3,4900,1,0)
 +30      ;;=^358.31IA^4^2
 +31      ;;^UTILITY(U,$J,358.3,4900,1,3,0)
 +32      ;;=3^Lacunar Infarction
 +33      ;;^UTILITY(U,$J,358.3,4900,1,4,0)
 +34      ;;=4^I63.81
 +35      ;;^UTILITY(U,$J,358.3,4900,2)
 +36      ;;=^5157372
 +37      ;;^UTILITY(U,$J,358.3,4901,0)
 +38      ;;=R51.0^^32^277^1
 +39      ;;^UTILITY(U,$J,358.3,4901,1,0)
 +40      ;;=^358.31IA^4^2
 +41      ;;^UTILITY(U,$J,358.3,4901,1,3,0)
 +42      ;;=3^Headache w/ Orthostatic Component,NEC
 +43      ;;^UTILITY(U,$J,358.3,4901,1,4,0)
 +44      ;;=4^R51.0
 +45      ;;^UTILITY(U,$J,358.3,4901,2)
 +46      ;;=^5159305
 +47      ;;^UTILITY(U,$J,358.3,4902,0)
 +48      ;;=R51.9^^32^277^1.5
 +49      ;;^UTILITY(U,$J,358.3,4902,1,0)
 +50      ;;=^358.31IA^4^2
 +51      ;;^UTILITY(U,$J,358.3,4902,1,3,0)
 +52      ;;=3^Headache,Unspec
 +53      ;;^UTILITY(U,$J,358.3,4902,1,4,0)
 +54      ;;=4^R51.9
 +55      ;;^UTILITY(U,$J,358.3,4902,2)
 +56      ;;=^5159306
 +57      ;;^UTILITY(U,$J,358.3,4903,0)
 +58      ;;=G04.82^^32^277^12
 +59      ;;^UTILITY(U,$J,358.3,4903,1,0)
 +60      ;;=^358.31IA^4^2
 +61      ;;^UTILITY(U,$J,358.3,4903,1,3,0)
 +62      ;;=3^Acute Flaccid Myelitis
 +63      ;;^UTILITY(U,$J,358.3,4903,1,4,0)
 +64      ;;=4^G04.82
 +65      ;;^UTILITY(U,$J,358.3,4903,2)
 +66      ;;=^5161156
 +67      ;;^UTILITY(U,$J,358.3,4904,0)
 +68      ;;=L03.90^^32^278^1
 +69      ;;^UTILITY(U,$J,358.3,4904,1,0)
 +70      ;;=^358.31IA^4^2
 +71      ;;^UTILITY(U,$J,358.3,4904,1,3,0)
 +72      ;;=3^Cellulitis
 +73      ;;^UTILITY(U,$J,358.3,4904,1,4,0)
 +74      ;;=4^L03.90
 +75      ;;^UTILITY(U,$J,358.3,4904,2)
 +76      ;;=^5009067
 +77      ;;^UTILITY(U,$J,358.3,4905,0)
 +78      ;;=L03.019^^32^278^2
 +79      ;;^UTILITY(U,$J,358.3,4905,1,0)
 +80      ;;=^358.31IA^4^2
 +81      ;;^UTILITY(U,$J,358.3,4905,1,3,0)
 +82      ;;=3^Cellulitis,Finger/Paronychia
 +83      ;;^UTILITY(U,$J,358.3,4905,1,4,0)
 +84      ;;=4^L03.019
 +85      ;;^UTILITY(U,$J,358.3,4905,2)
 +86      ;;=^5009021
 +87      ;;^UTILITY(U,$J,358.3,4906,0)
 +88      ;;=L03.119^^32^278^3
 +89      ;;^UTILITY(U,$J,358.3,4906,1,0)
 +90      ;;=^358.31IA^4^2
 +91      ;;^UTILITY(U,$J,358.3,4906,1,3,0)
 +92      ;;=3^Cellulitis,Limb
 +93      ;;^UTILITY(U,$J,358.3,4906,1,4,0)
 +94      ;;=4^L03.119
 +95      ;;^UTILITY(U,$J,358.3,4906,2)
 +96      ;;=^5009036
 +97      ;;^UTILITY(U,$J,358.3,4907,0)
 +98      ;;=M72.6^^32^278^4
 +99      ;;^UTILITY(U,$J,358.3,4907,1,0)
 +100     ;;=^358.31IA^4^2
 +101     ;;^UTILITY(U,$J,358.3,4907,1,3,0)
 +102     ;;=3^Necrotizing Fasciitis
 +103     ;;^UTILITY(U,$J,358.3,4907,1,4,0)
 +104     ;;=4^M72.6
 +105     ;;^UTILITY(U,$J,358.3,4907,2)
 +106     ;;=^303314
 +107     ;;^UTILITY(U,$J,358.3,4908,0)
 +108     ;;=L01.00^^32^278^5
 +109     ;;^UTILITY(U,$J,358.3,4908,1,0)
 +110     ;;=^358.31IA^4^2
 +111     ;;^UTILITY(U,$J,358.3,4908,1,3,0)
 +112     ;;=3^Impetigo
 +113     ;;^UTILITY(U,$J,358.3,4908,1,4,0)
 +114     ;;=4^L01.00
 +115     ;;^UTILITY(U,$J,358.3,4908,2)
 +116     ;;=^5008938
 +117     ;;^UTILITY(U,$J,358.3,4909,0)
 +118     ;;=L02.91^^32^278^6
 +119     ;;^UTILITY(U,$J,358.3,4909,1,0)
 +120     ;;=^358.31IA^4^2
 +121     ;;^UTILITY(U,$J,358.3,4909,1,3,0)
 +122     ;;=3^Cutaneous Abscess
 +123     ;;^UTILITY(U,$J,358.3,4909,1,4,0)
 +124     ;;=4^L02.91
 +125     ;;^UTILITY(U,$J,358.3,4909,2)
 +126     ;;=^5009016
 +127     ;;^UTILITY(U,$J,358.3,4910,0)
 +128     ;;=L72.3^^32^278^7
 +129     ;;^UTILITY(U,$J,358.3,4910,1,0)
 +130     ;;=^358.31IA^4^2
 +131     ;;^UTILITY(U,$J,358.3,4910,1,3,0)
 +132     ;;=3^Sebaceous Cyst
 +133     ;;^UTILITY(U,$J,358.3,4910,1,4,0)
 +134     ;;=4^L72.3
 +135     ;;^UTILITY(U,$J,358.3,4910,2)
 +136     ;;=^5009281
 +137     ;;^UTILITY(U,$J,358.3,4911,0)
 +138     ;;=R21.^^32^278^8
 +139     ;;^UTILITY(U,$J,358.3,4911,1,0)
 +140     ;;=^358.31IA^4^2
 +141     ;;^UTILITY(U,$J,358.3,4911,1,3,0)
 +142     ;;=3^Rash & Oth Non-Specific Skin Eruption
 +143     ;;^UTILITY(U,$J,358.3,4911,1,4,0)
 +144     ;;=4^R21.
 +145     ;;^UTILITY(U,$J,358.3,4911,2)
 +146     ;;=^5019283
 +147     ;;^UTILITY(U,$J,358.3,4912,0)
 +148     ;;=L20.9^^32^278^10
 +149     ;;^UTILITY(U,$J,358.3,4912,1,0)
 +150     ;;=^358.31IA^4^2
 +151     ;;^UTILITY(U,$J,358.3,4912,1,3,0)
 +152     ;;=3^Atopic Dermatitis
 +153     ;;^UTILITY(U,$J,358.3,4912,1,4,0)
 +154     ;;=4^L20.9
 +155     ;;^UTILITY(U,$J,358.3,4912,2)
 +156     ;;=^5009113
 +157     ;;^UTILITY(U,$J,358.3,4913,0)
 +158     ;;=L25.9^^32^278^11
 +159     ;;^UTILITY(U,$J,358.3,4913,1,0)
 +160     ;;=^358.31IA^4^2
 +161     ;;^UTILITY(U,$J,358.3,4913,1,3,0)
 +162     ;;=3^Contact Dermatitis
 +163     ;;^UTILITY(U,$J,358.3,4913,1,4,0)
 +164     ;;=4^L25.9
 +165     ;;^UTILITY(U,$J,358.3,4913,2)
 +166     ;;=^5133647
 +167     ;;^UTILITY(U,$J,358.3,4914,0)
 +168     ;;=L50.9^^32^278^12
 +169     ;;^UTILITY(U,$J,358.3,4914,1,0)
 +170     ;;=^358.31IA^4^2
 +171     ;;^UTILITY(U,$J,358.3,4914,1,3,0)
 +172     ;;=3^Urticaria
 +173     ;;^UTILITY(U,$J,358.3,4914,1,4,0)
 +174     ;;=4^L50.9
 +175     ;;^UTILITY(U,$J,358.3,4914,2)
 +176     ;;=^5009204
 +177     ;;^UTILITY(U,$J,358.3,4915,0)
 +178     ;;=T78.3XXA^^32^278^13
 +179     ;;^UTILITY(U,$J,358.3,4915,1,0)
 +180     ;;=^358.31IA^4^2
 +181     ;;^UTILITY(U,$J,358.3,4915,1,3,0)
 +182     ;;=3^Angioedema
 +183     ;;^UTILITY(U,$J,358.3,4915,1,4,0)
 +184     ;;=4^T78.3XXA
 +185     ;;^UTILITY(U,$J,358.3,4915,2)
 +186     ;;=^5054281
 +187     ;;^UTILITY(U,$J,358.3,4916,0)
 +188     ;;=T78.40XA^^32^278^14
 +189     ;;^UTILITY(U,$J,358.3,4916,1,0)
 +190     ;;=^358.31IA^4^2
 +191     ;;^UTILITY(U,$J,358.3,4916,1,3,0)
 +192     ;;=3^Allergy
 +193     ;;^UTILITY(U,$J,358.3,4916,1,4,0)
 +194     ;;=4^T78.40XA
 +195     ;;^UTILITY(U,$J,358.3,4916,2)
 +196     ;;=^5054284
 +197     ;;^UTILITY(U,$J,358.3,4917,0)
 +198     ;;=T78.2XXA^^32^278^15
 +199     ;;^UTILITY(U,$J,358.3,4917,1,0)
 +200     ;;=^358.31IA^4^2
 +201     ;;^UTILITY(U,$J,358.3,4917,1,3,0)
 +202     ;;=3^Anaphylactic Shock
 +203     ;;^UTILITY(U,$J,358.3,4917,1,4,0)
 +204     ;;=4^T78.2XXA
 +205     ;;^UTILITY(U,$J,358.3,4917,2)
 +206     ;;=^5054278
 +207     ;;^UTILITY(U,$J,358.3,4918,0)
 +208     ;;=B35.9^^32^278^16
 +209     ;;^UTILITY(U,$J,358.3,4918,1,0)
 +210     ;;=^358.31IA^4^2
 +211     ;;^UTILITY(U,$J,358.3,4918,1,3,0)
 +212     ;;=3^Dermatophytosis (Tinea)
 +213     ;;^UTILITY(U,$J,358.3,4918,1,4,0)
 +214     ;;=4^B35.9
 +215     ;;^UTILITY(U,$J,358.3,4918,2)
 +216     ;;=^5000607
 +217     ;;^UTILITY(U,$J,358.3,4919,0)
 +218     ;;=L60.0^^32^278^17
 +219     ;;^UTILITY(U,$J,358.3,4919,1,0)
 +220     ;;=^358.31IA^4^2
 +221     ;;^UTILITY(U,$J,358.3,4919,1,3,0)
 +222     ;;=3^Ingrown Nail
 +223     ;;^UTILITY(U,$J,358.3,4919,1,4,0)
 +224     ;;=4^L60.0
 +225     ;;^UTILITY(U,$J,358.3,4919,2)
 +226     ;;=^5009234
 +227     ;;^UTILITY(U,$J,358.3,4920,0)
 +228     ;;=B35.1^^32^278^18
 +229     ;;^UTILITY(U,$J,358.3,4920,1,0)
 +230     ;;=^358.31IA^4^2
 +231     ;;^UTILITY(U,$J,358.3,4920,1,3,0)
 +232     ;;=3^Tinea Unguium (Onychomycosis)(Finger/Toe)
 +233     ;;^UTILITY(U,$J,358.3,4920,1,4,0)
 +234     ;;=4^B35.1
 +235     ;;^UTILITY(U,$J,358.3,4920,2)
 +236     ;;=^119748
 +237     ;;^UTILITY(U,$J,358.3,4921,0)
 +238     ;;=L89.309^^32^278^19
 +239     ;;^UTILITY(U,$J,358.3,4921,1,0)
 +240     ;;=^358.31IA^4^2
 +241     ;;^UTILITY(U,$J,358.3,4921,1,3,0)
 +242     ;;=3^Pressure Ulcer,Buttock
 +243     ;;^UTILITY(U,$J,358.3,4921,1,4,0)
 +244     ;;=4^L89.309
 +245     ;;^UTILITY(U,$J,358.3,4921,2)
 +246     ;;=^5133672
 +247     ;;^UTILITY(U,$J,358.3,4922,0)
 +248     ;;=L89.159^^32^278^20
 +249     ;;^UTILITY(U,$J,358.3,4922,1,0)
 +250     ;;=^358.31IA^4^2
 +251     ;;^UTILITY(U,$J,358.3,4922,1,3,0)
 +252     ;;=3^Pressure Ulcer,Sacral Region
 +253     ;;^UTILITY(U,$J,358.3,4922,1,4,0)
 +254     ;;=4^L89.159
 +255     ;;^UTILITY(U,$J,358.3,4922,2)
 +256     ;;=^5009373
 +257     ;;^UTILITY(U,$J,358.3,4923,0)
 +258     ;;=L97.909^^32^278^21
 +259     ;;^UTILITY(U,$J,358.3,4923,1,0)
 +260     ;;=^358.31IA^4^2
 +261     ;;^UTILITY(U,$J,358.3,4923,1,3,0)
 +262     ;;=3^Non-Pressure Ulcer,Lower Leg
 +263     ;;^UTILITY(U,$J,358.3,4923,1,4,0)
 +264     ;;=4^L97.909
 +265     ;;^UTILITY(U,$J,358.3,4923,2)
 +266     ;;=^5133687
 +267     ;;^UTILITY(U,$J,358.3,4924,0)
 +268     ;;=B02.9^^32^278^28
 +269     ;;^UTILITY(U,$J,358.3,4924,1,0)
 +270     ;;=^358.31IA^4^2
 +271     ;;^UTILITY(U,$J,358.3,4924,1,3,0)
 +272     ;;=3^Zoster w/o Complications
 +273     ;;^UTILITY(U,$J,358.3,4924,1,4,0)
 +274     ;;=4^B02.9
 +275     ;;^UTILITY(U,$J,358.3,4924,2)
 +276     ;;=^5000501
 +277     ;;^UTILITY(U,$J,358.3,4925,0)
 +278     ;;=B00.9^^32^278^29
 +279     ;;^UTILITY(U,$J,358.3,4925,1,0)
 +280     ;;=^358.31IA^4^2
 +281     ;;^UTILITY(U,$J,358.3,4925,1,3,0)
 +282     ;;=3^Herpesviral Infection
 +283     ;;^UTILITY(U,$J,358.3,4925,1,4,0)
 +284     ;;=4^B00.9
 +285     ;;^UTILITY(U,$J,358.3,4925,2)
 +286     ;;=^5000480
 +287     ;;^UTILITY(U,$J,358.3,4926,0)
 +288     ;;=L55.9^^32^278^30
 +289     ;;^UTILITY(U,$J,358.3,4926,1,0)
 +290     ;;=^358.31IA^4^2
 +291     ;;^UTILITY(U,$J,358.3,4926,1,3,0)
 +292     ;;=3^Sunburn
 +293     ;;^UTILITY(U,$J,358.3,4926,1,4,0)
 +294     ;;=4^L55.9
 +295     ;;^UTILITY(U,$J,358.3,4926,2)
 +296     ;;=^5009213
 +297     ;;^UTILITY(U,$J,358.3,4927,0)
 +298     ;;=L51.1^^32^278^32
 +299     ;;^UTILITY(U,$J,358.3,4927,1,0)
 +300     ;;=^358.31IA^4^2
 +301     ;;^UTILITY(U,$J,358.3,4927,1,3,0)
 +302     ;;=3^Stevens-Johnson Syndrome
 +303     ;;^UTILITY(U,$J,358.3,4927,1,4,0)
 +304     ;;=4^L51.1
 +305     ;;^UTILITY(U,$J,358.3,4927,2)
 +306     ;;=^336636
 +307     ;;^UTILITY(U,$J,358.3,4928,0)
 +308     ;;=L10.9^^32^278^33
 +309     ;;^UTILITY(U,$J,358.3,4928,1,0)
 +310     ;;=^358.31IA^4^2
 +311     ;;^UTILITY(U,$J,358.3,4928,1,3,0)
 +312     ;;=3^Pemphigus
 +313     ;;^UTILITY(U,$J,358.3,4928,1,4,0)
 +314     ;;=4^L10.9
 +315     ;;^UTILITY(U,$J,358.3,4928,2)
 +316     ;;=^5009090
 +317     ;;^UTILITY(U,$J,358.3,4929,0)
 +318     ;;=L51.9^^32^278^34
 +319     ;;^UTILITY(U,$J,358.3,4929,1,0)
 +320     ;;=^358.31IA^4^2
 +321     ;;^UTILITY(U,$J,358.3,4929,1,3,0)
 +322     ;;=3^Erythema Multiforme
 +323     ;;^UTILITY(U,$J,358.3,4929,1,4,0)
 +324     ;;=4^L51.9
 +325     ;;^UTILITY(U,$J,358.3,4929,2)
 +326     ;;=^336759
 +327     ;;^UTILITY(U,$J,358.3,4930,0)
 +328     ;;=L88.^^32^278^35
 +329     ;;^UTILITY(U,$J,358.3,4930,1,0)
 +330     ;;=^358.31IA^4^2
 +331     ;;^UTILITY(U,$J,358.3,4930,1,3,0)
 +332     ;;=3^Pyoderma Gangrenosum
 +333     ;;^UTILITY(U,$J,358.3,4930,1,4,0)
 +334     ;;=4^L88.
 +335     ;;^UTILITY(U,$J,358.3,4930,2)
 +336     ;;=^186812
 +337     ;;^UTILITY(U,$J,358.3,4931,0)
 +338     ;;=L90.5^^32^278^36
 +339     ;;^UTILITY(U,$J,358.3,4931,1,0)
 +340     ;;=^358.31IA^4^2
 +341     ;;^UTILITY(U,$J,358.3,4931,1,3,0)
 +342     ;;=3^Scar Conditions/Fibrosis of Skin
 +343     ;;^UTILITY(U,$J,358.3,4931,1,4,0)
 +344     ;;=4^L90.5
 +345     ;;^UTILITY(U,$J,358.3,4931,2)
 +346     ;;=^5009455
 +347     ;;^UTILITY(U,$J,358.3,4932,0)
 +348     ;;=B86.^^32^278^9
 +349     ;;^UTILITY(U,$J,358.3,4932,1,0)
 +350     ;;=^358.31IA^4^2
 +351     ;;^UTILITY(U,$J,358.3,4932,1,3,0)
 +352     ;;=3^Scabies
 +353     ;;^UTILITY(U,$J,358.3,4932,1,4,0)
 +354     ;;=4^B86.
 +355     ;;^UTILITY(U,$J,358.3,4932,2)
 +356     ;;=^108096
 +357     ;;^UTILITY(U,$J,358.3,4933,0)
 +358     ;;=T30.0^^32^278^31
 +359     ;;^UTILITY(U,$J,358.3,4933,1,0)
 +360     ;;=^358.31IA^4^2
 +361     ;;^UTILITY(U,$J,358.3,4933,1,3,0)
 +362     ;;=3^Burn,Unsp Degree
 +363     ;;^UTILITY(U,$J,358.3,4933,1,4,0)
 +364     ;;=4^T30.0
 +365     ;;^UTILITY(U,$J,358.3,4933,2)
 +366     ;;=^5048922
 +367     ;;^UTILITY(U,$J,358.3,4934,0)
 +368     ;;=L97.825^^32^278^22
 +369     ;;^UTILITY(U,$J,358.3,4934,1,0)
 +370     ;;=^358.31IA^4^2
 +371     ;;^UTILITY(U,$J,358.3,4934,1,3,0)
 +372     ;;=3^Non-Pressure Ulcer,Oth Part Lt Lower Leg w/ Musl Invlv w/o Necrosis
 +373     ;;^UTILITY(U,$J,358.3,4934,1,4,0)
 +374     ;;=4^L97.825
 +375     ;;^UTILITY(U,$J,358.3,4934,2)
 +376     ;;=^5151481
 +377     ;;^UTILITY(U,$J,358.3,4935,0)
 +378     ;;=L97.826^^32^278^23
 +379     ;;^UTILITY(U,$J,358.3,4935,1,0)
 +380     ;;=^358.31IA^4^2
 +381     ;;^UTILITY(U,$J,358.3,4935,1,3,0)
 +382     ;;=3^Non-Pressure Ulcer,Oth Part Lt Lower Leg w/ Bone Invlv w/o Necrosis
 +383     ;;^UTILITY(U,$J,358.3,4935,1,4,0)
 +384     ;;=4^L97.826
 +385     ;;^UTILITY(U,$J,358.3,4935,2)
 +386     ;;=^5151482
 +387     ;;^UTILITY(U,$J,358.3,4936,0)
 +388     ;;=L97.828^^32^278^24
 +389     ;;^UTILITY(U,$J,358.3,4936,1,0)
 +390     ;;=^358.31IA^4^2
 +391     ;;^UTILITY(U,$J,358.3,4936,1,3,0)
 +392     ;;=3^Non-Pressure Ulcer,Oth Part Lt Lower Leg w/ Oth Spec Severity
 +393     ;;^UTILITY(U,$J,358.3,4936,1,4,0)
 +394     ;;=4^L97.828
 +395     ;;^UTILITY(U,$J,358.3,4936,2)
 +396     ;;=^5151483
 +397     ;;^UTILITY(U,$J,358.3,4937,0)
 +398     ;;=L97.815^^32^278^25
 +399     ;;^UTILITY(U,$J,358.3,4937,1,0)
 +400     ;;=^358.31IA^4^2
 +401     ;;^UTILITY(U,$J,358.3,4937,1,3,0)
 +402     ;;=3^Non-Pressure Ulcer,Oth Part Rt Lower Leg w/ Musl Invlv w/o Necrosis
 +403     ;;^UTILITY(U,$J,358.3,4937,1,4,0)
 +404     ;;=4^L97.815
 +405     ;;^UTILITY(U,$J,358.3,4937,2)
 +406     ;;=^5151478
 +407     ;;^UTILITY(U,$J,358.3,4938,0)
 +408     ;;=L97.816^^32^278^26
 +409     ;;^UTILITY(U,$J,358.3,4938,1,0)
 +410     ;;=^358.31IA^4^2
 +411     ;;^UTILITY(U,$J,358.3,4938,1,3,0)
 +412     ;;=3^Non-Pressure Ulcer,Oth Part Rt Lower Leg w/ Bone Invlv w/o Necrosis
 +413     ;;^UTILITY(U,$J,358.3,4938,1,4,0)
 +414     ;;=4^L97.816
 +415     ;;^UTILITY(U,$J,358.3,4938,2)
 +416     ;;=^5151479
 +417     ;;^UTILITY(U,$J,358.3,4939,0)
 +418     ;;=L97.818^^32^278^27
 +419     ;;^UTILITY(U,$J,358.3,4939,1,0)
 +420     ;;=^358.31IA^4^2
 +421     ;;^UTILITY(U,$J,358.3,4939,1,3,0)
 +422     ;;=3^Non-Pressure Ulcer,Oth Part Rt Lower Leg w/ Oth Spec Severity
 +423     ;;^UTILITY(U,$J,358.3,4939,1,4,0)
 +424     ;;=4^L97.818
 +425     ;;^UTILITY(U,$J,358.3,4939,2)
 +426     ;;=^5151480
 +427     ;;^UTILITY(U,$J,358.3,4940,0)
 +428     ;;=L98.9^^32^278^37
 +429     ;;^UTILITY(U,$J,358.3,4940,1,0)
 +430     ;;=^358.31IA^4^2
 +431     ;;^UTILITY(U,$J,358.3,4940,1,3,0)
 +432     ;;=3^Skin Disorder
 +433     ;;^UTILITY(U,$J,358.3,4940,1,4,0)
 +434     ;;=4^L98.9
 +435     ;;^UTILITY(U,$J,358.3,4940,2)
 +436     ;;=^5009595
 +437     ;;^UTILITY(U,$J,358.3,4941,0)
 +438     ;;=S80.829A^^32^278^38
 +439     ;;^UTILITY(U,$J,358.3,4941,1,0)
 +440     ;;=^358.31IA^4^2
 +441     ;;^UTILITY(U,$J,358.3,4941,1,3,0)
 +442     ;;=3^Blister of Lower Leg
 +443     ;;^UTILITY(U,$J,358.3,4941,1,4,0)
 +444     ;;=4^S80.829A
 +445     ;;^UTILITY(U,$J,358.3,4941,2)
 +446     ;;=^5039975
 +447     ;;^UTILITY(U,$J,358.3,4942,0)
 +448     ;;=L60.0^^32^279^1
 +449     ;;^UTILITY(U,$J,358.3,4942,1,0)
 +450     ;;=^358.31IA^4^2
 +451     ;;^UTILITY(U,$J,358.3,4942,1,3,0)
 +452     ;;=3^Ingrown Toenail
 +453     ;;^UTILITY(U,$J,358.3,4942,1,4,0)
 +454     ;;=4^L60.0
 +455     ;;^UTILITY(U,$J,358.3,4942,2)
 +456     ;;=^5009234
 +457     ;;^UTILITY(U,$J,358.3,4943,0)
 +458     ;;=M10.9^^32^279^2
 +459     ;;^UTILITY(U,$J,358.3,4943,1,0)
 +460     ;;=^358.31IA^4^2
 +461     ;;^UTILITY(U,$J,358.3,4943,1,3,0)
 +462     ;;=3^Gout
 +463     ;;^UTILITY(U,$J,358.3,4943,1,4,0)
 +464     ;;=4^M10.9
 +465     ;;^UTILITY(U,$J,358.3,4943,2)
 +466     ;;=^5010404
 +467     ;;^UTILITY(U,$J,358.3,4944,0)
 +468     ;;=S90.416A^^32^279^3
 +469     ;;^UTILITY(U,$J,358.3,4944,1,0)
 +470     ;;=^358.31IA^4^2
 +471     ;;^UTILITY(U,$J,358.3,4944,1,3,0)
 +472     ;;=3^Toe Abrasion,Lesser Toe
 +473     ;;^UTILITY(U,$J,358.3,4944,1,4,0)
 +474     ;;=4^S90.416A
 +475     ;;^UTILITY(U,$J,358.3,4944,2)
 +476     ;;=^5043904
 +477     ;;^UTILITY(U,$J,358.3,4945,0)
 +478     ;;=S90.219A^^32^279^4
 +479     ;;^UTILITY(U,$J,358.3,4945,1,0)
 +480     ;;=^358.31IA^4^2
 +481     ;;^UTILITY(U,$J,358.3,4945,1,3,0)
 +482     ;;=3^Toe Contusion,Greater w/ Nail Damage
 +483     ;;^UTILITY(U,$J,358.3,4945,1,4,0)
 +484     ;;=4^S90.219A
 +485     ;;^UTILITY(U,$J,358.3,4945,2)
 +486     ;;=^5137382
 +487     ;;^UTILITY(U,$J,358.3,4946,0)
 +488     ;;=S90.119A^^32^279^5
 +489     ;;^UTILITY(U,$J,358.3,4946,1,0)
 +490     ;;=^358.31IA^4^2
 +491     ;;^UTILITY(U,$J,358.3,4946,1,3,0)
 +492     ;;=3^Toe Contusion,Greater w/o Nail Damage
 +493     ;;^UTILITY(U,$J,358.3,4946,1,4,0)
 +494     ;;=4^S90.119A
 +495     ;;^UTILITY(U,$J,358.3,4946,2)
 +496     ;;=^5043862
 +497     ;;^UTILITY(U,$J,358.3,4947,0)
 +498     ;;=S90.229A^^32^279^6
 +499     ;;^UTILITY(U,$J,358.3,4947,1,0)
 +500     ;;=^358.31IA^4^2
 +501     ;;^UTILITY(U,$J,358.3,4947,1,3,0)
 +502     ;;=3^Toe Contusion,Lesser w/ Nail Damage
 +503     ;;^UTILITY(U,$J,358.3,4947,1,4,0)
 +504     ;;=4^S90.229A
 +505     ;;^UTILITY(U,$J,358.3,4947,2)
 +506     ;;=^5137388
 +507     ;;^UTILITY(U,$J,358.3,4948,0)
 +508     ;;=S90.129A^^32^279^7
 +509     ;;^UTILITY(U,$J,358.3,4948,1,0)
 +510     ;;=^358.31IA^4^2
 +511     ;;^UTILITY(U,$J,358.3,4948,1,3,0)
 +512     ;;=3^Toe Contusion,Lesser w/o Nail Damage
 +513     ;;^UTILITY(U,$J,358.3,4948,1,4,0)
 +514     ;;=4^S90.129A
 +515     ;;^UTILITY(U,$J,358.3,4948,2)
 +516     ;;=^5043871
 +517     ;;^UTILITY(U,$J,358.3,4949,0)
 +518     ;;=S93.106A^^32^279^8
 +519     ;;^UTILITY(U,$J,358.3,4949,1,0)
 +520     ;;=^358.31IA^4^2
 +521     ;;^UTILITY(U,$J,358.3,4949,1,3,0)
 +522     ;;=3^Toe Dislocation
 +523     ;;^UTILITY(U,$J,358.3,4949,1,4,0)
 +524     ;;=4^S93.106A
 +525     ;;^UTILITY(U,$J,358.3,4949,2)
 +526     ;;=^5137654
 +527     ;;^UTILITY(U,$J,358.3,4950,0)
 +528     ;;=S92.919A^^32^279^9
 +529     ;;^UTILITY(U,$J,358.3,4950,1,0)
 +530     ;;=^358.31IA^4^2
 +531     ;;^UTILITY(U,$J,358.3,4950,1,3,0)
 +532     ;;=3^Toe Fracture
 +533     ;;^UTILITY(U,$J,358.3,4950,1,4,0)
 +534     ;;=4^S92.919A
 +535     ;;^UTILITY(U,$J,358.3,4950,2)
 +536     ;;=^5137644
 +537     ;;^UTILITY(U,$J,358.3,4951,0)
 +538     ;;=S90.929A^^32^279^10
 +539     ;;^UTILITY(U,$J,358.3,4951,1,0)
 +540     ;;=^358.31IA^4^2
 +541     ;;^UTILITY(U,$J,358.3,4951,1,3,0)
 +542     ;;=3^Foot Abrasion
 +543     ;;^UTILITY(U,$J,358.3,4951,1,4,0)
 +544     ;;=4^S90.929A
 +545     ;;^UTILITY(U,$J,358.3,4951,2)
 +546     ;;=^5137394
 +547     ;;^UTILITY(U,$J,358.3,4952,0)
 +548     ;;=S90.30XA^^32^279^11
 +549     ;;^UTILITY(U,$J,358.3,4952,1,0)
 +550     ;;=^358.31IA^4^2
 +551     ;;^UTILITY(U,$J,358.3,4952,1,3,0)
 +552     ;;=3^Foot Contusion
 +553     ;;^UTILITY(U,$J,358.3,4952,1,4,0)
 +554     ;;=4^S90.30XA
 +555     ;;^UTILITY(U,$J,358.3,4952,2)
 +556     ;;=^5043880
 +557     ;;^UTILITY(U,$J,358.3,4953,0)
 +558     ;;=S93.609A^^32^279^12
 +559     ;;^UTILITY(U,$J,358.3,4953,1,0)
 +560     ;;=^358.31IA^4^2
 +561     ;;^UTILITY(U,$J,358.3,4953,1,3,0)
 +562     ;;=3^Foot Sprain
 +563     ;;^UTILITY(U,$J,358.3,4953,1,4,0)
 +564     ;;=4^S93.609A
 +565     ;;^UTILITY(U,$J,358.3,4953,2)
 +566     ;;=^5137690
 +567     ;;^UTILITY(U,$J,358.3,4954,0)
 +568     ;;=S90.519A^^32^279^13
 +569     ;;^UTILITY(U,$J,358.3,4954,1,0)
 +570     ;;=^358.31IA^4^2
 +571     ;;^UTILITY(U,$J,358.3,4954,1,3,0)
 +572     ;;=3^Ankle Abrasion
 +573     ;;^UTILITY(U,$J,358.3,4954,1,4,0)
 +574     ;;=4^S90.519A
 +575     ;;^UTILITY(U,$J,358.3,4954,2)
 +576     ;;=^5044003
 +577     ;;^UTILITY(U,$J,358.3,4955,0)
 +578     ;;=S90.00XA^^32^279^14
 +579     ;;^UTILITY(U,$J,358.3,4955,1,0)
 +580     ;;=^358.31IA^4^2
 +581     ;;^UTILITY(U,$J,358.3,4955,1,3,0)
 +582     ;;=3^Ankle Contusion
 +583     ;;^UTILITY(U,$J,358.3,4955,1,4,0)
 +584     ;;=4^S90.00XA
 +585     ;;^UTILITY(U,$J,358.3,4955,2)
 +586     ;;=^5043847
 +587     ;;^UTILITY(U,$J,358.3,4956,0)
 +588     ;;=S93.409A^^32^279^15
 +589     ;;^UTILITY(U,$J,358.3,4956,1,0)
 +590     ;;=^358.31IA^4^2
 +591     ;;^UTILITY(U,$J,358.3,4956,1,3,0)
 +592     ;;=3^Ankle Sprain
 +593     ;;^UTILITY(U,$J,358.3,4956,1,4,0)
 +594     ;;=4^S93.409A
 +595     ;;^UTILITY(U,$J,358.3,4956,2)
 +596     ;;=^5137675
 +597     ;;^UTILITY(U,$J,358.3,4957,0)
 +598     ;;=S82.109A^^32^279^16
 +599     ;;^UTILITY(U,$J,358.3,4957,1,0)
 +600     ;;=^358.31IA^4^2
 +601     ;;^UTILITY(U,$J,358.3,4957,1,3,0)
 +602     ;;=3^Tibia Fracture,Proximal
 +603     ;;^UTILITY(U,$J,358.3,4957,1,4,0)
 +604     ;;=4^S82.109A
 +605     ;;^UTILITY(U,$J,358.3,4957,2)
 +606     ;;=^5136741
 +607     ;;^UTILITY(U,$J,358.3,4958,0)
 +608     ;;=S82.209A^^32^279^17
 +609     ;;^UTILITY(U,$J,358.3,4958,1,0)
 +610     ;;=^358.31IA^4^2
 +611     ;;^UTILITY(U,$J,358.3,4958,1,3,0)
 +612     ;;=3^Tibia Fracture,Shaft
 +613     ;;^UTILITY(U,$J,358.3,4958,1,4,0)
 +614     ;;=4^S82.209A
 +615     ;;^UTILITY(U,$J,358.3,4958,2)
 +616     ;;=^5136787
 +617     ;;^UTILITY(U,$J,358.3,4959,0)
 +618     ;;=S82.309A^^32^279^18
 +619     ;;^UTILITY(U,$J,358.3,4959,1,0)
 +620     ;;=^358.31IA^4^2
 +621     ;;^UTILITY(U,$J,358.3,4959,1,3,0)
 +622     ;;=3^Tibia Fracture,Distal
 +623     ;;^UTILITY(U,$J,358.3,4959,1,4,0)
 +624     ;;=4^S82.309A
 +625     ;;^UTILITY(U,$J,358.3,4959,2)
 +626     ;;=^5136826
 +627     ;;^UTILITY(U,$J,358.3,4960,0)
 +628     ;;=S89.209A^^32^279^19
 +629     ;;^UTILITY(U,$J,358.3,4960,1,0)
 +630     ;;=^358.31IA^4^2
 +631     ;;^UTILITY(U,$J,358.3,4960,1,3,0)
 +632     ;;=3^Fibula Fracture,Proximal
 +633     ;;^UTILITY(U,$J,358.3,4960,1,4,0)
 +634     ;;=4^S89.209A
 +635     ;;^UTILITY(U,$J,358.3,4960,2)
 +636     ;;=^5137313
 +637     ;;^UTILITY(U,$J,358.3,4961,0)
 +638     ;;=S82.409A^^32^279^20
 +639     ;;^UTILITY(U,$J,358.3,4961,1,0)
 +640     ;;=^358.31IA^4^2
 +641     ;;^UTILITY(U,$J,358.3,4961,1,3,0)
 +642     ;;=3^Fibula Fracture,Shaft
 +643     ;;^UTILITY(U,$J,358.3,4961,1,4,0)
 +644     ;;=4^S82.409A
 +645     ;;^UTILITY(U,$J,358.3,4961,2)
 +646     ;;=^5136894
 +647     ;;^UTILITY(U,$J,358.3,4962,0)
 +648     ;;=S89.309A^^32^279^21
 +649     ;;^UTILITY(U,$J,358.3,4962,1,0)
 +650     ;;=^358.31IA^4^2
 +651     ;;^UTILITY(U,$J,358.3,4962,1,3,0)
 +652     ;;=3^Fibula Fracture,Distal
 +653     ;;^UTILITY(U,$J,358.3,4962,1,4,0)
 +654     ;;=4^S89.309A
 +655     ;;^UTILITY(U,$J,358.3,4962,2)
 +656     ;;=^5137338
 +657     ;;^UTILITY(U,$J,358.3,4963,0)
 +658     ;;=S80.819A^^32^279^22
 +659     ;;^UTILITY(U,$J,358.3,4963,1,0)
 +660     ;;=^358.31IA^4^2
 +661     ;;^UTILITY(U,$J,358.3,4963,1,3,0)
 +662     ;;=3^Lower Leg Abrasion
 +663     ;;^UTILITY(U,$J,358.3,4963,1,4,0)
 +664     ;;=4^S80.819A
 +665     ;;^UTILITY(U,$J,358.3,4963,2)
 +666     ;;=^5039966
 +667     ;;^UTILITY(U,$J,358.3,4964,0)
 +668     ;;=S80.10XA^^32^279^23
 +669     ;;^UTILITY(U,$J,358.3,4964,1,0)
 +670     ;;=^358.31IA^4^2
 +671     ;;^UTILITY(U,$J,358.3,4964,1,3,0)
 +672     ;;=3^Lower Leg Contusion
 +673     ;;^UTILITY(U,$J,358.3,4964,1,4,0)
 +674     ;;=4^S80.10XA
 +675     ;;^UTILITY(U,$J,358.3,4964,2)
 +676     ;;=^5039897
 +677     ;;^UTILITY(U,$J,358.3,4965,0)
 +678     ;;=S80.219A^^32^279^24
 +679     ;;^UTILITY(U,$J,358.3,4965,1,0)
 +680     ;;=^358.31IA^4^2
 +681     ;;^UTILITY(U,$J,358.3,4965,1,3,0)
 +682     ;;=3^Knee Abrasion
 +683     ;;^UTILITY(U,$J,358.3,4965,1,4,0)
 +684     ;;=4^S80.219A
 +685     ;;^UTILITY(U,$J,358.3,4965,2)
 +686     ;;=^5039912
 +687     ;;^UTILITY(U,$J,358.3,4966,0)
 +688     ;;=S80.00XA^^32^279^25
 +689     ;;^UTILITY(U,$J,358.3,4966,1,0)
 +690     ;;=^358.31IA^4^2
 +691     ;;^UTILITY(U,$J,358.3,4966,1,3,0)
 +692     ;;=3^Knee Contusion
 +693     ;;^UTILITY(U,$J,358.3,4966,1,4,0)
 +694     ;;=4^S80.00XA
 +695     ;;^UTILITY(U,$J,358.3,4966,2)
 +696     ;;=^5039888
 +697     ;;^UTILITY(U,$J,358.3,4967,0)
 +698     ;;=M22.40^^32^279^26
 +699     ;;^UTILITY(U,$J,358.3,4967,1,0)
 +700     ;;=^358.31IA^4^2
 +701     ;;^UTILITY(U,$J,358.3,4967,1,3,0)
 +702     ;;=3^Knee Chondromalacia Patellae
 +703     ;;^UTILITY(U,$J,358.3,4967,1,4,0)
 +704     ;;=4^M22.40
 +705     ;;^UTILITY(U,$J,358.3,4967,2)
 +706     ;;=^5011185
 +707     ;;^UTILITY(U,$J,358.3,4968,0)
 +708     ;;=M25.469^^32^279^27
 +709     ;;^UTILITY(U,$J,358.3,4968,1,0)
 +710     ;;=^358.31IA^4^2
 +711     ;;^UTILITY(U,$J,358.3,4968,1,3,0)
 +712     ;;=3^Knee Effusion
 +713     ;;^UTILITY(U,$J,358.3,4968,1,4,0)
 +714     ;;=4^M25.469
 +715     ;;^UTILITY(U,$J,358.3,4968,2)
 +716     ;;=^5011593
 +717     ;;^UTILITY(U,$J,358.3,4969,0)
 +718     ;;=M25.069^^32^279^28