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

IBDEI028.m

Go to the documentation of this file.
IBDEI028 ; ; 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,5112,2)
 ;;=^5021383
 ;;^UTILITY(U,$J,358.3,5113,0)
 ;;=S10.86XA^^32^287^39
 ;;^UTILITY(U,$J,358.3,5113,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,5113,1,3,0)
 ;;=3^Neck,Insect Bite
 ;;^UTILITY(U,$J,358.3,5113,1,4,0)
 ;;=4^S10.86XA
 ;;^UTILITY(U,$J,358.3,5113,2)
 ;;=^5021386
 ;;^UTILITY(U,$J,358.3,5114,0)
 ;;=S01.25XA^^32^287^40
 ;;^UTILITY(U,$J,358.3,5114,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,5114,1,3,0)
 ;;=3^Nose,Open Bite
 ;;^UTILITY(U,$J,358.3,5114,1,4,0)
 ;;=4^S01.25XA
 ;;^UTILITY(U,$J,358.3,5114,2)
 ;;=^5020105
 ;;^UTILITY(U,$J,358.3,5115,0)
 ;;=S00.37XA^^32^287^41
 ;;^UTILITY(U,$J,358.3,5115,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,5115,1,3,0)
 ;;=3^Nose,Superficial
 ;;^UTILITY(U,$J,358.3,5115,1,4,0)
 ;;=4^S00.37XA
 ;;^UTILITY(U,$J,358.3,5115,2)
 ;;=^5019865
 ;;^UTILITY(U,$J,358.3,5116,0)
 ;;=S00.36XA^^32^287^42
 ;;^UTILITY(U,$J,358.3,5116,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,5116,1,3,0)
 ;;=3^Nose,Insect Bite
 ;;^UTILITY(U,$J,358.3,5116,1,4,0)
 ;;=4^S00.36XA
 ;;^UTILITY(U,$J,358.3,5116,2)
 ;;=^5019862
 ;;^UTILITY(U,$J,358.3,5117,0)
 ;;=S31.25XA^^32^287^43
 ;;^UTILITY(U,$J,358.3,5117,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,5117,1,3,0)
 ;;=3^Penis,Open Bite
 ;;^UTILITY(U,$J,358.3,5117,1,4,0)
 ;;=4^S31.25XA
 ;;^UTILITY(U,$J,358.3,5117,2)
 ;;=^5024134
 ;;^UTILITY(U,$J,358.3,5118,0)
 ;;=S30.872A^^32^287^44
 ;;^UTILITY(U,$J,358.3,5118,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,5118,1,3,0)
 ;;=3^Penis,Superficial
 ;;^UTILITY(U,$J,358.3,5118,1,4,0)
 ;;=4^S30.872A
 ;;^UTILITY(U,$J,358.3,5118,2)
 ;;=^5023951
 ;;^UTILITY(U,$J,358.3,5119,0)
 ;;=S30.862A^^32^287^45
 ;;^UTILITY(U,$J,358.3,5119,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,5119,1,3,0)
 ;;=3^Penis,Insect Bite
 ;;^UTILITY(U,$J,358.3,5119,1,4,0)
 ;;=4^S30.862A
 ;;^UTILITY(U,$J,358.3,5119,2)
 ;;=^5023927
 ;;^UTILITY(U,$J,358.3,5120,0)
 ;;=S01.05XA^^32^287^46
 ;;^UTILITY(U,$J,358.3,5120,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,5120,1,3,0)
 ;;=3^Scalp,Open Bite
 ;;^UTILITY(U,$J,358.3,5120,1,4,0)
 ;;=4^S01.05XA
 ;;^UTILITY(U,$J,358.3,5120,2)
 ;;=^5020048
 ;;^UTILITY(U,$J,358.3,5121,0)
 ;;=S00.07XA^^32^287^47
 ;;^UTILITY(U,$J,358.3,5121,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,5121,1,3,0)
 ;;=3^Scalp,Superficial
 ;;^UTILITY(U,$J,358.3,5121,1,4,0)
 ;;=4^S00.07XA
 ;;^UTILITY(U,$J,358.3,5121,2)
 ;;=^5019772
 ;;^UTILITY(U,$J,358.3,5122,0)
 ;;=S00.06XA^^32^287^48
 ;;^UTILITY(U,$J,358.3,5122,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,5122,1,3,0)
 ;;=3^Scalp,Insect Bite
 ;;^UTILITY(U,$J,358.3,5122,1,4,0)
 ;;=4^S00.06XA
 ;;^UTILITY(U,$J,358.3,5122,2)
 ;;=^5019769
 ;;^UTILITY(U,$J,358.3,5123,0)
 ;;=Z04.71^^32^288^1
 ;;^UTILITY(U,$J,358.3,5123,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,5123,1,3,0)
 ;;=3^Exam & Observation Following Alleged Physical Abuse
 ;;^UTILITY(U,$J,358.3,5123,1,4,0)
 ;;=4^Z04.71
 ;;^UTILITY(U,$J,358.3,5123,2)
 ;;=^5062663
 ;;^UTILITY(U,$J,358.3,5124,0)
 ;;=Z04.41^^32^288^2
 ;;^UTILITY(U,$J,358.3,5124,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,5124,1,3,0)
 ;;=3^Exam & Observation Following Alleged Rape
 ;;^UTILITY(U,$J,358.3,5124,1,4,0)
 ;;=4^Z04.41
 ;;^UTILITY(U,$J,358.3,5124,2)
 ;;=^5062660
 ;;^UTILITY(U,$J,358.3,5125,0)
 ;;=Z04.3^^32^288^3
 ;;^UTILITY(U,$J,358.3,5125,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,5125,1,3,0)
 ;;=3^Exam & Observation Following Other Accident
 ;;^UTILITY(U,$J,358.3,5125,1,4,0)
 ;;=4^Z04.3
 ;;^UTILITY(U,$J,358.3,5125,2)
 ;;=^5062659
 ;;^UTILITY(U,$J,358.3,5126,0)
 ;;=Z04.1^^32^288^4
 ;;^UTILITY(U,$J,358.3,5126,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,5126,1,3,0)
 ;;=3^Exam & Observation Following Transport Accident
 ;;^UTILITY(U,$J,358.3,5126,1,4,0)
 ;;=4^Z04.1
 ;;^UTILITY(U,$J,358.3,5126,2)
 ;;=^5062657
 ;;^UTILITY(U,$J,358.3,5127,0)
 ;;=Z03.823^^32^288^5
 ;;^UTILITY(U,$J,358.3,5127,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,5127,1,3,0)
 ;;=3^Exam & Observation for Suspected Foreign Body Ruled Out
 ;;^UTILITY(U,$J,358.3,5127,1,4,0)
 ;;=4^Z03.823
 ;;^UTILITY(U,$J,358.3,5127,2)
 ;;=^5159566
 ;;^UTILITY(U,$J,358.3,5128,0)
 ;;=99202^^33^289^1
 ;;^UTILITY(U,$J,358.3,5128,1,0)
 ;;=^358.31IA^2^2
 ;;^UTILITY(U,$J,358.3,5128,1,1,0)
 ;;=1^SF MDM or 15-29 min
 ;;^UTILITY(U,$J,358.3,5128,1,2,0)
 ;;=2^99202
 ;;^UTILITY(U,$J,358.3,5129,0)
 ;;=99203^^33^289^2
 ;;^UTILITY(U,$J,358.3,5129,1,0)
 ;;=^358.31IA^2^2
 ;;^UTILITY(U,$J,358.3,5129,1,1,0)
 ;;=1^Low MDM or 30-44 min
 ;;^UTILITY(U,$J,358.3,5129,1,2,0)
 ;;=2^99203
 ;;^UTILITY(U,$J,358.3,5130,0)
 ;;=99204^^33^289^3
 ;;^UTILITY(U,$J,358.3,5130,1,0)
 ;;=^358.31IA^2^2
 ;;^UTILITY(U,$J,358.3,5130,1,1,0)
 ;;=1^Moderate MDM or 45-59 min
 ;;^UTILITY(U,$J,358.3,5130,1,2,0)
 ;;=2^99204
 ;;^UTILITY(U,$J,358.3,5131,0)
 ;;=99205^^33^289^5
 ;;^UTILITY(U,$J,358.3,5131,1,0)
 ;;=^358.31IA^2^2
 ;;^UTILITY(U,$J,358.3,5131,1,1,0)
 ;;=1^High MDM or 60-74 min
 ;;^UTILITY(U,$J,358.3,5131,1,2,0)
 ;;=2^99205
 ;;^UTILITY(U,$J,358.3,5132,0)
 ;;=99212^^33^290^1
 ;;^UTILITY(U,$J,358.3,5132,1,0)
 ;;=^358.31IA^2^2
 ;;^UTILITY(U,$J,358.3,5132,1,1,0)
 ;;=1^SF MDM or 10-19 min
 ;;^UTILITY(U,$J,358.3,5132,1,2,0)
 ;;=2^99212
 ;;^UTILITY(U,$J,358.3,5133,0)
 ;;=99213^^33^290^2
 ;;^UTILITY(U,$J,358.3,5133,1,0)
 ;;=^358.31IA^2^2
 ;;^UTILITY(U,$J,358.3,5133,1,1,0)
 ;;=1^Low MDM or 20-29 min
 ;;^UTILITY(U,$J,358.3,5133,1,2,0)
 ;;=2^99213
 ;;^UTILITY(U,$J,358.3,5134,0)
 ;;=99214^^33^290^3
 ;;^UTILITY(U,$J,358.3,5134,1,0)
 ;;=^358.31IA^2^2
 ;;^UTILITY(U,$J,358.3,5134,1,1,0)
 ;;=1^Moderate MDM or 30-39 min
 ;;^UTILITY(U,$J,358.3,5134,1,2,0)
 ;;=2^99214
 ;;^UTILITY(U,$J,358.3,5135,0)
 ;;=99215^^33^290^4
 ;;^UTILITY(U,$J,358.3,5135,1,0)
 ;;=^358.31IA^2^2
 ;;^UTILITY(U,$J,358.3,5135,1,1,0)
 ;;=1^High MDM or 40-54 min
 ;;^UTILITY(U,$J,358.3,5135,1,2,0)
 ;;=2^99215
 ;;^UTILITY(U,$J,358.3,5136,0)
 ;;=99024^^33^290^5
 ;;^UTILITY(U,$J,358.3,5136,1,0)
 ;;=^358.31IA^2^2
 ;;^UTILITY(U,$J,358.3,5136,1,1,0)
 ;;=1^Post Op visit in Global
 ;;^UTILITY(U,$J,358.3,5136,1,2,0)
 ;;=2^99024
 ;;^UTILITY(U,$J,358.3,5137,0)
 ;;=99241^^33^291^1
 ;;^UTILITY(U,$J,358.3,5137,1,0)
 ;;=^358.31IA^2^2
 ;;^UTILITY(U,$J,358.3,5137,1,1,0)
 ;;=1^Problem Focused Hx/PE & SF MDM
 ;;^UTILITY(U,$J,358.3,5137,1,2,0)
 ;;=2^99241
 ;;^UTILITY(U,$J,358.3,5138,0)
 ;;=99242^^33^291^2
 ;;^UTILITY(U,$J,358.3,5138,1,0)
 ;;=^358.31IA^2^2
 ;;^UTILITY(U,$J,358.3,5138,1,1,0)
 ;;=1^Exp Problem Focused Hx/PE & SF MDM
 ;;^UTILITY(U,$J,358.3,5138,1,2,0)
 ;;=2^99242
 ;;^UTILITY(U,$J,358.3,5139,0)
 ;;=99243^^33^291^3
 ;;^UTILITY(U,$J,358.3,5139,1,0)
 ;;=^358.31IA^2^2
 ;;^UTILITY(U,$J,358.3,5139,1,1,0)
 ;;=1^Detailed Hx/PE & Low Complex MDM
 ;;^UTILITY(U,$J,358.3,5139,1,2,0)
 ;;=2^99243
 ;;^UTILITY(U,$J,358.3,5140,0)
 ;;=99244^^33^291^4
 ;;^UTILITY(U,$J,358.3,5140,1,0)
 ;;=^358.31IA^2^2
 ;;^UTILITY(U,$J,358.3,5140,1,1,0)
 ;;=1^Comprehensive Hx/PE & Moderate Complex MDM
 ;;^UTILITY(U,$J,358.3,5140,1,2,0)
 ;;=2^99244
 ;;^UTILITY(U,$J,358.3,5141,0)
 ;;=99245^^33^291^5
 ;;^UTILITY(U,$J,358.3,5141,1,0)
 ;;=^358.31IA^2^2
 ;;^UTILITY(U,$J,358.3,5141,1,1,0)
 ;;=1^Comprehensive Hx/PE & High Complex MDM
 ;;^UTILITY(U,$J,358.3,5141,1,2,0)
 ;;=2^99245
 ;;^UTILITY(U,$J,358.3,5142,0)
 ;;=E11.9^^34^292^71
 ;;^UTILITY(U,$J,358.3,5142,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,5142,1,3,0)
 ;;=3^Diabetes Type 2 w/o Complications
 ;;^UTILITY(U,$J,358.3,5142,1,4,0)
 ;;=4^E11.9
 ;;^UTILITY(U,$J,358.3,5142,2)
 ;;=^5002666
 ;;^UTILITY(U,$J,358.3,5143,0)
 ;;=E10.9^^34^292^56
 ;;^UTILITY(U,$J,358.3,5143,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,5143,1,3,0)
 ;;=3^Diabetes Type 1 w/o Complications
 ;;^UTILITY(U,$J,358.3,5143,1,4,0)
 ;;=4^E10.9
 ;;^UTILITY(U,$J,358.3,5143,2)
 ;;=^5002626
 ;;^UTILITY(U,$J,358.3,5144,0)
 ;;=E10.69^^34^292^55
 ;;^UTILITY(U,$J,358.3,5144,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,5144,1,3,0)
 ;;=3^Diabetes Type 1 w/ Other Spec Complication
 ;;^UTILITY(U,$J,358.3,5144,1,4,0)
 ;;=4^E10.69
 ;;^UTILITY(U,$J,358.3,5144,2)
 ;;=^5002624
 ;;^UTILITY(U,$J,358.3,5145,0)
 ;;=E11.65^^34^292^66
 ;;^UTILITY(U,$J,358.3,5145,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,5145,1,3,0)
 ;;=3^Diabetes Type 2 w/ Hyperglycemia
 ;;^UTILITY(U,$J,358.3,5145,1,4,0)
 ;;=4^E11.65
 ;;^UTILITY(U,$J,358.3,5145,2)
 ;;=^5002663
 ;;^UTILITY(U,$J,358.3,5146,0)
 ;;=E11.21^^34^292^59
 ;;^UTILITY(U,$J,358.3,5146,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,5146,1,3,0)
 ;;=3^Diabetes Type 2 w/ Diab Nephropathy
 ;;^UTILITY(U,$J,358.3,5146,1,4,0)
 ;;=4^E11.21
 ;;^UTILITY(U,$J,358.3,5146,2)
 ;;=^5002629
 ;;^UTILITY(U,$J,358.3,5147,0)
 ;;=E11.22^^34^292^58
 ;;^UTILITY(U,$J,358.3,5147,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,5147,1,3,0)
 ;;=3^Diabetes Type 2 w/ Chronic Kidney Disease
 ;;^UTILITY(U,$J,358.3,5147,1,4,0)
 ;;=4^E11.22
 ;;^UTILITY(U,$J,358.3,5147,2)
 ;;=^5002630
 ;;^UTILITY(U,$J,358.3,5148,0)
 ;;=E11.311^^34^292^60
 ;;^UTILITY(U,$J,358.3,5148,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,5148,1,3,0)
 ;;=3^Diabetes Type 2 w/ Diab Retinopathy w/ Macular Edema
 ;;^UTILITY(U,$J,358.3,5148,1,4,0)
 ;;=4^E11.311
 ;;^UTILITY(U,$J,358.3,5148,2)
 ;;=^5002632
 ;;^UTILITY(U,$J,358.3,5149,0)
 ;;=E11.319^^34^292^61
 ;;^UTILITY(U,$J,358.3,5149,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,5149,1,3,0)
 ;;=3^Diabetes Type 2 w/ Diab Retinopathy w/o Macular Edema
 ;;^UTILITY(U,$J,358.3,5149,1,4,0)
 ;;=4^E11.319
 ;;^UTILITY(U,$J,358.3,5149,2)
 ;;=^5002633
 ;;^UTILITY(U,$J,358.3,5150,0)
 ;;=E11.621^^34^292^65
 ;;^UTILITY(U,$J,358.3,5150,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,5150,1,3,0)
 ;;=3^Diabetes Type 2 w/ Foot Ulcer
 ;;^UTILITY(U,$J,358.3,5150,1,4,0)
 ;;=4^E11.621
 ;;^UTILITY(U,$J,358.3,5150,2)
 ;;=^5002656
 ;;^UTILITY(U,$J,358.3,5151,0)
 ;;=E11.8^^34^292^70
 ;;^UTILITY(U,$J,358.3,5151,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,5151,1,3,0)
 ;;=3^Diabetes Type 2 w/ Unspec Complications
 ;;^UTILITY(U,$J,358.3,5151,1,4,0)
 ;;=4^E11.8
 ;;^UTILITY(U,$J,358.3,5151,2)
 ;;=^5002665
 ;;^UTILITY(U,$J,358.3,5152,0)
 ;;=N18.9^^34^292^51
 ;;^UTILITY(U,$J,358.3,5152,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,5152,1,3,0)
 ;;=3^CKD,Unspec
 ;;^UTILITY(U,$J,358.3,5152,1,4,0)
 ;;=4^N18.9
 ;;^UTILITY(U,$J,358.3,5152,2)
 ;;=^332812
 ;;^UTILITY(U,$J,358.3,5153,0)
 ;;=E11.36^^34^292^62
 ;;^UTILITY(U,$J,358.3,5153,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,5153,1,3,0)
 ;;=3^Diabetes Type 2 w/ Diabetic Cataract
 ;;^UTILITY(U,$J,358.3,5153,1,4,0)
 ;;=4^E11.36
 ;;^UTILITY(U,$J,358.3,5153,2)
 ;;=^5002642
 ;;^UTILITY(U,$J,358.3,5154,0)
 ;;=E11.40^^34^292^63
 ;;^UTILITY(U,$J,358.3,5154,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,5154,1,3,0)
 ;;=3^Diabetes Type 2 w/ Diabetic Neurpathy,Unspec
 ;;^UTILITY(U,$J,358.3,5154,1,4,0)
 ;;=4^E11.40
 ;;^UTILITY(U,$J,358.3,5154,2)
 ;;=^5002644
 ;;^UTILITY(U,$J,358.3,5155,0)
 ;;=E11.51^^34^292^64
 ;;^UTILITY(U,$J,358.3,5155,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,5155,1,3,0)
 ;;=3^Diabetes Type 2 w/ Diabetic Peripheral Angiopath w/o Gangrene
 ;;^UTILITY(U,$J,358.3,5155,1,4,0)
 ;;=4^E11.51
 ;;^UTILITY(U,$J,358.3,5155,2)
 ;;=^5002650
 ;;^UTILITY(U,$J,358.3,5156,0)
 ;;=E29.1^^34^292^222
 ;;^UTILITY(U,$J,358.3,5156,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,5156,1,3,0)
 ;;=3^Testicular Hypofunction
 ;;^UTILITY(U,$J,358.3,5156,1,4,0)
 ;;=4^E29.1
 ;;^UTILITY(U,$J,358.3,5156,2)
 ;;=^5002754
 ;;^UTILITY(U,$J,358.3,5157,0)
 ;;=E04.1^^34^292^223
 ;;^UTILITY(U,$J,358.3,5157,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,5157,1,3,0)
 ;;=3^Thyroid Nodule,Single,Nontoxic
 ;;^UTILITY(U,$J,358.3,5157,1,4,0)
 ;;=4^E04.1
 ;;^UTILITY(U,$J,358.3,5157,2)
 ;;=^5002478
 ;;^UTILITY(U,$J,358.3,5158,0)
 ;;=E03.9^^34^292^133
 ;;^UTILITY(U,$J,358.3,5158,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,5158,1,3,0)
 ;;=3^Hypothyroidism,Unspec
 ;;^UTILITY(U,$J,358.3,5158,1,4,0)
 ;;=4^E03.9
 ;;^UTILITY(U,$J,358.3,5158,2)
 ;;=^5002476
 ;;^UTILITY(U,$J,358.3,5159,0)
 ;;=M81.0^^34^292^198
 ;;^UTILITY(U,$J,358.3,5159,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,5159,1,3,0)
 ;;=3^Osteoporosis,Age-Related w/o Current Path Fracture
 ;;^UTILITY(U,$J,358.3,5159,1,4,0)
 ;;=4^M81.0
 ;;^UTILITY(U,$J,358.3,5159,2)
 ;;=^5013555
 ;;^UTILITY(U,$J,358.3,5160,0)
 ;;=E05.90^^34^292^122
 ;;^UTILITY(U,$J,358.3,5160,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,5160,1,3,0)
 ;;=3^Hyperthyroidism w/o Thyrotoxic Crisis/Storm
 ;;^UTILITY(U,$J,358.3,5160,1,4,0)
 ;;=4^E05.90
 ;;^UTILITY(U,$J,358.3,5160,2)
 ;;=^5002492
 ;;^UTILITY(U,$J,358.3,5161,0)
 ;;=C73.^^34^292^160
 ;;^UTILITY(U,$J,358.3,5161,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,5161,1,3,0)
 ;;=3^Malig Neop of Thyroid Gland
 ;;^UTILITY(U,$J,358.3,5161,1,4,0)
 ;;=4^C73.
 ;;^UTILITY(U,$J,358.3,5161,2)
 ;;=^267296
 ;;^UTILITY(U,$J,358.3,5162,0)
 ;;=E04.2^^34^292^77
 ;;^UTILITY(U,$J,358.3,5162,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,5162,1,3,0)
 ;;=3^Goiter,Multinodular,Nontoxic
 ;;^UTILITY(U,$J,358.3,5162,1,4,0)
 ;;=4^E04.2
 ;;^UTILITY(U,$J,358.3,5162,2)
 ;;=^267790
 ;;^UTILITY(U,$J,358.3,5163,0)
 ;;=E78.5^^34^292^105
 ;;^UTILITY(U,$J,358.3,5163,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,5163,1,3,0)
 ;;=3^Hyperlipidemia,Unspec
 ;;^UTILITY(U,$J,358.3,5163,1,4,0)
 ;;=4^E78.5
 ;;^UTILITY(U,$J,358.3,5163,2)
 ;;=^5002969
 ;;^UTILITY(U,$J,358.3,5164,0)
 ;;=D35.2^^34^292^41
 ;;^UTILITY(U,$J,358.3,5164,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,5164,1,3,0)
 ;;=3^Benign Neop of Pituitary Gland
 ;;^UTILITY(U,$J,358.3,5164,1,4,0)
 ;;=4^D35.2
 ;;^UTILITY(U,$J,358.3,5164,2)
 ;;=^5002145
 ;;^UTILITY(U,$J,358.3,5165,0)
 ;;=D35.3^^34^292^36
 ;;^UTILITY(U,$J,358.3,5165,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,5165,1,3,0)
 ;;=3^Benign Neop of Craniopharyngeal Duct
 ;;^UTILITY(U,$J,358.3,5165,1,4,0)
 ;;=4^D35.3
 ;;^UTILITY(U,$J,358.3,5165,2)
 ;;=^5002146
 ;;^UTILITY(U,$J,358.3,5166,0)
 ;;=E21.0^^34^292^106
 ;;^UTILITY(U,$J,358.3,5166,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,5166,1,3,0)
 ;;=3^Hyperparathyroidism,Primary
 ;;^UTILITY(U,$J,358.3,5166,1,4,0)
 ;;=4^E21.0
 ;;^UTILITY(U,$J,358.3,5166,2)
 ;;=^331439
 ;;^UTILITY(U,$J,358.3,5167,0)
 ;;=I10.^^34^292^110
 ;;^UTILITY(U,$J,358.3,5167,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,5167,1,3,0)
 ;;=3^Hypertension,Essential
 ;;^UTILITY(U,$J,358.3,5167,1,4,0)
 ;;=4^I10.
 ;;^UTILITY(U,$J,358.3,5167,2)
 ;;=^5007062
 ;;^UTILITY(U,$J,358.3,5168,0)
 ;;=E83.52^^34^292^101
 ;;^UTILITY(U,$J,358.3,5168,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,5168,1,3,0)
 ;;=3^Hypercalcemia
 ;;^UTILITY(U,$J,358.3,5168,1,4,0)
 ;;=4^E83.52
 ;;^UTILITY(U,$J,358.3,5168,2)
 ;;=^59932
 ;;^UTILITY(U,$J,358.3,5169,0)
 ;;=E23.0^^34^292^129
 ;;^UTILITY(U,$J,358.3,5169,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,5169,1,3,0)
 ;;=3^Hypopituitarism
 ;;^UTILITY(U,$J,358.3,5169,1,4,0)
 ;;=4^E23.0
 ;;^UTILITY(U,$J,358.3,5169,2)
 ;;=^60685
 ;;^UTILITY(U,$J,358.3,5170,0)
 ;;=E55.9^^34^292^231
 ;;^UTILITY(U,$J,358.3,5170,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,5170,1,3,0)
 ;;=3^Vitamin D Deficiency,Unspec
 ;;^UTILITY(U,$J,358.3,5170,1,4,0)
 ;;=4^E55.9
 ;;^UTILITY(U,$J,358.3,5170,2)
 ;;=^5002799
 ;;^UTILITY(U,$J,358.3,5171,0)
 ;;=E26.9^^34^292^99
 ;;^UTILITY(U,$J,358.3,5171,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,5171,1,3,0)
 ;;=3^Hyperaldosteronism,Unspec
 ;;^UTILITY(U,$J,358.3,5171,1,4,0)
 ;;=4^E26.9
 ;;^UTILITY(U,$J,358.3,5171,2)
 ;;=^5002738
 ;;^UTILITY(U,$J,358.3,5172,0)
 ;;=E16.2^^34^292^123
 ;;^UTILITY(U,$J,358.3,5172,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,5172,1,3,0)
 ;;=3^Hypoglycemia,Unspec
 ;;^UTILITY(U,$J,358.3,5172,1,4,0)
 ;;=4^E16.2
 ;;^UTILITY(U,$J,358.3,5172,2)
 ;;=^5002708
 ;;^UTILITY(U,$J,358.3,5173,0)
 ;;=F64.1^^34^292^72
 ;;^UTILITY(U,$J,358.3,5173,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,5173,1,3,0)
 ;;=3^Dual Role Transvestism
 ;;^UTILITY(U,$J,358.3,5173,1,4,0)
 ;;=4^F64.1
 ;;^UTILITY(U,$J,358.3,5173,2)
 ;;=^5003647
 ;;^UTILITY(U,$J,358.3,5174,0)
 ;;=E28.39^^34^292^124
 ;;^UTILITY(U,$J,358.3,5174,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,5174,1,3,0)
 ;;=3^Hypogonadism,Female
 ;;^UTILITY(U,$J,358.3,5174,1,4,0)
 ;;=4^E28.39
 ;;^UTILITY(U,$J,358.3,5174,2)
 ;;=^5002752
 ;;^UTILITY(U,$J,358.3,5175,0)
 ;;=O92.6^^34^292^74
 ;;^UTILITY(U,$J,358.3,5175,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,5175,1,3,0)
 ;;=3^Galactorrhea
 ;;^UTILITY(U,$J,358.3,5175,1,4,0)
 ;;=4^O92.6
 ;;^UTILITY(U,$J,358.3,5175,2)
 ;;=^48842
 ;;^UTILITY(U,$J,358.3,5176,0)
 ;;=E22.1^^34^292^109
 ;;^UTILITY(U,$J,358.3,5176,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,5176,1,3,0)
 ;;=3^Hyperprolactinemia
 ;;^UTILITY(U,$J,358.3,5176,1,4,0)
 ;;=4^E22.1
 ;;^UTILITY(U,$J,358.3,5176,2)
 ;;=^60265
 ;;^UTILITY(U,$J,358.3,5177,0)
 ;;=N62.^^34^292^80
 ;;^UTILITY(U,$J,358.3,5177,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,5177,1,3,0)
 ;;=3^Gynecomastia
 ;;^UTILITY(U,$J,358.3,5177,1,4,0)
 ;;=4^N62.
 ;;^UTILITY(U,$J,358.3,5177,2)
 ;;=^5015790
 ;;^UTILITY(U,$J,358.3,5178,0)
 ;;=D35.01^^34^292^42
 ;;^UTILITY(U,$J,358.3,5178,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,5178,1,3,0)
 ;;=3^Benign Neop of Right Adrenal Gland
 ;;^UTILITY(U,$J,358.3,5178,1,4,0)
 ;;=4^D35.01
 ;;^UTILITY(U,$J,358.3,5178,2)
 ;;=^5002143
 ;;^UTILITY(U,$J,358.3,5179,0)
 ;;=D35.02^^34^292^38
 ;;^UTILITY(U,$J,358.3,5179,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,5179,1,3,0)
 ;;=3^Benign Neop of Left Adrenal Gland
 ;;^UTILITY(U,$J,358.3,5179,1,4,0)
 ;;=4^D35.02
 ;;^UTILITY(U,$J,358.3,5179,2)
 ;;=^5002144
 ;;^UTILITY(U,$J,358.3,5180,0)
 ;;=D35.1^^34^292^39
 ;;^UTILITY(U,$J,358.3,5180,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,5180,1,3,0)
 ;;=3^Benign Neop of Parathyroid Gland
 ;;^UTILITY(U,$J,358.3,5180,1,4,0)
 ;;=4^D35.1
 ;;^UTILITY(U,$J,358.3,5180,2)
 ;;=^267689
 ;;^UTILITY(U,$J,358.3,5181,0)
 ;;=D35.4^^34^292^40
 ;;^UTILITY(U,$J,358.3,5181,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,5181,1,3,0)
 ;;=3^Benign Neop of Pineal Gland
 ;;^UTILITY(U,$J,358.3,5181,1,4,0)
 ;;=4^D35.4
 ;;^UTILITY(U,$J,358.3,5181,2)
 ;;=^267691
 ;;^UTILITY(U,$J,358.3,5182,0)
 ;;=D35.5^^34^292^35
 ;;^UTILITY(U,$J,358.3,5182,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,5182,1,3,0)
 ;;=3^Benign Neop of Carotid Body
 ;;^UTILITY(U,$J,358.3,5182,1,4,0)
 ;;=4^D35.5
 ;;^UTILITY(U,$J,358.3,5182,2)
 ;;=^267692
 ;;^UTILITY(U,$J,358.3,5183,0)
 ;;=D35.6^^34^292^34
 ;;^UTILITY(U,$J,358.3,5183,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,5183,1,3,0)
 ;;=3^Benign Neop of Aortic Body/Oth Paraganglia
 ;;^UTILITY(U,$J,358.3,5183,1,4,0)
 ;;=4^D35.6
 ;;^UTILITY(U,$J,358.3,5183,2)
 ;;=^267693
 ;;^UTILITY(U,$J,358.3,5184,0)
 ;;=D35.7^^34^292^37
 ;;^UTILITY(U,$J,358.3,5184,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,5184,1,3,0)
 ;;=3^Benign Neop of Endocrine Glands,Oth Specified
 ;;^UTILITY(U,$J,358.3,5184,1,4,0)
 ;;=4^D35.7
 ;;^UTILITY(U,$J,358.3,5184,2)
 ;;=^5002147
 ;;^UTILITY(U,$J,358.3,5185,0)
 ;;=C74.01^^34^292^158
 ;;^UTILITY(U,$J,358.3,5185,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,5185,1,3,0)
 ;;=3^Malig Neop of Right Adrenal Gland Cortex
 ;;^UTILITY(U,$J,358.3,5185,1,4,0)
 ;;=4^C74.01