IBDEI02G ; ; 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,5689,1,4,0)
;;=4^H05.241
;;^UTILITY(U,$J,358.3,5689,2)
;;=^5004598
;;^UTILITY(U,$J,358.3,5690,0)
;;=H05.242^^37^310^14
;;^UTILITY(U,$J,358.3,5690,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5690,1,3,0)
;;=3^Exophthalmos,Left Eye
;;^UTILITY(U,$J,358.3,5690,1,4,0)
;;=4^H05.242
;;^UTILITY(U,$J,358.3,5690,2)
;;=^5004599
;;^UTILITY(U,$J,358.3,5691,0)
;;=H44.521^^37^310^15
;;^UTILITY(U,$J,358.3,5691,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5691,1,3,0)
;;=3^Atrophy of Globe,Right Eye
;;^UTILITY(U,$J,358.3,5691,1,4,0)
;;=4^H44.521
;;^UTILITY(U,$J,358.3,5691,2)
;;=^5006025
;;^UTILITY(U,$J,358.3,5692,0)
;;=H44.522^^37^310^16
;;^UTILITY(U,$J,358.3,5692,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5692,1,3,0)
;;=3^Atrophy of Globe,Left Eye
;;^UTILITY(U,$J,358.3,5692,1,4,0)
;;=4^H44.522
;;^UTILITY(U,$J,358.3,5692,2)
;;=^5006026
;;^UTILITY(U,$J,358.3,5693,0)
;;=T85.79XA^^37^310^19
;;^UTILITY(U,$J,358.3,5693,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5693,1,3,0)
;;=3^Infect/Inflm Reaction d/t Internal Prosthetic Device/Implant,Init Encntr
;;^UTILITY(U,$J,358.3,5693,1,4,0)
;;=4^T85.79XA
;;^UTILITY(U,$J,358.3,5693,2)
;;=^5055676
;;^UTILITY(U,$J,358.3,5694,0)
;;=T85.398A^^37^310^20
;;^UTILITY(U,$J,358.3,5694,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5694,1,3,0)
;;=3^Mech Compl of Ocular Prosthetic Device/Implant/Graft,Init Encntr
;;^UTILITY(U,$J,358.3,5694,1,4,0)
;;=4^T85.398A
;;^UTILITY(U,$J,358.3,5694,2)
;;=^5055559
;;^UTILITY(U,$J,358.3,5695,0)
;;=T85.328A^^37^310^21
;;^UTILITY(U,$J,358.3,5695,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5695,1,3,0)
;;=3^Displacement of Ocular Prosthetic Device/Implant/Graft,Init Encntr
;;^UTILITY(U,$J,358.3,5695,1,4,0)
;;=4^T85.328A
;;^UTILITY(U,$J,358.3,5695,2)
;;=^5055550
;;^UTILITY(U,$J,358.3,5696,0)
;;=T85.318A^^37^310^22
;;^UTILITY(U,$J,358.3,5696,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5696,1,3,0)
;;=3^Breakdown of Ocular Prosthetic Device/Implant/Graft,Init Encntr
;;^UTILITY(U,$J,358.3,5696,1,4,0)
;;=4^T85.318A
;;^UTILITY(U,$J,358.3,5696,2)
;;=^5055541
;;^UTILITY(U,$J,358.3,5697,0)
;;=H43.21^^37^311^4
;;^UTILITY(U,$J,358.3,5697,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5697,1,3,0)
;;=3^Asteroid Hyalosis,Right Eye
;;^UTILITY(U,$J,358.3,5697,1,4,0)
;;=4^H43.21
;;^UTILITY(U,$J,358.3,5697,2)
;;=^5005942
;;^UTILITY(U,$J,358.3,5698,0)
;;=H43.22^^37^311^5
;;^UTILITY(U,$J,358.3,5698,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5698,1,3,0)
;;=3^Asteroid Hyalosis,Left Eye
;;^UTILITY(U,$J,358.3,5698,1,4,0)
;;=4^H43.22
;;^UTILITY(U,$J,358.3,5698,2)
;;=^5005943
;;^UTILITY(U,$J,358.3,5699,0)
;;=H43.23^^37^311^6
;;^UTILITY(U,$J,358.3,5699,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5699,1,3,0)
;;=3^Asteroid Hyalosis,Bilateral
;;^UTILITY(U,$J,358.3,5699,1,4,0)
;;=4^H43.23
;;^UTILITY(U,$J,358.3,5699,2)
;;=^5005944
;;^UTILITY(U,$J,358.3,5700,0)
;;=H43.11^^37^311^7
;;^UTILITY(U,$J,358.3,5700,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5700,1,3,0)
;;=3^Vitreous Hemorrhage,Right Eye
;;^UTILITY(U,$J,358.3,5700,1,4,0)
;;=4^H43.11
;;^UTILITY(U,$J,358.3,5700,2)
;;=^5005938
;;^UTILITY(U,$J,358.3,5701,0)
;;=H43.12^^37^311^8
;;^UTILITY(U,$J,358.3,5701,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5701,1,3,0)
;;=3^Vitreous Hemorrhage,Left Eye
;;^UTILITY(U,$J,358.3,5701,1,4,0)
;;=4^H43.12
;;^UTILITY(U,$J,358.3,5701,2)
;;=^5005939
;;^UTILITY(U,$J,358.3,5702,0)
;;=H43.01^^37^311^13
;;^UTILITY(U,$J,358.3,5702,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5702,1,3,0)
;;=3^Vitreous Prolapse,Right Eye
;;^UTILITY(U,$J,358.3,5702,1,4,0)
;;=4^H43.01
;;^UTILITY(U,$J,358.3,5702,2)
;;=^5005934
;;^UTILITY(U,$J,358.3,5703,0)
;;=H43.02^^37^311^14
;;^UTILITY(U,$J,358.3,5703,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5703,1,3,0)
;;=3^Vitreous Prolapse,Left Eye
;;^UTILITY(U,$J,358.3,5703,1,4,0)
;;=4^H43.02
;;^UTILITY(U,$J,358.3,5703,2)
;;=^5005935
;;^UTILITY(U,$J,358.3,5704,0)
;;=H43.813^^37^311^3
;;^UTILITY(U,$J,358.3,5704,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5704,1,3,0)
;;=3^Vitreous Degeneration (PVD),Bilateral
;;^UTILITY(U,$J,358.3,5704,1,4,0)
;;=4^H43.813
;;^UTILITY(U,$J,358.3,5704,2)
;;=^5005955
;;^UTILITY(U,$J,358.3,5705,0)
;;=H43.812^^37^311^2
;;^UTILITY(U,$J,358.3,5705,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5705,1,3,0)
;;=3^Vitreous Degeneration (PVD),Left Eye
;;^UTILITY(U,$J,358.3,5705,1,4,0)
;;=4^H43.812
;;^UTILITY(U,$J,358.3,5705,2)
;;=^5005954
;;^UTILITY(U,$J,358.3,5706,0)
;;=H43.811^^37^311^1
;;^UTILITY(U,$J,358.3,5706,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5706,1,3,0)
;;=3^Vitreous Degeneration (PVD),Right Eye
;;^UTILITY(U,$J,358.3,5706,1,4,0)
;;=4^H43.811
;;^UTILITY(U,$J,358.3,5706,2)
;;=^5005953
;;^UTILITY(U,$J,358.3,5707,0)
;;=H43.13^^37^311^9
;;^UTILITY(U,$J,358.3,5707,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5707,1,3,0)
;;=3^Vitreous Hemorrhage,Bilateral
;;^UTILITY(U,$J,358.3,5707,1,4,0)
;;=4^H43.13
;;^UTILITY(U,$J,358.3,5707,2)
;;=^5005940
;;^UTILITY(U,$J,358.3,5708,0)
;;=H43.821^^37^311^10
;;^UTILITY(U,$J,358.3,5708,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5708,1,3,0)
;;=3^Vitreomacular Adhesion,Right Eye
;;^UTILITY(U,$J,358.3,5708,1,4,0)
;;=4^H43.821
;;^UTILITY(U,$J,358.3,5708,2)
;;=^5005957
;;^UTILITY(U,$J,358.3,5709,0)
;;=H43.822^^37^311^11
;;^UTILITY(U,$J,358.3,5709,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5709,1,3,0)
;;=3^Vitreomacular Adhesion,Left Eye
;;^UTILITY(U,$J,358.3,5709,1,4,0)
;;=4^H43.822
;;^UTILITY(U,$J,358.3,5709,2)
;;=^5005958
;;^UTILITY(U,$J,358.3,5710,0)
;;=H43.823^^37^311^12
;;^UTILITY(U,$J,358.3,5710,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5710,1,3,0)
;;=3^Vitreomacular Adhesion,Bilateral
;;^UTILITY(U,$J,358.3,5710,1,4,0)
;;=4^H43.823
;;^UTILITY(U,$J,358.3,5710,2)
;;=^5005959
;;^UTILITY(U,$J,358.3,5711,0)
;;=H43.391^^37^311^15
;;^UTILITY(U,$J,358.3,5711,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5711,1,3,0)
;;=3^Vitreous Opacities,Right Eye NEC
;;^UTILITY(U,$J,358.3,5711,1,4,0)
;;=4^H43.391
;;^UTILITY(U,$J,358.3,5711,2)
;;=^5005949
;;^UTILITY(U,$J,358.3,5712,0)
;;=H43.392^^37^311^16
;;^UTILITY(U,$J,358.3,5712,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5712,1,3,0)
;;=3^Vitreous Opacities,Left Eye NEC
;;^UTILITY(U,$J,358.3,5712,1,4,0)
;;=4^H43.392
;;^UTILITY(U,$J,358.3,5712,2)
;;=^5005950
;;^UTILITY(U,$J,358.3,5713,0)
;;=S05.31XA^^37^312^1
;;^UTILITY(U,$J,358.3,5713,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5713,1,3,0)
;;=3^Ocular Laceration w/o Loss of Intraoc Tissue,Right Eye,Init Encntr
;;^UTILITY(U,$J,358.3,5713,1,4,0)
;;=4^S05.31XA
;;^UTILITY(U,$J,358.3,5713,2)
;;=^5020606
;;^UTILITY(U,$J,358.3,5714,0)
;;=S05.32XA^^37^312^2
;;^UTILITY(U,$J,358.3,5714,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5714,1,3,0)
;;=3^Ocular Laceration w/o Loss of Intraoc Tissue,Left Eye,Init Encntr
;;^UTILITY(U,$J,358.3,5714,1,4,0)
;;=4^S05.32XA
;;^UTILITY(U,$J,358.3,5714,2)
;;=^5020609
;;^UTILITY(U,$J,358.3,5715,0)
;;=S01.121A^^37^312^3
;;^UTILITY(U,$J,358.3,5715,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5715,1,3,0)
;;=3^Laceration w/ FB,Right Eyelid,Init Encntr
;;^UTILITY(U,$J,358.3,5715,1,4,0)
;;=4^S01.121A
;;^UTILITY(U,$J,358.3,5715,2)
;;=^5020066
;;^UTILITY(U,$J,358.3,5716,0)
;;=S01.122A^^37^312^4
;;^UTILITY(U,$J,358.3,5716,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5716,1,3,0)
;;=3^Laceration w/ FB,Left Eyelid,Init Encntr
;;^UTILITY(U,$J,358.3,5716,1,4,0)
;;=4^S01.122A
;;^UTILITY(U,$J,358.3,5716,2)
;;=^5134190
;;^UTILITY(U,$J,358.3,5717,0)
;;=S01.111A^^37^312^5
;;^UTILITY(U,$J,358.3,5717,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5717,1,3,0)
;;=3^Laceration w/o FB,Right Eyelid,Init Encntr
;;^UTILITY(U,$J,358.3,5717,1,4,0)
;;=4^S01.111A
;;^UTILITY(U,$J,358.3,5717,2)
;;=^5020057
;;^UTILITY(U,$J,358.3,5718,0)
;;=S01.112A^^37^312^6
;;^UTILITY(U,$J,358.3,5718,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5718,1,3,0)
;;=3^Laceration w/o FB,Left Eyelid,Init Encntr
;;^UTILITY(U,$J,358.3,5718,1,4,0)
;;=4^S01.112A
;;^UTILITY(U,$J,358.3,5718,2)
;;=^5020060
;;^UTILITY(U,$J,358.3,5719,0)
;;=S01.141A^^37^312^7
;;^UTILITY(U,$J,358.3,5719,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5719,1,3,0)
;;=3^Puncture Wound w/ FB,Right Eyelid,Init Encntr
;;^UTILITY(U,$J,358.3,5719,1,4,0)
;;=4^S01.141A
;;^UTILITY(U,$J,358.3,5719,2)
;;=^5020078
;;^UTILITY(U,$J,358.3,5720,0)
;;=S01.142A^^37^312^8
;;^UTILITY(U,$J,358.3,5720,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5720,1,3,0)
;;=3^Puncture Wound w/ FB,Left Eyelid,Init Encntr
;;^UTILITY(U,$J,358.3,5720,1,4,0)
;;=4^S01.142A
;;^UTILITY(U,$J,358.3,5720,2)
;;=^5134196
;;^UTILITY(U,$J,358.3,5721,0)
;;=S01.131A^^37^312^9
;;^UTILITY(U,$J,358.3,5721,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5721,1,3,0)
;;=3^Puncture Wound w/o FB,Right Eyelid,Init Encntr
;;^UTILITY(U,$J,358.3,5721,1,4,0)
;;=4^S01.131A
;;^UTILITY(U,$J,358.3,5721,2)
;;=^5020069
;;^UTILITY(U,$J,358.3,5722,0)
;;=S01.132A^^37^312^10
;;^UTILITY(U,$J,358.3,5722,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5722,1,3,0)
;;=3^Puncture Wound w/o FB,Left Eyelid,Init Encntr
;;^UTILITY(U,$J,358.3,5722,1,4,0)
;;=4^S01.132A
;;^UTILITY(U,$J,358.3,5722,2)
;;=^5020072
;;^UTILITY(U,$J,358.3,5723,0)
;;=S05.41XA^^37^312^11
;;^UTILITY(U,$J,358.3,5723,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5723,1,3,0)
;;=3^Penetrating Orbital Wound,Right Eye,Init Encntr
;;^UTILITY(U,$J,358.3,5723,1,4,0)
;;=4^S05.41XA
;;^UTILITY(U,$J,358.3,5723,2)
;;=^5020615
;;^UTILITY(U,$J,358.3,5724,0)
;;=S05.42XA^^37^312^12
;;^UTILITY(U,$J,358.3,5724,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5724,1,3,0)
;;=3^Penetrating Orbital Wound,Left Eye,Init Encntr
;;^UTILITY(U,$J,358.3,5724,1,4,0)
;;=4^S05.42XA
;;^UTILITY(U,$J,358.3,5724,2)
;;=^5020618
;;^UTILITY(U,$J,358.3,5725,0)
;;=S02.42XA^^37^312^17
;;^UTILITY(U,$J,358.3,5725,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5725,1,3,0)
;;=3^Fx of Alveoulus of Maxilla,Init Encntr for Closed Fx
;;^UTILITY(U,$J,358.3,5725,1,4,0)
;;=4^S02.42XA
;;^UTILITY(U,$J,358.3,5725,2)
;;=^5020354
;;^UTILITY(U,$J,358.3,5726,0)
;;=S00.11XA^^37^312^18
;;^UTILITY(U,$J,358.3,5726,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5726,1,3,0)
;;=3^Contusion,Right Eyelid,Init Encntr
;;^UTILITY(U,$J,358.3,5726,1,4,0)
;;=4^S00.11XA
;;^UTILITY(U,$J,358.3,5726,2)
;;=^5019778
;;^UTILITY(U,$J,358.3,5727,0)
;;=S00.12XA^^37^312^19
;;^UTILITY(U,$J,358.3,5727,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5727,1,3,0)
;;=3^Contusion,Left Eyelid,Init Encntr
;;^UTILITY(U,$J,358.3,5727,1,4,0)
;;=4^S00.12XA
;;^UTILITY(U,$J,358.3,5727,2)
;;=^5019781
;;^UTILITY(U,$J,358.3,5728,0)
;;=S01.151A^^37^312^20
;;^UTILITY(U,$J,358.3,5728,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5728,1,3,0)
;;=3^Open Bite,Right Eyelid,Init Encntr
;;^UTILITY(U,$J,358.3,5728,1,4,0)
;;=4^S01.151A
;;^UTILITY(U,$J,358.3,5728,2)
;;=^5020081
;;^UTILITY(U,$J,358.3,5729,0)
;;=S01.152A^^37^312^21
;;^UTILITY(U,$J,358.3,5729,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5729,1,3,0)
;;=3^Open Bite,Left Eyelid,Init Encntr
;;^UTILITY(U,$J,358.3,5729,1,4,0)
;;=4^S01.152A
;;^UTILITY(U,$J,358.3,5729,2)
;;=^5020084
;;^UTILITY(U,$J,358.3,5730,0)
;;=S02.81XA^^37^312^13
;;^UTILITY(U,$J,358.3,5730,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5730,1,3,0)
;;=3^Fx of Skull/Facial Bones,Right Side,Init Encntr for Closed Fx
;;^UTILITY(U,$J,358.3,5730,1,4,0)
;;=4^S02.81XA
;;^UTILITY(U,$J,358.3,5730,2)
;;=^5139523
;;^UTILITY(U,$J,358.3,5731,0)
;;=S02.82XA^^37^312^14
;;^UTILITY(U,$J,358.3,5731,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5731,1,3,0)
;;=3^Fx of Skull/Facial Bones,Left Side,Init Encntr for Closed Fx
;;^UTILITY(U,$J,358.3,5731,1,4,0)
;;=4^S02.82XA
;;^UTILITY(U,$J,358.3,5731,2)
;;=^5139529
;;^UTILITY(U,$J,358.3,5732,0)
;;=S02.31XA^^37^312^15
;;^UTILITY(U,$J,358.3,5732,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5732,1,3,0)
;;=3^Fx of Orbital Floor,Right Side,Init Encntr for Closed Fx
;;^UTILITY(U,$J,358.3,5732,1,4,0)
;;=4^S02.31XA
;;^UTILITY(U,$J,358.3,5732,2)
;;=^5139325
;;^UTILITY(U,$J,358.3,5733,0)
;;=S02.32XA^^37^312^16
;;^UTILITY(U,$J,358.3,5733,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5733,1,3,0)
;;=3^Fx of Orbital Floor,Left Side,Init Encntr for Closed Fx
;;^UTILITY(U,$J,358.3,5733,1,4,0)
;;=4^S02.32XA
;;^UTILITY(U,$J,358.3,5733,2)
;;=^5139331
;;^UTILITY(U,$J,358.3,5734,0)
;;=H04.123^^37^313^1
;;^UTILITY(U,$J,358.3,5734,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5734,1,3,0)
;;=3^Dry Eye Syndrome,Bilateral Lacrimal Glands
;;^UTILITY(U,$J,358.3,5734,1,4,0)
;;=4^H04.123
;;^UTILITY(U,$J,358.3,5734,2)
;;=^5004465
;;^UTILITY(U,$J,358.3,5735,0)
;;=M35.01^^37^313^2
;;^UTILITY(U,$J,358.3,5735,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5735,1,3,0)
;;=3^Sicca Syndrome w/ Keratoconjunctivitis
;;^UTILITY(U,$J,358.3,5735,1,4,0)
;;=4^M35.01
;;^UTILITY(U,$J,358.3,5735,2)
;;=^5011787
;;^UTILITY(U,$J,358.3,5736,0)
;;=H10.503^^37^313^3
;;^UTILITY(U,$J,358.3,5736,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5736,1,3,0)
;;=3^Blepharoconjunctivitis,Bilateral
;;^UTILITY(U,$J,358.3,5736,1,4,0)
;;=4^H10.503
;;^UTILITY(U,$J,358.3,5736,2)
;;=^5004699
;;^UTILITY(U,$J,358.3,5737,0)
;;=H01.001^^37^313^4
;;^UTILITY(U,$J,358.3,5737,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5737,1,3,0)
;;=3^Blepharitis,Right Upper Eyelid
;;^UTILITY(U,$J,358.3,5737,1,4,0)
;;=4^H01.001
;;^UTILITY(U,$J,358.3,5737,2)
;;=^5004238
;;^UTILITY(U,$J,358.3,5738,0)
;;=H01.004^^37^313^5
;;^UTILITY(U,$J,358.3,5738,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5738,1,3,0)
;;=3^Blepharitis,Left Upper Eyelid
;;^UTILITY(U,$J,358.3,5738,1,4,0)
;;=4^H01.004
;;^UTILITY(U,$J,358.3,5738,2)
;;=^5004241
;;^UTILITY(U,$J,358.3,5739,0)
;;=L71.9^^37^313^6
;;^UTILITY(U,$J,358.3,5739,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5739,1,3,0)
;;=3^Rosacea,Unspec
;;^UTILITY(U,$J,358.3,5739,1,4,0)
;;=4^L71.9
;;^UTILITY(U,$J,358.3,5739,2)
;;=^5009276
;;^UTILITY(U,$J,358.3,5740,0)
;;=H04.221^^37^313^10
;;^UTILITY(U,$J,358.3,5740,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5740,1,3,0)
;;=3^Epiphora d/t Insuff Drainage,Right
;;^UTILITY(U,$J,358.3,5740,1,4,0)
;;=4^H04.221
;;^UTILITY(U,$J,358.3,5740,2)
;;=^5004491
;;^UTILITY(U,$J,358.3,5741,0)
;;=H04.222^^37^313^11
;;^UTILITY(U,$J,358.3,5741,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5741,1,3,0)
;;=3^Epiphora d/t Insuff Drainage,Left
;;^UTILITY(U,$J,358.3,5741,1,4,0)
;;=4^H04.222
;;^UTILITY(U,$J,358.3,5741,2)
;;=^5004492
;;^UTILITY(U,$J,358.3,5742,0)
;;=H04.551^^37^313^12
;;^UTILITY(U,$J,358.3,5742,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5742,1,3,0)
;;=3^Acquired Stenosis,Right Nasolacrimal Duct
;;^UTILITY(U,$J,358.3,5742,1,4,0)
;;=4^H04.551
;;^UTILITY(U,$J,358.3,5742,2)
;;=^5004538
;;^UTILITY(U,$J,358.3,5743,0)
;;=H04.552^^37^313^13
;;^UTILITY(U,$J,358.3,5743,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5743,1,3,0)
;;=3^Acquired Stenosis,Left Nasolacrimal Duct
;;^UTILITY(U,$J,358.3,5743,1,4,0)
;;=4^H04.552
;;^UTILITY(U,$J,358.3,5743,2)
;;=^5004539
;;^UTILITY(U,$J,358.3,5744,0)
;;=H04.211^^37^313^7
;;^UTILITY(U,$J,358.3,5744,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5744,1,3,0)
;;=3^Epiphora d/t Excessive Lacrimation,Right
;;^UTILITY(U,$J,358.3,5744,1,4,0)
;;=4^H04.211
;;^UTILITY(U,$J,358.3,5744,2)
;;=^5004487
;;^UTILITY(U,$J,358.3,5745,0)
;;=H04.212^^37^313^8
;;^UTILITY(U,$J,358.3,5745,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5745,1,3,0)
;;=3^Epiphora d/t Excessive Lacrimation,Left
;;^UTILITY(U,$J,358.3,5745,1,4,0)
;;=4^H04.212
;;^UTILITY(U,$J,358.3,5745,2)
;;=^5004488
;;^UTILITY(U,$J,358.3,5746,0)
;;=H04.213^^37^313^9
;;^UTILITY(U,$J,358.3,5746,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5746,1,3,0)
;;=3^Epiphora d/t Excessive Lacrimation,Bilateral
;;^UTILITY(U,$J,358.3,5746,1,4,0)
;;=4^H04.213
;;^UTILITY(U,$J,358.3,5746,2)
;;=^5004489
;;^UTILITY(U,$J,358.3,5747,0)
;;=D23.111^^37^313^14
;;^UTILITY(U,$J,358.3,5747,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5747,1,3,0)
;;=3^Benign Neop Skin,Right Upper Eyelid
;;^UTILITY(U,$J,358.3,5747,1,4,0)
;;=4^D23.111
;;^UTILITY(U,$J,358.3,5747,2)
;;=^5157290
;;^UTILITY(U,$J,358.3,5748,0)
;;=D23.112^^37^313^15
;;^UTILITY(U,$J,358.3,5748,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5748,1,3,0)
;;=3^Benign Neop Skin,Right Lower Eyelid
;;^UTILITY(U,$J,358.3,5748,1,4,0)
;;=4^D23.112
;;^UTILITY(U,$J,358.3,5748,2)
;;=^5157291
;;^UTILITY(U,$J,358.3,5749,0)
;;=D23.121^^37^313^16
;;^UTILITY(U,$J,358.3,5749,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5749,1,3,0)
;;=3^Benign Neop Skin,Left Upper Eyelid
;;^UTILITY(U,$J,358.3,5749,1,4,0)
;;=4^D23.121
;;^UTILITY(U,$J,358.3,5749,2)
;;=^5157292
;;^UTILITY(U,$J,358.3,5750,0)
;;=D23.122^^37^313^17
;;^UTILITY(U,$J,358.3,5750,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5750,1,3,0)
;;=3^BEnign Neop Skin,Left Lower Eyelid
;;^UTILITY(U,$J,358.3,5750,1,4,0)
;;=4^D23.122
;;^UTILITY(U,$J,358.3,5750,2)
;;=^5157293
;;^UTILITY(U,$J,358.3,5751,0)
;;=C44.1021^^37^313^18
;;^UTILITY(U,$J,358.3,5751,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5751,1,3,0)
;;=3^Malig Neop Skin,Right Upper Eyelid
;;^UTILITY(U,$J,358.3,5751,1,4,0)
;;=4^C44.1021
;;^UTILITY(U,$J,358.3,5751,2)
;;=^5157253
;;^UTILITY(U,$J,358.3,5752,0)
;;=C44.1022^^37^313^19
;;^UTILITY(U,$J,358.3,5752,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5752,1,3,0)
;;=3^Malig Neop Skin,Right Lower Eyelid
;;^UTILITY(U,$J,358.3,5752,1,4,0)
;;=4^C44.1022
;;^UTILITY(U,$J,358.3,5752,2)
;;=^5157254
;;^UTILITY(U,$J,358.3,5753,0)
;;=C44.1091^^37^313^20
;;^UTILITY(U,$J,358.3,5753,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5753,1,3,0)
;;=3^Malig Neop Skin,Left Upper Eyelid
;;^UTILITY(U,$J,358.3,5753,1,4,0)
;;=4^C44.1091
;;^UTILITY(U,$J,358.3,5753,2)
;;=^5157255
;;^UTILITY(U,$J,358.3,5754,0)
;;=C44.1092^^37^313^21
;;^UTILITY(U,$J,358.3,5754,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5754,1,3,0)
;;=3^Malig Neop Skin,Left Lower Eyelid
;;^UTILITY(U,$J,358.3,5754,1,4,0)
;;=4^C44.1092
;;^UTILITY(U,$J,358.3,5754,2)
;;=^5157256
;;^UTILITY(U,$J,358.3,5755,0)
;;=C44.1121^^37^313^22
;;^UTILITY(U,$J,358.3,5755,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5755,1,3,0)
;;=3^BCC Neop Skin,Right Upper Eyelid
;;^UTILITY(U,$J,358.3,5755,1,4,0)
;;=4^C44.1121
;;^UTILITY(U,$J,358.3,5755,2)
;;=^5157257
;;^UTILITY(U,$J,358.3,5756,0)
;;=C44.1122^^37^313^23
;;^UTILITY(U,$J,358.3,5756,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5756,1,3,0)
;;=3^BCC Neop Skin,Right Lower Eyelid
;;^UTILITY(U,$J,358.3,5756,1,4,0)
;;=4^C44.1122
;;^UTILITY(U,$J,358.3,5756,2)
;;=^5157258
;;^UTILITY(U,$J,358.3,5757,0)
;;=C44.1191^^37^313^24
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HIBDEI02G 19777 printed Nov 22, 2024@16:50:30 Page 2
IBDEI02G ; ; 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,5689,1,4,0)
+2 ;;=4^H05.241
+3 ;;^UTILITY(U,$J,358.3,5689,2)
+4 ;;=^5004598
+5 ;;^UTILITY(U,$J,358.3,5690,0)
+6 ;;=H05.242^^37^310^14
+7 ;;^UTILITY(U,$J,358.3,5690,1,0)
+8 ;;=^358.31IA^4^2
+9 ;;^UTILITY(U,$J,358.3,5690,1,3,0)
+10 ;;=3^Exophthalmos,Left Eye
+11 ;;^UTILITY(U,$J,358.3,5690,1,4,0)
+12 ;;=4^H05.242
+13 ;;^UTILITY(U,$J,358.3,5690,2)
+14 ;;=^5004599
+15 ;;^UTILITY(U,$J,358.3,5691,0)
+16 ;;=H44.521^^37^310^15
+17 ;;^UTILITY(U,$J,358.3,5691,1,0)
+18 ;;=^358.31IA^4^2
+19 ;;^UTILITY(U,$J,358.3,5691,1,3,0)
+20 ;;=3^Atrophy of Globe,Right Eye
+21 ;;^UTILITY(U,$J,358.3,5691,1,4,0)
+22 ;;=4^H44.521
+23 ;;^UTILITY(U,$J,358.3,5691,2)
+24 ;;=^5006025
+25 ;;^UTILITY(U,$J,358.3,5692,0)
+26 ;;=H44.522^^37^310^16
+27 ;;^UTILITY(U,$J,358.3,5692,1,0)
+28 ;;=^358.31IA^4^2
+29 ;;^UTILITY(U,$J,358.3,5692,1,3,0)
+30 ;;=3^Atrophy of Globe,Left Eye
+31 ;;^UTILITY(U,$J,358.3,5692,1,4,0)
+32 ;;=4^H44.522
+33 ;;^UTILITY(U,$J,358.3,5692,2)
+34 ;;=^5006026
+35 ;;^UTILITY(U,$J,358.3,5693,0)
+36 ;;=T85.79XA^^37^310^19
+37 ;;^UTILITY(U,$J,358.3,5693,1,0)
+38 ;;=^358.31IA^4^2
+39 ;;^UTILITY(U,$J,358.3,5693,1,3,0)
+40 ;;=3^Infect/Inflm Reaction d/t Internal Prosthetic Device/Implant,Init Encntr
+41 ;;^UTILITY(U,$J,358.3,5693,1,4,0)
+42 ;;=4^T85.79XA
+43 ;;^UTILITY(U,$J,358.3,5693,2)
+44 ;;=^5055676
+45 ;;^UTILITY(U,$J,358.3,5694,0)
+46 ;;=T85.398A^^37^310^20
+47 ;;^UTILITY(U,$J,358.3,5694,1,0)
+48 ;;=^358.31IA^4^2
+49 ;;^UTILITY(U,$J,358.3,5694,1,3,0)
+50 ;;=3^Mech Compl of Ocular Prosthetic Device/Implant/Graft,Init Encntr
+51 ;;^UTILITY(U,$J,358.3,5694,1,4,0)
+52 ;;=4^T85.398A
+53 ;;^UTILITY(U,$J,358.3,5694,2)
+54 ;;=^5055559
+55 ;;^UTILITY(U,$J,358.3,5695,0)
+56 ;;=T85.328A^^37^310^21
+57 ;;^UTILITY(U,$J,358.3,5695,1,0)
+58 ;;=^358.31IA^4^2
+59 ;;^UTILITY(U,$J,358.3,5695,1,3,0)
+60 ;;=3^Displacement of Ocular Prosthetic Device/Implant/Graft,Init Encntr
+61 ;;^UTILITY(U,$J,358.3,5695,1,4,0)
+62 ;;=4^T85.328A
+63 ;;^UTILITY(U,$J,358.3,5695,2)
+64 ;;=^5055550
+65 ;;^UTILITY(U,$J,358.3,5696,0)
+66 ;;=T85.318A^^37^310^22
+67 ;;^UTILITY(U,$J,358.3,5696,1,0)
+68 ;;=^358.31IA^4^2
+69 ;;^UTILITY(U,$J,358.3,5696,1,3,0)
+70 ;;=3^Breakdown of Ocular Prosthetic Device/Implant/Graft,Init Encntr
+71 ;;^UTILITY(U,$J,358.3,5696,1,4,0)
+72 ;;=4^T85.318A
+73 ;;^UTILITY(U,$J,358.3,5696,2)
+74 ;;=^5055541
+75 ;;^UTILITY(U,$J,358.3,5697,0)
+76 ;;=H43.21^^37^311^4
+77 ;;^UTILITY(U,$J,358.3,5697,1,0)
+78 ;;=^358.31IA^4^2
+79 ;;^UTILITY(U,$J,358.3,5697,1,3,0)
+80 ;;=3^Asteroid Hyalosis,Right Eye
+81 ;;^UTILITY(U,$J,358.3,5697,1,4,0)
+82 ;;=4^H43.21
+83 ;;^UTILITY(U,$J,358.3,5697,2)
+84 ;;=^5005942
+85 ;;^UTILITY(U,$J,358.3,5698,0)
+86 ;;=H43.22^^37^311^5
+87 ;;^UTILITY(U,$J,358.3,5698,1,0)
+88 ;;=^358.31IA^4^2
+89 ;;^UTILITY(U,$J,358.3,5698,1,3,0)
+90 ;;=3^Asteroid Hyalosis,Left Eye
+91 ;;^UTILITY(U,$J,358.3,5698,1,4,0)
+92 ;;=4^H43.22
+93 ;;^UTILITY(U,$J,358.3,5698,2)
+94 ;;=^5005943
+95 ;;^UTILITY(U,$J,358.3,5699,0)
+96 ;;=H43.23^^37^311^6
+97 ;;^UTILITY(U,$J,358.3,5699,1,0)
+98 ;;=^358.31IA^4^2
+99 ;;^UTILITY(U,$J,358.3,5699,1,3,0)
+100 ;;=3^Asteroid Hyalosis,Bilateral
+101 ;;^UTILITY(U,$J,358.3,5699,1,4,0)
+102 ;;=4^H43.23
+103 ;;^UTILITY(U,$J,358.3,5699,2)
+104 ;;=^5005944
+105 ;;^UTILITY(U,$J,358.3,5700,0)
+106 ;;=H43.11^^37^311^7
+107 ;;^UTILITY(U,$J,358.3,5700,1,0)
+108 ;;=^358.31IA^4^2
+109 ;;^UTILITY(U,$J,358.3,5700,1,3,0)
+110 ;;=3^Vitreous Hemorrhage,Right Eye
+111 ;;^UTILITY(U,$J,358.3,5700,1,4,0)
+112 ;;=4^H43.11
+113 ;;^UTILITY(U,$J,358.3,5700,2)
+114 ;;=^5005938
+115 ;;^UTILITY(U,$J,358.3,5701,0)
+116 ;;=H43.12^^37^311^8
+117 ;;^UTILITY(U,$J,358.3,5701,1,0)
+118 ;;=^358.31IA^4^2
+119 ;;^UTILITY(U,$J,358.3,5701,1,3,0)
+120 ;;=3^Vitreous Hemorrhage,Left Eye
+121 ;;^UTILITY(U,$J,358.3,5701,1,4,0)
+122 ;;=4^H43.12
+123 ;;^UTILITY(U,$J,358.3,5701,2)
+124 ;;=^5005939
+125 ;;^UTILITY(U,$J,358.3,5702,0)
+126 ;;=H43.01^^37^311^13
+127 ;;^UTILITY(U,$J,358.3,5702,1,0)
+128 ;;=^358.31IA^4^2
+129 ;;^UTILITY(U,$J,358.3,5702,1,3,0)
+130 ;;=3^Vitreous Prolapse,Right Eye
+131 ;;^UTILITY(U,$J,358.3,5702,1,4,0)
+132 ;;=4^H43.01
+133 ;;^UTILITY(U,$J,358.3,5702,2)
+134 ;;=^5005934
+135 ;;^UTILITY(U,$J,358.3,5703,0)
+136 ;;=H43.02^^37^311^14
+137 ;;^UTILITY(U,$J,358.3,5703,1,0)
+138 ;;=^358.31IA^4^2
+139 ;;^UTILITY(U,$J,358.3,5703,1,3,0)
+140 ;;=3^Vitreous Prolapse,Left Eye
+141 ;;^UTILITY(U,$J,358.3,5703,1,4,0)
+142 ;;=4^H43.02
+143 ;;^UTILITY(U,$J,358.3,5703,2)
+144 ;;=^5005935
+145 ;;^UTILITY(U,$J,358.3,5704,0)
+146 ;;=H43.813^^37^311^3
+147 ;;^UTILITY(U,$J,358.3,5704,1,0)
+148 ;;=^358.31IA^4^2
+149 ;;^UTILITY(U,$J,358.3,5704,1,3,0)
+150 ;;=3^Vitreous Degeneration (PVD),Bilateral
+151 ;;^UTILITY(U,$J,358.3,5704,1,4,0)
+152 ;;=4^H43.813
+153 ;;^UTILITY(U,$J,358.3,5704,2)
+154 ;;=^5005955
+155 ;;^UTILITY(U,$J,358.3,5705,0)
+156 ;;=H43.812^^37^311^2
+157 ;;^UTILITY(U,$J,358.3,5705,1,0)
+158 ;;=^358.31IA^4^2
+159 ;;^UTILITY(U,$J,358.3,5705,1,3,0)
+160 ;;=3^Vitreous Degeneration (PVD),Left Eye
+161 ;;^UTILITY(U,$J,358.3,5705,1,4,0)
+162 ;;=4^H43.812
+163 ;;^UTILITY(U,$J,358.3,5705,2)
+164 ;;=^5005954
+165 ;;^UTILITY(U,$J,358.3,5706,0)
+166 ;;=H43.811^^37^311^1
+167 ;;^UTILITY(U,$J,358.3,5706,1,0)
+168 ;;=^358.31IA^4^2
+169 ;;^UTILITY(U,$J,358.3,5706,1,3,0)
+170 ;;=3^Vitreous Degeneration (PVD),Right Eye
+171 ;;^UTILITY(U,$J,358.3,5706,1,4,0)
+172 ;;=4^H43.811
+173 ;;^UTILITY(U,$J,358.3,5706,2)
+174 ;;=^5005953
+175 ;;^UTILITY(U,$J,358.3,5707,0)
+176 ;;=H43.13^^37^311^9
+177 ;;^UTILITY(U,$J,358.3,5707,1,0)
+178 ;;=^358.31IA^4^2
+179 ;;^UTILITY(U,$J,358.3,5707,1,3,0)
+180 ;;=3^Vitreous Hemorrhage,Bilateral
+181 ;;^UTILITY(U,$J,358.3,5707,1,4,0)
+182 ;;=4^H43.13
+183 ;;^UTILITY(U,$J,358.3,5707,2)
+184 ;;=^5005940
+185 ;;^UTILITY(U,$J,358.3,5708,0)
+186 ;;=H43.821^^37^311^10
+187 ;;^UTILITY(U,$J,358.3,5708,1,0)
+188 ;;=^358.31IA^4^2
+189 ;;^UTILITY(U,$J,358.3,5708,1,3,0)
+190 ;;=3^Vitreomacular Adhesion,Right Eye
+191 ;;^UTILITY(U,$J,358.3,5708,1,4,0)
+192 ;;=4^H43.821
+193 ;;^UTILITY(U,$J,358.3,5708,2)
+194 ;;=^5005957
+195 ;;^UTILITY(U,$J,358.3,5709,0)
+196 ;;=H43.822^^37^311^11
+197 ;;^UTILITY(U,$J,358.3,5709,1,0)
+198 ;;=^358.31IA^4^2
+199 ;;^UTILITY(U,$J,358.3,5709,1,3,0)
+200 ;;=3^Vitreomacular Adhesion,Left Eye
+201 ;;^UTILITY(U,$J,358.3,5709,1,4,0)
+202 ;;=4^H43.822
+203 ;;^UTILITY(U,$J,358.3,5709,2)
+204 ;;=^5005958
+205 ;;^UTILITY(U,$J,358.3,5710,0)
+206 ;;=H43.823^^37^311^12
+207 ;;^UTILITY(U,$J,358.3,5710,1,0)
+208 ;;=^358.31IA^4^2
+209 ;;^UTILITY(U,$J,358.3,5710,1,3,0)
+210 ;;=3^Vitreomacular Adhesion,Bilateral
+211 ;;^UTILITY(U,$J,358.3,5710,1,4,0)
+212 ;;=4^H43.823
+213 ;;^UTILITY(U,$J,358.3,5710,2)
+214 ;;=^5005959
+215 ;;^UTILITY(U,$J,358.3,5711,0)
+216 ;;=H43.391^^37^311^15
+217 ;;^UTILITY(U,$J,358.3,5711,1,0)
+218 ;;=^358.31IA^4^2
+219 ;;^UTILITY(U,$J,358.3,5711,1,3,0)
+220 ;;=3^Vitreous Opacities,Right Eye NEC
+221 ;;^UTILITY(U,$J,358.3,5711,1,4,0)
+222 ;;=4^H43.391
+223 ;;^UTILITY(U,$J,358.3,5711,2)
+224 ;;=^5005949
+225 ;;^UTILITY(U,$J,358.3,5712,0)
+226 ;;=H43.392^^37^311^16
+227 ;;^UTILITY(U,$J,358.3,5712,1,0)
+228 ;;=^358.31IA^4^2
+229 ;;^UTILITY(U,$J,358.3,5712,1,3,0)
+230 ;;=3^Vitreous Opacities,Left Eye NEC
+231 ;;^UTILITY(U,$J,358.3,5712,1,4,0)
+232 ;;=4^H43.392
+233 ;;^UTILITY(U,$J,358.3,5712,2)
+234 ;;=^5005950
+235 ;;^UTILITY(U,$J,358.3,5713,0)
+236 ;;=S05.31XA^^37^312^1
+237 ;;^UTILITY(U,$J,358.3,5713,1,0)
+238 ;;=^358.31IA^4^2
+239 ;;^UTILITY(U,$J,358.3,5713,1,3,0)
+240 ;;=3^Ocular Laceration w/o Loss of Intraoc Tissue,Right Eye,Init Encntr
+241 ;;^UTILITY(U,$J,358.3,5713,1,4,0)
+242 ;;=4^S05.31XA
+243 ;;^UTILITY(U,$J,358.3,5713,2)
+244 ;;=^5020606
+245 ;;^UTILITY(U,$J,358.3,5714,0)
+246 ;;=S05.32XA^^37^312^2
+247 ;;^UTILITY(U,$J,358.3,5714,1,0)
+248 ;;=^358.31IA^4^2
+249 ;;^UTILITY(U,$J,358.3,5714,1,3,0)
+250 ;;=3^Ocular Laceration w/o Loss of Intraoc Tissue,Left Eye,Init Encntr
+251 ;;^UTILITY(U,$J,358.3,5714,1,4,0)
+252 ;;=4^S05.32XA
+253 ;;^UTILITY(U,$J,358.3,5714,2)
+254 ;;=^5020609
+255 ;;^UTILITY(U,$J,358.3,5715,0)
+256 ;;=S01.121A^^37^312^3
+257 ;;^UTILITY(U,$J,358.3,5715,1,0)
+258 ;;=^358.31IA^4^2
+259 ;;^UTILITY(U,$J,358.3,5715,1,3,0)
+260 ;;=3^Laceration w/ FB,Right Eyelid,Init Encntr
+261 ;;^UTILITY(U,$J,358.3,5715,1,4,0)
+262 ;;=4^S01.121A
+263 ;;^UTILITY(U,$J,358.3,5715,2)
+264 ;;=^5020066
+265 ;;^UTILITY(U,$J,358.3,5716,0)
+266 ;;=S01.122A^^37^312^4
+267 ;;^UTILITY(U,$J,358.3,5716,1,0)
+268 ;;=^358.31IA^4^2
+269 ;;^UTILITY(U,$J,358.3,5716,1,3,0)
+270 ;;=3^Laceration w/ FB,Left Eyelid,Init Encntr
+271 ;;^UTILITY(U,$J,358.3,5716,1,4,0)
+272 ;;=4^S01.122A
+273 ;;^UTILITY(U,$J,358.3,5716,2)
+274 ;;=^5134190
+275 ;;^UTILITY(U,$J,358.3,5717,0)
+276 ;;=S01.111A^^37^312^5
+277 ;;^UTILITY(U,$J,358.3,5717,1,0)
+278 ;;=^358.31IA^4^2
+279 ;;^UTILITY(U,$J,358.3,5717,1,3,0)
+280 ;;=3^Laceration w/o FB,Right Eyelid,Init Encntr
+281 ;;^UTILITY(U,$J,358.3,5717,1,4,0)
+282 ;;=4^S01.111A
+283 ;;^UTILITY(U,$J,358.3,5717,2)
+284 ;;=^5020057
+285 ;;^UTILITY(U,$J,358.3,5718,0)
+286 ;;=S01.112A^^37^312^6
+287 ;;^UTILITY(U,$J,358.3,5718,1,0)
+288 ;;=^358.31IA^4^2
+289 ;;^UTILITY(U,$J,358.3,5718,1,3,0)
+290 ;;=3^Laceration w/o FB,Left Eyelid,Init Encntr
+291 ;;^UTILITY(U,$J,358.3,5718,1,4,0)
+292 ;;=4^S01.112A
+293 ;;^UTILITY(U,$J,358.3,5718,2)
+294 ;;=^5020060
+295 ;;^UTILITY(U,$J,358.3,5719,0)
+296 ;;=S01.141A^^37^312^7
+297 ;;^UTILITY(U,$J,358.3,5719,1,0)
+298 ;;=^358.31IA^4^2
+299 ;;^UTILITY(U,$J,358.3,5719,1,3,0)
+300 ;;=3^Puncture Wound w/ FB,Right Eyelid,Init Encntr
+301 ;;^UTILITY(U,$J,358.3,5719,1,4,0)
+302 ;;=4^S01.141A
+303 ;;^UTILITY(U,$J,358.3,5719,2)
+304 ;;=^5020078
+305 ;;^UTILITY(U,$J,358.3,5720,0)
+306 ;;=S01.142A^^37^312^8
+307 ;;^UTILITY(U,$J,358.3,5720,1,0)
+308 ;;=^358.31IA^4^2
+309 ;;^UTILITY(U,$J,358.3,5720,1,3,0)
+310 ;;=3^Puncture Wound w/ FB,Left Eyelid,Init Encntr
+311 ;;^UTILITY(U,$J,358.3,5720,1,4,0)
+312 ;;=4^S01.142A
+313 ;;^UTILITY(U,$J,358.3,5720,2)
+314 ;;=^5134196
+315 ;;^UTILITY(U,$J,358.3,5721,0)
+316 ;;=S01.131A^^37^312^9
+317 ;;^UTILITY(U,$J,358.3,5721,1,0)
+318 ;;=^358.31IA^4^2
+319 ;;^UTILITY(U,$J,358.3,5721,1,3,0)
+320 ;;=3^Puncture Wound w/o FB,Right Eyelid,Init Encntr
+321 ;;^UTILITY(U,$J,358.3,5721,1,4,0)
+322 ;;=4^S01.131A
+323 ;;^UTILITY(U,$J,358.3,5721,2)
+324 ;;=^5020069
+325 ;;^UTILITY(U,$J,358.3,5722,0)
+326 ;;=S01.132A^^37^312^10
+327 ;;^UTILITY(U,$J,358.3,5722,1,0)
+328 ;;=^358.31IA^4^2
+329 ;;^UTILITY(U,$J,358.3,5722,1,3,0)
+330 ;;=3^Puncture Wound w/o FB,Left Eyelid,Init Encntr
+331 ;;^UTILITY(U,$J,358.3,5722,1,4,0)
+332 ;;=4^S01.132A
+333 ;;^UTILITY(U,$J,358.3,5722,2)
+334 ;;=^5020072
+335 ;;^UTILITY(U,$J,358.3,5723,0)
+336 ;;=S05.41XA^^37^312^11
+337 ;;^UTILITY(U,$J,358.3,5723,1,0)
+338 ;;=^358.31IA^4^2
+339 ;;^UTILITY(U,$J,358.3,5723,1,3,0)
+340 ;;=3^Penetrating Orbital Wound,Right Eye,Init Encntr
+341 ;;^UTILITY(U,$J,358.3,5723,1,4,0)
+342 ;;=4^S05.41XA
+343 ;;^UTILITY(U,$J,358.3,5723,2)
+344 ;;=^5020615
+345 ;;^UTILITY(U,$J,358.3,5724,0)
+346 ;;=S05.42XA^^37^312^12
+347 ;;^UTILITY(U,$J,358.3,5724,1,0)
+348 ;;=^358.31IA^4^2
+349 ;;^UTILITY(U,$J,358.3,5724,1,3,0)
+350 ;;=3^Penetrating Orbital Wound,Left Eye,Init Encntr
+351 ;;^UTILITY(U,$J,358.3,5724,1,4,0)
+352 ;;=4^S05.42XA
+353 ;;^UTILITY(U,$J,358.3,5724,2)
+354 ;;=^5020618
+355 ;;^UTILITY(U,$J,358.3,5725,0)
+356 ;;=S02.42XA^^37^312^17
+357 ;;^UTILITY(U,$J,358.3,5725,1,0)
+358 ;;=^358.31IA^4^2
+359 ;;^UTILITY(U,$J,358.3,5725,1,3,0)
+360 ;;=3^Fx of Alveoulus of Maxilla,Init Encntr for Closed Fx
+361 ;;^UTILITY(U,$J,358.3,5725,1,4,0)
+362 ;;=4^S02.42XA
+363 ;;^UTILITY(U,$J,358.3,5725,2)
+364 ;;=^5020354
+365 ;;^UTILITY(U,$J,358.3,5726,0)
+366 ;;=S00.11XA^^37^312^18
+367 ;;^UTILITY(U,$J,358.3,5726,1,0)
+368 ;;=^358.31IA^4^2
+369 ;;^UTILITY(U,$J,358.3,5726,1,3,0)
+370 ;;=3^Contusion,Right Eyelid,Init Encntr
+371 ;;^UTILITY(U,$J,358.3,5726,1,4,0)
+372 ;;=4^S00.11XA
+373 ;;^UTILITY(U,$J,358.3,5726,2)
+374 ;;=^5019778
+375 ;;^UTILITY(U,$J,358.3,5727,0)
+376 ;;=S00.12XA^^37^312^19
+377 ;;^UTILITY(U,$J,358.3,5727,1,0)
+378 ;;=^358.31IA^4^2
+379 ;;^UTILITY(U,$J,358.3,5727,1,3,0)
+380 ;;=3^Contusion,Left Eyelid,Init Encntr
+381 ;;^UTILITY(U,$J,358.3,5727,1,4,0)
+382 ;;=4^S00.12XA
+383 ;;^UTILITY(U,$J,358.3,5727,2)
+384 ;;=^5019781
+385 ;;^UTILITY(U,$J,358.3,5728,0)
+386 ;;=S01.151A^^37^312^20
+387 ;;^UTILITY(U,$J,358.3,5728,1,0)
+388 ;;=^358.31IA^4^2
+389 ;;^UTILITY(U,$J,358.3,5728,1,3,0)
+390 ;;=3^Open Bite,Right Eyelid,Init Encntr
+391 ;;^UTILITY(U,$J,358.3,5728,1,4,0)
+392 ;;=4^S01.151A
+393 ;;^UTILITY(U,$J,358.3,5728,2)
+394 ;;=^5020081
+395 ;;^UTILITY(U,$J,358.3,5729,0)
+396 ;;=S01.152A^^37^312^21
+397 ;;^UTILITY(U,$J,358.3,5729,1,0)
+398 ;;=^358.31IA^4^2
+399 ;;^UTILITY(U,$J,358.3,5729,1,3,0)
+400 ;;=3^Open Bite,Left Eyelid,Init Encntr
+401 ;;^UTILITY(U,$J,358.3,5729,1,4,0)
+402 ;;=4^S01.152A
+403 ;;^UTILITY(U,$J,358.3,5729,2)
+404 ;;=^5020084
+405 ;;^UTILITY(U,$J,358.3,5730,0)
+406 ;;=S02.81XA^^37^312^13
+407 ;;^UTILITY(U,$J,358.3,5730,1,0)
+408 ;;=^358.31IA^4^2
+409 ;;^UTILITY(U,$J,358.3,5730,1,3,0)
+410 ;;=3^Fx of Skull/Facial Bones,Right Side,Init Encntr for Closed Fx
+411 ;;^UTILITY(U,$J,358.3,5730,1,4,0)
+412 ;;=4^S02.81XA
+413 ;;^UTILITY(U,$J,358.3,5730,2)
+414 ;;=^5139523
+415 ;;^UTILITY(U,$J,358.3,5731,0)
+416 ;;=S02.82XA^^37^312^14
+417 ;;^UTILITY(U,$J,358.3,5731,1,0)
+418 ;;=^358.31IA^4^2
+419 ;;^UTILITY(U,$J,358.3,5731,1,3,0)
+420 ;;=3^Fx of Skull/Facial Bones,Left Side,Init Encntr for Closed Fx
+421 ;;^UTILITY(U,$J,358.3,5731,1,4,0)
+422 ;;=4^S02.82XA
+423 ;;^UTILITY(U,$J,358.3,5731,2)
+424 ;;=^5139529
+425 ;;^UTILITY(U,$J,358.3,5732,0)
+426 ;;=S02.31XA^^37^312^15
+427 ;;^UTILITY(U,$J,358.3,5732,1,0)
+428 ;;=^358.31IA^4^2
+429 ;;^UTILITY(U,$J,358.3,5732,1,3,0)
+430 ;;=3^Fx of Orbital Floor,Right Side,Init Encntr for Closed Fx
+431 ;;^UTILITY(U,$J,358.3,5732,1,4,0)
+432 ;;=4^S02.31XA
+433 ;;^UTILITY(U,$J,358.3,5732,2)
+434 ;;=^5139325
+435 ;;^UTILITY(U,$J,358.3,5733,0)
+436 ;;=S02.32XA^^37^312^16
+437 ;;^UTILITY(U,$J,358.3,5733,1,0)
+438 ;;=^358.31IA^4^2
+439 ;;^UTILITY(U,$J,358.3,5733,1,3,0)
+440 ;;=3^Fx of Orbital Floor,Left Side,Init Encntr for Closed Fx
+441 ;;^UTILITY(U,$J,358.3,5733,1,4,0)
+442 ;;=4^S02.32XA
+443 ;;^UTILITY(U,$J,358.3,5733,2)
+444 ;;=^5139331
+445 ;;^UTILITY(U,$J,358.3,5734,0)
+446 ;;=H04.123^^37^313^1
+447 ;;^UTILITY(U,$J,358.3,5734,1,0)
+448 ;;=^358.31IA^4^2
+449 ;;^UTILITY(U,$J,358.3,5734,1,3,0)
+450 ;;=3^Dry Eye Syndrome,Bilateral Lacrimal Glands
+451 ;;^UTILITY(U,$J,358.3,5734,1,4,0)
+452 ;;=4^H04.123
+453 ;;^UTILITY(U,$J,358.3,5734,2)
+454 ;;=^5004465
+455 ;;^UTILITY(U,$J,358.3,5735,0)
+456 ;;=M35.01^^37^313^2
+457 ;;^UTILITY(U,$J,358.3,5735,1,0)
+458 ;;=^358.31IA^4^2
+459 ;;^UTILITY(U,$J,358.3,5735,1,3,0)
+460 ;;=3^Sicca Syndrome w/ Keratoconjunctivitis
+461 ;;^UTILITY(U,$J,358.3,5735,1,4,0)
+462 ;;=4^M35.01
+463 ;;^UTILITY(U,$J,358.3,5735,2)
+464 ;;=^5011787
+465 ;;^UTILITY(U,$J,358.3,5736,0)
+466 ;;=H10.503^^37^313^3
+467 ;;^UTILITY(U,$J,358.3,5736,1,0)
+468 ;;=^358.31IA^4^2
+469 ;;^UTILITY(U,$J,358.3,5736,1,3,0)
+470 ;;=3^Blepharoconjunctivitis,Bilateral
+471 ;;^UTILITY(U,$J,358.3,5736,1,4,0)
+472 ;;=4^H10.503
+473 ;;^UTILITY(U,$J,358.3,5736,2)
+474 ;;=^5004699
+475 ;;^UTILITY(U,$J,358.3,5737,0)
+476 ;;=H01.001^^37^313^4
+477 ;;^UTILITY(U,$J,358.3,5737,1,0)
+478 ;;=^358.31IA^4^2
+479 ;;^UTILITY(U,$J,358.3,5737,1,3,0)
+480 ;;=3^Blepharitis,Right Upper Eyelid
+481 ;;^UTILITY(U,$J,358.3,5737,1,4,0)
+482 ;;=4^H01.001
+483 ;;^UTILITY(U,$J,358.3,5737,2)
+484 ;;=^5004238
+485 ;;^UTILITY(U,$J,358.3,5738,0)
+486 ;;=H01.004^^37^313^5
+487 ;;^UTILITY(U,$J,358.3,5738,1,0)
+488 ;;=^358.31IA^4^2
+489 ;;^UTILITY(U,$J,358.3,5738,1,3,0)
+490 ;;=3^Blepharitis,Left Upper Eyelid
+491 ;;^UTILITY(U,$J,358.3,5738,1,4,0)
+492 ;;=4^H01.004
+493 ;;^UTILITY(U,$J,358.3,5738,2)
+494 ;;=^5004241
+495 ;;^UTILITY(U,$J,358.3,5739,0)
+496 ;;=L71.9^^37^313^6
+497 ;;^UTILITY(U,$J,358.3,5739,1,0)
+498 ;;=^358.31IA^4^2
+499 ;;^UTILITY(U,$J,358.3,5739,1,3,0)
+500 ;;=3^Rosacea,Unspec
+501 ;;^UTILITY(U,$J,358.3,5739,1,4,0)
+502 ;;=4^L71.9
+503 ;;^UTILITY(U,$J,358.3,5739,2)
+504 ;;=^5009276
+505 ;;^UTILITY(U,$J,358.3,5740,0)
+506 ;;=H04.221^^37^313^10
+507 ;;^UTILITY(U,$J,358.3,5740,1,0)
+508 ;;=^358.31IA^4^2
+509 ;;^UTILITY(U,$J,358.3,5740,1,3,0)
+510 ;;=3^Epiphora d/t Insuff Drainage,Right
+511 ;;^UTILITY(U,$J,358.3,5740,1,4,0)
+512 ;;=4^H04.221
+513 ;;^UTILITY(U,$J,358.3,5740,2)
+514 ;;=^5004491
+515 ;;^UTILITY(U,$J,358.3,5741,0)
+516 ;;=H04.222^^37^313^11
+517 ;;^UTILITY(U,$J,358.3,5741,1,0)
+518 ;;=^358.31IA^4^2
+519 ;;^UTILITY(U,$J,358.3,5741,1,3,0)
+520 ;;=3^Epiphora d/t Insuff Drainage,Left
+521 ;;^UTILITY(U,$J,358.3,5741,1,4,0)
+522 ;;=4^H04.222
+523 ;;^UTILITY(U,$J,358.3,5741,2)
+524 ;;=^5004492
+525 ;;^UTILITY(U,$J,358.3,5742,0)
+526 ;;=H04.551^^37^313^12
+527 ;;^UTILITY(U,$J,358.3,5742,1,0)
+528 ;;=^358.31IA^4^2
+529 ;;^UTILITY(U,$J,358.3,5742,1,3,0)
+530 ;;=3^Acquired Stenosis,Right Nasolacrimal Duct
+531 ;;^UTILITY(U,$J,358.3,5742,1,4,0)
+532 ;;=4^H04.551
+533 ;;^UTILITY(U,$J,358.3,5742,2)
+534 ;;=^5004538
+535 ;;^UTILITY(U,$J,358.3,5743,0)
+536 ;;=H04.552^^37^313^13
+537 ;;^UTILITY(U,$J,358.3,5743,1,0)
+538 ;;=^358.31IA^4^2
+539 ;;^UTILITY(U,$J,358.3,5743,1,3,0)
+540 ;;=3^Acquired Stenosis,Left Nasolacrimal Duct
+541 ;;^UTILITY(U,$J,358.3,5743,1,4,0)
+542 ;;=4^H04.552
+543 ;;^UTILITY(U,$J,358.3,5743,2)
+544 ;;=^5004539
+545 ;;^UTILITY(U,$J,358.3,5744,0)
+546 ;;=H04.211^^37^313^7
+547 ;;^UTILITY(U,$J,358.3,5744,1,0)
+548 ;;=^358.31IA^4^2
+549 ;;^UTILITY(U,$J,358.3,5744,1,3,0)
+550 ;;=3^Epiphora d/t Excessive Lacrimation,Right
+551 ;;^UTILITY(U,$J,358.3,5744,1,4,0)
+552 ;;=4^H04.211
+553 ;;^UTILITY(U,$J,358.3,5744,2)
+554 ;;=^5004487
+555 ;;^UTILITY(U,$J,358.3,5745,0)
+556 ;;=H04.212^^37^313^8
+557 ;;^UTILITY(U,$J,358.3,5745,1,0)
+558 ;;=^358.31IA^4^2
+559 ;;^UTILITY(U,$J,358.3,5745,1,3,0)
+560 ;;=3^Epiphora d/t Excessive Lacrimation,Left
+561 ;;^UTILITY(U,$J,358.3,5745,1,4,0)
+562 ;;=4^H04.212
+563 ;;^UTILITY(U,$J,358.3,5745,2)
+564 ;;=^5004488
+565 ;;^UTILITY(U,$J,358.3,5746,0)
+566 ;;=H04.213^^37^313^9
+567 ;;^UTILITY(U,$J,358.3,5746,1,0)
+568 ;;=^358.31IA^4^2
+569 ;;^UTILITY(U,$J,358.3,5746,1,3,0)
+570 ;;=3^Epiphora d/t Excessive Lacrimation,Bilateral
+571 ;;^UTILITY(U,$J,358.3,5746,1,4,0)
+572 ;;=4^H04.213
+573 ;;^UTILITY(U,$J,358.3,5746,2)
+574 ;;=^5004489
+575 ;;^UTILITY(U,$J,358.3,5747,0)
+576 ;;=D23.111^^37^313^14
+577 ;;^UTILITY(U,$J,358.3,5747,1,0)
+578 ;;=^358.31IA^4^2
+579 ;;^UTILITY(U,$J,358.3,5747,1,3,0)
+580 ;;=3^Benign Neop Skin,Right Upper Eyelid
+581 ;;^UTILITY(U,$J,358.3,5747,1,4,0)
+582 ;;=4^D23.111
+583 ;;^UTILITY(U,$J,358.3,5747,2)
+584 ;;=^5157290
+585 ;;^UTILITY(U,$J,358.3,5748,0)
+586 ;;=D23.112^^37^313^15
+587 ;;^UTILITY(U,$J,358.3,5748,1,0)
+588 ;;=^358.31IA^4^2
+589 ;;^UTILITY(U,$J,358.3,5748,1,3,0)
+590 ;;=3^Benign Neop Skin,Right Lower Eyelid
+591 ;;^UTILITY(U,$J,358.3,5748,1,4,0)
+592 ;;=4^D23.112
+593 ;;^UTILITY(U,$J,358.3,5748,2)
+594 ;;=^5157291
+595 ;;^UTILITY(U,$J,358.3,5749,0)
+596 ;;=D23.121^^37^313^16
+597 ;;^UTILITY(U,$J,358.3,5749,1,0)
+598 ;;=^358.31IA^4^2
+599 ;;^UTILITY(U,$J,358.3,5749,1,3,0)
+600 ;;=3^Benign Neop Skin,Left Upper Eyelid
+601 ;;^UTILITY(U,$J,358.3,5749,1,4,0)
+602 ;;=4^D23.121
+603 ;;^UTILITY(U,$J,358.3,5749,2)
+604 ;;=^5157292
+605 ;;^UTILITY(U,$J,358.3,5750,0)
+606 ;;=D23.122^^37^313^17
+607 ;;^UTILITY(U,$J,358.3,5750,1,0)
+608 ;;=^358.31IA^4^2
+609 ;;^UTILITY(U,$J,358.3,5750,1,3,0)
+610 ;;=3^BEnign Neop Skin,Left Lower Eyelid
+611 ;;^UTILITY(U,$J,358.3,5750,1,4,0)
+612 ;;=4^D23.122
+613 ;;^UTILITY(U,$J,358.3,5750,2)
+614 ;;=^5157293
+615 ;;^UTILITY(U,$J,358.3,5751,0)
+616 ;;=C44.1021^^37^313^18
+617 ;;^UTILITY(U,$J,358.3,5751,1,0)
+618 ;;=^358.31IA^4^2
+619 ;;^UTILITY(U,$J,358.3,5751,1,3,0)
+620 ;;=3^Malig Neop Skin,Right Upper Eyelid
+621 ;;^UTILITY(U,$J,358.3,5751,1,4,0)
+622 ;;=4^C44.1021
+623 ;;^UTILITY(U,$J,358.3,5751,2)
+624 ;;=^5157253
+625 ;;^UTILITY(U,$J,358.3,5752,0)
+626 ;;=C44.1022^^37^313^19
+627 ;;^UTILITY(U,$J,358.3,5752,1,0)
+628 ;;=^358.31IA^4^2
+629 ;;^UTILITY(U,$J,358.3,5752,1,3,0)
+630 ;;=3^Malig Neop Skin,Right Lower Eyelid
+631 ;;^UTILITY(U,$J,358.3,5752,1,4,0)
+632 ;;=4^C44.1022
+633 ;;^UTILITY(U,$J,358.3,5752,2)
+634 ;;=^5157254
+635 ;;^UTILITY(U,$J,358.3,5753,0)
+636 ;;=C44.1091^^37^313^20
+637 ;;^UTILITY(U,$J,358.3,5753,1,0)
+638 ;;=^358.31IA^4^2
+639 ;;^UTILITY(U,$J,358.3,5753,1,3,0)
+640 ;;=3^Malig Neop Skin,Left Upper Eyelid
+641 ;;^UTILITY(U,$J,358.3,5753,1,4,0)
+642 ;;=4^C44.1091
+643 ;;^UTILITY(U,$J,358.3,5753,2)
+644 ;;=^5157255
+645 ;;^UTILITY(U,$J,358.3,5754,0)
+646 ;;=C44.1092^^37^313^21
+647 ;;^UTILITY(U,$J,358.3,5754,1,0)
+648 ;;=^358.31IA^4^2
+649 ;;^UTILITY(U,$J,358.3,5754,1,3,0)
+650 ;;=3^Malig Neop Skin,Left Lower Eyelid
+651 ;;^UTILITY(U,$J,358.3,5754,1,4,0)
+652 ;;=4^C44.1092
+653 ;;^UTILITY(U,$J,358.3,5754,2)
+654 ;;=^5157256
+655 ;;^UTILITY(U,$J,358.3,5755,0)
+656 ;;=C44.1121^^37^313^22
+657 ;;^UTILITY(U,$J,358.3,5755,1,0)
+658 ;;=^358.31IA^4^2
+659 ;;^UTILITY(U,$J,358.3,5755,1,3,0)
+660 ;;=3^BCC Neop Skin,Right Upper Eyelid
+661 ;;^UTILITY(U,$J,358.3,5755,1,4,0)
+662 ;;=4^C44.1121
+663 ;;^UTILITY(U,$J,358.3,5755,2)
+664 ;;=^5157257
+665 ;;^UTILITY(U,$J,358.3,5756,0)
+666 ;;=C44.1122^^37^313^23
+667 ;;^UTILITY(U,$J,358.3,5756,1,0)
+668 ;;=^358.31IA^4^2
+669 ;;^UTILITY(U,$J,358.3,5756,1,3,0)
+670 ;;=3^BCC Neop Skin,Right Lower Eyelid
+671 ;;^UTILITY(U,$J,358.3,5756,1,4,0)
+672 ;;=4^C44.1122
+673 ;;^UTILITY(U,$J,358.3,5756,2)
+674 ;;=^5157258
+675 ;;^UTILITY(U,$J,358.3,5757,0)
+676 ;;=C44.1191^^37^313^24