IBDEI06C ; ; 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,15368,2)
;;=^5001908
;;^UTILITY(U,$J,358.3,15369,0)
;;=C45.0^^56^644^175
;;^UTILITY(U,$J,358.3,15369,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15369,1,3,0)
;;=3^Mesothelioma of Pleura
;;^UTILITY(U,$J,358.3,15369,1,4,0)
;;=4^C45.0
;;^UTILITY(U,$J,358.3,15369,2)
;;=^5001095
;;^UTILITY(U,$J,358.3,15370,0)
;;=C90.01^^56^644^177
;;^UTILITY(U,$J,358.3,15370,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15370,1,3,0)
;;=3^Multiple Myeloma,In Remission
;;^UTILITY(U,$J,358.3,15370,1,4,0)
;;=4^C90.01
;;^UTILITY(U,$J,358.3,15370,2)
;;=^267515
;;^UTILITY(U,$J,358.3,15371,0)
;;=C90.00^^56^644^178
;;^UTILITY(U,$J,358.3,15371,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15371,1,3,0)
;;=3^Multiple Myeloma,Not in Remission
;;^UTILITY(U,$J,358.3,15371,1,4,0)
;;=4^C90.00
;;^UTILITY(U,$J,358.3,15371,2)
;;=^5001752
;;^UTILITY(U,$J,358.3,15372,0)
;;=C94.6^^56^644^179
;;^UTILITY(U,$J,358.3,15372,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15372,1,3,0)
;;=3^Myelodysplastic Disease NEC
;;^UTILITY(U,$J,358.3,15372,1,4,0)
;;=4^C94.6
;;^UTILITY(U,$J,358.3,15372,2)
;;=^5001846
;;^UTILITY(U,$J,358.3,15373,0)
;;=D61.82^^56^644^180
;;^UTILITY(U,$J,358.3,15373,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15373,1,3,0)
;;=3^Myelophthisis
;;^UTILITY(U,$J,358.3,15373,1,4,0)
;;=4^D61.82
;;^UTILITY(U,$J,358.3,15373,2)
;;=^334037
;;^UTILITY(U,$J,358.3,15374,0)
;;=D47.9^^56^644^181
;;^UTILITY(U,$J,358.3,15374,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15374,1,3,0)
;;=3^Neop Lymphoid,Hematopoietic & Related Tissue,Uncertain Behavior
;;^UTILITY(U,$J,358.3,15374,1,4,0)
;;=4^D47.9
;;^UTILITY(U,$J,358.3,15374,2)
;;=^5002260
;;^UTILITY(U,$J,358.3,15375,0)
;;=D53.9^^56^644^185
;;^UTILITY(U,$J,358.3,15375,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15375,1,3,0)
;;=3^Nutritional Anemia,Unspec
;;^UTILITY(U,$J,358.3,15375,1,4,0)
;;=4^D53.9
;;^UTILITY(U,$J,358.3,15375,2)
;;=^5002298
;;^UTILITY(U,$J,358.3,15376,0)
;;=D47.4^^56^644^186
;;^UTILITY(U,$J,358.3,15376,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15376,1,3,0)
;;=3^Osteomyelofibrosis
;;^UTILITY(U,$J,358.3,15376,1,4,0)
;;=4^D47.4
;;^UTILITY(U,$J,358.3,15376,2)
;;=^5002259
;;^UTILITY(U,$J,358.3,15377,0)
;;=D51.3^^56^644^210
;;^UTILITY(U,$J,358.3,15377,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15377,1,3,0)
;;=3^Vitamin B12 Deficiency Anemia,Other
;;^UTILITY(U,$J,358.3,15377,1,4,0)
;;=4^D51.3
;;^UTILITY(U,$J,358.3,15377,2)
;;=^5002287
;;^UTILITY(U,$J,358.3,15378,0)
;;=D77.^^56^644^62
;;^UTILITY(U,$J,358.3,15378,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15378,1,3,0)
;;=3^Disorder of Blood/Blood-Forming Organs in Diseases Classified Elsewhere,Other
;;^UTILITY(U,$J,358.3,15378,1,4,0)
;;=4^D77.
;;^UTILITY(U,$J,358.3,15378,2)
;;=^5002396
;;^UTILITY(U,$J,358.3,15379,0)
;;=D58.2^^56^644^88
;;^UTILITY(U,$J,358.3,15379,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15379,1,3,0)
;;=3^Hemoglobinopathies,Other
;;^UTILITY(U,$J,358.3,15379,1,4,0)
;;=4^D58.2
;;^UTILITY(U,$J,358.3,15379,2)
;;=^87629
;;^UTILITY(U,$J,358.3,15380,0)
;;=C88.8^^56^644^110
;;^UTILITY(U,$J,358.3,15380,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15380,1,3,0)
;;=3^Malig Immunoproliferative Diseases,Other
;;^UTILITY(U,$J,358.3,15380,1,4,0)
;;=4^C88.8
;;^UTILITY(U,$J,358.3,15380,2)
;;=^5001750
;;^UTILITY(U,$J,358.3,15381,0)
;;=D70.8^^56^644^183
;;^UTILITY(U,$J,358.3,15381,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15381,1,3,0)
;;=3^Neutropenia,Other
;;^UTILITY(U,$J,358.3,15381,1,4,0)
;;=4^D70.8
;;^UTILITY(U,$J,358.3,15381,2)
;;=^334042
;;^UTILITY(U,$J,358.3,15382,0)
;;=D59.4^^56^644^184
;;^UTILITY(U,$J,358.3,15382,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15382,1,3,0)
;;=3^Nonautoimmune Hemolytic Anemias,Other
;;^UTILITY(U,$J,358.3,15382,1,4,0)
;;=4^D59.4
;;^UTILITY(U,$J,358.3,15382,2)
;;=^5002326
;;^UTILITY(U,$J,358.3,15383,0)
;;=D69.59^^56^644^190
;;^UTILITY(U,$J,358.3,15383,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15383,1,3,0)
;;=3^Secondary Thrombocytopenia,Other
;;^UTILITY(U,$J,358.3,15383,1,4,0)
;;=4^D69.59
;;^UTILITY(U,$J,358.3,15383,2)
;;=^5002369
;;^UTILITY(U,$J,358.3,15384,0)
;;=C22.7^^56^644^51
;;^UTILITY(U,$J,358.3,15384,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15384,1,3,0)
;;=3^Carcinomas of Liver,Other Spec
;;^UTILITY(U,$J,358.3,15384,1,4,0)
;;=4^C22.7
;;^UTILITY(U,$J,358.3,15384,2)
;;=^5000938
;;^UTILITY(U,$J,358.3,15385,0)
;;=D75.89^^56^644^61
;;^UTILITY(U,$J,358.3,15385,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15385,1,3,0)
;;=3^Diseases of Blood/Blood-Forming Organs,Other Spec
;;^UTILITY(U,$J,358.3,15385,1,4,0)
;;=4^D75.89
;;^UTILITY(U,$J,358.3,15385,2)
;;=^5002392
;;^UTILITY(U,$J,358.3,15386,0)
;;=D47.Z9^^56^644^182
;;^UTILITY(U,$J,358.3,15386,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15386,1,3,0)
;;=3^Neop Lymphoid,Hematopoietic & Related Tissue,Uncertain Behavior,Other
;;^UTILITY(U,$J,358.3,15386,1,4,0)
;;=4^D47.Z9
;;^UTILITY(U,$J,358.3,15386,2)
;;=^5002262
;;^UTILITY(U,$J,358.3,15387,0)
;;=D05.82^^56^644^39
;;^UTILITY(U,$J,358.3,15387,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15387,1,3,0)
;;=3^Carcinoma in Situ Left Breast,Other Spec Type
;;^UTILITY(U,$J,358.3,15387,1,4,0)
;;=4^D05.82
;;^UTILITY(U,$J,358.3,15387,2)
;;=^5001934
;;^UTILITY(U,$J,358.3,15388,0)
;;=D05.81^^56^644^41
;;^UTILITY(U,$J,358.3,15388,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15388,1,3,0)
;;=3^Carcinoma in Situ Right Breast,Oth Spec Type
;;^UTILITY(U,$J,358.3,15388,1,4,0)
;;=4^D05.81
;;^UTILITY(U,$J,358.3,15388,2)
;;=^5001933
;;^UTILITY(U,$J,358.3,15389,0)
;;=D05.80^^56^644^43
;;^UTILITY(U,$J,358.3,15389,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15389,1,3,0)
;;=3^Carcinoma in Situ Unspec Breast,Oth Spec Type
;;^UTILITY(U,$J,358.3,15389,1,4,0)
;;=4^D05.80
;;^UTILITY(U,$J,358.3,15389,2)
;;=^5001932
;;^UTILITY(U,$J,358.3,15390,0)
;;=D56.8^^56^644^205
;;^UTILITY(U,$J,358.3,15390,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15390,1,3,0)
;;=3^Thalassemias,Other
;;^UTILITY(U,$J,358.3,15390,1,4,0)
;;=4^D56.8
;;^UTILITY(U,$J,358.3,15390,2)
;;=^5002305
;;^UTILITY(U,$J,358.3,15391,0)
;;=C82.89^^56^644^81
;;^UTILITY(U,$J,358.3,15391,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15391,1,3,0)
;;=3^Follicular Lymphoma,Extranodal/Solid Organ Sites,Other Types
;;^UTILITY(U,$J,358.3,15391,1,4,0)
;;=4^C82.89
;;^UTILITY(U,$J,358.3,15391,2)
;;=^5001540
;;^UTILITY(U,$J,358.3,15392,0)
;;=D51.8^^56^644^212
;;^UTILITY(U,$J,358.3,15392,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15392,1,3,0)
;;=3^Vitamin B12 Deficiency Anemias,Other
;;^UTILITY(U,$J,358.3,15392,1,4,0)
;;=4^D51.8
;;^UTILITY(U,$J,358.3,15392,2)
;;=^5002288
;;^UTILITY(U,$J,358.3,15393,0)
;;=I80.9^^56^644^187
;;^UTILITY(U,$J,358.3,15393,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15393,1,3,0)
;;=3^Phlebitis/Thrombophlebitis,Unspec Site
;;^UTILITY(U,$J,358.3,15393,1,4,0)
;;=4^I80.9
;;^UTILITY(U,$J,358.3,15393,2)
;;=^93357
;;^UTILITY(U,$J,358.3,15394,0)
;;=D45.^^56^644^188
;;^UTILITY(U,$J,358.3,15394,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15394,1,3,0)
;;=3^Polycythemia Vera
;;^UTILITY(U,$J,358.3,15394,1,4,0)
;;=4^D45.
;;^UTILITY(U,$J,358.3,15394,2)
;;=^96105
;;^UTILITY(U,$J,358.3,15395,0)
;;=C77.3^^56^644^117
;;^UTILITY(U,$J,358.3,15395,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15395,1,3,0)
;;=3^Malig Neop Axilla/Upper Limb Lymph Nodes,Sec and Unspec
;;^UTILITY(U,$J,358.3,15395,1,4,0)
;;=4^C77.3
;;^UTILITY(U,$J,358.3,15395,2)
;;=^5001330
;;^UTILITY(U,$J,358.3,15396,0)
;;=C77.2^^56^644^133
;;^UTILITY(U,$J,358.3,15396,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15396,1,3,0)
;;=3^Malig Neop Intra-Abdominal Lymph Nodes,Sec and Unspec
;;^UTILITY(U,$J,358.3,15396,1,4,0)
;;=4^C77.2
;;^UTILITY(U,$J,358.3,15396,2)
;;=^267316
;;^UTILITY(U,$J,358.3,15397,0)
;;=C77.1^^56^644^134
;;^UTILITY(U,$J,358.3,15397,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15397,1,3,0)
;;=3^Malig Neop Intrathoracic Lymph Nodes,Sec and Unspec
;;^UTILITY(U,$J,358.3,15397,1,4,0)
;;=4^C77.1
;;^UTILITY(U,$J,358.3,15397,2)
;;=^267315
;;^UTILITY(U,$J,358.3,15398,0)
;;=C77.0^^56^644^150
;;^UTILITY(U,$J,358.3,15398,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15398,1,3,0)
;;=3^Malig Neop Nodes of Head,Face and Neck,Sec and Unspec
;;^UTILITY(U,$J,358.3,15398,1,4,0)
;;=4^C77.0
;;^UTILITY(U,$J,358.3,15398,2)
;;=^5001329
;;^UTILITY(U,$J,358.3,15399,0)
;;=C77.8^^56^644^151
;;^UTILITY(U,$J,358.3,15399,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15399,1,3,0)
;;=3^Malig Neop Nodes of Multiple Regions,Sec and Unspec
;;^UTILITY(U,$J,358.3,15399,1,4,0)
;;=4^C77.8
;;^UTILITY(U,$J,358.3,15399,2)
;;=^5001332
;;^UTILITY(U,$J,358.3,15400,0)
;;=C79.51^^56^644^121
;;^UTILITY(U,$J,358.3,15400,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15400,1,3,0)
;;=3^Malig Neop Bone,Secondary
;;^UTILITY(U,$J,358.3,15400,1,4,0)
;;=4^C79.51
;;^UTILITY(U,$J,358.3,15400,2)
;;=^5001350
;;^UTILITY(U,$J,358.3,15401,0)
;;=C79.52^^56^644^120
;;^UTILITY(U,$J,358.3,15401,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15401,1,3,0)
;;=3^Malig Neop Bone Marrow,Secondary
;;^UTILITY(U,$J,358.3,15401,1,4,0)
;;=4^C79.52
;;^UTILITY(U,$J,358.3,15401,2)
;;=^5001351
;;^UTILITY(U,$J,358.3,15402,0)
;;=C79.31^^56^644^122
;;^UTILITY(U,$J,358.3,15402,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15402,1,3,0)
;;=3^Malig Neop Brain,Secondary
;;^UTILITY(U,$J,358.3,15402,1,4,0)
;;=4^C79.31
;;^UTILITY(U,$J,358.3,15402,2)
;;=^5001347
;;^UTILITY(U,$J,358.3,15403,0)
;;=C79.72^^56^644^137
;;^UTILITY(U,$J,358.3,15403,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15403,1,3,0)
;;=3^Malig Neop Left Adrenal Gland,Secondary
;;^UTILITY(U,$J,358.3,15403,1,4,0)
;;=4^C79.72
;;^UTILITY(U,$J,358.3,15403,2)
;;=^5001357
;;^UTILITY(U,$J,358.3,15404,0)
;;=C78.02^^56^644^141
;;^UTILITY(U,$J,358.3,15404,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15404,1,3,0)
;;=3^Malig Neop Left Lung,Secondary
;;^UTILITY(U,$J,358.3,15404,1,4,0)
;;=4^C78.02
;;^UTILITY(U,$J,358.3,15404,2)
;;=^5001336
;;^UTILITY(U,$J,358.3,15405,0)
;;=C78.7^^56^644^146
;;^UTILITY(U,$J,358.3,15405,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15405,1,3,0)
;;=3^Malig Neop Liver/Intrahepatic Bile Duct,Secondary
;;^UTILITY(U,$J,358.3,15405,1,4,0)
;;=4^C78.7
;;^UTILITY(U,$J,358.3,15405,2)
;;=^5001339
;;^UTILITY(U,$J,358.3,15406,0)
;;=C79.71^^56^644^159
;;^UTILITY(U,$J,358.3,15406,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15406,1,3,0)
;;=3^Malig Neop Right Adrenal Gland,Secondary
;;^UTILITY(U,$J,358.3,15406,1,4,0)
;;=4^C79.71
;;^UTILITY(U,$J,358.3,15406,2)
;;=^5001356
;;^UTILITY(U,$J,358.3,15407,0)
;;=C78.01^^56^644^163
;;^UTILITY(U,$J,358.3,15407,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15407,1,3,0)
;;=3^Malig Neop Right Lung,Secondary
;;^UTILITY(U,$J,358.3,15407,1,4,0)
;;=4^C78.01
;;^UTILITY(U,$J,358.3,15407,2)
;;=^5001335
;;^UTILITY(U,$J,358.3,15408,0)
;;=C79.70^^56^644^114
;;^UTILITY(U,$J,358.3,15408,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15408,1,3,0)
;;=3^Malig Neop Adrenal Gland Unspec,Secondary
;;^UTILITY(U,$J,358.3,15408,1,4,0)
;;=4^C79.70
;;^UTILITY(U,$J,358.3,15408,2)
;;=^5001355
;;^UTILITY(U,$J,358.3,15409,0)
;;=C78.00^^56^644^147
;;^UTILITY(U,$J,358.3,15409,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15409,1,3,0)
;;=3^Malig Neop Lung Unspec,Secondary
;;^UTILITY(U,$J,358.3,15409,1,4,0)
;;=4^C78.00
;;^UTILITY(U,$J,358.3,15409,2)
;;=^5001334
;;^UTILITY(U,$J,358.3,15410,0)
;;=D57.1^^56^644^191
;;^UTILITY(U,$J,358.3,15410,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15410,1,3,0)
;;=3^Sickle-Cell Disease w/o Crisis
;;^UTILITY(U,$J,358.3,15410,1,4,0)
;;=4^D57.1
;;^UTILITY(U,$J,358.3,15410,2)
;;=^5002309
;;^UTILITY(U,$J,358.3,15411,0)
;;=D75.1^^56^644^189
;;^UTILITY(U,$J,358.3,15411,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15411,1,3,0)
;;=3^Polycythemia,Secondary
;;^UTILITY(U,$J,358.3,15411,1,4,0)
;;=4^D75.1
;;^UTILITY(U,$J,358.3,15411,2)
;;=^186856
;;^UTILITY(U,$J,358.3,15412,0)
;;=C90.30^^56^644^202
;;^UTILITY(U,$J,358.3,15412,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15412,1,3,0)
;;=3^Solitary Plasmacytoma,Not in Remission
;;^UTILITY(U,$J,358.3,15412,1,4,0)
;;=4^C90.30
;;^UTILITY(U,$J,358.3,15412,2)
;;=^5001759
;;^UTILITY(U,$J,358.3,15413,0)
;;=D56.3^^56^644^203
;;^UTILITY(U,$J,358.3,15413,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15413,1,3,0)
;;=3^Thalassemia Minor
;;^UTILITY(U,$J,358.3,15413,1,4,0)
;;=4^D56.3
;;^UTILITY(U,$J,358.3,15413,2)
;;=^340497
;;^UTILITY(U,$J,358.3,15414,0)
;;=D56.9^^56^644^204
;;^UTILITY(U,$J,358.3,15414,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15414,1,3,0)
;;=3^Thalassemia,Unspec
;;^UTILITY(U,$J,358.3,15414,1,4,0)
;;=4^D56.9
;;^UTILITY(U,$J,358.3,15414,2)
;;=^340606
;;^UTILITY(U,$J,358.3,15415,0)
;;=D51.2^^56^644^207
;;^UTILITY(U,$J,358.3,15415,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15415,1,3,0)
;;=3^Transcobalamin II Deficiency
;;^UTILITY(U,$J,358.3,15415,1,4,0)
;;=4^D51.2
;;^UTILITY(U,$J,358.3,15415,2)
;;=^5002286
;;^UTILITY(U,$J,358.3,15416,0)
;;=D05.92^^56^644^40
;;^UTILITY(U,$J,358.3,15416,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15416,1,3,0)
;;=3^Carcinoma in Situ Left Breast,Unspec Type
;;^UTILITY(U,$J,358.3,15416,1,4,0)
;;=4^D05.92
;;^UTILITY(U,$J,358.3,15416,2)
;;=^5001937
;;^UTILITY(U,$J,358.3,15417,0)
;;=D05.91^^56^644^42
;;^UTILITY(U,$J,358.3,15417,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15417,1,3,0)
;;=3^Carcinoma in Situ Right Breast,Unspec Type
;;^UTILITY(U,$J,358.3,15417,1,4,0)
;;=4^D05.91
;;^UTILITY(U,$J,358.3,15417,2)
;;=^5001936
;;^UTILITY(U,$J,358.3,15418,0)
;;=D05.90^^56^644^38
;;^UTILITY(U,$J,358.3,15418,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15418,1,3,0)
;;=3^Carcinoma in Situ Breast Unspec,Unspec Type
;;^UTILITY(U,$J,358.3,15418,1,4,0)
;;=4^D05.90
;;^UTILITY(U,$J,358.3,15418,2)
;;=^5001935
;;^UTILITY(U,$J,358.3,15419,0)
;;=D51.0^^56^644^208
;;^UTILITY(U,$J,358.3,15419,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15419,1,3,0)
;;=3^Vitamin B12 Deficiency Anemia d/t Intrinsic Factor Deficiency
;;^UTILITY(U,$J,358.3,15419,1,4,0)
;;=4^D51.0
;;^UTILITY(U,$J,358.3,15419,2)
;;=^5002284
;;^UTILITY(U,$J,358.3,15420,0)
;;=D51.1^^56^644^209
;;^UTILITY(U,$J,358.3,15420,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15420,1,3,0)
;;=3^Vitamin B12 Deficiency Anemia d/t Selective Vit B12 Malabsorp w/ Proteinuria
;;^UTILITY(U,$J,358.3,15420,1,4,0)
;;=4^D51.1
;;^UTILITY(U,$J,358.3,15420,2)
;;=^5002285
;;^UTILITY(U,$J,358.3,15421,0)
;;=D51.9^^56^644^211
;;^UTILITY(U,$J,358.3,15421,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15421,1,3,0)
;;=3^Vitamin B12 Deficiency Anemia,Unspec
;;^UTILITY(U,$J,358.3,15421,1,4,0)
;;=4^D51.9
;;^UTILITY(U,$J,358.3,15421,2)
;;=^5002289
;;^UTILITY(U,$J,358.3,15422,0)
;;=D68.0^^56^644^213
;;^UTILITY(U,$J,358.3,15422,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15422,1,3,0)
;;=3^Von Willebrand's Disease
;;^UTILITY(U,$J,358.3,15422,1,4,0)
;;=4^D68.0
;;^UTILITY(U,$J,358.3,15422,2)
;;=^127267
;;^UTILITY(U,$J,358.3,15423,0)
;;=C88.0^^56^644^214
;;^UTILITY(U,$J,358.3,15423,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15423,1,3,0)
;;=3^Waldenstrom Macroglobulinemia
;;^UTILITY(U,$J,358.3,15423,1,4,0)
;;=4^C88.0
;;^UTILITY(U,$J,358.3,15423,2)
;;=^5001748
;;^UTILITY(U,$J,358.3,15424,0)
;;=C91.02^^56^644^3
;;^UTILITY(U,$J,358.3,15424,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15424,1,3,0)
;;=3^Acute Lymphoblastic Leukemia,In Relapse
;;^UTILITY(U,$J,358.3,15424,1,4,0)
;;=4^C91.02
;;^UTILITY(U,$J,358.3,15424,2)
;;=^5001764
;;^UTILITY(U,$J,358.3,15425,0)
;;=C92.02^^56^644^6
;;^UTILITY(U,$J,358.3,15425,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15425,1,3,0)
;;=3^Acute Myeloblastic Leukemia,In Relapse
;;^UTILITY(U,$J,358.3,15425,1,4,0)
;;=4^C92.02
;;^UTILITY(U,$J,358.3,15425,2)
;;=^5001791
;;^UTILITY(U,$J,358.3,15426,0)
;;=D09.3^^56^644^50
;;^UTILITY(U,$J,358.3,15426,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15426,1,3,0)
;;=3^Carcinoma in Situ of Thyroid/Oth Endocrine Glands
;;^UTILITY(U,$J,358.3,15426,1,4,0)
;;=4^D09.3
;;^UTILITY(U,$J,358.3,15426,2)
;;=^5001955
;;^UTILITY(U,$J,358.3,15427,0)
;;=C22.0^^56^644^91
;;^UTILITY(U,$J,358.3,15427,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15427,1,3,0)
;;=3^Hepatocellular Carcinoma
;;^UTILITY(U,$J,358.3,15427,1,4,0)
;;=4^C22.0
;;^UTILITY(U,$J,358.3,15427,2)
;;=^5000933
;;^UTILITY(U,$J,358.3,15428,0)
;;=C24.9^^56^644^118
;;^UTILITY(U,$J,358.3,15428,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15428,1,3,0)
;;=3^Malig Neop Biliary Tract,Unspec
;;^UTILITY(U,$J,358.3,15428,1,4,0)
;;=4^C24.9
;;^UTILITY(U,$J,358.3,15428,2)
;;=^5000942
;;^UTILITY(U,$J,358.3,15429,0)
;;=C50.922^^56^644^142
;;^UTILITY(U,$J,358.3,15429,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15429,1,3,0)
;;=3^Malig Neop Left Male Breast,Unspec Site
;;^UTILITY(U,$J,358.3,15429,1,4,0)
;;=4^C50.922
;;^UTILITY(U,$J,358.3,15429,2)
;;=^5133340
;;^UTILITY(U,$J,358.3,15430,0)
;;=C34.91^^56^644^160
;;^UTILITY(U,$J,358.3,15430,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15430,1,3,0)
;;=3^Malig Neop Right Bronchus/Lung,Unspec Part
;;^UTILITY(U,$J,358.3,15430,1,4,0)
;;=4^C34.91
;;^UTILITY(U,$J,358.3,15430,2)
;;=^5000967
;;^UTILITY(U,$J,358.3,15431,0)
;;=C50.921^^56^644^164
;;^UTILITY(U,$J,358.3,15431,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15431,1,3,0)
;;=3^Malig Neop Right Male Breast,Unspec Site
;;^UTILITY(U,$J,358.3,15431,1,4,0)
;;=4^C50.921
;;^UTILITY(U,$J,358.3,15431,2)
;;=^5001198
;;^UTILITY(U,$J,358.3,15432,0)
;;=C90.02^^56^644^176
;;^UTILITY(U,$J,358.3,15432,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15432,1,3,0)
;;=3^Multiple Myeloma,In Relapse
;;^UTILITY(U,$J,358.3,15432,1,4,0)
;;=4^C90.02
;;^UTILITY(U,$J,358.3,15432,2)
;;=^5001753
;;^UTILITY(U,$J,358.3,15433,0)
;;=D51.9^^56^644^25
;;^UTILITY(U,$J,358.3,15433,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15433,1,3,0)
;;=3^Anemia in Vitamin B12 Deficiency
;;^UTILITY(U,$J,358.3,15433,1,4,0)
;;=4^D51.9
;;^UTILITY(U,$J,358.3,15433,2)
;;=^5002289
;;^UTILITY(U,$J,358.3,15434,0)
;;=C79.51^^56^644^35
;;^UTILITY(U,$J,358.3,15434,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15434,1,3,0)
;;=3^Bone Mets
;;^UTILITY(U,$J,358.3,15434,1,4,0)
;;=4^C79.51
;;^UTILITY(U,$J,358.3,15434,2)
;;=^5001350
;;^UTILITY(U,$J,358.3,15435,0)
;;=C80.1^^56^644^171
;;^UTILITY(U,$J,358.3,15435,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,15435,1,3,0)
;;=3^Malig Neop,Primary,Unspec Site
;;^UTILITY(U,$J,358.3,15435,1,4,0)
;;=4^C80.1
;;^UTILITY(U,$J,358.3,15435,2)
;;=^5001389
;;^UTILITY(U,$J,358.3,15436,0)
;;=C80.0^^56^644^172
;;^UTILITY(U,$J,358.3,15436,1,0)
;;=^358.31IA^4^2
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HIBDEI06C 19779 printed Sep 23, 2025@19:18:29 Page 2
IBDEI06C ; ; 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,15368,2)
+2 ;;=^5001908
+3 ;;^UTILITY(U,$J,358.3,15369,0)
+4 ;;=C45.0^^56^644^175
+5 ;;^UTILITY(U,$J,358.3,15369,1,0)
+6 ;;=^358.31IA^4^2
+7 ;;^UTILITY(U,$J,358.3,15369,1,3,0)
+8 ;;=3^Mesothelioma of Pleura
+9 ;;^UTILITY(U,$J,358.3,15369,1,4,0)
+10 ;;=4^C45.0
+11 ;;^UTILITY(U,$J,358.3,15369,2)
+12 ;;=^5001095
+13 ;;^UTILITY(U,$J,358.3,15370,0)
+14 ;;=C90.01^^56^644^177
+15 ;;^UTILITY(U,$J,358.3,15370,1,0)
+16 ;;=^358.31IA^4^2
+17 ;;^UTILITY(U,$J,358.3,15370,1,3,0)
+18 ;;=3^Multiple Myeloma,In Remission
+19 ;;^UTILITY(U,$J,358.3,15370,1,4,0)
+20 ;;=4^C90.01
+21 ;;^UTILITY(U,$J,358.3,15370,2)
+22 ;;=^267515
+23 ;;^UTILITY(U,$J,358.3,15371,0)
+24 ;;=C90.00^^56^644^178
+25 ;;^UTILITY(U,$J,358.3,15371,1,0)
+26 ;;=^358.31IA^4^2
+27 ;;^UTILITY(U,$J,358.3,15371,1,3,0)
+28 ;;=3^Multiple Myeloma,Not in Remission
+29 ;;^UTILITY(U,$J,358.3,15371,1,4,0)
+30 ;;=4^C90.00
+31 ;;^UTILITY(U,$J,358.3,15371,2)
+32 ;;=^5001752
+33 ;;^UTILITY(U,$J,358.3,15372,0)
+34 ;;=C94.6^^56^644^179
+35 ;;^UTILITY(U,$J,358.3,15372,1,0)
+36 ;;=^358.31IA^4^2
+37 ;;^UTILITY(U,$J,358.3,15372,1,3,0)
+38 ;;=3^Myelodysplastic Disease NEC
+39 ;;^UTILITY(U,$J,358.3,15372,1,4,0)
+40 ;;=4^C94.6
+41 ;;^UTILITY(U,$J,358.3,15372,2)
+42 ;;=^5001846
+43 ;;^UTILITY(U,$J,358.3,15373,0)
+44 ;;=D61.82^^56^644^180
+45 ;;^UTILITY(U,$J,358.3,15373,1,0)
+46 ;;=^358.31IA^4^2
+47 ;;^UTILITY(U,$J,358.3,15373,1,3,0)
+48 ;;=3^Myelophthisis
+49 ;;^UTILITY(U,$J,358.3,15373,1,4,0)
+50 ;;=4^D61.82
+51 ;;^UTILITY(U,$J,358.3,15373,2)
+52 ;;=^334037
+53 ;;^UTILITY(U,$J,358.3,15374,0)
+54 ;;=D47.9^^56^644^181
+55 ;;^UTILITY(U,$J,358.3,15374,1,0)
+56 ;;=^358.31IA^4^2
+57 ;;^UTILITY(U,$J,358.3,15374,1,3,0)
+58 ;;=3^Neop Lymphoid,Hematopoietic & Related Tissue,Uncertain Behavior
+59 ;;^UTILITY(U,$J,358.3,15374,1,4,0)
+60 ;;=4^D47.9
+61 ;;^UTILITY(U,$J,358.3,15374,2)
+62 ;;=^5002260
+63 ;;^UTILITY(U,$J,358.3,15375,0)
+64 ;;=D53.9^^56^644^185
+65 ;;^UTILITY(U,$J,358.3,15375,1,0)
+66 ;;=^358.31IA^4^2
+67 ;;^UTILITY(U,$J,358.3,15375,1,3,0)
+68 ;;=3^Nutritional Anemia,Unspec
+69 ;;^UTILITY(U,$J,358.3,15375,1,4,0)
+70 ;;=4^D53.9
+71 ;;^UTILITY(U,$J,358.3,15375,2)
+72 ;;=^5002298
+73 ;;^UTILITY(U,$J,358.3,15376,0)
+74 ;;=D47.4^^56^644^186
+75 ;;^UTILITY(U,$J,358.3,15376,1,0)
+76 ;;=^358.31IA^4^2
+77 ;;^UTILITY(U,$J,358.3,15376,1,3,0)
+78 ;;=3^Osteomyelofibrosis
+79 ;;^UTILITY(U,$J,358.3,15376,1,4,0)
+80 ;;=4^D47.4
+81 ;;^UTILITY(U,$J,358.3,15376,2)
+82 ;;=^5002259
+83 ;;^UTILITY(U,$J,358.3,15377,0)
+84 ;;=D51.3^^56^644^210
+85 ;;^UTILITY(U,$J,358.3,15377,1,0)
+86 ;;=^358.31IA^4^2
+87 ;;^UTILITY(U,$J,358.3,15377,1,3,0)
+88 ;;=3^Vitamin B12 Deficiency Anemia,Other
+89 ;;^UTILITY(U,$J,358.3,15377,1,4,0)
+90 ;;=4^D51.3
+91 ;;^UTILITY(U,$J,358.3,15377,2)
+92 ;;=^5002287
+93 ;;^UTILITY(U,$J,358.3,15378,0)
+94 ;;=D77.^^56^644^62
+95 ;;^UTILITY(U,$J,358.3,15378,1,0)
+96 ;;=^358.31IA^4^2
+97 ;;^UTILITY(U,$J,358.3,15378,1,3,0)
+98 ;;=3^Disorder of Blood/Blood-Forming Organs in Diseases Classified Elsewhere,Other
+99 ;;^UTILITY(U,$J,358.3,15378,1,4,0)
+100 ;;=4^D77.
+101 ;;^UTILITY(U,$J,358.3,15378,2)
+102 ;;=^5002396
+103 ;;^UTILITY(U,$J,358.3,15379,0)
+104 ;;=D58.2^^56^644^88
+105 ;;^UTILITY(U,$J,358.3,15379,1,0)
+106 ;;=^358.31IA^4^2
+107 ;;^UTILITY(U,$J,358.3,15379,1,3,0)
+108 ;;=3^Hemoglobinopathies,Other
+109 ;;^UTILITY(U,$J,358.3,15379,1,4,0)
+110 ;;=4^D58.2
+111 ;;^UTILITY(U,$J,358.3,15379,2)
+112 ;;=^87629
+113 ;;^UTILITY(U,$J,358.3,15380,0)
+114 ;;=C88.8^^56^644^110
+115 ;;^UTILITY(U,$J,358.3,15380,1,0)
+116 ;;=^358.31IA^4^2
+117 ;;^UTILITY(U,$J,358.3,15380,1,3,0)
+118 ;;=3^Malig Immunoproliferative Diseases,Other
+119 ;;^UTILITY(U,$J,358.3,15380,1,4,0)
+120 ;;=4^C88.8
+121 ;;^UTILITY(U,$J,358.3,15380,2)
+122 ;;=^5001750
+123 ;;^UTILITY(U,$J,358.3,15381,0)
+124 ;;=D70.8^^56^644^183
+125 ;;^UTILITY(U,$J,358.3,15381,1,0)
+126 ;;=^358.31IA^4^2
+127 ;;^UTILITY(U,$J,358.3,15381,1,3,0)
+128 ;;=3^Neutropenia,Other
+129 ;;^UTILITY(U,$J,358.3,15381,1,4,0)
+130 ;;=4^D70.8
+131 ;;^UTILITY(U,$J,358.3,15381,2)
+132 ;;=^334042
+133 ;;^UTILITY(U,$J,358.3,15382,0)
+134 ;;=D59.4^^56^644^184
+135 ;;^UTILITY(U,$J,358.3,15382,1,0)
+136 ;;=^358.31IA^4^2
+137 ;;^UTILITY(U,$J,358.3,15382,1,3,0)
+138 ;;=3^Nonautoimmune Hemolytic Anemias,Other
+139 ;;^UTILITY(U,$J,358.3,15382,1,4,0)
+140 ;;=4^D59.4
+141 ;;^UTILITY(U,$J,358.3,15382,2)
+142 ;;=^5002326
+143 ;;^UTILITY(U,$J,358.3,15383,0)
+144 ;;=D69.59^^56^644^190
+145 ;;^UTILITY(U,$J,358.3,15383,1,0)
+146 ;;=^358.31IA^4^2
+147 ;;^UTILITY(U,$J,358.3,15383,1,3,0)
+148 ;;=3^Secondary Thrombocytopenia,Other
+149 ;;^UTILITY(U,$J,358.3,15383,1,4,0)
+150 ;;=4^D69.59
+151 ;;^UTILITY(U,$J,358.3,15383,2)
+152 ;;=^5002369
+153 ;;^UTILITY(U,$J,358.3,15384,0)
+154 ;;=C22.7^^56^644^51
+155 ;;^UTILITY(U,$J,358.3,15384,1,0)
+156 ;;=^358.31IA^4^2
+157 ;;^UTILITY(U,$J,358.3,15384,1,3,0)
+158 ;;=3^Carcinomas of Liver,Other Spec
+159 ;;^UTILITY(U,$J,358.3,15384,1,4,0)
+160 ;;=4^C22.7
+161 ;;^UTILITY(U,$J,358.3,15384,2)
+162 ;;=^5000938
+163 ;;^UTILITY(U,$J,358.3,15385,0)
+164 ;;=D75.89^^56^644^61
+165 ;;^UTILITY(U,$J,358.3,15385,1,0)
+166 ;;=^358.31IA^4^2
+167 ;;^UTILITY(U,$J,358.3,15385,1,3,0)
+168 ;;=3^Diseases of Blood/Blood-Forming Organs,Other Spec
+169 ;;^UTILITY(U,$J,358.3,15385,1,4,0)
+170 ;;=4^D75.89
+171 ;;^UTILITY(U,$J,358.3,15385,2)
+172 ;;=^5002392
+173 ;;^UTILITY(U,$J,358.3,15386,0)
+174 ;;=D47.Z9^^56^644^182
+175 ;;^UTILITY(U,$J,358.3,15386,1,0)
+176 ;;=^358.31IA^4^2
+177 ;;^UTILITY(U,$J,358.3,15386,1,3,0)
+178 ;;=3^Neop Lymphoid,Hematopoietic & Related Tissue,Uncertain Behavior,Other
+179 ;;^UTILITY(U,$J,358.3,15386,1,4,0)
+180 ;;=4^D47.Z9
+181 ;;^UTILITY(U,$J,358.3,15386,2)
+182 ;;=^5002262
+183 ;;^UTILITY(U,$J,358.3,15387,0)
+184 ;;=D05.82^^56^644^39
+185 ;;^UTILITY(U,$J,358.3,15387,1,0)
+186 ;;=^358.31IA^4^2
+187 ;;^UTILITY(U,$J,358.3,15387,1,3,0)
+188 ;;=3^Carcinoma in Situ Left Breast,Other Spec Type
+189 ;;^UTILITY(U,$J,358.3,15387,1,4,0)
+190 ;;=4^D05.82
+191 ;;^UTILITY(U,$J,358.3,15387,2)
+192 ;;=^5001934
+193 ;;^UTILITY(U,$J,358.3,15388,0)
+194 ;;=D05.81^^56^644^41
+195 ;;^UTILITY(U,$J,358.3,15388,1,0)
+196 ;;=^358.31IA^4^2
+197 ;;^UTILITY(U,$J,358.3,15388,1,3,0)
+198 ;;=3^Carcinoma in Situ Right Breast,Oth Spec Type
+199 ;;^UTILITY(U,$J,358.3,15388,1,4,0)
+200 ;;=4^D05.81
+201 ;;^UTILITY(U,$J,358.3,15388,2)
+202 ;;=^5001933
+203 ;;^UTILITY(U,$J,358.3,15389,0)
+204 ;;=D05.80^^56^644^43
+205 ;;^UTILITY(U,$J,358.3,15389,1,0)
+206 ;;=^358.31IA^4^2
+207 ;;^UTILITY(U,$J,358.3,15389,1,3,0)
+208 ;;=3^Carcinoma in Situ Unspec Breast,Oth Spec Type
+209 ;;^UTILITY(U,$J,358.3,15389,1,4,0)
+210 ;;=4^D05.80
+211 ;;^UTILITY(U,$J,358.3,15389,2)
+212 ;;=^5001932
+213 ;;^UTILITY(U,$J,358.3,15390,0)
+214 ;;=D56.8^^56^644^205
+215 ;;^UTILITY(U,$J,358.3,15390,1,0)
+216 ;;=^358.31IA^4^2
+217 ;;^UTILITY(U,$J,358.3,15390,1,3,0)
+218 ;;=3^Thalassemias,Other
+219 ;;^UTILITY(U,$J,358.3,15390,1,4,0)
+220 ;;=4^D56.8
+221 ;;^UTILITY(U,$J,358.3,15390,2)
+222 ;;=^5002305
+223 ;;^UTILITY(U,$J,358.3,15391,0)
+224 ;;=C82.89^^56^644^81
+225 ;;^UTILITY(U,$J,358.3,15391,1,0)
+226 ;;=^358.31IA^4^2
+227 ;;^UTILITY(U,$J,358.3,15391,1,3,0)
+228 ;;=3^Follicular Lymphoma,Extranodal/Solid Organ Sites,Other Types
+229 ;;^UTILITY(U,$J,358.3,15391,1,4,0)
+230 ;;=4^C82.89
+231 ;;^UTILITY(U,$J,358.3,15391,2)
+232 ;;=^5001540
+233 ;;^UTILITY(U,$J,358.3,15392,0)
+234 ;;=D51.8^^56^644^212
+235 ;;^UTILITY(U,$J,358.3,15392,1,0)
+236 ;;=^358.31IA^4^2
+237 ;;^UTILITY(U,$J,358.3,15392,1,3,0)
+238 ;;=3^Vitamin B12 Deficiency Anemias,Other
+239 ;;^UTILITY(U,$J,358.3,15392,1,4,0)
+240 ;;=4^D51.8
+241 ;;^UTILITY(U,$J,358.3,15392,2)
+242 ;;=^5002288
+243 ;;^UTILITY(U,$J,358.3,15393,0)
+244 ;;=I80.9^^56^644^187
+245 ;;^UTILITY(U,$J,358.3,15393,1,0)
+246 ;;=^358.31IA^4^2
+247 ;;^UTILITY(U,$J,358.3,15393,1,3,0)
+248 ;;=3^Phlebitis/Thrombophlebitis,Unspec Site
+249 ;;^UTILITY(U,$J,358.3,15393,1,4,0)
+250 ;;=4^I80.9
+251 ;;^UTILITY(U,$J,358.3,15393,2)
+252 ;;=^93357
+253 ;;^UTILITY(U,$J,358.3,15394,0)
+254 ;;=D45.^^56^644^188
+255 ;;^UTILITY(U,$J,358.3,15394,1,0)
+256 ;;=^358.31IA^4^2
+257 ;;^UTILITY(U,$J,358.3,15394,1,3,0)
+258 ;;=3^Polycythemia Vera
+259 ;;^UTILITY(U,$J,358.3,15394,1,4,0)
+260 ;;=4^D45.
+261 ;;^UTILITY(U,$J,358.3,15394,2)
+262 ;;=^96105
+263 ;;^UTILITY(U,$J,358.3,15395,0)
+264 ;;=C77.3^^56^644^117
+265 ;;^UTILITY(U,$J,358.3,15395,1,0)
+266 ;;=^358.31IA^4^2
+267 ;;^UTILITY(U,$J,358.3,15395,1,3,0)
+268 ;;=3^Malig Neop Axilla/Upper Limb Lymph Nodes,Sec and Unspec
+269 ;;^UTILITY(U,$J,358.3,15395,1,4,0)
+270 ;;=4^C77.3
+271 ;;^UTILITY(U,$J,358.3,15395,2)
+272 ;;=^5001330
+273 ;;^UTILITY(U,$J,358.3,15396,0)
+274 ;;=C77.2^^56^644^133
+275 ;;^UTILITY(U,$J,358.3,15396,1,0)
+276 ;;=^358.31IA^4^2
+277 ;;^UTILITY(U,$J,358.3,15396,1,3,0)
+278 ;;=3^Malig Neop Intra-Abdominal Lymph Nodes,Sec and Unspec
+279 ;;^UTILITY(U,$J,358.3,15396,1,4,0)
+280 ;;=4^C77.2
+281 ;;^UTILITY(U,$J,358.3,15396,2)
+282 ;;=^267316
+283 ;;^UTILITY(U,$J,358.3,15397,0)
+284 ;;=C77.1^^56^644^134
+285 ;;^UTILITY(U,$J,358.3,15397,1,0)
+286 ;;=^358.31IA^4^2
+287 ;;^UTILITY(U,$J,358.3,15397,1,3,0)
+288 ;;=3^Malig Neop Intrathoracic Lymph Nodes,Sec and Unspec
+289 ;;^UTILITY(U,$J,358.3,15397,1,4,0)
+290 ;;=4^C77.1
+291 ;;^UTILITY(U,$J,358.3,15397,2)
+292 ;;=^267315
+293 ;;^UTILITY(U,$J,358.3,15398,0)
+294 ;;=C77.0^^56^644^150
+295 ;;^UTILITY(U,$J,358.3,15398,1,0)
+296 ;;=^358.31IA^4^2
+297 ;;^UTILITY(U,$J,358.3,15398,1,3,0)
+298 ;;=3^Malig Neop Nodes of Head,Face and Neck,Sec and Unspec
+299 ;;^UTILITY(U,$J,358.3,15398,1,4,0)
+300 ;;=4^C77.0
+301 ;;^UTILITY(U,$J,358.3,15398,2)
+302 ;;=^5001329
+303 ;;^UTILITY(U,$J,358.3,15399,0)
+304 ;;=C77.8^^56^644^151
+305 ;;^UTILITY(U,$J,358.3,15399,1,0)
+306 ;;=^358.31IA^4^2
+307 ;;^UTILITY(U,$J,358.3,15399,1,3,0)
+308 ;;=3^Malig Neop Nodes of Multiple Regions,Sec and Unspec
+309 ;;^UTILITY(U,$J,358.3,15399,1,4,0)
+310 ;;=4^C77.8
+311 ;;^UTILITY(U,$J,358.3,15399,2)
+312 ;;=^5001332
+313 ;;^UTILITY(U,$J,358.3,15400,0)
+314 ;;=C79.51^^56^644^121
+315 ;;^UTILITY(U,$J,358.3,15400,1,0)
+316 ;;=^358.31IA^4^2
+317 ;;^UTILITY(U,$J,358.3,15400,1,3,0)
+318 ;;=3^Malig Neop Bone,Secondary
+319 ;;^UTILITY(U,$J,358.3,15400,1,4,0)
+320 ;;=4^C79.51
+321 ;;^UTILITY(U,$J,358.3,15400,2)
+322 ;;=^5001350
+323 ;;^UTILITY(U,$J,358.3,15401,0)
+324 ;;=C79.52^^56^644^120
+325 ;;^UTILITY(U,$J,358.3,15401,1,0)
+326 ;;=^358.31IA^4^2
+327 ;;^UTILITY(U,$J,358.3,15401,1,3,0)
+328 ;;=3^Malig Neop Bone Marrow,Secondary
+329 ;;^UTILITY(U,$J,358.3,15401,1,4,0)
+330 ;;=4^C79.52
+331 ;;^UTILITY(U,$J,358.3,15401,2)
+332 ;;=^5001351
+333 ;;^UTILITY(U,$J,358.3,15402,0)
+334 ;;=C79.31^^56^644^122
+335 ;;^UTILITY(U,$J,358.3,15402,1,0)
+336 ;;=^358.31IA^4^2
+337 ;;^UTILITY(U,$J,358.3,15402,1,3,0)
+338 ;;=3^Malig Neop Brain,Secondary
+339 ;;^UTILITY(U,$J,358.3,15402,1,4,0)
+340 ;;=4^C79.31
+341 ;;^UTILITY(U,$J,358.3,15402,2)
+342 ;;=^5001347
+343 ;;^UTILITY(U,$J,358.3,15403,0)
+344 ;;=C79.72^^56^644^137
+345 ;;^UTILITY(U,$J,358.3,15403,1,0)
+346 ;;=^358.31IA^4^2
+347 ;;^UTILITY(U,$J,358.3,15403,1,3,0)
+348 ;;=3^Malig Neop Left Adrenal Gland,Secondary
+349 ;;^UTILITY(U,$J,358.3,15403,1,4,0)
+350 ;;=4^C79.72
+351 ;;^UTILITY(U,$J,358.3,15403,2)
+352 ;;=^5001357
+353 ;;^UTILITY(U,$J,358.3,15404,0)
+354 ;;=C78.02^^56^644^141
+355 ;;^UTILITY(U,$J,358.3,15404,1,0)
+356 ;;=^358.31IA^4^2
+357 ;;^UTILITY(U,$J,358.3,15404,1,3,0)
+358 ;;=3^Malig Neop Left Lung,Secondary
+359 ;;^UTILITY(U,$J,358.3,15404,1,4,0)
+360 ;;=4^C78.02
+361 ;;^UTILITY(U,$J,358.3,15404,2)
+362 ;;=^5001336
+363 ;;^UTILITY(U,$J,358.3,15405,0)
+364 ;;=C78.7^^56^644^146
+365 ;;^UTILITY(U,$J,358.3,15405,1,0)
+366 ;;=^358.31IA^4^2
+367 ;;^UTILITY(U,$J,358.3,15405,1,3,0)
+368 ;;=3^Malig Neop Liver/Intrahepatic Bile Duct,Secondary
+369 ;;^UTILITY(U,$J,358.3,15405,1,4,0)
+370 ;;=4^C78.7
+371 ;;^UTILITY(U,$J,358.3,15405,2)
+372 ;;=^5001339
+373 ;;^UTILITY(U,$J,358.3,15406,0)
+374 ;;=C79.71^^56^644^159
+375 ;;^UTILITY(U,$J,358.3,15406,1,0)
+376 ;;=^358.31IA^4^2
+377 ;;^UTILITY(U,$J,358.3,15406,1,3,0)
+378 ;;=3^Malig Neop Right Adrenal Gland,Secondary
+379 ;;^UTILITY(U,$J,358.3,15406,1,4,0)
+380 ;;=4^C79.71
+381 ;;^UTILITY(U,$J,358.3,15406,2)
+382 ;;=^5001356
+383 ;;^UTILITY(U,$J,358.3,15407,0)
+384 ;;=C78.01^^56^644^163
+385 ;;^UTILITY(U,$J,358.3,15407,1,0)
+386 ;;=^358.31IA^4^2
+387 ;;^UTILITY(U,$J,358.3,15407,1,3,0)
+388 ;;=3^Malig Neop Right Lung,Secondary
+389 ;;^UTILITY(U,$J,358.3,15407,1,4,0)
+390 ;;=4^C78.01
+391 ;;^UTILITY(U,$J,358.3,15407,2)
+392 ;;=^5001335
+393 ;;^UTILITY(U,$J,358.3,15408,0)
+394 ;;=C79.70^^56^644^114
+395 ;;^UTILITY(U,$J,358.3,15408,1,0)
+396 ;;=^358.31IA^4^2
+397 ;;^UTILITY(U,$J,358.3,15408,1,3,0)
+398 ;;=3^Malig Neop Adrenal Gland Unspec,Secondary
+399 ;;^UTILITY(U,$J,358.3,15408,1,4,0)
+400 ;;=4^C79.70
+401 ;;^UTILITY(U,$J,358.3,15408,2)
+402 ;;=^5001355
+403 ;;^UTILITY(U,$J,358.3,15409,0)
+404 ;;=C78.00^^56^644^147
+405 ;;^UTILITY(U,$J,358.3,15409,1,0)
+406 ;;=^358.31IA^4^2
+407 ;;^UTILITY(U,$J,358.3,15409,1,3,0)
+408 ;;=3^Malig Neop Lung Unspec,Secondary
+409 ;;^UTILITY(U,$J,358.3,15409,1,4,0)
+410 ;;=4^C78.00
+411 ;;^UTILITY(U,$J,358.3,15409,2)
+412 ;;=^5001334
+413 ;;^UTILITY(U,$J,358.3,15410,0)
+414 ;;=D57.1^^56^644^191
+415 ;;^UTILITY(U,$J,358.3,15410,1,0)
+416 ;;=^358.31IA^4^2
+417 ;;^UTILITY(U,$J,358.3,15410,1,3,0)
+418 ;;=3^Sickle-Cell Disease w/o Crisis
+419 ;;^UTILITY(U,$J,358.3,15410,1,4,0)
+420 ;;=4^D57.1
+421 ;;^UTILITY(U,$J,358.3,15410,2)
+422 ;;=^5002309
+423 ;;^UTILITY(U,$J,358.3,15411,0)
+424 ;;=D75.1^^56^644^189
+425 ;;^UTILITY(U,$J,358.3,15411,1,0)
+426 ;;=^358.31IA^4^2
+427 ;;^UTILITY(U,$J,358.3,15411,1,3,0)
+428 ;;=3^Polycythemia,Secondary
+429 ;;^UTILITY(U,$J,358.3,15411,1,4,0)
+430 ;;=4^D75.1
+431 ;;^UTILITY(U,$J,358.3,15411,2)
+432 ;;=^186856
+433 ;;^UTILITY(U,$J,358.3,15412,0)
+434 ;;=C90.30^^56^644^202
+435 ;;^UTILITY(U,$J,358.3,15412,1,0)
+436 ;;=^358.31IA^4^2
+437 ;;^UTILITY(U,$J,358.3,15412,1,3,0)
+438 ;;=3^Solitary Plasmacytoma,Not in Remission
+439 ;;^UTILITY(U,$J,358.3,15412,1,4,0)
+440 ;;=4^C90.30
+441 ;;^UTILITY(U,$J,358.3,15412,2)
+442 ;;=^5001759
+443 ;;^UTILITY(U,$J,358.3,15413,0)
+444 ;;=D56.3^^56^644^203
+445 ;;^UTILITY(U,$J,358.3,15413,1,0)
+446 ;;=^358.31IA^4^2
+447 ;;^UTILITY(U,$J,358.3,15413,1,3,0)
+448 ;;=3^Thalassemia Minor
+449 ;;^UTILITY(U,$J,358.3,15413,1,4,0)
+450 ;;=4^D56.3
+451 ;;^UTILITY(U,$J,358.3,15413,2)
+452 ;;=^340497
+453 ;;^UTILITY(U,$J,358.3,15414,0)
+454 ;;=D56.9^^56^644^204
+455 ;;^UTILITY(U,$J,358.3,15414,1,0)
+456 ;;=^358.31IA^4^2
+457 ;;^UTILITY(U,$J,358.3,15414,1,3,0)
+458 ;;=3^Thalassemia,Unspec
+459 ;;^UTILITY(U,$J,358.3,15414,1,4,0)
+460 ;;=4^D56.9
+461 ;;^UTILITY(U,$J,358.3,15414,2)
+462 ;;=^340606
+463 ;;^UTILITY(U,$J,358.3,15415,0)
+464 ;;=D51.2^^56^644^207
+465 ;;^UTILITY(U,$J,358.3,15415,1,0)
+466 ;;=^358.31IA^4^2
+467 ;;^UTILITY(U,$J,358.3,15415,1,3,0)
+468 ;;=3^Transcobalamin II Deficiency
+469 ;;^UTILITY(U,$J,358.3,15415,1,4,0)
+470 ;;=4^D51.2
+471 ;;^UTILITY(U,$J,358.3,15415,2)
+472 ;;=^5002286
+473 ;;^UTILITY(U,$J,358.3,15416,0)
+474 ;;=D05.92^^56^644^40
+475 ;;^UTILITY(U,$J,358.3,15416,1,0)
+476 ;;=^358.31IA^4^2
+477 ;;^UTILITY(U,$J,358.3,15416,1,3,0)
+478 ;;=3^Carcinoma in Situ Left Breast,Unspec Type
+479 ;;^UTILITY(U,$J,358.3,15416,1,4,0)
+480 ;;=4^D05.92
+481 ;;^UTILITY(U,$J,358.3,15416,2)
+482 ;;=^5001937
+483 ;;^UTILITY(U,$J,358.3,15417,0)
+484 ;;=D05.91^^56^644^42
+485 ;;^UTILITY(U,$J,358.3,15417,1,0)
+486 ;;=^358.31IA^4^2
+487 ;;^UTILITY(U,$J,358.3,15417,1,3,0)
+488 ;;=3^Carcinoma in Situ Right Breast,Unspec Type
+489 ;;^UTILITY(U,$J,358.3,15417,1,4,0)
+490 ;;=4^D05.91
+491 ;;^UTILITY(U,$J,358.3,15417,2)
+492 ;;=^5001936
+493 ;;^UTILITY(U,$J,358.3,15418,0)
+494 ;;=D05.90^^56^644^38
+495 ;;^UTILITY(U,$J,358.3,15418,1,0)
+496 ;;=^358.31IA^4^2
+497 ;;^UTILITY(U,$J,358.3,15418,1,3,0)
+498 ;;=3^Carcinoma in Situ Breast Unspec,Unspec Type
+499 ;;^UTILITY(U,$J,358.3,15418,1,4,0)
+500 ;;=4^D05.90
+501 ;;^UTILITY(U,$J,358.3,15418,2)
+502 ;;=^5001935
+503 ;;^UTILITY(U,$J,358.3,15419,0)
+504 ;;=D51.0^^56^644^208
+505 ;;^UTILITY(U,$J,358.3,15419,1,0)
+506 ;;=^358.31IA^4^2
+507 ;;^UTILITY(U,$J,358.3,15419,1,3,0)
+508 ;;=3^Vitamin B12 Deficiency Anemia d/t Intrinsic Factor Deficiency
+509 ;;^UTILITY(U,$J,358.3,15419,1,4,0)
+510 ;;=4^D51.0
+511 ;;^UTILITY(U,$J,358.3,15419,2)
+512 ;;=^5002284
+513 ;;^UTILITY(U,$J,358.3,15420,0)
+514 ;;=D51.1^^56^644^209
+515 ;;^UTILITY(U,$J,358.3,15420,1,0)
+516 ;;=^358.31IA^4^2
+517 ;;^UTILITY(U,$J,358.3,15420,1,3,0)
+518 ;;=3^Vitamin B12 Deficiency Anemia d/t Selective Vit B12 Malabsorp w/ Proteinuria
+519 ;;^UTILITY(U,$J,358.3,15420,1,4,0)
+520 ;;=4^D51.1
+521 ;;^UTILITY(U,$J,358.3,15420,2)
+522 ;;=^5002285
+523 ;;^UTILITY(U,$J,358.3,15421,0)
+524 ;;=D51.9^^56^644^211
+525 ;;^UTILITY(U,$J,358.3,15421,1,0)
+526 ;;=^358.31IA^4^2
+527 ;;^UTILITY(U,$J,358.3,15421,1,3,0)
+528 ;;=3^Vitamin B12 Deficiency Anemia,Unspec
+529 ;;^UTILITY(U,$J,358.3,15421,1,4,0)
+530 ;;=4^D51.9
+531 ;;^UTILITY(U,$J,358.3,15421,2)
+532 ;;=^5002289
+533 ;;^UTILITY(U,$J,358.3,15422,0)
+534 ;;=D68.0^^56^644^213
+535 ;;^UTILITY(U,$J,358.3,15422,1,0)
+536 ;;=^358.31IA^4^2
+537 ;;^UTILITY(U,$J,358.3,15422,1,3,0)
+538 ;;=3^Von Willebrand's Disease
+539 ;;^UTILITY(U,$J,358.3,15422,1,4,0)
+540 ;;=4^D68.0
+541 ;;^UTILITY(U,$J,358.3,15422,2)
+542 ;;=^127267
+543 ;;^UTILITY(U,$J,358.3,15423,0)
+544 ;;=C88.0^^56^644^214
+545 ;;^UTILITY(U,$J,358.3,15423,1,0)
+546 ;;=^358.31IA^4^2
+547 ;;^UTILITY(U,$J,358.3,15423,1,3,0)
+548 ;;=3^Waldenstrom Macroglobulinemia
+549 ;;^UTILITY(U,$J,358.3,15423,1,4,0)
+550 ;;=4^C88.0
+551 ;;^UTILITY(U,$J,358.3,15423,2)
+552 ;;=^5001748
+553 ;;^UTILITY(U,$J,358.3,15424,0)
+554 ;;=C91.02^^56^644^3
+555 ;;^UTILITY(U,$J,358.3,15424,1,0)
+556 ;;=^358.31IA^4^2
+557 ;;^UTILITY(U,$J,358.3,15424,1,3,0)
+558 ;;=3^Acute Lymphoblastic Leukemia,In Relapse
+559 ;;^UTILITY(U,$J,358.3,15424,1,4,0)
+560 ;;=4^C91.02
+561 ;;^UTILITY(U,$J,358.3,15424,2)
+562 ;;=^5001764
+563 ;;^UTILITY(U,$J,358.3,15425,0)
+564 ;;=C92.02^^56^644^6
+565 ;;^UTILITY(U,$J,358.3,15425,1,0)
+566 ;;=^358.31IA^4^2
+567 ;;^UTILITY(U,$J,358.3,15425,1,3,0)
+568 ;;=3^Acute Myeloblastic Leukemia,In Relapse
+569 ;;^UTILITY(U,$J,358.3,15425,1,4,0)
+570 ;;=4^C92.02
+571 ;;^UTILITY(U,$J,358.3,15425,2)
+572 ;;=^5001791
+573 ;;^UTILITY(U,$J,358.3,15426,0)
+574 ;;=D09.3^^56^644^50
+575 ;;^UTILITY(U,$J,358.3,15426,1,0)
+576 ;;=^358.31IA^4^2
+577 ;;^UTILITY(U,$J,358.3,15426,1,3,0)
+578 ;;=3^Carcinoma in Situ of Thyroid/Oth Endocrine Glands
+579 ;;^UTILITY(U,$J,358.3,15426,1,4,0)
+580 ;;=4^D09.3
+581 ;;^UTILITY(U,$J,358.3,15426,2)
+582 ;;=^5001955
+583 ;;^UTILITY(U,$J,358.3,15427,0)
+584 ;;=C22.0^^56^644^91
+585 ;;^UTILITY(U,$J,358.3,15427,1,0)
+586 ;;=^358.31IA^4^2
+587 ;;^UTILITY(U,$J,358.3,15427,1,3,0)
+588 ;;=3^Hepatocellular Carcinoma
+589 ;;^UTILITY(U,$J,358.3,15427,1,4,0)
+590 ;;=4^C22.0
+591 ;;^UTILITY(U,$J,358.3,15427,2)
+592 ;;=^5000933
+593 ;;^UTILITY(U,$J,358.3,15428,0)
+594 ;;=C24.9^^56^644^118
+595 ;;^UTILITY(U,$J,358.3,15428,1,0)
+596 ;;=^358.31IA^4^2
+597 ;;^UTILITY(U,$J,358.3,15428,1,3,0)
+598 ;;=3^Malig Neop Biliary Tract,Unspec
+599 ;;^UTILITY(U,$J,358.3,15428,1,4,0)
+600 ;;=4^C24.9
+601 ;;^UTILITY(U,$J,358.3,15428,2)
+602 ;;=^5000942
+603 ;;^UTILITY(U,$J,358.3,15429,0)
+604 ;;=C50.922^^56^644^142
+605 ;;^UTILITY(U,$J,358.3,15429,1,0)
+606 ;;=^358.31IA^4^2
+607 ;;^UTILITY(U,$J,358.3,15429,1,3,0)
+608 ;;=3^Malig Neop Left Male Breast,Unspec Site
+609 ;;^UTILITY(U,$J,358.3,15429,1,4,0)
+610 ;;=4^C50.922
+611 ;;^UTILITY(U,$J,358.3,15429,2)
+612 ;;=^5133340
+613 ;;^UTILITY(U,$J,358.3,15430,0)
+614 ;;=C34.91^^56^644^160
+615 ;;^UTILITY(U,$J,358.3,15430,1,0)
+616 ;;=^358.31IA^4^2
+617 ;;^UTILITY(U,$J,358.3,15430,1,3,0)
+618 ;;=3^Malig Neop Right Bronchus/Lung,Unspec Part
+619 ;;^UTILITY(U,$J,358.3,15430,1,4,0)
+620 ;;=4^C34.91
+621 ;;^UTILITY(U,$J,358.3,15430,2)
+622 ;;=^5000967
+623 ;;^UTILITY(U,$J,358.3,15431,0)
+624 ;;=C50.921^^56^644^164
+625 ;;^UTILITY(U,$J,358.3,15431,1,0)
+626 ;;=^358.31IA^4^2
+627 ;;^UTILITY(U,$J,358.3,15431,1,3,0)
+628 ;;=3^Malig Neop Right Male Breast,Unspec Site
+629 ;;^UTILITY(U,$J,358.3,15431,1,4,0)
+630 ;;=4^C50.921
+631 ;;^UTILITY(U,$J,358.3,15431,2)
+632 ;;=^5001198
+633 ;;^UTILITY(U,$J,358.3,15432,0)
+634 ;;=C90.02^^56^644^176
+635 ;;^UTILITY(U,$J,358.3,15432,1,0)
+636 ;;=^358.31IA^4^2
+637 ;;^UTILITY(U,$J,358.3,15432,1,3,0)
+638 ;;=3^Multiple Myeloma,In Relapse
+639 ;;^UTILITY(U,$J,358.3,15432,1,4,0)
+640 ;;=4^C90.02
+641 ;;^UTILITY(U,$J,358.3,15432,2)
+642 ;;=^5001753
+643 ;;^UTILITY(U,$J,358.3,15433,0)
+644 ;;=D51.9^^56^644^25
+645 ;;^UTILITY(U,$J,358.3,15433,1,0)
+646 ;;=^358.31IA^4^2
+647 ;;^UTILITY(U,$J,358.3,15433,1,3,0)
+648 ;;=3^Anemia in Vitamin B12 Deficiency
+649 ;;^UTILITY(U,$J,358.3,15433,1,4,0)
+650 ;;=4^D51.9
+651 ;;^UTILITY(U,$J,358.3,15433,2)
+652 ;;=^5002289
+653 ;;^UTILITY(U,$J,358.3,15434,0)
+654 ;;=C79.51^^56^644^35
+655 ;;^UTILITY(U,$J,358.3,15434,1,0)
+656 ;;=^358.31IA^4^2
+657 ;;^UTILITY(U,$J,358.3,15434,1,3,0)
+658 ;;=3^Bone Mets
+659 ;;^UTILITY(U,$J,358.3,15434,1,4,0)
+660 ;;=4^C79.51
+661 ;;^UTILITY(U,$J,358.3,15434,2)
+662 ;;=^5001350
+663 ;;^UTILITY(U,$J,358.3,15435,0)
+664 ;;=C80.1^^56^644^171
+665 ;;^UTILITY(U,$J,358.3,15435,1,0)
+666 ;;=^358.31IA^4^2
+667 ;;^UTILITY(U,$J,358.3,15435,1,3,0)
+668 ;;=3^Malig Neop,Primary,Unspec Site
+669 ;;^UTILITY(U,$J,358.3,15435,1,4,0)
+670 ;;=4^C80.1
+671 ;;^UTILITY(U,$J,358.3,15435,2)
+672 ;;=^5001389
+673 ;;^UTILITY(U,$J,358.3,15436,0)
+674 ;;=C80.0^^56^644^172
+675 ;;^UTILITY(U,$J,358.3,15436,1,0)
+676 ;;=^358.31IA^4^2
