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

IBDEI02L.m

Go to the documentation of this file.
IBDEI02L ; ; 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,6033,1,4,0)
 ;;=4^H40.43X3
 ;;^UTILITY(U,$J,358.3,6033,2)
 ;;=^5005881
 ;;^UTILITY(U,$J,358.3,6034,0)
 ;;=H40.51X3^^37^321^34
 ;;^UTILITY(U,$J,358.3,6034,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,6034,1,3,0)
 ;;=3^Glaucoma d/t Eye Disorder,Severe,Right Eye
 ;;^UTILITY(U,$J,358.3,6034,1,4,0)
 ;;=4^H40.51X3
 ;;^UTILITY(U,$J,358.3,6034,2)
 ;;=^5133507
 ;;^UTILITY(U,$J,358.3,6035,0)
 ;;=H40.52X3^^37^321^35
 ;;^UTILITY(U,$J,358.3,6035,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,6035,1,3,0)
 ;;=3^Glaucoma d/t Eye Disorder,Severe,Left Eye
 ;;^UTILITY(U,$J,358.3,6035,1,4,0)
 ;;=4^H40.52X3
 ;;^UTILITY(U,$J,358.3,6035,2)
 ;;=^5133508
 ;;^UTILITY(U,$J,358.3,6036,0)
 ;;=H40.31X4^^37^321^36
 ;;^UTILITY(U,$J,358.3,6036,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,6036,1,3,0)
 ;;=3^Glaucoma Secondary to Eye Trauma,Right Eye,Indeterminate Stage
 ;;^UTILITY(U,$J,358.3,6036,1,4,0)
 ;;=4^H40.31X4
 ;;^UTILITY(U,$J,358.3,6036,2)
 ;;=^5005855
 ;;^UTILITY(U,$J,358.3,6037,0)
 ;;=H40.32X4^^37^321^37
 ;;^UTILITY(U,$J,358.3,6037,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,6037,1,3,0)
 ;;=3^Glaucoma Secondary to Eye Trauma,Left Eye,Indeterminate Stage
 ;;^UTILITY(U,$J,358.3,6037,1,4,0)
 ;;=4^H40.32X4
 ;;^UTILITY(U,$J,358.3,6037,2)
 ;;=^5005859
 ;;^UTILITY(U,$J,358.3,6038,0)
 ;;=H40.1423^^37^321^15
 ;;^UTILITY(U,$J,358.3,6038,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,6038,1,3,0)
 ;;=3^Pseudoexf Glaucoma,Severe,Left Eye
 ;;^UTILITY(U,$J,358.3,6038,1,4,0)
 ;;=4^H40.1423
 ;;^UTILITY(U,$J,358.3,6038,2)
 ;;=^5138025
 ;;^UTILITY(U,$J,358.3,6039,0)
 ;;=H40.1422^^37^321^14
 ;;^UTILITY(U,$J,358.3,6039,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,6039,1,3,0)
 ;;=3^Pseudoexf Glaucoma,Moderate,Left Eye
 ;;^UTILITY(U,$J,358.3,6039,1,4,0)
 ;;=4^H40.1422
 ;;^UTILITY(U,$J,358.3,6039,2)
 ;;=^5138024
 ;;^UTILITY(U,$J,358.3,6040,0)
 ;;=H40.1412^^37^321^11
 ;;^UTILITY(U,$J,358.3,6040,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,6040,1,3,0)
 ;;=3^Pseudoexf Glaucoma,Moderate,Right Eye
 ;;^UTILITY(U,$J,358.3,6040,1,4,0)
 ;;=4^H40.1412
 ;;^UTILITY(U,$J,358.3,6040,2)
 ;;=^5138019
 ;;^UTILITY(U,$J,358.3,6041,0)
 ;;=H40.1432^^37^321^17
 ;;^UTILITY(U,$J,358.3,6041,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,6041,1,3,0)
 ;;=3^Pseudoexf Glaucoma,Moderate,Bilateral
 ;;^UTILITY(U,$J,358.3,6041,1,4,0)
 ;;=4^H40.1432
 ;;^UTILITY(U,$J,358.3,6041,2)
 ;;=^5138029
 ;;^UTILITY(U,$J,358.3,6042,0)
 ;;=H40.1312^^37^321^2
 ;;^UTILITY(U,$J,358.3,6042,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,6042,1,3,0)
 ;;=3^Pigmentary Glaucoma,Moderate,Right Eye
 ;;^UTILITY(U,$J,358.3,6042,1,4,0)
 ;;=4^H40.1312
 ;;^UTILITY(U,$J,358.3,6042,2)
 ;;=^5005777
 ;;^UTILITY(U,$J,358.3,6043,0)
 ;;=H40.1322^^37^321^5
 ;;^UTILITY(U,$J,358.3,6043,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,6043,1,3,0)
 ;;=3^Pigmentary Glaucoma,Moderate,Left Eye
 ;;^UTILITY(U,$J,358.3,6043,1,4,0)
 ;;=4^H40.1322
 ;;^UTILITY(U,$J,358.3,6043,2)
 ;;=^5005782
 ;;^UTILITY(U,$J,358.3,6044,0)
 ;;=H40.1332^^37^321^8
 ;;^UTILITY(U,$J,358.3,6044,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,6044,1,3,0)
 ;;=3^Pigmentary Glaucoma,Moderate,Bilateral
 ;;^UTILITY(U,$J,358.3,6044,1,4,0)
 ;;=4^H40.1332
 ;;^UTILITY(U,$J,358.3,6044,2)
 ;;=^5005786
 ;;^UTILITY(U,$J,358.3,6045,0)
 ;;=H31.421^^37^322^5
 ;;^UTILITY(U,$J,358.3,6045,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,6045,1,3,0)
 ;;=3^Serous Choroidal Detachment,Right Eye
 ;;^UTILITY(U,$J,358.3,6045,1,4,0)
 ;;=4^H31.421
 ;;^UTILITY(U,$J,358.3,6045,2)
 ;;=^5005483
 ;;^UTILITY(U,$J,358.3,6046,0)
 ;;=H31.422^^37^322^6
 ;;^UTILITY(U,$J,358.3,6046,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,6046,1,3,0)
 ;;=3^Serous Choroidal Detachment,Left Eye
 ;;^UTILITY(U,$J,358.3,6046,1,4,0)
 ;;=4^H31.422
 ;;^UTILITY(U,$J,358.3,6046,2)
 ;;=^5005484
 ;;^UTILITY(U,$J,358.3,6047,0)
 ;;=H31.401^^37^322^7
 ;;^UTILITY(U,$J,358.3,6047,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,6047,1,3,0)
 ;;=3^Choroidal Detachment,Unspec,Right Eye
 ;;^UTILITY(U,$J,358.3,6047,1,4,0)
 ;;=4^H31.401
 ;;^UTILITY(U,$J,358.3,6047,2)
 ;;=^5005476
 ;;^UTILITY(U,$J,358.3,6048,0)
 ;;=H31.402^^37^322^8
 ;;^UTILITY(U,$J,358.3,6048,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,6048,1,3,0)
 ;;=3^Choroidal Detachment,Unspec,Left Eye
 ;;^UTILITY(U,$J,358.3,6048,1,4,0)
 ;;=4^H31.402
 ;;^UTILITY(U,$J,358.3,6048,2)
 ;;=^5005477
 ;;^UTILITY(U,$J,358.3,6049,0)
 ;;=H31.321^^37^322^9
 ;;^UTILITY(U,$J,358.3,6049,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,6049,1,3,0)
 ;;=3^Choroidal Rupture,Right Eye
 ;;^UTILITY(U,$J,358.3,6049,1,4,0)
 ;;=4^H31.321
 ;;^UTILITY(U,$J,358.3,6049,2)
 ;;=^5005472
 ;;^UTILITY(U,$J,358.3,6050,0)
 ;;=H31.322^^37^322^10
 ;;^UTILITY(U,$J,358.3,6050,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,6050,1,3,0)
 ;;=3^Choroidal Rupture,Left Eye
 ;;^UTILITY(U,$J,358.3,6050,1,4,0)
 ;;=4^H31.322
 ;;^UTILITY(U,$J,358.3,6050,2)
 ;;=^5005473
 ;;^UTILITY(U,$J,358.3,6051,0)
 ;;=D31.31^^37^322^1
 ;;^UTILITY(U,$J,358.3,6051,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,6051,1,3,0)
 ;;=3^Benign Neop/Nevus Choroid,Right Eye
 ;;^UTILITY(U,$J,358.3,6051,1,4,0)
 ;;=4^D31.31
 ;;^UTILITY(U,$J,358.3,6051,2)
 ;;=^5002121
 ;;^UTILITY(U,$J,358.3,6052,0)
 ;;=D31.32^^37^322^2
 ;;^UTILITY(U,$J,358.3,6052,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,6052,1,3,0)
 ;;=3^Benign Neop/Nevus Choroid,Left Eye
 ;;^UTILITY(U,$J,358.3,6052,1,4,0)
 ;;=4^D31.32
 ;;^UTILITY(U,$J,358.3,6052,2)
 ;;=^5002122
 ;;^UTILITY(U,$J,358.3,6053,0)
 ;;=C69.31^^37^322^3
 ;;^UTILITY(U,$J,358.3,6053,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,6053,1,3,0)
 ;;=3^Malig Neop/Melanoma Choroid,Right Eye
 ;;^UTILITY(U,$J,358.3,6053,1,4,0)
 ;;=4^C69.31
 ;;^UTILITY(U,$J,358.3,6053,2)
 ;;=^5001276
 ;;^UTILITY(U,$J,358.3,6054,0)
 ;;=C69.32^^37^322^4
 ;;^UTILITY(U,$J,358.3,6054,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,6054,1,3,0)
 ;;=3^Malig Neop/Melanoma Choroid,Left Eye
 ;;^UTILITY(U,$J,358.3,6054,1,4,0)
 ;;=4^C69.32
 ;;^UTILITY(U,$J,358.3,6054,2)
 ;;=^5001277
 ;;^UTILITY(U,$J,358.3,6055,0)
 ;;=B25.9^^37^322^11
 ;;^UTILITY(U,$J,358.3,6055,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,6055,1,3,0)
 ;;=3^Cytomegaloviral Disease,Unspec
 ;;^UTILITY(U,$J,358.3,6055,1,4,0)
 ;;=4^B25.9
 ;;^UTILITY(U,$J,358.3,6055,2)
 ;;=^5000560
 ;;^UTILITY(U,$J,358.3,6056,0)
 ;;=B39.9^^37^322^12
 ;;^UTILITY(U,$J,358.3,6056,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,6056,1,3,0)
 ;;=3^Histoplasmosis,Unspec
 ;;^UTILITY(U,$J,358.3,6056,1,4,0)
 ;;=4^B39.9
 ;;^UTILITY(U,$J,358.3,6056,2)
 ;;=^5000638
 ;;^UTILITY(U,$J,358.3,6057,0)
 ;;=B58.01^^37^322^13
 ;;^UTILITY(U,$J,358.3,6057,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,6057,1,3,0)
 ;;=3^Toxoplasma Chorioretinitis
 ;;^UTILITY(U,$J,358.3,6057,1,4,0)
 ;;=4^B58.01
 ;;^UTILITY(U,$J,358.3,6057,2)
 ;;=^5000724
 ;;^UTILITY(U,$J,358.3,6058,0)
 ;;=H30.91^^37^322^14
 ;;^UTILITY(U,$J,358.3,6058,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,6058,1,3,0)
 ;;=3^Chorioretinal Inflammation,Right Eye
 ;;^UTILITY(U,$J,358.3,6058,1,4,0)
 ;;=4^H30.91
 ;;^UTILITY(U,$J,358.3,6058,2)
 ;;=^5133481
 ;;^UTILITY(U,$J,358.3,6059,0)
 ;;=H30.92^^37^322^15
 ;;^UTILITY(U,$J,358.3,6059,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,6059,1,3,0)
 ;;=3^Chorioretinal Inflammation,Left Eye
 ;;^UTILITY(U,$J,358.3,6059,1,4,0)
 ;;=4^H30.92
 ;;^UTILITY(U,$J,358.3,6059,2)
 ;;=^5133482
 ;;^UTILITY(U,$J,358.3,6060,0)
 ;;=H30.93^^37^322^16
 ;;^UTILITY(U,$J,358.3,6060,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,6060,1,3,0)
 ;;=3^Chorioretinal Inflammation,Bilateral
 ;;^UTILITY(U,$J,358.3,6060,1,4,0)
 ;;=4^H30.93
 ;;^UTILITY(U,$J,358.3,6060,2)
 ;;=^5005435
 ;;^UTILITY(U,$J,358.3,6061,0)
 ;;=H32.^^37^322^17
 ;;^UTILITY(U,$J,358.3,6061,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,6061,1,3,0)
 ;;=3^Chorioretinal Disorders,Secondary,Unspec
 ;;^UTILITY(U,$J,358.3,6061,1,4,0)
 ;;=4^H32.
 ;;^UTILITY(U,$J,358.3,6061,2)
 ;;=^5005489
 ;;^UTILITY(U,$J,358.3,6062,0)
 ;;=H31.001^^37^322^18
 ;;^UTILITY(U,$J,358.3,6062,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,6062,1,3,0)
 ;;=3^Chorioretinal Scars,Right Eye
 ;;^UTILITY(U,$J,358.3,6062,1,4,0)
 ;;=4^H31.001
 ;;^UTILITY(U,$J,358.3,6062,2)
 ;;=^5005436
 ;;^UTILITY(U,$J,358.3,6063,0)
 ;;=H31.002^^37^322^19
 ;;^UTILITY(U,$J,358.3,6063,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,6063,1,3,0)
 ;;=3^Chorioretinal Scars,Left Eye
 ;;^UTILITY(U,$J,358.3,6063,1,4,0)
 ;;=4^H31.002
 ;;^UTILITY(U,$J,358.3,6063,2)
 ;;=^5005437
 ;;^UTILITY(U,$J,358.3,6064,0)
 ;;=H31.003^^37^322^20
 ;;^UTILITY(U,$J,358.3,6064,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,6064,1,3,0)
 ;;=3^Chorioretinal Scars,Bilateral
 ;;^UTILITY(U,$J,358.3,6064,1,4,0)
 ;;=4^H31.003
 ;;^UTILITY(U,$J,358.3,6064,2)
 ;;=^5005438
 ;;^UTILITY(U,$J,358.3,6065,0)
 ;;=H33.321^^37^323^1
 ;;^UTILITY(U,$J,358.3,6065,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,6065,1,3,0)
 ;;=3^Round Hole,Right Eye
 ;;^UTILITY(U,$J,358.3,6065,1,4,0)
 ;;=4^H33.321
 ;;^UTILITY(U,$J,358.3,6065,2)
 ;;=^5005539
 ;;^UTILITY(U,$J,358.3,6066,0)
 ;;=H33.322^^37^323^2
 ;;^UTILITY(U,$J,358.3,6066,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,6066,1,3,0)
 ;;=3^Round Hole,Left Eye
 ;;^UTILITY(U,$J,358.3,6066,1,4,0)
 ;;=4^H33.322
 ;;^UTILITY(U,$J,358.3,6066,2)
 ;;=^5005540
 ;;^UTILITY(U,$J,358.3,6067,0)
 ;;=H33.101^^37^323^3
 ;;^UTILITY(U,$J,358.3,6067,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,6067,1,3,0)
 ;;=3^Retinoschisis,Right Eye
 ;;^UTILITY(U,$J,358.3,6067,1,4,0)
 ;;=4^H33.101
 ;;^UTILITY(U,$J,358.3,6067,2)
 ;;=^5005513
 ;;^UTILITY(U,$J,358.3,6068,0)
 ;;=H33.102^^37^323^4
 ;;^UTILITY(U,$J,358.3,6068,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,6068,1,3,0)
 ;;=3^Retinoschisis,Left Eye
 ;;^UTILITY(U,$J,358.3,6068,1,4,0)
 ;;=4^H33.102
 ;;^UTILITY(U,$J,358.3,6068,2)
 ;;=^5005514
 ;;^UTILITY(U,$J,358.3,6069,0)
 ;;=H33.8^^37^323^5
 ;;^UTILITY(U,$J,358.3,6069,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,6069,1,3,0)
 ;;=3^Retina Detachments NEC
 ;;^UTILITY(U,$J,358.3,6069,1,4,0)
 ;;=4^H33.8
 ;;^UTILITY(U,$J,358.3,6069,2)
 ;;=^5005551
 ;;^UTILITY(U,$J,358.3,6070,0)
 ;;=H33.001^^37^323^6
 ;;^UTILITY(U,$J,358.3,6070,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,6070,1,3,0)
 ;;=3^Retinal Break w/ Retinal Detach,Right Eye
 ;;^UTILITY(U,$J,358.3,6070,1,4,0)
 ;;=4^H33.001
 ;;^UTILITY(U,$J,358.3,6070,2)
 ;;=^5005490
 ;;^UTILITY(U,$J,358.3,6071,0)
 ;;=H33.002^^37^323^7
 ;;^UTILITY(U,$J,358.3,6071,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,6071,1,3,0)
 ;;=3^Retinal Break w/ Retinal Detach,Left Eye
 ;;^UTILITY(U,$J,358.3,6071,1,4,0)
 ;;=4^H33.002
 ;;^UTILITY(U,$J,358.3,6071,2)
 ;;=^5005491
 ;;^UTILITY(U,$J,358.3,6072,0)
 ;;=H33.311^^37^323^8
 ;;^UTILITY(U,$J,358.3,6072,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,6072,1,3,0)
 ;;=3^Horseshoe Retinal Tear w/o Detach,Right Eye
 ;;^UTILITY(U,$J,358.3,6072,1,4,0)
 ;;=4^H33.311
 ;;^UTILITY(U,$J,358.3,6072,2)
 ;;=^5005535
 ;;^UTILITY(U,$J,358.3,6073,0)
 ;;=H33.312^^37^323^9
 ;;^UTILITY(U,$J,358.3,6073,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,6073,1,3,0)
 ;;=3^Horseshoe Retinal Tear w/o Detach,Left Eye
 ;;^UTILITY(U,$J,358.3,6073,1,4,0)
 ;;=4^H33.312
 ;;^UTILITY(U,$J,358.3,6073,2)
 ;;=^5005536
 ;;^UTILITY(U,$J,358.3,6074,0)
 ;;=H33.031^^37^323^10
 ;;^UTILITY(U,$J,358.3,6074,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,6074,1,3,0)
 ;;=3^Giant Retinal Tear w/ Detach,Right Eye
 ;;^UTILITY(U,$J,358.3,6074,1,4,0)
 ;;=4^H33.031
 ;;^UTILITY(U,$J,358.3,6074,2)
 ;;=^5005501
 ;;^UTILITY(U,$J,358.3,6075,0)
 ;;=H33.032^^37^323^11
 ;;^UTILITY(U,$J,358.3,6075,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,6075,1,3,0)
 ;;=3^Giant Retinal Tear w/ Detach,Left Eye
 ;;^UTILITY(U,$J,358.3,6075,1,4,0)
 ;;=4^H33.032
 ;;^UTILITY(U,$J,358.3,6075,2)
 ;;=^5005502
 ;;^UTILITY(U,$J,358.3,6076,0)
 ;;=H33.051^^37^323^12
 ;;^UTILITY(U,$J,358.3,6076,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,6076,1,3,0)
 ;;=3^Total Retinal Detach,Right Eye
 ;;^UTILITY(U,$J,358.3,6076,1,4,0)
 ;;=4^H33.051
 ;;^UTILITY(U,$J,358.3,6076,2)
 ;;=^5005509
 ;;^UTILITY(U,$J,358.3,6077,0)
 ;;=H33.052^^37^323^13
 ;;^UTILITY(U,$J,358.3,6077,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,6077,1,3,0)
 ;;=3^Total Retinal Detach,Left Eye
 ;;^UTILITY(U,$J,358.3,6077,1,4,0)
 ;;=4^H33.052
 ;;^UTILITY(U,$J,358.3,6077,2)
 ;;=^5005510
 ;;^UTILITY(U,$J,358.3,6078,0)
 ;;=H43.11^^37^323^14
 ;;^UTILITY(U,$J,358.3,6078,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,6078,1,3,0)
 ;;=3^Vitreous Hemorrhage,Right Eye
 ;;^UTILITY(U,$J,358.3,6078,1,4,0)
 ;;=4^H43.11
 ;;^UTILITY(U,$J,358.3,6078,2)
 ;;=^5005938
 ;;^UTILITY(U,$J,358.3,6079,0)
 ;;=H43.12^^37^323^15
 ;;^UTILITY(U,$J,358.3,6079,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,6079,1,3,0)
 ;;=3^Vitreous Hemorrhage,Left Eye
 ;;^UTILITY(U,$J,358.3,6079,1,4,0)
 ;;=4^H43.12
 ;;^UTILITY(U,$J,358.3,6079,2)
 ;;=^5005939
 ;;^UTILITY(U,$J,358.3,6080,0)
 ;;=H35.431^^37^323^16
 ;;^UTILITY(U,$J,358.3,6080,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,6080,1,3,0)
 ;;=3^Paving Stone Degen,Right Eye
 ;;^UTILITY(U,$J,358.3,6080,1,4,0)
 ;;=4^H35.431
 ;;^UTILITY(U,$J,358.3,6080,2)
 ;;=^5005679
 ;;^UTILITY(U,$J,358.3,6081,0)
 ;;=H35.432^^37^323^17
 ;;^UTILITY(U,$J,358.3,6081,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,6081,1,3,0)
 ;;=3^Paving Stone Degen,Left Eye
 ;;^UTILITY(U,$J,358.3,6081,1,4,0)
 ;;=4^H35.432
 ;;^UTILITY(U,$J,358.3,6081,2)
 ;;=^5005680
 ;;^UTILITY(U,$J,358.3,6082,0)
 ;;=H35.411^^37^323^18
 ;;^UTILITY(U,$J,358.3,6082,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,6082,1,3,0)
 ;;=3^Lattice Degeneration,Right Eye
 ;;^UTILITY(U,$J,358.3,6082,1,4,0)
 ;;=4^H35.411
 ;;^UTILITY(U,$J,358.3,6082,2)
 ;;=^5005671
 ;;^UTILITY(U,$J,358.3,6083,0)
 ;;=H35.412^^37^323^19
 ;;^UTILITY(U,$J,358.3,6083,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,6083,1,3,0)
 ;;=3^Lattice Degeneration,Left Eye
 ;;^UTILITY(U,$J,358.3,6083,1,4,0)
 ;;=4^H35.412
 ;;^UTILITY(U,$J,358.3,6083,2)
 ;;=^5005672
 ;;^UTILITY(U,$J,358.3,6084,0)
 ;;=H35.413^^37^323^20
 ;;^UTILITY(U,$J,358.3,6084,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,6084,1,3,0)
 ;;=3^Lattice Degeneration,Bilateral
 ;;^UTILITY(U,$J,358.3,6084,1,4,0)
 ;;=4^H35.413
 ;;^UTILITY(U,$J,358.3,6084,2)
 ;;=^5005673
 ;;^UTILITY(U,$J,358.3,6085,0)
 ;;=H35.52^^37^323^21
 ;;^UTILITY(U,$J,358.3,6085,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,6085,1,3,0)
 ;;=3^Retinal Pigmentary Dystrophy
 ;;^UTILITY(U,$J,358.3,6085,1,4,0)
 ;;=4^H35.52
 ;;^UTILITY(U,$J,358.3,6085,2)
 ;;=^5005697
 ;;^UTILITY(U,$J,358.3,6086,0)
 ;;=H35.50^^37^323^22
 ;;^UTILITY(U,$J,358.3,6086,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,6086,1,3,0)
 ;;=3^Retinal Dystrophy,Hereditary,Unspec
 ;;^UTILITY(U,$J,358.3,6086,1,4,0)
 ;;=4^H35.50
 ;;^UTILITY(U,$J,358.3,6086,2)
 ;;=^5005695
 ;;^UTILITY(U,$J,358.3,6087,0)
 ;;=H35.363^^37^324^29
 ;;^UTILITY(U,$J,358.3,6087,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,6087,1,3,0)
 ;;=3^Drusen of Macula,Bilateral
 ;;^UTILITY(U,$J,358.3,6087,1,4,0)
 ;;=4^H35.363
 ;;^UTILITY(U,$J,358.3,6087,2)
 ;;=^5005660
 ;;^UTILITY(U,$J,358.3,6088,0)
 ;;=H35.731^^37^324^42
 ;;^UTILITY(U,$J,358.3,6088,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,6088,1,3,0)
 ;;=3^Hemorrhagic Detachment of RPE,Right Eye
 ;;^UTILITY(U,$J,358.3,6088,1,4,0)
 ;;=4^H35.731
 ;;^UTILITY(U,$J,358.3,6088,2)
 ;;=^5005711
 ;;^UTILITY(U,$J,358.3,6089,0)
 ;;=H35.732^^37^324^43
 ;;^UTILITY(U,$J,358.3,6089,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,6089,1,3,0)
 ;;=3^Hemorrhagic Detachment of RPE,Left Eye
 ;;^UTILITY(U,$J,358.3,6089,1,4,0)
 ;;=4^H35.732
 ;;^UTILITY(U,$J,358.3,6089,2)
 ;;=^5005712
 ;;^UTILITY(U,$J,358.3,6090,0)
 ;;=H35.721^^37^324^44
 ;;^UTILITY(U,$J,358.3,6090,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,6090,1,3,0)
 ;;=3^Serous Detachment of RPE,Right Eye
 ;;^UTILITY(U,$J,358.3,6090,1,4,0)
 ;;=4^H35.721
 ;;^UTILITY(U,$J,358.3,6090,2)
 ;;=^5005707
 ;;^UTILITY(U,$J,358.3,6091,0)
 ;;=H35.722^^37^324^45
 ;;^UTILITY(U,$J,358.3,6091,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,6091,1,3,0)
 ;;=3^Serous Detachment of RPE,Left Eye
 ;;^UTILITY(U,$J,358.3,6091,1,4,0)
 ;;=4^H35.722
 ;;^UTILITY(U,$J,358.3,6091,2)
 ;;=^5005708
 ;;^UTILITY(U,$J,358.3,6092,0)
 ;;=H59.031^^37^324^30
 ;;^UTILITY(U,$J,358.3,6092,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,6092,1,3,0)
 ;;=3^CME after Cataract Surgery,Right Eye
 ;;^UTILITY(U,$J,358.3,6092,1,4,0)
 ;;=4^H59.031
 ;;^UTILITY(U,$J,358.3,6092,2)
 ;;=^5006393
 ;;^UTILITY(U,$J,358.3,6093,0)
 ;;=H59.032^^37^324^31
 ;;^UTILITY(U,$J,358.3,6093,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,6093,1,3,0)
 ;;=3^CME after Cataract Surgery,Left Eye
 ;;^UTILITY(U,$J,358.3,6093,1,4,0)
 ;;=4^H59.032
 ;;^UTILITY(U,$J,358.3,6093,2)
 ;;=^5006394
 ;;^UTILITY(U,$J,358.3,6094,0)
 ;;=H35.81^^37^324^32
 ;;^UTILITY(U,$J,358.3,6094,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,6094,1,3,0)
 ;;=3^Retinal Edema/CME Other Etiology
 ;;^UTILITY(U,$J,358.3,6094,1,4,0)
 ;;=4^H35.81
 ;;^UTILITY(U,$J,358.3,6094,2)
 ;;=^5005715
 ;;^UTILITY(U,$J,358.3,6095,0)
 ;;=H35.371^^37^324^33
 ;;^UTILITY(U,$J,358.3,6095,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,6095,1,3,0)
 ;;=3^Macular Pucker/ERM,Right Eye
 ;;^UTILITY(U,$J,358.3,6095,1,4,0)
 ;;=4^H35.371
 ;;^UTILITY(U,$J,358.3,6095,2)
 ;;=^5005662
 ;;^UTILITY(U,$J,358.3,6096,0)
 ;;=H35.372^^37^324^34
 ;;^UTILITY(U,$J,358.3,6096,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,6096,1,3,0)
 ;;=3^Macular Pucker/ERM,Left Eye
 ;;^UTILITY(U,$J,358.3,6096,1,4,0)
 ;;=4^H35.372
 ;;^UTILITY(U,$J,358.3,6096,2)
 ;;=^5005663
 ;;^UTILITY(U,$J,358.3,6097,0)
 ;;=H35.373^^37^324^35
 ;;^UTILITY(U,$J,358.3,6097,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,6097,1,3,0)
 ;;=3^Macular Pucker/ERM,Bilateral
 ;;^UTILITY(U,$J,358.3,6097,1,4,0)
 ;;=4^H35.373
 ;;^UTILITY(U,$J,358.3,6097,2)
 ;;=^5005664
 ;;^UTILITY(U,$J,358.3,6098,0)
 ;;=H35.341^^37^324^36
 ;;^UTILITY(U,$J,358.3,6098,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,6098,1,3,0)
 ;;=3^Macular Hole/Cyst/Pseudohole,Right Eye
 ;;^UTILITY(U,$J,358.3,6098,1,4,0)
 ;;=4^H35.341
 ;;^UTILITY(U,$J,358.3,6098,2)
 ;;=^5005650
 ;;^UTILITY(U,$J,358.3,6099,0)
 ;;=H35.342^^37^324^37
 ;;^UTILITY(U,$J,358.3,6099,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,6099,1,3,0)
 ;;=3^Macular Hole/Cyst/Pseudohole,Left Eye
 ;;^UTILITY(U,$J,358.3,6099,1,4,0)
 ;;=4^H35.342
 ;;^UTILITY(U,$J,358.3,6099,2)
 ;;=^5005651
 ;;^UTILITY(U,$J,358.3,6100,0)
 ;;=H43.821^^37^324^38
 ;;^UTILITY(U,$J,358.3,6100,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,6100,1,3,0)
 ;;=3^Vitreomacular Adhesion,Right Eye
 ;;^UTILITY(U,$J,358.3,6100,1,4,0)
 ;;=4^H43.821
 ;;^UTILITY(U,$J,358.3,6100,2)
 ;;=^5005957
 ;;^UTILITY(U,$J,358.3,6101,0)
 ;;=H43.822^^37^324^39
 ;;^UTILITY(U,$J,358.3,6101,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,6101,1,3,0)
 ;;=3^Vitreomacular Adhesion,Left Eye
 ;;^UTILITY(U,$J,358.3,6101,1,4,0)
 ;;=4^H43.822
 ;;^UTILITY(U,$J,358.3,6101,2)
 ;;=^5005958
 ;;^UTILITY(U,$J,358.3,6102,0)
 ;;=H35.711^^37^324^40
 ;;^UTILITY(U,$J,358.3,6102,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,6102,1,3,0)
 ;;=3^Central Serous Retinopathy,Right Eye