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

IBDEI09B.m

Go to the documentation of this file.
IBDEI09B ; ; 03-MAY-2021
 ;;3.0;IB ENCOUNTER FORM IMP/EXP;;MAY 03, 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,22706,0)
 ;;=M05.522^^83^1054^135
 ;;^UTILITY(U,$J,358.3,22706,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22706,1,3,0)
 ;;=3^Rheu polyneurop w rheu arthrit of left elbow
 ;;^UTILITY(U,$J,358.3,22706,1,4,0)
 ;;=4^M05.522
 ;;^UTILITY(U,$J,358.3,22706,2)
 ;;=^5009959
 ;;^UTILITY(U,$J,358.3,22707,0)
 ;;=M05.542^^83^1054^136
 ;;^UTILITY(U,$J,358.3,22707,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22707,1,3,0)
 ;;=3^Rheu polyneurop w rheu arthrit of left hand 
 ;;^UTILITY(U,$J,358.3,22707,1,4,0)
 ;;=4^M05.542
 ;;^UTILITY(U,$J,358.3,22707,2)
 ;;=^5009965
 ;;^UTILITY(U,$J,358.3,22708,0)
 ;;=M05.552^^83^1054^137
 ;;^UTILITY(U,$J,358.3,22708,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22708,1,3,0)
 ;;=3^Rheu polyneurop w rheu arthrit of left hip
 ;;^UTILITY(U,$J,358.3,22708,1,4,0)
 ;;=4^M05.552
 ;;^UTILITY(U,$J,358.3,22708,2)
 ;;=^5009968
 ;;^UTILITY(U,$J,358.3,22709,0)
 ;;=M05.562^^83^1054^138
 ;;^UTILITY(U,$J,358.3,22709,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22709,1,3,0)
 ;;=3^Rheu polyneurop w rheu arthrit of left knee 
 ;;^UTILITY(U,$J,358.3,22709,1,4,0)
 ;;=4^M05.562
 ;;^UTILITY(U,$J,358.3,22709,2)
 ;;=^5009971
 ;;^UTILITY(U,$J,358.3,22710,0)
 ;;=M05.512^^83^1054^139
 ;;^UTILITY(U,$J,358.3,22710,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22710,1,3,0)
 ;;=3^Rheu polyneurop w rheu arthrit of left shoulder 
 ;;^UTILITY(U,$J,358.3,22710,1,4,0)
 ;;=4^M05.512
 ;;^UTILITY(U,$J,358.3,22710,2)
 ;;=^5009956
 ;;^UTILITY(U,$J,358.3,22711,0)
 ;;=M05.532^^83^1054^140
 ;;^UTILITY(U,$J,358.3,22711,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22711,1,3,0)
 ;;=3^Rheu polyneurop w rheu arthrit of left wrist
 ;;^UTILITY(U,$J,358.3,22711,1,4,0)
 ;;=4^M05.532
 ;;^UTILITY(U,$J,358.3,22711,2)
 ;;=^5009962
 ;;^UTILITY(U,$J,358.3,22712,0)
 ;;=M05.59^^83^1054^133
 ;;^UTILITY(U,$J,358.3,22712,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22712,1,3,0)
 ;;=3^Rheu polyneurop w rheu arthrit mult sites 
 ;;^UTILITY(U,$J,358.3,22712,1,4,0)
 ;;=4^M05.59
 ;;^UTILITY(U,$J,358.3,22712,2)
 ;;=^5009976
 ;;^UTILITY(U,$J,358.3,22713,0)
 ;;=M05.571^^83^1054^141
 ;;^UTILITY(U,$J,358.3,22713,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22713,1,3,0)
 ;;=3^Rheu polyneurop w rheu arthrit of right ank/ft
 ;;^UTILITY(U,$J,358.3,22713,1,4,0)
 ;;=4^M05.571
 ;;^UTILITY(U,$J,358.3,22713,2)
 ;;=^5009973
 ;;^UTILITY(U,$J,358.3,22714,0)
 ;;=M05.521^^83^1054^142
 ;;^UTILITY(U,$J,358.3,22714,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22714,1,3,0)
 ;;=3^Rheu polyneurop w rheu arthrit of right elbow 
 ;;^UTILITY(U,$J,358.3,22714,1,4,0)
 ;;=4^M05.521
 ;;^UTILITY(U,$J,358.3,22714,2)
 ;;=^5009958
 ;;^UTILITY(U,$J,358.3,22715,0)
 ;;=M05.541^^83^1054^143
 ;;^UTILITY(U,$J,358.3,22715,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22715,1,3,0)
 ;;=3^Rheu polyneurop w rheu arthrit of right hand 
 ;;^UTILITY(U,$J,358.3,22715,1,4,0)
 ;;=4^M05.541
 ;;^UTILITY(U,$J,358.3,22715,2)
 ;;=^5009964
 ;;^UTILITY(U,$J,358.3,22716,0)
 ;;=M05.551^^83^1054^144
 ;;^UTILITY(U,$J,358.3,22716,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22716,1,3,0)
 ;;=3^Rheu polyneurop w rheu arthrit of right hip 
 ;;^UTILITY(U,$J,358.3,22716,1,4,0)
 ;;=4^M05.551
 ;;^UTILITY(U,$J,358.3,22716,2)
 ;;=^5009967
 ;;^UTILITY(U,$J,358.3,22717,0)
 ;;=M05.561^^83^1054^145
 ;;^UTILITY(U,$J,358.3,22717,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22717,1,3,0)
 ;;=3^Rheu polyneurop w rheu arthrit of right knee
 ;;^UTILITY(U,$J,358.3,22717,1,4,0)
 ;;=4^M05.561
 ;;^UTILITY(U,$J,358.3,22717,2)
 ;;=^5009970
 ;;^UTILITY(U,$J,358.3,22718,0)
 ;;=M05.511^^83^1054^146
 ;;^UTILITY(U,$J,358.3,22718,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22718,1,3,0)
 ;;=3^Rheu polyneurop w rheu arthrit of right shoulder 
 ;;^UTILITY(U,$J,358.3,22718,1,4,0)
 ;;=4^M05.511
 ;;^UTILITY(U,$J,358.3,22718,2)
 ;;=^5009955
 ;;^UTILITY(U,$J,358.3,22719,0)
 ;;=M05.531^^83^1054^147
 ;;^UTILITY(U,$J,358.3,22719,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22719,1,3,0)
 ;;=3^Rheu polyneurop w rheu arthrit of right wrist 
 ;;^UTILITY(U,$J,358.3,22719,1,4,0)
 ;;=4^M05.531
 ;;^UTILITY(U,$J,358.3,22719,2)
 ;;=^5009961
 ;;^UTILITY(U,$J,358.3,22720,0)
 ;;=M19.272^^83^1054^178
 ;;^UTILITY(U,$J,358.3,22720,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22720,1,3,0)
 ;;=3^Secondary osteoarthritis, left ankle and foot
 ;;^UTILITY(U,$J,358.3,22720,1,4,0)
 ;;=4^M19.272
 ;;^UTILITY(U,$J,358.3,22720,2)
 ;;=^5010851
 ;;^UTILITY(U,$J,358.3,22721,0)
 ;;=M19.271^^83^1054^181
 ;;^UTILITY(U,$J,358.3,22721,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22721,1,3,0)
 ;;=3^Secondary osteoarthritis, right ankle and foot
 ;;^UTILITY(U,$J,358.3,22721,1,4,0)
 ;;=4^M19.271
 ;;^UTILITY(U,$J,358.3,22721,2)
 ;;=^5010850
 ;;^UTILITY(U,$J,358.3,22722,0)
 ;;=M19.242^^83^1054^179
 ;;^UTILITY(U,$J,358.3,22722,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22722,1,3,0)
 ;;=3^Secondary osteoarthritis, left hand
 ;;^UTILITY(U,$J,358.3,22722,1,4,0)
 ;;=4^M19.242
 ;;^UTILITY(U,$J,358.3,22722,2)
 ;;=^5010848
 ;;^UTILITY(U,$J,358.3,22723,0)
 ;;=M19.212^^83^1054^180
 ;;^UTILITY(U,$J,358.3,22723,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22723,1,3,0)
 ;;=3^Secondary osteoarthritis, left shoulder
 ;;^UTILITY(U,$J,358.3,22723,1,4,0)
 ;;=4^M19.212
 ;;^UTILITY(U,$J,358.3,22723,2)
 ;;=^5010839
 ;;^UTILITY(U,$J,358.3,22724,0)
 ;;=M19.241^^83^1054^182
 ;;^UTILITY(U,$J,358.3,22724,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22724,1,3,0)
 ;;=3^Secondary osteoarthritis, right hand
 ;;^UTILITY(U,$J,358.3,22724,1,4,0)
 ;;=4^M19.241
 ;;^UTILITY(U,$J,358.3,22724,2)
 ;;=^5010847
 ;;^UTILITY(U,$J,358.3,22725,0)
 ;;=M19.211^^83^1054^183
 ;;^UTILITY(U,$J,358.3,22725,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22725,1,3,0)
 ;;=3^Secondary osteoarthritis, right shoulder
 ;;^UTILITY(U,$J,358.3,22725,1,4,0)
 ;;=4^M19.211
 ;;^UTILITY(U,$J,358.3,22725,2)
 ;;=^5010838
 ;;^UTILITY(U,$J,358.3,22726,0)
 ;;=M67.02^^83^1054^184
 ;;^UTILITY(U,$J,358.3,22726,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22726,1,3,0)
 ;;=3^Short Achilles tendon (acquired), left ankle
 ;;^UTILITY(U,$J,358.3,22726,1,4,0)
 ;;=4^M67.02
 ;;^UTILITY(U,$J,358.3,22726,2)
 ;;=^5012907
 ;;^UTILITY(U,$J,358.3,22727,0)
 ;;=M67.01^^83^1054^185
 ;;^UTILITY(U,$J,358.3,22727,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22727,1,3,0)
 ;;=3^Short Achilles tendon (acquired), right ankle
 ;;^UTILITY(U,$J,358.3,22727,1,4,0)
 ;;=4^M67.01
 ;;^UTILITY(U,$J,358.3,22727,2)
 ;;=^5012906
 ;;^UTILITY(U,$J,358.3,22728,0)
 ;;=M66.232^^83^1054^186
 ;;^UTILITY(U,$J,358.3,22728,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22728,1,3,0)
 ;;=3^Spontaneous rupture of extensor tendons, left forearm
 ;;^UTILITY(U,$J,358.3,22728,1,4,0)
 ;;=4^M66.232
 ;;^UTILITY(U,$J,358.3,22728,2)
 ;;=^5012855
 ;;^UTILITY(U,$J,358.3,22729,0)
 ;;=M66.242^^83^1054^187
 ;;^UTILITY(U,$J,358.3,22729,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22729,1,3,0)
 ;;=3^Spontaneous rupture of extensor tendons, left hand
 ;;^UTILITY(U,$J,358.3,22729,1,4,0)
 ;;=4^M66.242
 ;;^UTILITY(U,$J,358.3,22729,2)
 ;;=^5012858
 ;;^UTILITY(U,$J,358.3,22730,0)
 ;;=M66.231^^83^1054^188
 ;;^UTILITY(U,$J,358.3,22730,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22730,1,3,0)
 ;;=3^Spontaneous rupture of extensor tendons, right forearm
 ;;^UTILITY(U,$J,358.3,22730,1,4,0)
 ;;=4^M66.231
 ;;^UTILITY(U,$J,358.3,22730,2)
 ;;=^5012854
 ;;^UTILITY(U,$J,358.3,22731,0)
 ;;=M66.241^^83^1054^189
 ;;^UTILITY(U,$J,358.3,22731,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22731,1,3,0)
 ;;=3^Spontaneous rupture of extensor tendons, right hand
 ;;^UTILITY(U,$J,358.3,22731,1,4,0)
 ;;=4^M66.241
 ;;^UTILITY(U,$J,358.3,22731,2)
 ;;=^5012857
 ;;^UTILITY(U,$J,358.3,22732,0)
 ;;=M66.332^^83^1054^190
 ;;^UTILITY(U,$J,358.3,22732,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22732,1,3,0)
 ;;=3^Spontaneous rupture of flexor tendons, left forearm
 ;;^UTILITY(U,$J,358.3,22732,1,4,0)
 ;;=4^M66.332
 ;;^UTILITY(U,$J,358.3,22732,2)
 ;;=^5012879
 ;;^UTILITY(U,$J,358.3,22733,0)
 ;;=M66.342^^83^1054^191
 ;;^UTILITY(U,$J,358.3,22733,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22733,1,3,0)
 ;;=3^Spontaneous rupture of flexor tendons, left hand
 ;;^UTILITY(U,$J,358.3,22733,1,4,0)
 ;;=4^M66.342
 ;;^UTILITY(U,$J,358.3,22733,2)
 ;;=^5012882
 ;;^UTILITY(U,$J,358.3,22734,0)
 ;;=M66.331^^83^1054^192
 ;;^UTILITY(U,$J,358.3,22734,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22734,1,3,0)
 ;;=3^Spontaneous rupture of flexor tendons, right forearm
 ;;^UTILITY(U,$J,358.3,22734,1,4,0)
 ;;=4^M66.331
 ;;^UTILITY(U,$J,358.3,22734,2)
 ;;=^5012878
 ;;^UTILITY(U,$J,358.3,22735,0)
 ;;=M66.341^^83^1054^193
 ;;^UTILITY(U,$J,358.3,22735,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22735,1,3,0)
 ;;=3^Spontaneous rupture of flexor tendons, right hand
 ;;^UTILITY(U,$J,358.3,22735,1,4,0)
 ;;=4^M66.341
 ;;^UTILITY(U,$J,358.3,22735,2)
 ;;=^5012881
 ;;^UTILITY(U,$J,358.3,22736,0)
 ;;=M66.342^^83^1054^194
 ;;^UTILITY(U,$J,358.3,22736,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22736,1,3,0)
 ;;=3^Spontaneous rupture of flexor tendons, left hand
 ;;^UTILITY(U,$J,358.3,22736,1,4,0)
 ;;=4^M66.342
 ;;^UTILITY(U,$J,358.3,22736,2)
 ;;=^5012882
 ;;^UTILITY(U,$J,358.3,22737,0)
 ;;=M66.841^^83^1054^195
 ;;^UTILITY(U,$J,358.3,22737,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22737,1,3,0)
 ;;=3^Spontaneous rupture of other tendons, right hand
 ;;^UTILITY(U,$J,358.3,22737,1,4,0)
 ;;=4^M66.841
 ;;^UTILITY(U,$J,358.3,22737,2)
 ;;=^5012898
 ;;^UTILITY(U,$J,358.3,22738,0)
 ;;=M70.62^^83^1054^198
 ;;^UTILITY(U,$J,358.3,22738,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22738,1,3,0)
 ;;=3^Trochanteric bursitis, left hip
 ;;^UTILITY(U,$J,358.3,22738,1,4,0)
 ;;=4^M70.62
 ;;^UTILITY(U,$J,358.3,22738,2)
 ;;=^5013060
 ;;^UTILITY(U,$J,358.3,22739,0)
 ;;=M70.61^^83^1054^199
 ;;^UTILITY(U,$J,358.3,22739,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22739,1,3,0)
 ;;=3^Trochanteric bursitis, right hip
 ;;^UTILITY(U,$J,358.3,22739,1,4,0)
 ;;=4^M70.61
 ;;^UTILITY(U,$J,358.3,22739,2)
 ;;=^5013059
 ;;^UTILITY(U,$J,358.3,22740,0)
 ;;=M21.752^^83^1054^200
 ;;^UTILITY(U,$J,358.3,22740,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22740,1,3,0)
 ;;=3^Unequal limb length (acquired), left femur
 ;;^UTILITY(U,$J,358.3,22740,1,4,0)
 ;;=4^M21.752
 ;;^UTILITY(U,$J,358.3,22740,2)
 ;;=^5011141
 ;;^UTILITY(U,$J,358.3,22741,0)
 ;;=M21.764^^83^1054^201
 ;;^UTILITY(U,$J,358.3,22741,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22741,1,3,0)
 ;;=3^Unequal limb length (acquired), left fibula
 ;;^UTILITY(U,$J,358.3,22741,1,4,0)
 ;;=4^M21.764
 ;;^UTILITY(U,$J,358.3,22741,2)
 ;;=^5011146
 ;;^UTILITY(U,$J,358.3,22742,0)
 ;;=M21.762^^83^1054^202
 ;;^UTILITY(U,$J,358.3,22742,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22742,1,3,0)
 ;;=3^Unequal limb length (acquired), left tibia
 ;;^UTILITY(U,$J,358.3,22742,1,4,0)
 ;;=4^M21.762
 ;;^UTILITY(U,$J,358.3,22742,2)
 ;;=^5011144
 ;;^UTILITY(U,$J,358.3,22743,0)
 ;;=M21.751^^83^1054^203
 ;;^UTILITY(U,$J,358.3,22743,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22743,1,3,0)
 ;;=3^Unequal limb length (acquired), right femur
 ;;^UTILITY(U,$J,358.3,22743,1,4,0)
 ;;=4^M21.751
 ;;^UTILITY(U,$J,358.3,22743,2)
 ;;=^5011140
 ;;^UTILITY(U,$J,358.3,22744,0)
 ;;=M21.763^^83^1054^204
 ;;^UTILITY(U,$J,358.3,22744,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22744,1,3,0)
 ;;=3^Unequal limb length (acquired), right fibula
 ;;^UTILITY(U,$J,358.3,22744,1,4,0)
 ;;=4^M21.763
 ;;^UTILITY(U,$J,358.3,22744,2)
 ;;=^5011145
 ;;^UTILITY(U,$J,358.3,22745,0)
 ;;=M21.761^^83^1054^205
 ;;^UTILITY(U,$J,358.3,22745,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22745,1,3,0)
 ;;=3^Unequal limb length (acquired), right tibia
 ;;^UTILITY(U,$J,358.3,22745,1,4,0)
 ;;=4^M21.761
 ;;^UTILITY(U,$J,358.3,22745,2)
 ;;=^5011143
 ;;^UTILITY(U,$J,358.3,22746,0)
 ;;=M17.12^^83^1054^206
 ;;^UTILITY(U,$J,358.3,22746,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22746,1,3,0)
 ;;=3^Prim Osteoarth,Left Knee,Unilat
 ;;^UTILITY(U,$J,358.3,22746,1,4,0)
 ;;=4^M17.12
 ;;^UTILITY(U,$J,358.3,22746,2)
 ;;=^5010787
 ;;^UTILITY(U,$J,358.3,22747,0)
 ;;=M17.11^^83^1054^207
 ;;^UTILITY(U,$J,358.3,22747,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22747,1,3,0)
 ;;=3^Prim Osteoarth,Right Knee,Unilat
 ;;^UTILITY(U,$J,358.3,22747,1,4,0)
 ;;=4^M17.11
 ;;^UTILITY(U,$J,358.3,22747,2)
 ;;=^5010786
 ;;^UTILITY(U,$J,358.3,22748,0)
 ;;=M76.51^^83^1054^68
 ;;^UTILITY(U,$J,358.3,22748,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22748,1,3,0)
 ;;=3^Patellar tendinitis, right knee
 ;;^UTILITY(U,$J,358.3,22748,1,4,0)
 ;;=4^M76.51
 ;;^UTILITY(U,$J,358.3,22748,2)
 ;;=^5013282
 ;;^UTILITY(U,$J,358.3,22749,0)
 ;;=M24.311^^83^1054^72
 ;;^UTILITY(U,$J,358.3,22749,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22749,1,3,0)
 ;;=3^Path Dislocation,Right Shoulder NEC
 ;;^UTILITY(U,$J,358.3,22749,1,4,0)
 ;;=4^M24.311
 ;;^UTILITY(U,$J,358.3,22749,2)
 ;;=^5011346
 ;;^UTILITY(U,$J,358.3,22750,0)
 ;;=M24.312^^83^1054^70
 ;;^UTILITY(U,$J,358.3,22750,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22750,1,3,0)
 ;;=3^Path Dislocation,Left Shoulder NEC
 ;;^UTILITY(U,$J,358.3,22750,1,4,0)
 ;;=4^M24.312
 ;;^UTILITY(U,$J,358.3,22750,2)
 ;;=^5011347
 ;;^UTILITY(U,$J,358.3,22751,0)
 ;;=M24.231^^83^1054^57
 ;;^UTILITY(U,$J,358.3,22751,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22751,1,3,0)
 ;;=3^Ligament D/O,Right Wrist
 ;;^UTILITY(U,$J,358.3,22751,1,4,0)
 ;;=4^M24.231
 ;;^UTILITY(U,$J,358.3,22751,2)
 ;;=^5011329
 ;;^UTILITY(U,$J,358.3,22752,0)
 ;;=M24.232^^83^1054^55
 ;;^UTILITY(U,$J,358.3,22752,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22752,1,3,0)
 ;;=3^Ligament D/O,Left Wrist
 ;;^UTILITY(U,$J,358.3,22752,1,4,0)
 ;;=4^M24.232
 ;;^UTILITY(U,$J,358.3,22752,2)
 ;;=^5011330
 ;;^UTILITY(U,$J,358.3,22753,0)
 ;;=M24.241^^83^1054^56
 ;;^UTILITY(U,$J,358.3,22753,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22753,1,3,0)
 ;;=3^Ligament D/O,Right Hand
 ;;^UTILITY(U,$J,358.3,22753,1,4,0)
 ;;=4^M24.241
 ;;^UTILITY(U,$J,358.3,22753,2)
 ;;=^5011332
 ;;^UTILITY(U,$J,358.3,22754,0)
 ;;=M24.242^^83^1054^54
 ;;^UTILITY(U,$J,358.3,22754,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22754,1,3,0)
 ;;=3^Ligament D/O,Left Hand
 ;;^UTILITY(U,$J,358.3,22754,1,4,0)
 ;;=4^M24.242
 ;;^UTILITY(U,$J,358.3,22754,2)
 ;;=^5011333
 ;;^UTILITY(U,$J,358.3,22755,0)
 ;;=M24.411^^83^1054^92
 ;;^UTILITY(U,$J,358.3,22755,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22755,1,3,0)
 ;;=3^Recurrent Dislocation,Right Shoulder
 ;;^UTILITY(U,$J,358.3,22755,1,4,0)
 ;;=4^M24.411
 ;;^UTILITY(U,$J,358.3,22755,2)
 ;;=^5011371
 ;;^UTILITY(U,$J,358.3,22756,0)
 ;;=M24.412^^83^1054^91
 ;;^UTILITY(U,$J,358.3,22756,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22756,1,3,0)
 ;;=3^Recurrent Dislocation,Left Shoulder
 ;;^UTILITY(U,$J,358.3,22756,1,4,0)
 ;;=4^M24.412
 ;;^UTILITY(U,$J,358.3,22756,2)
 ;;=^5011372
 ;;^UTILITY(U,$J,358.3,22757,0)
 ;;=M24.511^^83^1054^35
 ;;^UTILITY(U,$J,358.3,22757,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22757,1,3,0)
 ;;=3^Contracture,Right Shoulder
 ;;^UTILITY(U,$J,358.3,22757,1,4,0)
 ;;=4^M24.511
 ;;^UTILITY(U,$J,358.3,22757,2)
 ;;=^5011402
 ;;^UTILITY(U,$J,358.3,22758,0)
 ;;=M24.512^^83^1054^33
 ;;^UTILITY(U,$J,358.3,22758,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22758,1,3,0)
 ;;=3^Contracture,Left Shoulder
 ;;^UTILITY(U,$J,358.3,22758,1,4,0)
 ;;=4^M24.512
 ;;^UTILITY(U,$J,358.3,22758,2)
 ;;=^5011403
 ;;^UTILITY(U,$J,358.3,22759,0)
 ;;=M24.541^^83^1054^34
 ;;^UTILITY(U,$J,358.3,22759,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22759,1,3,0)
 ;;=3^Contracture,Right Hand
 ;;^UTILITY(U,$J,358.3,22759,1,4,0)
 ;;=4^M24.541
 ;;^UTILITY(U,$J,358.3,22759,2)
 ;;=^5011411
 ;;^UTILITY(U,$J,358.3,22760,0)
 ;;=M24.542^^83^1054^32
 ;;^UTILITY(U,$J,358.3,22760,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22760,1,3,0)
 ;;=3^Contracture,Left Hand
 ;;^UTILITY(U,$J,358.3,22760,1,4,0)
 ;;=4^M24.542
 ;;^UTILITY(U,$J,358.3,22760,2)
 ;;=^5011412
 ;;^UTILITY(U,$J,358.3,22761,0)
 ;;=M24.321^^83^1054^71
 ;;^UTILITY(U,$J,358.3,22761,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22761,1,3,0)
 ;;=3^Path Dislocation,Right Elbow NEC
 ;;^UTILITY(U,$J,358.3,22761,1,4,0)
 ;;=4^M24.321
 ;;^UTILITY(U,$J,358.3,22761,2)
 ;;=^5011349
 ;;^UTILITY(U,$J,358.3,22762,0)
 ;;=M24.322^^83^1054^69
 ;;^UTILITY(U,$J,358.3,22762,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22762,1,3,0)
 ;;=3^Path Dislocation,Left Elbow NEC
 ;;^UTILITY(U,$J,358.3,22762,1,4,0)
 ;;=4^M24.322
 ;;^UTILITY(U,$J,358.3,22762,2)
 ;;=^5011350
 ;;^UTILITY(U,$J,358.3,22763,0)
 ;;=M20.001^^83^1054^37
 ;;^UTILITY(U,$J,358.3,22763,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22763,1,3,0)
 ;;=3^Deformity,Right Finger(s),Unspec
 ;;^UTILITY(U,$J,358.3,22763,1,4,0)
 ;;=4^M20.001
 ;;^UTILITY(U,$J,358.3,22763,2)
 ;;=^5011028
 ;;^UTILITY(U,$J,358.3,22764,0)
 ;;=M20.002^^83^1054^36
 ;;^UTILITY(U,$J,358.3,22764,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22764,1,3,0)
 ;;=3^Deformity,Left Finger(s),Unspec
 ;;^UTILITY(U,$J,358.3,22764,1,4,0)
 ;;=4^M20.002
 ;;^UTILITY(U,$J,358.3,22764,2)
 ;;=^5011029
 ;;^UTILITY(U,$J,358.3,22765,0)
 ;;=M20.011^^83^1054^59
 ;;^UTILITY(U,$J,358.3,22765,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22765,1,3,0)
 ;;=3^Mallet Finger,Right Finger(s)
 ;;^UTILITY(U,$J,358.3,22765,1,4,0)
 ;;=4^M20.011
 ;;^UTILITY(U,$J,358.3,22765,2)
 ;;=^5011030
 ;;^UTILITY(U,$J,358.3,22766,0)
 ;;=M20.012^^83^1054^58
 ;;^UTILITY(U,$J,358.3,22766,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22766,1,3,0)
 ;;=3^Mallet Finger,Left Finger(s)
 ;;^UTILITY(U,$J,358.3,22766,1,4,0)
 ;;=4^M20.012
 ;;^UTILITY(U,$J,358.3,22766,2)
 ;;=^5011031
 ;;^UTILITY(U,$J,358.3,22767,0)
 ;;=M20.021^^83^1054^9
 ;;^UTILITY(U,$J,358.3,22767,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22767,1,3,0)
 ;;=3^Boutonniere Deformity,Right Finger(s)
 ;;^UTILITY(U,$J,358.3,22767,1,4,0)
 ;;=4^M20.021
 ;;^UTILITY(U,$J,358.3,22767,2)
 ;;=^5011033
 ;;^UTILITY(U,$J,358.3,22768,0)
 ;;=M20.022^^83^1054^8
 ;;^UTILITY(U,$J,358.3,22768,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22768,1,3,0)
 ;;=3^Boutonniere Deformity,Left Finger(s)
 ;;^UTILITY(U,$J,358.3,22768,1,4,0)
 ;;=4^M20.022
 ;;^UTILITY(U,$J,358.3,22768,2)
 ;;=^5011034
 ;;^UTILITY(U,$J,358.3,22769,0)
 ;;=M20.031^^83^1054^197
 ;;^UTILITY(U,$J,358.3,22769,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22769,1,3,0)
 ;;=3^Swan-Neck Deformity,Right Finger(s)
 ;;^UTILITY(U,$J,358.3,22769,1,4,0)
 ;;=4^M20.031
 ;;^UTILITY(U,$J,358.3,22769,2)
 ;;=^5011036
 ;;^UTILITY(U,$J,358.3,22770,0)
 ;;=M20.032^^83^1054^196
 ;;^UTILITY(U,$J,358.3,22770,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22770,1,3,0)
 ;;=3^Swan-Neck Deformity,Left Finger(s)
 ;;^UTILITY(U,$J,358.3,22770,1,4,0)
 ;;=4^M20.032
 ;;^UTILITY(U,$J,358.3,22770,2)
 ;;=^5011037
 ;;^UTILITY(U,$J,358.3,22771,0)
 ;;=M21.331^^83^1054^209
 ;;^UTILITY(U,$J,358.3,22771,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22771,1,3,0)
 ;;=3^Wrist Drop,Right Wrist
 ;;^UTILITY(U,$J,358.3,22771,1,4,0)
 ;;=4^M21.331
 ;;^UTILITY(U,$J,358.3,22771,2)
 ;;=^5011107
 ;;^UTILITY(U,$J,358.3,22772,0)
 ;;=M21.332^^83^1054^208