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

IBDEI04L.m

Go to the documentation of this file.
IBDEI04L ; ; 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,11095,1,3,0)
 ;;=3^Abscess of Groin
 ;;^UTILITY(U,$J,358.3,11095,1,4,0)
 ;;=4^L02.214
 ;;^UTILITY(U,$J,358.3,11095,2)
 ;;=^5008953
 ;;^UTILITY(U,$J,358.3,11096,0)
 ;;=L02.215^^48^507^7
 ;;^UTILITY(U,$J,358.3,11096,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11096,1,3,0)
 ;;=3^Abscess of Perineum
 ;;^UTILITY(U,$J,358.3,11096,1,4,0)
 ;;=4^L02.215
 ;;^UTILITY(U,$J,358.3,11096,2)
 ;;=^5008954
 ;;^UTILITY(U,$J,358.3,11097,0)
 ;;=L02.216^^48^507^9
 ;;^UTILITY(U,$J,358.3,11097,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11097,1,3,0)
 ;;=3^Abscess of Umbilicus
 ;;^UTILITY(U,$J,358.3,11097,1,4,0)
 ;;=4^L02.216
 ;;^UTILITY(U,$J,358.3,11097,2)
 ;;=^5008955
 ;;^UTILITY(U,$J,358.3,11098,0)
 ;;=L02.219^^48^507^8
 ;;^UTILITY(U,$J,358.3,11098,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11098,1,3,0)
 ;;=3^Abscess of Trunk,Unspec
 ;;^UTILITY(U,$J,358.3,11098,1,4,0)
 ;;=4^L02.219
 ;;^UTILITY(U,$J,358.3,11098,2)
 ;;=^5008956
 ;;^UTILITY(U,$J,358.3,11099,0)
 ;;=L02.31^^48^507^3
 ;;^UTILITY(U,$J,358.3,11099,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11099,1,3,0)
 ;;=3^Abscess of Buttock
 ;;^UTILITY(U,$J,358.3,11099,1,4,0)
 ;;=4^L02.31
 ;;^UTILITY(U,$J,358.3,11099,2)
 ;;=^5008971
 ;;^UTILITY(U,$J,358.3,11100,0)
 ;;=L02.32^^48^507^27
 ;;^UTILITY(U,$J,358.3,11100,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11100,1,3,0)
 ;;=3^Furuncle of Buttock
 ;;^UTILITY(U,$J,358.3,11100,1,4,0)
 ;;=4^L02.32
 ;;^UTILITY(U,$J,358.3,11100,2)
 ;;=^5008972
 ;;^UTILITY(U,$J,358.3,11101,0)
 ;;=L02.33^^48^507^10
 ;;^UTILITY(U,$J,358.3,11101,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11101,1,3,0)
 ;;=3^Carbuncle of Buttock
 ;;^UTILITY(U,$J,358.3,11101,1,4,0)
 ;;=4^L02.33
 ;;^UTILITY(U,$J,358.3,11101,2)
 ;;=^5008973
 ;;^UTILITY(U,$J,358.3,11102,0)
 ;;=L03.212^^48^507^30
 ;;^UTILITY(U,$J,358.3,11102,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11102,1,3,0)
 ;;=3^Lymphagnitis of Face,Acute
 ;;^UTILITY(U,$J,358.3,11102,1,4,0)
 ;;=4^L03.212
 ;;^UTILITY(U,$J,358.3,11102,2)
 ;;=^5009044
 ;;^UTILITY(U,$J,358.3,11103,0)
 ;;=L03.211^^48^507^20
 ;;^UTILITY(U,$J,358.3,11103,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11103,1,3,0)
 ;;=3^Cellulitis of Face
 ;;^UTILITY(U,$J,358.3,11103,1,4,0)
 ;;=4^L03.211
 ;;^UTILITY(U,$J,358.3,11103,2)
 ;;=^5009043
 ;;^UTILITY(U,$J,358.3,11104,0)
 ;;=L03.311^^48^507^16
 ;;^UTILITY(U,$J,358.3,11104,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11104,1,3,0)
 ;;=3^Cellulitis of Abdominal Wall
 ;;^UTILITY(U,$J,358.3,11104,1,4,0)
 ;;=4^L03.311
 ;;^UTILITY(U,$J,358.3,11104,2)
 ;;=^5009047
 ;;^UTILITY(U,$J,358.3,11105,0)
 ;;=L03.312^^48^507^17
 ;;^UTILITY(U,$J,358.3,11105,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11105,1,3,0)
 ;;=3^Cellulitis of Back (except buttock)
 ;;^UTILITY(U,$J,358.3,11105,1,4,0)
 ;;=4^L03.312
 ;;^UTILITY(U,$J,358.3,11105,2)
 ;;=^5009048
 ;;^UTILITY(U,$J,358.3,11106,0)
 ;;=L03.313^^48^507^19
 ;;^UTILITY(U,$J,358.3,11106,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11106,1,3,0)
 ;;=3^Cellulitis of Chest Wall
 ;;^UTILITY(U,$J,358.3,11106,1,4,0)
 ;;=4^L03.313
 ;;^UTILITY(U,$J,358.3,11106,2)
 ;;=^5009049
 ;;^UTILITY(U,$J,358.3,11107,0)
 ;;=L03.314^^48^507^21
 ;;^UTILITY(U,$J,358.3,11107,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11107,1,3,0)
 ;;=3^Cellulitis of Groin
 ;;^UTILITY(U,$J,358.3,11107,1,4,0)
 ;;=4^L03.314
 ;;^UTILITY(U,$J,358.3,11107,2)
 ;;=^5009050
 ;;^UTILITY(U,$J,358.3,11108,0)
 ;;=L03.315^^48^507^22
 ;;^UTILITY(U,$J,358.3,11108,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11108,1,3,0)
 ;;=3^Cellulitis of Perineum
 ;;^UTILITY(U,$J,358.3,11108,1,4,0)
 ;;=4^L03.315
 ;;^UTILITY(U,$J,358.3,11108,2)
 ;;=^5009051
 ;;^UTILITY(U,$J,358.3,11109,0)
 ;;=L03.316^^48^507^24
 ;;^UTILITY(U,$J,358.3,11109,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11109,1,3,0)
 ;;=3^Cellulitis of Umbilicus
 ;;^UTILITY(U,$J,358.3,11109,1,4,0)
 ;;=4^L03.316
 ;;^UTILITY(U,$J,358.3,11109,2)
 ;;=^5009052
 ;;^UTILITY(U,$J,358.3,11110,0)
 ;;=L03.317^^48^507^18
 ;;^UTILITY(U,$J,358.3,11110,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11110,1,3,0)
 ;;=3^Cellulitis of Buttock
 ;;^UTILITY(U,$J,358.3,11110,1,4,0)
 ;;=4^L03.317
 ;;^UTILITY(U,$J,358.3,11110,2)
 ;;=^5009053
 ;;^UTILITY(U,$J,358.3,11111,0)
 ;;=L03.319^^48^507^23
 ;;^UTILITY(U,$J,358.3,11111,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11111,1,3,0)
 ;;=3^Cellulitis of Trunk,Unspec
 ;;^UTILITY(U,$J,358.3,11111,1,4,0)
 ;;=4^L03.319
 ;;^UTILITY(U,$J,358.3,11111,2)
 ;;=^5009054
 ;;^UTILITY(U,$J,358.3,11112,0)
 ;;=L97.321^^48^507^34
 ;;^UTILITY(U,$J,358.3,11112,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11112,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt Ankle Limited to Brkdwn of Skin
 ;;^UTILITY(U,$J,358.3,11112,1,4,0)
 ;;=4^L97.321
 ;;^UTILITY(U,$J,358.3,11112,2)
 ;;=^5009520
 ;;^UTILITY(U,$J,358.3,11113,0)
 ;;=L97.322^^48^507^36
 ;;^UTILITY(U,$J,358.3,11113,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11113,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt Ankle w/ Fat Layer Exposed
 ;;^UTILITY(U,$J,358.3,11113,1,4,0)
 ;;=4^L97.322
 ;;^UTILITY(U,$J,358.3,11113,2)
 ;;=^5009521
 ;;^UTILITY(U,$J,358.3,11114,0)
 ;;=L97.323^^48^507^38
 ;;^UTILITY(U,$J,358.3,11114,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11114,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt Ankle w/ Necrosis of Muscle
 ;;^UTILITY(U,$J,358.3,11114,1,4,0)
 ;;=4^L97.323
 ;;^UTILITY(U,$J,358.3,11114,2)
 ;;=^5009522
 ;;^UTILITY(U,$J,358.3,11115,0)
 ;;=L97.324^^48^507^39
 ;;^UTILITY(U,$J,358.3,11115,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11115,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt Ankle w/ Necrosis of Bone
 ;;^UTILITY(U,$J,358.3,11115,1,4,0)
 ;;=4^L97.324
 ;;^UTILITY(U,$J,358.3,11115,2)
 ;;=^5009523
 ;;^UTILITY(U,$J,358.3,11116,0)
 ;;=L97.325^^48^507^37
 ;;^UTILITY(U,$J,358.3,11116,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11116,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt Ankle w/ Msl Invl w/o Necrosis
 ;;^UTILITY(U,$J,358.3,11116,1,4,0)
 ;;=4^L97.325
 ;;^UTILITY(U,$J,358.3,11116,2)
 ;;=^5151454
 ;;^UTILITY(U,$J,358.3,11117,0)
 ;;=L97.326^^48^507^35
 ;;^UTILITY(U,$J,358.3,11117,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11117,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt Ankle w/ Bone invl w/o Necrosis
 ;;^UTILITY(U,$J,358.3,11117,1,4,0)
 ;;=4^L97.326
 ;;^UTILITY(U,$J,358.3,11117,2)
 ;;=^5151455
 ;;^UTILITY(U,$J,358.3,11118,0)
 ;;=L97.328^^48^507^40
 ;;^UTILITY(U,$J,358.3,11118,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11118,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt Ankle w/ Oth Severity
 ;;^UTILITY(U,$J,358.3,11118,1,4,0)
 ;;=4^L97.328
 ;;^UTILITY(U,$J,358.3,11118,2)
 ;;=^5151456
 ;;^UTILITY(U,$J,358.3,11119,0)
 ;;=L97.221^^48^507^42
 ;;^UTILITY(U,$J,358.3,11119,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11119,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt Calf Limited to Brkdwn of Skin
 ;;^UTILITY(U,$J,358.3,11119,1,4,0)
 ;;=4^L97.221
 ;;^UTILITY(U,$J,358.3,11119,2)
 ;;=^5009505
 ;;^UTILITY(U,$J,358.3,11120,0)
 ;;=L97.222^^48^507^44
 ;;^UTILITY(U,$J,358.3,11120,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11120,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt Calf w/ Fat Layer Exposed
 ;;^UTILITY(U,$J,358.3,11120,1,4,0)
 ;;=4^L97.222
 ;;^UTILITY(U,$J,358.3,11120,2)
 ;;=^5009506
 ;;^UTILITY(U,$J,358.3,11121,0)
 ;;=L97.223^^48^507^46
 ;;^UTILITY(U,$J,358.3,11121,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11121,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt Calf w/ Necrosis of Msl
 ;;^UTILITY(U,$J,358.3,11121,1,4,0)
 ;;=4^L97.223
 ;;^UTILITY(U,$J,358.3,11121,2)
 ;;=^5009507
 ;;^UTILITY(U,$J,358.3,11122,0)
 ;;=L97.224^^48^507^47
 ;;^UTILITY(U,$J,358.3,11122,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11122,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt Calf w/ Necrosis of Bone
 ;;^UTILITY(U,$J,358.3,11122,1,4,0)
 ;;=4^L97.224
 ;;^UTILITY(U,$J,358.3,11122,2)
 ;;=^5009508
 ;;^UTILITY(U,$J,358.3,11123,0)
 ;;=L97.225^^48^507^45
 ;;^UTILITY(U,$J,358.3,11123,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11123,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt Calf w/ Msl Invl w/o Necrosis
 ;;^UTILITY(U,$J,358.3,11123,1,4,0)
 ;;=4^L97.225
 ;;^UTILITY(U,$J,358.3,11123,2)
 ;;=^5151445
 ;;^UTILITY(U,$J,358.3,11124,0)
 ;;=L97.226^^48^507^43
 ;;^UTILITY(U,$J,358.3,11124,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11124,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt Calf w/ Bone Invl w/o Necrosis
 ;;^UTILITY(U,$J,358.3,11124,1,4,0)
 ;;=4^L97.226
 ;;^UTILITY(U,$J,358.3,11124,2)
 ;;=^5151446
 ;;^UTILITY(U,$J,358.3,11125,0)
 ;;=L97.228^^48^507^48
 ;;^UTILITY(U,$J,358.3,11125,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11125,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt Calf w/ Oth Severity
 ;;^UTILITY(U,$J,358.3,11125,1,4,0)
 ;;=4^L97.228
 ;;^UTILITY(U,$J,358.3,11125,2)
 ;;=^5151447
 ;;^UTILITY(U,$J,358.3,11126,0)
 ;;=L97.521^^48^507^51
 ;;^UTILITY(U,$J,358.3,11126,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11126,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt Foot,Oth Part,Limited to Brkdwn of Skin
 ;;^UTILITY(U,$J,358.3,11126,1,4,0)
 ;;=4^L97.521
 ;;^UTILITY(U,$J,358.3,11126,2)
 ;;=^5009550
 ;;^UTILITY(U,$J,358.3,11127,0)
 ;;=L97.522^^48^507^52
 ;;^UTILITY(U,$J,358.3,11127,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11127,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt Foot,Oth Part w/ Fat Layer Exposed
 ;;^UTILITY(U,$J,358.3,11127,1,4,0)
 ;;=4^L97.522
 ;;^UTILITY(U,$J,358.3,11127,2)
 ;;=^5009551
 ;;^UTILITY(U,$J,358.3,11128,0)
 ;;=L97.523^^48^507^53
 ;;^UTILITY(U,$J,358.3,11128,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11128,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt Foot,Oth Part w/ Necrosis of Msl
 ;;^UTILITY(U,$J,358.3,11128,1,4,0)
 ;;=4^L97.523
 ;;^UTILITY(U,$J,358.3,11128,2)
 ;;=^5009552
 ;;^UTILITY(U,$J,358.3,11129,0)
 ;;=L97.524^^48^507^54
 ;;^UTILITY(U,$J,358.3,11129,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11129,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt Foot,Oth Part w/ Necrosis of Bone
 ;;^UTILITY(U,$J,358.3,11129,1,4,0)
 ;;=4^L97.524
 ;;^UTILITY(U,$J,358.3,11129,2)
 ;;=^5009553
 ;;^UTILITY(U,$J,358.3,11130,0)
 ;;=L97.525^^48^507^55
 ;;^UTILITY(U,$J,358.3,11130,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11130,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt Foot,Oth Part w/ Msl Invl w/o Necrosis
 ;;^UTILITY(U,$J,358.3,11130,1,4,0)
 ;;=4^L97.525
 ;;^UTILITY(U,$J,358.3,11130,2)
 ;;=^5151472
 ;;^UTILITY(U,$J,358.3,11131,0)
 ;;=L97.526^^48^507^56
 ;;^UTILITY(U,$J,358.3,11131,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11131,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt Foot,Oth Part w/ Bone Invl w/o Necrosis
 ;;^UTILITY(U,$J,358.3,11131,1,4,0)
 ;;=4^L97.526
 ;;^UTILITY(U,$J,358.3,11131,2)
 ;;=^5151473
 ;;^UTILITY(U,$J,358.3,11132,0)
 ;;=L97.528^^48^507^57
 ;;^UTILITY(U,$J,358.3,11132,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11132,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt Foot,Oth Part w/ Oth Severity
 ;;^UTILITY(U,$J,358.3,11132,1,4,0)
 ;;=4^L97.528
 ;;^UTILITY(U,$J,358.3,11132,2)
 ;;=^5151474
 ;;^UTILITY(U,$J,358.3,11133,0)
 ;;=L97.421^^48^507^58
 ;;^UTILITY(U,$J,358.3,11133,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11133,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt Heel & Midft Limited to Brkdwn of Skin
 ;;^UTILITY(U,$J,358.3,11133,1,4,0)
 ;;=4^L97.421
 ;;^UTILITY(U,$J,358.3,11133,2)
 ;;=^5009535
 ;;^UTILITY(U,$J,358.3,11134,0)
 ;;=L97.422^^48^507^59
 ;;^UTILITY(U,$J,358.3,11134,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11134,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt Heel & Midft w/ Fat Layer Exposed
 ;;^UTILITY(U,$J,358.3,11134,1,4,0)
 ;;=4^L97.422
 ;;^UTILITY(U,$J,358.3,11134,2)
 ;;=^5009536
 ;;^UTILITY(U,$J,358.3,11135,0)
 ;;=L97.423^^48^507^60
 ;;^UTILITY(U,$J,358.3,11135,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11135,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt Heel & Midft w/ Necrosis of Msl
 ;;^UTILITY(U,$J,358.3,11135,1,4,0)
 ;;=4^L97.423
 ;;^UTILITY(U,$J,358.3,11135,2)
 ;;=^5009537
 ;;^UTILITY(U,$J,358.3,11136,0)
 ;;=L97.424^^48^507^61
 ;;^UTILITY(U,$J,358.3,11136,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11136,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt Heel & Midft w/ Necrosis of Bone
 ;;^UTILITY(U,$J,358.3,11136,1,4,0)
 ;;=4^L97.424
 ;;^UTILITY(U,$J,358.3,11136,2)
 ;;=^5009538
 ;;^UTILITY(U,$J,358.3,11137,0)
 ;;=L97.425^^48^507^62
 ;;^UTILITY(U,$J,358.3,11137,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11137,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt Heel & Midft w/ Msl Invl w/o Necrosis
 ;;^UTILITY(U,$J,358.3,11137,1,4,0)
 ;;=4^L97.425
 ;;^UTILITY(U,$J,358.3,11137,2)
 ;;=^5151463
 ;;^UTILITY(U,$J,358.3,11138,0)
 ;;=L97.426^^48^507^63
 ;;^UTILITY(U,$J,358.3,11138,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11138,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt Heel & Midft w/ Bone Invl w/o Necrosis
 ;;^UTILITY(U,$J,358.3,11138,1,4,0)
 ;;=4^L97.426
 ;;^UTILITY(U,$J,358.3,11138,2)
 ;;=^5151464
 ;;^UTILITY(U,$J,358.3,11139,0)
 ;;=L97.428^^48^507^64
 ;;^UTILITY(U,$J,358.3,11139,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11139,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt Heel & Midft w/ Oth Servity
 ;;^UTILITY(U,$J,358.3,11139,1,4,0)
 ;;=4^L97.428
 ;;^UTILITY(U,$J,358.3,11139,2)
 ;;=^5151465
 ;;^UTILITY(U,$J,358.3,11140,0)
 ;;=L97.921^^48^507^66
 ;;^UTILITY(U,$J,358.3,11140,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11140,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt LL Limited to Brkdwn Skin
 ;;^UTILITY(U,$J,358.3,11140,1,4,0)
 ;;=4^L97.921
 ;;^UTILITY(U,$J,358.3,11140,2)
 ;;=^5133680
 ;;^UTILITY(U,$J,358.3,11141,0)
 ;;=L97.922^^48^507^68
 ;;^UTILITY(U,$J,358.3,11141,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11141,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt LL w/ Fat Layer Exposed
 ;;^UTILITY(U,$J,358.3,11141,1,4,0)
 ;;=4^L97.922
 ;;^UTILITY(U,$J,358.3,11141,2)
 ;;=^5133682
 ;;^UTILITY(U,$J,358.3,11142,0)
 ;;=L97.923^^48^507^70
 ;;^UTILITY(U,$J,358.3,11142,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11142,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt LL w/ Necrosis of Msl
 ;;^UTILITY(U,$J,358.3,11142,1,4,0)
 ;;=4^L97.923
 ;;^UTILITY(U,$J,358.3,11142,2)
 ;;=^5133684
 ;;^UTILITY(U,$J,358.3,11143,0)
 ;;=L97.924^^48^507^71
 ;;^UTILITY(U,$J,358.3,11143,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11143,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt LL w/ Necrosis of Bone
 ;;^UTILITY(U,$J,358.3,11143,1,4,0)
 ;;=4^L97.924
 ;;^UTILITY(U,$J,358.3,11143,2)
 ;;=^5133686
 ;;^UTILITY(U,$J,358.3,11144,0)
 ;;=L97.925^^48^507^69
 ;;^UTILITY(U,$J,358.3,11144,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11144,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt LL w/ Msl Invl w/o Necrosis
 ;;^UTILITY(U,$J,358.3,11144,1,4,0)
 ;;=4^L97.925
 ;;^UTILITY(U,$J,358.3,11144,2)
 ;;=^5151490
 ;;^UTILITY(U,$J,358.3,11145,0)
 ;;=L97.926^^48^507^67
 ;;^UTILITY(U,$J,358.3,11145,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11145,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt LL w/ Bone Invl w/o Necrosis
 ;;^UTILITY(U,$J,358.3,11145,1,4,0)
 ;;=4^L97.926
 ;;^UTILITY(U,$J,358.3,11145,2)
 ;;=^5151491
 ;;^UTILITY(U,$J,358.3,11146,0)
 ;;=L97.928^^48^507^72
 ;;^UTILITY(U,$J,358.3,11146,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11146,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt LL w/ Oth Severity
 ;;^UTILITY(U,$J,358.3,11146,1,4,0)
 ;;=4^L97.928
 ;;^UTILITY(U,$J,358.3,11146,2)
 ;;=^5151492
 ;;^UTILITY(U,$J,358.3,11147,0)
 ;;=L97.121^^48^507^74
 ;;^UTILITY(U,$J,358.3,11147,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11147,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt Thigh Limited to Brkdwn Skin
 ;;^UTILITY(U,$J,358.3,11147,1,4,0)
 ;;=4^L97.121
 ;;^UTILITY(U,$J,358.3,11147,2)
 ;;=^5009490
 ;;^UTILITY(U,$J,358.3,11148,0)
 ;;=L97.122^^48^507^76
 ;;^UTILITY(U,$J,358.3,11148,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11148,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt Thigh w/ Fat Layer Exposed
 ;;^UTILITY(U,$J,358.3,11148,1,4,0)
 ;;=4^L97.122
 ;;^UTILITY(U,$J,358.3,11148,2)
 ;;=^5009491
 ;;^UTILITY(U,$J,358.3,11149,0)
 ;;=L97.123^^48^507^78
 ;;^UTILITY(U,$J,358.3,11149,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11149,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt Thigh w/ Necrosis of Msl
 ;;^UTILITY(U,$J,358.3,11149,1,4,0)
 ;;=4^L97.123
 ;;^UTILITY(U,$J,358.3,11149,2)
 ;;=^5009492
 ;;^UTILITY(U,$J,358.3,11150,0)
 ;;=L97.124^^48^507^79
 ;;^UTILITY(U,$J,358.3,11150,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11150,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt Thigh w/ Necrosis of Bone
 ;;^UTILITY(U,$J,358.3,11150,1,4,0)
 ;;=4^L97.124
 ;;^UTILITY(U,$J,358.3,11150,2)
 ;;=^5009493
 ;;^UTILITY(U,$J,358.3,11151,0)
 ;;=L97.125^^48^507^77
 ;;^UTILITY(U,$J,358.3,11151,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11151,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt Thigh w/ Msl Invl w/o Necrosis
 ;;^UTILITY(U,$J,358.3,11151,1,4,0)
 ;;=4^L97.125
 ;;^UTILITY(U,$J,358.3,11151,2)
 ;;=^5151436
 ;;^UTILITY(U,$J,358.3,11152,0)
 ;;=L97.126^^48^507^75
 ;;^UTILITY(U,$J,358.3,11152,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11152,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt Thigh w/ Bone Invl w/o Necrosis
 ;;^UTILITY(U,$J,358.3,11152,1,4,0)
 ;;=4^L97.126
 ;;^UTILITY(U,$J,358.3,11152,2)
 ;;=^5151437
 ;;^UTILITY(U,$J,358.3,11153,0)
 ;;=L97.128^^48^507^80
 ;;^UTILITY(U,$J,358.3,11153,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11153,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Lt Thigh w/ Oth Severity
 ;;^UTILITY(U,$J,358.3,11153,1,4,0)
 ;;=4^L97.128
 ;;^UTILITY(U,$J,358.3,11153,2)
 ;;=^5151438
 ;;^UTILITY(U,$J,358.3,11154,0)
 ;;=L97.311^^48^507^82
 ;;^UTILITY(U,$J,358.3,11154,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11154,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Rt Ankle Limited to Brkdwn Skin
 ;;^UTILITY(U,$J,358.3,11154,1,4,0)
 ;;=4^L97.311
 ;;^UTILITY(U,$J,358.3,11154,2)
 ;;=^5009515
 ;;^UTILITY(U,$J,358.3,11155,0)
 ;;=L97.312^^48^507^84
 ;;^UTILITY(U,$J,358.3,11155,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11155,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Rt Ankle w/ Fat Layer Exposed
 ;;^UTILITY(U,$J,358.3,11155,1,4,0)
 ;;=4^L97.312
 ;;^UTILITY(U,$J,358.3,11155,2)
 ;;=^5009516
 ;;^UTILITY(U,$J,358.3,11156,0)
 ;;=L97.313^^48^507^86
 ;;^UTILITY(U,$J,358.3,11156,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11156,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Rt Ankle w/ Necrosis of Msl
 ;;^UTILITY(U,$J,358.3,11156,1,4,0)
 ;;=4^L97.313
 ;;^UTILITY(U,$J,358.3,11156,2)
 ;;=^5009517
 ;;^UTILITY(U,$J,358.3,11157,0)
 ;;=L97.314^^48^507^87
 ;;^UTILITY(U,$J,358.3,11157,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11157,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Rt Ankle w/ Necrosis of Bone
 ;;^UTILITY(U,$J,358.3,11157,1,4,0)
 ;;=4^L97.314
 ;;^UTILITY(U,$J,358.3,11157,2)
 ;;=^5009518
 ;;^UTILITY(U,$J,358.3,11158,0)
 ;;=L97.315^^48^507^85
 ;;^UTILITY(U,$J,358.3,11158,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11158,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Rt Ankle w/ Msl Invl w/o Necrosis
 ;;^UTILITY(U,$J,358.3,11158,1,4,0)
 ;;=4^L97.315
 ;;^UTILITY(U,$J,358.3,11158,2)
 ;;=^5151451
 ;;^UTILITY(U,$J,358.3,11159,0)
 ;;=L97.316^^48^507^83
 ;;^UTILITY(U,$J,358.3,11159,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11159,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer Rt Ankle w/ Bone Invl w/o Necrosis
 ;;^UTILITY(U,$J,358.3,11159,1,4,0)
 ;;=4^L97.316
 ;;^UTILITY(U,$J,358.3,11159,2)
 ;;=^5151452
 ;;^UTILITY(U,$J,358.3,11160,0)
 ;;=L97.318^^48^507^88