IBDEI03S ; ; 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,9080,1,4,0)
;;=4^C79.31
;;^UTILITY(U,$J,358.3,9080,2)
;;=^5001347
;;^UTILITY(U,$J,358.3,9081,0)
;;=C79.72^^45^431^137
;;^UTILITY(U,$J,358.3,9081,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9081,1,3,0)
;;=3^Malig Neop Left Adrenal Gland,Secondary
;;^UTILITY(U,$J,358.3,9081,1,4,0)
;;=4^C79.72
;;^UTILITY(U,$J,358.3,9081,2)
;;=^5001357
;;^UTILITY(U,$J,358.3,9082,0)
;;=C78.02^^45^431^141
;;^UTILITY(U,$J,358.3,9082,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9082,1,3,0)
;;=3^Malig Neop Left Lung,Secondary
;;^UTILITY(U,$J,358.3,9082,1,4,0)
;;=4^C78.02
;;^UTILITY(U,$J,358.3,9082,2)
;;=^5001336
;;^UTILITY(U,$J,358.3,9083,0)
;;=C78.7^^45^431^146
;;^UTILITY(U,$J,358.3,9083,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9083,1,3,0)
;;=3^Malig Neop Liver/Intrahepatic Bile Duct,Secondary
;;^UTILITY(U,$J,358.3,9083,1,4,0)
;;=4^C78.7
;;^UTILITY(U,$J,358.3,9083,2)
;;=^5001339
;;^UTILITY(U,$J,358.3,9084,0)
;;=C79.71^^45^431^159
;;^UTILITY(U,$J,358.3,9084,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9084,1,3,0)
;;=3^Malig Neop Right Adrenal Gland,Secondary
;;^UTILITY(U,$J,358.3,9084,1,4,0)
;;=4^C79.71
;;^UTILITY(U,$J,358.3,9084,2)
;;=^5001356
;;^UTILITY(U,$J,358.3,9085,0)
;;=C78.01^^45^431^163
;;^UTILITY(U,$J,358.3,9085,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9085,1,3,0)
;;=3^Malig Neop Right Lung,Secondary
;;^UTILITY(U,$J,358.3,9085,1,4,0)
;;=4^C78.01
;;^UTILITY(U,$J,358.3,9085,2)
;;=^5001335
;;^UTILITY(U,$J,358.3,9086,0)
;;=C79.70^^45^431^114
;;^UTILITY(U,$J,358.3,9086,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9086,1,3,0)
;;=3^Malig Neop Adrenal Gland Unspec,Secondary
;;^UTILITY(U,$J,358.3,9086,1,4,0)
;;=4^C79.70
;;^UTILITY(U,$J,358.3,9086,2)
;;=^5001355
;;^UTILITY(U,$J,358.3,9087,0)
;;=C78.00^^45^431^147
;;^UTILITY(U,$J,358.3,9087,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9087,1,3,0)
;;=3^Malig Neop Lung Unspec,Secondary
;;^UTILITY(U,$J,358.3,9087,1,4,0)
;;=4^C78.00
;;^UTILITY(U,$J,358.3,9087,2)
;;=^5001334
;;^UTILITY(U,$J,358.3,9088,0)
;;=D57.1^^45^431^191
;;^UTILITY(U,$J,358.3,9088,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9088,1,3,0)
;;=3^Sickle-Cell Disease w/o Crisis
;;^UTILITY(U,$J,358.3,9088,1,4,0)
;;=4^D57.1
;;^UTILITY(U,$J,358.3,9088,2)
;;=^5002309
;;^UTILITY(U,$J,358.3,9089,0)
;;=D75.1^^45^431^189
;;^UTILITY(U,$J,358.3,9089,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9089,1,3,0)
;;=3^Polycythemia,Secondary
;;^UTILITY(U,$J,358.3,9089,1,4,0)
;;=4^D75.1
;;^UTILITY(U,$J,358.3,9089,2)
;;=^186856
;;^UTILITY(U,$J,358.3,9090,0)
;;=C90.30^^45^431^202
;;^UTILITY(U,$J,358.3,9090,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9090,1,3,0)
;;=3^Solitary Plasmacytoma,Not in Remission
;;^UTILITY(U,$J,358.3,9090,1,4,0)
;;=4^C90.30
;;^UTILITY(U,$J,358.3,9090,2)
;;=^5001759
;;^UTILITY(U,$J,358.3,9091,0)
;;=D56.3^^45^431^203
;;^UTILITY(U,$J,358.3,9091,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9091,1,3,0)
;;=3^Thalassemia Minor
;;^UTILITY(U,$J,358.3,9091,1,4,0)
;;=4^D56.3
;;^UTILITY(U,$J,358.3,9091,2)
;;=^340497
;;^UTILITY(U,$J,358.3,9092,0)
;;=D56.9^^45^431^204
;;^UTILITY(U,$J,358.3,9092,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9092,1,3,0)
;;=3^Thalassemia,Unspec
;;^UTILITY(U,$J,358.3,9092,1,4,0)
;;=4^D56.9
;;^UTILITY(U,$J,358.3,9092,2)
;;=^340606
;;^UTILITY(U,$J,358.3,9093,0)
;;=D51.2^^45^431^207
;;^UTILITY(U,$J,358.3,9093,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9093,1,3,0)
;;=3^Transcobalamin II Deficiency
;;^UTILITY(U,$J,358.3,9093,1,4,0)
;;=4^D51.2
;;^UTILITY(U,$J,358.3,9093,2)
;;=^5002286
;;^UTILITY(U,$J,358.3,9094,0)
;;=D05.92^^45^431^40
;;^UTILITY(U,$J,358.3,9094,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9094,1,3,0)
;;=3^Carcinoma in Situ Left Breast,Unspec Type
;;^UTILITY(U,$J,358.3,9094,1,4,0)
;;=4^D05.92
;;^UTILITY(U,$J,358.3,9094,2)
;;=^5001937
;;^UTILITY(U,$J,358.3,9095,0)
;;=D05.91^^45^431^42
;;^UTILITY(U,$J,358.3,9095,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9095,1,3,0)
;;=3^Carcinoma in Situ Right Breast,Unspec Type
;;^UTILITY(U,$J,358.3,9095,1,4,0)
;;=4^D05.91
;;^UTILITY(U,$J,358.3,9095,2)
;;=^5001936
;;^UTILITY(U,$J,358.3,9096,0)
;;=D05.90^^45^431^38
;;^UTILITY(U,$J,358.3,9096,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9096,1,3,0)
;;=3^Carcinoma in Situ Breast Unspec,Unspec Type
;;^UTILITY(U,$J,358.3,9096,1,4,0)
;;=4^D05.90
;;^UTILITY(U,$J,358.3,9096,2)
;;=^5001935
;;^UTILITY(U,$J,358.3,9097,0)
;;=D51.0^^45^431^208
;;^UTILITY(U,$J,358.3,9097,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9097,1,3,0)
;;=3^Vitamin B12 Deficiency Anemia d/t Intrinsic Factor Deficiency
;;^UTILITY(U,$J,358.3,9097,1,4,0)
;;=4^D51.0
;;^UTILITY(U,$J,358.3,9097,2)
;;=^5002284
;;^UTILITY(U,$J,358.3,9098,0)
;;=D51.1^^45^431^209
;;^UTILITY(U,$J,358.3,9098,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9098,1,3,0)
;;=3^Vitamin B12 Deficiency Anemia d/t Selective Vit B12 Malabsorp w/ Proteinuria
;;^UTILITY(U,$J,358.3,9098,1,4,0)
;;=4^D51.1
;;^UTILITY(U,$J,358.3,9098,2)
;;=^5002285
;;^UTILITY(U,$J,358.3,9099,0)
;;=D51.9^^45^431^211
;;^UTILITY(U,$J,358.3,9099,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9099,1,3,0)
;;=3^Vitamin B12 Deficiency Anemia,Unspec
;;^UTILITY(U,$J,358.3,9099,1,4,0)
;;=4^D51.9
;;^UTILITY(U,$J,358.3,9099,2)
;;=^5002289
;;^UTILITY(U,$J,358.3,9100,0)
;;=D68.0^^45^431^213
;;^UTILITY(U,$J,358.3,9100,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9100,1,3,0)
;;=3^Von Willebrand's Disease
;;^UTILITY(U,$J,358.3,9100,1,4,0)
;;=4^D68.0
;;^UTILITY(U,$J,358.3,9100,2)
;;=^127267
;;^UTILITY(U,$J,358.3,9101,0)
;;=C88.0^^45^431^214
;;^UTILITY(U,$J,358.3,9101,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9101,1,3,0)
;;=3^Waldenstrom Macroglobulinemia
;;^UTILITY(U,$J,358.3,9101,1,4,0)
;;=4^C88.0
;;^UTILITY(U,$J,358.3,9101,2)
;;=^5001748
;;^UTILITY(U,$J,358.3,9102,0)
;;=C91.02^^45^431^3
;;^UTILITY(U,$J,358.3,9102,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9102,1,3,0)
;;=3^Acute Lymphoblastic Leukemia,In Relapse
;;^UTILITY(U,$J,358.3,9102,1,4,0)
;;=4^C91.02
;;^UTILITY(U,$J,358.3,9102,2)
;;=^5001764
;;^UTILITY(U,$J,358.3,9103,0)
;;=C92.02^^45^431^6
;;^UTILITY(U,$J,358.3,9103,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9103,1,3,0)
;;=3^Acute Myeloblastic Leukemia,In Relapse
;;^UTILITY(U,$J,358.3,9103,1,4,0)
;;=4^C92.02
;;^UTILITY(U,$J,358.3,9103,2)
;;=^5001791
;;^UTILITY(U,$J,358.3,9104,0)
;;=D09.3^^45^431^50
;;^UTILITY(U,$J,358.3,9104,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9104,1,3,0)
;;=3^Carcinoma in Situ of Thyroid/Oth Endocrine Glands
;;^UTILITY(U,$J,358.3,9104,1,4,0)
;;=4^D09.3
;;^UTILITY(U,$J,358.3,9104,2)
;;=^5001955
;;^UTILITY(U,$J,358.3,9105,0)
;;=C22.0^^45^431^91
;;^UTILITY(U,$J,358.3,9105,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9105,1,3,0)
;;=3^Hepatocellular Carcinoma
;;^UTILITY(U,$J,358.3,9105,1,4,0)
;;=4^C22.0
;;^UTILITY(U,$J,358.3,9105,2)
;;=^5000933
;;^UTILITY(U,$J,358.3,9106,0)
;;=C24.9^^45^431^118
;;^UTILITY(U,$J,358.3,9106,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9106,1,3,0)
;;=3^Malig Neop Biliary Tract,Unspec
;;^UTILITY(U,$J,358.3,9106,1,4,0)
;;=4^C24.9
;;^UTILITY(U,$J,358.3,9106,2)
;;=^5000942
;;^UTILITY(U,$J,358.3,9107,0)
;;=C50.922^^45^431^142
;;^UTILITY(U,$J,358.3,9107,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9107,1,3,0)
;;=3^Malig Neop Left Male Breast,Unspec Site
;;^UTILITY(U,$J,358.3,9107,1,4,0)
;;=4^C50.922
;;^UTILITY(U,$J,358.3,9107,2)
;;=^5133340
;;^UTILITY(U,$J,358.3,9108,0)
;;=C34.91^^45^431^160
;;^UTILITY(U,$J,358.3,9108,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9108,1,3,0)
;;=3^Malig Neop Right Bronchus/Lung,Unspec Part
;;^UTILITY(U,$J,358.3,9108,1,4,0)
;;=4^C34.91
;;^UTILITY(U,$J,358.3,9108,2)
;;=^5000967
;;^UTILITY(U,$J,358.3,9109,0)
;;=C50.921^^45^431^164
;;^UTILITY(U,$J,358.3,9109,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9109,1,3,0)
;;=3^Malig Neop Right Male Breast,Unspec Site
;;^UTILITY(U,$J,358.3,9109,1,4,0)
;;=4^C50.921
;;^UTILITY(U,$J,358.3,9109,2)
;;=^5001198
;;^UTILITY(U,$J,358.3,9110,0)
;;=C90.02^^45^431^176
;;^UTILITY(U,$J,358.3,9110,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9110,1,3,0)
;;=3^Multiple Myeloma,In Relapse
;;^UTILITY(U,$J,358.3,9110,1,4,0)
;;=4^C90.02
;;^UTILITY(U,$J,358.3,9110,2)
;;=^5001753
;;^UTILITY(U,$J,358.3,9111,0)
;;=D51.9^^45^431^25
;;^UTILITY(U,$J,358.3,9111,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9111,1,3,0)
;;=3^Anemia in Vitamin B12 Deficiency
;;^UTILITY(U,$J,358.3,9111,1,4,0)
;;=4^D51.9
;;^UTILITY(U,$J,358.3,9111,2)
;;=^5002289
;;^UTILITY(U,$J,358.3,9112,0)
;;=C79.51^^45^431^35
;;^UTILITY(U,$J,358.3,9112,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9112,1,3,0)
;;=3^Bone Mets
;;^UTILITY(U,$J,358.3,9112,1,4,0)
;;=4^C79.51
;;^UTILITY(U,$J,358.3,9112,2)
;;=^5001350
;;^UTILITY(U,$J,358.3,9113,0)
;;=C80.1^^45^431^171
;;^UTILITY(U,$J,358.3,9113,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9113,1,3,0)
;;=3^Malig Neop,Primary,Unspec Site
;;^UTILITY(U,$J,358.3,9113,1,4,0)
;;=4^C80.1
;;^UTILITY(U,$J,358.3,9113,2)
;;=^5001389
;;^UTILITY(U,$J,358.3,9114,0)
;;=C80.0^^45^431^172
;;^UTILITY(U,$J,358.3,9114,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9114,1,3,0)
;;=3^Malig Neop,Unspec Primary or Secondary
;;^UTILITY(U,$J,358.3,9114,1,4,0)
;;=4^C80.0
;;^UTILITY(U,$J,358.3,9114,2)
;;=^5001388
;;^UTILITY(U,$J,358.3,9115,0)
;;=E28.39^^45^431^96
;;^UTILITY(U,$J,358.3,9115,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9115,1,3,0)
;;=3^Hypogonadism,Ovarian
;;^UTILITY(U,$J,358.3,9115,1,4,0)
;;=4^E28.39
;;^UTILITY(U,$J,358.3,9115,2)
;;=^5002752
;;^UTILITY(U,$J,358.3,9116,0)
;;=E29.1^^45^431^97
;;^UTILITY(U,$J,358.3,9116,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9116,1,3,0)
;;=3^Hypogonadism,Testicular
;;^UTILITY(U,$J,358.3,9116,1,4,0)
;;=4^E29.1
;;^UTILITY(U,$J,358.3,9116,2)
;;=^5002754
;;^UTILITY(U,$J,358.3,9117,0)
;;=C96.20^^45^431^111
;;^UTILITY(U,$J,358.3,9117,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9117,1,3,0)
;;=3^Malig Mast Cell Neoplasm,Unspec
;;^UTILITY(U,$J,358.3,9117,1,4,0)
;;=4^C96.20
;;^UTILITY(U,$J,358.3,9117,2)
;;=^5151293
;;^UTILITY(U,$J,358.3,9118,0)
;;=C96.22^^45^431^173
;;^UTILITY(U,$J,358.3,9118,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9118,1,3,0)
;;=3^Mast Cell Sarcoma
;;^UTILITY(U,$J,358.3,9118,1,4,0)
;;=4^C96.22
;;^UTILITY(U,$J,358.3,9118,2)
;;=^5151295
;;^UTILITY(U,$J,358.3,9119,0)
;;=D64.9^^45^431^26
;;^UTILITY(U,$J,358.3,9119,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9119,1,3,0)
;;=3^Anemia,Unspec
;;^UTILITY(U,$J,358.3,9119,1,4,0)
;;=4^D64.9
;;^UTILITY(U,$J,358.3,9119,2)
;;=^5002351
;;^UTILITY(U,$J,358.3,9120,0)
;;=D59.10^^45^431^32
;;^UTILITY(U,$J,358.3,9120,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9120,1,3,0)
;;=3^Autoimmune Hemolytic Anemia,Unspec
;;^UTILITY(U,$J,358.3,9120,1,4,0)
;;=4^D59.10
;;^UTILITY(U,$J,358.3,9120,2)
;;=^5159101
;;^UTILITY(U,$J,358.3,9121,0)
;;=D59.11^^45^431^33
;;^UTILITY(U,$J,358.3,9121,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9121,1,3,0)
;;=3^Autoimmune Hemolytic Anemia,Warm
;;^UTILITY(U,$J,358.3,9121,1,4,0)
;;=4^D59.11
;;^UTILITY(U,$J,358.3,9121,2)
;;=^5159102
;;^UTILITY(U,$J,358.3,9122,0)
;;=D59.12^^45^431^29
;;^UTILITY(U,$J,358.3,9122,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9122,1,3,0)
;;=3^Autoimmune Hemolytic Anemia,Cold
;;^UTILITY(U,$J,358.3,9122,1,4,0)
;;=4^D59.12
;;^UTILITY(U,$J,358.3,9122,2)
;;=^5159103
;;^UTILITY(U,$J,358.3,9123,0)
;;=D59.13^^45^431^30
;;^UTILITY(U,$J,358.3,9123,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9123,1,3,0)
;;=3^Autoimmune Hemolytic Anemia,Mixed Type
;;^UTILITY(U,$J,358.3,9123,1,4,0)
;;=4^D59.13
;;^UTILITY(U,$J,358.3,9123,2)
;;=^5159104
;;^UTILITY(U,$J,358.3,9124,0)
;;=D59.19^^45^431^31
;;^UTILITY(U,$J,358.3,9124,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9124,1,3,0)
;;=3^Autoimmune Hemolytic Anemia,Other
;;^UTILITY(U,$J,358.3,9124,1,4,0)
;;=4^D59.19
;;^UTILITY(U,$J,358.3,9124,2)
;;=^5159105
;;^UTILITY(U,$J,358.3,9125,0)
;;=D57.20^^45^431^201
;;^UTILITY(U,$J,358.3,9125,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9125,1,3,0)
;;=3^Sickle-Cell/Hb-C Disease w/o Crisis
;;^UTILITY(U,$J,358.3,9125,1,4,0)
;;=4^D57.20
;;^UTILITY(U,$J,358.3,9125,2)
;;=^330080
;;^UTILITY(U,$J,358.3,9126,0)
;;=D57.211^^45^431^196
;;^UTILITY(U,$J,358.3,9126,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9126,1,3,0)
;;=3^Sickle-Cell/Hb-C Disease w/ Acute Chest Syndrome
;;^UTILITY(U,$J,358.3,9126,1,4,0)
;;=4^D57.211
;;^UTILITY(U,$J,358.3,9126,2)
;;=^5002310
;;^UTILITY(U,$J,358.3,9127,0)
;;=D57.212^^45^431^200
;;^UTILITY(U,$J,358.3,9127,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9127,1,3,0)
;;=3^Sickle-Cell/Hb-C Disease w/ Splenic Sequestration
;;^UTILITY(U,$J,358.3,9127,1,4,0)
;;=4^D57.212
;;^UTILITY(U,$J,358.3,9127,2)
;;=^5002311
;;^UTILITY(U,$J,358.3,9128,0)
;;=D57.213^^45^431^197
;;^UTILITY(U,$J,358.3,9128,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9128,1,3,0)
;;=3^Sickle-Cell/Hb-C Disease w/ Cerebral Vascular Involvement
;;^UTILITY(U,$J,358.3,9128,1,4,0)
;;=4^D57.213
;;^UTILITY(U,$J,358.3,9128,2)
;;=^5159080
;;^UTILITY(U,$J,358.3,9129,0)
;;=D57.218^^45^431^198
;;^UTILITY(U,$J,358.3,9129,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9129,1,3,0)
;;=3^Sickle-Cell/Hb-C Disease w/ Crisis w/ Oth Complication
;;^UTILITY(U,$J,358.3,9129,1,4,0)
;;=4^D57.218
;;^UTILITY(U,$J,358.3,9129,2)
;;=^5159081
;;^UTILITY(U,$J,358.3,9130,0)
;;=D57.219^^45^431^199
;;^UTILITY(U,$J,358.3,9130,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9130,1,3,0)
;;=3^Sickle-Cell/Hb-C Disease w/ Crisis,Unspec
;;^UTILITY(U,$J,358.3,9130,1,4,0)
;;=4^D57.219
;;^UTILITY(U,$J,358.3,9130,2)
;;=^5002312
;;^UTILITY(U,$J,358.3,9131,0)
;;=D57.3^^45^431^195
;;^UTILITY(U,$J,358.3,9131,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9131,1,3,0)
;;=3^Sickle-Cell Trait
;;^UTILITY(U,$J,358.3,9131,1,4,0)
;;=4^D57.3
;;^UTILITY(U,$J,358.3,9131,2)
;;=^5002313
;;^UTILITY(U,$J,358.3,9132,0)
;;=D57.40^^45^431^192
;;^UTILITY(U,$J,358.3,9132,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9132,1,3,0)
;;=3^Sickle-Cell Thalassemia w/o Crisis
;;^UTILITY(U,$J,358.3,9132,1,4,0)
;;=4^D57.40
;;^UTILITY(U,$J,358.3,9132,2)
;;=^329908
;;^UTILITY(U,$J,358.3,9133,0)
;;=D57.411^^45^431^193
;;^UTILITY(U,$J,358.3,9133,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9133,1,3,0)
;;=3^Sickle-Cell Thalassemia,Unspec w/ Acute Chest Syndrome
;;^UTILITY(U,$J,358.3,9133,1,4,0)
;;=4^D57.411
;;^UTILITY(U,$J,358.3,9133,2)
;;=^5002314
;;^UTILITY(U,$J,358.3,9134,0)
;;=D57.412^^45^431^194
;;^UTILITY(U,$J,358.3,9134,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9134,1,3,0)
;;=3^Sickle-Cell Thalassemia,Unspec w/ Splenic Sequestration
;;^UTILITY(U,$J,358.3,9134,1,4,0)
;;=4^D57.412
;;^UTILITY(U,$J,358.3,9134,2)
;;=^5002315
;;^UTILITY(U,$J,358.3,9135,0)
;;=M31.10^^45^431^215
;;^UTILITY(U,$J,358.3,9135,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9135,1,3,0)
;;=3^Thrombotic Microangiopathy,Unspec
;;^UTILITY(U,$J,358.3,9135,1,4,0)
;;=4^M31.10
;;^UTILITY(U,$J,358.3,9135,2)
;;=^5161189
;;^UTILITY(U,$J,358.3,9136,0)
;;=Z85.818^^45^432^86
;;^UTILITY(U,$J,358.3,9136,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9136,1,3,0)
;;=3^Personal Hx of Malig Neop of Lip,Oral Cavity & Pharynx
;;^UTILITY(U,$J,358.3,9136,1,4,0)
;;=4^Z85.818
;;^UTILITY(U,$J,358.3,9136,2)
;;=^5063439
;;^UTILITY(U,$J,358.3,9137,0)
;;=Z85.819^^45^432^87
;;^UTILITY(U,$J,358.3,9137,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9137,1,3,0)
;;=3^Personal Hx of Malig Neop of Lip,Oral Cavity & Pharynx,Unspec
;;^UTILITY(U,$J,358.3,9137,1,4,0)
;;=4^Z85.819
;;^UTILITY(U,$J,358.3,9137,2)
;;=^5063440
;;^UTILITY(U,$J,358.3,9138,0)
;;=Z85.01^^45^432^82
;;^UTILITY(U,$J,358.3,9138,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9138,1,3,0)
;;=3^Personal Hx of Malig Neop of Esophagus
;;^UTILITY(U,$J,358.3,9138,1,4,0)
;;=4^Z85.01
;;^UTILITY(U,$J,358.3,9138,2)
;;=^5063395
;;^UTILITY(U,$J,358.3,9139,0)
;;=Z85.028^^45^432^93
;;^UTILITY(U,$J,358.3,9139,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9139,1,3,0)
;;=3^Personal Hx of Malig Neop of Stomach
;;^UTILITY(U,$J,358.3,9139,1,4,0)
;;=4^Z85.028
;;^UTILITY(U,$J,358.3,9139,2)
;;=^5063397
;;^UTILITY(U,$J,358.3,9140,0)
;;=Z85.038^^45^432^84
;;^UTILITY(U,$J,358.3,9140,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9140,1,3,0)
;;=3^Personal Hx of Malig Neop of Large Intestine
;;^UTILITY(U,$J,358.3,9140,1,4,0)
;;=4^Z85.038
;;^UTILITY(U,$J,358.3,9140,2)
;;=^5063399
;;^UTILITY(U,$J,358.3,9141,0)
;;=Z85.048^^45^432^91
;;^UTILITY(U,$J,358.3,9141,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9141,1,3,0)
;;=3^Personal Hx of Malig Neop of Rectum,Rectosig Junct & Anus
;;^UTILITY(U,$J,358.3,9141,1,4,0)
;;=4^Z85.048
;;^UTILITY(U,$J,358.3,9141,2)
;;=^5063401
;;^UTILITY(U,$J,358.3,9142,0)
;;=Z85.118^^45^432^80
;;^UTILITY(U,$J,358.3,9142,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9142,1,3,0)
;;=3^Personal Hx of Malig Neop of Bronchus & Lung
;;^UTILITY(U,$J,358.3,9142,1,4,0)
;;=4^Z85.118
;;^UTILITY(U,$J,358.3,9142,2)
;;=^5063408
;;^UTILITY(U,$J,358.3,9143,0)
;;=Z85.21^^45^432^85
;;^UTILITY(U,$J,358.3,9143,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9143,1,3,0)
;;=3^Personal Hx of Malig Neop of Larynx
;;^UTILITY(U,$J,358.3,9143,1,4,0)
;;=4^Z85.21
;;^UTILITY(U,$J,358.3,9143,2)
;;=^5063411
;;^UTILITY(U,$J,358.3,9144,0)
;;=Z85.3^^45^432^79
;;^UTILITY(U,$J,358.3,9144,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9144,1,3,0)
;;=3^Personal Hx of Malig Neop of Breast
;;^UTILITY(U,$J,358.3,9144,1,4,0)
;;=4^Z85.3
;;^UTILITY(U,$J,358.3,9144,2)
;;=^5063416
;;^UTILITY(U,$J,358.3,9145,0)
;;=Z85.41^^45^432^81
;;^UTILITY(U,$J,358.3,9145,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9145,1,3,0)
;;=3^Personal Hx of Malig Neop of Cervix Uteri
;;^UTILITY(U,$J,358.3,9145,1,4,0)
;;=4^Z85.41
;;^UTILITY(U,$J,358.3,9145,2)
;;=^5063418
;;^UTILITY(U,$J,358.3,9146,0)
;;=Z85.43^^45^432^89
;;^UTILITY(U,$J,358.3,9146,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9146,1,3,0)
;;=3^Personal Hx of Malig Neop of Ovary
;;^UTILITY(U,$J,358.3,9146,1,4,0)
;;=4^Z85.43
;;^UTILITY(U,$J,358.3,9146,2)
;;=^5063420
;;^UTILITY(U,$J,358.3,9147,0)
;;=Z85.46^^45^432^90
;;^UTILITY(U,$J,358.3,9147,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9147,1,3,0)
;;=3^Personal Hx of Malig Neop of Prostate
;;^UTILITY(U,$J,358.3,9147,1,4,0)
;;=4^Z85.46
;;^UTILITY(U,$J,358.3,9147,2)
;;=^5063423
;;^UTILITY(U,$J,358.3,9148,0)
;;=Z85.47^^45^432^94
;;^UTILITY(U,$J,358.3,9148,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9148,1,3,0)
;;=3^Personal Hx of Malig Neop of Testis
;;^UTILITY(U,$J,358.3,9148,1,4,0)
;;=4^Z85.47
;;^UTILITY(U,$J,358.3,9148,2)
;;=^5063424
;;^UTILITY(U,$J,358.3,9149,0)
;;=Z85.51^^45^432^78
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HIBDEI03S 19795 printed Apr 09, 2024@21:58:55 Page 2
IBDEI03S ; ; 01-AUG-2022
+1 ;;3.0;IB ENCOUNTER FORM IMP/EXP;;AUG 01, 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,9080,1,4,0)
+2 ;;=4^C79.31
+3 ;;^UTILITY(U,$J,358.3,9080,2)
+4 ;;=^5001347
+5 ;;^UTILITY(U,$J,358.3,9081,0)
+6 ;;=C79.72^^45^431^137
+7 ;;^UTILITY(U,$J,358.3,9081,1,0)
+8 ;;=^358.31IA^4^2
+9 ;;^UTILITY(U,$J,358.3,9081,1,3,0)
+10 ;;=3^Malig Neop Left Adrenal Gland,Secondary
+11 ;;^UTILITY(U,$J,358.3,9081,1,4,0)
+12 ;;=4^C79.72
+13 ;;^UTILITY(U,$J,358.3,9081,2)
+14 ;;=^5001357
+15 ;;^UTILITY(U,$J,358.3,9082,0)
+16 ;;=C78.02^^45^431^141
+17 ;;^UTILITY(U,$J,358.3,9082,1,0)
+18 ;;=^358.31IA^4^2
+19 ;;^UTILITY(U,$J,358.3,9082,1,3,0)
+20 ;;=3^Malig Neop Left Lung,Secondary
+21 ;;^UTILITY(U,$J,358.3,9082,1,4,0)
+22 ;;=4^C78.02
+23 ;;^UTILITY(U,$J,358.3,9082,2)
+24 ;;=^5001336
+25 ;;^UTILITY(U,$J,358.3,9083,0)
+26 ;;=C78.7^^45^431^146
+27 ;;^UTILITY(U,$J,358.3,9083,1,0)
+28 ;;=^358.31IA^4^2
+29 ;;^UTILITY(U,$J,358.3,9083,1,3,0)
+30 ;;=3^Malig Neop Liver/Intrahepatic Bile Duct,Secondary
+31 ;;^UTILITY(U,$J,358.3,9083,1,4,0)
+32 ;;=4^C78.7
+33 ;;^UTILITY(U,$J,358.3,9083,2)
+34 ;;=^5001339
+35 ;;^UTILITY(U,$J,358.3,9084,0)
+36 ;;=C79.71^^45^431^159
+37 ;;^UTILITY(U,$J,358.3,9084,1,0)
+38 ;;=^358.31IA^4^2
+39 ;;^UTILITY(U,$J,358.3,9084,1,3,0)
+40 ;;=3^Malig Neop Right Adrenal Gland,Secondary
+41 ;;^UTILITY(U,$J,358.3,9084,1,4,0)
+42 ;;=4^C79.71
+43 ;;^UTILITY(U,$J,358.3,9084,2)
+44 ;;=^5001356
+45 ;;^UTILITY(U,$J,358.3,9085,0)
+46 ;;=C78.01^^45^431^163
+47 ;;^UTILITY(U,$J,358.3,9085,1,0)
+48 ;;=^358.31IA^4^2
+49 ;;^UTILITY(U,$J,358.3,9085,1,3,0)
+50 ;;=3^Malig Neop Right Lung,Secondary
+51 ;;^UTILITY(U,$J,358.3,9085,1,4,0)
+52 ;;=4^C78.01
+53 ;;^UTILITY(U,$J,358.3,9085,2)
+54 ;;=^5001335
+55 ;;^UTILITY(U,$J,358.3,9086,0)
+56 ;;=C79.70^^45^431^114
+57 ;;^UTILITY(U,$J,358.3,9086,1,0)
+58 ;;=^358.31IA^4^2
+59 ;;^UTILITY(U,$J,358.3,9086,1,3,0)
+60 ;;=3^Malig Neop Adrenal Gland Unspec,Secondary
+61 ;;^UTILITY(U,$J,358.3,9086,1,4,0)
+62 ;;=4^C79.70
+63 ;;^UTILITY(U,$J,358.3,9086,2)
+64 ;;=^5001355
+65 ;;^UTILITY(U,$J,358.3,9087,0)
+66 ;;=C78.00^^45^431^147
+67 ;;^UTILITY(U,$J,358.3,9087,1,0)
+68 ;;=^358.31IA^4^2
+69 ;;^UTILITY(U,$J,358.3,9087,1,3,0)
+70 ;;=3^Malig Neop Lung Unspec,Secondary
+71 ;;^UTILITY(U,$J,358.3,9087,1,4,0)
+72 ;;=4^C78.00
+73 ;;^UTILITY(U,$J,358.3,9087,2)
+74 ;;=^5001334
+75 ;;^UTILITY(U,$J,358.3,9088,0)
+76 ;;=D57.1^^45^431^191
+77 ;;^UTILITY(U,$J,358.3,9088,1,0)
+78 ;;=^358.31IA^4^2
+79 ;;^UTILITY(U,$J,358.3,9088,1,3,0)
+80 ;;=3^Sickle-Cell Disease w/o Crisis
+81 ;;^UTILITY(U,$J,358.3,9088,1,4,0)
+82 ;;=4^D57.1
+83 ;;^UTILITY(U,$J,358.3,9088,2)
+84 ;;=^5002309
+85 ;;^UTILITY(U,$J,358.3,9089,0)
+86 ;;=D75.1^^45^431^189
+87 ;;^UTILITY(U,$J,358.3,9089,1,0)
+88 ;;=^358.31IA^4^2
+89 ;;^UTILITY(U,$J,358.3,9089,1,3,0)
+90 ;;=3^Polycythemia,Secondary
+91 ;;^UTILITY(U,$J,358.3,9089,1,4,0)
+92 ;;=4^D75.1
+93 ;;^UTILITY(U,$J,358.3,9089,2)
+94 ;;=^186856
+95 ;;^UTILITY(U,$J,358.3,9090,0)
+96 ;;=C90.30^^45^431^202
+97 ;;^UTILITY(U,$J,358.3,9090,1,0)
+98 ;;=^358.31IA^4^2
+99 ;;^UTILITY(U,$J,358.3,9090,1,3,0)
+100 ;;=3^Solitary Plasmacytoma,Not in Remission
+101 ;;^UTILITY(U,$J,358.3,9090,1,4,0)
+102 ;;=4^C90.30
+103 ;;^UTILITY(U,$J,358.3,9090,2)
+104 ;;=^5001759
+105 ;;^UTILITY(U,$J,358.3,9091,0)
+106 ;;=D56.3^^45^431^203
+107 ;;^UTILITY(U,$J,358.3,9091,1,0)
+108 ;;=^358.31IA^4^2
+109 ;;^UTILITY(U,$J,358.3,9091,1,3,0)
+110 ;;=3^Thalassemia Minor
+111 ;;^UTILITY(U,$J,358.3,9091,1,4,0)
+112 ;;=4^D56.3
+113 ;;^UTILITY(U,$J,358.3,9091,2)
+114 ;;=^340497
+115 ;;^UTILITY(U,$J,358.3,9092,0)
+116 ;;=D56.9^^45^431^204
+117 ;;^UTILITY(U,$J,358.3,9092,1,0)
+118 ;;=^358.31IA^4^2
+119 ;;^UTILITY(U,$J,358.3,9092,1,3,0)
+120 ;;=3^Thalassemia,Unspec
+121 ;;^UTILITY(U,$J,358.3,9092,1,4,0)
+122 ;;=4^D56.9
+123 ;;^UTILITY(U,$J,358.3,9092,2)
+124 ;;=^340606
+125 ;;^UTILITY(U,$J,358.3,9093,0)
+126 ;;=D51.2^^45^431^207
+127 ;;^UTILITY(U,$J,358.3,9093,1,0)
+128 ;;=^358.31IA^4^2
+129 ;;^UTILITY(U,$J,358.3,9093,1,3,0)
+130 ;;=3^Transcobalamin II Deficiency
+131 ;;^UTILITY(U,$J,358.3,9093,1,4,0)
+132 ;;=4^D51.2
+133 ;;^UTILITY(U,$J,358.3,9093,2)
+134 ;;=^5002286
+135 ;;^UTILITY(U,$J,358.3,9094,0)
+136 ;;=D05.92^^45^431^40
+137 ;;^UTILITY(U,$J,358.3,9094,1,0)
+138 ;;=^358.31IA^4^2
+139 ;;^UTILITY(U,$J,358.3,9094,1,3,0)
+140 ;;=3^Carcinoma in Situ Left Breast,Unspec Type
+141 ;;^UTILITY(U,$J,358.3,9094,1,4,0)
+142 ;;=4^D05.92
+143 ;;^UTILITY(U,$J,358.3,9094,2)
+144 ;;=^5001937
+145 ;;^UTILITY(U,$J,358.3,9095,0)
+146 ;;=D05.91^^45^431^42
+147 ;;^UTILITY(U,$J,358.3,9095,1,0)
+148 ;;=^358.31IA^4^2
+149 ;;^UTILITY(U,$J,358.3,9095,1,3,0)
+150 ;;=3^Carcinoma in Situ Right Breast,Unspec Type
+151 ;;^UTILITY(U,$J,358.3,9095,1,4,0)
+152 ;;=4^D05.91
+153 ;;^UTILITY(U,$J,358.3,9095,2)
+154 ;;=^5001936
+155 ;;^UTILITY(U,$J,358.3,9096,0)
+156 ;;=D05.90^^45^431^38
+157 ;;^UTILITY(U,$J,358.3,9096,1,0)
+158 ;;=^358.31IA^4^2
+159 ;;^UTILITY(U,$J,358.3,9096,1,3,0)
+160 ;;=3^Carcinoma in Situ Breast Unspec,Unspec Type
+161 ;;^UTILITY(U,$J,358.3,9096,1,4,0)
+162 ;;=4^D05.90
+163 ;;^UTILITY(U,$J,358.3,9096,2)
+164 ;;=^5001935
+165 ;;^UTILITY(U,$J,358.3,9097,0)
+166 ;;=D51.0^^45^431^208
+167 ;;^UTILITY(U,$J,358.3,9097,1,0)
+168 ;;=^358.31IA^4^2
+169 ;;^UTILITY(U,$J,358.3,9097,1,3,0)
+170 ;;=3^Vitamin B12 Deficiency Anemia d/t Intrinsic Factor Deficiency
+171 ;;^UTILITY(U,$J,358.3,9097,1,4,0)
+172 ;;=4^D51.0
+173 ;;^UTILITY(U,$J,358.3,9097,2)
+174 ;;=^5002284
+175 ;;^UTILITY(U,$J,358.3,9098,0)
+176 ;;=D51.1^^45^431^209
+177 ;;^UTILITY(U,$J,358.3,9098,1,0)
+178 ;;=^358.31IA^4^2
+179 ;;^UTILITY(U,$J,358.3,9098,1,3,0)
+180 ;;=3^Vitamin B12 Deficiency Anemia d/t Selective Vit B12 Malabsorp w/ Proteinuria
+181 ;;^UTILITY(U,$J,358.3,9098,1,4,0)
+182 ;;=4^D51.1
+183 ;;^UTILITY(U,$J,358.3,9098,2)
+184 ;;=^5002285
+185 ;;^UTILITY(U,$J,358.3,9099,0)
+186 ;;=D51.9^^45^431^211
+187 ;;^UTILITY(U,$J,358.3,9099,1,0)
+188 ;;=^358.31IA^4^2
+189 ;;^UTILITY(U,$J,358.3,9099,1,3,0)
+190 ;;=3^Vitamin B12 Deficiency Anemia,Unspec
+191 ;;^UTILITY(U,$J,358.3,9099,1,4,0)
+192 ;;=4^D51.9
+193 ;;^UTILITY(U,$J,358.3,9099,2)
+194 ;;=^5002289
+195 ;;^UTILITY(U,$J,358.3,9100,0)
+196 ;;=D68.0^^45^431^213
+197 ;;^UTILITY(U,$J,358.3,9100,1,0)
+198 ;;=^358.31IA^4^2
+199 ;;^UTILITY(U,$J,358.3,9100,1,3,0)
+200 ;;=3^Von Willebrand's Disease
+201 ;;^UTILITY(U,$J,358.3,9100,1,4,0)
+202 ;;=4^D68.0
+203 ;;^UTILITY(U,$J,358.3,9100,2)
+204 ;;=^127267
+205 ;;^UTILITY(U,$J,358.3,9101,0)
+206 ;;=C88.0^^45^431^214
+207 ;;^UTILITY(U,$J,358.3,9101,1,0)
+208 ;;=^358.31IA^4^2
+209 ;;^UTILITY(U,$J,358.3,9101,1,3,0)
+210 ;;=3^Waldenstrom Macroglobulinemia
+211 ;;^UTILITY(U,$J,358.3,9101,1,4,0)
+212 ;;=4^C88.0
+213 ;;^UTILITY(U,$J,358.3,9101,2)
+214 ;;=^5001748
+215 ;;^UTILITY(U,$J,358.3,9102,0)
+216 ;;=C91.02^^45^431^3
+217 ;;^UTILITY(U,$J,358.3,9102,1,0)
+218 ;;=^358.31IA^4^2
+219 ;;^UTILITY(U,$J,358.3,9102,1,3,0)
+220 ;;=3^Acute Lymphoblastic Leukemia,In Relapse
+221 ;;^UTILITY(U,$J,358.3,9102,1,4,0)
+222 ;;=4^C91.02
+223 ;;^UTILITY(U,$J,358.3,9102,2)
+224 ;;=^5001764
+225 ;;^UTILITY(U,$J,358.3,9103,0)
+226 ;;=C92.02^^45^431^6
+227 ;;^UTILITY(U,$J,358.3,9103,1,0)
+228 ;;=^358.31IA^4^2
+229 ;;^UTILITY(U,$J,358.3,9103,1,3,0)
+230 ;;=3^Acute Myeloblastic Leukemia,In Relapse
+231 ;;^UTILITY(U,$J,358.3,9103,1,4,0)
+232 ;;=4^C92.02
+233 ;;^UTILITY(U,$J,358.3,9103,2)
+234 ;;=^5001791
+235 ;;^UTILITY(U,$J,358.3,9104,0)
+236 ;;=D09.3^^45^431^50
+237 ;;^UTILITY(U,$J,358.3,9104,1,0)
+238 ;;=^358.31IA^4^2
+239 ;;^UTILITY(U,$J,358.3,9104,1,3,0)
+240 ;;=3^Carcinoma in Situ of Thyroid/Oth Endocrine Glands
+241 ;;^UTILITY(U,$J,358.3,9104,1,4,0)
+242 ;;=4^D09.3
+243 ;;^UTILITY(U,$J,358.3,9104,2)
+244 ;;=^5001955
+245 ;;^UTILITY(U,$J,358.3,9105,0)
+246 ;;=C22.0^^45^431^91
+247 ;;^UTILITY(U,$J,358.3,9105,1,0)
+248 ;;=^358.31IA^4^2
+249 ;;^UTILITY(U,$J,358.3,9105,1,3,0)
+250 ;;=3^Hepatocellular Carcinoma
+251 ;;^UTILITY(U,$J,358.3,9105,1,4,0)
+252 ;;=4^C22.0
+253 ;;^UTILITY(U,$J,358.3,9105,2)
+254 ;;=^5000933
+255 ;;^UTILITY(U,$J,358.3,9106,0)
+256 ;;=C24.9^^45^431^118
+257 ;;^UTILITY(U,$J,358.3,9106,1,0)
+258 ;;=^358.31IA^4^2
+259 ;;^UTILITY(U,$J,358.3,9106,1,3,0)
+260 ;;=3^Malig Neop Biliary Tract,Unspec
+261 ;;^UTILITY(U,$J,358.3,9106,1,4,0)
+262 ;;=4^C24.9
+263 ;;^UTILITY(U,$J,358.3,9106,2)
+264 ;;=^5000942
+265 ;;^UTILITY(U,$J,358.3,9107,0)
+266 ;;=C50.922^^45^431^142
+267 ;;^UTILITY(U,$J,358.3,9107,1,0)
+268 ;;=^358.31IA^4^2
+269 ;;^UTILITY(U,$J,358.3,9107,1,3,0)
+270 ;;=3^Malig Neop Left Male Breast,Unspec Site
+271 ;;^UTILITY(U,$J,358.3,9107,1,4,0)
+272 ;;=4^C50.922
+273 ;;^UTILITY(U,$J,358.3,9107,2)
+274 ;;=^5133340
+275 ;;^UTILITY(U,$J,358.3,9108,0)
+276 ;;=C34.91^^45^431^160
+277 ;;^UTILITY(U,$J,358.3,9108,1,0)
+278 ;;=^358.31IA^4^2
+279 ;;^UTILITY(U,$J,358.3,9108,1,3,0)
+280 ;;=3^Malig Neop Right Bronchus/Lung,Unspec Part
+281 ;;^UTILITY(U,$J,358.3,9108,1,4,0)
+282 ;;=4^C34.91
+283 ;;^UTILITY(U,$J,358.3,9108,2)
+284 ;;=^5000967
+285 ;;^UTILITY(U,$J,358.3,9109,0)
+286 ;;=C50.921^^45^431^164
+287 ;;^UTILITY(U,$J,358.3,9109,1,0)
+288 ;;=^358.31IA^4^2
+289 ;;^UTILITY(U,$J,358.3,9109,1,3,0)
+290 ;;=3^Malig Neop Right Male Breast,Unspec Site
+291 ;;^UTILITY(U,$J,358.3,9109,1,4,0)
+292 ;;=4^C50.921
+293 ;;^UTILITY(U,$J,358.3,9109,2)
+294 ;;=^5001198
+295 ;;^UTILITY(U,$J,358.3,9110,0)
+296 ;;=C90.02^^45^431^176
+297 ;;^UTILITY(U,$J,358.3,9110,1,0)
+298 ;;=^358.31IA^4^2
+299 ;;^UTILITY(U,$J,358.3,9110,1,3,0)
+300 ;;=3^Multiple Myeloma,In Relapse
+301 ;;^UTILITY(U,$J,358.3,9110,1,4,0)
+302 ;;=4^C90.02
+303 ;;^UTILITY(U,$J,358.3,9110,2)
+304 ;;=^5001753
+305 ;;^UTILITY(U,$J,358.3,9111,0)
+306 ;;=D51.9^^45^431^25
+307 ;;^UTILITY(U,$J,358.3,9111,1,0)
+308 ;;=^358.31IA^4^2
+309 ;;^UTILITY(U,$J,358.3,9111,1,3,0)
+310 ;;=3^Anemia in Vitamin B12 Deficiency
+311 ;;^UTILITY(U,$J,358.3,9111,1,4,0)
+312 ;;=4^D51.9
+313 ;;^UTILITY(U,$J,358.3,9111,2)
+314 ;;=^5002289
+315 ;;^UTILITY(U,$J,358.3,9112,0)
+316 ;;=C79.51^^45^431^35
+317 ;;^UTILITY(U,$J,358.3,9112,1,0)
+318 ;;=^358.31IA^4^2
+319 ;;^UTILITY(U,$J,358.3,9112,1,3,0)
+320 ;;=3^Bone Mets
+321 ;;^UTILITY(U,$J,358.3,9112,1,4,0)
+322 ;;=4^C79.51
+323 ;;^UTILITY(U,$J,358.3,9112,2)
+324 ;;=^5001350
+325 ;;^UTILITY(U,$J,358.3,9113,0)
+326 ;;=C80.1^^45^431^171
+327 ;;^UTILITY(U,$J,358.3,9113,1,0)
+328 ;;=^358.31IA^4^2
+329 ;;^UTILITY(U,$J,358.3,9113,1,3,0)
+330 ;;=3^Malig Neop,Primary,Unspec Site
+331 ;;^UTILITY(U,$J,358.3,9113,1,4,0)
+332 ;;=4^C80.1
+333 ;;^UTILITY(U,$J,358.3,9113,2)
+334 ;;=^5001389
+335 ;;^UTILITY(U,$J,358.3,9114,0)
+336 ;;=C80.0^^45^431^172
+337 ;;^UTILITY(U,$J,358.3,9114,1,0)
+338 ;;=^358.31IA^4^2
+339 ;;^UTILITY(U,$J,358.3,9114,1,3,0)
+340 ;;=3^Malig Neop,Unspec Primary or Secondary
+341 ;;^UTILITY(U,$J,358.3,9114,1,4,0)
+342 ;;=4^C80.0
+343 ;;^UTILITY(U,$J,358.3,9114,2)
+344 ;;=^5001388
+345 ;;^UTILITY(U,$J,358.3,9115,0)
+346 ;;=E28.39^^45^431^96
+347 ;;^UTILITY(U,$J,358.3,9115,1,0)
+348 ;;=^358.31IA^4^2
+349 ;;^UTILITY(U,$J,358.3,9115,1,3,0)
+350 ;;=3^Hypogonadism,Ovarian
+351 ;;^UTILITY(U,$J,358.3,9115,1,4,0)
+352 ;;=4^E28.39
+353 ;;^UTILITY(U,$J,358.3,9115,2)
+354 ;;=^5002752
+355 ;;^UTILITY(U,$J,358.3,9116,0)
+356 ;;=E29.1^^45^431^97
+357 ;;^UTILITY(U,$J,358.3,9116,1,0)
+358 ;;=^358.31IA^4^2
+359 ;;^UTILITY(U,$J,358.3,9116,1,3,0)
+360 ;;=3^Hypogonadism,Testicular
+361 ;;^UTILITY(U,$J,358.3,9116,1,4,0)
+362 ;;=4^E29.1
+363 ;;^UTILITY(U,$J,358.3,9116,2)
+364 ;;=^5002754
+365 ;;^UTILITY(U,$J,358.3,9117,0)
+366 ;;=C96.20^^45^431^111
+367 ;;^UTILITY(U,$J,358.3,9117,1,0)
+368 ;;=^358.31IA^4^2
+369 ;;^UTILITY(U,$J,358.3,9117,1,3,0)
+370 ;;=3^Malig Mast Cell Neoplasm,Unspec
+371 ;;^UTILITY(U,$J,358.3,9117,1,4,0)
+372 ;;=4^C96.20
+373 ;;^UTILITY(U,$J,358.3,9117,2)
+374 ;;=^5151293
+375 ;;^UTILITY(U,$J,358.3,9118,0)
+376 ;;=C96.22^^45^431^173
+377 ;;^UTILITY(U,$J,358.3,9118,1,0)
+378 ;;=^358.31IA^4^2
+379 ;;^UTILITY(U,$J,358.3,9118,1,3,0)
+380 ;;=3^Mast Cell Sarcoma
+381 ;;^UTILITY(U,$J,358.3,9118,1,4,0)
+382 ;;=4^C96.22
+383 ;;^UTILITY(U,$J,358.3,9118,2)
+384 ;;=^5151295
+385 ;;^UTILITY(U,$J,358.3,9119,0)
+386 ;;=D64.9^^45^431^26
+387 ;;^UTILITY(U,$J,358.3,9119,1,0)
+388 ;;=^358.31IA^4^2
+389 ;;^UTILITY(U,$J,358.3,9119,1,3,0)
+390 ;;=3^Anemia,Unspec
+391 ;;^UTILITY(U,$J,358.3,9119,1,4,0)
+392 ;;=4^D64.9
+393 ;;^UTILITY(U,$J,358.3,9119,2)
+394 ;;=^5002351
+395 ;;^UTILITY(U,$J,358.3,9120,0)
+396 ;;=D59.10^^45^431^32
+397 ;;^UTILITY(U,$J,358.3,9120,1,0)
+398 ;;=^358.31IA^4^2
+399 ;;^UTILITY(U,$J,358.3,9120,1,3,0)
+400 ;;=3^Autoimmune Hemolytic Anemia,Unspec
+401 ;;^UTILITY(U,$J,358.3,9120,1,4,0)
+402 ;;=4^D59.10
+403 ;;^UTILITY(U,$J,358.3,9120,2)
+404 ;;=^5159101
+405 ;;^UTILITY(U,$J,358.3,9121,0)
+406 ;;=D59.11^^45^431^33
+407 ;;^UTILITY(U,$J,358.3,9121,1,0)
+408 ;;=^358.31IA^4^2
+409 ;;^UTILITY(U,$J,358.3,9121,1,3,0)
+410 ;;=3^Autoimmune Hemolytic Anemia,Warm
+411 ;;^UTILITY(U,$J,358.3,9121,1,4,0)
+412 ;;=4^D59.11
+413 ;;^UTILITY(U,$J,358.3,9121,2)
+414 ;;=^5159102
+415 ;;^UTILITY(U,$J,358.3,9122,0)
+416 ;;=D59.12^^45^431^29
+417 ;;^UTILITY(U,$J,358.3,9122,1,0)
+418 ;;=^358.31IA^4^2
+419 ;;^UTILITY(U,$J,358.3,9122,1,3,0)
+420 ;;=3^Autoimmune Hemolytic Anemia,Cold
+421 ;;^UTILITY(U,$J,358.3,9122,1,4,0)
+422 ;;=4^D59.12
+423 ;;^UTILITY(U,$J,358.3,9122,2)
+424 ;;=^5159103
+425 ;;^UTILITY(U,$J,358.3,9123,0)
+426 ;;=D59.13^^45^431^30
+427 ;;^UTILITY(U,$J,358.3,9123,1,0)
+428 ;;=^358.31IA^4^2
+429 ;;^UTILITY(U,$J,358.3,9123,1,3,0)
+430 ;;=3^Autoimmune Hemolytic Anemia,Mixed Type
+431 ;;^UTILITY(U,$J,358.3,9123,1,4,0)
+432 ;;=4^D59.13
+433 ;;^UTILITY(U,$J,358.3,9123,2)
+434 ;;=^5159104
+435 ;;^UTILITY(U,$J,358.3,9124,0)
+436 ;;=D59.19^^45^431^31
+437 ;;^UTILITY(U,$J,358.3,9124,1,0)
+438 ;;=^358.31IA^4^2
+439 ;;^UTILITY(U,$J,358.3,9124,1,3,0)
+440 ;;=3^Autoimmune Hemolytic Anemia,Other
+441 ;;^UTILITY(U,$J,358.3,9124,1,4,0)
+442 ;;=4^D59.19
+443 ;;^UTILITY(U,$J,358.3,9124,2)
+444 ;;=^5159105
+445 ;;^UTILITY(U,$J,358.3,9125,0)
+446 ;;=D57.20^^45^431^201
+447 ;;^UTILITY(U,$J,358.3,9125,1,0)
+448 ;;=^358.31IA^4^2
+449 ;;^UTILITY(U,$J,358.3,9125,1,3,0)
+450 ;;=3^Sickle-Cell/Hb-C Disease w/o Crisis
+451 ;;^UTILITY(U,$J,358.3,9125,1,4,0)
+452 ;;=4^D57.20
+453 ;;^UTILITY(U,$J,358.3,9125,2)
+454 ;;=^330080
+455 ;;^UTILITY(U,$J,358.3,9126,0)
+456 ;;=D57.211^^45^431^196
+457 ;;^UTILITY(U,$J,358.3,9126,1,0)
+458 ;;=^358.31IA^4^2
+459 ;;^UTILITY(U,$J,358.3,9126,1,3,0)
+460 ;;=3^Sickle-Cell/Hb-C Disease w/ Acute Chest Syndrome
+461 ;;^UTILITY(U,$J,358.3,9126,1,4,0)
+462 ;;=4^D57.211
+463 ;;^UTILITY(U,$J,358.3,9126,2)
+464 ;;=^5002310
+465 ;;^UTILITY(U,$J,358.3,9127,0)
+466 ;;=D57.212^^45^431^200
+467 ;;^UTILITY(U,$J,358.3,9127,1,0)
+468 ;;=^358.31IA^4^2
+469 ;;^UTILITY(U,$J,358.3,9127,1,3,0)
+470 ;;=3^Sickle-Cell/Hb-C Disease w/ Splenic Sequestration
+471 ;;^UTILITY(U,$J,358.3,9127,1,4,0)
+472 ;;=4^D57.212
+473 ;;^UTILITY(U,$J,358.3,9127,2)
+474 ;;=^5002311
+475 ;;^UTILITY(U,$J,358.3,9128,0)
+476 ;;=D57.213^^45^431^197
+477 ;;^UTILITY(U,$J,358.3,9128,1,0)
+478 ;;=^358.31IA^4^2
+479 ;;^UTILITY(U,$J,358.3,9128,1,3,0)
+480 ;;=3^Sickle-Cell/Hb-C Disease w/ Cerebral Vascular Involvement
+481 ;;^UTILITY(U,$J,358.3,9128,1,4,0)
+482 ;;=4^D57.213
+483 ;;^UTILITY(U,$J,358.3,9128,2)
+484 ;;=^5159080
+485 ;;^UTILITY(U,$J,358.3,9129,0)
+486 ;;=D57.218^^45^431^198
+487 ;;^UTILITY(U,$J,358.3,9129,1,0)
+488 ;;=^358.31IA^4^2
+489 ;;^UTILITY(U,$J,358.3,9129,1,3,0)
+490 ;;=3^Sickle-Cell/Hb-C Disease w/ Crisis w/ Oth Complication
+491 ;;^UTILITY(U,$J,358.3,9129,1,4,0)
+492 ;;=4^D57.218
+493 ;;^UTILITY(U,$J,358.3,9129,2)
+494 ;;=^5159081
+495 ;;^UTILITY(U,$J,358.3,9130,0)
+496 ;;=D57.219^^45^431^199
+497 ;;^UTILITY(U,$J,358.3,9130,1,0)
+498 ;;=^358.31IA^4^2
+499 ;;^UTILITY(U,$J,358.3,9130,1,3,0)
+500 ;;=3^Sickle-Cell/Hb-C Disease w/ Crisis,Unspec
+501 ;;^UTILITY(U,$J,358.3,9130,1,4,0)
+502 ;;=4^D57.219
+503 ;;^UTILITY(U,$J,358.3,9130,2)
+504 ;;=^5002312
+505 ;;^UTILITY(U,$J,358.3,9131,0)
+506 ;;=D57.3^^45^431^195
+507 ;;^UTILITY(U,$J,358.3,9131,1,0)
+508 ;;=^358.31IA^4^2
+509 ;;^UTILITY(U,$J,358.3,9131,1,3,0)
+510 ;;=3^Sickle-Cell Trait
+511 ;;^UTILITY(U,$J,358.3,9131,1,4,0)
+512 ;;=4^D57.3
+513 ;;^UTILITY(U,$J,358.3,9131,2)
+514 ;;=^5002313
+515 ;;^UTILITY(U,$J,358.3,9132,0)
+516 ;;=D57.40^^45^431^192
+517 ;;^UTILITY(U,$J,358.3,9132,1,0)
+518 ;;=^358.31IA^4^2
+519 ;;^UTILITY(U,$J,358.3,9132,1,3,0)
+520 ;;=3^Sickle-Cell Thalassemia w/o Crisis
+521 ;;^UTILITY(U,$J,358.3,9132,1,4,0)
+522 ;;=4^D57.40
+523 ;;^UTILITY(U,$J,358.3,9132,2)
+524 ;;=^329908
+525 ;;^UTILITY(U,$J,358.3,9133,0)
+526 ;;=D57.411^^45^431^193
+527 ;;^UTILITY(U,$J,358.3,9133,1,0)
+528 ;;=^358.31IA^4^2
+529 ;;^UTILITY(U,$J,358.3,9133,1,3,0)
+530 ;;=3^Sickle-Cell Thalassemia,Unspec w/ Acute Chest Syndrome
+531 ;;^UTILITY(U,$J,358.3,9133,1,4,0)
+532 ;;=4^D57.411
+533 ;;^UTILITY(U,$J,358.3,9133,2)
+534 ;;=^5002314
+535 ;;^UTILITY(U,$J,358.3,9134,0)
+536 ;;=D57.412^^45^431^194
+537 ;;^UTILITY(U,$J,358.3,9134,1,0)
+538 ;;=^358.31IA^4^2
+539 ;;^UTILITY(U,$J,358.3,9134,1,3,0)
+540 ;;=3^Sickle-Cell Thalassemia,Unspec w/ Splenic Sequestration
+541 ;;^UTILITY(U,$J,358.3,9134,1,4,0)
+542 ;;=4^D57.412
+543 ;;^UTILITY(U,$J,358.3,9134,2)
+544 ;;=^5002315
+545 ;;^UTILITY(U,$J,358.3,9135,0)
+546 ;;=M31.10^^45^431^215
+547 ;;^UTILITY(U,$J,358.3,9135,1,0)
+548 ;;=^358.31IA^4^2
+549 ;;^UTILITY(U,$J,358.3,9135,1,3,0)
+550 ;;=3^Thrombotic Microangiopathy,Unspec
+551 ;;^UTILITY(U,$J,358.3,9135,1,4,0)
+552 ;;=4^M31.10
+553 ;;^UTILITY(U,$J,358.3,9135,2)
+554 ;;=^5161189
+555 ;;^UTILITY(U,$J,358.3,9136,0)
+556 ;;=Z85.818^^45^432^86
+557 ;;^UTILITY(U,$J,358.3,9136,1,0)
+558 ;;=^358.31IA^4^2
+559 ;;^UTILITY(U,$J,358.3,9136,1,3,0)
+560 ;;=3^Personal Hx of Malig Neop of Lip,Oral Cavity & Pharynx
+561 ;;^UTILITY(U,$J,358.3,9136,1,4,0)
+562 ;;=4^Z85.818
+563 ;;^UTILITY(U,$J,358.3,9136,2)
+564 ;;=^5063439
+565 ;;^UTILITY(U,$J,358.3,9137,0)
+566 ;;=Z85.819^^45^432^87
+567 ;;^UTILITY(U,$J,358.3,9137,1,0)
+568 ;;=^358.31IA^4^2
+569 ;;^UTILITY(U,$J,358.3,9137,1,3,0)
+570 ;;=3^Personal Hx of Malig Neop of Lip,Oral Cavity & Pharynx,Unspec
+571 ;;^UTILITY(U,$J,358.3,9137,1,4,0)
+572 ;;=4^Z85.819
+573 ;;^UTILITY(U,$J,358.3,9137,2)
+574 ;;=^5063440
+575 ;;^UTILITY(U,$J,358.3,9138,0)
+576 ;;=Z85.01^^45^432^82
+577 ;;^UTILITY(U,$J,358.3,9138,1,0)
+578 ;;=^358.31IA^4^2
+579 ;;^UTILITY(U,$J,358.3,9138,1,3,0)
+580 ;;=3^Personal Hx of Malig Neop of Esophagus
+581 ;;^UTILITY(U,$J,358.3,9138,1,4,0)
+582 ;;=4^Z85.01
+583 ;;^UTILITY(U,$J,358.3,9138,2)
+584 ;;=^5063395
+585 ;;^UTILITY(U,$J,358.3,9139,0)
+586 ;;=Z85.028^^45^432^93
+587 ;;^UTILITY(U,$J,358.3,9139,1,0)
+588 ;;=^358.31IA^4^2
+589 ;;^UTILITY(U,$J,358.3,9139,1,3,0)
+590 ;;=3^Personal Hx of Malig Neop of Stomach
+591 ;;^UTILITY(U,$J,358.3,9139,1,4,0)
+592 ;;=4^Z85.028
+593 ;;^UTILITY(U,$J,358.3,9139,2)
+594 ;;=^5063397
+595 ;;^UTILITY(U,$J,358.3,9140,0)
+596 ;;=Z85.038^^45^432^84
+597 ;;^UTILITY(U,$J,358.3,9140,1,0)
+598 ;;=^358.31IA^4^2
+599 ;;^UTILITY(U,$J,358.3,9140,1,3,0)
+600 ;;=3^Personal Hx of Malig Neop of Large Intestine
+601 ;;^UTILITY(U,$J,358.3,9140,1,4,0)
+602 ;;=4^Z85.038
+603 ;;^UTILITY(U,$J,358.3,9140,2)
+604 ;;=^5063399
+605 ;;^UTILITY(U,$J,358.3,9141,0)
+606 ;;=Z85.048^^45^432^91
+607 ;;^UTILITY(U,$J,358.3,9141,1,0)
+608 ;;=^358.31IA^4^2
+609 ;;^UTILITY(U,$J,358.3,9141,1,3,0)
+610 ;;=3^Personal Hx of Malig Neop of Rectum,Rectosig Junct & Anus
+611 ;;^UTILITY(U,$J,358.3,9141,1,4,0)
+612 ;;=4^Z85.048
+613 ;;^UTILITY(U,$J,358.3,9141,2)
+614 ;;=^5063401
+615 ;;^UTILITY(U,$J,358.3,9142,0)
+616 ;;=Z85.118^^45^432^80
+617 ;;^UTILITY(U,$J,358.3,9142,1,0)
+618 ;;=^358.31IA^4^2
+619 ;;^UTILITY(U,$J,358.3,9142,1,3,0)
+620 ;;=3^Personal Hx of Malig Neop of Bronchus & Lung
+621 ;;^UTILITY(U,$J,358.3,9142,1,4,0)
+622 ;;=4^Z85.118
+623 ;;^UTILITY(U,$J,358.3,9142,2)
+624 ;;=^5063408
+625 ;;^UTILITY(U,$J,358.3,9143,0)
+626 ;;=Z85.21^^45^432^85
+627 ;;^UTILITY(U,$J,358.3,9143,1,0)
+628 ;;=^358.31IA^4^2
+629 ;;^UTILITY(U,$J,358.3,9143,1,3,0)
+630 ;;=3^Personal Hx of Malig Neop of Larynx
+631 ;;^UTILITY(U,$J,358.3,9143,1,4,0)
+632 ;;=4^Z85.21
+633 ;;^UTILITY(U,$J,358.3,9143,2)
+634 ;;=^5063411
+635 ;;^UTILITY(U,$J,358.3,9144,0)
+636 ;;=Z85.3^^45^432^79
+637 ;;^UTILITY(U,$J,358.3,9144,1,0)
+638 ;;=^358.31IA^4^2
+639 ;;^UTILITY(U,$J,358.3,9144,1,3,0)
+640 ;;=3^Personal Hx of Malig Neop of Breast
+641 ;;^UTILITY(U,$J,358.3,9144,1,4,0)
+642 ;;=4^Z85.3
+643 ;;^UTILITY(U,$J,358.3,9144,2)
+644 ;;=^5063416
+645 ;;^UTILITY(U,$J,358.3,9145,0)
+646 ;;=Z85.41^^45^432^81
+647 ;;^UTILITY(U,$J,358.3,9145,1,0)
+648 ;;=^358.31IA^4^2
+649 ;;^UTILITY(U,$J,358.3,9145,1,3,0)
+650 ;;=3^Personal Hx of Malig Neop of Cervix Uteri
+651 ;;^UTILITY(U,$J,358.3,9145,1,4,0)
+652 ;;=4^Z85.41
+653 ;;^UTILITY(U,$J,358.3,9145,2)
+654 ;;=^5063418
+655 ;;^UTILITY(U,$J,358.3,9146,0)
+656 ;;=Z85.43^^45^432^89
+657 ;;^UTILITY(U,$J,358.3,9146,1,0)
+658 ;;=^358.31IA^4^2
+659 ;;^UTILITY(U,$J,358.3,9146,1,3,0)
+660 ;;=3^Personal Hx of Malig Neop of Ovary
+661 ;;^UTILITY(U,$J,358.3,9146,1,4,0)
+662 ;;=4^Z85.43
+663 ;;^UTILITY(U,$J,358.3,9146,2)
+664 ;;=^5063420
+665 ;;^UTILITY(U,$J,358.3,9147,0)
+666 ;;=Z85.46^^45^432^90
+667 ;;^UTILITY(U,$J,358.3,9147,1,0)
+668 ;;=^358.31IA^4^2
+669 ;;^UTILITY(U,$J,358.3,9147,1,3,0)
+670 ;;=3^Personal Hx of Malig Neop of Prostate
+671 ;;^UTILITY(U,$J,358.3,9147,1,4,0)
+672 ;;=4^Z85.46
+673 ;;^UTILITY(U,$J,358.3,9147,2)
+674 ;;=^5063423
+675 ;;^UTILITY(U,$J,358.3,9148,0)
+676 ;;=Z85.47^^45^432^94
+677 ;;^UTILITY(U,$J,358.3,9148,1,0)
+678 ;;=^358.31IA^4^2
+679 ;;^UTILITY(U,$J,358.3,9148,1,3,0)
+680 ;;=3^Personal Hx of Malig Neop of Testis
+681 ;;^UTILITY(U,$J,358.3,9148,1,4,0)
+682 ;;=4^Z85.47
+683 ;;^UTILITY(U,$J,358.3,9148,2)
+684 ;;=^5063424
+685 ;;^UTILITY(U,$J,358.3,9149,0)
+686 ;;=Z85.51^^45^432^78
