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