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

IBDEI086.m

Go to the documentation of this file. 
  1. IBDEI086 ; ; 01-AUG-2022
  1.  ;;3.0;IB ENCOUNTER FORM IMP/EXP;;AUG 01, 2022
  1.  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
  1. Q Q
  1.  ;;^UTILITY(U,$J,358.3,19912,1,4,0)
  1.  ;;=4^M05.79
  1.  ;;^UTILITY(U,$J,358.3,19912,2)
  1.  ;;=^5010022
  1.  ;;^UTILITY(U,$J,358.3,19913,0)
  1.  ;;=M05.771^^65^806^11
  1.  ;;^UTILITY(U,$J,358.3,19913,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,19913,1,3,0)
  1.  ;;=3^Rheum Arthritis w/ Rheum Factor,Rt Ankle/Foot
  1.  ;;^UTILITY(U,$J,358.3,19913,1,4,0)
  1.  ;;=4^M05.771
  1.  ;;^UTILITY(U,$J,358.3,19913,2)
  1.  ;;=^5010019
  1.  ;;^UTILITY(U,$J,358.3,19914,0)
  1.  ;;=M05.721^^65^806^12
  1.  ;;^UTILITY(U,$J,358.3,19914,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,19914,1,3,0)
  1.  ;;=3^Rheum Arthritis w/ Rheum Factor,Rt Elbow
  1.  ;;^UTILITY(U,$J,358.3,19914,1,4,0)
  1.  ;;=4^M05.721
  1.  ;;^UTILITY(U,$J,358.3,19914,2)
  1.  ;;=^5010004
  1.  ;;^UTILITY(U,$J,358.3,19915,0)
  1.  ;;=M05.741^^65^806^13
  1.  ;;^UTILITY(U,$J,358.3,19915,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,19915,1,3,0)
  1.  ;;=3^Rheum Arthritis w/ Rheum Factor,Rt Hand
  1.  ;;^UTILITY(U,$J,358.3,19915,1,4,0)
  1.  ;;=4^M05.741
  1.  ;;^UTILITY(U,$J,358.3,19915,2)
  1.  ;;=^5010010
  1.  ;;^UTILITY(U,$J,358.3,19916,0)
  1.  ;;=M05.751^^65^806^14
  1.  ;;^UTILITY(U,$J,358.3,19916,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,19916,1,3,0)
  1.  ;;=3^Rheum Arthritis w/ Rheum Factor,Rt Hip
  1.  ;;^UTILITY(U,$J,358.3,19916,1,4,0)
  1.  ;;=4^M05.751
  1.  ;;^UTILITY(U,$J,358.3,19916,2)
  1.  ;;=^5010013
  1.  ;;^UTILITY(U,$J,358.3,19917,0)
  1.  ;;=M05.761^^65^806^15
  1.  ;;^UTILITY(U,$J,358.3,19917,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,19917,1,3,0)
  1.  ;;=3^Rheum Arthritis w/ Rheum Factor,Rt Knee
  1.  ;;^UTILITY(U,$J,358.3,19917,1,4,0)
  1.  ;;=4^M05.761
  1.  ;;^UTILITY(U,$J,358.3,19917,2)
  1.  ;;=^5010016
  1.  ;;^UTILITY(U,$J,358.3,19918,0)
  1.  ;;=M05.711^^65^806^16
  1.  ;;^UTILITY(U,$J,358.3,19918,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,19918,1,3,0)
  1.  ;;=3^Rheum Arthritis w/ Rheum Factor,Rt Shoulder
  1.  ;;^UTILITY(U,$J,358.3,19918,1,4,0)
  1.  ;;=4^M05.711
  1.  ;;^UTILITY(U,$J,358.3,19918,2)
  1.  ;;=^5010001
  1.  ;;^UTILITY(U,$J,358.3,19919,0)
  1.  ;;=M05.731^^65^806^17
  1.  ;;^UTILITY(U,$J,358.3,19919,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,19919,1,3,0)
  1.  ;;=3^Rheum Arthritis w/ Rheum Factor,Rt Wrist
  1.  ;;^UTILITY(U,$J,358.3,19919,1,4,0)
  1.  ;;=4^M05.731
  1.  ;;^UTILITY(U,$J,358.3,19919,2)
  1.  ;;=^5010007
  1.  ;;^UTILITY(U,$J,358.3,19920,0)
  1.  ;;=M06.072^^65^806^18
  1.  ;;^UTILITY(U,$J,358.3,19920,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,19920,1,3,0)
  1.  ;;=3^Rheum Arthritis w/o Rheum Factor,Lt Ankle/Foot
  1.  ;;^UTILITY(U,$J,358.3,19920,1,4,0)
  1.  ;;=4^M06.072
  1.  ;;^UTILITY(U,$J,358.3,19920,2)
  1.  ;;=^5010067
  1.  ;;^UTILITY(U,$J,358.3,19921,0)
  1.  ;;=M06.022^^65^806^19
  1.  ;;^UTILITY(U,$J,358.3,19921,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,19921,1,3,0)
  1.  ;;=3^Rheum Arthritis w/o Rheum Factor,Lt Elbow
  1.  ;;^UTILITY(U,$J,358.3,19921,1,4,0)
  1.  ;;=4^M06.022
  1.  ;;^UTILITY(U,$J,358.3,19921,2)
  1.  ;;=^5010052
  1.  ;;^UTILITY(U,$J,358.3,19922,0)
  1.  ;;=M06.042^^65^806^20
  1.  ;;^UTILITY(U,$J,358.3,19922,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,19922,1,3,0)
  1.  ;;=3^Rheum Arthritis w/o Rheum Factor,Lt Hand
  1.  ;;^UTILITY(U,$J,358.3,19922,1,4,0)
  1.  ;;=4^M06.042
  1.  ;;^UTILITY(U,$J,358.3,19922,2)
  1.  ;;=^5010058
  1.  ;;^UTILITY(U,$J,358.3,19923,0)
  1.  ;;=M06.052^^65^806^21
  1.  ;;^UTILITY(U,$J,358.3,19923,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,19923,1,3,0)
  1.  ;;=3^Rheum Arthritis w/o Rheum Factor,Lt Hip
  1.  ;;^UTILITY(U,$J,358.3,19923,1,4,0)
  1.  ;;=4^M06.052
  1.  ;;^UTILITY(U,$J,358.3,19923,2)
  1.  ;;=^5010061
  1.  ;;^UTILITY(U,$J,358.3,19924,0)
  1.  ;;=M06.062^^65^806^22
  1.  ;;^UTILITY(U,$J,358.3,19924,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,19924,1,3,0)
  1.  ;;=3^Rheum Arthritis w/o Rheum Factor,Lt Knee
  1.  ;;^UTILITY(U,$J,358.3,19924,1,4,0)
  1.  ;;=4^M06.062
  1.  ;;^UTILITY(U,$J,358.3,19924,2)
  1.  ;;=^5010064
  1.  ;;^UTILITY(U,$J,358.3,19925,0)
  1.  ;;=M06.012^^65^806^23
  1.  ;;^UTILITY(U,$J,358.3,19925,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,19925,1,3,0)
  1.  ;;=3^Rheum Arthritis w/o Rheum Factor,Lt Shoulder
  1.  ;;^UTILITY(U,$J,358.3,19925,1,4,0)
  1.  ;;=4^M06.012
  1.  ;;^UTILITY(U,$J,358.3,19925,2)
  1.  ;;=^5010049
  1.  ;;^UTILITY(U,$J,358.3,19926,0)
  1.  ;;=M06.032^^65^806^24
  1.  ;;^UTILITY(U,$J,358.3,19926,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,19926,1,3,0)
  1.  ;;=3^Rheum Arthritis w/o Rheum Factor,Lt Wrist
  1.  ;;^UTILITY(U,$J,358.3,19926,1,4,0)
  1.  ;;=4^M06.032
  1.  ;;^UTILITY(U,$J,358.3,19926,2)
  1.  ;;=^5010055
  1.  ;;^UTILITY(U,$J,358.3,19927,0)
  1.  ;;=M06.09^^65^806^25
  1.  ;;^UTILITY(U,$J,358.3,19927,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,19927,1,3,0)
  1.  ;;=3^Rheum Arthritis w/o Rheum Factor,Mult Sites
  1.  ;;^UTILITY(U,$J,358.3,19927,1,4,0)
  1.  ;;=4^M06.09
  1.  ;;^UTILITY(U,$J,358.3,19927,2)
  1.  ;;=^5010070
  1.  ;;^UTILITY(U,$J,358.3,19928,0)
  1.  ;;=M06.071^^65^806^27
  1.  ;;^UTILITY(U,$J,358.3,19928,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,19928,1,3,0)
  1.  ;;=3^Rheum Arthritis w/o Rheum Factor,Rt Ankle/Foot
  1.  ;;^UTILITY(U,$J,358.3,19928,1,4,0)
  1.  ;;=4^M06.071
  1.  ;;^UTILITY(U,$J,358.3,19928,2)
  1.  ;;=^5010066
  1.  ;;^UTILITY(U,$J,358.3,19929,0)
  1.  ;;=M06.021^^65^806^28
  1.  ;;^UTILITY(U,$J,358.3,19929,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,19929,1,3,0)
  1.  ;;=3^Rheum Arthritis w/o Rheum Factor,Rt Elbow
  1.  ;;^UTILITY(U,$J,358.3,19929,1,4,0)
  1.  ;;=4^M06.021
  1.  ;;^UTILITY(U,$J,358.3,19929,2)
  1.  ;;=^5010051
  1.  ;;^UTILITY(U,$J,358.3,19930,0)
  1.  ;;=M06.041^^65^806^29
  1.  ;;^UTILITY(U,$J,358.3,19930,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,19930,1,3,0)
  1.  ;;=3^Rheum Arthritis w/o Rheum Factor,Rt Hand
  1.  ;;^UTILITY(U,$J,358.3,19930,1,4,0)
  1.  ;;=4^M06.041
  1.  ;;^UTILITY(U,$J,358.3,19930,2)
  1.  ;;=^5010057
  1.  ;;^UTILITY(U,$J,358.3,19931,0)
  1.  ;;=M06.051^^65^806^30
  1.  ;;^UTILITY(U,$J,358.3,19931,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,19931,1,3,0)
  1.  ;;=3^Rheum Arthritis w/o Rheum Factor,Rt Hip
  1.  ;;^UTILITY(U,$J,358.3,19931,1,4,0)
  1.  ;;=4^M06.051
  1.  ;;^UTILITY(U,$J,358.3,19931,2)
  1.  ;;=^5010060
  1.  ;;^UTILITY(U,$J,358.3,19932,0)
  1.  ;;=M06.061^^65^806^31
  1.  ;;^UTILITY(U,$J,358.3,19932,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,19932,1,3,0)
  1.  ;;=3^Rheum Arthritis w/o Rheum Factor,Rt Knee
  1.  ;;^UTILITY(U,$J,358.3,19932,1,4,0)
  1.  ;;=4^M06.061
  1.  ;;^UTILITY(U,$J,358.3,19932,2)
  1.  ;;=^5010063
  1.  ;;^UTILITY(U,$J,358.3,19933,0)
  1.  ;;=M06.011^^65^806^32
  1.  ;;^UTILITY(U,$J,358.3,19933,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,19933,1,3,0)
  1.  ;;=3^Rheum Arthritis w/o Rheum Factor,Rt Shoulder
  1.  ;;^UTILITY(U,$J,358.3,19933,1,4,0)
  1.  ;;=4^M06.011
  1.  ;;^UTILITY(U,$J,358.3,19933,2)
  1.  ;;=^5010048
  1.  ;;^UTILITY(U,$J,358.3,19934,0)
  1.  ;;=M06.031^^65^806^33
  1.  ;;^UTILITY(U,$J,358.3,19934,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,19934,1,3,0)
  1.  ;;=3^Rheum Arthritis w/o Rheum Factor,Rt Wrist
  1.  ;;^UTILITY(U,$J,358.3,19934,1,4,0)
  1.  ;;=4^M06.031
  1.  ;;^UTILITY(U,$J,358.3,19934,2)
  1.  ;;=^5010054
  1.  ;;^UTILITY(U,$J,358.3,19935,0)
  1.  ;;=M06.08^^65^806^34
  1.  ;;^UTILITY(U,$J,358.3,19935,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,19935,1,3,0)
  1.  ;;=3^Rheum Arthritis w/o Rheum Factor,Vertebrae
  1.  ;;^UTILITY(U,$J,358.3,19935,1,4,0)
  1.  ;;=4^M06.08
  1.  ;;^UTILITY(U,$J,358.3,19935,2)
  1.  ;;=^5010069
  1.  ;;^UTILITY(U,$J,358.3,19936,0)
  1.  ;;=M06.272^^65^806^37
  1.  ;;^UTILITY(U,$J,358.3,19936,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,19936,1,3,0)
  1.  ;;=3^Rheumatoid Bursitis,Lt Ankle/Foot
  1.  ;;^UTILITY(U,$J,358.3,19936,1,4,0)
  1.  ;;=4^M06.272
  1.  ;;^UTILITY(U,$J,358.3,19936,2)
  1.  ;;=^5010092
  1.  ;;^UTILITY(U,$J,358.3,19937,0)
  1.  ;;=M06.222^^65^806^38
  1.  ;;^UTILITY(U,$J,358.3,19937,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,19937,1,3,0)
  1.  ;;=3^Rheumatoid Bursitis,Lt Elbow
  1.  ;;^UTILITY(U,$J,358.3,19937,1,4,0)
  1.  ;;=4^M06.222
  1.  ;;^UTILITY(U,$J,358.3,19937,2)
  1.  ;;=^5010077
  1.  ;;^UTILITY(U,$J,358.3,19938,0)
  1.  ;;=M06.242^^65^806^39
  1.  ;;^UTILITY(U,$J,358.3,19938,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,19938,1,3,0)
  1.  ;;=3^Rheumatoid Bursitis,Lt Hand
  1.  ;;^UTILITY(U,$J,358.3,19938,1,4,0)
  1.  ;;=4^M06.242
  1.  ;;^UTILITY(U,$J,358.3,19938,2)
  1.  ;;=^5010083
  1.  ;;^UTILITY(U,$J,358.3,19939,0)
  1.  ;;=M06.252^^65^806^40
  1.  ;;^UTILITY(U,$J,358.3,19939,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,19939,1,3,0)
  1.  ;;=3^Rheumatoid Bursitis,Lt Hip
  1.  ;;^UTILITY(U,$J,358.3,19939,1,4,0)
  1.  ;;=4^M06.252
  1.  ;;^UTILITY(U,$J,358.3,19939,2)
  1.  ;;=^5010086
  1.  ;;^UTILITY(U,$J,358.3,19940,0)
  1.  ;;=M06.262^^65^806^41
  1.  ;;^UTILITY(U,$J,358.3,19940,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,19940,1,3,0)
  1.  ;;=3^Rheumatoid Bursitis,Lt Knee
  1.  ;;^UTILITY(U,$J,358.3,19940,1,4,0)
  1.  ;;=4^M06.262
  1.  ;;^UTILITY(U,$J,358.3,19940,2)
  1.  ;;=^5010089
  1.  ;;^UTILITY(U,$J,358.3,19941,0)
  1.  ;;=M06.212^^65^806^42
  1.  ;;^UTILITY(U,$J,358.3,19941,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,19941,1,3,0)
  1.  ;;=3^Rheumatoid Bursitis,Lt Shoulder
  1.  ;;^UTILITY(U,$J,358.3,19941,1,4,0)
  1.  ;;=4^M06.212
  1.  ;;^UTILITY(U,$J,358.3,19941,2)
  1.  ;;=^5010074
  1.  ;;^UTILITY(U,$J,358.3,19942,0)
  1.  ;;=M06.232^^65^806^43
  1.  ;;^UTILITY(U,$J,358.3,19942,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,19942,1,3,0)
  1.  ;;=3^Rheumatoid Bursitis,Lt Wrist
  1.  ;;^UTILITY(U,$J,358.3,19942,1,4,0)
  1.  ;;=4^M06.232
  1.  ;;^UTILITY(U,$J,358.3,19942,2)
  1.  ;;=^5010080
  1.  ;;^UTILITY(U,$J,358.3,19943,0)
  1.  ;;=M06.29^^65^806^44
  1.  ;;^UTILITY(U,$J,358.3,19943,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,19943,1,3,0)
  1.  ;;=3^Rheumatoid Bursitis,Multiple Sites
  1.  ;;^UTILITY(U,$J,358.3,19943,1,4,0)
  1.  ;;=4^M06.29
  1.  ;;^UTILITY(U,$J,358.3,19943,2)
  1.  ;;=^5010095
  1.  ;;^UTILITY(U,$J,358.3,19944,0)
  1.  ;;=M06.271^^65^806^45
  1.  ;;^UTILITY(U,$J,358.3,19944,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,19944,1,3,0)
  1.  ;;=3^Rheumatoid Bursitis,Rt Ankle/Foot
  1.  ;;^UTILITY(U,$J,358.3,19944,1,4,0)
  1.  ;;=4^M06.271
  1.  ;;^UTILITY(U,$J,358.3,19944,2)
  1.  ;;=^5010091
  1.  ;;^UTILITY(U,$J,358.3,19945,0)
  1.  ;;=M06.221^^65^806^46
  1.  ;;^UTILITY(U,$J,358.3,19945,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,19945,1,3,0)
  1.  ;;=3^Rheumatoid Bursitis,Rt Elbow
  1.  ;;^UTILITY(U,$J,358.3,19945,1,4,0)
  1.  ;;=4^M06.221
  1.  ;;^UTILITY(U,$J,358.3,19945,2)
  1.  ;;=^5010076
  1.  ;;^UTILITY(U,$J,358.3,19946,0)
  1.  ;;=M06.241^^65^806^47
  1.  ;;^UTILITY(U,$J,358.3,19946,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,19946,1,3,0)
  1.  ;;=3^Rheumatoid Bursitis,Rt Hand
  1.  ;;^UTILITY(U,$J,358.3,19946,1,4,0)
  1.  ;;=4^M06.241
  1.  ;;^UTILITY(U,$J,358.3,19946,2)
  1.  ;;=^5010082
  1.  ;;^UTILITY(U,$J,358.3,19947,0)
  1.  ;;=M06.251^^65^806^48
  1.  ;;^UTILITY(U,$J,358.3,19947,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,19947,1,3,0)
  1.  ;;=3^Rheumatoid Bursitis,Rt Hip
  1.  ;;^UTILITY(U,$J,358.3,19947,1,4,0)
  1.  ;;=4^M06.251
  1.  ;;^UTILITY(U,$J,358.3,19947,2)
  1.  ;;=^5010085
  1.  ;;^UTILITY(U,$J,358.3,19948,0)
  1.  ;;=M06.261^^65^806^49
  1.  ;;^UTILITY(U,$J,358.3,19948,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,19948,1,3,0)
  1.  ;;=3^Rheumatoid Bursitis,Rt Knee
  1.  ;;^UTILITY(U,$J,358.3,19948,1,4,0)
  1.  ;;=4^M06.261
  1.  ;;^UTILITY(U,$J,358.3,19948,2)
  1.  ;;=^5010088
  1.  ;;^UTILITY(U,$J,358.3,19949,0)
  1.  ;;=M06.211^^65^806^50
  1.  ;;^UTILITY(U,$J,358.3,19949,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,19949,1,3,0)
  1.  ;;=3^Rheumatoid Bursitis,Rt Shoulder
  1.  ;;^UTILITY(U,$J,358.3,19949,1,4,0)
  1.  ;;=4^M06.211
  1.  ;;^UTILITY(U,$J,358.3,19949,2)
  1.  ;;=^5010073
  1.  ;;^UTILITY(U,$J,358.3,19950,0)
  1.  ;;=M06.231^^65^806^51
  1.  ;;^UTILITY(U,$J,358.3,19950,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,19950,1,3,0)
  1.  ;;=3^Rheumatoid Bursitis,Rt Wrist
  1.  ;;^UTILITY(U,$J,358.3,19950,1,4,0)
  1.  ;;=4^M06.231
  1.  ;;^UTILITY(U,$J,358.3,19950,2)
  1.  ;;=^5010079
  1.  ;;^UTILITY(U,$J,358.3,19951,0)
  1.  ;;=M06.28^^65^806^52
  1.  ;;^UTILITY(U,$J,358.3,19951,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,19951,1,3,0)
  1.  ;;=3^Rheumatoid Bursitis,Vertebrae
  1.  ;;^UTILITY(U,$J,358.3,19951,1,4,0)
  1.  ;;=4^M06.28
  1.  ;;^UTILITY(U,$J,358.3,19951,2)
  1.  ;;=^5010094
  1.  ;;^UTILITY(U,$J,358.3,19952,0)
  1.  ;;=M05.472^^65^806^53
  1.  ;;^UTILITY(U,$J,358.3,19952,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,19952,1,3,0)
  1.  ;;=3^Rheumatoid Myopathy w/ Rheum Arthritis,Lt Ankle/Foot
  1.  ;;^UTILITY(U,$J,358.3,19952,1,4,0)
  1.  ;;=4^M05.472
  1.  ;;^UTILITY(U,$J,358.3,19952,2)
  1.  ;;=^5009951
  1.  ;;^UTILITY(U,$J,358.3,19953,0)
  1.  ;;=M05.422^^65^806^54
  1.  ;;^UTILITY(U,$J,358.3,19953,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,19953,1,3,0)
  1.  ;;=3^Rheumatoid Myopathy w/ Rheum Arthritis,Lt Elbow
  1.  ;;^UTILITY(U,$J,358.3,19953,1,4,0)
  1.  ;;=4^M05.422
  1.  ;;^UTILITY(U,$J,358.3,19953,2)
  1.  ;;=^5009936
  1.  ;;^UTILITY(U,$J,358.3,19954,0)
  1.  ;;=M05.442^^65^806^55
  1.  ;;^UTILITY(U,$J,358.3,19954,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,19954,1,3,0)
  1.  ;;=3^Rheumatoid Myopathy w/ Rheum Arthritis,Lt Hand
  1.  ;;^UTILITY(U,$J,358.3,19954,1,4,0)
  1.  ;;=4^M05.442
  1.  ;;^UTILITY(U,$J,358.3,19954,2)
  1.  ;;=^5009942
  1.  ;;^UTILITY(U,$J,358.3,19955,0)
  1.  ;;=M05.452^^65^806^56
  1.  ;;^UTILITY(U,$J,358.3,19955,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,19955,1,3,0)
  1.  ;;=3^Rheumatoid Myopathy w/ Rheum Arthritis,Lt Hip
  1.  ;;^UTILITY(U,$J,358.3,19955,1,4,0)
  1.  ;;=4^M05.452
  1.  ;;^UTILITY(U,$J,358.3,19955,2)
  1.  ;;=^5009945
  1.  ;;^UTILITY(U,$J,358.3,19956,0)
  1.  ;;=M05.462^^65^806^57
  1.  ;;^UTILITY(U,$J,358.3,19956,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,19956,1,3,0)
  1.  ;;=3^Rheumatoid Myopathy w/ Rheum Arthritis,Lt Knee
  1.  ;;^UTILITY(U,$J,358.3,19956,1,4,0)
  1.  ;;=4^M05.462
  1.  ;;^UTILITY(U,$J,358.3,19956,2)
  1.  ;;=^5009948
  1.  ;;^UTILITY(U,$J,358.3,19957,0)
  1.  ;;=M05.412^^65^806^58
  1.  ;;^UTILITY(U,$J,358.3,19957,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,19957,1,3,0)
  1.  ;;=3^Rheumatoid Myopathy w/ Rheum Arthritis,Lt Shoulder
  1.  ;;^UTILITY(U,$J,358.3,19957,1,4,0)
  1.  ;;=4^M05.412
  1.  ;;^UTILITY(U,$J,358.3,19957,2)
  1.  ;;=^5009933
  1.  ;;^UTILITY(U,$J,358.3,19958,0)
  1.  ;;=M05.432^^65^806^59
  1.  ;;^UTILITY(U,$J,358.3,19958,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,19958,1,3,0)
  1.  ;;=3^Rheumatoid Myopathy w/ Rheum Arthritis,Lt Wrist
  1.  ;;^UTILITY(U,$J,358.3,19958,1,4,0)
  1.  ;;=4^M05.432
  1.  ;;^UTILITY(U,$J,358.3,19958,2)
  1.  ;;=^5009939
  1.  ;;^UTILITY(U,$J,358.3,19959,0)
  1.  ;;=M05.49^^65^806^60
  1.  ;;^UTILITY(U,$J,358.3,19959,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,19959,1,3,0)
  1.  ;;=3^Rheumatoid Myopathy w/ Rheum Arthritis,Mult Sites
  1.  ;;^UTILITY(U,$J,358.3,19959,1,4,0)
  1.  ;;=4^M05.49
  1.  ;;^UTILITY(U,$J,358.3,19959,2)
  1.  ;;=^5009953
  1.  ;;^UTILITY(U,$J,358.3,19960,0)
  1.  ;;=M05.471^^65^806^61
  1.  ;;^UTILITY(U,$J,358.3,19960,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,19960,1,3,0)
  1.  ;;=3^Rheumatoid Myopathy w/ Rheum Arthritis,Rt Ankle/Foot
  1.  ;;^UTILITY(U,$J,358.3,19960,1,4,0)
  1.  ;;=4^M05.471
  1.  ;;^UTILITY(U,$J,358.3,19960,2)
  1.  ;;=^5009950
  1.  ;;^UTILITY(U,$J,358.3,19961,0)
  1.  ;;=M05.421^^65^806^62
  1.  ;;^UTILITY(U,$J,358.3,19961,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,19961,1,3,0)
  1.  ;;=3^Rheumatoid Myopathy w/ Rheum Arthritis,Rt Elbow
  1.  ;;^UTILITY(U,$J,358.3,19961,1,4,0)
  1.  ;;=4^M05.421
  1.  ;;^UTILITY(U,$J,358.3,19961,2)
  1.  ;;=^5009935
  1.  ;;^UTILITY(U,$J,358.3,19962,0)
  1.  ;;=M05.441^^65^806^63
  1.  ;;^UTILITY(U,$J,358.3,19962,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,19962,1,3,0)
  1.  ;;=3^Rheumatoid Myopathy w/ Rheum Arthritis,Rt Hand
  1.  ;;^UTILITY(U,$J,358.3,19962,1,4,0)
  1.  ;;=4^M05.441
  1.  ;;^UTILITY(U,$J,358.3,19962,2)
  1.  ;;=^5009941
  1.  ;;^UTILITY(U,$J,358.3,19963,0)
  1.  ;;=M05.451^^65^806^64
  1.  ;;^UTILITY(U,$J,358.3,19963,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,19963,1,3,0)
  1.  ;;=3^Rheumatoid Myopathy w/ Rheum Arthritis,Rt Hip
  1.  ;;^UTILITY(U,$J,358.3,19963,1,4,0)
  1.  ;;=4^M05.451
  1.  ;;^UTILITY(U,$J,358.3,19963,2)
  1.  ;;=^5009944
  1.  ;;^UTILITY(U,$J,358.3,19964,0)
  1.  ;;=M05.461^^65^806^65
  1.  ;;^UTILITY(U,$J,358.3,19964,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,19964,1,3,0)
  1.  ;;=3^Rheumatoid Myopathy w/ Rheum Arthritis,Rt Knee
  1.  ;;^UTILITY(U,$J,358.3,19964,1,4,0)
  1.  ;;=4^M05.461
  1.  ;;^UTILITY(U,$J,358.3,19964,2)
  1.  ;;=^5009947
  1.  ;;^UTILITY(U,$J,358.3,19965,0)
  1.  ;;=M05.411^^65^806^66
  1.  ;;^UTILITY(U,$J,358.3,19965,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,19965,1,3,0)
  1.  ;;=3^Rheumatoid Myopathy w/ Rheum Arthritis,Rt Shoulder
  1.  ;;^UTILITY(U,$J,358.3,19965,1,4,0)
  1.  ;;=4^M05.411
  1.  ;;^UTILITY(U,$J,358.3,19965,2)
  1.  ;;=^5009932
  1.  ;;^UTILITY(U,$J,358.3,19966,0)
  1.  ;;=M05.431^^65^806^67
  1.  ;;^UTILITY(U,$J,358.3,19966,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,19966,1,3,0)
  1.  ;;=3^Rheumatoid Myopathy w/ Rheum Arthritis,Rt Wrist
  1.  ;;^UTILITY(U,$J,358.3,19966,1,4,0)
  1.  ;;=4^M05.431
  1.  ;;^UTILITY(U,$J,358.3,19966,2)
  1.  ;;=^5009938
  1.  ;;^UTILITY(U,$J,358.3,19967,0)
  1.  ;;=M06.372^^65^806^68
  1.  ;;^UTILITY(U,$J,358.3,19967,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,19967,1,3,0)
  1.  ;;=3^Rheumatoid Nodule,Lt Ankle/Foot
  1.  ;;^UTILITY(U,$J,358.3,19967,1,4,0)
  1.  ;;=4^M06.372
  1.  ;;^UTILITY(U,$J,358.3,19967,2)
  1.  ;;=^5010116
  1.  ;;^UTILITY(U,$J,358.3,19968,0)
  1.  ;;=M06.322^^65^806^69
  1.  ;;^UTILITY(U,$J,358.3,19968,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,19968,1,3,0)
  1.  ;;=3^Rheumatoid Nodule,Lt Elbow
  1.  ;;^UTILITY(U,$J,358.3,19968,1,4,0)
  1.  ;;=4^M06.322
  1.  ;;^UTILITY(U,$J,358.3,19968,2)
  1.  ;;=^5010101
  1.  ;;^UTILITY(U,$J,358.3,19969,0)
  1.  ;;=M06.342^^65^806^70
  1.  ;;^UTILITY(U,$J,358.3,19969,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,19969,1,3,0)
  1.  ;;=3^Rheumatoid Nodule,Lt Hand
  1.  ;;^UTILITY(U,$J,358.3,19969,1,4,0)
  1.  ;;=4^M06.342
  1.  ;;^UTILITY(U,$J,358.3,19969,2)
  1.  ;;=^5010107
  1.  ;;^UTILITY(U,$J,358.3,19970,0)
  1.  ;;=M06.352^^65^806^71
  1.  ;;^UTILITY(U,$J,358.3,19970,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,19970,1,3,0)
  1.  ;;=3^Rheumatoid Nodule,Lt Hip
  1.  ;;^UTILITY(U,$J,358.3,19970,1,4,0)
  1.  ;;=4^M06.352
  1.  ;;^UTILITY(U,$J,358.3,19970,2)
  1.  ;;=^5010110
  1.  ;;^UTILITY(U,$J,358.3,19971,0)
  1.  ;;=M06.362^^65^806^72
  1.  ;;^UTILITY(U,$J,358.3,19971,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,19971,1,3,0)
  1.  ;;=3^Rheumatoid Nodule,Lt Knee
  1.  ;;^UTILITY(U,$J,358.3,19971,1,4,0)
  1.  ;;=4^M06.362
  1.  ;;^UTILITY(U,$J,358.3,19971,2)
  1.  ;;=^5010113
  1.  ;;^UTILITY(U,$J,358.3,19972,0)
  1.  ;;=M06.312^^65^806^73
  1.  ;;^UTILITY(U,$J,358.3,19972,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,19972,1,3,0)
  1.  ;;=3^Rheumatoid Nodule,Lt Shoulder
  1.  ;;^UTILITY(U,$J,358.3,19972,1,4,0)
  1.  ;;=4^M06.312
  1.  ;;^UTILITY(U,$J,358.3,19972,2)
  1.  ;;=^5010098
  1.  ;;^UTILITY(U,$J,358.3,19973,0)
  1.  ;;=M06.332^^65^806^74
  1.  ;;^UTILITY(U,$J,358.3,19973,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,19973,1,3,0)
  1.  ;;=3^Rheumatoid Nodule,Lt Wrist
  1.  ;;^UTILITY(U,$J,358.3,19973,1,4,0)
  1.  ;;=4^M06.332
  1.  ;;^UTILITY(U,$J,358.3,19973,2)
  1.  ;;=^5010104
  1.  ;;^UTILITY(U,$J,358.3,19974,0)
  1.  ;;=M06.39^^65^806^75
  1.  ;;^UTILITY(U,$J,358.3,19974,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,19974,1,3,0)
  1.  ;;=3^Rheumatoid Nodule,Multiple Sites
  1.  ;;^UTILITY(U,$J,358.3,19974,1,4,0)
  1.  ;;=4^M06.39
  1.  ;;^UTILITY(U,$J,358.3,19974,2)
  1.  ;;=^5010119
  1.  ;;^UTILITY(U,$J,358.3,19975,0)
  1.  ;;=M06.371^^65^806^76
  1.  ;;^UTILITY(U,$J,358.3,19975,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,19975,1,3,0)
  1.  ;;=3^Rheumatoid Nodule,Rt Ankle/Foot
  1.  ;;^UTILITY(U,$J,358.3,19975,1,4,0)
  1.  ;;=4^M06.371
  1.  ;;^UTILITY(U,$J,358.3,19975,2)
  1.  ;;=^5010115
  1.  ;;^UTILITY(U,$J,358.3,19976,0)
  1.  ;;=M06.321^^65^806^77
  1.  ;;^UTILITY(U,$J,358.3,19976,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,19976,1,3,0)
  1.  ;;=3^Rheumatoid Nodule,Rt Elbow
  1.  ;;^UTILITY(U,$J,358.3,19976,1,4,0)
  1.  ;;=4^M06.321
  1.  ;;^UTILITY(U,$J,358.3,19976,2)
  1.  ;;=^5010100
  1.  ;;^UTILITY(U,$J,358.3,19977,0)
  1.  ;;=M06.341^^65^806^78
  1.  ;;^UTILITY(U,$J,358.3,19977,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,19977,1,3,0)
  1.  ;;=3^Rheumatoid Nodule,Rt Hand
  1.  ;;^UTILITY(U,$J,358.3,19977,1,4,0)
  1.  ;;=4^M06.341
  1.  ;;^UTILITY(U,$J,358.3,19977,2)
  1.  ;;=^5010106
  1.  ;;^UTILITY(U,$J,358.3,19978,0)
  1.  ;;=M06.351^^65^806^79
  1.  ;;^UTILITY(U,$J,358.3,19978,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,19978,1,3,0)
  1.  ;;=3^Rheumatoid Nodule,Rt Hip
  1.  ;;^UTILITY(U,$J,358.3,19978,1,4,0)
  1.  ;;=4^M06.351
  1.  ;;^UTILITY(U,$J,358.3,19978,2)
  1.  ;;=^5010109
  1.  ;;^UTILITY(U,$J,358.3,19979,0)
  1.  ;;=M06.361^^65^806^80
  1.  ;;^UTILITY(U,$J,358.3,19979,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,19979,1,3,0)
  1.  ;;=3^Rheumatoid Nodule,Rt Knee