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

IBDEI0EL.m

Go to the documentation of this file.
IBDEI0EL ; ; 03-MAY-2022
 ;;3.0;IB ENCOUNTER FORM IMP/EXP;;MAY 03, 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,36531,0)
 ;;=L85.3^^107^1477^329
 ;;^UTILITY(U,$J,358.3,36531,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,36531,1,3,0)
 ;;=3^Xerosis Cutis
 ;;^UTILITY(U,$J,358.3,36531,1,4,0)
 ;;=4^L85.3
 ;;^UTILITY(U,$J,358.3,36531,2)
 ;;=^5009323
 ;;^UTILITY(U,$J,358.3,36532,0)
 ;;=L86.^^107^1477^167
 ;;^UTILITY(U,$J,358.3,36532,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,36532,1,3,0)
 ;;=3^Keratoderma in Diseases Classified Elsewhere
 ;;^UTILITY(U,$J,358.3,36532,1,4,0)
 ;;=4^L86.
 ;;^UTILITY(U,$J,358.3,36532,2)
 ;;=^5009326
 ;;^UTILITY(U,$J,358.3,36533,0)
 ;;=L87.0^^107^1477^168
 ;;^UTILITY(U,$J,358.3,36533,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,36533,1,3,0)
 ;;=3^Keratosis Follicularis et Parafollicularis in Cutem Penetrans
 ;;^UTILITY(U,$J,358.3,36533,1,4,0)
 ;;=4^L87.0
 ;;^UTILITY(U,$J,358.3,36533,2)
 ;;=^5009327
 ;;^UTILITY(U,$J,358.3,36534,0)
 ;;=L87.2^^107^1477^144
 ;;^UTILITY(U,$J,358.3,36534,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,36534,1,3,0)
 ;;=3^Elastosis Perforans Serpiginosa
 ;;^UTILITY(U,$J,358.3,36534,1,4,0)
 ;;=4^L87.2
 ;;^UTILITY(U,$J,358.3,36534,2)
 ;;=^5009329
 ;;^UTILITY(U,$J,358.3,36535,0)
 ;;=L89.300^^107^1477^282
 ;;^UTILITY(U,$J,358.3,36535,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,36535,1,3,0)
 ;;=3^Pressure Ulcer of Buttock,Unstageable
 ;;^UTILITY(U,$J,358.3,36535,1,4,0)
 ;;=4^L89.300
 ;;^UTILITY(U,$J,358.3,36535,2)
 ;;=^5009389
 ;;^UTILITY(U,$J,358.3,36536,0)
 ;;=L89.301^^107^1477^277
 ;;^UTILITY(U,$J,358.3,36536,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,36536,1,3,0)
 ;;=3^Pressure Ulcer of Buttock,Stage 1
 ;;^UTILITY(U,$J,358.3,36536,1,4,0)
 ;;=4^L89.301
 ;;^UTILITY(U,$J,358.3,36536,2)
 ;;=^5009390
 ;;^UTILITY(U,$J,358.3,36537,0)
 ;;=L89.302^^107^1477^278
 ;;^UTILITY(U,$J,358.3,36537,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,36537,1,3,0)
 ;;=3^Pressure Ulcer of Buttock,Stage 2
 ;;^UTILITY(U,$J,358.3,36537,1,4,0)
 ;;=4^L89.302
 ;;^UTILITY(U,$J,358.3,36537,2)
 ;;=^5009391
 ;;^UTILITY(U,$J,358.3,36538,0)
 ;;=L89.303^^107^1477^279
 ;;^UTILITY(U,$J,358.3,36538,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,36538,1,3,0)
 ;;=3^Pressure Ulcer of Buttock,Stage 3
 ;;^UTILITY(U,$J,358.3,36538,1,4,0)
 ;;=4^L89.303
 ;;^UTILITY(U,$J,358.3,36538,2)
 ;;=^5009392
 ;;^UTILITY(U,$J,358.3,36539,0)
 ;;=L89.304^^107^1477^280
 ;;^UTILITY(U,$J,358.3,36539,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,36539,1,3,0)
 ;;=3^Pressure Ulcer of Buttock,Stage 4
 ;;^UTILITY(U,$J,358.3,36539,1,4,0)
 ;;=4^L89.304
 ;;^UTILITY(U,$J,358.3,36539,2)
 ;;=^5009393
 ;;^UTILITY(U,$J,358.3,36540,0)
 ;;=L89.309^^107^1477^281
 ;;^UTILITY(U,$J,358.3,36540,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,36540,1,3,0)
 ;;=3^Pressure Ulcer of Buttock,Stage Unspec
 ;;^UTILITY(U,$J,358.3,36540,1,4,0)
 ;;=4^L89.309
 ;;^UTILITY(U,$J,358.3,36540,2)
 ;;=^5133672
 ;;^UTILITY(U,$J,358.3,36541,0)
 ;;=L89.90^^107^1477^287
 ;;^UTILITY(U,$J,358.3,36541,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,36541,1,3,0)
 ;;=3^Pressure Ulcer of Unspec Site,Unspec Stage
 ;;^UTILITY(U,$J,358.3,36541,1,4,0)
 ;;=4^L89.90
 ;;^UTILITY(U,$J,358.3,36541,2)
 ;;=^5133666
 ;;^UTILITY(U,$J,358.3,36542,0)
 ;;=L89.91^^107^1477^283
 ;;^UTILITY(U,$J,358.3,36542,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,36542,1,3,0)
 ;;=3^Pressure Ulcer of Unspec Site,Stage 1
 ;;^UTILITY(U,$J,358.3,36542,1,4,0)
 ;;=4^L89.91
 ;;^UTILITY(U,$J,358.3,36542,2)
 ;;=^5133664
 ;;^UTILITY(U,$J,358.3,36543,0)
 ;;=L89.92^^107^1477^284
 ;;^UTILITY(U,$J,358.3,36543,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,36543,1,3,0)
 ;;=3^Pressure Ulcer of Unspec Site,Stage 2
 ;;^UTILITY(U,$J,358.3,36543,1,4,0)
 ;;=4^L89.92
 ;;^UTILITY(U,$J,358.3,36543,2)
 ;;=^5133667
 ;;^UTILITY(U,$J,358.3,36544,0)
 ;;=L89.93^^107^1477^285
 ;;^UTILITY(U,$J,358.3,36544,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,36544,1,3,0)
 ;;=3^Pressure Ulcer of Unspec Site,Stage 3
 ;;^UTILITY(U,$J,358.3,36544,1,4,0)
 ;;=4^L89.93
 ;;^UTILITY(U,$J,358.3,36544,2)
 ;;=^5133668
 ;;^UTILITY(U,$J,358.3,36545,0)
 ;;=L89.94^^107^1477^286
 ;;^UTILITY(U,$J,358.3,36545,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,36545,1,3,0)
 ;;=3^Pressure Ulcer of Unspec Site,Stage 4
 ;;^UTILITY(U,$J,358.3,36545,1,4,0)
 ;;=4^L89.94
 ;;^UTILITY(U,$J,358.3,36545,2)
 ;;=^5133669
 ;;^UTILITY(U,$J,358.3,36546,0)
 ;;=L89.95^^107^1477^288
 ;;^UTILITY(U,$J,358.3,36546,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,36546,1,3,0)
 ;;=3^Pressure Ulcer of Unspec Site,Unstageable
 ;;^UTILITY(U,$J,358.3,36546,1,4,0)
 ;;=4^L89.95
 ;;^UTILITY(U,$J,358.3,36546,2)
 ;;=^5133660
 ;;^UTILITY(U,$J,358.3,36547,0)
 ;;=L92.0^^107^1477^159
 ;;^UTILITY(U,$J,358.3,36547,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,36547,1,3,0)
 ;;=3^Granuloma Annulare
 ;;^UTILITY(U,$J,358.3,36547,1,4,0)
 ;;=4^L92.0
 ;;^UTILITY(U,$J,358.3,36547,2)
 ;;=^184052
 ;;^UTILITY(U,$J,358.3,36548,0)
 ;;=L95.1^^107^1477^146
 ;;^UTILITY(U,$J,358.3,36548,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,36548,1,3,0)
 ;;=3^Erythema Elevatum Diutinum
 ;;^UTILITY(U,$J,358.3,36548,1,4,0)
 ;;=4^L95.1
 ;;^UTILITY(U,$J,358.3,36548,2)
 ;;=^5009477
 ;;^UTILITY(U,$J,358.3,36549,0)
 ;;=L97.111^^107^1477^262
 ;;^UTILITY(U,$J,358.3,36549,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,36549,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer of Right Thigh w/ Breakdown of Skin
 ;;^UTILITY(U,$J,358.3,36549,1,4,0)
 ;;=4^L97.111
 ;;^UTILITY(U,$J,358.3,36549,2)
 ;;=^5009485
 ;;^UTILITY(U,$J,358.3,36550,0)
 ;;=L97.112^^107^1477^263
 ;;^UTILITY(U,$J,358.3,36550,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,36550,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer of Right Thigh w/ Fat Layer Exposed
 ;;^UTILITY(U,$J,358.3,36550,1,4,0)
 ;;=4^L97.112
 ;;^UTILITY(U,$J,358.3,36550,2)
 ;;=^5009486
 ;;^UTILITY(U,$J,358.3,36551,0)
 ;;=L97.113^^107^1477^264
 ;;^UTILITY(U,$J,358.3,36551,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,36551,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer of Right Thigh w/ Necrosis of Muscle
 ;;^UTILITY(U,$J,358.3,36551,1,4,0)
 ;;=4^L97.113
 ;;^UTILITY(U,$J,358.3,36551,2)
 ;;=^5009487
 ;;^UTILITY(U,$J,358.3,36552,0)
 ;;=L97.114^^107^1477^265
 ;;^UTILITY(U,$J,358.3,36552,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,36552,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer of Right Thigh w/ Necrosis of Bone
 ;;^UTILITY(U,$J,358.3,36552,1,4,0)
 ;;=4^L97.114
 ;;^UTILITY(U,$J,358.3,36552,2)
 ;;=^5009488
 ;;^UTILITY(U,$J,358.3,36553,0)
 ;;=L97.119^^107^1477^266
 ;;^UTILITY(U,$J,358.3,36553,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,36553,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer of Right Thigh w/ Unspec Severity
 ;;^UTILITY(U,$J,358.3,36553,1,4,0)
 ;;=4^L97.119
 ;;^UTILITY(U,$J,358.3,36553,2)
 ;;=^5009489
 ;;^UTILITY(U,$J,358.3,36554,0)
 ;;=L97.121^^107^1477^214
 ;;^UTILITY(U,$J,358.3,36554,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,36554,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer of Left Thigh w/ Breakdown of Skin
 ;;^UTILITY(U,$J,358.3,36554,1,4,0)
 ;;=4^L97.121
 ;;^UTILITY(U,$J,358.3,36554,2)
 ;;=^5009490
 ;;^UTILITY(U,$J,358.3,36555,0)
 ;;=L97.122^^107^1477^215
 ;;^UTILITY(U,$J,358.3,36555,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,36555,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer of Left Thigh w/ Fat Layer Exposed
 ;;^UTILITY(U,$J,358.3,36555,1,4,0)
 ;;=4^L97.122
 ;;^UTILITY(U,$J,358.3,36555,2)
 ;;=^5009491
 ;;^UTILITY(U,$J,358.3,36556,0)
 ;;=L97.123^^107^1477^216
 ;;^UTILITY(U,$J,358.3,36556,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,36556,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer of Left Thigh w/ Necrosis of Muscle
 ;;^UTILITY(U,$J,358.3,36556,1,4,0)
 ;;=4^L97.123
 ;;^UTILITY(U,$J,358.3,36556,2)
 ;;=^5009492
 ;;^UTILITY(U,$J,358.3,36557,0)
 ;;=L97.124^^107^1477^217
 ;;^UTILITY(U,$J,358.3,36557,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,36557,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer of Left Thigh w/ Necrosis of Bone
 ;;^UTILITY(U,$J,358.3,36557,1,4,0)
 ;;=4^L97.124
 ;;^UTILITY(U,$J,358.3,36557,2)
 ;;=^5009493
 ;;^UTILITY(U,$J,358.3,36558,0)
 ;;=L97.129^^107^1477^218
 ;;^UTILITY(U,$J,358.3,36558,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,36558,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer of Left Thigh w/ Unspec Severity
 ;;^UTILITY(U,$J,358.3,36558,1,4,0)
 ;;=4^L97.129
 ;;^UTILITY(U,$J,358.3,36558,2)
 ;;=^5009494
 ;;^UTILITY(U,$J,358.3,36559,0)
 ;;=L97.211^^107^1477^230
 ;;^UTILITY(U,$J,358.3,36559,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,36559,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer of Right Calf w/ Breakdown of Skin
 ;;^UTILITY(U,$J,358.3,36559,1,4,0)
 ;;=4^L97.211
 ;;^UTILITY(U,$J,358.3,36559,2)
 ;;=^5009500
 ;;^UTILITY(U,$J,358.3,36560,0)
 ;;=L97.212^^107^1477^231
 ;;^UTILITY(U,$J,358.3,36560,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,36560,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer of Right Calf w/ Fat Layer Exposed
 ;;^UTILITY(U,$J,358.3,36560,1,4,0)
 ;;=4^L97.212
 ;;^UTILITY(U,$J,358.3,36560,2)
 ;;=^5009501
 ;;^UTILITY(U,$J,358.3,36561,0)
 ;;=L97.213^^107^1477^232
 ;;^UTILITY(U,$J,358.3,36561,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,36561,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer of Right Calf w/ Necrosis of Muscle
 ;;^UTILITY(U,$J,358.3,36561,1,4,0)
 ;;=4^L97.213
 ;;^UTILITY(U,$J,358.3,36561,2)
 ;;=^5009502
 ;;^UTILITY(U,$J,358.3,36562,0)
 ;;=L97.214^^107^1477^233
 ;;^UTILITY(U,$J,358.3,36562,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,36562,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer of Right Calf w/ Necrosis of Bone
 ;;^UTILITY(U,$J,358.3,36562,1,4,0)
 ;;=4^L97.214
 ;;^UTILITY(U,$J,358.3,36562,2)
 ;;=^5009503
 ;;^UTILITY(U,$J,358.3,36563,0)
 ;;=L97.219^^107^1477^234
 ;;^UTILITY(U,$J,358.3,36563,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,36563,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer of Right Calf w/ Unspec Severity
 ;;^UTILITY(U,$J,358.3,36563,1,4,0)
 ;;=4^L97.219
 ;;^UTILITY(U,$J,358.3,36563,2)
 ;;=^5009504
 ;;^UTILITY(U,$J,358.3,36564,0)
 ;;=L97.221^^107^1477^185
 ;;^UTILITY(U,$J,358.3,36564,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,36564,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer of Left Calf w/ Breakdown of Skin
 ;;^UTILITY(U,$J,358.3,36564,1,4,0)
 ;;=4^L97.221
 ;;^UTILITY(U,$J,358.3,36564,2)
 ;;=^5009505
 ;;^UTILITY(U,$J,358.3,36565,0)
 ;;=L97.222^^107^1477^186
 ;;^UTILITY(U,$J,358.3,36565,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,36565,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer of Left Calf w/ Fat Layer Exposed
 ;;^UTILITY(U,$J,358.3,36565,1,4,0)
 ;;=4^L97.222
 ;;^UTILITY(U,$J,358.3,36565,2)
 ;;=^5009506
 ;;^UTILITY(U,$J,358.3,36566,0)
 ;;=L97.223^^107^1477^187
 ;;^UTILITY(U,$J,358.3,36566,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,36566,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer of Left Calf w/ Necrosis of Muscle
 ;;^UTILITY(U,$J,358.3,36566,1,4,0)
 ;;=4^L97.223
 ;;^UTILITY(U,$J,358.3,36566,2)
 ;;=^5009507
 ;;^UTILITY(U,$J,358.3,36567,0)
 ;;=L97.224^^107^1477^188
 ;;^UTILITY(U,$J,358.3,36567,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,36567,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer of Left Calf w/ Necrosis of Bone
 ;;^UTILITY(U,$J,358.3,36567,1,4,0)
 ;;=4^L97.224
 ;;^UTILITY(U,$J,358.3,36567,2)
 ;;=^5009508
 ;;^UTILITY(U,$J,358.3,36568,0)
 ;;=L97.229^^107^1477^189
 ;;^UTILITY(U,$J,358.3,36568,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,36568,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer of Left Calf w/ Unspec Severity
 ;;^UTILITY(U,$J,358.3,36568,1,4,0)
 ;;=4^L97.229
 ;;^UTILITY(U,$J,358.3,36568,2)
 ;;=^5009509
 ;;^UTILITY(U,$J,358.3,36569,0)
 ;;=L97.311^^107^1477^222
 ;;^UTILITY(U,$J,358.3,36569,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,36569,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer of Right Ankle w/ Breakdown of Skin
 ;;^UTILITY(U,$J,358.3,36569,1,4,0)
 ;;=4^L97.311
 ;;^UTILITY(U,$J,358.3,36569,2)
 ;;=^5009515
 ;;^UTILITY(U,$J,358.3,36570,0)
 ;;=L97.312^^107^1477^223
 ;;^UTILITY(U,$J,358.3,36570,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,36570,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer of Right Ankle w/ Fat Layer Exposed
 ;;^UTILITY(U,$J,358.3,36570,1,4,0)
 ;;=4^L97.312
 ;;^UTILITY(U,$J,358.3,36570,2)
 ;;=^5009516
 ;;^UTILITY(U,$J,358.3,36571,0)
 ;;=L97.313^^107^1477^224
 ;;^UTILITY(U,$J,358.3,36571,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,36571,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer of Right Ankle w/ Necrosis of Muscle
 ;;^UTILITY(U,$J,358.3,36571,1,4,0)
 ;;=4^L97.313
 ;;^UTILITY(U,$J,358.3,36571,2)
 ;;=^5009517
 ;;^UTILITY(U,$J,358.3,36572,0)
 ;;=L97.314^^107^1477^225
 ;;^UTILITY(U,$J,358.3,36572,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,36572,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer of Right Ankle w/ Necrosis of Bone
 ;;^UTILITY(U,$J,358.3,36572,1,4,0)
 ;;=4^L97.314
 ;;^UTILITY(U,$J,358.3,36572,2)
 ;;=^5009518
 ;;^UTILITY(U,$J,358.3,36573,0)
 ;;=L97.319^^107^1477^226
 ;;^UTILITY(U,$J,358.3,36573,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,36573,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer of Right Ankle w/ Unspec Severity
 ;;^UTILITY(U,$J,358.3,36573,1,4,0)
 ;;=4^L97.319
 ;;^UTILITY(U,$J,358.3,36573,2)
 ;;=^5009519
 ;;^UTILITY(U,$J,358.3,36574,0)
 ;;=L97.321^^107^1477^177
 ;;^UTILITY(U,$J,358.3,36574,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,36574,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer of Left Ankle w/ Breakdown of Skin
 ;;^UTILITY(U,$J,358.3,36574,1,4,0)
 ;;=4^L97.321
 ;;^UTILITY(U,$J,358.3,36574,2)
 ;;=^5009520
 ;;^UTILITY(U,$J,358.3,36575,0)
 ;;=L97.322^^107^1477^178
 ;;^UTILITY(U,$J,358.3,36575,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,36575,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer of Left Ankle w/ Fat Layer Exposed
 ;;^UTILITY(U,$J,358.3,36575,1,4,0)
 ;;=4^L97.322
 ;;^UTILITY(U,$J,358.3,36575,2)
 ;;=^5009521
 ;;^UTILITY(U,$J,358.3,36576,0)
 ;;=L97.323^^107^1477^179
 ;;^UTILITY(U,$J,358.3,36576,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,36576,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer of Left Ankle w/ Necrosis of Muscle
 ;;^UTILITY(U,$J,358.3,36576,1,4,0)
 ;;=4^L97.323
 ;;^UTILITY(U,$J,358.3,36576,2)
 ;;=^5009522
 ;;^UTILITY(U,$J,358.3,36577,0)
 ;;=L97.324^^107^1477^180
 ;;^UTILITY(U,$J,358.3,36577,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,36577,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer of Left Ankle w/ Necrosis of Bone
 ;;^UTILITY(U,$J,358.3,36577,1,4,0)
 ;;=4^L97.324
 ;;^UTILITY(U,$J,358.3,36577,2)
 ;;=^5009523
 ;;^UTILITY(U,$J,358.3,36578,0)
 ;;=L97.329^^107^1477^181
 ;;^UTILITY(U,$J,358.3,36578,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,36578,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer of Left Ankle w/ Unspec Severity
 ;;^UTILITY(U,$J,358.3,36578,1,4,0)
 ;;=4^L97.329
 ;;^UTILITY(U,$J,358.3,36578,2)
 ;;=^5009524
 ;;^UTILITY(U,$J,358.3,36579,0)
 ;;=L97.411^^107^1477^246
 ;;^UTILITY(U,$J,358.3,36579,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,36579,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer of Right Heel/Midfoot w/ Breakdown of Skin
 ;;^UTILITY(U,$J,358.3,36579,1,4,0)
 ;;=4^L97.411
 ;;^UTILITY(U,$J,358.3,36579,2)
 ;;=^5009530
 ;;^UTILITY(U,$J,358.3,36580,0)
 ;;=L97.412^^107^1477^247
 ;;^UTILITY(U,$J,358.3,36580,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,36580,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer of Right Heel/Midfoot w/ Fat Layer Exposed
 ;;^UTILITY(U,$J,358.3,36580,1,4,0)
 ;;=4^L97.412
 ;;^UTILITY(U,$J,358.3,36580,2)
 ;;=^5009531
 ;;^UTILITY(U,$J,358.3,36581,0)
 ;;=L97.413^^107^1477^248
 ;;^UTILITY(U,$J,358.3,36581,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,36581,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer of Right Heel/Midfoot w/ Necrosis of Muscle
 ;;^UTILITY(U,$J,358.3,36581,1,4,0)
 ;;=4^L97.413
 ;;^UTILITY(U,$J,358.3,36581,2)
 ;;=^5009532
 ;;^UTILITY(U,$J,358.3,36582,0)
 ;;=L97.414^^107^1477^249
 ;;^UTILITY(U,$J,358.3,36582,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,36582,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer of Right Heel/Midfoot w/ Necrosis of Bone
 ;;^UTILITY(U,$J,358.3,36582,1,4,0)
 ;;=4^L97.414
 ;;^UTILITY(U,$J,358.3,36582,2)
 ;;=^5009533
 ;;^UTILITY(U,$J,358.3,36583,0)
 ;;=L97.419^^107^1477^250
 ;;^UTILITY(U,$J,358.3,36583,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,36583,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer of Right Heel/Midfoot w/ Unspec Severity
 ;;^UTILITY(U,$J,358.3,36583,1,4,0)
 ;;=4^L97.419
 ;;^UTILITY(U,$J,358.3,36583,2)
 ;;=^5009534
 ;;^UTILITY(U,$J,358.3,36584,0)
 ;;=L97.421^^107^1477^201
 ;;^UTILITY(U,$J,358.3,36584,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,36584,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer of Left Heel/Midfoot w/ Breakdown of Skin
 ;;^UTILITY(U,$J,358.3,36584,1,4,0)
 ;;=4^L97.421
 ;;^UTILITY(U,$J,358.3,36584,2)
 ;;=^5009535
 ;;^UTILITY(U,$J,358.3,36585,0)
 ;;=L97.422^^107^1477^202
 ;;^UTILITY(U,$J,358.3,36585,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,36585,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer of Left Heel/Midfoot w/ Fat Layer Exposed
 ;;^UTILITY(U,$J,358.3,36585,1,4,0)
 ;;=4^L97.422
 ;;^UTILITY(U,$J,358.3,36585,2)
 ;;=^5009536
 ;;^UTILITY(U,$J,358.3,36586,0)
 ;;=L97.423^^107^1477^203
 ;;^UTILITY(U,$J,358.3,36586,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,36586,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer of Left Heel/Midfoot w/ Necrosis of Muscle
 ;;^UTILITY(U,$J,358.3,36586,1,4,0)
 ;;=4^L97.423
 ;;^UTILITY(U,$J,358.3,36586,2)
 ;;=^5009537
 ;;^UTILITY(U,$J,358.3,36587,0)
 ;;=L97.424^^107^1477^204
 ;;^UTILITY(U,$J,358.3,36587,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,36587,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer of Left Heel/Midfoot w/ Necrosis of Bone
 ;;^UTILITY(U,$J,358.3,36587,1,4,0)
 ;;=4^L97.424
 ;;^UTILITY(U,$J,358.3,36587,2)
 ;;=^5009538
 ;;^UTILITY(U,$J,358.3,36588,0)
 ;;=L97.429^^107^1477^205
 ;;^UTILITY(U,$J,358.3,36588,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,36588,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer of Left Heel/Midfoot w/ Unspec Severity
 ;;^UTILITY(U,$J,358.3,36588,1,4,0)
 ;;=4^L97.429
 ;;^UTILITY(U,$J,358.3,36588,2)
 ;;=^5009539
 ;;^UTILITY(U,$J,358.3,36589,0)
 ;;=L97.511^^107^1477^238
 ;;^UTILITY(U,$J,358.3,36589,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,36589,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer of Right Foot w/ Breakdown of Skin
 ;;^UTILITY(U,$J,358.3,36589,1,4,0)
 ;;=4^L97.511
 ;;^UTILITY(U,$J,358.3,36589,2)
 ;;=^5009545
 ;;^UTILITY(U,$J,358.3,36590,0)
 ;;=L97.512^^107^1477^239
 ;;^UTILITY(U,$J,358.3,36590,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,36590,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer of Right Foot w/ Fat Layer Exposed
 ;;^UTILITY(U,$J,358.3,36590,1,4,0)
 ;;=4^L97.512
 ;;^UTILITY(U,$J,358.3,36590,2)
 ;;=^5009546
 ;;^UTILITY(U,$J,358.3,36591,0)
 ;;=L97.513^^107^1477^240
 ;;^UTILITY(U,$J,358.3,36591,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,36591,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer of Right Foot w/ Necrosis of Muscle
 ;;^UTILITY(U,$J,358.3,36591,1,4,0)
 ;;=4^L97.513
 ;;^UTILITY(U,$J,358.3,36591,2)
 ;;=^5009547
 ;;^UTILITY(U,$J,358.3,36592,0)
 ;;=L97.514^^107^1477^241
 ;;^UTILITY(U,$J,358.3,36592,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,36592,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer of Right Foot w/ Necrosis of Bone
 ;;^UTILITY(U,$J,358.3,36592,1,4,0)
 ;;=4^L97.514
 ;;^UTILITY(U,$J,358.3,36592,2)
 ;;=^5009548
 ;;^UTILITY(U,$J,358.3,36593,0)
 ;;=L97.519^^107^1477^242
 ;;^UTILITY(U,$J,358.3,36593,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,36593,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer of Right Foot w/ Unspec Severity
 ;;^UTILITY(U,$J,358.3,36593,1,4,0)
 ;;=4^L97.519
 ;;^UTILITY(U,$J,358.3,36593,2)
 ;;=^5009549
 ;;^UTILITY(U,$J,358.3,36594,0)
 ;;=L97.521^^107^1477^193