Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Routine: IBDEI08Y

IBDEI08Y.m

Go to the documentation of this file.
IBDEI08Y ; ; 01-FEB-2021
 ;;3.0;IB ENCOUNTER FORM IMP/EXP;;FEB 01, 2021
 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,21596,2)
 ;;=^5010010
 ;;^UTILITY(U,$J,358.3,21597,0)
 ;;=M05.742^^103^1103^149
 ;;^UTILITY(U,$J,358.3,21597,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21597,1,3,0)
 ;;=3^Rheumatoid Arthritis of Left Hand
 ;;^UTILITY(U,$J,358.3,21597,1,4,0)
 ;;=4^M05.742
 ;;^UTILITY(U,$J,358.3,21597,2)
 ;;=^5010011
 ;;^UTILITY(U,$J,358.3,21598,0)
 ;;=M05.751^^103^1103^157
 ;;^UTILITY(U,$J,358.3,21598,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21598,1,3,0)
 ;;=3^Rheumatoid Arthritis of Right Hip
 ;;^UTILITY(U,$J,358.3,21598,1,4,0)
 ;;=4^M05.751
 ;;^UTILITY(U,$J,358.3,21598,2)
 ;;=^5010013
 ;;^UTILITY(U,$J,358.3,21599,0)
 ;;=M05.752^^103^1103^150
 ;;^UTILITY(U,$J,358.3,21599,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21599,1,3,0)
 ;;=3^Rheumatoid Arthritis of Left Hip
 ;;^UTILITY(U,$J,358.3,21599,1,4,0)
 ;;=4^M05.752
 ;;^UTILITY(U,$J,358.3,21599,2)
 ;;=^5010014
 ;;^UTILITY(U,$J,358.3,21600,0)
 ;;=M05.761^^103^1103^158
 ;;^UTILITY(U,$J,358.3,21600,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21600,1,3,0)
 ;;=3^Rheumatoid Arthritis of Right Knee
 ;;^UTILITY(U,$J,358.3,21600,1,4,0)
 ;;=4^M05.761
 ;;^UTILITY(U,$J,358.3,21600,2)
 ;;=^5010016
 ;;^UTILITY(U,$J,358.3,21601,0)
 ;;=M05.762^^103^1103^151
 ;;^UTILITY(U,$J,358.3,21601,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21601,1,3,0)
 ;;=3^Rheumatoid Arthritis of Left Knee
 ;;^UTILITY(U,$J,358.3,21601,1,4,0)
 ;;=4^M05.762
 ;;^UTILITY(U,$J,358.3,21601,2)
 ;;=^5010017
 ;;^UTILITY(U,$J,358.3,21602,0)
 ;;=M05.771^^103^1103^155
 ;;^UTILITY(U,$J,358.3,21602,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21602,1,3,0)
 ;;=3^Rheumatoid Arthritis of Right Ankle
 ;;^UTILITY(U,$J,358.3,21602,1,4,0)
 ;;=4^M05.771
 ;;^UTILITY(U,$J,358.3,21602,2)
 ;;=^5010019
 ;;^UTILITY(U,$J,358.3,21603,0)
 ;;=M05.772^^103^1103^148
 ;;^UTILITY(U,$J,358.3,21603,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21603,1,3,0)
 ;;=3^Rheumatoid Arthritis of Left Ankle
 ;;^UTILITY(U,$J,358.3,21603,1,4,0)
 ;;=4^M05.772
 ;;^UTILITY(U,$J,358.3,21603,2)
 ;;=^5010020
 ;;^UTILITY(U,$J,358.3,21604,0)
 ;;=M05.79^^103^1103^154
 ;;^UTILITY(U,$J,358.3,21604,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21604,1,3,0)
 ;;=3^Rheumatoid Arthritis of Multiple Sites
 ;;^UTILITY(U,$J,358.3,21604,1,4,0)
 ;;=4^M05.79
 ;;^UTILITY(U,$J,358.3,21604,2)
 ;;=^5010022
 ;;^UTILITY(U,$J,358.3,21605,0)
 ;;=M06.00^^103^1103^161
 ;;^UTILITY(U,$J,358.3,21605,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21605,1,3,0)
 ;;=3^Rheumatoid Arthritis w/o Rhematoid Factor,Unspec Site
 ;;^UTILITY(U,$J,358.3,21605,1,4,0)
 ;;=4^M06.00
 ;;^UTILITY(U,$J,358.3,21605,2)
 ;;=^5010047
 ;;^UTILITY(U,$J,358.3,21606,0)
 ;;=M06.30^^103^1103^164
 ;;^UTILITY(U,$J,358.3,21606,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21606,1,3,0)
 ;;=3^Rheumatoid Nodule,Unspec Site
 ;;^UTILITY(U,$J,358.3,21606,1,4,0)
 ;;=4^M06.30
 ;;^UTILITY(U,$J,358.3,21606,2)
 ;;=^5010096
 ;;^UTILITY(U,$J,358.3,21607,0)
 ;;=M06.4^^103^1103^51
 ;;^UTILITY(U,$J,358.3,21607,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21607,1,3,0)
 ;;=3^Inflammatory Polyarthropathy
 ;;^UTILITY(U,$J,358.3,21607,1,4,0)
 ;;=4^M06.4
 ;;^UTILITY(U,$J,358.3,21607,2)
 ;;=^5010120
 ;;^UTILITY(U,$J,358.3,21608,0)
 ;;=M06.39^^103^1103^163
 ;;^UTILITY(U,$J,358.3,21608,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21608,1,3,0)
 ;;=3^Rheumatoid Nodule,Mult Sites
 ;;^UTILITY(U,$J,358.3,21608,1,4,0)
 ;;=4^M06.39
 ;;^UTILITY(U,$J,358.3,21608,2)
 ;;=^5010119
 ;;^UTILITY(U,$J,358.3,21609,0)
 ;;=M15.0^^103^1103^127
 ;;^UTILITY(U,$J,358.3,21609,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21609,1,3,0)
 ;;=3^Primary Generalized Osteoarthritis
 ;;^UTILITY(U,$J,358.3,21609,1,4,0)
 ;;=4^M15.0
 ;;^UTILITY(U,$J,358.3,21609,2)
 ;;=^5010762
 ;;^UTILITY(U,$J,358.3,21610,0)
 ;;=M06.9^^103^1103^162
 ;;^UTILITY(U,$J,358.3,21610,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21610,1,3,0)
 ;;=3^Rheumatoid Arthritis,Unspec
 ;;^UTILITY(U,$J,358.3,21610,1,4,0)
 ;;=4^M06.9
 ;;^UTILITY(U,$J,358.3,21610,2)
 ;;=^5010145
 ;;^UTILITY(U,$J,358.3,21611,0)
 ;;=M16.0^^103^1103^130
 ;;^UTILITY(U,$J,358.3,21611,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21611,1,3,0)
 ;;=3^Primary Osteoarthritis of Hip,Bilateral
 ;;^UTILITY(U,$J,358.3,21611,1,4,0)
 ;;=4^M16.0
 ;;^UTILITY(U,$J,358.3,21611,2)
 ;;=^5010769
 ;;^UTILITY(U,$J,358.3,21612,0)
 ;;=M16.11^^103^1103^139
 ;;^UTILITY(U,$J,358.3,21612,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21612,1,3,0)
 ;;=3^Primary Osteoarthritis of Right Hip
 ;;^UTILITY(U,$J,358.3,21612,1,4,0)
 ;;=4^M16.11
 ;;^UTILITY(U,$J,358.3,21612,2)
 ;;=^5010771
 ;;^UTILITY(U,$J,358.3,21613,0)
 ;;=M16.12^^103^1103^133
 ;;^UTILITY(U,$J,358.3,21613,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21613,1,3,0)
 ;;=3^Primary Osteoarthritis of Left Hip
 ;;^UTILITY(U,$J,358.3,21613,1,4,0)
 ;;=4^M16.12
 ;;^UTILITY(U,$J,358.3,21613,2)
 ;;=^5010772
 ;;^UTILITY(U,$J,358.3,21614,0)
 ;;=M17.0^^103^1103^129
 ;;^UTILITY(U,$J,358.3,21614,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21614,1,3,0)
 ;;=3^Primary Osteoarthritis of Bilateral Knees
 ;;^UTILITY(U,$J,358.3,21614,1,4,0)
 ;;=4^M17.0
 ;;^UTILITY(U,$J,358.3,21614,2)
 ;;=^5010784
 ;;^UTILITY(U,$J,358.3,21615,0)
 ;;=M17.11^^103^1103^140
 ;;^UTILITY(U,$J,358.3,21615,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21615,1,3,0)
 ;;=3^Primary Osteoarthritis of Right Knee
 ;;^UTILITY(U,$J,358.3,21615,1,4,0)
 ;;=4^M17.11
 ;;^UTILITY(U,$J,358.3,21615,2)
 ;;=^5010786
 ;;^UTILITY(U,$J,358.3,21616,0)
 ;;=M17.12^^103^1103^134
 ;;^UTILITY(U,$J,358.3,21616,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21616,1,3,0)
 ;;=3^Primary Osteoarthritis of Left Knee
 ;;^UTILITY(U,$J,358.3,21616,1,4,0)
 ;;=4^M17.12
 ;;^UTILITY(U,$J,358.3,21616,2)
 ;;=^5010787
 ;;^UTILITY(U,$J,358.3,21617,0)
 ;;=M18.0^^103^1103^128
 ;;^UTILITY(U,$J,358.3,21617,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21617,1,3,0)
 ;;=3^Primary Osteoarthritis of Bilateral 1st Carpometacarp Jts
 ;;^UTILITY(U,$J,358.3,21617,1,4,0)
 ;;=4^M18.0
 ;;^UTILITY(U,$J,358.3,21617,2)
 ;;=^5010795
 ;;^UTILITY(U,$J,358.3,21618,0)
 ;;=M18.11^^103^1103^138
 ;;^UTILITY(U,$J,358.3,21618,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21618,1,3,0)
 ;;=3^Primary Osteoarthritis of Right Hand 1st Carpometacarp Jt
 ;;^UTILITY(U,$J,358.3,21618,1,4,0)
 ;;=4^M18.11
 ;;^UTILITY(U,$J,358.3,21618,2)
 ;;=^5010797
 ;;^UTILITY(U,$J,358.3,21619,0)
 ;;=M18.12^^103^1103^132
 ;;^UTILITY(U,$J,358.3,21619,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21619,1,3,0)
 ;;=3^Primary Osteoarthritis of Left Hand 1st Carpometacarp Jt
 ;;^UTILITY(U,$J,358.3,21619,1,4,0)
 ;;=4^M18.12
 ;;^UTILITY(U,$J,358.3,21619,2)
 ;;=^5010798
 ;;^UTILITY(U,$J,358.3,21620,0)
 ;;=M19.011^^103^1103^141
 ;;^UTILITY(U,$J,358.3,21620,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21620,1,3,0)
 ;;=3^Primary Osteoarthritis of Right Shoulder
 ;;^UTILITY(U,$J,358.3,21620,1,4,0)
 ;;=4^M19.011
 ;;^UTILITY(U,$J,358.3,21620,2)
 ;;=^5010808
 ;;^UTILITY(U,$J,358.3,21621,0)
 ;;=M19.012^^103^1103^135
 ;;^UTILITY(U,$J,358.3,21621,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21621,1,3,0)
 ;;=3^Primary Osteoarthritis of Left Shoulder
 ;;^UTILITY(U,$J,358.3,21621,1,4,0)
 ;;=4^M19.012
 ;;^UTILITY(U,$J,358.3,21621,2)
 ;;=^5010809
 ;;^UTILITY(U,$J,358.3,21622,0)
 ;;=M19.031^^103^1103^142
 ;;^UTILITY(U,$J,358.3,21622,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21622,1,3,0)
 ;;=3^Primary Osteoarthritis of Right Wrist
 ;;^UTILITY(U,$J,358.3,21622,1,4,0)
 ;;=4^M19.031
 ;;^UTILITY(U,$J,358.3,21622,2)
 ;;=^5010814
 ;;^UTILITY(U,$J,358.3,21623,0)
 ;;=M19.032^^103^1103^136
 ;;^UTILITY(U,$J,358.3,21623,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21623,1,3,0)
 ;;=3^Primary Osteoarthritis of Left Wrist
 ;;^UTILITY(U,$J,358.3,21623,1,4,0)
 ;;=4^M19.032
 ;;^UTILITY(U,$J,358.3,21623,2)
 ;;=^5010815
 ;;^UTILITY(U,$J,358.3,21624,0)
 ;;=M19.041^^103^1103^137
 ;;^UTILITY(U,$J,358.3,21624,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21624,1,3,0)
 ;;=3^Primary Osteoarthritis of Right Hand
 ;;^UTILITY(U,$J,358.3,21624,1,4,0)
 ;;=4^M19.041
 ;;^UTILITY(U,$J,358.3,21624,2)
 ;;=^5010817
 ;;^UTILITY(U,$J,358.3,21625,0)
 ;;=M19.042^^103^1103^131
 ;;^UTILITY(U,$J,358.3,21625,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21625,1,3,0)
 ;;=3^Primary Osteoarthritis of Left Hand
 ;;^UTILITY(U,$J,358.3,21625,1,4,0)
 ;;=4^M19.042
 ;;^UTILITY(U,$J,358.3,21625,2)
 ;;=^5010818
 ;;^UTILITY(U,$J,358.3,21626,0)
 ;;=M19.90^^103^1103^72
 ;;^UTILITY(U,$J,358.3,21626,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21626,1,3,0)
 ;;=3^Osteoarthritis,Unspec
 ;;^UTILITY(U,$J,358.3,21626,1,4,0)
 ;;=4^M19.90
 ;;^UTILITY(U,$J,358.3,21626,2)
 ;;=^5010853
 ;;^UTILITY(U,$J,358.3,21627,0)
 ;;=M25.40^^103^1103^38
 ;;^UTILITY(U,$J,358.3,21627,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21627,1,3,0)
 ;;=3^Effusion,Unspec
 ;;^UTILITY(U,$J,358.3,21627,1,4,0)
 ;;=4^M25.40
 ;;^UTILITY(U,$J,358.3,21627,2)
 ;;=^5011575
 ;;^UTILITY(U,$J,358.3,21628,0)
 ;;=M45.0^^103^1103^6
 ;;^UTILITY(U,$J,358.3,21628,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21628,1,3,0)
 ;;=3^Ankylosing Spondylitis of Spine,Mult Sites
 ;;^UTILITY(U,$J,358.3,21628,1,4,0)
 ;;=4^M45.0
 ;;^UTILITY(U,$J,358.3,21628,2)
 ;;=^5011960
 ;;^UTILITY(U,$J,358.3,21629,0)
 ;;=M45.2^^103^1103^3
 ;;^UTILITY(U,$J,358.3,21629,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21629,1,3,0)
 ;;=3^Ankylosing Spondylitis of Cervical Region
 ;;^UTILITY(U,$J,358.3,21629,1,4,0)
 ;;=4^M45.2
 ;;^UTILITY(U,$J,358.3,21629,2)
 ;;=^5011962
 ;;^UTILITY(U,$J,358.3,21630,0)
 ;;=M45.4^^103^1103^7
 ;;^UTILITY(U,$J,358.3,21630,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21630,1,3,0)
 ;;=3^Ankylosing Spondylitis of Thoracic Region
 ;;^UTILITY(U,$J,358.3,21630,1,4,0)
 ;;=4^M45.4
 ;;^UTILITY(U,$J,358.3,21630,2)
 ;;=^5011964
 ;;^UTILITY(U,$J,358.3,21631,0)
 ;;=M45.7^^103^1103^4
 ;;^UTILITY(U,$J,358.3,21631,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21631,1,3,0)
 ;;=3^Ankylosing Spondylitis of Lumbosacral Region
 ;;^UTILITY(U,$J,358.3,21631,1,4,0)
 ;;=4^M45.7
 ;;^UTILITY(U,$J,358.3,21631,2)
 ;;=^5011967
 ;;^UTILITY(U,$J,358.3,21632,0)
 ;;=M45.8^^103^1103^5
 ;;^UTILITY(U,$J,358.3,21632,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21632,1,3,0)
 ;;=3^Ankylosing Spondylitis of Sacral/Sacrococcygeal Region
 ;;^UTILITY(U,$J,358.3,21632,1,4,0)
 ;;=4^M45.8
 ;;^UTILITY(U,$J,358.3,21632,2)
 ;;=^5011968
 ;;^UTILITY(U,$J,358.3,21633,0)
 ;;=M47.22^^103^1103^180
 ;;^UTILITY(U,$J,358.3,21633,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21633,1,3,0)
 ;;=3^Sponylosis w/ Radiculopathy,Cervical Region NEC
 ;;^UTILITY(U,$J,358.3,21633,1,4,0)
 ;;=4^M47.22
 ;;^UTILITY(U,$J,358.3,21633,2)
 ;;=^5012061
 ;;^UTILITY(U,$J,358.3,21634,0)
 ;;=M47.24^^103^1103^182
 ;;^UTILITY(U,$J,358.3,21634,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21634,1,3,0)
 ;;=3^Sponylosis w/ Radiculopathy,Thoracic Region NEC
 ;;^UTILITY(U,$J,358.3,21634,1,4,0)
 ;;=4^M47.24
 ;;^UTILITY(U,$J,358.3,21634,2)
 ;;=^5012063
 ;;^UTILITY(U,$J,358.3,21635,0)
 ;;=M47.27^^103^1103^181
 ;;^UTILITY(U,$J,358.3,21635,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21635,1,3,0)
 ;;=3^Sponylosis w/ Radiculopathy,Lumbosacral Region NEC
 ;;^UTILITY(U,$J,358.3,21635,1,4,0)
 ;;=4^M47.27
 ;;^UTILITY(U,$J,358.3,21635,2)
 ;;=^5012066
 ;;^UTILITY(U,$J,358.3,21636,0)
 ;;=M47.812^^103^1103^177
 ;;^UTILITY(U,$J,358.3,21636,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21636,1,3,0)
 ;;=3^Spondylosis w/o Myelopathy/Radiculopathy,Cervical Region
 ;;^UTILITY(U,$J,358.3,21636,1,4,0)
 ;;=4^M47.812
 ;;^UTILITY(U,$J,358.3,21636,2)
 ;;=^5012069
 ;;^UTILITY(U,$J,358.3,21637,0)
 ;;=M47.814^^103^1103^178
 ;;^UTILITY(U,$J,358.3,21637,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21637,1,3,0)
 ;;=3^Spondylosis w/o Myelopathy/Radiculopathy,Thoracic Region
 ;;^UTILITY(U,$J,358.3,21637,1,4,0)
 ;;=4^M47.814
 ;;^UTILITY(U,$J,358.3,21637,2)
 ;;=^5012071
 ;;^UTILITY(U,$J,358.3,21638,0)
 ;;=M47.817^^103^1103^179
 ;;^UTILITY(U,$J,358.3,21638,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21638,1,3,0)
 ;;=3^Spondylosis w/o Myelopathy/Radiculopathy,Lumbosacral Region
 ;;^UTILITY(U,$J,358.3,21638,1,4,0)
 ;;=4^M47.817
 ;;^UTILITY(U,$J,358.3,21638,2)
 ;;=^5012074
 ;;^UTILITY(U,$J,358.3,21639,0)
 ;;=M48.50XA^^103^1103^22
 ;;^UTILITY(U,$J,358.3,21639,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21639,1,3,0)
 ;;=3^Collapsed Vertebra NEC,Site Unspec,Init Encntr
 ;;^UTILITY(U,$J,358.3,21639,1,4,0)
 ;;=4^M48.50XA
 ;;^UTILITY(U,$J,358.3,21639,2)
 ;;=^5012159
 ;;^UTILITY(U,$J,358.3,21640,0)
 ;;=M48.50XD^^103^1103^23
 ;;^UTILITY(U,$J,358.3,21640,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21640,1,3,0)
 ;;=3^Collapsed Vertebra NEC,Site Unspec,Subs Encntr
 ;;^UTILITY(U,$J,358.3,21640,1,4,0)
 ;;=4^M48.50XD
 ;;^UTILITY(U,$J,358.3,21640,2)
 ;;=^5012160
 ;;^UTILITY(U,$J,358.3,21641,0)
 ;;=M48.52XA^^103^1103^24
 ;;^UTILITY(U,$J,358.3,21641,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21641,1,3,0)
 ;;=3^Collapsed Vertebra,Cervical Region,Init Encntr
 ;;^UTILITY(U,$J,358.3,21641,1,4,0)
 ;;=4^M48.52XA
 ;;^UTILITY(U,$J,358.3,21641,2)
 ;;=^5012167
 ;;^UTILITY(U,$J,358.3,21642,0)
 ;;=M48.52XD^^103^1103^25
 ;;^UTILITY(U,$J,358.3,21642,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21642,1,3,0)
 ;;=3^Collapsed Vertebra,Cervical Region,Subs Encntr,Rt Healing
 ;;^UTILITY(U,$J,358.3,21642,1,4,0)
 ;;=4^M48.52XD
 ;;^UTILITY(U,$J,358.3,21642,2)
 ;;=^5012168
 ;;^UTILITY(U,$J,358.3,21643,0)
 ;;=M48.54XA^^103^1103^33
 ;;^UTILITY(U,$J,358.3,21643,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21643,1,3,0)
 ;;=3^Collapsed Vertebra,Throacic Region,Init Encntr
 ;;^UTILITY(U,$J,358.3,21643,1,4,0)
 ;;=4^M48.54XA
 ;;^UTILITY(U,$J,358.3,21643,2)
 ;;=^5012175
 ;;^UTILITY(U,$J,358.3,21644,0)
 ;;=M48.54XD^^103^1103^34
 ;;^UTILITY(U,$J,358.3,21644,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21644,1,3,0)
 ;;=3^Collapsed Vertebra,Throacic Region,Subs Encntr
 ;;^UTILITY(U,$J,358.3,21644,1,4,0)
 ;;=4^M48.54XD
 ;;^UTILITY(U,$J,358.3,21644,2)
 ;;=^5012176
 ;;^UTILITY(U,$J,358.3,21645,0)
 ;;=M48.57XA^^103^1103^26
 ;;^UTILITY(U,$J,358.3,21645,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21645,1,3,0)
 ;;=3^Collapsed Vertebra,Lumbosacral Region,Init Encntr
 ;;^UTILITY(U,$J,358.3,21645,1,4,0)
 ;;=4^M48.57XA
 ;;^UTILITY(U,$J,358.3,21645,2)
 ;;=^5012187
 ;;^UTILITY(U,$J,358.3,21646,0)
 ;;=M48.57XD^^103^1103^27
 ;;^UTILITY(U,$J,358.3,21646,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21646,1,3,0)
 ;;=3^Collapsed Vertebra,Lumbosacral Region,Subs Encntr,Rt Healing
 ;;^UTILITY(U,$J,358.3,21646,1,4,0)
 ;;=4^M48.57XD
 ;;^UTILITY(U,$J,358.3,21646,2)
 ;;=^5012188
 ;;^UTILITY(U,$J,358.3,21647,0)
 ;;=M50.30^^103^1103^14
 ;;^UTILITY(U,$J,358.3,21647,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21647,1,3,0)
 ;;=3^Cervical Disc Degeneration,Unspec Region
 ;;^UTILITY(U,$J,358.3,21647,1,4,0)
 ;;=4^M50.30
 ;;^UTILITY(U,$J,358.3,21647,2)
 ;;=^5012227
 ;;^UTILITY(U,$J,358.3,21648,0)
 ;;=M51.14^^103^1103^55
 ;;^UTILITY(U,$J,358.3,21648,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21648,1,3,0)
 ;;=3^Intvrt Disc Disorder w/ Radiculopathy,Thoracic Region
 ;;^UTILITY(U,$J,358.3,21648,1,4,0)
 ;;=4^M51.14
 ;;^UTILITY(U,$J,358.3,21648,2)
 ;;=^5012243
 ;;^UTILITY(U,$J,358.3,21649,0)
 ;;=M51.17^^103^1103^54
 ;;^UTILITY(U,$J,358.3,21649,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21649,1,3,0)
 ;;=3^Intvrt Disc Disorder w/ Radiculopathy,Lumbosacral Region
 ;;^UTILITY(U,$J,358.3,21649,1,4,0)
 ;;=4^M51.17
 ;;^UTILITY(U,$J,358.3,21649,2)
 ;;=^5012246
 ;;^UTILITY(U,$J,358.3,21650,0)
 ;;=M51.34^^103^1103^53
 ;;^UTILITY(U,$J,358.3,21650,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21650,1,3,0)
 ;;=3^Intvrt Disc Degeneration,Thoracic Region
 ;;^UTILITY(U,$J,358.3,21650,1,4,0)
 ;;=4^M51.34
 ;;^UTILITY(U,$J,358.3,21650,2)
 ;;=^5012251
 ;;^UTILITY(U,$J,358.3,21651,0)
 ;;=M51.37^^103^1103^52
 ;;^UTILITY(U,$J,358.3,21651,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21651,1,3,0)
 ;;=3^Intvrt Disc Degeneration,Lumbosacral Region
 ;;^UTILITY(U,$J,358.3,21651,1,4,0)
 ;;=4^M51.37
 ;;^UTILITY(U,$J,358.3,21651,2)
 ;;=^5012254
 ;;^UTILITY(U,$J,358.3,21652,0)
 ;;=M54.14^^103^1103^146
 ;;^UTILITY(U,$J,358.3,21652,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21652,1,3,0)
 ;;=3^Radiculopathy,Thoracic Region
 ;;^UTILITY(U,$J,358.3,21652,1,4,0)
 ;;=4^M54.14
 ;;^UTILITY(U,$J,358.3,21652,2)
 ;;=^5012299
 ;;^UTILITY(U,$J,358.3,21653,0)
 ;;=M54.17^^103^1103^145
 ;;^UTILITY(U,$J,358.3,21653,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21653,1,3,0)
 ;;=3^Radiculopathy,Lumbosacral Region
 ;;^UTILITY(U,$J,358.3,21653,1,4,0)
 ;;=4^M54.17
 ;;^UTILITY(U,$J,358.3,21653,2)
 ;;=^5012302
 ;;^UTILITY(U,$J,358.3,21654,0)
 ;;=M54.2^^103^1103^15
 ;;^UTILITY(U,$J,358.3,21654,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21654,1,3,0)
 ;;=3^Cervicalgia
 ;;^UTILITY(U,$J,358.3,21654,1,4,0)
 ;;=4^M54.2
 ;;^UTILITY(U,$J,358.3,21654,2)
 ;;=^5012304
 ;;^UTILITY(U,$J,358.3,21655,0)
 ;;=M54.31^^103^1103^169
 ;;^UTILITY(U,$J,358.3,21655,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21655,1,3,0)
 ;;=3^Sciatica,Right Side
 ;;^UTILITY(U,$J,358.3,21655,1,4,0)
 ;;=4^M54.31
 ;;^UTILITY(U,$J,358.3,21655,2)
 ;;=^5012306
 ;;^UTILITY(U,$J,358.3,21656,0)
 ;;=M54.32^^103^1103^168
 ;;^UTILITY(U,$J,358.3,21656,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21656,1,3,0)
 ;;=3^Sciatica,Left Side
 ;;^UTILITY(U,$J,358.3,21656,1,4,0)
 ;;=4^M54.32
 ;;^UTILITY(U,$J,358.3,21656,2)
 ;;=^5012307
 ;;^UTILITY(U,$J,358.3,21657,0)
 ;;=M54.5^^103^1103^61
 ;;^UTILITY(U,$J,358.3,21657,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21657,1,3,0)
 ;;=3^Low Back Pain
 ;;^UTILITY(U,$J,358.3,21657,1,4,0)
 ;;=4^M54.5
 ;;^UTILITY(U,$J,358.3,21657,2)
 ;;=^5012311
 ;;^UTILITY(U,$J,358.3,21658,0)
 ;;=M60.9^^103^1103^66
 ;;^UTILITY(U,$J,358.3,21658,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21658,1,3,0)
 ;;=3^Myositis,Unspec
 ;;^UTILITY(U,$J,358.3,21658,1,4,0)
 ;;=4^M60.9
 ;;^UTILITY(U,$J,358.3,21658,2)
 ;;=^5012409
 ;;^UTILITY(U,$J,358.3,21659,0)
 ;;=M62.40^^103^1103^36
 ;;^UTILITY(U,$J,358.3,21659,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21659,1,3,0)
 ;;=3^Contracture of Muscle,Unspec
 ;;^UTILITY(U,$J,358.3,21659,1,4,0)
 ;;=4^M62.40
 ;;^UTILITY(U,$J,358.3,21659,2)
 ;;=^5012631
 ;;^UTILITY(U,$J,358.3,21660,0)
 ;;=M62.831^^103^1103^64
 ;;^UTILITY(U,$J,358.3,21660,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21660,1,3,0)
 ;;=3^Muscle Spasm of Calf
 ;;^UTILITY(U,$J,358.3,21660,1,4,0)
 ;;=4^M62.831
 ;;^UTILITY(U,$J,358.3,21660,2)
 ;;=^5012681
 ;;^UTILITY(U,$J,358.3,21661,0)
 ;;=M62.838^^103^1103^62
 ;;^UTILITY(U,$J,358.3,21661,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21661,1,3,0)
 ;;=3^Muscle Spasm NEC
 ;;^UTILITY(U,$J,358.3,21661,1,4,0)
 ;;=4^M62.838
 ;;^UTILITY(U,$J,358.3,21661,2)
 ;;=^5012682
 ;;^UTILITY(U,$J,358.3,21662,0)
 ;;=M70.21^^103^1103^68
 ;;^UTILITY(U,$J,358.3,21662,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21662,1,3,0)
 ;;=3^Olecranon Bursitis,Right Elbow
 ;;^UTILITY(U,$J,358.3,21662,1,4,0)
 ;;=4^M70.21
 ;;^UTILITY(U,$J,358.3,21662,2)
 ;;=^5013047
 ;;^UTILITY(U,$J,358.3,21663,0)
 ;;=M70.22^^103^1103^67