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

IBDEI025.m

Go to the documentation of this file.
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