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

IBDEI08T.m

Go to the documentation of this file.
IBDEI08T ; ; 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,21542,1,4,0)
 ;;=4^B35.8
 ;;^UTILITY(U,$J,358.3,21542,2)
 ;;=^5000606
 ;;^UTILITY(U,$J,358.3,21543,0)
 ;;=B36.9^^71^904^312
 ;;^UTILITY(U,$J,358.3,21543,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21543,1,3,0)
 ;;=3^Superficial Mycosis,Unspec
 ;;^UTILITY(U,$J,358.3,21543,1,4,0)
 ;;=4^B36.9
 ;;^UTILITY(U,$J,358.3,21543,2)
 ;;=^5000611
 ;;^UTILITY(U,$J,358.3,21544,0)
 ;;=D69.0^^71^904^33
 ;;^UTILITY(U,$J,358.3,21544,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21544,1,3,0)
 ;;=3^Allergic Purpura
 ;;^UTILITY(U,$J,358.3,21544,1,4,0)
 ;;=4^D69.0
 ;;^UTILITY(U,$J,358.3,21544,2)
 ;;=^5002365
 ;;^UTILITY(U,$J,358.3,21545,0)
 ;;=B00.9^^71^904^161
 ;;^UTILITY(U,$J,358.3,21545,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21545,1,3,0)
 ;;=3^Herpesviral Infection,Unspec
 ;;^UTILITY(U,$J,358.3,21545,1,4,0)
 ;;=4^B00.9
 ;;^UTILITY(U,$J,358.3,21545,2)
 ;;=^5000480
 ;;^UTILITY(U,$J,358.3,21546,0)
 ;;=B02.9^^71^904^331
 ;;^UTILITY(U,$J,358.3,21546,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21546,1,3,0)
 ;;=3^Zoster w/o Complications
 ;;^UTILITY(U,$J,358.3,21546,1,4,0)
 ;;=4^B02.9
 ;;^UTILITY(U,$J,358.3,21546,2)
 ;;=^5000501
 ;;^UTILITY(U,$J,358.3,21547,0)
 ;;=D17.9^^71^904^90
 ;;^UTILITY(U,$J,358.3,21547,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21547,1,3,0)
 ;;=3^Benign Lipomatous Neop,Unspec
 ;;^UTILITY(U,$J,358.3,21547,1,4,0)
 ;;=4^D17.9
 ;;^UTILITY(U,$J,358.3,21547,2)
 ;;=^5002020
 ;;^UTILITY(U,$J,358.3,21548,0)
 ;;=E08.621^^71^904^137
 ;;^UTILITY(U,$J,358.3,21548,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21548,1,3,0)
 ;;=3^DM d/t Underlying Condition w/ Foot Ulcer
 ;;^UTILITY(U,$J,358.3,21548,1,4,0)
 ;;=4^E08.621
 ;;^UTILITY(U,$J,358.3,21548,2)
 ;;=^5002534
 ;;^UTILITY(U,$J,358.3,21549,0)
 ;;=E09.621^^71^904^136
 ;;^UTILITY(U,$J,358.3,21549,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21549,1,3,0)
 ;;=3^DM d/t Drug/Chemical w/ Foot Ulcer
 ;;^UTILITY(U,$J,358.3,21549,1,4,0)
 ;;=4^E09.621
 ;;^UTILITY(U,$J,358.3,21549,2)
 ;;=^5002576
 ;;^UTILITY(U,$J,358.3,21550,0)
 ;;=H05.011^^71^904^112
 ;;^UTILITY(U,$J,358.3,21550,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21550,1,3,0)
 ;;=3^Cellulitis of Right Orbit
 ;;^UTILITY(U,$J,358.3,21550,1,4,0)
 ;;=4^H05.011
 ;;^UTILITY(U,$J,358.3,21550,2)
 ;;=^5004560
 ;;^UTILITY(U,$J,358.3,21551,0)
 ;;=H05.012^^71^904^105
 ;;^UTILITY(U,$J,358.3,21551,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21551,1,3,0)
 ;;=3^Cellulitis of Left Orbit
 ;;^UTILITY(U,$J,358.3,21551,1,4,0)
 ;;=4^H05.012
 ;;^UTILITY(U,$J,358.3,21551,2)
 ;;=^5004561
 ;;^UTILITY(U,$J,358.3,21552,0)
 ;;=H05.013^^71^904^99
 ;;^UTILITY(U,$J,358.3,21552,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21552,1,3,0)
 ;;=3^Cellulitis of Bilateral Orbits
 ;;^UTILITY(U,$J,358.3,21552,1,4,0)
 ;;=4^H05.013
 ;;^UTILITY(U,$J,358.3,21552,2)
 ;;=^5004562
 ;;^UTILITY(U,$J,358.3,21553,0)
 ;;=I70.331^^71^904^51
 ;;^UTILITY(U,$J,358.3,21553,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21553,1,3,0)
 ;;=3^Athscl Bypass of Right Leg w/ Ulcer of Thigh
 ;;^UTILITY(U,$J,358.3,21553,1,4,0)
 ;;=4^I70.331
 ;;^UTILITY(U,$J,358.3,21553,2)
 ;;=^5007626
 ;;^UTILITY(U,$J,358.3,21554,0)
 ;;=I70.332^^71^904^52
 ;;^UTILITY(U,$J,358.3,21554,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21554,1,3,0)
 ;;=3^Athscl Bypass of Right Leg w/ Ulcer of Calf
 ;;^UTILITY(U,$J,358.3,21554,1,4,0)
 ;;=4^I70.332
 ;;^UTILITY(U,$J,358.3,21554,2)
 ;;=^5007627
 ;;^UTILITY(U,$J,358.3,21555,0)
 ;;=I70.333^^71^904^53
 ;;^UTILITY(U,$J,358.3,21555,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21555,1,3,0)
 ;;=3^Athscl Bypass of Right Leg w/ Ulcer of Ankle
 ;;^UTILITY(U,$J,358.3,21555,1,4,0)
 ;;=4^I70.333
 ;;^UTILITY(U,$J,358.3,21555,2)
 ;;=^5007628
 ;;^UTILITY(U,$J,358.3,21556,0)
 ;;=I70.334^^71^904^54
 ;;^UTILITY(U,$J,358.3,21556,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21556,1,3,0)
 ;;=3^Athscl Bypass of Right Leg w/ Ulcer of Heel/Midfoot
 ;;^UTILITY(U,$J,358.3,21556,1,4,0)
 ;;=4^I70.334
 ;;^UTILITY(U,$J,358.3,21556,2)
 ;;=^5007629
 ;;^UTILITY(U,$J,358.3,21557,0)
 ;;=I70.335^^71^904^55
 ;;^UTILITY(U,$J,358.3,21557,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21557,1,3,0)
 ;;=3^Athscl Bypass of Right Leg w/ Ulcer of Oth Part of Foot
 ;;^UTILITY(U,$J,358.3,21557,1,4,0)
 ;;=4^I70.335
 ;;^UTILITY(U,$J,358.3,21557,2)
 ;;=^5007630
 ;;^UTILITY(U,$J,358.3,21558,0)
 ;;=I70.341^^71^904^50
 ;;^UTILITY(U,$J,358.3,21558,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21558,1,3,0)
 ;;=3^Athscl Bypass of Left Leg w/ Ulcer of Thigh
 ;;^UTILITY(U,$J,358.3,21558,1,4,0)
 ;;=4^I70.341
 ;;^UTILITY(U,$J,358.3,21558,2)
 ;;=^5007633
 ;;^UTILITY(U,$J,358.3,21559,0)
 ;;=I70.342^^71^904^47
 ;;^UTILITY(U,$J,358.3,21559,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21559,1,3,0)
 ;;=3^Athscl Bypass of Left Leg w/ Ulcer of Calf
 ;;^UTILITY(U,$J,358.3,21559,1,4,0)
 ;;=4^I70.342
 ;;^UTILITY(U,$J,358.3,21559,2)
 ;;=^5007634
 ;;^UTILITY(U,$J,358.3,21560,0)
 ;;=I70.343^^71^904^46
 ;;^UTILITY(U,$J,358.3,21560,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21560,1,3,0)
 ;;=3^Athscl Bypass of Left Leg w/ Ulcer of Ankle
 ;;^UTILITY(U,$J,358.3,21560,1,4,0)
 ;;=4^I70.343
 ;;^UTILITY(U,$J,358.3,21560,2)
 ;;=^5007635
 ;;^UTILITY(U,$J,358.3,21561,0)
 ;;=I70.344^^71^904^48
 ;;^UTILITY(U,$J,358.3,21561,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21561,1,3,0)
 ;;=3^Athscl Bypass of Left Leg w/ Ulcer of Heel/Midfoot
 ;;^UTILITY(U,$J,358.3,21561,1,4,0)
 ;;=4^I70.344
 ;;^UTILITY(U,$J,358.3,21561,2)
 ;;=^5007636
 ;;^UTILITY(U,$J,358.3,21562,0)
 ;;=I70.345^^71^904^49
 ;;^UTILITY(U,$J,358.3,21562,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21562,1,3,0)
 ;;=3^Athscl Bypass of Left Leg w/ Ulcer of Oth Part of Foot
 ;;^UTILITY(U,$J,358.3,21562,1,4,0)
 ;;=4^I70.345
 ;;^UTILITY(U,$J,358.3,21562,2)
 ;;=^5007637
 ;;^UTILITY(U,$J,358.3,21563,0)
 ;;=I70.431^^71^904^41
 ;;^UTILITY(U,$J,358.3,21563,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21563,1,3,0)
 ;;=3^Athscl Autol Vein Bypass of Right Leg w/ Ulcer of Thigh
 ;;^UTILITY(U,$J,358.3,21563,1,4,0)
 ;;=4^I70.431
 ;;^UTILITY(U,$J,358.3,21563,2)
 ;;=^5007664
 ;;^UTILITY(U,$J,358.3,21564,0)
 ;;=I70.432^^71^904^42
 ;;^UTILITY(U,$J,358.3,21564,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21564,1,3,0)
 ;;=3^Athscl Autol Vein Bypass of Right Leg w/ Ulcer of Calf
 ;;^UTILITY(U,$J,358.3,21564,1,4,0)
 ;;=4^I70.432
 ;;^UTILITY(U,$J,358.3,21564,2)
 ;;=^5007665
 ;;^UTILITY(U,$J,358.3,21565,0)
 ;;=I70.433^^71^904^43
 ;;^UTILITY(U,$J,358.3,21565,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21565,1,3,0)
 ;;=3^Athscl Autol Vein Bypass of Right Leg w/ Ulcer of Ankle
 ;;^UTILITY(U,$J,358.3,21565,1,4,0)
 ;;=4^I70.433
 ;;^UTILITY(U,$J,358.3,21565,2)
 ;;=^5007666
 ;;^UTILITY(U,$J,358.3,21566,0)
 ;;=I70.434^^71^904^44
 ;;^UTILITY(U,$J,358.3,21566,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21566,1,3,0)
 ;;=3^Athscl Autol Vein Bypass of Right Leg w/ Ulcer of Heel/Midfoot
 ;;^UTILITY(U,$J,358.3,21566,1,4,0)
 ;;=4^I70.434
 ;;^UTILITY(U,$J,358.3,21566,2)
 ;;=^5007667
 ;;^UTILITY(U,$J,358.3,21567,0)
 ;;=I70.435^^71^904^45
 ;;^UTILITY(U,$J,358.3,21567,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21567,1,3,0)
 ;;=3^Athscl Autol Vein Bypass of Right Leg w/ Ulcer of Oth Part of Foot
 ;;^UTILITY(U,$J,358.3,21567,1,4,0)
 ;;=4^I70.435
 ;;^UTILITY(U,$J,358.3,21567,2)
 ;;=^5007668
 ;;^UTILITY(U,$J,358.3,21568,0)
 ;;=I70.441^^71^904^36
 ;;^UTILITY(U,$J,358.3,21568,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21568,1,3,0)
 ;;=3^Athscl Autol Vein Bypass of Left Leg w/ Ulcer of Thigh
 ;;^UTILITY(U,$J,358.3,21568,1,4,0)
 ;;=4^I70.441
 ;;^UTILITY(U,$J,358.3,21568,2)
 ;;=^5007671
 ;;^UTILITY(U,$J,358.3,21569,0)
 ;;=I70.442^^71^904^37
 ;;^UTILITY(U,$J,358.3,21569,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21569,1,3,0)
 ;;=3^Athscl Autol Vein Bypass of Left Leg w/ Ulcer of Calf
 ;;^UTILITY(U,$J,358.3,21569,1,4,0)
 ;;=4^I70.442
 ;;^UTILITY(U,$J,358.3,21569,2)
 ;;=^5007672
 ;;^UTILITY(U,$J,358.3,21570,0)
 ;;=I70.443^^71^904^38
 ;;^UTILITY(U,$J,358.3,21570,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21570,1,3,0)
 ;;=3^Athscl Autol Vein Bypass of Left Leg w/ Ulcer of Ankle
 ;;^UTILITY(U,$J,358.3,21570,1,4,0)
 ;;=4^I70.443
 ;;^UTILITY(U,$J,358.3,21570,2)
 ;;=^5007673
 ;;^UTILITY(U,$J,358.3,21571,0)
 ;;=I70.444^^71^904^39
 ;;^UTILITY(U,$J,358.3,21571,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21571,1,3,0)
 ;;=3^Athscl Autol Vein Bypass of Left Leg w/ Ulcer of Heel/Midfoot
 ;;^UTILITY(U,$J,358.3,21571,1,4,0)
 ;;=4^I70.444
 ;;^UTILITY(U,$J,358.3,21571,2)
 ;;=^5007674
 ;;^UTILITY(U,$J,358.3,21572,0)
 ;;=I70.445^^71^904^40
 ;;^UTILITY(U,$J,358.3,21572,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21572,1,3,0)
 ;;=3^Athscl Autol Vein Bypass of Left Leg w/ Ulcer of Oth Part of Foot
 ;;^UTILITY(U,$J,358.3,21572,1,4,0)
 ;;=4^I70.445
 ;;^UTILITY(U,$J,358.3,21572,2)
 ;;=^5007675
 ;;^UTILITY(U,$J,358.3,21573,0)
 ;;=I70.531^^71^904^61
 ;;^UTILITY(U,$J,358.3,21573,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21573,1,3,0)
 ;;=3^Athscl Nonaut Bio Bypass of Right Leg w/ Ulcer of Thigh
 ;;^UTILITY(U,$J,358.3,21573,1,4,0)
 ;;=4^I70.531
 ;;^UTILITY(U,$J,358.3,21573,2)
 ;;=^5007702
 ;;^UTILITY(U,$J,358.3,21574,0)
 ;;=I70.532^^71^904^62
 ;;^UTILITY(U,$J,358.3,21574,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21574,1,3,0)
 ;;=3^Athscl Nonaut Bio Bypass of Right Leg w/ Ulcer of Calf
 ;;^UTILITY(U,$J,358.3,21574,1,4,0)
 ;;=4^I70.532
 ;;^UTILITY(U,$J,358.3,21574,2)
 ;;=^5007703
 ;;^UTILITY(U,$J,358.3,21575,0)
 ;;=I70.533^^71^904^63
 ;;^UTILITY(U,$J,358.3,21575,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21575,1,3,0)
 ;;=3^Athscl Nonaut Bio Bypass of Right Leg w/ Ulcer of Ankle
 ;;^UTILITY(U,$J,358.3,21575,1,4,0)
 ;;=4^I70.533
 ;;^UTILITY(U,$J,358.3,21575,2)
 ;;=^5007704
 ;;^UTILITY(U,$J,358.3,21576,0)
 ;;=I70.534^^71^904^64
 ;;^UTILITY(U,$J,358.3,21576,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21576,1,3,0)
 ;;=3^Athscl Nonaut Bio Bypass of Right Leg w/ Ulcer of Heel/Midfoot
 ;;^UTILITY(U,$J,358.3,21576,1,4,0)
 ;;=4^I70.534
 ;;^UTILITY(U,$J,358.3,21576,2)
 ;;=^5007705
 ;;^UTILITY(U,$J,358.3,21577,0)
 ;;=I70.535^^71^904^65
 ;;^UTILITY(U,$J,358.3,21577,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21577,1,3,0)
 ;;=3^Athscl Nonaut Bio Bypass of Right Leg w/ Ulcer of Oth Part of Foot
 ;;^UTILITY(U,$J,358.3,21577,1,4,0)
 ;;=4^I70.535
 ;;^UTILITY(U,$J,358.3,21577,2)
 ;;=^5007706
 ;;^UTILITY(U,$J,358.3,21578,0)
 ;;=I70.541^^71^904^56
 ;;^UTILITY(U,$J,358.3,21578,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21578,1,3,0)
 ;;=3^Athscl Nonaut Bio Bypass of Left Leg w/ Ulcer of Thigh
 ;;^UTILITY(U,$J,358.3,21578,1,4,0)
 ;;=4^I70.541
 ;;^UTILITY(U,$J,358.3,21578,2)
 ;;=^5007709
 ;;^UTILITY(U,$J,358.3,21579,0)
 ;;=I70.542^^71^904^57
 ;;^UTILITY(U,$J,358.3,21579,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21579,1,3,0)
 ;;=3^Athscl Nonaut Bio Bypass of Left Leg w/ Ulcer of Calf
 ;;^UTILITY(U,$J,358.3,21579,1,4,0)
 ;;=4^I70.542
 ;;^UTILITY(U,$J,358.3,21579,2)
 ;;=^5007710
 ;;^UTILITY(U,$J,358.3,21580,0)
 ;;=I70.543^^71^904^58
 ;;^UTILITY(U,$J,358.3,21580,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21580,1,3,0)
 ;;=3^Athscl Nonaut Bio Bypass of Left Leg w/ Ulcer of Ankle
 ;;^UTILITY(U,$J,358.3,21580,1,4,0)
 ;;=4^I70.543
 ;;^UTILITY(U,$J,358.3,21580,2)
 ;;=^5007711
 ;;^UTILITY(U,$J,358.3,21581,0)
 ;;=I70.544^^71^904^59
 ;;^UTILITY(U,$J,358.3,21581,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21581,1,3,0)
 ;;=3^Athscl Nonaut Bio Bypass of Left Leg w/ Ulcer of Heel/Midfoot
 ;;^UTILITY(U,$J,358.3,21581,1,4,0)
 ;;=4^I70.544
 ;;^UTILITY(U,$J,358.3,21581,2)
 ;;=^5007712
 ;;^UTILITY(U,$J,358.3,21582,0)
 ;;=I70.545^^71^904^60
 ;;^UTILITY(U,$J,358.3,21582,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21582,1,3,0)
 ;;=3^Athscl Nonaut Bio Bypass of Left Leg w/ Ulcer of Oth Part of Foot
 ;;^UTILITY(U,$J,358.3,21582,1,4,0)
 ;;=4^I70.545
 ;;^UTILITY(U,$J,358.3,21582,2)
 ;;=^5007713
 ;;^UTILITY(U,$J,358.3,21583,0)
 ;;=I70.631^^71^904^71
 ;;^UTILITY(U,$J,358.3,21583,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21583,1,3,0)
 ;;=3^Athscl Nonbiol Bypass of Right Leg w/ Ulcer of Thigh
 ;;^UTILITY(U,$J,358.3,21583,1,4,0)
 ;;=4^I70.631
 ;;^UTILITY(U,$J,358.3,21583,2)
 ;;=^5007740
 ;;^UTILITY(U,$J,358.3,21584,0)
 ;;=I70.632^^71^904^72
 ;;^UTILITY(U,$J,358.3,21584,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21584,1,3,0)
 ;;=3^Athscl Nonbiol Bypass of Right Leg w/ Ulcer of Calf
 ;;^UTILITY(U,$J,358.3,21584,1,4,0)
 ;;=4^I70.632
 ;;^UTILITY(U,$J,358.3,21584,2)
 ;;=^5007741
 ;;^UTILITY(U,$J,358.3,21585,0)
 ;;=I70.633^^71^904^73
 ;;^UTILITY(U,$J,358.3,21585,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21585,1,3,0)
 ;;=3^Athscl Nonbiol Bypass of Right Leg w/ Ulcer of Ankle
 ;;^UTILITY(U,$J,358.3,21585,1,4,0)
 ;;=4^I70.633
 ;;^UTILITY(U,$J,358.3,21585,2)
 ;;=^5007742
 ;;^UTILITY(U,$J,358.3,21586,0)
 ;;=I70.634^^71^904^74
 ;;^UTILITY(U,$J,358.3,21586,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21586,1,3,0)
 ;;=3^Athscl Nonbiol Bypass of Right Leg w/ Ulcer of Heel/Midfoot
 ;;^UTILITY(U,$J,358.3,21586,1,4,0)
 ;;=4^I70.634
 ;;^UTILITY(U,$J,358.3,21586,2)
 ;;=^5007743
 ;;^UTILITY(U,$J,358.3,21587,0)
 ;;=I70.635^^71^904^75
 ;;^UTILITY(U,$J,358.3,21587,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21587,1,3,0)
 ;;=3^Athscl Nonbiol Bypass of Right Leg w/ Ulcer of Oth Part of Foot
 ;;^UTILITY(U,$J,358.3,21587,1,4,0)
 ;;=4^I70.635
 ;;^UTILITY(U,$J,358.3,21587,2)
 ;;=^5007744
 ;;^UTILITY(U,$J,358.3,21588,0)
 ;;=I70.641^^71^904^66
 ;;^UTILITY(U,$J,358.3,21588,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21588,1,3,0)
 ;;=3^Athscl Nonbiol Bypass of Left Leg w/ Ulcer of Thigh
 ;;^UTILITY(U,$J,358.3,21588,1,4,0)
 ;;=4^I70.641
 ;;^UTILITY(U,$J,358.3,21588,2)
 ;;=^5007747
 ;;^UTILITY(U,$J,358.3,21589,0)
 ;;=I70.642^^71^904^67
 ;;^UTILITY(U,$J,358.3,21589,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21589,1,3,0)
 ;;=3^Athscl Nonbiol Bypass of Left Leg w/ Ulcer of Calf
 ;;^UTILITY(U,$J,358.3,21589,1,4,0)
 ;;=4^I70.642
 ;;^UTILITY(U,$J,358.3,21589,2)
 ;;=^5007748
 ;;^UTILITY(U,$J,358.3,21590,0)
 ;;=I70.643^^71^904^68
 ;;^UTILITY(U,$J,358.3,21590,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21590,1,3,0)
 ;;=3^Athscl Nonbiol Bypass of Left Leg w/ Ulcer of Ankle
 ;;^UTILITY(U,$J,358.3,21590,1,4,0)
 ;;=4^I70.643
 ;;^UTILITY(U,$J,358.3,21590,2)
 ;;=^5007749
 ;;^UTILITY(U,$J,358.3,21591,0)
 ;;=I70.644^^71^904^69
 ;;^UTILITY(U,$J,358.3,21591,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21591,1,3,0)
 ;;=3^Athscl Nonbiol Bypass of Left Leg w/ Ulcer of Heel/Midfoot
 ;;^UTILITY(U,$J,358.3,21591,1,4,0)
 ;;=4^I70.644
 ;;^UTILITY(U,$J,358.3,21591,2)
 ;;=^5007750
 ;;^UTILITY(U,$J,358.3,21592,0)
 ;;=I70.645^^71^904^70
 ;;^UTILITY(U,$J,358.3,21592,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21592,1,3,0)
 ;;=3^Athscl Nonbiol Bypass of Left Leg w/ Ulcer of Oth Part of Foot
 ;;^UTILITY(U,$J,358.3,21592,1,4,0)
 ;;=4^I70.645
 ;;^UTILITY(U,$J,358.3,21592,2)
 ;;=^5007751
 ;;^UTILITY(U,$J,358.3,21593,0)
 ;;=K12.0^^71^904^298
 ;;^UTILITY(U,$J,358.3,21593,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21593,1,3,0)
 ;;=3^Recurrent Oral Aphthae
 ;;^UTILITY(U,$J,358.3,21593,1,4,0)
 ;;=4^K12.0
 ;;^UTILITY(U,$J,358.3,21593,2)
 ;;=^5008483
 ;;^UTILITY(U,$J,358.3,21594,0)
 ;;=K12.1^^71^904^311
 ;;^UTILITY(U,$J,358.3,21594,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21594,1,3,0)
 ;;=3^Stomatitis NEC
 ;;^UTILITY(U,$J,358.3,21594,1,4,0)
 ;;=4^K12.1
 ;;^UTILITY(U,$J,358.3,21594,2)
 ;;=^5008484
 ;;^UTILITY(U,$J,358.3,21595,0)
 ;;=K12.2^^71^904^95
 ;;^UTILITY(U,$J,358.3,21595,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21595,1,3,0)
 ;;=3^Cellulitis & Abscess of Mouth
 ;;^UTILITY(U,$J,358.3,21595,1,4,0)
 ;;=4^K12.2
 ;;^UTILITY(U,$J,358.3,21595,2)
 ;;=^5008485
 ;;^UTILITY(U,$J,358.3,21596,0)
 ;;=L02.01^^71^904^122
 ;;^UTILITY(U,$J,358.3,21596,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21596,1,3,0)
 ;;=3^Cutaneous Abscess of Face
 ;;^UTILITY(U,$J,358.3,21596,1,4,0)
 ;;=4^L02.01
 ;;^UTILITY(U,$J,358.3,21596,2)
 ;;=^5008944
 ;;^UTILITY(U,$J,358.3,21597,0)
 ;;=L02.11^^71^904^127
 ;;^UTILITY(U,$J,358.3,21597,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21597,1,3,0)
 ;;=3^Cutaneous Abscess of Neck
 ;;^UTILITY(U,$J,358.3,21597,1,4,0)
 ;;=4^L02.11
 ;;^UTILITY(U,$J,358.3,21597,2)
 ;;=^5008947
 ;;^UTILITY(U,$J,358.3,21598,0)
 ;;=L02.211^^71^904^119
 ;;^UTILITY(U,$J,358.3,21598,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21598,1,3,0)
 ;;=3^Cutaneous Abscess of Abdominal Wall
 ;;^UTILITY(U,$J,358.3,21598,1,4,0)
 ;;=4^L02.211
 ;;^UTILITY(U,$J,358.3,21598,2)
 ;;=^5008950
 ;;^UTILITY(U,$J,358.3,21599,0)
 ;;=L02.212^^71^904^120
 ;;^UTILITY(U,$J,358.3,21599,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21599,1,3,0)
 ;;=3^Cutaneous Abscess of Back
 ;;^UTILITY(U,$J,358.3,21599,1,4,0)
 ;;=4^L02.212
 ;;^UTILITY(U,$J,358.3,21599,2)
 ;;=^5008951
 ;;^UTILITY(U,$J,358.3,21600,0)
 ;;=L02.213^^71^904^121
 ;;^UTILITY(U,$J,358.3,21600,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21600,1,3,0)
 ;;=3^Cutaneous Abscess of Chest Wall
 ;;^UTILITY(U,$J,358.3,21600,1,4,0)
 ;;=4^L02.213
 ;;^UTILITY(U,$J,358.3,21600,2)
 ;;=^5008952
 ;;^UTILITY(U,$J,358.3,21601,0)
 ;;=L02.214^^71^904^123
 ;;^UTILITY(U,$J,358.3,21601,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21601,1,3,0)
 ;;=3^Cutaneous Abscess of Groin
 ;;^UTILITY(U,$J,358.3,21601,1,4,0)
 ;;=4^L02.214
 ;;^UTILITY(U,$J,358.3,21601,2)
 ;;=^5008953
 ;;^UTILITY(U,$J,358.3,21602,0)
 ;;=L02.215^^71^904^129
 ;;^UTILITY(U,$J,358.3,21602,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21602,1,3,0)
 ;;=3^Cutaneous Abscess of Perineum
 ;;^UTILITY(U,$J,358.3,21602,1,4,0)
 ;;=4^L02.215
 ;;^UTILITY(U,$J,358.3,21602,2)
 ;;=^5008954
 ;;^UTILITY(U,$J,358.3,21603,0)
 ;;=L02.216^^71^904^134
 ;;^UTILITY(U,$J,358.3,21603,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21603,1,3,0)
 ;;=3^Cutaneous Abscess of Unbilicus
 ;;^UTILITY(U,$J,358.3,21603,1,4,0)
 ;;=4^L02.216
 ;;^UTILITY(U,$J,358.3,21603,2)
 ;;=^5008955
 ;;^UTILITY(U,$J,358.3,21604,0)
 ;;=L02.219^^71^904^133
 ;;^UTILITY(U,$J,358.3,21604,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21604,1,3,0)
 ;;=3^Cutaneous Abscess of Trunk,Unspec
 ;;^UTILITY(U,$J,358.3,21604,1,4,0)
 ;;=4^L02.219
 ;;^UTILITY(U,$J,358.3,21604,2)
 ;;=^5008956
 ;;^UTILITY(U,$J,358.3,21605,0)
 ;;=L02.32^^71^904^157
 ;;^UTILITY(U,$J,358.3,21605,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21605,1,3,0)
 ;;=3^Furuncle of Buttock
 ;;^UTILITY(U,$J,358.3,21605,1,4,0)
 ;;=4^L02.32
 ;;^UTILITY(U,$J,358.3,21605,2)
 ;;=^5008972
 ;;^UTILITY(U,$J,358.3,21606,0)
 ;;=L02.33^^71^904^93
 ;;^UTILITY(U,$J,358.3,21606,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21606,1,3,0)
 ;;=3^Carbuncle of Buttock
 ;;^UTILITY(U,$J,358.3,21606,1,4,0)
 ;;=4^L02.33
 ;;^UTILITY(U,$J,358.3,21606,2)
 ;;=^5008973
 ;;^UTILITY(U,$J,358.3,21607,0)
 ;;=L02.415^^71^904^132
 ;;^UTILITY(U,$J,358.3,21607,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,21607,1,3,0)
 ;;=3^Cutaneous Abscess of Right Lower Limb
 ;;^UTILITY(U,$J,358.3,21607,1,4,0)
 ;;=4^L02.415
 ;;^UTILITY(U,$J,358.3,21607,2)
 ;;=^5008978