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

IBDEI076.m

Go to the documentation of this file.
IBDEI076 ; ; 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,17443,1,4,0)
 ;;=4^L97.329
 ;;^UTILITY(U,$J,358.3,17443,2)
 ;;=^5009524
 ;;^UTILITY(U,$J,358.3,17444,0)
 ;;=L97.419^^59^698^113
 ;;^UTILITY(U,$J,358.3,17444,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17444,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Rt Heel & Midft,Unsp Severity
 ;;^UTILITY(U,$J,358.3,17444,1,4,0)
 ;;=4^L97.419
 ;;^UTILITY(U,$J,358.3,17444,2)
 ;;=^5009534
 ;;^UTILITY(U,$J,358.3,17445,0)
 ;;=L97.429^^59^698^65
 ;;^UTILITY(U,$J,358.3,17445,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17445,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt Heel & Midft,Unsp Severity
 ;;^UTILITY(U,$J,358.3,17445,1,4,0)
 ;;=4^L97.429
 ;;^UTILITY(U,$J,358.3,17445,2)
 ;;=^5009539
 ;;^UTILITY(U,$J,358.3,17446,0)
 ;;=L97.519^^59^698^98
 ;;^UTILITY(U,$J,358.3,17446,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17446,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Rt Foot,Oth Part,Unsp Severity
 ;;^UTILITY(U,$J,358.3,17446,1,4,0)
 ;;=4^L97.519
 ;;^UTILITY(U,$J,358.3,17446,2)
 ;;=^5009549
 ;;^UTILITY(U,$J,358.3,17447,0)
 ;;=L97.529^^59^698^50
 ;;^UTILITY(U,$J,358.3,17447,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17447,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt Foot,Oth Part,Unsp Severity
 ;;^UTILITY(U,$J,358.3,17447,1,4,0)
 ;;=4^L97.529
 ;;^UTILITY(U,$J,358.3,17447,2)
 ;;=^5009554
 ;;^UTILITY(U,$J,358.3,17448,0)
 ;;=L02.01^^59^698^6
 ;;^UTILITY(U,$J,358.3,17448,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17448,1,3,0)
 ;;=3^Abscess of Neck
 ;;^UTILITY(U,$J,358.3,17448,1,4,0)
 ;;=4^L02.01
 ;;^UTILITY(U,$J,358.3,17448,2)
 ;;=^5008944
 ;;^UTILITY(U,$J,358.3,17449,0)
 ;;=L02.12^^59^698^28
 ;;^UTILITY(U,$J,358.3,17449,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17449,1,3,0)
 ;;=3^Furuncle of Neck
 ;;^UTILITY(U,$J,358.3,17449,1,4,0)
 ;;=4^L02.12
 ;;^UTILITY(U,$J,358.3,17449,2)
 ;;=^5008948
 ;;^UTILITY(U,$J,358.3,17450,0)
 ;;=L02.13^^59^698^11
 ;;^UTILITY(U,$J,358.3,17450,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17450,1,3,0)
 ;;=3^Carbuncle of Neck
 ;;^UTILITY(U,$J,358.3,17450,1,4,0)
 ;;=4^L02.13
 ;;^UTILITY(U,$J,358.3,17450,2)
 ;;=^5008949
 ;;^UTILITY(U,$J,358.3,17451,0)
 ;;=L02.211^^59^698^1
 ;;^UTILITY(U,$J,358.3,17451,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17451,1,3,0)
 ;;=3^Abscess of Abdominal Wall
 ;;^UTILITY(U,$J,358.3,17451,1,4,0)
 ;;=4^L02.211
 ;;^UTILITY(U,$J,358.3,17451,2)
 ;;=^5008950
 ;;^UTILITY(U,$J,358.3,17452,0)
 ;;=L02.212^^59^698^2
 ;;^UTILITY(U,$J,358.3,17452,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17452,1,3,0)
 ;;=3^Abscess of Back (except Buttock)
 ;;^UTILITY(U,$J,358.3,17452,1,4,0)
 ;;=4^L02.212
 ;;^UTILITY(U,$J,358.3,17452,2)
 ;;=^5008951
 ;;^UTILITY(U,$J,358.3,17453,0)
 ;;=L02.213^^59^698^4
 ;;^UTILITY(U,$J,358.3,17453,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17453,1,3,0)
 ;;=3^Abscess of Chest Wall
 ;;^UTILITY(U,$J,358.3,17453,1,4,0)
 ;;=4^L02.213
 ;;^UTILITY(U,$J,358.3,17453,2)
 ;;=^5008952
 ;;^UTILITY(U,$J,358.3,17454,0)
 ;;=L02.214^^59^698^5
 ;;^UTILITY(U,$J,358.3,17454,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17454,1,3,0)
 ;;=3^Abscess of Groin
 ;;^UTILITY(U,$J,358.3,17454,1,4,0)
 ;;=4^L02.214
 ;;^UTILITY(U,$J,358.3,17454,2)
 ;;=^5008953
 ;;^UTILITY(U,$J,358.3,17455,0)
 ;;=L02.215^^59^698^7
 ;;^UTILITY(U,$J,358.3,17455,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17455,1,3,0)
 ;;=3^Abscess of Perineum
 ;;^UTILITY(U,$J,358.3,17455,1,4,0)
 ;;=4^L02.215
 ;;^UTILITY(U,$J,358.3,17455,2)
 ;;=^5008954
 ;;^UTILITY(U,$J,358.3,17456,0)
 ;;=L02.216^^59^698^9
 ;;^UTILITY(U,$J,358.3,17456,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17456,1,3,0)
 ;;=3^Abscess of Umbilicus
 ;;^UTILITY(U,$J,358.3,17456,1,4,0)
 ;;=4^L02.216
 ;;^UTILITY(U,$J,358.3,17456,2)
 ;;=^5008955
 ;;^UTILITY(U,$J,358.3,17457,0)
 ;;=L02.219^^59^698^8
 ;;^UTILITY(U,$J,358.3,17457,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17457,1,3,0)
 ;;=3^Abscess of Trunk,Unspec
 ;;^UTILITY(U,$J,358.3,17457,1,4,0)
 ;;=4^L02.219
 ;;^UTILITY(U,$J,358.3,17457,2)
 ;;=^5008956
 ;;^UTILITY(U,$J,358.3,17458,0)
 ;;=L02.31^^59^698^3
 ;;^UTILITY(U,$J,358.3,17458,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17458,1,3,0)
 ;;=3^Abscess of Buttock
 ;;^UTILITY(U,$J,358.3,17458,1,4,0)
 ;;=4^L02.31
 ;;^UTILITY(U,$J,358.3,17458,2)
 ;;=^5008971
 ;;^UTILITY(U,$J,358.3,17459,0)
 ;;=L02.32^^59^698^27
 ;;^UTILITY(U,$J,358.3,17459,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17459,1,3,0)
 ;;=3^Furuncle of Buttock
 ;;^UTILITY(U,$J,358.3,17459,1,4,0)
 ;;=4^L02.32
 ;;^UTILITY(U,$J,358.3,17459,2)
 ;;=^5008972
 ;;^UTILITY(U,$J,358.3,17460,0)
 ;;=L02.33^^59^698^10
 ;;^UTILITY(U,$J,358.3,17460,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17460,1,3,0)
 ;;=3^Carbuncle of Buttock
 ;;^UTILITY(U,$J,358.3,17460,1,4,0)
 ;;=4^L02.33
 ;;^UTILITY(U,$J,358.3,17460,2)
 ;;=^5008973
 ;;^UTILITY(U,$J,358.3,17461,0)
 ;;=L03.212^^59^698^30
 ;;^UTILITY(U,$J,358.3,17461,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17461,1,3,0)
 ;;=3^Lymphagnitis of Face,Acute
 ;;^UTILITY(U,$J,358.3,17461,1,4,0)
 ;;=4^L03.212
 ;;^UTILITY(U,$J,358.3,17461,2)
 ;;=^5009044
 ;;^UTILITY(U,$J,358.3,17462,0)
 ;;=L03.211^^59^698^20
 ;;^UTILITY(U,$J,358.3,17462,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17462,1,3,0)
 ;;=3^Cellulitis of Face
 ;;^UTILITY(U,$J,358.3,17462,1,4,0)
 ;;=4^L03.211
 ;;^UTILITY(U,$J,358.3,17462,2)
 ;;=^5009043
 ;;^UTILITY(U,$J,358.3,17463,0)
 ;;=L03.311^^59^698^16
 ;;^UTILITY(U,$J,358.3,17463,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17463,1,3,0)
 ;;=3^Cellulitis of Abdominal Wall
 ;;^UTILITY(U,$J,358.3,17463,1,4,0)
 ;;=4^L03.311
 ;;^UTILITY(U,$J,358.3,17463,2)
 ;;=^5009047
 ;;^UTILITY(U,$J,358.3,17464,0)
 ;;=L03.312^^59^698^17
 ;;^UTILITY(U,$J,358.3,17464,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17464,1,3,0)
 ;;=3^Cellulitis of Back (except buttock)
 ;;^UTILITY(U,$J,358.3,17464,1,4,0)
 ;;=4^L03.312
 ;;^UTILITY(U,$J,358.3,17464,2)
 ;;=^5009048
 ;;^UTILITY(U,$J,358.3,17465,0)
 ;;=L03.313^^59^698^19
 ;;^UTILITY(U,$J,358.3,17465,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17465,1,3,0)
 ;;=3^Cellulitis of Chest Wall
 ;;^UTILITY(U,$J,358.3,17465,1,4,0)
 ;;=4^L03.313
 ;;^UTILITY(U,$J,358.3,17465,2)
 ;;=^5009049
 ;;^UTILITY(U,$J,358.3,17466,0)
 ;;=L03.314^^59^698^21
 ;;^UTILITY(U,$J,358.3,17466,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17466,1,3,0)
 ;;=3^Cellulitis of Groin
 ;;^UTILITY(U,$J,358.3,17466,1,4,0)
 ;;=4^L03.314
 ;;^UTILITY(U,$J,358.3,17466,2)
 ;;=^5009050
 ;;^UTILITY(U,$J,358.3,17467,0)
 ;;=L03.315^^59^698^22
 ;;^UTILITY(U,$J,358.3,17467,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17467,1,3,0)
 ;;=3^Cellulitis of Perineum
 ;;^UTILITY(U,$J,358.3,17467,1,4,0)
 ;;=4^L03.315
 ;;^UTILITY(U,$J,358.3,17467,2)
 ;;=^5009051
 ;;^UTILITY(U,$J,358.3,17468,0)
 ;;=L03.316^^59^698^24
 ;;^UTILITY(U,$J,358.3,17468,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17468,1,3,0)
 ;;=3^Cellulitis of Umbilicus
 ;;^UTILITY(U,$J,358.3,17468,1,4,0)
 ;;=4^L03.316
 ;;^UTILITY(U,$J,358.3,17468,2)
 ;;=^5009052
 ;;^UTILITY(U,$J,358.3,17469,0)
 ;;=L03.317^^59^698^18
 ;;^UTILITY(U,$J,358.3,17469,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17469,1,3,0)
 ;;=3^Cellulitis of Buttock
 ;;^UTILITY(U,$J,358.3,17469,1,4,0)
 ;;=4^L03.317
 ;;^UTILITY(U,$J,358.3,17469,2)
 ;;=^5009053
 ;;^UTILITY(U,$J,358.3,17470,0)
 ;;=L03.319^^59^698^23
 ;;^UTILITY(U,$J,358.3,17470,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17470,1,3,0)
 ;;=3^Cellulitis of Trunk,Unspec
 ;;^UTILITY(U,$J,358.3,17470,1,4,0)
 ;;=4^L03.319
 ;;^UTILITY(U,$J,358.3,17470,2)
 ;;=^5009054
 ;;^UTILITY(U,$J,358.3,17471,0)
 ;;=L97.321^^59^698^34
 ;;^UTILITY(U,$J,358.3,17471,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17471,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt Ankle Limited to Brkdwn of Skin
 ;;^UTILITY(U,$J,358.3,17471,1,4,0)
 ;;=4^L97.321
 ;;^UTILITY(U,$J,358.3,17471,2)
 ;;=^5009520
 ;;^UTILITY(U,$J,358.3,17472,0)
 ;;=L97.322^^59^698^36
 ;;^UTILITY(U,$J,358.3,17472,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17472,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt Ankle w/ Fat Layer Exposed
 ;;^UTILITY(U,$J,358.3,17472,1,4,0)
 ;;=4^L97.322
 ;;^UTILITY(U,$J,358.3,17472,2)
 ;;=^5009521
 ;;^UTILITY(U,$J,358.3,17473,0)
 ;;=L97.323^^59^698^38
 ;;^UTILITY(U,$J,358.3,17473,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17473,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt Ankle w/ Necrosis of Muscle
 ;;^UTILITY(U,$J,358.3,17473,1,4,0)
 ;;=4^L97.323
 ;;^UTILITY(U,$J,358.3,17473,2)
 ;;=^5009522
 ;;^UTILITY(U,$J,358.3,17474,0)
 ;;=L97.324^^59^698^39
 ;;^UTILITY(U,$J,358.3,17474,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17474,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt Ankle w/ Necrosis of Bone
 ;;^UTILITY(U,$J,358.3,17474,1,4,0)
 ;;=4^L97.324
 ;;^UTILITY(U,$J,358.3,17474,2)
 ;;=^5009523
 ;;^UTILITY(U,$J,358.3,17475,0)
 ;;=L97.325^^59^698^37
 ;;^UTILITY(U,$J,358.3,17475,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17475,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt Ankle w/ Msl Invl w/o Necrosis
 ;;^UTILITY(U,$J,358.3,17475,1,4,0)
 ;;=4^L97.325
 ;;^UTILITY(U,$J,358.3,17475,2)
 ;;=^5151454
 ;;^UTILITY(U,$J,358.3,17476,0)
 ;;=L97.326^^59^698^35
 ;;^UTILITY(U,$J,358.3,17476,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17476,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt Ankle w/ Bone invl w/o Necrosis
 ;;^UTILITY(U,$J,358.3,17476,1,4,0)
 ;;=4^L97.326
 ;;^UTILITY(U,$J,358.3,17476,2)
 ;;=^5151455
 ;;^UTILITY(U,$J,358.3,17477,0)
 ;;=L97.328^^59^698^40
 ;;^UTILITY(U,$J,358.3,17477,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17477,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt Ankle w/ Oth Severity
 ;;^UTILITY(U,$J,358.3,17477,1,4,0)
 ;;=4^L97.328
 ;;^UTILITY(U,$J,358.3,17477,2)
 ;;=^5151456
 ;;^UTILITY(U,$J,358.3,17478,0)
 ;;=L97.221^^59^698^42
 ;;^UTILITY(U,$J,358.3,17478,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17478,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt Calf Limited to Brkdwn of Skin
 ;;^UTILITY(U,$J,358.3,17478,1,4,0)
 ;;=4^L97.221
 ;;^UTILITY(U,$J,358.3,17478,2)
 ;;=^5009505
 ;;^UTILITY(U,$J,358.3,17479,0)
 ;;=L97.222^^59^698^44
 ;;^UTILITY(U,$J,358.3,17479,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17479,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt Calf w/ Fat Layer Exposed
 ;;^UTILITY(U,$J,358.3,17479,1,4,0)
 ;;=4^L97.222
 ;;^UTILITY(U,$J,358.3,17479,2)
 ;;=^5009506
 ;;^UTILITY(U,$J,358.3,17480,0)
 ;;=L97.223^^59^698^46
 ;;^UTILITY(U,$J,358.3,17480,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17480,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt Calf w/ Necrosis of Msl
 ;;^UTILITY(U,$J,358.3,17480,1,4,0)
 ;;=4^L97.223
 ;;^UTILITY(U,$J,358.3,17480,2)
 ;;=^5009507
 ;;^UTILITY(U,$J,358.3,17481,0)
 ;;=L97.224^^59^698^47
 ;;^UTILITY(U,$J,358.3,17481,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17481,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt Calf w/ Necrosis of Bone
 ;;^UTILITY(U,$J,358.3,17481,1,4,0)
 ;;=4^L97.224
 ;;^UTILITY(U,$J,358.3,17481,2)
 ;;=^5009508
 ;;^UTILITY(U,$J,358.3,17482,0)
 ;;=L97.225^^59^698^45
 ;;^UTILITY(U,$J,358.3,17482,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17482,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt Calf w/ Msl Invl w/o Necrosis
 ;;^UTILITY(U,$J,358.3,17482,1,4,0)
 ;;=4^L97.225
 ;;^UTILITY(U,$J,358.3,17482,2)
 ;;=^5151445
 ;;^UTILITY(U,$J,358.3,17483,0)
 ;;=L97.226^^59^698^43
 ;;^UTILITY(U,$J,358.3,17483,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17483,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt Calf w/ Bone Invl w/o Necrosis
 ;;^UTILITY(U,$J,358.3,17483,1,4,0)
 ;;=4^L97.226
 ;;^UTILITY(U,$J,358.3,17483,2)
 ;;=^5151446
 ;;^UTILITY(U,$J,358.3,17484,0)
 ;;=L97.228^^59^698^48
 ;;^UTILITY(U,$J,358.3,17484,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17484,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt Calf w/ Oth Severity
 ;;^UTILITY(U,$J,358.3,17484,1,4,0)
 ;;=4^L97.228
 ;;^UTILITY(U,$J,358.3,17484,2)
 ;;=^5151447
 ;;^UTILITY(U,$J,358.3,17485,0)
 ;;=L97.521^^59^698^51
 ;;^UTILITY(U,$J,358.3,17485,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17485,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt Foot,Oth Part,Limited to Brkdwn of Skin
 ;;^UTILITY(U,$J,358.3,17485,1,4,0)
 ;;=4^L97.521
 ;;^UTILITY(U,$J,358.3,17485,2)
 ;;=^5009550
 ;;^UTILITY(U,$J,358.3,17486,0)
 ;;=L97.522^^59^698^52
 ;;^UTILITY(U,$J,358.3,17486,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17486,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt Foot,Oth Part w/ Fat Layer Exposed
 ;;^UTILITY(U,$J,358.3,17486,1,4,0)
 ;;=4^L97.522
 ;;^UTILITY(U,$J,358.3,17486,2)
 ;;=^5009551
 ;;^UTILITY(U,$J,358.3,17487,0)
 ;;=L97.523^^59^698^53
 ;;^UTILITY(U,$J,358.3,17487,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17487,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt Foot,Oth Part w/ Necrosis of Msl
 ;;^UTILITY(U,$J,358.3,17487,1,4,0)
 ;;=4^L97.523
 ;;^UTILITY(U,$J,358.3,17487,2)
 ;;=^5009552
 ;;^UTILITY(U,$J,358.3,17488,0)
 ;;=L97.524^^59^698^54
 ;;^UTILITY(U,$J,358.3,17488,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17488,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt Foot,Oth Part w/ Necrosis of Bone
 ;;^UTILITY(U,$J,358.3,17488,1,4,0)
 ;;=4^L97.524
 ;;^UTILITY(U,$J,358.3,17488,2)
 ;;=^5009553
 ;;^UTILITY(U,$J,358.3,17489,0)
 ;;=L97.525^^59^698^55
 ;;^UTILITY(U,$J,358.3,17489,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17489,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt Foot,Oth Part w/ Msl Invl w/o Necrosis
 ;;^UTILITY(U,$J,358.3,17489,1,4,0)
 ;;=4^L97.525
 ;;^UTILITY(U,$J,358.3,17489,2)
 ;;=^5151472
 ;;^UTILITY(U,$J,358.3,17490,0)
 ;;=L97.526^^59^698^56
 ;;^UTILITY(U,$J,358.3,17490,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17490,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt Foot,Oth Part w/ Bone Invl w/o Necrosis
 ;;^UTILITY(U,$J,358.3,17490,1,4,0)
 ;;=4^L97.526
 ;;^UTILITY(U,$J,358.3,17490,2)
 ;;=^5151473
 ;;^UTILITY(U,$J,358.3,17491,0)
 ;;=L97.528^^59^698^57
 ;;^UTILITY(U,$J,358.3,17491,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17491,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt Foot,Oth Part w/ Oth Severity
 ;;^UTILITY(U,$J,358.3,17491,1,4,0)
 ;;=4^L97.528
 ;;^UTILITY(U,$J,358.3,17491,2)
 ;;=^5151474
 ;;^UTILITY(U,$J,358.3,17492,0)
 ;;=L97.421^^59^698^58
 ;;^UTILITY(U,$J,358.3,17492,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17492,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt Heel & Midft Limited to Brkdwn of Skin
 ;;^UTILITY(U,$J,358.3,17492,1,4,0)
 ;;=4^L97.421
 ;;^UTILITY(U,$J,358.3,17492,2)
 ;;=^5009535
 ;;^UTILITY(U,$J,358.3,17493,0)
 ;;=L97.422^^59^698^59
 ;;^UTILITY(U,$J,358.3,17493,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17493,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt Heel & Midft w/ Fat Layer Exposed
 ;;^UTILITY(U,$J,358.3,17493,1,4,0)
 ;;=4^L97.422
 ;;^UTILITY(U,$J,358.3,17493,2)
 ;;=^5009536
 ;;^UTILITY(U,$J,358.3,17494,0)
 ;;=L97.423^^59^698^60
 ;;^UTILITY(U,$J,358.3,17494,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17494,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt Heel & Midft w/ Necrosis of Msl
 ;;^UTILITY(U,$J,358.3,17494,1,4,0)
 ;;=4^L97.423
 ;;^UTILITY(U,$J,358.3,17494,2)
 ;;=^5009537
 ;;^UTILITY(U,$J,358.3,17495,0)
 ;;=L97.424^^59^698^61
 ;;^UTILITY(U,$J,358.3,17495,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17495,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt Heel & Midft w/ Necrosis of Bone
 ;;^UTILITY(U,$J,358.3,17495,1,4,0)
 ;;=4^L97.424
 ;;^UTILITY(U,$J,358.3,17495,2)
 ;;=^5009538
 ;;^UTILITY(U,$J,358.3,17496,0)
 ;;=L97.425^^59^698^62
 ;;^UTILITY(U,$J,358.3,17496,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17496,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt Heel & Midft w/ Msl Invl w/o Necrosis
 ;;^UTILITY(U,$J,358.3,17496,1,4,0)
 ;;=4^L97.425
 ;;^UTILITY(U,$J,358.3,17496,2)
 ;;=^5151463
 ;;^UTILITY(U,$J,358.3,17497,0)
 ;;=L97.426^^59^698^63
 ;;^UTILITY(U,$J,358.3,17497,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17497,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt Heel & Midft w/ Bone Invl w/o Necrosis
 ;;^UTILITY(U,$J,358.3,17497,1,4,0)
 ;;=4^L97.426
 ;;^UTILITY(U,$J,358.3,17497,2)
 ;;=^5151464
 ;;^UTILITY(U,$J,358.3,17498,0)
 ;;=L97.428^^59^698^64
 ;;^UTILITY(U,$J,358.3,17498,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17498,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt Heel & Midft w/ Oth Servity
 ;;^UTILITY(U,$J,358.3,17498,1,4,0)
 ;;=4^L97.428
 ;;^UTILITY(U,$J,358.3,17498,2)
 ;;=^5151465
 ;;^UTILITY(U,$J,358.3,17499,0)
 ;;=L97.921^^59^698^66
 ;;^UTILITY(U,$J,358.3,17499,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17499,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt LL Limited to Brkdwn Skin
 ;;^UTILITY(U,$J,358.3,17499,1,4,0)
 ;;=4^L97.921
 ;;^UTILITY(U,$J,358.3,17499,2)
 ;;=^5133680
 ;;^UTILITY(U,$J,358.3,17500,0)
 ;;=L97.922^^59^698^68
 ;;^UTILITY(U,$J,358.3,17500,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17500,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt LL w/ Fat Layer Exposed
 ;;^UTILITY(U,$J,358.3,17500,1,4,0)
 ;;=4^L97.922
 ;;^UTILITY(U,$J,358.3,17500,2)
 ;;=^5133682
 ;;^UTILITY(U,$J,358.3,17501,0)
 ;;=L97.923^^59^698^70
 ;;^UTILITY(U,$J,358.3,17501,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17501,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt LL w/ Necrosis of Msl
 ;;^UTILITY(U,$J,358.3,17501,1,4,0)
 ;;=4^L97.923
 ;;^UTILITY(U,$J,358.3,17501,2)
 ;;=^5133684
 ;;^UTILITY(U,$J,358.3,17502,0)
 ;;=L97.924^^59^698^71
 ;;^UTILITY(U,$J,358.3,17502,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17502,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt LL w/ Necrosis of Bone
 ;;^UTILITY(U,$J,358.3,17502,1,4,0)
 ;;=4^L97.924
 ;;^UTILITY(U,$J,358.3,17502,2)
 ;;=^5133686
 ;;^UTILITY(U,$J,358.3,17503,0)
 ;;=L97.925^^59^698^69
 ;;^UTILITY(U,$J,358.3,17503,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17503,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt LL w/ Msl Invl w/o Necrosis
 ;;^UTILITY(U,$J,358.3,17503,1,4,0)
 ;;=4^L97.925
 ;;^UTILITY(U,$J,358.3,17503,2)
 ;;=^5151490
 ;;^UTILITY(U,$J,358.3,17504,0)
 ;;=L97.926^^59^698^67
 ;;^UTILITY(U,$J,358.3,17504,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17504,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt LL w/ Bone Invl w/o Necrosis
 ;;^UTILITY(U,$J,358.3,17504,1,4,0)
 ;;=4^L97.926
 ;;^UTILITY(U,$J,358.3,17504,2)
 ;;=^5151491
 ;;^UTILITY(U,$J,358.3,17505,0)
 ;;=L97.928^^59^698^72
 ;;^UTILITY(U,$J,358.3,17505,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17505,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt LL w/ Oth Severity
 ;;^UTILITY(U,$J,358.3,17505,1,4,0)
 ;;=4^L97.928
 ;;^UTILITY(U,$J,358.3,17505,2)
 ;;=^5151492
 ;;^UTILITY(U,$J,358.3,17506,0)
 ;;=L97.121^^59^698^74
 ;;^UTILITY(U,$J,358.3,17506,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17506,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt Thigh Limited to Brkdwn Skin
 ;;^UTILITY(U,$J,358.3,17506,1,4,0)
 ;;=4^L97.121
 ;;^UTILITY(U,$J,358.3,17506,2)
 ;;=^5009490
 ;;^UTILITY(U,$J,358.3,17507,0)
 ;;=L97.122^^59^698^76
 ;;^UTILITY(U,$J,358.3,17507,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17507,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt Thigh w/ Fat Layer Exposed
 ;;^UTILITY(U,$J,358.3,17507,1,4,0)
 ;;=4^L97.122
 ;;^UTILITY(U,$J,358.3,17507,2)
 ;;=^5009491
 ;;^UTILITY(U,$J,358.3,17508,0)
 ;;=L97.123^^59^698^78
 ;;^UTILITY(U,$J,358.3,17508,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,17508,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt Thigh w/ Necrosis of Msl
 ;;^UTILITY(U,$J,358.3,17508,1,4,0)
 ;;=4^L97.123
 ;;^UTILITY(U,$J,358.3,17508,2)
 ;;=^5009492
 ;;^UTILITY(U,$J,358.3,17509,0)
 ;;=L97.124^^59^698^79