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

IBDEI0F0.m

Go to the documentation of this file. 
  1. IBDEI0F0 ; ; 03-MAY-2022
  1.  ;;3.0;IB ENCOUNTER FORM IMP/EXP;;MAY 03, 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,37537,2)
  1.  ;;=^5008803
  1.  ;;^UTILITY(U,$J,358.3,37538,0)
  1.  ;;=K71.9^^107^1490^36
  1.  ;;^UTILITY(U,$J,358.3,37538,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,37538,1,3,0)
  1.  ;;=3^Toxic Liver Disease,Unspec
  1.  ;;^UTILITY(U,$J,358.3,37538,1,4,0)
  1.  ;;=4^K71.9
  1.  ;;^UTILITY(U,$J,358.3,37538,2)
  1.  ;;=^5008804
  1.  ;;^UTILITY(U,$J,358.3,37539,0)
  1.  ;;=K75.2^^107^1490^22
  1.  ;;^UTILITY(U,$J,358.3,37539,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,37539,1,3,0)
  1.  ;;=3^Nonspecific Reactive Hepatitis
  1.  ;;^UTILITY(U,$J,358.3,37539,1,4,0)
  1.  ;;=4^K75.2
  1.  ;;^UTILITY(U,$J,358.3,37539,2)
  1.  ;;=^5008826
  1.  ;;^UTILITY(U,$J,358.3,37540,0)
  1.  ;;=K75.3^^107^1490^13
  1.  ;;^UTILITY(U,$J,358.3,37540,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,37540,1,3,0)
  1.  ;;=3^Granulomatous Hepatitis NEC
  1.  ;;^UTILITY(U,$J,358.3,37540,1,4,0)
  1.  ;;=4^K75.3
  1.  ;;^UTILITY(U,$J,358.3,37540,2)
  1.  ;;=^5008827
  1.  ;;^UTILITY(U,$J,358.3,37541,0)
  1.  ;;=K76.6^^107^1490^24
  1.  ;;^UTILITY(U,$J,358.3,37541,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,37541,1,3,0)
  1.  ;;=3^Portal Hypertension
  1.  ;;^UTILITY(U,$J,358.3,37541,1,4,0)
  1.  ;;=4^K76.6
  1.  ;;^UTILITY(U,$J,358.3,37541,2)
  1.  ;;=^5008834
  1.  ;;^UTILITY(U,$J,358.3,37542,0)
  1.  ;;=K74.00^^107^1490^16
  1.  ;;^UTILITY(U,$J,358.3,37542,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,37542,1,3,0)
  1.  ;;=3^Hepatic Fibrosis,Unspec
  1.  ;;^UTILITY(U,$J,358.3,37542,1,4,0)
  1.  ;;=4^K74.00
  1.  ;;^UTILITY(U,$J,358.3,37542,2)
  1.  ;;=^5159218
  1.  ;;^UTILITY(U,$J,358.3,37543,0)
  1.  ;;=K74.01^^107^1490^15
  1.  ;;^UTILITY(U,$J,358.3,37543,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,37543,1,3,0)
  1.  ;;=3^Hepatic Fibrosis,Early Fibrosis
  1.  ;;^UTILITY(U,$J,358.3,37543,1,4,0)
  1.  ;;=4^K74.01
  1.  ;;^UTILITY(U,$J,358.3,37543,2)
  1.  ;;=^5159219
  1.  ;;^UTILITY(U,$J,358.3,37544,0)
  1.  ;;=K74.02^^107^1490^14
  1.  ;;^UTILITY(U,$J,358.3,37544,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,37544,1,3,0)
  1.  ;;=3^Hepatic Fibrosis,Advanced Fibrosis
  1.  ;;^UTILITY(U,$J,358.3,37544,1,4,0)
  1.  ;;=4^K74.02
  1.  ;;^UTILITY(U,$J,358.3,37544,2)
  1.  ;;=^5159220
  1.  ;;^UTILITY(U,$J,358.3,37545,0)
  1.  ;;=F20.3^^107^1491^31
  1.  ;;^UTILITY(U,$J,358.3,37545,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,37545,1,3,0)
  1.  ;;=3^Undifferentiated/Atypical Schizophrenia
  1.  ;;^UTILITY(U,$J,358.3,37545,1,4,0)
  1.  ;;=4^F20.3
  1.  ;;^UTILITY(U,$J,358.3,37545,2)
  1.  ;;=^5003472
  1.  ;;^UTILITY(U,$J,358.3,37546,0)
  1.  ;;=F20.9^^107^1491^27
  1.  ;;^UTILITY(U,$J,358.3,37546,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,37546,1,3,0)
  1.  ;;=3^Schizophrenia,Unspec
  1.  ;;^UTILITY(U,$J,358.3,37546,1,4,0)
  1.  ;;=4^F20.9
  1.  ;;^UTILITY(U,$J,358.3,37546,2)
  1.  ;;=^5003476
  1.  ;;^UTILITY(U,$J,358.3,37547,0)
  1.  ;;=F31.9^^107^1491^6
  1.  ;;^UTILITY(U,$J,358.3,37547,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,37547,1,3,0)
  1.  ;;=3^Bipolar Disorder,Unspec
  1.  ;;^UTILITY(U,$J,358.3,37547,1,4,0)
  1.  ;;=4^F31.9
  1.  ;;^UTILITY(U,$J,358.3,37547,2)
  1.  ;;=^331892
  1.  ;;^UTILITY(U,$J,358.3,37548,0)
  1.  ;;=F31.72^^107^1491^7
  1.  ;;^UTILITY(U,$J,358.3,37548,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,37548,1,3,0)
  1.  ;;=3^Bipolr Disorder,Full Remis,Most Recent Episode Hypomanic
  1.  ;;^UTILITY(U,$J,358.3,37548,1,4,0)
  1.  ;;=4^F31.72
  1.  ;;^UTILITY(U,$J,358.3,37548,2)
  1.  ;;=^5003512
  1.  ;;^UTILITY(U,$J,358.3,37549,0)
  1.  ;;=F31.71^^107^1491^5
  1.  ;;^UTILITY(U,$J,358.3,37549,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,37549,1,3,0)
  1.  ;;=3^Bipolar Disorder,Part Remis,Most Recent Episode Hypomanic
  1.  ;;^UTILITY(U,$J,358.3,37549,1,4,0)
  1.  ;;=4^F31.71
  1.  ;;^UTILITY(U,$J,358.3,37549,2)
  1.  ;;=^5003511
  1.  ;;^UTILITY(U,$J,358.3,37550,0)
  1.  ;;=F31.70^^107^1491^4
  1.  ;;^UTILITY(U,$J,358.3,37550,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,37550,1,3,0)
  1.  ;;=3^Bipolar Disorder,In Remis,Most Recent Episode Unspec
  1.  ;;^UTILITY(U,$J,358.3,37550,1,4,0)
  1.  ;;=4^F31.70
  1.  ;;^UTILITY(U,$J,358.3,37550,2)
  1.  ;;=^5003510
  1.  ;;^UTILITY(U,$J,358.3,37551,0)
  1.  ;;=F29.^^107^1491^25
  1.  ;;^UTILITY(U,$J,358.3,37551,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,37551,1,3,0)
  1.  ;;=3^Psychosis not d/t Substance/Known Physiol Cond,Unspec
  1.  ;;^UTILITY(U,$J,358.3,37551,1,4,0)
  1.  ;;=4^F29.
  1.  ;;^UTILITY(U,$J,358.3,37551,2)
  1.  ;;=^5003484
  1.  ;;^UTILITY(U,$J,358.3,37552,0)
  1.  ;;=F28.^^107^1491^26
  1.  ;;^UTILITY(U,$J,358.3,37552,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,37552,1,3,0)
  1.  ;;=3^Psychosis not d/t Substance/Known Physiol Cond NEC
  1.  ;;^UTILITY(U,$J,358.3,37552,1,4,0)
  1.  ;;=4^F28.
  1.  ;;^UTILITY(U,$J,358.3,37552,2)
  1.  ;;=^5003483
  1.  ;;^UTILITY(U,$J,358.3,37553,0)
  1.  ;;=F41.9^^107^1491^3
  1.  ;;^UTILITY(U,$J,358.3,37553,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,37553,1,3,0)
  1.  ;;=3^Anxiety Disorder,Unspec
  1.  ;;^UTILITY(U,$J,358.3,37553,1,4,0)
  1.  ;;=4^F41.9
  1.  ;;^UTILITY(U,$J,358.3,37553,2)
  1.  ;;=^5003567
  1.  ;;^UTILITY(U,$J,358.3,37554,0)
  1.  ;;=F45.0^^107^1491^29
  1.  ;;^UTILITY(U,$J,358.3,37554,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,37554,1,3,0)
  1.  ;;=3^Somatization Disorder
  1.  ;;^UTILITY(U,$J,358.3,37554,1,4,0)
  1.  ;;=4^F45.0
  1.  ;;^UTILITY(U,$J,358.3,37554,2)
  1.  ;;=^112280
  1.  ;;^UTILITY(U,$J,358.3,37555,0)
  1.  ;;=F69.^^107^1491^2
  1.  ;;^UTILITY(U,$J,358.3,37555,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,37555,1,3,0)
  1.  ;;=3^Adult Personality and Behavior Disorder,Unspec
  1.  ;;^UTILITY(U,$J,358.3,37555,1,4,0)
  1.  ;;=4^F69.
  1.  ;;^UTILITY(U,$J,358.3,37555,2)
  1.  ;;=^5003667
  1.  ;;^UTILITY(U,$J,358.3,37556,0)
  1.  ;;=F60.9^^107^1491^23
  1.  ;;^UTILITY(U,$J,358.3,37556,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,37556,1,3,0)
  1.  ;;=3^Personality Disorder,Unspec
  1.  ;;^UTILITY(U,$J,358.3,37556,1,4,0)
  1.  ;;=4^F60.9
  1.  ;;^UTILITY(U,$J,358.3,37556,2)
  1.  ;;=^5003639
  1.  ;;^UTILITY(U,$J,358.3,37557,0)
  1.  ;;=F32.9^^107^1491^16
  1.  ;;^UTILITY(U,$J,358.3,37557,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,37557,1,3,0)
  1.  ;;=3^MDD,Single Episode,Unspec
  1.  ;;^UTILITY(U,$J,358.3,37557,1,4,0)
  1.  ;;=4^F32.9
  1.  ;;^UTILITY(U,$J,358.3,37557,2)
  1.  ;;=^5003528
  1.  ;;^UTILITY(U,$J,358.3,37558,0)
  1.  ;;=F40.231^^107^1491^12
  1.  ;;^UTILITY(U,$J,358.3,37558,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,37558,1,3,0)
  1.  ;;=3^Fear of Injections/Transfusions
  1.  ;;^UTILITY(U,$J,358.3,37558,1,4,0)
  1.  ;;=4^F40.231
  1.  ;;^UTILITY(U,$J,358.3,37558,2)
  1.  ;;=^5003551
  1.  ;;^UTILITY(U,$J,358.3,37559,0)
  1.  ;;=F40.240^^107^1491^8
  1.  ;;^UTILITY(U,$J,358.3,37559,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,37559,1,3,0)
  1.  ;;=3^Claustrophobia
  1.  ;;^UTILITY(U,$J,358.3,37559,1,4,0)
  1.  ;;=4^F40.240
  1.  ;;^UTILITY(U,$J,358.3,37559,2)
  1.  ;;=^5003554
  1.  ;;^UTILITY(U,$J,358.3,37560,0)
  1.  ;;=F43.21^^107^1491^13
  1.  ;;^UTILITY(U,$J,358.3,37560,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,37560,1,3,0)
  1.  ;;=3^Grief Reaction
  1.  ;;^UTILITY(U,$J,358.3,37560,1,4,0)
  1.  ;;=4^F43.21
  1.  ;;^UTILITY(U,$J,358.3,37560,2)
  1.  ;;=^331948
  1.  ;;^UTILITY(U,$J,358.3,37561,0)
  1.  ;;=F43.10^^107^1491^22
  1.  ;;^UTILITY(U,$J,358.3,37561,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,37561,1,3,0)
  1.  ;;=3^PTSD,Unspec
  1.  ;;^UTILITY(U,$J,358.3,37561,1,4,0)
  1.  ;;=4^F43.10
  1.  ;;^UTILITY(U,$J,358.3,37561,2)
  1.  ;;=^5003570
  1.  ;;^UTILITY(U,$J,358.3,37562,0)
  1.  ;;=F43.11^^107^1491^20
  1.  ;;^UTILITY(U,$J,358.3,37562,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,37562,1,3,0)
  1.  ;;=3^PTSD,Acute
  1.  ;;^UTILITY(U,$J,358.3,37562,1,4,0)
  1.  ;;=4^F43.11
  1.  ;;^UTILITY(U,$J,358.3,37562,2)
  1.  ;;=^5003571
  1.  ;;^UTILITY(U,$J,358.3,37563,0)
  1.  ;;=F43.12^^107^1491^21
  1.  ;;^UTILITY(U,$J,358.3,37563,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,37563,1,3,0)
  1.  ;;=3^PTSD,Chronic
  1.  ;;^UTILITY(U,$J,358.3,37563,1,4,0)
  1.  ;;=4^F43.12
  1.  ;;^UTILITY(U,$J,358.3,37563,2)
  1.  ;;=^5003572
  1.  ;;^UTILITY(U,$J,358.3,37564,0)
  1.  ;;=F43.21^^107^1491^1
  1.  ;;^UTILITY(U,$J,358.3,37564,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,37564,1,3,0)
  1.  ;;=3^Adjustment Disorder w/ Depressed Mood
  1.  ;;^UTILITY(U,$J,358.3,37564,1,4,0)
  1.  ;;=4^F43.21
  1.  ;;^UTILITY(U,$J,358.3,37564,2)
  1.  ;;=^331948
  1.  ;;^UTILITY(U,$J,358.3,37565,0)
  1.  ;;=F45.9^^107^1491^30
  1.  ;;^UTILITY(U,$J,358.3,37565,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,37565,1,3,0)
  1.  ;;=3^Somatoform Disorder,Unspec
  1.  ;;^UTILITY(U,$J,358.3,37565,1,4,0)
  1.  ;;=4^F45.9
  1.  ;;^UTILITY(U,$J,358.3,37565,2)
  1.  ;;=^5003592
  1.  ;;^UTILITY(U,$J,358.3,37566,0)
  1.  ;;=F48.2^^107^1491^24
  1.  ;;^UTILITY(U,$J,358.3,37566,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,37566,1,3,0)
  1.  ;;=3^Pseudobulbar Affect
  1.  ;;^UTILITY(U,$J,358.3,37566,1,4,0)
  1.  ;;=4^F48.2
  1.  ;;^UTILITY(U,$J,358.3,37566,2)
  1.  ;;=^5003594
  1.  ;;^UTILITY(U,$J,358.3,37567,0)
  1.  ;;=G47.00^^107^1491^15
  1.  ;;^UTILITY(U,$J,358.3,37567,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,37567,1,3,0)
  1.  ;;=3^Insomnia,Unspec
  1.  ;;^UTILITY(U,$J,358.3,37567,1,4,0)
  1.  ;;=4^G47.00
  1.  ;;^UTILITY(U,$J,358.3,37567,2)
  1.  ;;=^332924
  1.  ;;^UTILITY(U,$J,358.3,37568,0)
  1.  ;;=F40.11^^107^1491^28
  1.  ;;^UTILITY(U,$J,358.3,37568,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,37568,1,3,0)
  1.  ;;=3^Social Phobia,Generalized
  1.  ;;^UTILITY(U,$J,358.3,37568,1,4,0)
  1.  ;;=4^F40.11
  1.  ;;^UTILITY(U,$J,358.3,37568,2)
  1.  ;;=^5003545
  1.  ;;^UTILITY(U,$J,358.3,37569,0)
  1.  ;;=F42.4^^107^1491^11
  1.  ;;^UTILITY(U,$J,358.3,37569,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,37569,1,3,0)
  1.  ;;=3^Excoriation (Skin-Picking) Disorder
  1.  ;;^UTILITY(U,$J,358.3,37569,1,4,0)
  1.  ;;=4^F42.4
  1.  ;;^UTILITY(U,$J,358.3,37569,2)
  1.  ;;=^5138446
  1.  ;;^UTILITY(U,$J,358.3,37570,0)
  1.  ;;=F42.3^^107^1491^14
  1.  ;;^UTILITY(U,$J,358.3,37570,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,37570,1,3,0)
  1.  ;;=3^Hoarding Disorder
  1.  ;;^UTILITY(U,$J,358.3,37570,1,4,0)
  1.  ;;=4^F42.3
  1.  ;;^UTILITY(U,$J,358.3,37570,2)
  1.  ;;=^5138445
  1.  ;;^UTILITY(U,$J,358.3,37571,0)
  1.  ;;=F42.2^^107^1491^17
  1.  ;;^UTILITY(U,$J,358.3,37571,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,37571,1,3,0)
  1.  ;;=3^Mixed Obsessional Thoughts & Acts
  1.  ;;^UTILITY(U,$J,358.3,37571,1,4,0)
  1.  ;;=4^F42.2
  1.  ;;^UTILITY(U,$J,358.3,37571,2)
  1.  ;;=^5138444
  1.  ;;^UTILITY(U,$J,358.3,37572,0)
  1.  ;;=F42.9^^107^1491^19
  1.  ;;^UTILITY(U,$J,358.3,37572,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,37572,1,3,0)
  1.  ;;=3^Obsessive-Compulsive Disorder,Unspec
  1.  ;;^UTILITY(U,$J,358.3,37572,1,4,0)
  1.  ;;=4^F42.9
  1.  ;;^UTILITY(U,$J,358.3,37572,2)
  1.  ;;=^5138448
  1.  ;;^UTILITY(U,$J,358.3,37573,0)
  1.  ;;=F42.8^^107^1491^18
  1.  ;;^UTILITY(U,$J,358.3,37573,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,37573,1,3,0)
  1.  ;;=3^Obsessive-Compulsive Disorder,Other
  1.  ;;^UTILITY(U,$J,358.3,37573,1,4,0)
  1.  ;;=4^F42.8
  1.  ;;^UTILITY(U,$J,358.3,37573,2)
  1.  ;;=^5138447
  1.  ;;^UTILITY(U,$J,358.3,37574,0)
  1.  ;;=F50.89^^107^1491^10
  1.  ;;^UTILITY(U,$J,358.3,37574,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,37574,1,3,0)
  1.  ;;=3^Eating Disorder,Oth Specified
  1.  ;;^UTILITY(U,$J,358.3,37574,1,4,0)
  1.  ;;=4^F50.89
  1.  ;;^UTILITY(U,$J,358.3,37574,2)
  1.  ;;=^5138449
  1.  ;;^UTILITY(U,$J,358.3,37575,0)
  1.  ;;=R41.0^^107^1491^9
  1.  ;;^UTILITY(U,$J,358.3,37575,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,37575,1,3,0)
  1.  ;;=3^Delirium,Disorientation NOS
  1.  ;;^UTILITY(U,$J,358.3,37575,1,4,0)
  1.  ;;=4^R41.0
  1.  ;;^UTILITY(U,$J,358.3,37575,2)
  1.  ;;=^5019436
  1.  ;;^UTILITY(U,$J,358.3,37576,0)
  1.  ;;=R56.00^^107^1492^6
  1.  ;;^UTILITY(U,$J,358.3,37576,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,37576,1,3,0)
  1.  ;;=3^Simple Febrile Convulsions
  1.  ;;^UTILITY(U,$J,358.3,37576,1,4,0)
  1.  ;;=4^R56.00
  1.  ;;^UTILITY(U,$J,358.3,37576,2)
  1.  ;;=^5019522
  1.  ;;^UTILITY(U,$J,358.3,37577,0)
  1.  ;;=R56.9^^107^1492^4
  1.  ;;^UTILITY(U,$J,358.3,37577,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,37577,1,3,0)
  1.  ;;=3^Convulsions,Unspec
  1.  ;;^UTILITY(U,$J,358.3,37577,1,4,0)
  1.  ;;=4^R56.9
  1.  ;;^UTILITY(U,$J,358.3,37577,2)
  1.  ;;=^5019524
  1.  ;;^UTILITY(U,$J,358.3,37578,0)
  1.  ;;=R25.0^^107^1492^1
  1.  ;;^UTILITY(U,$J,358.3,37578,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,37578,1,3,0)
  1.  ;;=3^Abnormal Head Movements
  1.  ;;^UTILITY(U,$J,358.3,37578,1,4,0)
  1.  ;;=4^R25.0
  1.  ;;^UTILITY(U,$J,358.3,37578,2)
  1.  ;;=^5019299
  1.  ;;^UTILITY(U,$J,358.3,37579,0)
  1.  ;;=R25.1^^107^1492^7
  1.  ;;^UTILITY(U,$J,358.3,37579,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,37579,1,3,0)
  1.  ;;=3^Tremor,Unspec
  1.  ;;^UTILITY(U,$J,358.3,37579,1,4,0)
  1.  ;;=4^R25.1
  1.  ;;^UTILITY(U,$J,358.3,37579,2)
  1.  ;;=^5019300
  1.  ;;^UTILITY(U,$J,358.3,37580,0)
  1.  ;;=R25.9^^107^1492^3
  1.  ;;^UTILITY(U,$J,358.3,37580,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,37580,1,3,0)
  1.  ;;=3^Abnormal Involuntary Movements,Unspec
  1.  ;;^UTILITY(U,$J,358.3,37580,1,4,0)
  1.  ;;=4^R25.9
  1.  ;;^UTILITY(U,$J,358.3,37580,2)
  1.  ;;=^5019303
  1.  ;;^UTILITY(U,$J,358.3,37581,0)
  1.  ;;=R25.3^^107^1492^5
  1.  ;;^UTILITY(U,$J,358.3,37581,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,37581,1,3,0)
  1.  ;;=3^Fasciculation/Twitching
  1.  ;;^UTILITY(U,$J,358.3,37581,1,4,0)
  1.  ;;=4^R25.3
  1.  ;;^UTILITY(U,$J,358.3,37581,2)
  1.  ;;=^44985
  1.  ;;^UTILITY(U,$J,358.3,37582,0)
  1.  ;;=R25.8^^107^1492^2
  1.  ;;^UTILITY(U,$J,358.3,37582,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,37582,1,3,0)
  1.  ;;=3^Abnormal Involuntary Movements,Other
  1.  ;;^UTILITY(U,$J,358.3,37582,1,4,0)
  1.  ;;=4^R25.8
  1.  ;;^UTILITY(U,$J,358.3,37582,2)
  1.  ;;=^5019302
  1.  ;;^UTILITY(U,$J,358.3,37583,0)
  1.  ;;=M02.30^^107^1493^147
  1.  ;;^UTILITY(U,$J,358.3,37583,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,37583,1,3,0)
  1.  ;;=3^Reiter's Disease,Unspec Site
  1.  ;;^UTILITY(U,$J,358.3,37583,1,4,0)
  1.  ;;=4^M02.30
  1.  ;;^UTILITY(U,$J,358.3,37583,2)
  1.  ;;=^5009790
  1.  ;;^UTILITY(U,$J,358.3,37584,0)
  1.  ;;=M10.9^^107^1493^41
  1.  ;;^UTILITY(U,$J,358.3,37584,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,37584,1,3,0)
  1.  ;;=3^Gout,Unspec
  1.  ;;^UTILITY(U,$J,358.3,37584,1,4,0)
  1.  ;;=4^M10.9
  1.  ;;^UTILITY(U,$J,358.3,37584,2)
  1.  ;;=^5010404
  1.  ;;^UTILITY(U,$J,358.3,37585,0)
  1.  ;;=G90.59^^107^1493^35
  1.  ;;^UTILITY(U,$J,358.3,37585,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,37585,1,3,0)
  1.  ;;=3^Complex Regional Pain Syndrome I,Unspec
  1.  ;;^UTILITY(U,$J,358.3,37585,1,4,0)
  1.  ;;=4^G90.59
  1.  ;;^UTILITY(U,$J,358.3,37585,2)
  1.  ;;=^5004171
  1.  ;;^UTILITY(U,$J,358.3,37586,0)
  1.  ;;=G56.01^^107^1493^13
  1.  ;;^UTILITY(U,$J,358.3,37586,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,37586,1,3,0)
  1.  ;;=3^Carpal Tunnel Syndrome,Right Upper Limb
  1.  ;;^UTILITY(U,$J,358.3,37586,1,4,0)
  1.  ;;=4^G56.01
  1.  ;;^UTILITY(U,$J,358.3,37586,2)
  1.  ;;=^5004018
  1.  ;;^UTILITY(U,$J,358.3,37587,0)
  1.  ;;=G56.02^^107^1493^12
  1.  ;;^UTILITY(U,$J,358.3,37587,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,37587,1,3,0)
  1.  ;;=3^Carpal Tunnel Syndrome,Left Upper Limb
  1.  ;;^UTILITY(U,$J,358.3,37587,1,4,0)
  1.  ;;=4^G56.02
  1.  ;;^UTILITY(U,$J,358.3,37587,2)
  1.  ;;=^5004019
  1.  ;;^UTILITY(U,$J,358.3,37588,0)
  1.  ;;=G56.21^^107^1493^60
  1.  ;;^UTILITY(U,$J,358.3,37588,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,37588,1,3,0)
  1.  ;;=3^Lesion of Ulnar Nerve,Right Upper Limb
  1.  ;;^UTILITY(U,$J,358.3,37588,1,4,0)
  1.  ;;=4^G56.21
  1.  ;;^UTILITY(U,$J,358.3,37588,2)
  1.  ;;=^5004024
  1.  ;;^UTILITY(U,$J,358.3,37589,0)
  1.  ;;=G56.22^^107^1493^59
  1.  ;;^UTILITY(U,$J,358.3,37589,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,37589,1,3,0)
  1.  ;;=3^Lesion of Ulnar Nerve,Left Upper Limb
  1.  ;;^UTILITY(U,$J,358.3,37589,1,4,0)
  1.  ;;=4^G56.22
  1.  ;;^UTILITY(U,$J,358.3,37589,2)
  1.  ;;=^5004025
  1.  ;;^UTILITY(U,$J,358.3,37590,0)
  1.  ;;=L40.52^^107^1493^143
  1.  ;;^UTILITY(U,$J,358.3,37590,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,37590,1,3,0)
  1.  ;;=3^Psoriatic Arthritis Mutilans
  1.  ;;^UTILITY(U,$J,358.3,37590,1,4,0)
  1.  ;;=4^L40.52
  1.  ;;^UTILITY(U,$J,358.3,37590,2)
  1.  ;;=^5009167
  1.  ;;^UTILITY(U,$J,358.3,37591,0)
  1.  ;;=L40.53^^107^1493^144
  1.  ;;^UTILITY(U,$J,358.3,37591,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,37591,1,3,0)
  1.  ;;=3^Psoriatic Spondylitis
  1.  ;;^UTILITY(U,$J,358.3,37591,1,4,0)
  1.  ;;=4^L40.53
  1.  ;;^UTILITY(U,$J,358.3,37591,2)
  1.  ;;=^5009168
  1.  ;;^UTILITY(U,$J,358.3,37592,0)
  1.  ;;=M32.9^^107^1493^187
  1.  ;;^UTILITY(U,$J,358.3,37592,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,37592,1,3,0)
  1.  ;;=3^Systemic Lupus Erythematosus,Unspec
  1.  ;;^UTILITY(U,$J,358.3,37592,1,4,0)
  1.  ;;=4^M32.9
  1.  ;;^UTILITY(U,$J,358.3,37592,2)
  1.  ;;=^5011761
  1.  ;;^UTILITY(U,$J,358.3,37593,0)
  1.  ;;=M32.0^^107^1493^183
  1.  ;;^UTILITY(U,$J,358.3,37593,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,37593,1,3,0)
  1.  ;;=3^Systemic Lupus Erythematosus,Drug-Induced
  1.  ;;^UTILITY(U,$J,358.3,37593,1,4,0)
  1.  ;;=4^M32.0
  1.  ;;^UTILITY(U,$J,358.3,37593,2)
  1.  ;;=^5011752
  1.  ;;^UTILITY(U,$J,358.3,37594,0)
  1.  ;;=M32.13^^107^1493^185
  1.  ;;^UTILITY(U,$J,358.3,37594,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,37594,1,3,0)
  1.  ;;=3^Systemic Lupus Erythematosus,Lung Involvement
  1.  ;;^UTILITY(U,$J,358.3,37594,1,4,0)
  1.  ;;=4^M32.13
  1.  ;;^UTILITY(U,$J,358.3,37594,2)
  1.  ;;=^5011756
  1.  ;;^UTILITY(U,$J,358.3,37595,0)
  1.  ;;=M32.14^^107^1493^184
  1.  ;;^UTILITY(U,$J,358.3,37595,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,37595,1,3,0)
  1.  ;;=3^Systemic Lupus Erythematosus,Glomerular Disease
  1.  ;;^UTILITY(U,$J,358.3,37595,1,4,0)
  1.  ;;=4^M32.14
  1.  ;;^UTILITY(U,$J,358.3,37595,2)
  1.  ;;=^5011757
  1.  ;;^UTILITY(U,$J,358.3,37596,0)
  1.  ;;=M32.12^^107^1493^186
  1.  ;;^UTILITY(U,$J,358.3,37596,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,37596,1,3,0)
  1.  ;;=3^Systemic Lupus Erythematosus,Pericarditis
  1.  ;;^UTILITY(U,$J,358.3,37596,1,4,0)
  1.  ;;=4^M32.12
  1.  ;;^UTILITY(U,$J,358.3,37596,2)
  1.  ;;=^5011755
  1.  ;;^UTILITY(U,$J,358.3,37597,0)
  1.  ;;=M05.59^^107^1493^165
  1.  ;;^UTILITY(U,$J,358.3,37597,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,37597,1,3,0)
  1.  ;;=3^Rheumatoid Polyneuropathy w/ Rheumatoid Arthritis of Mult Sites
  1.  ;;^UTILITY(U,$J,358.3,37597,1,4,0)
  1.  ;;=4^M05.59
  1.  ;;^UTILITY(U,$J,358.3,37597,2)
  1.  ;;=^5009976
  1.  ;;^UTILITY(U,$J,358.3,37598,0)
  1.  ;;=M05.711^^107^1493^159
  1.  ;;^UTILITY(U,$J,358.3,37598,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,37598,1,3,0)
  1.  ;;=3^Rheumatoid Arthritis of Right Shoulder
  1.  ;;^UTILITY(U,$J,358.3,37598,1,4,0)
  1.  ;;=4^M05.711
  1.  ;;^UTILITY(U,$J,358.3,37598,2)
  1.  ;;=^5010001
  1.  ;;^UTILITY(U,$J,358.3,37599,0)
  1.  ;;=M05.712^^107^1493^152
  1.  ;;^UTILITY(U,$J,358.3,37599,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,37599,1,3,0)
  1.  ;;=3^Rheumatoid Arthritis of Left Shoulder
  1.  ;;^UTILITY(U,$J,358.3,37599,1,4,0)
  1.  ;;=4^M05.712
  1.  ;;^UTILITY(U,$J,358.3,37599,2)
  1.  ;;=^5010002
  1.  ;;^UTILITY(U,$J,358.3,37600,0)
  1.  ;;=M05.731^^107^1493^160
  1.  ;;^UTILITY(U,$J,358.3,37600,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,37600,1,3,0)
  1.  ;;=3^Rheumatoid Arthritis of Right Wrist
  1.  ;;^UTILITY(U,$J,358.3,37600,1,4,0)
  1.  ;;=4^M05.731
  1.  ;;^UTILITY(U,$J,358.3,37600,2)
  1.  ;;=^5010007
  1.  ;;^UTILITY(U,$J,358.3,37601,0)
  1.  ;;=M05.732^^107^1493^153
  1.  ;;^UTILITY(U,$J,358.3,37601,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,37601,1,3,0)
  1.  ;;=3^Rheumatoid Arthritis of Left Wrist
  1.  ;;^UTILITY(U,$J,358.3,37601,1,4,0)
  1.  ;;=4^M05.732
  1.  ;;^UTILITY(U,$J,358.3,37601,2)
  1.  ;;=^5010008
  1.  ;;^UTILITY(U,$J,358.3,37602,0)
  1.  ;;=M05.741^^107^1493^156
  1.  ;;^UTILITY(U,$J,358.3,37602,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,37602,1,3,0)
  1.  ;;=3^Rheumatoid Arthritis of Right Hand
  1.  ;;^UTILITY(U,$J,358.3,37602,1,4,0)
  1.  ;;=4^M05.741
  1.  ;;^UTILITY(U,$J,358.3,37602,2)
  1.  ;;=^5010010
  1.  ;;^UTILITY(U,$J,358.3,37603,0)
  1.  ;;=M05.742^^107^1493^149
  1.  ;;^UTILITY(U,$J,358.3,37603,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,37603,1,3,0)
  1.  ;;=3^Rheumatoid Arthritis of Left Hand
  1.  ;;^UTILITY(U,$J,358.3,37603,1,4,0)
  1.  ;;=4^M05.742
  1.  ;;^UTILITY(U,$J,358.3,37603,2)
  1.  ;;=^5010011
  1.  ;;^UTILITY(U,$J,358.3,37604,0)
  1.  ;;=M05.751^^107^1493^157
  1.  ;;^UTILITY(U,$J,358.3,37604,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,37604,1,3,0)
  1.  ;;=3^Rheumatoid Arthritis of Right Hip
  1.  ;;^UTILITY(U,$J,358.3,37604,1,4,0)
  1.  ;;=4^M05.751
  1.  ;;^UTILITY(U,$J,358.3,37604,2)
  1.  ;;=^5010013
  1.  ;;^UTILITY(U,$J,358.3,37605,0)
  1.  ;;=M05.752^^107^1493^150
  1.  ;;^UTILITY(U,$J,358.3,37605,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,37605,1,3,0)
  1.  ;;=3^Rheumatoid Arthritis of Left Hip
  1.  ;;^UTILITY(U,$J,358.3,37605,1,4,0)
  1.  ;;=4^M05.752
  1.  ;;^UTILITY(U,$J,358.3,37605,2)
  1.  ;;=^5010014
  1.  ;;^UTILITY(U,$J,358.3,37606,0)
  1.  ;;=M05.761^^107^1493^158