IBDEI02Q ; ; 28-OCT-2020
;;3.0;IB ENCOUNTER FORM IMP/EXP;;OCT 28, 2020
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,6086,1,4,0)
;;=4^B02.0
;;^UTILITY(U,$J,358.3,6086,2)
;;=^5000488
;;^UTILITY(U,$J,358.3,6087,0)
;;=B02.29^^47^376^36
;;^UTILITY(U,$J,358.3,6087,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,6087,1,3,0)
;;=3^Postherpetic Nervous System Involvement,Other
;;^UTILITY(U,$J,358.3,6087,1,4,0)
;;=4^B02.29
;;^UTILITY(U,$J,358.3,6087,2)
;;=^5000492
;;^UTILITY(U,$J,358.3,6088,0)
;;=F03.90^^47^376^10
;;^UTILITY(U,$J,358.3,6088,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,6088,1,3,0)
;;=3^Dementia w/o Behavioral Disturbance,Unspec
;;^UTILITY(U,$J,358.3,6088,1,4,0)
;;=4^F03.90
;;^UTILITY(U,$J,358.3,6088,2)
;;=^5003050
;;^UTILITY(U,$J,358.3,6089,0)
;;=F03.91^^47^376^9
;;^UTILITY(U,$J,358.3,6089,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,6089,1,3,0)
;;=3^Dementia w/ Behavioral Disturbance,Unspec
;;^UTILITY(U,$J,358.3,6089,1,4,0)
;;=4^F03.91
;;^UTILITY(U,$J,358.3,6089,2)
;;=^5133350
;;^UTILITY(U,$J,358.3,6090,0)
;;=F01.50^^47^376^12
;;^UTILITY(U,$J,358.3,6090,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,6090,1,3,0)
;;=3^Dementia,Vascular w/o Behavioral Disturbance
;;^UTILITY(U,$J,358.3,6090,1,4,0)
;;=4^F01.50
;;^UTILITY(U,$J,358.3,6090,2)
;;=^5003046
;;^UTILITY(U,$J,358.3,6091,0)
;;=F10.27^^47^376^11
;;^UTILITY(U,$J,358.3,6091,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,6091,1,3,0)
;;=3^Dementia,Alcohol-Induced/Persist w/ Alcohol Dependence
;;^UTILITY(U,$J,358.3,6091,1,4,0)
;;=4^F10.27
;;^UTILITY(U,$J,358.3,6091,2)
;;=^5003095
;;^UTILITY(U,$J,358.3,6092,0)
;;=F06.1^^47^376^6
;;^UTILITY(U,$J,358.3,6092,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,6092,1,3,0)
;;=3^Catatonic Disorder d/t Known Physiological Condition
;;^UTILITY(U,$J,358.3,6092,1,4,0)
;;=4^F06.1
;;^UTILITY(U,$J,358.3,6092,2)
;;=^5003054
;;^UTILITY(U,$J,358.3,6093,0)
;;=F06.8^^47^376^21
;;^UTILITY(U,$J,358.3,6093,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,6093,1,3,0)
;;=3^Mental Disorders d/t Known Physiological Condition,Other
;;^UTILITY(U,$J,358.3,6093,1,4,0)
;;=4^F06.8
;;^UTILITY(U,$J,358.3,6093,2)
;;=^5003062
;;^UTILITY(U,$J,358.3,6094,0)
;;=F06.0^^47^376^37
;;^UTILITY(U,$J,358.3,6094,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,6094,1,3,0)
;;=3^Psychotic Disorder w/ Hallucin d/t Known Physiol Condition
;;^UTILITY(U,$J,358.3,6094,1,4,0)
;;=4^F06.0
;;^UTILITY(U,$J,358.3,6094,2)
;;=^5003053
;;^UTILITY(U,$J,358.3,6095,0)
;;=G44.209^^47^376^42
;;^UTILITY(U,$J,358.3,6095,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,6095,1,3,0)
;;=3^Tension-Type Headache,Not Intractable,Unspec
;;^UTILITY(U,$J,358.3,6095,1,4,0)
;;=4^G44.209
;;^UTILITY(U,$J,358.3,6095,2)
;;=^5003936
;;^UTILITY(U,$J,358.3,6096,0)
;;=F09.^^47^376^20
;;^UTILITY(U,$J,358.3,6096,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,6096,1,3,0)
;;=3^Mental Disorder d/t Known Physiological Condition,Unspec
;;^UTILITY(U,$J,358.3,6096,1,4,0)
;;=4^F09.
;;^UTILITY(U,$J,358.3,6096,2)
;;=^5003067
;;^UTILITY(U,$J,358.3,6097,0)
;;=F07.9^^47^376^35
;;^UTILITY(U,$J,358.3,6097,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,6097,1,3,0)
;;=3^Personality & Behavrl Disorder d/t Known Physiol Cond,Unspec
;;^UTILITY(U,$J,358.3,6097,1,4,0)
;;=4^F07.9
;;^UTILITY(U,$J,358.3,6097,2)
;;=^5003066
;;^UTILITY(U,$J,358.3,6098,0)
;;=G30.0^^47^376^1
;;^UTILITY(U,$J,358.3,6098,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,6098,1,3,0)
;;=3^Alzheimer's Disease w/ Early Onset
;;^UTILITY(U,$J,358.3,6098,1,4,0)
;;=4^G30.0
;;^UTILITY(U,$J,358.3,6098,2)
;;=^5003805
;;^UTILITY(U,$J,358.3,6099,0)
;;=G30.8^^47^376^3
;;^UTILITY(U,$J,358.3,6099,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,6099,1,3,0)
;;=3^Alzheimer's Disease,Other
;;^UTILITY(U,$J,358.3,6099,1,4,0)
;;=4^G30.8
;;^UTILITY(U,$J,358.3,6099,2)
;;=^5003807
;;^UTILITY(U,$J,358.3,6100,0)
;;=G30.1^^47^376^2
;;^UTILITY(U,$J,358.3,6100,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,6100,1,3,0)
;;=3^Alzheimer's Disease w/ Late Onset
;;^UTILITY(U,$J,358.3,6100,1,4,0)
;;=4^G30.1
;;^UTILITY(U,$J,358.3,6100,2)
;;=^5003806
;;^UTILITY(U,$J,358.3,6101,0)
;;=G30.9^^47^376^4
;;^UTILITY(U,$J,358.3,6101,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,6101,1,3,0)
;;=3^Alzheimer's Disease,Unspec
;;^UTILITY(U,$J,358.3,6101,1,4,0)
;;=4^G30.9
;;^UTILITY(U,$J,358.3,6101,2)
;;=^5003808
;;^UTILITY(U,$J,358.3,6102,0)
;;=G21.4^^47^376^45
;;^UTILITY(U,$J,358.3,6102,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,6102,1,3,0)
;;=3^Vascular Parkinsonism
;;^UTILITY(U,$J,358.3,6102,1,4,0)
;;=4^G21.4
;;^UTILITY(U,$J,358.3,6102,2)
;;=^5003776
;;^UTILITY(U,$J,358.3,6103,0)
;;=G20.^^47^376^34
;;^UTILITY(U,$J,358.3,6103,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,6103,1,3,0)
;;=3^Parkinson's Disease
;;^UTILITY(U,$J,358.3,6103,1,4,0)
;;=4^G20.
;;^UTILITY(U,$J,358.3,6103,2)
;;=^5003770
;;^UTILITY(U,$J,358.3,6104,0)
;;=G25.0^^47^376^15
;;^UTILITY(U,$J,358.3,6104,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,6104,1,3,0)
;;=3^Essential Tremor
;;^UTILITY(U,$J,358.3,6104,1,4,0)
;;=4^G25.0
;;^UTILITY(U,$J,358.3,6104,2)
;;=^5003791
;;^UTILITY(U,$J,358.3,6105,0)
;;=G25.2^^47^376^44
;;^UTILITY(U,$J,358.3,6105,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,6105,1,3,0)
;;=3^Tremor,Other Spec Forms
;;^UTILITY(U,$J,358.3,6105,1,4,0)
;;=4^G25.2
;;^UTILITY(U,$J,358.3,6105,2)
;;=^5003793
;;^UTILITY(U,$J,358.3,6106,0)
;;=G25.1^^47^376^43
;;^UTILITY(U,$J,358.3,6106,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,6106,1,3,0)
;;=3^Tremor,Drug-Induced
;;^UTILITY(U,$J,358.3,6106,1,4,0)
;;=4^G25.1
;;^UTILITY(U,$J,358.3,6106,2)
;;=^5003792
;;^UTILITY(U,$J,358.3,6107,0)
;;=G25.81^^47^376^38
;;^UTILITY(U,$J,358.3,6107,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,6107,1,3,0)
;;=3^Restless Legs Syndrome
;;^UTILITY(U,$J,358.3,6107,1,4,0)
;;=4^G25.81
;;^UTILITY(U,$J,358.3,6107,2)
;;=^5003801
;;^UTILITY(U,$J,358.3,6108,0)
;;=G35.^^47^376^31
;;^UTILITY(U,$J,358.3,6108,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,6108,1,3,0)
;;=3^Multiple Sclerosis
;;^UTILITY(U,$J,358.3,6108,1,4,0)
;;=4^G35.
;;^UTILITY(U,$J,358.3,6108,2)
;;=^79761
;;^UTILITY(U,$J,358.3,6109,0)
;;=G40.901^^47^376^13
;;^UTILITY(U,$J,358.3,6109,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,6109,1,3,0)
;;=3^Epilepsy,Not Intractable w/ Status Epilepticus,Unspec
;;^UTILITY(U,$J,358.3,6109,1,4,0)
;;=4^G40.901
;;^UTILITY(U,$J,358.3,6109,2)
;;=^5003864
;;^UTILITY(U,$J,358.3,6110,0)
;;=G40.909^^47^376^14
;;^UTILITY(U,$J,358.3,6110,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,6110,1,3,0)
;;=3^Epilepsy,Not Intractable w/o Status Epilepticus,Unspec
;;^UTILITY(U,$J,358.3,6110,1,4,0)
;;=4^G40.909
;;^UTILITY(U,$J,358.3,6110,2)
;;=^5003865
;;^UTILITY(U,$J,358.3,6111,0)
;;=G43.809^^47^376^28
;;^UTILITY(U,$J,358.3,6111,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,6111,1,3,0)
;;=3^Migraine,Not Intractable w/o Status Migrainosus,Other
;;^UTILITY(U,$J,358.3,6111,1,4,0)
;;=4^G43.809
;;^UTILITY(U,$J,358.3,6111,2)
;;=^5003901
;;^UTILITY(U,$J,358.3,6112,0)
;;=G43.B0^^47^376^30
;;^UTILITY(U,$J,358.3,6112,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,6112,1,3,0)
;;=3^Migraine,Ophthalmoplegic Not Intractable
;;^UTILITY(U,$J,358.3,6112,1,4,0)
;;=4^G43.B0
;;^UTILITY(U,$J,358.3,6112,2)
;;=^5003914
;;^UTILITY(U,$J,358.3,6113,0)
;;=G43.C0^^47^376^17
;;^UTILITY(U,$J,358.3,6113,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,6113,1,3,0)
;;=3^Headache Syndromes,Periodic Not Intractable
;;^UTILITY(U,$J,358.3,6113,1,4,0)
;;=4^G43.C0
;;^UTILITY(U,$J,358.3,6113,2)
;;=^5003916
;;^UTILITY(U,$J,358.3,6114,0)
;;=G43.A0^^47^376^8
;;^UTILITY(U,$J,358.3,6114,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,6114,1,3,0)
;;=3^Cyclical Vomiting Not Intractable
;;^UTILITY(U,$J,358.3,6114,1,4,0)
;;=4^G43.A0
;;^UTILITY(U,$J,358.3,6114,2)
;;=^5003912
;;^UTILITY(U,$J,358.3,6115,0)
;;=G43.C1^^47^376^16
;;^UTILITY(U,$J,358.3,6115,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,6115,1,3,0)
;;=3^Headache Syndromes,Periodic Intractable
;;^UTILITY(U,$J,358.3,6115,1,4,0)
;;=4^G43.C1
;;^UTILITY(U,$J,358.3,6115,2)
;;=^5003917
;;^UTILITY(U,$J,358.3,6116,0)
;;=G43.B1^^47^376^29
;;^UTILITY(U,$J,358.3,6116,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,6116,1,3,0)
;;=3^Migraine,Ophthalmoplegic Intractable
;;^UTILITY(U,$J,358.3,6116,1,4,0)
;;=4^G43.B1
;;^UTILITY(U,$J,358.3,6116,2)
;;=^5003915
;;^UTILITY(U,$J,358.3,6117,0)
;;=G43.A1^^47^376^7
;;^UTILITY(U,$J,358.3,6117,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,6117,1,3,0)
;;=3^Cyclical Vomiting Intractable
;;^UTILITY(U,$J,358.3,6117,1,4,0)
;;=4^G43.A1
;;^UTILITY(U,$J,358.3,6117,2)
;;=^5003913
;;^UTILITY(U,$J,358.3,6118,0)
;;=G43.819^^47^376^25
;;^UTILITY(U,$J,358.3,6118,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,6118,1,3,0)
;;=3^Migraine Intractable w/o Status Migrainosus,Other
;;^UTILITY(U,$J,358.3,6118,1,4,0)
;;=4^G43.819
;;^UTILITY(U,$J,358.3,6118,2)
;;=^5003903
;;^UTILITY(U,$J,358.3,6119,0)
;;=G43.909^^47^376^27
;;^UTILITY(U,$J,358.3,6119,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,6119,1,3,0)
;;=3^Migraine Not Intractable w/o Status Migrainosus,Unspec
;;^UTILITY(U,$J,358.3,6119,1,4,0)
;;=4^G43.909
;;^UTILITY(U,$J,358.3,6119,2)
;;=^5003909
;;^UTILITY(U,$J,358.3,6120,0)
;;=G43.919^^47^376^26
;;^UTILITY(U,$J,358.3,6120,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,6120,1,3,0)
;;=3^Migraine Intractable w/o Status Migrainosus,Unspec
;;^UTILITY(U,$J,358.3,6120,1,4,0)
;;=4^G43.919
;;^UTILITY(U,$J,358.3,6120,2)
;;=^5003911
;;^UTILITY(U,$J,358.3,6121,0)
;;=G51.0^^47^376^5
;;^UTILITY(U,$J,358.3,6121,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,6121,1,3,0)
;;=3^Bell's Palsy
;;^UTILITY(U,$J,358.3,6121,1,4,0)
;;=4^G51.0
;;^UTILITY(U,$J,358.3,6121,2)
;;=^13238
;;^UTILITY(U,$J,358.3,6122,0)
;;=G57.10^^47^376^22
;;^UTILITY(U,$J,358.3,6122,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,6122,1,3,0)
;;=3^Meralgia Paresthetica Lower Limb,Unspec
;;^UTILITY(U,$J,358.3,6122,1,4,0)
;;=4^G57.10
;;^UTILITY(U,$J,358.3,6122,2)
;;=^5004041
;;^UTILITY(U,$J,358.3,6123,0)
;;=G57.12^^47^376^23
;;^UTILITY(U,$J,358.3,6123,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,6123,1,3,0)
;;=3^Meralgia Paresthetica,Left Lower Limb
;;^UTILITY(U,$J,358.3,6123,1,4,0)
;;=4^G57.12
;;^UTILITY(U,$J,358.3,6123,2)
;;=^5004043
;;^UTILITY(U,$J,358.3,6124,0)
;;=G57.11^^47^376^24
;;^UTILITY(U,$J,358.3,6124,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,6124,1,3,0)
;;=3^Meralgia Paresthetica,Right Lower Limb
;;^UTILITY(U,$J,358.3,6124,1,4,0)
;;=4^G57.11
;;^UTILITY(U,$J,358.3,6124,2)
;;=^5004042
;;^UTILITY(U,$J,358.3,6125,0)
;;=G60.8^^47^376^32
;;^UTILITY(U,$J,358.3,6125,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,6125,1,3,0)
;;=3^Neuropathies,Oth Hereditary and Idiopathic
;;^UTILITY(U,$J,358.3,6125,1,4,0)
;;=4^G60.8
;;^UTILITY(U,$J,358.3,6125,2)
;;=^5004070
;;^UTILITY(U,$J,358.3,6126,0)
;;=G60.9^^47^376^33
;;^UTILITY(U,$J,358.3,6126,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,6126,1,3,0)
;;=3^Neuropathy,Hereditary and Idiopathic Unspec
;;^UTILITY(U,$J,358.3,6126,1,4,0)
;;=4^G60.9
;;^UTILITY(U,$J,358.3,6126,2)
;;=^5004071
;;^UTILITY(U,$J,358.3,6127,0)
;;=I69.959^^47^376^18
;;^UTILITY(U,$J,358.3,6127,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,6127,1,3,0)
;;=3^Hemplg/Hemprs d/t Cerebvasc Diz Aff Unspec Side
;;^UTILITY(U,$J,358.3,6127,1,4,0)
;;=4^I69.959
;;^UTILITY(U,$J,358.3,6127,2)
;;=^5007563
;;^UTILITY(U,$J,358.3,6128,0)
;;=I69.359^^47^376^19
;;^UTILITY(U,$J,358.3,6128,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,6128,1,3,0)
;;=3^Hemplg/Hemprs d/t Cerebvasc Infrc Aff Unspec Side
;;^UTILITY(U,$J,358.3,6128,1,4,0)
;;=4^I69.359
;;^UTILITY(U,$J,358.3,6128,2)
;;=^5007508
;;^UTILITY(U,$J,358.3,6129,0)
;;=S14.109S^^47^376^39
;;^UTILITY(U,$J,358.3,6129,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,6129,1,3,0)
;;=3^Sequela of Unspec Injury to Cervical Spinal Cord
;;^UTILITY(U,$J,358.3,6129,1,4,0)
;;=4^S14.109S
;;^UTILITY(U,$J,358.3,6129,2)
;;=^5134243
;;^UTILITY(U,$J,358.3,6130,0)
;;=S34.109S^^47^376^40
;;^UTILITY(U,$J,358.3,6130,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,6130,1,3,0)
;;=3^Sequela of Unspec Injury to Lumbar Spinal Cord
;;^UTILITY(U,$J,358.3,6130,1,4,0)
;;=4^S34.109S
;;^UTILITY(U,$J,358.3,6130,2)
;;=^5134570
;;^UTILITY(U,$J,358.3,6131,0)
;;=S24.109S^^47^376^41
;;^UTILITY(U,$J,358.3,6131,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,6131,1,3,0)
;;=3^Sequela of Unspec Injury to Thoracic Spinal Cord
;;^UTILITY(U,$J,358.3,6131,1,4,0)
;;=4^S24.109S
;;^UTILITY(U,$J,358.3,6131,2)
;;=^5134384
;;^UTILITY(U,$J,358.3,6132,0)
;;=Z91.5^^47^377^1
;;^UTILITY(U,$J,358.3,6132,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,6132,1,3,0)
;;=3^Personal Hx of Suicide Attempt(s)
;;^UTILITY(U,$J,358.3,6132,1,4,0)
;;=4^Z91.5
;;^UTILITY(U,$J,358.3,6132,2)
;;=^5063624
;;^UTILITY(U,$J,358.3,6133,0)
;;=R45.851^^47^377^2
;;^UTILITY(U,$J,358.3,6133,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,6133,1,3,0)
;;=3^Suicidal Ideations
;;^UTILITY(U,$J,358.3,6133,1,4,0)
;;=4^R45.851
;;^UTILITY(U,$J,358.3,6133,2)
;;=^5019474
;;^UTILITY(U,$J,358.3,6134,0)
;;=T14.91XA^^47^377^3
;;^UTILITY(U,$J,358.3,6134,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,6134,1,3,0)
;;=3^Suicide Attempt,Initial Encntr
;;^UTILITY(U,$J,358.3,6134,1,4,0)
;;=4^T14.91XA
;;^UTILITY(U,$J,358.3,6134,2)
;;=^5151779
;;^UTILITY(U,$J,358.3,6135,0)
;;=T14.91XD^^47^377^4
;;^UTILITY(U,$J,358.3,6135,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,6135,1,3,0)
;;=3^Suicide Attempt,Subsequent Encntr
;;^UTILITY(U,$J,358.3,6135,1,4,0)
;;=4^T14.91XD
;;^UTILITY(U,$J,358.3,6135,2)
;;=^5151780
;;^UTILITY(U,$J,358.3,6136,0)
;;=T14.91XS^^47^377^5
;;^UTILITY(U,$J,358.3,6136,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,6136,1,3,0)
;;=3^Suicide Attempt,Sequela
;;^UTILITY(U,$J,358.3,6136,1,4,0)
;;=4^T14.91XS
;;^UTILITY(U,$J,358.3,6136,2)
;;=^5151781
;;^UTILITY(U,$J,358.3,6137,0)
;;=99211^^48^378^1
;;^UTILITY(U,$J,358.3,6137,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,6137,1,1,0)
;;=1^Brief (no MD seen)
;;^UTILITY(U,$J,358.3,6137,1,2,0)
;;=2^99211
;;^UTILITY(U,$J,358.3,6138,0)
;;=99212^^48^378^2
;;^UTILITY(U,$J,358.3,6138,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,6138,1,1,0)
;;=1^Problem Focused
;;^UTILITY(U,$J,358.3,6138,1,2,0)
;;=2^99212
;;^UTILITY(U,$J,358.3,6139,0)
;;=99213^^48^378^3
;;^UTILITY(U,$J,358.3,6139,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,6139,1,1,0)
;;=1^Expanded Problem Focused
;;^UTILITY(U,$J,358.3,6139,1,2,0)
;;=2^99213
;;^UTILITY(U,$J,358.3,6140,0)
;;=99214^^48^378^4
;;^UTILITY(U,$J,358.3,6140,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,6140,1,1,0)
;;=1^Detailed
;;^UTILITY(U,$J,358.3,6140,1,2,0)
;;=2^99214
;;^UTILITY(U,$J,358.3,6141,0)
;;=99215^^48^378^5
;;^UTILITY(U,$J,358.3,6141,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,6141,1,1,0)
;;=1^Comprehensive
;;^UTILITY(U,$J,358.3,6141,1,2,0)
;;=2^99215
;;^UTILITY(U,$J,358.3,6142,0)
;;=99201^^48^379^1
;;^UTILITY(U,$J,358.3,6142,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,6142,1,1,0)
;;=1^Problem Focused
;;^UTILITY(U,$J,358.3,6142,1,2,0)
;;=2^99201
;;^UTILITY(U,$J,358.3,6143,0)
;;=99202^^48^379^2
;;^UTILITY(U,$J,358.3,6143,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,6143,1,1,0)
;;=1^Expanded Problem Focused
;;^UTILITY(U,$J,358.3,6143,1,2,0)
;;=2^99202
;;^UTILITY(U,$J,358.3,6144,0)
;;=99203^^48^379^3
;;^UTILITY(U,$J,358.3,6144,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,6144,1,1,0)
;;=1^Detailed
;;^UTILITY(U,$J,358.3,6144,1,2,0)
;;=2^99203
;;^UTILITY(U,$J,358.3,6145,0)
;;=99204^^48^379^4
;;^UTILITY(U,$J,358.3,6145,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,6145,1,1,0)
;;=1^Comprehensive,Moderate
;;^UTILITY(U,$J,358.3,6145,1,2,0)
;;=2^99204
;;^UTILITY(U,$J,358.3,6146,0)
;;=99205^^48^379^5
;;^UTILITY(U,$J,358.3,6146,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,6146,1,1,0)
;;=1^Comprehensive,High
;;^UTILITY(U,$J,358.3,6146,1,2,0)
;;=2^99205
;;^UTILITY(U,$J,358.3,6147,0)
;;=99201^^50^380^1
;;^UTILITY(U,$J,358.3,6147,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,6147,1,1,0)
;;=1^Problem Focus
;;^UTILITY(U,$J,358.3,6147,1,2,0)
;;=2^99201
;;^UTILITY(U,$J,358.3,6148,0)
;;=99202^^50^380^2
;;^UTILITY(U,$J,358.3,6148,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,6148,1,1,0)
;;=1^Expanded Problem Focus
;;^UTILITY(U,$J,358.3,6148,1,2,0)
;;=2^99202
;;^UTILITY(U,$J,358.3,6149,0)
;;=99203^^50^380^3
;;^UTILITY(U,$J,358.3,6149,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,6149,1,1,0)
;;=1^Detailed
;;^UTILITY(U,$J,358.3,6149,1,2,0)
;;=2^99203
;;^UTILITY(U,$J,358.3,6150,0)
;;=99204^^50^380^4
;;^UTILITY(U,$J,358.3,6150,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,6150,1,1,0)
;;=1^Comprehensive, Moderate
;;^UTILITY(U,$J,358.3,6150,1,2,0)
;;=2^99204
;;^UTILITY(U,$J,358.3,6151,0)
;;=99205^^50^380^5
;;^UTILITY(U,$J,358.3,6151,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,6151,1,1,0)
;;=1^Comprehensive, High
;;^UTILITY(U,$J,358.3,6151,1,2,0)
;;=2^99205
;;^UTILITY(U,$J,358.3,6152,0)
;;=99211^^50^381^1
;;^UTILITY(U,$J,358.3,6152,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,6152,1,1,0)
;;=1^Brief (no MD seen)
;;^UTILITY(U,$J,358.3,6152,1,2,0)
;;=2^99211
;;^UTILITY(U,$J,358.3,6153,0)
;;=99212^^50^381^2
;;^UTILITY(U,$J,358.3,6153,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,6153,1,1,0)
;;=1^Problem Focused
;;^UTILITY(U,$J,358.3,6153,1,2,0)
;;=2^99212
;;^UTILITY(U,$J,358.3,6154,0)
;;=99213^^50^381^3
;;^UTILITY(U,$J,358.3,6154,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,6154,1,1,0)
;;=1^Expanded Problem Focus
;;^UTILITY(U,$J,358.3,6154,1,2,0)
;;=2^99213
;;^UTILITY(U,$J,358.3,6155,0)
;;=99214^^50^381^4
;;^UTILITY(U,$J,358.3,6155,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,6155,1,1,0)
;;=1^Detailed
;;^UTILITY(U,$J,358.3,6155,1,2,0)
;;=2^99214
;;^UTILITY(U,$J,358.3,6156,0)
;;=99215^^50^381^5
;;^UTILITY(U,$J,358.3,6156,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,6156,1,1,0)
;;=1^Comprehensive
;;^UTILITY(U,$J,358.3,6156,1,2,0)
;;=2^99215
;;^UTILITY(U,$J,358.3,6157,0)
;;=99024^^50^381^6
;;^UTILITY(U,$J,358.3,6157,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,6157,1,1,0)
;;=1^Post Op visit in Global Per
;;^UTILITY(U,$J,358.3,6157,1,2,0)
;;=2^99024
;;^UTILITY(U,$J,358.3,6158,0)
;;=99241^^50^382^1
;;^UTILITY(U,$J,358.3,6158,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,6158,1,1,0)
;;=1^Problem Focused
;;^UTILITY(U,$J,358.3,6158,1,2,0)
;;=2^99241
;;^UTILITY(U,$J,358.3,6159,0)
;;=99242^^50^382^2
;;^UTILITY(U,$J,358.3,6159,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,6159,1,1,0)
;;=1^Expanded Problem Focus
;;^UTILITY(U,$J,358.3,6159,1,2,0)
;;=2^99242
;;^UTILITY(U,$J,358.3,6160,0)
;;=99243^^50^382^3
;;^UTILITY(U,$J,358.3,6160,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,6160,1,1,0)
;;=1^Detailed
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HIBDEI02Q 19785 printed Jan 14, 2021@16:58:03 Page 2
IBDEI02Q ; ; 28-OCT-2020
+1 ;;3.0;IB ENCOUNTER FORM IMP/EXP;;OCT 28, 2020
+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,6086,1,4,0)
+2 ;;=4^B02.0
+3 ;;^UTILITY(U,$J,358.3,6086,2)
+4 ;;=^5000488
+5 ;;^UTILITY(U,$J,358.3,6087,0)
+6 ;;=B02.29^^47^376^36
+7 ;;^UTILITY(U,$J,358.3,6087,1,0)
+8 ;;=^358.31IA^4^2
+9 ;;^UTILITY(U,$J,358.3,6087,1,3,0)
+10 ;;=3^Postherpetic Nervous System Involvement,Other
+11 ;;^UTILITY(U,$J,358.3,6087,1,4,0)
+12 ;;=4^B02.29
+13 ;;^UTILITY(U,$J,358.3,6087,2)
+14 ;;=^5000492
+15 ;;^UTILITY(U,$J,358.3,6088,0)
+16 ;;=F03.90^^47^376^10
+17 ;;^UTILITY(U,$J,358.3,6088,1,0)
+18 ;;=^358.31IA^4^2
+19 ;;^UTILITY(U,$J,358.3,6088,1,3,0)
+20 ;;=3^Dementia w/o Behavioral Disturbance,Unspec
+21 ;;^UTILITY(U,$J,358.3,6088,1,4,0)
+22 ;;=4^F03.90
+23 ;;^UTILITY(U,$J,358.3,6088,2)
+24 ;;=^5003050
+25 ;;^UTILITY(U,$J,358.3,6089,0)
+26 ;;=F03.91^^47^376^9
+27 ;;^UTILITY(U,$J,358.3,6089,1,0)
+28 ;;=^358.31IA^4^2
+29 ;;^UTILITY(U,$J,358.3,6089,1,3,0)
+30 ;;=3^Dementia w/ Behavioral Disturbance,Unspec
+31 ;;^UTILITY(U,$J,358.3,6089,1,4,0)
+32 ;;=4^F03.91
+33 ;;^UTILITY(U,$J,358.3,6089,2)
+34 ;;=^5133350
+35 ;;^UTILITY(U,$J,358.3,6090,0)
+36 ;;=F01.50^^47^376^12
+37 ;;^UTILITY(U,$J,358.3,6090,1,0)
+38 ;;=^358.31IA^4^2
+39 ;;^UTILITY(U,$J,358.3,6090,1,3,0)
+40 ;;=3^Dementia,Vascular w/o Behavioral Disturbance
+41 ;;^UTILITY(U,$J,358.3,6090,1,4,0)
+42 ;;=4^F01.50
+43 ;;^UTILITY(U,$J,358.3,6090,2)
+44 ;;=^5003046
+45 ;;^UTILITY(U,$J,358.3,6091,0)
+46 ;;=F10.27^^47^376^11
+47 ;;^UTILITY(U,$J,358.3,6091,1,0)
+48 ;;=^358.31IA^4^2
+49 ;;^UTILITY(U,$J,358.3,6091,1,3,0)
+50 ;;=3^Dementia,Alcohol-Induced/Persist w/ Alcohol Dependence
+51 ;;^UTILITY(U,$J,358.3,6091,1,4,0)
+52 ;;=4^F10.27
+53 ;;^UTILITY(U,$J,358.3,6091,2)
+54 ;;=^5003095
+55 ;;^UTILITY(U,$J,358.3,6092,0)
+56 ;;=F06.1^^47^376^6
+57 ;;^UTILITY(U,$J,358.3,6092,1,0)
+58 ;;=^358.31IA^4^2
+59 ;;^UTILITY(U,$J,358.3,6092,1,3,0)
+60 ;;=3^Catatonic Disorder d/t Known Physiological Condition
+61 ;;^UTILITY(U,$J,358.3,6092,1,4,0)
+62 ;;=4^F06.1
+63 ;;^UTILITY(U,$J,358.3,6092,2)
+64 ;;=^5003054
+65 ;;^UTILITY(U,$J,358.3,6093,0)
+66 ;;=F06.8^^47^376^21
+67 ;;^UTILITY(U,$J,358.3,6093,1,0)
+68 ;;=^358.31IA^4^2
+69 ;;^UTILITY(U,$J,358.3,6093,1,3,0)
+70 ;;=3^Mental Disorders d/t Known Physiological Condition,Other
+71 ;;^UTILITY(U,$J,358.3,6093,1,4,0)
+72 ;;=4^F06.8
+73 ;;^UTILITY(U,$J,358.3,6093,2)
+74 ;;=^5003062
+75 ;;^UTILITY(U,$J,358.3,6094,0)
+76 ;;=F06.0^^47^376^37
+77 ;;^UTILITY(U,$J,358.3,6094,1,0)
+78 ;;=^358.31IA^4^2
+79 ;;^UTILITY(U,$J,358.3,6094,1,3,0)
+80 ;;=3^Psychotic Disorder w/ Hallucin d/t Known Physiol Condition
+81 ;;^UTILITY(U,$J,358.3,6094,1,4,0)
+82 ;;=4^F06.0
+83 ;;^UTILITY(U,$J,358.3,6094,2)
+84 ;;=^5003053
+85 ;;^UTILITY(U,$J,358.3,6095,0)
+86 ;;=G44.209^^47^376^42
+87 ;;^UTILITY(U,$J,358.3,6095,1,0)
+88 ;;=^358.31IA^4^2
+89 ;;^UTILITY(U,$J,358.3,6095,1,3,0)
+90 ;;=3^Tension-Type Headache,Not Intractable,Unspec
+91 ;;^UTILITY(U,$J,358.3,6095,1,4,0)
+92 ;;=4^G44.209
+93 ;;^UTILITY(U,$J,358.3,6095,2)
+94 ;;=^5003936
+95 ;;^UTILITY(U,$J,358.3,6096,0)
+96 ;;=F09.^^47^376^20
+97 ;;^UTILITY(U,$J,358.3,6096,1,0)
+98 ;;=^358.31IA^4^2
+99 ;;^UTILITY(U,$J,358.3,6096,1,3,0)
+100 ;;=3^Mental Disorder d/t Known Physiological Condition,Unspec
+101 ;;^UTILITY(U,$J,358.3,6096,1,4,0)
+102 ;;=4^F09.
+103 ;;^UTILITY(U,$J,358.3,6096,2)
+104 ;;=^5003067
+105 ;;^UTILITY(U,$J,358.3,6097,0)
+106 ;;=F07.9^^47^376^35
+107 ;;^UTILITY(U,$J,358.3,6097,1,0)
+108 ;;=^358.31IA^4^2
+109 ;;^UTILITY(U,$J,358.3,6097,1,3,0)
+110 ;;=3^Personality & Behavrl Disorder d/t Known Physiol Cond,Unspec
+111 ;;^UTILITY(U,$J,358.3,6097,1,4,0)
+112 ;;=4^F07.9
+113 ;;^UTILITY(U,$J,358.3,6097,2)
+114 ;;=^5003066
+115 ;;^UTILITY(U,$J,358.3,6098,0)
+116 ;;=G30.0^^47^376^1
+117 ;;^UTILITY(U,$J,358.3,6098,1,0)
+118 ;;=^358.31IA^4^2
+119 ;;^UTILITY(U,$J,358.3,6098,1,3,0)
+120 ;;=3^Alzheimer's Disease w/ Early Onset
+121 ;;^UTILITY(U,$J,358.3,6098,1,4,0)
+122 ;;=4^G30.0
+123 ;;^UTILITY(U,$J,358.3,6098,2)
+124 ;;=^5003805
+125 ;;^UTILITY(U,$J,358.3,6099,0)
+126 ;;=G30.8^^47^376^3
+127 ;;^UTILITY(U,$J,358.3,6099,1,0)
+128 ;;=^358.31IA^4^2
+129 ;;^UTILITY(U,$J,358.3,6099,1,3,0)
+130 ;;=3^Alzheimer's Disease,Other
+131 ;;^UTILITY(U,$J,358.3,6099,1,4,0)
+132 ;;=4^G30.8
+133 ;;^UTILITY(U,$J,358.3,6099,2)
+134 ;;=^5003807
+135 ;;^UTILITY(U,$J,358.3,6100,0)
+136 ;;=G30.1^^47^376^2
+137 ;;^UTILITY(U,$J,358.3,6100,1,0)
+138 ;;=^358.31IA^4^2
+139 ;;^UTILITY(U,$J,358.3,6100,1,3,0)
+140 ;;=3^Alzheimer's Disease w/ Late Onset
+141 ;;^UTILITY(U,$J,358.3,6100,1,4,0)
+142 ;;=4^G30.1
+143 ;;^UTILITY(U,$J,358.3,6100,2)
+144 ;;=^5003806
+145 ;;^UTILITY(U,$J,358.3,6101,0)
+146 ;;=G30.9^^47^376^4
+147 ;;^UTILITY(U,$J,358.3,6101,1,0)
+148 ;;=^358.31IA^4^2
+149 ;;^UTILITY(U,$J,358.3,6101,1,3,0)
+150 ;;=3^Alzheimer's Disease,Unspec
+151 ;;^UTILITY(U,$J,358.3,6101,1,4,0)
+152 ;;=4^G30.9
+153 ;;^UTILITY(U,$J,358.3,6101,2)
+154 ;;=^5003808
+155 ;;^UTILITY(U,$J,358.3,6102,0)
+156 ;;=G21.4^^47^376^45
+157 ;;^UTILITY(U,$J,358.3,6102,1,0)
+158 ;;=^358.31IA^4^2
+159 ;;^UTILITY(U,$J,358.3,6102,1,3,0)
+160 ;;=3^Vascular Parkinsonism
+161 ;;^UTILITY(U,$J,358.3,6102,1,4,0)
+162 ;;=4^G21.4
+163 ;;^UTILITY(U,$J,358.3,6102,2)
+164 ;;=^5003776
+165 ;;^UTILITY(U,$J,358.3,6103,0)
+166 ;;=G20.^^47^376^34
+167 ;;^UTILITY(U,$J,358.3,6103,1,0)
+168 ;;=^358.31IA^4^2
+169 ;;^UTILITY(U,$J,358.3,6103,1,3,0)
+170 ;;=3^Parkinson's Disease
+171 ;;^UTILITY(U,$J,358.3,6103,1,4,0)
+172 ;;=4^G20.
+173 ;;^UTILITY(U,$J,358.3,6103,2)
+174 ;;=^5003770
+175 ;;^UTILITY(U,$J,358.3,6104,0)
+176 ;;=G25.0^^47^376^15
+177 ;;^UTILITY(U,$J,358.3,6104,1,0)
+178 ;;=^358.31IA^4^2
+179 ;;^UTILITY(U,$J,358.3,6104,1,3,0)
+180 ;;=3^Essential Tremor
+181 ;;^UTILITY(U,$J,358.3,6104,1,4,0)
+182 ;;=4^G25.0
+183 ;;^UTILITY(U,$J,358.3,6104,2)
+184 ;;=^5003791
+185 ;;^UTILITY(U,$J,358.3,6105,0)
+186 ;;=G25.2^^47^376^44
+187 ;;^UTILITY(U,$J,358.3,6105,1,0)
+188 ;;=^358.31IA^4^2
+189 ;;^UTILITY(U,$J,358.3,6105,1,3,0)
+190 ;;=3^Tremor,Other Spec Forms
+191 ;;^UTILITY(U,$J,358.3,6105,1,4,0)
+192 ;;=4^G25.2
+193 ;;^UTILITY(U,$J,358.3,6105,2)
+194 ;;=^5003793
+195 ;;^UTILITY(U,$J,358.3,6106,0)
+196 ;;=G25.1^^47^376^43
+197 ;;^UTILITY(U,$J,358.3,6106,1,0)
+198 ;;=^358.31IA^4^2
+199 ;;^UTILITY(U,$J,358.3,6106,1,3,0)
+200 ;;=3^Tremor,Drug-Induced
+201 ;;^UTILITY(U,$J,358.3,6106,1,4,0)
+202 ;;=4^G25.1
+203 ;;^UTILITY(U,$J,358.3,6106,2)
+204 ;;=^5003792
+205 ;;^UTILITY(U,$J,358.3,6107,0)
+206 ;;=G25.81^^47^376^38
+207 ;;^UTILITY(U,$J,358.3,6107,1,0)
+208 ;;=^358.31IA^4^2
+209 ;;^UTILITY(U,$J,358.3,6107,1,3,0)
+210 ;;=3^Restless Legs Syndrome
+211 ;;^UTILITY(U,$J,358.3,6107,1,4,0)
+212 ;;=4^G25.81
+213 ;;^UTILITY(U,$J,358.3,6107,2)
+214 ;;=^5003801
+215 ;;^UTILITY(U,$J,358.3,6108,0)
+216 ;;=G35.^^47^376^31
+217 ;;^UTILITY(U,$J,358.3,6108,1,0)
+218 ;;=^358.31IA^4^2
+219 ;;^UTILITY(U,$J,358.3,6108,1,3,0)
+220 ;;=3^Multiple Sclerosis
+221 ;;^UTILITY(U,$J,358.3,6108,1,4,0)
+222 ;;=4^G35.
+223 ;;^UTILITY(U,$J,358.3,6108,2)
+224 ;;=^79761
+225 ;;^UTILITY(U,$J,358.3,6109,0)
+226 ;;=G40.901^^47^376^13
+227 ;;^UTILITY(U,$J,358.3,6109,1,0)
+228 ;;=^358.31IA^4^2
+229 ;;^UTILITY(U,$J,358.3,6109,1,3,0)
+230 ;;=3^Epilepsy,Not Intractable w/ Status Epilepticus,Unspec
+231 ;;^UTILITY(U,$J,358.3,6109,1,4,0)
+232 ;;=4^G40.901
+233 ;;^UTILITY(U,$J,358.3,6109,2)
+234 ;;=^5003864
+235 ;;^UTILITY(U,$J,358.3,6110,0)
+236 ;;=G40.909^^47^376^14
+237 ;;^UTILITY(U,$J,358.3,6110,1,0)
+238 ;;=^358.31IA^4^2
+239 ;;^UTILITY(U,$J,358.3,6110,1,3,0)
+240 ;;=3^Epilepsy,Not Intractable w/o Status Epilepticus,Unspec
+241 ;;^UTILITY(U,$J,358.3,6110,1,4,0)
+242 ;;=4^G40.909
+243 ;;^UTILITY(U,$J,358.3,6110,2)
+244 ;;=^5003865
+245 ;;^UTILITY(U,$J,358.3,6111,0)
+246 ;;=G43.809^^47^376^28
+247 ;;^UTILITY(U,$J,358.3,6111,1,0)
+248 ;;=^358.31IA^4^2
+249 ;;^UTILITY(U,$J,358.3,6111,1,3,0)
+250 ;;=3^Migraine,Not Intractable w/o Status Migrainosus,Other
+251 ;;^UTILITY(U,$J,358.3,6111,1,4,0)
+252 ;;=4^G43.809
+253 ;;^UTILITY(U,$J,358.3,6111,2)
+254 ;;=^5003901
+255 ;;^UTILITY(U,$J,358.3,6112,0)
+256 ;;=G43.B0^^47^376^30
+257 ;;^UTILITY(U,$J,358.3,6112,1,0)
+258 ;;=^358.31IA^4^2
+259 ;;^UTILITY(U,$J,358.3,6112,1,3,0)
+260 ;;=3^Migraine,Ophthalmoplegic Not Intractable
+261 ;;^UTILITY(U,$J,358.3,6112,1,4,0)
+262 ;;=4^G43.B0
+263 ;;^UTILITY(U,$J,358.3,6112,2)
+264 ;;=^5003914
+265 ;;^UTILITY(U,$J,358.3,6113,0)
+266 ;;=G43.C0^^47^376^17
+267 ;;^UTILITY(U,$J,358.3,6113,1,0)
+268 ;;=^358.31IA^4^2
+269 ;;^UTILITY(U,$J,358.3,6113,1,3,0)
+270 ;;=3^Headache Syndromes,Periodic Not Intractable
+271 ;;^UTILITY(U,$J,358.3,6113,1,4,0)
+272 ;;=4^G43.C0
+273 ;;^UTILITY(U,$J,358.3,6113,2)
+274 ;;=^5003916
+275 ;;^UTILITY(U,$J,358.3,6114,0)
+276 ;;=G43.A0^^47^376^8
+277 ;;^UTILITY(U,$J,358.3,6114,1,0)
+278 ;;=^358.31IA^4^2
+279 ;;^UTILITY(U,$J,358.3,6114,1,3,0)
+280 ;;=3^Cyclical Vomiting Not Intractable
+281 ;;^UTILITY(U,$J,358.3,6114,1,4,0)
+282 ;;=4^G43.A0
+283 ;;^UTILITY(U,$J,358.3,6114,2)
+284 ;;=^5003912
+285 ;;^UTILITY(U,$J,358.3,6115,0)
+286 ;;=G43.C1^^47^376^16
+287 ;;^UTILITY(U,$J,358.3,6115,1,0)
+288 ;;=^358.31IA^4^2
+289 ;;^UTILITY(U,$J,358.3,6115,1,3,0)
+290 ;;=3^Headache Syndromes,Periodic Intractable
+291 ;;^UTILITY(U,$J,358.3,6115,1,4,0)
+292 ;;=4^G43.C1
+293 ;;^UTILITY(U,$J,358.3,6115,2)
+294 ;;=^5003917
+295 ;;^UTILITY(U,$J,358.3,6116,0)
+296 ;;=G43.B1^^47^376^29
+297 ;;^UTILITY(U,$J,358.3,6116,1,0)
+298 ;;=^358.31IA^4^2
+299 ;;^UTILITY(U,$J,358.3,6116,1,3,0)
+300 ;;=3^Migraine,Ophthalmoplegic Intractable
+301 ;;^UTILITY(U,$J,358.3,6116,1,4,0)
+302 ;;=4^G43.B1
+303 ;;^UTILITY(U,$J,358.3,6116,2)
+304 ;;=^5003915
+305 ;;^UTILITY(U,$J,358.3,6117,0)
+306 ;;=G43.A1^^47^376^7
+307 ;;^UTILITY(U,$J,358.3,6117,1,0)
+308 ;;=^358.31IA^4^2
+309 ;;^UTILITY(U,$J,358.3,6117,1,3,0)
+310 ;;=3^Cyclical Vomiting Intractable
+311 ;;^UTILITY(U,$J,358.3,6117,1,4,0)
+312 ;;=4^G43.A1
+313 ;;^UTILITY(U,$J,358.3,6117,2)
+314 ;;=^5003913
+315 ;;^UTILITY(U,$J,358.3,6118,0)
+316 ;;=G43.819^^47^376^25
+317 ;;^UTILITY(U,$J,358.3,6118,1,0)
+318 ;;=^358.31IA^4^2
+319 ;;^UTILITY(U,$J,358.3,6118,1,3,0)
+320 ;;=3^Migraine Intractable w/o Status Migrainosus,Other
+321 ;;^UTILITY(U,$J,358.3,6118,1,4,0)
+322 ;;=4^G43.819
+323 ;;^UTILITY(U,$J,358.3,6118,2)
+324 ;;=^5003903
+325 ;;^UTILITY(U,$J,358.3,6119,0)
+326 ;;=G43.909^^47^376^27
+327 ;;^UTILITY(U,$J,358.3,6119,1,0)
+328 ;;=^358.31IA^4^2
+329 ;;^UTILITY(U,$J,358.3,6119,1,3,0)
+330 ;;=3^Migraine Not Intractable w/o Status Migrainosus,Unspec
+331 ;;^UTILITY(U,$J,358.3,6119,1,4,0)
+332 ;;=4^G43.909
+333 ;;^UTILITY(U,$J,358.3,6119,2)
+334 ;;=^5003909
+335 ;;^UTILITY(U,$J,358.3,6120,0)
+336 ;;=G43.919^^47^376^26
+337 ;;^UTILITY(U,$J,358.3,6120,1,0)
+338 ;;=^358.31IA^4^2
+339 ;;^UTILITY(U,$J,358.3,6120,1,3,0)
+340 ;;=3^Migraine Intractable w/o Status Migrainosus,Unspec
+341 ;;^UTILITY(U,$J,358.3,6120,1,4,0)
+342 ;;=4^G43.919
+343 ;;^UTILITY(U,$J,358.3,6120,2)
+344 ;;=^5003911
+345 ;;^UTILITY(U,$J,358.3,6121,0)
+346 ;;=G51.0^^47^376^5
+347 ;;^UTILITY(U,$J,358.3,6121,1,0)
+348 ;;=^358.31IA^4^2
+349 ;;^UTILITY(U,$J,358.3,6121,1,3,0)
+350 ;;=3^Bell's Palsy
+351 ;;^UTILITY(U,$J,358.3,6121,1,4,0)
+352 ;;=4^G51.0
+353 ;;^UTILITY(U,$J,358.3,6121,2)
+354 ;;=^13238
+355 ;;^UTILITY(U,$J,358.3,6122,0)
+356 ;;=G57.10^^47^376^22
+357 ;;^UTILITY(U,$J,358.3,6122,1,0)
+358 ;;=^358.31IA^4^2
+359 ;;^UTILITY(U,$J,358.3,6122,1,3,0)
+360 ;;=3^Meralgia Paresthetica Lower Limb,Unspec
+361 ;;^UTILITY(U,$J,358.3,6122,1,4,0)
+362 ;;=4^G57.10
+363 ;;^UTILITY(U,$J,358.3,6122,2)
+364 ;;=^5004041
+365 ;;^UTILITY(U,$J,358.3,6123,0)
+366 ;;=G57.12^^47^376^23
+367 ;;^UTILITY(U,$J,358.3,6123,1,0)
+368 ;;=^358.31IA^4^2
+369 ;;^UTILITY(U,$J,358.3,6123,1,3,0)
+370 ;;=3^Meralgia Paresthetica,Left Lower Limb
+371 ;;^UTILITY(U,$J,358.3,6123,1,4,0)
+372 ;;=4^G57.12
+373 ;;^UTILITY(U,$J,358.3,6123,2)
+374 ;;=^5004043
+375 ;;^UTILITY(U,$J,358.3,6124,0)
+376 ;;=G57.11^^47^376^24
+377 ;;^UTILITY(U,$J,358.3,6124,1,0)
+378 ;;=^358.31IA^4^2
+379 ;;^UTILITY(U,$J,358.3,6124,1,3,0)
+380 ;;=3^Meralgia Paresthetica,Right Lower Limb
+381 ;;^UTILITY(U,$J,358.3,6124,1,4,0)
+382 ;;=4^G57.11
+383 ;;^UTILITY(U,$J,358.3,6124,2)
+384 ;;=^5004042
+385 ;;^UTILITY(U,$J,358.3,6125,0)
+386 ;;=G60.8^^47^376^32
+387 ;;^UTILITY(U,$J,358.3,6125,1,0)
+388 ;;=^358.31IA^4^2
+389 ;;^UTILITY(U,$J,358.3,6125,1,3,0)
+390 ;;=3^Neuropathies,Oth Hereditary and Idiopathic
+391 ;;^UTILITY(U,$J,358.3,6125,1,4,0)
+392 ;;=4^G60.8
+393 ;;^UTILITY(U,$J,358.3,6125,2)
+394 ;;=^5004070
+395 ;;^UTILITY(U,$J,358.3,6126,0)
+396 ;;=G60.9^^47^376^33
+397 ;;^UTILITY(U,$J,358.3,6126,1,0)
+398 ;;=^358.31IA^4^2
+399 ;;^UTILITY(U,$J,358.3,6126,1,3,0)
+400 ;;=3^Neuropathy,Hereditary and Idiopathic Unspec
+401 ;;^UTILITY(U,$J,358.3,6126,1,4,0)
+402 ;;=4^G60.9
+403 ;;^UTILITY(U,$J,358.3,6126,2)
+404 ;;=^5004071
+405 ;;^UTILITY(U,$J,358.3,6127,0)
+406 ;;=I69.959^^47^376^18
+407 ;;^UTILITY(U,$J,358.3,6127,1,0)
+408 ;;=^358.31IA^4^2
+409 ;;^UTILITY(U,$J,358.3,6127,1,3,0)
+410 ;;=3^Hemplg/Hemprs d/t Cerebvasc Diz Aff Unspec Side
+411 ;;^UTILITY(U,$J,358.3,6127,1,4,0)
+412 ;;=4^I69.959
+413 ;;^UTILITY(U,$J,358.3,6127,2)
+414 ;;=^5007563
+415 ;;^UTILITY(U,$J,358.3,6128,0)
+416 ;;=I69.359^^47^376^19
+417 ;;^UTILITY(U,$J,358.3,6128,1,0)
+418 ;;=^358.31IA^4^2
+419 ;;^UTILITY(U,$J,358.3,6128,1,3,0)
+420 ;;=3^Hemplg/Hemprs d/t Cerebvasc Infrc Aff Unspec Side
+421 ;;^UTILITY(U,$J,358.3,6128,1,4,0)
+422 ;;=4^I69.359
+423 ;;^UTILITY(U,$J,358.3,6128,2)
+424 ;;=^5007508
+425 ;;^UTILITY(U,$J,358.3,6129,0)
+426 ;;=S14.109S^^47^376^39
+427 ;;^UTILITY(U,$J,358.3,6129,1,0)
+428 ;;=^358.31IA^4^2
+429 ;;^UTILITY(U,$J,358.3,6129,1,3,0)
+430 ;;=3^Sequela of Unspec Injury to Cervical Spinal Cord
+431 ;;^UTILITY(U,$J,358.3,6129,1,4,0)
+432 ;;=4^S14.109S
+433 ;;^UTILITY(U,$J,358.3,6129,2)
+434 ;;=^5134243
+435 ;;^UTILITY(U,$J,358.3,6130,0)
+436 ;;=S34.109S^^47^376^40
+437 ;;^UTILITY(U,$J,358.3,6130,1,0)
+438 ;;=^358.31IA^4^2
+439 ;;^UTILITY(U,$J,358.3,6130,1,3,0)
+440 ;;=3^Sequela of Unspec Injury to Lumbar Spinal Cord
+441 ;;^UTILITY(U,$J,358.3,6130,1,4,0)
+442 ;;=4^S34.109S
+443 ;;^UTILITY(U,$J,358.3,6130,2)
+444 ;;=^5134570
+445 ;;^UTILITY(U,$J,358.3,6131,0)
+446 ;;=S24.109S^^47^376^41
+447 ;;^UTILITY(U,$J,358.3,6131,1,0)
+448 ;;=^358.31IA^4^2
+449 ;;^UTILITY(U,$J,358.3,6131,1,3,0)
+450 ;;=3^Sequela of Unspec Injury to Thoracic Spinal Cord
+451 ;;^UTILITY(U,$J,358.3,6131,1,4,0)
+452 ;;=4^S24.109S
+453 ;;^UTILITY(U,$J,358.3,6131,2)
+454 ;;=^5134384
+455 ;;^UTILITY(U,$J,358.3,6132,0)
+456 ;;=Z91.5^^47^377^1
+457 ;;^UTILITY(U,$J,358.3,6132,1,0)
+458 ;;=^358.31IA^4^2
+459 ;;^UTILITY(U,$J,358.3,6132,1,3,0)
+460 ;;=3^Personal Hx of Suicide Attempt(s)
+461 ;;^UTILITY(U,$J,358.3,6132,1,4,0)
+462 ;;=4^Z91.5
+463 ;;^UTILITY(U,$J,358.3,6132,2)
+464 ;;=^5063624
+465 ;;^UTILITY(U,$J,358.3,6133,0)
+466 ;;=R45.851^^47^377^2
+467 ;;^UTILITY(U,$J,358.3,6133,1,0)
+468 ;;=^358.31IA^4^2
+469 ;;^UTILITY(U,$J,358.3,6133,1,3,0)
+470 ;;=3^Suicidal Ideations
+471 ;;^UTILITY(U,$J,358.3,6133,1,4,0)
+472 ;;=4^R45.851
+473 ;;^UTILITY(U,$J,358.3,6133,2)
+474 ;;=^5019474
+475 ;;^UTILITY(U,$J,358.3,6134,0)
+476 ;;=T14.91XA^^47^377^3
+477 ;;^UTILITY(U,$J,358.3,6134,1,0)
+478 ;;=^358.31IA^4^2
+479 ;;^UTILITY(U,$J,358.3,6134,1,3,0)
+480 ;;=3^Suicide Attempt,Initial Encntr
+481 ;;^UTILITY(U,$J,358.3,6134,1,4,0)
+482 ;;=4^T14.91XA
+483 ;;^UTILITY(U,$J,358.3,6134,2)
+484 ;;=^5151779
+485 ;;^UTILITY(U,$J,358.3,6135,0)
+486 ;;=T14.91XD^^47^377^4
+487 ;;^UTILITY(U,$J,358.3,6135,1,0)
+488 ;;=^358.31IA^4^2
+489 ;;^UTILITY(U,$J,358.3,6135,1,3,0)
+490 ;;=3^Suicide Attempt,Subsequent Encntr
+491 ;;^UTILITY(U,$J,358.3,6135,1,4,0)
+492 ;;=4^T14.91XD
+493 ;;^UTILITY(U,$J,358.3,6135,2)
+494 ;;=^5151780
+495 ;;^UTILITY(U,$J,358.3,6136,0)
+496 ;;=T14.91XS^^47^377^5
+497 ;;^UTILITY(U,$J,358.3,6136,1,0)
+498 ;;=^358.31IA^4^2
+499 ;;^UTILITY(U,$J,358.3,6136,1,3,0)
+500 ;;=3^Suicide Attempt,Sequela
+501 ;;^UTILITY(U,$J,358.3,6136,1,4,0)
+502 ;;=4^T14.91XS
+503 ;;^UTILITY(U,$J,358.3,6136,2)
+504 ;;=^5151781
+505 ;;^UTILITY(U,$J,358.3,6137,0)
+506 ;;=99211^^48^378^1
+507 ;;^UTILITY(U,$J,358.3,6137,1,0)
+508 ;;=^358.31IA^2^2
+509 ;;^UTILITY(U,$J,358.3,6137,1,1,0)
+510 ;;=1^Brief (no MD seen)
+511 ;;^UTILITY(U,$J,358.3,6137,1,2,0)
+512 ;;=2^99211
+513 ;;^UTILITY(U,$J,358.3,6138,0)
+514 ;;=99212^^48^378^2
+515 ;;^UTILITY(U,$J,358.3,6138,1,0)
+516 ;;=^358.31IA^2^2
+517 ;;^UTILITY(U,$J,358.3,6138,1,1,0)
+518 ;;=1^Problem Focused
+519 ;;^UTILITY(U,$J,358.3,6138,1,2,0)
+520 ;;=2^99212
+521 ;;^UTILITY(U,$J,358.3,6139,0)
+522 ;;=99213^^48^378^3
+523 ;;^UTILITY(U,$J,358.3,6139,1,0)
+524 ;;=^358.31IA^2^2
+525 ;;^UTILITY(U,$J,358.3,6139,1,1,0)
+526 ;;=1^Expanded Problem Focused
+527 ;;^UTILITY(U,$J,358.3,6139,1,2,0)
+528 ;;=2^99213
+529 ;;^UTILITY(U,$J,358.3,6140,0)
+530 ;;=99214^^48^378^4
+531 ;;^UTILITY(U,$J,358.3,6140,1,0)
+532 ;;=^358.31IA^2^2
+533 ;;^UTILITY(U,$J,358.3,6140,1,1,0)
+534 ;;=1^Detailed
+535 ;;^UTILITY(U,$J,358.3,6140,1,2,0)
+536 ;;=2^99214
+537 ;;^UTILITY(U,$J,358.3,6141,0)
+538 ;;=99215^^48^378^5
+539 ;;^UTILITY(U,$J,358.3,6141,1,0)
+540 ;;=^358.31IA^2^2
+541 ;;^UTILITY(U,$J,358.3,6141,1,1,0)
+542 ;;=1^Comprehensive
+543 ;;^UTILITY(U,$J,358.3,6141,1,2,0)
+544 ;;=2^99215
+545 ;;^UTILITY(U,$J,358.3,6142,0)
+546 ;;=99201^^48^379^1
+547 ;;^UTILITY(U,$J,358.3,6142,1,0)
+548 ;;=^358.31IA^2^2
+549 ;;^UTILITY(U,$J,358.3,6142,1,1,0)
+550 ;;=1^Problem Focused
+551 ;;^UTILITY(U,$J,358.3,6142,1,2,0)
+552 ;;=2^99201
+553 ;;^UTILITY(U,$J,358.3,6143,0)
+554 ;;=99202^^48^379^2
+555 ;;^UTILITY(U,$J,358.3,6143,1,0)
+556 ;;=^358.31IA^2^2
+557 ;;^UTILITY(U,$J,358.3,6143,1,1,0)
+558 ;;=1^Expanded Problem Focused
+559 ;;^UTILITY(U,$J,358.3,6143,1,2,0)
+560 ;;=2^99202
+561 ;;^UTILITY(U,$J,358.3,6144,0)
+562 ;;=99203^^48^379^3
+563 ;;^UTILITY(U,$J,358.3,6144,1,0)
+564 ;;=^358.31IA^2^2
+565 ;;^UTILITY(U,$J,358.3,6144,1,1,0)
+566 ;;=1^Detailed
+567 ;;^UTILITY(U,$J,358.3,6144,1,2,0)
+568 ;;=2^99203
+569 ;;^UTILITY(U,$J,358.3,6145,0)
+570 ;;=99204^^48^379^4
+571 ;;^UTILITY(U,$J,358.3,6145,1,0)
+572 ;;=^358.31IA^2^2
+573 ;;^UTILITY(U,$J,358.3,6145,1,1,0)
+574 ;;=1^Comprehensive,Moderate
+575 ;;^UTILITY(U,$J,358.3,6145,1,2,0)
+576 ;;=2^99204
+577 ;;^UTILITY(U,$J,358.3,6146,0)
+578 ;;=99205^^48^379^5
+579 ;;^UTILITY(U,$J,358.3,6146,1,0)
+580 ;;=^358.31IA^2^2
+581 ;;^UTILITY(U,$J,358.3,6146,1,1,0)
+582 ;;=1^Comprehensive,High
+583 ;;^UTILITY(U,$J,358.3,6146,1,2,0)
+584 ;;=2^99205
+585 ;;^UTILITY(U,$J,358.3,6147,0)
+586 ;;=99201^^50^380^1
+587 ;;^UTILITY(U,$J,358.3,6147,1,0)
+588 ;;=^358.31IA^2^2
+589 ;;^UTILITY(U,$J,358.3,6147,1,1,0)
+590 ;;=1^Problem Focus
+591 ;;^UTILITY(U,$J,358.3,6147,1,2,0)
+592 ;;=2^99201
+593 ;;^UTILITY(U,$J,358.3,6148,0)
+594 ;;=99202^^50^380^2
+595 ;;^UTILITY(U,$J,358.3,6148,1,0)
+596 ;;=^358.31IA^2^2
+597 ;;^UTILITY(U,$J,358.3,6148,1,1,0)
+598 ;;=1^Expanded Problem Focus
+599 ;;^UTILITY(U,$J,358.3,6148,1,2,0)
+600 ;;=2^99202
+601 ;;^UTILITY(U,$J,358.3,6149,0)
+602 ;;=99203^^50^380^3
+603 ;;^UTILITY(U,$J,358.3,6149,1,0)
+604 ;;=^358.31IA^2^2
+605 ;;^UTILITY(U,$J,358.3,6149,1,1,0)
+606 ;;=1^Detailed
+607 ;;^UTILITY(U,$J,358.3,6149,1,2,0)
+608 ;;=2^99203
+609 ;;^UTILITY(U,$J,358.3,6150,0)
+610 ;;=99204^^50^380^4
+611 ;;^UTILITY(U,$J,358.3,6150,1,0)
+612 ;;=^358.31IA^2^2
+613 ;;^UTILITY(U,$J,358.3,6150,1,1,0)
+614 ;;=1^Comprehensive, Moderate
+615 ;;^UTILITY(U,$J,358.3,6150,1,2,0)
+616 ;;=2^99204
+617 ;;^UTILITY(U,$J,358.3,6151,0)
+618 ;;=99205^^50^380^5
+619 ;;^UTILITY(U,$J,358.3,6151,1,0)
+620 ;;=^358.31IA^2^2
+621 ;;^UTILITY(U,$J,358.3,6151,1,1,0)
+622 ;;=1^Comprehensive, High
+623 ;;^UTILITY(U,$J,358.3,6151,1,2,0)
+624 ;;=2^99205
+625 ;;^UTILITY(U,$J,358.3,6152,0)
+626 ;;=99211^^50^381^1
+627 ;;^UTILITY(U,$J,358.3,6152,1,0)
+628 ;;=^358.31IA^2^2
+629 ;;^UTILITY(U,$J,358.3,6152,1,1,0)
+630 ;;=1^Brief (no MD seen)
+631 ;;^UTILITY(U,$J,358.3,6152,1,2,0)
+632 ;;=2^99211
+633 ;;^UTILITY(U,$J,358.3,6153,0)
+634 ;;=99212^^50^381^2
+635 ;;^UTILITY(U,$J,358.3,6153,1,0)
+636 ;;=^358.31IA^2^2
+637 ;;^UTILITY(U,$J,358.3,6153,1,1,0)
+638 ;;=1^Problem Focused
+639 ;;^UTILITY(U,$J,358.3,6153,1,2,0)
+640 ;;=2^99212
+641 ;;^UTILITY(U,$J,358.3,6154,0)
+642 ;;=99213^^50^381^3
+643 ;;^UTILITY(U,$J,358.3,6154,1,0)
+644 ;;=^358.31IA^2^2
+645 ;;^UTILITY(U,$J,358.3,6154,1,1,0)
+646 ;;=1^Expanded Problem Focus
+647 ;;^UTILITY(U,$J,358.3,6154,1,2,0)
+648 ;;=2^99213
+649 ;;^UTILITY(U,$J,358.3,6155,0)
+650 ;;=99214^^50^381^4
+651 ;;^UTILITY(U,$J,358.3,6155,1,0)
+652 ;;=^358.31IA^2^2
+653 ;;^UTILITY(U,$J,358.3,6155,1,1,0)
+654 ;;=1^Detailed
+655 ;;^UTILITY(U,$J,358.3,6155,1,2,0)
+656 ;;=2^99214
+657 ;;^UTILITY(U,$J,358.3,6156,0)
+658 ;;=99215^^50^381^5
+659 ;;^UTILITY(U,$J,358.3,6156,1,0)
+660 ;;=^358.31IA^2^2
+661 ;;^UTILITY(U,$J,358.3,6156,1,1,0)
+662 ;;=1^Comprehensive
+663 ;;^UTILITY(U,$J,358.3,6156,1,2,0)
+664 ;;=2^99215
+665 ;;^UTILITY(U,$J,358.3,6157,0)
+666 ;;=99024^^50^381^6
+667 ;;^UTILITY(U,$J,358.3,6157,1,0)
+668 ;;=^358.31IA^2^2
+669 ;;^UTILITY(U,$J,358.3,6157,1,1,0)
+670 ;;=1^Post Op visit in Global Per
+671 ;;^UTILITY(U,$J,358.3,6157,1,2,0)
+672 ;;=2^99024
+673 ;;^UTILITY(U,$J,358.3,6158,0)
+674 ;;=99241^^50^382^1
+675 ;;^UTILITY(U,$J,358.3,6158,1,0)
+676 ;;=^358.31IA^2^2
+677 ;;^UTILITY(U,$J,358.3,6158,1,1,0)
+678 ;;=1^Problem Focused
+679 ;;^UTILITY(U,$J,358.3,6158,1,2,0)
+680 ;;=2^99241
+681 ;;^UTILITY(U,$J,358.3,6159,0)
+682 ;;=99242^^50^382^2
+683 ;;^UTILITY(U,$J,358.3,6159,1,0)
+684 ;;=^358.31IA^2^2
+685 ;;^UTILITY(U,$J,358.3,6159,1,1,0)
+686 ;;=1^Expanded Problem Focus
+687 ;;^UTILITY(U,$J,358.3,6159,1,2,0)
+688 ;;=2^99242
+689 ;;^UTILITY(U,$J,358.3,6160,0)
+690 ;;=99243^^50^382^3
+691 ;;^UTILITY(U,$J,358.3,6160,1,0)
+692 ;;=^358.31IA^2^2
+693 ;;^UTILITY(U,$J,358.3,6160,1,1,0)
+694 ;;=1^Detailed
