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-FEB-2021
 ;;3.0;IB ENCOUNTER FORM IMP/EXP;;FEB 01, 2021
 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,4406,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4406,1,1,0)
 ;;=1^96133
 ;;^UTILITY(U,$J,358.3,4406,1,3,0)
 ;;=3^Neuropsych Testing,Ea Addl Hr
 ;;^UTILITY(U,$J,358.3,4407,0)
 ;;=96136^^39^313^21^^^^1
 ;;^UTILITY(U,$J,358.3,4407,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4407,1,1,0)
 ;;=1^96136
 ;;^UTILITY(U,$J,358.3,4407,1,3,0)
 ;;=3^Psych/Neurpsych Testing,1st 30 min
 ;;^UTILITY(U,$J,358.3,4408,0)
 ;;=96137^^39^313^22^^^^1
 ;;^UTILITY(U,$J,358.3,4408,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4408,1,1,0)
 ;;=1^96137
 ;;^UTILITY(U,$J,358.3,4408,1,3,0)
 ;;=3^Psych/Neurpsych Testing,Ea Addl 30 min
 ;;^UTILITY(U,$J,358.3,4409,0)
 ;;=96138^^39^313^23^^^^1
 ;;^UTILITY(U,$J,358.3,4409,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4409,1,1,0)
 ;;=1^96138
 ;;^UTILITY(U,$J,358.3,4409,1,3,0)
 ;;=3^Psych/Neurpsych Tst by Tech,1st 30min
 ;;^UTILITY(U,$J,358.3,4410,0)
 ;;=96139^^39^313^24^^^^1
 ;;^UTILITY(U,$J,358.3,4410,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4410,1,1,0)
 ;;=1^96139
 ;;^UTILITY(U,$J,358.3,4410,1,3,0)
 ;;=3^Psych/Neurpsych Tst by Tech,Ea Add 30min
 ;;^UTILITY(U,$J,358.3,4411,0)
 ;;=64999^^39^313^16^^^^1
 ;;^UTILITY(U,$J,358.3,4411,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4411,1,1,0)
 ;;=1^64999
 ;;^UTILITY(U,$J,358.3,4411,1,3,0)
 ;;=3^Nervous System Surgery
 ;;^UTILITY(U,$J,358.3,4412,0)
 ;;=99358^^39^314^1^^^^1
 ;;^UTILITY(U,$J,358.3,4412,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4412,1,1,0)
 ;;=1^99358
 ;;^UTILITY(U,$J,358.3,4412,1,3,0)
 ;;=3^Prolonged Svc w/o Pt,1st hr
 ;;^UTILITY(U,$J,358.3,4413,0)
 ;;=99359^^39^314^2^^^^1
 ;;^UTILITY(U,$J,358.3,4413,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4413,1,1,0)
 ;;=1^99359
 ;;^UTILITY(U,$J,358.3,4413,1,3,0)
 ;;=3^Prolonged Svc w/o Pt,Ea Addl 30min
 ;;^UTILITY(U,$J,358.3,4414,0)
 ;;=99417^^39^314^3^^^^1
 ;;^UTILITY(U,$J,358.3,4414,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4414,1,1,0)
 ;;=1^99417
 ;;^UTILITY(U,$J,358.3,4414,1,3,0)
 ;;=3^Prolonged Svc,Ea 15min;Only w/ 99205 or 99215
 ;;^UTILITY(U,$J,358.3,4415,0)
 ;;=99202^^40^315^1
 ;;^UTILITY(U,$J,358.3,4415,1,0)
 ;;=^358.31IA^2^2
 ;;^UTILITY(U,$J,358.3,4415,1,1,0)
 ;;=1^SF MDM or 15-29 min
 ;;^UTILITY(U,$J,358.3,4415,1,2,0)
 ;;=2^99202
 ;;^UTILITY(U,$J,358.3,4416,0)
 ;;=99203^^40^315^2
 ;;^UTILITY(U,$J,358.3,4416,1,0)
 ;;=^358.31IA^2^2
 ;;^UTILITY(U,$J,358.3,4416,1,1,0)
 ;;=1^Low Complex MDM or 30-44 min
 ;;^UTILITY(U,$J,358.3,4416,1,2,0)
 ;;=2^99203
 ;;^UTILITY(U,$J,358.3,4417,0)
 ;;=99204^^40^315^3
 ;;^UTILITY(U,$J,358.3,4417,1,0)
 ;;=^358.31IA^2^2
 ;;^UTILITY(U,$J,358.3,4417,1,1,0)
 ;;=1^Mod Complex MDM or 45-59 min
 ;;^UTILITY(U,$J,358.3,4417,1,2,0)
 ;;=2^99204
 ;;^UTILITY(U,$J,358.3,4418,0)
 ;;=99205^^40^315^4
 ;;^UTILITY(U,$J,358.3,4418,1,0)
 ;;=^358.31IA^2^2
 ;;^UTILITY(U,$J,358.3,4418,1,1,0)
 ;;=1^High Complex MDM or 60-74 min
 ;;^UTILITY(U,$J,358.3,4418,1,2,0)
 ;;=2^99205
 ;;^UTILITY(U,$J,358.3,4419,0)
 ;;=99211^^40^316^1
 ;;^UTILITY(U,$J,358.3,4419,1,0)
 ;;=^358.31IA^2^2
 ;;^UTILITY(U,$J,358.3,4419,1,1,0)
 ;;=1^Nursing Visit (no MD seen)
 ;;^UTILITY(U,$J,358.3,4419,1,2,0)
 ;;=2^99211
 ;;^UTILITY(U,$J,358.3,4420,0)
 ;;=99212^^40^316^2
 ;;^UTILITY(U,$J,358.3,4420,1,0)
 ;;=^358.31IA^2^2
 ;;^UTILITY(U,$J,358.3,4420,1,1,0)
 ;;=1^SF MDM or 10-19 min
 ;;^UTILITY(U,$J,358.3,4420,1,2,0)
 ;;=2^99212
 ;;^UTILITY(U,$J,358.3,4421,0)
 ;;=99213^^40^316^3
 ;;^UTILITY(U,$J,358.3,4421,1,0)
 ;;=^358.31IA^2^2
 ;;^UTILITY(U,$J,358.3,4421,1,1,0)
 ;;=1^Low Complex MDM or 20-29 min
 ;;^UTILITY(U,$J,358.3,4421,1,2,0)
 ;;=2^99213
 ;;^UTILITY(U,$J,358.3,4422,0)
 ;;=99214^^40^316^4
 ;;^UTILITY(U,$J,358.3,4422,1,0)
 ;;=^358.31IA^2^2
 ;;^UTILITY(U,$J,358.3,4422,1,1,0)
 ;;=1^Mod Complex MDM or 30-39 min
 ;;^UTILITY(U,$J,358.3,4422,1,2,0)
 ;;=2^99214
 ;;^UTILITY(U,$J,358.3,4423,0)
 ;;=99215^^40^316^5
 ;;^UTILITY(U,$J,358.3,4423,1,0)
 ;;=^358.31IA^2^2
 ;;^UTILITY(U,$J,358.3,4423,1,1,0)
 ;;=1^High Complex MDM or 40-54 min
 ;;^UTILITY(U,$J,358.3,4423,1,2,0)
 ;;=2^99215
 ;;^UTILITY(U,$J,358.3,4424,0)
 ;;=99241^^40^317^1
 ;;^UTILITY(U,$J,358.3,4424,1,0)
 ;;=^358.31IA^2^2
 ;;^UTILITY(U,$J,358.3,4424,1,1,0)
 ;;=1^Problem Focused
 ;;^UTILITY(U,$J,358.3,4424,1,2,0)
 ;;=2^99241
 ;;^UTILITY(U,$J,358.3,4425,0)
 ;;=99242^^40^317^2
 ;;^UTILITY(U,$J,358.3,4425,1,0)
 ;;=^358.31IA^2^2
 ;;^UTILITY(U,$J,358.3,4425,1,1,0)
 ;;=1^Expanded Problem Focus
 ;;^UTILITY(U,$J,358.3,4425,1,2,0)
 ;;=2^99242
 ;;^UTILITY(U,$J,358.3,4426,0)
 ;;=99243^^40^317^3
 ;;^UTILITY(U,$J,358.3,4426,1,0)
 ;;=^358.31IA^2^2
 ;;^UTILITY(U,$J,358.3,4426,1,1,0)
 ;;=1^Detailed
 ;;^UTILITY(U,$J,358.3,4426,1,2,0)
 ;;=2^99243
 ;;^UTILITY(U,$J,358.3,4427,0)
 ;;=99244^^40^317^4
 ;;^UTILITY(U,$J,358.3,4427,1,0)
 ;;=^358.31IA^2^2
 ;;^UTILITY(U,$J,358.3,4427,1,1,0)
 ;;=1^Comprehensive, Moderate
 ;;^UTILITY(U,$J,358.3,4427,1,2,0)
 ;;=2^99244
 ;;^UTILITY(U,$J,358.3,4428,0)
 ;;=99245^^40^317^5
 ;;^UTILITY(U,$J,358.3,4428,1,0)
 ;;=^358.31IA^2^2
 ;;^UTILITY(U,$J,358.3,4428,1,1,0)
 ;;=1^Comprehensive, High
 ;;^UTILITY(U,$J,358.3,4428,1,2,0)
 ;;=2^99245
 ;;^UTILITY(U,$J,358.3,4429,0)
 ;;=99024^^40^318^1
 ;;^UTILITY(U,$J,358.3,4429,1,0)
 ;;=^358.31IA^2^2
 ;;^UTILITY(U,$J,358.3,4429,1,1,0)
 ;;=1^Post-Op Follow-up Visit
 ;;^UTILITY(U,$J,358.3,4429,1,2,0)
 ;;=2^99024
 ;;^UTILITY(U,$J,358.3,4430,0)
 ;;=G06.0^^41^319^16
 ;;^UTILITY(U,$J,358.3,4430,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4430,1,3,0)
 ;;=3^Intracranial Abscess & Granuloma
 ;;^UTILITY(U,$J,358.3,4430,1,4,0)
 ;;=4^G06.0
 ;;^UTILITY(U,$J,358.3,4430,2)
 ;;=^5003745
 ;;^UTILITY(U,$J,358.3,4431,0)
 ;;=I66.01^^41^319^35
 ;;^UTILITY(U,$J,358.3,4431,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4431,1,3,0)
 ;;=3^Occlusion & Stenosis,Right Middle Cerebral Artery
 ;;^UTILITY(U,$J,358.3,4431,1,4,0)
 ;;=4^I66.01
 ;;^UTILITY(U,$J,358.3,4431,2)
 ;;=^5007365
 ;;^UTILITY(U,$J,358.3,4432,0)
 ;;=I66.02^^41^319^32
 ;;^UTILITY(U,$J,358.3,4432,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4432,1,3,0)
 ;;=3^Occlusion & Stenosis,Left Middle Cerebral Artery
 ;;^UTILITY(U,$J,358.3,4432,1,4,0)
 ;;=4^I66.02
 ;;^UTILITY(U,$J,358.3,4432,2)
 ;;=^5007366
 ;;^UTILITY(U,$J,358.3,4433,0)
 ;;=I66.11^^41^319^34
 ;;^UTILITY(U,$J,358.3,4433,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4433,1,3,0)
 ;;=3^Occlusion & Stenosis,Right Anterior Cerebral Artery
 ;;^UTILITY(U,$J,358.3,4433,1,4,0)
 ;;=4^I66.11
 ;;^UTILITY(U,$J,358.3,4433,2)
 ;;=^5007369
 ;;^UTILITY(U,$J,358.3,4434,0)
 ;;=I66.12^^41^319^31
 ;;^UTILITY(U,$J,358.3,4434,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4434,1,3,0)
 ;;=3^Occlusion & Stenosis,Left Anterior Cerebral Artery
 ;;^UTILITY(U,$J,358.3,4434,1,4,0)
 ;;=4^I66.12
 ;;^UTILITY(U,$J,358.3,4434,2)
 ;;=^5007370
 ;;^UTILITY(U,$J,358.3,4435,0)
 ;;=I66.21^^41^319^36
 ;;^UTILITY(U,$J,358.3,4435,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4435,1,3,0)
 ;;=3^Occlusion & Stenosis,Right Posterior Cerebral Artery
 ;;^UTILITY(U,$J,358.3,4435,1,4,0)
 ;;=4^I66.21
 ;;^UTILITY(U,$J,358.3,4435,2)
 ;;=^5007373
 ;;^UTILITY(U,$J,358.3,4436,0)
 ;;=I66.22^^41^319^33
 ;;^UTILITY(U,$J,358.3,4436,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4436,1,3,0)
 ;;=3^Occlusion & Stenosis,Left Posterior Cerebral Artery
 ;;^UTILITY(U,$J,358.3,4436,1,4,0)
 ;;=4^I66.22
 ;;^UTILITY(U,$J,358.3,4436,2)
 ;;=^5007374
 ;;^UTILITY(U,$J,358.3,4437,0)
 ;;=I67.1^^41^319^4
 ;;^UTILITY(U,$J,358.3,4437,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4437,1,3,0)
 ;;=3^Cerebral Aneurysm,Nonruptured
 ;;^UTILITY(U,$J,358.3,4437,1,4,0)
 ;;=4^I67.1
 ;;^UTILITY(U,$J,358.3,4437,2)
 ;;=^269755
 ;;^UTILITY(U,$J,358.3,4438,0)
 ;;=Q28.2^^41^319^1
 ;;^UTILITY(U,$J,358.3,4438,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4438,1,3,0)
 ;;=3^Arteriovenous Malformation of Cerebral Vessels
 ;;^UTILITY(U,$J,358.3,4438,1,4,0)
 ;;=4^Q28.2
 ;;^UTILITY(U,$J,358.3,4438,2)
 ;;=^5018595
 ;;^UTILITY(U,$J,358.3,4439,0)
 ;;=G93.0^^41^319^5
 ;;^UTILITY(U,$J,358.3,4439,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4439,1,3,0)
 ;;=3^Cerebral Cysts
 ;;^UTILITY(U,$J,358.3,4439,1,4,0)
 ;;=4^G93.0
 ;;^UTILITY(U,$J,358.3,4439,2)
 ;;=^268481
 ;;^UTILITY(U,$J,358.3,4440,0)
 ;;=G04.90^^41^319^11
 ;;^UTILITY(U,$J,358.3,4440,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4440,1,3,0)
 ;;=3^Encephalitis & Encephalomyelitis,Unspec
 ;;^UTILITY(U,$J,358.3,4440,1,4,0)
 ;;=4^G04.90
 ;;^UTILITY(U,$J,358.3,4440,2)
 ;;=^5003741
 ;;^UTILITY(U,$J,358.3,4441,0)
 ;;=G04.91^^41^319^22
 ;;^UTILITY(U,$J,358.3,4441,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4441,1,3,0)
 ;;=3^Myelitis,Unspec
 ;;^UTILITY(U,$J,358.3,4441,1,4,0)
 ;;=4^G04.91
 ;;^UTILITY(U,$J,358.3,4441,2)
 ;;=^5003742
 ;;^UTILITY(U,$J,358.3,4442,0)
 ;;=G93.40^^41^319^12
 ;;^UTILITY(U,$J,358.3,4442,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4442,1,3,0)
 ;;=3^Encephalopathy,Unspec
 ;;^UTILITY(U,$J,358.3,4442,1,4,0)
 ;;=4^G93.40
 ;;^UTILITY(U,$J,358.3,4442,2)
 ;;=^329917
 ;;^UTILITY(U,$J,358.3,4443,0)
 ;;=G91.0^^41^319^8
 ;;^UTILITY(U,$J,358.3,4443,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4443,1,3,0)
 ;;=3^Communicating Hydrocephalus
 ;;^UTILITY(U,$J,358.3,4443,1,4,0)
 ;;=4^G91.0
 ;;^UTILITY(U,$J,358.3,4443,2)
 ;;=^26586
 ;;^UTILITY(U,$J,358.3,4444,0)
 ;;=G91.1^^41^319^30
 ;;^UTILITY(U,$J,358.3,4444,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4444,1,3,0)
 ;;=3^Obstructive Hydrocephalus
 ;;^UTILITY(U,$J,358.3,4444,1,4,0)
 ;;=4^G91.1
 ;;^UTILITY(U,$J,358.3,4444,2)
 ;;=^84947
 ;;^UTILITY(U,$J,358.3,4445,0)
 ;;=I61.9^^41^319^27
 ;;^UTILITY(U,$J,358.3,4445,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4445,1,3,0)
 ;;=3^Nontraumatic Intracerebral Hemorrhage,Unspec
 ;;^UTILITY(U,$J,358.3,4445,1,4,0)
 ;;=4^I61.9
 ;;^UTILITY(U,$J,358.3,4445,2)
 ;;=^5007288
 ;;^UTILITY(U,$J,358.3,4446,0)
 ;;=I61.3^^41^319^23
 ;;^UTILITY(U,$J,358.3,4446,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4446,1,3,0)
 ;;=3^Nontraumatic Intracerebral Hemorrhage,Brainstem
 ;;^UTILITY(U,$J,358.3,4446,1,4,0)
 ;;=4^I61.3
 ;;^UTILITY(U,$J,358.3,4446,2)
 ;;=^5007283
 ;;^UTILITY(U,$J,358.3,4447,0)
 ;;=I61.4^^41^319^24
 ;;^UTILITY(U,$J,358.3,4447,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4447,1,3,0)
 ;;=3^Nontraumatic Intracerebral Hemorrhage,Cerebellum
 ;;^UTILITY(U,$J,358.3,4447,1,4,0)
 ;;=4^I61.4
 ;;^UTILITY(U,$J,358.3,4447,2)
 ;;=^5007284
 ;;^UTILITY(U,$J,358.3,4448,0)
 ;;=I61.5^^41^319^25
 ;;^UTILITY(U,$J,358.3,4448,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4448,1,3,0)
 ;;=3^Nontraumatic Intracerebral Hemorrhage,Intraventricular
 ;;^UTILITY(U,$J,358.3,4448,1,4,0)
 ;;=4^I61.5
 ;;^UTILITY(U,$J,358.3,4448,2)
 ;;=^5007285
 ;;^UTILITY(U,$J,358.3,4449,0)
 ;;=I61.6^^41^319^26
 ;;^UTILITY(U,$J,358.3,4449,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4449,1,3,0)
 ;;=3^Nontraumatic Intracerebral Hemorrhage,Multi Localized
 ;;^UTILITY(U,$J,358.3,4449,1,4,0)
 ;;=4^I61.6
 ;;^UTILITY(U,$J,358.3,4449,2)
 ;;=^5007286
 ;;^UTILITY(U,$J,358.3,4450,0)
 ;;=G44.1^^41^319^70
 ;;^UTILITY(U,$J,358.3,4450,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4450,1,3,0)
 ;;=3^Vascular Headache NEC
 ;;^UTILITY(U,$J,358.3,4450,1,4,0)
 ;;=4^G44.1
 ;;^UTILITY(U,$J,358.3,4450,2)
 ;;=^5003934
 ;;^UTILITY(U,$J,358.3,4451,0)
 ;;=G03.9^^41^319^21
 ;;^UTILITY(U,$J,358.3,4451,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4451,1,3,0)
 ;;=3^Meningitis,Unspec
 ;;^UTILITY(U,$J,358.3,4451,1,4,0)
 ;;=4^G03.9
 ;;^UTILITY(U,$J,358.3,4451,2)
 ;;=^5003729
 ;;^UTILITY(U,$J,358.3,4452,0)
 ;;=G03.1^^41^319^20
 ;;^UTILITY(U,$J,358.3,4452,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4452,1,3,0)
 ;;=3^Meningitis,Chronic
 ;;^UTILITY(U,$J,358.3,4452,1,4,0)
 ;;=4^G03.1
 ;;^UTILITY(U,$J,358.3,4452,2)
 ;;=^268382
 ;;^UTILITY(U,$J,358.3,4453,0)
 ;;=G00.9^^41^319^2
 ;;^UTILITY(U,$J,358.3,4453,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4453,1,3,0)
 ;;=3^Bacterial Meningitis,Unspec
 ;;^UTILITY(U,$J,358.3,4453,1,4,0)
 ;;=4^G00.9
 ;;^UTILITY(U,$J,358.3,4453,2)
 ;;=^5003724
 ;;^UTILITY(U,$J,358.3,4454,0)
 ;;=A87.9^^41^319^72
 ;;^UTILITY(U,$J,358.3,4454,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4454,1,3,0)
 ;;=3^Viral Meningitis,Unspec
 ;;^UTILITY(U,$J,358.3,4454,1,4,0)
 ;;=4^A87.9
 ;;^UTILITY(U,$J,358.3,4454,2)
 ;;=^5000435
 ;;^UTILITY(U,$J,358.3,4455,0)
 ;;=G20.^^41^319^37
 ;;^UTILITY(U,$J,358.3,4455,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4455,1,3,0)
 ;;=3^Parkinson's Disease
 ;;^UTILITY(U,$J,358.3,4455,1,4,0)
 ;;=4^G20.
 ;;^UTILITY(U,$J,358.3,4455,2)
 ;;=^5003770
 ;;^UTILITY(U,$J,358.3,4456,0)
 ;;=I62.00^^41^319^29
 ;;^UTILITY(U,$J,358.3,4456,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4456,1,3,0)
 ;;=3^Nontraumatic Subdural Hemorrhage,Unspec
 ;;^UTILITY(U,$J,358.3,4456,1,4,0)
 ;;=4^I62.00
 ;;^UTILITY(U,$J,358.3,4456,2)
 ;;=^5007289
 ;;^UTILITY(U,$J,358.3,4457,0)
 ;;=I60.9^^41^319^28
 ;;^UTILITY(U,$J,358.3,4457,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4457,1,3,0)
 ;;=3^Nontraumatic Subarachnoid Hemorrhage,Unspec
 ;;^UTILITY(U,$J,358.3,4457,1,4,0)
 ;;=4^I60.9
 ;;^UTILITY(U,$J,358.3,4457,2)
 ;;=^5007279
 ;;^UTILITY(U,$J,358.3,4458,0)
 ;;=G45.9^^41^319^42
 ;;^UTILITY(U,$J,358.3,4458,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4458,1,3,0)
 ;;=3^Transient Cerebral Ischemic Attack,Unpec
 ;;^UTILITY(U,$J,358.3,4458,1,4,0)
 ;;=4^G45.9
 ;;^UTILITY(U,$J,358.3,4458,2)
 ;;=^5003959
 ;;^UTILITY(U,$J,358.3,4459,0)
 ;;=G50.0^^41^319^69
 ;;^UTILITY(U,$J,358.3,4459,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4459,1,3,0)
 ;;=3^Trigeminal Neuralgia
 ;;^UTILITY(U,$J,358.3,4459,1,4,0)
 ;;=4^G50.0
 ;;^UTILITY(U,$J,358.3,4459,2)
 ;;=^121978
 ;;^UTILITY(U,$J,358.3,4460,0)
 ;;=G45.0^^41^319^71
 ;;^UTILITY(U,$J,358.3,4460,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4460,1,3,0)
 ;;=3^Vertebro-Basilar Artery Syndrome
 ;;^UTILITY(U,$J,358.3,4460,1,4,0)
 ;;=4^G45.0
 ;;^UTILITY(U,$J,358.3,4460,2)
 ;;=^5003955
 ;;^UTILITY(U,$J,358.3,4461,0)
 ;;=G91.9^^41^319^15
 ;;^UTILITY(U,$J,358.3,4461,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4461,1,3,0)
 ;;=3^Hydrocephalus,Unspec
 ;;^UTILITY(U,$J,358.3,4461,1,4,0)
 ;;=4^G91.9
 ;;^UTILITY(U,$J,358.3,4461,2)
 ;;=^5004178
 ;;^UTILITY(U,$J,358.3,4462,0)
 ;;=G93.6^^41^319^6
 ;;^UTILITY(U,$J,358.3,4462,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4462,1,3,0)
 ;;=3^Cerebral Edema
 ;;^UTILITY(U,$J,358.3,4462,1,4,0)
 ;;=4^G93.6
 ;;^UTILITY(U,$J,358.3,4462,2)
 ;;=^5004183
 ;;^UTILITY(U,$J,358.3,4463,0)
 ;;=I97.810^^41^319^18
 ;;^UTILITY(U,$J,358.3,4463,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4463,1,3,0)
 ;;=3^Intraoperative Cerebvasc Infarc during Cardiac Surgery
 ;;^UTILITY(U,$J,358.3,4463,1,4,0)
 ;;=4^I97.810
 ;;^UTILITY(U,$J,358.3,4463,2)
 ;;=^5008107
 ;;^UTILITY(U,$J,358.3,4464,0)
 ;;=I97.811^^41^319^19
 ;;^UTILITY(U,$J,358.3,4464,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4464,1,3,0)
 ;;=3^Intraoperative Cerebvasc Infarc during Oth Surgery
 ;;^UTILITY(U,$J,358.3,4464,1,4,0)
 ;;=4^I97.811
 ;;^UTILITY(U,$J,358.3,4464,2)
 ;;=^5008108
 ;;^UTILITY(U,$J,358.3,4465,0)
 ;;=I97.820^^41^319^38
 ;;^UTILITY(U,$J,358.3,4465,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4465,1,3,0)
 ;;=3^Postproc Cerebvasc Infarc during Cardiac Surgery
 ;;^UTILITY(U,$J,358.3,4465,1,4,0)
 ;;=4^I97.820
 ;;^UTILITY(U,$J,358.3,4465,2)
 ;;=^5008109
 ;;^UTILITY(U,$J,358.3,4466,0)
 ;;=I97.821^^41^319^39
 ;;^UTILITY(U,$J,358.3,4466,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4466,1,3,0)
 ;;=3^Postproc Cerebvasc Infarc during Oth Surgery
 ;;^UTILITY(U,$J,358.3,4466,1,4,0)
 ;;=4^I97.821
 ;;^UTILITY(U,$J,358.3,4466,2)
 ;;=^5008110
 ;;^UTILITY(U,$J,358.3,4467,0)
 ;;=G97.2^^41^319^17
 ;;^UTILITY(U,$J,358.3,4467,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4467,1,3,0)
 ;;=3^Intracranial Hypotension Following Ventricular Shunting
 ;;^UTILITY(U,$J,358.3,4467,1,4,0)
 ;;=4^G97.2
 ;;^UTILITY(U,$J,358.3,4467,2)
 ;;=^5004203
 ;;^UTILITY(U,$J,358.3,4468,0)
 ;;=G93.82^^41^319^3
 ;;^UTILITY(U,$J,358.3,4468,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4468,1,3,0)
 ;;=3^Brain Death
 ;;^UTILITY(U,$J,358.3,4468,1,4,0)
 ;;=4^G93.82
 ;;^UTILITY(U,$J,358.3,4468,2)
 ;;=^5004184
 ;;^UTILITY(U,$J,358.3,4469,0)
 ;;=S06.1X0A^^41^319^66
 ;;^UTILITY(U,$J,358.3,4469,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4469,1,3,0)
 ;;=3^Traum Cereb Edema w/o LOC,Init
 ;;^UTILITY(U,$J,358.3,4469,1,4,0)
 ;;=4^S06.1X0A
 ;;^UTILITY(U,$J,358.3,4469,2)
 ;;=^5020696
 ;;^UTILITY(U,$J,358.3,4470,0)
 ;;=S06.1X0D^^41^319^67
 ;;^UTILITY(U,$J,358.3,4470,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4470,1,3,0)
 ;;=3^Traum Cereb Edema w/o LOC,Subs
 ;;^UTILITY(U,$J,358.3,4470,1,4,0)
 ;;=4^S06.1X0D
 ;;^UTILITY(U,$J,358.3,4470,2)
 ;;=^5020697
 ;;^UTILITY(U,$J,358.3,4471,0)
 ;;=S06.1X0S^^41^319^68
 ;;^UTILITY(U,$J,358.3,4471,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4471,1,3,0)
 ;;=3^Traum Cereb Edema w/o LOC,Seq
 ;;^UTILITY(U,$J,358.3,4471,1,4,0)
 ;;=4^S06.1X0S
 ;;^UTILITY(U,$J,358.3,4471,2)
 ;;=^5020698
 ;;^UTILITY(U,$J,358.3,4472,0)
 ;;=S06.1X1A^^41^319^43
 ;;^UTILITY(U,$J,358.3,4472,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4472,1,3,0)
 ;;=3^Traum Cereb Edema w LOC 30 min or Less,Init
 ;;^UTILITY(U,$J,358.3,4472,1,4,0)
 ;;=4^S06.1X1A
 ;;^UTILITY(U,$J,358.3,4472,2)
 ;;=^5020699
 ;;^UTILITY(U,$J,358.3,4473,0)
 ;;=S06.1X1D^^41^319^44
 ;;^UTILITY(U,$J,358.3,4473,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4473,1,3,0)
 ;;=3^Traum Cereb Edema w LOC 30 min or Less,Subs
 ;;^UTILITY(U,$J,358.3,4473,1,4,0)
 ;;=4^S06.1X1D
 ;;^UTILITY(U,$J,358.3,4473,2)
 ;;=^5020700
 ;;^UTILITY(U,$J,358.3,4474,0)
 ;;=S06.1X1S^^41^319^45
 ;;^UTILITY(U,$J,358.3,4474,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4474,1,3,0)
 ;;=3^Traum Cereb Edema w LOC 30 min or Less,Seq
 ;;^UTILITY(U,$J,358.3,4474,1,4,0)
 ;;=4^S06.1X1S
 ;;^UTILITY(U,$J,358.3,4474,2)
 ;;=^5020701
 ;;^UTILITY(U,$J,358.3,4475,0)
 ;;=S06.1X2A^^41^319^46
 ;;^UTILITY(U,$J,358.3,4475,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4475,1,3,0)
 ;;=3^Traum Cereb Edema w LOC 31-59 min,Init
 ;;^UTILITY(U,$J,358.3,4475,1,4,0)
 ;;=4^S06.1X2A
 ;;^UTILITY(U,$J,358.3,4475,2)
 ;;=^5020702
 ;;^UTILITY(U,$J,358.3,4476,0)
 ;;=S06.1X2D^^41^319^47
 ;;^UTILITY(U,$J,358.3,4476,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4476,1,3,0)
 ;;=3^Traum Cereb Edema w LOC 31-59 min,Subs
 ;;^UTILITY(U,$J,358.3,4476,1,4,0)
 ;;=4^S06.1X2D
 ;;^UTILITY(U,$J,358.3,4476,2)
 ;;=^5020703
 ;;^UTILITY(U,$J,358.3,4477,0)
 ;;=S06.1X2S^^41^319^48
 ;;^UTILITY(U,$J,358.3,4477,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4477,1,3,0)
 ;;=3^Traum Cereb Edema w LOC 31-59 min,Seq
 ;;^UTILITY(U,$J,358.3,4477,1,4,0)
 ;;=4^S06.1X2S
 ;;^UTILITY(U,$J,358.3,4477,2)
 ;;=^5020704
 ;;^UTILITY(U,$J,358.3,4478,0)
 ;;=S06.1X3A^^41^319^49
 ;;^UTILITY(U,$J,358.3,4478,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4478,1,3,0)
 ;;=3^Traum Cereb Edema w LOC 1-5 hrs 59 min,Init
 ;;^UTILITY(U,$J,358.3,4478,1,4,0)
 ;;=4^S06.1X3A
 ;;^UTILITY(U,$J,358.3,4478,2)
 ;;=^5020705
 ;;^UTILITY(U,$J,358.3,4479,0)
 ;;=S06.1X3D^^41^319^50
 ;;^UTILITY(U,$J,358.3,4479,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4479,1,3,0)
 ;;=3^Traum Cereb Edema w LOC 1-5 hrs 59 min,Subs