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

IBDEI03I.m

Go to the documentation of this file.
IBDEI03I ; ; 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,8394,1,4,0)
 ;;=4^L70.8
 ;;^UTILITY(U,$J,358.3,8394,2)
 ;;=^87239
 ;;^UTILITY(U,$J,358.3,8395,0)
 ;;=L70.9^^45^421^8
 ;;^UTILITY(U,$J,358.3,8395,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8395,1,3,0)
 ;;=3^Acne,Unspec
 ;;^UTILITY(U,$J,358.3,8395,1,4,0)
 ;;=4^L70.9
 ;;^UTILITY(U,$J,358.3,8395,2)
 ;;=^5009273
 ;;^UTILITY(U,$J,358.3,8396,0)
 ;;=L71.0^^45^421^273
 ;;^UTILITY(U,$J,358.3,8396,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8396,1,3,0)
 ;;=3^Perioral Dermatitis
 ;;^UTILITY(U,$J,358.3,8396,1,4,0)
 ;;=4^L71.0
 ;;^UTILITY(U,$J,358.3,8396,2)
 ;;=^5009274
 ;;^UTILITY(U,$J,358.3,8397,0)
 ;;=L71.1^^45^421^299
 ;;^UTILITY(U,$J,358.3,8397,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8397,1,3,0)
 ;;=3^Rhinophyma
 ;;^UTILITY(U,$J,358.3,8397,1,4,0)
 ;;=4^L71.1
 ;;^UTILITY(U,$J,358.3,8397,2)
 ;;=^106083
 ;;^UTILITY(U,$J,358.3,8398,0)
 ;;=L71.8^^45^421^300
 ;;^UTILITY(U,$J,358.3,8398,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8398,1,3,0)
 ;;=3^Rosacea NEC
 ;;^UTILITY(U,$J,358.3,8398,1,4,0)
 ;;=4^L71.8
 ;;^UTILITY(U,$J,358.3,8398,2)
 ;;=^5009275
 ;;^UTILITY(U,$J,358.3,8399,0)
 ;;=L71.9^^45^421^301
 ;;^UTILITY(U,$J,358.3,8399,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8399,1,3,0)
 ;;=3^Rosacea,Unspec
 ;;^UTILITY(U,$J,358.3,8399,1,4,0)
 ;;=4^L71.9
 ;;^UTILITY(U,$J,358.3,8399,2)
 ;;=^5009276
 ;;^UTILITY(U,$J,358.3,8400,0)
 ;;=L72.0^^45^421^145
 ;;^UTILITY(U,$J,358.3,8400,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8400,1,3,0)
 ;;=3^Epidermal Cyst
 ;;^UTILITY(U,$J,358.3,8400,1,4,0)
 ;;=4^L72.0
 ;;^UTILITY(U,$J,358.3,8400,2)
 ;;=^5009277
 ;;^UTILITY(U,$J,358.3,8401,0)
 ;;=L72.12^^45^421^325
 ;;^UTILITY(U,$J,358.3,8401,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8401,1,3,0)
 ;;=3^Trichodermal Cyst
 ;;^UTILITY(U,$J,358.3,8401,1,4,0)
 ;;=4^L72.12
 ;;^UTILITY(U,$J,358.3,8401,2)
 ;;=^5009279
 ;;^UTILITY(U,$J,358.3,8402,0)
 ;;=L72.2^^45^421^310
 ;;^UTILITY(U,$J,358.3,8402,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8402,1,3,0)
 ;;=3^Steatocystoma Multiplex
 ;;^UTILITY(U,$J,358.3,8402,1,4,0)
 ;;=4^L72.2
 ;;^UTILITY(U,$J,358.3,8402,2)
 ;;=^5009280
 ;;^UTILITY(U,$J,358.3,8403,0)
 ;;=L72.8^^45^421^154
 ;;^UTILITY(U,$J,358.3,8403,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8403,1,3,0)
 ;;=3^Follicular Cysts of Skin/Subcutaneous Tissue NEC
 ;;^UTILITY(U,$J,358.3,8403,1,4,0)
 ;;=4^L72.8
 ;;^UTILITY(U,$J,358.3,8403,2)
 ;;=^5009282
 ;;^UTILITY(U,$J,358.3,8404,0)
 ;;=L72.9^^45^421^155
 ;;^UTILITY(U,$J,358.3,8404,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8404,1,3,0)
 ;;=3^Follicular Cysts of Skin/Subcutaneous Tissue,Unspec
 ;;^UTILITY(U,$J,358.3,8404,1,4,0)
 ;;=4^L72.9
 ;;^UTILITY(U,$J,358.3,8404,2)
 ;;=^5009283
 ;;^UTILITY(U,$J,358.3,8405,0)
 ;;=L73.0^^45^421^4
 ;;^UTILITY(U,$J,358.3,8405,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8405,1,3,0)
 ;;=3^Acne Keloid
 ;;^UTILITY(U,$J,358.3,8405,1,4,0)
 ;;=4^L73.0
 ;;^UTILITY(U,$J,358.3,8405,2)
 ;;=^2149
 ;;^UTILITY(U,$J,358.3,8406,0)
 ;;=L73.2^^45^421^162
 ;;^UTILITY(U,$J,358.3,8406,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8406,1,3,0)
 ;;=3^Hidradenitis Suppurativa
 ;;^UTILITY(U,$J,358.3,8406,1,4,0)
 ;;=4^L73.2
 ;;^UTILITY(U,$J,358.3,8406,2)
 ;;=^278979
 ;;^UTILITY(U,$J,358.3,8407,0)
 ;;=L73.9^^45^421^156
 ;;^UTILITY(U,$J,358.3,8407,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8407,1,3,0)
 ;;=3^Follicular Disorder,Unspec
 ;;^UTILITY(U,$J,358.3,8407,1,4,0)
 ;;=4^L73.9
 ;;^UTILITY(U,$J,358.3,8407,2)
 ;;=^5009286
 ;;^UTILITY(U,$J,358.3,8408,0)
 ;;=L82.0^^45^421^163
 ;;^UTILITY(U,$J,358.3,8408,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8408,1,3,0)
 ;;=3^Inflamed Seborrheic Keratosis
 ;;^UTILITY(U,$J,358.3,8408,1,4,0)
 ;;=4^L82.0
 ;;^UTILITY(U,$J,358.3,8408,2)
 ;;=^303311
 ;;^UTILITY(U,$J,358.3,8409,0)
 ;;=L82.1^^45^421^304
 ;;^UTILITY(U,$J,358.3,8409,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8409,1,3,0)
 ;;=3^Seborrheic Keratosis NEC
 ;;^UTILITY(U,$J,358.3,8409,1,4,0)
 ;;=4^L82.1
 ;;^UTILITY(U,$J,358.3,8409,2)
 ;;=^303312
 ;;^UTILITY(U,$J,358.3,8410,0)
 ;;=L84.^^45^421^118
 ;;^UTILITY(U,$J,358.3,8410,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8410,1,3,0)
 ;;=3^Corns and Callosities
 ;;^UTILITY(U,$J,358.3,8410,1,4,0)
 ;;=4^L84.
 ;;^UTILITY(U,$J,358.3,8410,2)
 ;;=^271920
 ;;^UTILITY(U,$J,358.3,8411,0)
 ;;=L85.0^^45^421^9
 ;;^UTILITY(U,$J,358.3,8411,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8411,1,3,0)
 ;;=3^Acquired Ichthyosis
 ;;^UTILITY(U,$J,358.3,8411,1,4,0)
 ;;=4^L85.0
 ;;^UTILITY(U,$J,358.3,8411,2)
 ;;=^5009320
 ;;^UTILITY(U,$J,358.3,8412,0)
 ;;=L85.1^^45^421^11
 ;;^UTILITY(U,$J,358.3,8412,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8412,1,3,0)
 ;;=3^Acquired Keratosis Palmaris et Plantaris
 ;;^UTILITY(U,$J,358.3,8412,1,4,0)
 ;;=4^L85.1
 ;;^UTILITY(U,$J,358.3,8412,2)
 ;;=^5009321
 ;;^UTILITY(U,$J,358.3,8413,0)
 ;;=L85.2^^45^421^169
 ;;^UTILITY(U,$J,358.3,8413,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8413,1,3,0)
 ;;=3^Keratosis Punctata
 ;;^UTILITY(U,$J,358.3,8413,1,4,0)
 ;;=4^L85.2
 ;;^UTILITY(U,$J,358.3,8413,2)
 ;;=^5009322
 ;;^UTILITY(U,$J,358.3,8414,0)
 ;;=L85.3^^45^421^329
 ;;^UTILITY(U,$J,358.3,8414,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8414,1,3,0)
 ;;=3^Xerosis Cutis
 ;;^UTILITY(U,$J,358.3,8414,1,4,0)
 ;;=4^L85.3
 ;;^UTILITY(U,$J,358.3,8414,2)
 ;;=^5009323
 ;;^UTILITY(U,$J,358.3,8415,0)
 ;;=L86.^^45^421^167
 ;;^UTILITY(U,$J,358.3,8415,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8415,1,3,0)
 ;;=3^Keratoderma in Diseases Classified Elsewhere
 ;;^UTILITY(U,$J,358.3,8415,1,4,0)
 ;;=4^L86.
 ;;^UTILITY(U,$J,358.3,8415,2)
 ;;=^5009326
 ;;^UTILITY(U,$J,358.3,8416,0)
 ;;=L87.0^^45^421^168
 ;;^UTILITY(U,$J,358.3,8416,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8416,1,3,0)
 ;;=3^Keratosis Follicularis et Parafollicularis in Cutem Penetrans
 ;;^UTILITY(U,$J,358.3,8416,1,4,0)
 ;;=4^L87.0
 ;;^UTILITY(U,$J,358.3,8416,2)
 ;;=^5009327
 ;;^UTILITY(U,$J,358.3,8417,0)
 ;;=L87.2^^45^421^144
 ;;^UTILITY(U,$J,358.3,8417,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8417,1,3,0)
 ;;=3^Elastosis Perforans Serpiginosa
 ;;^UTILITY(U,$J,358.3,8417,1,4,0)
 ;;=4^L87.2
 ;;^UTILITY(U,$J,358.3,8417,2)
 ;;=^5009329
 ;;^UTILITY(U,$J,358.3,8418,0)
 ;;=L89.300^^45^421^282
 ;;^UTILITY(U,$J,358.3,8418,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8418,1,3,0)
 ;;=3^Pressure Ulcer of Buttock,Unstageable
 ;;^UTILITY(U,$J,358.3,8418,1,4,0)
 ;;=4^L89.300
 ;;^UTILITY(U,$J,358.3,8418,2)
 ;;=^5009389
 ;;^UTILITY(U,$J,358.3,8419,0)
 ;;=L89.301^^45^421^277
 ;;^UTILITY(U,$J,358.3,8419,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8419,1,3,0)
 ;;=3^Pressure Ulcer of Buttock,Stage 1
 ;;^UTILITY(U,$J,358.3,8419,1,4,0)
 ;;=4^L89.301
 ;;^UTILITY(U,$J,358.3,8419,2)
 ;;=^5009390
 ;;^UTILITY(U,$J,358.3,8420,0)
 ;;=L89.302^^45^421^278
 ;;^UTILITY(U,$J,358.3,8420,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8420,1,3,0)
 ;;=3^Pressure Ulcer of Buttock,Stage 2
 ;;^UTILITY(U,$J,358.3,8420,1,4,0)
 ;;=4^L89.302
 ;;^UTILITY(U,$J,358.3,8420,2)
 ;;=^5009391
 ;;^UTILITY(U,$J,358.3,8421,0)
 ;;=L89.303^^45^421^279
 ;;^UTILITY(U,$J,358.3,8421,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8421,1,3,0)
 ;;=3^Pressure Ulcer of Buttock,Stage 3
 ;;^UTILITY(U,$J,358.3,8421,1,4,0)
 ;;=4^L89.303
 ;;^UTILITY(U,$J,358.3,8421,2)
 ;;=^5009392
 ;;^UTILITY(U,$J,358.3,8422,0)
 ;;=L89.304^^45^421^280
 ;;^UTILITY(U,$J,358.3,8422,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8422,1,3,0)
 ;;=3^Pressure Ulcer of Buttock,Stage 4
 ;;^UTILITY(U,$J,358.3,8422,1,4,0)
 ;;=4^L89.304
 ;;^UTILITY(U,$J,358.3,8422,2)
 ;;=^5009393
 ;;^UTILITY(U,$J,358.3,8423,0)
 ;;=L89.309^^45^421^281
 ;;^UTILITY(U,$J,358.3,8423,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8423,1,3,0)
 ;;=3^Pressure Ulcer of Buttock,Stage Unspec
 ;;^UTILITY(U,$J,358.3,8423,1,4,0)
 ;;=4^L89.309
 ;;^UTILITY(U,$J,358.3,8423,2)
 ;;=^5133672
 ;;^UTILITY(U,$J,358.3,8424,0)
 ;;=L89.90^^45^421^287
 ;;^UTILITY(U,$J,358.3,8424,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8424,1,3,0)
 ;;=3^Pressure Ulcer of Unspec Site,Unspec Stage
 ;;^UTILITY(U,$J,358.3,8424,1,4,0)
 ;;=4^L89.90
 ;;^UTILITY(U,$J,358.3,8424,2)
 ;;=^5133666
 ;;^UTILITY(U,$J,358.3,8425,0)
 ;;=L89.91^^45^421^283
 ;;^UTILITY(U,$J,358.3,8425,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8425,1,3,0)
 ;;=3^Pressure Ulcer of Unspec Site,Stage 1
 ;;^UTILITY(U,$J,358.3,8425,1,4,0)
 ;;=4^L89.91
 ;;^UTILITY(U,$J,358.3,8425,2)
 ;;=^5133664
 ;;^UTILITY(U,$J,358.3,8426,0)
 ;;=L89.92^^45^421^284
 ;;^UTILITY(U,$J,358.3,8426,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8426,1,3,0)
 ;;=3^Pressure Ulcer of Unspec Site,Stage 2
 ;;^UTILITY(U,$J,358.3,8426,1,4,0)
 ;;=4^L89.92
 ;;^UTILITY(U,$J,358.3,8426,2)
 ;;=^5133667
 ;;^UTILITY(U,$J,358.3,8427,0)
 ;;=L89.93^^45^421^285
 ;;^UTILITY(U,$J,358.3,8427,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8427,1,3,0)
 ;;=3^Pressure Ulcer of Unspec Site,Stage 3
 ;;^UTILITY(U,$J,358.3,8427,1,4,0)
 ;;=4^L89.93
 ;;^UTILITY(U,$J,358.3,8427,2)
 ;;=^5133668
 ;;^UTILITY(U,$J,358.3,8428,0)
 ;;=L89.94^^45^421^286
 ;;^UTILITY(U,$J,358.3,8428,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8428,1,3,0)
 ;;=3^Pressure Ulcer of Unspec Site,Stage 4
 ;;^UTILITY(U,$J,358.3,8428,1,4,0)
 ;;=4^L89.94
 ;;^UTILITY(U,$J,358.3,8428,2)
 ;;=^5133669
 ;;^UTILITY(U,$J,358.3,8429,0)
 ;;=L89.95^^45^421^288
 ;;^UTILITY(U,$J,358.3,8429,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8429,1,3,0)
 ;;=3^Pressure Ulcer of Unspec Site,Unstageable
 ;;^UTILITY(U,$J,358.3,8429,1,4,0)
 ;;=4^L89.95
 ;;^UTILITY(U,$J,358.3,8429,2)
 ;;=^5133660
 ;;^UTILITY(U,$J,358.3,8430,0)
 ;;=L92.0^^45^421^159
 ;;^UTILITY(U,$J,358.3,8430,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8430,1,3,0)
 ;;=3^Granuloma Annulare
 ;;^UTILITY(U,$J,358.3,8430,1,4,0)
 ;;=4^L92.0
 ;;^UTILITY(U,$J,358.3,8430,2)
 ;;=^184052
 ;;^UTILITY(U,$J,358.3,8431,0)
 ;;=L95.1^^45^421^146
 ;;^UTILITY(U,$J,358.3,8431,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8431,1,3,0)
 ;;=3^Erythema Elevatum Diutinum
 ;;^UTILITY(U,$J,358.3,8431,1,4,0)
 ;;=4^L95.1
 ;;^UTILITY(U,$J,358.3,8431,2)
 ;;=^5009477
 ;;^UTILITY(U,$J,358.3,8432,0)
 ;;=L97.111^^45^421^262
 ;;^UTILITY(U,$J,358.3,8432,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8432,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer of Right Thigh w/ Breakdown of Skin
 ;;^UTILITY(U,$J,358.3,8432,1,4,0)
 ;;=4^L97.111
 ;;^UTILITY(U,$J,358.3,8432,2)
 ;;=^5009485
 ;;^UTILITY(U,$J,358.3,8433,0)
 ;;=L97.112^^45^421^263
 ;;^UTILITY(U,$J,358.3,8433,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8433,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer of Right Thigh w/ Fat Layer Exposed
 ;;^UTILITY(U,$J,358.3,8433,1,4,0)
 ;;=4^L97.112
 ;;^UTILITY(U,$J,358.3,8433,2)
 ;;=^5009486
 ;;^UTILITY(U,$J,358.3,8434,0)
 ;;=L97.113^^45^421^264
 ;;^UTILITY(U,$J,358.3,8434,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8434,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer of Right Thigh w/ Necrosis of Muscle
 ;;^UTILITY(U,$J,358.3,8434,1,4,0)
 ;;=4^L97.113
 ;;^UTILITY(U,$J,358.3,8434,2)
 ;;=^5009487
 ;;^UTILITY(U,$J,358.3,8435,0)
 ;;=L97.114^^45^421^265
 ;;^UTILITY(U,$J,358.3,8435,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8435,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer of Right Thigh w/ Necrosis of Bone
 ;;^UTILITY(U,$J,358.3,8435,1,4,0)
 ;;=4^L97.114
 ;;^UTILITY(U,$J,358.3,8435,2)
 ;;=^5009488
 ;;^UTILITY(U,$J,358.3,8436,0)
 ;;=L97.119^^45^421^266
 ;;^UTILITY(U,$J,358.3,8436,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8436,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer of Right Thigh w/ Unspec Severity
 ;;^UTILITY(U,$J,358.3,8436,1,4,0)
 ;;=4^L97.119
 ;;^UTILITY(U,$J,358.3,8436,2)
 ;;=^5009489
 ;;^UTILITY(U,$J,358.3,8437,0)
 ;;=L97.121^^45^421^214
 ;;^UTILITY(U,$J,358.3,8437,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8437,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer of Left Thigh w/ Breakdown of Skin
 ;;^UTILITY(U,$J,358.3,8437,1,4,0)
 ;;=4^L97.121
 ;;^UTILITY(U,$J,358.3,8437,2)
 ;;=^5009490
 ;;^UTILITY(U,$J,358.3,8438,0)
 ;;=L97.122^^45^421^215
 ;;^UTILITY(U,$J,358.3,8438,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8438,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer of Left Thigh w/ Fat Layer Exposed
 ;;^UTILITY(U,$J,358.3,8438,1,4,0)
 ;;=4^L97.122
 ;;^UTILITY(U,$J,358.3,8438,2)
 ;;=^5009491
 ;;^UTILITY(U,$J,358.3,8439,0)
 ;;=L97.123^^45^421^216
 ;;^UTILITY(U,$J,358.3,8439,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8439,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer of Left Thigh w/ Necrosis of Muscle
 ;;^UTILITY(U,$J,358.3,8439,1,4,0)
 ;;=4^L97.123
 ;;^UTILITY(U,$J,358.3,8439,2)
 ;;=^5009492
 ;;^UTILITY(U,$J,358.3,8440,0)
 ;;=L97.124^^45^421^217
 ;;^UTILITY(U,$J,358.3,8440,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8440,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer of Left Thigh w/ Necrosis of Bone
 ;;^UTILITY(U,$J,358.3,8440,1,4,0)
 ;;=4^L97.124
 ;;^UTILITY(U,$J,358.3,8440,2)
 ;;=^5009493
 ;;^UTILITY(U,$J,358.3,8441,0)
 ;;=L97.129^^45^421^218
 ;;^UTILITY(U,$J,358.3,8441,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8441,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer of Left Thigh w/ Unspec Severity
 ;;^UTILITY(U,$J,358.3,8441,1,4,0)
 ;;=4^L97.129
 ;;^UTILITY(U,$J,358.3,8441,2)
 ;;=^5009494
 ;;^UTILITY(U,$J,358.3,8442,0)
 ;;=L97.211^^45^421^230
 ;;^UTILITY(U,$J,358.3,8442,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8442,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer of Right Calf w/ Breakdown of Skin
 ;;^UTILITY(U,$J,358.3,8442,1,4,0)
 ;;=4^L97.211
 ;;^UTILITY(U,$J,358.3,8442,2)
 ;;=^5009500
 ;;^UTILITY(U,$J,358.3,8443,0)
 ;;=L97.212^^45^421^231
 ;;^UTILITY(U,$J,358.3,8443,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8443,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer of Right Calf w/ Fat Layer Exposed
 ;;^UTILITY(U,$J,358.3,8443,1,4,0)
 ;;=4^L97.212
 ;;^UTILITY(U,$J,358.3,8443,2)
 ;;=^5009501
 ;;^UTILITY(U,$J,358.3,8444,0)
 ;;=L97.213^^45^421^232
 ;;^UTILITY(U,$J,358.3,8444,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8444,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer of Right Calf w/ Necrosis of Muscle
 ;;^UTILITY(U,$J,358.3,8444,1,4,0)
 ;;=4^L97.213
 ;;^UTILITY(U,$J,358.3,8444,2)
 ;;=^5009502
 ;;^UTILITY(U,$J,358.3,8445,0)
 ;;=L97.214^^45^421^233
 ;;^UTILITY(U,$J,358.3,8445,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8445,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer of Right Calf w/ Necrosis of Bone
 ;;^UTILITY(U,$J,358.3,8445,1,4,0)
 ;;=4^L97.214
 ;;^UTILITY(U,$J,358.3,8445,2)
 ;;=^5009503
 ;;^UTILITY(U,$J,358.3,8446,0)
 ;;=L97.219^^45^421^234
 ;;^UTILITY(U,$J,358.3,8446,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8446,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer of Right Calf w/ Unspec Severity
 ;;^UTILITY(U,$J,358.3,8446,1,4,0)
 ;;=4^L97.219
 ;;^UTILITY(U,$J,358.3,8446,2)
 ;;=^5009504
 ;;^UTILITY(U,$J,358.3,8447,0)
 ;;=L97.221^^45^421^185
 ;;^UTILITY(U,$J,358.3,8447,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8447,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer of Left Calf w/ Breakdown of Skin
 ;;^UTILITY(U,$J,358.3,8447,1,4,0)
 ;;=4^L97.221
 ;;^UTILITY(U,$J,358.3,8447,2)
 ;;=^5009505
 ;;^UTILITY(U,$J,358.3,8448,0)
 ;;=L97.222^^45^421^186
 ;;^UTILITY(U,$J,358.3,8448,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8448,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer of Left Calf w/ Fat Layer Exposed
 ;;^UTILITY(U,$J,358.3,8448,1,4,0)
 ;;=4^L97.222
 ;;^UTILITY(U,$J,358.3,8448,2)
 ;;=^5009506
 ;;^UTILITY(U,$J,358.3,8449,0)
 ;;=L97.223^^45^421^187
 ;;^UTILITY(U,$J,358.3,8449,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8449,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer of Left Calf w/ Necrosis of Muscle
 ;;^UTILITY(U,$J,358.3,8449,1,4,0)
 ;;=4^L97.223
 ;;^UTILITY(U,$J,358.3,8449,2)
 ;;=^5009507
 ;;^UTILITY(U,$J,358.3,8450,0)
 ;;=L97.224^^45^421^188
 ;;^UTILITY(U,$J,358.3,8450,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8450,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer of Left Calf w/ Necrosis of Bone
 ;;^UTILITY(U,$J,358.3,8450,1,4,0)
 ;;=4^L97.224
 ;;^UTILITY(U,$J,358.3,8450,2)
 ;;=^5009508
 ;;^UTILITY(U,$J,358.3,8451,0)
 ;;=L97.229^^45^421^189
 ;;^UTILITY(U,$J,358.3,8451,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8451,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer of Left Calf w/ Unspec Severity
 ;;^UTILITY(U,$J,358.3,8451,1,4,0)
 ;;=4^L97.229
 ;;^UTILITY(U,$J,358.3,8451,2)
 ;;=^5009509
 ;;^UTILITY(U,$J,358.3,8452,0)
 ;;=L97.311^^45^421^222
 ;;^UTILITY(U,$J,358.3,8452,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8452,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer of Right Ankle w/ Breakdown of Skin
 ;;^UTILITY(U,$J,358.3,8452,1,4,0)
 ;;=4^L97.311
 ;;^UTILITY(U,$J,358.3,8452,2)
 ;;=^5009515
 ;;^UTILITY(U,$J,358.3,8453,0)
 ;;=L97.312^^45^421^223
 ;;^UTILITY(U,$J,358.3,8453,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8453,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer of Right Ankle w/ Fat Layer Exposed
 ;;^UTILITY(U,$J,358.3,8453,1,4,0)
 ;;=4^L97.312
 ;;^UTILITY(U,$J,358.3,8453,2)
 ;;=^5009516
 ;;^UTILITY(U,$J,358.3,8454,0)
 ;;=L97.313^^45^421^224
 ;;^UTILITY(U,$J,358.3,8454,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8454,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer of Right Ankle w/ Necrosis of Muscle
 ;;^UTILITY(U,$J,358.3,8454,1,4,0)
 ;;=4^L97.313
 ;;^UTILITY(U,$J,358.3,8454,2)
 ;;=^5009517
 ;;^UTILITY(U,$J,358.3,8455,0)
 ;;=L97.314^^45^421^225
 ;;^UTILITY(U,$J,358.3,8455,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8455,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer of Right Ankle w/ Necrosis of Bone
 ;;^UTILITY(U,$J,358.3,8455,1,4,0)
 ;;=4^L97.314
 ;;^UTILITY(U,$J,358.3,8455,2)
 ;;=^5009518
 ;;^UTILITY(U,$J,358.3,8456,0)
 ;;=L97.319^^45^421^226
 ;;^UTILITY(U,$J,358.3,8456,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8456,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer of Right Ankle w/ Unspec Severity
 ;;^UTILITY(U,$J,358.3,8456,1,4,0)
 ;;=4^L97.319
 ;;^UTILITY(U,$J,358.3,8456,2)
 ;;=^5009519
 ;;^UTILITY(U,$J,358.3,8457,0)
 ;;=L97.321^^45^421^177
 ;;^UTILITY(U,$J,358.3,8457,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8457,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer of Left Ankle w/ Breakdown of Skin
 ;;^UTILITY(U,$J,358.3,8457,1,4,0)
 ;;=4^L97.321
 ;;^UTILITY(U,$J,358.3,8457,2)
 ;;=^5009520
 ;;^UTILITY(U,$J,358.3,8458,0)
 ;;=L97.322^^45^421^178
 ;;^UTILITY(U,$J,358.3,8458,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8458,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer of Left Ankle w/ Fat Layer Exposed
 ;;^UTILITY(U,$J,358.3,8458,1,4,0)
 ;;=4^L97.322
 ;;^UTILITY(U,$J,358.3,8458,2)
 ;;=^5009521
 ;;^UTILITY(U,$J,358.3,8459,0)
 ;;=L97.323^^45^421^179
 ;;^UTILITY(U,$J,358.3,8459,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8459,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer of Left Ankle w/ Necrosis of Muscle
 ;;^UTILITY(U,$J,358.3,8459,1,4,0)
 ;;=4^L97.323
 ;;^UTILITY(U,$J,358.3,8459,2)
 ;;=^5009522
 ;;^UTILITY(U,$J,358.3,8460,0)
 ;;=L97.324^^45^421^180
 ;;^UTILITY(U,$J,358.3,8460,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8460,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer of Left Ankle w/ Necrosis of Bone
 ;;^UTILITY(U,$J,358.3,8460,1,4,0)
 ;;=4^L97.324
 ;;^UTILITY(U,$J,358.3,8460,2)
 ;;=^5009523
 ;;^UTILITY(U,$J,358.3,8461,0)
 ;;=L97.329^^45^421^181
 ;;^UTILITY(U,$J,358.3,8461,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8461,1,3,0)
 ;;=3^Non-Pressure Chr Ulcer of Left Ankle w/ Unspec Severity
 ;;^UTILITY(U,$J,358.3,8461,1,4,0)
 ;;=4^L97.329