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

IBDEI0AQ.m

Go to the documentation of this file.
IBDEI0AQ ; ; 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,26273,2)
 ;;=^5005551
 ;;^UTILITY(U,$J,358.3,26274,0)
 ;;=H33.001^^81^1050^6
 ;;^UTILITY(U,$J,358.3,26274,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,26274,1,3,0)
 ;;=3^Retinal Break w/ Retinal Detach,Right Eye
 ;;^UTILITY(U,$J,358.3,26274,1,4,0)
 ;;=4^H33.001
 ;;^UTILITY(U,$J,358.3,26274,2)
 ;;=^5005490
 ;;^UTILITY(U,$J,358.3,26275,0)
 ;;=H33.002^^81^1050^7
 ;;^UTILITY(U,$J,358.3,26275,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,26275,1,3,0)
 ;;=3^Retinal Break w/ Retinal Detach,Left Eye
 ;;^UTILITY(U,$J,358.3,26275,1,4,0)
 ;;=4^H33.002
 ;;^UTILITY(U,$J,358.3,26275,2)
 ;;=^5005491
 ;;^UTILITY(U,$J,358.3,26276,0)
 ;;=H33.311^^81^1050^8
 ;;^UTILITY(U,$J,358.3,26276,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,26276,1,3,0)
 ;;=3^Horseshoe Retinal Tear w/o Detach,Right Eye
 ;;^UTILITY(U,$J,358.3,26276,1,4,0)
 ;;=4^H33.311
 ;;^UTILITY(U,$J,358.3,26276,2)
 ;;=^5005535
 ;;^UTILITY(U,$J,358.3,26277,0)
 ;;=H33.312^^81^1050^9
 ;;^UTILITY(U,$J,358.3,26277,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,26277,1,3,0)
 ;;=3^Horseshoe Retinal Tear w/o Detach,Left Eye
 ;;^UTILITY(U,$J,358.3,26277,1,4,0)
 ;;=4^H33.312
 ;;^UTILITY(U,$J,358.3,26277,2)
 ;;=^5005536
 ;;^UTILITY(U,$J,358.3,26278,0)
 ;;=H33.031^^81^1050^10
 ;;^UTILITY(U,$J,358.3,26278,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,26278,1,3,0)
 ;;=3^Giant Retinal Tear w/ Detach,Right Eye
 ;;^UTILITY(U,$J,358.3,26278,1,4,0)
 ;;=4^H33.031
 ;;^UTILITY(U,$J,358.3,26278,2)
 ;;=^5005501
 ;;^UTILITY(U,$J,358.3,26279,0)
 ;;=H33.032^^81^1050^11
 ;;^UTILITY(U,$J,358.3,26279,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,26279,1,3,0)
 ;;=3^Giant Retinal Tear w/ Detach,Left Eye
 ;;^UTILITY(U,$J,358.3,26279,1,4,0)
 ;;=4^H33.032
 ;;^UTILITY(U,$J,358.3,26279,2)
 ;;=^5005502
 ;;^UTILITY(U,$J,358.3,26280,0)
 ;;=H33.051^^81^1050^12
 ;;^UTILITY(U,$J,358.3,26280,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,26280,1,3,0)
 ;;=3^Total Retinal Detach,Right Eye
 ;;^UTILITY(U,$J,358.3,26280,1,4,0)
 ;;=4^H33.051
 ;;^UTILITY(U,$J,358.3,26280,2)
 ;;=^5005509
 ;;^UTILITY(U,$J,358.3,26281,0)
 ;;=H33.052^^81^1050^13
 ;;^UTILITY(U,$J,358.3,26281,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,26281,1,3,0)
 ;;=3^Total Retinal Detach,Left Eye
 ;;^UTILITY(U,$J,358.3,26281,1,4,0)
 ;;=4^H33.052
 ;;^UTILITY(U,$J,358.3,26281,2)
 ;;=^5005510
 ;;^UTILITY(U,$J,358.3,26282,0)
 ;;=H43.11^^81^1050^14
 ;;^UTILITY(U,$J,358.3,26282,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,26282,1,3,0)
 ;;=3^Vitreous Hemorrhage,Right Eye
 ;;^UTILITY(U,$J,358.3,26282,1,4,0)
 ;;=4^H43.11
 ;;^UTILITY(U,$J,358.3,26282,2)
 ;;=^5005938
 ;;^UTILITY(U,$J,358.3,26283,0)
 ;;=H43.12^^81^1050^15
 ;;^UTILITY(U,$J,358.3,26283,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,26283,1,3,0)
 ;;=3^Vitreous Hemorrhage,Left Eye
 ;;^UTILITY(U,$J,358.3,26283,1,4,0)
 ;;=4^H43.12
 ;;^UTILITY(U,$J,358.3,26283,2)
 ;;=^5005939
 ;;^UTILITY(U,$J,358.3,26284,0)
 ;;=H35.431^^81^1050^16
 ;;^UTILITY(U,$J,358.3,26284,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,26284,1,3,0)
 ;;=3^Paving Stone Degen,Right Eye
 ;;^UTILITY(U,$J,358.3,26284,1,4,0)
 ;;=4^H35.431
 ;;^UTILITY(U,$J,358.3,26284,2)
 ;;=^5005679
 ;;^UTILITY(U,$J,358.3,26285,0)
 ;;=H35.432^^81^1050^17
 ;;^UTILITY(U,$J,358.3,26285,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,26285,1,3,0)
 ;;=3^Paving Stone Degen,Left Eye
 ;;^UTILITY(U,$J,358.3,26285,1,4,0)
 ;;=4^H35.432
 ;;^UTILITY(U,$J,358.3,26285,2)
 ;;=^5005680
 ;;^UTILITY(U,$J,358.3,26286,0)
 ;;=H35.411^^81^1050^18
 ;;^UTILITY(U,$J,358.3,26286,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,26286,1,3,0)
 ;;=3^Lattice Degeneration,Right Eye
 ;;^UTILITY(U,$J,358.3,26286,1,4,0)
 ;;=4^H35.411
 ;;^UTILITY(U,$J,358.3,26286,2)
 ;;=^5005671
 ;;^UTILITY(U,$J,358.3,26287,0)
 ;;=H35.412^^81^1050^19
 ;;^UTILITY(U,$J,358.3,26287,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,26287,1,3,0)
 ;;=3^Lattice Degeneration,Left Eye
 ;;^UTILITY(U,$J,358.3,26287,1,4,0)
 ;;=4^H35.412
 ;;^UTILITY(U,$J,358.3,26287,2)
 ;;=^5005672
 ;;^UTILITY(U,$J,358.3,26288,0)
 ;;=H35.413^^81^1050^20
 ;;^UTILITY(U,$J,358.3,26288,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,26288,1,3,0)
 ;;=3^Lattice Degeneration,Bilateral
 ;;^UTILITY(U,$J,358.3,26288,1,4,0)
 ;;=4^H35.413
 ;;^UTILITY(U,$J,358.3,26288,2)
 ;;=^5005673
 ;;^UTILITY(U,$J,358.3,26289,0)
 ;;=H35.52^^81^1050^21
 ;;^UTILITY(U,$J,358.3,26289,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,26289,1,3,0)
 ;;=3^Retinal Pigmentary Dystrophy
 ;;^UTILITY(U,$J,358.3,26289,1,4,0)
 ;;=4^H35.52
 ;;^UTILITY(U,$J,358.3,26289,2)
 ;;=^5005697
 ;;^UTILITY(U,$J,358.3,26290,0)
 ;;=H35.50^^81^1050^22
 ;;^UTILITY(U,$J,358.3,26290,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,26290,1,3,0)
 ;;=3^Retinal Dystrophy,Hereditary,Unspec
 ;;^UTILITY(U,$J,358.3,26290,1,4,0)
 ;;=4^H35.50
 ;;^UTILITY(U,$J,358.3,26290,2)
 ;;=^5005695
 ;;^UTILITY(U,$J,358.3,26291,0)
 ;;=H35.363^^81^1051^29
 ;;^UTILITY(U,$J,358.3,26291,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,26291,1,3,0)
 ;;=3^Drusen of Macula,Bilateral
 ;;^UTILITY(U,$J,358.3,26291,1,4,0)
 ;;=4^H35.363
 ;;^UTILITY(U,$J,358.3,26291,2)
 ;;=^5005660
 ;;^UTILITY(U,$J,358.3,26292,0)
 ;;=H35.731^^81^1051^42
 ;;^UTILITY(U,$J,358.3,26292,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,26292,1,3,0)
 ;;=3^Hemorrhagic Detachment of RPE,Right Eye
 ;;^UTILITY(U,$J,358.3,26292,1,4,0)
 ;;=4^H35.731
 ;;^UTILITY(U,$J,358.3,26292,2)
 ;;=^5005711
 ;;^UTILITY(U,$J,358.3,26293,0)
 ;;=H35.732^^81^1051^43
 ;;^UTILITY(U,$J,358.3,26293,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,26293,1,3,0)
 ;;=3^Hemorrhagic Detachment of RPE,Left Eye
 ;;^UTILITY(U,$J,358.3,26293,1,4,0)
 ;;=4^H35.732
 ;;^UTILITY(U,$J,358.3,26293,2)
 ;;=^5005712
 ;;^UTILITY(U,$J,358.3,26294,0)
 ;;=H35.721^^81^1051^44
 ;;^UTILITY(U,$J,358.3,26294,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,26294,1,3,0)
 ;;=3^Serous Detachment of RPE,Right Eye
 ;;^UTILITY(U,$J,358.3,26294,1,4,0)
 ;;=4^H35.721
 ;;^UTILITY(U,$J,358.3,26294,2)
 ;;=^5005707
 ;;^UTILITY(U,$J,358.3,26295,0)
 ;;=H35.722^^81^1051^45
 ;;^UTILITY(U,$J,358.3,26295,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,26295,1,3,0)
 ;;=3^Serous Detachment of RPE,Left Eye
 ;;^UTILITY(U,$J,358.3,26295,1,4,0)
 ;;=4^H35.722
 ;;^UTILITY(U,$J,358.3,26295,2)
 ;;=^5005708
 ;;^UTILITY(U,$J,358.3,26296,0)
 ;;=H59.031^^81^1051^30
 ;;^UTILITY(U,$J,358.3,26296,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,26296,1,3,0)
 ;;=3^CME after Cataract Surgery,Right Eye
 ;;^UTILITY(U,$J,358.3,26296,1,4,0)
 ;;=4^H59.031
 ;;^UTILITY(U,$J,358.3,26296,2)
 ;;=^5006393
 ;;^UTILITY(U,$J,358.3,26297,0)
 ;;=H59.032^^81^1051^31
 ;;^UTILITY(U,$J,358.3,26297,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,26297,1,3,0)
 ;;=3^CME after Cataract Surgery,Left Eye
 ;;^UTILITY(U,$J,358.3,26297,1,4,0)
 ;;=4^H59.032
 ;;^UTILITY(U,$J,358.3,26297,2)
 ;;=^5006394
 ;;^UTILITY(U,$J,358.3,26298,0)
 ;;=H35.81^^81^1051^32
 ;;^UTILITY(U,$J,358.3,26298,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,26298,1,3,0)
 ;;=3^Retinal Edema/CME Other Etiology
 ;;^UTILITY(U,$J,358.3,26298,1,4,0)
 ;;=4^H35.81
 ;;^UTILITY(U,$J,358.3,26298,2)
 ;;=^5005715
 ;;^UTILITY(U,$J,358.3,26299,0)
 ;;=H35.371^^81^1051^33
 ;;^UTILITY(U,$J,358.3,26299,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,26299,1,3,0)
 ;;=3^Macular Pucker/ERM,Right Eye
 ;;^UTILITY(U,$J,358.3,26299,1,4,0)
 ;;=4^H35.371
 ;;^UTILITY(U,$J,358.3,26299,2)
 ;;=^5005662
 ;;^UTILITY(U,$J,358.3,26300,0)
 ;;=H35.372^^81^1051^34
 ;;^UTILITY(U,$J,358.3,26300,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,26300,1,3,0)
 ;;=3^Macular Pucker/ERM,Left Eye
 ;;^UTILITY(U,$J,358.3,26300,1,4,0)
 ;;=4^H35.372
 ;;^UTILITY(U,$J,358.3,26300,2)
 ;;=^5005663
 ;;^UTILITY(U,$J,358.3,26301,0)
 ;;=H35.373^^81^1051^35
 ;;^UTILITY(U,$J,358.3,26301,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,26301,1,3,0)
 ;;=3^Macular Pucker/ERM,Bilateral
 ;;^UTILITY(U,$J,358.3,26301,1,4,0)
 ;;=4^H35.373
 ;;^UTILITY(U,$J,358.3,26301,2)
 ;;=^5005664
 ;;^UTILITY(U,$J,358.3,26302,0)
 ;;=H35.341^^81^1051^36
 ;;^UTILITY(U,$J,358.3,26302,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,26302,1,3,0)
 ;;=3^Macular Hole/Cyst/Pseudohole,Right Eye
 ;;^UTILITY(U,$J,358.3,26302,1,4,0)
 ;;=4^H35.341
 ;;^UTILITY(U,$J,358.3,26302,2)
 ;;=^5005650
 ;;^UTILITY(U,$J,358.3,26303,0)
 ;;=H35.342^^81^1051^37
 ;;^UTILITY(U,$J,358.3,26303,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,26303,1,3,0)
 ;;=3^Macular Hole/Cyst/Pseudohole,Left Eye
 ;;^UTILITY(U,$J,358.3,26303,1,4,0)
 ;;=4^H35.342
 ;;^UTILITY(U,$J,358.3,26303,2)
 ;;=^5005651
 ;;^UTILITY(U,$J,358.3,26304,0)
 ;;=H43.821^^81^1051^38
 ;;^UTILITY(U,$J,358.3,26304,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,26304,1,3,0)
 ;;=3^Vitreomacular Adhesion,Right Eye
 ;;^UTILITY(U,$J,358.3,26304,1,4,0)
 ;;=4^H43.821
 ;;^UTILITY(U,$J,358.3,26304,2)
 ;;=^5005957
 ;;^UTILITY(U,$J,358.3,26305,0)
 ;;=H43.822^^81^1051^39
 ;;^UTILITY(U,$J,358.3,26305,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,26305,1,3,0)
 ;;=3^Vitreomacular Adhesion,Left Eye
 ;;^UTILITY(U,$J,358.3,26305,1,4,0)
 ;;=4^H43.822
 ;;^UTILITY(U,$J,358.3,26305,2)
 ;;=^5005958
 ;;^UTILITY(U,$J,358.3,26306,0)
 ;;=H35.711^^81^1051^40
 ;;^UTILITY(U,$J,358.3,26306,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,26306,1,3,0)
 ;;=3^Central Serous Retinopathy,Right Eye
 ;;^UTILITY(U,$J,358.3,26306,1,4,0)
 ;;=4^H35.711
 ;;^UTILITY(U,$J,358.3,26306,2)
 ;;=^5005703
 ;;^UTILITY(U,$J,358.3,26307,0)
 ;;=H35.712^^81^1051^41
 ;;^UTILITY(U,$J,358.3,26307,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,26307,1,3,0)
 ;;=3^Central Serous Retinopathy,Left Eye
 ;;^UTILITY(U,$J,358.3,26307,1,4,0)
 ;;=4^H35.712
 ;;^UTILITY(U,$J,358.3,26307,2)
 ;;=^5005704
 ;;^UTILITY(U,$J,358.3,26308,0)
 ;;=H35.383^^81^1051^46
 ;;^UTILITY(U,$J,358.3,26308,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,26308,1,3,0)
 ;;=3^Toxic Maculopathy,Bilateral
 ;;^UTILITY(U,$J,358.3,26308,1,4,0)
 ;;=4^H35.383
 ;;^UTILITY(U,$J,358.3,26308,2)
 ;;=^5005668
 ;;^UTILITY(U,$J,358.3,26309,0)
 ;;=H31.021^^81^1051^48
 ;;^UTILITY(U,$J,358.3,26309,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,26309,1,3,0)
 ;;=3^Solar Retinopathy,Right Eye
 ;;^UTILITY(U,$J,358.3,26309,1,4,0)
 ;;=4^H31.021
 ;;^UTILITY(U,$J,358.3,26309,2)
 ;;=^5005443
 ;;^UTILITY(U,$J,358.3,26310,0)
 ;;=H31.022^^81^1051^49
 ;;^UTILITY(U,$J,358.3,26310,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,26310,1,3,0)
 ;;=3^Solar Retinopathy,Left Eye
 ;;^UTILITY(U,$J,358.3,26310,1,4,0)
 ;;=4^H31.022
 ;;^UTILITY(U,$J,358.3,26310,2)
 ;;=^5005444
 ;;^UTILITY(U,$J,358.3,26311,0)
 ;;=H44.23^^81^1051^50
 ;;^UTILITY(U,$J,358.3,26311,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,26311,1,3,0)
 ;;=3^Degenerative Myopia,Bilateral
 ;;^UTILITY(U,$J,358.3,26311,1,4,0)
 ;;=4^H44.23
 ;;^UTILITY(U,$J,358.3,26311,2)
 ;;=^5005989
 ;;^UTILITY(U,$J,358.3,26312,0)
 ;;=H31.011^^81^1051^55
 ;;^UTILITY(U,$J,358.3,26312,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,26312,1,3,0)
 ;;=3^Macula Scars of Posterior Pole,Right Eye
 ;;^UTILITY(U,$J,358.3,26312,1,4,0)
 ;;=4^H31.011
 ;;^UTILITY(U,$J,358.3,26312,2)
 ;;=^5005439
 ;;^UTILITY(U,$J,358.3,26313,0)
 ;;=H31.012^^81^1051^57
 ;;^UTILITY(U,$J,358.3,26313,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,26313,1,3,0)
 ;;=3^Macula Scars of Posterior Pole,Left Eye
 ;;^UTILITY(U,$J,358.3,26313,1,4,0)
 ;;=4^H31.012
 ;;^UTILITY(U,$J,358.3,26313,2)
 ;;=^5005440
 ;;^UTILITY(U,$J,358.3,26314,0)
 ;;=H35.50^^81^1051^58
 ;;^UTILITY(U,$J,358.3,26314,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,26314,1,3,0)
 ;;=3^Retinal Dystrophy,Hereditary,Unspec
 ;;^UTILITY(U,$J,358.3,26314,1,4,0)
 ;;=4^H35.50
 ;;^UTILITY(U,$J,358.3,26314,2)
 ;;=^5005695
 ;;^UTILITY(U,$J,358.3,26315,0)
 ;;=H35.3110^^81^1051^1
 ;;^UTILITY(U,$J,358.3,26315,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,26315,1,3,0)
 ;;=3^Non-Exudative ARMD,Right Eye (Unspec Stage)
 ;;^UTILITY(U,$J,358.3,26315,1,4,0)
 ;;=4^H35.3110
 ;;^UTILITY(U,$J,358.3,26315,2)
 ;;=^5138500
 ;;^UTILITY(U,$J,358.3,26316,0)
 ;;=H35.3120^^81^1051^6
 ;;^UTILITY(U,$J,358.3,26316,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,26316,1,3,0)
 ;;=3^Non-Exudative ARMD,Left Eye (Unspec Stage)
 ;;^UTILITY(U,$J,358.3,26316,1,4,0)
 ;;=4^H35.3120
 ;;^UTILITY(U,$J,358.3,26316,2)
 ;;=^5138505
 ;;^UTILITY(U,$J,358.3,26317,0)
 ;;=H35.3210^^81^1051^16
 ;;^UTILITY(U,$J,358.3,26317,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,26317,1,3,0)
 ;;=3^Exudative ARMD,Right Eye (Unspec Stage)
 ;;^UTILITY(U,$J,358.3,26317,1,4,0)
 ;;=4^H35.3210
 ;;^UTILITY(U,$J,358.3,26317,2)
 ;;=^5138520
 ;;^UTILITY(U,$J,358.3,26318,0)
 ;;=H35.3220^^81^1051^20
 ;;^UTILITY(U,$J,358.3,26318,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,26318,1,3,0)
 ;;=3^Exudative ARMD,Left Eye (Unspec Stage)
 ;;^UTILITY(U,$J,358.3,26318,1,4,0)
 ;;=4^H35.3220
 ;;^UTILITY(U,$J,358.3,26318,2)
 ;;=^5138524
 ;;^UTILITY(U,$J,358.3,26319,0)
 ;;=H35.3131^^81^1051^12
 ;;^UTILITY(U,$J,358.3,26319,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,26319,1,3,0)
 ;;=3^Non-Exudative ARMD,Bilateral,Early Dry Stage
 ;;^UTILITY(U,$J,358.3,26319,1,4,0)
 ;;=4^H35.3131
 ;;^UTILITY(U,$J,358.3,26319,2)
 ;;=^5138511
 ;;^UTILITY(U,$J,358.3,26320,0)
 ;;=H35.3130^^81^1051^11
 ;;^UTILITY(U,$J,358.3,26320,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,26320,1,3,0)
 ;;=3^Non-Exudative ARMD,Bilateral (Unspec Stage)
 ;;^UTILITY(U,$J,358.3,26320,1,4,0)
 ;;=4^H35.3130
 ;;^UTILITY(U,$J,358.3,26320,2)
 ;;=^5138510
 ;;^UTILITY(U,$J,358.3,26321,0)
 ;;=H44.2A1^^81^1051^51
 ;;^UTILITY(U,$J,358.3,26321,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,26321,1,3,0)
 ;;=3^Degenerative Myopia w/ CNV,Right Eye
 ;;^UTILITY(U,$J,358.3,26321,1,4,0)
 ;;=4^H44.2A1
 ;;^UTILITY(U,$J,358.3,26321,2)
 ;;=^5151318
 ;;^UTILITY(U,$J,358.3,26322,0)
 ;;=H44.2A2^^81^1051^52
 ;;^UTILITY(U,$J,358.3,26322,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,26322,1,3,0)
 ;;=3^Degenerative Myopia w/ CNV,Left Eye
 ;;^UTILITY(U,$J,358.3,26322,1,4,0)
 ;;=4^H44.2A2
 ;;^UTILITY(U,$J,358.3,26322,2)
 ;;=^5151319
 ;;^UTILITY(U,$J,358.3,26323,0)
 ;;=H44.2A3^^81^1051^53
 ;;^UTILITY(U,$J,358.3,26323,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,26323,1,3,0)
 ;;=3^Degenerative Myopia w/ CNV,Bilateral
 ;;^UTILITY(U,$J,358.3,26323,1,4,0)
 ;;=4^H44.2A3
 ;;^UTILITY(U,$J,358.3,26323,2)
 ;;=^5151320
 ;;^UTILITY(U,$J,358.3,26324,0)
 ;;=H44.2B1^^81^1051^54
 ;;^UTILITY(U,$J,358.3,26324,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,26324,1,3,0)
 ;;=3^Degenerative Myopia w/ Mac Hole,Right Eye
 ;;^UTILITY(U,$J,358.3,26324,1,4,0)
 ;;=4^H44.2B1
 ;;^UTILITY(U,$J,358.3,26324,2)
 ;;=^5151322
 ;;^UTILITY(U,$J,358.3,26325,0)
 ;;=H44.2B2^^81^1051^56
 ;;^UTILITY(U,$J,358.3,26325,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,26325,1,3,0)
 ;;=3^Degenerative Myopia w/ Mac Hole,Left Eye
 ;;^UTILITY(U,$J,358.3,26325,1,4,0)
 ;;=4^H44.2B2
 ;;^UTILITY(U,$J,358.3,26325,2)
 ;;=^5151323
 ;;^UTILITY(U,$J,358.3,26326,0)
 ;;=H35.3133^^81^1051^14
 ;;^UTILITY(U,$J,358.3,26326,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,26326,1,3,0)
 ;;=3^Non-Exudative ARMD,Bilateral,Adv Atrpc w/o Sbfvl Invlv
 ;;^UTILITY(U,$J,358.3,26326,1,4,0)
 ;;=4^H35.3133
 ;;^UTILITY(U,$J,358.3,26326,2)
 ;;=^5138513
 ;;^UTILITY(U,$J,358.3,26327,0)
 ;;=H35.3132^^81^1051^13
 ;;^UTILITY(U,$J,358.3,26327,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,26327,1,3,0)
 ;;=3^Non-Exudative ARMD,Bilateral,Intermed Dry Stage
 ;;^UTILITY(U,$J,358.3,26327,1,4,0)
 ;;=4^H35.3132
 ;;^UTILITY(U,$J,358.3,26327,2)
 ;;=^5138512
 ;;^UTILITY(U,$J,358.3,26328,0)
 ;;=H35.3291^^81^1051^25
 ;;^UTILITY(U,$J,358.3,26328,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,26328,1,3,0)
 ;;=3^Exudative ARMD, w/ Active CNVM, Unspec Eye
 ;;^UTILITY(U,$J,358.3,26328,1,4,0)
 ;;=4^H35.3291
 ;;^UTILITY(U,$J,358.3,26328,2)
 ;;=^5138533
 ;;^UTILITY(U,$J,358.3,26329,0)
 ;;=H35.3292^^81^1051^24
 ;;^UTILITY(U,$J,358.3,26329,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,26329,1,3,0)
 ;;=3^Exudative ARMD, w/ Inactive CNVM, Unspec Eye
 ;;^UTILITY(U,$J,358.3,26329,1,4,0)
 ;;=4^H35.3292
 ;;^UTILITY(U,$J,358.3,26329,2)
 ;;=^5138534
 ;;^UTILITY(U,$J,358.3,26330,0)
 ;;=H35.3293^^81^1051^26
 ;;^UTILITY(U,$J,358.3,26330,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,26330,1,3,0)
 ;;=3^Exudative ARMD, w/ Inactive Scar, Unspec Eye
 ;;^UTILITY(U,$J,358.3,26330,1,4,0)
 ;;=4^H35.3293
 ;;^UTILITY(U,$J,358.3,26330,2)
 ;;=^5138535
 ;;^UTILITY(U,$J,358.3,26331,0)
 ;;=Z79.899^^81^1051^47
 ;;^UTILITY(U,$J,358.3,26331,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,26331,1,3,0)
 ;;=3^Plaquenil/Long Term Med Screening
 ;;^UTILITY(U,$J,358.3,26331,1,4,0)
 ;;=4^Z79.899
 ;;^UTILITY(U,$J,358.3,26331,2)
 ;;=^5063343
 ;;^UTILITY(U,$J,358.3,26332,0)
 ;;=H35.3111^^81^1051^2
 ;;^UTILITY(U,$J,358.3,26332,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,26332,1,3,0)
 ;;=3^Non-Exudative ARMD,Right Eye,Early Dry Stage
 ;;^UTILITY(U,$J,358.3,26332,1,4,0)
 ;;=4^H35.3111
 ;;^UTILITY(U,$J,358.3,26332,2)
 ;;=^5138501
 ;;^UTILITY(U,$J,358.3,26333,0)
 ;;=H35.3112^^81^1051^3
 ;;^UTILITY(U,$J,358.3,26333,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,26333,1,3,0)
 ;;=3^Non-Exudative ARMD,Right Eye,Intermed Dry Stage
 ;;^UTILITY(U,$J,358.3,26333,1,4,0)
 ;;=4^H35.3112
 ;;^UTILITY(U,$J,358.3,26333,2)
 ;;=^5138502
 ;;^UTILITY(U,$J,358.3,26334,0)
 ;;=H35.3113^^81^1051^4
 ;;^UTILITY(U,$J,358.3,26334,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,26334,1,3,0)
 ;;=3^Non-Exudative ARMD,Right Eye,Adv Atrpc w/o Sbfvl Invlv
 ;;^UTILITY(U,$J,358.3,26334,1,4,0)
 ;;=4^H35.3113
 ;;^UTILITY(U,$J,358.3,26334,2)
 ;;=^5138503
 ;;^UTILITY(U,$J,358.3,26335,0)
 ;;=H35.3114^^81^1051^5
 ;;^UTILITY(U,$J,358.3,26335,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,26335,1,3,0)
 ;;=3^Non-Exudative ARMD,Right Eye,Adv Atrpc w/ Sbfvl Invlv
 ;;^UTILITY(U,$J,358.3,26335,1,4,0)
 ;;=4^H35.3114
 ;;^UTILITY(U,$J,358.3,26335,2)
 ;;=^5138504
 ;;^UTILITY(U,$J,358.3,26336,0)
 ;;=H35.3121^^81^1051^7
 ;;^UTILITY(U,$J,358.3,26336,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,26336,1,3,0)
 ;;=3^Non-Exudative ARMD,Left Eye,Early Dry Stage
 ;;^UTILITY(U,$J,358.3,26336,1,4,0)
 ;;=4^H35.3121
 ;;^UTILITY(U,$J,358.3,26336,2)
 ;;=^5138506
 ;;^UTILITY(U,$J,358.3,26337,0)
 ;;=H35.3124^^81^1051^10
 ;;^UTILITY(U,$J,358.3,26337,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,26337,1,3,0)
 ;;=3^Non-Exudative ARMD,Left Eye,Adv Atrpc w/ Sbfvl Invlv
 ;;^UTILITY(U,$J,358.3,26337,1,4,0)
 ;;=4^H35.3124
 ;;^UTILITY(U,$J,358.3,26337,2)
 ;;=^5138509
 ;;^UTILITY(U,$J,358.3,26338,0)
 ;;=H35.3122^^81^1051^8
 ;;^UTILITY(U,$J,358.3,26338,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,26338,1,3,0)
 ;;=3^Non-Exudative ARMD,Left Eye,Intermed Dry Stage
 ;;^UTILITY(U,$J,358.3,26338,1,4,0)
 ;;=4^H35.3122
 ;;^UTILITY(U,$J,358.3,26338,2)
 ;;=^5138507
 ;;^UTILITY(U,$J,358.3,26339,0)
 ;;=H35.3123^^81^1051^9
 ;;^UTILITY(U,$J,358.3,26339,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,26339,1,3,0)
 ;;=3^Non-Exudative ARMD,Left Eye,Adv Atrpc w/o Sbfvl Invlv
 ;;^UTILITY(U,$J,358.3,26339,1,4,0)
 ;;=4^H35.3123
 ;;^UTILITY(U,$J,358.3,26339,2)
 ;;=^5138508
 ;;^UTILITY(U,$J,358.3,26340,0)
 ;;=H35.3134^^81^1051^15
 ;;^UTILITY(U,$J,358.3,26340,1,0)
 ;;=^358.31IA^4^2