IBDEI0DG ; ; 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,33763,1,3,0)
;;=3^Allergic Contact Dermatitis,Unspec
;;^UTILITY(U,$J,358.3,33763,1,4,0)
;;=4^L23.9
;;^UTILITY(U,$J,358.3,33763,2)
;;=^5009125
;;^UTILITY(U,$J,358.3,33764,0)
;;=L24.9^^105^1423^166
;;^UTILITY(U,$J,358.3,33764,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,33764,1,3,0)
;;=3^Irritant Contact Dermatitis,Unspec
;;^UTILITY(U,$J,358.3,33764,1,4,0)
;;=4^L24.9
;;^UTILITY(U,$J,358.3,33764,2)
;;=^5009136
;;^UTILITY(U,$J,358.3,33765,0)
;;=L25.9^^105^1423^117
;;^UTILITY(U,$J,358.3,33765,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,33765,1,3,0)
;;=3^Contact Dermatitis,Unspec
;;^UTILITY(U,$J,358.3,33765,1,4,0)
;;=4^L25.9
;;^UTILITY(U,$J,358.3,33765,2)
;;=^5133647
;;^UTILITY(U,$J,358.3,33766,0)
;;=L26.^^105^1423^151
;;^UTILITY(U,$J,358.3,33766,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,33766,1,3,0)
;;=3^Exfoliative Dermatitis
;;^UTILITY(U,$J,358.3,33766,1,4,0)
;;=4^L26.
;;^UTILITY(U,$J,358.3,33766,2)
;;=^263886
;;^UTILITY(U,$J,358.3,33767,0)
;;=L27.0^^105^1423^305
;;^UTILITY(U,$J,358.3,33767,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,33767,1,3,0)
;;=3^Skin Eruption d/t Drugs/Meds,Generalized
;;^UTILITY(U,$J,358.3,33767,1,4,0)
;;=4^L27.0
;;^UTILITY(U,$J,358.3,33767,2)
;;=^5009144
;;^UTILITY(U,$J,358.3,33768,0)
;;=L27.1^^105^1423^306
;;^UTILITY(U,$J,358.3,33768,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,33768,1,3,0)
;;=3^Skin Eruption d/t Drugs/Meds,Localized
;;^UTILITY(U,$J,358.3,33768,1,4,0)
;;=4^L27.1
;;^UTILITY(U,$J,358.3,33768,2)
;;=^5009145
;;^UTILITY(U,$J,358.3,33769,0)
;;=L29.0^^105^1423^290
;;^UTILITY(U,$J,358.3,33769,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,33769,1,3,0)
;;=3^Pruritus Ani
;;^UTILITY(U,$J,358.3,33769,1,4,0)
;;=4^L29.0
;;^UTILITY(U,$J,358.3,33769,2)
;;=^100061
;;^UTILITY(U,$J,358.3,33770,0)
;;=L29.9^^105^1423^291
;;^UTILITY(U,$J,358.3,33770,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,33770,1,3,0)
;;=3^Pruritus,Unspec
;;^UTILITY(U,$J,358.3,33770,1,4,0)
;;=4^L29.9
;;^UTILITY(U,$J,358.3,33770,2)
;;=^5009153
;;^UTILITY(U,$J,358.3,33771,0)
;;=L30.0^^105^1423^270
;;^UTILITY(U,$J,358.3,33771,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,33771,1,3,0)
;;=3^Nummular Dermatitis
;;^UTILITY(U,$J,358.3,33771,1,4,0)
;;=4^L30.0
;;^UTILITY(U,$J,358.3,33771,2)
;;=^186823
;;^UTILITY(U,$J,358.3,33772,0)
;;=L30.1^^105^1423^143
;;^UTILITY(U,$J,358.3,33772,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,33772,1,3,0)
;;=3^Dyshidrosis
;;^UTILITY(U,$J,358.3,33772,1,4,0)
;;=4^L30.1
;;^UTILITY(U,$J,358.3,33772,2)
;;=^5009154
;;^UTILITY(U,$J,358.3,33773,0)
;;=L30.2^^105^1423^135
;;^UTILITY(U,$J,358.3,33773,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,33773,1,3,0)
;;=3^Cutaneous Autosensitization
;;^UTILITY(U,$J,358.3,33773,1,4,0)
;;=4^L30.2
;;^UTILITY(U,$J,358.3,33773,2)
;;=^5009155
;;^UTILITY(U,$J,358.3,33774,0)
;;=L30.4^^105^1423^147
;;^UTILITY(U,$J,358.3,33774,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,33774,1,3,0)
;;=3^Erythema Intertrigo
;;^UTILITY(U,$J,358.3,33774,1,4,0)
;;=4^L30.4
;;^UTILITY(U,$J,358.3,33774,2)
;;=^5009157
;;^UTILITY(U,$J,358.3,33775,0)
;;=L30.8^^105^1423^138
;;^UTILITY(U,$J,358.3,33775,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,33775,1,3,0)
;;=3^Dermatitis NEC
;;^UTILITY(U,$J,358.3,33775,1,4,0)
;;=4^L30.8
;;^UTILITY(U,$J,358.3,33775,2)
;;=^5009158
;;^UTILITY(U,$J,358.3,33776,0)
;;=L30.9^^105^1423^139
;;^UTILITY(U,$J,358.3,33776,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,33776,1,3,0)
;;=3^Dermatitis,Unspec
;;^UTILITY(U,$J,358.3,33776,1,4,0)
;;=4^L30.9
;;^UTILITY(U,$J,358.3,33776,2)
;;=^5009159
;;^UTILITY(U,$J,358.3,33777,0)
;;=L40.0^^105^1423^293
;;^UTILITY(U,$J,358.3,33777,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,33777,1,3,0)
;;=3^Psoriasis Vulgaris
;;^UTILITY(U,$J,358.3,33777,1,4,0)
;;=4^L40.0
;;^UTILITY(U,$J,358.3,33777,2)
;;=^5009160
;;^UTILITY(U,$J,358.3,33778,0)
;;=L40.1^^105^1423^296
;;^UTILITY(U,$J,358.3,33778,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,33778,1,3,0)
;;=3^Pustulosis Psoriasis,Generalized
;;^UTILITY(U,$J,358.3,33778,1,4,0)
;;=4^L40.1
;;^UTILITY(U,$J,358.3,33778,2)
;;=^5009161
;;^UTILITY(U,$J,358.3,33779,0)
;;=L40.2^^105^1423^12
;;^UTILITY(U,$J,358.3,33779,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,33779,1,3,0)
;;=3^Acrodermatitis Continua
;;^UTILITY(U,$J,358.3,33779,1,4,0)
;;=4^L40.2
;;^UTILITY(U,$J,358.3,33779,2)
;;=^5009162
;;^UTILITY(U,$J,358.3,33780,0)
;;=L40.3^^105^1423^295
;;^UTILITY(U,$J,358.3,33780,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,33780,1,3,0)
;;=3^Pustulosis Palmaris et Plantaris
;;^UTILITY(U,$J,358.3,33780,1,4,0)
;;=4^L40.3
;;^UTILITY(U,$J,358.3,33780,2)
;;=^5009163
;;^UTILITY(U,$J,358.3,33781,0)
;;=L40.4^^105^1423^160
;;^UTILITY(U,$J,358.3,33781,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,33781,1,3,0)
;;=3^Guttate Psoriasis
;;^UTILITY(U,$J,358.3,33781,1,4,0)
;;=4^L40.4
;;^UTILITY(U,$J,358.3,33781,2)
;;=^5009164
;;^UTILITY(U,$J,358.3,33782,0)
;;=L40.8^^105^1423^292
;;^UTILITY(U,$J,358.3,33782,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,33782,1,3,0)
;;=3^Psoriasis NEC
;;^UTILITY(U,$J,358.3,33782,1,4,0)
;;=4^L40.8
;;^UTILITY(U,$J,358.3,33782,2)
;;=^271917
;;^UTILITY(U,$J,358.3,33783,0)
;;=L40.9^^105^1423^294
;;^UTILITY(U,$J,358.3,33783,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,33783,1,3,0)
;;=3^Psoriasis,Unspec
;;^UTILITY(U,$J,358.3,33783,1,4,0)
;;=4^L40.9
;;^UTILITY(U,$J,358.3,33783,2)
;;=^5009171
;;^UTILITY(U,$J,358.3,33784,0)
;;=L50.9^^105^1423^326
;;^UTILITY(U,$J,358.3,33784,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,33784,1,3,0)
;;=3^Urticaria,Unspec
;;^UTILITY(U,$J,358.3,33784,1,4,0)
;;=4^L50.9
;;^UTILITY(U,$J,358.3,33784,2)
;;=^5009204
;;^UTILITY(U,$J,358.3,33785,0)
;;=L53.8^^105^1423^150
;;^UTILITY(U,$J,358.3,33785,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,33785,1,3,0)
;;=3^Erythematous Conditions NEC
;;^UTILITY(U,$J,358.3,33785,1,4,0)
;;=4^L53.8
;;^UTILITY(U,$J,358.3,33785,2)
;;=^88044
;;^UTILITY(U,$J,358.3,33786,0)
;;=L53.9^^105^1423^149
;;^UTILITY(U,$J,358.3,33786,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,33786,1,3,0)
;;=3^Erythematous Condition,Unspec
;;^UTILITY(U,$J,358.3,33786,1,4,0)
;;=4^L53.9
;;^UTILITY(U,$J,358.3,33786,2)
;;=^5009210
;;^UTILITY(U,$J,358.3,33787,0)
;;=L54.^^105^1423^148
;;^UTILITY(U,$J,358.3,33787,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,33787,1,3,0)
;;=3^Erythema in Diseases Classified Elsewhere
;;^UTILITY(U,$J,358.3,33787,1,4,0)
;;=4^L54.
;;^UTILITY(U,$J,358.3,33787,2)
;;=^5009211
;;^UTILITY(U,$J,358.3,33788,0)
;;=L56.0^^105^1423^142
;;^UTILITY(U,$J,358.3,33788,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,33788,1,3,0)
;;=3^Drug Phototoxic Response
;;^UTILITY(U,$J,358.3,33788,1,4,0)
;;=4^L56.0
;;^UTILITY(U,$J,358.3,33788,2)
;;=^5009214
;;^UTILITY(U,$J,358.3,33789,0)
;;=L56.1^^105^1423^141
;;^UTILITY(U,$J,358.3,33789,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,33789,1,3,0)
;;=3^Drug Photoallergic Response
;;^UTILITY(U,$J,358.3,33789,1,4,0)
;;=4^L56.1
;;^UTILITY(U,$J,358.3,33789,2)
;;=^5009215
;;^UTILITY(U,$J,358.3,33790,0)
;;=L56.2^^105^1423^274
;;^UTILITY(U,$J,358.3,33790,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,33790,1,3,0)
;;=3^Photocontact Dermatitis
;;^UTILITY(U,$J,358.3,33790,1,4,0)
;;=4^L56.2
;;^UTILITY(U,$J,358.3,33790,2)
;;=^5009216
;;^UTILITY(U,$J,358.3,33791,0)
;;=L56.3^^105^1423^308
;;^UTILITY(U,$J,358.3,33791,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,33791,1,3,0)
;;=3^Solar Urticaria
;;^UTILITY(U,$J,358.3,33791,1,4,0)
;;=4^L56.3
;;^UTILITY(U,$J,358.3,33791,2)
;;=^5009217
;;^UTILITY(U,$J,358.3,33792,0)
;;=L57.0^^105^1423^13
;;^UTILITY(U,$J,358.3,33792,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,33792,1,3,0)
;;=3^Actinic Keratosis
;;^UTILITY(U,$J,358.3,33792,1,4,0)
;;=4^L57.0
;;^UTILITY(U,$J,358.3,33792,2)
;;=^66900
;;^UTILITY(U,$J,358.3,33793,0)
;;=L60.0^^105^1423^164
;;^UTILITY(U,$J,358.3,33793,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,33793,1,3,0)
;;=3^Ingrowing Nail
;;^UTILITY(U,$J,358.3,33793,1,4,0)
;;=4^L60.0
;;^UTILITY(U,$J,358.3,33793,2)
;;=^5009234
;;^UTILITY(U,$J,358.3,33794,0)
;;=L60.1^^105^1423^272
;;^UTILITY(U,$J,358.3,33794,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,33794,1,3,0)
;;=3^Onycholysis
;;^UTILITY(U,$J,358.3,33794,1,4,0)
;;=4^L60.1
;;^UTILITY(U,$J,358.3,33794,2)
;;=^186837
;;^UTILITY(U,$J,358.3,33795,0)
;;=L60.2^^105^1423^271
;;^UTILITY(U,$J,358.3,33795,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,33795,1,3,0)
;;=3^Onychogryphosis
;;^UTILITY(U,$J,358.3,33795,1,4,0)
;;=4^L60.2
;;^UTILITY(U,$J,358.3,33795,2)
;;=^5009235
;;^UTILITY(U,$J,358.3,33796,0)
;;=L60.3^^105^1423^176
;;^UTILITY(U,$J,358.3,33796,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,33796,1,3,0)
;;=3^Nail Dystrophy
;;^UTILITY(U,$J,358.3,33796,1,4,0)
;;=4^L60.3
;;^UTILITY(U,$J,358.3,33796,2)
;;=^5009236
;;^UTILITY(U,$J,358.3,33797,0)
;;=L60.4^^105^1423^89
;;^UTILITY(U,$J,358.3,33797,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,33797,1,3,0)
;;=3^Beau's Lines
;;^UTILITY(U,$J,358.3,33797,1,4,0)
;;=4^L60.4
;;^UTILITY(U,$J,358.3,33797,2)
;;=^5009237
;;^UTILITY(U,$J,358.3,33798,0)
;;=L60.5^^105^1423^330
;;^UTILITY(U,$J,358.3,33798,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,33798,1,3,0)
;;=3^Yellow Nail Syndrome
;;^UTILITY(U,$J,358.3,33798,1,4,0)
;;=4^L60.5
;;^UTILITY(U,$J,358.3,33798,2)
;;=^5009238
;;^UTILITY(U,$J,358.3,33799,0)
;;=L60.8^^105^1423^174
;;^UTILITY(U,$J,358.3,33799,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,33799,1,3,0)
;;=3^Nail Disorders NEC
;;^UTILITY(U,$J,358.3,33799,1,4,0)
;;=4^L60.8
;;^UTILITY(U,$J,358.3,33799,2)
;;=^5009239
;;^UTILITY(U,$J,358.3,33800,0)
;;=L62.^^105^1423^175
;;^UTILITY(U,$J,358.3,33800,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,33800,1,3,0)
;;=3^Nail Disorders in Diseases Classified Elsewhere
;;^UTILITY(U,$J,358.3,33800,1,4,0)
;;=4^L62.
;;^UTILITY(U,$J,358.3,33800,2)
;;=^5009241
;;^UTILITY(U,$J,358.3,33801,0)
;;=L64.9^^105^1423^34
;;^UTILITY(U,$J,358.3,33801,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,33801,1,3,0)
;;=3^Androgenic Alopecia,Unspec
;;^UTILITY(U,$J,358.3,33801,1,4,0)
;;=4^L64.9
;;^UTILITY(U,$J,358.3,33801,2)
;;=^5009249
;;^UTILITY(U,$J,358.3,33802,0)
;;=L65.9^^105^1423^269
;;^UTILITY(U,$J,358.3,33802,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,33802,1,3,0)
;;=3^Nonscarring Hair Loss,Unspec
;;^UTILITY(U,$J,358.3,33802,1,4,0)
;;=4^L65.9
;;^UTILITY(U,$J,358.3,33802,2)
;;=^5009252
;;^UTILITY(U,$J,358.3,33803,0)
;;=L70.0^^105^1423^7
;;^UTILITY(U,$J,358.3,33803,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,33803,1,3,0)
;;=3^Acne Vulgaris
;;^UTILITY(U,$J,358.3,33803,1,4,0)
;;=4^L70.0
;;^UTILITY(U,$J,358.3,33803,2)
;;=^5009268
;;^UTILITY(U,$J,358.3,33804,0)
;;=L70.1^^105^1423^2
;;^UTILITY(U,$J,358.3,33804,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,33804,1,3,0)
;;=3^Acne Conglobata
;;^UTILITY(U,$J,358.3,33804,1,4,0)
;;=4^L70.1
;;^UTILITY(U,$J,358.3,33804,2)
;;=^5009269
;;^UTILITY(U,$J,358.3,33805,0)
;;=L70.3^^105^1423^6
;;^UTILITY(U,$J,358.3,33805,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,33805,1,3,0)
;;=3^Acne Tropica
;;^UTILITY(U,$J,358.3,33805,1,4,0)
;;=4^L70.3
;;^UTILITY(U,$J,358.3,33805,2)
;;=^5009270
;;^UTILITY(U,$J,358.3,33806,0)
;;=L70.5^^105^1423^3
;;^UTILITY(U,$J,358.3,33806,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,33806,1,3,0)
;;=3^Acne Excoriee des Jeunes Filles
;;^UTILITY(U,$J,358.3,33806,1,4,0)
;;=4^L70.5
;;^UTILITY(U,$J,358.3,33806,2)
;;=^5009272
;;^UTILITY(U,$J,358.3,33807,0)
;;=L70.8^^105^1423^5
;;^UTILITY(U,$J,358.3,33807,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,33807,1,3,0)
;;=3^Acne NEC
;;^UTILITY(U,$J,358.3,33807,1,4,0)
;;=4^L70.8
;;^UTILITY(U,$J,358.3,33807,2)
;;=^87239
;;^UTILITY(U,$J,358.3,33808,0)
;;=L70.9^^105^1423^8
;;^UTILITY(U,$J,358.3,33808,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,33808,1,3,0)
;;=3^Acne,Unspec
;;^UTILITY(U,$J,358.3,33808,1,4,0)
;;=4^L70.9
;;^UTILITY(U,$J,358.3,33808,2)
;;=^5009273
;;^UTILITY(U,$J,358.3,33809,0)
;;=L71.0^^105^1423^273
;;^UTILITY(U,$J,358.3,33809,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,33809,1,3,0)
;;=3^Perioral Dermatitis
;;^UTILITY(U,$J,358.3,33809,1,4,0)
;;=4^L71.0
;;^UTILITY(U,$J,358.3,33809,2)
;;=^5009274
;;^UTILITY(U,$J,358.3,33810,0)
;;=L71.1^^105^1423^299
;;^UTILITY(U,$J,358.3,33810,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,33810,1,3,0)
;;=3^Rhinophyma
;;^UTILITY(U,$J,358.3,33810,1,4,0)
;;=4^L71.1
;;^UTILITY(U,$J,358.3,33810,2)
;;=^106083
;;^UTILITY(U,$J,358.3,33811,0)
;;=L71.8^^105^1423^300
;;^UTILITY(U,$J,358.3,33811,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,33811,1,3,0)
;;=3^Rosacea NEC
;;^UTILITY(U,$J,358.3,33811,1,4,0)
;;=4^L71.8
;;^UTILITY(U,$J,358.3,33811,2)
;;=^5009275
;;^UTILITY(U,$J,358.3,33812,0)
;;=L71.9^^105^1423^301
;;^UTILITY(U,$J,358.3,33812,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,33812,1,3,0)
;;=3^Rosacea,Unspec
;;^UTILITY(U,$J,358.3,33812,1,4,0)
;;=4^L71.9
;;^UTILITY(U,$J,358.3,33812,2)
;;=^5009276
;;^UTILITY(U,$J,358.3,33813,0)
;;=L72.0^^105^1423^145
;;^UTILITY(U,$J,358.3,33813,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,33813,1,3,0)
;;=3^Epidermal Cyst
;;^UTILITY(U,$J,358.3,33813,1,4,0)
;;=4^L72.0
;;^UTILITY(U,$J,358.3,33813,2)
;;=^5009277
;;^UTILITY(U,$J,358.3,33814,0)
;;=L72.12^^105^1423^325
;;^UTILITY(U,$J,358.3,33814,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,33814,1,3,0)
;;=3^Trichodermal Cyst
;;^UTILITY(U,$J,358.3,33814,1,4,0)
;;=4^L72.12
;;^UTILITY(U,$J,358.3,33814,2)
;;=^5009279
;;^UTILITY(U,$J,358.3,33815,0)
;;=L72.2^^105^1423^310
;;^UTILITY(U,$J,358.3,33815,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,33815,1,3,0)
;;=3^Steatocystoma Multiplex
;;^UTILITY(U,$J,358.3,33815,1,4,0)
;;=4^L72.2
;;^UTILITY(U,$J,358.3,33815,2)
;;=^5009280
;;^UTILITY(U,$J,358.3,33816,0)
;;=L72.8^^105^1423^154
;;^UTILITY(U,$J,358.3,33816,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,33816,1,3,0)
;;=3^Follicular Cysts of Skin/Subcutaneous Tissue NEC
;;^UTILITY(U,$J,358.3,33816,1,4,0)
;;=4^L72.8
;;^UTILITY(U,$J,358.3,33816,2)
;;=^5009282
;;^UTILITY(U,$J,358.3,33817,0)
;;=L72.9^^105^1423^155
;;^UTILITY(U,$J,358.3,33817,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,33817,1,3,0)
;;=3^Follicular Cysts of Skin/Subcutaneous Tissue,Unspec
;;^UTILITY(U,$J,358.3,33817,1,4,0)
;;=4^L72.9
;;^UTILITY(U,$J,358.3,33817,2)
;;=^5009283
;;^UTILITY(U,$J,358.3,33818,0)
;;=L73.0^^105^1423^4
;;^UTILITY(U,$J,358.3,33818,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,33818,1,3,0)
;;=3^Acne Keloid
;;^UTILITY(U,$J,358.3,33818,1,4,0)
;;=4^L73.0
;;^UTILITY(U,$J,358.3,33818,2)
;;=^2149
;;^UTILITY(U,$J,358.3,33819,0)
;;=L73.2^^105^1423^162
;;^UTILITY(U,$J,358.3,33819,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,33819,1,3,0)
;;=3^Hidradenitis Suppurativa
;;^UTILITY(U,$J,358.3,33819,1,4,0)
;;=4^L73.2
;;^UTILITY(U,$J,358.3,33819,2)
;;=^278979
;;^UTILITY(U,$J,358.3,33820,0)
;;=L73.9^^105^1423^156
;;^UTILITY(U,$J,358.3,33820,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,33820,1,3,0)
;;=3^Follicular Disorder,Unspec
;;^UTILITY(U,$J,358.3,33820,1,4,0)
;;=4^L73.9
;;^UTILITY(U,$J,358.3,33820,2)
;;=^5009286
;;^UTILITY(U,$J,358.3,33821,0)
;;=L82.0^^105^1423^163
;;^UTILITY(U,$J,358.3,33821,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,33821,1,3,0)
;;=3^Inflamed Seborrheic Keratosis
;;^UTILITY(U,$J,358.3,33821,1,4,0)
;;=4^L82.0
;;^UTILITY(U,$J,358.3,33821,2)
;;=^303311
;;^UTILITY(U,$J,358.3,33822,0)
;;=L82.1^^105^1423^304
;;^UTILITY(U,$J,358.3,33822,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,33822,1,3,0)
;;=3^Seborrheic Keratosis NEC
;;^UTILITY(U,$J,358.3,33822,1,4,0)
;;=4^L82.1
;;^UTILITY(U,$J,358.3,33822,2)
;;=^303312
;;^UTILITY(U,$J,358.3,33823,0)
;;=L84.^^105^1423^118
;;^UTILITY(U,$J,358.3,33823,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,33823,1,3,0)
;;=3^Corns and Callosities
;;^UTILITY(U,$J,358.3,33823,1,4,0)
;;=4^L84.
;;^UTILITY(U,$J,358.3,33823,2)
;;=^271920
;;^UTILITY(U,$J,358.3,33824,0)
;;=L85.0^^105^1423^9
;;^UTILITY(U,$J,358.3,33824,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,33824,1,3,0)
;;=3^Acquired Ichthyosis
;;^UTILITY(U,$J,358.3,33824,1,4,0)
;;=4^L85.0
;;^UTILITY(U,$J,358.3,33824,2)
;;=^5009320
;;^UTILITY(U,$J,358.3,33825,0)
;;=L85.1^^105^1423^11
;;^UTILITY(U,$J,358.3,33825,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,33825,1,3,0)
;;=3^Acquired Keratosis Palmaris et Plantaris
;;^UTILITY(U,$J,358.3,33825,1,4,0)
;;=4^L85.1
;;^UTILITY(U,$J,358.3,33825,2)
;;=^5009321
;;^UTILITY(U,$J,358.3,33826,0)
;;=L85.2^^105^1423^169
;;^UTILITY(U,$J,358.3,33826,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,33826,1,3,0)
;;=3^Keratosis Punctata
;;^UTILITY(U,$J,358.3,33826,1,4,0)
;;=4^L85.2
;;^UTILITY(U,$J,358.3,33826,2)
;;=^5009322
;;^UTILITY(U,$J,358.3,33827,0)
;;=L85.3^^105^1423^329
;;^UTILITY(U,$J,358.3,33827,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,33827,1,3,0)
;;=3^Xerosis Cutis
;;^UTILITY(U,$J,358.3,33827,1,4,0)
;;=4^L85.3
;;^UTILITY(U,$J,358.3,33827,2)
;;=^5009323
;;^UTILITY(U,$J,358.3,33828,0)
;;=L86.^^105^1423^167
;;^UTILITY(U,$J,358.3,33828,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,33828,1,3,0)
;;=3^Keratoderma in Diseases Classified Elsewhere
;;^UTILITY(U,$J,358.3,33828,1,4,0)
;;=4^L86.
;;^UTILITY(U,$J,358.3,33828,2)
;;=^5009326
;;^UTILITY(U,$J,358.3,33829,0)
;;=L87.0^^105^1423^168
;;^UTILITY(U,$J,358.3,33829,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,33829,1,3,0)
;;=3^Keratosis Follicularis et Parafollicularis in Cutem Penetrans
;;^UTILITY(U,$J,358.3,33829,1,4,0)
;;=4^L87.0
;;^UTILITY(U,$J,358.3,33829,2)
;;=^5009327
;;^UTILITY(U,$J,358.3,33830,0)
;;=L87.2^^105^1423^144
;;^UTILITY(U,$J,358.3,33830,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,33830,1,3,0)
;;=3^Elastosis Perforans Serpiginosa
;;^UTILITY(U,$J,358.3,33830,1,4,0)
;;=4^L87.2
;;^UTILITY(U,$J,358.3,33830,2)
;;=^5009329
;;^UTILITY(U,$J,358.3,33831,0)
;;=L89.300^^105^1423^282
;;^UTILITY(U,$J,358.3,33831,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,33831,1,3,0)
;;=3^Pressure Ulcer of Buttock,Unstageable
;;^UTILITY(U,$J,358.3,33831,1,4,0)
;;=4^L89.300
;;^UTILITY(U,$J,358.3,33831,2)
;;=^5009389
;;^UTILITY(U,$J,358.3,33832,0)
;;=L89.301^^105^1423^277
;;^UTILITY(U,$J,358.3,33832,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,33832,1,3,0)
;;=3^Pressure Ulcer of Buttock,Stage 1
;;^UTILITY(U,$J,358.3,33832,1,4,0)
;;=4^L89.301
;;^UTILITY(U,$J,358.3,33832,2)
;;=^5009390
;;^UTILITY(U,$J,358.3,33833,0)
;;=L89.302^^105^1423^278
;;^UTILITY(U,$J,358.3,33833,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,33833,1,3,0)
;;=3^Pressure Ulcer of Buttock,Stage 2
;;^UTILITY(U,$J,358.3,33833,1,4,0)
;;=4^L89.302
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HIBDEI0DG 19758 printed Dec 13, 2024@01:46:31 Page 2
IBDEI0DG ; ; 03-MAY-2022
+1 ;;3.0;IB ENCOUNTER FORM IMP/EXP;;MAY 03, 2022
+2 if 'DIFQR(358.3)
QUIT
FOR I=1:2
SET X=$TEXT(Q+I)
if X=""
QUIT
SET Y=$EXTRACT($TEXT(Q+I+1),4,999)
SET X=$EXTRACT(X,4,999)
if $ASCII(Y)=126
SET I=I+1
SET Y=$EXTRACT(Y,2,999)_$EXTRACT($TEXT(Q+I+1),5,999)
if $ASCII(Y)=61
SET Y=$EXTRACT(Y,2,999)
XECUTE NO
IF '$TEST
SET @X=Y
Q QUIT
+1 ;;^UTILITY(U,$J,358.3,33763,1,3,0)
+2 ;;=3^Allergic Contact Dermatitis,Unspec
+3 ;;^UTILITY(U,$J,358.3,33763,1,4,0)
+4 ;;=4^L23.9
+5 ;;^UTILITY(U,$J,358.3,33763,2)
+6 ;;=^5009125
+7 ;;^UTILITY(U,$J,358.3,33764,0)
+8 ;;=L24.9^^105^1423^166
+9 ;;^UTILITY(U,$J,358.3,33764,1,0)
+10 ;;=^358.31IA^4^2
+11 ;;^UTILITY(U,$J,358.3,33764,1,3,0)
+12 ;;=3^Irritant Contact Dermatitis,Unspec
+13 ;;^UTILITY(U,$J,358.3,33764,1,4,0)
+14 ;;=4^L24.9
+15 ;;^UTILITY(U,$J,358.3,33764,2)
+16 ;;=^5009136
+17 ;;^UTILITY(U,$J,358.3,33765,0)
+18 ;;=L25.9^^105^1423^117
+19 ;;^UTILITY(U,$J,358.3,33765,1,0)
+20 ;;=^358.31IA^4^2
+21 ;;^UTILITY(U,$J,358.3,33765,1,3,0)
+22 ;;=3^Contact Dermatitis,Unspec
+23 ;;^UTILITY(U,$J,358.3,33765,1,4,0)
+24 ;;=4^L25.9
+25 ;;^UTILITY(U,$J,358.3,33765,2)
+26 ;;=^5133647
+27 ;;^UTILITY(U,$J,358.3,33766,0)
+28 ;;=L26.^^105^1423^151
+29 ;;^UTILITY(U,$J,358.3,33766,1,0)
+30 ;;=^358.31IA^4^2
+31 ;;^UTILITY(U,$J,358.3,33766,1,3,0)
+32 ;;=3^Exfoliative Dermatitis
+33 ;;^UTILITY(U,$J,358.3,33766,1,4,0)
+34 ;;=4^L26.
+35 ;;^UTILITY(U,$J,358.3,33766,2)
+36 ;;=^263886
+37 ;;^UTILITY(U,$J,358.3,33767,0)
+38 ;;=L27.0^^105^1423^305
+39 ;;^UTILITY(U,$J,358.3,33767,1,0)
+40 ;;=^358.31IA^4^2
+41 ;;^UTILITY(U,$J,358.3,33767,1,3,0)
+42 ;;=3^Skin Eruption d/t Drugs/Meds,Generalized
+43 ;;^UTILITY(U,$J,358.3,33767,1,4,0)
+44 ;;=4^L27.0
+45 ;;^UTILITY(U,$J,358.3,33767,2)
+46 ;;=^5009144
+47 ;;^UTILITY(U,$J,358.3,33768,0)
+48 ;;=L27.1^^105^1423^306
+49 ;;^UTILITY(U,$J,358.3,33768,1,0)
+50 ;;=^358.31IA^4^2
+51 ;;^UTILITY(U,$J,358.3,33768,1,3,0)
+52 ;;=3^Skin Eruption d/t Drugs/Meds,Localized
+53 ;;^UTILITY(U,$J,358.3,33768,1,4,0)
+54 ;;=4^L27.1
+55 ;;^UTILITY(U,$J,358.3,33768,2)
+56 ;;=^5009145
+57 ;;^UTILITY(U,$J,358.3,33769,0)
+58 ;;=L29.0^^105^1423^290
+59 ;;^UTILITY(U,$J,358.3,33769,1,0)
+60 ;;=^358.31IA^4^2
+61 ;;^UTILITY(U,$J,358.3,33769,1,3,0)
+62 ;;=3^Pruritus Ani
+63 ;;^UTILITY(U,$J,358.3,33769,1,4,0)
+64 ;;=4^L29.0
+65 ;;^UTILITY(U,$J,358.3,33769,2)
+66 ;;=^100061
+67 ;;^UTILITY(U,$J,358.3,33770,0)
+68 ;;=L29.9^^105^1423^291
+69 ;;^UTILITY(U,$J,358.3,33770,1,0)
+70 ;;=^358.31IA^4^2
+71 ;;^UTILITY(U,$J,358.3,33770,1,3,0)
+72 ;;=3^Pruritus,Unspec
+73 ;;^UTILITY(U,$J,358.3,33770,1,4,0)
+74 ;;=4^L29.9
+75 ;;^UTILITY(U,$J,358.3,33770,2)
+76 ;;=^5009153
+77 ;;^UTILITY(U,$J,358.3,33771,0)
+78 ;;=L30.0^^105^1423^270
+79 ;;^UTILITY(U,$J,358.3,33771,1,0)
+80 ;;=^358.31IA^4^2
+81 ;;^UTILITY(U,$J,358.3,33771,1,3,0)
+82 ;;=3^Nummular Dermatitis
+83 ;;^UTILITY(U,$J,358.3,33771,1,4,0)
+84 ;;=4^L30.0
+85 ;;^UTILITY(U,$J,358.3,33771,2)
+86 ;;=^186823
+87 ;;^UTILITY(U,$J,358.3,33772,0)
+88 ;;=L30.1^^105^1423^143
+89 ;;^UTILITY(U,$J,358.3,33772,1,0)
+90 ;;=^358.31IA^4^2
+91 ;;^UTILITY(U,$J,358.3,33772,1,3,0)
+92 ;;=3^Dyshidrosis
+93 ;;^UTILITY(U,$J,358.3,33772,1,4,0)
+94 ;;=4^L30.1
+95 ;;^UTILITY(U,$J,358.3,33772,2)
+96 ;;=^5009154
+97 ;;^UTILITY(U,$J,358.3,33773,0)
+98 ;;=L30.2^^105^1423^135
+99 ;;^UTILITY(U,$J,358.3,33773,1,0)
+100 ;;=^358.31IA^4^2
+101 ;;^UTILITY(U,$J,358.3,33773,1,3,0)
+102 ;;=3^Cutaneous Autosensitization
+103 ;;^UTILITY(U,$J,358.3,33773,1,4,0)
+104 ;;=4^L30.2
+105 ;;^UTILITY(U,$J,358.3,33773,2)
+106 ;;=^5009155
+107 ;;^UTILITY(U,$J,358.3,33774,0)
+108 ;;=L30.4^^105^1423^147
+109 ;;^UTILITY(U,$J,358.3,33774,1,0)
+110 ;;=^358.31IA^4^2
+111 ;;^UTILITY(U,$J,358.3,33774,1,3,0)
+112 ;;=3^Erythema Intertrigo
+113 ;;^UTILITY(U,$J,358.3,33774,1,4,0)
+114 ;;=4^L30.4
+115 ;;^UTILITY(U,$J,358.3,33774,2)
+116 ;;=^5009157
+117 ;;^UTILITY(U,$J,358.3,33775,0)
+118 ;;=L30.8^^105^1423^138
+119 ;;^UTILITY(U,$J,358.3,33775,1,0)
+120 ;;=^358.31IA^4^2
+121 ;;^UTILITY(U,$J,358.3,33775,1,3,0)
+122 ;;=3^Dermatitis NEC
+123 ;;^UTILITY(U,$J,358.3,33775,1,4,0)
+124 ;;=4^L30.8
+125 ;;^UTILITY(U,$J,358.3,33775,2)
+126 ;;=^5009158
+127 ;;^UTILITY(U,$J,358.3,33776,0)
+128 ;;=L30.9^^105^1423^139
+129 ;;^UTILITY(U,$J,358.3,33776,1,0)
+130 ;;=^358.31IA^4^2
+131 ;;^UTILITY(U,$J,358.3,33776,1,3,0)
+132 ;;=3^Dermatitis,Unspec
+133 ;;^UTILITY(U,$J,358.3,33776,1,4,0)
+134 ;;=4^L30.9
+135 ;;^UTILITY(U,$J,358.3,33776,2)
+136 ;;=^5009159
+137 ;;^UTILITY(U,$J,358.3,33777,0)
+138 ;;=L40.0^^105^1423^293
+139 ;;^UTILITY(U,$J,358.3,33777,1,0)
+140 ;;=^358.31IA^4^2
+141 ;;^UTILITY(U,$J,358.3,33777,1,3,0)
+142 ;;=3^Psoriasis Vulgaris
+143 ;;^UTILITY(U,$J,358.3,33777,1,4,0)
+144 ;;=4^L40.0
+145 ;;^UTILITY(U,$J,358.3,33777,2)
+146 ;;=^5009160
+147 ;;^UTILITY(U,$J,358.3,33778,0)
+148 ;;=L40.1^^105^1423^296
+149 ;;^UTILITY(U,$J,358.3,33778,1,0)
+150 ;;=^358.31IA^4^2
+151 ;;^UTILITY(U,$J,358.3,33778,1,3,0)
+152 ;;=3^Pustulosis Psoriasis,Generalized
+153 ;;^UTILITY(U,$J,358.3,33778,1,4,0)
+154 ;;=4^L40.1
+155 ;;^UTILITY(U,$J,358.3,33778,2)
+156 ;;=^5009161
+157 ;;^UTILITY(U,$J,358.3,33779,0)
+158 ;;=L40.2^^105^1423^12
+159 ;;^UTILITY(U,$J,358.3,33779,1,0)
+160 ;;=^358.31IA^4^2
+161 ;;^UTILITY(U,$J,358.3,33779,1,3,0)
+162 ;;=3^Acrodermatitis Continua
+163 ;;^UTILITY(U,$J,358.3,33779,1,4,0)
+164 ;;=4^L40.2
+165 ;;^UTILITY(U,$J,358.3,33779,2)
+166 ;;=^5009162
+167 ;;^UTILITY(U,$J,358.3,33780,0)
+168 ;;=L40.3^^105^1423^295
+169 ;;^UTILITY(U,$J,358.3,33780,1,0)
+170 ;;=^358.31IA^4^2
+171 ;;^UTILITY(U,$J,358.3,33780,1,3,0)
+172 ;;=3^Pustulosis Palmaris et Plantaris
+173 ;;^UTILITY(U,$J,358.3,33780,1,4,0)
+174 ;;=4^L40.3
+175 ;;^UTILITY(U,$J,358.3,33780,2)
+176 ;;=^5009163
+177 ;;^UTILITY(U,$J,358.3,33781,0)
+178 ;;=L40.4^^105^1423^160
+179 ;;^UTILITY(U,$J,358.3,33781,1,0)
+180 ;;=^358.31IA^4^2
+181 ;;^UTILITY(U,$J,358.3,33781,1,3,0)
+182 ;;=3^Guttate Psoriasis
+183 ;;^UTILITY(U,$J,358.3,33781,1,4,0)
+184 ;;=4^L40.4
+185 ;;^UTILITY(U,$J,358.3,33781,2)
+186 ;;=^5009164
+187 ;;^UTILITY(U,$J,358.3,33782,0)
+188 ;;=L40.8^^105^1423^292
+189 ;;^UTILITY(U,$J,358.3,33782,1,0)
+190 ;;=^358.31IA^4^2
+191 ;;^UTILITY(U,$J,358.3,33782,1,3,0)
+192 ;;=3^Psoriasis NEC
+193 ;;^UTILITY(U,$J,358.3,33782,1,4,0)
+194 ;;=4^L40.8
+195 ;;^UTILITY(U,$J,358.3,33782,2)
+196 ;;=^271917
+197 ;;^UTILITY(U,$J,358.3,33783,0)
+198 ;;=L40.9^^105^1423^294
+199 ;;^UTILITY(U,$J,358.3,33783,1,0)
+200 ;;=^358.31IA^4^2
+201 ;;^UTILITY(U,$J,358.3,33783,1,3,0)
+202 ;;=3^Psoriasis,Unspec
+203 ;;^UTILITY(U,$J,358.3,33783,1,4,0)
+204 ;;=4^L40.9
+205 ;;^UTILITY(U,$J,358.3,33783,2)
+206 ;;=^5009171
+207 ;;^UTILITY(U,$J,358.3,33784,0)
+208 ;;=L50.9^^105^1423^326
+209 ;;^UTILITY(U,$J,358.3,33784,1,0)
+210 ;;=^358.31IA^4^2
+211 ;;^UTILITY(U,$J,358.3,33784,1,3,0)
+212 ;;=3^Urticaria,Unspec
+213 ;;^UTILITY(U,$J,358.3,33784,1,4,0)
+214 ;;=4^L50.9
+215 ;;^UTILITY(U,$J,358.3,33784,2)
+216 ;;=^5009204
+217 ;;^UTILITY(U,$J,358.3,33785,0)
+218 ;;=L53.8^^105^1423^150
+219 ;;^UTILITY(U,$J,358.3,33785,1,0)
+220 ;;=^358.31IA^4^2
+221 ;;^UTILITY(U,$J,358.3,33785,1,3,0)
+222 ;;=3^Erythematous Conditions NEC
+223 ;;^UTILITY(U,$J,358.3,33785,1,4,0)
+224 ;;=4^L53.8
+225 ;;^UTILITY(U,$J,358.3,33785,2)
+226 ;;=^88044
+227 ;;^UTILITY(U,$J,358.3,33786,0)
+228 ;;=L53.9^^105^1423^149
+229 ;;^UTILITY(U,$J,358.3,33786,1,0)
+230 ;;=^358.31IA^4^2
+231 ;;^UTILITY(U,$J,358.3,33786,1,3,0)
+232 ;;=3^Erythematous Condition,Unspec
+233 ;;^UTILITY(U,$J,358.3,33786,1,4,0)
+234 ;;=4^L53.9
+235 ;;^UTILITY(U,$J,358.3,33786,2)
+236 ;;=^5009210
+237 ;;^UTILITY(U,$J,358.3,33787,0)
+238 ;;=L54.^^105^1423^148
+239 ;;^UTILITY(U,$J,358.3,33787,1,0)
+240 ;;=^358.31IA^4^2
+241 ;;^UTILITY(U,$J,358.3,33787,1,3,0)
+242 ;;=3^Erythema in Diseases Classified Elsewhere
+243 ;;^UTILITY(U,$J,358.3,33787,1,4,0)
+244 ;;=4^L54.
+245 ;;^UTILITY(U,$J,358.3,33787,2)
+246 ;;=^5009211
+247 ;;^UTILITY(U,$J,358.3,33788,0)
+248 ;;=L56.0^^105^1423^142
+249 ;;^UTILITY(U,$J,358.3,33788,1,0)
+250 ;;=^358.31IA^4^2
+251 ;;^UTILITY(U,$J,358.3,33788,1,3,0)
+252 ;;=3^Drug Phototoxic Response
+253 ;;^UTILITY(U,$J,358.3,33788,1,4,0)
+254 ;;=4^L56.0
+255 ;;^UTILITY(U,$J,358.3,33788,2)
+256 ;;=^5009214
+257 ;;^UTILITY(U,$J,358.3,33789,0)
+258 ;;=L56.1^^105^1423^141
+259 ;;^UTILITY(U,$J,358.3,33789,1,0)
+260 ;;=^358.31IA^4^2
+261 ;;^UTILITY(U,$J,358.3,33789,1,3,0)
+262 ;;=3^Drug Photoallergic Response
+263 ;;^UTILITY(U,$J,358.3,33789,1,4,0)
+264 ;;=4^L56.1
+265 ;;^UTILITY(U,$J,358.3,33789,2)
+266 ;;=^5009215
+267 ;;^UTILITY(U,$J,358.3,33790,0)
+268 ;;=L56.2^^105^1423^274
+269 ;;^UTILITY(U,$J,358.3,33790,1,0)
+270 ;;=^358.31IA^4^2
+271 ;;^UTILITY(U,$J,358.3,33790,1,3,0)
+272 ;;=3^Photocontact Dermatitis
+273 ;;^UTILITY(U,$J,358.3,33790,1,4,0)
+274 ;;=4^L56.2
+275 ;;^UTILITY(U,$J,358.3,33790,2)
+276 ;;=^5009216
+277 ;;^UTILITY(U,$J,358.3,33791,0)
+278 ;;=L56.3^^105^1423^308
+279 ;;^UTILITY(U,$J,358.3,33791,1,0)
+280 ;;=^358.31IA^4^2
+281 ;;^UTILITY(U,$J,358.3,33791,1,3,0)
+282 ;;=3^Solar Urticaria
+283 ;;^UTILITY(U,$J,358.3,33791,1,4,0)
+284 ;;=4^L56.3
+285 ;;^UTILITY(U,$J,358.3,33791,2)
+286 ;;=^5009217
+287 ;;^UTILITY(U,$J,358.3,33792,0)
+288 ;;=L57.0^^105^1423^13
+289 ;;^UTILITY(U,$J,358.3,33792,1,0)
+290 ;;=^358.31IA^4^2
+291 ;;^UTILITY(U,$J,358.3,33792,1,3,0)
+292 ;;=3^Actinic Keratosis
+293 ;;^UTILITY(U,$J,358.3,33792,1,4,0)
+294 ;;=4^L57.0
+295 ;;^UTILITY(U,$J,358.3,33792,2)
+296 ;;=^66900
+297 ;;^UTILITY(U,$J,358.3,33793,0)
+298 ;;=L60.0^^105^1423^164
+299 ;;^UTILITY(U,$J,358.3,33793,1,0)
+300 ;;=^358.31IA^4^2
+301 ;;^UTILITY(U,$J,358.3,33793,1,3,0)
+302 ;;=3^Ingrowing Nail
+303 ;;^UTILITY(U,$J,358.3,33793,1,4,0)
+304 ;;=4^L60.0
+305 ;;^UTILITY(U,$J,358.3,33793,2)
+306 ;;=^5009234
+307 ;;^UTILITY(U,$J,358.3,33794,0)
+308 ;;=L60.1^^105^1423^272
+309 ;;^UTILITY(U,$J,358.3,33794,1,0)
+310 ;;=^358.31IA^4^2
+311 ;;^UTILITY(U,$J,358.3,33794,1,3,0)
+312 ;;=3^Onycholysis
+313 ;;^UTILITY(U,$J,358.3,33794,1,4,0)
+314 ;;=4^L60.1
+315 ;;^UTILITY(U,$J,358.3,33794,2)
+316 ;;=^186837
+317 ;;^UTILITY(U,$J,358.3,33795,0)
+318 ;;=L60.2^^105^1423^271
+319 ;;^UTILITY(U,$J,358.3,33795,1,0)
+320 ;;=^358.31IA^4^2
+321 ;;^UTILITY(U,$J,358.3,33795,1,3,0)
+322 ;;=3^Onychogryphosis
+323 ;;^UTILITY(U,$J,358.3,33795,1,4,0)
+324 ;;=4^L60.2
+325 ;;^UTILITY(U,$J,358.3,33795,2)
+326 ;;=^5009235
+327 ;;^UTILITY(U,$J,358.3,33796,0)
+328 ;;=L60.3^^105^1423^176
+329 ;;^UTILITY(U,$J,358.3,33796,1,0)
+330 ;;=^358.31IA^4^2
+331 ;;^UTILITY(U,$J,358.3,33796,1,3,0)
+332 ;;=3^Nail Dystrophy
+333 ;;^UTILITY(U,$J,358.3,33796,1,4,0)
+334 ;;=4^L60.3
+335 ;;^UTILITY(U,$J,358.3,33796,2)
+336 ;;=^5009236
+337 ;;^UTILITY(U,$J,358.3,33797,0)
+338 ;;=L60.4^^105^1423^89
+339 ;;^UTILITY(U,$J,358.3,33797,1,0)
+340 ;;=^358.31IA^4^2
+341 ;;^UTILITY(U,$J,358.3,33797,1,3,0)
+342 ;;=3^Beau's Lines
+343 ;;^UTILITY(U,$J,358.3,33797,1,4,0)
+344 ;;=4^L60.4
+345 ;;^UTILITY(U,$J,358.3,33797,2)
+346 ;;=^5009237
+347 ;;^UTILITY(U,$J,358.3,33798,0)
+348 ;;=L60.5^^105^1423^330
+349 ;;^UTILITY(U,$J,358.3,33798,1,0)
+350 ;;=^358.31IA^4^2
+351 ;;^UTILITY(U,$J,358.3,33798,1,3,0)
+352 ;;=3^Yellow Nail Syndrome
+353 ;;^UTILITY(U,$J,358.3,33798,1,4,0)
+354 ;;=4^L60.5
+355 ;;^UTILITY(U,$J,358.3,33798,2)
+356 ;;=^5009238
+357 ;;^UTILITY(U,$J,358.3,33799,0)
+358 ;;=L60.8^^105^1423^174
+359 ;;^UTILITY(U,$J,358.3,33799,1,0)
+360 ;;=^358.31IA^4^2
+361 ;;^UTILITY(U,$J,358.3,33799,1,3,0)
+362 ;;=3^Nail Disorders NEC
+363 ;;^UTILITY(U,$J,358.3,33799,1,4,0)
+364 ;;=4^L60.8
+365 ;;^UTILITY(U,$J,358.3,33799,2)
+366 ;;=^5009239
+367 ;;^UTILITY(U,$J,358.3,33800,0)
+368 ;;=L62.^^105^1423^175
+369 ;;^UTILITY(U,$J,358.3,33800,1,0)
+370 ;;=^358.31IA^4^2
+371 ;;^UTILITY(U,$J,358.3,33800,1,3,0)
+372 ;;=3^Nail Disorders in Diseases Classified Elsewhere
+373 ;;^UTILITY(U,$J,358.3,33800,1,4,0)
+374 ;;=4^L62.
+375 ;;^UTILITY(U,$J,358.3,33800,2)
+376 ;;=^5009241
+377 ;;^UTILITY(U,$J,358.3,33801,0)
+378 ;;=L64.9^^105^1423^34
+379 ;;^UTILITY(U,$J,358.3,33801,1,0)
+380 ;;=^358.31IA^4^2
+381 ;;^UTILITY(U,$J,358.3,33801,1,3,0)
+382 ;;=3^Androgenic Alopecia,Unspec
+383 ;;^UTILITY(U,$J,358.3,33801,1,4,0)
+384 ;;=4^L64.9
+385 ;;^UTILITY(U,$J,358.3,33801,2)
+386 ;;=^5009249
+387 ;;^UTILITY(U,$J,358.3,33802,0)
+388 ;;=L65.9^^105^1423^269
+389 ;;^UTILITY(U,$J,358.3,33802,1,0)
+390 ;;=^358.31IA^4^2
+391 ;;^UTILITY(U,$J,358.3,33802,1,3,0)
+392 ;;=3^Nonscarring Hair Loss,Unspec
+393 ;;^UTILITY(U,$J,358.3,33802,1,4,0)
+394 ;;=4^L65.9
+395 ;;^UTILITY(U,$J,358.3,33802,2)
+396 ;;=^5009252
+397 ;;^UTILITY(U,$J,358.3,33803,0)
+398 ;;=L70.0^^105^1423^7
+399 ;;^UTILITY(U,$J,358.3,33803,1,0)
+400 ;;=^358.31IA^4^2
+401 ;;^UTILITY(U,$J,358.3,33803,1,3,0)
+402 ;;=3^Acne Vulgaris
+403 ;;^UTILITY(U,$J,358.3,33803,1,4,0)
+404 ;;=4^L70.0
+405 ;;^UTILITY(U,$J,358.3,33803,2)
+406 ;;=^5009268
+407 ;;^UTILITY(U,$J,358.3,33804,0)
+408 ;;=L70.1^^105^1423^2
+409 ;;^UTILITY(U,$J,358.3,33804,1,0)
+410 ;;=^358.31IA^4^2
+411 ;;^UTILITY(U,$J,358.3,33804,1,3,0)
+412 ;;=3^Acne Conglobata
+413 ;;^UTILITY(U,$J,358.3,33804,1,4,0)
+414 ;;=4^L70.1
+415 ;;^UTILITY(U,$J,358.3,33804,2)
+416 ;;=^5009269
+417 ;;^UTILITY(U,$J,358.3,33805,0)
+418 ;;=L70.3^^105^1423^6
+419 ;;^UTILITY(U,$J,358.3,33805,1,0)
+420 ;;=^358.31IA^4^2
+421 ;;^UTILITY(U,$J,358.3,33805,1,3,0)
+422 ;;=3^Acne Tropica
+423 ;;^UTILITY(U,$J,358.3,33805,1,4,0)
+424 ;;=4^L70.3
+425 ;;^UTILITY(U,$J,358.3,33805,2)
+426 ;;=^5009270
+427 ;;^UTILITY(U,$J,358.3,33806,0)
+428 ;;=L70.5^^105^1423^3
+429 ;;^UTILITY(U,$J,358.3,33806,1,0)
+430 ;;=^358.31IA^4^2
+431 ;;^UTILITY(U,$J,358.3,33806,1,3,0)
+432 ;;=3^Acne Excoriee des Jeunes Filles
+433 ;;^UTILITY(U,$J,358.3,33806,1,4,0)
+434 ;;=4^L70.5
+435 ;;^UTILITY(U,$J,358.3,33806,2)
+436 ;;=^5009272
+437 ;;^UTILITY(U,$J,358.3,33807,0)
+438 ;;=L70.8^^105^1423^5
+439 ;;^UTILITY(U,$J,358.3,33807,1,0)
+440 ;;=^358.31IA^4^2
+441 ;;^UTILITY(U,$J,358.3,33807,1,3,0)
+442 ;;=3^Acne NEC
+443 ;;^UTILITY(U,$J,358.3,33807,1,4,0)
+444 ;;=4^L70.8
+445 ;;^UTILITY(U,$J,358.3,33807,2)
+446 ;;=^87239
+447 ;;^UTILITY(U,$J,358.3,33808,0)
+448 ;;=L70.9^^105^1423^8
+449 ;;^UTILITY(U,$J,358.3,33808,1,0)
+450 ;;=^358.31IA^4^2
+451 ;;^UTILITY(U,$J,358.3,33808,1,3,0)
+452 ;;=3^Acne,Unspec
+453 ;;^UTILITY(U,$J,358.3,33808,1,4,0)
+454 ;;=4^L70.9
+455 ;;^UTILITY(U,$J,358.3,33808,2)
+456 ;;=^5009273
+457 ;;^UTILITY(U,$J,358.3,33809,0)
+458 ;;=L71.0^^105^1423^273
+459 ;;^UTILITY(U,$J,358.3,33809,1,0)
+460 ;;=^358.31IA^4^2
+461 ;;^UTILITY(U,$J,358.3,33809,1,3,0)
+462 ;;=3^Perioral Dermatitis
+463 ;;^UTILITY(U,$J,358.3,33809,1,4,0)
+464 ;;=4^L71.0
+465 ;;^UTILITY(U,$J,358.3,33809,2)
+466 ;;=^5009274
+467 ;;^UTILITY(U,$J,358.3,33810,0)
+468 ;;=L71.1^^105^1423^299
+469 ;;^UTILITY(U,$J,358.3,33810,1,0)
+470 ;;=^358.31IA^4^2
+471 ;;^UTILITY(U,$J,358.3,33810,1,3,0)
+472 ;;=3^Rhinophyma
+473 ;;^UTILITY(U,$J,358.3,33810,1,4,0)
+474 ;;=4^L71.1
+475 ;;^UTILITY(U,$J,358.3,33810,2)
+476 ;;=^106083
+477 ;;^UTILITY(U,$J,358.3,33811,0)
+478 ;;=L71.8^^105^1423^300
+479 ;;^UTILITY(U,$J,358.3,33811,1,0)
+480 ;;=^358.31IA^4^2
+481 ;;^UTILITY(U,$J,358.3,33811,1,3,0)
+482 ;;=3^Rosacea NEC
+483 ;;^UTILITY(U,$J,358.3,33811,1,4,0)
+484 ;;=4^L71.8
+485 ;;^UTILITY(U,$J,358.3,33811,2)
+486 ;;=^5009275
+487 ;;^UTILITY(U,$J,358.3,33812,0)
+488 ;;=L71.9^^105^1423^301
+489 ;;^UTILITY(U,$J,358.3,33812,1,0)
+490 ;;=^358.31IA^4^2
+491 ;;^UTILITY(U,$J,358.3,33812,1,3,0)
+492 ;;=3^Rosacea,Unspec
+493 ;;^UTILITY(U,$J,358.3,33812,1,4,0)
+494 ;;=4^L71.9
+495 ;;^UTILITY(U,$J,358.3,33812,2)
+496 ;;=^5009276
+497 ;;^UTILITY(U,$J,358.3,33813,0)
+498 ;;=L72.0^^105^1423^145
+499 ;;^UTILITY(U,$J,358.3,33813,1,0)
+500 ;;=^358.31IA^4^2
+501 ;;^UTILITY(U,$J,358.3,33813,1,3,0)
+502 ;;=3^Epidermal Cyst
+503 ;;^UTILITY(U,$J,358.3,33813,1,4,0)
+504 ;;=4^L72.0
+505 ;;^UTILITY(U,$J,358.3,33813,2)
+506 ;;=^5009277
+507 ;;^UTILITY(U,$J,358.3,33814,0)
+508 ;;=L72.12^^105^1423^325
+509 ;;^UTILITY(U,$J,358.3,33814,1,0)
+510 ;;=^358.31IA^4^2
+511 ;;^UTILITY(U,$J,358.3,33814,1,3,0)
+512 ;;=3^Trichodermal Cyst
+513 ;;^UTILITY(U,$J,358.3,33814,1,4,0)
+514 ;;=4^L72.12
+515 ;;^UTILITY(U,$J,358.3,33814,2)
+516 ;;=^5009279
+517 ;;^UTILITY(U,$J,358.3,33815,0)
+518 ;;=L72.2^^105^1423^310
+519 ;;^UTILITY(U,$J,358.3,33815,1,0)
+520 ;;=^358.31IA^4^2
+521 ;;^UTILITY(U,$J,358.3,33815,1,3,0)
+522 ;;=3^Steatocystoma Multiplex
+523 ;;^UTILITY(U,$J,358.3,33815,1,4,0)
+524 ;;=4^L72.2
+525 ;;^UTILITY(U,$J,358.3,33815,2)
+526 ;;=^5009280
+527 ;;^UTILITY(U,$J,358.3,33816,0)
+528 ;;=L72.8^^105^1423^154
+529 ;;^UTILITY(U,$J,358.3,33816,1,0)
+530 ;;=^358.31IA^4^2
+531 ;;^UTILITY(U,$J,358.3,33816,1,3,0)
+532 ;;=3^Follicular Cysts of Skin/Subcutaneous Tissue NEC
+533 ;;^UTILITY(U,$J,358.3,33816,1,4,0)
+534 ;;=4^L72.8
+535 ;;^UTILITY(U,$J,358.3,33816,2)
+536 ;;=^5009282
+537 ;;^UTILITY(U,$J,358.3,33817,0)
+538 ;;=L72.9^^105^1423^155
+539 ;;^UTILITY(U,$J,358.3,33817,1,0)
+540 ;;=^358.31IA^4^2
+541 ;;^UTILITY(U,$J,358.3,33817,1,3,0)
+542 ;;=3^Follicular Cysts of Skin/Subcutaneous Tissue,Unspec
+543 ;;^UTILITY(U,$J,358.3,33817,1,4,0)
+544 ;;=4^L72.9
+545 ;;^UTILITY(U,$J,358.3,33817,2)
+546 ;;=^5009283
+547 ;;^UTILITY(U,$J,358.3,33818,0)
+548 ;;=L73.0^^105^1423^4
+549 ;;^UTILITY(U,$J,358.3,33818,1,0)
+550 ;;=^358.31IA^4^2
+551 ;;^UTILITY(U,$J,358.3,33818,1,3,0)
+552 ;;=3^Acne Keloid
+553 ;;^UTILITY(U,$J,358.3,33818,1,4,0)
+554 ;;=4^L73.0
+555 ;;^UTILITY(U,$J,358.3,33818,2)
+556 ;;=^2149
+557 ;;^UTILITY(U,$J,358.3,33819,0)
+558 ;;=L73.2^^105^1423^162
+559 ;;^UTILITY(U,$J,358.3,33819,1,0)
+560 ;;=^358.31IA^4^2
+561 ;;^UTILITY(U,$J,358.3,33819,1,3,0)
+562 ;;=3^Hidradenitis Suppurativa
+563 ;;^UTILITY(U,$J,358.3,33819,1,4,0)
+564 ;;=4^L73.2
+565 ;;^UTILITY(U,$J,358.3,33819,2)
+566 ;;=^278979
+567 ;;^UTILITY(U,$J,358.3,33820,0)
+568 ;;=L73.9^^105^1423^156
+569 ;;^UTILITY(U,$J,358.3,33820,1,0)
+570 ;;=^358.31IA^4^2
+571 ;;^UTILITY(U,$J,358.3,33820,1,3,0)
+572 ;;=3^Follicular Disorder,Unspec
+573 ;;^UTILITY(U,$J,358.3,33820,1,4,0)
+574 ;;=4^L73.9
+575 ;;^UTILITY(U,$J,358.3,33820,2)
+576 ;;=^5009286
+577 ;;^UTILITY(U,$J,358.3,33821,0)
+578 ;;=L82.0^^105^1423^163
+579 ;;^UTILITY(U,$J,358.3,33821,1,0)
+580 ;;=^358.31IA^4^2
+581 ;;^UTILITY(U,$J,358.3,33821,1,3,0)
+582 ;;=3^Inflamed Seborrheic Keratosis
+583 ;;^UTILITY(U,$J,358.3,33821,1,4,0)
+584 ;;=4^L82.0
+585 ;;^UTILITY(U,$J,358.3,33821,2)
+586 ;;=^303311
+587 ;;^UTILITY(U,$J,358.3,33822,0)
+588 ;;=L82.1^^105^1423^304
+589 ;;^UTILITY(U,$J,358.3,33822,1,0)
+590 ;;=^358.31IA^4^2
+591 ;;^UTILITY(U,$J,358.3,33822,1,3,0)
+592 ;;=3^Seborrheic Keratosis NEC
+593 ;;^UTILITY(U,$J,358.3,33822,1,4,0)
+594 ;;=4^L82.1
+595 ;;^UTILITY(U,$J,358.3,33822,2)
+596 ;;=^303312
+597 ;;^UTILITY(U,$J,358.3,33823,0)
+598 ;;=L84.^^105^1423^118
+599 ;;^UTILITY(U,$J,358.3,33823,1,0)
+600 ;;=^358.31IA^4^2
+601 ;;^UTILITY(U,$J,358.3,33823,1,3,0)
+602 ;;=3^Corns and Callosities
+603 ;;^UTILITY(U,$J,358.3,33823,1,4,0)
+604 ;;=4^L84.
+605 ;;^UTILITY(U,$J,358.3,33823,2)
+606 ;;=^271920
+607 ;;^UTILITY(U,$J,358.3,33824,0)
+608 ;;=L85.0^^105^1423^9
+609 ;;^UTILITY(U,$J,358.3,33824,1,0)
+610 ;;=^358.31IA^4^2
+611 ;;^UTILITY(U,$J,358.3,33824,1,3,0)
+612 ;;=3^Acquired Ichthyosis
+613 ;;^UTILITY(U,$J,358.3,33824,1,4,0)
+614 ;;=4^L85.0
+615 ;;^UTILITY(U,$J,358.3,33824,2)
+616 ;;=^5009320
+617 ;;^UTILITY(U,$J,358.3,33825,0)
+618 ;;=L85.1^^105^1423^11
+619 ;;^UTILITY(U,$J,358.3,33825,1,0)
+620 ;;=^358.31IA^4^2
+621 ;;^UTILITY(U,$J,358.3,33825,1,3,0)
+622 ;;=3^Acquired Keratosis Palmaris et Plantaris
+623 ;;^UTILITY(U,$J,358.3,33825,1,4,0)
+624 ;;=4^L85.1
+625 ;;^UTILITY(U,$J,358.3,33825,2)
+626 ;;=^5009321
+627 ;;^UTILITY(U,$J,358.3,33826,0)
+628 ;;=L85.2^^105^1423^169
+629 ;;^UTILITY(U,$J,358.3,33826,1,0)
+630 ;;=^358.31IA^4^2
+631 ;;^UTILITY(U,$J,358.3,33826,1,3,0)
+632 ;;=3^Keratosis Punctata
+633 ;;^UTILITY(U,$J,358.3,33826,1,4,0)
+634 ;;=4^L85.2
+635 ;;^UTILITY(U,$J,358.3,33826,2)
+636 ;;=^5009322
+637 ;;^UTILITY(U,$J,358.3,33827,0)
+638 ;;=L85.3^^105^1423^329
+639 ;;^UTILITY(U,$J,358.3,33827,1,0)
+640 ;;=^358.31IA^4^2
+641 ;;^UTILITY(U,$J,358.3,33827,1,3,0)
+642 ;;=3^Xerosis Cutis
+643 ;;^UTILITY(U,$J,358.3,33827,1,4,0)
+644 ;;=4^L85.3
+645 ;;^UTILITY(U,$J,358.3,33827,2)
+646 ;;=^5009323
+647 ;;^UTILITY(U,$J,358.3,33828,0)
+648 ;;=L86.^^105^1423^167
+649 ;;^UTILITY(U,$J,358.3,33828,1,0)
+650 ;;=^358.31IA^4^2
+651 ;;^UTILITY(U,$J,358.3,33828,1,3,0)
+652 ;;=3^Keratoderma in Diseases Classified Elsewhere
+653 ;;^UTILITY(U,$J,358.3,33828,1,4,0)
+654 ;;=4^L86.
+655 ;;^UTILITY(U,$J,358.3,33828,2)
+656 ;;=^5009326
+657 ;;^UTILITY(U,$J,358.3,33829,0)
+658 ;;=L87.0^^105^1423^168
+659 ;;^UTILITY(U,$J,358.3,33829,1,0)
+660 ;;=^358.31IA^4^2
+661 ;;^UTILITY(U,$J,358.3,33829,1,3,0)
+662 ;;=3^Keratosis Follicularis et Parafollicularis in Cutem Penetrans
+663 ;;^UTILITY(U,$J,358.3,33829,1,4,0)
+664 ;;=4^L87.0
+665 ;;^UTILITY(U,$J,358.3,33829,2)
+666 ;;=^5009327
+667 ;;^UTILITY(U,$J,358.3,33830,0)
+668 ;;=L87.2^^105^1423^144
+669 ;;^UTILITY(U,$J,358.3,33830,1,0)
+670 ;;=^358.31IA^4^2
+671 ;;^UTILITY(U,$J,358.3,33830,1,3,0)
+672 ;;=3^Elastosis Perforans Serpiginosa
+673 ;;^UTILITY(U,$J,358.3,33830,1,4,0)
+674 ;;=4^L87.2
+675 ;;^UTILITY(U,$J,358.3,33830,2)
+676 ;;=^5009329
+677 ;;^UTILITY(U,$J,358.3,33831,0)
+678 ;;=L89.300^^105^1423^282
+679 ;;^UTILITY(U,$J,358.3,33831,1,0)
+680 ;;=^358.31IA^4^2
+681 ;;^UTILITY(U,$J,358.3,33831,1,3,0)
+682 ;;=3^Pressure Ulcer of Buttock,Unstageable
+683 ;;^UTILITY(U,$J,358.3,33831,1,4,0)
+684 ;;=4^L89.300
+685 ;;^UTILITY(U,$J,358.3,33831,2)
+686 ;;=^5009389
+687 ;;^UTILITY(U,$J,358.3,33832,0)
+688 ;;=L89.301^^105^1423^277
+689 ;;^UTILITY(U,$J,358.3,33832,1,0)
+690 ;;=^358.31IA^4^2
+691 ;;^UTILITY(U,$J,358.3,33832,1,3,0)
+692 ;;=3^Pressure Ulcer of Buttock,Stage 1
+693 ;;^UTILITY(U,$J,358.3,33832,1,4,0)
+694 ;;=4^L89.301
+695 ;;^UTILITY(U,$J,358.3,33832,2)
+696 ;;=^5009390
+697 ;;^UTILITY(U,$J,358.3,33833,0)
+698 ;;=L89.302^^105^1423^278
+699 ;;^UTILITY(U,$J,358.3,33833,1,0)
+700 ;;=^358.31IA^4^2
+701 ;;^UTILITY(U,$J,358.3,33833,1,3,0)
+702 ;;=3^Pressure Ulcer of Buttock,Stage 2
+703 ;;^UTILITY(U,$J,358.3,33833,1,4,0)
+704 ;;=4^L89.302