IBDEI02P ; ; 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,6324,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6324,1,2,0)
;;=2^Inj Treatment of Eye,Medication
;;^UTILITY(U,$J,358.3,6324,1,3,0)
;;=3^66030
;;^UTILITY(U,$J,358.3,6325,0)
;;=67028^^39^346^9^^^^1
;;^UTILITY(U,$J,358.3,6325,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6325,1,2,0)
;;=2^Intravitreal Inj of Eye Drug
;;^UTILITY(U,$J,358.3,6325,1,3,0)
;;=3^67028
;;^UTILITY(U,$J,358.3,6326,0)
;;=67500^^39^346^13^^^^1
;;^UTILITY(U,$J,358.3,6326,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6326,1,2,0)
;;=2^Retrobulbar Inj,Medication
;;^UTILITY(U,$J,358.3,6326,1,3,0)
;;=3^67500
;;^UTILITY(U,$J,358.3,6327,0)
;;=67505^^39^346^12^^^^1
;;^UTILITY(U,$J,358.3,6327,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6327,1,2,0)
;;=2^Retrobulbar Inj,Alcohol
;;^UTILITY(U,$J,358.3,6327,1,3,0)
;;=3^67505
;;^UTILITY(U,$J,358.3,6328,0)
;;=68200^^39^346^16^^^^1
;;^UTILITY(U,$J,358.3,6328,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6328,1,2,0)
;;=2^Subconjunctival Injection
;;^UTILITY(U,$J,358.3,6328,1,3,0)
;;=3^68200
;;^UTILITY(U,$J,358.3,6329,0)
;;=96372^^39^346^14^^^^1
;;^UTILITY(U,$J,358.3,6329,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6329,1,2,0)
;;=2^SC/IM Injection
;;^UTILITY(U,$J,358.3,6329,1,3,0)
;;=3^96372
;;^UTILITY(U,$J,358.3,6330,0)
;;=96402^^39^346^15^^^^1
;;^UTILITY(U,$J,358.3,6330,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6330,1,2,0)
;;=2^SQ/IM Anti-Neplastic Hormone Inj
;;^UTILITY(U,$J,358.3,6330,1,3,0)
;;=3^96402
;;^UTILITY(U,$J,358.3,6331,0)
;;=J1094^^39^346^6^^^^1
;;^UTILITY(U,$J,358.3,6331,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6331,1,2,0)
;;=2^Dexamethasone Acetate per 1mg
;;^UTILITY(U,$J,358.3,6331,1,3,0)
;;=3^J1094
;;^UTILITY(U,$J,358.3,6332,0)
;;=J3300^^39^346^18^^^^1
;;^UTILITY(U,$J,358.3,6332,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6332,1,2,0)
;;=2^Triescence per 1mg (use w/ 67028)
;;^UTILITY(U,$J,358.3,6332,1,3,0)
;;=3^J3300
;;^UTILITY(U,$J,358.3,6333,0)
;;=J3301^^39^346^10^^^^1
;;^UTILITY(U,$J,358.3,6333,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6333,1,2,0)
;;=2^Kenalog per 10mg
;;^UTILITY(U,$J,358.3,6333,1,3,0)
;;=3^J3301
;;^UTILITY(U,$J,358.3,6334,0)
;;=J3396^^39^346^20^^^^1
;;^UTILITY(U,$J,358.3,6334,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6334,1,2,0)
;;=2^Verteporfin/Visudyne per 0.1mg
;;^UTILITY(U,$J,358.3,6334,1,3,0)
;;=3^J3396
;;^UTILITY(U,$J,358.3,6335,0)
;;=J9035^^39^346^4^^^^1
;;^UTILITY(U,$J,358.3,6335,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6335,1,2,0)
;;=2^Bevacizumab 10mg (use w/ 67028)
;;^UTILITY(U,$J,358.3,6335,1,3,0)
;;=3^J9035
;;^UTILITY(U,$J,358.3,6336,0)
;;=J0178^^39^346^1^^^^1
;;^UTILITY(U,$J,358.3,6336,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6336,1,2,0)
;;=2^Aflibercept 1mg (use w/ 67028)
;;^UTILITY(U,$J,358.3,6336,1,3,0)
;;=3^J0178
;;^UTILITY(U,$J,358.3,6337,0)
;;=J7312^^39^346^7^^^^1
;;^UTILITY(U,$J,358.3,6337,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6337,1,2,0)
;;=2^Dexamethasone Intra Implant
;;^UTILITY(U,$J,358.3,6337,1,3,0)
;;=3^J7312
;;^UTILITY(U,$J,358.3,6338,0)
;;=J3301^^39^346^17^^^^1
;;^UTILITY(U,$J,358.3,6338,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6338,1,2,0)
;;=2^Triamcinolone Acetonide per 10mg (use w/ 67028)
;;^UTILITY(U,$J,358.3,6338,1,3,0)
;;=3^J3301
;;^UTILITY(U,$J,358.3,6339,0)
;;=J2778^^39^346^11^^^^1
;;^UTILITY(U,$J,358.3,6339,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6339,1,2,0)
;;=2^Ranibizumab per .01mg (use w/ 67028)
;;^UTILITY(U,$J,358.3,6339,1,3,0)
;;=3^J2778
;;^UTILITY(U,$J,358.3,6340,0)
;;=C9257^^39^346^3^^^^1
;;^UTILITY(U,$J,358.3,6340,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6340,1,2,0)
;;=2^Bevacizumab 0.25mg (use w/ 67028)
;;^UTILITY(U,$J,358.3,6340,1,3,0)
;;=3^C9257
;;^UTILITY(U,$J,358.3,6341,0)
;;=J0179^^39^346^2^^^^1
;;^UTILITY(U,$J,358.3,6341,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6341,1,2,0)
;;=2^Beovu (Brolucizumab-dbll) 1mg
;;^UTILITY(U,$J,358.3,6341,1,3,0)
;;=3^J0179
;;^UTILITY(U,$J,358.3,6342,0)
;;=Q5124^^39^346^5^^^^1
;;^UTILITY(U,$J,358.3,6342,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6342,1,2,0)
;;=2^Byooviz (Ranibizumab-nuna) 0.1mg
;;^UTILITY(U,$J,358.3,6342,1,3,0)
;;=3^Q5124
;;^UTILITY(U,$J,358.3,6343,0)
;;=J3590^^39^346^19^^^^1
;;^UTILITY(U,$J,358.3,6343,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6343,1,2,0)
;;=2^Vabysmo (faricmab-svoa)
;;^UTILITY(U,$J,358.3,6343,1,3,0)
;;=3^J3590
;;^UTILITY(U,$J,358.3,6344,0)
;;=J3299^^39^346^21^^^^1
;;^UTILITY(U,$J,358.3,6344,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6344,1,2,0)
;;=2^Xipere (Triamcinolone Acetonide Inj Suspension) 1mg
;;^UTILITY(U,$J,358.3,6344,1,3,0)
;;=3^J3299
;;^UTILITY(U,$J,358.3,6345,0)
;;=67028^^39^347^1^^^^1
;;^UTILITY(U,$J,358.3,6345,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6345,1,2,0)
;;=2^INTRAVITREAL EYE INJ-1 Eye/Unilateral
;;^UTILITY(U,$J,358.3,6345,1,3,0)
;;=3^67028
;;^UTILITY(U,$J,358.3,6346,0)
;;=J3301^^39^347^7^^^^1
;;^UTILITY(U,$J,358.3,6346,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6346,1,2,0)
;;=2^Triamcinolone/KENALOG (use w/ 68200)
;;^UTILITY(U,$J,358.3,6346,1,3,0)
;;=3^J3301
;;^UTILITY(U,$J,358.3,6347,0)
;;=J0178^^39^347^2^^^^1
;;^UTILITY(U,$J,358.3,6347,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6347,1,2,0)
;;=2^Aflib/EYLEA (use w/ 67028)
;;^UTILITY(U,$J,358.3,6347,1,3,0)
;;=3^J0178
;;^UTILITY(U,$J,358.3,6348,0)
;;=J7312^^39^347^14^^^^1
;;^UTILITY(U,$J,358.3,6348,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6348,1,2,0)
;;=2^Dexameth Implant/OZURDEX
;;^UTILITY(U,$J,358.3,6348,1,3,0)
;;=3^J7312
;;^UTILITY(U,$J,358.3,6349,0)
;;=J3300^^39^347^8^^^^1
;;^UTILITY(U,$J,358.3,6349,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6349,1,2,0)
;;=2^Triamcinolone/TRIESENCE (use w/ 67028)
;;^UTILITY(U,$J,358.3,6349,1,3,0)
;;=3^J3300
;;^UTILITY(U,$J,358.3,6350,0)
;;=64612^^39^347^10^^^^1
;;^UTILITY(U,$J,358.3,6350,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6350,1,2,0)
;;=2^Chemodenervation of Muscle Inj (eg,Botox),Unilat
;;^UTILITY(U,$J,358.3,6350,1,3,0)
;;=3^64612
;;^UTILITY(U,$J,358.3,6351,0)
;;=68200^^39^347^6^^^^1
;;^UTILITY(U,$J,358.3,6351,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6351,1,2,0)
;;=2^Subtenons Injection
;;^UTILITY(U,$J,358.3,6351,1,3,0)
;;=3^68200
;;^UTILITY(U,$J,358.3,6352,0)
;;=67505^^39^347^15^^^^1
;;^UTILITY(U,$J,358.3,6352,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6352,1,2,0)
;;=2^Retrobulbar Inj,Alcohol
;;^UTILITY(U,$J,358.3,6352,1,3,0)
;;=3^67505
;;^UTILITY(U,$J,358.3,6353,0)
;;=67500^^39^347^16^^^^1
;;^UTILITY(U,$J,358.3,6353,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6353,1,2,0)
;;=2^Retrobulbar Inj,Any Medication
;;^UTILITY(U,$J,358.3,6353,1,3,0)
;;=3^67500
;;^UTILITY(U,$J,358.3,6354,0)
;;=68200^^39^347^9^^^^1
;;^UTILITY(U,$J,358.3,6354,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6354,1,2,0)
;;=2^Subconjunctival Injection
;;^UTILITY(U,$J,358.3,6354,1,3,0)
;;=3^68200
;;^UTILITY(U,$J,358.3,6355,0)
;;=J0588^^39^347^13^^^^1
;;^UTILITY(U,$J,358.3,6355,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6355,1,2,0)
;;=2^Xeomin 1 Unit (use w/ 64612)
;;^UTILITY(U,$J,358.3,6355,1,3,0)
;;=3^J0588
;;^UTILITY(U,$J,358.3,6356,0)
;;=J0587^^39^347^11^^^^1
;;^UTILITY(U,$J,358.3,6356,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6356,1,2,0)
;;=2^Myobloc 100 Units (use with 64612)
;;^UTILITY(U,$J,358.3,6356,1,3,0)
;;=3^J0587
;;^UTILITY(U,$J,358.3,6357,0)
;;=J0585^^39^347^12^^^^1
;;^UTILITY(U,$J,358.3,6357,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6357,1,2,0)
;;=2^Botox 1 Unit (use w/ 64612)
;;^UTILITY(U,$J,358.3,6357,1,3,0)
;;=3^J0585
;;^UTILITY(U,$J,358.3,6358,0)
;;=J2778^^39^347^3^^^^1
;;^UTILITY(U,$J,358.3,6358,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6358,1,2,0)
;;=2^Ranibiz/LUCENTIS (use w/ 67028)
;;^UTILITY(U,$J,358.3,6358,1,3,0)
;;=3^J2778
;;^UTILITY(U,$J,358.3,6359,0)
;;=C9257^^39^347^4^^^^1
;;^UTILITY(U,$J,358.3,6359,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6359,1,2,0)
;;=2^Bevaciz/AVASTIN (use w/ 67028)
;;^UTILITY(U,$J,358.3,6359,1,3,0)
;;=3^C9257
;;^UTILITY(U,$J,358.3,6360,0)
;;=67028^^39^347^5^^^^1
;;^UTILITY(U,$J,358.3,6360,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6360,1,2,0)
;;=2^INTRAVITREAL EYE INJ-2 Eye/Bilateral
;;^UTILITY(U,$J,358.3,6360,1,3,0)
;;=3^67028
;;^UTILITY(U,$J,358.3,6360,3,0)
;;=^357.33^1^1
;;^UTILITY(U,$J,358.3,6360,3,1,0)
;;=50
;;^UTILITY(U,$J,358.3,6361,0)
;;=92134^^39^348^4^^^^1
;;^UTILITY(U,$J,358.3,6361,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6361,1,2,0)
;;=2^OCT Macula (retina)
;;^UTILITY(U,$J,358.3,6361,1,3,0)
;;=3^92134
;;^UTILITY(U,$J,358.3,6362,0)
;;=92133^^39^348^5^^^^1
;;^UTILITY(U,$J,358.3,6362,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6362,1,2,0)
;;=2^OCT RNFL (optic nerve)
;;^UTILITY(U,$J,358.3,6362,1,3,0)
;;=3^92133
;;^UTILITY(U,$J,358.3,6363,0)
;;=92132^^39^348^6^^^^1
;;^UTILITY(U,$J,358.3,6363,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6363,1,2,0)
;;=2^OCT Anterior Segment (angle)
;;^UTILITY(U,$J,358.3,6363,1,3,0)
;;=3^92132
;;^UTILITY(U,$J,358.3,6364,0)
;;=92250^^39^348^2^^^^1
;;^UTILITY(U,$J,358.3,6364,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6364,1,2,0)
;;=2^Fundus Photos
;;^UTILITY(U,$J,358.3,6364,1,3,0)
;;=3^92250
;;^UTILITY(U,$J,358.3,6365,0)
;;=92235^^39^348^3^^^^1
;;^UTILITY(U,$J,358.3,6365,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6365,1,2,0)
;;=2^Fluorescein Angiography,Unilat or Bilat
;;^UTILITY(U,$J,358.3,6365,1,3,0)
;;=3^92235
;;^UTILITY(U,$J,358.3,6366,0)
;;=92240^^39^348^7^^^^1
;;^UTILITY(U,$J,358.3,6366,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6366,1,2,0)
;;=2^ICG Angiography,Unilat or Bilat
;;^UTILITY(U,$J,358.3,6366,1,3,0)
;;=3^92240
;;^UTILITY(U,$J,358.3,6367,0)
;;=92285^^39^348^1^^^^1
;;^UTILITY(U,$J,358.3,6367,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6367,1,2,0)
;;=2^External or Slit Lamp Photos
;;^UTILITY(U,$J,358.3,6367,1,3,0)
;;=3^92285
;;^UTILITY(U,$J,358.3,6368,0)
;;=76514^^39^348^9^^^^1
;;^UTILITY(U,$J,358.3,6368,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6368,1,2,0)
;;=2^Pachymetry (corneal thickness)
;;^UTILITY(U,$J,358.3,6368,1,3,0)
;;=3^76514
;;^UTILITY(U,$J,358.3,6369,0)
;;=92025^^39^348^10^^^^1
;;^UTILITY(U,$J,358.3,6369,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6369,1,2,0)
;;=2^Topography (cornea),Unilat or Bilat
;;^UTILITY(U,$J,358.3,6369,1,3,0)
;;=3^92025
;;^UTILITY(U,$J,358.3,6370,0)
;;=92242^^39^348^8^^^^1
;;^UTILITY(U,$J,358.3,6370,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6370,1,2,0)
;;=2^Fluorescein & ICG Angiography,Unilat or Bilat
;;^UTILITY(U,$J,358.3,6370,1,3,0)
;;=3^92242
;;^UTILITY(U,$J,358.3,6371,0)
;;=92286^^39^348^11^^^^1
;;^UTILITY(U,$J,358.3,6371,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6371,1,2,0)
;;=2^Specular Microscopy
;;^UTILITY(U,$J,358.3,6371,1,3,0)
;;=3^92286
;;^UTILITY(U,$J,358.3,6372,0)
;;=S3000^^39^348^12^^^^1
;;^UTILITY(U,$J,358.3,6372,1,0)
;;=^358.31IA^3^1
;;^UTILITY(U,$J,358.3,6372,1,3,0)
;;=3^S3000
;;^UTILITY(U,$J,358.3,6373,0)
;;=92311^^39^349^11^^^^1
;;^UTILITY(U,$J,358.3,6373,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6373,1,2,0)
;;=2^Contact Lens-Aphakia OD/OS
;;^UTILITY(U,$J,358.3,6373,1,3,0)
;;=3^92311
;;^UTILITY(U,$J,358.3,6374,0)
;;=92312^^39^349^12^^^^1
;;^UTILITY(U,$J,358.3,6374,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6374,1,2,0)
;;=2^Contact Lens-Aphakia OU
;;^UTILITY(U,$J,358.3,6374,1,3,0)
;;=3^92312
;;^UTILITY(U,$J,358.3,6375,0)
;;=92340^^39^349^5^^^^1
;;^UTILITY(U,$J,358.3,6375,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6375,1,2,0)
;;=2^Glasses Fitting, Monofocal
;;^UTILITY(U,$J,358.3,6375,1,3,0)
;;=3^92340
;;^UTILITY(U,$J,358.3,6376,0)
;;=92341^^39^349^4^^^^1
;;^UTILITY(U,$J,358.3,6376,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6376,1,2,0)
;;=2^Glasses Fitting, Bifocal
;;^UTILITY(U,$J,358.3,6376,1,3,0)
;;=3^92341
;;^UTILITY(U,$J,358.3,6377,0)
;;=92342^^39^349^7^^^^1
;;^UTILITY(U,$J,358.3,6377,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6377,1,2,0)
;;=2^Glasses Fitting, Multifocal
;;^UTILITY(U,$J,358.3,6377,1,3,0)
;;=3^92342
;;^UTILITY(U,$J,358.3,6378,0)
;;=92352^^39^349^6^^^^1
;;^UTILITY(U,$J,358.3,6378,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6378,1,2,0)
;;=2^Glasses Fitting, Monofocal for Aphakia
;;^UTILITY(U,$J,358.3,6378,1,3,0)
;;=3^92352
;;^UTILITY(U,$J,358.3,6379,0)
;;=92353^^39^349^8^^^^1
;;^UTILITY(U,$J,358.3,6379,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6379,1,2,0)
;;=2^Glasses Fitting, Multifocal, for Aphakia
;;^UTILITY(U,$J,358.3,6379,1,3,0)
;;=3^92353
;;^UTILITY(U,$J,358.3,6380,0)
;;=92354^^39^349^13^^^^1
;;^UTILITY(U,$J,358.3,6380,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6380,1,2,0)
;;=2^Low Vision Aid Fitting, Single Element
;;^UTILITY(U,$J,358.3,6380,1,3,0)
;;=3^92354
;;^UTILITY(U,$J,358.3,6381,0)
;;=92355^^39^349^14^^^^1
;;^UTILITY(U,$J,358.3,6381,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6381,1,2,0)
;;=2^Low Vision Aid Fitting, Telescopic/Compound Lens
;;^UTILITY(U,$J,358.3,6381,1,3,0)
;;=3^92355
;;^UTILITY(U,$J,358.3,6382,0)
;;=92370^^39^349^3^^^^1
;;^UTILITY(U,$J,358.3,6382,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6382,1,2,0)
;;=2^Repair/Refit Glasses
;;^UTILITY(U,$J,358.3,6382,1,3,0)
;;=3^92370
;;^UTILITY(U,$J,358.3,6383,0)
;;=92371^^39^349^9^^^^1
;;^UTILITY(U,$J,358.3,6383,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6383,1,2,0)
;;=2^Repair/Refit Glasses for Aphakia
;;^UTILITY(U,$J,358.3,6383,1,3,0)
;;=3^92371
;;^UTILITY(U,$J,358.3,6384,0)
;;=92071^^39^349^10^^^^1
;;^UTILITY(U,$J,358.3,6384,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6384,1,2,0)
;;=2^Contact Lens Tx for Ocular Disease
;;^UTILITY(U,$J,358.3,6384,1,3,0)
;;=3^92071
;;^UTILITY(U,$J,358.3,6385,0)
;;=92072^^39^349^15^^^^1
;;^UTILITY(U,$J,358.3,6385,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6385,1,2,0)
;;=2^Contact Lens Mgmt Keratoconus,Init
;;^UTILITY(U,$J,358.3,6385,1,3,0)
;;=3^92072
;;^UTILITY(U,$J,358.3,6386,0)
;;=92015^^39^349^1^^^^1
;;^UTILITY(U,$J,358.3,6386,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6386,1,2,0)
;;=2^Refraction
;;^UTILITY(U,$J,358.3,6386,1,3,0)
;;=3^92015
;;^UTILITY(U,$J,358.3,6387,0)
;;=99174^^39^349^2^^^^1
;;^UTILITY(U,$J,358.3,6387,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6387,1,2,0)
;;=2^Autorefraction,Bilateral
;;^UTILITY(U,$J,358.3,6387,1,3,0)
;;=3^99174
;;^UTILITY(U,$J,358.3,6388,0)
;;=92310^^39^349^16^^^^1
;;^UTILITY(U,$J,358.3,6388,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6388,1,2,0)
;;=2^Contact Lens Fitting,OD/OS
;;^UTILITY(U,$J,358.3,6388,1,3,0)
;;=3^92310
;;^UTILITY(U,$J,358.3,6389,0)
;;=99070^^39^349^17^^^^1
;;^UTILITY(U,$J,358.3,6389,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6389,1,2,0)
;;=2^Special Supplies by Phys
;;^UTILITY(U,$J,358.3,6389,1,3,0)
;;=3^99070
;;^UTILITY(U,$J,358.3,6390,0)
;;=V2513^^39^349^18^^^^1
;;^UTILITY(U,$J,358.3,6390,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6390,1,2,0)
;;=2^Gas-Permeable Lens,Ext Wear,Per Lens
;;^UTILITY(U,$J,358.3,6390,1,3,0)
;;=3^V2513
;;^UTILITY(U,$J,358.3,6391,0)
;;=V2523^^39^349^19^^^^1
;;^UTILITY(U,$J,358.3,6391,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6391,1,2,0)
;;=2^Hydrophilic Contact Lens,Ext Wear,Per Lens
;;^UTILITY(U,$J,358.3,6391,1,3,0)
;;=3^V2523
;;^UTILITY(U,$J,358.3,6392,0)
;;=V2530^^39^349^20^^^^1
;;^UTILITY(U,$J,358.3,6392,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6392,1,2,0)
;;=2^Hybrid Contact Lens,Per Lens
;;^UTILITY(U,$J,358.3,6392,1,3,0)
;;=3^V2530
;;^UTILITY(U,$J,358.3,6393,0)
;;=V2531^^39^349^21^^^^1
;;^UTILITY(U,$J,358.3,6393,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6393,1,2,0)
;;=2^Gas-Permeable Scleral Lens,Per Lens
;;^UTILITY(U,$J,358.3,6393,1,3,0)
;;=3^V2531
;;^UTILITY(U,$J,358.3,6394,0)
;;=V2599^^39^349^22^^^^1
;;^UTILITY(U,$J,358.3,6394,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6394,1,2,0)
;;=2^Contact Lens,Oth Type,Per Lens
;;^UTILITY(U,$J,358.3,6394,1,3,0)
;;=3^V2599
;;^UTILITY(U,$J,358.3,6395,0)
;;=92015^^39^350^2^^^^1
;;^UTILITY(U,$J,358.3,6395,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6395,1,2,0)
;;=2^Refraction
;;^UTILITY(U,$J,358.3,6395,1,3,0)
;;=3^92015
;;^UTILITY(U,$J,358.3,6396,0)
;;=92025^^39^350^3^^^^1
;;^UTILITY(U,$J,358.3,6396,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6396,1,2,0)
;;=2^Topography (cornea)
;;^UTILITY(U,$J,358.3,6396,1,3,0)
;;=3^92025
;;^UTILITY(U,$J,358.3,6397,0)
;;=76511^^39^350^6^^^^1
;;^UTILITY(U,$J,358.3,6397,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6397,1,2,0)
;;=2^U/S A-Scan Only
;;^UTILITY(U,$J,358.3,6397,1,3,0)
;;=3^76511
;;^UTILITY(U,$J,358.3,6398,0)
;;=76512^^39^350^7^^^^1
;;^UTILITY(U,$J,358.3,6398,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6398,1,2,0)
;;=2^U/S B-Scan Only
;;^UTILITY(U,$J,358.3,6398,1,3,0)
;;=3^76512
;;^UTILITY(U,$J,358.3,6399,0)
;;=76513^^39^350^8^^^^1
;;^UTILITY(U,$J,358.3,6399,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6399,1,2,0)
;;=2^U/S B-Scan,Ant Seg,Water Immersion
;;^UTILITY(U,$J,358.3,6399,1,3,0)
;;=3^76513
;;^UTILITY(U,$J,358.3,6400,0)
;;=92020^^39^350^11^^^^1
;;^UTILITY(U,$J,358.3,6400,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6400,1,2,0)
;;=2^Gonioscopy
;;^UTILITY(U,$J,358.3,6400,1,3,0)
;;=3^92020
;;^UTILITY(U,$J,358.3,6401,0)
;;=92499^^39^350^12^^^^1
;;^UTILITY(U,$J,358.3,6401,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6401,1,2,0)
;;=2^Hertel's Exophthalmometry
;;^UTILITY(U,$J,358.3,6401,1,3,0)
;;=3^92499
;;^UTILITY(U,$J,358.3,6402,0)
;;=99174^^39^350^1^^^^1
;;^UTILITY(U,$J,358.3,6402,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6402,1,2,0)
;;=2^Autorefraction,Bilateral
;;^UTILITY(U,$J,358.3,6402,1,3,0)
;;=3^99174
;;^UTILITY(U,$J,358.3,6403,0)
;;=92136^^39^350^4^^^^1
;;^UTILITY(U,$J,358.3,6403,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6403,1,2,0)
;;=2^IOL Calc Biometry-Optical
;;^UTILITY(U,$J,358.3,6403,1,3,0)
;;=3^92136
;;^UTILITY(U,$J,358.3,6404,0)
;;=76519^^39^350^5^^^^1
;;^UTILITY(U,$J,358.3,6404,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6404,1,2,0)
;;=2^IOL Calc w/ A-Scan U/S
;;^UTILITY(U,$J,358.3,6404,1,3,0)
;;=3^76519
;;^UTILITY(U,$J,358.3,6405,0)
;;=92132^^39^350^9^^^^1
;;^UTILITY(U,$J,358.3,6405,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6405,1,2,0)
;;=2^OCT Anterior Segment (angle or cornea)
;;^UTILITY(U,$J,358.3,6405,1,3,0)
;;=3^92132
;;^UTILITY(U,$J,358.3,6406,0)
;;=92286^^39^350^10^^^^1
;;^UTILITY(U,$J,358.3,6406,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6406,1,2,0)
;;=2^Specular Microscopy
;;^UTILITY(U,$J,358.3,6406,1,3,0)
;;=3^92286
;;^UTILITY(U,$J,358.3,6407,0)
;;=92250^^39^351^1^^^^1
;;^UTILITY(U,$J,358.3,6407,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,6407,1,2,0)
;;=2^Fundus Photos
;;^UTILITY(U,$J,358.3,6407,1,3,0)
;;=3^92250
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HIBDEI02P 19785 printed Dec 13, 2024@01:40:26 Page 2
IBDEI02P ; ; 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,6324,1,0)
+2 ;;=^358.31IA^3^2
+3 ;;^UTILITY(U,$J,358.3,6324,1,2,0)
+4 ;;=2^Inj Treatment of Eye,Medication
+5 ;;^UTILITY(U,$J,358.3,6324,1,3,0)
+6 ;;=3^66030
+7 ;;^UTILITY(U,$J,358.3,6325,0)
+8 ;;=67028^^39^346^9^^^^1
+9 ;;^UTILITY(U,$J,358.3,6325,1,0)
+10 ;;=^358.31IA^3^2
+11 ;;^UTILITY(U,$J,358.3,6325,1,2,0)
+12 ;;=2^Intravitreal Inj of Eye Drug
+13 ;;^UTILITY(U,$J,358.3,6325,1,3,0)
+14 ;;=3^67028
+15 ;;^UTILITY(U,$J,358.3,6326,0)
+16 ;;=67500^^39^346^13^^^^1
+17 ;;^UTILITY(U,$J,358.3,6326,1,0)
+18 ;;=^358.31IA^3^2
+19 ;;^UTILITY(U,$J,358.3,6326,1,2,0)
+20 ;;=2^Retrobulbar Inj,Medication
+21 ;;^UTILITY(U,$J,358.3,6326,1,3,0)
+22 ;;=3^67500
+23 ;;^UTILITY(U,$J,358.3,6327,0)
+24 ;;=67505^^39^346^12^^^^1
+25 ;;^UTILITY(U,$J,358.3,6327,1,0)
+26 ;;=^358.31IA^3^2
+27 ;;^UTILITY(U,$J,358.3,6327,1,2,0)
+28 ;;=2^Retrobulbar Inj,Alcohol
+29 ;;^UTILITY(U,$J,358.3,6327,1,3,0)
+30 ;;=3^67505
+31 ;;^UTILITY(U,$J,358.3,6328,0)
+32 ;;=68200^^39^346^16^^^^1
+33 ;;^UTILITY(U,$J,358.3,6328,1,0)
+34 ;;=^358.31IA^3^2
+35 ;;^UTILITY(U,$J,358.3,6328,1,2,0)
+36 ;;=2^Subconjunctival Injection
+37 ;;^UTILITY(U,$J,358.3,6328,1,3,0)
+38 ;;=3^68200
+39 ;;^UTILITY(U,$J,358.3,6329,0)
+40 ;;=96372^^39^346^14^^^^1
+41 ;;^UTILITY(U,$J,358.3,6329,1,0)
+42 ;;=^358.31IA^3^2
+43 ;;^UTILITY(U,$J,358.3,6329,1,2,0)
+44 ;;=2^SC/IM Injection
+45 ;;^UTILITY(U,$J,358.3,6329,1,3,0)
+46 ;;=3^96372
+47 ;;^UTILITY(U,$J,358.3,6330,0)
+48 ;;=96402^^39^346^15^^^^1
+49 ;;^UTILITY(U,$J,358.3,6330,1,0)
+50 ;;=^358.31IA^3^2
+51 ;;^UTILITY(U,$J,358.3,6330,1,2,0)
+52 ;;=2^SQ/IM Anti-Neplastic Hormone Inj
+53 ;;^UTILITY(U,$J,358.3,6330,1,3,0)
+54 ;;=3^96402
+55 ;;^UTILITY(U,$J,358.3,6331,0)
+56 ;;=J1094^^39^346^6^^^^1
+57 ;;^UTILITY(U,$J,358.3,6331,1,0)
+58 ;;=^358.31IA^3^2
+59 ;;^UTILITY(U,$J,358.3,6331,1,2,0)
+60 ;;=2^Dexamethasone Acetate per 1mg
+61 ;;^UTILITY(U,$J,358.3,6331,1,3,0)
+62 ;;=3^J1094
+63 ;;^UTILITY(U,$J,358.3,6332,0)
+64 ;;=J3300^^39^346^18^^^^1
+65 ;;^UTILITY(U,$J,358.3,6332,1,0)
+66 ;;=^358.31IA^3^2
+67 ;;^UTILITY(U,$J,358.3,6332,1,2,0)
+68 ;;=2^Triescence per 1mg (use w/ 67028)
+69 ;;^UTILITY(U,$J,358.3,6332,1,3,0)
+70 ;;=3^J3300
+71 ;;^UTILITY(U,$J,358.3,6333,0)
+72 ;;=J3301^^39^346^10^^^^1
+73 ;;^UTILITY(U,$J,358.3,6333,1,0)
+74 ;;=^358.31IA^3^2
+75 ;;^UTILITY(U,$J,358.3,6333,1,2,0)
+76 ;;=2^Kenalog per 10mg
+77 ;;^UTILITY(U,$J,358.3,6333,1,3,0)
+78 ;;=3^J3301
+79 ;;^UTILITY(U,$J,358.3,6334,0)
+80 ;;=J3396^^39^346^20^^^^1
+81 ;;^UTILITY(U,$J,358.3,6334,1,0)
+82 ;;=^358.31IA^3^2
+83 ;;^UTILITY(U,$J,358.3,6334,1,2,0)
+84 ;;=2^Verteporfin/Visudyne per 0.1mg
+85 ;;^UTILITY(U,$J,358.3,6334,1,3,0)
+86 ;;=3^J3396
+87 ;;^UTILITY(U,$J,358.3,6335,0)
+88 ;;=J9035^^39^346^4^^^^1
+89 ;;^UTILITY(U,$J,358.3,6335,1,0)
+90 ;;=^358.31IA^3^2
+91 ;;^UTILITY(U,$J,358.3,6335,1,2,0)
+92 ;;=2^Bevacizumab 10mg (use w/ 67028)
+93 ;;^UTILITY(U,$J,358.3,6335,1,3,0)
+94 ;;=3^J9035
+95 ;;^UTILITY(U,$J,358.3,6336,0)
+96 ;;=J0178^^39^346^1^^^^1
+97 ;;^UTILITY(U,$J,358.3,6336,1,0)
+98 ;;=^358.31IA^3^2
+99 ;;^UTILITY(U,$J,358.3,6336,1,2,0)
+100 ;;=2^Aflibercept 1mg (use w/ 67028)
+101 ;;^UTILITY(U,$J,358.3,6336,1,3,0)
+102 ;;=3^J0178
+103 ;;^UTILITY(U,$J,358.3,6337,0)
+104 ;;=J7312^^39^346^7^^^^1
+105 ;;^UTILITY(U,$J,358.3,6337,1,0)
+106 ;;=^358.31IA^3^2
+107 ;;^UTILITY(U,$J,358.3,6337,1,2,0)
+108 ;;=2^Dexamethasone Intra Implant
+109 ;;^UTILITY(U,$J,358.3,6337,1,3,0)
+110 ;;=3^J7312
+111 ;;^UTILITY(U,$J,358.3,6338,0)
+112 ;;=J3301^^39^346^17^^^^1
+113 ;;^UTILITY(U,$J,358.3,6338,1,0)
+114 ;;=^358.31IA^3^2
+115 ;;^UTILITY(U,$J,358.3,6338,1,2,0)
+116 ;;=2^Triamcinolone Acetonide per 10mg (use w/ 67028)
+117 ;;^UTILITY(U,$J,358.3,6338,1,3,0)
+118 ;;=3^J3301
+119 ;;^UTILITY(U,$J,358.3,6339,0)
+120 ;;=J2778^^39^346^11^^^^1
+121 ;;^UTILITY(U,$J,358.3,6339,1,0)
+122 ;;=^358.31IA^3^2
+123 ;;^UTILITY(U,$J,358.3,6339,1,2,0)
+124 ;;=2^Ranibizumab per .01mg (use w/ 67028)
+125 ;;^UTILITY(U,$J,358.3,6339,1,3,0)
+126 ;;=3^J2778
+127 ;;^UTILITY(U,$J,358.3,6340,0)
+128 ;;=C9257^^39^346^3^^^^1
+129 ;;^UTILITY(U,$J,358.3,6340,1,0)
+130 ;;=^358.31IA^3^2
+131 ;;^UTILITY(U,$J,358.3,6340,1,2,0)
+132 ;;=2^Bevacizumab 0.25mg (use w/ 67028)
+133 ;;^UTILITY(U,$J,358.3,6340,1,3,0)
+134 ;;=3^C9257
+135 ;;^UTILITY(U,$J,358.3,6341,0)
+136 ;;=J0179^^39^346^2^^^^1
+137 ;;^UTILITY(U,$J,358.3,6341,1,0)
+138 ;;=^358.31IA^3^2
+139 ;;^UTILITY(U,$J,358.3,6341,1,2,0)
+140 ;;=2^Beovu (Brolucizumab-dbll) 1mg
+141 ;;^UTILITY(U,$J,358.3,6341,1,3,0)
+142 ;;=3^J0179
+143 ;;^UTILITY(U,$J,358.3,6342,0)
+144 ;;=Q5124^^39^346^5^^^^1
+145 ;;^UTILITY(U,$J,358.3,6342,1,0)
+146 ;;=^358.31IA^3^2
+147 ;;^UTILITY(U,$J,358.3,6342,1,2,0)
+148 ;;=2^Byooviz (Ranibizumab-nuna) 0.1mg
+149 ;;^UTILITY(U,$J,358.3,6342,1,3,0)
+150 ;;=3^Q5124
+151 ;;^UTILITY(U,$J,358.3,6343,0)
+152 ;;=J3590^^39^346^19^^^^1
+153 ;;^UTILITY(U,$J,358.3,6343,1,0)
+154 ;;=^358.31IA^3^2
+155 ;;^UTILITY(U,$J,358.3,6343,1,2,0)
+156 ;;=2^Vabysmo (faricmab-svoa)
+157 ;;^UTILITY(U,$J,358.3,6343,1,3,0)
+158 ;;=3^J3590
+159 ;;^UTILITY(U,$J,358.3,6344,0)
+160 ;;=J3299^^39^346^21^^^^1
+161 ;;^UTILITY(U,$J,358.3,6344,1,0)
+162 ;;=^358.31IA^3^2
+163 ;;^UTILITY(U,$J,358.3,6344,1,2,0)
+164 ;;=2^Xipere (Triamcinolone Acetonide Inj Suspension) 1mg
+165 ;;^UTILITY(U,$J,358.3,6344,1,3,0)
+166 ;;=3^J3299
+167 ;;^UTILITY(U,$J,358.3,6345,0)
+168 ;;=67028^^39^347^1^^^^1
+169 ;;^UTILITY(U,$J,358.3,6345,1,0)
+170 ;;=^358.31IA^3^2
+171 ;;^UTILITY(U,$J,358.3,6345,1,2,0)
+172 ;;=2^INTRAVITREAL EYE INJ-1 Eye/Unilateral
+173 ;;^UTILITY(U,$J,358.3,6345,1,3,0)
+174 ;;=3^67028
+175 ;;^UTILITY(U,$J,358.3,6346,0)
+176 ;;=J3301^^39^347^7^^^^1
+177 ;;^UTILITY(U,$J,358.3,6346,1,0)
+178 ;;=^358.31IA^3^2
+179 ;;^UTILITY(U,$J,358.3,6346,1,2,0)
+180 ;;=2^Triamcinolone/KENALOG (use w/ 68200)
+181 ;;^UTILITY(U,$J,358.3,6346,1,3,0)
+182 ;;=3^J3301
+183 ;;^UTILITY(U,$J,358.3,6347,0)
+184 ;;=J0178^^39^347^2^^^^1
+185 ;;^UTILITY(U,$J,358.3,6347,1,0)
+186 ;;=^358.31IA^3^2
+187 ;;^UTILITY(U,$J,358.3,6347,1,2,0)
+188 ;;=2^Aflib/EYLEA (use w/ 67028)
+189 ;;^UTILITY(U,$J,358.3,6347,1,3,0)
+190 ;;=3^J0178
+191 ;;^UTILITY(U,$J,358.3,6348,0)
+192 ;;=J7312^^39^347^14^^^^1
+193 ;;^UTILITY(U,$J,358.3,6348,1,0)
+194 ;;=^358.31IA^3^2
+195 ;;^UTILITY(U,$J,358.3,6348,1,2,0)
+196 ;;=2^Dexameth Implant/OZURDEX
+197 ;;^UTILITY(U,$J,358.3,6348,1,3,0)
+198 ;;=3^J7312
+199 ;;^UTILITY(U,$J,358.3,6349,0)
+200 ;;=J3300^^39^347^8^^^^1
+201 ;;^UTILITY(U,$J,358.3,6349,1,0)
+202 ;;=^358.31IA^3^2
+203 ;;^UTILITY(U,$J,358.3,6349,1,2,0)
+204 ;;=2^Triamcinolone/TRIESENCE (use w/ 67028)
+205 ;;^UTILITY(U,$J,358.3,6349,1,3,0)
+206 ;;=3^J3300
+207 ;;^UTILITY(U,$J,358.3,6350,0)
+208 ;;=64612^^39^347^10^^^^1
+209 ;;^UTILITY(U,$J,358.3,6350,1,0)
+210 ;;=^358.31IA^3^2
+211 ;;^UTILITY(U,$J,358.3,6350,1,2,0)
+212 ;;=2^Chemodenervation of Muscle Inj (eg,Botox),Unilat
+213 ;;^UTILITY(U,$J,358.3,6350,1,3,0)
+214 ;;=3^64612
+215 ;;^UTILITY(U,$J,358.3,6351,0)
+216 ;;=68200^^39^347^6^^^^1
+217 ;;^UTILITY(U,$J,358.3,6351,1,0)
+218 ;;=^358.31IA^3^2
+219 ;;^UTILITY(U,$J,358.3,6351,1,2,0)
+220 ;;=2^Subtenons Injection
+221 ;;^UTILITY(U,$J,358.3,6351,1,3,0)
+222 ;;=3^68200
+223 ;;^UTILITY(U,$J,358.3,6352,0)
+224 ;;=67505^^39^347^15^^^^1
+225 ;;^UTILITY(U,$J,358.3,6352,1,0)
+226 ;;=^358.31IA^3^2
+227 ;;^UTILITY(U,$J,358.3,6352,1,2,0)
+228 ;;=2^Retrobulbar Inj,Alcohol
+229 ;;^UTILITY(U,$J,358.3,6352,1,3,0)
+230 ;;=3^67505
+231 ;;^UTILITY(U,$J,358.3,6353,0)
+232 ;;=67500^^39^347^16^^^^1
+233 ;;^UTILITY(U,$J,358.3,6353,1,0)
+234 ;;=^358.31IA^3^2
+235 ;;^UTILITY(U,$J,358.3,6353,1,2,0)
+236 ;;=2^Retrobulbar Inj,Any Medication
+237 ;;^UTILITY(U,$J,358.3,6353,1,3,0)
+238 ;;=3^67500
+239 ;;^UTILITY(U,$J,358.3,6354,0)
+240 ;;=68200^^39^347^9^^^^1
+241 ;;^UTILITY(U,$J,358.3,6354,1,0)
+242 ;;=^358.31IA^3^2
+243 ;;^UTILITY(U,$J,358.3,6354,1,2,0)
+244 ;;=2^Subconjunctival Injection
+245 ;;^UTILITY(U,$J,358.3,6354,1,3,0)
+246 ;;=3^68200
+247 ;;^UTILITY(U,$J,358.3,6355,0)
+248 ;;=J0588^^39^347^13^^^^1
+249 ;;^UTILITY(U,$J,358.3,6355,1,0)
+250 ;;=^358.31IA^3^2
+251 ;;^UTILITY(U,$J,358.3,6355,1,2,0)
+252 ;;=2^Xeomin 1 Unit (use w/ 64612)
+253 ;;^UTILITY(U,$J,358.3,6355,1,3,0)
+254 ;;=3^J0588
+255 ;;^UTILITY(U,$J,358.3,6356,0)
+256 ;;=J0587^^39^347^11^^^^1
+257 ;;^UTILITY(U,$J,358.3,6356,1,0)
+258 ;;=^358.31IA^3^2
+259 ;;^UTILITY(U,$J,358.3,6356,1,2,0)
+260 ;;=2^Myobloc 100 Units (use with 64612)
+261 ;;^UTILITY(U,$J,358.3,6356,1,3,0)
+262 ;;=3^J0587
+263 ;;^UTILITY(U,$J,358.3,6357,0)
+264 ;;=J0585^^39^347^12^^^^1
+265 ;;^UTILITY(U,$J,358.3,6357,1,0)
+266 ;;=^358.31IA^3^2
+267 ;;^UTILITY(U,$J,358.3,6357,1,2,0)
+268 ;;=2^Botox 1 Unit (use w/ 64612)
+269 ;;^UTILITY(U,$J,358.3,6357,1,3,0)
+270 ;;=3^J0585
+271 ;;^UTILITY(U,$J,358.3,6358,0)
+272 ;;=J2778^^39^347^3^^^^1
+273 ;;^UTILITY(U,$J,358.3,6358,1,0)
+274 ;;=^358.31IA^3^2
+275 ;;^UTILITY(U,$J,358.3,6358,1,2,0)
+276 ;;=2^Ranibiz/LUCENTIS (use w/ 67028)
+277 ;;^UTILITY(U,$J,358.3,6358,1,3,0)
+278 ;;=3^J2778
+279 ;;^UTILITY(U,$J,358.3,6359,0)
+280 ;;=C9257^^39^347^4^^^^1
+281 ;;^UTILITY(U,$J,358.3,6359,1,0)
+282 ;;=^358.31IA^3^2
+283 ;;^UTILITY(U,$J,358.3,6359,1,2,0)
+284 ;;=2^Bevaciz/AVASTIN (use w/ 67028)
+285 ;;^UTILITY(U,$J,358.3,6359,1,3,0)
+286 ;;=3^C9257
+287 ;;^UTILITY(U,$J,358.3,6360,0)
+288 ;;=67028^^39^347^5^^^^1
+289 ;;^UTILITY(U,$J,358.3,6360,1,0)
+290 ;;=^358.31IA^3^2
+291 ;;^UTILITY(U,$J,358.3,6360,1,2,0)
+292 ;;=2^INTRAVITREAL EYE INJ-2 Eye/Bilateral
+293 ;;^UTILITY(U,$J,358.3,6360,1,3,0)
+294 ;;=3^67028
+295 ;;^UTILITY(U,$J,358.3,6360,3,0)
+296 ;;=^357.33^1^1
+297 ;;^UTILITY(U,$J,358.3,6360,3,1,0)
+298 ;;=50
+299 ;;^UTILITY(U,$J,358.3,6361,0)
+300 ;;=92134^^39^348^4^^^^1
+301 ;;^UTILITY(U,$J,358.3,6361,1,0)
+302 ;;=^358.31IA^3^2
+303 ;;^UTILITY(U,$J,358.3,6361,1,2,0)
+304 ;;=2^OCT Macula (retina)
+305 ;;^UTILITY(U,$J,358.3,6361,1,3,0)
+306 ;;=3^92134
+307 ;;^UTILITY(U,$J,358.3,6362,0)
+308 ;;=92133^^39^348^5^^^^1
+309 ;;^UTILITY(U,$J,358.3,6362,1,0)
+310 ;;=^358.31IA^3^2
+311 ;;^UTILITY(U,$J,358.3,6362,1,2,0)
+312 ;;=2^OCT RNFL (optic nerve)
+313 ;;^UTILITY(U,$J,358.3,6362,1,3,0)
+314 ;;=3^92133
+315 ;;^UTILITY(U,$J,358.3,6363,0)
+316 ;;=92132^^39^348^6^^^^1
+317 ;;^UTILITY(U,$J,358.3,6363,1,0)
+318 ;;=^358.31IA^3^2
+319 ;;^UTILITY(U,$J,358.3,6363,1,2,0)
+320 ;;=2^OCT Anterior Segment (angle)
+321 ;;^UTILITY(U,$J,358.3,6363,1,3,0)
+322 ;;=3^92132
+323 ;;^UTILITY(U,$J,358.3,6364,0)
+324 ;;=92250^^39^348^2^^^^1
+325 ;;^UTILITY(U,$J,358.3,6364,1,0)
+326 ;;=^358.31IA^3^2
+327 ;;^UTILITY(U,$J,358.3,6364,1,2,0)
+328 ;;=2^Fundus Photos
+329 ;;^UTILITY(U,$J,358.3,6364,1,3,0)
+330 ;;=3^92250
+331 ;;^UTILITY(U,$J,358.3,6365,0)
+332 ;;=92235^^39^348^3^^^^1
+333 ;;^UTILITY(U,$J,358.3,6365,1,0)
+334 ;;=^358.31IA^3^2
+335 ;;^UTILITY(U,$J,358.3,6365,1,2,0)
+336 ;;=2^Fluorescein Angiography,Unilat or Bilat
+337 ;;^UTILITY(U,$J,358.3,6365,1,3,0)
+338 ;;=3^92235
+339 ;;^UTILITY(U,$J,358.3,6366,0)
+340 ;;=92240^^39^348^7^^^^1
+341 ;;^UTILITY(U,$J,358.3,6366,1,0)
+342 ;;=^358.31IA^3^2
+343 ;;^UTILITY(U,$J,358.3,6366,1,2,0)
+344 ;;=2^ICG Angiography,Unilat or Bilat
+345 ;;^UTILITY(U,$J,358.3,6366,1,3,0)
+346 ;;=3^92240
+347 ;;^UTILITY(U,$J,358.3,6367,0)
+348 ;;=92285^^39^348^1^^^^1
+349 ;;^UTILITY(U,$J,358.3,6367,1,0)
+350 ;;=^358.31IA^3^2
+351 ;;^UTILITY(U,$J,358.3,6367,1,2,0)
+352 ;;=2^External or Slit Lamp Photos
+353 ;;^UTILITY(U,$J,358.3,6367,1,3,0)
+354 ;;=3^92285
+355 ;;^UTILITY(U,$J,358.3,6368,0)
+356 ;;=76514^^39^348^9^^^^1
+357 ;;^UTILITY(U,$J,358.3,6368,1,0)
+358 ;;=^358.31IA^3^2
+359 ;;^UTILITY(U,$J,358.3,6368,1,2,0)
+360 ;;=2^Pachymetry (corneal thickness)
+361 ;;^UTILITY(U,$J,358.3,6368,1,3,0)
+362 ;;=3^76514
+363 ;;^UTILITY(U,$J,358.3,6369,0)
+364 ;;=92025^^39^348^10^^^^1
+365 ;;^UTILITY(U,$J,358.3,6369,1,0)
+366 ;;=^358.31IA^3^2
+367 ;;^UTILITY(U,$J,358.3,6369,1,2,0)
+368 ;;=2^Topography (cornea),Unilat or Bilat
+369 ;;^UTILITY(U,$J,358.3,6369,1,3,0)
+370 ;;=3^92025
+371 ;;^UTILITY(U,$J,358.3,6370,0)
+372 ;;=92242^^39^348^8^^^^1
+373 ;;^UTILITY(U,$J,358.3,6370,1,0)
+374 ;;=^358.31IA^3^2
+375 ;;^UTILITY(U,$J,358.3,6370,1,2,0)
+376 ;;=2^Fluorescein & ICG Angiography,Unilat or Bilat
+377 ;;^UTILITY(U,$J,358.3,6370,1,3,0)
+378 ;;=3^92242
+379 ;;^UTILITY(U,$J,358.3,6371,0)
+380 ;;=92286^^39^348^11^^^^1
+381 ;;^UTILITY(U,$J,358.3,6371,1,0)
+382 ;;=^358.31IA^3^2
+383 ;;^UTILITY(U,$J,358.3,6371,1,2,0)
+384 ;;=2^Specular Microscopy
+385 ;;^UTILITY(U,$J,358.3,6371,1,3,0)
+386 ;;=3^92286
+387 ;;^UTILITY(U,$J,358.3,6372,0)
+388 ;;=S3000^^39^348^12^^^^1
+389 ;;^UTILITY(U,$J,358.3,6372,1,0)
+390 ;;=^358.31IA^3^1
+391 ;;^UTILITY(U,$J,358.3,6372,1,3,0)
+392 ;;=3^S3000
+393 ;;^UTILITY(U,$J,358.3,6373,0)
+394 ;;=92311^^39^349^11^^^^1
+395 ;;^UTILITY(U,$J,358.3,6373,1,0)
+396 ;;=^358.31IA^3^2
+397 ;;^UTILITY(U,$J,358.3,6373,1,2,0)
+398 ;;=2^Contact Lens-Aphakia OD/OS
+399 ;;^UTILITY(U,$J,358.3,6373,1,3,0)
+400 ;;=3^92311
+401 ;;^UTILITY(U,$J,358.3,6374,0)
+402 ;;=92312^^39^349^12^^^^1
+403 ;;^UTILITY(U,$J,358.3,6374,1,0)
+404 ;;=^358.31IA^3^2
+405 ;;^UTILITY(U,$J,358.3,6374,1,2,0)
+406 ;;=2^Contact Lens-Aphakia OU
+407 ;;^UTILITY(U,$J,358.3,6374,1,3,0)
+408 ;;=3^92312
+409 ;;^UTILITY(U,$J,358.3,6375,0)
+410 ;;=92340^^39^349^5^^^^1
+411 ;;^UTILITY(U,$J,358.3,6375,1,0)
+412 ;;=^358.31IA^3^2
+413 ;;^UTILITY(U,$J,358.3,6375,1,2,0)
+414 ;;=2^Glasses Fitting, Monofocal
+415 ;;^UTILITY(U,$J,358.3,6375,1,3,0)
+416 ;;=3^92340
+417 ;;^UTILITY(U,$J,358.3,6376,0)
+418 ;;=92341^^39^349^4^^^^1
+419 ;;^UTILITY(U,$J,358.3,6376,1,0)
+420 ;;=^358.31IA^3^2
+421 ;;^UTILITY(U,$J,358.3,6376,1,2,0)
+422 ;;=2^Glasses Fitting, Bifocal
+423 ;;^UTILITY(U,$J,358.3,6376,1,3,0)
+424 ;;=3^92341
+425 ;;^UTILITY(U,$J,358.3,6377,0)
+426 ;;=92342^^39^349^7^^^^1
+427 ;;^UTILITY(U,$J,358.3,6377,1,0)
+428 ;;=^358.31IA^3^2
+429 ;;^UTILITY(U,$J,358.3,6377,1,2,0)
+430 ;;=2^Glasses Fitting, Multifocal
+431 ;;^UTILITY(U,$J,358.3,6377,1,3,0)
+432 ;;=3^92342
+433 ;;^UTILITY(U,$J,358.3,6378,0)
+434 ;;=92352^^39^349^6^^^^1
+435 ;;^UTILITY(U,$J,358.3,6378,1,0)
+436 ;;=^358.31IA^3^2
+437 ;;^UTILITY(U,$J,358.3,6378,1,2,0)
+438 ;;=2^Glasses Fitting, Monofocal for Aphakia
+439 ;;^UTILITY(U,$J,358.3,6378,1,3,0)
+440 ;;=3^92352
+441 ;;^UTILITY(U,$J,358.3,6379,0)
+442 ;;=92353^^39^349^8^^^^1
+443 ;;^UTILITY(U,$J,358.3,6379,1,0)
+444 ;;=^358.31IA^3^2
+445 ;;^UTILITY(U,$J,358.3,6379,1,2,0)
+446 ;;=2^Glasses Fitting, Multifocal, for Aphakia
+447 ;;^UTILITY(U,$J,358.3,6379,1,3,0)
+448 ;;=3^92353
+449 ;;^UTILITY(U,$J,358.3,6380,0)
+450 ;;=92354^^39^349^13^^^^1
+451 ;;^UTILITY(U,$J,358.3,6380,1,0)
+452 ;;=^358.31IA^3^2
+453 ;;^UTILITY(U,$J,358.3,6380,1,2,0)
+454 ;;=2^Low Vision Aid Fitting, Single Element
+455 ;;^UTILITY(U,$J,358.3,6380,1,3,0)
+456 ;;=3^92354
+457 ;;^UTILITY(U,$J,358.3,6381,0)
+458 ;;=92355^^39^349^14^^^^1
+459 ;;^UTILITY(U,$J,358.3,6381,1,0)
+460 ;;=^358.31IA^3^2
+461 ;;^UTILITY(U,$J,358.3,6381,1,2,0)
+462 ;;=2^Low Vision Aid Fitting, Telescopic/Compound Lens
+463 ;;^UTILITY(U,$J,358.3,6381,1,3,0)
+464 ;;=3^92355
+465 ;;^UTILITY(U,$J,358.3,6382,0)
+466 ;;=92370^^39^349^3^^^^1
+467 ;;^UTILITY(U,$J,358.3,6382,1,0)
+468 ;;=^358.31IA^3^2
+469 ;;^UTILITY(U,$J,358.3,6382,1,2,0)
+470 ;;=2^Repair/Refit Glasses
+471 ;;^UTILITY(U,$J,358.3,6382,1,3,0)
+472 ;;=3^92370
+473 ;;^UTILITY(U,$J,358.3,6383,0)
+474 ;;=92371^^39^349^9^^^^1
+475 ;;^UTILITY(U,$J,358.3,6383,1,0)
+476 ;;=^358.31IA^3^2
+477 ;;^UTILITY(U,$J,358.3,6383,1,2,0)
+478 ;;=2^Repair/Refit Glasses for Aphakia
+479 ;;^UTILITY(U,$J,358.3,6383,1,3,0)
+480 ;;=3^92371
+481 ;;^UTILITY(U,$J,358.3,6384,0)
+482 ;;=92071^^39^349^10^^^^1
+483 ;;^UTILITY(U,$J,358.3,6384,1,0)
+484 ;;=^358.31IA^3^2
+485 ;;^UTILITY(U,$J,358.3,6384,1,2,0)
+486 ;;=2^Contact Lens Tx for Ocular Disease
+487 ;;^UTILITY(U,$J,358.3,6384,1,3,0)
+488 ;;=3^92071
+489 ;;^UTILITY(U,$J,358.3,6385,0)
+490 ;;=92072^^39^349^15^^^^1
+491 ;;^UTILITY(U,$J,358.3,6385,1,0)
+492 ;;=^358.31IA^3^2
+493 ;;^UTILITY(U,$J,358.3,6385,1,2,0)
+494 ;;=2^Contact Lens Mgmt Keratoconus,Init
+495 ;;^UTILITY(U,$J,358.3,6385,1,3,0)
+496 ;;=3^92072
+497 ;;^UTILITY(U,$J,358.3,6386,0)
+498 ;;=92015^^39^349^1^^^^1
+499 ;;^UTILITY(U,$J,358.3,6386,1,0)
+500 ;;=^358.31IA^3^2
+501 ;;^UTILITY(U,$J,358.3,6386,1,2,0)
+502 ;;=2^Refraction
+503 ;;^UTILITY(U,$J,358.3,6386,1,3,0)
+504 ;;=3^92015
+505 ;;^UTILITY(U,$J,358.3,6387,0)
+506 ;;=99174^^39^349^2^^^^1
+507 ;;^UTILITY(U,$J,358.3,6387,1,0)
+508 ;;=^358.31IA^3^2
+509 ;;^UTILITY(U,$J,358.3,6387,1,2,0)
+510 ;;=2^Autorefraction,Bilateral
+511 ;;^UTILITY(U,$J,358.3,6387,1,3,0)
+512 ;;=3^99174
+513 ;;^UTILITY(U,$J,358.3,6388,0)
+514 ;;=92310^^39^349^16^^^^1
+515 ;;^UTILITY(U,$J,358.3,6388,1,0)
+516 ;;=^358.31IA^3^2
+517 ;;^UTILITY(U,$J,358.3,6388,1,2,0)
+518 ;;=2^Contact Lens Fitting,OD/OS
+519 ;;^UTILITY(U,$J,358.3,6388,1,3,0)
+520 ;;=3^92310
+521 ;;^UTILITY(U,$J,358.3,6389,0)
+522 ;;=99070^^39^349^17^^^^1
+523 ;;^UTILITY(U,$J,358.3,6389,1,0)
+524 ;;=^358.31IA^3^2
+525 ;;^UTILITY(U,$J,358.3,6389,1,2,0)
+526 ;;=2^Special Supplies by Phys
+527 ;;^UTILITY(U,$J,358.3,6389,1,3,0)
+528 ;;=3^99070
+529 ;;^UTILITY(U,$J,358.3,6390,0)
+530 ;;=V2513^^39^349^18^^^^1
+531 ;;^UTILITY(U,$J,358.3,6390,1,0)
+532 ;;=^358.31IA^3^2
+533 ;;^UTILITY(U,$J,358.3,6390,1,2,0)
+534 ;;=2^Gas-Permeable Lens,Ext Wear,Per Lens
+535 ;;^UTILITY(U,$J,358.3,6390,1,3,0)
+536 ;;=3^V2513
+537 ;;^UTILITY(U,$J,358.3,6391,0)
+538 ;;=V2523^^39^349^19^^^^1
+539 ;;^UTILITY(U,$J,358.3,6391,1,0)
+540 ;;=^358.31IA^3^2
+541 ;;^UTILITY(U,$J,358.3,6391,1,2,0)
+542 ;;=2^Hydrophilic Contact Lens,Ext Wear,Per Lens
+543 ;;^UTILITY(U,$J,358.3,6391,1,3,0)
+544 ;;=3^V2523
+545 ;;^UTILITY(U,$J,358.3,6392,0)
+546 ;;=V2530^^39^349^20^^^^1
+547 ;;^UTILITY(U,$J,358.3,6392,1,0)
+548 ;;=^358.31IA^3^2
+549 ;;^UTILITY(U,$J,358.3,6392,1,2,0)
+550 ;;=2^Hybrid Contact Lens,Per Lens
+551 ;;^UTILITY(U,$J,358.3,6392,1,3,0)
+552 ;;=3^V2530
+553 ;;^UTILITY(U,$J,358.3,6393,0)
+554 ;;=V2531^^39^349^21^^^^1
+555 ;;^UTILITY(U,$J,358.3,6393,1,0)
+556 ;;=^358.31IA^3^2
+557 ;;^UTILITY(U,$J,358.3,6393,1,2,0)
+558 ;;=2^Gas-Permeable Scleral Lens,Per Lens
+559 ;;^UTILITY(U,$J,358.3,6393,1,3,0)
+560 ;;=3^V2531
+561 ;;^UTILITY(U,$J,358.3,6394,0)
+562 ;;=V2599^^39^349^22^^^^1
+563 ;;^UTILITY(U,$J,358.3,6394,1,0)
+564 ;;=^358.31IA^3^2
+565 ;;^UTILITY(U,$J,358.3,6394,1,2,0)
+566 ;;=2^Contact Lens,Oth Type,Per Lens
+567 ;;^UTILITY(U,$J,358.3,6394,1,3,0)
+568 ;;=3^V2599
+569 ;;^UTILITY(U,$J,358.3,6395,0)
+570 ;;=92015^^39^350^2^^^^1
+571 ;;^UTILITY(U,$J,358.3,6395,1,0)
+572 ;;=^358.31IA^3^2
+573 ;;^UTILITY(U,$J,358.3,6395,1,2,0)
+574 ;;=2^Refraction
+575 ;;^UTILITY(U,$J,358.3,6395,1,3,0)
+576 ;;=3^92015
+577 ;;^UTILITY(U,$J,358.3,6396,0)
+578 ;;=92025^^39^350^3^^^^1
+579 ;;^UTILITY(U,$J,358.3,6396,1,0)
+580 ;;=^358.31IA^3^2
+581 ;;^UTILITY(U,$J,358.3,6396,1,2,0)
+582 ;;=2^Topography (cornea)
+583 ;;^UTILITY(U,$J,358.3,6396,1,3,0)
+584 ;;=3^92025
+585 ;;^UTILITY(U,$J,358.3,6397,0)
+586 ;;=76511^^39^350^6^^^^1
+587 ;;^UTILITY(U,$J,358.3,6397,1,0)
+588 ;;=^358.31IA^3^2
+589 ;;^UTILITY(U,$J,358.3,6397,1,2,0)
+590 ;;=2^U/S A-Scan Only
+591 ;;^UTILITY(U,$J,358.3,6397,1,3,0)
+592 ;;=3^76511
+593 ;;^UTILITY(U,$J,358.3,6398,0)
+594 ;;=76512^^39^350^7^^^^1
+595 ;;^UTILITY(U,$J,358.3,6398,1,0)
+596 ;;=^358.31IA^3^2
+597 ;;^UTILITY(U,$J,358.3,6398,1,2,0)
+598 ;;=2^U/S B-Scan Only
+599 ;;^UTILITY(U,$J,358.3,6398,1,3,0)
+600 ;;=3^76512
+601 ;;^UTILITY(U,$J,358.3,6399,0)
+602 ;;=76513^^39^350^8^^^^1
+603 ;;^UTILITY(U,$J,358.3,6399,1,0)
+604 ;;=^358.31IA^3^2
+605 ;;^UTILITY(U,$J,358.3,6399,1,2,0)
+606 ;;=2^U/S B-Scan,Ant Seg,Water Immersion
+607 ;;^UTILITY(U,$J,358.3,6399,1,3,0)
+608 ;;=3^76513
+609 ;;^UTILITY(U,$J,358.3,6400,0)
+610 ;;=92020^^39^350^11^^^^1
+611 ;;^UTILITY(U,$J,358.3,6400,1,0)
+612 ;;=^358.31IA^3^2
+613 ;;^UTILITY(U,$J,358.3,6400,1,2,0)
+614 ;;=2^Gonioscopy
+615 ;;^UTILITY(U,$J,358.3,6400,1,3,0)
+616 ;;=3^92020
+617 ;;^UTILITY(U,$J,358.3,6401,0)
+618 ;;=92499^^39^350^12^^^^1
+619 ;;^UTILITY(U,$J,358.3,6401,1,0)
+620 ;;=^358.31IA^3^2
+621 ;;^UTILITY(U,$J,358.3,6401,1,2,0)
+622 ;;=2^Hertel's Exophthalmometry
+623 ;;^UTILITY(U,$J,358.3,6401,1,3,0)
+624 ;;=3^92499
+625 ;;^UTILITY(U,$J,358.3,6402,0)
+626 ;;=99174^^39^350^1^^^^1
+627 ;;^UTILITY(U,$J,358.3,6402,1,0)
+628 ;;=^358.31IA^3^2
+629 ;;^UTILITY(U,$J,358.3,6402,1,2,0)
+630 ;;=2^Autorefraction,Bilateral
+631 ;;^UTILITY(U,$J,358.3,6402,1,3,0)
+632 ;;=3^99174
+633 ;;^UTILITY(U,$J,358.3,6403,0)
+634 ;;=92136^^39^350^4^^^^1
+635 ;;^UTILITY(U,$J,358.3,6403,1,0)
+636 ;;=^358.31IA^3^2
+637 ;;^UTILITY(U,$J,358.3,6403,1,2,0)
+638 ;;=2^IOL Calc Biometry-Optical
+639 ;;^UTILITY(U,$J,358.3,6403,1,3,0)
+640 ;;=3^92136
+641 ;;^UTILITY(U,$J,358.3,6404,0)
+642 ;;=76519^^39^350^5^^^^1
+643 ;;^UTILITY(U,$J,358.3,6404,1,0)
+644 ;;=^358.31IA^3^2
+645 ;;^UTILITY(U,$J,358.3,6404,1,2,0)
+646 ;;=2^IOL Calc w/ A-Scan U/S
+647 ;;^UTILITY(U,$J,358.3,6404,1,3,0)
+648 ;;=3^76519
+649 ;;^UTILITY(U,$J,358.3,6405,0)
+650 ;;=92132^^39^350^9^^^^1
+651 ;;^UTILITY(U,$J,358.3,6405,1,0)
+652 ;;=^358.31IA^3^2
+653 ;;^UTILITY(U,$J,358.3,6405,1,2,0)
+654 ;;=2^OCT Anterior Segment (angle or cornea)
+655 ;;^UTILITY(U,$J,358.3,6405,1,3,0)
+656 ;;=3^92132
+657 ;;^UTILITY(U,$J,358.3,6406,0)
+658 ;;=92286^^39^350^10^^^^1
+659 ;;^UTILITY(U,$J,358.3,6406,1,0)
+660 ;;=^358.31IA^3^2
+661 ;;^UTILITY(U,$J,358.3,6406,1,2,0)
+662 ;;=2^Specular Microscopy
+663 ;;^UTILITY(U,$J,358.3,6406,1,3,0)
+664 ;;=3^92286
+665 ;;^UTILITY(U,$J,358.3,6407,0)
+666 ;;=92250^^39^351^1^^^^1
+667 ;;^UTILITY(U,$J,358.3,6407,1,0)
+668 ;;=^358.31IA^3^2
+669 ;;^UTILITY(U,$J,358.3,6407,1,2,0)
+670 ;;=2^Fundus Photos
+671 ;;^UTILITY(U,$J,358.3,6407,1,3,0)
+672 ;;=3^92250