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

IBDEI0DE.m

Go to the documentation of this file.
  1. IBDEI0DE ; ; 03-MAY-2022
  1. ;;3.0;IB ENCOUNTER FORM IMP/EXP;;MAY 03, 2022
  1. 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
  1. Q Q
  1. ;;^UTILITY(U,$J,358.3,33629,1,3,0)
  1. ;;=3^Tinea Barbae and Tinea Capitis
  1. ;;^UTILITY(U,$J,358.3,33629,1,4,0)
  1. ;;=4^B35.0
  1. ;;^UTILITY(U,$J,358.3,33629,2)
  1. ;;=^5000604
  1. ;;^UTILITY(U,$J,358.3,33630,0)
  1. ;;=B35.1^^105^1423^324
  1. ;;^UTILITY(U,$J,358.3,33630,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,33630,1,3,0)
  1. ;;=3^Tinea Unguium
  1. ;;^UTILITY(U,$J,358.3,33630,1,4,0)
  1. ;;=4^B35.1
  1. ;;^UTILITY(U,$J,358.3,33630,2)
  1. ;;=^119748
  1. ;;^UTILITY(U,$J,358.3,33631,0)
  1. ;;=B35.6^^105^1423^321
  1. ;;^UTILITY(U,$J,358.3,33631,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,33631,1,3,0)
  1. ;;=3^Tinea Cruris
  1. ;;^UTILITY(U,$J,358.3,33631,1,4,0)
  1. ;;=4^B35.6
  1. ;;^UTILITY(U,$J,358.3,33631,2)
  1. ;;=^119711
  1. ;;^UTILITY(U,$J,358.3,33632,0)
  1. ;;=B35.3^^105^1423^323
  1. ;;^UTILITY(U,$J,358.3,33632,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,33632,1,3,0)
  1. ;;=3^Tinea Pedis
  1. ;;^UTILITY(U,$J,358.3,33632,1,4,0)
  1. ;;=4^B35.3
  1. ;;^UTILITY(U,$J,358.3,33632,2)
  1. ;;=^119732
  1. ;;^UTILITY(U,$J,358.3,33633,0)
  1. ;;=B35.5^^105^1423^322
  1. ;;^UTILITY(U,$J,358.3,33633,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,33633,1,3,0)
  1. ;;=3^Tinea Imbricata
  1. ;;^UTILITY(U,$J,358.3,33633,1,4,0)
  1. ;;=4^B35.5
  1. ;;^UTILITY(U,$J,358.3,33633,2)
  1. ;;=^119725
  1. ;;^UTILITY(U,$J,358.3,33634,0)
  1. ;;=B35.4^^105^1423^320
  1. ;;^UTILITY(U,$J,358.3,33634,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,33634,1,3,0)
  1. ;;=3^Tinea Corporis
  1. ;;^UTILITY(U,$J,358.3,33634,1,4,0)
  1. ;;=4^B35.4
  1. ;;^UTILITY(U,$J,358.3,33634,2)
  1. ;;=^119704
  1. ;;^UTILITY(U,$J,358.3,33635,0)
  1. ;;=B35.8^^105^1423^140
  1. ;;^UTILITY(U,$J,358.3,33635,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,33635,1,3,0)
  1. ;;=3^Dermatophytoses,Other
  1. ;;^UTILITY(U,$J,358.3,33635,1,4,0)
  1. ;;=4^B35.8
  1. ;;^UTILITY(U,$J,358.3,33635,2)
  1. ;;=^5000606
  1. ;;^UTILITY(U,$J,358.3,33636,0)
  1. ;;=B36.9^^105^1423^312
  1. ;;^UTILITY(U,$J,358.3,33636,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,33636,1,3,0)
  1. ;;=3^Superficial Mycosis,Unspec
  1. ;;^UTILITY(U,$J,358.3,33636,1,4,0)
  1. ;;=4^B36.9
  1. ;;^UTILITY(U,$J,358.3,33636,2)
  1. ;;=^5000611
  1. ;;^UTILITY(U,$J,358.3,33637,0)
  1. ;;=D69.0^^105^1423^33
  1. ;;^UTILITY(U,$J,358.3,33637,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,33637,1,3,0)
  1. ;;=3^Allergic Purpura
  1. ;;^UTILITY(U,$J,358.3,33637,1,4,0)
  1. ;;=4^D69.0
  1. ;;^UTILITY(U,$J,358.3,33637,2)
  1. ;;=^5002365
  1. ;;^UTILITY(U,$J,358.3,33638,0)
  1. ;;=B00.9^^105^1423^161
  1. ;;^UTILITY(U,$J,358.3,33638,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,33638,1,3,0)
  1. ;;=3^Herpesviral Infection,Unspec
  1. ;;^UTILITY(U,$J,358.3,33638,1,4,0)
  1. ;;=4^B00.9
  1. ;;^UTILITY(U,$J,358.3,33638,2)
  1. ;;=^5000480
  1. ;;^UTILITY(U,$J,358.3,33639,0)
  1. ;;=B02.9^^105^1423^331
  1. ;;^UTILITY(U,$J,358.3,33639,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,33639,1,3,0)
  1. ;;=3^Zoster w/o Complications
  1. ;;^UTILITY(U,$J,358.3,33639,1,4,0)
  1. ;;=4^B02.9
  1. ;;^UTILITY(U,$J,358.3,33639,2)
  1. ;;=^5000501
  1. ;;^UTILITY(U,$J,358.3,33640,0)
  1. ;;=D17.9^^105^1423^90
  1. ;;^UTILITY(U,$J,358.3,33640,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,33640,1,3,0)
  1. ;;=3^Benign Lipomatous Neop,Unspec
  1. ;;^UTILITY(U,$J,358.3,33640,1,4,0)
  1. ;;=4^D17.9
  1. ;;^UTILITY(U,$J,358.3,33640,2)
  1. ;;=^5002020
  1. ;;^UTILITY(U,$J,358.3,33641,0)
  1. ;;=E08.621^^105^1423^137
  1. ;;^UTILITY(U,$J,358.3,33641,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,33641,1,3,0)
  1. ;;=3^DM d/t Underlying Condition w/ Foot Ulcer
  1. ;;^UTILITY(U,$J,358.3,33641,1,4,0)
  1. ;;=4^E08.621
  1. ;;^UTILITY(U,$J,358.3,33641,2)
  1. ;;=^5002534
  1. ;;^UTILITY(U,$J,358.3,33642,0)
  1. ;;=E09.621^^105^1423^136
  1. ;;^UTILITY(U,$J,358.3,33642,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,33642,1,3,0)
  1. ;;=3^DM d/t Drug/Chemical w/ Foot Ulcer
  1. ;;^UTILITY(U,$J,358.3,33642,1,4,0)
  1. ;;=4^E09.621
  1. ;;^UTILITY(U,$J,358.3,33642,2)
  1. ;;=^5002576
  1. ;;^UTILITY(U,$J,358.3,33643,0)
  1. ;;=H05.011^^105^1423^112
  1. ;;^UTILITY(U,$J,358.3,33643,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,33643,1,3,0)
  1. ;;=3^Cellulitis of Right Orbit
  1. ;;^UTILITY(U,$J,358.3,33643,1,4,0)
  1. ;;=4^H05.011
  1. ;;^UTILITY(U,$J,358.3,33643,2)
  1. ;;=^5004560
  1. ;;^UTILITY(U,$J,358.3,33644,0)
  1. ;;=H05.012^^105^1423^105
  1. ;;^UTILITY(U,$J,358.3,33644,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,33644,1,3,0)
  1. ;;=3^Cellulitis of Left Orbit
  1. ;;^UTILITY(U,$J,358.3,33644,1,4,0)
  1. ;;=4^H05.012
  1. ;;^UTILITY(U,$J,358.3,33644,2)
  1. ;;=^5004561
  1. ;;^UTILITY(U,$J,358.3,33645,0)
  1. ;;=H05.013^^105^1423^99
  1. ;;^UTILITY(U,$J,358.3,33645,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,33645,1,3,0)
  1. ;;=3^Cellulitis of Bilateral Orbits
  1. ;;^UTILITY(U,$J,358.3,33645,1,4,0)
  1. ;;=4^H05.013
  1. ;;^UTILITY(U,$J,358.3,33645,2)
  1. ;;=^5004562
  1. ;;^UTILITY(U,$J,358.3,33646,0)
  1. ;;=I70.331^^105^1423^51
  1. ;;^UTILITY(U,$J,358.3,33646,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,33646,1,3,0)
  1. ;;=3^Athscl Bypass of Right Leg w/ Ulcer of Thigh
  1. ;;^UTILITY(U,$J,358.3,33646,1,4,0)
  1. ;;=4^I70.331
  1. ;;^UTILITY(U,$J,358.3,33646,2)
  1. ;;=^5007626
  1. ;;^UTILITY(U,$J,358.3,33647,0)
  1. ;;=I70.332^^105^1423^52
  1. ;;^UTILITY(U,$J,358.3,33647,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,33647,1,3,0)
  1. ;;=3^Athscl Bypass of Right Leg w/ Ulcer of Calf
  1. ;;^UTILITY(U,$J,358.3,33647,1,4,0)
  1. ;;=4^I70.332
  1. ;;^UTILITY(U,$J,358.3,33647,2)
  1. ;;=^5007627
  1. ;;^UTILITY(U,$J,358.3,33648,0)
  1. ;;=I70.333^^105^1423^53
  1. ;;^UTILITY(U,$J,358.3,33648,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,33648,1,3,0)
  1. ;;=3^Athscl Bypass of Right Leg w/ Ulcer of Ankle
  1. ;;^UTILITY(U,$J,358.3,33648,1,4,0)
  1. ;;=4^I70.333
  1. ;;^UTILITY(U,$J,358.3,33648,2)
  1. ;;=^5007628
  1. ;;^UTILITY(U,$J,358.3,33649,0)
  1. ;;=I70.334^^105^1423^54
  1. ;;^UTILITY(U,$J,358.3,33649,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,33649,1,3,0)
  1. ;;=3^Athscl Bypass of Right Leg w/ Ulcer of Heel/Midfoot
  1. ;;^UTILITY(U,$J,358.3,33649,1,4,0)
  1. ;;=4^I70.334
  1. ;;^UTILITY(U,$J,358.3,33649,2)
  1. ;;=^5007629
  1. ;;^UTILITY(U,$J,358.3,33650,0)
  1. ;;=I70.335^^105^1423^55
  1. ;;^UTILITY(U,$J,358.3,33650,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,33650,1,3,0)
  1. ;;=3^Athscl Bypass of Right Leg w/ Ulcer of Oth Part of Foot
  1. ;;^UTILITY(U,$J,358.3,33650,1,4,0)
  1. ;;=4^I70.335
  1. ;;^UTILITY(U,$J,358.3,33650,2)
  1. ;;=^5007630
  1. ;;^UTILITY(U,$J,358.3,33651,0)
  1. ;;=I70.341^^105^1423^50
  1. ;;^UTILITY(U,$J,358.3,33651,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,33651,1,3,0)
  1. ;;=3^Athscl Bypass of Left Leg w/ Ulcer of Thigh
  1. ;;^UTILITY(U,$J,358.3,33651,1,4,0)
  1. ;;=4^I70.341
  1. ;;^UTILITY(U,$J,358.3,33651,2)
  1. ;;=^5007633
  1. ;;^UTILITY(U,$J,358.3,33652,0)
  1. ;;=I70.342^^105^1423^47
  1. ;;^UTILITY(U,$J,358.3,33652,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,33652,1,3,0)
  1. ;;=3^Athscl Bypass of Left Leg w/ Ulcer of Calf
  1. ;;^UTILITY(U,$J,358.3,33652,1,4,0)
  1. ;;=4^I70.342
  1. ;;^UTILITY(U,$J,358.3,33652,2)
  1. ;;=^5007634
  1. ;;^UTILITY(U,$J,358.3,33653,0)
  1. ;;=I70.343^^105^1423^46
  1. ;;^UTILITY(U,$J,358.3,33653,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,33653,1,3,0)
  1. ;;=3^Athscl Bypass of Left Leg w/ Ulcer of Ankle
  1. ;;^UTILITY(U,$J,358.3,33653,1,4,0)
  1. ;;=4^I70.343
  1. ;;^UTILITY(U,$J,358.3,33653,2)
  1. ;;=^5007635
  1. ;;^UTILITY(U,$J,358.3,33654,0)
  1. ;;=I70.344^^105^1423^48
  1. ;;^UTILITY(U,$J,358.3,33654,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,33654,1,3,0)
  1. ;;=3^Athscl Bypass of Left Leg w/ Ulcer of Heel/Midfoot
  1. ;;^UTILITY(U,$J,358.3,33654,1,4,0)
  1. ;;=4^I70.344
  1. ;;^UTILITY(U,$J,358.3,33654,2)
  1. ;;=^5007636
  1. ;;^UTILITY(U,$J,358.3,33655,0)
  1. ;;=I70.345^^105^1423^49
  1. ;;^UTILITY(U,$J,358.3,33655,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,33655,1,3,0)
  1. ;;=3^Athscl Bypass of Left Leg w/ Ulcer of Oth Part of Foot
  1. ;;^UTILITY(U,$J,358.3,33655,1,4,0)
  1. ;;=4^I70.345
  1. ;;^UTILITY(U,$J,358.3,33655,2)
  1. ;;=^5007637
  1. ;;^UTILITY(U,$J,358.3,33656,0)
  1. ;;=I70.431^^105^1423^41
  1. ;;^UTILITY(U,$J,358.3,33656,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,33656,1,3,0)
  1. ;;=3^Athscl Autol Vein Bypass of Right Leg w/ Ulcer of Thigh
  1. ;;^UTILITY(U,$J,358.3,33656,1,4,0)
  1. ;;=4^I70.431
  1. ;;^UTILITY(U,$J,358.3,33656,2)
  1. ;;=^5007664
  1. ;;^UTILITY(U,$J,358.3,33657,0)
  1. ;;=I70.432^^105^1423^42
  1. ;;^UTILITY(U,$J,358.3,33657,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,33657,1,3,0)
  1. ;;=3^Athscl Autol Vein Bypass of Right Leg w/ Ulcer of Calf
  1. ;;^UTILITY(U,$J,358.3,33657,1,4,0)
  1. ;;=4^I70.432
  1. ;;^UTILITY(U,$J,358.3,33657,2)
  1. ;;=^5007665
  1. ;;^UTILITY(U,$J,358.3,33658,0)
  1. ;;=I70.433^^105^1423^43
  1. ;;^UTILITY(U,$J,358.3,33658,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,33658,1,3,0)
  1. ;;=3^Athscl Autol Vein Bypass of Right Leg w/ Ulcer of Ankle
  1. ;;^UTILITY(U,$J,358.3,33658,1,4,0)
  1. ;;=4^I70.433
  1. ;;^UTILITY(U,$J,358.3,33658,2)
  1. ;;=^5007666
  1. ;;^UTILITY(U,$J,358.3,33659,0)
  1. ;;=I70.434^^105^1423^44
  1. ;;^UTILITY(U,$J,358.3,33659,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,33659,1,3,0)
  1. ;;=3^Athscl Autol Vein Bypass of Right Leg w/ Ulcer of Heel/Midfoot
  1. ;;^UTILITY(U,$J,358.3,33659,1,4,0)
  1. ;;=4^I70.434
  1. ;;^UTILITY(U,$J,358.3,33659,2)
  1. ;;=^5007667
  1. ;;^UTILITY(U,$J,358.3,33660,0)
  1. ;;=I70.435^^105^1423^45
  1. ;;^UTILITY(U,$J,358.3,33660,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,33660,1,3,0)
  1. ;;=3^Athscl Autol Vein Bypass of Right Leg w/ Ulcer of Oth Part of Foot
  1. ;;^UTILITY(U,$J,358.3,33660,1,4,0)
  1. ;;=4^I70.435
  1. ;;^UTILITY(U,$J,358.3,33660,2)
  1. ;;=^5007668
  1. ;;^UTILITY(U,$J,358.3,33661,0)
  1. ;;=I70.441^^105^1423^36
  1. ;;^UTILITY(U,$J,358.3,33661,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,33661,1,3,0)
  1. ;;=3^Athscl Autol Vein Bypass of Left Leg w/ Ulcer of Thigh
  1. ;;^UTILITY(U,$J,358.3,33661,1,4,0)
  1. ;;=4^I70.441
  1. ;;^UTILITY(U,$J,358.3,33661,2)
  1. ;;=^5007671
  1. ;;^UTILITY(U,$J,358.3,33662,0)
  1. ;;=I70.442^^105^1423^37
  1. ;;^UTILITY(U,$J,358.3,33662,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,33662,1,3,0)
  1. ;;=3^Athscl Autol Vein Bypass of Left Leg w/ Ulcer of Calf
  1. ;;^UTILITY(U,$J,358.3,33662,1,4,0)
  1. ;;=4^I70.442
  1. ;;^UTILITY(U,$J,358.3,33662,2)
  1. ;;=^5007672
  1. ;;^UTILITY(U,$J,358.3,33663,0)
  1. ;;=I70.443^^105^1423^38
  1. ;;^UTILITY(U,$J,358.3,33663,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,33663,1,3,0)
  1. ;;=3^Athscl Autol Vein Bypass of Left Leg w/ Ulcer of Ankle
  1. ;;^UTILITY(U,$J,358.3,33663,1,4,0)
  1. ;;=4^I70.443
  1. ;;^UTILITY(U,$J,358.3,33663,2)
  1. ;;=^5007673
  1. ;;^UTILITY(U,$J,358.3,33664,0)
  1. ;;=I70.444^^105^1423^39
  1. ;;^UTILITY(U,$J,358.3,33664,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,33664,1,3,0)
  1. ;;=3^Athscl Autol Vein Bypass of Left Leg w/ Ulcer of Heel/Midfoot
  1. ;;^UTILITY(U,$J,358.3,33664,1,4,0)
  1. ;;=4^I70.444
  1. ;;^UTILITY(U,$J,358.3,33664,2)
  1. ;;=^5007674
  1. ;;^UTILITY(U,$J,358.3,33665,0)
  1. ;;=I70.445^^105^1423^40
  1. ;;^UTILITY(U,$J,358.3,33665,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,33665,1,3,0)
  1. ;;=3^Athscl Autol Vein Bypass of Left Leg w/ Ulcer of Oth Part of Foot
  1. ;;^UTILITY(U,$J,358.3,33665,1,4,0)
  1. ;;=4^I70.445
  1. ;;^UTILITY(U,$J,358.3,33665,2)
  1. ;;=^5007675
  1. ;;^UTILITY(U,$J,358.3,33666,0)
  1. ;;=I70.531^^105^1423^61
  1. ;;^UTILITY(U,$J,358.3,33666,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,33666,1,3,0)
  1. ;;=3^Athscl Nonaut Bio Bypass of Right Leg w/ Ulcer of Thigh
  1. ;;^UTILITY(U,$J,358.3,33666,1,4,0)
  1. ;;=4^I70.531
  1. ;;^UTILITY(U,$J,358.3,33666,2)
  1. ;;=^5007702
  1. ;;^UTILITY(U,$J,358.3,33667,0)
  1. ;;=I70.532^^105^1423^62
  1. ;;^UTILITY(U,$J,358.3,33667,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,33667,1,3,0)
  1. ;;=3^Athscl Nonaut Bio Bypass of Right Leg w/ Ulcer of Calf
  1. ;;^UTILITY(U,$J,358.3,33667,1,4,0)
  1. ;;=4^I70.532
  1. ;;^UTILITY(U,$J,358.3,33667,2)
  1. ;;=^5007703
  1. ;;^UTILITY(U,$J,358.3,33668,0)
  1. ;;=I70.533^^105^1423^63
  1. ;;^UTILITY(U,$J,358.3,33668,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,33668,1,3,0)
  1. ;;=3^Athscl Nonaut Bio Bypass of Right Leg w/ Ulcer of Ankle
  1. ;;^UTILITY(U,$J,358.3,33668,1,4,0)
  1. ;;=4^I70.533
  1. ;;^UTILITY(U,$J,358.3,33668,2)
  1. ;;=^5007704
  1. ;;^UTILITY(U,$J,358.3,33669,0)
  1. ;;=I70.534^^105^1423^64
  1. ;;^UTILITY(U,$J,358.3,33669,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,33669,1,3,0)
  1. ;;=3^Athscl Nonaut Bio Bypass of Right Leg w/ Ulcer of Heel/Midfoot
  1. ;;^UTILITY(U,$J,358.3,33669,1,4,0)
  1. ;;=4^I70.534
  1. ;;^UTILITY(U,$J,358.3,33669,2)
  1. ;;=^5007705
  1. ;;^UTILITY(U,$J,358.3,33670,0)
  1. ;;=I70.535^^105^1423^65
  1. ;;^UTILITY(U,$J,358.3,33670,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,33670,1,3,0)
  1. ;;=3^Athscl Nonaut Bio Bypass of Right Leg w/ Ulcer of Oth Part of Foot
  1. ;;^UTILITY(U,$J,358.3,33670,1,4,0)
  1. ;;=4^I70.535
  1. ;;^UTILITY(U,$J,358.3,33670,2)
  1. ;;=^5007706
  1. ;;^UTILITY(U,$J,358.3,33671,0)
  1. ;;=I70.541^^105^1423^56
  1. ;;^UTILITY(U,$J,358.3,33671,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,33671,1,3,0)
  1. ;;=3^Athscl Nonaut Bio Bypass of Left Leg w/ Ulcer of Thigh
  1. ;;^UTILITY(U,$J,358.3,33671,1,4,0)
  1. ;;=4^I70.541
  1. ;;^UTILITY(U,$J,358.3,33671,2)
  1. ;;=^5007709
  1. ;;^UTILITY(U,$J,358.3,33672,0)
  1. ;;=I70.542^^105^1423^57
  1. ;;^UTILITY(U,$J,358.3,33672,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,33672,1,3,0)
  1. ;;=3^Athscl Nonaut Bio Bypass of Left Leg w/ Ulcer of Calf
  1. ;;^UTILITY(U,$J,358.3,33672,1,4,0)
  1. ;;=4^I70.542
  1. ;;^UTILITY(U,$J,358.3,33672,2)
  1. ;;=^5007710
  1. ;;^UTILITY(U,$J,358.3,33673,0)
  1. ;;=I70.543^^105^1423^58
  1. ;;^UTILITY(U,$J,358.3,33673,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,33673,1,3,0)
  1. ;;=3^Athscl Nonaut Bio Bypass of Left Leg w/ Ulcer of Ankle
  1. ;;^UTILITY(U,$J,358.3,33673,1,4,0)
  1. ;;=4^I70.543
  1. ;;^UTILITY(U,$J,358.3,33673,2)
  1. ;;=^5007711
  1. ;;^UTILITY(U,$J,358.3,33674,0)
  1. ;;=I70.544^^105^1423^59
  1. ;;^UTILITY(U,$J,358.3,33674,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,33674,1,3,0)
  1. ;;=3^Athscl Nonaut Bio Bypass of Left Leg w/ Ulcer of Heel/Midfoot
  1. ;;^UTILITY(U,$J,358.3,33674,1,4,0)
  1. ;;=4^I70.544
  1. ;;^UTILITY(U,$J,358.3,33674,2)
  1. ;;=^5007712
  1. ;;^UTILITY(U,$J,358.3,33675,0)
  1. ;;=I70.545^^105^1423^60
  1. ;;^UTILITY(U,$J,358.3,33675,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,33675,1,3,0)
  1. ;;=3^Athscl Nonaut Bio Bypass of Left Leg w/ Ulcer of Oth Part of Foot
  1. ;;^UTILITY(U,$J,358.3,33675,1,4,0)
  1. ;;=4^I70.545
  1. ;;^UTILITY(U,$J,358.3,33675,2)
  1. ;;=^5007713
  1. ;;^UTILITY(U,$J,358.3,33676,0)
  1. ;;=I70.631^^105^1423^71
  1. ;;^UTILITY(U,$J,358.3,33676,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,33676,1,3,0)
  1. ;;=3^Athscl Nonbiol Bypass of Right Leg w/ Ulcer of Thigh
  1. ;;^UTILITY(U,$J,358.3,33676,1,4,0)
  1. ;;=4^I70.631
  1. ;;^UTILITY(U,$J,358.3,33676,2)
  1. ;;=^5007740
  1. ;;^UTILITY(U,$J,358.3,33677,0)
  1. ;;=I70.632^^105^1423^72
  1. ;;^UTILITY(U,$J,358.3,33677,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,33677,1,3,0)
  1. ;;=3^Athscl Nonbiol Bypass of Right Leg w/ Ulcer of Calf
  1. ;;^UTILITY(U,$J,358.3,33677,1,4,0)
  1. ;;=4^I70.632
  1. ;;^UTILITY(U,$J,358.3,33677,2)
  1. ;;=^5007741
  1. ;;^UTILITY(U,$J,358.3,33678,0)
  1. ;;=I70.633^^105^1423^73
  1. ;;^UTILITY(U,$J,358.3,33678,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,33678,1,3,0)
  1. ;;=3^Athscl Nonbiol Bypass of Right Leg w/ Ulcer of Ankle
  1. ;;^UTILITY(U,$J,358.3,33678,1,4,0)
  1. ;;=4^I70.633
  1. ;;^UTILITY(U,$J,358.3,33678,2)
  1. ;;=^5007742
  1. ;;^UTILITY(U,$J,358.3,33679,0)
  1. ;;=I70.634^^105^1423^74
  1. ;;^UTILITY(U,$J,358.3,33679,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,33679,1,3,0)
  1. ;;=3^Athscl Nonbiol Bypass of Right Leg w/ Ulcer of Heel/Midfoot
  1. ;;^UTILITY(U,$J,358.3,33679,1,4,0)
  1. ;;=4^I70.634
  1. ;;^UTILITY(U,$J,358.3,33679,2)
  1. ;;=^5007743
  1. ;;^UTILITY(U,$J,358.3,33680,0)
  1. ;;=I70.635^^105^1423^75
  1. ;;^UTILITY(U,$J,358.3,33680,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,33680,1,3,0)
  1. ;;=3^Athscl Nonbiol Bypass of Right Leg w/ Ulcer of Oth Part of Foot
  1. ;;^UTILITY(U,$J,358.3,33680,1,4,0)
  1. ;;=4^I70.635
  1. ;;^UTILITY(U,$J,358.3,33680,2)
  1. ;;=^5007744
  1. ;;^UTILITY(U,$J,358.3,33681,0)
  1. ;;=I70.641^^105^1423^66
  1. ;;^UTILITY(U,$J,358.3,33681,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,33681,1,3,0)
  1. ;;=3^Athscl Nonbiol Bypass of Left Leg w/ Ulcer of Thigh
  1. ;;^UTILITY(U,$J,358.3,33681,1,4,0)
  1. ;;=4^I70.641
  1. ;;^UTILITY(U,$J,358.3,33681,2)
  1. ;;=^5007747
  1. ;;^UTILITY(U,$J,358.3,33682,0)
  1. ;;=I70.642^^105^1423^67
  1. ;;^UTILITY(U,$J,358.3,33682,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,33682,1,3,0)
  1. ;;=3^Athscl Nonbiol Bypass of Left Leg w/ Ulcer of Calf
  1. ;;^UTILITY(U,$J,358.3,33682,1,4,0)
  1. ;;=4^I70.642
  1. ;;^UTILITY(U,$J,358.3,33682,2)
  1. ;;=^5007748
  1. ;;^UTILITY(U,$J,358.3,33683,0)
  1. ;;=I70.643^^105^1423^68
  1. ;;^UTILITY(U,$J,358.3,33683,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,33683,1,3,0)
  1. ;;=3^Athscl Nonbiol Bypass of Left Leg w/ Ulcer of Ankle
  1. ;;^UTILITY(U,$J,358.3,33683,1,4,0)
  1. ;;=4^I70.643
  1. ;;^UTILITY(U,$J,358.3,33683,2)
  1. ;;=^5007749
  1. ;;^UTILITY(U,$J,358.3,33684,0)
  1. ;;=I70.644^^105^1423^69
  1. ;;^UTILITY(U,$J,358.3,33684,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,33684,1,3,0)
  1. ;;=3^Athscl Nonbiol Bypass of Left Leg w/ Ulcer of Heel/Midfoot
  1. ;;^UTILITY(U,$J,358.3,33684,1,4,0)
  1. ;;=4^I70.644
  1. ;;^UTILITY(U,$J,358.3,33684,2)
  1. ;;=^5007750
  1. ;;^UTILITY(U,$J,358.3,33685,0)
  1. ;;=I70.645^^105^1423^70
  1. ;;^UTILITY(U,$J,358.3,33685,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,33685,1,3,0)
  1. ;;=3^Athscl Nonbiol Bypass of Left Leg w/ Ulcer of Oth Part of Foot
  1. ;;^UTILITY(U,$J,358.3,33685,1,4,0)
  1. ;;=4^I70.645
  1. ;;^UTILITY(U,$J,358.3,33685,2)
  1. ;;=^5007751
  1. ;;^UTILITY(U,$J,358.3,33686,0)
  1. ;;=K12.0^^105^1423^298
  1. ;;^UTILITY(U,$J,358.3,33686,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,33686,1,3,0)
  1. ;;=3^Recurrent Oral Aphthae
  1. ;;^UTILITY(U,$J,358.3,33686,1,4,0)
  1. ;;=4^K12.0
  1. ;;^UTILITY(U,$J,358.3,33686,2)
  1. ;;=^5008483
  1. ;;^UTILITY(U,$J,358.3,33687,0)
  1. ;;=K12.1^^105^1423^311
  1. ;;^UTILITY(U,$J,358.3,33687,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,33687,1,3,0)
  1. ;;=3^Stomatitis NEC
  1. ;;^UTILITY(U,$J,358.3,33687,1,4,0)
  1. ;;=4^K12.1
  1. ;;^UTILITY(U,$J,358.3,33687,2)
  1. ;;=^5008484
  1. ;;^UTILITY(U,$J,358.3,33688,0)
  1. ;;=K12.2^^105^1423^95
  1. ;;^UTILITY(U,$J,358.3,33688,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,33688,1,3,0)
  1. ;;=3^Cellulitis & Abscess of Mouth
  1. ;;^UTILITY(U,$J,358.3,33688,1,4,0)
  1. ;;=4^K12.2
  1. ;;^UTILITY(U,$J,358.3,33688,2)
  1. ;;=^5008485
  1. ;;^UTILITY(U,$J,358.3,33689,0)
  1. ;;=L02.01^^105^1423^122
  1. ;;^UTILITY(U,$J,358.3,33689,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,33689,1,3,0)
  1. ;;=3^Cutaneous Abscess of Face
  1. ;;^UTILITY(U,$J,358.3,33689,1,4,0)
  1. ;;=4^L02.01
  1. ;;^UTILITY(U,$J,358.3,33689,2)
  1. ;;=^5008944
  1. ;;^UTILITY(U,$J,358.3,33690,0)
  1. ;;=L02.11^^105^1423^127
  1. ;;^UTILITY(U,$J,358.3,33690,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,33690,1,3,0)
  1. ;;=3^Cutaneous Abscess of Neck
  1. ;;^UTILITY(U,$J,358.3,33690,1,4,0)
  1. ;;=4^L02.11
  1. ;;^UTILITY(U,$J,358.3,33690,2)
  1. ;;=^5008947
  1. ;;^UTILITY(U,$J,358.3,33691,0)
  1. ;;=L02.211^^105^1423^119
  1. ;;^UTILITY(U,$J,358.3,33691,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,33691,1,3,0)
  1. ;;=3^Cutaneous Abscess of Abdominal Wall
  1. ;;^UTILITY(U,$J,358.3,33691,1,4,0)
  1. ;;=4^L02.211
  1. ;;^UTILITY(U,$J,358.3,33691,2)
  1. ;;=^5008950
  1. ;;^UTILITY(U,$J,358.3,33692,0)
  1. ;;=L02.212^^105^1423^120
  1. ;;^UTILITY(U,$J,358.3,33692,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,33692,1,3,0)
  1. ;;=3^Cutaneous Abscess of Back
  1. ;;^UTILITY(U,$J,358.3,33692,1,4,0)
  1. ;;=4^L02.212
  1. ;;^UTILITY(U,$J,358.3,33692,2)
  1. ;;=^5008951
  1. ;;^UTILITY(U,$J,358.3,33693,0)
  1. ;;=L02.213^^105^1423^121
  1. ;;^UTILITY(U,$J,358.3,33693,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,33693,1,3,0)
  1. ;;=3^Cutaneous Abscess of Chest Wall
  1. ;;^UTILITY(U,$J,358.3,33693,1,4,0)
  1. ;;=4^L02.213
  1. ;;^UTILITY(U,$J,358.3,33693,2)
  1. ;;=^5008952
  1. ;;^UTILITY(U,$J,358.3,33694,0)
  1. ;;=L02.214^^105^1423^123
  1. ;;^UTILITY(U,$J,358.3,33694,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,33694,1,3,0)
  1. ;;=3^Cutaneous Abscess of Groin