IBDEI0B0 ; ; 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,26982,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,26982,1,1,0)
;;=1^G0182
;;^UTILITY(U,$J,358.3,26982,1,2,0)
;;=2^Hospice Care-Use with each encounter
;;^UTILITY(U,$J,358.3,26983,0)
;;=99356^^85^1109^1^^^^1
;;^UTILITY(U,$J,358.3,26983,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,26983,1,1,0)
;;=1^99356
;;^UTILITY(U,$J,358.3,26983,1,2,0)
;;=2^Prolonged Services F-T-F,1st Hr
;;^UTILITY(U,$J,358.3,26984,0)
;;=99357^^85^1109^2^^^^1
;;^UTILITY(U,$J,358.3,26984,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,26984,1,1,0)
;;=1^99357
;;^UTILITY(U,$J,358.3,26984,1,2,0)
;;=2^Prolonged Services F-T-F,Ea Addl 30min
;;^UTILITY(U,$J,358.3,26985,0)
;;=99358^^85^1109^3^^^^1
;;^UTILITY(U,$J,358.3,26985,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,26985,1,1,0)
;;=1^99358
;;^UTILITY(U,$J,358.3,26985,1,2,0)
;;=2^Prolonged Services w/o Contact,1st Hr
;;^UTILITY(U,$J,358.3,26986,0)
;;=99359^^85^1109^4^^^^1
;;^UTILITY(U,$J,358.3,26986,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,26986,1,1,0)
;;=1^99359
;;^UTILITY(U,$J,358.3,26986,1,2,0)
;;=2^Prolonged Svc w/o Contact,Ea Addl 30min
;;^UTILITY(U,$J,358.3,26987,0)
;;=99497^^85^1110^1^^^^1
;;^UTILITY(U,$J,358.3,26987,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,26987,1,1,0)
;;=1^99497
;;^UTILITY(U,$J,358.3,26987,1,2,0)
;;=2^ACP;Expl/Dsc;1st 30 min
;;^UTILITY(U,$J,358.3,26988,0)
;;=99498^^85^1110^2^^^^1
;;^UTILITY(U,$J,358.3,26988,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,26988,1,1,0)
;;=1^99498
;;^UTILITY(U,$J,358.3,26988,1,2,0)
;;=2^ACP,Ea Addl 30 min
;;^UTILITY(U,$J,358.3,26989,0)
;;=99366^^85^1111^1^^^^1
;;^UTILITY(U,$J,358.3,26989,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,26989,1,1,0)
;;=1^99366
;;^UTILITY(U,$J,358.3,26989,1,2,0)
;;=2^Team Conf w/ Pt/Fam by QHP 30+ Min
;;^UTILITY(U,$J,358.3,26990,0)
;;=99367^^85^1111^3^^^^1
;;^UTILITY(U,$J,358.3,26990,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,26990,1,1,0)
;;=1^99367
;;^UTILITY(U,$J,358.3,26990,1,2,0)
;;=2^Team Conf w/o Pt/Fam by Phys 30+ Min
;;^UTILITY(U,$J,358.3,26991,0)
;;=99368^^85^1111^2^^^^1
;;^UTILITY(U,$J,358.3,26991,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,26991,1,1,0)
;;=1^99368
;;^UTILITY(U,$J,358.3,26991,1,2,0)
;;=2^Team Conf w/o Pt/Fam by QHP 30+ Min
;;^UTILITY(U,$J,358.3,26992,0)
;;=C34.91^^86^1112^13
;;^UTILITY(U,$J,358.3,26992,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26992,1,3,0)
;;=3^Malig Neop Bronchus/Lung,Right
;;^UTILITY(U,$J,358.3,26992,1,4,0)
;;=4^C34.91
;;^UTILITY(U,$J,358.3,26992,2)
;;=^5000967
;;^UTILITY(U,$J,358.3,26993,0)
;;=C34.92^^86^1112^12
;;^UTILITY(U,$J,358.3,26993,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26993,1,3,0)
;;=3^Malig Neop Bronchus/Lung,Left
;;^UTILITY(U,$J,358.3,26993,1,4,0)
;;=4^C34.92
;;^UTILITY(U,$J,358.3,26993,2)
;;=^5000968
;;^UTILITY(U,$J,358.3,26994,0)
;;=C18.9^^86^1112^14
;;^UTILITY(U,$J,358.3,26994,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26994,1,3,0)
;;=3^Malig Neop Colon,Unspec
;;^UTILITY(U,$J,358.3,26994,1,4,0)
;;=4^C18.9
;;^UTILITY(U,$J,358.3,26994,2)
;;=^5000929
;;^UTILITY(U,$J,358.3,26995,0)
;;=C22.0^^86^1112^4
;;^UTILITY(U,$J,358.3,26995,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26995,1,3,0)
;;=3^Liver Cell Carcinoma
;;^UTILITY(U,$J,358.3,26995,1,4,0)
;;=4^C22.0
;;^UTILITY(U,$J,358.3,26995,2)
;;=^5000933
;;^UTILITY(U,$J,358.3,26996,0)
;;=C22.2^^86^1112^2
;;^UTILITY(U,$J,358.3,26996,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26996,1,3,0)
;;=3^Hepatoblastoma
;;^UTILITY(U,$J,358.3,26996,1,4,0)
;;=4^C22.2
;;^UTILITY(U,$J,358.3,26996,2)
;;=^5000935
;;^UTILITY(U,$J,358.3,26997,0)
;;=C22.7^^86^1112^3
;;^UTILITY(U,$J,358.3,26997,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26997,1,3,0)
;;=3^Liver Carcinoma,Other
;;^UTILITY(U,$J,358.3,26997,1,4,0)
;;=4^C22.7
;;^UTILITY(U,$J,358.3,26997,2)
;;=^5000938
;;^UTILITY(U,$J,358.3,26998,0)
;;=C22.8^^86^1112^20
;;^UTILITY(U,$J,358.3,26998,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26998,1,3,0)
;;=3^Malig Neop Liver,Primary,Unspec
;;^UTILITY(U,$J,358.3,26998,1,4,0)
;;=4^C22.8
;;^UTILITY(U,$J,358.3,26998,2)
;;=^5000939
;;^UTILITY(U,$J,358.3,26999,0)
;;=C25.9^^86^1112^22
;;^UTILITY(U,$J,358.3,26999,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26999,1,3,0)
;;=3^Malig Neop Pancreas,Unspec
;;^UTILITY(U,$J,358.3,26999,1,4,0)
;;=4^C25.9
;;^UTILITY(U,$J,358.3,26999,2)
;;=^5000946
;;^UTILITY(U,$J,358.3,27000,0)
;;=C15.9^^86^1112^15
;;^UTILITY(U,$J,358.3,27000,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27000,1,3,0)
;;=3^Malig Neop Esophagus,Unspec
;;^UTILITY(U,$J,358.3,27000,1,4,0)
;;=4^C15.9
;;^UTILITY(U,$J,358.3,27000,2)
;;=^5000919
;;^UTILITY(U,$J,358.3,27001,0)
;;=C67.9^^86^1112^8
;;^UTILITY(U,$J,358.3,27001,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27001,1,3,0)
;;=3^Malig Neop Bladder,Unspec
;;^UTILITY(U,$J,358.3,27001,1,4,0)
;;=4^C67.9
;;^UTILITY(U,$J,358.3,27001,2)
;;=^5001263
;;^UTILITY(U,$J,358.3,27002,0)
;;=C76.0^^86^1112^16
;;^UTILITY(U,$J,358.3,27002,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27002,1,3,0)
;;=3^Malig Neop Head,Face & Neck
;;^UTILITY(U,$J,358.3,27002,1,4,0)
;;=4^C76.0
;;^UTILITY(U,$J,358.3,27002,2)
;;=^5001324
;;^UTILITY(U,$J,358.3,27003,0)
;;=C64.1^^86^1112^18
;;^UTILITY(U,$J,358.3,27003,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27003,1,3,0)
;;=3^Malig Neop Kidney,Right
;;^UTILITY(U,$J,358.3,27003,1,4,0)
;;=4^C64.1
;;^UTILITY(U,$J,358.3,27003,2)
;;=^5001248
;;^UTILITY(U,$J,358.3,27004,0)
;;=C64.2^^86^1112^17
;;^UTILITY(U,$J,358.3,27004,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27004,1,3,0)
;;=3^Malig Neop Kidney,Left
;;^UTILITY(U,$J,358.3,27004,1,4,0)
;;=4^C64.2
;;^UTILITY(U,$J,358.3,27004,2)
;;=^5001249
;;^UTILITY(U,$J,358.3,27005,0)
;;=C71.9^^86^1112^9
;;^UTILITY(U,$J,358.3,27005,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27005,1,3,0)
;;=3^Malig Neop Brain,Unspec
;;^UTILITY(U,$J,358.3,27005,1,4,0)
;;=4^C71.9
;;^UTILITY(U,$J,358.3,27005,2)
;;=^5001297
;;^UTILITY(U,$J,358.3,27006,0)
;;=C16.9^^86^1112^24
;;^UTILITY(U,$J,358.3,27006,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27006,1,3,0)
;;=3^Malig Neop Stomach,Unspec
;;^UTILITY(U,$J,358.3,27006,1,4,0)
;;=4^C16.9
;;^UTILITY(U,$J,358.3,27006,2)
;;=^5000923
;;^UTILITY(U,$J,358.3,27007,0)
;;=C20.^^86^1112^23
;;^UTILITY(U,$J,358.3,27007,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27007,1,3,0)
;;=3^Malig Neop Rectum
;;^UTILITY(U,$J,358.3,27007,1,4,0)
;;=4^C20.
;;^UTILITY(U,$J,358.3,27007,2)
;;=^267090
;;^UTILITY(U,$J,358.3,27008,0)
;;=C43.9^^86^1112^6
;;^UTILITY(U,$J,358.3,27008,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27008,1,3,0)
;;=3^Malig Melanoma Skin,Unspec
;;^UTILITY(U,$J,358.3,27008,1,4,0)
;;=4^C43.9
;;^UTILITY(U,$J,358.3,27008,2)
;;=^5001015
;;^UTILITY(U,$J,358.3,27009,0)
;;=C22.9^^86^1112^21
;;^UTILITY(U,$J,358.3,27009,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27009,1,3,0)
;;=3^Malig Neop Liver,Unspec as Prim/Sec
;;^UTILITY(U,$J,358.3,27009,1,4,0)
;;=4^C22.9
;;^UTILITY(U,$J,358.3,27009,2)
;;=^267096
;;^UTILITY(U,$J,358.3,27010,0)
;;=C32.9^^86^1112^19
;;^UTILITY(U,$J,358.3,27010,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27010,1,3,0)
;;=3^Malig Neop Larynx,Unspec
;;^UTILITY(U,$J,358.3,27010,1,4,0)
;;=4^C32.9
;;^UTILITY(U,$J,358.3,27010,2)
;;=^5000956
;;^UTILITY(U,$J,358.3,27011,0)
;;=C50.911^^86^1112^11
;;^UTILITY(U,$J,358.3,27011,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27011,1,3,0)
;;=3^Malig Neop Breast,Right,Female
;;^UTILITY(U,$J,358.3,27011,1,4,0)
;;=4^C50.911
;;^UTILITY(U,$J,358.3,27011,2)
;;=^5001195
;;^UTILITY(U,$J,358.3,27012,0)
;;=C50.912^^86^1112^10
;;^UTILITY(U,$J,358.3,27012,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27012,1,3,0)
;;=3^Malig Neop Breast,Left,Female
;;^UTILITY(U,$J,358.3,27012,1,4,0)
;;=4^C50.912
;;^UTILITY(U,$J,358.3,27012,2)
;;=^5001196
;;^UTILITY(U,$J,358.3,27013,0)
;;=C24.9^^86^1112^7
;;^UTILITY(U,$J,358.3,27013,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27013,1,3,0)
;;=3^Malig Neop Biliary Tract,Unspec
;;^UTILITY(U,$J,358.3,27013,1,4,0)
;;=4^C24.9
;;^UTILITY(U,$J,358.3,27013,2)
;;=^5000942
;;^UTILITY(U,$J,358.3,27014,0)
;;=C90.00^^86^1112^25
;;^UTILITY(U,$J,358.3,27014,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27014,1,3,0)
;;=3^Multiple Myeloma,Not in Remission
;;^UTILITY(U,$J,358.3,27014,1,4,0)
;;=4^C90.00
;;^UTILITY(U,$J,358.3,27014,2)
;;=^5001752
;;^UTILITY(U,$J,358.3,27015,0)
;;=C85.89^^86^1112^29
;;^UTILITY(U,$J,358.3,27015,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27015,1,3,0)
;;=3^NHL NEC,Extranodal & Solid Organ
;;^UTILITY(U,$J,358.3,27015,1,4,0)
;;=4^C85.89
;;^UTILITY(U,$J,358.3,27015,2)
;;=^5001730
;;^UTILITY(U,$J,358.3,27016,0)
;;=C79.51^^86^1112^33
;;^UTILITY(U,$J,358.3,27016,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27016,1,3,0)
;;=3^Secondary Malig Neop Bone
;;^UTILITY(U,$J,358.3,27016,1,4,0)
;;=4^C79.51
;;^UTILITY(U,$J,358.3,27016,2)
;;=^5001350
;;^UTILITY(U,$J,358.3,27017,0)
;;=C79.52^^86^1112^32
;;^UTILITY(U,$J,358.3,27017,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27017,1,3,0)
;;=3^Secondary Malig Neop Bone Marrow
;;^UTILITY(U,$J,358.3,27017,1,4,0)
;;=4^C79.52
;;^UTILITY(U,$J,358.3,27017,2)
;;=^5001351
;;^UTILITY(U,$J,358.3,27018,0)
;;=C92.00^^86^1112^26
;;^UTILITY(U,$J,358.3,27018,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27018,1,3,0)
;;=3^Myelobl Leuk,Acute,No Remiss
;;^UTILITY(U,$J,358.3,27018,1,4,0)
;;=4^C92.00
;;^UTILITY(U,$J,358.3,27018,2)
;;=^5001789
;;^UTILITY(U,$J,358.3,27019,0)
;;=C92.40^^86^1112^31
;;^UTILITY(U,$J,358.3,27019,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27019,1,3,0)
;;=3^Promyelocyt Leuk,Acute,No Remiss
;;^UTILITY(U,$J,358.3,27019,1,4,0)
;;=4^C92.40
;;^UTILITY(U,$J,358.3,27019,2)
;;=^5001801
;;^UTILITY(U,$J,358.3,27020,0)
;;=C92.50^^86^1112^28
;;^UTILITY(U,$J,358.3,27020,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27020,1,3,0)
;;=3^Myelomonocyt Leuk,Acute,No Remiss
;;^UTILITY(U,$J,358.3,27020,1,4,0)
;;=4^C92.50
;;^UTILITY(U,$J,358.3,27020,2)
;;=^5001804
;;^UTILITY(U,$J,358.3,27021,0)
;;=C78.7^^86^1112^37
;;^UTILITY(U,$J,358.3,27021,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27021,1,3,0)
;;=3^Secondary Malig Neop Liver & Intrahep BD
;;^UTILITY(U,$J,358.3,27021,1,4,0)
;;=4^C78.7
;;^UTILITY(U,$J,358.3,27021,2)
;;=^5001339
;;^UTILITY(U,$J,358.3,27022,0)
;;=C91.10^^86^1112^5
;;^UTILITY(U,$J,358.3,27022,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27022,1,3,0)
;;=3^Lymphocyt Leuk B-Cell,Chr,No Remiss
;;^UTILITY(U,$J,358.3,27022,1,4,0)
;;=4^C91.10
;;^UTILITY(U,$J,358.3,27022,2)
;;=^5001765
;;^UTILITY(U,$J,358.3,27023,0)
;;=D46.9^^86^1112^27
;;^UTILITY(U,$J,358.3,27023,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27023,1,3,0)
;;=3^Myelodysplastic Syndrome,Unspec
;;^UTILITY(U,$J,358.3,27023,1,4,0)
;;=4^D46.9
;;^UTILITY(U,$J,358.3,27023,2)
;;=^334031
;;^UTILITY(U,$J,358.3,27024,0)
;;=C79.31^^86^1112^34
;;^UTILITY(U,$J,358.3,27024,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27024,1,3,0)
;;=3^Secondary Malig Neop Brain
;;^UTILITY(U,$J,358.3,27024,1,4,0)
;;=4^C79.31
;;^UTILITY(U,$J,358.3,27024,2)
;;=^5001347
;;^UTILITY(U,$J,358.3,27025,0)
;;=C79.32^^86^1112^35
;;^UTILITY(U,$J,358.3,27025,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27025,1,3,0)
;;=3^Secondary Malig Neop Cerebral Meninges
;;^UTILITY(U,$J,358.3,27025,1,4,0)
;;=4^C79.32
;;^UTILITY(U,$J,358.3,27025,2)
;;=^5001348
;;^UTILITY(U,$J,358.3,27026,0)
;;=G89.3^^86^1112^30
;;^UTILITY(U,$J,358.3,27026,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27026,1,3,0)
;;=3^Neoplasm Related Pain
;;^UTILITY(U,$J,358.3,27026,1,4,0)
;;=4^G89.3
;;^UTILITY(U,$J,358.3,27026,2)
;;=^5004159
;;^UTILITY(U,$J,358.3,27027,0)
;;=C79.82^^86^1112^36
;;^UTILITY(U,$J,358.3,27027,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27027,1,3,0)
;;=3^Secondary Malig Neop Genital Organs
;;^UTILITY(U,$J,358.3,27027,1,4,0)
;;=4^C79.82
;;^UTILITY(U,$J,358.3,27027,2)
;;=^267339
;;^UTILITY(U,$J,358.3,27028,0)
;;=C49.A2^^86^1112^1
;;^UTILITY(U,$J,358.3,27028,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27028,1,3,0)
;;=3^GIST,Stomach
;;^UTILITY(U,$J,358.3,27028,1,4,0)
;;=4^C49.A2
;;^UTILITY(U,$J,358.3,27028,2)
;;=^8148063
;;^UTILITY(U,$J,358.3,27029,0)
;;=I50.9^^86^1113^22
;;^UTILITY(U,$J,358.3,27029,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27029,1,3,0)
;;=3^Heart Failure,Unsp
;;^UTILITY(U,$J,358.3,27029,1,4,0)
;;=4^I50.9
;;^UTILITY(U,$J,358.3,27029,2)
;;=^5007251
;;^UTILITY(U,$J,358.3,27030,0)
;;=I73.9^^86^1113^28
;;^UTILITY(U,$J,358.3,27030,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27030,1,3,0)
;;=3^Peripheral Vascular Disease,Unspec
;;^UTILITY(U,$J,358.3,27030,1,4,0)
;;=4^I73.9
;;^UTILITY(U,$J,358.3,27030,2)
;;=^184182
;;^UTILITY(U,$J,358.3,27031,0)
;;=I35.0^^86^1113^26
;;^UTILITY(U,$J,358.3,27031,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27031,1,3,0)
;;=3^Nonrheumatic Aortic Vlve Stenosis
;;^UTILITY(U,$J,358.3,27031,1,4,0)
;;=4^I35.0
;;^UTILITY(U,$J,358.3,27031,2)
;;=^5007174
;;^UTILITY(U,$J,358.3,27032,0)
;;=I35.1^^86^1113^25
;;^UTILITY(U,$J,358.3,27032,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27032,1,3,0)
;;=3^Nonrheumatic Aortic Vlve Insuff
;;^UTILITY(U,$J,358.3,27032,1,4,0)
;;=4^I35.1
;;^UTILITY(U,$J,358.3,27032,2)
;;=^5007175
;;^UTILITY(U,$J,358.3,27033,0)
;;=I35.2^^86^1113^27
;;^UTILITY(U,$J,358.3,27033,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27033,1,3,0)
;;=3^Nonrheumatic Aortic Vlve Stenosis w/ Insuff
;;^UTILITY(U,$J,358.3,27033,1,4,0)
;;=4^I35.2
;;^UTILITY(U,$J,358.3,27033,2)
;;=^5007176
;;^UTILITY(U,$J,358.3,27034,0)
;;=I35.9^^86^1113^24
;;^UTILITY(U,$J,358.3,27034,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27034,1,3,0)
;;=3^Nonrheumatic Aortic Vlve D/O,Unsp
;;^UTILITY(U,$J,358.3,27034,1,4,0)
;;=4^I35.9
;;^UTILITY(U,$J,358.3,27034,2)
;;=^5007178
;;^UTILITY(U,$J,358.3,27035,0)
;;=I42.7^^86^1113^9
;;^UTILITY(U,$J,358.3,27035,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27035,1,3,0)
;;=3^Cardiomyopathy d/t Drug/Extrn Agent
;;^UTILITY(U,$J,358.3,27035,1,4,0)
;;=4^I42.7
;;^UTILITY(U,$J,358.3,27035,2)
;;=^5007198
;;^UTILITY(U,$J,358.3,27036,0)
;;=I21.3^^86^1113^29
;;^UTILITY(U,$J,358.3,27036,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27036,1,3,0)
;;=3^STEMI,Unspec Site
;;^UTILITY(U,$J,358.3,27036,1,4,0)
;;=4^I21.3
;;^UTILITY(U,$J,358.3,27036,2)
;;=^5007087
;;^UTILITY(U,$J,358.3,27037,0)
;;=I25.5^^86^1113^23
;;^UTILITY(U,$J,358.3,27037,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27037,1,3,0)
;;=3^Ischemic Cardiomyopathy
;;^UTILITY(U,$J,358.3,27037,1,4,0)
;;=4^I25.5
;;^UTILITY(U,$J,358.3,27037,2)
;;=^5007115
;;^UTILITY(U,$J,358.3,27038,0)
;;=I25.9^^86^1113^12
;;^UTILITY(U,$J,358.3,27038,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27038,1,3,0)
;;=3^Chronic Ischemic Heart Disease,Unsp
;;^UTILITY(U,$J,358.3,27038,1,4,0)
;;=4^I25.9
;;^UTILITY(U,$J,358.3,27038,2)
;;=^5007144
;;^UTILITY(U,$J,358.3,27039,0)
;;=I25.10^^86^1113^2
;;^UTILITY(U,$J,358.3,27039,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27039,1,3,0)
;;=3^Athscl Hrt Dis Ntv Cor Art w/o Ang Pctrs
;;^UTILITY(U,$J,358.3,27039,1,4,0)
;;=4^I25.10
;;^UTILITY(U,$J,358.3,27039,2)
;;=^5007107
;;^UTILITY(U,$J,358.3,27040,0)
;;=D64.9^^86^1113^1
;;^UTILITY(U,$J,358.3,27040,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27040,1,3,0)
;;=3^Anemia,Unspec
;;^UTILITY(U,$J,358.3,27040,1,4,0)
;;=4^D64.9
;;^UTILITY(U,$J,358.3,27040,2)
;;=^5002351
;;^UTILITY(U,$J,358.3,27041,0)
;;=I42.9^^86^1113^10
;;^UTILITY(U,$J,358.3,27041,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27041,1,3,0)
;;=3^Cardiomyopathy,Unsp
;;^UTILITY(U,$J,358.3,27041,1,4,0)
;;=4^I42.9
;;^UTILITY(U,$J,358.3,27041,2)
;;=^5007200
;;^UTILITY(U,$J,358.3,27042,0)
;;=I67.9^^86^1113^11
;;^UTILITY(U,$J,358.3,27042,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27042,1,3,0)
;;=3^Cerebrovascular Disease,Unsp
;;^UTILITY(U,$J,358.3,27042,1,4,0)
;;=4^I67.9
;;^UTILITY(U,$J,358.3,27042,2)
;;=^5007389
;;^UTILITY(U,$J,358.3,27043,0)
;;=I50.89^^86^1113^16
;;^UTILITY(U,$J,358.3,27043,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27043,1,3,0)
;;=3^Heart Failure,Other
;;^UTILITY(U,$J,358.3,27043,1,4,0)
;;=4^I50.89
;;^UTILITY(U,$J,358.3,27043,2)
;;=^5151392
;;^UTILITY(U,$J,358.3,27044,0)
;;=I50.810^^86^1113^21
;;^UTILITY(U,$J,358.3,27044,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27044,1,3,0)
;;=3^Heart Failure,Right,Unspec
;;^UTILITY(U,$J,358.3,27044,1,4,0)
;;=4^I50.810
;;^UTILITY(U,$J,358.3,27044,2)
;;=^5151384
;;^UTILITY(U,$J,358.3,27045,0)
;;=I50.811^^86^1113^18
;;^UTILITY(U,$J,358.3,27045,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27045,1,3,0)
;;=3^Heart Failure,Right,Acute
;;^UTILITY(U,$J,358.3,27045,1,4,0)
;;=4^I50.811
;;^UTILITY(U,$J,358.3,27045,2)
;;=^5151385
;;^UTILITY(U,$J,358.3,27046,0)
;;=I50.812^^86^1113^20
;;^UTILITY(U,$J,358.3,27046,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27046,1,3,0)
;;=3^Heart Failure,Right,Chronic
;;^UTILITY(U,$J,358.3,27046,1,4,0)
;;=4^I50.812
;;^UTILITY(U,$J,358.3,27046,2)
;;=^5151386
;;^UTILITY(U,$J,358.3,27047,0)
;;=I50.813^^86^1113^19
;;^UTILITY(U,$J,358.3,27047,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27047,1,3,0)
;;=3^Heart Failure,Right,Acute on Chronic
;;^UTILITY(U,$J,358.3,27047,1,4,0)
;;=4^I50.813
;;^UTILITY(U,$J,358.3,27047,2)
;;=^5151387
;;^UTILITY(U,$J,358.3,27048,0)
;;=I50.814^^86^1113^17
;;^UTILITY(U,$J,358.3,27048,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27048,1,3,0)
;;=3^Heart Failure,Right d/t Left Heart Failure
;;^UTILITY(U,$J,358.3,27048,1,4,0)
;;=4^I50.814
;;^UTILITY(U,$J,358.3,27048,2)
;;=^5151388
;;^UTILITY(U,$J,358.3,27049,0)
;;=I50.82^^86^1113^13
;;^UTILITY(U,$J,358.3,27049,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27049,1,3,0)
;;=3^Heart Failure,Biventricular
;;^UTILITY(U,$J,358.3,27049,1,4,0)
;;=4^I50.82
;;^UTILITY(U,$J,358.3,27049,2)
;;=^5151389
;;^UTILITY(U,$J,358.3,27050,0)
;;=I50.83^^86^1113^15
;;^UTILITY(U,$J,358.3,27050,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27050,1,3,0)
;;=3^Heart Failure,High Output
;;^UTILITY(U,$J,358.3,27050,1,4,0)
;;=4^I50.83
;;^UTILITY(U,$J,358.3,27050,2)
;;=^5151390
;;^UTILITY(U,$J,358.3,27051,0)
;;=I50.84^^86^1113^14
;;^UTILITY(U,$J,358.3,27051,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27051,1,3,0)
;;=3^Heart Failure,End Stage
;;^UTILITY(U,$J,358.3,27051,1,4,0)
;;=4^I50.84
;;^UTILITY(U,$J,358.3,27051,2)
;;=^5151391
;;^UTILITY(U,$J,358.3,27052,0)
;;=I50.22^^86^1113^7
;;^UTILITY(U,$J,358.3,27052,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27052,1,3,0)
;;=3^CHF,Systolic,Chronic
;;^UTILITY(U,$J,358.3,27052,1,4,0)
;;=4^I50.22
;;^UTILITY(U,$J,358.3,27052,2)
;;=^5007241
;;^UTILITY(U,$J,358.3,27053,0)
;;=I50.23^^86^1113^8
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HIBDEI0B0 19773 printed Sep 23, 2025@19:21:07 Page 2
IBDEI0B0 ; ; 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,26982,1,0)
+2 ;;=^358.31IA^2^2
+3 ;;^UTILITY(U,$J,358.3,26982,1,1,0)
+4 ;;=1^G0182
+5 ;;^UTILITY(U,$J,358.3,26982,1,2,0)
+6 ;;=2^Hospice Care-Use with each encounter
+7 ;;^UTILITY(U,$J,358.3,26983,0)
+8 ;;=99356^^85^1109^1^^^^1
+9 ;;^UTILITY(U,$J,358.3,26983,1,0)
+10 ;;=^358.31IA^2^2
+11 ;;^UTILITY(U,$J,358.3,26983,1,1,0)
+12 ;;=1^99356
+13 ;;^UTILITY(U,$J,358.3,26983,1,2,0)
+14 ;;=2^Prolonged Services F-T-F,1st Hr
+15 ;;^UTILITY(U,$J,358.3,26984,0)
+16 ;;=99357^^85^1109^2^^^^1
+17 ;;^UTILITY(U,$J,358.3,26984,1,0)
+18 ;;=^358.31IA^2^2
+19 ;;^UTILITY(U,$J,358.3,26984,1,1,0)
+20 ;;=1^99357
+21 ;;^UTILITY(U,$J,358.3,26984,1,2,0)
+22 ;;=2^Prolonged Services F-T-F,Ea Addl 30min
+23 ;;^UTILITY(U,$J,358.3,26985,0)
+24 ;;=99358^^85^1109^3^^^^1
+25 ;;^UTILITY(U,$J,358.3,26985,1,0)
+26 ;;=^358.31IA^2^2
+27 ;;^UTILITY(U,$J,358.3,26985,1,1,0)
+28 ;;=1^99358
+29 ;;^UTILITY(U,$J,358.3,26985,1,2,0)
+30 ;;=2^Prolonged Services w/o Contact,1st Hr
+31 ;;^UTILITY(U,$J,358.3,26986,0)
+32 ;;=99359^^85^1109^4^^^^1
+33 ;;^UTILITY(U,$J,358.3,26986,1,0)
+34 ;;=^358.31IA^2^2
+35 ;;^UTILITY(U,$J,358.3,26986,1,1,0)
+36 ;;=1^99359
+37 ;;^UTILITY(U,$J,358.3,26986,1,2,0)
+38 ;;=2^Prolonged Svc w/o Contact,Ea Addl 30min
+39 ;;^UTILITY(U,$J,358.3,26987,0)
+40 ;;=99497^^85^1110^1^^^^1
+41 ;;^UTILITY(U,$J,358.3,26987,1,0)
+42 ;;=^358.31IA^2^2
+43 ;;^UTILITY(U,$J,358.3,26987,1,1,0)
+44 ;;=1^99497
+45 ;;^UTILITY(U,$J,358.3,26987,1,2,0)
+46 ;;=2^ACP;Expl/Dsc;1st 30 min
+47 ;;^UTILITY(U,$J,358.3,26988,0)
+48 ;;=99498^^85^1110^2^^^^1
+49 ;;^UTILITY(U,$J,358.3,26988,1,0)
+50 ;;=^358.31IA^2^2
+51 ;;^UTILITY(U,$J,358.3,26988,1,1,0)
+52 ;;=1^99498
+53 ;;^UTILITY(U,$J,358.3,26988,1,2,0)
+54 ;;=2^ACP,Ea Addl 30 min
+55 ;;^UTILITY(U,$J,358.3,26989,0)
+56 ;;=99366^^85^1111^1^^^^1
+57 ;;^UTILITY(U,$J,358.3,26989,1,0)
+58 ;;=^358.31IA^2^2
+59 ;;^UTILITY(U,$J,358.3,26989,1,1,0)
+60 ;;=1^99366
+61 ;;^UTILITY(U,$J,358.3,26989,1,2,0)
+62 ;;=2^Team Conf w/ Pt/Fam by QHP 30+ Min
+63 ;;^UTILITY(U,$J,358.3,26990,0)
+64 ;;=99367^^85^1111^3^^^^1
+65 ;;^UTILITY(U,$J,358.3,26990,1,0)
+66 ;;=^358.31IA^2^2
+67 ;;^UTILITY(U,$J,358.3,26990,1,1,0)
+68 ;;=1^99367
+69 ;;^UTILITY(U,$J,358.3,26990,1,2,0)
+70 ;;=2^Team Conf w/o Pt/Fam by Phys 30+ Min
+71 ;;^UTILITY(U,$J,358.3,26991,0)
+72 ;;=99368^^85^1111^2^^^^1
+73 ;;^UTILITY(U,$J,358.3,26991,1,0)
+74 ;;=^358.31IA^2^2
+75 ;;^UTILITY(U,$J,358.3,26991,1,1,0)
+76 ;;=1^99368
+77 ;;^UTILITY(U,$J,358.3,26991,1,2,0)
+78 ;;=2^Team Conf w/o Pt/Fam by QHP 30+ Min
+79 ;;^UTILITY(U,$J,358.3,26992,0)
+80 ;;=C34.91^^86^1112^13
+81 ;;^UTILITY(U,$J,358.3,26992,1,0)
+82 ;;=^358.31IA^4^2
+83 ;;^UTILITY(U,$J,358.3,26992,1,3,0)
+84 ;;=3^Malig Neop Bronchus/Lung,Right
+85 ;;^UTILITY(U,$J,358.3,26992,1,4,0)
+86 ;;=4^C34.91
+87 ;;^UTILITY(U,$J,358.3,26992,2)
+88 ;;=^5000967
+89 ;;^UTILITY(U,$J,358.3,26993,0)
+90 ;;=C34.92^^86^1112^12
+91 ;;^UTILITY(U,$J,358.3,26993,1,0)
+92 ;;=^358.31IA^4^2
+93 ;;^UTILITY(U,$J,358.3,26993,1,3,0)
+94 ;;=3^Malig Neop Bronchus/Lung,Left
+95 ;;^UTILITY(U,$J,358.3,26993,1,4,0)
+96 ;;=4^C34.92
+97 ;;^UTILITY(U,$J,358.3,26993,2)
+98 ;;=^5000968
+99 ;;^UTILITY(U,$J,358.3,26994,0)
+100 ;;=C18.9^^86^1112^14
+101 ;;^UTILITY(U,$J,358.3,26994,1,0)
+102 ;;=^358.31IA^4^2
+103 ;;^UTILITY(U,$J,358.3,26994,1,3,0)
+104 ;;=3^Malig Neop Colon,Unspec
+105 ;;^UTILITY(U,$J,358.3,26994,1,4,0)
+106 ;;=4^C18.9
+107 ;;^UTILITY(U,$J,358.3,26994,2)
+108 ;;=^5000929
+109 ;;^UTILITY(U,$J,358.3,26995,0)
+110 ;;=C22.0^^86^1112^4
+111 ;;^UTILITY(U,$J,358.3,26995,1,0)
+112 ;;=^358.31IA^4^2
+113 ;;^UTILITY(U,$J,358.3,26995,1,3,0)
+114 ;;=3^Liver Cell Carcinoma
+115 ;;^UTILITY(U,$J,358.3,26995,1,4,0)
+116 ;;=4^C22.0
+117 ;;^UTILITY(U,$J,358.3,26995,2)
+118 ;;=^5000933
+119 ;;^UTILITY(U,$J,358.3,26996,0)
+120 ;;=C22.2^^86^1112^2
+121 ;;^UTILITY(U,$J,358.3,26996,1,0)
+122 ;;=^358.31IA^4^2
+123 ;;^UTILITY(U,$J,358.3,26996,1,3,0)
+124 ;;=3^Hepatoblastoma
+125 ;;^UTILITY(U,$J,358.3,26996,1,4,0)
+126 ;;=4^C22.2
+127 ;;^UTILITY(U,$J,358.3,26996,2)
+128 ;;=^5000935
+129 ;;^UTILITY(U,$J,358.3,26997,0)
+130 ;;=C22.7^^86^1112^3
+131 ;;^UTILITY(U,$J,358.3,26997,1,0)
+132 ;;=^358.31IA^4^2
+133 ;;^UTILITY(U,$J,358.3,26997,1,3,0)
+134 ;;=3^Liver Carcinoma,Other
+135 ;;^UTILITY(U,$J,358.3,26997,1,4,0)
+136 ;;=4^C22.7
+137 ;;^UTILITY(U,$J,358.3,26997,2)
+138 ;;=^5000938
+139 ;;^UTILITY(U,$J,358.3,26998,0)
+140 ;;=C22.8^^86^1112^20
+141 ;;^UTILITY(U,$J,358.3,26998,1,0)
+142 ;;=^358.31IA^4^2
+143 ;;^UTILITY(U,$J,358.3,26998,1,3,0)
+144 ;;=3^Malig Neop Liver,Primary,Unspec
+145 ;;^UTILITY(U,$J,358.3,26998,1,4,0)
+146 ;;=4^C22.8
+147 ;;^UTILITY(U,$J,358.3,26998,2)
+148 ;;=^5000939
+149 ;;^UTILITY(U,$J,358.3,26999,0)
+150 ;;=C25.9^^86^1112^22
+151 ;;^UTILITY(U,$J,358.3,26999,1,0)
+152 ;;=^358.31IA^4^2
+153 ;;^UTILITY(U,$J,358.3,26999,1,3,0)
+154 ;;=3^Malig Neop Pancreas,Unspec
+155 ;;^UTILITY(U,$J,358.3,26999,1,4,0)
+156 ;;=4^C25.9
+157 ;;^UTILITY(U,$J,358.3,26999,2)
+158 ;;=^5000946
+159 ;;^UTILITY(U,$J,358.3,27000,0)
+160 ;;=C15.9^^86^1112^15
+161 ;;^UTILITY(U,$J,358.3,27000,1,0)
+162 ;;=^358.31IA^4^2
+163 ;;^UTILITY(U,$J,358.3,27000,1,3,0)
+164 ;;=3^Malig Neop Esophagus,Unspec
+165 ;;^UTILITY(U,$J,358.3,27000,1,4,0)
+166 ;;=4^C15.9
+167 ;;^UTILITY(U,$J,358.3,27000,2)
+168 ;;=^5000919
+169 ;;^UTILITY(U,$J,358.3,27001,0)
+170 ;;=C67.9^^86^1112^8
+171 ;;^UTILITY(U,$J,358.3,27001,1,0)
+172 ;;=^358.31IA^4^2
+173 ;;^UTILITY(U,$J,358.3,27001,1,3,0)
+174 ;;=3^Malig Neop Bladder,Unspec
+175 ;;^UTILITY(U,$J,358.3,27001,1,4,0)
+176 ;;=4^C67.9
+177 ;;^UTILITY(U,$J,358.3,27001,2)
+178 ;;=^5001263
+179 ;;^UTILITY(U,$J,358.3,27002,0)
+180 ;;=C76.0^^86^1112^16
+181 ;;^UTILITY(U,$J,358.3,27002,1,0)
+182 ;;=^358.31IA^4^2
+183 ;;^UTILITY(U,$J,358.3,27002,1,3,0)
+184 ;;=3^Malig Neop Head,Face & Neck
+185 ;;^UTILITY(U,$J,358.3,27002,1,4,0)
+186 ;;=4^C76.0
+187 ;;^UTILITY(U,$J,358.3,27002,2)
+188 ;;=^5001324
+189 ;;^UTILITY(U,$J,358.3,27003,0)
+190 ;;=C64.1^^86^1112^18
+191 ;;^UTILITY(U,$J,358.3,27003,1,0)
+192 ;;=^358.31IA^4^2
+193 ;;^UTILITY(U,$J,358.3,27003,1,3,0)
+194 ;;=3^Malig Neop Kidney,Right
+195 ;;^UTILITY(U,$J,358.3,27003,1,4,0)
+196 ;;=4^C64.1
+197 ;;^UTILITY(U,$J,358.3,27003,2)
+198 ;;=^5001248
+199 ;;^UTILITY(U,$J,358.3,27004,0)
+200 ;;=C64.2^^86^1112^17
+201 ;;^UTILITY(U,$J,358.3,27004,1,0)
+202 ;;=^358.31IA^4^2
+203 ;;^UTILITY(U,$J,358.3,27004,1,3,0)
+204 ;;=3^Malig Neop Kidney,Left
+205 ;;^UTILITY(U,$J,358.3,27004,1,4,0)
+206 ;;=4^C64.2
+207 ;;^UTILITY(U,$J,358.3,27004,2)
+208 ;;=^5001249
+209 ;;^UTILITY(U,$J,358.3,27005,0)
+210 ;;=C71.9^^86^1112^9
+211 ;;^UTILITY(U,$J,358.3,27005,1,0)
+212 ;;=^358.31IA^4^2
+213 ;;^UTILITY(U,$J,358.3,27005,1,3,0)
+214 ;;=3^Malig Neop Brain,Unspec
+215 ;;^UTILITY(U,$J,358.3,27005,1,4,0)
+216 ;;=4^C71.9
+217 ;;^UTILITY(U,$J,358.3,27005,2)
+218 ;;=^5001297
+219 ;;^UTILITY(U,$J,358.3,27006,0)
+220 ;;=C16.9^^86^1112^24
+221 ;;^UTILITY(U,$J,358.3,27006,1,0)
+222 ;;=^358.31IA^4^2
+223 ;;^UTILITY(U,$J,358.3,27006,1,3,0)
+224 ;;=3^Malig Neop Stomach,Unspec
+225 ;;^UTILITY(U,$J,358.3,27006,1,4,0)
+226 ;;=4^C16.9
+227 ;;^UTILITY(U,$J,358.3,27006,2)
+228 ;;=^5000923
+229 ;;^UTILITY(U,$J,358.3,27007,0)
+230 ;;=C20.^^86^1112^23
+231 ;;^UTILITY(U,$J,358.3,27007,1,0)
+232 ;;=^358.31IA^4^2
+233 ;;^UTILITY(U,$J,358.3,27007,1,3,0)
+234 ;;=3^Malig Neop Rectum
+235 ;;^UTILITY(U,$J,358.3,27007,1,4,0)
+236 ;;=4^C20.
+237 ;;^UTILITY(U,$J,358.3,27007,2)
+238 ;;=^267090
+239 ;;^UTILITY(U,$J,358.3,27008,0)
+240 ;;=C43.9^^86^1112^6
+241 ;;^UTILITY(U,$J,358.3,27008,1,0)
+242 ;;=^358.31IA^4^2
+243 ;;^UTILITY(U,$J,358.3,27008,1,3,0)
+244 ;;=3^Malig Melanoma Skin,Unspec
+245 ;;^UTILITY(U,$J,358.3,27008,1,4,0)
+246 ;;=4^C43.9
+247 ;;^UTILITY(U,$J,358.3,27008,2)
+248 ;;=^5001015
+249 ;;^UTILITY(U,$J,358.3,27009,0)
+250 ;;=C22.9^^86^1112^21
+251 ;;^UTILITY(U,$J,358.3,27009,1,0)
+252 ;;=^358.31IA^4^2
+253 ;;^UTILITY(U,$J,358.3,27009,1,3,0)
+254 ;;=3^Malig Neop Liver,Unspec as Prim/Sec
+255 ;;^UTILITY(U,$J,358.3,27009,1,4,0)
+256 ;;=4^C22.9
+257 ;;^UTILITY(U,$J,358.3,27009,2)
+258 ;;=^267096
+259 ;;^UTILITY(U,$J,358.3,27010,0)
+260 ;;=C32.9^^86^1112^19
+261 ;;^UTILITY(U,$J,358.3,27010,1,0)
+262 ;;=^358.31IA^4^2
+263 ;;^UTILITY(U,$J,358.3,27010,1,3,0)
+264 ;;=3^Malig Neop Larynx,Unspec
+265 ;;^UTILITY(U,$J,358.3,27010,1,4,0)
+266 ;;=4^C32.9
+267 ;;^UTILITY(U,$J,358.3,27010,2)
+268 ;;=^5000956
+269 ;;^UTILITY(U,$J,358.3,27011,0)
+270 ;;=C50.911^^86^1112^11
+271 ;;^UTILITY(U,$J,358.3,27011,1,0)
+272 ;;=^358.31IA^4^2
+273 ;;^UTILITY(U,$J,358.3,27011,1,3,0)
+274 ;;=3^Malig Neop Breast,Right,Female
+275 ;;^UTILITY(U,$J,358.3,27011,1,4,0)
+276 ;;=4^C50.911
+277 ;;^UTILITY(U,$J,358.3,27011,2)
+278 ;;=^5001195
+279 ;;^UTILITY(U,$J,358.3,27012,0)
+280 ;;=C50.912^^86^1112^10
+281 ;;^UTILITY(U,$J,358.3,27012,1,0)
+282 ;;=^358.31IA^4^2
+283 ;;^UTILITY(U,$J,358.3,27012,1,3,0)
+284 ;;=3^Malig Neop Breast,Left,Female
+285 ;;^UTILITY(U,$J,358.3,27012,1,4,0)
+286 ;;=4^C50.912
+287 ;;^UTILITY(U,$J,358.3,27012,2)
+288 ;;=^5001196
+289 ;;^UTILITY(U,$J,358.3,27013,0)
+290 ;;=C24.9^^86^1112^7
+291 ;;^UTILITY(U,$J,358.3,27013,1,0)
+292 ;;=^358.31IA^4^2
+293 ;;^UTILITY(U,$J,358.3,27013,1,3,0)
+294 ;;=3^Malig Neop Biliary Tract,Unspec
+295 ;;^UTILITY(U,$J,358.3,27013,1,4,0)
+296 ;;=4^C24.9
+297 ;;^UTILITY(U,$J,358.3,27013,2)
+298 ;;=^5000942
+299 ;;^UTILITY(U,$J,358.3,27014,0)
+300 ;;=C90.00^^86^1112^25
+301 ;;^UTILITY(U,$J,358.3,27014,1,0)
+302 ;;=^358.31IA^4^2
+303 ;;^UTILITY(U,$J,358.3,27014,1,3,0)
+304 ;;=3^Multiple Myeloma,Not in Remission
+305 ;;^UTILITY(U,$J,358.3,27014,1,4,0)
+306 ;;=4^C90.00
+307 ;;^UTILITY(U,$J,358.3,27014,2)
+308 ;;=^5001752
+309 ;;^UTILITY(U,$J,358.3,27015,0)
+310 ;;=C85.89^^86^1112^29
+311 ;;^UTILITY(U,$J,358.3,27015,1,0)
+312 ;;=^358.31IA^4^2
+313 ;;^UTILITY(U,$J,358.3,27015,1,3,0)
+314 ;;=3^NHL NEC,Extranodal & Solid Organ
+315 ;;^UTILITY(U,$J,358.3,27015,1,4,0)
+316 ;;=4^C85.89
+317 ;;^UTILITY(U,$J,358.3,27015,2)
+318 ;;=^5001730
+319 ;;^UTILITY(U,$J,358.3,27016,0)
+320 ;;=C79.51^^86^1112^33
+321 ;;^UTILITY(U,$J,358.3,27016,1,0)
+322 ;;=^358.31IA^4^2
+323 ;;^UTILITY(U,$J,358.3,27016,1,3,0)
+324 ;;=3^Secondary Malig Neop Bone
+325 ;;^UTILITY(U,$J,358.3,27016,1,4,0)
+326 ;;=4^C79.51
+327 ;;^UTILITY(U,$J,358.3,27016,2)
+328 ;;=^5001350
+329 ;;^UTILITY(U,$J,358.3,27017,0)
+330 ;;=C79.52^^86^1112^32
+331 ;;^UTILITY(U,$J,358.3,27017,1,0)
+332 ;;=^358.31IA^4^2
+333 ;;^UTILITY(U,$J,358.3,27017,1,3,0)
+334 ;;=3^Secondary Malig Neop Bone Marrow
+335 ;;^UTILITY(U,$J,358.3,27017,1,4,0)
+336 ;;=4^C79.52
+337 ;;^UTILITY(U,$J,358.3,27017,2)
+338 ;;=^5001351
+339 ;;^UTILITY(U,$J,358.3,27018,0)
+340 ;;=C92.00^^86^1112^26
+341 ;;^UTILITY(U,$J,358.3,27018,1,0)
+342 ;;=^358.31IA^4^2
+343 ;;^UTILITY(U,$J,358.3,27018,1,3,0)
+344 ;;=3^Myelobl Leuk,Acute,No Remiss
+345 ;;^UTILITY(U,$J,358.3,27018,1,4,0)
+346 ;;=4^C92.00
+347 ;;^UTILITY(U,$J,358.3,27018,2)
+348 ;;=^5001789
+349 ;;^UTILITY(U,$J,358.3,27019,0)
+350 ;;=C92.40^^86^1112^31
+351 ;;^UTILITY(U,$J,358.3,27019,1,0)
+352 ;;=^358.31IA^4^2
+353 ;;^UTILITY(U,$J,358.3,27019,1,3,0)
+354 ;;=3^Promyelocyt Leuk,Acute,No Remiss
+355 ;;^UTILITY(U,$J,358.3,27019,1,4,0)
+356 ;;=4^C92.40
+357 ;;^UTILITY(U,$J,358.3,27019,2)
+358 ;;=^5001801
+359 ;;^UTILITY(U,$J,358.3,27020,0)
+360 ;;=C92.50^^86^1112^28
+361 ;;^UTILITY(U,$J,358.3,27020,1,0)
+362 ;;=^358.31IA^4^2
+363 ;;^UTILITY(U,$J,358.3,27020,1,3,0)
+364 ;;=3^Myelomonocyt Leuk,Acute,No Remiss
+365 ;;^UTILITY(U,$J,358.3,27020,1,4,0)
+366 ;;=4^C92.50
+367 ;;^UTILITY(U,$J,358.3,27020,2)
+368 ;;=^5001804
+369 ;;^UTILITY(U,$J,358.3,27021,0)
+370 ;;=C78.7^^86^1112^37
+371 ;;^UTILITY(U,$J,358.3,27021,1,0)
+372 ;;=^358.31IA^4^2
+373 ;;^UTILITY(U,$J,358.3,27021,1,3,0)
+374 ;;=3^Secondary Malig Neop Liver & Intrahep BD
+375 ;;^UTILITY(U,$J,358.3,27021,1,4,0)
+376 ;;=4^C78.7
+377 ;;^UTILITY(U,$J,358.3,27021,2)
+378 ;;=^5001339
+379 ;;^UTILITY(U,$J,358.3,27022,0)
+380 ;;=C91.10^^86^1112^5
+381 ;;^UTILITY(U,$J,358.3,27022,1,0)
+382 ;;=^358.31IA^4^2
+383 ;;^UTILITY(U,$J,358.3,27022,1,3,0)
+384 ;;=3^Lymphocyt Leuk B-Cell,Chr,No Remiss
+385 ;;^UTILITY(U,$J,358.3,27022,1,4,0)
+386 ;;=4^C91.10
+387 ;;^UTILITY(U,$J,358.3,27022,2)
+388 ;;=^5001765
+389 ;;^UTILITY(U,$J,358.3,27023,0)
+390 ;;=D46.9^^86^1112^27
+391 ;;^UTILITY(U,$J,358.3,27023,1,0)
+392 ;;=^358.31IA^4^2
+393 ;;^UTILITY(U,$J,358.3,27023,1,3,0)
+394 ;;=3^Myelodysplastic Syndrome,Unspec
+395 ;;^UTILITY(U,$J,358.3,27023,1,4,0)
+396 ;;=4^D46.9
+397 ;;^UTILITY(U,$J,358.3,27023,2)
+398 ;;=^334031
+399 ;;^UTILITY(U,$J,358.3,27024,0)
+400 ;;=C79.31^^86^1112^34
+401 ;;^UTILITY(U,$J,358.3,27024,1,0)
+402 ;;=^358.31IA^4^2
+403 ;;^UTILITY(U,$J,358.3,27024,1,3,0)
+404 ;;=3^Secondary Malig Neop Brain
+405 ;;^UTILITY(U,$J,358.3,27024,1,4,0)
+406 ;;=4^C79.31
+407 ;;^UTILITY(U,$J,358.3,27024,2)
+408 ;;=^5001347
+409 ;;^UTILITY(U,$J,358.3,27025,0)
+410 ;;=C79.32^^86^1112^35
+411 ;;^UTILITY(U,$J,358.3,27025,1,0)
+412 ;;=^358.31IA^4^2
+413 ;;^UTILITY(U,$J,358.3,27025,1,3,0)
+414 ;;=3^Secondary Malig Neop Cerebral Meninges
+415 ;;^UTILITY(U,$J,358.3,27025,1,4,0)
+416 ;;=4^C79.32
+417 ;;^UTILITY(U,$J,358.3,27025,2)
+418 ;;=^5001348
+419 ;;^UTILITY(U,$J,358.3,27026,0)
+420 ;;=G89.3^^86^1112^30
+421 ;;^UTILITY(U,$J,358.3,27026,1,0)
+422 ;;=^358.31IA^4^2
+423 ;;^UTILITY(U,$J,358.3,27026,1,3,0)
+424 ;;=3^Neoplasm Related Pain
+425 ;;^UTILITY(U,$J,358.3,27026,1,4,0)
+426 ;;=4^G89.3
+427 ;;^UTILITY(U,$J,358.3,27026,2)
+428 ;;=^5004159
+429 ;;^UTILITY(U,$J,358.3,27027,0)
+430 ;;=C79.82^^86^1112^36
+431 ;;^UTILITY(U,$J,358.3,27027,1,0)
+432 ;;=^358.31IA^4^2
+433 ;;^UTILITY(U,$J,358.3,27027,1,3,0)
+434 ;;=3^Secondary Malig Neop Genital Organs
+435 ;;^UTILITY(U,$J,358.3,27027,1,4,0)
+436 ;;=4^C79.82
+437 ;;^UTILITY(U,$J,358.3,27027,2)
+438 ;;=^267339
+439 ;;^UTILITY(U,$J,358.3,27028,0)
+440 ;;=C49.A2^^86^1112^1
+441 ;;^UTILITY(U,$J,358.3,27028,1,0)
+442 ;;=^358.31IA^4^2
+443 ;;^UTILITY(U,$J,358.3,27028,1,3,0)
+444 ;;=3^GIST,Stomach
+445 ;;^UTILITY(U,$J,358.3,27028,1,4,0)
+446 ;;=4^C49.A2
+447 ;;^UTILITY(U,$J,358.3,27028,2)
+448 ;;=^8148063
+449 ;;^UTILITY(U,$J,358.3,27029,0)
+450 ;;=I50.9^^86^1113^22
+451 ;;^UTILITY(U,$J,358.3,27029,1,0)
+452 ;;=^358.31IA^4^2
+453 ;;^UTILITY(U,$J,358.3,27029,1,3,0)
+454 ;;=3^Heart Failure,Unsp
+455 ;;^UTILITY(U,$J,358.3,27029,1,4,0)
+456 ;;=4^I50.9
+457 ;;^UTILITY(U,$J,358.3,27029,2)
+458 ;;=^5007251
+459 ;;^UTILITY(U,$J,358.3,27030,0)
+460 ;;=I73.9^^86^1113^28
+461 ;;^UTILITY(U,$J,358.3,27030,1,0)
+462 ;;=^358.31IA^4^2
+463 ;;^UTILITY(U,$J,358.3,27030,1,3,0)
+464 ;;=3^Peripheral Vascular Disease,Unspec
+465 ;;^UTILITY(U,$J,358.3,27030,1,4,0)
+466 ;;=4^I73.9
+467 ;;^UTILITY(U,$J,358.3,27030,2)
+468 ;;=^184182
+469 ;;^UTILITY(U,$J,358.3,27031,0)
+470 ;;=I35.0^^86^1113^26
+471 ;;^UTILITY(U,$J,358.3,27031,1,0)
+472 ;;=^358.31IA^4^2
+473 ;;^UTILITY(U,$J,358.3,27031,1,3,0)
+474 ;;=3^Nonrheumatic Aortic Vlve Stenosis
+475 ;;^UTILITY(U,$J,358.3,27031,1,4,0)
+476 ;;=4^I35.0
+477 ;;^UTILITY(U,$J,358.3,27031,2)
+478 ;;=^5007174
+479 ;;^UTILITY(U,$J,358.3,27032,0)
+480 ;;=I35.1^^86^1113^25
+481 ;;^UTILITY(U,$J,358.3,27032,1,0)
+482 ;;=^358.31IA^4^2
+483 ;;^UTILITY(U,$J,358.3,27032,1,3,0)
+484 ;;=3^Nonrheumatic Aortic Vlve Insuff
+485 ;;^UTILITY(U,$J,358.3,27032,1,4,0)
+486 ;;=4^I35.1
+487 ;;^UTILITY(U,$J,358.3,27032,2)
+488 ;;=^5007175
+489 ;;^UTILITY(U,$J,358.3,27033,0)
+490 ;;=I35.2^^86^1113^27
+491 ;;^UTILITY(U,$J,358.3,27033,1,0)
+492 ;;=^358.31IA^4^2
+493 ;;^UTILITY(U,$J,358.3,27033,1,3,0)
+494 ;;=3^Nonrheumatic Aortic Vlve Stenosis w/ Insuff
+495 ;;^UTILITY(U,$J,358.3,27033,1,4,0)
+496 ;;=4^I35.2
+497 ;;^UTILITY(U,$J,358.3,27033,2)
+498 ;;=^5007176
+499 ;;^UTILITY(U,$J,358.3,27034,0)
+500 ;;=I35.9^^86^1113^24
+501 ;;^UTILITY(U,$J,358.3,27034,1,0)
+502 ;;=^358.31IA^4^2
+503 ;;^UTILITY(U,$J,358.3,27034,1,3,0)
+504 ;;=3^Nonrheumatic Aortic Vlve D/O,Unsp
+505 ;;^UTILITY(U,$J,358.3,27034,1,4,0)
+506 ;;=4^I35.9
+507 ;;^UTILITY(U,$J,358.3,27034,2)
+508 ;;=^5007178
+509 ;;^UTILITY(U,$J,358.3,27035,0)
+510 ;;=I42.7^^86^1113^9
+511 ;;^UTILITY(U,$J,358.3,27035,1,0)
+512 ;;=^358.31IA^4^2
+513 ;;^UTILITY(U,$J,358.3,27035,1,3,0)
+514 ;;=3^Cardiomyopathy d/t Drug/Extrn Agent
+515 ;;^UTILITY(U,$J,358.3,27035,1,4,0)
+516 ;;=4^I42.7
+517 ;;^UTILITY(U,$J,358.3,27035,2)
+518 ;;=^5007198
+519 ;;^UTILITY(U,$J,358.3,27036,0)
+520 ;;=I21.3^^86^1113^29
+521 ;;^UTILITY(U,$J,358.3,27036,1,0)
+522 ;;=^358.31IA^4^2
+523 ;;^UTILITY(U,$J,358.3,27036,1,3,0)
+524 ;;=3^STEMI,Unspec Site
+525 ;;^UTILITY(U,$J,358.3,27036,1,4,0)
+526 ;;=4^I21.3
+527 ;;^UTILITY(U,$J,358.3,27036,2)
+528 ;;=^5007087
+529 ;;^UTILITY(U,$J,358.3,27037,0)
+530 ;;=I25.5^^86^1113^23
+531 ;;^UTILITY(U,$J,358.3,27037,1,0)
+532 ;;=^358.31IA^4^2
+533 ;;^UTILITY(U,$J,358.3,27037,1,3,0)
+534 ;;=3^Ischemic Cardiomyopathy
+535 ;;^UTILITY(U,$J,358.3,27037,1,4,0)
+536 ;;=4^I25.5
+537 ;;^UTILITY(U,$J,358.3,27037,2)
+538 ;;=^5007115
+539 ;;^UTILITY(U,$J,358.3,27038,0)
+540 ;;=I25.9^^86^1113^12
+541 ;;^UTILITY(U,$J,358.3,27038,1,0)
+542 ;;=^358.31IA^4^2
+543 ;;^UTILITY(U,$J,358.3,27038,1,3,0)
+544 ;;=3^Chronic Ischemic Heart Disease,Unsp
+545 ;;^UTILITY(U,$J,358.3,27038,1,4,0)
+546 ;;=4^I25.9
+547 ;;^UTILITY(U,$J,358.3,27038,2)
+548 ;;=^5007144
+549 ;;^UTILITY(U,$J,358.3,27039,0)
+550 ;;=I25.10^^86^1113^2
+551 ;;^UTILITY(U,$J,358.3,27039,1,0)
+552 ;;=^358.31IA^4^2
+553 ;;^UTILITY(U,$J,358.3,27039,1,3,0)
+554 ;;=3^Athscl Hrt Dis Ntv Cor Art w/o Ang Pctrs
+555 ;;^UTILITY(U,$J,358.3,27039,1,4,0)
+556 ;;=4^I25.10
+557 ;;^UTILITY(U,$J,358.3,27039,2)
+558 ;;=^5007107
+559 ;;^UTILITY(U,$J,358.3,27040,0)
+560 ;;=D64.9^^86^1113^1
+561 ;;^UTILITY(U,$J,358.3,27040,1,0)
+562 ;;=^358.31IA^4^2
+563 ;;^UTILITY(U,$J,358.3,27040,1,3,0)
+564 ;;=3^Anemia,Unspec
+565 ;;^UTILITY(U,$J,358.3,27040,1,4,0)
+566 ;;=4^D64.9
+567 ;;^UTILITY(U,$J,358.3,27040,2)
+568 ;;=^5002351
+569 ;;^UTILITY(U,$J,358.3,27041,0)
+570 ;;=I42.9^^86^1113^10
+571 ;;^UTILITY(U,$J,358.3,27041,1,0)
+572 ;;=^358.31IA^4^2
+573 ;;^UTILITY(U,$J,358.3,27041,1,3,0)
+574 ;;=3^Cardiomyopathy,Unsp
+575 ;;^UTILITY(U,$J,358.3,27041,1,4,0)
+576 ;;=4^I42.9
+577 ;;^UTILITY(U,$J,358.3,27041,2)
+578 ;;=^5007200
+579 ;;^UTILITY(U,$J,358.3,27042,0)
+580 ;;=I67.9^^86^1113^11
+581 ;;^UTILITY(U,$J,358.3,27042,1,0)
+582 ;;=^358.31IA^4^2
+583 ;;^UTILITY(U,$J,358.3,27042,1,3,0)
+584 ;;=3^Cerebrovascular Disease,Unsp
+585 ;;^UTILITY(U,$J,358.3,27042,1,4,0)
+586 ;;=4^I67.9
+587 ;;^UTILITY(U,$J,358.3,27042,2)
+588 ;;=^5007389
+589 ;;^UTILITY(U,$J,358.3,27043,0)
+590 ;;=I50.89^^86^1113^16
+591 ;;^UTILITY(U,$J,358.3,27043,1,0)
+592 ;;=^358.31IA^4^2
+593 ;;^UTILITY(U,$J,358.3,27043,1,3,0)
+594 ;;=3^Heart Failure,Other
+595 ;;^UTILITY(U,$J,358.3,27043,1,4,0)
+596 ;;=4^I50.89
+597 ;;^UTILITY(U,$J,358.3,27043,2)
+598 ;;=^5151392
+599 ;;^UTILITY(U,$J,358.3,27044,0)
+600 ;;=I50.810^^86^1113^21
+601 ;;^UTILITY(U,$J,358.3,27044,1,0)
+602 ;;=^358.31IA^4^2
+603 ;;^UTILITY(U,$J,358.3,27044,1,3,0)
+604 ;;=3^Heart Failure,Right,Unspec
+605 ;;^UTILITY(U,$J,358.3,27044,1,4,0)
+606 ;;=4^I50.810
+607 ;;^UTILITY(U,$J,358.3,27044,2)
+608 ;;=^5151384
+609 ;;^UTILITY(U,$J,358.3,27045,0)
+610 ;;=I50.811^^86^1113^18
+611 ;;^UTILITY(U,$J,358.3,27045,1,0)
+612 ;;=^358.31IA^4^2
+613 ;;^UTILITY(U,$J,358.3,27045,1,3,0)
+614 ;;=3^Heart Failure,Right,Acute
+615 ;;^UTILITY(U,$J,358.3,27045,1,4,0)
+616 ;;=4^I50.811
+617 ;;^UTILITY(U,$J,358.3,27045,2)
+618 ;;=^5151385
+619 ;;^UTILITY(U,$J,358.3,27046,0)
+620 ;;=I50.812^^86^1113^20
+621 ;;^UTILITY(U,$J,358.3,27046,1,0)
+622 ;;=^358.31IA^4^2
+623 ;;^UTILITY(U,$J,358.3,27046,1,3,0)
+624 ;;=3^Heart Failure,Right,Chronic
+625 ;;^UTILITY(U,$J,358.3,27046,1,4,0)
+626 ;;=4^I50.812
+627 ;;^UTILITY(U,$J,358.3,27046,2)
+628 ;;=^5151386
+629 ;;^UTILITY(U,$J,358.3,27047,0)
+630 ;;=I50.813^^86^1113^19
+631 ;;^UTILITY(U,$J,358.3,27047,1,0)
+632 ;;=^358.31IA^4^2
+633 ;;^UTILITY(U,$J,358.3,27047,1,3,0)
+634 ;;=3^Heart Failure,Right,Acute on Chronic
+635 ;;^UTILITY(U,$J,358.3,27047,1,4,0)
+636 ;;=4^I50.813
+637 ;;^UTILITY(U,$J,358.3,27047,2)
+638 ;;=^5151387
+639 ;;^UTILITY(U,$J,358.3,27048,0)
+640 ;;=I50.814^^86^1113^17
+641 ;;^UTILITY(U,$J,358.3,27048,1,0)
+642 ;;=^358.31IA^4^2
+643 ;;^UTILITY(U,$J,358.3,27048,1,3,0)
+644 ;;=3^Heart Failure,Right d/t Left Heart Failure
+645 ;;^UTILITY(U,$J,358.3,27048,1,4,0)
+646 ;;=4^I50.814
+647 ;;^UTILITY(U,$J,358.3,27048,2)
+648 ;;=^5151388
+649 ;;^UTILITY(U,$J,358.3,27049,0)
+650 ;;=I50.82^^86^1113^13
+651 ;;^UTILITY(U,$J,358.3,27049,1,0)
+652 ;;=^358.31IA^4^2
+653 ;;^UTILITY(U,$J,358.3,27049,1,3,0)
+654 ;;=3^Heart Failure,Biventricular
+655 ;;^UTILITY(U,$J,358.3,27049,1,4,0)
+656 ;;=4^I50.82
+657 ;;^UTILITY(U,$J,358.3,27049,2)
+658 ;;=^5151389
+659 ;;^UTILITY(U,$J,358.3,27050,0)
+660 ;;=I50.83^^86^1113^15
+661 ;;^UTILITY(U,$J,358.3,27050,1,0)
+662 ;;=^358.31IA^4^2
+663 ;;^UTILITY(U,$J,358.3,27050,1,3,0)
+664 ;;=3^Heart Failure,High Output
+665 ;;^UTILITY(U,$J,358.3,27050,1,4,0)
+666 ;;=4^I50.83
+667 ;;^UTILITY(U,$J,358.3,27050,2)
+668 ;;=^5151390
+669 ;;^UTILITY(U,$J,358.3,27051,0)
+670 ;;=I50.84^^86^1113^14
+671 ;;^UTILITY(U,$J,358.3,27051,1,0)
+672 ;;=^358.31IA^4^2
+673 ;;^UTILITY(U,$J,358.3,27051,1,3,0)
+674 ;;=3^Heart Failure,End Stage
+675 ;;^UTILITY(U,$J,358.3,27051,1,4,0)
+676 ;;=4^I50.84
+677 ;;^UTILITY(U,$J,358.3,27051,2)
+678 ;;=^5151391
+679 ;;^UTILITY(U,$J,358.3,27052,0)
+680 ;;=I50.22^^86^1113^7
+681 ;;^UTILITY(U,$J,358.3,27052,1,0)
+682 ;;=^358.31IA^4^2
+683 ;;^UTILITY(U,$J,358.3,27052,1,3,0)
+684 ;;=3^CHF,Systolic,Chronic
+685 ;;^UTILITY(U,$J,358.3,27052,1,4,0)
+686 ;;=4^I50.22
+687 ;;^UTILITY(U,$J,358.3,27052,2)
+688 ;;=^5007241
+689 ;;^UTILITY(U,$J,358.3,27053,0)
+690 ;;=I50.23^^86^1113^8
