IBDEI017 ; ; 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,2393,1,4,0)
;;=4^I97.0
;;^UTILITY(U,$J,358.3,2393,2)
;;=^5008082
;;^UTILITY(U,$J,358.3,2394,0)
;;=I97.110^^20^150^59
;;^UTILITY(U,$J,358.3,2394,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,2394,1,3,0)
;;=3^Postprocedural Cardiac Insufficiency Following Cardiac Surgery
;;^UTILITY(U,$J,358.3,2394,1,4,0)
;;=4^I97.110
;;^UTILITY(U,$J,358.3,2394,2)
;;=^5008083
;;^UTILITY(U,$J,358.3,2395,0)
;;=T86.20^^20^150^23
;;^UTILITY(U,$J,358.3,2395,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,2395,1,3,0)
;;=3^Complication of Heart Transplant,Unspec
;;^UTILITY(U,$J,358.3,2395,1,4,0)
;;=4^T86.20
;;^UTILITY(U,$J,358.3,2395,2)
;;=^5055713
;;^UTILITY(U,$J,358.3,2396,0)
;;=T86.21^^20^150^39
;;^UTILITY(U,$J,358.3,2396,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,2396,1,3,0)
;;=3^Heart Transplant Rejection
;;^UTILITY(U,$J,358.3,2396,1,4,0)
;;=4^T86.21
;;^UTILITY(U,$J,358.3,2396,2)
;;=^5055714
;;^UTILITY(U,$J,358.3,2397,0)
;;=T86.22^^20^150^37
;;^UTILITY(U,$J,358.3,2397,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,2397,1,3,0)
;;=3^Heart Transplant Failure
;;^UTILITY(U,$J,358.3,2397,1,4,0)
;;=4^T86.22
;;^UTILITY(U,$J,358.3,2397,2)
;;=^5055715
;;^UTILITY(U,$J,358.3,2398,0)
;;=T86.23^^20^150^38
;;^UTILITY(U,$J,358.3,2398,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,2398,1,3,0)
;;=3^Heart Transplant Infection
;;^UTILITY(U,$J,358.3,2398,1,4,0)
;;=4^T86.23
;;^UTILITY(U,$J,358.3,2398,2)
;;=^5055716
;;^UTILITY(U,$J,358.3,2399,0)
;;=T86.290^^20^150^13
;;^UTILITY(U,$J,358.3,2399,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,2399,1,3,0)
;;=3^Cardiac Allograft Vasculopathy
;;^UTILITY(U,$J,358.3,2399,1,4,0)
;;=4^T86.290
;;^UTILITY(U,$J,358.3,2399,2)
;;=^5055717
;;^UTILITY(U,$J,358.3,2400,0)
;;=T86.298^^20^150^28
;;^UTILITY(U,$J,358.3,2400,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,2400,1,3,0)
;;=3^Complications of Heart Transplant NEC
;;^UTILITY(U,$J,358.3,2400,1,4,0)
;;=4^T86.298
;;^UTILITY(U,$J,358.3,2400,2)
;;=^5055718
;;^UTILITY(U,$J,358.3,2401,0)
;;=T86.30^^20^150^24
;;^UTILITY(U,$J,358.3,2401,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,2401,1,3,0)
;;=3^Complication of Heart-Lung Transplant,Unspec
;;^UTILITY(U,$J,358.3,2401,1,4,0)
;;=4^T86.30
;;^UTILITY(U,$J,358.3,2401,2)
;;=^5055719
;;^UTILITY(U,$J,358.3,2402,0)
;;=T86.39^^20^150^29
;;^UTILITY(U,$J,358.3,2402,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,2402,1,3,0)
;;=3^Complications of Heart-Lung Transplant NEC
;;^UTILITY(U,$J,358.3,2402,1,4,0)
;;=4^T86.39
;;^UTILITY(U,$J,358.3,2402,2)
;;=^5055723
;;^UTILITY(U,$J,358.3,2403,0)
;;=T86.31^^20^150^44
;;^UTILITY(U,$J,358.3,2403,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,2403,1,3,0)
;;=3^Heart-Lung Transplant Rejection
;;^UTILITY(U,$J,358.3,2403,1,4,0)
;;=4^T86.31
;;^UTILITY(U,$J,358.3,2403,2)
;;=^5055720
;;^UTILITY(U,$J,358.3,2404,0)
;;=T86.32^^20^150^42
;;^UTILITY(U,$J,358.3,2404,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,2404,1,3,0)
;;=3^Heart-Lung Transplant Failure
;;^UTILITY(U,$J,358.3,2404,1,4,0)
;;=4^T86.32
;;^UTILITY(U,$J,358.3,2404,2)
;;=^5055721
;;^UTILITY(U,$J,358.3,2405,0)
;;=T86.33^^20^150^43
;;^UTILITY(U,$J,358.3,2405,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,2405,1,3,0)
;;=3^Heart-Lung Transplant Infection
;;^UTILITY(U,$J,358.3,2405,1,4,0)
;;=4^T86.33
;;^UTILITY(U,$J,358.3,2405,2)
;;=^5055722
;;^UTILITY(U,$J,358.3,2406,0)
;;=T86.810^^20^150^51
;;^UTILITY(U,$J,358.3,2406,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,2406,1,3,0)
;;=3^Lung Transplant Rejection
;;^UTILITY(U,$J,358.3,2406,1,4,0)
;;=4^T86.810
;;^UTILITY(U,$J,358.3,2406,2)
;;=^5055730
;;^UTILITY(U,$J,358.3,2407,0)
;;=T86.811^^20^150^50
;;^UTILITY(U,$J,358.3,2407,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,2407,1,3,0)
;;=3^Lung Transplant Failure
;;^UTILITY(U,$J,358.3,2407,1,4,0)
;;=4^T86.811
;;^UTILITY(U,$J,358.3,2407,2)
;;=^5055731
;;^UTILITY(U,$J,358.3,2408,0)
;;=T86.819^^20^150^26
;;^UTILITY(U,$J,358.3,2408,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,2408,1,3,0)
;;=3^Complication of Lung Transplant,Unspec
;;^UTILITY(U,$J,358.3,2408,1,4,0)
;;=4^T86.819
;;^UTILITY(U,$J,358.3,2408,2)
;;=^5137975
;;^UTILITY(U,$J,358.3,2409,0)
;;=T86.818^^20^150^25
;;^UTILITY(U,$J,358.3,2409,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,2409,1,3,0)
;;=3^Complication of Lung Transplant NEC
;;^UTILITY(U,$J,358.3,2409,1,4,0)
;;=4^T86.818
;;^UTILITY(U,$J,358.3,2409,2)
;;=^5055733
;;^UTILITY(U,$J,358.3,2410,0)
;;=Z94.1^^20^150^40
;;^UTILITY(U,$J,358.3,2410,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,2410,1,3,0)
;;=3^Heart Transplant Status
;;^UTILITY(U,$J,358.3,2410,1,4,0)
;;=4^Z94.1
;;^UTILITY(U,$J,358.3,2410,2)
;;=^5063655
;;^UTILITY(U,$J,358.3,2411,0)
;;=Z94.3^^20^150^41
;;^UTILITY(U,$J,358.3,2411,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,2411,1,3,0)
;;=3^Heart and Lungs Transplant Status
;;^UTILITY(U,$J,358.3,2411,1,4,0)
;;=4^Z94.3
;;^UTILITY(U,$J,358.3,2411,2)
;;=^5063657
;;^UTILITY(U,$J,358.3,2412,0)
;;=Z48.21^^20^150^8
;;^UTILITY(U,$J,358.3,2412,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,2412,1,3,0)
;;=3^Aftercare Following Heart Transplant
;;^UTILITY(U,$J,358.3,2412,1,4,0)
;;=4^Z48.21
;;^UTILITY(U,$J,358.3,2412,2)
;;=^5063038
;;^UTILITY(U,$J,358.3,2413,0)
;;=Z48.280^^20^150^9
;;^UTILITY(U,$J,358.3,2413,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,2413,1,3,0)
;;=3^Aftercare Following Heart-Lung Transplant
;;^UTILITY(U,$J,358.3,2413,1,4,0)
;;=4^Z48.280
;;^UTILITY(U,$J,358.3,2413,2)
;;=^5063042
;;^UTILITY(U,$J,358.3,2414,0)
;;=I50.41^^20^150^1
;;^UTILITY(U,$J,358.3,2414,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,2414,1,3,0)
;;=3^Acute Combined Systolic & Diastolic Hrt Failure
;;^UTILITY(U,$J,358.3,2414,1,4,0)
;;=4^I50.41
;;^UTILITY(U,$J,358.3,2414,2)
;;=^5007248
;;^UTILITY(U,$J,358.3,2415,0)
;;=I50.30^^20^150^2
;;^UTILITY(U,$J,358.3,2415,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,2415,1,3,0)
;;=3^Acute Diastolic Heart Failure
;;^UTILITY(U,$J,358.3,2415,1,4,0)
;;=4^I50.30
;;^UTILITY(U,$J,358.3,2415,2)
;;=^5007243
;;^UTILITY(U,$J,358.3,2416,0)
;;=I50.33^^20^150^5
;;^UTILITY(U,$J,358.3,2416,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,2416,1,3,0)
;;=3^Acute on Chronic Diastolic Heart Failure
;;^UTILITY(U,$J,358.3,2416,1,4,0)
;;=4^I50.33
;;^UTILITY(U,$J,358.3,2416,2)
;;=^5007246
;;^UTILITY(U,$J,358.3,2417,0)
;;=I50.23^^20^150^7
;;^UTILITY(U,$J,358.3,2417,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,2417,1,3,0)
;;=3^Acute on Chronic Systolic Heart Failure
;;^UTILITY(U,$J,358.3,2417,1,4,0)
;;=4^I50.23
;;^UTILITY(U,$J,358.3,2417,2)
;;=^5007242
;;^UTILITY(U,$J,358.3,2418,0)
;;=I50.21^^20^150^4
;;^UTILITY(U,$J,358.3,2418,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,2418,1,3,0)
;;=3^Acute Systolic Heart Failure
;;^UTILITY(U,$J,358.3,2418,1,4,0)
;;=4^I50.21
;;^UTILITY(U,$J,358.3,2418,2)
;;=^5007240
;;^UTILITY(U,$J,358.3,2419,0)
;;=I50.42^^20^150^18
;;^UTILITY(U,$J,358.3,2419,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,2419,1,3,0)
;;=3^Chronic Combined Systolic & Diastolic Heart Failure
;;^UTILITY(U,$J,358.3,2419,1,4,0)
;;=4^I50.42
;;^UTILITY(U,$J,358.3,2419,2)
;;=^5007249
;;^UTILITY(U,$J,358.3,2420,0)
;;=I50.32^^20^150^19
;;^UTILITY(U,$J,358.3,2420,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,2420,1,3,0)
;;=3^Chronic Diastolic Heart Failure
;;^UTILITY(U,$J,358.3,2420,1,4,0)
;;=4^I50.32
;;^UTILITY(U,$J,358.3,2420,2)
;;=^5007245
;;^UTILITY(U,$J,358.3,2421,0)
;;=I13.0^^20^150^34
;;^UTILITY(U,$J,358.3,2421,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,2421,1,3,0)
;;=3^HTN Hrt & CKD w/ Hrt Failure,Stg 1-4 CKD
;;^UTILITY(U,$J,358.3,2421,1,4,0)
;;=4^I13.0
;;^UTILITY(U,$J,358.3,2421,2)
;;=^5007067
;;^UTILITY(U,$J,358.3,2422,0)
;;=I13.2^^20^150^35
;;^UTILITY(U,$J,358.3,2422,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,2422,1,3,0)
;;=3^HTN Hrt & CKD w/ Hrt Failure,Stg 5 or ESRD
;;^UTILITY(U,$J,358.3,2422,1,4,0)
;;=4^I13.2
;;^UTILITY(U,$J,358.3,2422,2)
;;=^5007070
;;^UTILITY(U,$J,358.3,2423,0)
;;=I11.0^^20^150^46
;;^UTILITY(U,$J,358.3,2423,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,2423,1,3,0)
;;=3^Hypertensive Hrt Disease w/ Heart Failure
;;^UTILITY(U,$J,358.3,2423,1,4,0)
;;=4^I11.0
;;^UTILITY(U,$J,358.3,2423,2)
;;=^5007063
;;^UTILITY(U,$J,358.3,2424,0)
;;=I09.81^^20^150^69
;;^UTILITY(U,$J,358.3,2424,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,2424,1,3,0)
;;=3^Rheumatic Hrt Failure
;;^UTILITY(U,$J,358.3,2424,1,4,0)
;;=4^I09.81
;;^UTILITY(U,$J,358.3,2424,2)
;;=^5007059
;;^UTILITY(U,$J,358.3,2425,0)
;;=I50.813^^20^150^6
;;^UTILITY(U,$J,358.3,2425,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,2425,1,3,0)
;;=3^Acute on Chronic Right Heart Failure
;;^UTILITY(U,$J,358.3,2425,1,4,0)
;;=4^I50.813
;;^UTILITY(U,$J,358.3,2425,2)
;;=^5151387
;;^UTILITY(U,$J,358.3,2426,0)
;;=I50.811^^20^150^3
;;^UTILITY(U,$J,358.3,2426,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,2426,1,3,0)
;;=3^Acute Right Heart Failure
;;^UTILITY(U,$J,358.3,2426,1,4,0)
;;=4^I50.811
;;^UTILITY(U,$J,358.3,2426,2)
;;=^5151385
;;^UTILITY(U,$J,358.3,2427,0)
;;=I50.82^^20^150^12
;;^UTILITY(U,$J,358.3,2427,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,2427,1,3,0)
;;=3^Biventricular Heart Failure
;;^UTILITY(U,$J,358.3,2427,1,4,0)
;;=4^I50.82
;;^UTILITY(U,$J,358.3,2427,2)
;;=^5151389
;;^UTILITY(U,$J,358.3,2428,0)
;;=I50.812^^20^150^20
;;^UTILITY(U,$J,358.3,2428,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,2428,1,3,0)
;;=3^Chronic Right Heart Failure
;;^UTILITY(U,$J,358.3,2428,1,4,0)
;;=4^I50.812
;;^UTILITY(U,$J,358.3,2428,2)
;;=^5151386
;;^UTILITY(U,$J,358.3,2429,0)
;;=I50.84^^20^150^33
;;^UTILITY(U,$J,358.3,2429,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,2429,1,3,0)
;;=3^End Stage Heart Failure
;;^UTILITY(U,$J,358.3,2429,1,4,0)
;;=4^I50.84
;;^UTILITY(U,$J,358.3,2429,2)
;;=^5151391
;;^UTILITY(U,$J,358.3,2430,0)
;;=I50.83^^20^150^45
;;^UTILITY(U,$J,358.3,2430,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,2430,1,3,0)
;;=3^High Output Heart Failure
;;^UTILITY(U,$J,358.3,2430,1,4,0)
;;=4^I50.83
;;^UTILITY(U,$J,358.3,2430,2)
;;=^5151390
;;^UTILITY(U,$J,358.3,2431,0)
;;=I27.21^^20^150^63
;;^UTILITY(U,$J,358.3,2431,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,2431,1,3,0)
;;=3^Pulmonary Arterial Hypertension
;;^UTILITY(U,$J,358.3,2431,1,4,0)
;;=4^I27.21
;;^UTILITY(U,$J,358.3,2431,2)
;;=^5151377
;;^UTILITY(U,$J,358.3,2432,0)
;;=I27.22^^20^150^66
;;^UTILITY(U,$J,358.3,2432,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,2432,1,3,0)
;;=3^Pulmonary HTN d/t Left Heart Disease
;;^UTILITY(U,$J,358.3,2432,1,4,0)
;;=4^I27.22
;;^UTILITY(U,$J,358.3,2432,2)
;;=^5151378
;;^UTILITY(U,$J,358.3,2433,0)
;;=I50.814^^20^150^70
;;^UTILITY(U,$J,358.3,2433,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,2433,1,3,0)
;;=3^Right Heart Failure d/t Left Heart Failure
;;^UTILITY(U,$J,358.3,2433,1,4,0)
;;=4^I50.814
;;^UTILITY(U,$J,358.3,2433,2)
;;=^5151388
;;^UTILITY(U,$J,358.3,2434,0)
;;=I50.22^^20^150^21
;;^UTILITY(U,$J,358.3,2434,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,2434,1,3,0)
;;=3^Chronic Systolic Heart Failure
;;^UTILITY(U,$J,358.3,2434,1,4,0)
;;=4^I50.22
;;^UTILITY(U,$J,358.3,2434,2)
;;=^5007241
;;^UTILITY(U,$J,358.3,2435,0)
;;=I25.10^^20^151^2
;;^UTILITY(U,$J,358.3,2435,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,2435,1,3,0)
;;=3^Athscl Hrt Disease of Native Coronary Artery w/o Ang Pctrs
;;^UTILITY(U,$J,358.3,2435,1,4,0)
;;=4^I25.10
;;^UTILITY(U,$J,358.3,2435,2)
;;=^5007107
;;^UTILITY(U,$J,358.3,2436,0)
;;=I25.110^^20^151^3
;;^UTILITY(U,$J,358.3,2436,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,2436,1,3,0)
;;=3^Athscl Hrt Disease of Native Coronary Artery w/ Unstable Ang Pctrs
;;^UTILITY(U,$J,358.3,2436,1,4,0)
;;=4^I25.110
;;^UTILITY(U,$J,358.3,2436,2)
;;=^5007108
;;^UTILITY(U,$J,358.3,2437,0)
;;=I25.111^^20^151^4
;;^UTILITY(U,$J,358.3,2437,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,2437,1,3,0)
;;=3^Athscl Hrt Disease of Native Coronary Artery w/ Ang Pctrs w/ Spasm
;;^UTILITY(U,$J,358.3,2437,1,4,0)
;;=4^I25.111
;;^UTILITY(U,$J,358.3,2437,2)
;;=^5007109
;;^UTILITY(U,$J,358.3,2438,0)
;;=I25.118^^20^151^5
;;^UTILITY(U,$J,358.3,2438,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,2438,1,3,0)
;;=3^Athscl Hrt Disease of Native Coronary Artery w/ Oth Ang Pctrs
;;^UTILITY(U,$J,358.3,2438,1,4,0)
;;=4^I25.118
;;^UTILITY(U,$J,358.3,2438,2)
;;=^5007110
;;^UTILITY(U,$J,358.3,2439,0)
;;=I25.119^^20^151^6
;;^UTILITY(U,$J,358.3,2439,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,2439,1,3,0)
;;=3^Athscl Hrt Disease of Native Coronary Artery w/ Unspec Ang Pctrs
;;^UTILITY(U,$J,358.3,2439,1,4,0)
;;=4^I25.119
;;^UTILITY(U,$J,358.3,2439,2)
;;=^5007111
;;^UTILITY(U,$J,358.3,2440,0)
;;=I25.810^^20^151^1
;;^UTILITY(U,$J,358.3,2440,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,2440,1,3,0)
;;=3^Atherosclerosis of CABG w/o Angina Pectoris
;;^UTILITY(U,$J,358.3,2440,1,4,0)
;;=4^I25.810
;;^UTILITY(U,$J,358.3,2440,2)
;;=^5007141
;;^UTILITY(U,$J,358.3,2441,0)
;;=I25.82^^20^151^10
;;^UTILITY(U,$J,358.3,2441,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,2441,1,3,0)
;;=3^Total Occlusion of Coronary Artery,Chronic
;;^UTILITY(U,$J,358.3,2441,1,4,0)
;;=4^I25.82
;;^UTILITY(U,$J,358.3,2441,2)
;;=^335262
;;^UTILITY(U,$J,358.3,2442,0)
;;=I25.83^^20^151^8
;;^UTILITY(U,$J,358.3,2442,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,2442,1,3,0)
;;=3^Coronary Atherosclerosis d/t Lipid Rich Plaque
;;^UTILITY(U,$J,358.3,2442,1,4,0)
;;=4^I25.83
;;^UTILITY(U,$J,358.3,2442,2)
;;=^336601
;;^UTILITY(U,$J,358.3,2443,0)
;;=I25.84^^20^151^7
;;^UTILITY(U,$J,358.3,2443,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,2443,1,3,0)
;;=3^Coronary Atherosclerosis d/t Calcified Coronary Lesion
;;^UTILITY(U,$J,358.3,2443,1,4,0)
;;=4^I25.84
;;^UTILITY(U,$J,358.3,2443,2)
;;=^340518
;;^UTILITY(U,$J,358.3,2444,0)
;;=I25.89^^20^151^9
;;^UTILITY(U,$J,358.3,2444,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,2444,1,3,0)
;;=3^Ischemic Heart Disease,Chronic NEC
;;^UTILITY(U,$J,358.3,2444,1,4,0)
;;=4^I25.89
;;^UTILITY(U,$J,358.3,2444,2)
;;=^269679
;;^UTILITY(U,$J,358.3,2445,0)
;;=E66.9^^20^152^5
;;^UTILITY(U,$J,358.3,2445,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,2445,1,3,0)
;;=3^Obesity,Unspec
;;^UTILITY(U,$J,358.3,2445,1,4,0)
;;=4^E66.9
;;^UTILITY(U,$J,358.3,2445,2)
;;=^5002832
;;^UTILITY(U,$J,358.3,2446,0)
;;=R60.9^^20^152^4
;;^UTILITY(U,$J,358.3,2446,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,2446,1,3,0)
;;=3^Edema,Unspec
;;^UTILITY(U,$J,358.3,2446,1,4,0)
;;=4^R60.9
;;^UTILITY(U,$J,358.3,2446,2)
;;=^5019534
;;^UTILITY(U,$J,358.3,2447,0)
;;=R00.2^^20^152^7
;;^UTILITY(U,$J,358.3,2447,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,2447,1,3,0)
;;=3^Palpitations
;;^UTILITY(U,$J,358.3,2447,1,4,0)
;;=4^R00.2
;;^UTILITY(U,$J,358.3,2447,2)
;;=^5019165
;;^UTILITY(U,$J,358.3,2448,0)
;;=R01.1^^20^152^2
;;^UTILITY(U,$J,358.3,2448,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,2448,1,3,0)
;;=3^Cardiac Murmur,Unspec
;;^UTILITY(U,$J,358.3,2448,1,4,0)
;;=4^R01.1
;;^UTILITY(U,$J,358.3,2448,2)
;;=^5019169
;;^UTILITY(U,$J,358.3,2449,0)
;;=R06.01^^20^152^6
;;^UTILITY(U,$J,358.3,2449,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,2449,1,3,0)
;;=3^Orthopnea
;;^UTILITY(U,$J,358.3,2449,1,4,0)
;;=4^R06.01
;;^UTILITY(U,$J,358.3,2449,2)
;;=^186737
;;^UTILITY(U,$J,358.3,2450,0)
;;=R06.81^^20^152^1
;;^UTILITY(U,$J,358.3,2450,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,2450,1,3,0)
;;=3^Apnea NEC
;;^UTILITY(U,$J,358.3,2450,1,4,0)
;;=4^R06.81
;;^UTILITY(U,$J,358.3,2450,2)
;;=^5019190
;;^UTILITY(U,$J,358.3,2451,0)
;;=R42.^^20^152^3
;;^UTILITY(U,$J,358.3,2451,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,2451,1,3,0)
;;=3^Dizziness and Giddiness
;;^UTILITY(U,$J,358.3,2451,1,4,0)
;;=4^R42.
;;^UTILITY(U,$J,358.3,2451,2)
;;=^5019450
;;^UTILITY(U,$J,358.3,2452,0)
;;=R06.02^^20^152^8
;;^UTILITY(U,$J,358.3,2452,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,2452,1,3,0)
;;=3^Shortness of Breath
;;^UTILITY(U,$J,358.3,2452,1,4,0)
;;=4^R06.02
;;^UTILITY(U,$J,358.3,2452,2)
;;=^5019181
;;^UTILITY(U,$J,358.3,2453,0)
;;=I25.2^^20^153^5
;;^UTILITY(U,$J,358.3,2453,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,2453,1,3,0)
;;=3^Old MI
;;^UTILITY(U,$J,358.3,2453,1,4,0)
;;=4^I25.2
;;^UTILITY(U,$J,358.3,2453,2)
;;=^259884
;;^UTILITY(U,$J,358.3,2454,0)
;;=Z95.2^^20^153^8
;;^UTILITY(U,$J,358.3,2454,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,2454,1,3,0)
;;=3^Presence of Prosthetic Heart Valve
;;^UTILITY(U,$J,358.3,2454,1,4,0)
;;=4^Z95.2
;;^UTILITY(U,$J,358.3,2454,2)
;;=^5063670
;;^UTILITY(U,$J,358.3,2455,0)
;;=Z95.1^^20^153^6
;;^UTILITY(U,$J,358.3,2455,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,2455,1,3,0)
;;=3^Presence of Aortocoronary Bypass Graft
;;^UTILITY(U,$J,358.3,2455,1,4,0)
;;=4^Z95.1
;;^UTILITY(U,$J,358.3,2455,2)
;;=^5063669
;;^UTILITY(U,$J,358.3,2456,0)
;;=Z98.61^^20^153^1
;;^UTILITY(U,$J,358.3,2456,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,2456,1,3,0)
;;=3^Coronary Angioplasty Status
;;^UTILITY(U,$J,358.3,2456,1,4,0)
;;=4^Z98.61
;;^UTILITY(U,$J,358.3,2456,2)
;;=^5063742
;;^UTILITY(U,$J,358.3,2457,0)
;;=Z95.2^^20^153^9
;;^UTILITY(U,$J,358.3,2457,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,2457,1,3,0)
;;=3^Presence of Prosthetic Heart Valve
;;^UTILITY(U,$J,358.3,2457,1,4,0)
;;=4^Z95.2
;;^UTILITY(U,$J,358.3,2457,2)
;;=^5063670
;;^UTILITY(U,$J,358.3,2458,0)
;;=Z95.3^^20^153^10
;;^UTILITY(U,$J,358.3,2458,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,2458,1,3,0)
;;=3^Presence of Xenogenic Heart Valve
;;^UTILITY(U,$J,358.3,2458,1,4,0)
;;=4^Z95.3
;;^UTILITY(U,$J,358.3,2458,2)
;;=^5063671
;;^UTILITY(U,$J,358.3,2459,0)
;;=Z95.4^^20^153^7
;;^UTILITY(U,$J,358.3,2459,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,2459,1,3,0)
;;=3^Presence of Heart Valve Replacement NEC
;;^UTILITY(U,$J,358.3,2459,1,4,0)
;;=4^Z95.4
;;^UTILITY(U,$J,358.3,2459,2)
;;=^5063672
;;^UTILITY(U,$J,358.3,2460,0)
;;=Z79.01^^20^153^4
;;^UTILITY(U,$J,358.3,2460,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,2460,1,3,0)
;;=3^Long Term Current Use of Anticoagulants
;;^UTILITY(U,$J,358.3,2460,1,4,0)
;;=4^Z79.01
;;^UTILITY(U,$J,358.3,2460,2)
;;=^5063330
;;^UTILITY(U,$J,358.3,2461,0)
;;=Z83.438^^20^153^3
;;^UTILITY(U,$J,358.3,2461,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,2461,1,3,0)
;;=3^Family Hx of Familial Comb Hyperlipidemia
;;^UTILITY(U,$J,358.3,2461,1,4,0)
;;=4^Z83.438
;;^UTILITY(U,$J,358.3,2461,2)
;;=^5157632
;;^UTILITY(U,$J,358.3,2462,0)
;;=Z83.430^^20^153^2
;;^UTILITY(U,$J,358.3,2462,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,2462,1,3,0)
;;=3^Family Hx of Elevated Lipoprotein(a)
;;^UTILITY(U,$J,358.3,2462,1,4,0)
;;=4^Z83.430
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HIBDEI017 19746 printed Dec 13, 2024@01:39:35 Page 2
IBDEI017 ; ; 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,2393,1,4,0)
+2 ;;=4^I97.0
+3 ;;^UTILITY(U,$J,358.3,2393,2)
+4 ;;=^5008082
+5 ;;^UTILITY(U,$J,358.3,2394,0)
+6 ;;=I97.110^^20^150^59
+7 ;;^UTILITY(U,$J,358.3,2394,1,0)
+8 ;;=^358.31IA^4^2
+9 ;;^UTILITY(U,$J,358.3,2394,1,3,0)
+10 ;;=3^Postprocedural Cardiac Insufficiency Following Cardiac Surgery
+11 ;;^UTILITY(U,$J,358.3,2394,1,4,0)
+12 ;;=4^I97.110
+13 ;;^UTILITY(U,$J,358.3,2394,2)
+14 ;;=^5008083
+15 ;;^UTILITY(U,$J,358.3,2395,0)
+16 ;;=T86.20^^20^150^23
+17 ;;^UTILITY(U,$J,358.3,2395,1,0)
+18 ;;=^358.31IA^4^2
+19 ;;^UTILITY(U,$J,358.3,2395,1,3,0)
+20 ;;=3^Complication of Heart Transplant,Unspec
+21 ;;^UTILITY(U,$J,358.3,2395,1,4,0)
+22 ;;=4^T86.20
+23 ;;^UTILITY(U,$J,358.3,2395,2)
+24 ;;=^5055713
+25 ;;^UTILITY(U,$J,358.3,2396,0)
+26 ;;=T86.21^^20^150^39
+27 ;;^UTILITY(U,$J,358.3,2396,1,0)
+28 ;;=^358.31IA^4^2
+29 ;;^UTILITY(U,$J,358.3,2396,1,3,0)
+30 ;;=3^Heart Transplant Rejection
+31 ;;^UTILITY(U,$J,358.3,2396,1,4,0)
+32 ;;=4^T86.21
+33 ;;^UTILITY(U,$J,358.3,2396,2)
+34 ;;=^5055714
+35 ;;^UTILITY(U,$J,358.3,2397,0)
+36 ;;=T86.22^^20^150^37
+37 ;;^UTILITY(U,$J,358.3,2397,1,0)
+38 ;;=^358.31IA^4^2
+39 ;;^UTILITY(U,$J,358.3,2397,1,3,0)
+40 ;;=3^Heart Transplant Failure
+41 ;;^UTILITY(U,$J,358.3,2397,1,4,0)
+42 ;;=4^T86.22
+43 ;;^UTILITY(U,$J,358.3,2397,2)
+44 ;;=^5055715
+45 ;;^UTILITY(U,$J,358.3,2398,0)
+46 ;;=T86.23^^20^150^38
+47 ;;^UTILITY(U,$J,358.3,2398,1,0)
+48 ;;=^358.31IA^4^2
+49 ;;^UTILITY(U,$J,358.3,2398,1,3,0)
+50 ;;=3^Heart Transplant Infection
+51 ;;^UTILITY(U,$J,358.3,2398,1,4,0)
+52 ;;=4^T86.23
+53 ;;^UTILITY(U,$J,358.3,2398,2)
+54 ;;=^5055716
+55 ;;^UTILITY(U,$J,358.3,2399,0)
+56 ;;=T86.290^^20^150^13
+57 ;;^UTILITY(U,$J,358.3,2399,1,0)
+58 ;;=^358.31IA^4^2
+59 ;;^UTILITY(U,$J,358.3,2399,1,3,0)
+60 ;;=3^Cardiac Allograft Vasculopathy
+61 ;;^UTILITY(U,$J,358.3,2399,1,4,0)
+62 ;;=4^T86.290
+63 ;;^UTILITY(U,$J,358.3,2399,2)
+64 ;;=^5055717
+65 ;;^UTILITY(U,$J,358.3,2400,0)
+66 ;;=T86.298^^20^150^28
+67 ;;^UTILITY(U,$J,358.3,2400,1,0)
+68 ;;=^358.31IA^4^2
+69 ;;^UTILITY(U,$J,358.3,2400,1,3,0)
+70 ;;=3^Complications of Heart Transplant NEC
+71 ;;^UTILITY(U,$J,358.3,2400,1,4,0)
+72 ;;=4^T86.298
+73 ;;^UTILITY(U,$J,358.3,2400,2)
+74 ;;=^5055718
+75 ;;^UTILITY(U,$J,358.3,2401,0)
+76 ;;=T86.30^^20^150^24
+77 ;;^UTILITY(U,$J,358.3,2401,1,0)
+78 ;;=^358.31IA^4^2
+79 ;;^UTILITY(U,$J,358.3,2401,1,3,0)
+80 ;;=3^Complication of Heart-Lung Transplant,Unspec
+81 ;;^UTILITY(U,$J,358.3,2401,1,4,0)
+82 ;;=4^T86.30
+83 ;;^UTILITY(U,$J,358.3,2401,2)
+84 ;;=^5055719
+85 ;;^UTILITY(U,$J,358.3,2402,0)
+86 ;;=T86.39^^20^150^29
+87 ;;^UTILITY(U,$J,358.3,2402,1,0)
+88 ;;=^358.31IA^4^2
+89 ;;^UTILITY(U,$J,358.3,2402,1,3,0)
+90 ;;=3^Complications of Heart-Lung Transplant NEC
+91 ;;^UTILITY(U,$J,358.3,2402,1,4,0)
+92 ;;=4^T86.39
+93 ;;^UTILITY(U,$J,358.3,2402,2)
+94 ;;=^5055723
+95 ;;^UTILITY(U,$J,358.3,2403,0)
+96 ;;=T86.31^^20^150^44
+97 ;;^UTILITY(U,$J,358.3,2403,1,0)
+98 ;;=^358.31IA^4^2
+99 ;;^UTILITY(U,$J,358.3,2403,1,3,0)
+100 ;;=3^Heart-Lung Transplant Rejection
+101 ;;^UTILITY(U,$J,358.3,2403,1,4,0)
+102 ;;=4^T86.31
+103 ;;^UTILITY(U,$J,358.3,2403,2)
+104 ;;=^5055720
+105 ;;^UTILITY(U,$J,358.3,2404,0)
+106 ;;=T86.32^^20^150^42
+107 ;;^UTILITY(U,$J,358.3,2404,1,0)
+108 ;;=^358.31IA^4^2
+109 ;;^UTILITY(U,$J,358.3,2404,1,3,0)
+110 ;;=3^Heart-Lung Transplant Failure
+111 ;;^UTILITY(U,$J,358.3,2404,1,4,0)
+112 ;;=4^T86.32
+113 ;;^UTILITY(U,$J,358.3,2404,2)
+114 ;;=^5055721
+115 ;;^UTILITY(U,$J,358.3,2405,0)
+116 ;;=T86.33^^20^150^43
+117 ;;^UTILITY(U,$J,358.3,2405,1,0)
+118 ;;=^358.31IA^4^2
+119 ;;^UTILITY(U,$J,358.3,2405,1,3,0)
+120 ;;=3^Heart-Lung Transplant Infection
+121 ;;^UTILITY(U,$J,358.3,2405,1,4,0)
+122 ;;=4^T86.33
+123 ;;^UTILITY(U,$J,358.3,2405,2)
+124 ;;=^5055722
+125 ;;^UTILITY(U,$J,358.3,2406,0)
+126 ;;=T86.810^^20^150^51
+127 ;;^UTILITY(U,$J,358.3,2406,1,0)
+128 ;;=^358.31IA^4^2
+129 ;;^UTILITY(U,$J,358.3,2406,1,3,0)
+130 ;;=3^Lung Transplant Rejection
+131 ;;^UTILITY(U,$J,358.3,2406,1,4,0)
+132 ;;=4^T86.810
+133 ;;^UTILITY(U,$J,358.3,2406,2)
+134 ;;=^5055730
+135 ;;^UTILITY(U,$J,358.3,2407,0)
+136 ;;=T86.811^^20^150^50
+137 ;;^UTILITY(U,$J,358.3,2407,1,0)
+138 ;;=^358.31IA^4^2
+139 ;;^UTILITY(U,$J,358.3,2407,1,3,0)
+140 ;;=3^Lung Transplant Failure
+141 ;;^UTILITY(U,$J,358.3,2407,1,4,0)
+142 ;;=4^T86.811
+143 ;;^UTILITY(U,$J,358.3,2407,2)
+144 ;;=^5055731
+145 ;;^UTILITY(U,$J,358.3,2408,0)
+146 ;;=T86.819^^20^150^26
+147 ;;^UTILITY(U,$J,358.3,2408,1,0)
+148 ;;=^358.31IA^4^2
+149 ;;^UTILITY(U,$J,358.3,2408,1,3,0)
+150 ;;=3^Complication of Lung Transplant,Unspec
+151 ;;^UTILITY(U,$J,358.3,2408,1,4,0)
+152 ;;=4^T86.819
+153 ;;^UTILITY(U,$J,358.3,2408,2)
+154 ;;=^5137975
+155 ;;^UTILITY(U,$J,358.3,2409,0)
+156 ;;=T86.818^^20^150^25
+157 ;;^UTILITY(U,$J,358.3,2409,1,0)
+158 ;;=^358.31IA^4^2
+159 ;;^UTILITY(U,$J,358.3,2409,1,3,0)
+160 ;;=3^Complication of Lung Transplant NEC
+161 ;;^UTILITY(U,$J,358.3,2409,1,4,0)
+162 ;;=4^T86.818
+163 ;;^UTILITY(U,$J,358.3,2409,2)
+164 ;;=^5055733
+165 ;;^UTILITY(U,$J,358.3,2410,0)
+166 ;;=Z94.1^^20^150^40
+167 ;;^UTILITY(U,$J,358.3,2410,1,0)
+168 ;;=^358.31IA^4^2
+169 ;;^UTILITY(U,$J,358.3,2410,1,3,0)
+170 ;;=3^Heart Transplant Status
+171 ;;^UTILITY(U,$J,358.3,2410,1,4,0)
+172 ;;=4^Z94.1
+173 ;;^UTILITY(U,$J,358.3,2410,2)
+174 ;;=^5063655
+175 ;;^UTILITY(U,$J,358.3,2411,0)
+176 ;;=Z94.3^^20^150^41
+177 ;;^UTILITY(U,$J,358.3,2411,1,0)
+178 ;;=^358.31IA^4^2
+179 ;;^UTILITY(U,$J,358.3,2411,1,3,0)
+180 ;;=3^Heart and Lungs Transplant Status
+181 ;;^UTILITY(U,$J,358.3,2411,1,4,0)
+182 ;;=4^Z94.3
+183 ;;^UTILITY(U,$J,358.3,2411,2)
+184 ;;=^5063657
+185 ;;^UTILITY(U,$J,358.3,2412,0)
+186 ;;=Z48.21^^20^150^8
+187 ;;^UTILITY(U,$J,358.3,2412,1,0)
+188 ;;=^358.31IA^4^2
+189 ;;^UTILITY(U,$J,358.3,2412,1,3,0)
+190 ;;=3^Aftercare Following Heart Transplant
+191 ;;^UTILITY(U,$J,358.3,2412,1,4,0)
+192 ;;=4^Z48.21
+193 ;;^UTILITY(U,$J,358.3,2412,2)
+194 ;;=^5063038
+195 ;;^UTILITY(U,$J,358.3,2413,0)
+196 ;;=Z48.280^^20^150^9
+197 ;;^UTILITY(U,$J,358.3,2413,1,0)
+198 ;;=^358.31IA^4^2
+199 ;;^UTILITY(U,$J,358.3,2413,1,3,0)
+200 ;;=3^Aftercare Following Heart-Lung Transplant
+201 ;;^UTILITY(U,$J,358.3,2413,1,4,0)
+202 ;;=4^Z48.280
+203 ;;^UTILITY(U,$J,358.3,2413,2)
+204 ;;=^5063042
+205 ;;^UTILITY(U,$J,358.3,2414,0)
+206 ;;=I50.41^^20^150^1
+207 ;;^UTILITY(U,$J,358.3,2414,1,0)
+208 ;;=^358.31IA^4^2
+209 ;;^UTILITY(U,$J,358.3,2414,1,3,0)
+210 ;;=3^Acute Combined Systolic & Diastolic Hrt Failure
+211 ;;^UTILITY(U,$J,358.3,2414,1,4,0)
+212 ;;=4^I50.41
+213 ;;^UTILITY(U,$J,358.3,2414,2)
+214 ;;=^5007248
+215 ;;^UTILITY(U,$J,358.3,2415,0)
+216 ;;=I50.30^^20^150^2
+217 ;;^UTILITY(U,$J,358.3,2415,1,0)
+218 ;;=^358.31IA^4^2
+219 ;;^UTILITY(U,$J,358.3,2415,1,3,0)
+220 ;;=3^Acute Diastolic Heart Failure
+221 ;;^UTILITY(U,$J,358.3,2415,1,4,0)
+222 ;;=4^I50.30
+223 ;;^UTILITY(U,$J,358.3,2415,2)
+224 ;;=^5007243
+225 ;;^UTILITY(U,$J,358.3,2416,0)
+226 ;;=I50.33^^20^150^5
+227 ;;^UTILITY(U,$J,358.3,2416,1,0)
+228 ;;=^358.31IA^4^2
+229 ;;^UTILITY(U,$J,358.3,2416,1,3,0)
+230 ;;=3^Acute on Chronic Diastolic Heart Failure
+231 ;;^UTILITY(U,$J,358.3,2416,1,4,0)
+232 ;;=4^I50.33
+233 ;;^UTILITY(U,$J,358.3,2416,2)
+234 ;;=^5007246
+235 ;;^UTILITY(U,$J,358.3,2417,0)
+236 ;;=I50.23^^20^150^7
+237 ;;^UTILITY(U,$J,358.3,2417,1,0)
+238 ;;=^358.31IA^4^2
+239 ;;^UTILITY(U,$J,358.3,2417,1,3,0)
+240 ;;=3^Acute on Chronic Systolic Heart Failure
+241 ;;^UTILITY(U,$J,358.3,2417,1,4,0)
+242 ;;=4^I50.23
+243 ;;^UTILITY(U,$J,358.3,2417,2)
+244 ;;=^5007242
+245 ;;^UTILITY(U,$J,358.3,2418,0)
+246 ;;=I50.21^^20^150^4
+247 ;;^UTILITY(U,$J,358.3,2418,1,0)
+248 ;;=^358.31IA^4^2
+249 ;;^UTILITY(U,$J,358.3,2418,1,3,0)
+250 ;;=3^Acute Systolic Heart Failure
+251 ;;^UTILITY(U,$J,358.3,2418,1,4,0)
+252 ;;=4^I50.21
+253 ;;^UTILITY(U,$J,358.3,2418,2)
+254 ;;=^5007240
+255 ;;^UTILITY(U,$J,358.3,2419,0)
+256 ;;=I50.42^^20^150^18
+257 ;;^UTILITY(U,$J,358.3,2419,1,0)
+258 ;;=^358.31IA^4^2
+259 ;;^UTILITY(U,$J,358.3,2419,1,3,0)
+260 ;;=3^Chronic Combined Systolic & Diastolic Heart Failure
+261 ;;^UTILITY(U,$J,358.3,2419,1,4,0)
+262 ;;=4^I50.42
+263 ;;^UTILITY(U,$J,358.3,2419,2)
+264 ;;=^5007249
+265 ;;^UTILITY(U,$J,358.3,2420,0)
+266 ;;=I50.32^^20^150^19
+267 ;;^UTILITY(U,$J,358.3,2420,1,0)
+268 ;;=^358.31IA^4^2
+269 ;;^UTILITY(U,$J,358.3,2420,1,3,0)
+270 ;;=3^Chronic Diastolic Heart Failure
+271 ;;^UTILITY(U,$J,358.3,2420,1,4,0)
+272 ;;=4^I50.32
+273 ;;^UTILITY(U,$J,358.3,2420,2)
+274 ;;=^5007245
+275 ;;^UTILITY(U,$J,358.3,2421,0)
+276 ;;=I13.0^^20^150^34
+277 ;;^UTILITY(U,$J,358.3,2421,1,0)
+278 ;;=^358.31IA^4^2
+279 ;;^UTILITY(U,$J,358.3,2421,1,3,0)
+280 ;;=3^HTN Hrt & CKD w/ Hrt Failure,Stg 1-4 CKD
+281 ;;^UTILITY(U,$J,358.3,2421,1,4,0)
+282 ;;=4^I13.0
+283 ;;^UTILITY(U,$J,358.3,2421,2)
+284 ;;=^5007067
+285 ;;^UTILITY(U,$J,358.3,2422,0)
+286 ;;=I13.2^^20^150^35
+287 ;;^UTILITY(U,$J,358.3,2422,1,0)
+288 ;;=^358.31IA^4^2
+289 ;;^UTILITY(U,$J,358.3,2422,1,3,0)
+290 ;;=3^HTN Hrt & CKD w/ Hrt Failure,Stg 5 or ESRD
+291 ;;^UTILITY(U,$J,358.3,2422,1,4,0)
+292 ;;=4^I13.2
+293 ;;^UTILITY(U,$J,358.3,2422,2)
+294 ;;=^5007070
+295 ;;^UTILITY(U,$J,358.3,2423,0)
+296 ;;=I11.0^^20^150^46
+297 ;;^UTILITY(U,$J,358.3,2423,1,0)
+298 ;;=^358.31IA^4^2
+299 ;;^UTILITY(U,$J,358.3,2423,1,3,0)
+300 ;;=3^Hypertensive Hrt Disease w/ Heart Failure
+301 ;;^UTILITY(U,$J,358.3,2423,1,4,0)
+302 ;;=4^I11.0
+303 ;;^UTILITY(U,$J,358.3,2423,2)
+304 ;;=^5007063
+305 ;;^UTILITY(U,$J,358.3,2424,0)
+306 ;;=I09.81^^20^150^69
+307 ;;^UTILITY(U,$J,358.3,2424,1,0)
+308 ;;=^358.31IA^4^2
+309 ;;^UTILITY(U,$J,358.3,2424,1,3,0)
+310 ;;=3^Rheumatic Hrt Failure
+311 ;;^UTILITY(U,$J,358.3,2424,1,4,0)
+312 ;;=4^I09.81
+313 ;;^UTILITY(U,$J,358.3,2424,2)
+314 ;;=^5007059
+315 ;;^UTILITY(U,$J,358.3,2425,0)
+316 ;;=I50.813^^20^150^6
+317 ;;^UTILITY(U,$J,358.3,2425,1,0)
+318 ;;=^358.31IA^4^2
+319 ;;^UTILITY(U,$J,358.3,2425,1,3,0)
+320 ;;=3^Acute on Chronic Right Heart Failure
+321 ;;^UTILITY(U,$J,358.3,2425,1,4,0)
+322 ;;=4^I50.813
+323 ;;^UTILITY(U,$J,358.3,2425,2)
+324 ;;=^5151387
+325 ;;^UTILITY(U,$J,358.3,2426,0)
+326 ;;=I50.811^^20^150^3
+327 ;;^UTILITY(U,$J,358.3,2426,1,0)
+328 ;;=^358.31IA^4^2
+329 ;;^UTILITY(U,$J,358.3,2426,1,3,0)
+330 ;;=3^Acute Right Heart Failure
+331 ;;^UTILITY(U,$J,358.3,2426,1,4,0)
+332 ;;=4^I50.811
+333 ;;^UTILITY(U,$J,358.3,2426,2)
+334 ;;=^5151385
+335 ;;^UTILITY(U,$J,358.3,2427,0)
+336 ;;=I50.82^^20^150^12
+337 ;;^UTILITY(U,$J,358.3,2427,1,0)
+338 ;;=^358.31IA^4^2
+339 ;;^UTILITY(U,$J,358.3,2427,1,3,0)
+340 ;;=3^Biventricular Heart Failure
+341 ;;^UTILITY(U,$J,358.3,2427,1,4,0)
+342 ;;=4^I50.82
+343 ;;^UTILITY(U,$J,358.3,2427,2)
+344 ;;=^5151389
+345 ;;^UTILITY(U,$J,358.3,2428,0)
+346 ;;=I50.812^^20^150^20
+347 ;;^UTILITY(U,$J,358.3,2428,1,0)
+348 ;;=^358.31IA^4^2
+349 ;;^UTILITY(U,$J,358.3,2428,1,3,0)
+350 ;;=3^Chronic Right Heart Failure
+351 ;;^UTILITY(U,$J,358.3,2428,1,4,0)
+352 ;;=4^I50.812
+353 ;;^UTILITY(U,$J,358.3,2428,2)
+354 ;;=^5151386
+355 ;;^UTILITY(U,$J,358.3,2429,0)
+356 ;;=I50.84^^20^150^33
+357 ;;^UTILITY(U,$J,358.3,2429,1,0)
+358 ;;=^358.31IA^4^2
+359 ;;^UTILITY(U,$J,358.3,2429,1,3,0)
+360 ;;=3^End Stage Heart Failure
+361 ;;^UTILITY(U,$J,358.3,2429,1,4,0)
+362 ;;=4^I50.84
+363 ;;^UTILITY(U,$J,358.3,2429,2)
+364 ;;=^5151391
+365 ;;^UTILITY(U,$J,358.3,2430,0)
+366 ;;=I50.83^^20^150^45
+367 ;;^UTILITY(U,$J,358.3,2430,1,0)
+368 ;;=^358.31IA^4^2
+369 ;;^UTILITY(U,$J,358.3,2430,1,3,0)
+370 ;;=3^High Output Heart Failure
+371 ;;^UTILITY(U,$J,358.3,2430,1,4,0)
+372 ;;=4^I50.83
+373 ;;^UTILITY(U,$J,358.3,2430,2)
+374 ;;=^5151390
+375 ;;^UTILITY(U,$J,358.3,2431,0)
+376 ;;=I27.21^^20^150^63
+377 ;;^UTILITY(U,$J,358.3,2431,1,0)
+378 ;;=^358.31IA^4^2
+379 ;;^UTILITY(U,$J,358.3,2431,1,3,0)
+380 ;;=3^Pulmonary Arterial Hypertension
+381 ;;^UTILITY(U,$J,358.3,2431,1,4,0)
+382 ;;=4^I27.21
+383 ;;^UTILITY(U,$J,358.3,2431,2)
+384 ;;=^5151377
+385 ;;^UTILITY(U,$J,358.3,2432,0)
+386 ;;=I27.22^^20^150^66
+387 ;;^UTILITY(U,$J,358.3,2432,1,0)
+388 ;;=^358.31IA^4^2
+389 ;;^UTILITY(U,$J,358.3,2432,1,3,0)
+390 ;;=3^Pulmonary HTN d/t Left Heart Disease
+391 ;;^UTILITY(U,$J,358.3,2432,1,4,0)
+392 ;;=4^I27.22
+393 ;;^UTILITY(U,$J,358.3,2432,2)
+394 ;;=^5151378
+395 ;;^UTILITY(U,$J,358.3,2433,0)
+396 ;;=I50.814^^20^150^70
+397 ;;^UTILITY(U,$J,358.3,2433,1,0)
+398 ;;=^358.31IA^4^2
+399 ;;^UTILITY(U,$J,358.3,2433,1,3,0)
+400 ;;=3^Right Heart Failure d/t Left Heart Failure
+401 ;;^UTILITY(U,$J,358.3,2433,1,4,0)
+402 ;;=4^I50.814
+403 ;;^UTILITY(U,$J,358.3,2433,2)
+404 ;;=^5151388
+405 ;;^UTILITY(U,$J,358.3,2434,0)
+406 ;;=I50.22^^20^150^21
+407 ;;^UTILITY(U,$J,358.3,2434,1,0)
+408 ;;=^358.31IA^4^2
+409 ;;^UTILITY(U,$J,358.3,2434,1,3,0)
+410 ;;=3^Chronic Systolic Heart Failure
+411 ;;^UTILITY(U,$J,358.3,2434,1,4,0)
+412 ;;=4^I50.22
+413 ;;^UTILITY(U,$J,358.3,2434,2)
+414 ;;=^5007241
+415 ;;^UTILITY(U,$J,358.3,2435,0)
+416 ;;=I25.10^^20^151^2
+417 ;;^UTILITY(U,$J,358.3,2435,1,0)
+418 ;;=^358.31IA^4^2
+419 ;;^UTILITY(U,$J,358.3,2435,1,3,0)
+420 ;;=3^Athscl Hrt Disease of Native Coronary Artery w/o Ang Pctrs
+421 ;;^UTILITY(U,$J,358.3,2435,1,4,0)
+422 ;;=4^I25.10
+423 ;;^UTILITY(U,$J,358.3,2435,2)
+424 ;;=^5007107
+425 ;;^UTILITY(U,$J,358.3,2436,0)
+426 ;;=I25.110^^20^151^3
+427 ;;^UTILITY(U,$J,358.3,2436,1,0)
+428 ;;=^358.31IA^4^2
+429 ;;^UTILITY(U,$J,358.3,2436,1,3,0)
+430 ;;=3^Athscl Hrt Disease of Native Coronary Artery w/ Unstable Ang Pctrs
+431 ;;^UTILITY(U,$J,358.3,2436,1,4,0)
+432 ;;=4^I25.110
+433 ;;^UTILITY(U,$J,358.3,2436,2)
+434 ;;=^5007108
+435 ;;^UTILITY(U,$J,358.3,2437,0)
+436 ;;=I25.111^^20^151^4
+437 ;;^UTILITY(U,$J,358.3,2437,1,0)
+438 ;;=^358.31IA^4^2
+439 ;;^UTILITY(U,$J,358.3,2437,1,3,0)
+440 ;;=3^Athscl Hrt Disease of Native Coronary Artery w/ Ang Pctrs w/ Spasm
+441 ;;^UTILITY(U,$J,358.3,2437,1,4,0)
+442 ;;=4^I25.111
+443 ;;^UTILITY(U,$J,358.3,2437,2)
+444 ;;=^5007109
+445 ;;^UTILITY(U,$J,358.3,2438,0)
+446 ;;=I25.118^^20^151^5
+447 ;;^UTILITY(U,$J,358.3,2438,1,0)
+448 ;;=^358.31IA^4^2
+449 ;;^UTILITY(U,$J,358.3,2438,1,3,0)
+450 ;;=3^Athscl Hrt Disease of Native Coronary Artery w/ Oth Ang Pctrs
+451 ;;^UTILITY(U,$J,358.3,2438,1,4,0)
+452 ;;=4^I25.118
+453 ;;^UTILITY(U,$J,358.3,2438,2)
+454 ;;=^5007110
+455 ;;^UTILITY(U,$J,358.3,2439,0)
+456 ;;=I25.119^^20^151^6
+457 ;;^UTILITY(U,$J,358.3,2439,1,0)
+458 ;;=^358.31IA^4^2
+459 ;;^UTILITY(U,$J,358.3,2439,1,3,0)
+460 ;;=3^Athscl Hrt Disease of Native Coronary Artery w/ Unspec Ang Pctrs
+461 ;;^UTILITY(U,$J,358.3,2439,1,4,0)
+462 ;;=4^I25.119
+463 ;;^UTILITY(U,$J,358.3,2439,2)
+464 ;;=^5007111
+465 ;;^UTILITY(U,$J,358.3,2440,0)
+466 ;;=I25.810^^20^151^1
+467 ;;^UTILITY(U,$J,358.3,2440,1,0)
+468 ;;=^358.31IA^4^2
+469 ;;^UTILITY(U,$J,358.3,2440,1,3,0)
+470 ;;=3^Atherosclerosis of CABG w/o Angina Pectoris
+471 ;;^UTILITY(U,$J,358.3,2440,1,4,0)
+472 ;;=4^I25.810
+473 ;;^UTILITY(U,$J,358.3,2440,2)
+474 ;;=^5007141
+475 ;;^UTILITY(U,$J,358.3,2441,0)
+476 ;;=I25.82^^20^151^10
+477 ;;^UTILITY(U,$J,358.3,2441,1,0)
+478 ;;=^358.31IA^4^2
+479 ;;^UTILITY(U,$J,358.3,2441,1,3,0)
+480 ;;=3^Total Occlusion of Coronary Artery,Chronic
+481 ;;^UTILITY(U,$J,358.3,2441,1,4,0)
+482 ;;=4^I25.82
+483 ;;^UTILITY(U,$J,358.3,2441,2)
+484 ;;=^335262
+485 ;;^UTILITY(U,$J,358.3,2442,0)
+486 ;;=I25.83^^20^151^8
+487 ;;^UTILITY(U,$J,358.3,2442,1,0)
+488 ;;=^358.31IA^4^2
+489 ;;^UTILITY(U,$J,358.3,2442,1,3,0)
+490 ;;=3^Coronary Atherosclerosis d/t Lipid Rich Plaque
+491 ;;^UTILITY(U,$J,358.3,2442,1,4,0)
+492 ;;=4^I25.83
+493 ;;^UTILITY(U,$J,358.3,2442,2)
+494 ;;=^336601
+495 ;;^UTILITY(U,$J,358.3,2443,0)
+496 ;;=I25.84^^20^151^7
+497 ;;^UTILITY(U,$J,358.3,2443,1,0)
+498 ;;=^358.31IA^4^2
+499 ;;^UTILITY(U,$J,358.3,2443,1,3,0)
+500 ;;=3^Coronary Atherosclerosis d/t Calcified Coronary Lesion
+501 ;;^UTILITY(U,$J,358.3,2443,1,4,0)
+502 ;;=4^I25.84
+503 ;;^UTILITY(U,$J,358.3,2443,2)
+504 ;;=^340518
+505 ;;^UTILITY(U,$J,358.3,2444,0)
+506 ;;=I25.89^^20^151^9
+507 ;;^UTILITY(U,$J,358.3,2444,1,0)
+508 ;;=^358.31IA^4^2
+509 ;;^UTILITY(U,$J,358.3,2444,1,3,0)
+510 ;;=3^Ischemic Heart Disease,Chronic NEC
+511 ;;^UTILITY(U,$J,358.3,2444,1,4,0)
+512 ;;=4^I25.89
+513 ;;^UTILITY(U,$J,358.3,2444,2)
+514 ;;=^269679
+515 ;;^UTILITY(U,$J,358.3,2445,0)
+516 ;;=E66.9^^20^152^5
+517 ;;^UTILITY(U,$J,358.3,2445,1,0)
+518 ;;=^358.31IA^4^2
+519 ;;^UTILITY(U,$J,358.3,2445,1,3,0)
+520 ;;=3^Obesity,Unspec
+521 ;;^UTILITY(U,$J,358.3,2445,1,4,0)
+522 ;;=4^E66.9
+523 ;;^UTILITY(U,$J,358.3,2445,2)
+524 ;;=^5002832
+525 ;;^UTILITY(U,$J,358.3,2446,0)
+526 ;;=R60.9^^20^152^4
+527 ;;^UTILITY(U,$J,358.3,2446,1,0)
+528 ;;=^358.31IA^4^2
+529 ;;^UTILITY(U,$J,358.3,2446,1,3,0)
+530 ;;=3^Edema,Unspec
+531 ;;^UTILITY(U,$J,358.3,2446,1,4,0)
+532 ;;=4^R60.9
+533 ;;^UTILITY(U,$J,358.3,2446,2)
+534 ;;=^5019534
+535 ;;^UTILITY(U,$J,358.3,2447,0)
+536 ;;=R00.2^^20^152^7
+537 ;;^UTILITY(U,$J,358.3,2447,1,0)
+538 ;;=^358.31IA^4^2
+539 ;;^UTILITY(U,$J,358.3,2447,1,3,0)
+540 ;;=3^Palpitations
+541 ;;^UTILITY(U,$J,358.3,2447,1,4,0)
+542 ;;=4^R00.2
+543 ;;^UTILITY(U,$J,358.3,2447,2)
+544 ;;=^5019165
+545 ;;^UTILITY(U,$J,358.3,2448,0)
+546 ;;=R01.1^^20^152^2
+547 ;;^UTILITY(U,$J,358.3,2448,1,0)
+548 ;;=^358.31IA^4^2
+549 ;;^UTILITY(U,$J,358.3,2448,1,3,0)
+550 ;;=3^Cardiac Murmur,Unspec
+551 ;;^UTILITY(U,$J,358.3,2448,1,4,0)
+552 ;;=4^R01.1
+553 ;;^UTILITY(U,$J,358.3,2448,2)
+554 ;;=^5019169
+555 ;;^UTILITY(U,$J,358.3,2449,0)
+556 ;;=R06.01^^20^152^6
+557 ;;^UTILITY(U,$J,358.3,2449,1,0)
+558 ;;=^358.31IA^4^2
+559 ;;^UTILITY(U,$J,358.3,2449,1,3,0)
+560 ;;=3^Orthopnea
+561 ;;^UTILITY(U,$J,358.3,2449,1,4,0)
+562 ;;=4^R06.01
+563 ;;^UTILITY(U,$J,358.3,2449,2)
+564 ;;=^186737
+565 ;;^UTILITY(U,$J,358.3,2450,0)
+566 ;;=R06.81^^20^152^1
+567 ;;^UTILITY(U,$J,358.3,2450,1,0)
+568 ;;=^358.31IA^4^2
+569 ;;^UTILITY(U,$J,358.3,2450,1,3,0)
+570 ;;=3^Apnea NEC
+571 ;;^UTILITY(U,$J,358.3,2450,1,4,0)
+572 ;;=4^R06.81
+573 ;;^UTILITY(U,$J,358.3,2450,2)
+574 ;;=^5019190
+575 ;;^UTILITY(U,$J,358.3,2451,0)
+576 ;;=R42.^^20^152^3
+577 ;;^UTILITY(U,$J,358.3,2451,1,0)
+578 ;;=^358.31IA^4^2
+579 ;;^UTILITY(U,$J,358.3,2451,1,3,0)
+580 ;;=3^Dizziness and Giddiness
+581 ;;^UTILITY(U,$J,358.3,2451,1,4,0)
+582 ;;=4^R42.
+583 ;;^UTILITY(U,$J,358.3,2451,2)
+584 ;;=^5019450
+585 ;;^UTILITY(U,$J,358.3,2452,0)
+586 ;;=R06.02^^20^152^8
+587 ;;^UTILITY(U,$J,358.3,2452,1,0)
+588 ;;=^358.31IA^4^2
+589 ;;^UTILITY(U,$J,358.3,2452,1,3,0)
+590 ;;=3^Shortness of Breath
+591 ;;^UTILITY(U,$J,358.3,2452,1,4,0)
+592 ;;=4^R06.02
+593 ;;^UTILITY(U,$J,358.3,2452,2)
+594 ;;=^5019181
+595 ;;^UTILITY(U,$J,358.3,2453,0)
+596 ;;=I25.2^^20^153^5
+597 ;;^UTILITY(U,$J,358.3,2453,1,0)
+598 ;;=^358.31IA^4^2
+599 ;;^UTILITY(U,$J,358.3,2453,1,3,0)
+600 ;;=3^Old MI
+601 ;;^UTILITY(U,$J,358.3,2453,1,4,0)
+602 ;;=4^I25.2
+603 ;;^UTILITY(U,$J,358.3,2453,2)
+604 ;;=^259884
+605 ;;^UTILITY(U,$J,358.3,2454,0)
+606 ;;=Z95.2^^20^153^8
+607 ;;^UTILITY(U,$J,358.3,2454,1,0)
+608 ;;=^358.31IA^4^2
+609 ;;^UTILITY(U,$J,358.3,2454,1,3,0)
+610 ;;=3^Presence of Prosthetic Heart Valve
+611 ;;^UTILITY(U,$J,358.3,2454,1,4,0)
+612 ;;=4^Z95.2
+613 ;;^UTILITY(U,$J,358.3,2454,2)
+614 ;;=^5063670
+615 ;;^UTILITY(U,$J,358.3,2455,0)
+616 ;;=Z95.1^^20^153^6
+617 ;;^UTILITY(U,$J,358.3,2455,1,0)
+618 ;;=^358.31IA^4^2
+619 ;;^UTILITY(U,$J,358.3,2455,1,3,0)
+620 ;;=3^Presence of Aortocoronary Bypass Graft
+621 ;;^UTILITY(U,$J,358.3,2455,1,4,0)
+622 ;;=4^Z95.1
+623 ;;^UTILITY(U,$J,358.3,2455,2)
+624 ;;=^5063669
+625 ;;^UTILITY(U,$J,358.3,2456,0)
+626 ;;=Z98.61^^20^153^1
+627 ;;^UTILITY(U,$J,358.3,2456,1,0)
+628 ;;=^358.31IA^4^2
+629 ;;^UTILITY(U,$J,358.3,2456,1,3,0)
+630 ;;=3^Coronary Angioplasty Status
+631 ;;^UTILITY(U,$J,358.3,2456,1,4,0)
+632 ;;=4^Z98.61
+633 ;;^UTILITY(U,$J,358.3,2456,2)
+634 ;;=^5063742
+635 ;;^UTILITY(U,$J,358.3,2457,0)
+636 ;;=Z95.2^^20^153^9
+637 ;;^UTILITY(U,$J,358.3,2457,1,0)
+638 ;;=^358.31IA^4^2
+639 ;;^UTILITY(U,$J,358.3,2457,1,3,0)
+640 ;;=3^Presence of Prosthetic Heart Valve
+641 ;;^UTILITY(U,$J,358.3,2457,1,4,0)
+642 ;;=4^Z95.2
+643 ;;^UTILITY(U,$J,358.3,2457,2)
+644 ;;=^5063670
+645 ;;^UTILITY(U,$J,358.3,2458,0)
+646 ;;=Z95.3^^20^153^10
+647 ;;^UTILITY(U,$J,358.3,2458,1,0)
+648 ;;=^358.31IA^4^2
+649 ;;^UTILITY(U,$J,358.3,2458,1,3,0)
+650 ;;=3^Presence of Xenogenic Heart Valve
+651 ;;^UTILITY(U,$J,358.3,2458,1,4,0)
+652 ;;=4^Z95.3
+653 ;;^UTILITY(U,$J,358.3,2458,2)
+654 ;;=^5063671
+655 ;;^UTILITY(U,$J,358.3,2459,0)
+656 ;;=Z95.4^^20^153^7
+657 ;;^UTILITY(U,$J,358.3,2459,1,0)
+658 ;;=^358.31IA^4^2
+659 ;;^UTILITY(U,$J,358.3,2459,1,3,0)
+660 ;;=3^Presence of Heart Valve Replacement NEC
+661 ;;^UTILITY(U,$J,358.3,2459,1,4,0)
+662 ;;=4^Z95.4
+663 ;;^UTILITY(U,$J,358.3,2459,2)
+664 ;;=^5063672
+665 ;;^UTILITY(U,$J,358.3,2460,0)
+666 ;;=Z79.01^^20^153^4
+667 ;;^UTILITY(U,$J,358.3,2460,1,0)
+668 ;;=^358.31IA^4^2
+669 ;;^UTILITY(U,$J,358.3,2460,1,3,0)
+670 ;;=3^Long Term Current Use of Anticoagulants
+671 ;;^UTILITY(U,$J,358.3,2460,1,4,0)
+672 ;;=4^Z79.01
+673 ;;^UTILITY(U,$J,358.3,2460,2)
+674 ;;=^5063330
+675 ;;^UTILITY(U,$J,358.3,2461,0)
+676 ;;=Z83.438^^20^153^3
+677 ;;^UTILITY(U,$J,358.3,2461,1,0)
+678 ;;=^358.31IA^4^2
+679 ;;^UTILITY(U,$J,358.3,2461,1,3,0)
+680 ;;=3^Family Hx of Familial Comb Hyperlipidemia
+681 ;;^UTILITY(U,$J,358.3,2461,1,4,0)
+682 ;;=4^Z83.438
+683 ;;^UTILITY(U,$J,358.3,2461,2)
+684 ;;=^5157632
+685 ;;^UTILITY(U,$J,358.3,2462,0)
+686 ;;=Z83.430^^20^153^2
+687 ;;^UTILITY(U,$J,358.3,2462,1,0)
+688 ;;=^358.31IA^4^2
+689 ;;^UTILITY(U,$J,358.3,2462,1,3,0)
+690 ;;=3^Family Hx of Elevated Lipoprotein(a)
+691 ;;^UTILITY(U,$J,358.3,2462,1,4,0)
+692 ;;=4^Z83.430