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

IBDEI09C.m

Go to the documentation of this file.
IBDEI09C ; ; 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,22830,1,4,0)
 ;;=4^M19.012
 ;;^UTILITY(U,$J,358.3,22830,2)
 ;;=^5010809
 ;;^UTILITY(U,$J,358.3,22831,0)
 ;;=M19.031^^71^920^142
 ;;^UTILITY(U,$J,358.3,22831,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22831,1,3,0)
 ;;=3^Primary Osteoarthritis of Right Wrist
 ;;^UTILITY(U,$J,358.3,22831,1,4,0)
 ;;=4^M19.031
 ;;^UTILITY(U,$J,358.3,22831,2)
 ;;=^5010814
 ;;^UTILITY(U,$J,358.3,22832,0)
 ;;=M19.032^^71^920^136
 ;;^UTILITY(U,$J,358.3,22832,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22832,1,3,0)
 ;;=3^Primary Osteoarthritis of Left Wrist
 ;;^UTILITY(U,$J,358.3,22832,1,4,0)
 ;;=4^M19.032
 ;;^UTILITY(U,$J,358.3,22832,2)
 ;;=^5010815
 ;;^UTILITY(U,$J,358.3,22833,0)
 ;;=M19.041^^71^920^137
 ;;^UTILITY(U,$J,358.3,22833,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22833,1,3,0)
 ;;=3^Primary Osteoarthritis of Right Hand
 ;;^UTILITY(U,$J,358.3,22833,1,4,0)
 ;;=4^M19.041
 ;;^UTILITY(U,$J,358.3,22833,2)
 ;;=^5010817
 ;;^UTILITY(U,$J,358.3,22834,0)
 ;;=M19.042^^71^920^131
 ;;^UTILITY(U,$J,358.3,22834,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22834,1,3,0)
 ;;=3^Primary Osteoarthritis of Left Hand
 ;;^UTILITY(U,$J,358.3,22834,1,4,0)
 ;;=4^M19.042
 ;;^UTILITY(U,$J,358.3,22834,2)
 ;;=^5010818
 ;;^UTILITY(U,$J,358.3,22835,0)
 ;;=M19.90^^71^920^72
 ;;^UTILITY(U,$J,358.3,22835,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22835,1,3,0)
 ;;=3^Osteoarthritis,Unspec
 ;;^UTILITY(U,$J,358.3,22835,1,4,0)
 ;;=4^M19.90
 ;;^UTILITY(U,$J,358.3,22835,2)
 ;;=^5010853
 ;;^UTILITY(U,$J,358.3,22836,0)
 ;;=M25.40^^71^920^38
 ;;^UTILITY(U,$J,358.3,22836,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22836,1,3,0)
 ;;=3^Effusion,Unspec
 ;;^UTILITY(U,$J,358.3,22836,1,4,0)
 ;;=4^M25.40
 ;;^UTILITY(U,$J,358.3,22836,2)
 ;;=^5011575
 ;;^UTILITY(U,$J,358.3,22837,0)
 ;;=M45.0^^71^920^6
 ;;^UTILITY(U,$J,358.3,22837,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22837,1,3,0)
 ;;=3^Ankylosing Spondylitis of Spine,Mult Sites
 ;;^UTILITY(U,$J,358.3,22837,1,4,0)
 ;;=4^M45.0
 ;;^UTILITY(U,$J,358.3,22837,2)
 ;;=^5011960
 ;;^UTILITY(U,$J,358.3,22838,0)
 ;;=M45.2^^71^920^3
 ;;^UTILITY(U,$J,358.3,22838,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22838,1,3,0)
 ;;=3^Ankylosing Spondylitis of Cervical Region
 ;;^UTILITY(U,$J,358.3,22838,1,4,0)
 ;;=4^M45.2
 ;;^UTILITY(U,$J,358.3,22838,2)
 ;;=^5011962
 ;;^UTILITY(U,$J,358.3,22839,0)
 ;;=M45.4^^71^920^7
 ;;^UTILITY(U,$J,358.3,22839,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22839,1,3,0)
 ;;=3^Ankylosing Spondylitis of Thoracic Region
 ;;^UTILITY(U,$J,358.3,22839,1,4,0)
 ;;=4^M45.4
 ;;^UTILITY(U,$J,358.3,22839,2)
 ;;=^5011964
 ;;^UTILITY(U,$J,358.3,22840,0)
 ;;=M45.7^^71^920^4
 ;;^UTILITY(U,$J,358.3,22840,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22840,1,3,0)
 ;;=3^Ankylosing Spondylitis of Lumbosacral Region
 ;;^UTILITY(U,$J,358.3,22840,1,4,0)
 ;;=4^M45.7
 ;;^UTILITY(U,$J,358.3,22840,2)
 ;;=^5011967
 ;;^UTILITY(U,$J,358.3,22841,0)
 ;;=M45.8^^71^920^5
 ;;^UTILITY(U,$J,358.3,22841,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22841,1,3,0)
 ;;=3^Ankylosing Spondylitis of Sacral/Sacrococcygeal Region
 ;;^UTILITY(U,$J,358.3,22841,1,4,0)
 ;;=4^M45.8
 ;;^UTILITY(U,$J,358.3,22841,2)
 ;;=^5011968
 ;;^UTILITY(U,$J,358.3,22842,0)
 ;;=M47.22^^71^920^180
 ;;^UTILITY(U,$J,358.3,22842,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22842,1,3,0)
 ;;=3^Sponylosis w/ Radiculopathy,Cervical Region NEC
 ;;^UTILITY(U,$J,358.3,22842,1,4,0)
 ;;=4^M47.22
 ;;^UTILITY(U,$J,358.3,22842,2)
 ;;=^5012061
 ;;^UTILITY(U,$J,358.3,22843,0)
 ;;=M47.24^^71^920^182
 ;;^UTILITY(U,$J,358.3,22843,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22843,1,3,0)
 ;;=3^Sponylosis w/ Radiculopathy,Thoracic Region NEC
 ;;^UTILITY(U,$J,358.3,22843,1,4,0)
 ;;=4^M47.24
 ;;^UTILITY(U,$J,358.3,22843,2)
 ;;=^5012063
 ;;^UTILITY(U,$J,358.3,22844,0)
 ;;=M47.27^^71^920^181
 ;;^UTILITY(U,$J,358.3,22844,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22844,1,3,0)
 ;;=3^Sponylosis w/ Radiculopathy,Lumbosacral Region NEC
 ;;^UTILITY(U,$J,358.3,22844,1,4,0)
 ;;=4^M47.27
 ;;^UTILITY(U,$J,358.3,22844,2)
 ;;=^5012066
 ;;^UTILITY(U,$J,358.3,22845,0)
 ;;=M47.812^^71^920^177
 ;;^UTILITY(U,$J,358.3,22845,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22845,1,3,0)
 ;;=3^Spondylosis w/o Myelopathy/Radiculopathy,Cervical Region
 ;;^UTILITY(U,$J,358.3,22845,1,4,0)
 ;;=4^M47.812
 ;;^UTILITY(U,$J,358.3,22845,2)
 ;;=^5012069
 ;;^UTILITY(U,$J,358.3,22846,0)
 ;;=M47.814^^71^920^178
 ;;^UTILITY(U,$J,358.3,22846,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22846,1,3,0)
 ;;=3^Spondylosis w/o Myelopathy/Radiculopathy,Thoracic Region
 ;;^UTILITY(U,$J,358.3,22846,1,4,0)
 ;;=4^M47.814
 ;;^UTILITY(U,$J,358.3,22846,2)
 ;;=^5012071
 ;;^UTILITY(U,$J,358.3,22847,0)
 ;;=M47.817^^71^920^179
 ;;^UTILITY(U,$J,358.3,22847,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22847,1,3,0)
 ;;=3^Spondylosis w/o Myelopathy/Radiculopathy,Lumbosacral Region
 ;;^UTILITY(U,$J,358.3,22847,1,4,0)
 ;;=4^M47.817
 ;;^UTILITY(U,$J,358.3,22847,2)
 ;;=^5012074
 ;;^UTILITY(U,$J,358.3,22848,0)
 ;;=M48.50XA^^71^920^22
 ;;^UTILITY(U,$J,358.3,22848,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22848,1,3,0)
 ;;=3^Collapsed Vertebra NEC,Site Unspec,Init Encntr
 ;;^UTILITY(U,$J,358.3,22848,1,4,0)
 ;;=4^M48.50XA
 ;;^UTILITY(U,$J,358.3,22848,2)
 ;;=^5012159
 ;;^UTILITY(U,$J,358.3,22849,0)
 ;;=M48.50XD^^71^920^23
 ;;^UTILITY(U,$J,358.3,22849,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22849,1,3,0)
 ;;=3^Collapsed Vertebra NEC,Site Unspec,Subs Encntr
 ;;^UTILITY(U,$J,358.3,22849,1,4,0)
 ;;=4^M48.50XD
 ;;^UTILITY(U,$J,358.3,22849,2)
 ;;=^5012160
 ;;^UTILITY(U,$J,358.3,22850,0)
 ;;=M48.52XA^^71^920^24
 ;;^UTILITY(U,$J,358.3,22850,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22850,1,3,0)
 ;;=3^Collapsed Vertebra,Cervical Region,Init Encntr
 ;;^UTILITY(U,$J,358.3,22850,1,4,0)
 ;;=4^M48.52XA
 ;;^UTILITY(U,$J,358.3,22850,2)
 ;;=^5012167
 ;;^UTILITY(U,$J,358.3,22851,0)
 ;;=M48.52XD^^71^920^25
 ;;^UTILITY(U,$J,358.3,22851,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22851,1,3,0)
 ;;=3^Collapsed Vertebra,Cervical Region,Subs Encntr,Rt Healing
 ;;^UTILITY(U,$J,358.3,22851,1,4,0)
 ;;=4^M48.52XD
 ;;^UTILITY(U,$J,358.3,22851,2)
 ;;=^5012168
 ;;^UTILITY(U,$J,358.3,22852,0)
 ;;=M48.54XA^^71^920^33
 ;;^UTILITY(U,$J,358.3,22852,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22852,1,3,0)
 ;;=3^Collapsed Vertebra,Throacic Region,Init Encntr
 ;;^UTILITY(U,$J,358.3,22852,1,4,0)
 ;;=4^M48.54XA
 ;;^UTILITY(U,$J,358.3,22852,2)
 ;;=^5012175
 ;;^UTILITY(U,$J,358.3,22853,0)
 ;;=M48.54XD^^71^920^34
 ;;^UTILITY(U,$J,358.3,22853,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22853,1,3,0)
 ;;=3^Collapsed Vertebra,Throacic Region,Subs Encntr
 ;;^UTILITY(U,$J,358.3,22853,1,4,0)
 ;;=4^M48.54XD
 ;;^UTILITY(U,$J,358.3,22853,2)
 ;;=^5012176
 ;;^UTILITY(U,$J,358.3,22854,0)
 ;;=M48.57XA^^71^920^26
 ;;^UTILITY(U,$J,358.3,22854,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22854,1,3,0)
 ;;=3^Collapsed Vertebra,Lumbosacral Region,Init Encntr
 ;;^UTILITY(U,$J,358.3,22854,1,4,0)
 ;;=4^M48.57XA
 ;;^UTILITY(U,$J,358.3,22854,2)
 ;;=^5012187
 ;;^UTILITY(U,$J,358.3,22855,0)
 ;;=M48.57XD^^71^920^27
 ;;^UTILITY(U,$J,358.3,22855,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22855,1,3,0)
 ;;=3^Collapsed Vertebra,Lumbosacral Region,Subs Encntr,Rt Healing
 ;;^UTILITY(U,$J,358.3,22855,1,4,0)
 ;;=4^M48.57XD
 ;;^UTILITY(U,$J,358.3,22855,2)
 ;;=^5012188
 ;;^UTILITY(U,$J,358.3,22856,0)
 ;;=M50.30^^71^920^14
 ;;^UTILITY(U,$J,358.3,22856,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22856,1,3,0)
 ;;=3^Cervical Disc Degeneration,Unspec Region
 ;;^UTILITY(U,$J,358.3,22856,1,4,0)
 ;;=4^M50.30
 ;;^UTILITY(U,$J,358.3,22856,2)
 ;;=^5012227
 ;;^UTILITY(U,$J,358.3,22857,0)
 ;;=M51.14^^71^920^55
 ;;^UTILITY(U,$J,358.3,22857,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22857,1,3,0)
 ;;=3^Intvrt Disc Disorder w/ Radiculopathy,Thoracic Region
 ;;^UTILITY(U,$J,358.3,22857,1,4,0)
 ;;=4^M51.14
 ;;^UTILITY(U,$J,358.3,22857,2)
 ;;=^5012243
 ;;^UTILITY(U,$J,358.3,22858,0)
 ;;=M51.17^^71^920^54
 ;;^UTILITY(U,$J,358.3,22858,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22858,1,3,0)
 ;;=3^Intvrt Disc Disorder w/ Radiculopathy,Lumbosacral Region
 ;;^UTILITY(U,$J,358.3,22858,1,4,0)
 ;;=4^M51.17
 ;;^UTILITY(U,$J,358.3,22858,2)
 ;;=^5012246
 ;;^UTILITY(U,$J,358.3,22859,0)
 ;;=M51.34^^71^920^53
 ;;^UTILITY(U,$J,358.3,22859,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22859,1,3,0)
 ;;=3^Intvrt Disc Degeneration,Thoracic Region
 ;;^UTILITY(U,$J,358.3,22859,1,4,0)
 ;;=4^M51.34
 ;;^UTILITY(U,$J,358.3,22859,2)
 ;;=^5012251
 ;;^UTILITY(U,$J,358.3,22860,0)
 ;;=M51.37^^71^920^52
 ;;^UTILITY(U,$J,358.3,22860,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22860,1,3,0)
 ;;=3^Intvrt Disc Degeneration,Lumbosacral Region
 ;;^UTILITY(U,$J,358.3,22860,1,4,0)
 ;;=4^M51.37
 ;;^UTILITY(U,$J,358.3,22860,2)
 ;;=^5012254
 ;;^UTILITY(U,$J,358.3,22861,0)
 ;;=M54.14^^71^920^146
 ;;^UTILITY(U,$J,358.3,22861,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22861,1,3,0)
 ;;=3^Radiculopathy,Thoracic Region
 ;;^UTILITY(U,$J,358.3,22861,1,4,0)
 ;;=4^M54.14
 ;;^UTILITY(U,$J,358.3,22861,2)
 ;;=^5012299
 ;;^UTILITY(U,$J,358.3,22862,0)
 ;;=M54.17^^71^920^145
 ;;^UTILITY(U,$J,358.3,22862,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22862,1,3,0)
 ;;=3^Radiculopathy,Lumbosacral Region
 ;;^UTILITY(U,$J,358.3,22862,1,4,0)
 ;;=4^M54.17
 ;;^UTILITY(U,$J,358.3,22862,2)
 ;;=^5012302
 ;;^UTILITY(U,$J,358.3,22863,0)
 ;;=M54.2^^71^920^15
 ;;^UTILITY(U,$J,358.3,22863,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22863,1,3,0)
 ;;=3^Cervicalgia
 ;;^UTILITY(U,$J,358.3,22863,1,4,0)
 ;;=4^M54.2
 ;;^UTILITY(U,$J,358.3,22863,2)
 ;;=^5012304
 ;;^UTILITY(U,$J,358.3,22864,0)
 ;;=M54.31^^71^920^169
 ;;^UTILITY(U,$J,358.3,22864,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22864,1,3,0)
 ;;=3^Sciatica,Right Side
 ;;^UTILITY(U,$J,358.3,22864,1,4,0)
 ;;=4^M54.31
 ;;^UTILITY(U,$J,358.3,22864,2)
 ;;=^5012306
 ;;^UTILITY(U,$J,358.3,22865,0)
 ;;=M54.32^^71^920^168
 ;;^UTILITY(U,$J,358.3,22865,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22865,1,3,0)
 ;;=3^Sciatica,Left Side
 ;;^UTILITY(U,$J,358.3,22865,1,4,0)
 ;;=4^M54.32
 ;;^UTILITY(U,$J,358.3,22865,2)
 ;;=^5012307
 ;;^UTILITY(U,$J,358.3,22866,0)
 ;;=M60.9^^71^920^66
 ;;^UTILITY(U,$J,358.3,22866,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22866,1,3,0)
 ;;=3^Myositis,Unspec
 ;;^UTILITY(U,$J,358.3,22866,1,4,0)
 ;;=4^M60.9
 ;;^UTILITY(U,$J,358.3,22866,2)
 ;;=^5012409
 ;;^UTILITY(U,$J,358.3,22867,0)
 ;;=M62.40^^71^920^36
 ;;^UTILITY(U,$J,358.3,22867,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22867,1,3,0)
 ;;=3^Contracture of Muscle,Unspec
 ;;^UTILITY(U,$J,358.3,22867,1,4,0)
 ;;=4^M62.40
 ;;^UTILITY(U,$J,358.3,22867,2)
 ;;=^5012631
 ;;^UTILITY(U,$J,358.3,22868,0)
 ;;=M62.831^^71^920^64
 ;;^UTILITY(U,$J,358.3,22868,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22868,1,3,0)
 ;;=3^Muscle Spasm of Calf
 ;;^UTILITY(U,$J,358.3,22868,1,4,0)
 ;;=4^M62.831
 ;;^UTILITY(U,$J,358.3,22868,2)
 ;;=^5012681
 ;;^UTILITY(U,$J,358.3,22869,0)
 ;;=M62.838^^71^920^62
 ;;^UTILITY(U,$J,358.3,22869,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22869,1,3,0)
 ;;=3^Muscle Spasm NEC
 ;;^UTILITY(U,$J,358.3,22869,1,4,0)
 ;;=4^M62.838
 ;;^UTILITY(U,$J,358.3,22869,2)
 ;;=^5012682
 ;;^UTILITY(U,$J,358.3,22870,0)
 ;;=M70.21^^71^920^68
 ;;^UTILITY(U,$J,358.3,22870,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22870,1,3,0)
 ;;=3^Olecranon Bursitis,Right Elbow
 ;;^UTILITY(U,$J,358.3,22870,1,4,0)
 ;;=4^M70.21
 ;;^UTILITY(U,$J,358.3,22870,2)
 ;;=^5013047
 ;;^UTILITY(U,$J,358.3,22871,0)
 ;;=M70.22^^71^920^67
 ;;^UTILITY(U,$J,358.3,22871,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22871,1,3,0)
 ;;=3^Olecranon Bursitis,Left Elbow
 ;;^UTILITY(U,$J,358.3,22871,1,4,0)
 ;;=4^M70.22
 ;;^UTILITY(U,$J,358.3,22871,2)
 ;;=^5013048
 ;;^UTILITY(U,$J,358.3,22872,0)
 ;;=M71.161^^71^920^50
 ;;^UTILITY(U,$J,358.3,22872,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22872,1,3,0)
 ;;=3^Infective Bursitis,Right Knee
 ;;^UTILITY(U,$J,358.3,22872,1,4,0)
 ;;=4^M71.161
 ;;^UTILITY(U,$J,358.3,22872,2)
 ;;=^5013139
 ;;^UTILITY(U,$J,358.3,22873,0)
 ;;=M71.162^^71^920^49
 ;;^UTILITY(U,$J,358.3,22873,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22873,1,3,0)
 ;;=3^Infective Bursitis,Left Knee
 ;;^UTILITY(U,$J,358.3,22873,1,4,0)
 ;;=4^M71.162
 ;;^UTILITY(U,$J,358.3,22873,2)
 ;;=^5013140
 ;;^UTILITY(U,$J,358.3,22874,0)
 ;;=M72.0^^71^920^122
 ;;^UTILITY(U,$J,358.3,22874,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22874,1,3,0)
 ;;=3^Palmar Fascial Fibromatosis
 ;;^UTILITY(U,$J,358.3,22874,1,4,0)
 ;;=4^M72.0
 ;;^UTILITY(U,$J,358.3,22874,2)
 ;;=^5013233
 ;;^UTILITY(U,$J,358.3,22875,0)
 ;;=M75.111^^71^920^167
 ;;^UTILITY(U,$J,358.3,22875,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22875,1,3,0)
 ;;=3^Rotator Cuff Syndrome,Right Shoulder
 ;;^UTILITY(U,$J,358.3,22875,1,4,0)
 ;;=4^M75.111
 ;;^UTILITY(U,$J,358.3,22875,2)
 ;;=^5013245
 ;;^UTILITY(U,$J,358.3,22876,0)
 ;;=M75.112^^71^920^166
 ;;^UTILITY(U,$J,358.3,22876,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22876,1,3,0)
 ;;=3^Rotator Cuff Syndrome,Left Shoulder
 ;;^UTILITY(U,$J,358.3,22876,1,4,0)
 ;;=4^M75.112
 ;;^UTILITY(U,$J,358.3,22876,2)
 ;;=^5013246
 ;;^UTILITY(U,$J,358.3,22877,0)
 ;;=M75.51^^71^920^10
 ;;^UTILITY(U,$J,358.3,22877,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22877,1,3,0)
 ;;=3^Bursitis of Right Shoulder
 ;;^UTILITY(U,$J,358.3,22877,1,4,0)
 ;;=4^M75.51
 ;;^UTILITY(U,$J,358.3,22877,2)
 ;;=^5133690
 ;;^UTILITY(U,$J,358.3,22878,0)
 ;;=M75.52^^71^920^9
 ;;^UTILITY(U,$J,358.3,22878,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22878,1,3,0)
 ;;=3^Bursitis of Left Shoulder
 ;;^UTILITY(U,$J,358.3,22878,1,4,0)
 ;;=4^M75.52
 ;;^UTILITY(U,$J,358.3,22878,2)
 ;;=^5133691
 ;;^UTILITY(U,$J,358.3,22879,0)
 ;;=M77.11^^71^920^58
 ;;^UTILITY(U,$J,358.3,22879,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22879,1,3,0)
 ;;=3^Lateral Epicondylitis,Right Elbow
 ;;^UTILITY(U,$J,358.3,22879,1,4,0)
 ;;=4^M77.11
 ;;^UTILITY(U,$J,358.3,22879,2)
 ;;=^5013304
 ;;^UTILITY(U,$J,358.3,22880,0)
 ;;=M77.12^^71^920^57
 ;;^UTILITY(U,$J,358.3,22880,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22880,1,3,0)
 ;;=3^Lateral Epicondylitis,Left Elbow
 ;;^UTILITY(U,$J,358.3,22880,1,4,0)
 ;;=4^M77.12
 ;;^UTILITY(U,$J,358.3,22880,2)
 ;;=^5013305
 ;;^UTILITY(U,$J,358.3,22881,0)
 ;;=M79.7^^71^920^40
 ;;^UTILITY(U,$J,358.3,22881,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22881,1,3,0)
 ;;=3^Fibromyalgia
 ;;^UTILITY(U,$J,358.3,22881,1,4,0)
 ;;=4^M79.7
 ;;^UTILITY(U,$J,358.3,22881,2)
 ;;=^46261
 ;;^UTILITY(U,$J,358.3,22882,0)
 ;;=M80.08XA^^71^920^1
 ;;^UTILITY(U,$J,358.3,22882,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22882,1,3,0)
 ;;=3^Age-Related Osteoporosis w/ Vertebra Fx,Init Encntr
 ;;^UTILITY(U,$J,358.3,22882,1,4,0)
 ;;=4^M80.08XA
 ;;^UTILITY(U,$J,358.3,22882,2)
 ;;=^5013495
 ;;^UTILITY(U,$J,358.3,22883,0)
 ;;=M80.08XD^^71^920^2
 ;;^UTILITY(U,$J,358.3,22883,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22883,1,3,0)
 ;;=3^Age-Related Osteoporosis w/ Vertebra Fx,Subs Encntr
 ;;^UTILITY(U,$J,358.3,22883,1,4,0)
 ;;=4^M80.08XD
 ;;^UTILITY(U,$J,358.3,22883,2)
 ;;=^5013496
 ;;^UTILITY(U,$J,358.3,22884,0)
 ;;=M84.48XA^^71^920^123
 ;;^UTILITY(U,$J,358.3,22884,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22884,1,3,0)
 ;;=3^Pathological Fx,Oth Site,Init Encntr
 ;;^UTILITY(U,$J,358.3,22884,1,4,0)
 ;;=4^M84.48XA
 ;;^UTILITY(U,$J,358.3,22884,2)
 ;;=^5014016
 ;;^UTILITY(U,$J,358.3,22885,0)
 ;;=M84.48XD^^71^920^124
 ;;^UTILITY(U,$J,358.3,22885,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22885,1,3,0)
 ;;=3^Pathological Fx,Oth Site,Subs Encntr
 ;;^UTILITY(U,$J,358.3,22885,1,4,0)
 ;;=4^M84.48XD
 ;;^UTILITY(U,$J,358.3,22885,2)
 ;;=^5014017
 ;;^UTILITY(U,$J,358.3,22886,0)
 ;;=M87.011^^71^920^48
 ;;^UTILITY(U,$J,358.3,22886,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22886,1,3,0)
 ;;=3^Idiopathic Aseptic Necrosis of Right Shoulder
 ;;^UTILITY(U,$J,358.3,22886,1,4,0)
 ;;=4^M87.011
 ;;^UTILITY(U,$J,358.3,22886,2)
 ;;=^5014658
 ;;^UTILITY(U,$J,358.3,22887,0)
 ;;=M87.012^^71^920^45
 ;;^UTILITY(U,$J,358.3,22887,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22887,1,3,0)
 ;;=3^Idiopathic Aseptic Necrosis of Left Shoulder
 ;;^UTILITY(U,$J,358.3,22887,1,4,0)
 ;;=4^M87.012
 ;;^UTILITY(U,$J,358.3,22887,2)
 ;;=^5014659
 ;;^UTILITY(U,$J,358.3,22888,0)
 ;;=M87.050^^71^920^46
 ;;^UTILITY(U,$J,358.3,22888,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22888,1,3,0)
 ;;=3^Idiopathic Aseptic Necrosis of Pelvis
 ;;^UTILITY(U,$J,358.3,22888,1,4,0)
 ;;=4^M87.050
 ;;^UTILITY(U,$J,358.3,22888,2)
 ;;=^5014679
 ;;^UTILITY(U,$J,358.3,22889,0)
 ;;=M87.051^^71^920^47
 ;;^UTILITY(U,$J,358.3,22889,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22889,1,3,0)
 ;;=3^Idiopathic Aseptic Necrosis of Right Femur
 ;;^UTILITY(U,$J,358.3,22889,1,4,0)
 ;;=4^M87.051
 ;;^UTILITY(U,$J,358.3,22889,2)
 ;;=^5014680
 ;;^UTILITY(U,$J,358.3,22890,0)
 ;;=M87.052^^71^920^44
 ;;^UTILITY(U,$J,358.3,22890,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22890,1,3,0)
 ;;=3^Idiopathic Aseptic Necrosis of Left Femur
 ;;^UTILITY(U,$J,358.3,22890,1,4,0)
 ;;=4^M87.052
 ;;^UTILITY(U,$J,358.3,22890,2)
 ;;=^5014681
 ;;^UTILITY(U,$J,358.3,22891,0)
 ;;=M87.111^^71^920^78
 ;;^UTILITY(U,$J,358.3,22891,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22891,1,3,0)
 ;;=3^Osteonecrosis d/t Drugs,Right Shoulder
 ;;^UTILITY(U,$J,358.3,22891,1,4,0)
 ;;=4^M87.111
 ;;^UTILITY(U,$J,358.3,22891,2)
 ;;=^5014701
 ;;^UTILITY(U,$J,358.3,22892,0)
 ;;=M87.112^^71^920^75
 ;;^UTILITY(U,$J,358.3,22892,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22892,1,3,0)
 ;;=3^Osteonecrosis d/t Drugs,Left Shoulder
 ;;^UTILITY(U,$J,358.3,22892,1,4,0)
 ;;=4^M87.112
 ;;^UTILITY(U,$J,358.3,22892,2)
 ;;=^5014702
 ;;^UTILITY(U,$J,358.3,22893,0)
 ;;=M87.150^^71^920^76
 ;;^UTILITY(U,$J,358.3,22893,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22893,1,3,0)
 ;;=3^Osteonecrosis d/t Drugs,Pelvis
 ;;^UTILITY(U,$J,358.3,22893,1,4,0)
 ;;=4^M87.150
 ;;^UTILITY(U,$J,358.3,22893,2)
 ;;=^5014722
 ;;^UTILITY(U,$J,358.3,22894,0)
 ;;=M87.151^^71^920^77
 ;;^UTILITY(U,$J,358.3,22894,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22894,1,3,0)
 ;;=3^Osteonecrosis d/t Drugs,Right Femur
 ;;^UTILITY(U,$J,358.3,22894,1,4,0)
 ;;=4^M87.151
 ;;^UTILITY(U,$J,358.3,22894,2)
 ;;=^5014723
 ;;^UTILITY(U,$J,358.3,22895,0)
 ;;=M87.152^^71^920^74
 ;;^UTILITY(U,$J,358.3,22895,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22895,1,3,0)
 ;;=3^Osteonecrosis d/t Drugs,Left Femur
 ;;^UTILITY(U,$J,358.3,22895,1,4,0)
 ;;=4^M87.152
 ;;^UTILITY(U,$J,358.3,22895,2)
 ;;=^5014724
 ;;^UTILITY(U,$J,358.3,22896,0)
 ;;=M87.180^^71^920^73
 ;;^UTILITY(U,$J,358.3,22896,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22896,1,3,0)
 ;;=3^Osteonecrosis d/t Drugs,Jaw
 ;;^UTILITY(U,$J,358.3,22896,1,4,0)
 ;;=4^M87.180
 ;;^UTILITY(U,$J,358.3,22896,2)
 ;;=^5014741
 ;;^UTILITY(U,$J,358.3,22897,0)
 ;;=M87.311^^71^920^174
 ;;^UTILITY(U,$J,358.3,22897,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22897,1,3,0)
 ;;=3^Secondary Osteonecrosis,Right Shoulder