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

IBDEI079.m

Go to the documentation of this file.
IBDEI079 ; ; 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,17644,1,4,0)
 ;;=4^I50.20
 ;;^UTILITY(U,$J,358.3,17644,2)
 ;;=^5007239
 ;;^UTILITY(U,$J,358.3,17645,0)
 ;;=I50.30^^59^700^22
 ;;^UTILITY(U,$J,358.3,17645,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17645,1,3,0)
 ;;=3^Heart Failure,Diastolic,Unspec
 ;;^UTILITY(U,$J,358.3,17645,1,4,0)
 ;;=4^I50.30
 ;;^UTILITY(U,$J,358.3,17645,2)
 ;;=^5007243
 ;;^UTILITY(U,$J,358.3,17646,0)
 ;;=I50.40^^59^700^21
 ;;^UTILITY(U,$J,358.3,17646,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17646,1,3,0)
 ;;=3^Heart Failure,Combined Systolic & Diastolic,Unspec
 ;;^UTILITY(U,$J,358.3,17646,1,4,0)
 ;;=4^I50.40
 ;;^UTILITY(U,$J,358.3,17646,2)
 ;;=^5007247
 ;;^UTILITY(U,$J,358.3,17647,0)
 ;;=Z71.89^^59^701^1
 ;;^UTILITY(U,$J,358.3,17647,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17647,1,3,0)
 ;;=3^Counseling,Other Specified
 ;;^UTILITY(U,$J,358.3,17647,1,4,0)
 ;;=4^Z71.89
 ;;^UTILITY(U,$J,358.3,17647,2)
 ;;=^5063253
 ;;^UTILITY(U,$J,358.3,17648,0)
 ;;=Z71.7^^59^701^2
 ;;^UTILITY(U,$J,358.3,17648,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17648,1,3,0)
 ;;=3^HIV Counseling
 ;;^UTILITY(U,$J,358.3,17648,1,4,0)
 ;;=4^Z71.7
 ;;^UTILITY(U,$J,358.3,17648,2)
 ;;=^5063251
 ;;^UTILITY(U,$J,358.3,17649,0)
 ;;=Z76.89^^59^701^5
 ;;^UTILITY(U,$J,358.3,17649,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17649,1,3,0)
 ;;=3^Persons Encountering Health Services for Oth Circumstances
 ;;^UTILITY(U,$J,358.3,17649,1,4,0)
 ;;=4^Z76.89
 ;;^UTILITY(U,$J,358.3,17649,2)
 ;;=^5063304
 ;;^UTILITY(U,$J,358.3,17650,0)
 ;;=Z01.812^^59^701^3
 ;;^UTILITY(U,$J,358.3,17650,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17650,1,3,0)
 ;;=3^Lab Result Counseling
 ;;^UTILITY(U,$J,358.3,17650,1,4,0)
 ;;=4^Z01.812
 ;;^UTILITY(U,$J,358.3,17650,2)
 ;;=^5062627
 ;;^UTILITY(U,$J,358.3,17651,0)
 ;;=Z11.7^^59^701^6
 ;;^UTILITY(U,$J,358.3,17651,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17651,1,3,0)
 ;;=3^Testing for Latent Tuberculosis Infection
 ;;^UTILITY(U,$J,358.3,17651,1,4,0)
 ;;=4^Z11.7
 ;;^UTILITY(U,$J,358.3,17651,2)
 ;;=^5158320
 ;;^UTILITY(U,$J,358.3,17652,0)
 ;;=Z22.7^^59^701^4
 ;;^UTILITY(U,$J,358.3,17652,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17652,1,3,0)
 ;;=3^Latent Tuberculosis
 ;;^UTILITY(U,$J,358.3,17652,1,4,0)
 ;;=4^Z22.7
 ;;^UTILITY(U,$J,358.3,17652,2)
 ;;=^5158321
 ;;^UTILITY(U,$J,358.3,17653,0)
 ;;=E03.9^^59^702^29
 ;;^UTILITY(U,$J,358.3,17653,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17653,1,3,0)
 ;;=3^Hypothroidism,Unspec
 ;;^UTILITY(U,$J,358.3,17653,1,4,0)
 ;;=4^E03.9
 ;;^UTILITY(U,$J,358.3,17653,2)
 ;;=^5002476
 ;;^UTILITY(U,$J,358.3,17654,0)
 ;;=E11.9^^59^702^23
 ;;^UTILITY(U,$J,358.3,17654,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17654,1,3,0)
 ;;=3^DM Type 2 w/o Complications
 ;;^UTILITY(U,$J,358.3,17654,1,4,0)
 ;;=4^E11.9
 ;;^UTILITY(U,$J,358.3,17654,2)
 ;;=^5002666
 ;;^UTILITY(U,$J,358.3,17655,0)
 ;;=E10.9^^59^702^7
 ;;^UTILITY(U,$J,358.3,17655,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17655,1,3,0)
 ;;=3^DM Type 1 w/o Complications
 ;;^UTILITY(U,$J,358.3,17655,1,4,0)
 ;;=4^E10.9
 ;;^UTILITY(U,$J,358.3,17655,2)
 ;;=^5002626
 ;;^UTILITY(U,$J,358.3,17656,0)
 ;;=E11.65^^59^702^16
 ;;^UTILITY(U,$J,358.3,17656,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17656,1,3,0)
 ;;=3^DM Type 2 w/ Hyperglycemia
 ;;^UTILITY(U,$J,358.3,17656,1,4,0)
 ;;=4^E11.65
 ;;^UTILITY(U,$J,358.3,17656,2)
 ;;=^5002663
 ;;^UTILITY(U,$J,358.3,17657,0)
 ;;=E53.8^^59^702^34
 ;;^UTILITY(U,$J,358.3,17657,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17657,1,3,0)
 ;;=3^Vitamin B Deficiency NEC
 ;;^UTILITY(U,$J,358.3,17657,1,4,0)
 ;;=4^E53.8
 ;;^UTILITY(U,$J,358.3,17657,2)
 ;;=^5002797
 ;;^UTILITY(U,$J,358.3,17658,0)
 ;;=E78.5^^59^702^27
 ;;^UTILITY(U,$J,358.3,17658,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17658,1,3,0)
 ;;=3^Hyperlipidemia,Unspec
 ;;^UTILITY(U,$J,358.3,17658,1,4,0)
 ;;=4^E78.5
 ;;^UTILITY(U,$J,358.3,17658,2)
 ;;=^5002969
 ;;^UTILITY(U,$J,358.3,17659,0)
 ;;=E66.01^^59^702^31
 ;;^UTILITY(U,$J,358.3,17659,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17659,1,3,0)
 ;;=3^Morbid Obesity
 ;;^UTILITY(U,$J,358.3,17659,1,4,0)
 ;;=4^E66.01
 ;;^UTILITY(U,$J,358.3,17659,2)
 ;;=^5002826
 ;;^UTILITY(U,$J,358.3,17660,0)
 ;;=D64.9^^59^702^6
 ;;^UTILITY(U,$J,358.3,17660,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17660,1,3,0)
 ;;=3^Anemia,Unspec
 ;;^UTILITY(U,$J,358.3,17660,1,4,0)
 ;;=4^D64.9
 ;;^UTILITY(U,$J,358.3,17660,2)
 ;;=^5002351
 ;;^UTILITY(U,$J,358.3,17661,0)
 ;;=D68.318^^59^702^25
 ;;^UTILITY(U,$J,358.3,17661,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17661,1,3,0)
 ;;=3^Hemorrhagic Disorder d/t Intrns Circ Anticoag/Antibodies/Inhibitors
 ;;^UTILITY(U,$J,358.3,17661,1,4,0)
 ;;=4^D68.318
 ;;^UTILITY(U,$J,358.3,17661,2)
 ;;=^340504
 ;;^UTILITY(U,$J,358.3,17662,0)
 ;;=D50.9^^59^702^30
 ;;^UTILITY(U,$J,358.3,17662,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17662,1,3,0)
 ;;=3^Iron Deficiency Anemia,Unspec
 ;;^UTILITY(U,$J,358.3,17662,1,4,0)
 ;;=4^D50.9
 ;;^UTILITY(U,$J,358.3,17662,2)
 ;;=^5002283
 ;;^UTILITY(U,$J,358.3,17663,0)
 ;;=D64.81^^59^702^3
 ;;^UTILITY(U,$J,358.3,17663,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17663,1,3,0)
 ;;=3^Anemia d/t Antineoplastic Chemotherapy
 ;;^UTILITY(U,$J,358.3,17663,1,4,0)
 ;;=4^D64.81
 ;;^UTILITY(U,$J,358.3,17663,2)
 ;;=^5002349
 ;;^UTILITY(U,$J,358.3,17664,0)
 ;;=D63.1^^59^702^5
 ;;^UTILITY(U,$J,358.3,17664,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17664,1,3,0)
 ;;=3^Anemia in Chronic Kidney Disease
 ;;^UTILITY(U,$J,358.3,17664,1,4,0)
 ;;=4^D63.1
 ;;^UTILITY(U,$J,358.3,17664,2)
 ;;=^332908
 ;;^UTILITY(U,$J,358.3,17665,0)
 ;;=D62.^^59^702^1
 ;;^UTILITY(U,$J,358.3,17665,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17665,1,3,0)
 ;;=3^Acute Blood Loss Anemia
 ;;^UTILITY(U,$J,358.3,17665,1,4,0)
 ;;=4^D62.
 ;;^UTILITY(U,$J,358.3,17665,2)
 ;;=^267986
 ;;^UTILITY(U,$J,358.3,17666,0)
 ;;=D51.9^^59^702^36
 ;;^UTILITY(U,$J,358.3,17666,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17666,1,3,0)
 ;;=3^Vitamin B12 Deficiency Anemia,Unspec
 ;;^UTILITY(U,$J,358.3,17666,1,4,0)
 ;;=4^D51.9
 ;;^UTILITY(U,$J,358.3,17666,2)
 ;;=^5002289
 ;;^UTILITY(U,$J,358.3,17667,0)
 ;;=D51.3^^59^702^35
 ;;^UTILITY(U,$J,358.3,17667,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17667,1,3,0)
 ;;=3^Vitamin B12 Deficiency Anemia,Dietary
 ;;^UTILITY(U,$J,358.3,17667,1,4,0)
 ;;=4^D51.3
 ;;^UTILITY(U,$J,358.3,17667,2)
 ;;=^5002287
 ;;^UTILITY(U,$J,358.3,17668,0)
 ;;=D51.0^^59^702^32
 ;;^UTILITY(U,$J,358.3,17668,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17668,1,3,0)
 ;;=3^Pernicious Anemia
 ;;^UTILITY(U,$J,358.3,17668,1,4,0)
 ;;=4^D51.0
 ;;^UTILITY(U,$J,358.3,17668,2)
 ;;=^5002284
 ;;^UTILITY(U,$J,358.3,17669,0)
 ;;=D50.0^^59^702^4
 ;;^UTILITY(U,$J,358.3,17669,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17669,1,3,0)
 ;;=3^Anemia d/t Blood Loss (Chronic)
 ;;^UTILITY(U,$J,358.3,17669,1,4,0)
 ;;=4^D50.0
 ;;^UTILITY(U,$J,358.3,17669,2)
 ;;=^267971
 ;;^UTILITY(U,$J,358.3,17670,0)
 ;;=E11.21^^59^702^19
 ;;^UTILITY(U,$J,358.3,17670,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17670,1,3,0)
 ;;=3^DM Type 2 w/ Nephropathy
 ;;^UTILITY(U,$J,358.3,17670,1,4,0)
 ;;=4^E11.21
 ;;^UTILITY(U,$J,358.3,17670,2)
 ;;=^5002629
 ;;^UTILITY(U,$J,358.3,17671,0)
 ;;=E11.22^^59^702^9
 ;;^UTILITY(U,$J,358.3,17671,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17671,1,3,0)
 ;;=3^DM Type 2 w/ Diabetic CKD
 ;;^UTILITY(U,$J,358.3,17671,1,4,0)
 ;;=4^E11.22
 ;;^UTILITY(U,$J,358.3,17671,2)
 ;;=^5002630
 ;;^UTILITY(U,$J,358.3,17672,0)
 ;;=E11.29^^59^702^20
 ;;^UTILITY(U,$J,358.3,17672,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17672,1,3,0)
 ;;=3^DM Type 2 w/ Other Diabetic Kidney Complication
 ;;^UTILITY(U,$J,358.3,17672,1,4,0)
 ;;=4^E11.29
 ;;^UTILITY(U,$J,358.3,17672,2)
 ;;=^5002631
 ;;^UTILITY(U,$J,358.3,17673,0)
 ;;=E11.311^^59^702^21
 ;;^UTILITY(U,$J,358.3,17673,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17673,1,3,0)
 ;;=3^DM Type 2 w/ Unspec Diabetic Retinopathy w/ Macular edema
 ;;^UTILITY(U,$J,358.3,17673,1,4,0)
 ;;=4^E11.311
 ;;^UTILITY(U,$J,358.3,17673,2)
 ;;=^5002632
 ;;^UTILITY(U,$J,358.3,17674,0)
 ;;=E11.319^^59^702^22
 ;;^UTILITY(U,$J,358.3,17674,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17674,1,3,0)
 ;;=3^DM Type 2 w/ Unspec Diabetic Retinopathy w/o Macular Edema
 ;;^UTILITY(U,$J,358.3,17674,1,4,0)
 ;;=4^E11.319
 ;;^UTILITY(U,$J,358.3,17674,2)
 ;;=^5002633
 ;;^UTILITY(U,$J,358.3,17675,0)
 ;;=E11.40^^59^702^11
 ;;^UTILITY(U,$J,358.3,17675,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17675,1,3,0)
 ;;=3^DM Type 2 w/ Diabetic Neuropathy,Unspec
 ;;^UTILITY(U,$J,358.3,17675,1,4,0)
 ;;=4^E11.40
 ;;^UTILITY(U,$J,358.3,17675,2)
 ;;=^5002644
 ;;^UTILITY(U,$J,358.3,17676,0)
 ;;=E11.41^^59^702^10
 ;;^UTILITY(U,$J,358.3,17676,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17676,1,3,0)
 ;;=3^DM Type 2 w/ Diabetic Mononeuropathy
 ;;^UTILITY(U,$J,358.3,17676,1,4,0)
 ;;=4^E11.41
 ;;^UTILITY(U,$J,358.3,17676,2)
 ;;=^5002645
 ;;^UTILITY(U,$J,358.3,17677,0)
 ;;=E11.42^^59^702^14
 ;;^UTILITY(U,$J,358.3,17677,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17677,1,3,0)
 ;;=3^DM Type 2 w/ Diabetic Polyneuropathy
 ;;^UTILITY(U,$J,358.3,17677,1,4,0)
 ;;=4^E11.42
 ;;^UTILITY(U,$J,358.3,17677,2)
 ;;=^5002646
 ;;^UTILITY(U,$J,358.3,17678,0)
 ;;=E11.43^^59^702^8
 ;;^UTILITY(U,$J,358.3,17678,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17678,1,3,0)
 ;;=3^DM Type 2 w/ Diabetic Autonomic Polyneuropathy
 ;;^UTILITY(U,$J,358.3,17678,1,4,0)
 ;;=4^E11.43
 ;;^UTILITY(U,$J,358.3,17678,2)
 ;;=^5002647
 ;;^UTILITY(U,$J,358.3,17679,0)
 ;;=E11.51^^59^702^12
 ;;^UTILITY(U,$J,358.3,17679,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17679,1,3,0)
 ;;=3^DM Type 2 w/ Diabetic Peripheral Angiopathy w/o Gangrene
 ;;^UTILITY(U,$J,358.3,17679,1,4,0)
 ;;=4^E11.51
 ;;^UTILITY(U,$J,358.3,17679,2)
 ;;=^5002650
 ;;^UTILITY(U,$J,358.3,17680,0)
 ;;=E11.52^^59^702^13
 ;;^UTILITY(U,$J,358.3,17680,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17680,1,3,0)
 ;;=3^DM Type 2 w/ Diabetic Peripheral Angiopathy w/ Gangrene
 ;;^UTILITY(U,$J,358.3,17680,1,4,0)
 ;;=4^E11.52
 ;;^UTILITY(U,$J,358.3,17680,2)
 ;;=^5002651
 ;;^UTILITY(U,$J,358.3,17681,0)
 ;;=E11.621^^59^702^15
 ;;^UTILITY(U,$J,358.3,17681,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17681,1,3,0)
 ;;=3^DM Type 2 w/ Foot Ulcer
 ;;^UTILITY(U,$J,358.3,17681,1,4,0)
 ;;=4^E11.621
 ;;^UTILITY(U,$J,358.3,17681,2)
 ;;=^5002656
 ;;^UTILITY(U,$J,358.3,17682,0)
 ;;=E11.641^^59^702^17
 ;;^UTILITY(U,$J,358.3,17682,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17682,1,3,0)
 ;;=3^DM Type 2 w/ Hypoglycemia w/ Coma
 ;;^UTILITY(U,$J,358.3,17682,1,4,0)
 ;;=4^E11.641
 ;;^UTILITY(U,$J,358.3,17682,2)
 ;;=^5002661
 ;;^UTILITY(U,$J,358.3,17683,0)
 ;;=E11.649^^59^702^18
 ;;^UTILITY(U,$J,358.3,17683,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17683,1,3,0)
 ;;=3^DM Type 2 w/ Hypoglycemia w/o Coma
 ;;^UTILITY(U,$J,358.3,17683,1,4,0)
 ;;=4^E11.649
 ;;^UTILITY(U,$J,358.3,17683,2)
 ;;=^5002662
 ;;^UTILITY(U,$J,358.3,17684,0)
 ;;=E78.01^^59^702^24
 ;;^UTILITY(U,$J,358.3,17684,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17684,1,3,0)
 ;;=3^Familial Hypercholesterolemia
 ;;^UTILITY(U,$J,358.3,17684,1,4,0)
 ;;=4^E78.01
 ;;^UTILITY(U,$J,358.3,17684,2)
 ;;=^7570555
 ;;^UTILITY(U,$J,358.3,17685,0)
 ;;=E78.00^^59^702^33
 ;;^UTILITY(U,$J,358.3,17685,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17685,1,3,0)
 ;;=3^Pure Hypercholesterolemia,Unspec
 ;;^UTILITY(U,$J,358.3,17685,1,4,0)
 ;;=4^E78.00
 ;;^UTILITY(U,$J,358.3,17685,2)
 ;;=^5138435
 ;;^UTILITY(U,$J,358.3,17686,0)
 ;;=E85.9^^59^702^2
 ;;^UTILITY(U,$J,358.3,17686,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17686,1,3,0)
 ;;=3^Amyloidosis NOS
 ;;^UTILITY(U,$J,358.3,17686,1,4,0)
 ;;=4^E85.9
 ;;^UTILITY(U,$J,358.3,17686,2)
 ;;=^334185
 ;;^UTILITY(U,$J,358.3,17687,0)
 ;;=E87.5^^59^702^26
 ;;^UTILITY(U,$J,358.3,17687,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17687,1,3,0)
 ;;=3^Hyperkalemia
 ;;^UTILITY(U,$J,358.3,17687,1,4,0)
 ;;=4^E87.5
 ;;^UTILITY(U,$J,358.3,17687,2)
 ;;=^60041
 ;;^UTILITY(U,$J,358.3,17688,0)
 ;;=E21.3^^59^702^28
 ;;^UTILITY(U,$J,358.3,17688,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17688,1,3,0)
 ;;=3^Hyperparathyroidism,Unspec
 ;;^UTILITY(U,$J,358.3,17688,1,4,0)
 ;;=4^E21.3
 ;;^UTILITY(U,$J,358.3,17688,2)
 ;;=^331438
 ;;^UTILITY(U,$J,358.3,17689,0)
 ;;=H11.33^^59^703^2
 ;;^UTILITY(U,$J,358.3,17689,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17689,1,3,0)
 ;;=3^Conjunctival Hemorrhage,Bilateral
 ;;^UTILITY(U,$J,358.3,17689,1,4,0)
 ;;=4^H11.33
 ;;^UTILITY(U,$J,358.3,17689,2)
 ;;=^5004784
 ;;^UTILITY(U,$J,358.3,17690,0)
 ;;=H11.31^^59^703^4
 ;;^UTILITY(U,$J,358.3,17690,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17690,1,3,0)
 ;;=3^Conjunctival Hemorrhage,Right Eye
 ;;^UTILITY(U,$J,358.3,17690,1,4,0)
 ;;=4^H11.31
 ;;^UTILITY(U,$J,358.3,17690,2)
 ;;=^5004782
 ;;^UTILITY(U,$J,358.3,17691,0)
 ;;=H11.32^^59^703^3
 ;;^UTILITY(U,$J,358.3,17691,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17691,1,3,0)
 ;;=3^Conjunctival Hemorrhage,Left Eye
 ;;^UTILITY(U,$J,358.3,17691,1,4,0)
 ;;=4^H11.32
 ;;^UTILITY(U,$J,358.3,17691,2)
 ;;=^5004783
 ;;^UTILITY(U,$J,358.3,17692,0)
 ;;=H61.23^^59^703^23
 ;;^UTILITY(U,$J,358.3,17692,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17692,1,3,0)
 ;;=3^Impacted Cerumen,Bilateral
 ;;^UTILITY(U,$J,358.3,17692,1,4,0)
 ;;=4^H61.23
 ;;^UTILITY(U,$J,358.3,17692,2)
 ;;=^5006533
 ;;^UTILITY(U,$J,358.3,17693,0)
 ;;=H61.22^^59^703^24
 ;;^UTILITY(U,$J,358.3,17693,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17693,1,3,0)
 ;;=3^Impacted Cerumen,Left Ear
 ;;^UTILITY(U,$J,358.3,17693,1,4,0)
 ;;=4^H61.22
 ;;^UTILITY(U,$J,358.3,17693,2)
 ;;=^5006532
 ;;^UTILITY(U,$J,358.3,17694,0)
 ;;=H66.91^^59^703^28
 ;;^UTILITY(U,$J,358.3,17694,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17694,1,3,0)
 ;;=3^Otitis Media,Right Ear,Unspec
 ;;^UTILITY(U,$J,358.3,17694,1,4,0)
 ;;=4^H66.91
 ;;^UTILITY(U,$J,358.3,17694,2)
 ;;=^5006640
 ;;^UTILITY(U,$J,358.3,17695,0)
 ;;=H66.92^^59^703^27
 ;;^UTILITY(U,$J,358.3,17695,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17695,1,3,0)
 ;;=3^Otitis Media,Left Ear,Unspec
 ;;^UTILITY(U,$J,358.3,17695,1,4,0)
 ;;=4^H66.92
 ;;^UTILITY(U,$J,358.3,17695,2)
 ;;=^5006641
 ;;^UTILITY(U,$J,358.3,17696,0)
 ;;=H66.93^^59^703^26
 ;;^UTILITY(U,$J,358.3,17696,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17696,1,3,0)
 ;;=3^Otitis Media,Bilateral,Unspec
 ;;^UTILITY(U,$J,358.3,17696,1,4,0)
 ;;=4^H66.93
 ;;^UTILITY(U,$J,358.3,17696,2)
 ;;=^5006642
 ;;^UTILITY(U,$J,358.3,17697,0)
 ;;=H91.91^^59^703^22
 ;;^UTILITY(U,$J,358.3,17697,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17697,1,3,0)
 ;;=3^Hearing Loss,Right Ear,Unspec
 ;;^UTILITY(U,$J,358.3,17697,1,4,0)
 ;;=4^H91.91
 ;;^UTILITY(U,$J,358.3,17697,2)
 ;;=^5133553
 ;;^UTILITY(U,$J,358.3,17698,0)
 ;;=H91.92^^59^703^21
 ;;^UTILITY(U,$J,358.3,17698,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17698,1,3,0)
 ;;=3^Hearing Loss,Left Ear,Unspec
 ;;^UTILITY(U,$J,358.3,17698,1,4,0)
 ;;=4^H91.92
 ;;^UTILITY(U,$J,358.3,17698,2)
 ;;=^5133554
 ;;^UTILITY(U,$J,358.3,17699,0)
 ;;=H91.93^^59^703^20
 ;;^UTILITY(U,$J,358.3,17699,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17699,1,3,0)
 ;;=3^Hearing Loss,Bilateral,Unspec
 ;;^UTILITY(U,$J,358.3,17699,1,4,0)
 ;;=4^H91.93
 ;;^UTILITY(U,$J,358.3,17699,2)
 ;;=^5006944
 ;;^UTILITY(U,$J,358.3,17700,0)
 ;;=H61.21^^59^703^25
 ;;^UTILITY(U,$J,358.3,17700,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17700,1,3,0)
 ;;=3^Impacted Cerumen,Right Ear
 ;;^UTILITY(U,$J,358.3,17700,1,4,0)
 ;;=4^H61.21
 ;;^UTILITY(U,$J,358.3,17700,2)
 ;;=^5006531
 ;;^UTILITY(U,$J,358.3,17701,0)
 ;;=R43.0^^59^703^1
 ;;^UTILITY(U,$J,358.3,17701,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17701,1,3,0)
 ;;=3^Anosmia
 ;;^UTILITY(U,$J,358.3,17701,1,4,0)
 ;;=4^R43.0
 ;;^UTILITY(U,$J,358.3,17701,2)
 ;;=^7949
 ;;^UTILITY(U,$J,358.3,17702,0)
 ;;=H40.1110^^59^703^19
 ;;^UTILITY(U,$J,358.3,17702,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17702,1,3,0)
 ;;=3^Glaucoma,Primary Open-Angle,Rt Eye,Stage Unspec
 ;;^UTILITY(U,$J,358.3,17702,1,4,0)
 ;;=4^H40.1110
 ;;^UTILITY(U,$J,358.3,17702,2)
 ;;=^5138536
 ;;^UTILITY(U,$J,358.3,17703,0)
 ;;=H40.1111^^59^703^16
 ;;^UTILITY(U,$J,358.3,17703,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17703,1,3,0)
 ;;=3^Glaucoma,Primary Open-Angle,Rt Eye,Mild Stage
 ;;^UTILITY(U,$J,358.3,17703,1,4,0)
 ;;=4^H40.1111
 ;;^UTILITY(U,$J,358.3,17703,2)
 ;;=^5138537
 ;;^UTILITY(U,$J,358.3,17704,0)
 ;;=H40.1112^^59^703^17
 ;;^UTILITY(U,$J,358.3,17704,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17704,1,3,0)
 ;;=3^Glaucoma,Primary Open-Angle,Rt Eye,Moderate Stage
 ;;^UTILITY(U,$J,358.3,17704,1,4,0)
 ;;=4^H40.1112
 ;;^UTILITY(U,$J,358.3,17704,2)
 ;;=^5138538
 ;;^UTILITY(U,$J,358.3,17705,0)
 ;;=H40.1113^^59^703^18
 ;;^UTILITY(U,$J,358.3,17705,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17705,1,3,0)
 ;;=3^Glaucoma,Primary Open-Angle,Rt Eye,Severe Stage
 ;;^UTILITY(U,$J,358.3,17705,1,4,0)
 ;;=4^H40.1113
 ;;^UTILITY(U,$J,358.3,17705,2)
 ;;=^5138539
 ;;^UTILITY(U,$J,358.3,17706,0)
 ;;=H40.1114^^59^703^15
 ;;^UTILITY(U,$J,358.3,17706,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17706,1,3,0)
 ;;=3^Glaucoma,Primary Open-Angle,Rt Eye,Indeterminate Stage
 ;;^UTILITY(U,$J,358.3,17706,1,4,0)
 ;;=4^H40.1114
 ;;^UTILITY(U,$J,358.3,17706,2)
 ;;=^5138540
 ;;^UTILITY(U,$J,358.3,17707,0)
 ;;=H40.1120^^59^703^14
 ;;^UTILITY(U,$J,358.3,17707,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17707,1,3,0)
 ;;=3^Glaucoma,Primary Open-Angle,Lt Eye,Stage Unspec
 ;;^UTILITY(U,$J,358.3,17707,1,4,0)
 ;;=4^H40.1120
 ;;^UTILITY(U,$J,358.3,17707,2)
 ;;=^5138541
 ;;^UTILITY(U,$J,358.3,17708,0)
 ;;=H40.1121^^59^703^11
 ;;^UTILITY(U,$J,358.3,17708,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17708,1,3,0)
 ;;=3^Glaucoma,Primary Open-Angle,Lt Eye,Mild Stage
 ;;^UTILITY(U,$J,358.3,17708,1,4,0)
 ;;=4^H40.1121
 ;;^UTILITY(U,$J,358.3,17708,2)
 ;;=^5138542
 ;;^UTILITY(U,$J,358.3,17709,0)
 ;;=H40.1122^^59^703^12
 ;;^UTILITY(U,$J,358.3,17709,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17709,1,3,0)
 ;;=3^Glaucoma,Primary Open-Angle,Lt Eye,Moderate Stage
 ;;^UTILITY(U,$J,358.3,17709,1,4,0)
 ;;=4^H40.1122
 ;;^UTILITY(U,$J,358.3,17709,2)
 ;;=^5138543
 ;;^UTILITY(U,$J,358.3,17710,0)
 ;;=H40.1123^^59^703^13
 ;;^UTILITY(U,$J,358.3,17710,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17710,1,3,0)
 ;;=3^Glaucoma,Primary Open-Angle,Lt Eye,Severe Stage
 ;;^UTILITY(U,$J,358.3,17710,1,4,0)
 ;;=4^H40.1123
 ;;^UTILITY(U,$J,358.3,17710,2)
 ;;=^5138544
 ;;^UTILITY(U,$J,358.3,17711,0)
 ;;=H40.1124^^59^703^10
 ;;^UTILITY(U,$J,358.3,17711,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17711,1,3,0)
 ;;=3^Glaucoma,Primary Open-Angle,Lt Eye,Indeterminate Stage
 ;;^UTILITY(U,$J,358.3,17711,1,4,0)
 ;;=4^H40.1124
 ;;^UTILITY(U,$J,358.3,17711,2)
 ;;=^5138545
 ;;^UTILITY(U,$J,358.3,17712,0)
 ;;=H40.1130^^59^703^8
 ;;^UTILITY(U,$J,358.3,17712,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17712,1,3,0)
 ;;=3^Glaucoma,Primary Open-Angle,Bilateral,Stage Unspec