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

IBDEI05A.m

Go to the documentation of this file.
IBDEI05A ; ; 27-JUL-2021
 ;;3.0;IB ENCOUNTER FORM IMP/EXP;;JUL 27, 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,12772,0)
 ;;=M86.662^^36^464^8
 ;;^UTILITY(U,$J,358.3,12772,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12772,1,3,0)
 ;;=3^Chr Osteomyelitis,Lt Tibia/Fibula NEC
 ;;^UTILITY(U,$J,358.3,12772,1,4,0)
 ;;=4^M86.662
 ;;^UTILITY(U,$J,358.3,12772,2)
 ;;=^5134076
 ;;^UTILITY(U,$J,358.3,12773,0)
 ;;=M86.671^^36^464^9
 ;;^UTILITY(U,$J,358.3,12773,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12773,1,3,0)
 ;;=3^Chr Osteomyelitis,Rt Ankle/Foot NEC
 ;;^UTILITY(U,$J,358.3,12773,1,4,0)
 ;;=4^M86.671
 ;;^UTILITY(U,$J,358.3,12773,2)
 ;;=^5014641
 ;;^UTILITY(U,$J,358.3,12774,0)
 ;;=M86.641^^36^464^10
 ;;^UTILITY(U,$J,358.3,12774,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12774,1,3,0)
 ;;=3^Chr Osteomyelitis,Rt Hand
 ;;^UTILITY(U,$J,358.3,12774,1,4,0)
 ;;=4^M86.641
 ;;^UTILITY(U,$J,358.3,12774,2)
 ;;=^5014636
 ;;^UTILITY(U,$J,358.3,12775,0)
 ;;=M86.621^^36^464^11
 ;;^UTILITY(U,$J,358.3,12775,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12775,1,3,0)
 ;;=3^Chr Osteomyelitis,Rt Humerus NEC
 ;;^UTILITY(U,$J,358.3,12775,1,4,0)
 ;;=4^M86.621
 ;;^UTILITY(U,$J,358.3,12775,2)
 ;;=^5014634
 ;;^UTILITY(U,$J,358.3,12776,0)
 ;;=M86.631^^36^464^12
 ;;^UTILITY(U,$J,358.3,12776,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12776,1,3,0)
 ;;=3^Chr Osteomyelitis,Rt Radius/Ulna NEC
 ;;^UTILITY(U,$J,358.3,12776,1,4,0)
 ;;=4^M86.631
 ;;^UTILITY(U,$J,358.3,12776,2)
 ;;=^5014635
 ;;^UTILITY(U,$J,358.3,12777,0)
 ;;=M86.611^^36^464^13
 ;;^UTILITY(U,$J,358.3,12777,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12777,1,3,0)
 ;;=3^Chr Osteomyelitis,Rt Shoulder NEC
 ;;^UTILITY(U,$J,358.3,12777,1,4,0)
 ;;=4^M86.611
 ;;^UTILITY(U,$J,358.3,12777,2)
 ;;=^5014631
 ;;^UTILITY(U,$J,358.3,12778,0)
 ;;=M86.651^^36^464^14
 ;;^UTILITY(U,$J,358.3,12778,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12778,1,3,0)
 ;;=3^Chr Osteomyelitis,Rt Thigh NEC
 ;;^UTILITY(U,$J,358.3,12778,1,4,0)
 ;;=4^M86.651
 ;;^UTILITY(U,$J,358.3,12778,2)
 ;;=^5014637
 ;;^UTILITY(U,$J,358.3,12779,0)
 ;;=M86.661^^36^464^15
 ;;^UTILITY(U,$J,358.3,12779,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12779,1,3,0)
 ;;=3^Chr Osteomyelitis,Rt Tibia/Fibula NEC
 ;;^UTILITY(U,$J,358.3,12779,1,4,0)
 ;;=4^M86.661
 ;;^UTILITY(U,$J,358.3,12779,2)
 ;;=^5014640
 ;;^UTILITY(U,$J,358.3,12780,0)
 ;;=M25.672^^36^464^35
 ;;^UTILITY(U,$J,358.3,12780,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12780,1,3,0)
 ;;=3^Stiffness,Lt Ankle NEC
 ;;^UTILITY(U,$J,358.3,12780,1,4,0)
 ;;=4^M25.672
 ;;^UTILITY(U,$J,358.3,12780,2)
 ;;=^5011640
 ;;^UTILITY(U,$J,358.3,12781,0)
 ;;=M25.622^^36^464^36
 ;;^UTILITY(U,$J,358.3,12781,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12781,1,3,0)
 ;;=3^Stiffness,Lt Elbow NEC
 ;;^UTILITY(U,$J,358.3,12781,1,4,0)
 ;;=4^M25.622
 ;;^UTILITY(U,$J,358.3,12781,2)
 ;;=^5011625
 ;;^UTILITY(U,$J,358.3,12782,0)
 ;;=M25.675^^36^464^37
 ;;^UTILITY(U,$J,358.3,12782,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12782,1,3,0)
 ;;=3^Stiffness,Lt Foot NEC
 ;;^UTILITY(U,$J,358.3,12782,1,4,0)
 ;;=4^M25.675
 ;;^UTILITY(U,$J,358.3,12782,2)
 ;;=^5011643
 ;;^UTILITY(U,$J,358.3,12783,0)
 ;;=M25.642^^36^464^38
 ;;^UTILITY(U,$J,358.3,12783,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12783,1,3,0)
 ;;=3^Stiffness,Lt Hand NEC
 ;;^UTILITY(U,$J,358.3,12783,1,4,0)
 ;;=4^M25.642
 ;;^UTILITY(U,$J,358.3,12783,2)
 ;;=^5011631
 ;;^UTILITY(U,$J,358.3,12784,0)
 ;;=M25.652^^36^464^39
 ;;^UTILITY(U,$J,358.3,12784,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12784,1,3,0)
 ;;=3^Stiffness,Lt Hip NEC
 ;;^UTILITY(U,$J,358.3,12784,1,4,0)
 ;;=4^M25.652
 ;;^UTILITY(U,$J,358.3,12784,2)
 ;;=^5011634
 ;;^UTILITY(U,$J,358.3,12785,0)
 ;;=M25.662^^36^464^40
 ;;^UTILITY(U,$J,358.3,12785,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12785,1,3,0)
 ;;=3^Stiffness,Lt Knee NEC
 ;;^UTILITY(U,$J,358.3,12785,1,4,0)
 ;;=4^M25.662
 ;;^UTILITY(U,$J,358.3,12785,2)
 ;;=^5011637
 ;;^UTILITY(U,$J,358.3,12786,0)
 ;;=M25.612^^36^464^41
 ;;^UTILITY(U,$J,358.3,12786,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12786,1,3,0)
 ;;=3^Stiffness,Lt Shoulder NEC
 ;;^UTILITY(U,$J,358.3,12786,1,4,0)
 ;;=4^M25.612
 ;;^UTILITY(U,$J,358.3,12786,2)
 ;;=^5011622
 ;;^UTILITY(U,$J,358.3,12787,0)
 ;;=M25.632^^36^464^42
 ;;^UTILITY(U,$J,358.3,12787,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12787,1,3,0)
 ;;=3^Stiffness,Lt Wrist NEC
 ;;^UTILITY(U,$J,358.3,12787,1,4,0)
 ;;=4^M25.632
 ;;^UTILITY(U,$J,358.3,12787,2)
 ;;=^5011628
 ;;^UTILITY(U,$J,358.3,12788,0)
 ;;=M25.671^^36^464^44
 ;;^UTILITY(U,$J,358.3,12788,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12788,1,3,0)
 ;;=3^Stiffness,Rt Ankle NEC
 ;;^UTILITY(U,$J,358.3,12788,1,4,0)
 ;;=4^M25.671
 ;;^UTILITY(U,$J,358.3,12788,2)
 ;;=^5011639
 ;;^UTILITY(U,$J,358.3,12789,0)
 ;;=M25.621^^36^464^45
 ;;^UTILITY(U,$J,358.3,12789,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12789,1,3,0)
 ;;=3^Stiffness,Rt Elbow NEC
 ;;^UTILITY(U,$J,358.3,12789,1,4,0)
 ;;=4^M25.621
 ;;^UTILITY(U,$J,358.3,12789,2)
 ;;=^5011624
 ;;^UTILITY(U,$J,358.3,12790,0)
 ;;=M25.674^^36^464^46
 ;;^UTILITY(U,$J,358.3,12790,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12790,1,3,0)
 ;;=3^Stiffness,Rt Foot NEC
 ;;^UTILITY(U,$J,358.3,12790,1,4,0)
 ;;=4^M25.674
 ;;^UTILITY(U,$J,358.3,12790,2)
 ;;=^5011642
 ;;^UTILITY(U,$J,358.3,12791,0)
 ;;=M25.641^^36^464^47
 ;;^UTILITY(U,$J,358.3,12791,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12791,1,3,0)
 ;;=3^Stiffness,Rt Hand NEC
 ;;^UTILITY(U,$J,358.3,12791,1,4,0)
 ;;=4^M25.641
 ;;^UTILITY(U,$J,358.3,12791,2)
 ;;=^5011630
 ;;^UTILITY(U,$J,358.3,12792,0)
 ;;=M25.651^^36^464^48
 ;;^UTILITY(U,$J,358.3,12792,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12792,1,3,0)
 ;;=3^Stiffness,Rt Hip NEC
 ;;^UTILITY(U,$J,358.3,12792,1,4,0)
 ;;=4^M25.651
 ;;^UTILITY(U,$J,358.3,12792,2)
 ;;=^5011633
 ;;^UTILITY(U,$J,358.3,12793,0)
 ;;=M25.661^^36^464^49
 ;;^UTILITY(U,$J,358.3,12793,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12793,1,3,0)
 ;;=3^Stiffness,Rt Knee NEC
 ;;^UTILITY(U,$J,358.3,12793,1,4,0)
 ;;=4^M25.661
 ;;^UTILITY(U,$J,358.3,12793,2)
 ;;=^5011636
 ;;^UTILITY(U,$J,358.3,12794,0)
 ;;=M25.611^^36^464^50
 ;;^UTILITY(U,$J,358.3,12794,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12794,1,3,0)
 ;;=3^Stiffness,Rt Shoulder NEC
 ;;^UTILITY(U,$J,358.3,12794,1,4,0)
 ;;=4^M25.611
 ;;^UTILITY(U,$J,358.3,12794,2)
 ;;=^5011621
 ;;^UTILITY(U,$J,358.3,12795,0)
 ;;=M25.631^^36^464^51
 ;;^UTILITY(U,$J,358.3,12795,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12795,1,3,0)
 ;;=3^Stiffness,Rt Wrist NEC
 ;;^UTILITY(U,$J,358.3,12795,1,4,0)
 ;;=4^M25.631
 ;;^UTILITY(U,$J,358.3,12795,2)
 ;;=^5011627
 ;;^UTILITY(U,$J,358.3,12796,0)
 ;;=M12.572^^36^464^52
 ;;^UTILITY(U,$J,358.3,12796,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12796,1,3,0)
 ;;=3^Traumatic Arthropathy,Lt Ankle/Foot
 ;;^UTILITY(U,$J,358.3,12796,1,4,0)
 ;;=4^M12.572
 ;;^UTILITY(U,$J,358.3,12796,2)
 ;;=^5010638
 ;;^UTILITY(U,$J,358.3,12797,0)
 ;;=M12.522^^36^464^53
 ;;^UTILITY(U,$J,358.3,12797,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12797,1,3,0)
 ;;=3^Traumatic Arthropathy,Lt Elbow
 ;;^UTILITY(U,$J,358.3,12797,1,4,0)
 ;;=4^M12.522
 ;;^UTILITY(U,$J,358.3,12797,2)
 ;;=^5010623
 ;;^UTILITY(U,$J,358.3,12798,0)
 ;;=M12.542^^36^464^54
 ;;^UTILITY(U,$J,358.3,12798,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12798,1,3,0)
 ;;=3^Traumatic Arthropathy,Lt Hand
 ;;^UTILITY(U,$J,358.3,12798,1,4,0)
 ;;=4^M12.542
 ;;^UTILITY(U,$J,358.3,12798,2)
 ;;=^5010629
 ;;^UTILITY(U,$J,358.3,12799,0)
 ;;=M12.552^^36^464^55
 ;;^UTILITY(U,$J,358.3,12799,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12799,1,3,0)
 ;;=3^Traumatic Arthropathy,Lt Hip
 ;;^UTILITY(U,$J,358.3,12799,1,4,0)
 ;;=4^M12.552
 ;;^UTILITY(U,$J,358.3,12799,2)
 ;;=^5010632
 ;;^UTILITY(U,$J,358.3,12800,0)
 ;;=M12.562^^36^464^56
 ;;^UTILITY(U,$J,358.3,12800,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12800,1,3,0)
 ;;=3^Traumatic Arthropathy,Lt Knee
 ;;^UTILITY(U,$J,358.3,12800,1,4,0)
 ;;=4^M12.562
 ;;^UTILITY(U,$J,358.3,12800,2)
 ;;=^5010635
 ;;^UTILITY(U,$J,358.3,12801,0)
 ;;=M12.512^^36^464^57
 ;;^UTILITY(U,$J,358.3,12801,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12801,1,3,0)
 ;;=3^Traumatic Arthropathy,Lt Shoulder
 ;;^UTILITY(U,$J,358.3,12801,1,4,0)
 ;;=4^M12.512
 ;;^UTILITY(U,$J,358.3,12801,2)
 ;;=^5010620
 ;;^UTILITY(U,$J,358.3,12802,0)
 ;;=M12.532^^36^464^58
 ;;^UTILITY(U,$J,358.3,12802,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12802,1,3,0)
 ;;=3^Traumatic Arthropathy,Lt Wrist
 ;;^UTILITY(U,$J,358.3,12802,1,4,0)
 ;;=4^M12.532
 ;;^UTILITY(U,$J,358.3,12802,2)
 ;;=^5010626
 ;;^UTILITY(U,$J,358.3,12803,0)
 ;;=M12.571^^36^464^59
 ;;^UTILITY(U,$J,358.3,12803,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12803,1,3,0)
 ;;=3^Traumatic Arthropathy,Rt Ankle/Foot
 ;;^UTILITY(U,$J,358.3,12803,1,4,0)
 ;;=4^M12.571
 ;;^UTILITY(U,$J,358.3,12803,2)
 ;;=^5010637
 ;;^UTILITY(U,$J,358.3,12804,0)
 ;;=M12.521^^36^464^60
 ;;^UTILITY(U,$J,358.3,12804,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12804,1,3,0)
 ;;=3^Traumatic Arthropathy,Rt Elbow
 ;;^UTILITY(U,$J,358.3,12804,1,4,0)
 ;;=4^M12.521
 ;;^UTILITY(U,$J,358.3,12804,2)
 ;;=^5010622
 ;;^UTILITY(U,$J,358.3,12805,0)
 ;;=M12.541^^36^464^61
 ;;^UTILITY(U,$J,358.3,12805,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12805,1,3,0)
 ;;=3^Traumatic Arthropathy,Rt Hand
 ;;^UTILITY(U,$J,358.3,12805,1,4,0)
 ;;=4^M12.541
 ;;^UTILITY(U,$J,358.3,12805,2)
 ;;=^5010628
 ;;^UTILITY(U,$J,358.3,12806,0)
 ;;=M12.551^^36^464^62
 ;;^UTILITY(U,$J,358.3,12806,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12806,1,3,0)
 ;;=3^Traumatic Arthropathy,Rt Hip
 ;;^UTILITY(U,$J,358.3,12806,1,4,0)
 ;;=4^M12.551
 ;;^UTILITY(U,$J,358.3,12806,2)
 ;;=^5010631
 ;;^UTILITY(U,$J,358.3,12807,0)
 ;;=M12.561^^36^464^63
 ;;^UTILITY(U,$J,358.3,12807,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12807,1,3,0)
 ;;=3^Traumatic Arthropathy,Rt Knee
 ;;^UTILITY(U,$J,358.3,12807,1,4,0)
 ;;=4^M12.561
 ;;^UTILITY(U,$J,358.3,12807,2)
 ;;=^5010634
 ;;^UTILITY(U,$J,358.3,12808,0)
 ;;=M12.511^^36^464^64
 ;;^UTILITY(U,$J,358.3,12808,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12808,1,3,0)
 ;;=3^Traumatic Arthropathy,Rt Shoulder
 ;;^UTILITY(U,$J,358.3,12808,1,4,0)
 ;;=4^M12.511
 ;;^UTILITY(U,$J,358.3,12808,2)
 ;;=^5010619
 ;;^UTILITY(U,$J,358.3,12809,0)
 ;;=M12.531^^36^464^65
 ;;^UTILITY(U,$J,358.3,12809,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12809,1,3,0)
 ;;=3^Traumatic Arthropathy,Rt Wrist
 ;;^UTILITY(U,$J,358.3,12809,1,4,0)
 ;;=4^M12.531
 ;;^UTILITY(U,$J,358.3,12809,2)
 ;;=^5010625
 ;;^UTILITY(U,$J,358.3,12810,0)
 ;;=M12.9^^36^464^1
 ;;^UTILITY(U,$J,358.3,12810,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12810,1,3,0)
 ;;=3^Arthropathy,Unspec
 ;;^UTILITY(U,$J,358.3,12810,1,4,0)
 ;;=4^M12.9
 ;;^UTILITY(U,$J,358.3,12810,2)
 ;;=^5010666
 ;;^UTILITY(U,$J,358.3,12811,0)
 ;;=M18.9^^36^464^18
 ;;^UTILITY(U,$J,358.3,12811,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12811,1,3,0)
 ;;=3^Osteoarthritis,1st Carpometacarpal Joint,Unspec
 ;;^UTILITY(U,$J,358.3,12811,1,4,0)
 ;;=4^M18.9
 ;;^UTILITY(U,$J,358.3,12811,2)
 ;;=^5010807
 ;;^UTILITY(U,$J,358.3,12812,0)
 ;;=M16.9^^36^464^19
 ;;^UTILITY(U,$J,358.3,12812,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12812,1,3,0)
 ;;=3^Osteoarthritis,Hip,Unspec
 ;;^UTILITY(U,$J,358.3,12812,1,4,0)
 ;;=4^M16.9
 ;;^UTILITY(U,$J,358.3,12812,2)
 ;;=^5010783
 ;;^UTILITY(U,$J,358.3,12813,0)
 ;;=M17.9^^36^464^20
 ;;^UTILITY(U,$J,358.3,12813,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12813,1,3,0)
 ;;=3^Osteoarthritis,Knee,Unspec
 ;;^UTILITY(U,$J,358.3,12813,1,4,0)
 ;;=4^M17.9
 ;;^UTILITY(U,$J,358.3,12813,2)
 ;;=^5010794
 ;;^UTILITY(U,$J,358.3,12814,0)
 ;;=M15.0^^36^464^24
 ;;^UTILITY(U,$J,358.3,12814,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12814,1,3,0)
 ;;=3^Primary Osteoarthritis,Generalized
 ;;^UTILITY(U,$J,358.3,12814,1,4,0)
 ;;=4^M15.0
 ;;^UTILITY(U,$J,358.3,12814,2)
 ;;=^5010762
 ;;^UTILITY(U,$J,358.3,12815,0)
 ;;=M19.072^^36^464^25
 ;;^UTILITY(U,$J,358.3,12815,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12815,1,3,0)
 ;;=3^Primary Osteoarthritis,Lt Ankle/Foot
 ;;^UTILITY(U,$J,358.3,12815,1,4,0)
 ;;=4^M19.072
 ;;^UTILITY(U,$J,358.3,12815,2)
 ;;=^5010821
 ;;^UTILITY(U,$J,358.3,12816,0)
 ;;=M19.042^^36^464^26
 ;;^UTILITY(U,$J,358.3,12816,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12816,1,3,0)
 ;;=3^Primary Osteoarthritis,Lt Hand
 ;;^UTILITY(U,$J,358.3,12816,1,4,0)
 ;;=4^M19.042
 ;;^UTILITY(U,$J,358.3,12816,2)
 ;;=^5010818
 ;;^UTILITY(U,$J,358.3,12817,0)
 ;;=M19.012^^36^464^27
 ;;^UTILITY(U,$J,358.3,12817,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12817,1,3,0)
 ;;=3^Primary Osteoarthritis,Lt Shoulder
 ;;^UTILITY(U,$J,358.3,12817,1,4,0)
 ;;=4^M19.012
 ;;^UTILITY(U,$J,358.3,12817,2)
 ;;=^5010809
 ;;^UTILITY(U,$J,358.3,12818,0)
 ;;=M19.071^^36^464^29
 ;;^UTILITY(U,$J,358.3,12818,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12818,1,3,0)
 ;;=3^Primary Osteoarthritis,Rt Ankle/Foot
 ;;^UTILITY(U,$J,358.3,12818,1,4,0)
 ;;=4^M19.071
 ;;^UTILITY(U,$J,358.3,12818,2)
 ;;=^5010820
 ;;^UTILITY(U,$J,358.3,12819,0)
 ;;=M19.041^^36^464^30
 ;;^UTILITY(U,$J,358.3,12819,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12819,1,3,0)
 ;;=3^Primary Osteoarthritis,Rt Hand
 ;;^UTILITY(U,$J,358.3,12819,1,4,0)
 ;;=4^M19.041
 ;;^UTILITY(U,$J,358.3,12819,2)
 ;;=^5010817
 ;;^UTILITY(U,$J,358.3,12820,0)
 ;;=M19.011^^36^464^31
 ;;^UTILITY(U,$J,358.3,12820,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12820,1,3,0)
 ;;=3^Primary Osteoarthritis,Rt Shoulder
 ;;^UTILITY(U,$J,358.3,12820,1,4,0)
 ;;=4^M19.011
 ;;^UTILITY(U,$J,358.3,12820,2)
 ;;=^5010808
 ;;^UTILITY(U,$J,358.3,12821,0)
 ;;=M76.12^^36^464^32
 ;;^UTILITY(U,$J,358.3,12821,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12821,1,3,0)
 ;;=3^Psoas Tendinitis,Lt Hip
 ;;^UTILITY(U,$J,358.3,12821,1,4,0)
 ;;=4^M76.12
 ;;^UTILITY(U,$J,358.3,12821,2)
 ;;=^5013271
 ;;^UTILITY(U,$J,358.3,12822,0)
 ;;=M76.11^^36^464^33
 ;;^UTILITY(U,$J,358.3,12822,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12822,1,3,0)
 ;;=3^Psoas Tendinitis,Rt Hip
 ;;^UTILITY(U,$J,358.3,12822,1,4,0)
 ;;=4^M76.11
 ;;^UTILITY(U,$J,358.3,12822,2)
 ;;=^5013270
 ;;^UTILITY(U,$J,358.3,12823,0)
 ;;=M70.62^^36^464^16
 ;;^UTILITY(U,$J,358.3,12823,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12823,1,3,0)
 ;;=3^Greater Trochanteric Bursitis,Lt Hip
 ;;^UTILITY(U,$J,358.3,12823,1,4,0)
 ;;=4^M70.62
 ;;^UTILITY(U,$J,358.3,12823,2)
 ;;=^5013060
 ;;^UTILITY(U,$J,358.3,12824,0)
 ;;=M70.61^^36^464^17
 ;;^UTILITY(U,$J,358.3,12824,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12824,1,3,0)
 ;;=3^Greater Trochanteric Bursitis,Rt Hip
 ;;^UTILITY(U,$J,358.3,12824,1,4,0)
 ;;=4^M70.61
 ;;^UTILITY(U,$J,358.3,12824,2)
 ;;=^5013059
 ;;^UTILITY(U,$J,358.3,12825,0)
 ;;=M70.51^^36^464^22
 ;;^UTILITY(U,$J,358.3,12825,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12825,1,3,0)
 ;;=3^Pes Anserine Bursitis,Right Knee
 ;;^UTILITY(U,$J,358.3,12825,1,4,0)
 ;;=4^M70.51
 ;;^UTILITY(U,$J,358.3,12825,2)
 ;;=^5013056
 ;;^UTILITY(U,$J,358.3,12826,0)
 ;;=M70.52^^36^464^21
 ;;^UTILITY(U,$J,358.3,12826,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12826,1,3,0)
 ;;=3^Pes Anserine Bursitis,Left Knee
 ;;^UTILITY(U,$J,358.3,12826,1,4,0)
 ;;=4^M70.52
 ;;^UTILITY(U,$J,358.3,12826,2)
 ;;=^5013057
 ;;^UTILITY(U,$J,358.3,12827,0)
 ;;=M19.09^^36^464^28
 ;;^UTILITY(U,$J,358.3,12827,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12827,1,3,0)
 ;;=3^Primary Osteoarthritis,Oth Specified Site
 ;;^UTILITY(U,$J,358.3,12827,1,4,0)
 ;;=4^M19.09
 ;;^UTILITY(U,$J,358.3,12827,2)
 ;;=^5159229
 ;;^UTILITY(U,$J,358.3,12828,0)
 ;;=M19.19^^36^464^23
 ;;^UTILITY(U,$J,358.3,12828,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12828,1,3,0)
 ;;=3^Post-Traumatic Osteoarthritis,Oth Specified Site
 ;;^UTILITY(U,$J,358.3,12828,1,4,0)
 ;;=4^M19.19
 ;;^UTILITY(U,$J,358.3,12828,2)
 ;;=^5159230
 ;;^UTILITY(U,$J,358.3,12829,0)
 ;;=M19.29^^36^464^34
 ;;^UTILITY(U,$J,358.3,12829,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12829,1,3,0)
 ;;=3^Secondary Osteoarthritis,Oth Specified Site
 ;;^UTILITY(U,$J,358.3,12829,1,4,0)
 ;;=4^M19.29
 ;;^UTILITY(U,$J,358.3,12829,2)
 ;;=^5159231
 ;;^UTILITY(U,$J,358.3,12830,0)
 ;;=M25.69^^36^464^43
 ;;^UTILITY(U,$J,358.3,12830,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12830,1,3,0)
 ;;=3^Stiffness,Oth Specified Joint NEC
 ;;^UTILITY(U,$J,358.3,12830,1,4,0)
 ;;=4^M25.69
 ;;^UTILITY(U,$J,358.3,12830,2)
 ;;=^5159241
 ;;^UTILITY(U,$J,358.3,12831,0)
 ;;=S22.9XXS^^36^465^3
 ;;^UTILITY(U,$J,358.3,12831,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12831,1,3,0)
 ;;=3^Fx,Bony thorax, part unspecified, sequela
 ;;^UTILITY(U,$J,358.3,12831,1,4,0)
 ;;=4^S22.9XXS
 ;;^UTILITY(U,$J,358.3,12831,2)
 ;;=^5023158
 ;;^UTILITY(U,$J,358.3,12832,0)
 ;;=S42.92XS^^36^465^9
 ;;^UTILITY(U,$J,358.3,12832,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12832,1,3,0)
 ;;=3^Fx,Left shoulder girdle, part unspecified, sequela
 ;;^UTILITY(U,$J,358.3,12832,1,4,0)
 ;;=4^S42.92XS
 ;;^UTILITY(U,$J,358.3,12832,2)
 ;;=^5027656
 ;;^UTILITY(U,$J,358.3,12833,0)
 ;;=S12.9XXS^^36^465^18
 ;;^UTILITY(U,$J,358.3,12833,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12833,1,3,0)
 ;;=3^Fx,Neck, unspecified, sequela
 ;;^UTILITY(U,$J,358.3,12833,1,4,0)
 ;;=4^S12.9XXS
 ;;^UTILITY(U,$J,358.3,12833,2)
 ;;=^5021964
 ;;^UTILITY(U,$J,358.3,12834,0)
 ;;=S42.91XS^^36^465^27
 ;;^UTILITY(U,$J,358.3,12834,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12834,1,3,0)
 ;;=3^Fx,Right shoulder girdle, part unspecified, sequela
 ;;^UTILITY(U,$J,358.3,12834,1,4,0)
 ;;=4^S42.91XS
 ;;^UTILITY(U,$J,358.3,12834,2)
 ;;=^5027649
 ;;^UTILITY(U,$J,358.3,12835,0)
 ;;=S72.001S^^36^465^22
 ;;^UTILITY(U,$J,358.3,12835,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12835,1,3,0)
 ;;=3^Fx,Right Femur Neck,Unspec Part,Sequela
 ;;^UTILITY(U,$J,358.3,12835,1,4,0)
 ;;=4^S72.001S
 ;;^UTILITY(U,$J,358.3,12835,2)
 ;;=^5037062
 ;;^UTILITY(U,$J,358.3,12836,0)
 ;;=S32.9XXS^^36^465^14
 ;;^UTILITY(U,$J,358.3,12836,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12836,1,3,0)
 ;;=3^Fx,Lumbosacral Spine & Pelvis,Unspec Parts,Sequla
 ;;^UTILITY(U,$J,358.3,12836,1,4,0)
 ;;=4^S32.9XXS
 ;;^UTILITY(U,$J,358.3,12836,2)
 ;;=^5025126
 ;;^UTILITY(U,$J,358.3,12837,0)
 ;;=S92.902S^^36^465^5
 ;;^UTILITY(U,$J,358.3,12837,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12837,1,3,0)
 ;;=3^Fx,Left foot, sequela
 ;;^UTILITY(U,$J,358.3,12837,1,4,0)
 ;;=4^S92.902S
 ;;^UTILITY(U,$J,358.3,12837,2)
 ;;=^5045591
 ;;^UTILITY(U,$J,358.3,12838,0)
 ;;=S52.92XS^^36^465^6
 ;;^UTILITY(U,$J,358.3,12838,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12838,1,3,0)
 ;;=3^Fx,Left forearm, sequela
 ;;^UTILITY(U,$J,358.3,12838,1,4,0)
 ;;=4^S52.92XS
 ;;^UTILITY(U,$J,358.3,12838,2)
 ;;=^5031189
 ;;^UTILITY(U,$J,358.3,12839,0)
 ;;=S82.92XS^^36^465^7
 ;;^UTILITY(U,$J,358.3,12839,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12839,1,3,0)
 ;;=3^Fx,Left lower leg, sequela
 ;;^UTILITY(U,$J,358.3,12839,1,4,0)
 ;;=4^S82.92XS
 ;;^UTILITY(U,$J,358.3,12839,2)
 ;;=^5136992
 ;;^UTILITY(U,$J,358.3,12840,0)
 ;;=S82.002S^^36^465^8
 ;;^UTILITY(U,$J,358.3,12840,1,0)
 ;;=^358.31IA^4^2