IBDEI06I ; ; 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,15778,0)
;;=F42.8^^56^648^18
;;^UTILITY(U,$J,358.3,15778,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15778,1,3,0)
;;=3^Obsessive-Compulsive Disorder,Other
;;^UTILITY(U,$J,358.3,15778,1,4,0)
;;=4^F42.8
;;^UTILITY(U,$J,358.3,15778,2)
;;=^5138447
;;^UTILITY(U,$J,358.3,15779,0)
;;=F50.89^^56^648^10
;;^UTILITY(U,$J,358.3,15779,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15779,1,3,0)
;;=3^Eating Disorder,Oth Specified
;;^UTILITY(U,$J,358.3,15779,1,4,0)
;;=4^F50.89
;;^UTILITY(U,$J,358.3,15779,2)
;;=^5138449
;;^UTILITY(U,$J,358.3,15780,0)
;;=R41.0^^56^648^9
;;^UTILITY(U,$J,358.3,15780,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15780,1,3,0)
;;=3^Delirium,Disorientation NOS
;;^UTILITY(U,$J,358.3,15780,1,4,0)
;;=4^R41.0
;;^UTILITY(U,$J,358.3,15780,2)
;;=^5019436
;;^UTILITY(U,$J,358.3,15781,0)
;;=R56.00^^56^649^6
;;^UTILITY(U,$J,358.3,15781,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15781,1,3,0)
;;=3^Simple Febrile Convulsions
;;^UTILITY(U,$J,358.3,15781,1,4,0)
;;=4^R56.00
;;^UTILITY(U,$J,358.3,15781,2)
;;=^5019522
;;^UTILITY(U,$J,358.3,15782,0)
;;=R56.9^^56^649^4
;;^UTILITY(U,$J,358.3,15782,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15782,1,3,0)
;;=3^Convulsions,Unspec
;;^UTILITY(U,$J,358.3,15782,1,4,0)
;;=4^R56.9
;;^UTILITY(U,$J,358.3,15782,2)
;;=^5019524
;;^UTILITY(U,$J,358.3,15783,0)
;;=R25.0^^56^649^1
;;^UTILITY(U,$J,358.3,15783,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15783,1,3,0)
;;=3^Abnormal Head Movements
;;^UTILITY(U,$J,358.3,15783,1,4,0)
;;=4^R25.0
;;^UTILITY(U,$J,358.3,15783,2)
;;=^5019299
;;^UTILITY(U,$J,358.3,15784,0)
;;=R25.1^^56^649^7
;;^UTILITY(U,$J,358.3,15784,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15784,1,3,0)
;;=3^Tremor,Unspec
;;^UTILITY(U,$J,358.3,15784,1,4,0)
;;=4^R25.1
;;^UTILITY(U,$J,358.3,15784,2)
;;=^5019300
;;^UTILITY(U,$J,358.3,15785,0)
;;=R25.9^^56^649^3
;;^UTILITY(U,$J,358.3,15785,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15785,1,3,0)
;;=3^Abnormal Involuntary Movements,Unspec
;;^UTILITY(U,$J,358.3,15785,1,4,0)
;;=4^R25.9
;;^UTILITY(U,$J,358.3,15785,2)
;;=^5019303
;;^UTILITY(U,$J,358.3,15786,0)
;;=R25.3^^56^649^5
;;^UTILITY(U,$J,358.3,15786,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15786,1,3,0)
;;=3^Fasciculation/Twitching
;;^UTILITY(U,$J,358.3,15786,1,4,0)
;;=4^R25.3
;;^UTILITY(U,$J,358.3,15786,2)
;;=^44985
;;^UTILITY(U,$J,358.3,15787,0)
;;=R25.8^^56^649^2
;;^UTILITY(U,$J,358.3,15787,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15787,1,3,0)
;;=3^Abnormal Involuntary Movements,Other
;;^UTILITY(U,$J,358.3,15787,1,4,0)
;;=4^R25.8
;;^UTILITY(U,$J,358.3,15787,2)
;;=^5019302
;;^UTILITY(U,$J,358.3,15788,0)
;;=M02.30^^56^650^147
;;^UTILITY(U,$J,358.3,15788,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15788,1,3,0)
;;=3^Reiter's Disease,Unspec Site
;;^UTILITY(U,$J,358.3,15788,1,4,0)
;;=4^M02.30
;;^UTILITY(U,$J,358.3,15788,2)
;;=^5009790
;;^UTILITY(U,$J,358.3,15789,0)
;;=M10.9^^56^650^41
;;^UTILITY(U,$J,358.3,15789,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15789,1,3,0)
;;=3^Gout,Unspec
;;^UTILITY(U,$J,358.3,15789,1,4,0)
;;=4^M10.9
;;^UTILITY(U,$J,358.3,15789,2)
;;=^5010404
;;^UTILITY(U,$J,358.3,15790,0)
;;=G90.59^^56^650^35
;;^UTILITY(U,$J,358.3,15790,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15790,1,3,0)
;;=3^Complex Regional Pain Syndrome I,Unspec
;;^UTILITY(U,$J,358.3,15790,1,4,0)
;;=4^G90.59
;;^UTILITY(U,$J,358.3,15790,2)
;;=^5004171
;;^UTILITY(U,$J,358.3,15791,0)
;;=G56.01^^56^650^13
;;^UTILITY(U,$J,358.3,15791,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15791,1,3,0)
;;=3^Carpal Tunnel Syndrome,Right Upper Limb
;;^UTILITY(U,$J,358.3,15791,1,4,0)
;;=4^G56.01
;;^UTILITY(U,$J,358.3,15791,2)
;;=^5004018
;;^UTILITY(U,$J,358.3,15792,0)
;;=G56.02^^56^650^12
;;^UTILITY(U,$J,358.3,15792,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15792,1,3,0)
;;=3^Carpal Tunnel Syndrome,Left Upper Limb
;;^UTILITY(U,$J,358.3,15792,1,4,0)
;;=4^G56.02
;;^UTILITY(U,$J,358.3,15792,2)
;;=^5004019
;;^UTILITY(U,$J,358.3,15793,0)
;;=G56.21^^56^650^60
;;^UTILITY(U,$J,358.3,15793,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15793,1,3,0)
;;=3^Lesion of Ulnar Nerve,Right Upper Limb
;;^UTILITY(U,$J,358.3,15793,1,4,0)
;;=4^G56.21
;;^UTILITY(U,$J,358.3,15793,2)
;;=^5004024
;;^UTILITY(U,$J,358.3,15794,0)
;;=G56.22^^56^650^59
;;^UTILITY(U,$J,358.3,15794,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15794,1,3,0)
;;=3^Lesion of Ulnar Nerve,Left Upper Limb
;;^UTILITY(U,$J,358.3,15794,1,4,0)
;;=4^G56.22
;;^UTILITY(U,$J,358.3,15794,2)
;;=^5004025
;;^UTILITY(U,$J,358.3,15795,0)
;;=L40.52^^56^650^143
;;^UTILITY(U,$J,358.3,15795,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15795,1,3,0)
;;=3^Psoriatic Arthritis Mutilans
;;^UTILITY(U,$J,358.3,15795,1,4,0)
;;=4^L40.52
;;^UTILITY(U,$J,358.3,15795,2)
;;=^5009167
;;^UTILITY(U,$J,358.3,15796,0)
;;=L40.53^^56^650^144
;;^UTILITY(U,$J,358.3,15796,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15796,1,3,0)
;;=3^Psoriatic Spondylitis
;;^UTILITY(U,$J,358.3,15796,1,4,0)
;;=4^L40.53
;;^UTILITY(U,$J,358.3,15796,2)
;;=^5009168
;;^UTILITY(U,$J,358.3,15797,0)
;;=M32.9^^56^650^187
;;^UTILITY(U,$J,358.3,15797,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15797,1,3,0)
;;=3^Systemic Lupus Erythematosus,Unspec
;;^UTILITY(U,$J,358.3,15797,1,4,0)
;;=4^M32.9
;;^UTILITY(U,$J,358.3,15797,2)
;;=^5011761
;;^UTILITY(U,$J,358.3,15798,0)
;;=M32.0^^56^650^183
;;^UTILITY(U,$J,358.3,15798,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15798,1,3,0)
;;=3^Systemic Lupus Erythematosus,Drug-Induced
;;^UTILITY(U,$J,358.3,15798,1,4,0)
;;=4^M32.0
;;^UTILITY(U,$J,358.3,15798,2)
;;=^5011752
;;^UTILITY(U,$J,358.3,15799,0)
;;=M32.13^^56^650^185
;;^UTILITY(U,$J,358.3,15799,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15799,1,3,0)
;;=3^Systemic Lupus Erythematosus,Lung Involvement
;;^UTILITY(U,$J,358.3,15799,1,4,0)
;;=4^M32.13
;;^UTILITY(U,$J,358.3,15799,2)
;;=^5011756
;;^UTILITY(U,$J,358.3,15800,0)
;;=M32.14^^56^650^184
;;^UTILITY(U,$J,358.3,15800,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15800,1,3,0)
;;=3^Systemic Lupus Erythematosus,Glomerular Disease
;;^UTILITY(U,$J,358.3,15800,1,4,0)
;;=4^M32.14
;;^UTILITY(U,$J,358.3,15800,2)
;;=^5011757
;;^UTILITY(U,$J,358.3,15801,0)
;;=M32.12^^56^650^186
;;^UTILITY(U,$J,358.3,15801,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15801,1,3,0)
;;=3^Systemic Lupus Erythematosus,Pericarditis
;;^UTILITY(U,$J,358.3,15801,1,4,0)
;;=4^M32.12
;;^UTILITY(U,$J,358.3,15801,2)
;;=^5011755
;;^UTILITY(U,$J,358.3,15802,0)
;;=M05.59^^56^650^165
;;^UTILITY(U,$J,358.3,15802,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15802,1,3,0)
;;=3^Rheumatoid Polyneuropathy w/ Rheumatoid Arthritis of Mult Sites
;;^UTILITY(U,$J,358.3,15802,1,4,0)
;;=4^M05.59
;;^UTILITY(U,$J,358.3,15802,2)
;;=^5009976
;;^UTILITY(U,$J,358.3,15803,0)
;;=M05.711^^56^650^159
;;^UTILITY(U,$J,358.3,15803,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15803,1,3,0)
;;=3^Rheumatoid Arthritis of Right Shoulder
;;^UTILITY(U,$J,358.3,15803,1,4,0)
;;=4^M05.711
;;^UTILITY(U,$J,358.3,15803,2)
;;=^5010001
;;^UTILITY(U,$J,358.3,15804,0)
;;=M05.712^^56^650^152
;;^UTILITY(U,$J,358.3,15804,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15804,1,3,0)
;;=3^Rheumatoid Arthritis of Left Shoulder
;;^UTILITY(U,$J,358.3,15804,1,4,0)
;;=4^M05.712
;;^UTILITY(U,$J,358.3,15804,2)
;;=^5010002
;;^UTILITY(U,$J,358.3,15805,0)
;;=M05.731^^56^650^160
;;^UTILITY(U,$J,358.3,15805,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15805,1,3,0)
;;=3^Rheumatoid Arthritis of Right Wrist
;;^UTILITY(U,$J,358.3,15805,1,4,0)
;;=4^M05.731
;;^UTILITY(U,$J,358.3,15805,2)
;;=^5010007
;;^UTILITY(U,$J,358.3,15806,0)
;;=M05.732^^56^650^153
;;^UTILITY(U,$J,358.3,15806,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15806,1,3,0)
;;=3^Rheumatoid Arthritis of Left Wrist
;;^UTILITY(U,$J,358.3,15806,1,4,0)
;;=4^M05.732
;;^UTILITY(U,$J,358.3,15806,2)
;;=^5010008
;;^UTILITY(U,$J,358.3,15807,0)
;;=M05.741^^56^650^156
;;^UTILITY(U,$J,358.3,15807,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15807,1,3,0)
;;=3^Rheumatoid Arthritis of Right Hand
;;^UTILITY(U,$J,358.3,15807,1,4,0)
;;=4^M05.741
;;^UTILITY(U,$J,358.3,15807,2)
;;=^5010010
;;^UTILITY(U,$J,358.3,15808,0)
;;=M05.742^^56^650^149
;;^UTILITY(U,$J,358.3,15808,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15808,1,3,0)
;;=3^Rheumatoid Arthritis of Left Hand
;;^UTILITY(U,$J,358.3,15808,1,4,0)
;;=4^M05.742
;;^UTILITY(U,$J,358.3,15808,2)
;;=^5010011
;;^UTILITY(U,$J,358.3,15809,0)
;;=M05.751^^56^650^157
;;^UTILITY(U,$J,358.3,15809,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15809,1,3,0)
;;=3^Rheumatoid Arthritis of Right Hip
;;^UTILITY(U,$J,358.3,15809,1,4,0)
;;=4^M05.751
;;^UTILITY(U,$J,358.3,15809,2)
;;=^5010013
;;^UTILITY(U,$J,358.3,15810,0)
;;=M05.752^^56^650^150
;;^UTILITY(U,$J,358.3,15810,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15810,1,3,0)
;;=3^Rheumatoid Arthritis of Left Hip
;;^UTILITY(U,$J,358.3,15810,1,4,0)
;;=4^M05.752
;;^UTILITY(U,$J,358.3,15810,2)
;;=^5010014
;;^UTILITY(U,$J,358.3,15811,0)
;;=M05.761^^56^650^158
;;^UTILITY(U,$J,358.3,15811,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15811,1,3,0)
;;=3^Rheumatoid Arthritis of Right Knee
;;^UTILITY(U,$J,358.3,15811,1,4,0)
;;=4^M05.761
;;^UTILITY(U,$J,358.3,15811,2)
;;=^5010016
;;^UTILITY(U,$J,358.3,15812,0)
;;=M05.762^^56^650^151
;;^UTILITY(U,$J,358.3,15812,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15812,1,3,0)
;;=3^Rheumatoid Arthritis of Left Knee
;;^UTILITY(U,$J,358.3,15812,1,4,0)
;;=4^M05.762
;;^UTILITY(U,$J,358.3,15812,2)
;;=^5010017
;;^UTILITY(U,$J,358.3,15813,0)
;;=M05.771^^56^650^155
;;^UTILITY(U,$J,358.3,15813,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15813,1,3,0)
;;=3^Rheumatoid Arthritis of Right Ankle
;;^UTILITY(U,$J,358.3,15813,1,4,0)
;;=4^M05.771
;;^UTILITY(U,$J,358.3,15813,2)
;;=^5010019
;;^UTILITY(U,$J,358.3,15814,0)
;;=M05.772^^56^650^148
;;^UTILITY(U,$J,358.3,15814,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15814,1,3,0)
;;=3^Rheumatoid Arthritis of Left Ankle
;;^UTILITY(U,$J,358.3,15814,1,4,0)
;;=4^M05.772
;;^UTILITY(U,$J,358.3,15814,2)
;;=^5010020
;;^UTILITY(U,$J,358.3,15815,0)
;;=M05.79^^56^650^154
;;^UTILITY(U,$J,358.3,15815,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15815,1,3,0)
;;=3^Rheumatoid Arthritis of Multiple Sites
;;^UTILITY(U,$J,358.3,15815,1,4,0)
;;=4^M05.79
;;^UTILITY(U,$J,358.3,15815,2)
;;=^5010022
;;^UTILITY(U,$J,358.3,15816,0)
;;=M06.00^^56^650^161
;;^UTILITY(U,$J,358.3,15816,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15816,1,3,0)
;;=3^Rheumatoid Arthritis w/o Rhematoid Factor,Unspec Site
;;^UTILITY(U,$J,358.3,15816,1,4,0)
;;=4^M06.00
;;^UTILITY(U,$J,358.3,15816,2)
;;=^5010047
;;^UTILITY(U,$J,358.3,15817,0)
;;=M06.30^^56^650^164
;;^UTILITY(U,$J,358.3,15817,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15817,1,3,0)
;;=3^Rheumatoid Nodule,Unspec Site
;;^UTILITY(U,$J,358.3,15817,1,4,0)
;;=4^M06.30
;;^UTILITY(U,$J,358.3,15817,2)
;;=^5010096
;;^UTILITY(U,$J,358.3,15818,0)
;;=M06.4^^56^650^51
;;^UTILITY(U,$J,358.3,15818,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15818,1,3,0)
;;=3^Inflammatory Polyarthropathy
;;^UTILITY(U,$J,358.3,15818,1,4,0)
;;=4^M06.4
;;^UTILITY(U,$J,358.3,15818,2)
;;=^5010120
;;^UTILITY(U,$J,358.3,15819,0)
;;=M06.39^^56^650^163
;;^UTILITY(U,$J,358.3,15819,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15819,1,3,0)
;;=3^Rheumatoid Nodule,Mult Sites
;;^UTILITY(U,$J,358.3,15819,1,4,0)
;;=4^M06.39
;;^UTILITY(U,$J,358.3,15819,2)
;;=^5010119
;;^UTILITY(U,$J,358.3,15820,0)
;;=M15.0^^56^650^127
;;^UTILITY(U,$J,358.3,15820,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15820,1,3,0)
;;=3^Primary Generalized Osteoarthritis
;;^UTILITY(U,$J,358.3,15820,1,4,0)
;;=4^M15.0
;;^UTILITY(U,$J,358.3,15820,2)
;;=^5010762
;;^UTILITY(U,$J,358.3,15821,0)
;;=M06.9^^56^650^162
;;^UTILITY(U,$J,358.3,15821,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15821,1,3,0)
;;=3^Rheumatoid Arthritis,Unspec
;;^UTILITY(U,$J,358.3,15821,1,4,0)
;;=4^M06.9
;;^UTILITY(U,$J,358.3,15821,2)
;;=^5010145
;;^UTILITY(U,$J,358.3,15822,0)
;;=M16.0^^56^650^130
;;^UTILITY(U,$J,358.3,15822,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15822,1,3,0)
;;=3^Primary Osteoarthritis of Hip,Bilateral
;;^UTILITY(U,$J,358.3,15822,1,4,0)
;;=4^M16.0
;;^UTILITY(U,$J,358.3,15822,2)
;;=^5010769
;;^UTILITY(U,$J,358.3,15823,0)
;;=M16.11^^56^650^139
;;^UTILITY(U,$J,358.3,15823,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15823,1,3,0)
;;=3^Primary Osteoarthritis of Right Hip
;;^UTILITY(U,$J,358.3,15823,1,4,0)
;;=4^M16.11
;;^UTILITY(U,$J,358.3,15823,2)
;;=^5010771
;;^UTILITY(U,$J,358.3,15824,0)
;;=M16.12^^56^650^133
;;^UTILITY(U,$J,358.3,15824,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15824,1,3,0)
;;=3^Primary Osteoarthritis of Left Hip
;;^UTILITY(U,$J,358.3,15824,1,4,0)
;;=4^M16.12
;;^UTILITY(U,$J,358.3,15824,2)
;;=^5010772
;;^UTILITY(U,$J,358.3,15825,0)
;;=M17.0^^56^650^129
;;^UTILITY(U,$J,358.3,15825,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15825,1,3,0)
;;=3^Primary Osteoarthritis of Bilateral Knees
;;^UTILITY(U,$J,358.3,15825,1,4,0)
;;=4^M17.0
;;^UTILITY(U,$J,358.3,15825,2)
;;=^5010784
;;^UTILITY(U,$J,358.3,15826,0)
;;=M17.11^^56^650^140
;;^UTILITY(U,$J,358.3,15826,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15826,1,3,0)
;;=3^Primary Osteoarthritis of Right Knee
;;^UTILITY(U,$J,358.3,15826,1,4,0)
;;=4^M17.11
;;^UTILITY(U,$J,358.3,15826,2)
;;=^5010786
;;^UTILITY(U,$J,358.3,15827,0)
;;=M17.12^^56^650^134
;;^UTILITY(U,$J,358.3,15827,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15827,1,3,0)
;;=3^Primary Osteoarthritis of Left Knee
;;^UTILITY(U,$J,358.3,15827,1,4,0)
;;=4^M17.12
;;^UTILITY(U,$J,358.3,15827,2)
;;=^5010787
;;^UTILITY(U,$J,358.3,15828,0)
;;=M18.0^^56^650^128
;;^UTILITY(U,$J,358.3,15828,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15828,1,3,0)
;;=3^Primary Osteoarthritis of Bilateral 1st Carpometacarp Jts
;;^UTILITY(U,$J,358.3,15828,1,4,0)
;;=4^M18.0
;;^UTILITY(U,$J,358.3,15828,2)
;;=^5010795
;;^UTILITY(U,$J,358.3,15829,0)
;;=M18.11^^56^650^138
;;^UTILITY(U,$J,358.3,15829,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15829,1,3,0)
;;=3^Primary Osteoarthritis of Right Hand 1st Carpometacarp Jt
;;^UTILITY(U,$J,358.3,15829,1,4,0)
;;=4^M18.11
;;^UTILITY(U,$J,358.3,15829,2)
;;=^5010797
;;^UTILITY(U,$J,358.3,15830,0)
;;=M18.12^^56^650^132
;;^UTILITY(U,$J,358.3,15830,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15830,1,3,0)
;;=3^Primary Osteoarthritis of Left Hand 1st Carpometacarp Jt
;;^UTILITY(U,$J,358.3,15830,1,4,0)
;;=4^M18.12
;;^UTILITY(U,$J,358.3,15830,2)
;;=^5010798
;;^UTILITY(U,$J,358.3,15831,0)
;;=M19.011^^56^650^141
;;^UTILITY(U,$J,358.3,15831,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15831,1,3,0)
;;=3^Primary Osteoarthritis of Right Shoulder
;;^UTILITY(U,$J,358.3,15831,1,4,0)
;;=4^M19.011
;;^UTILITY(U,$J,358.3,15831,2)
;;=^5010808
;;^UTILITY(U,$J,358.3,15832,0)
;;=M19.012^^56^650^135
;;^UTILITY(U,$J,358.3,15832,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15832,1,3,0)
;;=3^Primary Osteoarthritis of Left Shoulder
;;^UTILITY(U,$J,358.3,15832,1,4,0)
;;=4^M19.012
;;^UTILITY(U,$J,358.3,15832,2)
;;=^5010809
;;^UTILITY(U,$J,358.3,15833,0)
;;=M19.031^^56^650^142
;;^UTILITY(U,$J,358.3,15833,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15833,1,3,0)
;;=3^Primary Osteoarthritis of Right Wrist
;;^UTILITY(U,$J,358.3,15833,1,4,0)
;;=4^M19.031
;;^UTILITY(U,$J,358.3,15833,2)
;;=^5010814
;;^UTILITY(U,$J,358.3,15834,0)
;;=M19.032^^56^650^136
;;^UTILITY(U,$J,358.3,15834,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15834,1,3,0)
;;=3^Primary Osteoarthritis of Left Wrist
;;^UTILITY(U,$J,358.3,15834,1,4,0)
;;=4^M19.032
;;^UTILITY(U,$J,358.3,15834,2)
;;=^5010815
;;^UTILITY(U,$J,358.3,15835,0)
;;=M19.041^^56^650^137
;;^UTILITY(U,$J,358.3,15835,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15835,1,3,0)
;;=3^Primary Osteoarthritis of Right Hand
;;^UTILITY(U,$J,358.3,15835,1,4,0)
;;=4^M19.041
;;^UTILITY(U,$J,358.3,15835,2)
;;=^5010817
;;^UTILITY(U,$J,358.3,15836,0)
;;=M19.042^^56^650^131
;;^UTILITY(U,$J,358.3,15836,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15836,1,3,0)
;;=3^Primary Osteoarthritis of Left Hand
;;^UTILITY(U,$J,358.3,15836,1,4,0)
;;=4^M19.042
;;^UTILITY(U,$J,358.3,15836,2)
;;=^5010818
;;^UTILITY(U,$J,358.3,15837,0)
;;=M19.90^^56^650^72
;;^UTILITY(U,$J,358.3,15837,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15837,1,3,0)
;;=3^Osteoarthritis,Unspec
;;^UTILITY(U,$J,358.3,15837,1,4,0)
;;=4^M19.90
;;^UTILITY(U,$J,358.3,15837,2)
;;=^5010853
;;^UTILITY(U,$J,358.3,15838,0)
;;=M25.40^^56^650^38
;;^UTILITY(U,$J,358.3,15838,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15838,1,3,0)
;;=3^Effusion,Unspec
;;^UTILITY(U,$J,358.3,15838,1,4,0)
;;=4^M25.40
;;^UTILITY(U,$J,358.3,15838,2)
;;=^5011575
;;^UTILITY(U,$J,358.3,15839,0)
;;=M45.0^^56^650^6
;;^UTILITY(U,$J,358.3,15839,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15839,1,3,0)
;;=3^Ankylosing Spondylitis of Spine,Mult Sites
;;^UTILITY(U,$J,358.3,15839,1,4,0)
;;=4^M45.0
;;^UTILITY(U,$J,358.3,15839,2)
;;=^5011960
;;^UTILITY(U,$J,358.3,15840,0)
;;=M45.2^^56^650^3
;;^UTILITY(U,$J,358.3,15840,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15840,1,3,0)
;;=3^Ankylosing Spondylitis of Cervical Region
;;^UTILITY(U,$J,358.3,15840,1,4,0)
;;=4^M45.2
;;^UTILITY(U,$J,358.3,15840,2)
;;=^5011962
;;^UTILITY(U,$J,358.3,15841,0)
;;=M45.4^^56^650^7
;;^UTILITY(U,$J,358.3,15841,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15841,1,3,0)
;;=3^Ankylosing Spondylitis of Thoracic Region
;;^UTILITY(U,$J,358.3,15841,1,4,0)
;;=4^M45.4
;;^UTILITY(U,$J,358.3,15841,2)
;;=^5011964
;;^UTILITY(U,$J,358.3,15842,0)
;;=M45.7^^56^650^4
;;^UTILITY(U,$J,358.3,15842,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15842,1,3,0)
;;=3^Ankylosing Spondylitis of Lumbosacral Region
;;^UTILITY(U,$J,358.3,15842,1,4,0)
;;=4^M45.7
;;^UTILITY(U,$J,358.3,15842,2)
;;=^5011967
;;^UTILITY(U,$J,358.3,15843,0)
;;=M45.8^^56^650^5
;;^UTILITY(U,$J,358.3,15843,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15843,1,3,0)
;;=3^Ankylosing Spondylitis of Sacral/Sacrococcygeal Region
;;^UTILITY(U,$J,358.3,15843,1,4,0)
;;=4^M45.8
;;^UTILITY(U,$J,358.3,15843,2)
;;=^5011968
;;^UTILITY(U,$J,358.3,15844,0)
;;=M47.22^^56^650^180
;;^UTILITY(U,$J,358.3,15844,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15844,1,3,0)
;;=3^Sponylosis w/ Radiculopathy,Cervical Region NEC
;;^UTILITY(U,$J,358.3,15844,1,4,0)
;;=4^M47.22
;;^UTILITY(U,$J,358.3,15844,2)
;;=^5012061
;;^UTILITY(U,$J,358.3,15845,0)
;;=M47.24^^56^650^182
;;^UTILITY(U,$J,358.3,15845,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15845,1,3,0)
;;=3^Sponylosis w/ Radiculopathy,Thoracic Region NEC
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HIBDEI06I 19815 printed Dec 13, 2024@01:42:36 Page 2
IBDEI06I ; ; 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,15778,0)
+2 ;;=F42.8^^56^648^18
+3 ;;^UTILITY(U,$J,358.3,15778,1,0)
+4 ;;=^358.31IA^4^2
+5 ;;^UTILITY(U,$J,358.3,15778,1,3,0)
+6 ;;=3^Obsessive-Compulsive Disorder,Other
+7 ;;^UTILITY(U,$J,358.3,15778,1,4,0)
+8 ;;=4^F42.8
+9 ;;^UTILITY(U,$J,358.3,15778,2)
+10 ;;=^5138447
+11 ;;^UTILITY(U,$J,358.3,15779,0)
+12 ;;=F50.89^^56^648^10
+13 ;;^UTILITY(U,$J,358.3,15779,1,0)
+14 ;;=^358.31IA^4^2
+15 ;;^UTILITY(U,$J,358.3,15779,1,3,0)
+16 ;;=3^Eating Disorder,Oth Specified
+17 ;;^UTILITY(U,$J,358.3,15779,1,4,0)
+18 ;;=4^F50.89
+19 ;;^UTILITY(U,$J,358.3,15779,2)
+20 ;;=^5138449
+21 ;;^UTILITY(U,$J,358.3,15780,0)
+22 ;;=R41.0^^56^648^9
+23 ;;^UTILITY(U,$J,358.3,15780,1,0)
+24 ;;=^358.31IA^4^2
+25 ;;^UTILITY(U,$J,358.3,15780,1,3,0)
+26 ;;=3^Delirium,Disorientation NOS
+27 ;;^UTILITY(U,$J,358.3,15780,1,4,0)
+28 ;;=4^R41.0
+29 ;;^UTILITY(U,$J,358.3,15780,2)
+30 ;;=^5019436
+31 ;;^UTILITY(U,$J,358.3,15781,0)
+32 ;;=R56.00^^56^649^6
+33 ;;^UTILITY(U,$J,358.3,15781,1,0)
+34 ;;=^358.31IA^4^2
+35 ;;^UTILITY(U,$J,358.3,15781,1,3,0)
+36 ;;=3^Simple Febrile Convulsions
+37 ;;^UTILITY(U,$J,358.3,15781,1,4,0)
+38 ;;=4^R56.00
+39 ;;^UTILITY(U,$J,358.3,15781,2)
+40 ;;=^5019522
+41 ;;^UTILITY(U,$J,358.3,15782,0)
+42 ;;=R56.9^^56^649^4
+43 ;;^UTILITY(U,$J,358.3,15782,1,0)
+44 ;;=^358.31IA^4^2
+45 ;;^UTILITY(U,$J,358.3,15782,1,3,0)
+46 ;;=3^Convulsions,Unspec
+47 ;;^UTILITY(U,$J,358.3,15782,1,4,0)
+48 ;;=4^R56.9
+49 ;;^UTILITY(U,$J,358.3,15782,2)
+50 ;;=^5019524
+51 ;;^UTILITY(U,$J,358.3,15783,0)
+52 ;;=R25.0^^56^649^1
+53 ;;^UTILITY(U,$J,358.3,15783,1,0)
+54 ;;=^358.31IA^4^2
+55 ;;^UTILITY(U,$J,358.3,15783,1,3,0)
+56 ;;=3^Abnormal Head Movements
+57 ;;^UTILITY(U,$J,358.3,15783,1,4,0)
+58 ;;=4^R25.0
+59 ;;^UTILITY(U,$J,358.3,15783,2)
+60 ;;=^5019299
+61 ;;^UTILITY(U,$J,358.3,15784,0)
+62 ;;=R25.1^^56^649^7
+63 ;;^UTILITY(U,$J,358.3,15784,1,0)
+64 ;;=^358.31IA^4^2
+65 ;;^UTILITY(U,$J,358.3,15784,1,3,0)
+66 ;;=3^Tremor,Unspec
+67 ;;^UTILITY(U,$J,358.3,15784,1,4,0)
+68 ;;=4^R25.1
+69 ;;^UTILITY(U,$J,358.3,15784,2)
+70 ;;=^5019300
+71 ;;^UTILITY(U,$J,358.3,15785,0)
+72 ;;=R25.9^^56^649^3
+73 ;;^UTILITY(U,$J,358.3,15785,1,0)
+74 ;;=^358.31IA^4^2
+75 ;;^UTILITY(U,$J,358.3,15785,1,3,0)
+76 ;;=3^Abnormal Involuntary Movements,Unspec
+77 ;;^UTILITY(U,$J,358.3,15785,1,4,0)
+78 ;;=4^R25.9
+79 ;;^UTILITY(U,$J,358.3,15785,2)
+80 ;;=^5019303
+81 ;;^UTILITY(U,$J,358.3,15786,0)
+82 ;;=R25.3^^56^649^5
+83 ;;^UTILITY(U,$J,358.3,15786,1,0)
+84 ;;=^358.31IA^4^2
+85 ;;^UTILITY(U,$J,358.3,15786,1,3,0)
+86 ;;=3^Fasciculation/Twitching
+87 ;;^UTILITY(U,$J,358.3,15786,1,4,0)
+88 ;;=4^R25.3
+89 ;;^UTILITY(U,$J,358.3,15786,2)
+90 ;;=^44985
+91 ;;^UTILITY(U,$J,358.3,15787,0)
+92 ;;=R25.8^^56^649^2
+93 ;;^UTILITY(U,$J,358.3,15787,1,0)
+94 ;;=^358.31IA^4^2
+95 ;;^UTILITY(U,$J,358.3,15787,1,3,0)
+96 ;;=3^Abnormal Involuntary Movements,Other
+97 ;;^UTILITY(U,$J,358.3,15787,1,4,0)
+98 ;;=4^R25.8
+99 ;;^UTILITY(U,$J,358.3,15787,2)
+100 ;;=^5019302
+101 ;;^UTILITY(U,$J,358.3,15788,0)
+102 ;;=M02.30^^56^650^147
+103 ;;^UTILITY(U,$J,358.3,15788,1,0)
+104 ;;=^358.31IA^4^2
+105 ;;^UTILITY(U,$J,358.3,15788,1,3,0)
+106 ;;=3^Reiter's Disease,Unspec Site
+107 ;;^UTILITY(U,$J,358.3,15788,1,4,0)
+108 ;;=4^M02.30
+109 ;;^UTILITY(U,$J,358.3,15788,2)
+110 ;;=^5009790
+111 ;;^UTILITY(U,$J,358.3,15789,0)
+112 ;;=M10.9^^56^650^41
+113 ;;^UTILITY(U,$J,358.3,15789,1,0)
+114 ;;=^358.31IA^4^2
+115 ;;^UTILITY(U,$J,358.3,15789,1,3,0)
+116 ;;=3^Gout,Unspec
+117 ;;^UTILITY(U,$J,358.3,15789,1,4,0)
+118 ;;=4^M10.9
+119 ;;^UTILITY(U,$J,358.3,15789,2)
+120 ;;=^5010404
+121 ;;^UTILITY(U,$J,358.3,15790,0)
+122 ;;=G90.59^^56^650^35
+123 ;;^UTILITY(U,$J,358.3,15790,1,0)
+124 ;;=^358.31IA^4^2
+125 ;;^UTILITY(U,$J,358.3,15790,1,3,0)
+126 ;;=3^Complex Regional Pain Syndrome I,Unspec
+127 ;;^UTILITY(U,$J,358.3,15790,1,4,0)
+128 ;;=4^G90.59
+129 ;;^UTILITY(U,$J,358.3,15790,2)
+130 ;;=^5004171
+131 ;;^UTILITY(U,$J,358.3,15791,0)
+132 ;;=G56.01^^56^650^13
+133 ;;^UTILITY(U,$J,358.3,15791,1,0)
+134 ;;=^358.31IA^4^2
+135 ;;^UTILITY(U,$J,358.3,15791,1,3,0)
+136 ;;=3^Carpal Tunnel Syndrome,Right Upper Limb
+137 ;;^UTILITY(U,$J,358.3,15791,1,4,0)
+138 ;;=4^G56.01
+139 ;;^UTILITY(U,$J,358.3,15791,2)
+140 ;;=^5004018
+141 ;;^UTILITY(U,$J,358.3,15792,0)
+142 ;;=G56.02^^56^650^12
+143 ;;^UTILITY(U,$J,358.3,15792,1,0)
+144 ;;=^358.31IA^4^2
+145 ;;^UTILITY(U,$J,358.3,15792,1,3,0)
+146 ;;=3^Carpal Tunnel Syndrome,Left Upper Limb
+147 ;;^UTILITY(U,$J,358.3,15792,1,4,0)
+148 ;;=4^G56.02
+149 ;;^UTILITY(U,$J,358.3,15792,2)
+150 ;;=^5004019
+151 ;;^UTILITY(U,$J,358.3,15793,0)
+152 ;;=G56.21^^56^650^60
+153 ;;^UTILITY(U,$J,358.3,15793,1,0)
+154 ;;=^358.31IA^4^2
+155 ;;^UTILITY(U,$J,358.3,15793,1,3,0)
+156 ;;=3^Lesion of Ulnar Nerve,Right Upper Limb
+157 ;;^UTILITY(U,$J,358.3,15793,1,4,0)
+158 ;;=4^G56.21
+159 ;;^UTILITY(U,$J,358.3,15793,2)
+160 ;;=^5004024
+161 ;;^UTILITY(U,$J,358.3,15794,0)
+162 ;;=G56.22^^56^650^59
+163 ;;^UTILITY(U,$J,358.3,15794,1,0)
+164 ;;=^358.31IA^4^2
+165 ;;^UTILITY(U,$J,358.3,15794,1,3,0)
+166 ;;=3^Lesion of Ulnar Nerve,Left Upper Limb
+167 ;;^UTILITY(U,$J,358.3,15794,1,4,0)
+168 ;;=4^G56.22
+169 ;;^UTILITY(U,$J,358.3,15794,2)
+170 ;;=^5004025
+171 ;;^UTILITY(U,$J,358.3,15795,0)
+172 ;;=L40.52^^56^650^143
+173 ;;^UTILITY(U,$J,358.3,15795,1,0)
+174 ;;=^358.31IA^4^2
+175 ;;^UTILITY(U,$J,358.3,15795,1,3,0)
+176 ;;=3^Psoriatic Arthritis Mutilans
+177 ;;^UTILITY(U,$J,358.3,15795,1,4,0)
+178 ;;=4^L40.52
+179 ;;^UTILITY(U,$J,358.3,15795,2)
+180 ;;=^5009167
+181 ;;^UTILITY(U,$J,358.3,15796,0)
+182 ;;=L40.53^^56^650^144
+183 ;;^UTILITY(U,$J,358.3,15796,1,0)
+184 ;;=^358.31IA^4^2
+185 ;;^UTILITY(U,$J,358.3,15796,1,3,0)
+186 ;;=3^Psoriatic Spondylitis
+187 ;;^UTILITY(U,$J,358.3,15796,1,4,0)
+188 ;;=4^L40.53
+189 ;;^UTILITY(U,$J,358.3,15796,2)
+190 ;;=^5009168
+191 ;;^UTILITY(U,$J,358.3,15797,0)
+192 ;;=M32.9^^56^650^187
+193 ;;^UTILITY(U,$J,358.3,15797,1,0)
+194 ;;=^358.31IA^4^2
+195 ;;^UTILITY(U,$J,358.3,15797,1,3,0)
+196 ;;=3^Systemic Lupus Erythematosus,Unspec
+197 ;;^UTILITY(U,$J,358.3,15797,1,4,0)
+198 ;;=4^M32.9
+199 ;;^UTILITY(U,$J,358.3,15797,2)
+200 ;;=^5011761
+201 ;;^UTILITY(U,$J,358.3,15798,0)
+202 ;;=M32.0^^56^650^183
+203 ;;^UTILITY(U,$J,358.3,15798,1,0)
+204 ;;=^358.31IA^4^2
+205 ;;^UTILITY(U,$J,358.3,15798,1,3,0)
+206 ;;=3^Systemic Lupus Erythematosus,Drug-Induced
+207 ;;^UTILITY(U,$J,358.3,15798,1,4,0)
+208 ;;=4^M32.0
+209 ;;^UTILITY(U,$J,358.3,15798,2)
+210 ;;=^5011752
+211 ;;^UTILITY(U,$J,358.3,15799,0)
+212 ;;=M32.13^^56^650^185
+213 ;;^UTILITY(U,$J,358.3,15799,1,0)
+214 ;;=^358.31IA^4^2
+215 ;;^UTILITY(U,$J,358.3,15799,1,3,0)
+216 ;;=3^Systemic Lupus Erythematosus,Lung Involvement
+217 ;;^UTILITY(U,$J,358.3,15799,1,4,0)
+218 ;;=4^M32.13
+219 ;;^UTILITY(U,$J,358.3,15799,2)
+220 ;;=^5011756
+221 ;;^UTILITY(U,$J,358.3,15800,0)
+222 ;;=M32.14^^56^650^184
+223 ;;^UTILITY(U,$J,358.3,15800,1,0)
+224 ;;=^358.31IA^4^2
+225 ;;^UTILITY(U,$J,358.3,15800,1,3,0)
+226 ;;=3^Systemic Lupus Erythematosus,Glomerular Disease
+227 ;;^UTILITY(U,$J,358.3,15800,1,4,0)
+228 ;;=4^M32.14
+229 ;;^UTILITY(U,$J,358.3,15800,2)
+230 ;;=^5011757
+231 ;;^UTILITY(U,$J,358.3,15801,0)
+232 ;;=M32.12^^56^650^186
+233 ;;^UTILITY(U,$J,358.3,15801,1,0)
+234 ;;=^358.31IA^4^2
+235 ;;^UTILITY(U,$J,358.3,15801,1,3,0)
+236 ;;=3^Systemic Lupus Erythematosus,Pericarditis
+237 ;;^UTILITY(U,$J,358.3,15801,1,4,0)
+238 ;;=4^M32.12
+239 ;;^UTILITY(U,$J,358.3,15801,2)
+240 ;;=^5011755
+241 ;;^UTILITY(U,$J,358.3,15802,0)
+242 ;;=M05.59^^56^650^165
+243 ;;^UTILITY(U,$J,358.3,15802,1,0)
+244 ;;=^358.31IA^4^2
+245 ;;^UTILITY(U,$J,358.3,15802,1,3,0)
+246 ;;=3^Rheumatoid Polyneuropathy w/ Rheumatoid Arthritis of Mult Sites
+247 ;;^UTILITY(U,$J,358.3,15802,1,4,0)
+248 ;;=4^M05.59
+249 ;;^UTILITY(U,$J,358.3,15802,2)
+250 ;;=^5009976
+251 ;;^UTILITY(U,$J,358.3,15803,0)
+252 ;;=M05.711^^56^650^159
+253 ;;^UTILITY(U,$J,358.3,15803,1,0)
+254 ;;=^358.31IA^4^2
+255 ;;^UTILITY(U,$J,358.3,15803,1,3,0)
+256 ;;=3^Rheumatoid Arthritis of Right Shoulder
+257 ;;^UTILITY(U,$J,358.3,15803,1,4,0)
+258 ;;=4^M05.711
+259 ;;^UTILITY(U,$J,358.3,15803,2)
+260 ;;=^5010001
+261 ;;^UTILITY(U,$J,358.3,15804,0)
+262 ;;=M05.712^^56^650^152
+263 ;;^UTILITY(U,$J,358.3,15804,1,0)
+264 ;;=^358.31IA^4^2
+265 ;;^UTILITY(U,$J,358.3,15804,1,3,0)
+266 ;;=3^Rheumatoid Arthritis of Left Shoulder
+267 ;;^UTILITY(U,$J,358.3,15804,1,4,0)
+268 ;;=4^M05.712
+269 ;;^UTILITY(U,$J,358.3,15804,2)
+270 ;;=^5010002
+271 ;;^UTILITY(U,$J,358.3,15805,0)
+272 ;;=M05.731^^56^650^160
+273 ;;^UTILITY(U,$J,358.3,15805,1,0)
+274 ;;=^358.31IA^4^2
+275 ;;^UTILITY(U,$J,358.3,15805,1,3,0)
+276 ;;=3^Rheumatoid Arthritis of Right Wrist
+277 ;;^UTILITY(U,$J,358.3,15805,1,4,0)
+278 ;;=4^M05.731
+279 ;;^UTILITY(U,$J,358.3,15805,2)
+280 ;;=^5010007
+281 ;;^UTILITY(U,$J,358.3,15806,0)
+282 ;;=M05.732^^56^650^153
+283 ;;^UTILITY(U,$J,358.3,15806,1,0)
+284 ;;=^358.31IA^4^2
+285 ;;^UTILITY(U,$J,358.3,15806,1,3,0)
+286 ;;=3^Rheumatoid Arthritis of Left Wrist
+287 ;;^UTILITY(U,$J,358.3,15806,1,4,0)
+288 ;;=4^M05.732
+289 ;;^UTILITY(U,$J,358.3,15806,2)
+290 ;;=^5010008
+291 ;;^UTILITY(U,$J,358.3,15807,0)
+292 ;;=M05.741^^56^650^156
+293 ;;^UTILITY(U,$J,358.3,15807,1,0)
+294 ;;=^358.31IA^4^2
+295 ;;^UTILITY(U,$J,358.3,15807,1,3,0)
+296 ;;=3^Rheumatoid Arthritis of Right Hand
+297 ;;^UTILITY(U,$J,358.3,15807,1,4,0)
+298 ;;=4^M05.741
+299 ;;^UTILITY(U,$J,358.3,15807,2)
+300 ;;=^5010010
+301 ;;^UTILITY(U,$J,358.3,15808,0)
+302 ;;=M05.742^^56^650^149
+303 ;;^UTILITY(U,$J,358.3,15808,1,0)
+304 ;;=^358.31IA^4^2
+305 ;;^UTILITY(U,$J,358.3,15808,1,3,0)
+306 ;;=3^Rheumatoid Arthritis of Left Hand
+307 ;;^UTILITY(U,$J,358.3,15808,1,4,0)
+308 ;;=4^M05.742
+309 ;;^UTILITY(U,$J,358.3,15808,2)
+310 ;;=^5010011
+311 ;;^UTILITY(U,$J,358.3,15809,0)
+312 ;;=M05.751^^56^650^157
+313 ;;^UTILITY(U,$J,358.3,15809,1,0)
+314 ;;=^358.31IA^4^2
+315 ;;^UTILITY(U,$J,358.3,15809,1,3,0)
+316 ;;=3^Rheumatoid Arthritis of Right Hip
+317 ;;^UTILITY(U,$J,358.3,15809,1,4,0)
+318 ;;=4^M05.751
+319 ;;^UTILITY(U,$J,358.3,15809,2)
+320 ;;=^5010013
+321 ;;^UTILITY(U,$J,358.3,15810,0)
+322 ;;=M05.752^^56^650^150
+323 ;;^UTILITY(U,$J,358.3,15810,1,0)
+324 ;;=^358.31IA^4^2
+325 ;;^UTILITY(U,$J,358.3,15810,1,3,0)
+326 ;;=3^Rheumatoid Arthritis of Left Hip
+327 ;;^UTILITY(U,$J,358.3,15810,1,4,0)
+328 ;;=4^M05.752
+329 ;;^UTILITY(U,$J,358.3,15810,2)
+330 ;;=^5010014
+331 ;;^UTILITY(U,$J,358.3,15811,0)
+332 ;;=M05.761^^56^650^158
+333 ;;^UTILITY(U,$J,358.3,15811,1,0)
+334 ;;=^358.31IA^4^2
+335 ;;^UTILITY(U,$J,358.3,15811,1,3,0)
+336 ;;=3^Rheumatoid Arthritis of Right Knee
+337 ;;^UTILITY(U,$J,358.3,15811,1,4,0)
+338 ;;=4^M05.761
+339 ;;^UTILITY(U,$J,358.3,15811,2)
+340 ;;=^5010016
+341 ;;^UTILITY(U,$J,358.3,15812,0)
+342 ;;=M05.762^^56^650^151
+343 ;;^UTILITY(U,$J,358.3,15812,1,0)
+344 ;;=^358.31IA^4^2
+345 ;;^UTILITY(U,$J,358.3,15812,1,3,0)
+346 ;;=3^Rheumatoid Arthritis of Left Knee
+347 ;;^UTILITY(U,$J,358.3,15812,1,4,0)
+348 ;;=4^M05.762
+349 ;;^UTILITY(U,$J,358.3,15812,2)
+350 ;;=^5010017
+351 ;;^UTILITY(U,$J,358.3,15813,0)
+352 ;;=M05.771^^56^650^155
+353 ;;^UTILITY(U,$J,358.3,15813,1,0)
+354 ;;=^358.31IA^4^2
+355 ;;^UTILITY(U,$J,358.3,15813,1,3,0)
+356 ;;=3^Rheumatoid Arthritis of Right Ankle
+357 ;;^UTILITY(U,$J,358.3,15813,1,4,0)
+358 ;;=4^M05.771
+359 ;;^UTILITY(U,$J,358.3,15813,2)
+360 ;;=^5010019
+361 ;;^UTILITY(U,$J,358.3,15814,0)
+362 ;;=M05.772^^56^650^148
+363 ;;^UTILITY(U,$J,358.3,15814,1,0)
+364 ;;=^358.31IA^4^2
+365 ;;^UTILITY(U,$J,358.3,15814,1,3,0)
+366 ;;=3^Rheumatoid Arthritis of Left Ankle
+367 ;;^UTILITY(U,$J,358.3,15814,1,4,0)
+368 ;;=4^M05.772
+369 ;;^UTILITY(U,$J,358.3,15814,2)
+370 ;;=^5010020
+371 ;;^UTILITY(U,$J,358.3,15815,0)
+372 ;;=M05.79^^56^650^154
+373 ;;^UTILITY(U,$J,358.3,15815,1,0)
+374 ;;=^358.31IA^4^2
+375 ;;^UTILITY(U,$J,358.3,15815,1,3,0)
+376 ;;=3^Rheumatoid Arthritis of Multiple Sites
+377 ;;^UTILITY(U,$J,358.3,15815,1,4,0)
+378 ;;=4^M05.79
+379 ;;^UTILITY(U,$J,358.3,15815,2)
+380 ;;=^5010022
+381 ;;^UTILITY(U,$J,358.3,15816,0)
+382 ;;=M06.00^^56^650^161
+383 ;;^UTILITY(U,$J,358.3,15816,1,0)
+384 ;;=^358.31IA^4^2
+385 ;;^UTILITY(U,$J,358.3,15816,1,3,0)
+386 ;;=3^Rheumatoid Arthritis w/o Rhematoid Factor,Unspec Site
+387 ;;^UTILITY(U,$J,358.3,15816,1,4,0)
+388 ;;=4^M06.00
+389 ;;^UTILITY(U,$J,358.3,15816,2)
+390 ;;=^5010047
+391 ;;^UTILITY(U,$J,358.3,15817,0)
+392 ;;=M06.30^^56^650^164
+393 ;;^UTILITY(U,$J,358.3,15817,1,0)
+394 ;;=^358.31IA^4^2
+395 ;;^UTILITY(U,$J,358.3,15817,1,3,0)
+396 ;;=3^Rheumatoid Nodule,Unspec Site
+397 ;;^UTILITY(U,$J,358.3,15817,1,4,0)
+398 ;;=4^M06.30
+399 ;;^UTILITY(U,$J,358.3,15817,2)
+400 ;;=^5010096
+401 ;;^UTILITY(U,$J,358.3,15818,0)
+402 ;;=M06.4^^56^650^51
+403 ;;^UTILITY(U,$J,358.3,15818,1,0)
+404 ;;=^358.31IA^4^2
+405 ;;^UTILITY(U,$J,358.3,15818,1,3,0)
+406 ;;=3^Inflammatory Polyarthropathy
+407 ;;^UTILITY(U,$J,358.3,15818,1,4,0)
+408 ;;=4^M06.4
+409 ;;^UTILITY(U,$J,358.3,15818,2)
+410 ;;=^5010120
+411 ;;^UTILITY(U,$J,358.3,15819,0)
+412 ;;=M06.39^^56^650^163
+413 ;;^UTILITY(U,$J,358.3,15819,1,0)
+414 ;;=^358.31IA^4^2
+415 ;;^UTILITY(U,$J,358.3,15819,1,3,0)
+416 ;;=3^Rheumatoid Nodule,Mult Sites
+417 ;;^UTILITY(U,$J,358.3,15819,1,4,0)
+418 ;;=4^M06.39
+419 ;;^UTILITY(U,$J,358.3,15819,2)
+420 ;;=^5010119
+421 ;;^UTILITY(U,$J,358.3,15820,0)
+422 ;;=M15.0^^56^650^127
+423 ;;^UTILITY(U,$J,358.3,15820,1,0)
+424 ;;=^358.31IA^4^2
+425 ;;^UTILITY(U,$J,358.3,15820,1,3,0)
+426 ;;=3^Primary Generalized Osteoarthritis
+427 ;;^UTILITY(U,$J,358.3,15820,1,4,0)
+428 ;;=4^M15.0
+429 ;;^UTILITY(U,$J,358.3,15820,2)
+430 ;;=^5010762
+431 ;;^UTILITY(U,$J,358.3,15821,0)
+432 ;;=M06.9^^56^650^162
+433 ;;^UTILITY(U,$J,358.3,15821,1,0)
+434 ;;=^358.31IA^4^2
+435 ;;^UTILITY(U,$J,358.3,15821,1,3,0)
+436 ;;=3^Rheumatoid Arthritis,Unspec
+437 ;;^UTILITY(U,$J,358.3,15821,1,4,0)
+438 ;;=4^M06.9
+439 ;;^UTILITY(U,$J,358.3,15821,2)
+440 ;;=^5010145
+441 ;;^UTILITY(U,$J,358.3,15822,0)
+442 ;;=M16.0^^56^650^130
+443 ;;^UTILITY(U,$J,358.3,15822,1,0)
+444 ;;=^358.31IA^4^2
+445 ;;^UTILITY(U,$J,358.3,15822,1,3,0)
+446 ;;=3^Primary Osteoarthritis of Hip,Bilateral
+447 ;;^UTILITY(U,$J,358.3,15822,1,4,0)
+448 ;;=4^M16.0
+449 ;;^UTILITY(U,$J,358.3,15822,2)
+450 ;;=^5010769
+451 ;;^UTILITY(U,$J,358.3,15823,0)
+452 ;;=M16.11^^56^650^139
+453 ;;^UTILITY(U,$J,358.3,15823,1,0)
+454 ;;=^358.31IA^4^2
+455 ;;^UTILITY(U,$J,358.3,15823,1,3,0)
+456 ;;=3^Primary Osteoarthritis of Right Hip
+457 ;;^UTILITY(U,$J,358.3,15823,1,4,0)
+458 ;;=4^M16.11
+459 ;;^UTILITY(U,$J,358.3,15823,2)
+460 ;;=^5010771
+461 ;;^UTILITY(U,$J,358.3,15824,0)
+462 ;;=M16.12^^56^650^133
+463 ;;^UTILITY(U,$J,358.3,15824,1,0)
+464 ;;=^358.31IA^4^2
+465 ;;^UTILITY(U,$J,358.3,15824,1,3,0)
+466 ;;=3^Primary Osteoarthritis of Left Hip
+467 ;;^UTILITY(U,$J,358.3,15824,1,4,0)
+468 ;;=4^M16.12
+469 ;;^UTILITY(U,$J,358.3,15824,2)
+470 ;;=^5010772
+471 ;;^UTILITY(U,$J,358.3,15825,0)
+472 ;;=M17.0^^56^650^129
+473 ;;^UTILITY(U,$J,358.3,15825,1,0)
+474 ;;=^358.31IA^4^2
+475 ;;^UTILITY(U,$J,358.3,15825,1,3,0)
+476 ;;=3^Primary Osteoarthritis of Bilateral Knees
+477 ;;^UTILITY(U,$J,358.3,15825,1,4,0)
+478 ;;=4^M17.0
+479 ;;^UTILITY(U,$J,358.3,15825,2)
+480 ;;=^5010784
+481 ;;^UTILITY(U,$J,358.3,15826,0)
+482 ;;=M17.11^^56^650^140
+483 ;;^UTILITY(U,$J,358.3,15826,1,0)
+484 ;;=^358.31IA^4^2
+485 ;;^UTILITY(U,$J,358.3,15826,1,3,0)
+486 ;;=3^Primary Osteoarthritis of Right Knee
+487 ;;^UTILITY(U,$J,358.3,15826,1,4,0)
+488 ;;=4^M17.11
+489 ;;^UTILITY(U,$J,358.3,15826,2)
+490 ;;=^5010786
+491 ;;^UTILITY(U,$J,358.3,15827,0)
+492 ;;=M17.12^^56^650^134
+493 ;;^UTILITY(U,$J,358.3,15827,1,0)
+494 ;;=^358.31IA^4^2
+495 ;;^UTILITY(U,$J,358.3,15827,1,3,0)
+496 ;;=3^Primary Osteoarthritis of Left Knee
+497 ;;^UTILITY(U,$J,358.3,15827,1,4,0)
+498 ;;=4^M17.12
+499 ;;^UTILITY(U,$J,358.3,15827,2)
+500 ;;=^5010787
+501 ;;^UTILITY(U,$J,358.3,15828,0)
+502 ;;=M18.0^^56^650^128
+503 ;;^UTILITY(U,$J,358.3,15828,1,0)
+504 ;;=^358.31IA^4^2
+505 ;;^UTILITY(U,$J,358.3,15828,1,3,0)
+506 ;;=3^Primary Osteoarthritis of Bilateral 1st Carpometacarp Jts
+507 ;;^UTILITY(U,$J,358.3,15828,1,4,0)
+508 ;;=4^M18.0
+509 ;;^UTILITY(U,$J,358.3,15828,2)
+510 ;;=^5010795
+511 ;;^UTILITY(U,$J,358.3,15829,0)
+512 ;;=M18.11^^56^650^138
+513 ;;^UTILITY(U,$J,358.3,15829,1,0)
+514 ;;=^358.31IA^4^2
+515 ;;^UTILITY(U,$J,358.3,15829,1,3,0)
+516 ;;=3^Primary Osteoarthritis of Right Hand 1st Carpometacarp Jt
+517 ;;^UTILITY(U,$J,358.3,15829,1,4,0)
+518 ;;=4^M18.11
+519 ;;^UTILITY(U,$J,358.3,15829,2)
+520 ;;=^5010797
+521 ;;^UTILITY(U,$J,358.3,15830,0)
+522 ;;=M18.12^^56^650^132
+523 ;;^UTILITY(U,$J,358.3,15830,1,0)
+524 ;;=^358.31IA^4^2
+525 ;;^UTILITY(U,$J,358.3,15830,1,3,0)
+526 ;;=3^Primary Osteoarthritis of Left Hand 1st Carpometacarp Jt
+527 ;;^UTILITY(U,$J,358.3,15830,1,4,0)
+528 ;;=4^M18.12
+529 ;;^UTILITY(U,$J,358.3,15830,2)
+530 ;;=^5010798
+531 ;;^UTILITY(U,$J,358.3,15831,0)
+532 ;;=M19.011^^56^650^141
+533 ;;^UTILITY(U,$J,358.3,15831,1,0)
+534 ;;=^358.31IA^4^2
+535 ;;^UTILITY(U,$J,358.3,15831,1,3,0)
+536 ;;=3^Primary Osteoarthritis of Right Shoulder
+537 ;;^UTILITY(U,$J,358.3,15831,1,4,0)
+538 ;;=4^M19.011
+539 ;;^UTILITY(U,$J,358.3,15831,2)
+540 ;;=^5010808
+541 ;;^UTILITY(U,$J,358.3,15832,0)
+542 ;;=M19.012^^56^650^135
+543 ;;^UTILITY(U,$J,358.3,15832,1,0)
+544 ;;=^358.31IA^4^2
+545 ;;^UTILITY(U,$J,358.3,15832,1,3,0)
+546 ;;=3^Primary Osteoarthritis of Left Shoulder
+547 ;;^UTILITY(U,$J,358.3,15832,1,4,0)
+548 ;;=4^M19.012
+549 ;;^UTILITY(U,$J,358.3,15832,2)
+550 ;;=^5010809
+551 ;;^UTILITY(U,$J,358.3,15833,0)
+552 ;;=M19.031^^56^650^142
+553 ;;^UTILITY(U,$J,358.3,15833,1,0)
+554 ;;=^358.31IA^4^2
+555 ;;^UTILITY(U,$J,358.3,15833,1,3,0)
+556 ;;=3^Primary Osteoarthritis of Right Wrist
+557 ;;^UTILITY(U,$J,358.3,15833,1,4,0)
+558 ;;=4^M19.031
+559 ;;^UTILITY(U,$J,358.3,15833,2)
+560 ;;=^5010814
+561 ;;^UTILITY(U,$J,358.3,15834,0)
+562 ;;=M19.032^^56^650^136
+563 ;;^UTILITY(U,$J,358.3,15834,1,0)
+564 ;;=^358.31IA^4^2
+565 ;;^UTILITY(U,$J,358.3,15834,1,3,0)
+566 ;;=3^Primary Osteoarthritis of Left Wrist
+567 ;;^UTILITY(U,$J,358.3,15834,1,4,0)
+568 ;;=4^M19.032
+569 ;;^UTILITY(U,$J,358.3,15834,2)
+570 ;;=^5010815
+571 ;;^UTILITY(U,$J,358.3,15835,0)
+572 ;;=M19.041^^56^650^137
+573 ;;^UTILITY(U,$J,358.3,15835,1,0)
+574 ;;=^358.31IA^4^2
+575 ;;^UTILITY(U,$J,358.3,15835,1,3,0)
+576 ;;=3^Primary Osteoarthritis of Right Hand
+577 ;;^UTILITY(U,$J,358.3,15835,1,4,0)
+578 ;;=4^M19.041
+579 ;;^UTILITY(U,$J,358.3,15835,2)
+580 ;;=^5010817
+581 ;;^UTILITY(U,$J,358.3,15836,0)
+582 ;;=M19.042^^56^650^131
+583 ;;^UTILITY(U,$J,358.3,15836,1,0)
+584 ;;=^358.31IA^4^2
+585 ;;^UTILITY(U,$J,358.3,15836,1,3,0)
+586 ;;=3^Primary Osteoarthritis of Left Hand
+587 ;;^UTILITY(U,$J,358.3,15836,1,4,0)
+588 ;;=4^M19.042
+589 ;;^UTILITY(U,$J,358.3,15836,2)
+590 ;;=^5010818
+591 ;;^UTILITY(U,$J,358.3,15837,0)
+592 ;;=M19.90^^56^650^72
+593 ;;^UTILITY(U,$J,358.3,15837,1,0)
+594 ;;=^358.31IA^4^2
+595 ;;^UTILITY(U,$J,358.3,15837,1,3,0)
+596 ;;=3^Osteoarthritis,Unspec
+597 ;;^UTILITY(U,$J,358.3,15837,1,4,0)
+598 ;;=4^M19.90
+599 ;;^UTILITY(U,$J,358.3,15837,2)
+600 ;;=^5010853
+601 ;;^UTILITY(U,$J,358.3,15838,0)
+602 ;;=M25.40^^56^650^38
+603 ;;^UTILITY(U,$J,358.3,15838,1,0)
+604 ;;=^358.31IA^4^2
+605 ;;^UTILITY(U,$J,358.3,15838,1,3,0)
+606 ;;=3^Effusion,Unspec
+607 ;;^UTILITY(U,$J,358.3,15838,1,4,0)
+608 ;;=4^M25.40
+609 ;;^UTILITY(U,$J,358.3,15838,2)
+610 ;;=^5011575
+611 ;;^UTILITY(U,$J,358.3,15839,0)
+612 ;;=M45.0^^56^650^6
+613 ;;^UTILITY(U,$J,358.3,15839,1,0)
+614 ;;=^358.31IA^4^2
+615 ;;^UTILITY(U,$J,358.3,15839,1,3,0)
+616 ;;=3^Ankylosing Spondylitis of Spine,Mult Sites
+617 ;;^UTILITY(U,$J,358.3,15839,1,4,0)
+618 ;;=4^M45.0
+619 ;;^UTILITY(U,$J,358.3,15839,2)
+620 ;;=^5011960
+621 ;;^UTILITY(U,$J,358.3,15840,0)
+622 ;;=M45.2^^56^650^3
+623 ;;^UTILITY(U,$J,358.3,15840,1,0)
+624 ;;=^358.31IA^4^2
+625 ;;^UTILITY(U,$J,358.3,15840,1,3,0)
+626 ;;=3^Ankylosing Spondylitis of Cervical Region
+627 ;;^UTILITY(U,$J,358.3,15840,1,4,0)
+628 ;;=4^M45.2
+629 ;;^UTILITY(U,$J,358.3,15840,2)
+630 ;;=^5011962
+631 ;;^UTILITY(U,$J,358.3,15841,0)
+632 ;;=M45.4^^56^650^7
+633 ;;^UTILITY(U,$J,358.3,15841,1,0)
+634 ;;=^358.31IA^4^2
+635 ;;^UTILITY(U,$J,358.3,15841,1,3,0)
+636 ;;=3^Ankylosing Spondylitis of Thoracic Region
+637 ;;^UTILITY(U,$J,358.3,15841,1,4,0)
+638 ;;=4^M45.4
+639 ;;^UTILITY(U,$J,358.3,15841,2)
+640 ;;=^5011964
+641 ;;^UTILITY(U,$J,358.3,15842,0)
+642 ;;=M45.7^^56^650^4
+643 ;;^UTILITY(U,$J,358.3,15842,1,0)
+644 ;;=^358.31IA^4^2
+645 ;;^UTILITY(U,$J,358.3,15842,1,3,0)
+646 ;;=3^Ankylosing Spondylitis of Lumbosacral Region
+647 ;;^UTILITY(U,$J,358.3,15842,1,4,0)
+648 ;;=4^M45.7
+649 ;;^UTILITY(U,$J,358.3,15842,2)
+650 ;;=^5011967
+651 ;;^UTILITY(U,$J,358.3,15843,0)
+652 ;;=M45.8^^56^650^5
+653 ;;^UTILITY(U,$J,358.3,15843,1,0)
+654 ;;=^358.31IA^4^2
+655 ;;^UTILITY(U,$J,358.3,15843,1,3,0)
+656 ;;=3^Ankylosing Spondylitis of Sacral/Sacrococcygeal Region
+657 ;;^UTILITY(U,$J,358.3,15843,1,4,0)
+658 ;;=4^M45.8
+659 ;;^UTILITY(U,$J,358.3,15843,2)
+660 ;;=^5011968
+661 ;;^UTILITY(U,$J,358.3,15844,0)
+662 ;;=M47.22^^56^650^180
+663 ;;^UTILITY(U,$J,358.3,15844,1,0)
+664 ;;=^358.31IA^4^2
+665 ;;^UTILITY(U,$J,358.3,15844,1,3,0)
+666 ;;=3^Sponylosis w/ Radiculopathy,Cervical Region NEC
+667 ;;^UTILITY(U,$J,358.3,15844,1,4,0)
+668 ;;=4^M47.22
+669 ;;^UTILITY(U,$J,358.3,15844,2)
+670 ;;=^5012061
+671 ;;^UTILITY(U,$J,358.3,15845,0)
+672 ;;=M47.24^^56^650^182
+673 ;;^UTILITY(U,$J,358.3,15845,1,0)
+674 ;;=^358.31IA^4^2
+675 ;;^UTILITY(U,$J,358.3,15845,1,3,0)
+676 ;;=3^Sponylosis w/ Radiculopathy,Thoracic Region NEC
