IBDEI0CR ; ; 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,32011,1,3,0)
;;=3^Melanocytic Nevi of Left Upper Limb
;;^UTILITY(U,$J,358.3,32011,1,4,0)
;;=4^D22.62
;;^UTILITY(U,$J,358.3,32011,2)
;;=^5002054
;;^UTILITY(U,$J,358.3,32012,0)
;;=D22.71^^97^1317^46
;;^UTILITY(U,$J,358.3,32012,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32012,1,3,0)
;;=3^Melanocytic Nevi of Right Lower Limb
;;^UTILITY(U,$J,358.3,32012,1,4,0)
;;=4^D22.71
;;^UTILITY(U,$J,358.3,32012,2)
;;=^5002056
;;^UTILITY(U,$J,358.3,32013,0)
;;=D22.72^^97^1317^40
;;^UTILITY(U,$J,358.3,32013,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32013,1,3,0)
;;=3^Melanocytic Nevi of Left Lower Limb
;;^UTILITY(U,$J,358.3,32013,1,4,0)
;;=4^D22.72
;;^UTILITY(U,$J,358.3,32013,2)
;;=^5002057
;;^UTILITY(U,$J,358.3,32014,0)
;;=C44.390^^97^1317^36
;;^UTILITY(U,$J,358.3,32014,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32014,1,3,0)
;;=3^Malig Neop Skin of Unspec Part of Face
;;^UTILITY(U,$J,358.3,32014,1,4,0)
;;=4^C44.390
;;^UTILITY(U,$J,358.3,32014,2)
;;=^5001049
;;^UTILITY(U,$J,358.3,32015,0)
;;=L81.1^^97^1317^70
;;^UTILITY(U,$J,358.3,32015,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32015,1,3,0)
;;=3^Melasma
;;^UTILITY(U,$J,358.3,32015,1,4,0)
;;=4^L81.1
;;^UTILITY(U,$J,358.3,32015,2)
;;=^5009311
;;^UTILITY(U,$J,358.3,32016,0)
;;=L72.0^^97^1317^90
;;^UTILITY(U,$J,358.3,32016,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32016,1,3,0)
;;=3^Milium
;;^UTILITY(U,$J,358.3,32016,1,4,0)
;;=4^L72.0
;;^UTILITY(U,$J,358.3,32016,2)
;;=^5009277
;;^UTILITY(U,$J,358.3,32017,0)
;;=C4A.51^^97^1317^74
;;^UTILITY(U,$J,358.3,32017,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32017,1,3,0)
;;=3^Merkle Cell CA,Anal Skin
;;^UTILITY(U,$J,358.3,32017,1,4,0)
;;=4^C4A.51
;;^UTILITY(U,$J,358.3,32017,2)
;;=^5001148
;;^UTILITY(U,$J,358.3,32018,0)
;;=C4A.52^^97^1317^75
;;^UTILITY(U,$J,358.3,32018,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32018,1,3,0)
;;=3^Merkle Cell CA,Breast Skin
;;^UTILITY(U,$J,358.3,32018,1,4,0)
;;=4^C4A.52
;;^UTILITY(U,$J,358.3,32018,2)
;;=^5001149
;;^UTILITY(U,$J,358.3,32019,0)
;;=C4A.22^^97^1317^76
;;^UTILITY(U,$J,358.3,32019,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32019,1,3,0)
;;=3^Merkle Cell CA,Left Ear & Ext Auricular Canal
;;^UTILITY(U,$J,358.3,32019,1,4,0)
;;=4^C4A.22
;;^UTILITY(U,$J,358.3,32019,2)
;;=^5001143
;;^UTILITY(U,$J,358.3,32020,0)
;;=C4A.0^^97^1317^80
;;^UTILITY(U,$J,358.3,32020,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32020,1,3,0)
;;=3^Merkle Cell CA,Lip
;;^UTILITY(U,$J,358.3,32020,1,4,0)
;;=4^C4A.0
;;^UTILITY(U,$J,358.3,32020,2)
;;=^5001137
;;^UTILITY(U,$J,358.3,32021,0)
;;=C4A.21^^97^1317^85
;;^UTILITY(U,$J,358.3,32021,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32021,1,3,0)
;;=3^Merkle Cell CA,Right Ear & Ext Auricular Canal
;;^UTILITY(U,$J,358.3,32021,1,4,0)
;;=4^C4A.21
;;^UTILITY(U,$J,358.3,32021,2)
;;=^5001142
;;^UTILITY(U,$J,358.3,32022,0)
;;=C4A.72^^97^1317^78
;;^UTILITY(U,$J,358.3,32022,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32022,1,3,0)
;;=3^Merkle Cell CA,Left Lower Limb,Incl Hip
;;^UTILITY(U,$J,358.3,32022,1,4,0)
;;=4^C4A.72
;;^UTILITY(U,$J,358.3,32022,2)
;;=^5001156
;;^UTILITY(U,$J,358.3,32023,0)
;;=C4A.62^^97^1317^79
;;^UTILITY(U,$J,358.3,32023,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32023,1,3,0)
;;=3^Merkle Cell CA,Left Upper Limb,Incl Shoulder
;;^UTILITY(U,$J,358.3,32023,1,4,0)
;;=4^C4A.62
;;^UTILITY(U,$J,358.3,32023,2)
;;=^5001153
;;^UTILITY(U,$J,358.3,32024,0)
;;=C4A.71^^97^1317^86
;;^UTILITY(U,$J,358.3,32024,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32024,1,3,0)
;;=3^Merkle Cell CA,Right Lower Limb,Incl Hip
;;^UTILITY(U,$J,358.3,32024,1,4,0)
;;=4^C4A.71
;;^UTILITY(U,$J,358.3,32024,2)
;;=^5001155
;;^UTILITY(U,$J,358.3,32025,0)
;;=C4A.61^^97^1317^87
;;^UTILITY(U,$J,358.3,32025,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32025,1,3,0)
;;=3^Merkle Cell CA,Right Upper Limb,Incl Shoulder
;;^UTILITY(U,$J,358.3,32025,1,4,0)
;;=4^C4A.61
;;^UTILITY(U,$J,358.3,32025,2)
;;=^5001152
;;^UTILITY(U,$J,358.3,32026,0)
;;=C4A.31^^97^1317^81
;;^UTILITY(U,$J,358.3,32026,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32026,1,3,0)
;;=3^Merkle Cell CA,Nose
;;^UTILITY(U,$J,358.3,32026,1,4,0)
;;=4^C4A.31
;;^UTILITY(U,$J,358.3,32026,2)
;;=^5001145
;;^UTILITY(U,$J,358.3,32027,0)
;;=C4A.39^^97^1317^83
;;^UTILITY(U,$J,358.3,32027,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32027,1,3,0)
;;=3^Merkle Cell CA,Parts of Face,Other
;;^UTILITY(U,$J,358.3,32027,1,4,0)
;;=4^C4A.39
;;^UTILITY(U,$J,358.3,32027,2)
;;=^5001146
;;^UTILITY(U,$J,358.3,32028,0)
;;=C4A.59^^97^1317^84
;;^UTILITY(U,$J,358.3,32028,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32028,1,3,0)
;;=3^Merkle Cell CA,Parts of Trunk,Other
;;^UTILITY(U,$J,358.3,32028,1,4,0)
;;=4^C4A.59
;;^UTILITY(U,$J,358.3,32028,2)
;;=^5001150
;;^UTILITY(U,$J,358.3,32029,0)
;;=C4A.8^^97^1317^82
;;^UTILITY(U,$J,358.3,32029,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32029,1,3,0)
;;=3^Merkle Cell CA,Overlapping Sites
;;^UTILITY(U,$J,358.3,32029,1,4,0)
;;=4^C4A.8
;;^UTILITY(U,$J,358.3,32029,2)
;;=^5001157
;;^UTILITY(U,$J,358.3,32030,0)
;;=C4A.9^^97^1317^88
;;^UTILITY(U,$J,358.3,32030,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32030,1,3,0)
;;=3^Merkle Cell CA,Unspec
;;^UTILITY(U,$J,358.3,32030,1,4,0)
;;=4^C4A.9
;;^UTILITY(U,$J,358.3,32030,2)
;;=^5001158
;;^UTILITY(U,$J,358.3,32031,0)
;;=C84.09^^97^1317^93
;;^UTILITY(U,$J,358.3,32031,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32031,1,3,0)
;;=3^Mycosis Fungoides,Extranodal/Solid Organ Sites
;;^UTILITY(U,$J,358.3,32031,1,4,0)
;;=4^C84.09
;;^UTILITY(U,$J,358.3,32031,2)
;;=^5001630
;;^UTILITY(U,$J,358.3,32032,0)
;;=C84.03^^97^1317^96
;;^UTILITY(U,$J,358.3,32032,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32032,1,3,0)
;;=3^Mycosis Fungoides,Intra-Abdominal Lymph Nodes
;;^UTILITY(U,$J,358.3,32032,1,4,0)
;;=4^C84.03
;;^UTILITY(U,$J,358.3,32032,2)
;;=^5001624
;;^UTILITY(U,$J,358.3,32033,0)
;;=C84.06^^97^1317^97
;;^UTILITY(U,$J,358.3,32033,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32033,1,3,0)
;;=3^Mycosis Fungoides,Intrapelvic Lymph Nodes
;;^UTILITY(U,$J,358.3,32033,1,4,0)
;;=4^C84.06
;;^UTILITY(U,$J,358.3,32033,2)
;;=^5001627
;;^UTILITY(U,$J,358.3,32034,0)
;;=C84.02^^97^1317^98
;;^UTILITY(U,$J,358.3,32034,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32034,1,3,0)
;;=3^Mycosis Fungoides,Intrathoracic Lymph Nodes
;;^UTILITY(U,$J,358.3,32034,1,4,0)
;;=4^C84.02
;;^UTILITY(U,$J,358.3,32034,2)
;;=^5001623
;;^UTILITY(U,$J,358.3,32035,0)
;;=C84.04^^97^1317^92
;;^UTILITY(U,$J,358.3,32035,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32035,1,3,0)
;;=3^Mycosis Fungoides,Axilla/Upper Limb Lymph Nodes
;;^UTILITY(U,$J,358.3,32035,1,4,0)
;;=4^C84.04
;;^UTILITY(U,$J,358.3,32035,2)
;;=^5001625
;;^UTILITY(U,$J,358.3,32036,0)
;;=C84.01^^97^1317^94
;;^UTILITY(U,$J,358.3,32036,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32036,1,3,0)
;;=3^Mycosis Fungoides,Head/Face/Neck Lymph Nodes
;;^UTILITY(U,$J,358.3,32036,1,4,0)
;;=4^C84.01
;;^UTILITY(U,$J,358.3,32036,2)
;;=^5001622
;;^UTILITY(U,$J,358.3,32037,0)
;;=C84.05^^97^1317^95
;;^UTILITY(U,$J,358.3,32037,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32037,1,3,0)
;;=3^Mycosis Fungoides,Inguinal Region/LE Lymph Nodes
;;^UTILITY(U,$J,358.3,32037,1,4,0)
;;=4^C84.05
;;^UTILITY(U,$J,358.3,32037,2)
;;=^5001626
;;^UTILITY(U,$J,358.3,32038,0)
;;=C84.08^^97^1317^99
;;^UTILITY(U,$J,358.3,32038,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32038,1,3,0)
;;=3^Mycosis Fungoides,Multiple Site Lymph Nodes
;;^UTILITY(U,$J,358.3,32038,1,4,0)
;;=4^C84.08
;;^UTILITY(U,$J,358.3,32038,2)
;;=^5001629
;;^UTILITY(U,$J,358.3,32039,0)
;;=C84.07^^97^1317^100
;;^UTILITY(U,$J,358.3,32039,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32039,1,3,0)
;;=3^Mycosis Fungoides,Spleen
;;^UTILITY(U,$J,358.3,32039,1,4,0)
;;=4^C84.07
;;^UTILITY(U,$J,358.3,32039,2)
;;=^5001628
;;^UTILITY(U,$J,358.3,32040,0)
;;=C84.00^^97^1317^101
;;^UTILITY(U,$J,358.3,32040,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32040,1,3,0)
;;=3^Mycosis Fungoides,Unspec Site
;;^UTILITY(U,$J,358.3,32040,1,4,0)
;;=4^C84.00
;;^UTILITY(U,$J,358.3,32040,2)
;;=^5001621
;;^UTILITY(U,$J,358.3,32041,0)
;;=C43.122^^97^1317^4
;;^UTILITY(U,$J,358.3,32041,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32041,1,3,0)
;;=3^Malig Melanoma of Left Lower Eyelid,Incl Canthus
;;^UTILITY(U,$J,358.3,32041,1,4,0)
;;=4^C43.122
;;^UTILITY(U,$J,358.3,32041,2)
;;=^5157252
;;^UTILITY(U,$J,358.3,32042,0)
;;=C43.121^^97^1317^6
;;^UTILITY(U,$J,358.3,32042,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32042,1,3,0)
;;=3^Malig Melanoma of Left Upper Eyelid,Incl Canthus
;;^UTILITY(U,$J,358.3,32042,1,4,0)
;;=4^C43.121
;;^UTILITY(U,$J,358.3,32042,2)
;;=^5157251
;;^UTILITY(U,$J,358.3,32043,0)
;;=C43.112^^97^1317^12
;;^UTILITY(U,$J,358.3,32043,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32043,1,3,0)
;;=3^Malig Melanoma of Right Lower Eyelid,Incl Canthus
;;^UTILITY(U,$J,358.3,32043,1,4,0)
;;=4^C43.112
;;^UTILITY(U,$J,358.3,32043,2)
;;=^5157250
;;^UTILITY(U,$J,358.3,32044,0)
;;=C43.111^^97^1317^14
;;^UTILITY(U,$J,358.3,32044,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32044,1,3,0)
;;=3^Malig Melanoma of Right Upper Eyelid,Incl Canthus
;;^UTILITY(U,$J,358.3,32044,1,4,0)
;;=4^C43.111
;;^UTILITY(U,$J,358.3,32044,2)
;;=^5157249
;;^UTILITY(U,$J,358.3,32045,0)
;;=C44.1922^^97^1317^30
;;^UTILITY(U,$J,358.3,32045,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32045,1,3,0)
;;=3^Malig Neop Skin of Right Lower Eyelid,Incl Canthus
;;^UTILITY(U,$J,358.3,32045,1,4,0)
;;=4^C44.1922
;;^UTILITY(U,$J,358.3,32045,2)
;;=^5157271
;;^UTILITY(U,$J,358.3,32046,0)
;;=C44.1921^^97^1317^32
;;^UTILITY(U,$J,358.3,32046,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32046,1,3,0)
;;=3^Malig Neop Skin of Right Upper Eyelid,Incl Canthus
;;^UTILITY(U,$J,358.3,32046,1,4,0)
;;=4^C44.1921
;;^UTILITY(U,$J,358.3,32046,2)
;;=^5157270
;;^UTILITY(U,$J,358.3,32047,0)
;;=C44.1992^^97^1317^22
;;^UTILITY(U,$J,358.3,32047,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32047,1,3,0)
;;=3^Malig Neop Skin of Left Lower Eyelid,Incl Canthus
;;^UTILITY(U,$J,358.3,32047,1,4,0)
;;=4^C44.1992
;;^UTILITY(U,$J,358.3,32047,2)
;;=^5157273
;;^UTILITY(U,$J,358.3,32048,0)
;;=C44.1991^^97^1317^24
;;^UTILITY(U,$J,358.3,32048,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32048,1,3,0)
;;=3^Malig Neop Skin of Left Upper Eyelid,Incl Canthus
;;^UTILITY(U,$J,358.3,32048,1,4,0)
;;=4^C44.1991
;;^UTILITY(U,$J,358.3,32048,2)
;;=^5157272
;;^UTILITY(U,$J,358.3,32049,0)
;;=D22.122^^97^1317^39
;;^UTILITY(U,$J,358.3,32049,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32049,1,3,0)
;;=3^Melanocytic Nevi of Left Lower Eyelid
;;^UTILITY(U,$J,358.3,32049,1,4,0)
;;=4^D22.122
;;^UTILITY(U,$J,358.3,32049,2)
;;=^5157289
;;^UTILITY(U,$J,358.3,32050,0)
;;=D22.121^^97^1317^41
;;^UTILITY(U,$J,358.3,32050,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32050,1,3,0)
;;=3^Melanocytic Nevi of Left Upper Eyelid
;;^UTILITY(U,$J,358.3,32050,1,4,0)
;;=4^D22.121
;;^UTILITY(U,$J,358.3,32050,2)
;;=^5157288
;;^UTILITY(U,$J,358.3,32051,0)
;;=D22.112^^97^1317^45
;;^UTILITY(U,$J,358.3,32051,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32051,1,3,0)
;;=3^Melanocytic Nevi of Right Lower Eyelid
;;^UTILITY(U,$J,358.3,32051,1,4,0)
;;=4^D22.112
;;^UTILITY(U,$J,358.3,32051,2)
;;=^5157287
;;^UTILITY(U,$J,358.3,32052,0)
;;=D22.111^^97^1317^47
;;^UTILITY(U,$J,358.3,32052,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32052,1,3,0)
;;=3^Melanocytic Nevi of Right Upper Eyelid
;;^UTILITY(U,$J,358.3,32052,1,4,0)
;;=4^D22.111
;;^UTILITY(U,$J,358.3,32052,2)
;;=^5157286
;;^UTILITY(U,$J,358.3,32053,0)
;;=D03.122^^97^1317^64
;;^UTILITY(U,$J,358.3,32053,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32053,1,3,0)
;;=3^Melanoma in Situ of Left Lower Eyelid
;;^UTILITY(U,$J,358.3,32053,1,4,0)
;;=4^D03.122
;;^UTILITY(U,$J,358.3,32053,2)
;;=^5157281
;;^UTILITY(U,$J,358.3,32054,0)
;;=D03.121^^97^1317^65
;;^UTILITY(U,$J,358.3,32054,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32054,1,3,0)
;;=3^Melanoma in Situ of Left Upper Eyelid
;;^UTILITY(U,$J,358.3,32054,1,4,0)
;;=4^D03.121
;;^UTILITY(U,$J,358.3,32054,2)
;;=^5157280
;;^UTILITY(U,$J,358.3,32055,0)
;;=D03.112^^97^1317^68
;;^UTILITY(U,$J,358.3,32055,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32055,1,3,0)
;;=3^Melanoma in Situ of Right Lower Eyelid
;;^UTILITY(U,$J,358.3,32055,1,4,0)
;;=4^D03.112
;;^UTILITY(U,$J,358.3,32055,2)
;;=^5157279
;;^UTILITY(U,$J,358.3,32056,0)
;;=D03.111^^97^1317^69
;;^UTILITY(U,$J,358.3,32056,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32056,1,3,0)
;;=3^Melanoma in Situ of Right Upper Eyelid
;;^UTILITY(U,$J,358.3,32056,1,4,0)
;;=4^D03.111
;;^UTILITY(U,$J,358.3,32056,2)
;;=^5157278
;;^UTILITY(U,$J,358.3,32057,0)
;;=C4A.122^^97^1317^77
;;^UTILITY(U,$J,358.3,32057,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32057,1,3,0)
;;=3^Merkle Cell CA,Left Lower Eyelid,Incl Canthus
;;^UTILITY(U,$J,358.3,32057,1,4,0)
;;=4^C4A.122
;;^UTILITY(U,$J,358.3,32057,2)
;;=^5157277
;;^UTILITY(U,$J,358.3,32058,0)
;;=C4A.121^^97^1317^71
;;^UTILITY(U,$J,358.3,32058,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32058,1,3,0)
;;=3^Merkel Cell CA,Left Upper Eyelid,Incl Canthus
;;^UTILITY(U,$J,358.3,32058,1,4,0)
;;=4^C4A.121
;;^UTILITY(U,$J,358.3,32058,2)
;;=^5157276
;;^UTILITY(U,$J,358.3,32059,0)
;;=C4A.111^^97^1317^73
;;^UTILITY(U,$J,358.3,32059,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32059,1,3,0)
;;=3^Merkel Cell CA,Right Upper Eyelid,Incl Canthus
;;^UTILITY(U,$J,358.3,32059,1,4,0)
;;=4^C4A.111
;;^UTILITY(U,$J,358.3,32059,2)
;;=^5157274
;;^UTILITY(U,$J,358.3,32060,0)
;;=C4A.112^^97^1317^72
;;^UTILITY(U,$J,358.3,32060,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32060,1,3,0)
;;=3^Merkel Cell CA,Right Lower Eyelid,Incl Canthus
;;^UTILITY(U,$J,358.3,32060,1,4,0)
;;=4^C4A.112
;;^UTILITY(U,$J,358.3,32060,2)
;;=^5157275
;;^UTILITY(U,$J,358.3,32061,0)
;;=I78.1^^97^1318^9
;;^UTILITY(U,$J,358.3,32061,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32061,1,3,0)
;;=3^Nevus,Non-Neoplastic
;;^UTILITY(U,$J,358.3,32061,1,4,0)
;;=4^I78.1
;;^UTILITY(U,$J,358.3,32061,2)
;;=^269807
;;^UTILITY(U,$J,358.3,32062,0)
;;=L60.3^^97^1318^2
;;^UTILITY(U,$J,358.3,32062,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32062,1,3,0)
;;=3^Nail Dystrophy
;;^UTILITY(U,$J,358.3,32062,1,4,0)
;;=4^L60.3
;;^UTILITY(U,$J,358.3,32062,2)
;;=^5009236
;;^UTILITY(U,$J,358.3,32063,0)
;;=L92.1^^97^1318^4
;;^UTILITY(U,$J,358.3,32063,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32063,1,3,0)
;;=3^Necrobiosis Lipoidica NEC
;;^UTILITY(U,$J,358.3,32063,1,4,0)
;;=4^L92.1
;;^UTILITY(U,$J,358.3,32063,2)
;;=^5009462
;;^UTILITY(U,$J,358.3,32064,0)
;;=L20.81^^97^1318^8
;;^UTILITY(U,$J,358.3,32064,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32064,1,3,0)
;;=3^Neurodermatitis,Atopic
;;^UTILITY(U,$J,358.3,32064,1,4,0)
;;=4^L20.81
;;^UTILITY(U,$J,358.3,32064,2)
;;=^5009108
;;^UTILITY(U,$J,358.3,32065,0)
;;=D48.5^^97^1318^7
;;^UTILITY(U,$J,358.3,32065,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32065,1,3,0)
;;=3^Neoplasm,Skin,Uncertain Behavior
;;^UTILITY(U,$J,358.3,32065,1,4,0)
;;=4^D48.5
;;^UTILITY(U,$J,358.3,32065,2)
;;=^267777
;;^UTILITY(U,$J,358.3,32066,0)
;;=D49.2^^97^1318^6
;;^UTILITY(U,$J,358.3,32066,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32066,1,3,0)
;;=3^Neoplasm,Bone/Soft Tissue/Skin,Unspec Behavior
;;^UTILITY(U,$J,358.3,32066,1,4,0)
;;=4^D49.2
;;^UTILITY(U,$J,358.3,32066,2)
;;=^5002272
;;^UTILITY(U,$J,358.3,32067,0)
;;=L60.0^^97^1318^3
;;^UTILITY(U,$J,358.3,32067,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32067,1,3,0)
;;=3^Nail,Ingrowing
;;^UTILITY(U,$J,358.3,32067,1,4,0)
;;=4^L60.0
;;^UTILITY(U,$J,358.3,32067,2)
;;=^5009234
;;^UTILITY(U,$J,358.3,32068,0)
;;=L60.9^^97^1318^1
;;^UTILITY(U,$J,358.3,32068,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32068,1,3,0)
;;=3^Nail Disorder,Unspec
;;^UTILITY(U,$J,358.3,32068,1,4,0)
;;=4^L60.9
;;^UTILITY(U,$J,358.3,32068,2)
;;=^5009240
;;^UTILITY(U,$J,358.3,32069,0)
;;=Z91.19^^97^1318^10
;;^UTILITY(U,$J,358.3,32069,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32069,1,3,0)
;;=3^Noncompliance w/ Medical Treatment/Regimen
;;^UTILITY(U,$J,358.3,32069,1,4,0)
;;=4^Z91.19
;;^UTILITY(U,$J,358.3,32069,2)
;;=^5063618
;;^UTILITY(U,$J,358.3,32070,0)
;;=Z23.^^97^1318^5
;;^UTILITY(U,$J,358.3,32070,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32070,1,3,0)
;;=3^Need for Immunization(s)
;;^UTILITY(U,$J,358.3,32070,1,4,0)
;;=4^Z23.
;;^UTILITY(U,$J,358.3,32070,2)
;;=^5062795
;;^UTILITY(U,$J,358.3,32071,0)
;;=E80.1^^97^1319^21
;;^UTILITY(U,$J,358.3,32071,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32071,1,3,0)
;;=3^Porphyria Cutanea Tarda
;;^UTILITY(U,$J,358.3,32071,1,4,0)
;;=4^E80.1
;;^UTILITY(U,$J,358.3,32071,2)
;;=^5002982
;;^UTILITY(U,$J,358.3,32072,0)
;;=L56.4^^97^1319^20
;;^UTILITY(U,$J,358.3,32072,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32072,1,3,0)
;;=3^Polymorphous Light Eruption
;;^UTILITY(U,$J,358.3,32072,1,4,0)
;;=4^L56.4
;;^UTILITY(U,$J,358.3,32072,2)
;;=^5009218
;;^UTILITY(U,$J,358.3,32073,0)
;;=L10.0^^97^1319^4
;;^UTILITY(U,$J,358.3,32073,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32073,1,3,0)
;;=3^Pemphigus Vulgaris
;;^UTILITY(U,$J,358.3,32073,1,4,0)
;;=4^L10.0
;;^UTILITY(U,$J,358.3,32073,2)
;;=^91129
;;^UTILITY(U,$J,358.3,32074,0)
;;=L41.3^^97^1319^2
;;^UTILITY(U,$J,358.3,32074,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32074,1,3,0)
;;=3^Parapsoriasis,Small Plague
;;^UTILITY(U,$J,358.3,32074,1,4,0)
;;=4^L41.3
;;^UTILITY(U,$J,358.3,32074,2)
;;=^5009173
;;^UTILITY(U,$J,358.3,32075,0)
;;=L41.4^^97^1319^1
;;^UTILITY(U,$J,358.3,32075,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32075,1,3,0)
;;=3^Parapsoriasis,Large Plague
;;^UTILITY(U,$J,358.3,32075,1,4,0)
;;=4^L41.4
;;^UTILITY(U,$J,358.3,32075,2)
;;=^5009174
;;^UTILITY(U,$J,358.3,32076,0)
;;=L28.1^^97^1319^34
;;^UTILITY(U,$J,358.3,32076,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32076,1,3,0)
;;=3^Prurigo Nodularis
;;^UTILITY(U,$J,358.3,32076,1,4,0)
;;=4^L28.1
;;^UTILITY(U,$J,358.3,32076,2)
;;=^5009148
;;^UTILITY(U,$J,358.3,32077,0)
;;=H61.001^^97^1319^6
;;^UTILITY(U,$J,358.3,32077,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32077,1,3,0)
;;=3^Perichondritis Right External Ear,Unspec
;;^UTILITY(U,$J,358.3,32077,1,4,0)
;;=4^H61.001
;;^UTILITY(U,$J,358.3,32077,2)
;;=^5006499
;;^UTILITY(U,$J,358.3,32078,0)
;;=H61.002^^97^1319^5
;;^UTILITY(U,$J,358.3,32078,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32078,1,3,0)
;;=3^Perichondritis Left External Ear,Unspec
;;^UTILITY(U,$J,358.3,32078,1,4,0)
;;=4^H61.002
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HIBDEI0CR 19750 printed Sep 23, 2025@19:22:06 Page 2
IBDEI0CR ; ; 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,32011,1,3,0)
+2 ;;=3^Melanocytic Nevi of Left Upper Limb
+3 ;;^UTILITY(U,$J,358.3,32011,1,4,0)
+4 ;;=4^D22.62
+5 ;;^UTILITY(U,$J,358.3,32011,2)
+6 ;;=^5002054
+7 ;;^UTILITY(U,$J,358.3,32012,0)
+8 ;;=D22.71^^97^1317^46
+9 ;;^UTILITY(U,$J,358.3,32012,1,0)
+10 ;;=^358.31IA^4^2
+11 ;;^UTILITY(U,$J,358.3,32012,1,3,0)
+12 ;;=3^Melanocytic Nevi of Right Lower Limb
+13 ;;^UTILITY(U,$J,358.3,32012,1,4,0)
+14 ;;=4^D22.71
+15 ;;^UTILITY(U,$J,358.3,32012,2)
+16 ;;=^5002056
+17 ;;^UTILITY(U,$J,358.3,32013,0)
+18 ;;=D22.72^^97^1317^40
+19 ;;^UTILITY(U,$J,358.3,32013,1,0)
+20 ;;=^358.31IA^4^2
+21 ;;^UTILITY(U,$J,358.3,32013,1,3,0)
+22 ;;=3^Melanocytic Nevi of Left Lower Limb
+23 ;;^UTILITY(U,$J,358.3,32013,1,4,0)
+24 ;;=4^D22.72
+25 ;;^UTILITY(U,$J,358.3,32013,2)
+26 ;;=^5002057
+27 ;;^UTILITY(U,$J,358.3,32014,0)
+28 ;;=C44.390^^97^1317^36
+29 ;;^UTILITY(U,$J,358.3,32014,1,0)
+30 ;;=^358.31IA^4^2
+31 ;;^UTILITY(U,$J,358.3,32014,1,3,0)
+32 ;;=3^Malig Neop Skin of Unspec Part of Face
+33 ;;^UTILITY(U,$J,358.3,32014,1,4,0)
+34 ;;=4^C44.390
+35 ;;^UTILITY(U,$J,358.3,32014,2)
+36 ;;=^5001049
+37 ;;^UTILITY(U,$J,358.3,32015,0)
+38 ;;=L81.1^^97^1317^70
+39 ;;^UTILITY(U,$J,358.3,32015,1,0)
+40 ;;=^358.31IA^4^2
+41 ;;^UTILITY(U,$J,358.3,32015,1,3,0)
+42 ;;=3^Melasma
+43 ;;^UTILITY(U,$J,358.3,32015,1,4,0)
+44 ;;=4^L81.1
+45 ;;^UTILITY(U,$J,358.3,32015,2)
+46 ;;=^5009311
+47 ;;^UTILITY(U,$J,358.3,32016,0)
+48 ;;=L72.0^^97^1317^90
+49 ;;^UTILITY(U,$J,358.3,32016,1,0)
+50 ;;=^358.31IA^4^2
+51 ;;^UTILITY(U,$J,358.3,32016,1,3,0)
+52 ;;=3^Milium
+53 ;;^UTILITY(U,$J,358.3,32016,1,4,0)
+54 ;;=4^L72.0
+55 ;;^UTILITY(U,$J,358.3,32016,2)
+56 ;;=^5009277
+57 ;;^UTILITY(U,$J,358.3,32017,0)
+58 ;;=C4A.51^^97^1317^74
+59 ;;^UTILITY(U,$J,358.3,32017,1,0)
+60 ;;=^358.31IA^4^2
+61 ;;^UTILITY(U,$J,358.3,32017,1,3,0)
+62 ;;=3^Merkle Cell CA,Anal Skin
+63 ;;^UTILITY(U,$J,358.3,32017,1,4,0)
+64 ;;=4^C4A.51
+65 ;;^UTILITY(U,$J,358.3,32017,2)
+66 ;;=^5001148
+67 ;;^UTILITY(U,$J,358.3,32018,0)
+68 ;;=C4A.52^^97^1317^75
+69 ;;^UTILITY(U,$J,358.3,32018,1,0)
+70 ;;=^358.31IA^4^2
+71 ;;^UTILITY(U,$J,358.3,32018,1,3,0)
+72 ;;=3^Merkle Cell CA,Breast Skin
+73 ;;^UTILITY(U,$J,358.3,32018,1,4,0)
+74 ;;=4^C4A.52
+75 ;;^UTILITY(U,$J,358.3,32018,2)
+76 ;;=^5001149
+77 ;;^UTILITY(U,$J,358.3,32019,0)
+78 ;;=C4A.22^^97^1317^76
+79 ;;^UTILITY(U,$J,358.3,32019,1,0)
+80 ;;=^358.31IA^4^2
+81 ;;^UTILITY(U,$J,358.3,32019,1,3,0)
+82 ;;=3^Merkle Cell CA,Left Ear & Ext Auricular Canal
+83 ;;^UTILITY(U,$J,358.3,32019,1,4,0)
+84 ;;=4^C4A.22
+85 ;;^UTILITY(U,$J,358.3,32019,2)
+86 ;;=^5001143
+87 ;;^UTILITY(U,$J,358.3,32020,0)
+88 ;;=C4A.0^^97^1317^80
+89 ;;^UTILITY(U,$J,358.3,32020,1,0)
+90 ;;=^358.31IA^4^2
+91 ;;^UTILITY(U,$J,358.3,32020,1,3,0)
+92 ;;=3^Merkle Cell CA,Lip
+93 ;;^UTILITY(U,$J,358.3,32020,1,4,0)
+94 ;;=4^C4A.0
+95 ;;^UTILITY(U,$J,358.3,32020,2)
+96 ;;=^5001137
+97 ;;^UTILITY(U,$J,358.3,32021,0)
+98 ;;=C4A.21^^97^1317^85
+99 ;;^UTILITY(U,$J,358.3,32021,1,0)
+100 ;;=^358.31IA^4^2
+101 ;;^UTILITY(U,$J,358.3,32021,1,3,0)
+102 ;;=3^Merkle Cell CA,Right Ear & Ext Auricular Canal
+103 ;;^UTILITY(U,$J,358.3,32021,1,4,0)
+104 ;;=4^C4A.21
+105 ;;^UTILITY(U,$J,358.3,32021,2)
+106 ;;=^5001142
+107 ;;^UTILITY(U,$J,358.3,32022,0)
+108 ;;=C4A.72^^97^1317^78
+109 ;;^UTILITY(U,$J,358.3,32022,1,0)
+110 ;;=^358.31IA^4^2
+111 ;;^UTILITY(U,$J,358.3,32022,1,3,0)
+112 ;;=3^Merkle Cell CA,Left Lower Limb,Incl Hip
+113 ;;^UTILITY(U,$J,358.3,32022,1,4,0)
+114 ;;=4^C4A.72
+115 ;;^UTILITY(U,$J,358.3,32022,2)
+116 ;;=^5001156
+117 ;;^UTILITY(U,$J,358.3,32023,0)
+118 ;;=C4A.62^^97^1317^79
+119 ;;^UTILITY(U,$J,358.3,32023,1,0)
+120 ;;=^358.31IA^4^2
+121 ;;^UTILITY(U,$J,358.3,32023,1,3,0)
+122 ;;=3^Merkle Cell CA,Left Upper Limb,Incl Shoulder
+123 ;;^UTILITY(U,$J,358.3,32023,1,4,0)
+124 ;;=4^C4A.62
+125 ;;^UTILITY(U,$J,358.3,32023,2)
+126 ;;=^5001153
+127 ;;^UTILITY(U,$J,358.3,32024,0)
+128 ;;=C4A.71^^97^1317^86
+129 ;;^UTILITY(U,$J,358.3,32024,1,0)
+130 ;;=^358.31IA^4^2
+131 ;;^UTILITY(U,$J,358.3,32024,1,3,0)
+132 ;;=3^Merkle Cell CA,Right Lower Limb,Incl Hip
+133 ;;^UTILITY(U,$J,358.3,32024,1,4,0)
+134 ;;=4^C4A.71
+135 ;;^UTILITY(U,$J,358.3,32024,2)
+136 ;;=^5001155
+137 ;;^UTILITY(U,$J,358.3,32025,0)
+138 ;;=C4A.61^^97^1317^87
+139 ;;^UTILITY(U,$J,358.3,32025,1,0)
+140 ;;=^358.31IA^4^2
+141 ;;^UTILITY(U,$J,358.3,32025,1,3,0)
+142 ;;=3^Merkle Cell CA,Right Upper Limb,Incl Shoulder
+143 ;;^UTILITY(U,$J,358.3,32025,1,4,0)
+144 ;;=4^C4A.61
+145 ;;^UTILITY(U,$J,358.3,32025,2)
+146 ;;=^5001152
+147 ;;^UTILITY(U,$J,358.3,32026,0)
+148 ;;=C4A.31^^97^1317^81
+149 ;;^UTILITY(U,$J,358.3,32026,1,0)
+150 ;;=^358.31IA^4^2
+151 ;;^UTILITY(U,$J,358.3,32026,1,3,0)
+152 ;;=3^Merkle Cell CA,Nose
+153 ;;^UTILITY(U,$J,358.3,32026,1,4,0)
+154 ;;=4^C4A.31
+155 ;;^UTILITY(U,$J,358.3,32026,2)
+156 ;;=^5001145
+157 ;;^UTILITY(U,$J,358.3,32027,0)
+158 ;;=C4A.39^^97^1317^83
+159 ;;^UTILITY(U,$J,358.3,32027,1,0)
+160 ;;=^358.31IA^4^2
+161 ;;^UTILITY(U,$J,358.3,32027,1,3,0)
+162 ;;=3^Merkle Cell CA,Parts of Face,Other
+163 ;;^UTILITY(U,$J,358.3,32027,1,4,0)
+164 ;;=4^C4A.39
+165 ;;^UTILITY(U,$J,358.3,32027,2)
+166 ;;=^5001146
+167 ;;^UTILITY(U,$J,358.3,32028,0)
+168 ;;=C4A.59^^97^1317^84
+169 ;;^UTILITY(U,$J,358.3,32028,1,0)
+170 ;;=^358.31IA^4^2
+171 ;;^UTILITY(U,$J,358.3,32028,1,3,0)
+172 ;;=3^Merkle Cell CA,Parts of Trunk,Other
+173 ;;^UTILITY(U,$J,358.3,32028,1,4,0)
+174 ;;=4^C4A.59
+175 ;;^UTILITY(U,$J,358.3,32028,2)
+176 ;;=^5001150
+177 ;;^UTILITY(U,$J,358.3,32029,0)
+178 ;;=C4A.8^^97^1317^82
+179 ;;^UTILITY(U,$J,358.3,32029,1,0)
+180 ;;=^358.31IA^4^2
+181 ;;^UTILITY(U,$J,358.3,32029,1,3,0)
+182 ;;=3^Merkle Cell CA,Overlapping Sites
+183 ;;^UTILITY(U,$J,358.3,32029,1,4,0)
+184 ;;=4^C4A.8
+185 ;;^UTILITY(U,$J,358.3,32029,2)
+186 ;;=^5001157
+187 ;;^UTILITY(U,$J,358.3,32030,0)
+188 ;;=C4A.9^^97^1317^88
+189 ;;^UTILITY(U,$J,358.3,32030,1,0)
+190 ;;=^358.31IA^4^2
+191 ;;^UTILITY(U,$J,358.3,32030,1,3,0)
+192 ;;=3^Merkle Cell CA,Unspec
+193 ;;^UTILITY(U,$J,358.3,32030,1,4,0)
+194 ;;=4^C4A.9
+195 ;;^UTILITY(U,$J,358.3,32030,2)
+196 ;;=^5001158
+197 ;;^UTILITY(U,$J,358.3,32031,0)
+198 ;;=C84.09^^97^1317^93
+199 ;;^UTILITY(U,$J,358.3,32031,1,0)
+200 ;;=^358.31IA^4^2
+201 ;;^UTILITY(U,$J,358.3,32031,1,3,0)
+202 ;;=3^Mycosis Fungoides,Extranodal/Solid Organ Sites
+203 ;;^UTILITY(U,$J,358.3,32031,1,4,0)
+204 ;;=4^C84.09
+205 ;;^UTILITY(U,$J,358.3,32031,2)
+206 ;;=^5001630
+207 ;;^UTILITY(U,$J,358.3,32032,0)
+208 ;;=C84.03^^97^1317^96
+209 ;;^UTILITY(U,$J,358.3,32032,1,0)
+210 ;;=^358.31IA^4^2
+211 ;;^UTILITY(U,$J,358.3,32032,1,3,0)
+212 ;;=3^Mycosis Fungoides,Intra-Abdominal Lymph Nodes
+213 ;;^UTILITY(U,$J,358.3,32032,1,4,0)
+214 ;;=4^C84.03
+215 ;;^UTILITY(U,$J,358.3,32032,2)
+216 ;;=^5001624
+217 ;;^UTILITY(U,$J,358.3,32033,0)
+218 ;;=C84.06^^97^1317^97
+219 ;;^UTILITY(U,$J,358.3,32033,1,0)
+220 ;;=^358.31IA^4^2
+221 ;;^UTILITY(U,$J,358.3,32033,1,3,0)
+222 ;;=3^Mycosis Fungoides,Intrapelvic Lymph Nodes
+223 ;;^UTILITY(U,$J,358.3,32033,1,4,0)
+224 ;;=4^C84.06
+225 ;;^UTILITY(U,$J,358.3,32033,2)
+226 ;;=^5001627
+227 ;;^UTILITY(U,$J,358.3,32034,0)
+228 ;;=C84.02^^97^1317^98
+229 ;;^UTILITY(U,$J,358.3,32034,1,0)
+230 ;;=^358.31IA^4^2
+231 ;;^UTILITY(U,$J,358.3,32034,1,3,0)
+232 ;;=3^Mycosis Fungoides,Intrathoracic Lymph Nodes
+233 ;;^UTILITY(U,$J,358.3,32034,1,4,0)
+234 ;;=4^C84.02
+235 ;;^UTILITY(U,$J,358.3,32034,2)
+236 ;;=^5001623
+237 ;;^UTILITY(U,$J,358.3,32035,0)
+238 ;;=C84.04^^97^1317^92
+239 ;;^UTILITY(U,$J,358.3,32035,1,0)
+240 ;;=^358.31IA^4^2
+241 ;;^UTILITY(U,$J,358.3,32035,1,3,0)
+242 ;;=3^Mycosis Fungoides,Axilla/Upper Limb Lymph Nodes
+243 ;;^UTILITY(U,$J,358.3,32035,1,4,0)
+244 ;;=4^C84.04
+245 ;;^UTILITY(U,$J,358.3,32035,2)
+246 ;;=^5001625
+247 ;;^UTILITY(U,$J,358.3,32036,0)
+248 ;;=C84.01^^97^1317^94
+249 ;;^UTILITY(U,$J,358.3,32036,1,0)
+250 ;;=^358.31IA^4^2
+251 ;;^UTILITY(U,$J,358.3,32036,1,3,0)
+252 ;;=3^Mycosis Fungoides,Head/Face/Neck Lymph Nodes
+253 ;;^UTILITY(U,$J,358.3,32036,1,4,0)
+254 ;;=4^C84.01
+255 ;;^UTILITY(U,$J,358.3,32036,2)
+256 ;;=^5001622
+257 ;;^UTILITY(U,$J,358.3,32037,0)
+258 ;;=C84.05^^97^1317^95
+259 ;;^UTILITY(U,$J,358.3,32037,1,0)
+260 ;;=^358.31IA^4^2
+261 ;;^UTILITY(U,$J,358.3,32037,1,3,0)
+262 ;;=3^Mycosis Fungoides,Inguinal Region/LE Lymph Nodes
+263 ;;^UTILITY(U,$J,358.3,32037,1,4,0)
+264 ;;=4^C84.05
+265 ;;^UTILITY(U,$J,358.3,32037,2)
+266 ;;=^5001626
+267 ;;^UTILITY(U,$J,358.3,32038,0)
+268 ;;=C84.08^^97^1317^99
+269 ;;^UTILITY(U,$J,358.3,32038,1,0)
+270 ;;=^358.31IA^4^2
+271 ;;^UTILITY(U,$J,358.3,32038,1,3,0)
+272 ;;=3^Mycosis Fungoides,Multiple Site Lymph Nodes
+273 ;;^UTILITY(U,$J,358.3,32038,1,4,0)
+274 ;;=4^C84.08
+275 ;;^UTILITY(U,$J,358.3,32038,2)
+276 ;;=^5001629
+277 ;;^UTILITY(U,$J,358.3,32039,0)
+278 ;;=C84.07^^97^1317^100
+279 ;;^UTILITY(U,$J,358.3,32039,1,0)
+280 ;;=^358.31IA^4^2
+281 ;;^UTILITY(U,$J,358.3,32039,1,3,0)
+282 ;;=3^Mycosis Fungoides,Spleen
+283 ;;^UTILITY(U,$J,358.3,32039,1,4,0)
+284 ;;=4^C84.07
+285 ;;^UTILITY(U,$J,358.3,32039,2)
+286 ;;=^5001628
+287 ;;^UTILITY(U,$J,358.3,32040,0)
+288 ;;=C84.00^^97^1317^101
+289 ;;^UTILITY(U,$J,358.3,32040,1,0)
+290 ;;=^358.31IA^4^2
+291 ;;^UTILITY(U,$J,358.3,32040,1,3,0)
+292 ;;=3^Mycosis Fungoides,Unspec Site
+293 ;;^UTILITY(U,$J,358.3,32040,1,4,0)
+294 ;;=4^C84.00
+295 ;;^UTILITY(U,$J,358.3,32040,2)
+296 ;;=^5001621
+297 ;;^UTILITY(U,$J,358.3,32041,0)
+298 ;;=C43.122^^97^1317^4
+299 ;;^UTILITY(U,$J,358.3,32041,1,0)
+300 ;;=^358.31IA^4^2
+301 ;;^UTILITY(U,$J,358.3,32041,1,3,0)
+302 ;;=3^Malig Melanoma of Left Lower Eyelid,Incl Canthus
+303 ;;^UTILITY(U,$J,358.3,32041,1,4,0)
+304 ;;=4^C43.122
+305 ;;^UTILITY(U,$J,358.3,32041,2)
+306 ;;=^5157252
+307 ;;^UTILITY(U,$J,358.3,32042,0)
+308 ;;=C43.121^^97^1317^6
+309 ;;^UTILITY(U,$J,358.3,32042,1,0)
+310 ;;=^358.31IA^4^2
+311 ;;^UTILITY(U,$J,358.3,32042,1,3,0)
+312 ;;=3^Malig Melanoma of Left Upper Eyelid,Incl Canthus
+313 ;;^UTILITY(U,$J,358.3,32042,1,4,0)
+314 ;;=4^C43.121
+315 ;;^UTILITY(U,$J,358.3,32042,2)
+316 ;;=^5157251
+317 ;;^UTILITY(U,$J,358.3,32043,0)
+318 ;;=C43.112^^97^1317^12
+319 ;;^UTILITY(U,$J,358.3,32043,1,0)
+320 ;;=^358.31IA^4^2
+321 ;;^UTILITY(U,$J,358.3,32043,1,3,0)
+322 ;;=3^Malig Melanoma of Right Lower Eyelid,Incl Canthus
+323 ;;^UTILITY(U,$J,358.3,32043,1,4,0)
+324 ;;=4^C43.112
+325 ;;^UTILITY(U,$J,358.3,32043,2)
+326 ;;=^5157250
+327 ;;^UTILITY(U,$J,358.3,32044,0)
+328 ;;=C43.111^^97^1317^14
+329 ;;^UTILITY(U,$J,358.3,32044,1,0)
+330 ;;=^358.31IA^4^2
+331 ;;^UTILITY(U,$J,358.3,32044,1,3,0)
+332 ;;=3^Malig Melanoma of Right Upper Eyelid,Incl Canthus
+333 ;;^UTILITY(U,$J,358.3,32044,1,4,0)
+334 ;;=4^C43.111
+335 ;;^UTILITY(U,$J,358.3,32044,2)
+336 ;;=^5157249
+337 ;;^UTILITY(U,$J,358.3,32045,0)
+338 ;;=C44.1922^^97^1317^30
+339 ;;^UTILITY(U,$J,358.3,32045,1,0)
+340 ;;=^358.31IA^4^2
+341 ;;^UTILITY(U,$J,358.3,32045,1,3,0)
+342 ;;=3^Malig Neop Skin of Right Lower Eyelid,Incl Canthus
+343 ;;^UTILITY(U,$J,358.3,32045,1,4,0)
+344 ;;=4^C44.1922
+345 ;;^UTILITY(U,$J,358.3,32045,2)
+346 ;;=^5157271
+347 ;;^UTILITY(U,$J,358.3,32046,0)
+348 ;;=C44.1921^^97^1317^32
+349 ;;^UTILITY(U,$J,358.3,32046,1,0)
+350 ;;=^358.31IA^4^2
+351 ;;^UTILITY(U,$J,358.3,32046,1,3,0)
+352 ;;=3^Malig Neop Skin of Right Upper Eyelid,Incl Canthus
+353 ;;^UTILITY(U,$J,358.3,32046,1,4,0)
+354 ;;=4^C44.1921
+355 ;;^UTILITY(U,$J,358.3,32046,2)
+356 ;;=^5157270
+357 ;;^UTILITY(U,$J,358.3,32047,0)
+358 ;;=C44.1992^^97^1317^22
+359 ;;^UTILITY(U,$J,358.3,32047,1,0)
+360 ;;=^358.31IA^4^2
+361 ;;^UTILITY(U,$J,358.3,32047,1,3,0)
+362 ;;=3^Malig Neop Skin of Left Lower Eyelid,Incl Canthus
+363 ;;^UTILITY(U,$J,358.3,32047,1,4,0)
+364 ;;=4^C44.1992
+365 ;;^UTILITY(U,$J,358.3,32047,2)
+366 ;;=^5157273
+367 ;;^UTILITY(U,$J,358.3,32048,0)
+368 ;;=C44.1991^^97^1317^24
+369 ;;^UTILITY(U,$J,358.3,32048,1,0)
+370 ;;=^358.31IA^4^2
+371 ;;^UTILITY(U,$J,358.3,32048,1,3,0)
+372 ;;=3^Malig Neop Skin of Left Upper Eyelid,Incl Canthus
+373 ;;^UTILITY(U,$J,358.3,32048,1,4,0)
+374 ;;=4^C44.1991
+375 ;;^UTILITY(U,$J,358.3,32048,2)
+376 ;;=^5157272
+377 ;;^UTILITY(U,$J,358.3,32049,0)
+378 ;;=D22.122^^97^1317^39
+379 ;;^UTILITY(U,$J,358.3,32049,1,0)
+380 ;;=^358.31IA^4^2
+381 ;;^UTILITY(U,$J,358.3,32049,1,3,0)
+382 ;;=3^Melanocytic Nevi of Left Lower Eyelid
+383 ;;^UTILITY(U,$J,358.3,32049,1,4,0)
+384 ;;=4^D22.122
+385 ;;^UTILITY(U,$J,358.3,32049,2)
+386 ;;=^5157289
+387 ;;^UTILITY(U,$J,358.3,32050,0)
+388 ;;=D22.121^^97^1317^41
+389 ;;^UTILITY(U,$J,358.3,32050,1,0)
+390 ;;=^358.31IA^4^2
+391 ;;^UTILITY(U,$J,358.3,32050,1,3,0)
+392 ;;=3^Melanocytic Nevi of Left Upper Eyelid
+393 ;;^UTILITY(U,$J,358.3,32050,1,4,0)
+394 ;;=4^D22.121
+395 ;;^UTILITY(U,$J,358.3,32050,2)
+396 ;;=^5157288
+397 ;;^UTILITY(U,$J,358.3,32051,0)
+398 ;;=D22.112^^97^1317^45
+399 ;;^UTILITY(U,$J,358.3,32051,1,0)
+400 ;;=^358.31IA^4^2
+401 ;;^UTILITY(U,$J,358.3,32051,1,3,0)
+402 ;;=3^Melanocytic Nevi of Right Lower Eyelid
+403 ;;^UTILITY(U,$J,358.3,32051,1,4,0)
+404 ;;=4^D22.112
+405 ;;^UTILITY(U,$J,358.3,32051,2)
+406 ;;=^5157287
+407 ;;^UTILITY(U,$J,358.3,32052,0)
+408 ;;=D22.111^^97^1317^47
+409 ;;^UTILITY(U,$J,358.3,32052,1,0)
+410 ;;=^358.31IA^4^2
+411 ;;^UTILITY(U,$J,358.3,32052,1,3,0)
+412 ;;=3^Melanocytic Nevi of Right Upper Eyelid
+413 ;;^UTILITY(U,$J,358.3,32052,1,4,0)
+414 ;;=4^D22.111
+415 ;;^UTILITY(U,$J,358.3,32052,2)
+416 ;;=^5157286
+417 ;;^UTILITY(U,$J,358.3,32053,0)
+418 ;;=D03.122^^97^1317^64
+419 ;;^UTILITY(U,$J,358.3,32053,1,0)
+420 ;;=^358.31IA^4^2
+421 ;;^UTILITY(U,$J,358.3,32053,1,3,0)
+422 ;;=3^Melanoma in Situ of Left Lower Eyelid
+423 ;;^UTILITY(U,$J,358.3,32053,1,4,0)
+424 ;;=4^D03.122
+425 ;;^UTILITY(U,$J,358.3,32053,2)
+426 ;;=^5157281
+427 ;;^UTILITY(U,$J,358.3,32054,0)
+428 ;;=D03.121^^97^1317^65
+429 ;;^UTILITY(U,$J,358.3,32054,1,0)
+430 ;;=^358.31IA^4^2
+431 ;;^UTILITY(U,$J,358.3,32054,1,3,0)
+432 ;;=3^Melanoma in Situ of Left Upper Eyelid
+433 ;;^UTILITY(U,$J,358.3,32054,1,4,0)
+434 ;;=4^D03.121
+435 ;;^UTILITY(U,$J,358.3,32054,2)
+436 ;;=^5157280
+437 ;;^UTILITY(U,$J,358.3,32055,0)
+438 ;;=D03.112^^97^1317^68
+439 ;;^UTILITY(U,$J,358.3,32055,1,0)
+440 ;;=^358.31IA^4^2
+441 ;;^UTILITY(U,$J,358.3,32055,1,3,0)
+442 ;;=3^Melanoma in Situ of Right Lower Eyelid
+443 ;;^UTILITY(U,$J,358.3,32055,1,4,0)
+444 ;;=4^D03.112
+445 ;;^UTILITY(U,$J,358.3,32055,2)
+446 ;;=^5157279
+447 ;;^UTILITY(U,$J,358.3,32056,0)
+448 ;;=D03.111^^97^1317^69
+449 ;;^UTILITY(U,$J,358.3,32056,1,0)
+450 ;;=^358.31IA^4^2
+451 ;;^UTILITY(U,$J,358.3,32056,1,3,0)
+452 ;;=3^Melanoma in Situ of Right Upper Eyelid
+453 ;;^UTILITY(U,$J,358.3,32056,1,4,0)
+454 ;;=4^D03.111
+455 ;;^UTILITY(U,$J,358.3,32056,2)
+456 ;;=^5157278
+457 ;;^UTILITY(U,$J,358.3,32057,0)
+458 ;;=C4A.122^^97^1317^77
+459 ;;^UTILITY(U,$J,358.3,32057,1,0)
+460 ;;=^358.31IA^4^2
+461 ;;^UTILITY(U,$J,358.3,32057,1,3,0)
+462 ;;=3^Merkle Cell CA,Left Lower Eyelid,Incl Canthus
+463 ;;^UTILITY(U,$J,358.3,32057,1,4,0)
+464 ;;=4^C4A.122
+465 ;;^UTILITY(U,$J,358.3,32057,2)
+466 ;;=^5157277
+467 ;;^UTILITY(U,$J,358.3,32058,0)
+468 ;;=C4A.121^^97^1317^71
+469 ;;^UTILITY(U,$J,358.3,32058,1,0)
+470 ;;=^358.31IA^4^2
+471 ;;^UTILITY(U,$J,358.3,32058,1,3,0)
+472 ;;=3^Merkel Cell CA,Left Upper Eyelid,Incl Canthus
+473 ;;^UTILITY(U,$J,358.3,32058,1,4,0)
+474 ;;=4^C4A.121
+475 ;;^UTILITY(U,$J,358.3,32058,2)
+476 ;;=^5157276
+477 ;;^UTILITY(U,$J,358.3,32059,0)
+478 ;;=C4A.111^^97^1317^73
+479 ;;^UTILITY(U,$J,358.3,32059,1,0)
+480 ;;=^358.31IA^4^2
+481 ;;^UTILITY(U,$J,358.3,32059,1,3,0)
+482 ;;=3^Merkel Cell CA,Right Upper Eyelid,Incl Canthus
+483 ;;^UTILITY(U,$J,358.3,32059,1,4,0)
+484 ;;=4^C4A.111
+485 ;;^UTILITY(U,$J,358.3,32059,2)
+486 ;;=^5157274
+487 ;;^UTILITY(U,$J,358.3,32060,0)
+488 ;;=C4A.112^^97^1317^72
+489 ;;^UTILITY(U,$J,358.3,32060,1,0)
+490 ;;=^358.31IA^4^2
+491 ;;^UTILITY(U,$J,358.3,32060,1,3,0)
+492 ;;=3^Merkel Cell CA,Right Lower Eyelid,Incl Canthus
+493 ;;^UTILITY(U,$J,358.3,32060,1,4,0)
+494 ;;=4^C4A.112
+495 ;;^UTILITY(U,$J,358.3,32060,2)
+496 ;;=^5157275
+497 ;;^UTILITY(U,$J,358.3,32061,0)
+498 ;;=I78.1^^97^1318^9
+499 ;;^UTILITY(U,$J,358.3,32061,1,0)
+500 ;;=^358.31IA^4^2
+501 ;;^UTILITY(U,$J,358.3,32061,1,3,0)
+502 ;;=3^Nevus,Non-Neoplastic
+503 ;;^UTILITY(U,$J,358.3,32061,1,4,0)
+504 ;;=4^I78.1
+505 ;;^UTILITY(U,$J,358.3,32061,2)
+506 ;;=^269807
+507 ;;^UTILITY(U,$J,358.3,32062,0)
+508 ;;=L60.3^^97^1318^2
+509 ;;^UTILITY(U,$J,358.3,32062,1,0)
+510 ;;=^358.31IA^4^2
+511 ;;^UTILITY(U,$J,358.3,32062,1,3,0)
+512 ;;=3^Nail Dystrophy
+513 ;;^UTILITY(U,$J,358.3,32062,1,4,0)
+514 ;;=4^L60.3
+515 ;;^UTILITY(U,$J,358.3,32062,2)
+516 ;;=^5009236
+517 ;;^UTILITY(U,$J,358.3,32063,0)
+518 ;;=L92.1^^97^1318^4
+519 ;;^UTILITY(U,$J,358.3,32063,1,0)
+520 ;;=^358.31IA^4^2
+521 ;;^UTILITY(U,$J,358.3,32063,1,3,0)
+522 ;;=3^Necrobiosis Lipoidica NEC
+523 ;;^UTILITY(U,$J,358.3,32063,1,4,0)
+524 ;;=4^L92.1
+525 ;;^UTILITY(U,$J,358.3,32063,2)
+526 ;;=^5009462
+527 ;;^UTILITY(U,$J,358.3,32064,0)
+528 ;;=L20.81^^97^1318^8
+529 ;;^UTILITY(U,$J,358.3,32064,1,0)
+530 ;;=^358.31IA^4^2
+531 ;;^UTILITY(U,$J,358.3,32064,1,3,0)
+532 ;;=3^Neurodermatitis,Atopic
+533 ;;^UTILITY(U,$J,358.3,32064,1,4,0)
+534 ;;=4^L20.81
+535 ;;^UTILITY(U,$J,358.3,32064,2)
+536 ;;=^5009108
+537 ;;^UTILITY(U,$J,358.3,32065,0)
+538 ;;=D48.5^^97^1318^7
+539 ;;^UTILITY(U,$J,358.3,32065,1,0)
+540 ;;=^358.31IA^4^2
+541 ;;^UTILITY(U,$J,358.3,32065,1,3,0)
+542 ;;=3^Neoplasm,Skin,Uncertain Behavior
+543 ;;^UTILITY(U,$J,358.3,32065,1,4,0)
+544 ;;=4^D48.5
+545 ;;^UTILITY(U,$J,358.3,32065,2)
+546 ;;=^267777
+547 ;;^UTILITY(U,$J,358.3,32066,0)
+548 ;;=D49.2^^97^1318^6
+549 ;;^UTILITY(U,$J,358.3,32066,1,0)
+550 ;;=^358.31IA^4^2
+551 ;;^UTILITY(U,$J,358.3,32066,1,3,0)
+552 ;;=3^Neoplasm,Bone/Soft Tissue/Skin,Unspec Behavior
+553 ;;^UTILITY(U,$J,358.3,32066,1,4,0)
+554 ;;=4^D49.2
+555 ;;^UTILITY(U,$J,358.3,32066,2)
+556 ;;=^5002272
+557 ;;^UTILITY(U,$J,358.3,32067,0)
+558 ;;=L60.0^^97^1318^3
+559 ;;^UTILITY(U,$J,358.3,32067,1,0)
+560 ;;=^358.31IA^4^2
+561 ;;^UTILITY(U,$J,358.3,32067,1,3,0)
+562 ;;=3^Nail,Ingrowing
+563 ;;^UTILITY(U,$J,358.3,32067,1,4,0)
+564 ;;=4^L60.0
+565 ;;^UTILITY(U,$J,358.3,32067,2)
+566 ;;=^5009234
+567 ;;^UTILITY(U,$J,358.3,32068,0)
+568 ;;=L60.9^^97^1318^1
+569 ;;^UTILITY(U,$J,358.3,32068,1,0)
+570 ;;=^358.31IA^4^2
+571 ;;^UTILITY(U,$J,358.3,32068,1,3,0)
+572 ;;=3^Nail Disorder,Unspec
+573 ;;^UTILITY(U,$J,358.3,32068,1,4,0)
+574 ;;=4^L60.9
+575 ;;^UTILITY(U,$J,358.3,32068,2)
+576 ;;=^5009240
+577 ;;^UTILITY(U,$J,358.3,32069,0)
+578 ;;=Z91.19^^97^1318^10
+579 ;;^UTILITY(U,$J,358.3,32069,1,0)
+580 ;;=^358.31IA^4^2
+581 ;;^UTILITY(U,$J,358.3,32069,1,3,0)
+582 ;;=3^Noncompliance w/ Medical Treatment/Regimen
+583 ;;^UTILITY(U,$J,358.3,32069,1,4,0)
+584 ;;=4^Z91.19
+585 ;;^UTILITY(U,$J,358.3,32069,2)
+586 ;;=^5063618
+587 ;;^UTILITY(U,$J,358.3,32070,0)
+588 ;;=Z23.^^97^1318^5
+589 ;;^UTILITY(U,$J,358.3,32070,1,0)
+590 ;;=^358.31IA^4^2
+591 ;;^UTILITY(U,$J,358.3,32070,1,3,0)
+592 ;;=3^Need for Immunization(s)
+593 ;;^UTILITY(U,$J,358.3,32070,1,4,0)
+594 ;;=4^Z23.
+595 ;;^UTILITY(U,$J,358.3,32070,2)
+596 ;;=^5062795
+597 ;;^UTILITY(U,$J,358.3,32071,0)
+598 ;;=E80.1^^97^1319^21
+599 ;;^UTILITY(U,$J,358.3,32071,1,0)
+600 ;;=^358.31IA^4^2
+601 ;;^UTILITY(U,$J,358.3,32071,1,3,0)
+602 ;;=3^Porphyria Cutanea Tarda
+603 ;;^UTILITY(U,$J,358.3,32071,1,4,0)
+604 ;;=4^E80.1
+605 ;;^UTILITY(U,$J,358.3,32071,2)
+606 ;;=^5002982
+607 ;;^UTILITY(U,$J,358.3,32072,0)
+608 ;;=L56.4^^97^1319^20
+609 ;;^UTILITY(U,$J,358.3,32072,1,0)
+610 ;;=^358.31IA^4^2
+611 ;;^UTILITY(U,$J,358.3,32072,1,3,0)
+612 ;;=3^Polymorphous Light Eruption
+613 ;;^UTILITY(U,$J,358.3,32072,1,4,0)
+614 ;;=4^L56.4
+615 ;;^UTILITY(U,$J,358.3,32072,2)
+616 ;;=^5009218
+617 ;;^UTILITY(U,$J,358.3,32073,0)
+618 ;;=L10.0^^97^1319^4
+619 ;;^UTILITY(U,$J,358.3,32073,1,0)
+620 ;;=^358.31IA^4^2
+621 ;;^UTILITY(U,$J,358.3,32073,1,3,0)
+622 ;;=3^Pemphigus Vulgaris
+623 ;;^UTILITY(U,$J,358.3,32073,1,4,0)
+624 ;;=4^L10.0
+625 ;;^UTILITY(U,$J,358.3,32073,2)
+626 ;;=^91129
+627 ;;^UTILITY(U,$J,358.3,32074,0)
+628 ;;=L41.3^^97^1319^2
+629 ;;^UTILITY(U,$J,358.3,32074,1,0)
+630 ;;=^358.31IA^4^2
+631 ;;^UTILITY(U,$J,358.3,32074,1,3,0)
+632 ;;=3^Parapsoriasis,Small Plague
+633 ;;^UTILITY(U,$J,358.3,32074,1,4,0)
+634 ;;=4^L41.3
+635 ;;^UTILITY(U,$J,358.3,32074,2)
+636 ;;=^5009173
+637 ;;^UTILITY(U,$J,358.3,32075,0)
+638 ;;=L41.4^^97^1319^1
+639 ;;^UTILITY(U,$J,358.3,32075,1,0)
+640 ;;=^358.31IA^4^2
+641 ;;^UTILITY(U,$J,358.3,32075,1,3,0)
+642 ;;=3^Parapsoriasis,Large Plague
+643 ;;^UTILITY(U,$J,358.3,32075,1,4,0)
+644 ;;=4^L41.4
+645 ;;^UTILITY(U,$J,358.3,32075,2)
+646 ;;=^5009174
+647 ;;^UTILITY(U,$J,358.3,32076,0)
+648 ;;=L28.1^^97^1319^34
+649 ;;^UTILITY(U,$J,358.3,32076,1,0)
+650 ;;=^358.31IA^4^2
+651 ;;^UTILITY(U,$J,358.3,32076,1,3,0)
+652 ;;=3^Prurigo Nodularis
+653 ;;^UTILITY(U,$J,358.3,32076,1,4,0)
+654 ;;=4^L28.1
+655 ;;^UTILITY(U,$J,358.3,32076,2)
+656 ;;=^5009148
+657 ;;^UTILITY(U,$J,358.3,32077,0)
+658 ;;=H61.001^^97^1319^6
+659 ;;^UTILITY(U,$J,358.3,32077,1,0)
+660 ;;=^358.31IA^4^2
+661 ;;^UTILITY(U,$J,358.3,32077,1,3,0)
+662 ;;=3^Perichondritis Right External Ear,Unspec
+663 ;;^UTILITY(U,$J,358.3,32077,1,4,0)
+664 ;;=4^H61.001
+665 ;;^UTILITY(U,$J,358.3,32077,2)
+666 ;;=^5006499
+667 ;;^UTILITY(U,$J,358.3,32078,0)
+668 ;;=H61.002^^97^1319^5
+669 ;;^UTILITY(U,$J,358.3,32078,1,0)
+670 ;;=^358.31IA^4^2
+671 ;;^UTILITY(U,$J,358.3,32078,1,3,0)
+672 ;;=3^Perichondritis Left External Ear,Unspec
+673 ;;^UTILITY(U,$J,358.3,32078,1,4,0)
+674 ;;=4^H61.002
