IBDEI08L ; ; 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,20949,2)
 ;;=^5009962
 ;;^UTILITY(U,$J,358.3,20950,0)
 ;;=M05.59^^68^854^91
 ;;^UTILITY(U,$J,358.3,20950,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,20950,1,3,0)
 ;;=3^Rheumatoid Polyneurop w/ Rheum Arthritis,Mult Sites
 ;;^UTILITY(U,$J,358.3,20950,1,4,0)
 ;;=4^M05.59
 ;;^UTILITY(U,$J,358.3,20950,2)
 ;;=^5009976
 ;;^UTILITY(U,$J,358.3,20951,0)
 ;;=M05.571^^68^854^92
 ;;^UTILITY(U,$J,358.3,20951,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,20951,1,3,0)
 ;;=3^Rheumatoid Polyneurop w/ Rheum Arthritis,Rt Ankle/Foot
 ;;^UTILITY(U,$J,358.3,20951,1,4,0)
 ;;=4^M05.571
 ;;^UTILITY(U,$J,358.3,20951,2)
 ;;=^5009973
 ;;^UTILITY(U,$J,358.3,20952,0)
 ;;=M05.521^^68^854^93
 ;;^UTILITY(U,$J,358.3,20952,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,20952,1,3,0)
 ;;=3^Rheumatoid Polyneurop w/ Rheum Arthritis,Rt Elbow
 ;;^UTILITY(U,$J,358.3,20952,1,4,0)
 ;;=4^M05.521
 ;;^UTILITY(U,$J,358.3,20952,2)
 ;;=^5009958
 ;;^UTILITY(U,$J,358.3,20953,0)
 ;;=M05.541^^68^854^94
 ;;^UTILITY(U,$J,358.3,20953,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,20953,1,3,0)
 ;;=3^Rheumatoid Polyneurop w/ Rheum Arthritis,Rt Hand
 ;;^UTILITY(U,$J,358.3,20953,1,4,0)
 ;;=4^M05.541
 ;;^UTILITY(U,$J,358.3,20953,2)
 ;;=^5009964
 ;;^UTILITY(U,$J,358.3,20954,0)
 ;;=M05.561^^68^854^95
 ;;^UTILITY(U,$J,358.3,20954,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,20954,1,3,0)
 ;;=3^Rheumatoid Polyneurop w/ Rheum Arthritis,Rt Knee
 ;;^UTILITY(U,$J,358.3,20954,1,4,0)
 ;;=4^M05.561
 ;;^UTILITY(U,$J,358.3,20954,2)
 ;;=^5009970
 ;;^UTILITY(U,$J,358.3,20955,0)
 ;;=M05.511^^68^854^96
 ;;^UTILITY(U,$J,358.3,20955,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,20955,1,3,0)
 ;;=3^Rheumatoid Polyneurop w/ Rheum Arthritis,Rt Shoulder
 ;;^UTILITY(U,$J,358.3,20955,1,4,0)
 ;;=4^M05.511
 ;;^UTILITY(U,$J,358.3,20955,2)
 ;;=^5009955
 ;;^UTILITY(U,$J,358.3,20956,0)
 ;;=M05.531^^68^854^97
 ;;^UTILITY(U,$J,358.3,20956,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,20956,1,3,0)
 ;;=3^Rheumatoid Polyneurop w/ Rheum Arthritis,Rt Wrist
 ;;^UTILITY(U,$J,358.3,20956,1,4,0)
 ;;=4^M05.531
 ;;^UTILITY(U,$J,358.3,20956,2)
 ;;=^5009961
 ;;^UTILITY(U,$J,358.3,20957,0)
 ;;=M06.9^^68^854^36
 ;;^UTILITY(U,$J,358.3,20957,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,20957,1,3,0)
 ;;=3^Rheumatoid Arthritis,Unspec
 ;;^UTILITY(U,$J,358.3,20957,1,4,0)
 ;;=4^M06.9
 ;;^UTILITY(U,$J,358.3,20957,2)
 ;;=^5010145
 ;;^UTILITY(U,$J,358.3,20958,0)
 ;;=M05.8A^^68^854^10
 ;;^UTILITY(U,$J,358.3,20958,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,20958,1,3,0)
 ;;=3^Rheum Arthritis w/ Rheum Factor,Oth Site
 ;;^UTILITY(U,$J,358.3,20958,1,4,0)
 ;;=4^M05.8A
 ;;^UTILITY(U,$J,358.3,20958,2)
 ;;=^5159222
 ;;^UTILITY(U,$J,358.3,20959,0)
 ;;=M06.0A^^68^854^26
 ;;^UTILITY(U,$J,358.3,20959,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,20959,1,3,0)
 ;;=3^Rheum Arthritis w/o Rheum Factor,Oth Site
 ;;^UTILITY(U,$J,358.3,20959,1,4,0)
 ;;=4^M06.0A
 ;;^UTILITY(U,$J,358.3,20959,2)
 ;;=^5159223
 ;;^UTILITY(U,$J,358.3,20960,0)
 ;;=M06.8A^^68^854^35
 ;;^UTILITY(U,$J,358.3,20960,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,20960,1,3,0)
 ;;=3^Rheum Arthritis,Oth Spec,Oth Spec Site
 ;;^UTILITY(U,$J,358.3,20960,1,4,0)
 ;;=4^M06.8A
 ;;^UTILITY(U,$J,358.3,20960,2)
 ;;=^5159224
 ;;^UTILITY(U,$J,358.3,20961,0)
 ;;=F31.81^^68^855^8
 ;;^UTILITY(U,$J,358.3,20961,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,20961,1,3,0)
 ;;=3^Bipolar II disorder
 ;;^UTILITY(U,$J,358.3,20961,1,4,0)
 ;;=4^F31.81
 ;;^UTILITY(U,$J,358.3,20961,2)
 ;;=^5003519
 ;;^UTILITY(U,$J,358.3,20962,0)
 ;;=F41.9^^68^855^7
 ;;^UTILITY(U,$J,358.3,20962,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,20962,1,3,0)
 ;;=3^Anxiety D/O,Unspec
 ;;^UTILITY(U,$J,358.3,20962,1,4,0)
 ;;=4^F41.9
 ;;^UTILITY(U,$J,358.3,20962,2)
 ;;=^5003567
 ;;^UTILITY(U,$J,358.3,20963,0)
 ;;=F34.1^^68^855^10
 ;;^UTILITY(U,$J,358.3,20963,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,20963,1,3,0)
 ;;=3^Dysthymic disorder
 ;;^UTILITY(U,$J,358.3,20963,1,4,0)
 ;;=4^F34.1
 ;;^UTILITY(U,$J,358.3,20963,2)
 ;;=^331913
 ;;^UTILITY(U,$J,358.3,20964,0)
 ;;=F60.4^^68^855^11
 ;;^UTILITY(U,$J,358.3,20964,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,20964,1,3,0)
 ;;=3^Histrionic personality disorder
 ;;^UTILITY(U,$J,358.3,20964,1,4,0)
 ;;=4^F60.4
 ;;^UTILITY(U,$J,358.3,20964,2)
 ;;=^5003636
 ;;^UTILITY(U,$J,358.3,20965,0)
 ;;=F60.7^^68^855^9
 ;;^UTILITY(U,$J,358.3,20965,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,20965,1,3,0)
 ;;=3^Dependent personality disorder
 ;;^UTILITY(U,$J,358.3,20965,1,4,0)
 ;;=4^F60.7
 ;;^UTILITY(U,$J,358.3,20965,2)
 ;;=^5003637
 ;;^UTILITY(U,$J,358.3,20966,0)
 ;;=F43.21^^68^855^3
 ;;^UTILITY(U,$J,358.3,20966,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,20966,1,3,0)
 ;;=3^Adjustment D/O w/ Depressed Mood
 ;;^UTILITY(U,$J,358.3,20966,1,4,0)
 ;;=4^F43.21
 ;;^UTILITY(U,$J,358.3,20966,2)
 ;;=^331948
 ;;^UTILITY(U,$J,358.3,20967,0)
 ;;=F93.0^^68^855^17
 ;;^UTILITY(U,$J,358.3,20967,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,20967,1,3,0)
 ;;=3^Separation anxiety disorder of childhood
 ;;^UTILITY(U,$J,358.3,20967,1,4,0)
 ;;=4^F93.0
 ;;^UTILITY(U,$J,358.3,20967,2)
 ;;=^5003702
 ;;^UTILITY(U,$J,358.3,20968,0)
 ;;=F43.22^^68^855^2
 ;;^UTILITY(U,$J,358.3,20968,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,20968,1,3,0)
 ;;=3^Adjustment D/O w/ Anxiety
 ;;^UTILITY(U,$J,358.3,20968,1,4,0)
 ;;=4^F43.22
 ;;^UTILITY(U,$J,358.3,20968,2)
 ;;=^331949
 ;;^UTILITY(U,$J,358.3,20969,0)
 ;;=F43.23^^68^855^5
 ;;^UTILITY(U,$J,358.3,20969,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,20969,1,3,0)
 ;;=3^Adjustment D/O w/ Mixed Anxiety & Depressed Mood
 ;;^UTILITY(U,$J,358.3,20969,1,4,0)
 ;;=4^F43.23
 ;;^UTILITY(U,$J,358.3,20969,2)
 ;;=^331950
 ;;^UTILITY(U,$J,358.3,20970,0)
 ;;=F43.24^^68^855^4
 ;;^UTILITY(U,$J,358.3,20970,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,20970,1,3,0)
 ;;=3^Adjustment D/O w/ Conduct Disturbance
 ;;^UTILITY(U,$J,358.3,20970,1,4,0)
 ;;=4^F43.24
 ;;^UTILITY(U,$J,358.3,20970,2)
 ;;=^331951
 ;;^UTILITY(U,$J,358.3,20971,0)
 ;;=F43.25^^68^855^1
 ;;^UTILITY(U,$J,358.3,20971,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,20971,1,3,0)
 ;;=3^Adjustment D/O w/ Mixed Disturb Emotions & Conduct
 ;;^UTILITY(U,$J,358.3,20971,1,4,0)
 ;;=4^F43.25
 ;;^UTILITY(U,$J,358.3,20971,2)
 ;;=^331952
 ;;^UTILITY(U,$J,358.3,20972,0)
 ;;=F43.10^^68^855^15
 ;;^UTILITY(U,$J,358.3,20972,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,20972,1,3,0)
 ;;=3^Post-traumatic stress disorder, unspecified
 ;;^UTILITY(U,$J,358.3,20972,1,4,0)
 ;;=4^F43.10
 ;;^UTILITY(U,$J,358.3,20972,2)
 ;;=^5003570
 ;;^UTILITY(U,$J,358.3,20973,0)
 ;;=F43.12^^68^855^14
 ;;^UTILITY(U,$J,358.3,20973,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,20973,1,3,0)
 ;;=3^Post-traumatic stress disorder, chronic
 ;;^UTILITY(U,$J,358.3,20973,1,4,0)
 ;;=4^F43.12
 ;;^UTILITY(U,$J,358.3,20973,2)
 ;;=^5003572
 ;;^UTILITY(U,$J,358.3,20974,0)
 ;;=F43.8^^68^855^16
 ;;^UTILITY(U,$J,358.3,20974,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,20974,1,3,0)
 ;;=3^Reactions to severe stress NEC
 ;;^UTILITY(U,$J,358.3,20974,1,4,0)
 ;;=4^F43.8
 ;;^UTILITY(U,$J,358.3,20974,2)
 ;;=^5003575
 ;;^UTILITY(U,$J,358.3,20975,0)
 ;;=F43.20^^68^855^6
 ;;^UTILITY(U,$J,358.3,20975,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,20975,1,3,0)
 ;;=3^Adjustment D/O,Unspec
 ;;^UTILITY(U,$J,358.3,20975,1,4,0)
 ;;=4^F43.20
 ;;^UTILITY(U,$J,358.3,20975,2)
 ;;=^5003573
 ;;^UTILITY(U,$J,358.3,20976,0)
 ;;=F07.0^^68^855^13
 ;;^UTILITY(U,$J,358.3,20976,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,20976,1,3,0)
 ;;=3^Personality change due to known physiological condition
 ;;^UTILITY(U,$J,358.3,20976,1,4,0)
 ;;=4^F07.0
 ;;^UTILITY(U,$J,358.3,20976,2)
 ;;=^5003063
 ;;^UTILITY(U,$J,358.3,20977,0)
 ;;=F98.5^^68^856^1
 ;;^UTILITY(U,$J,358.3,20977,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,20977,1,3,0)
 ;;=3^Adult onset fluency disorder
 ;;^UTILITY(U,$J,358.3,20977,1,4,0)
 ;;=4^F98.5
 ;;^UTILITY(U,$J,358.3,20977,2)
 ;;=^5003717
 ;;^UTILITY(U,$J,358.3,20978,0)
 ;;=R47.01^^68^856^2
 ;;^UTILITY(U,$J,358.3,20978,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,20978,1,3,0)
 ;;=3^Aphasia
 ;;^UTILITY(U,$J,358.3,20978,1,4,0)
 ;;=4^R47.01
 ;;^UTILITY(U,$J,358.3,20978,2)
 ;;=^5019488
 ;;^UTILITY(U,$J,358.3,20979,0)
 ;;=I69.920^^68^856^4
 ;;^UTILITY(U,$J,358.3,20979,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,20979,1,3,0)
 ;;=3^Aphasia following unspecified cerebrovascular disease
 ;;^UTILITY(U,$J,358.3,20979,1,4,0)
 ;;=4^I69.920
 ;;^UTILITY(U,$J,358.3,20979,2)
 ;;=^5007553
 ;;^UTILITY(U,$J,358.3,20980,0)
 ;;=F80.1^^68^856^5
 ;;^UTILITY(U,$J,358.3,20980,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,20980,1,3,0)
 ;;=3^Expressive language disorder
 ;;^UTILITY(U,$J,358.3,20980,1,4,0)
 ;;=4^F80.1
 ;;^UTILITY(U,$J,358.3,20980,2)
 ;;=^331958
 ;;^UTILITY(U,$J,358.3,20981,0)
 ;;=F80.2^^68^856^6
 ;;^UTILITY(U,$J,358.3,20981,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,20981,1,3,0)
 ;;=3^Mixed receptive-expressive language disorder
 ;;^UTILITY(U,$J,358.3,20981,1,4,0)
 ;;=4^F80.2
 ;;^UTILITY(U,$J,358.3,20981,2)
 ;;=^331959
 ;;^UTILITY(U,$J,358.3,20982,0)
 ;;=R47.89^^68^856^7
 ;;^UTILITY(U,$J,358.3,20982,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,20982,1,3,0)
 ;;=3^Speech disturbances NEC
 ;;^UTILITY(U,$J,358.3,20982,1,4,0)
 ;;=4^R47.89
 ;;^UTILITY(U,$J,358.3,20982,2)
 ;;=^5019493
 ;;^UTILITY(U,$J,358.3,20983,0)
 ;;=R49.8^^68^856^8
 ;;^UTILITY(U,$J,358.3,20983,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,20983,1,3,0)
 ;;=3^Voice and resonance disorders NEC
 ;;^UTILITY(U,$J,358.3,20983,1,4,0)
 ;;=4^R49.8
 ;;^UTILITY(U,$J,358.3,20983,2)
 ;;=^5019505
 ;;^UTILITY(U,$J,358.3,20984,0)
 ;;=I69.320^^68^856^3
 ;;^UTILITY(U,$J,358.3,20984,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,20984,1,3,0)
 ;;=3^Aphasia Following CVA
 ;;^UTILITY(U,$J,358.3,20984,1,4,0)
 ;;=4^I69.320
 ;;^UTILITY(U,$J,358.3,20984,2)
 ;;=^5007491
 ;;^UTILITY(U,$J,358.3,20985,0)
 ;;=Z44.011^^68^857^7
 ;;^UTILITY(U,$J,358.3,20985,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,20985,1,3,0)
 ;;=3^Fit/adjst of complete right artificial arm
 ;;^UTILITY(U,$J,358.3,20985,1,4,0)
 ;;=4^Z44.011
 ;;^UTILITY(U,$J,358.3,20985,2)
 ;;=^5062971
 ;;^UTILITY(U,$J,358.3,20986,0)
 ;;=Z44.012^^68^857^5
 ;;^UTILITY(U,$J,358.3,20986,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,20986,1,3,0)
 ;;=3^Fit/adjst of complete left artificial arm
 ;;^UTILITY(U,$J,358.3,20986,1,4,0)
 ;;=4^Z44.012
 ;;^UTILITY(U,$J,358.3,20986,2)
 ;;=^5062972
 ;;^UTILITY(U,$J,358.3,20987,0)
 ;;=Z44.021^^68^857^12
 ;;^UTILITY(U,$J,358.3,20987,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,20987,1,3,0)
 ;;=3^Fit/adjst of partial artificial right arm
 ;;^UTILITY(U,$J,358.3,20987,1,4,0)
 ;;=4^Z44.021
 ;;^UTILITY(U,$J,358.3,20987,2)
 ;;=^5062974
 ;;^UTILITY(U,$J,358.3,20988,0)
 ;;=Z44.022^^68^857^10
 ;;^UTILITY(U,$J,358.3,20988,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,20988,1,3,0)
 ;;=3^Fit/adjst of partial artificial left arm
 ;;^UTILITY(U,$J,358.3,20988,1,4,0)
 ;;=4^Z44.022
 ;;^UTILITY(U,$J,358.3,20988,2)
 ;;=^5062975
 ;;^UTILITY(U,$J,358.3,20989,0)
 ;;=Z44.111^^68^857^8
 ;;^UTILITY(U,$J,358.3,20989,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,20989,1,3,0)
 ;;=3^Fit/adjst of complete right artificial leg
 ;;^UTILITY(U,$J,358.3,20989,1,4,0)
 ;;=4^Z44.111
 ;;^UTILITY(U,$J,358.3,20989,2)
 ;;=^5062980
 ;;^UTILITY(U,$J,358.3,20990,0)
 ;;=Z44.112^^68^857^6
 ;;^UTILITY(U,$J,358.3,20990,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,20990,1,3,0)
 ;;=3^Fit/adjst of complete left artificial leg
 ;;^UTILITY(U,$J,358.3,20990,1,4,0)
 ;;=4^Z44.112
 ;;^UTILITY(U,$J,358.3,20990,2)
 ;;=^5062981
 ;;^UTILITY(U,$J,358.3,20991,0)
 ;;=Z44.121^^68^857^13
 ;;^UTILITY(U,$J,358.3,20991,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,20991,1,3,0)
 ;;=3^Fit/adjst of partial artificial right leg
 ;;^UTILITY(U,$J,358.3,20991,1,4,0)
 ;;=4^Z44.121
 ;;^UTILITY(U,$J,358.3,20991,2)
 ;;=^5062983
 ;;^UTILITY(U,$J,358.3,20992,0)
 ;;=Z44.122^^68^857^11
 ;;^UTILITY(U,$J,358.3,20992,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,20992,1,3,0)
 ;;=3^Fit/adjst of partial artificial left leg
 ;;^UTILITY(U,$J,358.3,20992,1,4,0)
 ;;=4^Z44.122
 ;;^UTILITY(U,$J,358.3,20992,2)
 ;;=^5062984
 ;;^UTILITY(U,$J,358.3,20993,0)
 ;;=Z44.8^^68^857^9
 ;;^UTILITY(U,$J,358.3,20993,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,20993,1,3,0)
 ;;=3^Fit/adjst of external prosthetic devices
 ;;^UTILITY(U,$J,358.3,20993,1,4,0)
 ;;=4^Z44.8
 ;;^UTILITY(U,$J,358.3,20993,2)
 ;;=^5062992
 ;;^UTILITY(U,$J,358.3,20994,0)
 ;;=Z44.9^^68^857^14
 ;;^UTILITY(U,$J,358.3,20994,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,20994,1,3,0)
 ;;=3^Fit/adjst of unsp external prosthetic device
 ;;^UTILITY(U,$J,358.3,20994,1,4,0)
 ;;=4^Z44.9
 ;;^UTILITY(U,$J,358.3,20994,2)
 ;;=^5062993
 ;;^UTILITY(U,$J,358.3,20995,0)
 ;;=Z47.89^^68^857^3
 ;;^UTILITY(U,$J,358.3,20995,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,20995,1,3,0)
 ;;=3^Aftercare,Orthopedic NEC
 ;;^UTILITY(U,$J,358.3,20995,1,4,0)
 ;;=4^Z47.89
 ;;^UTILITY(U,$J,358.3,20995,2)
 ;;=^5063032
 ;;^UTILITY(U,$J,358.3,20996,0)
 ;;=Z51.89^^68^857^4
 ;;^UTILITY(U,$J,358.3,20996,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,20996,1,3,0)
 ;;=3^Aftercare,Specified NEC
 ;;^UTILITY(U,$J,358.3,20996,1,4,0)
 ;;=4^Z51.89
 ;;^UTILITY(U,$J,358.3,20996,2)
 ;;=^5063065
 ;;^UTILITY(U,$J,358.3,20997,0)
 ;;=Z47.1^^68^857^2
 ;;^UTILITY(U,$J,358.3,20997,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,20997,1,3,0)
 ;;=3^Aftercare,Joint Replacement
 ;;^UTILITY(U,$J,358.3,20997,1,4,0)
 ;;=4^Z47.1
 ;;^UTILITY(U,$J,358.3,20997,2)
 ;;=^5063025
 ;;^UTILITY(U,$J,358.3,20998,0)
 ;;=Z47.81^^68^857^1
 ;;^UTILITY(U,$J,358.3,20998,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,20998,1,3,0)
 ;;=3^Aftercare,Amputation
 ;;^UTILITY(U,$J,358.3,20998,1,4,0)
 ;;=4^Z47.81
 ;;^UTILITY(U,$J,358.3,20998,2)
 ;;=^5063030
 ;;^UTILITY(U,$J,358.3,20999,0)
 ;;=R45.851^^68^858^3
 ;;^UTILITY(U,$J,358.3,20999,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,20999,1,3,0)
 ;;=3^Suicidal Ideations
 ;;^UTILITY(U,$J,358.3,20999,1,4,0)
 ;;=4^R45.851
 ;;^UTILITY(U,$J,358.3,20999,2)
 ;;=^5019474
 ;;^UTILITY(U,$J,358.3,21000,0)
 ;;=T14.91XA^^68^858^4
 ;;^UTILITY(U,$J,358.3,21000,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21000,1,3,0)
 ;;=3^Suicide Attempt,Initial Encntr
 ;;^UTILITY(U,$J,358.3,21000,1,4,0)
 ;;=4^T14.91XA
 ;;^UTILITY(U,$J,358.3,21000,2)
 ;;=^5151779
 ;;^UTILITY(U,$J,358.3,21001,0)
 ;;=T14.91XD^^68^858^6
 ;;^UTILITY(U,$J,358.3,21001,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21001,1,3,0)
 ;;=3^Suicide Attempt,Subsequent Encntr
 ;;^UTILITY(U,$J,358.3,21001,1,4,0)
 ;;=4^T14.91XD
 ;;^UTILITY(U,$J,358.3,21001,2)
 ;;=^5151780
 ;;^UTILITY(U,$J,358.3,21002,0)
 ;;=T14.91XS^^68^858^5
 ;;^UTILITY(U,$J,358.3,21002,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21002,1,3,0)
 ;;=3^Suicide Attempt,Sequela
 ;;^UTILITY(U,$J,358.3,21002,1,4,0)
 ;;=4^T14.91XS
 ;;^UTILITY(U,$J,358.3,21002,2)
 ;;=^5151781
 ;;^UTILITY(U,$J,358.3,21003,0)
 ;;=Z91.51^^68^858^2
 ;;^UTILITY(U,$J,358.3,21003,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21003,1,3,0)
 ;;=3^Personal Hx of Suicidal Behavior
 ;;^UTILITY(U,$J,358.3,21003,1,4,0)
 ;;=4^Z91.51
 ;;^UTILITY(U,$J,358.3,21003,2)
 ;;=^5161317
 ;;^UTILITY(U,$J,358.3,21004,0)
 ;;=Z91.52^^68^858^1
 ;;^UTILITY(U,$J,358.3,21004,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21004,1,3,0)
 ;;=3^Personal Hx of Non-Suicidal Self-Harm
 ;;^UTILITY(U,$J,358.3,21004,1,4,0)
 ;;=4^Z91.52
 ;;^UTILITY(U,$J,358.3,21004,2)
 ;;=^5161318
 ;;^UTILITY(U,$J,358.3,21005,0)
 ;;=M50.11^^68^859^5
 ;;^UTILITY(U,$J,358.3,21005,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21005,1,3,0)
 ;;=3^Cervical DDD w/ Radiculopathy,C2-C4
 ;;^UTILITY(U,$J,358.3,21005,1,4,0)
 ;;=4^M50.11
 ;;^UTILITY(U,$J,358.3,21005,2)
 ;;=^5012220
 ;;^UTILITY(U,$J,358.3,21006,0)
 ;;=M50.120^^68^859^6
 ;;^UTILITY(U,$J,358.3,21006,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21006,1,3,0)
 ;;=3^Cervical DDD w/ Radiculopathy,C4-C7
 ;;^UTILITY(U,$J,358.3,21006,1,4,0)
 ;;=4^M50.120
 ;;^UTILITY(U,$J,358.3,21006,2)
 ;;=^5138812
 ;;^UTILITY(U,$J,358.3,21007,0)
 ;;=M50.13^^68^859^7
 ;;^UTILITY(U,$J,358.3,21007,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21007,1,3,0)
 ;;=3^Cervical DDD w/ Radiculopathy,C7-C11
 ;;^UTILITY(U,$J,358.3,21007,1,4,0)
 ;;=4^M50.13
 ;;^UTILITY(U,$J,358.3,21007,2)
 ;;=^5012222
 ;;^UTILITY(U,$J,358.3,21008,0)
 ;;=M50.31^^68^859^8
 ;;^UTILITY(U,$J,358.3,21008,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21008,1,3,0)
 ;;=3^Cervical DDD w/o Radiculopathy,C2-C4
 ;;^UTILITY(U,$J,358.3,21008,1,4,0)
 ;;=4^M50.31
 ;;^UTILITY(U,$J,358.3,21008,2)
 ;;=^5012228
 ;;^UTILITY(U,$J,358.3,21009,0)
 ;;=M50.320^^68^859^9
 ;;^UTILITY(U,$J,358.3,21009,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21009,1,3,0)
 ;;=3^Cervical DDD w/o Radiculopathy,C4-C7
 ;;^UTILITY(U,$J,358.3,21009,1,4,0)
 ;;=4^M50.320
 ;;^UTILITY(U,$J,358.3,21009,2)
 ;;=^5138820
 ;;^UTILITY(U,$J,358.3,21010,0)
 ;;=M50.33^^68^859^10
 ;;^UTILITY(U,$J,358.3,21010,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21010,1,3,0)
 ;;=3^Cervical DDD w/o Radiculopathy,C7-C11
 ;;^UTILITY(U,$J,358.3,21010,1,4,0)
 ;;=4^M50.33
 ;;^UTILITY(U,$J,358.3,21010,2)
 ;;=^5012230
 ;;^UTILITY(U,$J,358.3,21011,0)
 ;;=M50.01^^68^859^1
 ;;^UTILITY(U,$J,358.3,21011,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21011,1,3,0)
 ;;=3^Cervical DDD w/ Myelopathy,C2-C4
 ;;^UTILITY(U,$J,358.3,21011,1,4,0)
 ;;=4^M50.01
 ;;^UTILITY(U,$J,358.3,21011,2)
 ;;=^5012216
 ;;^UTILITY(U,$J,358.3,21012,0)
 ;;=M50.021^^68^859^2
 ;;^UTILITY(U,$J,358.3,21012,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21012,1,3,0)
 ;;=3^Cervical DDD w/ Myelopathy,C4-C5
 ;;^UTILITY(U,$J,358.3,21012,1,4,0)
 ;;=4^M50.021
 ;;^UTILITY(U,$J,358.3,21012,2)
 ;;=^5138809
 ;;^UTILITY(U,$J,358.3,21013,0)
 ;;=M50.022^^68^859^3
 ;;^UTILITY(U,$J,358.3,21013,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21013,1,3,0)
 ;;=3^Cervical DDD w/ Myelopathy,C5-C6
 ;;^UTILITY(U,$J,358.3,21013,1,4,0)
 ;;=4^M50.022
 ;;^UTILITY(U,$J,358.3,21013,2)
 ;;=^5138810
 ;;^UTILITY(U,$J,358.3,21014,0)
 ;;=M50.023^^68^859^4
 ;;^UTILITY(U,$J,358.3,21014,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21014,1,3,0)
 ;;=3^Cervical DDD w/ Myelopathy,C6-C7
 ;;^UTILITY(U,$J,358.3,21014,1,4,0)
 ;;=4^M50.023
 ;;^UTILITY(U,$J,358.3,21014,2)
 ;;=^5138811
 ;;^UTILITY(U,$J,358.3,21015,0)
 ;;=M43.16^^68^860^6
 ;;^UTILITY(U,$J,358.3,21015,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21015,1,3,0)
 ;;=3^Lumbar Lithesis
 ;;^UTILITY(U,$J,358.3,21015,1,4,0)
 ;;=4^M43.16
 ;;^UTILITY(U,$J,358.3,21015,2)
 ;;=^5011927
 ;;^UTILITY(U,$J,358.3,21016,0)
 ;;=M43.17^^68^860^2
 ;;^UTILITY(U,$J,358.3,21016,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21016,1,3,0)
 ;;=3^L-S Lithesis
 ;;^UTILITY(U,$J,358.3,21016,1,4,0)
 ;;=4^M43.17
 ;;^UTILITY(U,$J,358.3,21016,2)
 ;;=^5011928
 ;;^UTILITY(U,$J,358.3,21017,0)
 ;;=M51.16^^68^860^4
 ;;^UTILITY(U,$J,358.3,21017,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21017,1,3,0)
 ;;=3^Lumbar DDD w/ Radiculopathy
 ;;^UTILITY(U,$J,358.3,21017,1,4,0)
 ;;=4^M51.16
 
