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

IBDEI08H.m

Go to the documentation of this file.
  1. IBDEI08H ; ; 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,20676,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,20676,1,3,0)
  1. ;;=3^MDD,Recurrent,Unspec
  1. ;;^UTILITY(U,$J,358.3,20676,1,4,0)
  1. ;;=4^F33.9
  1. ;;^UTILITY(U,$J,358.3,20676,2)
  1. ;;=^5003537
  1. ;;^UTILITY(U,$J,358.3,20677,0)
  1. ;;=F25.0^^68^850^17
  1. ;;^UTILITY(U,$J,358.3,20677,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,20677,1,3,0)
  1. ;;=3^Schizoaffective Disorder,Bipolar Type
  1. ;;^UTILITY(U,$J,358.3,20677,1,4,0)
  1. ;;=4^F25.0
  1. ;;^UTILITY(U,$J,358.3,20677,2)
  1. ;;=^5003480
  1. ;;^UTILITY(U,$J,358.3,20678,0)
  1. ;;=F25.1^^68^850^18
  1. ;;^UTILITY(U,$J,358.3,20678,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,20678,1,3,0)
  1. ;;=3^Schizoaffective Disorder,Depressive Type
  1. ;;^UTILITY(U,$J,358.3,20678,1,4,0)
  1. ;;=4^F25.1
  1. ;;^UTILITY(U,$J,358.3,20678,2)
  1. ;;=^5003481
  1. ;;^UTILITY(U,$J,358.3,20679,0)
  1. ;;=F25.9^^68^850^19
  1. ;;^UTILITY(U,$J,358.3,20679,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,20679,1,3,0)
  1. ;;=3^Schizoaffective Disorder,Unspec
  1. ;;^UTILITY(U,$J,358.3,20679,1,4,0)
  1. ;;=4^F25.9
  1. ;;^UTILITY(U,$J,358.3,20679,2)
  1. ;;=^331857
  1. ;;^UTILITY(U,$J,358.3,20680,0)
  1. ;;=F32.0^^68^850^10
  1. ;;^UTILITY(U,$J,358.3,20680,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,20680,1,3,0)
  1. ;;=3^MDD,Single Episode,Mild
  1. ;;^UTILITY(U,$J,358.3,20680,1,4,0)
  1. ;;=4^F32.0
  1. ;;^UTILITY(U,$J,358.3,20680,2)
  1. ;;=^5003521
  1. ;;^UTILITY(U,$J,358.3,20681,0)
  1. ;;=F32.1^^68^850^11
  1. ;;^UTILITY(U,$J,358.3,20681,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,20681,1,3,0)
  1. ;;=3^MDD,Single Episode,Moderate
  1. ;;^UTILITY(U,$J,358.3,20681,1,4,0)
  1. ;;=4^F32.1
  1. ;;^UTILITY(U,$J,358.3,20681,2)
  1. ;;=^5003522
  1. ;;^UTILITY(U,$J,358.3,20682,0)
  1. ;;=F32.2^^68^850^13
  1. ;;^UTILITY(U,$J,358.3,20682,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,20682,1,3,0)
  1. ;;=3^MDD,Single Episode,Severe w/o Psychotic Feat
  1. ;;^UTILITY(U,$J,358.3,20682,1,4,0)
  1. ;;=4^F32.2
  1. ;;^UTILITY(U,$J,358.3,20682,2)
  1. ;;=^5003523
  1. ;;^UTILITY(U,$J,358.3,20683,0)
  1. ;;=F32.3^^68^850^12
  1. ;;^UTILITY(U,$J,358.3,20683,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,20683,1,3,0)
  1. ;;=3^MDD,Single Episode,Severe w/ Psychotic Feat
  1. ;;^UTILITY(U,$J,358.3,20683,1,4,0)
  1. ;;=4^F32.3
  1. ;;^UTILITY(U,$J,358.3,20683,2)
  1. ;;=^5003524
  1. ;;^UTILITY(U,$J,358.3,20684,0)
  1. ;;=F32.A^^68^850^5
  1. ;;^UTILITY(U,$J,358.3,20684,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,20684,1,3,0)
  1. ;;=3^Depression,Unspec
  1. ;;^UTILITY(U,$J,358.3,20684,1,4,0)
  1. ;;=4^F32.A
  1. ;;^UTILITY(U,$J,358.3,20684,2)
  1. ;;=^5161153
  1. ;;^UTILITY(U,$J,358.3,20685,0)
  1. ;;=M76.62^^68^851^1
  1. ;;^UTILITY(U,$J,358.3,20685,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,20685,1,3,0)
  1. ;;=3^Achilles Tendinitis,Lt Leg
  1. ;;^UTILITY(U,$J,358.3,20685,1,4,0)
  1. ;;=4^M76.62
  1. ;;^UTILITY(U,$J,358.3,20685,2)
  1. ;;=^5013286
  1. ;;^UTILITY(U,$J,358.3,20686,0)
  1. ;;=M76.61^^68^851^2
  1. ;;^UTILITY(U,$J,358.3,20686,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,20686,1,3,0)
  1. ;;=3^Achilles Tendinitis,Rt Leg
  1. ;;^UTILITY(U,$J,358.3,20686,1,4,0)
  1. ;;=4^M76.61
  1. ;;^UTILITY(U,$J,358.3,20686,2)
  1. ;;=^5013285
  1. ;;^UTILITY(U,$J,358.3,20687,0)
  1. ;;=M75.02^^68^851^3
  1. ;;^UTILITY(U,$J,358.3,20687,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,20687,1,3,0)
  1. ;;=3^Adhesive Capsulitis,Lt Shoulder
  1. ;;^UTILITY(U,$J,358.3,20687,1,4,0)
  1. ;;=4^M75.02
  1. ;;^UTILITY(U,$J,358.3,20687,2)
  1. ;;=^5013240
  1. ;;^UTILITY(U,$J,358.3,20688,0)
  1. ;;=M75.01^^68^851^4
  1. ;;^UTILITY(U,$J,358.3,20688,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,20688,1,3,0)
  1. ;;=3^Adhesive Capsulitis,Rt Shoulder
  1. ;;^UTILITY(U,$J,358.3,20688,1,4,0)
  1. ;;=4^M75.01
  1. ;;^UTILITY(U,$J,358.3,20688,2)
  1. ;;=^5013239
  1. ;;^UTILITY(U,$J,358.3,20689,0)
  1. ;;=M75.22^^68^851^5
  1. ;;^UTILITY(U,$J,358.3,20689,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,20689,1,3,0)
  1. ;;=3^Bicipital Tendinitis,Lt Shoulder
  1. ;;^UTILITY(U,$J,358.3,20689,1,4,0)
  1. ;;=4^M75.22
  1. ;;^UTILITY(U,$J,358.3,20689,2)
  1. ;;=^5013252
  1. ;;^UTILITY(U,$J,358.3,20690,0)
  1. ;;=M75.21^^68^851^6
  1. ;;^UTILITY(U,$J,358.3,20690,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,20690,1,3,0)
  1. ;;=3^Bicipital Tendinitis,Rt Shoulder
  1. ;;^UTILITY(U,$J,358.3,20690,1,4,0)
  1. ;;=4^M75.21
  1. ;;^UTILITY(U,$J,358.3,20690,2)
  1. ;;=^5013251
  1. ;;^UTILITY(U,$J,358.3,20691,0)
  1. ;;=M75.52^^68^851^7
  1. ;;^UTILITY(U,$J,358.3,20691,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,20691,1,3,0)
  1. ;;=3^Bursitis,Lt Shoulder
  1. ;;^UTILITY(U,$J,358.3,20691,1,4,0)
  1. ;;=4^M75.52
  1. ;;^UTILITY(U,$J,358.3,20691,2)
  1. ;;=^5133691
  1. ;;^UTILITY(U,$J,358.3,20692,0)
  1. ;;=M75.51^^68^851^8
  1. ;;^UTILITY(U,$J,358.3,20692,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,20692,1,3,0)
  1. ;;=3^Bursitis,Rt Shoulder
  1. ;;^UTILITY(U,$J,358.3,20692,1,4,0)
  1. ;;=4^M75.51
  1. ;;^UTILITY(U,$J,358.3,20692,2)
  1. ;;=^5133690
  1. ;;^UTILITY(U,$J,358.3,20693,0)
  1. ;;=M75.32^^68^851^9
  1. ;;^UTILITY(U,$J,358.3,20693,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,20693,1,3,0)
  1. ;;=3^Calcific Tendinitis,Lt Shoulder
  1. ;;^UTILITY(U,$J,358.3,20693,1,4,0)
  1. ;;=4^M75.32
  1. ;;^UTILITY(U,$J,358.3,20693,2)
  1. ;;=^5013255
  1. ;;^UTILITY(U,$J,358.3,20694,0)
  1. ;;=M75.31^^68^851^10
  1. ;;^UTILITY(U,$J,358.3,20694,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,20694,1,3,0)
  1. ;;=3^Calcific Tendinitis,Rt Shoulder
  1. ;;^UTILITY(U,$J,358.3,20694,1,4,0)
  1. ;;=4^M75.31
  1. ;;^UTILITY(U,$J,358.3,20694,2)
  1. ;;=^5013254
  1. ;;^UTILITY(U,$J,358.3,20695,0)
  1. ;;=M22.42^^68^851^13
  1. ;;^UTILITY(U,$J,358.3,20695,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,20695,1,3,0)
  1. ;;=3^Chondromalacia Patellae,Lt Knee
  1. ;;^UTILITY(U,$J,358.3,20695,1,4,0)
  1. ;;=4^M22.42
  1. ;;^UTILITY(U,$J,358.3,20695,2)
  1. ;;=^5011187
  1. ;;^UTILITY(U,$J,358.3,20696,0)
  1. ;;=M22.41^^68^851^14
  1. ;;^UTILITY(U,$J,358.3,20696,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,20696,1,3,0)
  1. ;;=3^Chondromalacia Patellae,Rt Knee
  1. ;;^UTILITY(U,$J,358.3,20696,1,4,0)
  1. ;;=4^M22.41
  1. ;;^UTILITY(U,$J,358.3,20696,2)
  1. ;;=^5011186
  1. ;;^UTILITY(U,$J,358.3,20697,0)
  1. ;;=M23.52^^68^851^15
  1. ;;^UTILITY(U,$J,358.3,20697,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,20697,1,3,0)
  1. ;;=3^Chr Instability of Lt Knee
  1. ;;^UTILITY(U,$J,358.3,20697,1,4,0)
  1. ;;=4^M23.52
  1. ;;^UTILITY(U,$J,358.3,20697,2)
  1. ;;=^5011255
  1. ;;^UTILITY(U,$J,358.3,20698,0)
  1. ;;=M23.51^^68^851^16
  1. ;;^UTILITY(U,$J,358.3,20698,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,20698,1,3,0)
  1. ;;=3^Chr Instability of Rt Knee
  1. ;;^UTILITY(U,$J,358.3,20698,1,4,0)
  1. ;;=4^M23.51
  1. ;;^UTILITY(U,$J,358.3,20698,2)
  1. ;;=^5011254
  1. ;;^UTILITY(U,$J,358.3,20699,0)
  1. ;;=T20.40XS^^68^851^17
  1. ;;^UTILITY(U,$J,358.3,20699,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,20699,1,3,0)
  1. ;;=3^Corrosion Head/Face/Neck,Unspec Degree/Site,Sequla
  1. ;;^UTILITY(U,$J,358.3,20699,1,4,0)
  1. ;;=4^T20.40XS
  1. ;;^UTILITY(U,$J,358.3,20699,2)
  1. ;;=^5046773
  1. ;;^UTILITY(U,$J,358.3,20700,0)
  1. ;;=M62.9^^68^851^40
  1. ;;^UTILITY(U,$J,358.3,20700,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,20700,1,3,0)
  1. ;;=3^Muscle Disorder,Unspec
  1. ;;^UTILITY(U,$J,358.3,20700,1,4,0)
  1. ;;=4^M62.9
  1. ;;^UTILITY(U,$J,358.3,20700,2)
  1. ;;=^5012684
  1. ;;^UTILITY(U,$J,358.3,20701,0)
  1. ;;=M25.40^^68^851^20
  1. ;;^UTILITY(U,$J,358.3,20701,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,20701,1,3,0)
  1. ;;=3^Effusion,Joint Unspec
  1. ;;^UTILITY(U,$J,358.3,20701,1,4,0)
  1. ;;=4^M25.40
  1. ;;^UTILITY(U,$J,358.3,20701,2)
  1. ;;=^5011575
  1. ;;^UTILITY(U,$J,358.3,20702,0)
  1. ;;=M21.42^^68^851^21
  1. ;;^UTILITY(U,$J,358.3,20702,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,20702,1,3,0)
  1. ;;=3^Flat Foot,Lt Foot
  1. ;;^UTILITY(U,$J,358.3,20702,1,4,0)
  1. ;;=4^M21.42
  1. ;;^UTILITY(U,$J,358.3,20702,2)
  1. ;;=^5011115
  1. ;;^UTILITY(U,$J,358.3,20703,0)
  1. ;;=M21.41^^68^851^22
  1. ;;^UTILITY(U,$J,358.3,20703,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,20703,1,3,0)
  1. ;;=3^Flat Foot,Rt Foot
  1. ;;^UTILITY(U,$J,358.3,20703,1,4,0)
  1. ;;=4^M21.41
  1. ;;^UTILITY(U,$J,358.3,20703,2)
  1. ;;=^5011114
  1. ;;^UTILITY(U,$J,358.3,20704,0)
  1. ;;=M76.22^^68^851^23
  1. ;;^UTILITY(U,$J,358.3,20704,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,20704,1,3,0)
  1. ;;=3^Iliac Crest Spur,Lt Hip
  1. ;;^UTILITY(U,$J,358.3,20704,1,4,0)
  1. ;;=4^M76.22
  1. ;;^UTILITY(U,$J,358.3,20704,2)
  1. ;;=^5013274
  1. ;;^UTILITY(U,$J,358.3,20705,0)
  1. ;;=M76.21^^68^851^24
  1. ;;^UTILITY(U,$J,358.3,20705,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,20705,1,3,0)
  1. ;;=3^Iliac Crest Spur,Rt Hip
  1. ;;^UTILITY(U,$J,358.3,20705,1,4,0)
  1. ;;=4^M76.21
  1. ;;^UTILITY(U,$J,358.3,20705,2)
  1. ;;=^5013273
  1. ;;^UTILITY(U,$J,358.3,20706,0)
  1. ;;=M77.12^^68^851^31
  1. ;;^UTILITY(U,$J,358.3,20706,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,20706,1,3,0)
  1. ;;=3^Lateral Epicondylitis,Lt Elbow
  1. ;;^UTILITY(U,$J,358.3,20706,1,4,0)
  1. ;;=4^M77.12
  1. ;;^UTILITY(U,$J,358.3,20706,2)
  1. ;;=^5013305
  1. ;;^UTILITY(U,$J,358.3,20707,0)
  1. ;;=M77.11^^68^851^32
  1. ;;^UTILITY(U,$J,358.3,20707,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,20707,1,3,0)
  1. ;;=3^Lateral Epicondylitis,Rt Elbow
  1. ;;^UTILITY(U,$J,358.3,20707,1,4,0)
  1. ;;=4^M77.11
  1. ;;^UTILITY(U,$J,358.3,20707,2)
  1. ;;=^5013304
  1. ;;^UTILITY(U,$J,358.3,20708,0)
  1. ;;=M25.572^^68^851^45
  1. ;;^UTILITY(U,$J,358.3,20708,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,20708,1,3,0)
  1. ;;=3^Pain,Lt Ankle/Foot Joints
  1. ;;^UTILITY(U,$J,358.3,20708,1,4,0)
  1. ;;=4^M25.572
  1. ;;^UTILITY(U,$J,358.3,20708,2)
  1. ;;=^5011618
  1. ;;^UTILITY(U,$J,358.3,20709,0)
  1. ;;=M25.522^^68^851^46
  1. ;;^UTILITY(U,$J,358.3,20709,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,20709,1,3,0)
  1. ;;=3^Pain,Lt Elbow
  1. ;;^UTILITY(U,$J,358.3,20709,1,4,0)
  1. ;;=4^M25.522
  1. ;;^UTILITY(U,$J,358.3,20709,2)
  1. ;;=^5011606
  1. ;;^UTILITY(U,$J,358.3,20710,0)
  1. ;;=M79.642^^68^851^47
  1. ;;^UTILITY(U,$J,358.3,20710,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,20710,1,3,0)
  1. ;;=3^Pain,Lt Hand
  1. ;;^UTILITY(U,$J,358.3,20710,1,4,0)
  1. ;;=4^M79.642
  1. ;;^UTILITY(U,$J,358.3,20710,2)
  1. ;;=^5013339
  1. ;;^UTILITY(U,$J,358.3,20711,0)
  1. ;;=M25.552^^68^851^48
  1. ;;^UTILITY(U,$J,358.3,20711,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,20711,1,3,0)
  1. ;;=3^Pain,Lt Hip
  1. ;;^UTILITY(U,$J,358.3,20711,1,4,0)
  1. ;;=4^M25.552
  1. ;;^UTILITY(U,$J,358.3,20711,2)
  1. ;;=^5011612
  1. ;;^UTILITY(U,$J,358.3,20712,0)
  1. ;;=M25.562^^68^851^49
  1. ;;^UTILITY(U,$J,358.3,20712,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,20712,1,3,0)
  1. ;;=3^Pain,Lt Knee
  1. ;;^UTILITY(U,$J,358.3,20712,1,4,0)
  1. ;;=4^M25.562
  1. ;;^UTILITY(U,$J,358.3,20712,2)
  1. ;;=^5011615
  1. ;;^UTILITY(U,$J,358.3,20713,0)
  1. ;;=M25.512^^68^851^50
  1. ;;^UTILITY(U,$J,358.3,20713,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,20713,1,3,0)
  1. ;;=3^Pain,Lt Shoulder
  1. ;;^UTILITY(U,$J,358.3,20713,1,4,0)
  1. ;;=4^M25.512
  1. ;;^UTILITY(U,$J,358.3,20713,2)
  1. ;;=^5011603
  1. ;;^UTILITY(U,$J,358.3,20714,0)
  1. ;;=M25.532^^68^851^51
  1. ;;^UTILITY(U,$J,358.3,20714,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,20714,1,3,0)
  1. ;;=3^Pain,Lt Wrist
  1. ;;^UTILITY(U,$J,358.3,20714,1,4,0)
  1. ;;=4^M25.532
  1. ;;^UTILITY(U,$J,358.3,20714,2)
  1. ;;=^5011609
  1. ;;^UTILITY(U,$J,358.3,20715,0)
  1. ;;=M25.571^^68^851^52
  1. ;;^UTILITY(U,$J,358.3,20715,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,20715,1,3,0)
  1. ;;=3^Pain,Rt Ankle/Foot Joints
  1. ;;^UTILITY(U,$J,358.3,20715,1,4,0)
  1. ;;=4^M25.571
  1. ;;^UTILITY(U,$J,358.3,20715,2)
  1. ;;=^5011617
  1. ;;^UTILITY(U,$J,358.3,20716,0)
  1. ;;=M25.521^^68^851^55
  1. ;;^UTILITY(U,$J,358.3,20716,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,20716,1,3,0)
  1. ;;=3^Pain,Rt Shoulder
  1. ;;^UTILITY(U,$J,358.3,20716,1,4,0)
  1. ;;=4^M25.521
  1. ;;^UTILITY(U,$J,358.3,20716,2)
  1. ;;=^5011605
  1. ;;^UTILITY(U,$J,358.3,20717,0)
  1. ;;=M79.641^^68^851^53
  1. ;;^UTILITY(U,$J,358.3,20717,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,20717,1,3,0)
  1. ;;=3^Pain,Rt Hand
  1. ;;^UTILITY(U,$J,358.3,20717,1,4,0)
  1. ;;=4^M79.641
  1. ;;^UTILITY(U,$J,358.3,20717,2)
  1. ;;=^5013338
  1. ;;^UTILITY(U,$J,358.3,20718,0)
  1. ;;=M25.551^^68^851^54
  1. ;;^UTILITY(U,$J,358.3,20718,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,20718,1,3,0)
  1. ;;=3^Pain,Rt Hip
  1. ;;^UTILITY(U,$J,358.3,20718,1,4,0)
  1. ;;=4^M25.551
  1. ;;^UTILITY(U,$J,358.3,20718,2)
  1. ;;=^5011611
  1. ;;^UTILITY(U,$J,358.3,20719,0)
  1. ;;=M25.531^^68^851^56
  1. ;;^UTILITY(U,$J,358.3,20719,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,20719,1,3,0)
  1. ;;=3^Pain,Rt Wrist
  1. ;;^UTILITY(U,$J,358.3,20719,1,4,0)
  1. ;;=4^M25.531
  1. ;;^UTILITY(U,$J,358.3,20719,2)
  1. ;;=^5011608
  1. ;;^UTILITY(U,$J,358.3,20720,0)
  1. ;;=S43.422A^^68^851^75
  1. ;;^UTILITY(U,$J,358.3,20720,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,20720,1,3,0)
  1. ;;=3^Sprain,Lt Rotator Cuff Capsule,Init Encntr
  1. ;;^UTILITY(U,$J,358.3,20720,1,4,0)
  1. ;;=4^S43.422A
  1. ;;^UTILITY(U,$J,358.3,20720,2)
  1. ;;=^5027882
  1. ;;^UTILITY(U,$J,358.3,20721,0)
  1. ;;=S43.421A^^68^851^76
  1. ;;^UTILITY(U,$J,358.3,20721,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,20721,1,3,0)
  1. ;;=3^Sprain,Rt Rotator Cuff Capsule,Init Encntr
  1. ;;^UTILITY(U,$J,358.3,20721,1,4,0)
  1. ;;=4^S43.421A
  1. ;;^UTILITY(U,$J,358.3,20721,2)
  1. ;;=^5027879
  1. ;;^UTILITY(U,$J,358.3,20722,0)
  1. ;;=S93.402A^^68^851^77
  1. ;;^UTILITY(U,$J,358.3,20722,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,20722,1,3,0)
  1. ;;=3^Sprain,Unspec Ligament,Lt Ankle,Init Encntr
  1. ;;^UTILITY(U,$J,358.3,20722,1,4,0)
  1. ;;=4^S93.402A
  1. ;;^UTILITY(U,$J,358.3,20722,2)
  1. ;;=^5045777
  1. ;;^UTILITY(U,$J,358.3,20723,0)
  1. ;;=S93.401A^^68^851^78
  1. ;;^UTILITY(U,$J,358.3,20723,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,20723,1,3,0)
  1. ;;=3^Sprain,Unspec Ligament,Rt Ankle,Init Encntr
  1. ;;^UTILITY(U,$J,358.3,20723,1,4,0)
  1. ;;=4^S93.401A
  1. ;;^UTILITY(U,$J,358.3,20723,2)
  1. ;;=^5045774
  1. ;;^UTILITY(U,$J,358.3,20724,0)
  1. ;;=S96.912A^^68^851^81
  1. ;;^UTILITY(U,$J,358.3,20724,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,20724,1,3,0)
  1. ;;=3^Strain,Msl/Tnd,Ankle/Foot Level,Lt Foot,Init Encntr
  1. ;;^UTILITY(U,$J,358.3,20724,1,4,0)
  1. ;;=4^S96.912A
  1. ;;^UTILITY(U,$J,358.3,20724,2)
  1. ;;=^5137751
  1. ;;^UTILITY(U,$J,358.3,20725,0)
  1. ;;=S96.911A^^68^851^82
  1. ;;^UTILITY(U,$J,358.3,20725,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,20725,1,3,0)
  1. ;;=3^Strain,Msl/Tnd,Ankle/Foot Level,Rt Foot,Init Encntr
  1. ;;^UTILITY(U,$J,358.3,20725,1,4,0)
  1. ;;=4^S96.911A
  1. ;;^UTILITY(U,$J,358.3,20725,2)
  1. ;;=^5137750
  1. ;;^UTILITY(U,$J,358.3,20726,0)
  1. ;;=S56.912A^^68^851^79
  1. ;;^UTILITY(U,$J,358.3,20726,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,20726,1,3,0)
  1. ;;=3^Strain,Msl/Fasc/Tnd,Forearm Level,Lt Arm,Init Encntr
  1. ;;^UTILITY(U,$J,358.3,20726,1,4,0)
  1. ;;=4^S56.912A
  1. ;;^UTILITY(U,$J,358.3,20726,2)
  1. ;;=^5135514
  1. ;;^UTILITY(U,$J,358.3,20727,0)
  1. ;;=S56.911A^^68^851^80
  1. ;;^UTILITY(U,$J,358.3,20727,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,20727,1,3,0)
  1. ;;=3^Strain,Msl/Fasc/Tnd,Forearm Level,Rt Arm,Init Encntr
  1. ;;^UTILITY(U,$J,358.3,20727,1,4,0)
  1. ;;=4^S56.911A
  1. ;;^UTILITY(U,$J,358.3,20727,2)
  1. ;;=^5135513
  1. ;;^UTILITY(U,$J,358.3,20728,0)
  1. ;;=M75.112^^68^851^25
  1. ;;^UTILITY(U,$J,358.3,20728,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,20728,1,3,0)
  1. ;;=3^Incomplete Rotator-Cuff Tear/Ruptr,Lt Shoulder
  1. ;;^UTILITY(U,$J,358.3,20728,1,4,0)
  1. ;;=4^M75.112
  1. ;;^UTILITY(U,$J,358.3,20728,2)
  1. ;;=^5013246
  1. ;;^UTILITY(U,$J,358.3,20729,0)
  1. ;;=M75.111^^68^851^26
  1. ;;^UTILITY(U,$J,358.3,20729,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,20729,1,3,0)
  1. ;;=3^Incomplete Rotator-Cuff Tear/Ruptr,Rt Shoulder
  1. ;;^UTILITY(U,$J,358.3,20729,1,4,0)
  1. ;;=4^M75.111
  1. ;;^UTILITY(U,$J,358.3,20729,2)
  1. ;;=^5013245
  1. ;;^UTILITY(U,$J,358.3,20730,0)
  1. ;;=M23.8X2^^68^851^27
  1. ;;^UTILITY(U,$J,358.3,20730,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,20730,1,3,0)
  1. ;;=3^Internal Derangement,Lt Knee NEC
  1. ;;^UTILITY(U,$J,358.3,20730,1,4,0)
  1. ;;=4^M23.8X2
  1. ;;^UTILITY(U,$J,358.3,20730,2)
  1. ;;=^5011274
  1. ;;^UTILITY(U,$J,358.3,20731,0)
  1. ;;=M23.8X1^^68^851^28
  1. ;;^UTILITY(U,$J,358.3,20731,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,20731,1,3,0)
  1. ;;=3^Internal Derangement,Rt Knee NEC
  1. ;;^UTILITY(U,$J,358.3,20731,1,4,0)
  1. ;;=4^M23.8X1
  1. ;;^UTILITY(U,$J,358.3,20731,2)
  1. ;;=^5011273
  1. ;;^UTILITY(U,$J,358.3,20732,0)
  1. ;;=M62.838^^68^851^43
  1. ;;^UTILITY(U,$J,358.3,20732,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,20732,1,3,0)
  1. ;;=3^Muscle spasm NEC
  1. ;;^UTILITY(U,$J,358.3,20732,1,4,0)
  1. ;;=4^M62.838
  1. ;;^UTILITY(U,$J,358.3,20732,2)
  1. ;;=^5012682
  1. ;;^UTILITY(U,$J,358.3,20733,0)
  1. ;;=M76.52^^68^851^57
  1. ;;^UTILITY(U,$J,358.3,20733,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,20733,1,3,0)
  1. ;;=3^Patellar Tendinitis,Lt Knee
  1. ;;^UTILITY(U,$J,358.3,20733,1,4,0)
  1. ;;=4^M76.52
  1. ;;^UTILITY(U,$J,358.3,20733,2)
  1. ;;=^5013283
  1. ;;^UTILITY(U,$J,358.3,20734,0)
  1. ;;=M76.51^^68^851^58
  1. ;;^UTILITY(U,$J,358.3,20734,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,20734,1,3,0)
  1. ;;=3^Patellar Tendinitis,Rt Knee
  1. ;;^UTILITY(U,$J,358.3,20734,1,4,0)
  1. ;;=4^M76.51
  1. ;;^UTILITY(U,$J,358.3,20734,2)
  1. ;;=^5013282
  1. ;;^UTILITY(U,$J,358.3,20735,0)
  1. ;;=M65.4^^68^851^59
  1. ;;^UTILITY(U,$J,358.3,20735,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,20735,1,3,0)
  1. ;;=3^Radial Styloid Tenosynovitis
  1. ;;^UTILITY(U,$J,358.3,20735,1,4,0)
  1. ;;=4^M65.4
  1. ;;^UTILITY(U,$J,358.3,20735,2)
  1. ;;=^5012792
  1. ;;^UTILITY(U,$J,358.3,20736,0)
  1. ;;=M75.102^^68^851^62
  1. ;;^UTILITY(U,$J,358.3,20736,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,20736,1,3,0)
  1. ;;=3^Rotator-Cuff Tear/Rupture,Lt Shoulder,Unspec
  1. ;;^UTILITY(U,$J,358.3,20736,1,4,0)
  1. ;;=4^M75.102
  1. ;;^UTILITY(U,$J,358.3,20736,2)
  1. ;;=^5013243
  1. ;;^UTILITY(U,$J,358.3,20737,0)
  1. ;;=M75.101^^68^851^63
  1. ;;^UTILITY(U,$J,358.3,20737,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,20737,1,3,0)
  1. ;;=3^Rotator-Cuff Tear/Rupture,Rt Shoulder,Unspec
  1. ;;^UTILITY(U,$J,358.3,20737,1,4,0)
  1. ;;=4^M75.101
  1. ;;^UTILITY(U,$J,358.3,20737,2)
  1. ;;=^5013242
  1. ;;^UTILITY(U,$J,358.3,20738,0)
  1. ;;=M67.02^^68^851^65
  1. ;;^UTILITY(U,$J,358.3,20738,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,20738,1,3,0)
  1. ;;=3^Short Achilles Tendon,Lt Ankle
  1. ;;^UTILITY(U,$J,358.3,20738,1,4,0)
  1. ;;=4^M67.02
  1. ;;^UTILITY(U,$J,358.3,20738,2)
  1. ;;=^5012907
  1. ;;^UTILITY(U,$J,358.3,20739,0)
  1. ;;=M66.232^^68^851^67
  1. ;;^UTILITY(U,$J,358.3,20739,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,20739,1,3,0)
  1. ;;=3^Spontaneous Rupture Extensor Tendons,Lt Forearm
  1. ;;^UTILITY(U,$J,358.3,20739,1,4,0)
  1. ;;=4^M66.232
  1. ;;^UTILITY(U,$J,358.3,20739,2)
  1. ;;=^5012855
  1. ;;^UTILITY(U,$J,358.3,20740,0)
  1. ;;=M66.242^^68^851^68
  1. ;;^UTILITY(U,$J,358.3,20740,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,20740,1,3,0)
  1. ;;=3^Spontaneous Rupture Extensor Tendons,Lt Hand
  1. ;;^UTILITY(U,$J,358.3,20740,1,4,0)
  1. ;;=4^M66.242
  1. ;;^UTILITY(U,$J,358.3,20740,2)
  1. ;;=^5012858
  1. ;;^UTILITY(U,$J,358.3,20741,0)
  1. ;;=M66.231^^68^851^69
  1. ;;^UTILITY(U,$J,358.3,20741,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,20741,1,3,0)
  1. ;;=3^Spontaneous Rupture Extensor Tendons,Rt Forearm
  1. ;;^UTILITY(U,$J,358.3,20741,1,4,0)
  1. ;;=4^M66.231
  1. ;;^UTILITY(U,$J,358.3,20741,2)
  1. ;;=^5012854
  1. ;;^UTILITY(U,$J,358.3,20742,0)
  1. ;;=M66.241^^68^851^70
  1. ;;^UTILITY(U,$J,358.3,20742,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,20742,1,3,0)
  1. ;;=3^Spontaneous Rupture Extensor Tendons,Rt Hand
  1. ;;^UTILITY(U,$J,358.3,20742,1,4,0)
  1. ;;=4^M66.241
  1. ;;^UTILITY(U,$J,358.3,20742,2)
  1. ;;=^5012857
  1. ;;^UTILITY(U,$J,358.3,20743,0)
  1. ;;=M66.331^^68^851^73
  1. ;;^UTILITY(U,$J,358.3,20743,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,20743,1,3,0)
  1. ;;=3^Spontaneous Rupture Flexor Tendons,Rt Forearm
  1. ;;^UTILITY(U,$J,358.3,20743,1,4,0)
  1. ;;=4^M66.331
  1. ;;^UTILITY(U,$J,358.3,20743,2)
  1. ;;=^5012878
  1. ;;^UTILITY(U,$J,358.3,20744,0)
  1. ;;=M66.332^^68^851^71
  1. ;;^UTILITY(U,$J,358.3,20744,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,20744,1,3,0)
  1. ;;=3^Spontaneous Rupture Flexor Tendons,Lt Forearm
  1. ;;^UTILITY(U,$J,358.3,20744,1,4,0)
  1. ;;=4^M66.332