IBDEI0AP ; ; 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,26206,1,4,0)
;;=4^H40.2213
;;^UTILITY(U,$J,358.3,26206,2)
;;=^5005825
;;^UTILITY(U,$J,358.3,26207,0)
;;=H40.2223^^81^1047^14
;;^UTILITY(U,$J,358.3,26207,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26207,1,3,0)
;;=3^Angle-Closure Glaucoma,Chronic,Severe,Left Eye
;;^UTILITY(U,$J,358.3,26207,1,4,0)
;;=4^H40.2223
;;^UTILITY(U,$J,358.3,26207,2)
;;=^5133501
;;^UTILITY(U,$J,358.3,26208,0)
;;=H40.2233^^81^1047^15
;;^UTILITY(U,$J,358.3,26208,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26208,1,3,0)
;;=3^Angle-Closure Glaucoma,Chronic,Severe,Bilateral
;;^UTILITY(U,$J,358.3,26208,1,4,0)
;;=4^H40.2233
;;^UTILITY(U,$J,358.3,26208,2)
;;=^5005834
;;^UTILITY(U,$J,358.3,26209,0)
;;=H40.831^^81^1047^16
;;^UTILITY(U,$J,358.3,26209,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26209,1,3,0)
;;=3^Aqueous Misdirection,Right Eye
;;^UTILITY(U,$J,358.3,26209,1,4,0)
;;=4^H40.831
;;^UTILITY(U,$J,358.3,26209,2)
;;=^5005927
;;^UTILITY(U,$J,358.3,26210,0)
;;=H40.832^^81^1047^17
;;^UTILITY(U,$J,358.3,26210,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26210,1,3,0)
;;=3^Aqueous Misdirection,Left Eye
;;^UTILITY(U,$J,358.3,26210,1,4,0)
;;=4^H40.832
;;^UTILITY(U,$J,358.3,26210,2)
;;=^5005928
;;^UTILITY(U,$J,358.3,26211,0)
;;=Z83.511^^81^1047^18
;;^UTILITY(U,$J,358.3,26211,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26211,1,3,0)
;;=3^Family Hx of Glaucoma
;;^UTILITY(U,$J,358.3,26211,1,4,0)
;;=4^Z83.511
;;^UTILITY(U,$J,358.3,26211,2)
;;=^5063382
;;^UTILITY(U,$J,358.3,26212,0)
;;=H40.1311^^81^1048^1
;;^UTILITY(U,$J,358.3,26212,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26212,1,3,0)
;;=3^Pigmentary Glaucoma,Mild,Right Eye
;;^UTILITY(U,$J,358.3,26212,1,4,0)
;;=4^H40.1311
;;^UTILITY(U,$J,358.3,26212,2)
;;=^5005776
;;^UTILITY(U,$J,358.3,26213,0)
;;=H40.1321^^81^1048^4
;;^UTILITY(U,$J,358.3,26213,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26213,1,3,0)
;;=3^Pigmentary Glaucoma,Mild,Left Eye
;;^UTILITY(U,$J,358.3,26213,1,4,0)
;;=4^H40.1321
;;^UTILITY(U,$J,358.3,26213,2)
;;=^5005781
;;^UTILITY(U,$J,358.3,26214,0)
;;=H40.1331^^81^1048^7
;;^UTILITY(U,$J,358.3,26214,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26214,1,3,0)
;;=3^Pigmentary Glaucoma,Mild,Bilateral
;;^UTILITY(U,$J,358.3,26214,1,4,0)
;;=4^H40.1331
;;^UTILITY(U,$J,358.3,26214,2)
;;=^5005785
;;^UTILITY(U,$J,358.3,26215,0)
;;=H40.1313^^81^1048^3
;;^UTILITY(U,$J,358.3,26215,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26215,1,3,0)
;;=3^Pigmentary Glaucoma,Severe,Right Eye
;;^UTILITY(U,$J,358.3,26215,1,4,0)
;;=4^H40.1313
;;^UTILITY(U,$J,358.3,26215,2)
;;=^5005778
;;^UTILITY(U,$J,358.3,26216,0)
;;=H40.1323^^81^1048^6
;;^UTILITY(U,$J,358.3,26216,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26216,1,3,0)
;;=3^Pigmentary Glaucoma,Severe,Left Eye
;;^UTILITY(U,$J,358.3,26216,1,4,0)
;;=4^H40.1323
;;^UTILITY(U,$J,358.3,26216,2)
;;=^5133495
;;^UTILITY(U,$J,358.3,26217,0)
;;=H40.1333^^81^1048^9
;;^UTILITY(U,$J,358.3,26217,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26217,1,3,0)
;;=3^Pigmentary Glaucoma,Severe,Bilateral
;;^UTILITY(U,$J,358.3,26217,1,4,0)
;;=4^H40.1333
;;^UTILITY(U,$J,358.3,26217,2)
;;=^5005787
;;^UTILITY(U,$J,358.3,26218,0)
;;=H40.1411^^81^1048^10
;;^UTILITY(U,$J,358.3,26218,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26218,1,3,0)
;;=3^Pseudoexf Glaucoma,Mild,Right Eye
;;^UTILITY(U,$J,358.3,26218,1,4,0)
;;=4^H40.1411
;;^UTILITY(U,$J,358.3,26218,2)
;;=^5138018
;;^UTILITY(U,$J,358.3,26219,0)
;;=H40.1421^^81^1048^13
;;^UTILITY(U,$J,358.3,26219,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26219,1,3,0)
;;=3^Pseudoexf Glaucoma,Mild,Left Eye
;;^UTILITY(U,$J,358.3,26219,1,4,0)
;;=4^H40.1421
;;^UTILITY(U,$J,358.3,26219,2)
;;=^5138023
;;^UTILITY(U,$J,358.3,26220,0)
;;=H40.1431^^81^1048^16
;;^UTILITY(U,$J,358.3,26220,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26220,1,3,0)
;;=3^Pseudoexf Glaucoma,Mild,Bilateral
;;^UTILITY(U,$J,358.3,26220,1,4,0)
;;=4^H40.1431
;;^UTILITY(U,$J,358.3,26220,2)
;;=^5138028
;;^UTILITY(U,$J,358.3,26221,0)
;;=H40.1413^^81^1048^12
;;^UTILITY(U,$J,358.3,26221,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26221,1,3,0)
;;=3^Pseudoexf Glaucoma,Severe,Right Eye
;;^UTILITY(U,$J,358.3,26221,1,4,0)
;;=4^H40.1413
;;^UTILITY(U,$J,358.3,26221,2)
;;=^5138020
;;^UTILITY(U,$J,358.3,26222,0)
;;=H40.1433^^81^1048^18
;;^UTILITY(U,$J,358.3,26222,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26222,1,3,0)
;;=3^Pseudoexf Glaucoma,Severe,Bilateral
;;^UTILITY(U,$J,358.3,26222,1,4,0)
;;=4^H40.1433
;;^UTILITY(U,$J,358.3,26222,2)
;;=^5138030
;;^UTILITY(U,$J,358.3,26223,0)
;;=H40.041^^81^1048^19
;;^UTILITY(U,$J,358.3,26223,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26223,1,3,0)
;;=3^Steroid Responsive Glauc,Right Eye
;;^UTILITY(U,$J,358.3,26223,1,4,0)
;;=4^H40.041
;;^UTILITY(U,$J,358.3,26223,2)
;;=^5005736
;;^UTILITY(U,$J,358.3,26224,0)
;;=H40.042^^81^1048^20
;;^UTILITY(U,$J,358.3,26224,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26224,1,3,0)
;;=3^Steroid Responsive Glauc,Left Eye
;;^UTILITY(U,$J,358.3,26224,1,4,0)
;;=4^H40.042
;;^UTILITY(U,$J,358.3,26224,2)
;;=^5005737
;;^UTILITY(U,$J,358.3,26225,0)
;;=H40.043^^81^1048^21
;;^UTILITY(U,$J,358.3,26225,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26225,1,3,0)
;;=3^Steroid Responsive Glauc,Bilateral
;;^UTILITY(U,$J,358.3,26225,1,4,0)
;;=4^H40.043
;;^UTILITY(U,$J,358.3,26225,2)
;;=^5005738
;;^UTILITY(U,$J,358.3,26226,0)
;;=H40.31X1^^81^1048^22
;;^UTILITY(U,$J,358.3,26226,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26226,1,3,0)
;;=3^Glaucoma d/t Trauma,Mild,Right Eye
;;^UTILITY(U,$J,358.3,26226,1,4,0)
;;=4^H40.31X1
;;^UTILITY(U,$J,358.3,26226,2)
;;=^5005853
;;^UTILITY(U,$J,358.3,26227,0)
;;=H40.32X1^^81^1048^23
;;^UTILITY(U,$J,358.3,26227,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26227,1,3,0)
;;=3^Glaucoma d/t Trauma,Mild,Left Eye
;;^UTILITY(U,$J,358.3,26227,1,4,0)
;;=4^H40.32X1
;;^UTILITY(U,$J,358.3,26227,2)
;;=^5005857
;;^UTILITY(U,$J,358.3,26228,0)
;;=H40.33X1^^81^1048^24
;;^UTILITY(U,$J,358.3,26228,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26228,1,3,0)
;;=3^Glaucoma d/t Trauma,Mild,Bilateral
;;^UTILITY(U,$J,358.3,26228,1,4,0)
;;=4^H40.33X1
;;^UTILITY(U,$J,358.3,26228,2)
;;=^5005861
;;^UTILITY(U,$J,358.3,26229,0)
;;=H40.31X3^^81^1048^25
;;^UTILITY(U,$J,358.3,26229,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26229,1,3,0)
;;=3^Glaucoma d/t Trauma,Severe,Right Eye
;;^UTILITY(U,$J,358.3,26229,1,4,0)
;;=4^H40.31X3
;;^UTILITY(U,$J,358.3,26229,2)
;;=^5133503
;;^UTILITY(U,$J,358.3,26230,0)
;;=H40.32X3^^81^1048^26
;;^UTILITY(U,$J,358.3,26230,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26230,1,3,0)
;;=3^Glaucoma d/t Trauma,Severe,Left Eye
;;^UTILITY(U,$J,358.3,26230,1,4,0)
;;=4^H40.32X3
;;^UTILITY(U,$J,358.3,26230,2)
;;=^5133504
;;^UTILITY(U,$J,358.3,26231,0)
;;=H40.33X3^^81^1048^27
;;^UTILITY(U,$J,358.3,26231,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26231,1,3,0)
;;=3^Glaucoma d/t Trauma,Severe,Bilateral
;;^UTILITY(U,$J,358.3,26231,1,4,0)
;;=4^H40.33X3
;;^UTILITY(U,$J,358.3,26231,2)
;;=^5005863
;;^UTILITY(U,$J,358.3,26232,0)
;;=H40.41X1^^81^1048^28
;;^UTILITY(U,$J,358.3,26232,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26232,1,3,0)
;;=3^Glaucoma d/t Uveitis,Mild,Right Eye
;;^UTILITY(U,$J,358.3,26232,1,4,0)
;;=4^H40.41X1
;;^UTILITY(U,$J,358.3,26232,2)
;;=^5005871
;;^UTILITY(U,$J,358.3,26233,0)
;;=H40.42X1^^81^1048^29
;;^UTILITY(U,$J,358.3,26233,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26233,1,3,0)
;;=3^Glaucoma d/t Uveitis,Mild,Left Eye
;;^UTILITY(U,$J,358.3,26233,1,4,0)
;;=4^H40.42X1
;;^UTILITY(U,$J,358.3,26233,2)
;;=^5005875
;;^UTILITY(U,$J,358.3,26234,0)
;;=H40.43X1^^81^1048^30
;;^UTILITY(U,$J,358.3,26234,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26234,1,3,0)
;;=3^Glaucoma d/t Uveitis,Mild,Bilateral
;;^UTILITY(U,$J,358.3,26234,1,4,0)
;;=4^H40.43X1
;;^UTILITY(U,$J,358.3,26234,2)
;;=^5005879
;;^UTILITY(U,$J,358.3,26235,0)
;;=H40.41X3^^81^1048^31
;;^UTILITY(U,$J,358.3,26235,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26235,1,3,0)
;;=3^Glaucoma d/t Uveitis,Severe,Right Eye
;;^UTILITY(U,$J,358.3,26235,1,4,0)
;;=4^H40.41X3
;;^UTILITY(U,$J,358.3,26235,2)
;;=^5133505
;;^UTILITY(U,$J,358.3,26236,0)
;;=H40.42X3^^81^1048^32
;;^UTILITY(U,$J,358.3,26236,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26236,1,3,0)
;;=3^Glaucoma d/t Uveitis,Severe,Left Eye
;;^UTILITY(U,$J,358.3,26236,1,4,0)
;;=4^H40.42X3
;;^UTILITY(U,$J,358.3,26236,2)
;;=^5133506
;;^UTILITY(U,$J,358.3,26237,0)
;;=H40.43X3^^81^1048^33
;;^UTILITY(U,$J,358.3,26237,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26237,1,3,0)
;;=3^Glaucoma d/t Uveitis,Severe,Bilateral
;;^UTILITY(U,$J,358.3,26237,1,4,0)
;;=4^H40.43X3
;;^UTILITY(U,$J,358.3,26237,2)
;;=^5005881
;;^UTILITY(U,$J,358.3,26238,0)
;;=H40.51X3^^81^1048^34
;;^UTILITY(U,$J,358.3,26238,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26238,1,3,0)
;;=3^Glaucoma d/t Eye Disorder,Severe,Right Eye
;;^UTILITY(U,$J,358.3,26238,1,4,0)
;;=4^H40.51X3
;;^UTILITY(U,$J,358.3,26238,2)
;;=^5133507
;;^UTILITY(U,$J,358.3,26239,0)
;;=H40.52X3^^81^1048^35
;;^UTILITY(U,$J,358.3,26239,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26239,1,3,0)
;;=3^Glaucoma d/t Eye Disorder,Severe,Left Eye
;;^UTILITY(U,$J,358.3,26239,1,4,0)
;;=4^H40.52X3
;;^UTILITY(U,$J,358.3,26239,2)
;;=^5133508
;;^UTILITY(U,$J,358.3,26240,0)
;;=H40.31X4^^81^1048^36
;;^UTILITY(U,$J,358.3,26240,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26240,1,3,0)
;;=3^Glaucoma Secondary to Eye Trauma,Right Eye,Indeterminate Stage
;;^UTILITY(U,$J,358.3,26240,1,4,0)
;;=4^H40.31X4
;;^UTILITY(U,$J,358.3,26240,2)
;;=^5005855
;;^UTILITY(U,$J,358.3,26241,0)
;;=H40.32X4^^81^1048^37
;;^UTILITY(U,$J,358.3,26241,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26241,1,3,0)
;;=3^Glaucoma Secondary to Eye Trauma,Left Eye,Indeterminate Stage
;;^UTILITY(U,$J,358.3,26241,1,4,0)
;;=4^H40.32X4
;;^UTILITY(U,$J,358.3,26241,2)
;;=^5005859
;;^UTILITY(U,$J,358.3,26242,0)
;;=H40.1423^^81^1048^15
;;^UTILITY(U,$J,358.3,26242,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26242,1,3,0)
;;=3^Pseudoexf Glaucoma,Severe,Left Eye
;;^UTILITY(U,$J,358.3,26242,1,4,0)
;;=4^H40.1423
;;^UTILITY(U,$J,358.3,26242,2)
;;=^5138025
;;^UTILITY(U,$J,358.3,26243,0)
;;=H40.1422^^81^1048^14
;;^UTILITY(U,$J,358.3,26243,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26243,1,3,0)
;;=3^Pseudoexf Glaucoma,Moderate,Left Eye
;;^UTILITY(U,$J,358.3,26243,1,4,0)
;;=4^H40.1422
;;^UTILITY(U,$J,358.3,26243,2)
;;=^5138024
;;^UTILITY(U,$J,358.3,26244,0)
;;=H40.1412^^81^1048^11
;;^UTILITY(U,$J,358.3,26244,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26244,1,3,0)
;;=3^Pseudoexf Glaucoma,Moderate,Right Eye
;;^UTILITY(U,$J,358.3,26244,1,4,0)
;;=4^H40.1412
;;^UTILITY(U,$J,358.3,26244,2)
;;=^5138019
;;^UTILITY(U,$J,358.3,26245,0)
;;=H40.1432^^81^1048^17
;;^UTILITY(U,$J,358.3,26245,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26245,1,3,0)
;;=3^Pseudoexf Glaucoma,Moderate,Bilateral
;;^UTILITY(U,$J,358.3,26245,1,4,0)
;;=4^H40.1432
;;^UTILITY(U,$J,358.3,26245,2)
;;=^5138029
;;^UTILITY(U,$J,358.3,26246,0)
;;=H40.1312^^81^1048^2
;;^UTILITY(U,$J,358.3,26246,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26246,1,3,0)
;;=3^Pigmentary Glaucoma,Moderate,Right Eye
;;^UTILITY(U,$J,358.3,26246,1,4,0)
;;=4^H40.1312
;;^UTILITY(U,$J,358.3,26246,2)
;;=^5005777
;;^UTILITY(U,$J,358.3,26247,0)
;;=H40.1322^^81^1048^5
;;^UTILITY(U,$J,358.3,26247,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26247,1,3,0)
;;=3^Pigmentary Glaucoma,Moderate,Left Eye
;;^UTILITY(U,$J,358.3,26247,1,4,0)
;;=4^H40.1322
;;^UTILITY(U,$J,358.3,26247,2)
;;=^5005782
;;^UTILITY(U,$J,358.3,26248,0)
;;=H40.1332^^81^1048^8
;;^UTILITY(U,$J,358.3,26248,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26248,1,3,0)
;;=3^Pigmentary Glaucoma,Moderate,Bilateral
;;^UTILITY(U,$J,358.3,26248,1,4,0)
;;=4^H40.1332
;;^UTILITY(U,$J,358.3,26248,2)
;;=^5005786
;;^UTILITY(U,$J,358.3,26249,0)
;;=H31.421^^81^1049^5
;;^UTILITY(U,$J,358.3,26249,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26249,1,3,0)
;;=3^Serous Choroidal Detachment,Right Eye
;;^UTILITY(U,$J,358.3,26249,1,4,0)
;;=4^H31.421
;;^UTILITY(U,$J,358.3,26249,2)
;;=^5005483
;;^UTILITY(U,$J,358.3,26250,0)
;;=H31.422^^81^1049^6
;;^UTILITY(U,$J,358.3,26250,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26250,1,3,0)
;;=3^Serous Choroidal Detachment,Left Eye
;;^UTILITY(U,$J,358.3,26250,1,4,0)
;;=4^H31.422
;;^UTILITY(U,$J,358.3,26250,2)
;;=^5005484
;;^UTILITY(U,$J,358.3,26251,0)
;;=H31.401^^81^1049^7
;;^UTILITY(U,$J,358.3,26251,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26251,1,3,0)
;;=3^Choroidal Detachment,Unspec,Right Eye
;;^UTILITY(U,$J,358.3,26251,1,4,0)
;;=4^H31.401
;;^UTILITY(U,$J,358.3,26251,2)
;;=^5005476
;;^UTILITY(U,$J,358.3,26252,0)
;;=H31.402^^81^1049^8
;;^UTILITY(U,$J,358.3,26252,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26252,1,3,0)
;;=3^Choroidal Detachment,Unspec,Left Eye
;;^UTILITY(U,$J,358.3,26252,1,4,0)
;;=4^H31.402
;;^UTILITY(U,$J,358.3,26252,2)
;;=^5005477
;;^UTILITY(U,$J,358.3,26253,0)
;;=H31.321^^81^1049^9
;;^UTILITY(U,$J,358.3,26253,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26253,1,3,0)
;;=3^Choroidal Rupture,Right Eye
;;^UTILITY(U,$J,358.3,26253,1,4,0)
;;=4^H31.321
;;^UTILITY(U,$J,358.3,26253,2)
;;=^5005472
;;^UTILITY(U,$J,358.3,26254,0)
;;=H31.322^^81^1049^10
;;^UTILITY(U,$J,358.3,26254,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26254,1,3,0)
;;=3^Choroidal Rupture,Left Eye
;;^UTILITY(U,$J,358.3,26254,1,4,0)
;;=4^H31.322
;;^UTILITY(U,$J,358.3,26254,2)
;;=^5005473
;;^UTILITY(U,$J,358.3,26255,0)
;;=D31.31^^81^1049^1
;;^UTILITY(U,$J,358.3,26255,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26255,1,3,0)
;;=3^Benign Neop/Nevus Choroid,Right Eye
;;^UTILITY(U,$J,358.3,26255,1,4,0)
;;=4^D31.31
;;^UTILITY(U,$J,358.3,26255,2)
;;=^5002121
;;^UTILITY(U,$J,358.3,26256,0)
;;=D31.32^^81^1049^2
;;^UTILITY(U,$J,358.3,26256,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26256,1,3,0)
;;=3^Benign Neop/Nevus Choroid,Left Eye
;;^UTILITY(U,$J,358.3,26256,1,4,0)
;;=4^D31.32
;;^UTILITY(U,$J,358.3,26256,2)
;;=^5002122
;;^UTILITY(U,$J,358.3,26257,0)
;;=C69.31^^81^1049^3
;;^UTILITY(U,$J,358.3,26257,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26257,1,3,0)
;;=3^Malig Neop/Melanoma Choroid,Right Eye
;;^UTILITY(U,$J,358.3,26257,1,4,0)
;;=4^C69.31
;;^UTILITY(U,$J,358.3,26257,2)
;;=^5001276
;;^UTILITY(U,$J,358.3,26258,0)
;;=C69.32^^81^1049^4
;;^UTILITY(U,$J,358.3,26258,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26258,1,3,0)
;;=3^Malig Neop/Melanoma Choroid,Left Eye
;;^UTILITY(U,$J,358.3,26258,1,4,0)
;;=4^C69.32
;;^UTILITY(U,$J,358.3,26258,2)
;;=^5001277
;;^UTILITY(U,$J,358.3,26259,0)
;;=B25.9^^81^1049^11
;;^UTILITY(U,$J,358.3,26259,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26259,1,3,0)
;;=3^Cytomegaloviral Disease,Unspec
;;^UTILITY(U,$J,358.3,26259,1,4,0)
;;=4^B25.9
;;^UTILITY(U,$J,358.3,26259,2)
;;=^5000560
;;^UTILITY(U,$J,358.3,26260,0)
;;=B39.9^^81^1049^12
;;^UTILITY(U,$J,358.3,26260,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26260,1,3,0)
;;=3^Histoplasmosis,Unspec
;;^UTILITY(U,$J,358.3,26260,1,4,0)
;;=4^B39.9
;;^UTILITY(U,$J,358.3,26260,2)
;;=^5000638
;;^UTILITY(U,$J,358.3,26261,0)
;;=B58.01^^81^1049^13
;;^UTILITY(U,$J,358.3,26261,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26261,1,3,0)
;;=3^Toxoplasma Chorioretinitis
;;^UTILITY(U,$J,358.3,26261,1,4,0)
;;=4^B58.01
;;^UTILITY(U,$J,358.3,26261,2)
;;=^5000724
;;^UTILITY(U,$J,358.3,26262,0)
;;=H30.91^^81^1049^14
;;^UTILITY(U,$J,358.3,26262,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26262,1,3,0)
;;=3^Chorioretinal Inflammation,Right Eye
;;^UTILITY(U,$J,358.3,26262,1,4,0)
;;=4^H30.91
;;^UTILITY(U,$J,358.3,26262,2)
;;=^5133481
;;^UTILITY(U,$J,358.3,26263,0)
;;=H30.92^^81^1049^15
;;^UTILITY(U,$J,358.3,26263,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26263,1,3,0)
;;=3^Chorioretinal Inflammation,Left Eye
;;^UTILITY(U,$J,358.3,26263,1,4,0)
;;=4^H30.92
;;^UTILITY(U,$J,358.3,26263,2)
;;=^5133482
;;^UTILITY(U,$J,358.3,26264,0)
;;=H30.93^^81^1049^16
;;^UTILITY(U,$J,358.3,26264,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26264,1,3,0)
;;=3^Chorioretinal Inflammation,Bilateral
;;^UTILITY(U,$J,358.3,26264,1,4,0)
;;=4^H30.93
;;^UTILITY(U,$J,358.3,26264,2)
;;=^5005435
;;^UTILITY(U,$J,358.3,26265,0)
;;=H32.^^81^1049^17
;;^UTILITY(U,$J,358.3,26265,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26265,1,3,0)
;;=3^Chorioretinal Disorders,Secondary,Unspec
;;^UTILITY(U,$J,358.3,26265,1,4,0)
;;=4^H32.
;;^UTILITY(U,$J,358.3,26265,2)
;;=^5005489
;;^UTILITY(U,$J,358.3,26266,0)
;;=H31.001^^81^1049^18
;;^UTILITY(U,$J,358.3,26266,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26266,1,3,0)
;;=3^Chorioretinal Scars,Right Eye
;;^UTILITY(U,$J,358.3,26266,1,4,0)
;;=4^H31.001
;;^UTILITY(U,$J,358.3,26266,2)
;;=^5005436
;;^UTILITY(U,$J,358.3,26267,0)
;;=H31.002^^81^1049^19
;;^UTILITY(U,$J,358.3,26267,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26267,1,3,0)
;;=3^Chorioretinal Scars,Left Eye
;;^UTILITY(U,$J,358.3,26267,1,4,0)
;;=4^H31.002
;;^UTILITY(U,$J,358.3,26267,2)
;;=^5005437
;;^UTILITY(U,$J,358.3,26268,0)
;;=H31.003^^81^1049^20
;;^UTILITY(U,$J,358.3,26268,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26268,1,3,0)
;;=3^Chorioretinal Scars,Bilateral
;;^UTILITY(U,$J,358.3,26268,1,4,0)
;;=4^H31.003
;;^UTILITY(U,$J,358.3,26268,2)
;;=^5005438
;;^UTILITY(U,$J,358.3,26269,0)
;;=H33.321^^81^1050^1
;;^UTILITY(U,$J,358.3,26269,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26269,1,3,0)
;;=3^Round Hole,Right Eye
;;^UTILITY(U,$J,358.3,26269,1,4,0)
;;=4^H33.321
;;^UTILITY(U,$J,358.3,26269,2)
;;=^5005539
;;^UTILITY(U,$J,358.3,26270,0)
;;=H33.322^^81^1050^2
;;^UTILITY(U,$J,358.3,26270,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26270,1,3,0)
;;=3^Round Hole,Left Eye
;;^UTILITY(U,$J,358.3,26270,1,4,0)
;;=4^H33.322
;;^UTILITY(U,$J,358.3,26270,2)
;;=^5005540
;;^UTILITY(U,$J,358.3,26271,0)
;;=H33.101^^81^1050^3
;;^UTILITY(U,$J,358.3,26271,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26271,1,3,0)
;;=3^Retinoschisis,Right Eye
;;^UTILITY(U,$J,358.3,26271,1,4,0)
;;=4^H33.101
;;^UTILITY(U,$J,358.3,26271,2)
;;=^5005513
;;^UTILITY(U,$J,358.3,26272,0)
;;=H33.102^^81^1050^4
;;^UTILITY(U,$J,358.3,26272,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26272,1,3,0)
;;=3^Retinoschisis,Left Eye
;;^UTILITY(U,$J,358.3,26272,1,4,0)
;;=4^H33.102
;;^UTILITY(U,$J,358.3,26272,2)
;;=^5005514
;;^UTILITY(U,$J,358.3,26273,0)
;;=H33.8^^81^1050^5
;;^UTILITY(U,$J,358.3,26273,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26273,1,3,0)
;;=3^Retina Detachments NEC
;;^UTILITY(U,$J,358.3,26273,1,4,0)
;;=4^H33.8
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HIBDEI0AP 19768 printed Dec 13, 2024@01:44:58 Page 2
IBDEI0AP ; ; 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,26206,1,4,0)
+2 ;;=4^H40.2213
+3 ;;^UTILITY(U,$J,358.3,26206,2)
+4 ;;=^5005825
+5 ;;^UTILITY(U,$J,358.3,26207,0)
+6 ;;=H40.2223^^81^1047^14
+7 ;;^UTILITY(U,$J,358.3,26207,1,0)
+8 ;;=^358.31IA^4^2
+9 ;;^UTILITY(U,$J,358.3,26207,1,3,0)
+10 ;;=3^Angle-Closure Glaucoma,Chronic,Severe,Left Eye
+11 ;;^UTILITY(U,$J,358.3,26207,1,4,0)
+12 ;;=4^H40.2223
+13 ;;^UTILITY(U,$J,358.3,26207,2)
+14 ;;=^5133501
+15 ;;^UTILITY(U,$J,358.3,26208,0)
+16 ;;=H40.2233^^81^1047^15
+17 ;;^UTILITY(U,$J,358.3,26208,1,0)
+18 ;;=^358.31IA^4^2
+19 ;;^UTILITY(U,$J,358.3,26208,1,3,0)
+20 ;;=3^Angle-Closure Glaucoma,Chronic,Severe,Bilateral
+21 ;;^UTILITY(U,$J,358.3,26208,1,4,0)
+22 ;;=4^H40.2233
+23 ;;^UTILITY(U,$J,358.3,26208,2)
+24 ;;=^5005834
+25 ;;^UTILITY(U,$J,358.3,26209,0)
+26 ;;=H40.831^^81^1047^16
+27 ;;^UTILITY(U,$J,358.3,26209,1,0)
+28 ;;=^358.31IA^4^2
+29 ;;^UTILITY(U,$J,358.3,26209,1,3,0)
+30 ;;=3^Aqueous Misdirection,Right Eye
+31 ;;^UTILITY(U,$J,358.3,26209,1,4,0)
+32 ;;=4^H40.831
+33 ;;^UTILITY(U,$J,358.3,26209,2)
+34 ;;=^5005927
+35 ;;^UTILITY(U,$J,358.3,26210,0)
+36 ;;=H40.832^^81^1047^17
+37 ;;^UTILITY(U,$J,358.3,26210,1,0)
+38 ;;=^358.31IA^4^2
+39 ;;^UTILITY(U,$J,358.3,26210,1,3,0)
+40 ;;=3^Aqueous Misdirection,Left Eye
+41 ;;^UTILITY(U,$J,358.3,26210,1,4,0)
+42 ;;=4^H40.832
+43 ;;^UTILITY(U,$J,358.3,26210,2)
+44 ;;=^5005928
+45 ;;^UTILITY(U,$J,358.3,26211,0)
+46 ;;=Z83.511^^81^1047^18
+47 ;;^UTILITY(U,$J,358.3,26211,1,0)
+48 ;;=^358.31IA^4^2
+49 ;;^UTILITY(U,$J,358.3,26211,1,3,0)
+50 ;;=3^Family Hx of Glaucoma
+51 ;;^UTILITY(U,$J,358.3,26211,1,4,0)
+52 ;;=4^Z83.511
+53 ;;^UTILITY(U,$J,358.3,26211,2)
+54 ;;=^5063382
+55 ;;^UTILITY(U,$J,358.3,26212,0)
+56 ;;=H40.1311^^81^1048^1
+57 ;;^UTILITY(U,$J,358.3,26212,1,0)
+58 ;;=^358.31IA^4^2
+59 ;;^UTILITY(U,$J,358.3,26212,1,3,0)
+60 ;;=3^Pigmentary Glaucoma,Mild,Right Eye
+61 ;;^UTILITY(U,$J,358.3,26212,1,4,0)
+62 ;;=4^H40.1311
+63 ;;^UTILITY(U,$J,358.3,26212,2)
+64 ;;=^5005776
+65 ;;^UTILITY(U,$J,358.3,26213,0)
+66 ;;=H40.1321^^81^1048^4
+67 ;;^UTILITY(U,$J,358.3,26213,1,0)
+68 ;;=^358.31IA^4^2
+69 ;;^UTILITY(U,$J,358.3,26213,1,3,0)
+70 ;;=3^Pigmentary Glaucoma,Mild,Left Eye
+71 ;;^UTILITY(U,$J,358.3,26213,1,4,0)
+72 ;;=4^H40.1321
+73 ;;^UTILITY(U,$J,358.3,26213,2)
+74 ;;=^5005781
+75 ;;^UTILITY(U,$J,358.3,26214,0)
+76 ;;=H40.1331^^81^1048^7
+77 ;;^UTILITY(U,$J,358.3,26214,1,0)
+78 ;;=^358.31IA^4^2
+79 ;;^UTILITY(U,$J,358.3,26214,1,3,0)
+80 ;;=3^Pigmentary Glaucoma,Mild,Bilateral
+81 ;;^UTILITY(U,$J,358.3,26214,1,4,0)
+82 ;;=4^H40.1331
+83 ;;^UTILITY(U,$J,358.3,26214,2)
+84 ;;=^5005785
+85 ;;^UTILITY(U,$J,358.3,26215,0)
+86 ;;=H40.1313^^81^1048^3
+87 ;;^UTILITY(U,$J,358.3,26215,1,0)
+88 ;;=^358.31IA^4^2
+89 ;;^UTILITY(U,$J,358.3,26215,1,3,0)
+90 ;;=3^Pigmentary Glaucoma,Severe,Right Eye
+91 ;;^UTILITY(U,$J,358.3,26215,1,4,0)
+92 ;;=4^H40.1313
+93 ;;^UTILITY(U,$J,358.3,26215,2)
+94 ;;=^5005778
+95 ;;^UTILITY(U,$J,358.3,26216,0)
+96 ;;=H40.1323^^81^1048^6
+97 ;;^UTILITY(U,$J,358.3,26216,1,0)
+98 ;;=^358.31IA^4^2
+99 ;;^UTILITY(U,$J,358.3,26216,1,3,0)
+100 ;;=3^Pigmentary Glaucoma,Severe,Left Eye
+101 ;;^UTILITY(U,$J,358.3,26216,1,4,0)
+102 ;;=4^H40.1323
+103 ;;^UTILITY(U,$J,358.3,26216,2)
+104 ;;=^5133495
+105 ;;^UTILITY(U,$J,358.3,26217,0)
+106 ;;=H40.1333^^81^1048^9
+107 ;;^UTILITY(U,$J,358.3,26217,1,0)
+108 ;;=^358.31IA^4^2
+109 ;;^UTILITY(U,$J,358.3,26217,1,3,0)
+110 ;;=3^Pigmentary Glaucoma,Severe,Bilateral
+111 ;;^UTILITY(U,$J,358.3,26217,1,4,0)
+112 ;;=4^H40.1333
+113 ;;^UTILITY(U,$J,358.3,26217,2)
+114 ;;=^5005787
+115 ;;^UTILITY(U,$J,358.3,26218,0)
+116 ;;=H40.1411^^81^1048^10
+117 ;;^UTILITY(U,$J,358.3,26218,1,0)
+118 ;;=^358.31IA^4^2
+119 ;;^UTILITY(U,$J,358.3,26218,1,3,0)
+120 ;;=3^Pseudoexf Glaucoma,Mild,Right Eye
+121 ;;^UTILITY(U,$J,358.3,26218,1,4,0)
+122 ;;=4^H40.1411
+123 ;;^UTILITY(U,$J,358.3,26218,2)
+124 ;;=^5138018
+125 ;;^UTILITY(U,$J,358.3,26219,0)
+126 ;;=H40.1421^^81^1048^13
+127 ;;^UTILITY(U,$J,358.3,26219,1,0)
+128 ;;=^358.31IA^4^2
+129 ;;^UTILITY(U,$J,358.3,26219,1,3,0)
+130 ;;=3^Pseudoexf Glaucoma,Mild,Left Eye
+131 ;;^UTILITY(U,$J,358.3,26219,1,4,0)
+132 ;;=4^H40.1421
+133 ;;^UTILITY(U,$J,358.3,26219,2)
+134 ;;=^5138023
+135 ;;^UTILITY(U,$J,358.3,26220,0)
+136 ;;=H40.1431^^81^1048^16
+137 ;;^UTILITY(U,$J,358.3,26220,1,0)
+138 ;;=^358.31IA^4^2
+139 ;;^UTILITY(U,$J,358.3,26220,1,3,0)
+140 ;;=3^Pseudoexf Glaucoma,Mild,Bilateral
+141 ;;^UTILITY(U,$J,358.3,26220,1,4,0)
+142 ;;=4^H40.1431
+143 ;;^UTILITY(U,$J,358.3,26220,2)
+144 ;;=^5138028
+145 ;;^UTILITY(U,$J,358.3,26221,0)
+146 ;;=H40.1413^^81^1048^12
+147 ;;^UTILITY(U,$J,358.3,26221,1,0)
+148 ;;=^358.31IA^4^2
+149 ;;^UTILITY(U,$J,358.3,26221,1,3,0)
+150 ;;=3^Pseudoexf Glaucoma,Severe,Right Eye
+151 ;;^UTILITY(U,$J,358.3,26221,1,4,0)
+152 ;;=4^H40.1413
+153 ;;^UTILITY(U,$J,358.3,26221,2)
+154 ;;=^5138020
+155 ;;^UTILITY(U,$J,358.3,26222,0)
+156 ;;=H40.1433^^81^1048^18
+157 ;;^UTILITY(U,$J,358.3,26222,1,0)
+158 ;;=^358.31IA^4^2
+159 ;;^UTILITY(U,$J,358.3,26222,1,3,0)
+160 ;;=3^Pseudoexf Glaucoma,Severe,Bilateral
+161 ;;^UTILITY(U,$J,358.3,26222,1,4,0)
+162 ;;=4^H40.1433
+163 ;;^UTILITY(U,$J,358.3,26222,2)
+164 ;;=^5138030
+165 ;;^UTILITY(U,$J,358.3,26223,0)
+166 ;;=H40.041^^81^1048^19
+167 ;;^UTILITY(U,$J,358.3,26223,1,0)
+168 ;;=^358.31IA^4^2
+169 ;;^UTILITY(U,$J,358.3,26223,1,3,0)
+170 ;;=3^Steroid Responsive Glauc,Right Eye
+171 ;;^UTILITY(U,$J,358.3,26223,1,4,0)
+172 ;;=4^H40.041
+173 ;;^UTILITY(U,$J,358.3,26223,2)
+174 ;;=^5005736
+175 ;;^UTILITY(U,$J,358.3,26224,0)
+176 ;;=H40.042^^81^1048^20
+177 ;;^UTILITY(U,$J,358.3,26224,1,0)
+178 ;;=^358.31IA^4^2
+179 ;;^UTILITY(U,$J,358.3,26224,1,3,0)
+180 ;;=3^Steroid Responsive Glauc,Left Eye
+181 ;;^UTILITY(U,$J,358.3,26224,1,4,0)
+182 ;;=4^H40.042
+183 ;;^UTILITY(U,$J,358.3,26224,2)
+184 ;;=^5005737
+185 ;;^UTILITY(U,$J,358.3,26225,0)
+186 ;;=H40.043^^81^1048^21
+187 ;;^UTILITY(U,$J,358.3,26225,1,0)
+188 ;;=^358.31IA^4^2
+189 ;;^UTILITY(U,$J,358.3,26225,1,3,0)
+190 ;;=3^Steroid Responsive Glauc,Bilateral
+191 ;;^UTILITY(U,$J,358.3,26225,1,4,0)
+192 ;;=4^H40.043
+193 ;;^UTILITY(U,$J,358.3,26225,2)
+194 ;;=^5005738
+195 ;;^UTILITY(U,$J,358.3,26226,0)
+196 ;;=H40.31X1^^81^1048^22
+197 ;;^UTILITY(U,$J,358.3,26226,1,0)
+198 ;;=^358.31IA^4^2
+199 ;;^UTILITY(U,$J,358.3,26226,1,3,0)
+200 ;;=3^Glaucoma d/t Trauma,Mild,Right Eye
+201 ;;^UTILITY(U,$J,358.3,26226,1,4,0)
+202 ;;=4^H40.31X1
+203 ;;^UTILITY(U,$J,358.3,26226,2)
+204 ;;=^5005853
+205 ;;^UTILITY(U,$J,358.3,26227,0)
+206 ;;=H40.32X1^^81^1048^23
+207 ;;^UTILITY(U,$J,358.3,26227,1,0)
+208 ;;=^358.31IA^4^2
+209 ;;^UTILITY(U,$J,358.3,26227,1,3,0)
+210 ;;=3^Glaucoma d/t Trauma,Mild,Left Eye
+211 ;;^UTILITY(U,$J,358.3,26227,1,4,0)
+212 ;;=4^H40.32X1
+213 ;;^UTILITY(U,$J,358.3,26227,2)
+214 ;;=^5005857
+215 ;;^UTILITY(U,$J,358.3,26228,0)
+216 ;;=H40.33X1^^81^1048^24
+217 ;;^UTILITY(U,$J,358.3,26228,1,0)
+218 ;;=^358.31IA^4^2
+219 ;;^UTILITY(U,$J,358.3,26228,1,3,0)
+220 ;;=3^Glaucoma d/t Trauma,Mild,Bilateral
+221 ;;^UTILITY(U,$J,358.3,26228,1,4,0)
+222 ;;=4^H40.33X1
+223 ;;^UTILITY(U,$J,358.3,26228,2)
+224 ;;=^5005861
+225 ;;^UTILITY(U,$J,358.3,26229,0)
+226 ;;=H40.31X3^^81^1048^25
+227 ;;^UTILITY(U,$J,358.3,26229,1,0)
+228 ;;=^358.31IA^4^2
+229 ;;^UTILITY(U,$J,358.3,26229,1,3,0)
+230 ;;=3^Glaucoma d/t Trauma,Severe,Right Eye
+231 ;;^UTILITY(U,$J,358.3,26229,1,4,0)
+232 ;;=4^H40.31X3
+233 ;;^UTILITY(U,$J,358.3,26229,2)
+234 ;;=^5133503
+235 ;;^UTILITY(U,$J,358.3,26230,0)
+236 ;;=H40.32X3^^81^1048^26
+237 ;;^UTILITY(U,$J,358.3,26230,1,0)
+238 ;;=^358.31IA^4^2
+239 ;;^UTILITY(U,$J,358.3,26230,1,3,0)
+240 ;;=3^Glaucoma d/t Trauma,Severe,Left Eye
+241 ;;^UTILITY(U,$J,358.3,26230,1,4,0)
+242 ;;=4^H40.32X3
+243 ;;^UTILITY(U,$J,358.3,26230,2)
+244 ;;=^5133504
+245 ;;^UTILITY(U,$J,358.3,26231,0)
+246 ;;=H40.33X3^^81^1048^27
+247 ;;^UTILITY(U,$J,358.3,26231,1,0)
+248 ;;=^358.31IA^4^2
+249 ;;^UTILITY(U,$J,358.3,26231,1,3,0)
+250 ;;=3^Glaucoma d/t Trauma,Severe,Bilateral
+251 ;;^UTILITY(U,$J,358.3,26231,1,4,0)
+252 ;;=4^H40.33X3
+253 ;;^UTILITY(U,$J,358.3,26231,2)
+254 ;;=^5005863
+255 ;;^UTILITY(U,$J,358.3,26232,0)
+256 ;;=H40.41X1^^81^1048^28
+257 ;;^UTILITY(U,$J,358.3,26232,1,0)
+258 ;;=^358.31IA^4^2
+259 ;;^UTILITY(U,$J,358.3,26232,1,3,0)
+260 ;;=3^Glaucoma d/t Uveitis,Mild,Right Eye
+261 ;;^UTILITY(U,$J,358.3,26232,1,4,0)
+262 ;;=4^H40.41X1
+263 ;;^UTILITY(U,$J,358.3,26232,2)
+264 ;;=^5005871
+265 ;;^UTILITY(U,$J,358.3,26233,0)
+266 ;;=H40.42X1^^81^1048^29
+267 ;;^UTILITY(U,$J,358.3,26233,1,0)
+268 ;;=^358.31IA^4^2
+269 ;;^UTILITY(U,$J,358.3,26233,1,3,0)
+270 ;;=3^Glaucoma d/t Uveitis,Mild,Left Eye
+271 ;;^UTILITY(U,$J,358.3,26233,1,4,0)
+272 ;;=4^H40.42X1
+273 ;;^UTILITY(U,$J,358.3,26233,2)
+274 ;;=^5005875
+275 ;;^UTILITY(U,$J,358.3,26234,0)
+276 ;;=H40.43X1^^81^1048^30
+277 ;;^UTILITY(U,$J,358.3,26234,1,0)
+278 ;;=^358.31IA^4^2
+279 ;;^UTILITY(U,$J,358.3,26234,1,3,0)
+280 ;;=3^Glaucoma d/t Uveitis,Mild,Bilateral
+281 ;;^UTILITY(U,$J,358.3,26234,1,4,0)
+282 ;;=4^H40.43X1
+283 ;;^UTILITY(U,$J,358.3,26234,2)
+284 ;;=^5005879
+285 ;;^UTILITY(U,$J,358.3,26235,0)
+286 ;;=H40.41X3^^81^1048^31
+287 ;;^UTILITY(U,$J,358.3,26235,1,0)
+288 ;;=^358.31IA^4^2
+289 ;;^UTILITY(U,$J,358.3,26235,1,3,0)
+290 ;;=3^Glaucoma d/t Uveitis,Severe,Right Eye
+291 ;;^UTILITY(U,$J,358.3,26235,1,4,0)
+292 ;;=4^H40.41X3
+293 ;;^UTILITY(U,$J,358.3,26235,2)
+294 ;;=^5133505
+295 ;;^UTILITY(U,$J,358.3,26236,0)
+296 ;;=H40.42X3^^81^1048^32
+297 ;;^UTILITY(U,$J,358.3,26236,1,0)
+298 ;;=^358.31IA^4^2
+299 ;;^UTILITY(U,$J,358.3,26236,1,3,0)
+300 ;;=3^Glaucoma d/t Uveitis,Severe,Left Eye
+301 ;;^UTILITY(U,$J,358.3,26236,1,4,0)
+302 ;;=4^H40.42X3
+303 ;;^UTILITY(U,$J,358.3,26236,2)
+304 ;;=^5133506
+305 ;;^UTILITY(U,$J,358.3,26237,0)
+306 ;;=H40.43X3^^81^1048^33
+307 ;;^UTILITY(U,$J,358.3,26237,1,0)
+308 ;;=^358.31IA^4^2
+309 ;;^UTILITY(U,$J,358.3,26237,1,3,0)
+310 ;;=3^Glaucoma d/t Uveitis,Severe,Bilateral
+311 ;;^UTILITY(U,$J,358.3,26237,1,4,0)
+312 ;;=4^H40.43X3
+313 ;;^UTILITY(U,$J,358.3,26237,2)
+314 ;;=^5005881
+315 ;;^UTILITY(U,$J,358.3,26238,0)
+316 ;;=H40.51X3^^81^1048^34
+317 ;;^UTILITY(U,$J,358.3,26238,1,0)
+318 ;;=^358.31IA^4^2
+319 ;;^UTILITY(U,$J,358.3,26238,1,3,0)
+320 ;;=3^Glaucoma d/t Eye Disorder,Severe,Right Eye
+321 ;;^UTILITY(U,$J,358.3,26238,1,4,0)
+322 ;;=4^H40.51X3
+323 ;;^UTILITY(U,$J,358.3,26238,2)
+324 ;;=^5133507
+325 ;;^UTILITY(U,$J,358.3,26239,0)
+326 ;;=H40.52X3^^81^1048^35
+327 ;;^UTILITY(U,$J,358.3,26239,1,0)
+328 ;;=^358.31IA^4^2
+329 ;;^UTILITY(U,$J,358.3,26239,1,3,0)
+330 ;;=3^Glaucoma d/t Eye Disorder,Severe,Left Eye
+331 ;;^UTILITY(U,$J,358.3,26239,1,4,0)
+332 ;;=4^H40.52X3
+333 ;;^UTILITY(U,$J,358.3,26239,2)
+334 ;;=^5133508
+335 ;;^UTILITY(U,$J,358.3,26240,0)
+336 ;;=H40.31X4^^81^1048^36
+337 ;;^UTILITY(U,$J,358.3,26240,1,0)
+338 ;;=^358.31IA^4^2
+339 ;;^UTILITY(U,$J,358.3,26240,1,3,0)
+340 ;;=3^Glaucoma Secondary to Eye Trauma,Right Eye,Indeterminate Stage
+341 ;;^UTILITY(U,$J,358.3,26240,1,4,0)
+342 ;;=4^H40.31X4
+343 ;;^UTILITY(U,$J,358.3,26240,2)
+344 ;;=^5005855
+345 ;;^UTILITY(U,$J,358.3,26241,0)
+346 ;;=H40.32X4^^81^1048^37
+347 ;;^UTILITY(U,$J,358.3,26241,1,0)
+348 ;;=^358.31IA^4^2
+349 ;;^UTILITY(U,$J,358.3,26241,1,3,0)
+350 ;;=3^Glaucoma Secondary to Eye Trauma,Left Eye,Indeterminate Stage
+351 ;;^UTILITY(U,$J,358.3,26241,1,4,0)
+352 ;;=4^H40.32X4
+353 ;;^UTILITY(U,$J,358.3,26241,2)
+354 ;;=^5005859
+355 ;;^UTILITY(U,$J,358.3,26242,0)
+356 ;;=H40.1423^^81^1048^15
+357 ;;^UTILITY(U,$J,358.3,26242,1,0)
+358 ;;=^358.31IA^4^2
+359 ;;^UTILITY(U,$J,358.3,26242,1,3,0)
+360 ;;=3^Pseudoexf Glaucoma,Severe,Left Eye
+361 ;;^UTILITY(U,$J,358.3,26242,1,4,0)
+362 ;;=4^H40.1423
+363 ;;^UTILITY(U,$J,358.3,26242,2)
+364 ;;=^5138025
+365 ;;^UTILITY(U,$J,358.3,26243,0)
+366 ;;=H40.1422^^81^1048^14
+367 ;;^UTILITY(U,$J,358.3,26243,1,0)
+368 ;;=^358.31IA^4^2
+369 ;;^UTILITY(U,$J,358.3,26243,1,3,0)
+370 ;;=3^Pseudoexf Glaucoma,Moderate,Left Eye
+371 ;;^UTILITY(U,$J,358.3,26243,1,4,0)
+372 ;;=4^H40.1422
+373 ;;^UTILITY(U,$J,358.3,26243,2)
+374 ;;=^5138024
+375 ;;^UTILITY(U,$J,358.3,26244,0)
+376 ;;=H40.1412^^81^1048^11
+377 ;;^UTILITY(U,$J,358.3,26244,1,0)
+378 ;;=^358.31IA^4^2
+379 ;;^UTILITY(U,$J,358.3,26244,1,3,0)
+380 ;;=3^Pseudoexf Glaucoma,Moderate,Right Eye
+381 ;;^UTILITY(U,$J,358.3,26244,1,4,0)
+382 ;;=4^H40.1412
+383 ;;^UTILITY(U,$J,358.3,26244,2)
+384 ;;=^5138019
+385 ;;^UTILITY(U,$J,358.3,26245,0)
+386 ;;=H40.1432^^81^1048^17
+387 ;;^UTILITY(U,$J,358.3,26245,1,0)
+388 ;;=^358.31IA^4^2
+389 ;;^UTILITY(U,$J,358.3,26245,1,3,0)
+390 ;;=3^Pseudoexf Glaucoma,Moderate,Bilateral
+391 ;;^UTILITY(U,$J,358.3,26245,1,4,0)
+392 ;;=4^H40.1432
+393 ;;^UTILITY(U,$J,358.3,26245,2)
+394 ;;=^5138029
+395 ;;^UTILITY(U,$J,358.3,26246,0)
+396 ;;=H40.1312^^81^1048^2
+397 ;;^UTILITY(U,$J,358.3,26246,1,0)
+398 ;;=^358.31IA^4^2
+399 ;;^UTILITY(U,$J,358.3,26246,1,3,0)
+400 ;;=3^Pigmentary Glaucoma,Moderate,Right Eye
+401 ;;^UTILITY(U,$J,358.3,26246,1,4,0)
+402 ;;=4^H40.1312
+403 ;;^UTILITY(U,$J,358.3,26246,2)
+404 ;;=^5005777
+405 ;;^UTILITY(U,$J,358.3,26247,0)
+406 ;;=H40.1322^^81^1048^5
+407 ;;^UTILITY(U,$J,358.3,26247,1,0)
+408 ;;=^358.31IA^4^2
+409 ;;^UTILITY(U,$J,358.3,26247,1,3,0)
+410 ;;=3^Pigmentary Glaucoma,Moderate,Left Eye
+411 ;;^UTILITY(U,$J,358.3,26247,1,4,0)
+412 ;;=4^H40.1322
+413 ;;^UTILITY(U,$J,358.3,26247,2)
+414 ;;=^5005782
+415 ;;^UTILITY(U,$J,358.3,26248,0)
+416 ;;=H40.1332^^81^1048^8
+417 ;;^UTILITY(U,$J,358.3,26248,1,0)
+418 ;;=^358.31IA^4^2
+419 ;;^UTILITY(U,$J,358.3,26248,1,3,0)
+420 ;;=3^Pigmentary Glaucoma,Moderate,Bilateral
+421 ;;^UTILITY(U,$J,358.3,26248,1,4,0)
+422 ;;=4^H40.1332
+423 ;;^UTILITY(U,$J,358.3,26248,2)
+424 ;;=^5005786
+425 ;;^UTILITY(U,$J,358.3,26249,0)
+426 ;;=H31.421^^81^1049^5
+427 ;;^UTILITY(U,$J,358.3,26249,1,0)
+428 ;;=^358.31IA^4^2
+429 ;;^UTILITY(U,$J,358.3,26249,1,3,0)
+430 ;;=3^Serous Choroidal Detachment,Right Eye
+431 ;;^UTILITY(U,$J,358.3,26249,1,4,0)
+432 ;;=4^H31.421
+433 ;;^UTILITY(U,$J,358.3,26249,2)
+434 ;;=^5005483
+435 ;;^UTILITY(U,$J,358.3,26250,0)
+436 ;;=H31.422^^81^1049^6
+437 ;;^UTILITY(U,$J,358.3,26250,1,0)
+438 ;;=^358.31IA^4^2
+439 ;;^UTILITY(U,$J,358.3,26250,1,3,0)
+440 ;;=3^Serous Choroidal Detachment,Left Eye
+441 ;;^UTILITY(U,$J,358.3,26250,1,4,0)
+442 ;;=4^H31.422
+443 ;;^UTILITY(U,$J,358.3,26250,2)
+444 ;;=^5005484
+445 ;;^UTILITY(U,$J,358.3,26251,0)
+446 ;;=H31.401^^81^1049^7
+447 ;;^UTILITY(U,$J,358.3,26251,1,0)
+448 ;;=^358.31IA^4^2
+449 ;;^UTILITY(U,$J,358.3,26251,1,3,0)
+450 ;;=3^Choroidal Detachment,Unspec,Right Eye
+451 ;;^UTILITY(U,$J,358.3,26251,1,4,0)
+452 ;;=4^H31.401
+453 ;;^UTILITY(U,$J,358.3,26251,2)
+454 ;;=^5005476
+455 ;;^UTILITY(U,$J,358.3,26252,0)
+456 ;;=H31.402^^81^1049^8
+457 ;;^UTILITY(U,$J,358.3,26252,1,0)
+458 ;;=^358.31IA^4^2
+459 ;;^UTILITY(U,$J,358.3,26252,1,3,0)
+460 ;;=3^Choroidal Detachment,Unspec,Left Eye
+461 ;;^UTILITY(U,$J,358.3,26252,1,4,0)
+462 ;;=4^H31.402
+463 ;;^UTILITY(U,$J,358.3,26252,2)
+464 ;;=^5005477
+465 ;;^UTILITY(U,$J,358.3,26253,0)
+466 ;;=H31.321^^81^1049^9
+467 ;;^UTILITY(U,$J,358.3,26253,1,0)
+468 ;;=^358.31IA^4^2
+469 ;;^UTILITY(U,$J,358.3,26253,1,3,0)
+470 ;;=3^Choroidal Rupture,Right Eye
+471 ;;^UTILITY(U,$J,358.3,26253,1,4,0)
+472 ;;=4^H31.321
+473 ;;^UTILITY(U,$J,358.3,26253,2)
+474 ;;=^5005472
+475 ;;^UTILITY(U,$J,358.3,26254,0)
+476 ;;=H31.322^^81^1049^10
+477 ;;^UTILITY(U,$J,358.3,26254,1,0)
+478 ;;=^358.31IA^4^2
+479 ;;^UTILITY(U,$J,358.3,26254,1,3,0)
+480 ;;=3^Choroidal Rupture,Left Eye
+481 ;;^UTILITY(U,$J,358.3,26254,1,4,0)
+482 ;;=4^H31.322
+483 ;;^UTILITY(U,$J,358.3,26254,2)
+484 ;;=^5005473
+485 ;;^UTILITY(U,$J,358.3,26255,0)
+486 ;;=D31.31^^81^1049^1
+487 ;;^UTILITY(U,$J,358.3,26255,1,0)
+488 ;;=^358.31IA^4^2
+489 ;;^UTILITY(U,$J,358.3,26255,1,3,0)
+490 ;;=3^Benign Neop/Nevus Choroid,Right Eye
+491 ;;^UTILITY(U,$J,358.3,26255,1,4,0)
+492 ;;=4^D31.31
+493 ;;^UTILITY(U,$J,358.3,26255,2)
+494 ;;=^5002121
+495 ;;^UTILITY(U,$J,358.3,26256,0)
+496 ;;=D31.32^^81^1049^2
+497 ;;^UTILITY(U,$J,358.3,26256,1,0)
+498 ;;=^358.31IA^4^2
+499 ;;^UTILITY(U,$J,358.3,26256,1,3,0)
+500 ;;=3^Benign Neop/Nevus Choroid,Left Eye
+501 ;;^UTILITY(U,$J,358.3,26256,1,4,0)
+502 ;;=4^D31.32
+503 ;;^UTILITY(U,$J,358.3,26256,2)
+504 ;;=^5002122
+505 ;;^UTILITY(U,$J,358.3,26257,0)
+506 ;;=C69.31^^81^1049^3
+507 ;;^UTILITY(U,$J,358.3,26257,1,0)
+508 ;;=^358.31IA^4^2
+509 ;;^UTILITY(U,$J,358.3,26257,1,3,0)
+510 ;;=3^Malig Neop/Melanoma Choroid,Right Eye
+511 ;;^UTILITY(U,$J,358.3,26257,1,4,0)
+512 ;;=4^C69.31
+513 ;;^UTILITY(U,$J,358.3,26257,2)
+514 ;;=^5001276
+515 ;;^UTILITY(U,$J,358.3,26258,0)
+516 ;;=C69.32^^81^1049^4
+517 ;;^UTILITY(U,$J,358.3,26258,1,0)
+518 ;;=^358.31IA^4^2
+519 ;;^UTILITY(U,$J,358.3,26258,1,3,0)
+520 ;;=3^Malig Neop/Melanoma Choroid,Left Eye
+521 ;;^UTILITY(U,$J,358.3,26258,1,4,0)
+522 ;;=4^C69.32
+523 ;;^UTILITY(U,$J,358.3,26258,2)
+524 ;;=^5001277
+525 ;;^UTILITY(U,$J,358.3,26259,0)
+526 ;;=B25.9^^81^1049^11
+527 ;;^UTILITY(U,$J,358.3,26259,1,0)
+528 ;;=^358.31IA^4^2
+529 ;;^UTILITY(U,$J,358.3,26259,1,3,0)
+530 ;;=3^Cytomegaloviral Disease,Unspec
+531 ;;^UTILITY(U,$J,358.3,26259,1,4,0)
+532 ;;=4^B25.9
+533 ;;^UTILITY(U,$J,358.3,26259,2)
+534 ;;=^5000560
+535 ;;^UTILITY(U,$J,358.3,26260,0)
+536 ;;=B39.9^^81^1049^12
+537 ;;^UTILITY(U,$J,358.3,26260,1,0)
+538 ;;=^358.31IA^4^2
+539 ;;^UTILITY(U,$J,358.3,26260,1,3,0)
+540 ;;=3^Histoplasmosis,Unspec
+541 ;;^UTILITY(U,$J,358.3,26260,1,4,0)
+542 ;;=4^B39.9
+543 ;;^UTILITY(U,$J,358.3,26260,2)
+544 ;;=^5000638
+545 ;;^UTILITY(U,$J,358.3,26261,0)
+546 ;;=B58.01^^81^1049^13
+547 ;;^UTILITY(U,$J,358.3,26261,1,0)
+548 ;;=^358.31IA^4^2
+549 ;;^UTILITY(U,$J,358.3,26261,1,3,0)
+550 ;;=3^Toxoplasma Chorioretinitis
+551 ;;^UTILITY(U,$J,358.3,26261,1,4,0)
+552 ;;=4^B58.01
+553 ;;^UTILITY(U,$J,358.3,26261,2)
+554 ;;=^5000724
+555 ;;^UTILITY(U,$J,358.3,26262,0)
+556 ;;=H30.91^^81^1049^14
+557 ;;^UTILITY(U,$J,358.3,26262,1,0)
+558 ;;=^358.31IA^4^2
+559 ;;^UTILITY(U,$J,358.3,26262,1,3,0)
+560 ;;=3^Chorioretinal Inflammation,Right Eye
+561 ;;^UTILITY(U,$J,358.3,26262,1,4,0)
+562 ;;=4^H30.91
+563 ;;^UTILITY(U,$J,358.3,26262,2)
+564 ;;=^5133481
+565 ;;^UTILITY(U,$J,358.3,26263,0)
+566 ;;=H30.92^^81^1049^15
+567 ;;^UTILITY(U,$J,358.3,26263,1,0)
+568 ;;=^358.31IA^4^2
+569 ;;^UTILITY(U,$J,358.3,26263,1,3,0)
+570 ;;=3^Chorioretinal Inflammation,Left Eye
+571 ;;^UTILITY(U,$J,358.3,26263,1,4,0)
+572 ;;=4^H30.92
+573 ;;^UTILITY(U,$J,358.3,26263,2)
+574 ;;=^5133482
+575 ;;^UTILITY(U,$J,358.3,26264,0)
+576 ;;=H30.93^^81^1049^16
+577 ;;^UTILITY(U,$J,358.3,26264,1,0)
+578 ;;=^358.31IA^4^2
+579 ;;^UTILITY(U,$J,358.3,26264,1,3,0)
+580 ;;=3^Chorioretinal Inflammation,Bilateral
+581 ;;^UTILITY(U,$J,358.3,26264,1,4,0)
+582 ;;=4^H30.93
+583 ;;^UTILITY(U,$J,358.3,26264,2)
+584 ;;=^5005435
+585 ;;^UTILITY(U,$J,358.3,26265,0)
+586 ;;=H32.^^81^1049^17
+587 ;;^UTILITY(U,$J,358.3,26265,1,0)
+588 ;;=^358.31IA^4^2
+589 ;;^UTILITY(U,$J,358.3,26265,1,3,0)
+590 ;;=3^Chorioretinal Disorders,Secondary,Unspec
+591 ;;^UTILITY(U,$J,358.3,26265,1,4,0)
+592 ;;=4^H32.
+593 ;;^UTILITY(U,$J,358.3,26265,2)
+594 ;;=^5005489
+595 ;;^UTILITY(U,$J,358.3,26266,0)
+596 ;;=H31.001^^81^1049^18
+597 ;;^UTILITY(U,$J,358.3,26266,1,0)
+598 ;;=^358.31IA^4^2
+599 ;;^UTILITY(U,$J,358.3,26266,1,3,0)
+600 ;;=3^Chorioretinal Scars,Right Eye
+601 ;;^UTILITY(U,$J,358.3,26266,1,4,0)
+602 ;;=4^H31.001
+603 ;;^UTILITY(U,$J,358.3,26266,2)
+604 ;;=^5005436
+605 ;;^UTILITY(U,$J,358.3,26267,0)
+606 ;;=H31.002^^81^1049^19
+607 ;;^UTILITY(U,$J,358.3,26267,1,0)
+608 ;;=^358.31IA^4^2
+609 ;;^UTILITY(U,$J,358.3,26267,1,3,0)
+610 ;;=3^Chorioretinal Scars,Left Eye
+611 ;;^UTILITY(U,$J,358.3,26267,1,4,0)
+612 ;;=4^H31.002
+613 ;;^UTILITY(U,$J,358.3,26267,2)
+614 ;;=^5005437
+615 ;;^UTILITY(U,$J,358.3,26268,0)
+616 ;;=H31.003^^81^1049^20
+617 ;;^UTILITY(U,$J,358.3,26268,1,0)
+618 ;;=^358.31IA^4^2
+619 ;;^UTILITY(U,$J,358.3,26268,1,3,0)
+620 ;;=3^Chorioretinal Scars,Bilateral
+621 ;;^UTILITY(U,$J,358.3,26268,1,4,0)
+622 ;;=4^H31.003
+623 ;;^UTILITY(U,$J,358.3,26268,2)
+624 ;;=^5005438
+625 ;;^UTILITY(U,$J,358.3,26269,0)
+626 ;;=H33.321^^81^1050^1
+627 ;;^UTILITY(U,$J,358.3,26269,1,0)
+628 ;;=^358.31IA^4^2
+629 ;;^UTILITY(U,$J,358.3,26269,1,3,0)
+630 ;;=3^Round Hole,Right Eye
+631 ;;^UTILITY(U,$J,358.3,26269,1,4,0)
+632 ;;=4^H33.321
+633 ;;^UTILITY(U,$J,358.3,26269,2)
+634 ;;=^5005539
+635 ;;^UTILITY(U,$J,358.3,26270,0)
+636 ;;=H33.322^^81^1050^2
+637 ;;^UTILITY(U,$J,358.3,26270,1,0)
+638 ;;=^358.31IA^4^2
+639 ;;^UTILITY(U,$J,358.3,26270,1,3,0)
+640 ;;=3^Round Hole,Left Eye
+641 ;;^UTILITY(U,$J,358.3,26270,1,4,0)
+642 ;;=4^H33.322
+643 ;;^UTILITY(U,$J,358.3,26270,2)
+644 ;;=^5005540
+645 ;;^UTILITY(U,$J,358.3,26271,0)
+646 ;;=H33.101^^81^1050^3
+647 ;;^UTILITY(U,$J,358.3,26271,1,0)
+648 ;;=^358.31IA^4^2
+649 ;;^UTILITY(U,$J,358.3,26271,1,3,0)
+650 ;;=3^Retinoschisis,Right Eye
+651 ;;^UTILITY(U,$J,358.3,26271,1,4,0)
+652 ;;=4^H33.101
+653 ;;^UTILITY(U,$J,358.3,26271,2)
+654 ;;=^5005513
+655 ;;^UTILITY(U,$J,358.3,26272,0)
+656 ;;=H33.102^^81^1050^4
+657 ;;^UTILITY(U,$J,358.3,26272,1,0)
+658 ;;=^358.31IA^4^2
+659 ;;^UTILITY(U,$J,358.3,26272,1,3,0)
+660 ;;=3^Retinoschisis,Left Eye
+661 ;;^UTILITY(U,$J,358.3,26272,1,4,0)
+662 ;;=4^H33.102
+663 ;;^UTILITY(U,$J,358.3,26272,2)
+664 ;;=^5005514
+665 ;;^UTILITY(U,$J,358.3,26273,0)
+666 ;;=H33.8^^81^1050^5
+667 ;;^UTILITY(U,$J,358.3,26273,1,0)
+668 ;;=^358.31IA^4^2
+669 ;;^UTILITY(U,$J,358.3,26273,1,3,0)
+670 ;;=3^Retina Detachments NEC
+671 ;;^UTILITY(U,$J,358.3,26273,1,4,0)
+672 ;;=4^H33.8