IBDEI0B9 ; ; 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,27617,0)
;;=R64.^^90^1151^2
;;^UTILITY(U,$J,358.3,27617,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27617,1,3,0)
;;=3^Cachexia
;;^UTILITY(U,$J,358.3,27617,1,4,0)
;;=4^R64.
;;^UTILITY(U,$J,358.3,27617,2)
;;=^17920
;;^UTILITY(U,$J,358.3,27618,0)
;;=A41.9^^90^1151^21
;;^UTILITY(U,$J,358.3,27618,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27618,1,3,0)
;;=3^Sepsis,Unspec Organism (Septicemia)
;;^UTILITY(U,$J,358.3,27618,1,4,0)
;;=4^A41.9
;;^UTILITY(U,$J,358.3,27618,2)
;;=^5000214
;;^UTILITY(U,$J,358.3,27619,0)
;;=M62.84^^90^1151^20
;;^UTILITY(U,$J,358.3,27619,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27619,1,3,0)
;;=3^Sarcopenia
;;^UTILITY(U,$J,358.3,27619,1,4,0)
;;=4^M62.84
;;^UTILITY(U,$J,358.3,27619,2)
;;=^5138832
;;^UTILITY(U,$J,358.3,27620,0)
;;=Z79.891^^90^1151^14
;;^UTILITY(U,$J,358.3,27620,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27620,1,3,0)
;;=3^Long Term Opiate/Opioid Analgesic Use
;;^UTILITY(U,$J,358.3,27620,1,4,0)
;;=4^Z79.891
;;^UTILITY(U,$J,358.3,27620,2)
;;=^5063342
;;^UTILITY(U,$J,358.3,27621,0)
;;=R60.0^^90^1151^5
;;^UTILITY(U,$J,358.3,27621,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27621,1,3,0)
;;=3^Edema,Localized
;;^UTILITY(U,$J,358.3,27621,1,4,0)
;;=4^R60.0
;;^UTILITY(U,$J,358.3,27621,2)
;;=^5019532
;;^UTILITY(U,$J,358.3,27622,0)
;;=R60.1^^90^1151^4
;;^UTILITY(U,$J,358.3,27622,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27622,1,3,0)
;;=3^Edema,Generalized
;;^UTILITY(U,$J,358.3,27622,1,4,0)
;;=4^R60.1
;;^UTILITY(U,$J,358.3,27622,2)
;;=^5019533
;;^UTILITY(U,$J,358.3,27623,0)
;;=R60.9^^90^1151^6
;;^UTILITY(U,$J,358.3,27623,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27623,1,3,0)
;;=3^Edema,Unspec
;;^UTILITY(U,$J,358.3,27623,1,4,0)
;;=4^R60.9
;;^UTILITY(U,$J,358.3,27623,2)
;;=^5019534
;;^UTILITY(U,$J,358.3,27624,0)
;;=M79.2^^90^1151^16
;;^UTILITY(U,$J,358.3,27624,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27624,1,3,0)
;;=3^Neuralgia & Neuritis,Unspec
;;^UTILITY(U,$J,358.3,27624,1,4,0)
;;=4^M79.2
;;^UTILITY(U,$J,358.3,27624,2)
;;=^5013322
;;^UTILITY(U,$J,358.3,27625,0)
;;=R25.2^^90^1151^3
;;^UTILITY(U,$J,358.3,27625,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27625,1,3,0)
;;=3^Cramp & Spasm
;;^UTILITY(U,$J,358.3,27625,1,4,0)
;;=4^R25.2
;;^UTILITY(U,$J,358.3,27625,2)
;;=^5019301
;;^UTILITY(U,$J,358.3,27626,0)
;;=R26.0^^90^1151^9
;;^UTILITY(U,$J,358.3,27626,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27626,1,3,0)
;;=3^Gait,Ataxic
;;^UTILITY(U,$J,358.3,27626,1,4,0)
;;=4^R26.0
;;^UTILITY(U,$J,358.3,27626,2)
;;=^5019304
;;^UTILITY(U,$J,358.3,27627,0)
;;=R26.1^^90^1151^10
;;^UTILITY(U,$J,358.3,27627,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27627,1,3,0)
;;=3^Gait,Paralytic
;;^UTILITY(U,$J,358.3,27627,1,4,0)
;;=4^R26.1
;;^UTILITY(U,$J,358.3,27627,2)
;;=^5019305
;;^UTILITY(U,$J,358.3,27628,0)
;;=R26.2^^90^1151^23
;;^UTILITY(U,$J,358.3,27628,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27628,1,3,0)
;;=3^Walking Difficulty NEC
;;^UTILITY(U,$J,358.3,27628,1,4,0)
;;=4^R26.2
;;^UTILITY(U,$J,358.3,27628,2)
;;=^5019306
;;^UTILITY(U,$J,358.3,27629,0)
;;=R26.81^^90^1151^22
;;^UTILITY(U,$J,358.3,27629,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27629,1,3,0)
;;=3^Unsteadiness on Feet
;;^UTILITY(U,$J,358.3,27629,1,4,0)
;;=4^R26.81
;;^UTILITY(U,$J,358.3,27629,2)
;;=^5019307
;;^UTILITY(U,$J,358.3,27630,0)
;;=R26.89^^90^1151^8
;;^UTILITY(U,$J,358.3,27630,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27630,1,3,0)
;;=3^Gait & Mobility Abnormalities,Other
;;^UTILITY(U,$J,358.3,27630,1,4,0)
;;=4^R26.89
;;^UTILITY(U,$J,358.3,27630,2)
;;=^5019308
;;^UTILITY(U,$J,358.3,27631,0)
;;=R23.1^^90^1151^17
;;^UTILITY(U,$J,358.3,27631,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27631,1,3,0)
;;=3^Pallor
;;^UTILITY(U,$J,358.3,27631,1,4,0)
;;=4^R23.1
;;^UTILITY(U,$J,358.3,27631,2)
;;=^5019294
;;^UTILITY(U,$J,358.3,27632,0)
;;=R23.2^^90^1151^7
;;^UTILITY(U,$J,358.3,27632,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27632,1,3,0)
;;=3^Flushing
;;^UTILITY(U,$J,358.3,27632,1,4,0)
;;=4^R23.2
;;^UTILITY(U,$J,358.3,27632,2)
;;=^47184
;;^UTILITY(U,$J,358.3,27633,0)
;;=L29.8^^90^1151^18
;;^UTILITY(U,$J,358.3,27633,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27633,1,3,0)
;;=3^Pruritus,Other
;;^UTILITY(U,$J,358.3,27633,1,4,0)
;;=4^L29.8
;;^UTILITY(U,$J,358.3,27633,2)
;;=^5009152
;;^UTILITY(U,$J,358.3,27634,0)
;;=R53.0^^90^1151^15
;;^UTILITY(U,$J,358.3,27634,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27634,1,3,0)
;;=3^Neoplastic (Malignant) Related Fatigue
;;^UTILITY(U,$J,358.3,27634,1,4,0)
;;=4^R53.0
;;^UTILITY(U,$J,358.3,27634,2)
;;=^5019515
;;^UTILITY(U,$J,358.3,27635,0)
;;=G47.00^^90^1151^13
;;^UTILITY(U,$J,358.3,27635,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27635,1,3,0)
;;=3^Insomnia,Unspec
;;^UTILITY(U,$J,358.3,27635,1,4,0)
;;=4^G47.00
;;^UTILITY(U,$J,358.3,27635,2)
;;=^332924
;;^UTILITY(U,$J,358.3,27636,0)
;;=G47.01^^90^1151^12
;;^UTILITY(U,$J,358.3,27636,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27636,1,3,0)
;;=3^Insomnia d/t Medical Condition
;;^UTILITY(U,$J,358.3,27636,1,4,0)
;;=4^G47.01
;;^UTILITY(U,$J,358.3,27636,2)
;;=^5003969
;;^UTILITY(U,$J,358.3,27637,0)
;;=R63.0^^90^1151^1
;;^UTILITY(U,$J,358.3,27637,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27637,1,3,0)
;;=3^Anorexia
;;^UTILITY(U,$J,358.3,27637,1,4,0)
;;=4^R63.0
;;^UTILITY(U,$J,358.3,27637,2)
;;=^7939
;;^UTILITY(U,$J,358.3,27638,0)
;;=F02.81^^90^1152^11
;;^UTILITY(U,$J,358.3,27638,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27638,1,3,0)
;;=3^Dementia,Oth Dis Clssd Elswhr w/ Bhv Dstrb
;;^UTILITY(U,$J,358.3,27638,1,4,0)
;;=4^F02.81
;;^UTILITY(U,$J,358.3,27638,2)
;;=^5003049
;;^UTILITY(U,$J,358.3,27639,0)
;;=F02.80^^90^1152^12
;;^UTILITY(U,$J,358.3,27639,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27639,1,3,0)
;;=3^Dementia,Oth Dis Clssd Elswhr w/o Bhv Dstrb
;;^UTILITY(U,$J,358.3,27639,1,4,0)
;;=4^F02.80
;;^UTILITY(U,$J,358.3,27639,2)
;;=^5003048
;;^UTILITY(U,$J,358.3,27640,0)
;;=F03.91^^90^1152^13
;;^UTILITY(U,$J,358.3,27640,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27640,1,3,0)
;;=3^Dementia w/ Bhv Dstrb,Unsp
;;^UTILITY(U,$J,358.3,27640,1,4,0)
;;=4^F03.91
;;^UTILITY(U,$J,358.3,27640,2)
;;=^5133350
;;^UTILITY(U,$J,358.3,27641,0)
;;=G31.83^^90^1152^14
;;^UTILITY(U,$J,358.3,27641,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27641,1,3,0)
;;=3^Dementia w/ Lewy Bodies
;;^UTILITY(U,$J,358.3,27641,1,4,0)
;;=4^G31.83
;;^UTILITY(U,$J,358.3,27641,2)
;;=^329888
;;^UTILITY(U,$J,358.3,27642,0)
;;=F03.90^^90^1152^15
;;^UTILITY(U,$J,358.3,27642,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27642,1,3,0)
;;=3^Dementia w/o Bhv Dstrb,Unsp
;;^UTILITY(U,$J,358.3,27642,1,4,0)
;;=4^F03.90
;;^UTILITY(U,$J,358.3,27642,2)
;;=^5003050
;;^UTILITY(U,$J,358.3,27643,0)
;;=F01.51^^90^1152^30
;;^UTILITY(U,$J,358.3,27643,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27643,1,3,0)
;;=3^Vascular Dementia w/ Bhv Dstrb
;;^UTILITY(U,$J,358.3,27643,1,4,0)
;;=4^F01.51
;;^UTILITY(U,$J,358.3,27643,2)
;;=^5003047
;;^UTILITY(U,$J,358.3,27644,0)
;;=F01.50^^90^1152^31
;;^UTILITY(U,$J,358.3,27644,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27644,1,3,0)
;;=3^Vascular Dementia w/o Bhv Dstrb
;;^UTILITY(U,$J,358.3,27644,1,4,0)
;;=4^F01.50
;;^UTILITY(U,$J,358.3,27644,2)
;;=^5003046
;;^UTILITY(U,$J,358.3,27645,0)
;;=A81.9^^90^1152^6
;;^UTILITY(U,$J,358.3,27645,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27645,1,3,0)
;;=3^Atypical Virus Infection of CNS,Unspec
;;^UTILITY(U,$J,358.3,27645,1,4,0)
;;=4^A81.9
;;^UTILITY(U,$J,358.3,27645,2)
;;=^5000414
;;^UTILITY(U,$J,358.3,27646,0)
;;=A81.09^^90^1152^8
;;^UTILITY(U,$J,358.3,27646,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27646,1,3,0)
;;=3^Creutzfeldt-Jakob Disease NEC
;;^UTILITY(U,$J,358.3,27646,1,4,0)
;;=4^A81.09
;;^UTILITY(U,$J,358.3,27646,2)
;;=^5000410
;;^UTILITY(U,$J,358.3,27647,0)
;;=A81.00^^90^1152^9
;;^UTILITY(U,$J,358.3,27647,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27647,1,3,0)
;;=3^Creutzfeldt-Jakob Disease,Unspec
;;^UTILITY(U,$J,358.3,27647,1,4,0)
;;=4^A81.00
;;^UTILITY(U,$J,358.3,27647,2)
;;=^5000409
;;^UTILITY(U,$J,358.3,27648,0)
;;=A81.01^^90^1152^10
;;^UTILITY(U,$J,358.3,27648,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27648,1,3,0)
;;=3^Creutzfeldt-Jakob Disease,Variant
;;^UTILITY(U,$J,358.3,27648,1,4,0)
;;=4^A81.01
;;^UTILITY(U,$J,358.3,27648,2)
;;=^336701
;;^UTILITY(U,$J,358.3,27649,0)
;;=A81.89^^90^1152^7
;;^UTILITY(U,$J,358.3,27649,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27649,1,3,0)
;;=3^Atypical Virus Infections of CNS NEC
;;^UTILITY(U,$J,358.3,27649,1,4,0)
;;=4^A81.89
;;^UTILITY(U,$J,358.3,27649,2)
;;=^5000413
;;^UTILITY(U,$J,358.3,27650,0)
;;=A81.2^^90^1152^27
;;^UTILITY(U,$J,358.3,27650,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27650,1,3,0)
;;=3^Progressive Multifocal Leukoencephalopathy
;;^UTILITY(U,$J,358.3,27650,1,4,0)
;;=4^A81.2
;;^UTILITY(U,$J,358.3,27650,2)
;;=^5000411
;;^UTILITY(U,$J,358.3,27651,0)
;;=B20.^^90^1152^17
;;^UTILITY(U,$J,358.3,27651,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27651,1,3,0)
;;=3^HIV Disease w/ Dementia w/ Bhv Dstrb
;;^UTILITY(U,$J,358.3,27651,1,4,0)
;;=4^B20.
;;^UTILITY(U,$J,358.3,27651,2)
;;=^5000555^F02.81
;;^UTILITY(U,$J,358.3,27652,0)
;;=B20.^^90^1152^18
;;^UTILITY(U,$J,358.3,27652,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27652,1,3,0)
;;=3^HIV Disease w/ Dementia w/o Bhv Dstrb
;;^UTILITY(U,$J,358.3,27652,1,4,0)
;;=4^B20.
;;^UTILITY(U,$J,358.3,27652,2)
;;=^5000555^F02.80
;;^UTILITY(U,$J,358.3,27653,0)
;;=F10.27^^90^1152^1
;;^UTILITY(U,$J,358.3,27653,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27653,1,3,0)
;;=3^Alc Dep w/ Alc-Induced Persist Dementia
;;^UTILITY(U,$J,358.3,27653,1,4,0)
;;=4^F10.27
;;^UTILITY(U,$J,358.3,27653,2)
;;=^5003095
;;^UTILITY(U,$J,358.3,27654,0)
;;=F19.97^^90^1152^29
;;^UTILITY(U,$J,358.3,27654,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27654,1,3,0)
;;=3^Psychoactive Substance Use w/ Persisting Dementia NEC
;;^UTILITY(U,$J,358.3,27654,1,4,0)
;;=4^F19.97
;;^UTILITY(U,$J,358.3,27654,2)
;;=^5003465
;;^UTILITY(U,$J,358.3,27655,0)
;;=G30.0^^90^1152^2
;;^UTILITY(U,$J,358.3,27655,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27655,1,3,0)
;;=3^Alzheimer's Disease w/ Early Onset
;;^UTILITY(U,$J,358.3,27655,1,4,0)
;;=4^G30.0
;;^UTILITY(U,$J,358.3,27655,2)
;;=^5003805
;;^UTILITY(U,$J,358.3,27656,0)
;;=G30.1^^90^1152^3
;;^UTILITY(U,$J,358.3,27656,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27656,1,3,0)
;;=3^Alzheimer's Disease w/ Late Onset
;;^UTILITY(U,$J,358.3,27656,1,4,0)
;;=4^G30.1
;;^UTILITY(U,$J,358.3,27656,2)
;;=^5003806
;;^UTILITY(U,$J,358.3,27657,0)
;;=G30.9^^90^1152^4
;;^UTILITY(U,$J,358.3,27657,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27657,1,3,0)
;;=3^Alzheimer's Disease,Unspec
;;^UTILITY(U,$J,358.3,27657,1,4,0)
;;=4^G30.9
;;^UTILITY(U,$J,358.3,27657,2)
;;=^5003808
;;^UTILITY(U,$J,358.3,27658,0)
;;=G10.^^90^1152^19
;;^UTILITY(U,$J,358.3,27658,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27658,1,3,0)
;;=3^Huntington's Disease w/ Dementia w/ Bhv Dstrb
;;^UTILITY(U,$J,358.3,27658,1,4,0)
;;=4^G10.
;;^UTILITY(U,$J,358.3,27658,2)
;;=^5003751^F02.81
;;^UTILITY(U,$J,358.3,27659,0)
;;=G10.^^90^1152^20
;;^UTILITY(U,$J,358.3,27659,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27659,1,3,0)
;;=3^Huntington's Disease w/ Dementia w/o Bhv Dstrb
;;^UTILITY(U,$J,358.3,27659,1,4,0)
;;=4^G10.
;;^UTILITY(U,$J,358.3,27659,2)
;;=^5003751^F02.80
;;^UTILITY(U,$J,358.3,27660,0)
;;=G90.3^^90^1152^21
;;^UTILITY(U,$J,358.3,27660,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27660,1,3,0)
;;=3^Multi-Syst Degen,Autonomic Nrvs Syst
;;^UTILITY(U,$J,358.3,27660,1,4,0)
;;=4^G90.3
;;^UTILITY(U,$J,358.3,27660,2)
;;=^5004162
;;^UTILITY(U,$J,358.3,27661,0)
;;=G91.2^^90^1152^22
;;^UTILITY(U,$J,358.3,27661,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27661,1,3,0)
;;=3^NPH w/ Dementia w/ Bhv Dstrb
;;^UTILITY(U,$J,358.3,27661,1,4,0)
;;=4^G91.2
;;^UTILITY(U,$J,358.3,27661,2)
;;=^5004174^F02.81
;;^UTILITY(U,$J,358.3,27662,0)
;;=G91.2^^90^1152^23
;;^UTILITY(U,$J,358.3,27662,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27662,1,3,0)
;;=3^NPH w/ Dementia w/o Bhv Dstrb
;;^UTILITY(U,$J,358.3,27662,1,4,0)
;;=4^G91.2
;;^UTILITY(U,$J,358.3,27662,2)
;;=^5004174^F02.80
;;^UTILITY(U,$J,358.3,27663,0)
;;=G30.8^^90^1152^5
;;^UTILITY(U,$J,358.3,27663,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27663,1,3,0)
;;=3^Alzheimer's Diseases NEC
;;^UTILITY(U,$J,358.3,27663,1,4,0)
;;=4^G30.8
;;^UTILITY(U,$J,358.3,27663,2)
;;=^5003807
;;^UTILITY(U,$J,358.3,27664,0)
;;=G31.09^^90^1152^16
;;^UTILITY(U,$J,358.3,27664,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27664,1,3,0)
;;=3^Frontotemporal Dementia NEC
;;^UTILITY(U,$J,358.3,27664,1,4,0)
;;=4^G31.09
;;^UTILITY(U,$J,358.3,27664,2)
;;=^329916
;;^UTILITY(U,$J,358.3,27665,0)
;;=G20.^^90^1152^24
;;^UTILITY(U,$J,358.3,27665,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27665,1,3,0)
;;=3^Parkinson's Disease w/ Dementia w/ Bhv Dstrb
;;^UTILITY(U,$J,358.3,27665,1,4,0)
;;=4^G20.
;;^UTILITY(U,$J,358.3,27665,2)
;;=^5003770^F02.81
;;^UTILITY(U,$J,358.3,27666,0)
;;=G20.^^90^1152^25
;;^UTILITY(U,$J,358.3,27666,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27666,1,3,0)
;;=3^Parkinson's Disease w/ Dementia w/o Bhv Dstrb
;;^UTILITY(U,$J,358.3,27666,1,4,0)
;;=4^G20.
;;^UTILITY(U,$J,358.3,27666,2)
;;=^5003770^F02.80
;;^UTILITY(U,$J,358.3,27667,0)
;;=G31.01^^90^1152^26
;;^UTILITY(U,$J,358.3,27667,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27667,1,3,0)
;;=3^Pick's Disease
;;^UTILITY(U,$J,358.3,27667,1,4,0)
;;=4^G31.01
;;^UTILITY(U,$J,358.3,27667,2)
;;=^329915
;;^UTILITY(U,$J,358.3,27668,0)
;;=G23.1^^90^1152^28
;;^UTILITY(U,$J,358.3,27668,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27668,1,3,0)
;;=3^Progressive Supranuclear Ophthalmoplegia
;;^UTILITY(U,$J,358.3,27668,1,4,0)
;;=4^G23.1
;;^UTILITY(U,$J,358.3,27668,2)
;;=^5003780
;;^UTILITY(U,$J,358.3,27669,0)
;;=E11.21^^90^1153^40
;;^UTILITY(U,$J,358.3,27669,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27669,1,3,0)
;;=3^Type 2 DM w/ Nephropathy
;;^UTILITY(U,$J,358.3,27669,1,4,0)
;;=4^E11.21
;;^UTILITY(U,$J,358.3,27669,2)
;;=^5002629
;;^UTILITY(U,$J,358.3,27670,0)
;;=E11.22^^90^1153^38
;;^UTILITY(U,$J,358.3,27670,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27670,1,3,0)
;;=3^Type 2 DM w/ CKD
;;^UTILITY(U,$J,358.3,27670,1,4,0)
;;=4^E11.22
;;^UTILITY(U,$J,358.3,27670,2)
;;=^5002630
;;^UTILITY(U,$J,358.3,27671,0)
;;=E11.40^^90^1153^41
;;^UTILITY(U,$J,358.3,27671,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27671,1,3,0)
;;=3^Type 2 DM w/ Neuropathy,Unspec
;;^UTILITY(U,$J,358.3,27671,1,4,0)
;;=4^E11.40
;;^UTILITY(U,$J,358.3,27671,2)
;;=^5002644
;;^UTILITY(U,$J,358.3,27672,0)
;;=E11.65^^90^1153^39
;;^UTILITY(U,$J,358.3,27672,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27672,1,3,0)
;;=3^Type 2 DM w/ Hyperglycemia
;;^UTILITY(U,$J,358.3,27672,1,4,0)
;;=4^E11.65
;;^UTILITY(U,$J,358.3,27672,2)
;;=^5002663
;;^UTILITY(U,$J,358.3,27673,0)
;;=E11.9^^90^1153^45
;;^UTILITY(U,$J,358.3,27673,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27673,1,3,0)
;;=3^Type 2 DM w/o Complications
;;^UTILITY(U,$J,358.3,27673,1,4,0)
;;=4^E11.9
;;^UTILITY(U,$J,358.3,27673,2)
;;=^5002666
;;^UTILITY(U,$J,358.3,27674,0)
;;=E03.9^^90^1153^32
;;^UTILITY(U,$J,358.3,27674,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27674,1,3,0)
;;=3^Hypothyroidism
;;^UTILITY(U,$J,358.3,27674,1,4,0)
;;=4^E03.9
;;^UTILITY(U,$J,358.3,27674,2)
;;=^5002476
;;^UTILITY(U,$J,358.3,27675,0)
;;=N18.1^^90^1153^18
;;^UTILITY(U,$J,358.3,27675,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27675,1,3,0)
;;=3^Chronic Kidney Disease,Stage 1
;;^UTILITY(U,$J,358.3,27675,1,4,0)
;;=4^N18.1
;;^UTILITY(U,$J,358.3,27675,2)
;;=^5015602
;;^UTILITY(U,$J,358.3,27676,0)
;;=N18.2^^90^1153^19
;;^UTILITY(U,$J,358.3,27676,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27676,1,3,0)
;;=3^Chronic Kidney Disease,Stage 2
;;^UTILITY(U,$J,358.3,27676,1,4,0)
;;=4^N18.2
;;^UTILITY(U,$J,358.3,27676,2)
;;=^5015603
;;^UTILITY(U,$J,358.3,27677,0)
;;=N18.4^^90^1153^23
;;^UTILITY(U,$J,358.3,27677,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27677,1,3,0)
;;=3^Chronic Kidney Disease,Stage 4
;;^UTILITY(U,$J,358.3,27677,1,4,0)
;;=4^N18.4
;;^UTILITY(U,$J,358.3,27677,2)
;;=^5015605
;;^UTILITY(U,$J,358.3,27678,0)
;;=N18.5^^90^1153^24
;;^UTILITY(U,$J,358.3,27678,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27678,1,3,0)
;;=3^Chronic Kidney Disease,Stage 5
;;^UTILITY(U,$J,358.3,27678,1,4,0)
;;=4^N18.5
;;^UTILITY(U,$J,358.3,27678,2)
;;=^5015606
;;^UTILITY(U,$J,358.3,27679,0)
;;=N18.6^^90^1153^28
;;^UTILITY(U,$J,358.3,27679,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27679,1,3,0)
;;=3^End Stage Renal Disease
;;^UTILITY(U,$J,358.3,27679,1,4,0)
;;=4^N18.6
;;^UTILITY(U,$J,358.3,27679,2)
;;=^303986
;;^UTILITY(U,$J,358.3,27680,0)
;;=J96.11^^90^1153^25
;;^UTILITY(U,$J,358.3,27680,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27680,1,3,0)
;;=3^Chronic Respiratory Failure w/ Hypoxia
;;^UTILITY(U,$J,358.3,27680,1,4,0)
;;=4^J96.11
;;^UTILITY(U,$J,358.3,27680,2)
;;=^5008351
;;^UTILITY(U,$J,358.3,27681,0)
;;=J44.9^^90^1153^16
;;^UTILITY(U,$J,358.3,27681,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27681,1,3,0)
;;=3^COPD,Unspec
;;^UTILITY(U,$J,358.3,27681,1,4,0)
;;=4^J44.9
;;^UTILITY(U,$J,358.3,27681,2)
;;=^5008241
;;^UTILITY(U,$J,358.3,27682,0)
;;=E44.0^^90^1153^35
;;^UTILITY(U,$J,358.3,27682,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27682,1,3,0)
;;=3^Moderate Protein-Calorie Malnutrition
;;^UTILITY(U,$J,358.3,27682,1,4,0)
;;=4^E44.0
;;^UTILITY(U,$J,358.3,27682,2)
;;=^5002787
;;^UTILITY(U,$J,358.3,27683,0)
;;=E43.^^90^1153^37
;;^UTILITY(U,$J,358.3,27683,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27683,1,3,0)
;;=3^Severe Protein-Calorie Malnutrition
;;^UTILITY(U,$J,358.3,27683,1,4,0)
;;=4^E43.
;;^UTILITY(U,$J,358.3,27683,2)
;;=^5002786
;;^UTILITY(U,$J,358.3,27684,0)
;;=R64.^^90^1153^17
;;^UTILITY(U,$J,358.3,27684,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27684,1,3,0)
;;=3^Cachexia
;;^UTILITY(U,$J,358.3,27684,1,4,0)
;;=4^R64.
;;^UTILITY(U,$J,358.3,27684,2)
;;=^17920
;;^UTILITY(U,$J,358.3,27685,0)
;;=I10.^^90^1153^29
;;^UTILITY(U,$J,358.3,27685,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27685,1,3,0)
;;=3^Essential (Primary) Hypertension
;;^UTILITY(U,$J,358.3,27685,1,4,0)
;;=4^I10.
;;^UTILITY(U,$J,358.3,27685,2)
;;=^5007062
;;^UTILITY(U,$J,358.3,27686,0)
;;=I25.10^^90^1153^15
;;^UTILITY(U,$J,358.3,27686,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27686,1,3,0)
;;=3^CAD w/o Angina Pectoris
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HIBDEI0B9 19784 printed Dec 13, 2024@01:45:17 Page 2
IBDEI0B9 ; ; 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,27617,0)
+2 ;;=R64.^^90^1151^2
+3 ;;^UTILITY(U,$J,358.3,27617,1,0)
+4 ;;=^358.31IA^4^2
+5 ;;^UTILITY(U,$J,358.3,27617,1,3,0)
+6 ;;=3^Cachexia
+7 ;;^UTILITY(U,$J,358.3,27617,1,4,0)
+8 ;;=4^R64.
+9 ;;^UTILITY(U,$J,358.3,27617,2)
+10 ;;=^17920
+11 ;;^UTILITY(U,$J,358.3,27618,0)
+12 ;;=A41.9^^90^1151^21
+13 ;;^UTILITY(U,$J,358.3,27618,1,0)
+14 ;;=^358.31IA^4^2
+15 ;;^UTILITY(U,$J,358.3,27618,1,3,0)
+16 ;;=3^Sepsis,Unspec Organism (Septicemia)
+17 ;;^UTILITY(U,$J,358.3,27618,1,4,0)
+18 ;;=4^A41.9
+19 ;;^UTILITY(U,$J,358.3,27618,2)
+20 ;;=^5000214
+21 ;;^UTILITY(U,$J,358.3,27619,0)
+22 ;;=M62.84^^90^1151^20
+23 ;;^UTILITY(U,$J,358.3,27619,1,0)
+24 ;;=^358.31IA^4^2
+25 ;;^UTILITY(U,$J,358.3,27619,1,3,0)
+26 ;;=3^Sarcopenia
+27 ;;^UTILITY(U,$J,358.3,27619,1,4,0)
+28 ;;=4^M62.84
+29 ;;^UTILITY(U,$J,358.3,27619,2)
+30 ;;=^5138832
+31 ;;^UTILITY(U,$J,358.3,27620,0)
+32 ;;=Z79.891^^90^1151^14
+33 ;;^UTILITY(U,$J,358.3,27620,1,0)
+34 ;;=^358.31IA^4^2
+35 ;;^UTILITY(U,$J,358.3,27620,1,3,0)
+36 ;;=3^Long Term Opiate/Opioid Analgesic Use
+37 ;;^UTILITY(U,$J,358.3,27620,1,4,0)
+38 ;;=4^Z79.891
+39 ;;^UTILITY(U,$J,358.3,27620,2)
+40 ;;=^5063342
+41 ;;^UTILITY(U,$J,358.3,27621,0)
+42 ;;=R60.0^^90^1151^5
+43 ;;^UTILITY(U,$J,358.3,27621,1,0)
+44 ;;=^358.31IA^4^2
+45 ;;^UTILITY(U,$J,358.3,27621,1,3,0)
+46 ;;=3^Edema,Localized
+47 ;;^UTILITY(U,$J,358.3,27621,1,4,0)
+48 ;;=4^R60.0
+49 ;;^UTILITY(U,$J,358.3,27621,2)
+50 ;;=^5019532
+51 ;;^UTILITY(U,$J,358.3,27622,0)
+52 ;;=R60.1^^90^1151^4
+53 ;;^UTILITY(U,$J,358.3,27622,1,0)
+54 ;;=^358.31IA^4^2
+55 ;;^UTILITY(U,$J,358.3,27622,1,3,0)
+56 ;;=3^Edema,Generalized
+57 ;;^UTILITY(U,$J,358.3,27622,1,4,0)
+58 ;;=4^R60.1
+59 ;;^UTILITY(U,$J,358.3,27622,2)
+60 ;;=^5019533
+61 ;;^UTILITY(U,$J,358.3,27623,0)
+62 ;;=R60.9^^90^1151^6
+63 ;;^UTILITY(U,$J,358.3,27623,1,0)
+64 ;;=^358.31IA^4^2
+65 ;;^UTILITY(U,$J,358.3,27623,1,3,0)
+66 ;;=3^Edema,Unspec
+67 ;;^UTILITY(U,$J,358.3,27623,1,4,0)
+68 ;;=4^R60.9
+69 ;;^UTILITY(U,$J,358.3,27623,2)
+70 ;;=^5019534
+71 ;;^UTILITY(U,$J,358.3,27624,0)
+72 ;;=M79.2^^90^1151^16
+73 ;;^UTILITY(U,$J,358.3,27624,1,0)
+74 ;;=^358.31IA^4^2
+75 ;;^UTILITY(U,$J,358.3,27624,1,3,0)
+76 ;;=3^Neuralgia & Neuritis,Unspec
+77 ;;^UTILITY(U,$J,358.3,27624,1,4,0)
+78 ;;=4^M79.2
+79 ;;^UTILITY(U,$J,358.3,27624,2)
+80 ;;=^5013322
+81 ;;^UTILITY(U,$J,358.3,27625,0)
+82 ;;=R25.2^^90^1151^3
+83 ;;^UTILITY(U,$J,358.3,27625,1,0)
+84 ;;=^358.31IA^4^2
+85 ;;^UTILITY(U,$J,358.3,27625,1,3,0)
+86 ;;=3^Cramp & Spasm
+87 ;;^UTILITY(U,$J,358.3,27625,1,4,0)
+88 ;;=4^R25.2
+89 ;;^UTILITY(U,$J,358.3,27625,2)
+90 ;;=^5019301
+91 ;;^UTILITY(U,$J,358.3,27626,0)
+92 ;;=R26.0^^90^1151^9
+93 ;;^UTILITY(U,$J,358.3,27626,1,0)
+94 ;;=^358.31IA^4^2
+95 ;;^UTILITY(U,$J,358.3,27626,1,3,0)
+96 ;;=3^Gait,Ataxic
+97 ;;^UTILITY(U,$J,358.3,27626,1,4,0)
+98 ;;=4^R26.0
+99 ;;^UTILITY(U,$J,358.3,27626,2)
+100 ;;=^5019304
+101 ;;^UTILITY(U,$J,358.3,27627,0)
+102 ;;=R26.1^^90^1151^10
+103 ;;^UTILITY(U,$J,358.3,27627,1,0)
+104 ;;=^358.31IA^4^2
+105 ;;^UTILITY(U,$J,358.3,27627,1,3,0)
+106 ;;=3^Gait,Paralytic
+107 ;;^UTILITY(U,$J,358.3,27627,1,4,0)
+108 ;;=4^R26.1
+109 ;;^UTILITY(U,$J,358.3,27627,2)
+110 ;;=^5019305
+111 ;;^UTILITY(U,$J,358.3,27628,0)
+112 ;;=R26.2^^90^1151^23
+113 ;;^UTILITY(U,$J,358.3,27628,1,0)
+114 ;;=^358.31IA^4^2
+115 ;;^UTILITY(U,$J,358.3,27628,1,3,0)
+116 ;;=3^Walking Difficulty NEC
+117 ;;^UTILITY(U,$J,358.3,27628,1,4,0)
+118 ;;=4^R26.2
+119 ;;^UTILITY(U,$J,358.3,27628,2)
+120 ;;=^5019306
+121 ;;^UTILITY(U,$J,358.3,27629,0)
+122 ;;=R26.81^^90^1151^22
+123 ;;^UTILITY(U,$J,358.3,27629,1,0)
+124 ;;=^358.31IA^4^2
+125 ;;^UTILITY(U,$J,358.3,27629,1,3,0)
+126 ;;=3^Unsteadiness on Feet
+127 ;;^UTILITY(U,$J,358.3,27629,1,4,0)
+128 ;;=4^R26.81
+129 ;;^UTILITY(U,$J,358.3,27629,2)
+130 ;;=^5019307
+131 ;;^UTILITY(U,$J,358.3,27630,0)
+132 ;;=R26.89^^90^1151^8
+133 ;;^UTILITY(U,$J,358.3,27630,1,0)
+134 ;;=^358.31IA^4^2
+135 ;;^UTILITY(U,$J,358.3,27630,1,3,0)
+136 ;;=3^Gait & Mobility Abnormalities,Other
+137 ;;^UTILITY(U,$J,358.3,27630,1,4,0)
+138 ;;=4^R26.89
+139 ;;^UTILITY(U,$J,358.3,27630,2)
+140 ;;=^5019308
+141 ;;^UTILITY(U,$J,358.3,27631,0)
+142 ;;=R23.1^^90^1151^17
+143 ;;^UTILITY(U,$J,358.3,27631,1,0)
+144 ;;=^358.31IA^4^2
+145 ;;^UTILITY(U,$J,358.3,27631,1,3,0)
+146 ;;=3^Pallor
+147 ;;^UTILITY(U,$J,358.3,27631,1,4,0)
+148 ;;=4^R23.1
+149 ;;^UTILITY(U,$J,358.3,27631,2)
+150 ;;=^5019294
+151 ;;^UTILITY(U,$J,358.3,27632,0)
+152 ;;=R23.2^^90^1151^7
+153 ;;^UTILITY(U,$J,358.3,27632,1,0)
+154 ;;=^358.31IA^4^2
+155 ;;^UTILITY(U,$J,358.3,27632,1,3,0)
+156 ;;=3^Flushing
+157 ;;^UTILITY(U,$J,358.3,27632,1,4,0)
+158 ;;=4^R23.2
+159 ;;^UTILITY(U,$J,358.3,27632,2)
+160 ;;=^47184
+161 ;;^UTILITY(U,$J,358.3,27633,0)
+162 ;;=L29.8^^90^1151^18
+163 ;;^UTILITY(U,$J,358.3,27633,1,0)
+164 ;;=^358.31IA^4^2
+165 ;;^UTILITY(U,$J,358.3,27633,1,3,0)
+166 ;;=3^Pruritus,Other
+167 ;;^UTILITY(U,$J,358.3,27633,1,4,0)
+168 ;;=4^L29.8
+169 ;;^UTILITY(U,$J,358.3,27633,2)
+170 ;;=^5009152
+171 ;;^UTILITY(U,$J,358.3,27634,0)
+172 ;;=R53.0^^90^1151^15
+173 ;;^UTILITY(U,$J,358.3,27634,1,0)
+174 ;;=^358.31IA^4^2
+175 ;;^UTILITY(U,$J,358.3,27634,1,3,0)
+176 ;;=3^Neoplastic (Malignant) Related Fatigue
+177 ;;^UTILITY(U,$J,358.3,27634,1,4,0)
+178 ;;=4^R53.0
+179 ;;^UTILITY(U,$J,358.3,27634,2)
+180 ;;=^5019515
+181 ;;^UTILITY(U,$J,358.3,27635,0)
+182 ;;=G47.00^^90^1151^13
+183 ;;^UTILITY(U,$J,358.3,27635,1,0)
+184 ;;=^358.31IA^4^2
+185 ;;^UTILITY(U,$J,358.3,27635,1,3,0)
+186 ;;=3^Insomnia,Unspec
+187 ;;^UTILITY(U,$J,358.3,27635,1,4,0)
+188 ;;=4^G47.00
+189 ;;^UTILITY(U,$J,358.3,27635,2)
+190 ;;=^332924
+191 ;;^UTILITY(U,$J,358.3,27636,0)
+192 ;;=G47.01^^90^1151^12
+193 ;;^UTILITY(U,$J,358.3,27636,1,0)
+194 ;;=^358.31IA^4^2
+195 ;;^UTILITY(U,$J,358.3,27636,1,3,0)
+196 ;;=3^Insomnia d/t Medical Condition
+197 ;;^UTILITY(U,$J,358.3,27636,1,4,0)
+198 ;;=4^G47.01
+199 ;;^UTILITY(U,$J,358.3,27636,2)
+200 ;;=^5003969
+201 ;;^UTILITY(U,$J,358.3,27637,0)
+202 ;;=R63.0^^90^1151^1
+203 ;;^UTILITY(U,$J,358.3,27637,1,0)
+204 ;;=^358.31IA^4^2
+205 ;;^UTILITY(U,$J,358.3,27637,1,3,0)
+206 ;;=3^Anorexia
+207 ;;^UTILITY(U,$J,358.3,27637,1,4,0)
+208 ;;=4^R63.0
+209 ;;^UTILITY(U,$J,358.3,27637,2)
+210 ;;=^7939
+211 ;;^UTILITY(U,$J,358.3,27638,0)
+212 ;;=F02.81^^90^1152^11
+213 ;;^UTILITY(U,$J,358.3,27638,1,0)
+214 ;;=^358.31IA^4^2
+215 ;;^UTILITY(U,$J,358.3,27638,1,3,0)
+216 ;;=3^Dementia,Oth Dis Clssd Elswhr w/ Bhv Dstrb
+217 ;;^UTILITY(U,$J,358.3,27638,1,4,0)
+218 ;;=4^F02.81
+219 ;;^UTILITY(U,$J,358.3,27638,2)
+220 ;;=^5003049
+221 ;;^UTILITY(U,$J,358.3,27639,0)
+222 ;;=F02.80^^90^1152^12
+223 ;;^UTILITY(U,$J,358.3,27639,1,0)
+224 ;;=^358.31IA^4^2
+225 ;;^UTILITY(U,$J,358.3,27639,1,3,0)
+226 ;;=3^Dementia,Oth Dis Clssd Elswhr w/o Bhv Dstrb
+227 ;;^UTILITY(U,$J,358.3,27639,1,4,0)
+228 ;;=4^F02.80
+229 ;;^UTILITY(U,$J,358.3,27639,2)
+230 ;;=^5003048
+231 ;;^UTILITY(U,$J,358.3,27640,0)
+232 ;;=F03.91^^90^1152^13
+233 ;;^UTILITY(U,$J,358.3,27640,1,0)
+234 ;;=^358.31IA^4^2
+235 ;;^UTILITY(U,$J,358.3,27640,1,3,0)
+236 ;;=3^Dementia w/ Bhv Dstrb,Unsp
+237 ;;^UTILITY(U,$J,358.3,27640,1,4,0)
+238 ;;=4^F03.91
+239 ;;^UTILITY(U,$J,358.3,27640,2)
+240 ;;=^5133350
+241 ;;^UTILITY(U,$J,358.3,27641,0)
+242 ;;=G31.83^^90^1152^14
+243 ;;^UTILITY(U,$J,358.3,27641,1,0)
+244 ;;=^358.31IA^4^2
+245 ;;^UTILITY(U,$J,358.3,27641,1,3,0)
+246 ;;=3^Dementia w/ Lewy Bodies
+247 ;;^UTILITY(U,$J,358.3,27641,1,4,0)
+248 ;;=4^G31.83
+249 ;;^UTILITY(U,$J,358.3,27641,2)
+250 ;;=^329888
+251 ;;^UTILITY(U,$J,358.3,27642,0)
+252 ;;=F03.90^^90^1152^15
+253 ;;^UTILITY(U,$J,358.3,27642,1,0)
+254 ;;=^358.31IA^4^2
+255 ;;^UTILITY(U,$J,358.3,27642,1,3,0)
+256 ;;=3^Dementia w/o Bhv Dstrb,Unsp
+257 ;;^UTILITY(U,$J,358.3,27642,1,4,0)
+258 ;;=4^F03.90
+259 ;;^UTILITY(U,$J,358.3,27642,2)
+260 ;;=^5003050
+261 ;;^UTILITY(U,$J,358.3,27643,0)
+262 ;;=F01.51^^90^1152^30
+263 ;;^UTILITY(U,$J,358.3,27643,1,0)
+264 ;;=^358.31IA^4^2
+265 ;;^UTILITY(U,$J,358.3,27643,1,3,0)
+266 ;;=3^Vascular Dementia w/ Bhv Dstrb
+267 ;;^UTILITY(U,$J,358.3,27643,1,4,0)
+268 ;;=4^F01.51
+269 ;;^UTILITY(U,$J,358.3,27643,2)
+270 ;;=^5003047
+271 ;;^UTILITY(U,$J,358.3,27644,0)
+272 ;;=F01.50^^90^1152^31
+273 ;;^UTILITY(U,$J,358.3,27644,1,0)
+274 ;;=^358.31IA^4^2
+275 ;;^UTILITY(U,$J,358.3,27644,1,3,0)
+276 ;;=3^Vascular Dementia w/o Bhv Dstrb
+277 ;;^UTILITY(U,$J,358.3,27644,1,4,0)
+278 ;;=4^F01.50
+279 ;;^UTILITY(U,$J,358.3,27644,2)
+280 ;;=^5003046
+281 ;;^UTILITY(U,$J,358.3,27645,0)
+282 ;;=A81.9^^90^1152^6
+283 ;;^UTILITY(U,$J,358.3,27645,1,0)
+284 ;;=^358.31IA^4^2
+285 ;;^UTILITY(U,$J,358.3,27645,1,3,0)
+286 ;;=3^Atypical Virus Infection of CNS,Unspec
+287 ;;^UTILITY(U,$J,358.3,27645,1,4,0)
+288 ;;=4^A81.9
+289 ;;^UTILITY(U,$J,358.3,27645,2)
+290 ;;=^5000414
+291 ;;^UTILITY(U,$J,358.3,27646,0)
+292 ;;=A81.09^^90^1152^8
+293 ;;^UTILITY(U,$J,358.3,27646,1,0)
+294 ;;=^358.31IA^4^2
+295 ;;^UTILITY(U,$J,358.3,27646,1,3,0)
+296 ;;=3^Creutzfeldt-Jakob Disease NEC
+297 ;;^UTILITY(U,$J,358.3,27646,1,4,0)
+298 ;;=4^A81.09
+299 ;;^UTILITY(U,$J,358.3,27646,2)
+300 ;;=^5000410
+301 ;;^UTILITY(U,$J,358.3,27647,0)
+302 ;;=A81.00^^90^1152^9
+303 ;;^UTILITY(U,$J,358.3,27647,1,0)
+304 ;;=^358.31IA^4^2
+305 ;;^UTILITY(U,$J,358.3,27647,1,3,0)
+306 ;;=3^Creutzfeldt-Jakob Disease,Unspec
+307 ;;^UTILITY(U,$J,358.3,27647,1,4,0)
+308 ;;=4^A81.00
+309 ;;^UTILITY(U,$J,358.3,27647,2)
+310 ;;=^5000409
+311 ;;^UTILITY(U,$J,358.3,27648,0)
+312 ;;=A81.01^^90^1152^10
+313 ;;^UTILITY(U,$J,358.3,27648,1,0)
+314 ;;=^358.31IA^4^2
+315 ;;^UTILITY(U,$J,358.3,27648,1,3,0)
+316 ;;=3^Creutzfeldt-Jakob Disease,Variant
+317 ;;^UTILITY(U,$J,358.3,27648,1,4,0)
+318 ;;=4^A81.01
+319 ;;^UTILITY(U,$J,358.3,27648,2)
+320 ;;=^336701
+321 ;;^UTILITY(U,$J,358.3,27649,0)
+322 ;;=A81.89^^90^1152^7
+323 ;;^UTILITY(U,$J,358.3,27649,1,0)
+324 ;;=^358.31IA^4^2
+325 ;;^UTILITY(U,$J,358.3,27649,1,3,0)
+326 ;;=3^Atypical Virus Infections of CNS NEC
+327 ;;^UTILITY(U,$J,358.3,27649,1,4,0)
+328 ;;=4^A81.89
+329 ;;^UTILITY(U,$J,358.3,27649,2)
+330 ;;=^5000413
+331 ;;^UTILITY(U,$J,358.3,27650,0)
+332 ;;=A81.2^^90^1152^27
+333 ;;^UTILITY(U,$J,358.3,27650,1,0)
+334 ;;=^358.31IA^4^2
+335 ;;^UTILITY(U,$J,358.3,27650,1,3,0)
+336 ;;=3^Progressive Multifocal Leukoencephalopathy
+337 ;;^UTILITY(U,$J,358.3,27650,1,4,0)
+338 ;;=4^A81.2
+339 ;;^UTILITY(U,$J,358.3,27650,2)
+340 ;;=^5000411
+341 ;;^UTILITY(U,$J,358.3,27651,0)
+342 ;;=B20.^^90^1152^17
+343 ;;^UTILITY(U,$J,358.3,27651,1,0)
+344 ;;=^358.31IA^4^2
+345 ;;^UTILITY(U,$J,358.3,27651,1,3,0)
+346 ;;=3^HIV Disease w/ Dementia w/ Bhv Dstrb
+347 ;;^UTILITY(U,$J,358.3,27651,1,4,0)
+348 ;;=4^B20.
+349 ;;^UTILITY(U,$J,358.3,27651,2)
+350 ;;=^5000555^F02.81
+351 ;;^UTILITY(U,$J,358.3,27652,0)
+352 ;;=B20.^^90^1152^18
+353 ;;^UTILITY(U,$J,358.3,27652,1,0)
+354 ;;=^358.31IA^4^2
+355 ;;^UTILITY(U,$J,358.3,27652,1,3,0)
+356 ;;=3^HIV Disease w/ Dementia w/o Bhv Dstrb
+357 ;;^UTILITY(U,$J,358.3,27652,1,4,0)
+358 ;;=4^B20.
+359 ;;^UTILITY(U,$J,358.3,27652,2)
+360 ;;=^5000555^F02.80
+361 ;;^UTILITY(U,$J,358.3,27653,0)
+362 ;;=F10.27^^90^1152^1
+363 ;;^UTILITY(U,$J,358.3,27653,1,0)
+364 ;;=^358.31IA^4^2
+365 ;;^UTILITY(U,$J,358.3,27653,1,3,0)
+366 ;;=3^Alc Dep w/ Alc-Induced Persist Dementia
+367 ;;^UTILITY(U,$J,358.3,27653,1,4,0)
+368 ;;=4^F10.27
+369 ;;^UTILITY(U,$J,358.3,27653,2)
+370 ;;=^5003095
+371 ;;^UTILITY(U,$J,358.3,27654,0)
+372 ;;=F19.97^^90^1152^29
+373 ;;^UTILITY(U,$J,358.3,27654,1,0)
+374 ;;=^358.31IA^4^2
+375 ;;^UTILITY(U,$J,358.3,27654,1,3,0)
+376 ;;=3^Psychoactive Substance Use w/ Persisting Dementia NEC
+377 ;;^UTILITY(U,$J,358.3,27654,1,4,0)
+378 ;;=4^F19.97
+379 ;;^UTILITY(U,$J,358.3,27654,2)
+380 ;;=^5003465
+381 ;;^UTILITY(U,$J,358.3,27655,0)
+382 ;;=G30.0^^90^1152^2
+383 ;;^UTILITY(U,$J,358.3,27655,1,0)
+384 ;;=^358.31IA^4^2
+385 ;;^UTILITY(U,$J,358.3,27655,1,3,0)
+386 ;;=3^Alzheimer's Disease w/ Early Onset
+387 ;;^UTILITY(U,$J,358.3,27655,1,4,0)
+388 ;;=4^G30.0
+389 ;;^UTILITY(U,$J,358.3,27655,2)
+390 ;;=^5003805
+391 ;;^UTILITY(U,$J,358.3,27656,0)
+392 ;;=G30.1^^90^1152^3
+393 ;;^UTILITY(U,$J,358.3,27656,1,0)
+394 ;;=^358.31IA^4^2
+395 ;;^UTILITY(U,$J,358.3,27656,1,3,0)
+396 ;;=3^Alzheimer's Disease w/ Late Onset
+397 ;;^UTILITY(U,$J,358.3,27656,1,4,0)
+398 ;;=4^G30.1
+399 ;;^UTILITY(U,$J,358.3,27656,2)
+400 ;;=^5003806
+401 ;;^UTILITY(U,$J,358.3,27657,0)
+402 ;;=G30.9^^90^1152^4
+403 ;;^UTILITY(U,$J,358.3,27657,1,0)
+404 ;;=^358.31IA^4^2
+405 ;;^UTILITY(U,$J,358.3,27657,1,3,0)
+406 ;;=3^Alzheimer's Disease,Unspec
+407 ;;^UTILITY(U,$J,358.3,27657,1,4,0)
+408 ;;=4^G30.9
+409 ;;^UTILITY(U,$J,358.3,27657,2)
+410 ;;=^5003808
+411 ;;^UTILITY(U,$J,358.3,27658,0)
+412 ;;=G10.^^90^1152^19
+413 ;;^UTILITY(U,$J,358.3,27658,1,0)
+414 ;;=^358.31IA^4^2
+415 ;;^UTILITY(U,$J,358.3,27658,1,3,0)
+416 ;;=3^Huntington's Disease w/ Dementia w/ Bhv Dstrb
+417 ;;^UTILITY(U,$J,358.3,27658,1,4,0)
+418 ;;=4^G10.
+419 ;;^UTILITY(U,$J,358.3,27658,2)
+420 ;;=^5003751^F02.81
+421 ;;^UTILITY(U,$J,358.3,27659,0)
+422 ;;=G10.^^90^1152^20
+423 ;;^UTILITY(U,$J,358.3,27659,1,0)
+424 ;;=^358.31IA^4^2
+425 ;;^UTILITY(U,$J,358.3,27659,1,3,0)
+426 ;;=3^Huntington's Disease w/ Dementia w/o Bhv Dstrb
+427 ;;^UTILITY(U,$J,358.3,27659,1,4,0)
+428 ;;=4^G10.
+429 ;;^UTILITY(U,$J,358.3,27659,2)
+430 ;;=^5003751^F02.80
+431 ;;^UTILITY(U,$J,358.3,27660,0)
+432 ;;=G90.3^^90^1152^21
+433 ;;^UTILITY(U,$J,358.3,27660,1,0)
+434 ;;=^358.31IA^4^2
+435 ;;^UTILITY(U,$J,358.3,27660,1,3,0)
+436 ;;=3^Multi-Syst Degen,Autonomic Nrvs Syst
+437 ;;^UTILITY(U,$J,358.3,27660,1,4,0)
+438 ;;=4^G90.3
+439 ;;^UTILITY(U,$J,358.3,27660,2)
+440 ;;=^5004162
+441 ;;^UTILITY(U,$J,358.3,27661,0)
+442 ;;=G91.2^^90^1152^22
+443 ;;^UTILITY(U,$J,358.3,27661,1,0)
+444 ;;=^358.31IA^4^2
+445 ;;^UTILITY(U,$J,358.3,27661,1,3,0)
+446 ;;=3^NPH w/ Dementia w/ Bhv Dstrb
+447 ;;^UTILITY(U,$J,358.3,27661,1,4,0)
+448 ;;=4^G91.2
+449 ;;^UTILITY(U,$J,358.3,27661,2)
+450 ;;=^5004174^F02.81
+451 ;;^UTILITY(U,$J,358.3,27662,0)
+452 ;;=G91.2^^90^1152^23
+453 ;;^UTILITY(U,$J,358.3,27662,1,0)
+454 ;;=^358.31IA^4^2
+455 ;;^UTILITY(U,$J,358.3,27662,1,3,0)
+456 ;;=3^NPH w/ Dementia w/o Bhv Dstrb
+457 ;;^UTILITY(U,$J,358.3,27662,1,4,0)
+458 ;;=4^G91.2
+459 ;;^UTILITY(U,$J,358.3,27662,2)
+460 ;;=^5004174^F02.80
+461 ;;^UTILITY(U,$J,358.3,27663,0)
+462 ;;=G30.8^^90^1152^5
+463 ;;^UTILITY(U,$J,358.3,27663,1,0)
+464 ;;=^358.31IA^4^2
+465 ;;^UTILITY(U,$J,358.3,27663,1,3,0)
+466 ;;=3^Alzheimer's Diseases NEC
+467 ;;^UTILITY(U,$J,358.3,27663,1,4,0)
+468 ;;=4^G30.8
+469 ;;^UTILITY(U,$J,358.3,27663,2)
+470 ;;=^5003807
+471 ;;^UTILITY(U,$J,358.3,27664,0)
+472 ;;=G31.09^^90^1152^16
+473 ;;^UTILITY(U,$J,358.3,27664,1,0)
+474 ;;=^358.31IA^4^2
+475 ;;^UTILITY(U,$J,358.3,27664,1,3,0)
+476 ;;=3^Frontotemporal Dementia NEC
+477 ;;^UTILITY(U,$J,358.3,27664,1,4,0)
+478 ;;=4^G31.09
+479 ;;^UTILITY(U,$J,358.3,27664,2)
+480 ;;=^329916
+481 ;;^UTILITY(U,$J,358.3,27665,0)
+482 ;;=G20.^^90^1152^24
+483 ;;^UTILITY(U,$J,358.3,27665,1,0)
+484 ;;=^358.31IA^4^2
+485 ;;^UTILITY(U,$J,358.3,27665,1,3,0)
+486 ;;=3^Parkinson's Disease w/ Dementia w/ Bhv Dstrb
+487 ;;^UTILITY(U,$J,358.3,27665,1,4,0)
+488 ;;=4^G20.
+489 ;;^UTILITY(U,$J,358.3,27665,2)
+490 ;;=^5003770^F02.81
+491 ;;^UTILITY(U,$J,358.3,27666,0)
+492 ;;=G20.^^90^1152^25
+493 ;;^UTILITY(U,$J,358.3,27666,1,0)
+494 ;;=^358.31IA^4^2
+495 ;;^UTILITY(U,$J,358.3,27666,1,3,0)
+496 ;;=3^Parkinson's Disease w/ Dementia w/o Bhv Dstrb
+497 ;;^UTILITY(U,$J,358.3,27666,1,4,0)
+498 ;;=4^G20.
+499 ;;^UTILITY(U,$J,358.3,27666,2)
+500 ;;=^5003770^F02.80
+501 ;;^UTILITY(U,$J,358.3,27667,0)
+502 ;;=G31.01^^90^1152^26
+503 ;;^UTILITY(U,$J,358.3,27667,1,0)
+504 ;;=^358.31IA^4^2
+505 ;;^UTILITY(U,$J,358.3,27667,1,3,0)
+506 ;;=3^Pick's Disease
+507 ;;^UTILITY(U,$J,358.3,27667,1,4,0)
+508 ;;=4^G31.01
+509 ;;^UTILITY(U,$J,358.3,27667,2)
+510 ;;=^329915
+511 ;;^UTILITY(U,$J,358.3,27668,0)
+512 ;;=G23.1^^90^1152^28
+513 ;;^UTILITY(U,$J,358.3,27668,1,0)
+514 ;;=^358.31IA^4^2
+515 ;;^UTILITY(U,$J,358.3,27668,1,3,0)
+516 ;;=3^Progressive Supranuclear Ophthalmoplegia
+517 ;;^UTILITY(U,$J,358.3,27668,1,4,0)
+518 ;;=4^G23.1
+519 ;;^UTILITY(U,$J,358.3,27668,2)
+520 ;;=^5003780
+521 ;;^UTILITY(U,$J,358.3,27669,0)
+522 ;;=E11.21^^90^1153^40
+523 ;;^UTILITY(U,$J,358.3,27669,1,0)
+524 ;;=^358.31IA^4^2
+525 ;;^UTILITY(U,$J,358.3,27669,1,3,0)
+526 ;;=3^Type 2 DM w/ Nephropathy
+527 ;;^UTILITY(U,$J,358.3,27669,1,4,0)
+528 ;;=4^E11.21
+529 ;;^UTILITY(U,$J,358.3,27669,2)
+530 ;;=^5002629
+531 ;;^UTILITY(U,$J,358.3,27670,0)
+532 ;;=E11.22^^90^1153^38
+533 ;;^UTILITY(U,$J,358.3,27670,1,0)
+534 ;;=^358.31IA^4^2
+535 ;;^UTILITY(U,$J,358.3,27670,1,3,0)
+536 ;;=3^Type 2 DM w/ CKD
+537 ;;^UTILITY(U,$J,358.3,27670,1,4,0)
+538 ;;=4^E11.22
+539 ;;^UTILITY(U,$J,358.3,27670,2)
+540 ;;=^5002630
+541 ;;^UTILITY(U,$J,358.3,27671,0)
+542 ;;=E11.40^^90^1153^41
+543 ;;^UTILITY(U,$J,358.3,27671,1,0)
+544 ;;=^358.31IA^4^2
+545 ;;^UTILITY(U,$J,358.3,27671,1,3,0)
+546 ;;=3^Type 2 DM w/ Neuropathy,Unspec
+547 ;;^UTILITY(U,$J,358.3,27671,1,4,0)
+548 ;;=4^E11.40
+549 ;;^UTILITY(U,$J,358.3,27671,2)
+550 ;;=^5002644
+551 ;;^UTILITY(U,$J,358.3,27672,0)
+552 ;;=E11.65^^90^1153^39
+553 ;;^UTILITY(U,$J,358.3,27672,1,0)
+554 ;;=^358.31IA^4^2
+555 ;;^UTILITY(U,$J,358.3,27672,1,3,0)
+556 ;;=3^Type 2 DM w/ Hyperglycemia
+557 ;;^UTILITY(U,$J,358.3,27672,1,4,0)
+558 ;;=4^E11.65
+559 ;;^UTILITY(U,$J,358.3,27672,2)
+560 ;;=^5002663
+561 ;;^UTILITY(U,$J,358.3,27673,0)
+562 ;;=E11.9^^90^1153^45
+563 ;;^UTILITY(U,$J,358.3,27673,1,0)
+564 ;;=^358.31IA^4^2
+565 ;;^UTILITY(U,$J,358.3,27673,1,3,0)
+566 ;;=3^Type 2 DM w/o Complications
+567 ;;^UTILITY(U,$J,358.3,27673,1,4,0)
+568 ;;=4^E11.9
+569 ;;^UTILITY(U,$J,358.3,27673,2)
+570 ;;=^5002666
+571 ;;^UTILITY(U,$J,358.3,27674,0)
+572 ;;=E03.9^^90^1153^32
+573 ;;^UTILITY(U,$J,358.3,27674,1,0)
+574 ;;=^358.31IA^4^2
+575 ;;^UTILITY(U,$J,358.3,27674,1,3,0)
+576 ;;=3^Hypothyroidism
+577 ;;^UTILITY(U,$J,358.3,27674,1,4,0)
+578 ;;=4^E03.9
+579 ;;^UTILITY(U,$J,358.3,27674,2)
+580 ;;=^5002476
+581 ;;^UTILITY(U,$J,358.3,27675,0)
+582 ;;=N18.1^^90^1153^18
+583 ;;^UTILITY(U,$J,358.3,27675,1,0)
+584 ;;=^358.31IA^4^2
+585 ;;^UTILITY(U,$J,358.3,27675,1,3,0)
+586 ;;=3^Chronic Kidney Disease,Stage 1
+587 ;;^UTILITY(U,$J,358.3,27675,1,4,0)
+588 ;;=4^N18.1
+589 ;;^UTILITY(U,$J,358.3,27675,2)
+590 ;;=^5015602
+591 ;;^UTILITY(U,$J,358.3,27676,0)
+592 ;;=N18.2^^90^1153^19
+593 ;;^UTILITY(U,$J,358.3,27676,1,0)
+594 ;;=^358.31IA^4^2
+595 ;;^UTILITY(U,$J,358.3,27676,1,3,0)
+596 ;;=3^Chronic Kidney Disease,Stage 2
+597 ;;^UTILITY(U,$J,358.3,27676,1,4,0)
+598 ;;=4^N18.2
+599 ;;^UTILITY(U,$J,358.3,27676,2)
+600 ;;=^5015603
+601 ;;^UTILITY(U,$J,358.3,27677,0)
+602 ;;=N18.4^^90^1153^23
+603 ;;^UTILITY(U,$J,358.3,27677,1,0)
+604 ;;=^358.31IA^4^2
+605 ;;^UTILITY(U,$J,358.3,27677,1,3,0)
+606 ;;=3^Chronic Kidney Disease,Stage 4
+607 ;;^UTILITY(U,$J,358.3,27677,1,4,0)
+608 ;;=4^N18.4
+609 ;;^UTILITY(U,$J,358.3,27677,2)
+610 ;;=^5015605
+611 ;;^UTILITY(U,$J,358.3,27678,0)
+612 ;;=N18.5^^90^1153^24
+613 ;;^UTILITY(U,$J,358.3,27678,1,0)
+614 ;;=^358.31IA^4^2
+615 ;;^UTILITY(U,$J,358.3,27678,1,3,0)
+616 ;;=3^Chronic Kidney Disease,Stage 5
+617 ;;^UTILITY(U,$J,358.3,27678,1,4,0)
+618 ;;=4^N18.5
+619 ;;^UTILITY(U,$J,358.3,27678,2)
+620 ;;=^5015606
+621 ;;^UTILITY(U,$J,358.3,27679,0)
+622 ;;=N18.6^^90^1153^28
+623 ;;^UTILITY(U,$J,358.3,27679,1,0)
+624 ;;=^358.31IA^4^2
+625 ;;^UTILITY(U,$J,358.3,27679,1,3,0)
+626 ;;=3^End Stage Renal Disease
+627 ;;^UTILITY(U,$J,358.3,27679,1,4,0)
+628 ;;=4^N18.6
+629 ;;^UTILITY(U,$J,358.3,27679,2)
+630 ;;=^303986
+631 ;;^UTILITY(U,$J,358.3,27680,0)
+632 ;;=J96.11^^90^1153^25
+633 ;;^UTILITY(U,$J,358.3,27680,1,0)
+634 ;;=^358.31IA^4^2
+635 ;;^UTILITY(U,$J,358.3,27680,1,3,0)
+636 ;;=3^Chronic Respiratory Failure w/ Hypoxia
+637 ;;^UTILITY(U,$J,358.3,27680,1,4,0)
+638 ;;=4^J96.11
+639 ;;^UTILITY(U,$J,358.3,27680,2)
+640 ;;=^5008351
+641 ;;^UTILITY(U,$J,358.3,27681,0)
+642 ;;=J44.9^^90^1153^16
+643 ;;^UTILITY(U,$J,358.3,27681,1,0)
+644 ;;=^358.31IA^4^2
+645 ;;^UTILITY(U,$J,358.3,27681,1,3,0)
+646 ;;=3^COPD,Unspec
+647 ;;^UTILITY(U,$J,358.3,27681,1,4,0)
+648 ;;=4^J44.9
+649 ;;^UTILITY(U,$J,358.3,27681,2)
+650 ;;=^5008241
+651 ;;^UTILITY(U,$J,358.3,27682,0)
+652 ;;=E44.0^^90^1153^35
+653 ;;^UTILITY(U,$J,358.3,27682,1,0)
+654 ;;=^358.31IA^4^2
+655 ;;^UTILITY(U,$J,358.3,27682,1,3,0)
+656 ;;=3^Moderate Protein-Calorie Malnutrition
+657 ;;^UTILITY(U,$J,358.3,27682,1,4,0)
+658 ;;=4^E44.0
+659 ;;^UTILITY(U,$J,358.3,27682,2)
+660 ;;=^5002787
+661 ;;^UTILITY(U,$J,358.3,27683,0)
+662 ;;=E43.^^90^1153^37
+663 ;;^UTILITY(U,$J,358.3,27683,1,0)
+664 ;;=^358.31IA^4^2
+665 ;;^UTILITY(U,$J,358.3,27683,1,3,0)
+666 ;;=3^Severe Protein-Calorie Malnutrition
+667 ;;^UTILITY(U,$J,358.3,27683,1,4,0)
+668 ;;=4^E43.
+669 ;;^UTILITY(U,$J,358.3,27683,2)
+670 ;;=^5002786
+671 ;;^UTILITY(U,$J,358.3,27684,0)
+672 ;;=R64.^^90^1153^17
+673 ;;^UTILITY(U,$J,358.3,27684,1,0)
+674 ;;=^358.31IA^4^2
+675 ;;^UTILITY(U,$J,358.3,27684,1,3,0)
+676 ;;=3^Cachexia
+677 ;;^UTILITY(U,$J,358.3,27684,1,4,0)
+678 ;;=4^R64.
+679 ;;^UTILITY(U,$J,358.3,27684,2)
+680 ;;=^17920
+681 ;;^UTILITY(U,$J,358.3,27685,0)
+682 ;;=I10.^^90^1153^29
+683 ;;^UTILITY(U,$J,358.3,27685,1,0)
+684 ;;=^358.31IA^4^2
+685 ;;^UTILITY(U,$J,358.3,27685,1,3,0)
+686 ;;=3^Essential (Primary) Hypertension
+687 ;;^UTILITY(U,$J,358.3,27685,1,4,0)
+688 ;;=4^I10.
+689 ;;^UTILITY(U,$J,358.3,27685,2)
+690 ;;=^5007062
+691 ;;^UTILITY(U,$J,358.3,27686,0)
+692 ;;=I25.10^^90^1153^15
+693 ;;^UTILITY(U,$J,358.3,27686,1,0)
+694 ;;=^358.31IA^4^2
+695 ;;^UTILITY(U,$J,358.3,27686,1,3,0)
+696 ;;=3^CAD w/o Angina Pectoris