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

IBDEI056.m

Go to the documentation of this file.
IBDEI056 ; ; 28-OCT-2020
 ;;3.0;IB ENCOUNTER FORM IMP/EXP;;OCT 28, 2020
 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,12326,0)
 ;;=H02.831^^71^691^22
 ;;^UTILITY(U,$J,358.3,12326,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12326,1,3,0)
 ;;=3^Dermatochalasis,Right Upper Eyelid
 ;;^UTILITY(U,$J,358.3,12326,1,4,0)
 ;;=4^H02.831
 ;;^UTILITY(U,$J,358.3,12326,2)
 ;;=^5004418
 ;;^UTILITY(U,$J,358.3,12327,0)
 ;;=H02.834^^71^691^21
 ;;^UTILITY(U,$J,358.3,12327,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12327,1,3,0)
 ;;=3^Dermatochalasis,Left Upper Eyelid
 ;;^UTILITY(U,$J,358.3,12327,1,4,0)
 ;;=4^H02.834
 ;;^UTILITY(U,$J,358.3,12327,2)
 ;;=^5004421
 ;;^UTILITY(U,$J,358.3,12328,0)
 ;;=H10.31^^71^691^14
 ;;^UTILITY(U,$J,358.3,12328,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12328,1,3,0)
 ;;=3^Conjunctivitis,Acute,Right Eye
 ;;^UTILITY(U,$J,358.3,12328,1,4,0)
 ;;=4^H10.31
 ;;^UTILITY(U,$J,358.3,12328,2)
 ;;=^5133458
 ;;^UTILITY(U,$J,358.3,12329,0)
 ;;=H10.32^^71^691^13
 ;;^UTILITY(U,$J,358.3,12329,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12329,1,3,0)
 ;;=3^Conjunctivitis,Acute,Left Eye
 ;;^UTILITY(U,$J,358.3,12329,1,4,0)
 ;;=4^H10.32
 ;;^UTILITY(U,$J,358.3,12329,2)
 ;;=^5133459
 ;;^UTILITY(U,$J,358.3,12330,0)
 ;;=H00.11^^71^691^12
 ;;^UTILITY(U,$J,358.3,12330,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12330,1,3,0)
 ;;=3^Chalazion,Right Upper Eyelid
 ;;^UTILITY(U,$J,358.3,12330,1,4,0)
 ;;=4^H00.11
 ;;^UTILITY(U,$J,358.3,12330,2)
 ;;=^5004233
 ;;^UTILITY(U,$J,358.3,12331,0)
 ;;=H00.14^^71^691^11
 ;;^UTILITY(U,$J,358.3,12331,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12331,1,3,0)
 ;;=3^Chalazion,Left Upper Eyelid
 ;;^UTILITY(U,$J,358.3,12331,1,4,0)
 ;;=4^H00.14
 ;;^UTILITY(U,$J,358.3,12331,2)
 ;;=^5004236
 ;;^UTILITY(U,$J,358.3,12332,0)
 ;;=H20.00^^71^691^34
 ;;^UTILITY(U,$J,358.3,12332,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12332,1,3,0)
 ;;=3^Iridocyclitis,Acute/Subacute,Unspec
 ;;^UTILITY(U,$J,358.3,12332,1,4,0)
 ;;=4^H20.00
 ;;^UTILITY(U,$J,358.3,12332,2)
 ;;=^5005133
 ;;^UTILITY(U,$J,358.3,12333,0)
 ;;=B00.59^^71^691^32
 ;;^UTILITY(U,$J,358.3,12333,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12333,1,3,0)
 ;;=3^Herpes Viral Eye Disease NEC
 ;;^UTILITY(U,$J,358.3,12333,1,4,0)
 ;;=4^B00.59
 ;;^UTILITY(U,$J,358.3,12333,2)
 ;;=^5000476
 ;;^UTILITY(U,$J,358.3,12334,0)
 ;;=Z01.00^^71^691^30
 ;;^UTILITY(U,$J,358.3,12334,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12334,1,3,0)
 ;;=3^Eye/Vision Exam w/o Abnormal Findings
 ;;^UTILITY(U,$J,358.3,12334,1,4,0)
 ;;=4^Z01.00
 ;;^UTILITY(U,$J,358.3,12334,2)
 ;;=^5062612
 ;;^UTILITY(U,$J,358.3,12335,0)
 ;;=Z01.01^^71^691^29
 ;;^UTILITY(U,$J,358.3,12335,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12335,1,3,0)
 ;;=3^Eye/Vision Exam w/ Abnormal Findings
 ;;^UTILITY(U,$J,358.3,12335,1,4,0)
 ;;=4^Z01.01
 ;;^UTILITY(U,$J,358.3,12335,2)
 ;;=^5062613
 ;;^UTILITY(U,$J,358.3,12336,0)
 ;;=H52.213^^71^691^2
 ;;^UTILITY(U,$J,358.3,12336,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12336,1,3,0)
 ;;=3^Astigmatism,Irregular,Bilateral
 ;;^UTILITY(U,$J,358.3,12336,1,4,0)
 ;;=4^H52.213
 ;;^UTILITY(U,$J,358.3,12336,2)
 ;;=^5006272
 ;;^UTILITY(U,$J,358.3,12337,0)
 ;;=H52.223^^71^691^3
 ;;^UTILITY(U,$J,358.3,12337,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12337,1,3,0)
 ;;=3^Astigmatism,Regular,Bilateral
 ;;^UTILITY(U,$J,358.3,12337,1,4,0)
 ;;=4^H52.223
 ;;^UTILITY(U,$J,358.3,12337,2)
 ;;=^5006276
 ;;^UTILITY(U,$J,358.3,12338,0)
 ;;=H40.1113^^71^691^50
 ;;^UTILITY(U,$J,358.3,12338,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12338,1,3,0)
 ;;=3^Primary Open-Angle Glaucoma,Severe Stage,Right Eye
 ;;^UTILITY(U,$J,358.3,12338,1,4,0)
 ;;=4^H40.1113
 ;;^UTILITY(U,$J,358.3,12338,2)
 ;;=^5138539
 ;;^UTILITY(U,$J,358.3,12339,0)
 ;;=H40.1123^^71^691^51
 ;;^UTILITY(U,$J,358.3,12339,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12339,1,3,0)
 ;;=3^Primary Open-Angle Glaucoma,Severe Stage,Left Eye
 ;;^UTILITY(U,$J,358.3,12339,1,4,0)
 ;;=4^H40.1123
 ;;^UTILITY(U,$J,358.3,12339,2)
 ;;=^5138544
 ;;^UTILITY(U,$J,358.3,12340,0)
 ;;=H35.3110^^71^691^39
 ;;^UTILITY(U,$J,358.3,12340,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12340,1,3,0)
 ;;=3^Nonexudative ARMD,Right Eye
 ;;^UTILITY(U,$J,358.3,12340,1,4,0)
 ;;=4^H35.3110
 ;;^UTILITY(U,$J,358.3,12340,2)
 ;;=^5138500
 ;;^UTILITY(U,$J,358.3,12341,0)
 ;;=H35.3120^^71^691^38
 ;;^UTILITY(U,$J,358.3,12341,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12341,1,3,0)
 ;;=3^Nonexudative ARMD,Left Eye
 ;;^UTILITY(U,$J,358.3,12341,1,4,0)
 ;;=4^H35.3120
 ;;^UTILITY(U,$J,358.3,12341,2)
 ;;=^5138505
 ;;^UTILITY(U,$J,358.3,12342,0)
 ;;=H35.3210^^71^691^26
 ;;^UTILITY(U,$J,358.3,12342,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12342,1,3,0)
 ;;=3^Exudative ARMD,Right Eye
 ;;^UTILITY(U,$J,358.3,12342,1,4,0)
 ;;=4^H35.3210
 ;;^UTILITY(U,$J,358.3,12342,2)
 ;;=^5138520
 ;;^UTILITY(U,$J,358.3,12343,0)
 ;;=H35.3220^^71^691^25
 ;;^UTILITY(U,$J,358.3,12343,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12343,1,3,0)
 ;;=3^Exudative ARMD,Left Eye
 ;;^UTILITY(U,$J,358.3,12343,1,4,0)
 ;;=4^H35.3220
 ;;^UTILITY(U,$J,358.3,12343,2)
 ;;=^5138524
 ;;^UTILITY(U,$J,358.3,12344,0)
 ;;=E11.3291^^71^691^15
 ;;^UTILITY(U,$J,358.3,12344,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12344,1,3,0)
 ;;=3^DM Type 2 w/ Mild NPDR w/o Macular Edema,Right Eye
 ;;^UTILITY(U,$J,358.3,12344,1,4,0)
 ;;=4^E11.3291
 ;;^UTILITY(U,$J,358.3,12344,2)
 ;;=^5138335
 ;;^UTILITY(U,$J,358.3,12345,0)
 ;;=E11.3292^^71^691^16
 ;;^UTILITY(U,$J,358.3,12345,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12345,1,3,0)
 ;;=3^DM Type 2 w/ Mild NPDR w/o Macular Edema,Left Eye
 ;;^UTILITY(U,$J,358.3,12345,1,4,0)
 ;;=4^E11.3292
 ;;^UTILITY(U,$J,358.3,12345,2)
 ;;=^5138336
 ;;^UTILITY(U,$J,358.3,12346,0)
 ;;=E11.3391^^71^691^17
 ;;^UTILITY(U,$J,358.3,12346,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12346,1,3,0)
 ;;=3^DM Type 2 w/ Mod NPDR w/o Macular Edema,Right Eye
 ;;^UTILITY(U,$J,358.3,12346,1,4,0)
 ;;=4^E11.3391
 ;;^UTILITY(U,$J,358.3,12346,2)
 ;;=^5138343
 ;;^UTILITY(U,$J,358.3,12347,0)
 ;;=E11.3392^^71^691^18
 ;;^UTILITY(U,$J,358.3,12347,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12347,1,3,0)
 ;;=3^DM Type 2 w/ Mod NPDR w/o Macular Edema,Left Eye
 ;;^UTILITY(U,$J,358.3,12347,1,4,0)
 ;;=4^E11.3392
 ;;^UTILITY(U,$J,358.3,12347,2)
 ;;=^5138344
 ;;^UTILITY(U,$J,358.3,12348,0)
 ;;=H35.3230^^71^691^24
 ;;^UTILITY(U,$J,358.3,12348,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12348,1,3,0)
 ;;=3^Exudative ARMD,Bilateral
 ;;^UTILITY(U,$J,358.3,12348,1,4,0)
 ;;=4^H35.3230
 ;;^UTILITY(U,$J,358.3,12348,2)
 ;;=^5138528
 ;;^UTILITY(U,$J,358.3,12349,0)
 ;;=H35.3130^^71^691^37
 ;;^UTILITY(U,$J,358.3,12349,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12349,1,3,0)
 ;;=3^Nonexudative ARMD,Bilateral
 ;;^UTILITY(U,$J,358.3,12349,1,4,0)
 ;;=4^H35.3130
 ;;^UTILITY(U,$J,358.3,12349,2)
 ;;=^5138510
 ;;^UTILITY(U,$J,358.3,12350,0)
 ;;=Z13.5^^71^691^53
 ;;^UTILITY(U,$J,358.3,12350,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12350,1,3,0)
 ;;=3^Screening for Eye and Ear Disorders
 ;;^UTILITY(U,$J,358.3,12350,1,4,0)
 ;;=4^Z13.5
 ;;^UTILITY(U,$J,358.3,12350,2)
 ;;=^5062706
 ;;^UTILITY(U,$J,358.3,12351,0)
 ;;=Z48.02^^71^691^52
 ;;^UTILITY(U,$J,358.3,12351,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12351,1,3,0)
 ;;=3^Removal of Sutures
 ;;^UTILITY(U,$J,358.3,12351,1,4,0)
 ;;=4^Z48.02
 ;;^UTILITY(U,$J,358.3,12351,2)
 ;;=^5063035
 ;;^UTILITY(U,$J,358.3,12352,0)
 ;;=Z48.810^^71^691^1
 ;;^UTILITY(U,$J,358.3,12352,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12352,1,3,0)
 ;;=3^Aftercare Following EYE Surgery
 ;;^UTILITY(U,$J,358.3,12352,1,4,0)
 ;;=4^Z48.810
 ;;^UTILITY(U,$J,358.3,12352,2)
 ;;=^5063047
 ;;^UTILITY(U,$J,358.3,12353,0)
 ;;=H35.3131^^71^691^40
 ;;^UTILITY(U,$J,358.3,12353,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12353,1,3,0)
 ;;=3^Nonexudative Age-Related Macular Degn,Early Dry Stage,Bilateral
 ;;^UTILITY(U,$J,358.3,12353,1,4,0)
 ;;=4^H35.3131
 ;;^UTILITY(U,$J,358.3,12353,2)
 ;;=^5138511
 ;;^UTILITY(U,$J,358.3,12354,0)
 ;;=H35.3132^^71^691^41
 ;;^UTILITY(U,$J,358.3,12354,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12354,1,3,0)
 ;;=3^Nonexudative Age-Related Macular Degn,Intermed Dry Stage,Bilateral
 ;;^UTILITY(U,$J,358.3,12354,1,4,0)
 ;;=4^H35.3132
 ;;^UTILITY(U,$J,358.3,12354,2)
 ;;=^5138512
 ;;^UTILITY(U,$J,358.3,12355,0)
 ;;=H02.889^^71^691^35
 ;;^UTILITY(U,$J,358.3,12355,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12355,1,3,0)
 ;;=3^Meibomian Gland Dysfunction,Unspec
 ;;^UTILITY(U,$J,358.3,12355,1,4,0)
 ;;=4^H02.889
 ;;^UTILITY(U,$J,358.3,12355,2)
 ;;=^5157349
 ;;^UTILITY(U,$J,358.3,12356,0)
 ;;=Z96.1^^71^691^47
 ;;^UTILITY(U,$J,358.3,12356,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12356,1,3,0)
 ;;=3^Presence of Intraocular Lens
 ;;^UTILITY(U,$J,358.3,12356,1,4,0)
 ;;=4^Z96.1
 ;;^UTILITY(U,$J,358.3,12356,2)
 ;;=^5063682
 ;;^UTILITY(U,$J,358.3,12357,0)
 ;;=H43.813^^71^691^54
 ;;^UTILITY(U,$J,358.3,12357,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12357,1,3,0)
 ;;=3^Vitreous Degeneration,Bilateral
 ;;^UTILITY(U,$J,358.3,12357,1,4,0)
 ;;=4^H43.813
 ;;^UTILITY(U,$J,358.3,12357,2)
 ;;=^5005955
 ;;^UTILITY(U,$J,358.3,12358,0)
 ;;=H26.491^^71^691^45
 ;;^UTILITY(U,$J,358.3,12358,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12358,1,3,0)
 ;;=3^PCO/Secondary Cataract,Right Eye
 ;;^UTILITY(U,$J,358.3,12358,1,4,0)
 ;;=4^H26.491
 ;;^UTILITY(U,$J,358.3,12358,2)
 ;;=^5005358
 ;;^UTILITY(U,$J,358.3,12359,0)
 ;;=H26.492^^71^691^44
 ;;^UTILITY(U,$J,358.3,12359,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12359,1,3,0)
 ;;=3^PCO/Secondary Cataract,Left Eye
 ;;^UTILITY(U,$J,358.3,12359,1,4,0)
 ;;=4^H26.492
 ;;^UTILITY(U,$J,358.3,12359,2)
 ;;=^5005359
 ;;^UTILITY(U,$J,358.3,12360,0)
 ;;=D31.31^^71^691^5
 ;;^UTILITY(U,$J,358.3,12360,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12360,1,3,0)
 ;;=3^Benign Neop/Nevus Choroid,Right Eye
 ;;^UTILITY(U,$J,358.3,12360,1,4,0)
 ;;=4^D31.31
 ;;^UTILITY(U,$J,358.3,12360,2)
 ;;=^5002121
 ;;^UTILITY(U,$J,358.3,12361,0)
 ;;=D31.32^^71^691^4
 ;;^UTILITY(U,$J,358.3,12361,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12361,1,3,0)
 ;;=3^Benign Neop/Nevus Choroid,Left Eye
 ;;^UTILITY(U,$J,358.3,12361,1,4,0)
 ;;=4^D31.32
 ;;^UTILITY(U,$J,358.3,12361,2)
 ;;=^5002122
 ;;^UTILITY(U,$J,358.3,12362,0)
 ;;=H40.1131^^71^691^48
 ;;^UTILITY(U,$J,358.3,12362,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12362,1,3,0)
 ;;=3^Primary Open-Angle Glaucoma,Mild Stage,Bilateral
 ;;^UTILITY(U,$J,358.3,12362,1,4,0)
 ;;=4^H40.1131
 ;;^UTILITY(U,$J,358.3,12362,2)
 ;;=^5138547
 ;;^UTILITY(U,$J,358.3,12363,0)
 ;;=H40.1132^^71^691^49
 ;;^UTILITY(U,$J,358.3,12363,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12363,1,3,0)
 ;;=3^Primary Open-Angle Glaucoma,Moderate Stage,Bilateral
 ;;^UTILITY(U,$J,358.3,12363,1,4,0)
 ;;=4^H40.1132
 ;;^UTILITY(U,$J,358.3,12363,2)
 ;;=^5138548
 ;;^UTILITY(U,$J,358.3,12364,0)
 ;;=Z01.021^^71^691^27
 ;;^UTILITY(U,$J,358.3,12364,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12364,1,3,0)
 ;;=3^Eye/Vision Exam After Failed Exam w/ Abnormal Findings
 ;;^UTILITY(U,$J,358.3,12364,1,4,0)
 ;;=4^Z01.021
 ;;^UTILITY(U,$J,358.3,12364,2)
 ;;=^5158319
 ;;^UTILITY(U,$J,358.3,12365,0)
 ;;=Z01.020^^71^691^28
 ;;^UTILITY(U,$J,358.3,12365,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12365,1,3,0)
 ;;=3^Eye/Vision Exam After Failed Exam w/o Abnormal Findings
 ;;^UTILITY(U,$J,358.3,12365,1,4,0)
 ;;=4^Z01.020
 ;;^UTILITY(U,$J,358.3,12365,2)
 ;;=^5158318
 ;;^UTILITY(U,$J,358.3,12366,0)
 ;;=H40.013^^71^691^43
 ;;^UTILITY(U,$J,358.3,12366,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12366,1,3,0)
 ;;=3^Open Angle Glaucoma w/ Borderline Findings,Low Risk,Bilat
 ;;^UTILITY(U,$J,358.3,12366,1,4,0)
 ;;=4^H40.013
 ;;^UTILITY(U,$J,358.3,12366,2)
 ;;=^5005726
 ;;^UTILITY(U,$J,358.3,12367,0)
 ;;=H43.393^^71^691^56
 ;;^UTILITY(U,$J,358.3,12367,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12367,1,3,0)
 ;;=3^Vitreous Opacities,Oth,Bilat
 ;;^UTILITY(U,$J,358.3,12367,1,4,0)
 ;;=4^H43.393
 ;;^UTILITY(U,$J,358.3,12367,2)
 ;;=^5005951
 ;;^UTILITY(U,$J,358.3,12368,0)
 ;;=H10.31^^71^692^1
 ;;^UTILITY(U,$J,358.3,12368,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12368,1,3,0)
 ;;=3^Conjunctivitis,Acute,Right Eye
 ;;^UTILITY(U,$J,358.3,12368,1,4,0)
 ;;=4^H10.31
 ;;^UTILITY(U,$J,358.3,12368,2)
 ;;=^5133458
 ;;^UTILITY(U,$J,358.3,12369,0)
 ;;=H10.32^^71^692^2
 ;;^UTILITY(U,$J,358.3,12369,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12369,1,3,0)
 ;;=3^Conjunctivitis,Acute,Left Eye
 ;;^UTILITY(U,$J,358.3,12369,1,4,0)
 ;;=4^H10.32
 ;;^UTILITY(U,$J,358.3,12369,2)
 ;;=^5133459
 ;;^UTILITY(U,$J,358.3,12370,0)
 ;;=H10.401^^71^692^3
 ;;^UTILITY(U,$J,358.3,12370,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12370,1,3,0)
 ;;=3^Conjunctivitis,Chronic,Right Eye
 ;;^UTILITY(U,$J,358.3,12370,1,4,0)
 ;;=4^H10.401
 ;;^UTILITY(U,$J,358.3,12370,2)
 ;;=^5004681
 ;;^UTILITY(U,$J,358.3,12371,0)
 ;;=H10.402^^71^692^4
 ;;^UTILITY(U,$J,358.3,12371,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12371,1,3,0)
 ;;=3^Conjunctivitis,Chronic,Left Eye
 ;;^UTILITY(U,$J,358.3,12371,1,4,0)
 ;;=4^H10.402
 ;;^UTILITY(U,$J,358.3,12371,2)
 ;;=^5004682
 ;;^UTILITY(U,$J,358.3,12372,0)
 ;;=H10.403^^71^692^5
 ;;^UTILITY(U,$J,358.3,12372,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12372,1,3,0)
 ;;=3^Conjunctivitis,Chronic,Bilateral
 ;;^UTILITY(U,$J,358.3,12372,1,4,0)
 ;;=4^H10.403
 ;;^UTILITY(U,$J,358.3,12372,2)
 ;;=^5004683
 ;;^UTILITY(U,$J,358.3,12373,0)
 ;;=H10.45^^71^692^6
 ;;^UTILITY(U,$J,358.3,12373,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12373,1,3,0)
 ;;=3^Conjunctivitis,Allergic,Chronic
 ;;^UTILITY(U,$J,358.3,12373,1,4,0)
 ;;=4^H10.45
 ;;^UTILITY(U,$J,358.3,12373,2)
 ;;=^87396
 ;;^UTILITY(U,$J,358.3,12374,0)
 ;;=B30.8^^71^692^7
 ;;^UTILITY(U,$J,358.3,12374,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12374,1,3,0)
 ;;=3^Conjunctivitis,Viral
 ;;^UTILITY(U,$J,358.3,12374,1,4,0)
 ;;=4^B30.8
 ;;^UTILITY(U,$J,358.3,12374,2)
 ;;=^88239
 ;;^UTILITY(U,$J,358.3,12375,0)
 ;;=H10.13^^71^692^8
 ;;^UTILITY(U,$J,358.3,12375,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12375,1,3,0)
 ;;=3^Conjunctivitis,Atopic,Bilateral
 ;;^UTILITY(U,$J,358.3,12375,1,4,0)
 ;;=4^H10.13
 ;;^UTILITY(U,$J,358.3,12375,2)
 ;;=^5004667
 ;;^UTILITY(U,$J,358.3,12376,0)
 ;;=H10.419^^71^692^9
 ;;^UTILITY(U,$J,358.3,12376,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12376,1,3,0)
 ;;=3^Giant Papillary Conjunctivitis,Chronic
 ;;^UTILITY(U,$J,358.3,12376,1,4,0)
 ;;=4^H10.419
 ;;^UTILITY(U,$J,358.3,12376,2)
 ;;=^5004687
 ;;^UTILITY(U,$J,358.3,12377,0)
 ;;=H10.219^^71^692^10
 ;;^UTILITY(U,$J,358.3,12377,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12377,1,3,0)
 ;;=3^Toxic Conjunctivitis,Acute
 ;;^UTILITY(U,$J,358.3,12377,1,4,0)
 ;;=4^H10.219
 ;;^UTILITY(U,$J,358.3,12377,2)
 ;;=^5004671
 ;;^UTILITY(U,$J,358.3,12378,0)
 ;;=M35.01^^71^692^11
 ;;^UTILITY(U,$J,358.3,12378,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12378,1,3,0)
 ;;=3^Keratoconjunctivitis w/ Sicca Syndrome
 ;;^UTILITY(U,$J,358.3,12378,1,4,0)
 ;;=4^M35.01
 ;;^UTILITY(U,$J,358.3,12378,2)
 ;;=^5011787
 ;;^UTILITY(U,$J,358.3,12379,0)
 ;;=H11.31^^71^692^12
 ;;^UTILITY(U,$J,358.3,12379,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12379,1,3,0)
 ;;=3^Conjunctival Hemorrhage,Right Eye
 ;;^UTILITY(U,$J,358.3,12379,1,4,0)
 ;;=4^H11.31
 ;;^UTILITY(U,$J,358.3,12379,2)
 ;;=^5004782
 ;;^UTILITY(U,$J,358.3,12380,0)
 ;;=H11.32^^71^692^13
 ;;^UTILITY(U,$J,358.3,12380,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12380,1,3,0)
 ;;=3^Conjunctival Hemorrhage,Left Eye
 ;;^UTILITY(U,$J,358.3,12380,1,4,0)
 ;;=4^H11.32
 ;;^UTILITY(U,$J,358.3,12380,2)
 ;;=^5004783
 ;;^UTILITY(U,$J,358.3,12381,0)
 ;;=H15.101^^71^692^14
 ;;^UTILITY(U,$J,358.3,12381,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12381,1,3,0)
 ;;=3^Episcleritis,Right Eye
 ;;^UTILITY(U,$J,358.3,12381,1,4,0)
 ;;=4^H15.101
 ;;^UTILITY(U,$J,358.3,12381,2)
 ;;=^5004835
 ;;^UTILITY(U,$J,358.3,12382,0)
 ;;=H15.102^^71^692^15
 ;;^UTILITY(U,$J,358.3,12382,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12382,1,3,0)
 ;;=3^Episcleritis,Left Eye
 ;;^UTILITY(U,$J,358.3,12382,1,4,0)
 ;;=4^H15.102
 ;;^UTILITY(U,$J,358.3,12382,2)
 ;;=^5004836
 ;;^UTILITY(U,$J,358.3,12383,0)
 ;;=H15.001^^71^692^16
 ;;^UTILITY(U,$J,358.3,12383,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12383,1,3,0)
 ;;=3^Scleritis,Right Eye
 ;;^UTILITY(U,$J,358.3,12383,1,4,0)
 ;;=4^H15.001
 ;;^UTILITY(U,$J,358.3,12383,2)
 ;;=^5004810
 ;;^UTILITY(U,$J,358.3,12384,0)
 ;;=H15.002^^71^692^17
 ;;^UTILITY(U,$J,358.3,12384,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12384,1,3,0)
 ;;=3^Scleritis,Left Eye
 ;;^UTILITY(U,$J,358.3,12384,1,4,0)
 ;;=4^H15.002
 ;;^UTILITY(U,$J,358.3,12384,2)
 ;;=^5004811
 ;;^UTILITY(U,$J,358.3,12385,0)
 ;;=H11.001^^71^692^18
 ;;^UTILITY(U,$J,358.3,12385,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12385,1,3,0)
 ;;=3^Pterygium,Right Eye
 ;;^UTILITY(U,$J,358.3,12385,1,4,0)
 ;;=4^H11.001
 ;;^UTILITY(U,$J,358.3,12385,2)
 ;;=^5004717
 ;;^UTILITY(U,$J,358.3,12386,0)
 ;;=H11.002^^71^692^19
 ;;^UTILITY(U,$J,358.3,12386,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12386,1,3,0)
 ;;=3^Pterygium,Left Eye
 ;;^UTILITY(U,$J,358.3,12386,1,4,0)
 ;;=4^H11.002
 ;;^UTILITY(U,$J,358.3,12386,2)
 ;;=^5004718
 ;;^UTILITY(U,$J,358.3,12387,0)
 ;;=H11.151^^71^692^20
 ;;^UTILITY(U,$J,358.3,12387,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12387,1,3,0)
 ;;=3^Pinguecula,Right Eye
 ;;^UTILITY(U,$J,358.3,12387,1,4,0)
 ;;=4^H11.151
 ;;^UTILITY(U,$J,358.3,12387,2)
 ;;=^5004761
 ;;^UTILITY(U,$J,358.3,12388,0)
 ;;=H11.152^^71^692^21
 ;;^UTILITY(U,$J,358.3,12388,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12388,1,3,0)
 ;;=3^Pinguecula,Left Eye
 ;;^UTILITY(U,$J,358.3,12388,1,4,0)
 ;;=4^H11.152
 ;;^UTILITY(U,$J,358.3,12388,2)
 ;;=^5004762
 ;;^UTILITY(U,$J,358.3,12389,0)
 ;;=D31.01^^71^692^22
 ;;^UTILITY(U,$J,358.3,12389,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12389,1,3,0)
 ;;=3^Benign Neop of Conj,Right Eye
 ;;^UTILITY(U,$J,358.3,12389,1,4,0)
 ;;=4^D31.01
 ;;^UTILITY(U,$J,358.3,12389,2)
 ;;=^5002112
 ;;^UTILITY(U,$J,358.3,12390,0)
 ;;=D31.02^^71^692^23
 ;;^UTILITY(U,$J,358.3,12390,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12390,1,3,0)
 ;;=3^Benign Neop of Conj,Left Eye
 ;;^UTILITY(U,$J,358.3,12390,1,4,0)
 ;;=4^D31.02
 ;;^UTILITY(U,$J,358.3,12390,2)
 ;;=^5002113
 ;;^UTILITY(U,$J,358.3,12391,0)
 ;;=C69.01^^71^692^24
 ;;^UTILITY(U,$J,358.3,12391,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12391,1,3,0)
 ;;=3^Malig Neop of Conj,Right Eye
 ;;^UTILITY(U,$J,358.3,12391,1,4,0)
 ;;=4^C69.01
 ;;^UTILITY(U,$J,358.3,12391,2)
 ;;=^5001267
 ;;^UTILITY(U,$J,358.3,12392,0)
 ;;=C69.02^^71^692^25
 ;;^UTILITY(U,$J,358.3,12392,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12392,1,3,0)
 ;;=3^Malig Neop of Conj,Left Eye
 ;;^UTILITY(U,$J,358.3,12392,1,4,0)
 ;;=4^C69.02
 ;;^UTILITY(U,$J,358.3,12392,2)
 ;;=^5001268
 ;;^UTILITY(U,$J,358.3,12393,0)
 ;;=H11.231^^71^692^26
 ;;^UTILITY(U,$J,358.3,12393,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12393,1,3,0)
 ;;=3^Symblepharon,Right Eye
 ;;^UTILITY(U,$J,358.3,12393,1,4,0)
 ;;=4^H11.231