--- Routine Detail   --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HIBDEI08L   19780     printed  Sep 23, 2025@19:19:46                                                                                                                                                                                                   Page 2
IBDEI08L  ; ; 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,20949,2)
 +2       ;;=^5009962
 +3       ;;^UTILITY(U,$J,358.3,20950,0)
 +4       ;;=M05.59^^68^854^91
 +5       ;;^UTILITY(U,$J,358.3,20950,1,0)
 +6       ;;=^358.31IA^4^2
 +7       ;;^UTILITY(U,$J,358.3,20950,1,3,0)
 +8       ;;=3^Rheumatoid Polyneurop w/ Rheum Arthritis,Mult Sites
 +9       ;;^UTILITY(U,$J,358.3,20950,1,4,0)
 +10      ;;=4^M05.59
 +11      ;;^UTILITY(U,$J,358.3,20950,2)
 +12      ;;=^5009976
 +13      ;;^UTILITY(U,$J,358.3,20951,0)
 +14      ;;=M05.571^^68^854^92
 +15      ;;^UTILITY(U,$J,358.3,20951,1,0)
 +16      ;;=^358.31IA^4^2
 +17      ;;^UTILITY(U,$J,358.3,20951,1,3,0)
 +18      ;;=3^Rheumatoid Polyneurop w/ Rheum Arthritis,Rt Ankle/Foot
 +19      ;;^UTILITY(U,$J,358.3,20951,1,4,0)
 +20      ;;=4^M05.571
 +21      ;;^UTILITY(U,$J,358.3,20951,2)
 +22      ;;=^5009973
 +23      ;;^UTILITY(U,$J,358.3,20952,0)
 +24      ;;=M05.521^^68^854^93
 +25      ;;^UTILITY(U,$J,358.3,20952,1,0)
 +26      ;;=^358.31IA^4^2
 +27      ;;^UTILITY(U,$J,358.3,20952,1,3,0)
 +28      ;;=3^Rheumatoid Polyneurop w/ Rheum Arthritis,Rt Elbow
 +29      ;;^UTILITY(U,$J,358.3,20952,1,4,0)
 +30      ;;=4^M05.521
 +31      ;;^UTILITY(U,$J,358.3,20952,2)
 +32      ;;=^5009958
 +33      ;;^UTILITY(U,$J,358.3,20953,0)
 +34      ;;=M05.541^^68^854^94
 +35      ;;^UTILITY(U,$J,358.3,20953,1,0)
 +36      ;;=^358.31IA^4^2
 +37      ;;^UTILITY(U,$J,358.3,20953,1,3,0)
 +38      ;;=3^Rheumatoid Polyneurop w/ Rheum Arthritis,Rt Hand
 +39      ;;^UTILITY(U,$J,358.3,20953,1,4,0)
 +40      ;;=4^M05.541
 +41      ;;^UTILITY(U,$J,358.3,20953,2)
 +42      ;;=^5009964
 +43      ;;^UTILITY(U,$J,358.3,20954,0)
 +44      ;;=M05.561^^68^854^95
 +45      ;;^UTILITY(U,$J,358.3,20954,1,0)
 +46      ;;=^358.31IA^4^2
 +47      ;;^UTILITY(U,$J,358.3,20954,1,3,0)
 +48      ;;=3^Rheumatoid Polyneurop w/ Rheum Arthritis,Rt Knee
 +49      ;;^UTILITY(U,$J,358.3,20954,1,4,0)
 +50      ;;=4^M05.561
 +51      ;;^UTILITY(U,$J,358.3,20954,2)
 +52      ;;=^5009970
 +53      ;;^UTILITY(U,$J,358.3,20955,0)
 +54      ;;=M05.511^^68^854^96
 +55      ;;^UTILITY(U,$J,358.3,20955,1,0)
 +56      ;;=^358.31IA^4^2
 +57      ;;^UTILITY(U,$J,358.3,20955,1,3,0)
 +58      ;;=3^Rheumatoid Polyneurop w/ Rheum Arthritis,Rt Shoulder
 +59      ;;^UTILITY(U,$J,358.3,20955,1,4,0)
 +60      ;;=4^M05.511
 +61      ;;^UTILITY(U,$J,358.3,20955,2)
 +62      ;;=^5009955
 +63      ;;^UTILITY(U,$J,358.3,20956,0)
 +64      ;;=M05.531^^68^854^97
 +65      ;;^UTILITY(U,$J,358.3,20956,1,0)
 +66      ;;=^358.31IA^4^2
 +67      ;;^UTILITY(U,$J,358.3,20956,1,3,0)
 +68      ;;=3^Rheumatoid Polyneurop w/ Rheum Arthritis,Rt Wrist
 +69      ;;^UTILITY(U,$J,358.3,20956,1,4,0)
 +70      ;;=4^M05.531
 +71      ;;^UTILITY(U,$J,358.3,20956,2)
 +72      ;;=^5009961
 +73      ;;^UTILITY(U,$J,358.3,20957,0)
 +74      ;;=M06.9^^68^854^36
 +75      ;;^UTILITY(U,$J,358.3,20957,1,0)
 +76      ;;=^358.31IA^4^2
 +77      ;;^UTILITY(U,$J,358.3,20957,1,3,0)
 +78      ;;=3^Rheumatoid Arthritis,Unspec
 +79      ;;^UTILITY(U,$J,358.3,20957,1,4,0)
 +80      ;;=4^M06.9
 +81      ;;^UTILITY(U,$J,358.3,20957,2)
 +82      ;;=^5010145
 +83      ;;^UTILITY(U,$J,358.3,20958,0)
 +84      ;;=M05.8A^^68^854^10
 +85      ;;^UTILITY(U,$J,358.3,20958,1,0)
 +86      ;;=^358.31IA^4^2
 +87      ;;^UTILITY(U,$J,358.3,20958,1,3,0)
 +88      ;;=3^Rheum Arthritis w/ Rheum Factor,Oth Site
 +89      ;;^UTILITY(U,$J,358.3,20958,1,4,0)
 +90      ;;=4^M05.8A
 +91      ;;^UTILITY(U,$J,358.3,20958,2)
 +92      ;;=^5159222
 +93      ;;^UTILITY(U,$J,358.3,20959,0)
 +94      ;;=M06.0A^^68^854^26
 +95      ;;^UTILITY(U,$J,358.3,20959,1,0)
 +96      ;;=^358.31IA^4^2
 +97      ;;^UTILITY(U,$J,358.3,20959,1,3,0)
 +98      ;;=3^Rheum Arthritis w/o Rheum Factor,Oth Site
 +99      ;;^UTILITY(U,$J,358.3,20959,1,4,0)
 +100     ;;=4^M06.0A
 +101     ;;^UTILITY(U,$J,358.3,20959,2)
 +102     ;;=^5159223
 +103     ;;^UTILITY(U,$J,358.3,20960,0)
 +104     ;;=M06.8A^^68^854^35
 +105     ;;^UTILITY(U,$J,358.3,20960,1,0)
 +106     ;;=^358.31IA^4^2
 +107     ;;^UTILITY(U,$J,358.3,20960,1,3,0)
 +108     ;;=3^Rheum Arthritis,Oth Spec,Oth Spec Site
 +109     ;;^UTILITY(U,$J,358.3,20960,1,4,0)
 +110     ;;=4^M06.8A
 +111     ;;^UTILITY(U,$J,358.3,20960,2)
 +112     ;;=^5159224
 +113     ;;^UTILITY(U,$J,358.3,20961,0)
 +114     ;;=F31.81^^68^855^8
 +115     ;;^UTILITY(U,$J,358.3,20961,1,0)
 +116     ;;=^358.31IA^4^2
 +117     ;;^UTILITY(U,$J,358.3,20961,1,3,0)
 +118     ;;=3^Bipolar II disorder
 +119     ;;^UTILITY(U,$J,358.3,20961,1,4,0)
 +120     ;;=4^F31.81
 +121     ;;^UTILITY(U,$J,358.3,20961,2)
 +122     ;;=^5003519
 +123     ;;^UTILITY(U,$J,358.3,20962,0)
 +124     ;;=F41.9^^68^855^7
 +125     ;;^UTILITY(U,$J,358.3,20962,1,0)
 +126     ;;=^358.31IA^4^2
 +127     ;;^UTILITY(U,$J,358.3,20962,1,3,0)
 +128     ;;=3^Anxiety D/O,Unspec
 +129     ;;^UTILITY(U,$J,358.3,20962,1,4,0)
 +130     ;;=4^F41.9
 +131     ;;^UTILITY(U,$J,358.3,20962,2)
 +132     ;;=^5003567
 +133     ;;^UTILITY(U,$J,358.3,20963,0)
 +134     ;;=F34.1^^68^855^10
 +135     ;;^UTILITY(U,$J,358.3,20963,1,0)
 +136     ;;=^358.31IA^4^2
 +137     ;;^UTILITY(U,$J,358.3,20963,1,3,0)
 +138     ;;=3^Dysthymic disorder
 +139     ;;^UTILITY(U,$J,358.3,20963,1,4,0)
 +140     ;;=4^F34.1
 +141     ;;^UTILITY(U,$J,358.3,20963,2)
 +142     ;;=^331913
 +143     ;;^UTILITY(U,$J,358.3,20964,0)
 +144     ;;=F60.4^^68^855^11
 +145     ;;^UTILITY(U,$J,358.3,20964,1,0)
 +146     ;;=^358.31IA^4^2
 +147     ;;^UTILITY(U,$J,358.3,20964,1,3,0)
 +148     ;;=3^Histrionic personality disorder
 +149     ;;^UTILITY(U,$J,358.3,20964,1,4,0)
 +150     ;;=4^F60.4
 +151     ;;^UTILITY(U,$J,358.3,20964,2)
 +152     ;;=^5003636
 +153     ;;^UTILITY(U,$J,358.3,20965,0)
 +154     ;;=F60.7^^68^855^9
 +155     ;;^UTILITY(U,$J,358.3,20965,1,0)
 +156     ;;=^358.31IA^4^2
 +157     ;;^UTILITY(U,$J,358.3,20965,1,3,0)
 +158     ;;=3^Dependent personality disorder
 +159     ;;^UTILITY(U,$J,358.3,20965,1,4,0)
 +160     ;;=4^F60.7
 +161     ;;^UTILITY(U,$J,358.3,20965,2)
 +162     ;;=^5003637
 +163     ;;^UTILITY(U,$J,358.3,20966,0)
 +164     ;;=F43.21^^68^855^3
 +165     ;;^UTILITY(U,$J,358.3,20966,1,0)
 +166     ;;=^358.31IA^4^2
 +167     ;;^UTILITY(U,$J,358.3,20966,1,3,0)
 +168     ;;=3^Adjustment D/O w/ Depressed Mood
 +169     ;;^UTILITY(U,$J,358.3,20966,1,4,0)
 +170     ;;=4^F43.21
 +171     ;;^UTILITY(U,$J,358.3,20966,2)
 +172     ;;=^331948
 +173     ;;^UTILITY(U,$J,358.3,20967,0)
 +174     ;;=F93.0^^68^855^17
 +175     ;;^UTILITY(U,$J,358.3,20967,1,0)
 +176     ;;=^358.31IA^4^2
 +177     ;;^UTILITY(U,$J,358.3,20967,1,3,0)
 +178     ;;=3^Separation anxiety disorder of childhood
 +179     ;;^UTILITY(U,$J,358.3,20967,1,4,0)
 +180     ;;=4^F93.0
 +181     ;;^UTILITY(U,$J,358.3,20967,2)
 +182     ;;=^5003702
 +183     ;;^UTILITY(U,$J,358.3,20968,0)
 +184     ;;=F43.22^^68^855^2
 +185     ;;^UTILITY(U,$J,358.3,20968,1,0)
 +186     ;;=^358.31IA^4^2
 +187     ;;^UTILITY(U,$J,358.3,20968,1,3,0)
 +188     ;;=3^Adjustment D/O w/ Anxiety
 +189     ;;^UTILITY(U,$J,358.3,20968,1,4,0)
 +190     ;;=4^F43.22
 +191     ;;^UTILITY(U,$J,358.3,20968,2)
 +192     ;;=^331949
 +193     ;;^UTILITY(U,$J,358.3,20969,0)
 +194     ;;=F43.23^^68^855^5
 +195     ;;^UTILITY(U,$J,358.3,20969,1,0)
 +196     ;;=^358.31IA^4^2
 +197     ;;^UTILITY(U,$J,358.3,20969,1,3,0)
 +198     ;;=3^Adjustment D/O w/ Mixed Anxiety & Depressed Mood
 +199     ;;^UTILITY(U,$J,358.3,20969,1,4,0)
 +200     ;;=4^F43.23
 +201     ;;^UTILITY(U,$J,358.3,20969,2)
 +202     ;;=^331950
 +203     ;;^UTILITY(U,$J,358.3,20970,0)
 +204     ;;=F43.24^^68^855^4
 +205     ;;^UTILITY(U,$J,358.3,20970,1,0)
 +206     ;;=^358.31IA^4^2
 +207     ;;^UTILITY(U,$J,358.3,20970,1,3,0)
 +208     ;;=3^Adjustment D/O w/ Conduct Disturbance
 +209     ;;^UTILITY(U,$J,358.3,20970,1,4,0)
 +210     ;;=4^F43.24
 +211     ;;^UTILITY(U,$J,358.3,20970,2)
 +212     ;;=^331951
 +213     ;;^UTILITY(U,$J,358.3,20971,0)
 +214     ;;=F43.25^^68^855^1
 +215     ;;^UTILITY(U,$J,358.3,20971,1,0)
 +216     ;;=^358.31IA^4^2
 +217     ;;^UTILITY(U,$J,358.3,20971,1,3,0)
 +218     ;;=3^Adjustment D/O w/ Mixed Disturb Emotions & Conduct
 +219     ;;^UTILITY(U,$J,358.3,20971,1,4,0)
 +220     ;;=4^F43.25
 +221     ;;^UTILITY(U,$J,358.3,20971,2)
 +222     ;;=^331952
 +223     ;;^UTILITY(U,$J,358.3,20972,0)
 +224     ;;=F43.10^^68^855^15
 +225     ;;^UTILITY(U,$J,358.3,20972,1,0)
 +226     ;;=^358.31IA^4^2
 +227     ;;^UTILITY(U,$J,358.3,20972,1,3,0)
 +228     ;;=3^Post-traumatic stress disorder, unspecified
 +229     ;;^UTILITY(U,$J,358.3,20972,1,4,0)
 +230     ;;=4^F43.10
 +231     ;;^UTILITY(U,$J,358.3,20972,2)
 +232     ;;=^5003570
 +233     ;;^UTILITY(U,$J,358.3,20973,0)
 +234     ;;=F43.12^^68^855^14
 +235     ;;^UTILITY(U,$J,358.3,20973,1,0)
 +236     ;;=^358.31IA^4^2
 +237     ;;^UTILITY(U,$J,358.3,20973,1,3,0)
 +238     ;;=3^Post-traumatic stress disorder, chronic
 +239     ;;^UTILITY(U,$J,358.3,20973,1,4,0)
 +240     ;;=4^F43.12
 +241     ;;^UTILITY(U,$J,358.3,20973,2)
 +242     ;;=^5003572
 +243     ;;^UTILITY(U,$J,358.3,20974,0)
 +244     ;;=F43.8^^68^855^16
 +245     ;;^UTILITY(U,$J,358.3,20974,1,0)
 +246     ;;=^358.31IA^4^2
 +247     ;;^UTILITY(U,$J,358.3,20974,1,3,0)
 +248     ;;=3^Reactions to severe stress NEC
 +249     ;;^UTILITY(U,$J,358.3,20974,1,4,0)
 +250     ;;=4^F43.8
 +251     ;;^UTILITY(U,$J,358.3,20974,2)
 +252     ;;=^5003575
 +253     ;;^UTILITY(U,$J,358.3,20975,0)
 +254     ;;=F43.20^^68^855^6
 +255     ;;^UTILITY(U,$J,358.3,20975,1,0)
 +256     ;;=^358.31IA^4^2
 +257     ;;^UTILITY(U,$J,358.3,20975,1,3,0)
 +258     ;;=3^Adjustment D/O,Unspec
 +259     ;;^UTILITY(U,$J,358.3,20975,1,4,0)
 +260     ;;=4^F43.20
 +261     ;;^UTILITY(U,$J,358.3,20975,2)
 +262     ;;=^5003573
 +263     ;;^UTILITY(U,$J,358.3,20976,0)
 +264     ;;=F07.0^^68^855^13
 +265     ;;^UTILITY(U,$J,358.3,20976,1,0)
 +266     ;;=^358.31IA^4^2
 +267     ;;^UTILITY(U,$J,358.3,20976,1,3,0)
 +268     ;;=3^Personality change due to known physiological condition
 +269     ;;^UTILITY(U,$J,358.3,20976,1,4,0)
 +270     ;;=4^F07.0
 +271     ;;^UTILITY(U,$J,358.3,20976,2)
 +272     ;;=^5003063
 +273     ;;^UTILITY(U,$J,358.3,20977,0)
 +274     ;;=F98.5^^68^856^1
 +275     ;;^UTILITY(U,$J,358.3,20977,1,0)
 +276     ;;=^358.31IA^4^2
 +277     ;;^UTILITY(U,$J,358.3,20977,1,3,0)
 +278     ;;=3^Adult onset fluency disorder
 +279     ;;^UTILITY(U,$J,358.3,20977,1,4,0)
 +280     ;;=4^F98.5
 +281     ;;^UTILITY(U,$J,358.3,20977,2)
 +282     ;;=^5003717
 +283     ;;^UTILITY(U,$J,358.3,20978,0)
 +284     ;;=R47.01^^68^856^2
 +285     ;;^UTILITY(U,$J,358.3,20978,1,0)
 +286     ;;=^358.31IA^4^2
 +287     ;;^UTILITY(U,$J,358.3,20978,1,3,0)
 +288     ;;=3^Aphasia
 +289     ;;^UTILITY(U,$J,358.3,20978,1,4,0)
 +290     ;;=4^R47.01
 +291     ;;^UTILITY(U,$J,358.3,20978,2)
 +292     ;;=^5019488
 +293     ;;^UTILITY(U,$J,358.3,20979,0)
 +294     ;;=I69.920^^68^856^4
 +295     ;;^UTILITY(U,$J,358.3,20979,1,0)
 +296     ;;=^358.31IA^4^2
 +297     ;;^UTILITY(U,$J,358.3,20979,1,3,0)
 +298     ;;=3^Aphasia following unspecified cerebrovascular disease
 +299     ;;^UTILITY(U,$J,358.3,20979,1,4,0)
 +300     ;;=4^I69.920
 +301     ;;^UTILITY(U,$J,358.3,20979,2)
 +302     ;;=^5007553
 +303     ;;^UTILITY(U,$J,358.3,20980,0)
 +304     ;;=F80.1^^68^856^5
 +305     ;;^UTILITY(U,$J,358.3,20980,1,0)
 +306     ;;=^358.31IA^4^2
 +307     ;;^UTILITY(U,$J,358.3,20980,1,3,0)
 +308     ;;=3^Expressive language disorder
 +309     ;;^UTILITY(U,$J,358.3,20980,1,4,0)
 +310     ;;=4^F80.1
 +311     ;;^UTILITY(U,$J,358.3,20980,2)
 +312     ;;=^331958
 +313     ;;^UTILITY(U,$J,358.3,20981,0)
 +314     ;;=F80.2^^68^856^6
 +315     ;;^UTILITY(U,$J,358.3,20981,1,0)
 +316     ;;=^358.31IA^4^2
 +317     ;;^UTILITY(U,$J,358.3,20981,1,3,0)
 +318     ;;=3^Mixed receptive-expressive language disorder
 +319     ;;^UTILITY(U,$J,358.3,20981,1,4,0)
 +320     ;;=4^F80.2
 +321     ;;^UTILITY(U,$J,358.3,20981,2)
 +322     ;;=^331959
 +323     ;;^UTILITY(U,$J,358.3,20982,0)
 +324     ;;=R47.89^^68^856^7
 +325     ;;^UTILITY(U,$J,358.3,20982,1,0)
 +326     ;;=^358.31IA^4^2
 +327     ;;^UTILITY(U,$J,358.3,20982,1,3,0)
 +328     ;;=3^Speech disturbances NEC
 +329     ;;^UTILITY(U,$J,358.3,20982,1,4,0)
 +330     ;;=4^R47.89
 +331     ;;^UTILITY(U,$J,358.3,20982,2)
 +332     ;;=^5019493
 +333     ;;^UTILITY(U,$J,358.3,20983,0)
 +334     ;;=R49.8^^68^856^8
 +335     ;;^UTILITY(U,$J,358.3,20983,1,0)
 +336     ;;=^358.31IA^4^2
 +337     ;;^UTILITY(U,$J,358.3,20983,1,3,0)
 +338     ;;=3^Voice and resonance disorders NEC
 +339     ;;^UTILITY(U,$J,358.3,20983,1,4,0)
 +340     ;;=4^R49.8
 +341     ;;^UTILITY(U,$J,358.3,20983,2)
 +342     ;;=^5019505
 +343     ;;^UTILITY(U,$J,358.3,20984,0)
 +344     ;;=I69.320^^68^856^3
 +345     ;;^UTILITY(U,$J,358.3,20984,1,0)
 +346     ;;=^358.31IA^4^2
 +347     ;;^UTILITY(U,$J,358.3,20984,1,3,0)
 +348     ;;=3^Aphasia Following CVA
 +349     ;;^UTILITY(U,$J,358.3,20984,1,4,0)
 +350     ;;=4^I69.320
 +351     ;;^UTILITY(U,$J,358.3,20984,2)
 +352     ;;=^5007491
 +353     ;;^UTILITY(U,$J,358.3,20985,0)
 +354     ;;=Z44.011^^68^857^7
 +355     ;;^UTILITY(U,$J,358.3,20985,1,0)
 +356     ;;=^358.31IA^4^2
 +357     ;;^UTILITY(U,$J,358.3,20985,1,3,0)
 +358     ;;=3^Fit/adjst of complete right artificial arm
 +359     ;;^UTILITY(U,$J,358.3,20985,1,4,0)
 +360     ;;=4^Z44.011
 +361     ;;^UTILITY(U,$J,358.3,20985,2)
 +362     ;;=^5062971
 +363     ;;^UTILITY(U,$J,358.3,20986,0)
 +364     ;;=Z44.012^^68^857^5
 +365     ;;^UTILITY(U,$J,358.3,20986,1,0)
 +366     ;;=^358.31IA^4^2
 +367     ;;^UTILITY(U,$J,358.3,20986,1,3,0)
 +368     ;;=3^Fit/adjst of complete left artificial arm
 +369     ;;^UTILITY(U,$J,358.3,20986,1,4,0)
 +370     ;;=4^Z44.012
 +371     ;;^UTILITY(U,$J,358.3,20986,2)
 +372     ;;=^5062972
 +373     ;;^UTILITY(U,$J,358.3,20987,0)
 +374     ;;=Z44.021^^68^857^12
 +375     ;;^UTILITY(U,$J,358.3,20987,1,0)
 +376     ;;=^358.31IA^4^2
 +377     ;;^UTILITY(U,$J,358.3,20987,1,3,0)
 +378     ;;=3^Fit/adjst of partial artificial right arm
 +379     ;;^UTILITY(U,$J,358.3,20987,1,4,0)
 +380     ;;=4^Z44.021
 +381     ;;^UTILITY(U,$J,358.3,20987,2)
 +382     ;;=^5062974
 +383     ;;^UTILITY(U,$J,358.3,20988,0)
 +384     ;;=Z44.022^^68^857^10
 +385     ;;^UTILITY(U,$J,358.3,20988,1,0)
 +386     ;;=^358.31IA^4^2
 +387     ;;^UTILITY(U,$J,358.3,20988,1,3,0)
 +388     ;;=3^Fit/adjst of partial artificial left arm
 +389     ;;^UTILITY(U,$J,358.3,20988,1,4,0)
 +390     ;;=4^Z44.022
 +391     ;;^UTILITY(U,$J,358.3,20988,2)
 +392     ;;=^5062975
 +393     ;;^UTILITY(U,$J,358.3,20989,0)
 +394     ;;=Z44.111^^68^857^8
 +395     ;;^UTILITY(U,$J,358.3,20989,1,0)
 +396     ;;=^358.31IA^4^2
 +397     ;;^UTILITY(U,$J,358.3,20989,1,3,0)
 +398     ;;=3^Fit/adjst of complete right artificial leg
 +399     ;;^UTILITY(U,$J,358.3,20989,1,4,0)
 +400     ;;=4^Z44.111
 +401     ;;^UTILITY(U,$J,358.3,20989,2)
 +402     ;;=^5062980
 +403     ;;^UTILITY(U,$J,358.3,20990,0)
 +404     ;;=Z44.112^^68^857^6
 +405     ;;^UTILITY(U,$J,358.3,20990,1,0)
 +406     ;;=^358.31IA^4^2
 +407     ;;^UTILITY(U,$J,358.3,20990,1,3,0)
 +408     ;;=3^Fit/adjst of complete left artificial leg
 +409     ;;^UTILITY(U,$J,358.3,20990,1,4,0)
 +410     ;;=4^Z44.112
 +411     ;;^UTILITY(U,$J,358.3,20990,2)
 +412     ;;=^5062981
 +413     ;;^UTILITY(U,$J,358.3,20991,0)
 +414     ;;=Z44.121^^68^857^13
 +415     ;;^UTILITY(U,$J,358.3,20991,1,0)
 +416     ;;=^358.31IA^4^2
 +417     ;;^UTILITY(U,$J,358.3,20991,1,3,0)
 +418     ;;=3^Fit/adjst of partial artificial right leg
 +419     ;;^UTILITY(U,$J,358.3,20991,1,4,0)
 +420     ;;=4^Z44.121
 +421     ;;^UTILITY(U,$J,358.3,20991,2)
 +422     ;;=^5062983
 +423     ;;^UTILITY(U,$J,358.3,20992,0)
 +424     ;;=Z44.122^^68^857^11
 +425     ;;^UTILITY(U,$J,358.3,20992,1,0)
 +426     ;;=^358.31IA^4^2
 +427     ;;^UTILITY(U,$J,358.3,20992,1,3,0)
 +428     ;;=3^Fit/adjst of partial artificial left leg
 +429     ;;^UTILITY(U,$J,358.3,20992,1,4,0)
 +430     ;;=4^Z44.122
 +431     ;;^UTILITY(U,$J,358.3,20992,2)
 +432     ;;=^5062984
 +433     ;;^UTILITY(U,$J,358.3,20993,0)
 +434     ;;=Z44.8^^68^857^9
 +435     ;;^UTILITY(U,$J,358.3,20993,1,0)
 +436     ;;=^358.31IA^4^2
 +437     ;;^UTILITY(U,$J,358.3,20993,1,3,0)
 +438     ;;=3^Fit/adjst of external prosthetic devices
 +439     ;;^UTILITY(U,$J,358.3,20993,1,4,0)
 +440     ;;=4^Z44.8
 +441     ;;^UTILITY(U,$J,358.3,20993,2)
 +442     ;;=^5062992
 +443     ;;^UTILITY(U,$J,358.3,20994,0)
 +444     ;;=Z44.9^^68^857^14
 +445     ;;^UTILITY(U,$J,358.3,20994,1,0)
 +446     ;;=^358.31IA^4^2
 +447     ;;^UTILITY(U,$J,358.3,20994,1,3,0)
 +448     ;;=3^Fit/adjst of unsp external prosthetic device
 +449     ;;^UTILITY(U,$J,358.3,20994,1,4,0)
 +450     ;;=4^Z44.9
 +451     ;;^UTILITY(U,$J,358.3,20994,2)
 +452     ;;=^5062993
 +453     ;;^UTILITY(U,$J,358.3,20995,0)
 +454     ;;=Z47.89^^68^857^3
 +455     ;;^UTILITY(U,$J,358.3,20995,1,0)
 +456     ;;=^358.31IA^4^2
 +457     ;;^UTILITY(U,$J,358.3,20995,1,3,0)
 +458     ;;=3^Aftercare,Orthopedic NEC
 +459     ;;^UTILITY(U,$J,358.3,20995,1,4,0)
 +460     ;;=4^Z47.89
 +461     ;;^UTILITY(U,$J,358.3,20995,2)
 +462     ;;=^5063032
 +463     ;;^UTILITY(U,$J,358.3,20996,0)
 +464     ;;=Z51.89^^68^857^4
 +465     ;;^UTILITY(U,$J,358.3,20996,1,0)
 +466     ;;=^358.31IA^4^2
 +467     ;;^UTILITY(U,$J,358.3,20996,1,3,0)
 +468     ;;=3^Aftercare,Specified NEC
 +469     ;;^UTILITY(U,$J,358.3,20996,1,4,0)
 +470     ;;=4^Z51.89
 +471     ;;^UTILITY(U,$J,358.3,20996,2)
 +472     ;;=^5063065
 +473     ;;^UTILITY(U,$J,358.3,20997,0)
 +474     ;;=Z47.1^^68^857^2
 +475     ;;^UTILITY(U,$J,358.3,20997,1,0)
 +476     ;;=^358.31IA^4^2
 +477     ;;^UTILITY(U,$J,358.3,20997,1,3,0)
 +478     ;;=3^Aftercare,Joint Replacement
 +479     ;;^UTILITY(U,$J,358.3,20997,1,4,0)
 +480     ;;=4^Z47.1
 +481     ;;^UTILITY(U,$J,358.3,20997,2)
 +482     ;;=^5063025
 +483     ;;^UTILITY(U,$J,358.3,20998,0)
 +484     ;;=Z47.81^^68^857^1
 +485     ;;^UTILITY(U,$J,358.3,20998,1,0)
 +486     ;;=^358.31IA^4^2
 +487     ;;^UTILITY(U,$J,358.3,20998,1,3,0)
 +488     ;;=3^Aftercare,Amputation
 +489     ;;^UTILITY(U,$J,358.3,20998,1,4,0)
 +490     ;;=4^Z47.81
 +491     ;;^UTILITY(U,$J,358.3,20998,2)
 +492     ;;=^5063030
 +493     ;;^UTILITY(U,$J,358.3,20999,0)
 +494     ;;=R45.851^^68^858^3
 +495     ;;^UTILITY(U,$J,358.3,20999,1,0)
 +496     ;;=^358.31IA^4^2
 +497     ;;^UTILITY(U,$J,358.3,20999,1,3,0)
 +498     ;;=3^Suicidal Ideations
 +499     ;;^UTILITY(U,$J,358.3,20999,1,4,0)
 +500     ;;=4^R45.851
 +501     ;;^UTILITY(U,$J,358.3,20999,2)
 +502     ;;=^5019474
 +503     ;;^UTILITY(U,$J,358.3,21000,0)
 +504     ;;=T14.91XA^^68^858^4
 +505     ;;^UTILITY(U,$J,358.3,21000,1,0)
 +506     ;;=^358.31IA^4^2
 +507     ;;^UTILITY(U,$J,358.3,21000,1,3,0)
 +508     ;;=3^Suicide Attempt,Initial Encntr
 +509     ;;^UTILITY(U,$J,358.3,21000,1,4,0)
 +510     ;;=4^T14.91XA
 +511     ;;^UTILITY(U,$J,358.3,21000,2)
 +512     ;;=^5151779
 +513     ;;^UTILITY(U,$J,358.3,21001,0)
 +514     ;;=T14.91XD^^68^858^6
 +515     ;;^UTILITY(U,$J,358.3,21001,1,0)
 +516     ;;=^358.31IA^4^2
 +517     ;;^UTILITY(U,$J,358.3,21001,1,3,0)
 +518     ;;=3^Suicide Attempt,Subsequent Encntr
 +519     ;;^UTILITY(U,$J,358.3,21001,1,4,0)
 +520     ;;=4^T14.91XD
 +521     ;;^UTILITY(U,$J,358.3,21001,2)
 +522     ;;=^5151780
 +523     ;;^UTILITY(U,$J,358.3,21002,0)
 +524     ;;=T14.91XS^^68^858^5
 +525     ;;^UTILITY(U,$J,358.3,21002,1,0)
 +526     ;;=^358.31IA^4^2
 +527     ;;^UTILITY(U,$J,358.3,21002,1,3,0)
 +528     ;;=3^Suicide Attempt,Sequela
 +529     ;;^UTILITY(U,$J,358.3,21002,1,4,0)
 +530     ;;=4^T14.91XS
 +531     ;;^UTILITY(U,$J,358.3,21002,2)
 +532     ;;=^5151781
 +533     ;;^UTILITY(U,$J,358.3,21003,0)
 +534     ;;=Z91.51^^68^858^2
 +535     ;;^UTILITY(U,$J,358.3,21003,1,0)
 +536     ;;=^358.31IA^4^2
 +537     ;;^UTILITY(U,$J,358.3,21003,1,3,0)
 +538     ;;=3^Personal Hx of Suicidal Behavior
 +539     ;;^UTILITY(U,$J,358.3,21003,1,4,0)
 +540     ;;=4^Z91.51
 +541     ;;^UTILITY(U,$J,358.3,21003,2)
 +542     ;;=^5161317
 +543     ;;^UTILITY(U,$J,358.3,21004,0)
 +544     ;;=Z91.52^^68^858^1
 +545     ;;^UTILITY(U,$J,358.3,21004,1,0)
 +546     ;;=^358.31IA^4^2
 +547     ;;^UTILITY(U,$J,358.3,21004,1,3,0)
 +548     ;;=3^Personal Hx of Non-Suicidal Self-Harm
 +549     ;;^UTILITY(U,$J,358.3,21004,1,4,0)
 +550     ;;=4^Z91.52
 +551     ;;^UTILITY(U,$J,358.3,21004,2)
 +552     ;;=^5161318
 +553     ;;^UTILITY(U,$J,358.3,21005,0)
 +554     ;;=M50.11^^68^859^5
 +555     ;;^UTILITY(U,$J,358.3,21005,1,0)
 +556     ;;=^358.31IA^4^2
 +557     ;;^UTILITY(U,$J,358.3,21005,1,3,0)
 +558     ;;=3^Cervical DDD w/ Radiculopathy,C2-C4
 +559     ;;^UTILITY(U,$J,358.3,21005,1,4,0)
 +560     ;;=4^M50.11
 +561     ;;^UTILITY(U,$J,358.3,21005,2)
 +562     ;;=^5012220
 +563     ;;^UTILITY(U,$J,358.3,21006,0)
 +564     ;;=M50.120^^68^859^6
 +565     ;;^UTILITY(U,$J,358.3,21006,1,0)
 +566     ;;=^358.31IA^4^2
 +567     ;;^UTILITY(U,$J,358.3,21006,1,3,0)
 +568     ;;=3^Cervical DDD w/ Radiculopathy,C4-C7
 +569     ;;^UTILITY(U,$J,358.3,21006,1,4,0)
 +570     ;;=4^M50.120
 +571     ;;^UTILITY(U,$J,358.3,21006,2)
 +572     ;;=^5138812
 +573     ;;^UTILITY(U,$J,358.3,21007,0)
 +574     ;;=M50.13^^68^859^7
 +575     ;;^UTILITY(U,$J,358.3,21007,1,0)
 +576     ;;=^358.31IA^4^2
 +577     ;;^UTILITY(U,$J,358.3,21007,1,3,0)
 +578     ;;=3^Cervical DDD w/ Radiculopathy,C7-C11
 +579     ;;^UTILITY(U,$J,358.3,21007,1,4,0)
 +580     ;;=4^M50.13
 +581     ;;^UTILITY(U,$J,358.3,21007,2)
 +582     ;;=^5012222
 +583     ;;^UTILITY(U,$J,358.3,21008,0)
 +584     ;;=M50.31^^68^859^8
 +585     ;;^UTILITY(U,$J,358.3,21008,1,0)
 +586     ;;=^358.31IA^4^2
 +587     ;;^UTILITY(U,$J,358.3,21008,1,3,0)
 +588     ;;=3^Cervical DDD w/o Radiculopathy,C2-C4
 +589     ;;^UTILITY(U,$J,358.3,21008,1,4,0)
 +590     ;;=4^M50.31
 +591     ;;^UTILITY(U,$J,358.3,21008,2)
 +592     ;;=^5012228
 +593     ;;^UTILITY(U,$J,358.3,21009,0)
 +594     ;;=M50.320^^68^859^9
 +595     ;;^UTILITY(U,$J,358.3,21009,1,0)
 +596     ;;=^358.31IA^4^2
 +597     ;;^UTILITY(U,$J,358.3,21009,1,3,0)
 +598     ;;=3^Cervical DDD w/o Radiculopathy,C4-C7
 +599     ;;^UTILITY(U,$J,358.3,21009,1,4,0)
 +600     ;;=4^M50.320
 +601     ;;^UTILITY(U,$J,358.3,21009,2)
 +602     ;;=^5138820
 +603     ;;^UTILITY(U,$J,358.3,21010,0)
 +604     ;;=M50.33^^68^859^10
 +605     ;;^UTILITY(U,$J,358.3,21010,1,0)
 +606     ;;=^358.31IA^4^2
 +607     ;;^UTILITY(U,$J,358.3,21010,1,3,0)
 +608     ;;=3^Cervical DDD w/o Radiculopathy,C7-C11
 +609     ;;^UTILITY(U,$J,358.3,21010,1,4,0)
 +610     ;;=4^M50.33
 +611     ;;^UTILITY(U,$J,358.3,21010,2)
 +612     ;;=^5012230
 +613     ;;^UTILITY(U,$J,358.3,21011,0)
 +614     ;;=M50.01^^68^859^1
 +615     ;;^UTILITY(U,$J,358.3,21011,1,0)
 +616     ;;=^358.31IA^4^2
 +617     ;;^UTILITY(U,$J,358.3,21011,1,3,0)
 +618     ;;=3^Cervical DDD w/ Myelopathy,C2-C4
 +619     ;;^UTILITY(U,$J,358.3,21011,1,4,0)
 +620     ;;=4^M50.01
 +621     ;;^UTILITY(U,$J,358.3,21011,2)
 +622     ;;=^5012216
 +623     ;;^UTILITY(U,$J,358.3,21012,0)
 +624     ;;=M50.021^^68^859^2
 +625     ;;^UTILITY(U,$J,358.3,21012,1,0)
 +626     ;;=^358.31IA^4^2
 +627     ;;^UTILITY(U,$J,358.3,21012,1,3,0)
 +628     ;;=3^Cervical DDD w/ Myelopathy,C4-C5
 +629     ;;^UTILITY(U,$J,358.3,21012,1,4,0)
 +630     ;;=4^M50.021
 +631     ;;^UTILITY(U,$J,358.3,21012,2)
 +632     ;;=^5138809
 +633     ;;^UTILITY(U,$J,358.3,21013,0)
 +634     ;;=M50.022^^68^859^3
 +635     ;;^UTILITY(U,$J,358.3,21013,1,0)
 +636     ;;=^358.31IA^4^2
 +637     ;;^UTILITY(U,$J,358.3,21013,1,3,0)
 +638     ;;=3^Cervical DDD w/ Myelopathy,C5-C6
 +639     ;;^UTILITY(U,$J,358.3,21013,1,4,0)
 +640     ;;=4^M50.022
 +641     ;;^UTILITY(U,$J,358.3,21013,2)
 +642     ;;=^5138810
 +643     ;;^UTILITY(U,$J,358.3,21014,0)
 +644     ;;=M50.023^^68^859^4
 +645     ;;^UTILITY(U,$J,358.3,21014,1,0)
 +646     ;;=^358.31IA^4^2
 +647     ;;^UTILITY(U,$J,358.3,21014,1,3,0)
 +648     ;;=3^Cervical DDD w/ Myelopathy,C6-C7
 +649     ;;^UTILITY(U,$J,358.3,21014,1,4,0)
 +650     ;;=4^M50.023
 +651     ;;^UTILITY(U,$J,358.3,21014,2)
 +652     ;;=^5138811
 +653     ;;^UTILITY(U,$J,358.3,21015,0)
 +654     ;;=M43.16^^68^860^6
 +655     ;;^UTILITY(U,$J,358.3,21015,1,0)
 +656     ;;=^358.31IA^4^2
 +657     ;;^UTILITY(U,$J,358.3,21015,1,3,0)
 +658     ;;=3^Lumbar Lithesis
 +659     ;;^UTILITY(U,$J,358.3,21015,1,4,0)
 +660     ;;=4^M43.16
 +661     ;;^UTILITY(U,$J,358.3,21015,2)
 +662     ;;=^5011927
 +663     ;;^UTILITY(U,$J,358.3,21016,0)
 +664     ;;=M43.17^^68^860^2
 +665     ;;^UTILITY(U,$J,358.3,21016,1,0)
 +666     ;;=^358.31IA^4^2
 +667     ;;^UTILITY(U,$J,358.3,21016,1,3,0)
 +668     ;;=3^L-S Lithesis
 +669     ;;^UTILITY(U,$J,358.3,21016,1,4,0)
 +670     ;;=4^M43.17
 +671     ;;^UTILITY(U,$J,358.3,21016,2)
 +672     ;;=^5011928
 +673     ;;^UTILITY(U,$J,358.3,21017,0)
 +674     ;;=M51.16^^68^860^4
 +675     ;;^UTILITY(U,$J,358.3,21017,1,0)
 +676     ;;=^358.31IA^4^2
 +677     ;;^UTILITY(U,$J,358.3,21017,1,3,0)
 +678     ;;=3^Lumbar DDD w/ Radiculopathy
 +679     ;;^UTILITY(U,$J,358.3,21017,1,4,0)
 +680     ;;=4^M51.16