IBDEI030 ; ; 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,7104,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7104,1,3,0)
;;=3^Exudative ARMD,Right Eye w/ Active Choroidal Neovascularization
;;^UTILITY(U,$J,358.3,7104,1,4,0)
;;=4^H35.3211
;;^UTILITY(U,$J,358.3,7104,2)
;;=^5138521
;;^UTILITY(U,$J,358.3,7105,0)
;;=H35.3212^^40^375^18
;;^UTILITY(U,$J,358.3,7105,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7105,1,3,0)
;;=3^Exudative ARMD,Right Eye w/ Inactive Choroidal Neovascularization
;;^UTILITY(U,$J,358.3,7105,1,4,0)
;;=4^H35.3212
;;^UTILITY(U,$J,358.3,7105,2)
;;=^5138522
;;^UTILITY(U,$J,358.3,7106,0)
;;=H35.3213^^40^375^19
;;^UTILITY(U,$J,358.3,7106,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7106,1,3,0)
;;=3^Exudative ARMD,Right Eye w/ Inactive Scar
;;^UTILITY(U,$J,358.3,7106,1,4,0)
;;=4^H35.3213
;;^UTILITY(U,$J,358.3,7106,2)
;;=^5138523
;;^UTILITY(U,$J,358.3,7107,0)
;;=H35.3221^^40^375^21
;;^UTILITY(U,$J,358.3,7107,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7107,1,3,0)
;;=3^Exudative ARMD,Left Eye w/ Active Choroidal Neovascularization
;;^UTILITY(U,$J,358.3,7107,1,4,0)
;;=4^H35.3221
;;^UTILITY(U,$J,358.3,7107,2)
;;=^5138525
;;^UTILITY(U,$J,358.3,7108,0)
;;=H35.3222^^40^375^22
;;^UTILITY(U,$J,358.3,7108,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7108,1,3,0)
;;=3^Exudative ARMD,Left Eye w/ Inactive Choroidal Neovascularization
;;^UTILITY(U,$J,358.3,7108,1,4,0)
;;=4^H35.3222
;;^UTILITY(U,$J,358.3,7108,2)
;;=^5138526
;;^UTILITY(U,$J,358.3,7109,0)
;;=H35.3223^^40^375^23
;;^UTILITY(U,$J,358.3,7109,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7109,1,3,0)
;;=3^Exudative ARMD,Left Eye w/ Inactive Scar
;;^UTILITY(U,$J,358.3,7109,1,4,0)
;;=4^H35.3223
;;^UTILITY(U,$J,358.3,7109,2)
;;=^5138527
;;^UTILITY(U,$J,358.3,7110,0)
;;=R45.851^^40^376^3
;;^UTILITY(U,$J,358.3,7110,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7110,1,3,0)
;;=3^Suicidal Ideations
;;^UTILITY(U,$J,358.3,7110,1,4,0)
;;=4^R45.851
;;^UTILITY(U,$J,358.3,7110,2)
;;=^5019474
;;^UTILITY(U,$J,358.3,7111,0)
;;=T14.91XA^^40^376^4
;;^UTILITY(U,$J,358.3,7111,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7111,1,3,0)
;;=3^Suicide Attempt,Init Encntr
;;^UTILITY(U,$J,358.3,7111,1,4,0)
;;=4^T14.91XA
;;^UTILITY(U,$J,358.3,7111,2)
;;=^5151779
;;^UTILITY(U,$J,358.3,7112,0)
;;=T14.91XD^^40^376^6
;;^UTILITY(U,$J,358.3,7112,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7112,1,3,0)
;;=3^Suicide Attempt,Subsequent Encntr
;;^UTILITY(U,$J,358.3,7112,1,4,0)
;;=4^T14.91XD
;;^UTILITY(U,$J,358.3,7112,2)
;;=^5151780
;;^UTILITY(U,$J,358.3,7113,0)
;;=T14.91XS^^40^376^5
;;^UTILITY(U,$J,358.3,7113,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7113,1,3,0)
;;=3^Suicide Attempt,Sequela
;;^UTILITY(U,$J,358.3,7113,1,4,0)
;;=4^T14.91XS
;;^UTILITY(U,$J,358.3,7113,2)
;;=^5151781
;;^UTILITY(U,$J,358.3,7114,0)
;;=Z91.51^^40^376^2
;;^UTILITY(U,$J,358.3,7114,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7114,1,3,0)
;;=3^Personal Hx of Suicidal Behavior
;;^UTILITY(U,$J,358.3,7114,1,4,0)
;;=4^Z91.51
;;^UTILITY(U,$J,358.3,7114,2)
;;=^5161317
;;^UTILITY(U,$J,358.3,7115,0)
;;=Z91.52^^40^376^1
;;^UTILITY(U,$J,358.3,7115,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7115,1,3,0)
;;=3^Personal Hx of Non-Suicidal Self-Harm
;;^UTILITY(U,$J,358.3,7115,1,4,0)
;;=4^Z91.52
;;^UTILITY(U,$J,358.3,7115,2)
;;=^5161318
;;^UTILITY(U,$J,358.3,7116,0)
;;=H53.8^^40^377^1
;;^UTILITY(U,$J,358.3,7116,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7116,1,3,0)
;;=3^Visual Disturbances
;;^UTILITY(U,$J,358.3,7116,1,4,0)
;;=4^H53.8
;;^UTILITY(U,$J,358.3,7116,2)
;;=^5006356
;;^UTILITY(U,$J,358.3,7117,0)
;;=H57.11^^40^377^2
;;^UTILITY(U,$J,358.3,7117,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7117,1,3,0)
;;=3^Ocular Pain,Right Eye
;;^UTILITY(U,$J,358.3,7117,1,4,0)
;;=4^H57.11
;;^UTILITY(U,$J,358.3,7117,2)
;;=^5006382
;;^UTILITY(U,$J,358.3,7118,0)
;;=H57.12^^40^377^3
;;^UTILITY(U,$J,358.3,7118,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7118,1,3,0)
;;=3^Ocular Pain,Left Eye
;;^UTILITY(U,$J,358.3,7118,1,4,0)
;;=4^H57.12
;;^UTILITY(U,$J,358.3,7118,2)
;;=^5006383
;;^UTILITY(U,$J,358.3,7119,0)
;;=H57.13^^40^377^4
;;^UTILITY(U,$J,358.3,7119,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7119,1,3,0)
;;=3^Ocular Pain,Bilateral
;;^UTILITY(U,$J,358.3,7119,1,4,0)
;;=4^H57.13
;;^UTILITY(U,$J,358.3,7119,2)
;;=^5006384
;;^UTILITY(U,$J,358.3,7120,0)
;;=Z01.00^^40^377^5
;;^UTILITY(U,$J,358.3,7120,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7120,1,3,0)
;;=3^Eye/Vision Exam w/o Abnormal Findings
;;^UTILITY(U,$J,358.3,7120,1,4,0)
;;=4^Z01.00
;;^UTILITY(U,$J,358.3,7120,2)
;;=^5062612
;;^UTILITY(U,$J,358.3,7121,0)
;;=Z01.01^^40^377^6
;;^UTILITY(U,$J,358.3,7121,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7121,1,3,0)
;;=3^Eye/Vision Exam w/ Abnormal Findings
;;^UTILITY(U,$J,358.3,7121,1,4,0)
;;=4^Z01.01
;;^UTILITY(U,$J,358.3,7121,2)
;;=^5062613
;;^UTILITY(U,$J,358.3,7122,0)
;;=I10.^^40^377^9
;;^UTILITY(U,$J,358.3,7122,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7122,1,3,0)
;;=3^Hypertension,Essential
;;^UTILITY(U,$J,358.3,7122,1,4,0)
;;=4^I10.
;;^UTILITY(U,$J,358.3,7122,2)
;;=^5007062
;;^UTILITY(U,$J,358.3,7123,0)
;;=Z21.^^40^377^10
;;^UTILITY(U,$J,358.3,7123,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7123,1,3,0)
;;=3^Asymptomatic HIV Infection Status
;;^UTILITY(U,$J,358.3,7123,1,4,0)
;;=4^Z21.
;;^UTILITY(U,$J,358.3,7123,2)
;;=^5062777
;;^UTILITY(U,$J,358.3,7124,0)
;;=Z01.021^^40^377^7
;;^UTILITY(U,$J,358.3,7124,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7124,1,3,0)
;;=3^Eye/Vision Exam After Failed Exam w/ Abnormal Findings
;;^UTILITY(U,$J,358.3,7124,1,4,0)
;;=4^Z01.021
;;^UTILITY(U,$J,358.3,7124,2)
;;=^5158319
;;^UTILITY(U,$J,358.3,7125,0)
;;=Z01.020^^40^377^8
;;^UTILITY(U,$J,358.3,7125,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7125,1,3,0)
;;=3^Eye/Vision Exam After Failed Exam w/o Abnormal Findings
;;^UTILITY(U,$J,358.3,7125,1,4,0)
;;=4^Z01.020
;;^UTILITY(U,$J,358.3,7125,2)
;;=^5158318
;;^UTILITY(U,$J,358.3,7126,0)
;;=Z82.1^^40^377^11
;;^UTILITY(U,$J,358.3,7126,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7126,1,3,0)
;;=3^Family Hx Blindness/Visual Loss
;;^UTILITY(U,$J,358.3,7126,1,4,0)
;;=4^Z82.1
;;^UTILITY(U,$J,358.3,7126,2)
;;=^5063365
;;^UTILITY(U,$J,358.3,7127,0)
;;=Z83.518^^40^377^12
;;^UTILITY(U,$J,358.3,7127,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7127,1,3,0)
;;=3^Family Hx Other Eye Disorder
;;^UTILITY(U,$J,358.3,7127,1,4,0)
;;=4^Z83.518
;;^UTILITY(U,$J,358.3,7127,2)
;;=^5063383
;;^UTILITY(U,$J,358.3,7128,0)
;;=Z83.511^^40^377^13
;;^UTILITY(U,$J,358.3,7128,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7128,1,3,0)
;;=3^Family Hx of Glaucoma
;;^UTILITY(U,$J,358.3,7128,1,4,0)
;;=4^Z83.511
;;^UTILITY(U,$J,358.3,7128,2)
;;=^5063382
;;^UTILITY(U,$J,358.3,7129,0)
;;=H35.3211^^40^378^1
;;^UTILITY(U,$J,358.3,7129,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7129,1,3,0)
;;=3^Exudative AMD,RIGHT eye,active CNV
;;^UTILITY(U,$J,358.3,7129,1,4,0)
;;=4^H35.3211
;;^UTILITY(U,$J,358.3,7129,2)
;;=^5138521
;;^UTILITY(U,$J,358.3,7130,0)
;;=H35.3221^^40^378^2
;;^UTILITY(U,$J,358.3,7130,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7130,1,3,0)
;;=3^Exudative AMD,LEFT eye,active CNV
;;^UTILITY(U,$J,358.3,7130,1,4,0)
;;=4^H35.3221
;;^UTILITY(U,$J,358.3,7130,2)
;;=^5138525
;;^UTILITY(U,$J,358.3,7131,0)
;;=H35.059^^40^378^3
;;^UTILITY(U,$J,358.3,7131,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7131,1,3,0)
;;=3^Retinal CNV or NV,unspec
;;^UTILITY(U,$J,358.3,7131,1,4,0)
;;=4^H35.059
;;^UTILITY(U,$J,358.3,7131,2)
;;=^5005601
;;^UTILITY(U,$J,358.3,7132,0)
;;=H35.82^^40^378^4
;;^UTILITY(U,$J,358.3,7132,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7132,1,3,0)
;;=3^Retinal Ischemia,unspec
;;^UTILITY(U,$J,358.3,7132,1,4,0)
;;=4^H35.82
;;^UTILITY(U,$J,358.3,7132,2)
;;=^5005716
;;^UTILITY(U,$J,358.3,7133,0)
;;=H35.81^^40^378^5
;;^UTILITY(U,$J,358.3,7133,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7133,1,3,0)
;;=3^Retinal Edema,unspec
;;^UTILITY(U,$J,358.3,7133,1,4,0)
;;=4^H35.81
;;^UTILITY(U,$J,358.3,7133,2)
;;=^5005715
;;^UTILITY(U,$J,358.3,7134,0)
;;=E11.3211^^40^378^6
;;^UTILITY(U,$J,358.3,7134,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7134,1,3,0)
;;=3^DM Type 2 Mild NPDR w/ CME,RIGHT eye
;;^UTILITY(U,$J,358.3,7134,1,4,0)
;;=4^E11.3211
;;^UTILITY(U,$J,358.3,7134,2)
;;=^5138331
;;^UTILITY(U,$J,358.3,7135,0)
;;=E11.3212^^40^378^7
;;^UTILITY(U,$J,358.3,7135,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7135,1,3,0)
;;=3^DM Type 2 Mild NPDR w/ CME,LEFT eye
;;^UTILITY(U,$J,358.3,7135,1,4,0)
;;=4^E11.3212
;;^UTILITY(U,$J,358.3,7135,2)
;;=^5138332
;;^UTILITY(U,$J,358.3,7136,0)
;;=E11.3311^^40^378^8
;;^UTILITY(U,$J,358.3,7136,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7136,1,3,0)
;;=3^DM Type 2 Mod NPDR w/ CME,RIGHT eye
;;^UTILITY(U,$J,358.3,7136,1,4,0)
;;=4^E11.3311
;;^UTILITY(U,$J,358.3,7136,2)
;;=^5138339
;;^UTILITY(U,$J,358.3,7137,0)
;;=E11.3312^^40^378^9
;;^UTILITY(U,$J,358.3,7137,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7137,1,3,0)
;;=3^DM Type 2 Mod NPDR w/ CME,LEFT eye
;;^UTILITY(U,$J,358.3,7137,1,4,0)
;;=4^E11.3312
;;^UTILITY(U,$J,358.3,7137,2)
;;=^5138340
;;^UTILITY(U,$J,358.3,7138,0)
;;=E11.3411^^40^378^10
;;^UTILITY(U,$J,358.3,7138,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7138,1,3,0)
;;=3^DM Type 2 Sev NPDR w/ CME,RIGHT eye
;;^UTILITY(U,$J,358.3,7138,1,4,0)
;;=4^E11.3411
;;^UTILITY(U,$J,358.3,7138,2)
;;=^5138347
;;^UTILITY(U,$J,358.3,7139,0)
;;=E11.3412^^40^378^11
;;^UTILITY(U,$J,358.3,7139,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7139,1,3,0)
;;=3^DM Type 2 Sev NPDR w/ CME,LEFT eye
;;^UTILITY(U,$J,358.3,7139,1,4,0)
;;=4^E11.3412
;;^UTILITY(U,$J,358.3,7139,2)
;;=^5138348
;;^UTILITY(U,$J,358.3,7140,0)
;;=E11.3511^^40^378^12
;;^UTILITY(U,$J,358.3,7140,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7140,1,3,0)
;;=3^DM Type 2 PDR w/ CME,RIGHT eye
;;^UTILITY(U,$J,358.3,7140,1,4,0)
;;=4^E11.3511
;;^UTILITY(U,$J,358.3,7140,2)
;;=^5138355
;;^UTILITY(U,$J,358.3,7141,0)
;;=E11.3512^^40^378^13
;;^UTILITY(U,$J,358.3,7141,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7141,1,3,0)
;;=3^DM Type 2 PDR w/ CME,LEFT eye
;;^UTILITY(U,$J,358.3,7141,1,4,0)
;;=4^E11.3512
;;^UTILITY(U,$J,358.3,7141,2)
;;=^5138356
;;^UTILITY(U,$J,358.3,7142,0)
;;=H59.031^^40^378^14
;;^UTILITY(U,$J,358.3,7142,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7142,1,3,0)
;;=3^CME s/p Surgery,RIGHT eye
;;^UTILITY(U,$J,358.3,7142,1,4,0)
;;=4^H59.031
;;^UTILITY(U,$J,358.3,7142,2)
;;=^5006393
;;^UTILITY(U,$J,358.3,7143,0)
;;=H59.032^^40^378^15
;;^UTILITY(U,$J,358.3,7143,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7143,1,3,0)
;;=3^CME s/p Surgery,LEFT eye
;;^UTILITY(U,$J,358.3,7143,1,4,0)
;;=4^H59.032
;;^UTILITY(U,$J,358.3,7143,2)
;;=^5006394
;;^UTILITY(U,$J,358.3,7144,0)
;;=H34.8310^^40^378^16
;;^UTILITY(U,$J,358.3,7144,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7144,1,3,0)
;;=3^BRVO w/ CME,RIGHT eye
;;^UTILITY(U,$J,358.3,7144,1,4,0)
;;=4^H34.8310
;;^UTILITY(U,$J,358.3,7144,2)
;;=^5138488
;;^UTILITY(U,$J,358.3,7145,0)
;;=H34.8320^^40^378^17
;;^UTILITY(U,$J,358.3,7145,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7145,1,3,0)
;;=3^BRVO w/ CME,LEFT eye
;;^UTILITY(U,$J,358.3,7145,1,4,0)
;;=4^H34.8320
;;^UTILITY(U,$J,358.3,7145,2)
;;=^5138491
;;^UTILITY(U,$J,358.3,7146,0)
;;=H34.8311^^40^378^18
;;^UTILITY(U,$J,358.3,7146,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7146,1,3,0)
;;=3^BRVO w/ NV,RIGHT eye
;;^UTILITY(U,$J,358.3,7146,1,4,0)
;;=4^H34.8311
;;^UTILITY(U,$J,358.3,7146,2)
;;=^5138489
;;^UTILITY(U,$J,358.3,7147,0)
;;=H34.8321^^40^378^19
;;^UTILITY(U,$J,358.3,7147,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7147,1,3,0)
;;=3^BRVO w/ NV,LEFT eye
;;^UTILITY(U,$J,358.3,7147,1,4,0)
;;=4^H34.8321
;;^UTILITY(U,$J,358.3,7147,2)
;;=^5138492
;;^UTILITY(U,$J,358.3,7148,0)
;;=H34.8111^^40^378^20
;;^UTILITY(U,$J,358.3,7148,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7148,1,3,0)
;;=3^CRVO w/ NV,RIGHT eye
;;^UTILITY(U,$J,358.3,7148,1,4,0)
;;=4^H34.8111
;;^UTILITY(U,$J,358.3,7148,2)
;;=^5138477
;;^UTILITY(U,$J,358.3,7149,0)
;;=H34.8121^^40^378^21
;;^UTILITY(U,$J,358.3,7149,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7149,1,3,0)
;;=3^CRVO w/ NV,LEFT eye
;;^UTILITY(U,$J,358.3,7149,1,4,0)
;;=4^H34.8121
;;^UTILITY(U,$J,358.3,7149,2)
;;=^5138480
;;^UTILITY(U,$J,358.3,7150,0)
;;=H34.8110^^40^378^22
;;^UTILITY(U,$J,358.3,7150,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7150,1,3,0)
;;=3^CRVO w/ CME,RIGHT eye
;;^UTILITY(U,$J,358.3,7150,1,4,0)
;;=4^H34.8110
;;^UTILITY(U,$J,358.3,7150,2)
;;=^5138476
;;^UTILITY(U,$J,358.3,7151,0)
;;=H34.8120^^40^378^23
;;^UTILITY(U,$J,358.3,7151,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7151,1,3,0)
;;=3^CRVO w/ CME,LEFT eye
;;^UTILITY(U,$J,358.3,7151,1,4,0)
;;=4^H34.8120
;;^UTILITY(U,$J,358.3,7151,2)
;;=^5138479
;;^UTILITY(U,$J,358.3,7152,0)
;;=H21.1X1^^40^378^24
;;^UTILITY(U,$J,358.3,7152,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7152,1,3,0)
;;=3^NVI/NVA/Rubeosis,RIGHT eye
;;^UTILITY(U,$J,358.3,7152,1,4,0)
;;=4^H21.1X1
;;^UTILITY(U,$J,358.3,7152,2)
;;=^5005175
;;^UTILITY(U,$J,358.3,7153,0)
;;=H21.1X2^^40^378^25
;;^UTILITY(U,$J,358.3,7153,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7153,1,3,0)
;;=3^NVI/NVA/Rubeosis,Left eye
;;^UTILITY(U,$J,358.3,7153,1,4,0)
;;=4^H21.1X2
;;^UTILITY(U,$J,358.3,7153,2)
;;=^5005176
;;^UTILITY(U,$J,358.3,7154,0)
;;=H35.711^^40^378^26
;;^UTILITY(U,$J,358.3,7154,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7154,1,3,0)
;;=3^Central Serous Retinopathy,RIGHT eye
;;^UTILITY(U,$J,358.3,7154,1,4,0)
;;=4^H35.711
;;^UTILITY(U,$J,358.3,7154,2)
;;=^5005703
;;^UTILITY(U,$J,358.3,7155,0)
;;=H35.712^^40^378^27
;;^UTILITY(U,$J,358.3,7155,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7155,1,3,0)
;;=3^Central Serous Retinopathy,LEFT eye
;;^UTILITY(U,$J,358.3,7155,1,4,0)
;;=4^H35.712
;;^UTILITY(U,$J,358.3,7155,2)
;;=^5005704
;;^UTILITY(U,$J,358.3,7156,0)
;;=E11.9^^40^379^2
;;^UTILITY(U,$J,358.3,7156,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7156,1,3,0)
;;=3^DM Type 2 w/o Complications
;;^UTILITY(U,$J,358.3,7156,1,4,0)
;;=4^E11.9
;;^UTILITY(U,$J,358.3,7156,2)
;;=^5002666
;;^UTILITY(U,$J,358.3,7157,0)
;;=E11.39^^40^379^1
;;^UTILITY(U,$J,358.3,7157,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7157,1,3,0)
;;=3^DM Type 2 w/ Diabetic Ophthalmic Complications
;;^UTILITY(U,$J,358.3,7157,1,4,0)
;;=4^E11.39
;;^UTILITY(U,$J,358.3,7157,2)
;;=^5002643
;;^UTILITY(U,$J,358.3,7158,0)
;;=E10.9^^40^379^21
;;^UTILITY(U,$J,358.3,7158,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7158,1,3,0)
;;=3^DM Type 1 w/o Complications
;;^UTILITY(U,$J,358.3,7158,1,4,0)
;;=4^E10.9
;;^UTILITY(U,$J,358.3,7158,2)
;;=^5002626
;;^UTILITY(U,$J,358.3,7159,0)
;;=E10.39^^40^379^20
;;^UTILITY(U,$J,358.3,7159,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7159,1,3,0)
;;=3^DM Type 1 w/ Diabetic Ophthalmic Complication
;;^UTILITY(U,$J,358.3,7159,1,4,0)
;;=4^E10.39
;;^UTILITY(U,$J,358.3,7159,2)
;;=^5002603
;;^UTILITY(U,$J,358.3,7160,0)
;;=E10.3291^^40^379^22
;;^UTILITY(U,$J,358.3,7160,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7160,1,3,0)
;;=3^DM Type 1 w/ Mild NPDR w/o Macula Edema,Right Eye
;;^UTILITY(U,$J,358.3,7160,1,4,0)
;;=4^E10.3291
;;^UTILITY(U,$J,358.3,7160,2)
;;=^5138283
;;^UTILITY(U,$J,358.3,7161,0)
;;=E10.3292^^40^379^27
;;^UTILITY(U,$J,358.3,7161,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7161,1,3,0)
;;=3^DM Type 1 w/ Mild NPDR w/o Macula Edema,Left Eye
;;^UTILITY(U,$J,358.3,7161,1,4,0)
;;=4^E10.3292
;;^UTILITY(U,$J,358.3,7161,2)
;;=^5138284
;;^UTILITY(U,$J,358.3,7162,0)
;;=E10.3391^^40^379^23
;;^UTILITY(U,$J,358.3,7162,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7162,1,3,0)
;;=3^DM Type 1 w/ Mod NPDR w/o Macula Edema,Right Eye
;;^UTILITY(U,$J,358.3,7162,1,4,0)
;;=4^E10.3391
;;^UTILITY(U,$J,358.3,7162,2)
;;=^5138291
;;^UTILITY(U,$J,358.3,7163,0)
;;=E10.3392^^40^379^28
;;^UTILITY(U,$J,358.3,7163,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7163,1,3,0)
;;=3^DM Type 1 w/ Mod NPDR w/o Macula Edema,Left Eye
;;^UTILITY(U,$J,358.3,7163,1,4,0)
;;=4^E10.3392
;;^UTILITY(U,$J,358.3,7163,2)
;;=^5138292
;;^UTILITY(U,$J,358.3,7164,0)
;;=E10.3491^^40^379^24
;;^UTILITY(U,$J,358.3,7164,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7164,1,3,0)
;;=3^DM Type 1 w/ Severe NPDR w/o Macula Edema,Right Eye
;;^UTILITY(U,$J,358.3,7164,1,4,0)
;;=4^E10.3491
;;^UTILITY(U,$J,358.3,7164,2)
;;=^5138299
;;^UTILITY(U,$J,358.3,7165,0)
;;=E10.3492^^40^379^29
;;^UTILITY(U,$J,358.3,7165,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7165,1,3,0)
;;=3^DM Type 1 w/ Severe NPDR w/o Macula Edema,Left Eye
;;^UTILITY(U,$J,358.3,7165,1,4,0)
;;=4^E10.3492
;;^UTILITY(U,$J,358.3,7165,2)
;;=^5138300
;;^UTILITY(U,$J,358.3,7166,0)
;;=E10.3511^^40^379^25
;;^UTILITY(U,$J,358.3,7166,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7166,1,3,0)
;;=3^DM Type 1 w/ PDR w/ Macula Edema,Right Eye
;;^UTILITY(U,$J,358.3,7166,1,4,0)
;;=4^E10.3511
;;^UTILITY(U,$J,358.3,7166,2)
;;=^5138303
;;^UTILITY(U,$J,358.3,7167,0)
;;=E10.3512^^40^379^30
;;^UTILITY(U,$J,358.3,7167,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7167,1,3,0)
;;=3^DM Type 1 w/ PDR w/ Macula Edema,Left Eye
;;^UTILITY(U,$J,358.3,7167,1,4,0)
;;=4^E10.3512
;;^UTILITY(U,$J,358.3,7167,2)
;;=^5138304
;;^UTILITY(U,$J,358.3,7168,0)
;;=E10.3591^^40^379^26
;;^UTILITY(U,$J,358.3,7168,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7168,1,3,0)
;;=3^DM Type 1 w/ PDR w/o Macula Edema,Right Eye
;;^UTILITY(U,$J,358.3,7168,1,4,0)
;;=4^E10.3591
;;^UTILITY(U,$J,358.3,7168,2)
;;=^5138323
;;^UTILITY(U,$J,358.3,7169,0)
;;=E10.3592^^40^379^31
;;^UTILITY(U,$J,358.3,7169,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7169,1,3,0)
;;=3^DM Type 1 w/ PDR w/o Macula Edema,Left Eye
;;^UTILITY(U,$J,358.3,7169,1,4,0)
;;=4^E10.3592
;;^UTILITY(U,$J,358.3,7169,2)
;;=^5138324
;;^UTILITY(U,$J,358.3,7170,0)
;;=E11.3211^^40^379^4
;;^UTILITY(U,$J,358.3,7170,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7170,1,3,0)
;;=3^DM Type 2 w/ Mild NPDR w/ Macula Edema,Right Eye
;;^UTILITY(U,$J,358.3,7170,1,4,0)
;;=4^E11.3211
;;^UTILITY(U,$J,358.3,7170,2)
;;=^5138331
;;^UTILITY(U,$J,358.3,7171,0)
;;=E11.3212^^40^379^12
;;^UTILITY(U,$J,358.3,7171,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7171,1,3,0)
;;=3^DM Type 2 w/ Mild NPDR w/ Macula Edema,Left Eye
;;^UTILITY(U,$J,358.3,7171,1,4,0)
;;=4^E11.3212
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HIBDEI030 19756 printed Sep 23, 2025@19:16:36 Page 2
IBDEI030 ; ; 01-AUG-2022
+1 ;;3.0;IB ENCOUNTER FORM IMP/EXP;;AUG 01, 2022
+2 if 'DIFQR(358.3)
QUIT
FOR I=1:2
SET X=$TEXT(Q+I)
if X=""
QUIT
SET Y=$EXTRACT($TEXT(Q+I+1),4,999)
SET X=$EXTRACT(X,4,999)
if $ASCII(Y)=126
SET I=I+1
SET Y=$EXTRACT(Y,2,999)_$EXTRACT($TEXT(Q+I+1),5,999)
if $ASCII(Y)=61
SET Y=$EXTRACT(Y,2,999)
XECUTE NO
IF '$TEST
SET @X=Y
Q QUIT
+1 ;;^UTILITY(U,$J,358.3,7104,1,0)
+2 ;;=^358.31IA^4^2
+3 ;;^UTILITY(U,$J,358.3,7104,1,3,0)
+4 ;;=3^Exudative ARMD,Right Eye w/ Active Choroidal Neovascularization
+5 ;;^UTILITY(U,$J,358.3,7104,1,4,0)
+6 ;;=4^H35.3211
+7 ;;^UTILITY(U,$J,358.3,7104,2)
+8 ;;=^5138521
+9 ;;^UTILITY(U,$J,358.3,7105,0)
+10 ;;=H35.3212^^40^375^18
+11 ;;^UTILITY(U,$J,358.3,7105,1,0)
+12 ;;=^358.31IA^4^2
+13 ;;^UTILITY(U,$J,358.3,7105,1,3,0)
+14 ;;=3^Exudative ARMD,Right Eye w/ Inactive Choroidal Neovascularization
+15 ;;^UTILITY(U,$J,358.3,7105,1,4,0)
+16 ;;=4^H35.3212
+17 ;;^UTILITY(U,$J,358.3,7105,2)
+18 ;;=^5138522
+19 ;;^UTILITY(U,$J,358.3,7106,0)
+20 ;;=H35.3213^^40^375^19
+21 ;;^UTILITY(U,$J,358.3,7106,1,0)
+22 ;;=^358.31IA^4^2
+23 ;;^UTILITY(U,$J,358.3,7106,1,3,0)
+24 ;;=3^Exudative ARMD,Right Eye w/ Inactive Scar
+25 ;;^UTILITY(U,$J,358.3,7106,1,4,0)
+26 ;;=4^H35.3213
+27 ;;^UTILITY(U,$J,358.3,7106,2)
+28 ;;=^5138523
+29 ;;^UTILITY(U,$J,358.3,7107,0)
+30 ;;=H35.3221^^40^375^21
+31 ;;^UTILITY(U,$J,358.3,7107,1,0)
+32 ;;=^358.31IA^4^2
+33 ;;^UTILITY(U,$J,358.3,7107,1,3,0)
+34 ;;=3^Exudative ARMD,Left Eye w/ Active Choroidal Neovascularization
+35 ;;^UTILITY(U,$J,358.3,7107,1,4,0)
+36 ;;=4^H35.3221
+37 ;;^UTILITY(U,$J,358.3,7107,2)
+38 ;;=^5138525
+39 ;;^UTILITY(U,$J,358.3,7108,0)
+40 ;;=H35.3222^^40^375^22
+41 ;;^UTILITY(U,$J,358.3,7108,1,0)
+42 ;;=^358.31IA^4^2
+43 ;;^UTILITY(U,$J,358.3,7108,1,3,0)
+44 ;;=3^Exudative ARMD,Left Eye w/ Inactive Choroidal Neovascularization
+45 ;;^UTILITY(U,$J,358.3,7108,1,4,0)
+46 ;;=4^H35.3222
+47 ;;^UTILITY(U,$J,358.3,7108,2)
+48 ;;=^5138526
+49 ;;^UTILITY(U,$J,358.3,7109,0)
+50 ;;=H35.3223^^40^375^23
+51 ;;^UTILITY(U,$J,358.3,7109,1,0)
+52 ;;=^358.31IA^4^2
+53 ;;^UTILITY(U,$J,358.3,7109,1,3,0)
+54 ;;=3^Exudative ARMD,Left Eye w/ Inactive Scar
+55 ;;^UTILITY(U,$J,358.3,7109,1,4,0)
+56 ;;=4^H35.3223
+57 ;;^UTILITY(U,$J,358.3,7109,2)
+58 ;;=^5138527
+59 ;;^UTILITY(U,$J,358.3,7110,0)
+60 ;;=R45.851^^40^376^3
+61 ;;^UTILITY(U,$J,358.3,7110,1,0)
+62 ;;=^358.31IA^4^2
+63 ;;^UTILITY(U,$J,358.3,7110,1,3,0)
+64 ;;=3^Suicidal Ideations
+65 ;;^UTILITY(U,$J,358.3,7110,1,4,0)
+66 ;;=4^R45.851
+67 ;;^UTILITY(U,$J,358.3,7110,2)
+68 ;;=^5019474
+69 ;;^UTILITY(U,$J,358.3,7111,0)
+70 ;;=T14.91XA^^40^376^4
+71 ;;^UTILITY(U,$J,358.3,7111,1,0)
+72 ;;=^358.31IA^4^2
+73 ;;^UTILITY(U,$J,358.3,7111,1,3,0)
+74 ;;=3^Suicide Attempt,Init Encntr
+75 ;;^UTILITY(U,$J,358.3,7111,1,4,0)
+76 ;;=4^T14.91XA
+77 ;;^UTILITY(U,$J,358.3,7111,2)
+78 ;;=^5151779
+79 ;;^UTILITY(U,$J,358.3,7112,0)
+80 ;;=T14.91XD^^40^376^6
+81 ;;^UTILITY(U,$J,358.3,7112,1,0)
+82 ;;=^358.31IA^4^2
+83 ;;^UTILITY(U,$J,358.3,7112,1,3,0)
+84 ;;=3^Suicide Attempt,Subsequent Encntr
+85 ;;^UTILITY(U,$J,358.3,7112,1,4,0)
+86 ;;=4^T14.91XD
+87 ;;^UTILITY(U,$J,358.3,7112,2)
+88 ;;=^5151780
+89 ;;^UTILITY(U,$J,358.3,7113,0)
+90 ;;=T14.91XS^^40^376^5
+91 ;;^UTILITY(U,$J,358.3,7113,1,0)
+92 ;;=^358.31IA^4^2
+93 ;;^UTILITY(U,$J,358.3,7113,1,3,0)
+94 ;;=3^Suicide Attempt,Sequela
+95 ;;^UTILITY(U,$J,358.3,7113,1,4,0)
+96 ;;=4^T14.91XS
+97 ;;^UTILITY(U,$J,358.3,7113,2)
+98 ;;=^5151781
+99 ;;^UTILITY(U,$J,358.3,7114,0)
+100 ;;=Z91.51^^40^376^2
+101 ;;^UTILITY(U,$J,358.3,7114,1,0)
+102 ;;=^358.31IA^4^2
+103 ;;^UTILITY(U,$J,358.3,7114,1,3,0)
+104 ;;=3^Personal Hx of Suicidal Behavior
+105 ;;^UTILITY(U,$J,358.3,7114,1,4,0)
+106 ;;=4^Z91.51
+107 ;;^UTILITY(U,$J,358.3,7114,2)
+108 ;;=^5161317
+109 ;;^UTILITY(U,$J,358.3,7115,0)
+110 ;;=Z91.52^^40^376^1
+111 ;;^UTILITY(U,$J,358.3,7115,1,0)
+112 ;;=^358.31IA^4^2
+113 ;;^UTILITY(U,$J,358.3,7115,1,3,0)
+114 ;;=3^Personal Hx of Non-Suicidal Self-Harm
+115 ;;^UTILITY(U,$J,358.3,7115,1,4,0)
+116 ;;=4^Z91.52
+117 ;;^UTILITY(U,$J,358.3,7115,2)
+118 ;;=^5161318
+119 ;;^UTILITY(U,$J,358.3,7116,0)
+120 ;;=H53.8^^40^377^1
+121 ;;^UTILITY(U,$J,358.3,7116,1,0)
+122 ;;=^358.31IA^4^2
+123 ;;^UTILITY(U,$J,358.3,7116,1,3,0)
+124 ;;=3^Visual Disturbances
+125 ;;^UTILITY(U,$J,358.3,7116,1,4,0)
+126 ;;=4^H53.8
+127 ;;^UTILITY(U,$J,358.3,7116,2)
+128 ;;=^5006356
+129 ;;^UTILITY(U,$J,358.3,7117,0)
+130 ;;=H57.11^^40^377^2
+131 ;;^UTILITY(U,$J,358.3,7117,1,0)
+132 ;;=^358.31IA^4^2
+133 ;;^UTILITY(U,$J,358.3,7117,1,3,0)
+134 ;;=3^Ocular Pain,Right Eye
+135 ;;^UTILITY(U,$J,358.3,7117,1,4,0)
+136 ;;=4^H57.11
+137 ;;^UTILITY(U,$J,358.3,7117,2)
+138 ;;=^5006382
+139 ;;^UTILITY(U,$J,358.3,7118,0)
+140 ;;=H57.12^^40^377^3
+141 ;;^UTILITY(U,$J,358.3,7118,1,0)
+142 ;;=^358.31IA^4^2
+143 ;;^UTILITY(U,$J,358.3,7118,1,3,0)
+144 ;;=3^Ocular Pain,Left Eye
+145 ;;^UTILITY(U,$J,358.3,7118,1,4,0)
+146 ;;=4^H57.12
+147 ;;^UTILITY(U,$J,358.3,7118,2)
+148 ;;=^5006383
+149 ;;^UTILITY(U,$J,358.3,7119,0)
+150 ;;=H57.13^^40^377^4
+151 ;;^UTILITY(U,$J,358.3,7119,1,0)
+152 ;;=^358.31IA^4^2
+153 ;;^UTILITY(U,$J,358.3,7119,1,3,0)
+154 ;;=3^Ocular Pain,Bilateral
+155 ;;^UTILITY(U,$J,358.3,7119,1,4,0)
+156 ;;=4^H57.13
+157 ;;^UTILITY(U,$J,358.3,7119,2)
+158 ;;=^5006384
+159 ;;^UTILITY(U,$J,358.3,7120,0)
+160 ;;=Z01.00^^40^377^5
+161 ;;^UTILITY(U,$J,358.3,7120,1,0)
+162 ;;=^358.31IA^4^2
+163 ;;^UTILITY(U,$J,358.3,7120,1,3,0)
+164 ;;=3^Eye/Vision Exam w/o Abnormal Findings
+165 ;;^UTILITY(U,$J,358.3,7120,1,4,0)
+166 ;;=4^Z01.00
+167 ;;^UTILITY(U,$J,358.3,7120,2)
+168 ;;=^5062612
+169 ;;^UTILITY(U,$J,358.3,7121,0)
+170 ;;=Z01.01^^40^377^6
+171 ;;^UTILITY(U,$J,358.3,7121,1,0)
+172 ;;=^358.31IA^4^2
+173 ;;^UTILITY(U,$J,358.3,7121,1,3,0)
+174 ;;=3^Eye/Vision Exam w/ Abnormal Findings
+175 ;;^UTILITY(U,$J,358.3,7121,1,4,0)
+176 ;;=4^Z01.01
+177 ;;^UTILITY(U,$J,358.3,7121,2)
+178 ;;=^5062613
+179 ;;^UTILITY(U,$J,358.3,7122,0)
+180 ;;=I10.^^40^377^9
+181 ;;^UTILITY(U,$J,358.3,7122,1,0)
+182 ;;=^358.31IA^4^2
+183 ;;^UTILITY(U,$J,358.3,7122,1,3,0)
+184 ;;=3^Hypertension,Essential
+185 ;;^UTILITY(U,$J,358.3,7122,1,4,0)
+186 ;;=4^I10.
+187 ;;^UTILITY(U,$J,358.3,7122,2)
+188 ;;=^5007062
+189 ;;^UTILITY(U,$J,358.3,7123,0)
+190 ;;=Z21.^^40^377^10
+191 ;;^UTILITY(U,$J,358.3,7123,1,0)
+192 ;;=^358.31IA^4^2
+193 ;;^UTILITY(U,$J,358.3,7123,1,3,0)
+194 ;;=3^Asymptomatic HIV Infection Status
+195 ;;^UTILITY(U,$J,358.3,7123,1,4,0)
+196 ;;=4^Z21.
+197 ;;^UTILITY(U,$J,358.3,7123,2)
+198 ;;=^5062777
+199 ;;^UTILITY(U,$J,358.3,7124,0)
+200 ;;=Z01.021^^40^377^7
+201 ;;^UTILITY(U,$J,358.3,7124,1,0)
+202 ;;=^358.31IA^4^2
+203 ;;^UTILITY(U,$J,358.3,7124,1,3,0)
+204 ;;=3^Eye/Vision Exam After Failed Exam w/ Abnormal Findings
+205 ;;^UTILITY(U,$J,358.3,7124,1,4,0)
+206 ;;=4^Z01.021
+207 ;;^UTILITY(U,$J,358.3,7124,2)
+208 ;;=^5158319
+209 ;;^UTILITY(U,$J,358.3,7125,0)
+210 ;;=Z01.020^^40^377^8
+211 ;;^UTILITY(U,$J,358.3,7125,1,0)
+212 ;;=^358.31IA^4^2
+213 ;;^UTILITY(U,$J,358.3,7125,1,3,0)
+214 ;;=3^Eye/Vision Exam After Failed Exam w/o Abnormal Findings
+215 ;;^UTILITY(U,$J,358.3,7125,1,4,0)
+216 ;;=4^Z01.020
+217 ;;^UTILITY(U,$J,358.3,7125,2)
+218 ;;=^5158318
+219 ;;^UTILITY(U,$J,358.3,7126,0)
+220 ;;=Z82.1^^40^377^11
+221 ;;^UTILITY(U,$J,358.3,7126,1,0)
+222 ;;=^358.31IA^4^2
+223 ;;^UTILITY(U,$J,358.3,7126,1,3,0)
+224 ;;=3^Family Hx Blindness/Visual Loss
+225 ;;^UTILITY(U,$J,358.3,7126,1,4,0)
+226 ;;=4^Z82.1
+227 ;;^UTILITY(U,$J,358.3,7126,2)
+228 ;;=^5063365
+229 ;;^UTILITY(U,$J,358.3,7127,0)
+230 ;;=Z83.518^^40^377^12
+231 ;;^UTILITY(U,$J,358.3,7127,1,0)
+232 ;;=^358.31IA^4^2
+233 ;;^UTILITY(U,$J,358.3,7127,1,3,0)
+234 ;;=3^Family Hx Other Eye Disorder
+235 ;;^UTILITY(U,$J,358.3,7127,1,4,0)
+236 ;;=4^Z83.518
+237 ;;^UTILITY(U,$J,358.3,7127,2)
+238 ;;=^5063383
+239 ;;^UTILITY(U,$J,358.3,7128,0)
+240 ;;=Z83.511^^40^377^13
+241 ;;^UTILITY(U,$J,358.3,7128,1,0)
+242 ;;=^358.31IA^4^2
+243 ;;^UTILITY(U,$J,358.3,7128,1,3,0)
+244 ;;=3^Family Hx of Glaucoma
+245 ;;^UTILITY(U,$J,358.3,7128,1,4,0)
+246 ;;=4^Z83.511
+247 ;;^UTILITY(U,$J,358.3,7128,2)
+248 ;;=^5063382
+249 ;;^UTILITY(U,$J,358.3,7129,0)
+250 ;;=H35.3211^^40^378^1
+251 ;;^UTILITY(U,$J,358.3,7129,1,0)
+252 ;;=^358.31IA^4^2
+253 ;;^UTILITY(U,$J,358.3,7129,1,3,0)
+254 ;;=3^Exudative AMD,RIGHT eye,active CNV
+255 ;;^UTILITY(U,$J,358.3,7129,1,4,0)
+256 ;;=4^H35.3211
+257 ;;^UTILITY(U,$J,358.3,7129,2)
+258 ;;=^5138521
+259 ;;^UTILITY(U,$J,358.3,7130,0)
+260 ;;=H35.3221^^40^378^2
+261 ;;^UTILITY(U,$J,358.3,7130,1,0)
+262 ;;=^358.31IA^4^2
+263 ;;^UTILITY(U,$J,358.3,7130,1,3,0)
+264 ;;=3^Exudative AMD,LEFT eye,active CNV
+265 ;;^UTILITY(U,$J,358.3,7130,1,4,0)
+266 ;;=4^H35.3221
+267 ;;^UTILITY(U,$J,358.3,7130,2)
+268 ;;=^5138525
+269 ;;^UTILITY(U,$J,358.3,7131,0)
+270 ;;=H35.059^^40^378^3
+271 ;;^UTILITY(U,$J,358.3,7131,1,0)
+272 ;;=^358.31IA^4^2
+273 ;;^UTILITY(U,$J,358.3,7131,1,3,0)
+274 ;;=3^Retinal CNV or NV,unspec
+275 ;;^UTILITY(U,$J,358.3,7131,1,4,0)
+276 ;;=4^H35.059
+277 ;;^UTILITY(U,$J,358.3,7131,2)
+278 ;;=^5005601
+279 ;;^UTILITY(U,$J,358.3,7132,0)
+280 ;;=H35.82^^40^378^4
+281 ;;^UTILITY(U,$J,358.3,7132,1,0)
+282 ;;=^358.31IA^4^2
+283 ;;^UTILITY(U,$J,358.3,7132,1,3,0)
+284 ;;=3^Retinal Ischemia,unspec
+285 ;;^UTILITY(U,$J,358.3,7132,1,4,0)
+286 ;;=4^H35.82
+287 ;;^UTILITY(U,$J,358.3,7132,2)
+288 ;;=^5005716
+289 ;;^UTILITY(U,$J,358.3,7133,0)
+290 ;;=H35.81^^40^378^5
+291 ;;^UTILITY(U,$J,358.3,7133,1,0)
+292 ;;=^358.31IA^4^2
+293 ;;^UTILITY(U,$J,358.3,7133,1,3,0)
+294 ;;=3^Retinal Edema,unspec
+295 ;;^UTILITY(U,$J,358.3,7133,1,4,0)
+296 ;;=4^H35.81
+297 ;;^UTILITY(U,$J,358.3,7133,2)
+298 ;;=^5005715
+299 ;;^UTILITY(U,$J,358.3,7134,0)
+300 ;;=E11.3211^^40^378^6
+301 ;;^UTILITY(U,$J,358.3,7134,1,0)
+302 ;;=^358.31IA^4^2
+303 ;;^UTILITY(U,$J,358.3,7134,1,3,0)
+304 ;;=3^DM Type 2 Mild NPDR w/ CME,RIGHT eye
+305 ;;^UTILITY(U,$J,358.3,7134,1,4,0)
+306 ;;=4^E11.3211
+307 ;;^UTILITY(U,$J,358.3,7134,2)
+308 ;;=^5138331
+309 ;;^UTILITY(U,$J,358.3,7135,0)
+310 ;;=E11.3212^^40^378^7
+311 ;;^UTILITY(U,$J,358.3,7135,1,0)
+312 ;;=^358.31IA^4^2
+313 ;;^UTILITY(U,$J,358.3,7135,1,3,0)
+314 ;;=3^DM Type 2 Mild NPDR w/ CME,LEFT eye
+315 ;;^UTILITY(U,$J,358.3,7135,1,4,0)
+316 ;;=4^E11.3212
+317 ;;^UTILITY(U,$J,358.3,7135,2)
+318 ;;=^5138332
+319 ;;^UTILITY(U,$J,358.3,7136,0)
+320 ;;=E11.3311^^40^378^8
+321 ;;^UTILITY(U,$J,358.3,7136,1,0)
+322 ;;=^358.31IA^4^2
+323 ;;^UTILITY(U,$J,358.3,7136,1,3,0)
+324 ;;=3^DM Type 2 Mod NPDR w/ CME,RIGHT eye
+325 ;;^UTILITY(U,$J,358.3,7136,1,4,0)
+326 ;;=4^E11.3311
+327 ;;^UTILITY(U,$J,358.3,7136,2)
+328 ;;=^5138339
+329 ;;^UTILITY(U,$J,358.3,7137,0)
+330 ;;=E11.3312^^40^378^9
+331 ;;^UTILITY(U,$J,358.3,7137,1,0)
+332 ;;=^358.31IA^4^2
+333 ;;^UTILITY(U,$J,358.3,7137,1,3,0)
+334 ;;=3^DM Type 2 Mod NPDR w/ CME,LEFT eye
+335 ;;^UTILITY(U,$J,358.3,7137,1,4,0)
+336 ;;=4^E11.3312
+337 ;;^UTILITY(U,$J,358.3,7137,2)
+338 ;;=^5138340
+339 ;;^UTILITY(U,$J,358.3,7138,0)
+340 ;;=E11.3411^^40^378^10
+341 ;;^UTILITY(U,$J,358.3,7138,1,0)
+342 ;;=^358.31IA^4^2
+343 ;;^UTILITY(U,$J,358.3,7138,1,3,0)
+344 ;;=3^DM Type 2 Sev NPDR w/ CME,RIGHT eye
+345 ;;^UTILITY(U,$J,358.3,7138,1,4,0)
+346 ;;=4^E11.3411
+347 ;;^UTILITY(U,$J,358.3,7138,2)
+348 ;;=^5138347
+349 ;;^UTILITY(U,$J,358.3,7139,0)
+350 ;;=E11.3412^^40^378^11
+351 ;;^UTILITY(U,$J,358.3,7139,1,0)
+352 ;;=^358.31IA^4^2
+353 ;;^UTILITY(U,$J,358.3,7139,1,3,0)
+354 ;;=3^DM Type 2 Sev NPDR w/ CME,LEFT eye
+355 ;;^UTILITY(U,$J,358.3,7139,1,4,0)
+356 ;;=4^E11.3412
+357 ;;^UTILITY(U,$J,358.3,7139,2)
+358 ;;=^5138348
+359 ;;^UTILITY(U,$J,358.3,7140,0)
+360 ;;=E11.3511^^40^378^12
+361 ;;^UTILITY(U,$J,358.3,7140,1,0)
+362 ;;=^358.31IA^4^2
+363 ;;^UTILITY(U,$J,358.3,7140,1,3,0)
+364 ;;=3^DM Type 2 PDR w/ CME,RIGHT eye
+365 ;;^UTILITY(U,$J,358.3,7140,1,4,0)
+366 ;;=4^E11.3511
+367 ;;^UTILITY(U,$J,358.3,7140,2)
+368 ;;=^5138355
+369 ;;^UTILITY(U,$J,358.3,7141,0)
+370 ;;=E11.3512^^40^378^13
+371 ;;^UTILITY(U,$J,358.3,7141,1,0)
+372 ;;=^358.31IA^4^2
+373 ;;^UTILITY(U,$J,358.3,7141,1,3,0)
+374 ;;=3^DM Type 2 PDR w/ CME,LEFT eye
+375 ;;^UTILITY(U,$J,358.3,7141,1,4,0)
+376 ;;=4^E11.3512
+377 ;;^UTILITY(U,$J,358.3,7141,2)
+378 ;;=^5138356
+379 ;;^UTILITY(U,$J,358.3,7142,0)
+380 ;;=H59.031^^40^378^14
+381 ;;^UTILITY(U,$J,358.3,7142,1,0)
+382 ;;=^358.31IA^4^2
+383 ;;^UTILITY(U,$J,358.3,7142,1,3,0)
+384 ;;=3^CME s/p Surgery,RIGHT eye
+385 ;;^UTILITY(U,$J,358.3,7142,1,4,0)
+386 ;;=4^H59.031
+387 ;;^UTILITY(U,$J,358.3,7142,2)
+388 ;;=^5006393
+389 ;;^UTILITY(U,$J,358.3,7143,0)
+390 ;;=H59.032^^40^378^15
+391 ;;^UTILITY(U,$J,358.3,7143,1,0)
+392 ;;=^358.31IA^4^2
+393 ;;^UTILITY(U,$J,358.3,7143,1,3,0)
+394 ;;=3^CME s/p Surgery,LEFT eye
+395 ;;^UTILITY(U,$J,358.3,7143,1,4,0)
+396 ;;=4^H59.032
+397 ;;^UTILITY(U,$J,358.3,7143,2)
+398 ;;=^5006394
+399 ;;^UTILITY(U,$J,358.3,7144,0)
+400 ;;=H34.8310^^40^378^16
+401 ;;^UTILITY(U,$J,358.3,7144,1,0)
+402 ;;=^358.31IA^4^2
+403 ;;^UTILITY(U,$J,358.3,7144,1,3,0)
+404 ;;=3^BRVO w/ CME,RIGHT eye
+405 ;;^UTILITY(U,$J,358.3,7144,1,4,0)
+406 ;;=4^H34.8310
+407 ;;^UTILITY(U,$J,358.3,7144,2)
+408 ;;=^5138488
+409 ;;^UTILITY(U,$J,358.3,7145,0)
+410 ;;=H34.8320^^40^378^17
+411 ;;^UTILITY(U,$J,358.3,7145,1,0)
+412 ;;=^358.31IA^4^2
+413 ;;^UTILITY(U,$J,358.3,7145,1,3,0)
+414 ;;=3^BRVO w/ CME,LEFT eye
+415 ;;^UTILITY(U,$J,358.3,7145,1,4,0)
+416 ;;=4^H34.8320
+417 ;;^UTILITY(U,$J,358.3,7145,2)
+418 ;;=^5138491
+419 ;;^UTILITY(U,$J,358.3,7146,0)
+420 ;;=H34.8311^^40^378^18
+421 ;;^UTILITY(U,$J,358.3,7146,1,0)
+422 ;;=^358.31IA^4^2
+423 ;;^UTILITY(U,$J,358.3,7146,1,3,0)
+424 ;;=3^BRVO w/ NV,RIGHT eye
+425 ;;^UTILITY(U,$J,358.3,7146,1,4,0)
+426 ;;=4^H34.8311
+427 ;;^UTILITY(U,$J,358.3,7146,2)
+428 ;;=^5138489
+429 ;;^UTILITY(U,$J,358.3,7147,0)
+430 ;;=H34.8321^^40^378^19
+431 ;;^UTILITY(U,$J,358.3,7147,1,0)
+432 ;;=^358.31IA^4^2
+433 ;;^UTILITY(U,$J,358.3,7147,1,3,0)
+434 ;;=3^BRVO w/ NV,LEFT eye
+435 ;;^UTILITY(U,$J,358.3,7147,1,4,0)
+436 ;;=4^H34.8321
+437 ;;^UTILITY(U,$J,358.3,7147,2)
+438 ;;=^5138492
+439 ;;^UTILITY(U,$J,358.3,7148,0)
+440 ;;=H34.8111^^40^378^20
+441 ;;^UTILITY(U,$J,358.3,7148,1,0)
+442 ;;=^358.31IA^4^2
+443 ;;^UTILITY(U,$J,358.3,7148,1,3,0)
+444 ;;=3^CRVO w/ NV,RIGHT eye
+445 ;;^UTILITY(U,$J,358.3,7148,1,4,0)
+446 ;;=4^H34.8111
+447 ;;^UTILITY(U,$J,358.3,7148,2)
+448 ;;=^5138477
+449 ;;^UTILITY(U,$J,358.3,7149,0)
+450 ;;=H34.8121^^40^378^21
+451 ;;^UTILITY(U,$J,358.3,7149,1,0)
+452 ;;=^358.31IA^4^2
+453 ;;^UTILITY(U,$J,358.3,7149,1,3,0)
+454 ;;=3^CRVO w/ NV,LEFT eye
+455 ;;^UTILITY(U,$J,358.3,7149,1,4,0)
+456 ;;=4^H34.8121
+457 ;;^UTILITY(U,$J,358.3,7149,2)
+458 ;;=^5138480
+459 ;;^UTILITY(U,$J,358.3,7150,0)
+460 ;;=H34.8110^^40^378^22
+461 ;;^UTILITY(U,$J,358.3,7150,1,0)
+462 ;;=^358.31IA^4^2
+463 ;;^UTILITY(U,$J,358.3,7150,1,3,0)
+464 ;;=3^CRVO w/ CME,RIGHT eye
+465 ;;^UTILITY(U,$J,358.3,7150,1,4,0)
+466 ;;=4^H34.8110
+467 ;;^UTILITY(U,$J,358.3,7150,2)
+468 ;;=^5138476
+469 ;;^UTILITY(U,$J,358.3,7151,0)
+470 ;;=H34.8120^^40^378^23
+471 ;;^UTILITY(U,$J,358.3,7151,1,0)
+472 ;;=^358.31IA^4^2
+473 ;;^UTILITY(U,$J,358.3,7151,1,3,0)
+474 ;;=3^CRVO w/ CME,LEFT eye
+475 ;;^UTILITY(U,$J,358.3,7151,1,4,0)
+476 ;;=4^H34.8120
+477 ;;^UTILITY(U,$J,358.3,7151,2)
+478 ;;=^5138479
+479 ;;^UTILITY(U,$J,358.3,7152,0)
+480 ;;=H21.1X1^^40^378^24
+481 ;;^UTILITY(U,$J,358.3,7152,1,0)
+482 ;;=^358.31IA^4^2
+483 ;;^UTILITY(U,$J,358.3,7152,1,3,0)
+484 ;;=3^NVI/NVA/Rubeosis,RIGHT eye
+485 ;;^UTILITY(U,$J,358.3,7152,1,4,0)
+486 ;;=4^H21.1X1
+487 ;;^UTILITY(U,$J,358.3,7152,2)
+488 ;;=^5005175
+489 ;;^UTILITY(U,$J,358.3,7153,0)
+490 ;;=H21.1X2^^40^378^25
+491 ;;^UTILITY(U,$J,358.3,7153,1,0)
+492 ;;=^358.31IA^4^2
+493 ;;^UTILITY(U,$J,358.3,7153,1,3,0)
+494 ;;=3^NVI/NVA/Rubeosis,Left eye
+495 ;;^UTILITY(U,$J,358.3,7153,1,4,0)
+496 ;;=4^H21.1X2
+497 ;;^UTILITY(U,$J,358.3,7153,2)
+498 ;;=^5005176
+499 ;;^UTILITY(U,$J,358.3,7154,0)
+500 ;;=H35.711^^40^378^26
+501 ;;^UTILITY(U,$J,358.3,7154,1,0)
+502 ;;=^358.31IA^4^2
+503 ;;^UTILITY(U,$J,358.3,7154,1,3,0)
+504 ;;=3^Central Serous Retinopathy,RIGHT eye
+505 ;;^UTILITY(U,$J,358.3,7154,1,4,0)
+506 ;;=4^H35.711
+507 ;;^UTILITY(U,$J,358.3,7154,2)
+508 ;;=^5005703
+509 ;;^UTILITY(U,$J,358.3,7155,0)
+510 ;;=H35.712^^40^378^27
+511 ;;^UTILITY(U,$J,358.3,7155,1,0)
+512 ;;=^358.31IA^4^2
+513 ;;^UTILITY(U,$J,358.3,7155,1,3,0)
+514 ;;=3^Central Serous Retinopathy,LEFT eye
+515 ;;^UTILITY(U,$J,358.3,7155,1,4,0)
+516 ;;=4^H35.712
+517 ;;^UTILITY(U,$J,358.3,7155,2)
+518 ;;=^5005704
+519 ;;^UTILITY(U,$J,358.3,7156,0)
+520 ;;=E11.9^^40^379^2
+521 ;;^UTILITY(U,$J,358.3,7156,1,0)
+522 ;;=^358.31IA^4^2
+523 ;;^UTILITY(U,$J,358.3,7156,1,3,0)
+524 ;;=3^DM Type 2 w/o Complications
+525 ;;^UTILITY(U,$J,358.3,7156,1,4,0)
+526 ;;=4^E11.9
+527 ;;^UTILITY(U,$J,358.3,7156,2)
+528 ;;=^5002666
+529 ;;^UTILITY(U,$J,358.3,7157,0)
+530 ;;=E11.39^^40^379^1
+531 ;;^UTILITY(U,$J,358.3,7157,1,0)
+532 ;;=^358.31IA^4^2
+533 ;;^UTILITY(U,$J,358.3,7157,1,3,0)
+534 ;;=3^DM Type 2 w/ Diabetic Ophthalmic Complications
+535 ;;^UTILITY(U,$J,358.3,7157,1,4,0)
+536 ;;=4^E11.39
+537 ;;^UTILITY(U,$J,358.3,7157,2)
+538 ;;=^5002643
+539 ;;^UTILITY(U,$J,358.3,7158,0)
+540 ;;=E10.9^^40^379^21
+541 ;;^UTILITY(U,$J,358.3,7158,1,0)
+542 ;;=^358.31IA^4^2
+543 ;;^UTILITY(U,$J,358.3,7158,1,3,0)
+544 ;;=3^DM Type 1 w/o Complications
+545 ;;^UTILITY(U,$J,358.3,7158,1,4,0)
+546 ;;=4^E10.9
+547 ;;^UTILITY(U,$J,358.3,7158,2)
+548 ;;=^5002626
+549 ;;^UTILITY(U,$J,358.3,7159,0)
+550 ;;=E10.39^^40^379^20
+551 ;;^UTILITY(U,$J,358.3,7159,1,0)
+552 ;;=^358.31IA^4^2
+553 ;;^UTILITY(U,$J,358.3,7159,1,3,0)
+554 ;;=3^DM Type 1 w/ Diabetic Ophthalmic Complication
+555 ;;^UTILITY(U,$J,358.3,7159,1,4,0)
+556 ;;=4^E10.39
+557 ;;^UTILITY(U,$J,358.3,7159,2)
+558 ;;=^5002603
+559 ;;^UTILITY(U,$J,358.3,7160,0)
+560 ;;=E10.3291^^40^379^22
+561 ;;^UTILITY(U,$J,358.3,7160,1,0)
+562 ;;=^358.31IA^4^2
+563 ;;^UTILITY(U,$J,358.3,7160,1,3,0)
+564 ;;=3^DM Type 1 w/ Mild NPDR w/o Macula Edema,Right Eye
+565 ;;^UTILITY(U,$J,358.3,7160,1,4,0)
+566 ;;=4^E10.3291
+567 ;;^UTILITY(U,$J,358.3,7160,2)
+568 ;;=^5138283
+569 ;;^UTILITY(U,$J,358.3,7161,0)
+570 ;;=E10.3292^^40^379^27
+571 ;;^UTILITY(U,$J,358.3,7161,1,0)
+572 ;;=^358.31IA^4^2
+573 ;;^UTILITY(U,$J,358.3,7161,1,3,0)
+574 ;;=3^DM Type 1 w/ Mild NPDR w/o Macula Edema,Left Eye
+575 ;;^UTILITY(U,$J,358.3,7161,1,4,0)
+576 ;;=4^E10.3292
+577 ;;^UTILITY(U,$J,358.3,7161,2)
+578 ;;=^5138284
+579 ;;^UTILITY(U,$J,358.3,7162,0)
+580 ;;=E10.3391^^40^379^23
+581 ;;^UTILITY(U,$J,358.3,7162,1,0)
+582 ;;=^358.31IA^4^2
+583 ;;^UTILITY(U,$J,358.3,7162,1,3,0)
+584 ;;=3^DM Type 1 w/ Mod NPDR w/o Macula Edema,Right Eye
+585 ;;^UTILITY(U,$J,358.3,7162,1,4,0)
+586 ;;=4^E10.3391
+587 ;;^UTILITY(U,$J,358.3,7162,2)
+588 ;;=^5138291
+589 ;;^UTILITY(U,$J,358.3,7163,0)
+590 ;;=E10.3392^^40^379^28
+591 ;;^UTILITY(U,$J,358.3,7163,1,0)
+592 ;;=^358.31IA^4^2
+593 ;;^UTILITY(U,$J,358.3,7163,1,3,0)
+594 ;;=3^DM Type 1 w/ Mod NPDR w/o Macula Edema,Left Eye
+595 ;;^UTILITY(U,$J,358.3,7163,1,4,0)
+596 ;;=4^E10.3392
+597 ;;^UTILITY(U,$J,358.3,7163,2)
+598 ;;=^5138292
+599 ;;^UTILITY(U,$J,358.3,7164,0)
+600 ;;=E10.3491^^40^379^24
+601 ;;^UTILITY(U,$J,358.3,7164,1,0)
+602 ;;=^358.31IA^4^2
+603 ;;^UTILITY(U,$J,358.3,7164,1,3,0)
+604 ;;=3^DM Type 1 w/ Severe NPDR w/o Macula Edema,Right Eye
+605 ;;^UTILITY(U,$J,358.3,7164,1,4,0)
+606 ;;=4^E10.3491
+607 ;;^UTILITY(U,$J,358.3,7164,2)
+608 ;;=^5138299
+609 ;;^UTILITY(U,$J,358.3,7165,0)
+610 ;;=E10.3492^^40^379^29
+611 ;;^UTILITY(U,$J,358.3,7165,1,0)
+612 ;;=^358.31IA^4^2
+613 ;;^UTILITY(U,$J,358.3,7165,1,3,0)
+614 ;;=3^DM Type 1 w/ Severe NPDR w/o Macula Edema,Left Eye
+615 ;;^UTILITY(U,$J,358.3,7165,1,4,0)
+616 ;;=4^E10.3492
+617 ;;^UTILITY(U,$J,358.3,7165,2)
+618 ;;=^5138300
+619 ;;^UTILITY(U,$J,358.3,7166,0)
+620 ;;=E10.3511^^40^379^25
+621 ;;^UTILITY(U,$J,358.3,7166,1,0)
+622 ;;=^358.31IA^4^2
+623 ;;^UTILITY(U,$J,358.3,7166,1,3,0)
+624 ;;=3^DM Type 1 w/ PDR w/ Macula Edema,Right Eye
+625 ;;^UTILITY(U,$J,358.3,7166,1,4,0)
+626 ;;=4^E10.3511
+627 ;;^UTILITY(U,$J,358.3,7166,2)
+628 ;;=^5138303
+629 ;;^UTILITY(U,$J,358.3,7167,0)
+630 ;;=E10.3512^^40^379^30
+631 ;;^UTILITY(U,$J,358.3,7167,1,0)
+632 ;;=^358.31IA^4^2
+633 ;;^UTILITY(U,$J,358.3,7167,1,3,0)
+634 ;;=3^DM Type 1 w/ PDR w/ Macula Edema,Left Eye
+635 ;;^UTILITY(U,$J,358.3,7167,1,4,0)
+636 ;;=4^E10.3512
+637 ;;^UTILITY(U,$J,358.3,7167,2)
+638 ;;=^5138304
+639 ;;^UTILITY(U,$J,358.3,7168,0)
+640 ;;=E10.3591^^40^379^26
+641 ;;^UTILITY(U,$J,358.3,7168,1,0)
+642 ;;=^358.31IA^4^2
+643 ;;^UTILITY(U,$J,358.3,7168,1,3,0)
+644 ;;=3^DM Type 1 w/ PDR w/o Macula Edema,Right Eye
+645 ;;^UTILITY(U,$J,358.3,7168,1,4,0)
+646 ;;=4^E10.3591
+647 ;;^UTILITY(U,$J,358.3,7168,2)
+648 ;;=^5138323
+649 ;;^UTILITY(U,$J,358.3,7169,0)
+650 ;;=E10.3592^^40^379^31
+651 ;;^UTILITY(U,$J,358.3,7169,1,0)
+652 ;;=^358.31IA^4^2
+653 ;;^UTILITY(U,$J,358.3,7169,1,3,0)
+654 ;;=3^DM Type 1 w/ PDR w/o Macula Edema,Left Eye
+655 ;;^UTILITY(U,$J,358.3,7169,1,4,0)
+656 ;;=4^E10.3592
+657 ;;^UTILITY(U,$J,358.3,7169,2)
+658 ;;=^5138324
+659 ;;^UTILITY(U,$J,358.3,7170,0)
+660 ;;=E11.3211^^40^379^4
+661 ;;^UTILITY(U,$J,358.3,7170,1,0)
+662 ;;=^358.31IA^4^2
+663 ;;^UTILITY(U,$J,358.3,7170,1,3,0)
+664 ;;=3^DM Type 2 w/ Mild NPDR w/ Macula Edema,Right Eye
+665 ;;^UTILITY(U,$J,358.3,7170,1,4,0)
+666 ;;=4^E11.3211
+667 ;;^UTILITY(U,$J,358.3,7170,2)
+668 ;;=^5138331
+669 ;;^UTILITY(U,$J,358.3,7171,0)
+670 ;;=E11.3212^^40^379^12
+671 ;;^UTILITY(U,$J,358.3,7171,1,0)
+672 ;;=^358.31IA^4^2
+673 ;;^UTILITY(U,$J,358.3,7171,1,3,0)
+674 ;;=3^DM Type 2 w/ Mild NPDR w/ Macula Edema,Left Eye
+675 ;;^UTILITY(U,$J,358.3,7171,1,4,0)
+676 ;;=4^E11.3212
