IBDEI01E ; ; 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,2902,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2902,1,2,0)
;;=2^36251
;;^UTILITY(U,$J,358.3,2902,1,3,0)
;;=3^Select Cath 1st Main Ren&Access Art
;;^UTILITY(U,$J,358.3,2903,0)
;;=36252^^21^178^35^^^^1
;;^UTILITY(U,$J,358.3,2903,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2903,1,2,0)
;;=2^36252
;;^UTILITY(U,$J,358.3,2903,1,3,0)
;;=3^Select Cath 1st Main Ren&Acc Art,Bilat
;;^UTILITY(U,$J,358.3,2904,0)
;;=36254^^21^178^42^^^^1
;;^UTILITY(U,$J,358.3,2904,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2904,1,2,0)
;;=2^36254
;;^UTILITY(U,$J,358.3,2904,1,3,0)
;;=3^Superselect Cath Ren Art&Access Art
;;^UTILITY(U,$J,358.3,2905,0)
;;=37191^^21^178^22^^^^1
;;^UTILITY(U,$J,358.3,2905,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2905,1,2,0)
;;=2^37191
;;^UTILITY(U,$J,358.3,2905,1,3,0)
;;=3^Insert Intravas Vena Cava Filter,Endovas
;;^UTILITY(U,$J,358.3,2906,0)
;;=37619^^21^178^26^^^^1
;;^UTILITY(U,$J,358.3,2906,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2906,1,2,0)
;;=2^37619
;;^UTILITY(U,$J,358.3,2906,1,3,0)
;;=3^Open Inferior Vena Cava Filter Placement
;;^UTILITY(U,$J,358.3,2907,0)
;;=75635^^21^178^9^^^^1
;;^UTILITY(U,$J,358.3,2907,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2907,1,2,0)
;;=2^75635
;;^UTILITY(U,$J,358.3,2907,1,3,0)
;;=3^CT Angio Abd Art w/ Contrast
;;^UTILITY(U,$J,358.3,2908,0)
;;=76506^^21^178^13^^^^1
;;^UTILITY(U,$J,358.3,2908,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2908,1,2,0)
;;=2^76506
;;^UTILITY(U,$J,358.3,2908,1,3,0)
;;=3^Echoencephalography,Real Time w/ Image Doc
;;^UTILITY(U,$J,358.3,2909,0)
;;=76000^^21^178^10^^^^1
;;^UTILITY(U,$J,358.3,2909,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2909,1,2,0)
;;=2^76000
;;^UTILITY(U,$J,358.3,2909,1,3,0)
;;=3^Cardiac Fluoro<1hr
;;^UTILITY(U,$J,358.3,2910,0)
;;=37236^^21^178^54^^^^1
;;^UTILITY(U,$J,358.3,2910,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2910,1,2,0)
;;=2^37236
;;^UTILITY(U,$J,358.3,2910,1,3,0)
;;=3^Transcath Plcmt of Intravas Stent,Init Art
;;^UTILITY(U,$J,358.3,2911,0)
;;=37237^^21^178^52^^^^1
;;^UTILITY(U,$J,358.3,2911,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2911,1,2,0)
;;=2^37237
;;^UTILITY(U,$J,358.3,2911,1,3,0)
;;=3^Transcath Plcmt Intravas Stnt,Ea Addl Art
;;^UTILITY(U,$J,358.3,2912,0)
;;=37238^^21^178^51^^^^1
;;^UTILITY(U,$J,358.3,2912,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2912,1,2,0)
;;=2^37238
;;^UTILITY(U,$J,358.3,2912,1,3,0)
;;=3^Transcath Plcmt Intravas Stent,Init Vein
;;^UTILITY(U,$J,358.3,2913,0)
;;=37239^^21^178^53^^^^1
;;^UTILITY(U,$J,358.3,2913,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2913,1,2,0)
;;=2^37239
;;^UTILITY(U,$J,358.3,2913,1,3,0)
;;=3^Transcath Plcmt Intravas Stnt,Ea Addl Vein
;;^UTILITY(U,$J,358.3,2914,0)
;;=75894^^21^178^55^^^^1
;;^UTILITY(U,$J,358.3,2914,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2914,1,2,0)
;;=2^75894
;;^UTILITY(U,$J,358.3,2914,1,3,0)
;;=3^Transcath Rpr Iliac Art Aneur,AV,Rad S&I
;;^UTILITY(U,$J,358.3,2915,0)
;;=0237T^^21^178^57^^^^1
;;^UTILITY(U,$J,358.3,2915,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2915,1,2,0)
;;=2^0237T
;;^UTILITY(U,$J,358.3,2915,1,3,0)
;;=3^Trluml Perip Athrc Brchiocph
;;^UTILITY(U,$J,358.3,2916,0)
;;=0238T^^21^178^58^^^^1
;;^UTILITY(U,$J,358.3,2916,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2916,1,2,0)
;;=2^0238T
;;^UTILITY(U,$J,358.3,2916,1,3,0)
;;=3^Trluml Perip Athrc Iliac Art
;;^UTILITY(U,$J,358.3,2917,0)
;;=75820^^21^178^60^^^^1
;;^UTILITY(U,$J,358.3,2917,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2917,1,2,0)
;;=2^75820
;;^UTILITY(U,$J,358.3,2917,1,3,0)
;;=3^Vein X-Ray,Arm/Leg,Unilat
;;^UTILITY(U,$J,358.3,2918,0)
;;=75822^^21^178^61^^^^1
;;^UTILITY(U,$J,358.3,2918,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2918,1,2,0)
;;=2^75822
;;^UTILITY(U,$J,358.3,2918,1,3,0)
;;=3^Vein X-Ray,Arms/Legs,Bilat
;;^UTILITY(U,$J,358.3,2919,0)
;;=75827^^21^178^63^^^^1
;;^UTILITY(U,$J,358.3,2919,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2919,1,2,0)
;;=2^75827
;;^UTILITY(U,$J,358.3,2919,1,3,0)
;;=3^Vein X-Ray,Chest Superior
;;^UTILITY(U,$J,358.3,2920,0)
;;=37252^^21^178^24^^^^1
;;^UTILITY(U,$J,358.3,2920,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2920,1,2,0)
;;=2^37252
;;^UTILITY(U,$J,358.3,2920,1,3,0)
;;=3^Intravas US,Non/Cor Vsl,Diag/Thera Interv,1st Vsl
;;^UTILITY(U,$J,358.3,2921,0)
;;=37253^^21^178^25^^^^1
;;^UTILITY(U,$J,358.3,2921,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2921,1,2,0)
;;=2^37253
;;^UTILITY(U,$J,358.3,2921,1,3,0)
;;=3^Intravas US,Non/Cor Vsl,Dx/Ther Interv,Ea Addl Vsl
;;^UTILITY(U,$J,358.3,2922,0)
;;=36901^^21^178^8^^^^1
;;^UTILITY(U,$J,358.3,2922,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2922,1,2,0)
;;=2^36901
;;^UTILITY(U,$J,358.3,2922,1,3,0)
;;=3^Arteriovenous Shunt,Incl Rad S&I
;;^UTILITY(U,$J,358.3,2923,0)
;;=36222^^21^178^11^^^^1
;;^UTILITY(U,$J,358.3,2923,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2923,1,2,0)
;;=2^36222
;;^UTILITY(U,$J,358.3,2923,1,3,0)
;;=3^Cath Plcmnt Carotid,Extracranial,Unilat,Rad S&L
;;^UTILITY(U,$J,358.3,2924,0)
;;=36223^^21^178^12^^^^1
;;^UTILITY(U,$J,358.3,2924,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2924,1,2,0)
;;=2^36223
;;^UTILITY(U,$J,358.3,2924,1,3,0)
;;=3^Cath Plcmnt Carotid,Intracranial,Unilat,Rad S&L
;;^UTILITY(U,$J,358.3,2925,0)
;;=37246^^21^178^28^^^^1
;;^UTILITY(U,$J,358.3,2925,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2925,1,2,0)
;;=2^37246
;;^UTILITY(U,$J,358.3,2925,1,3,0)
;;=3^Perc Angioplasty,Intracran,Cor,Pulm,1st Artery
;;^UTILITY(U,$J,358.3,2926,0)
;;=37247^^21^178^29^^^^1
;;^UTILITY(U,$J,358.3,2926,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2926,1,2,0)
;;=2^37247
;;^UTILITY(U,$J,358.3,2926,1,3,0)
;;=3^Perc Angioplasty,Intracran,Cor,Pulm,Ea Addl Artery
;;^UTILITY(U,$J,358.3,2927,0)
;;=37248^^21^178^30^^^^1
;;^UTILITY(U,$J,358.3,2927,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2927,1,2,0)
;;=2^37248
;;^UTILITY(U,$J,358.3,2927,1,3,0)
;;=3^Perc Angioplasty,Venous,1st Vein
;;^UTILITY(U,$J,358.3,2928,0)
;;=37249^^21^178^31^^^^1
;;^UTILITY(U,$J,358.3,2928,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2928,1,2,0)
;;=2^37249
;;^UTILITY(U,$J,358.3,2928,1,3,0)
;;=3^Perc Angioplasty,Venous,Ea Addl Vein
;;^UTILITY(U,$J,358.3,2929,0)
;;=0236T^^21^178^56^^^^1
;;^UTILITY(U,$J,358.3,2929,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2929,1,2,0)
;;=2^0236T
;;^UTILITY(U,$J,358.3,2929,1,3,0)
;;=3^Trluml Perip Athrc Abd Aorta
;;^UTILITY(U,$J,358.3,2930,0)
;;=75825^^21^178^62^^^^1
;;^UTILITY(U,$J,358.3,2930,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2930,1,2,0)
;;=2^75825
;;^UTILITY(U,$J,358.3,2930,1,3,0)
;;=3^Vein X-Ray,Chest Inferior
;;^UTILITY(U,$J,358.3,2931,0)
;;=36005^^21^179^1^^^^1
;;^UTILITY(U,$J,358.3,2931,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2931,1,2,0)
;;=2^36005
;;^UTILITY(U,$J,358.3,2931,1,3,0)
;;=3^Contrast Venography
;;^UTILITY(U,$J,358.3,2932,0)
;;=92950^^21^180^1^^^^1
;;^UTILITY(U,$J,358.3,2932,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2932,1,2,0)
;;=2^92950
;;^UTILITY(U,$J,358.3,2932,1,3,0)
;;=3^CPR
;;^UTILITY(U,$J,358.3,2933,0)
;;=92970^^21^180^2^^^^1
;;^UTILITY(U,$J,358.3,2933,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2933,1,2,0)
;;=2^92970
;;^UTILITY(U,$J,358.3,2933,1,3,0)
;;=3^Cardio Assist Dev Insert
;;^UTILITY(U,$J,358.3,2934,0)
;;=94760^^21^180^3^^^^1
;;^UTILITY(U,$J,358.3,2934,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2934,1,2,0)
;;=2^94760
;;^UTILITY(U,$J,358.3,2934,1,3,0)
;;=3^Measure Blood Oxygen Level,1 Time
;;^UTILITY(U,$J,358.3,2935,0)
;;=94761^^21^180^4^^^^1
;;^UTILITY(U,$J,358.3,2935,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2935,1,2,0)
;;=2^94761
;;^UTILITY(U,$J,358.3,2935,1,3,0)
;;=3^Measure Blood Oxygen Level,Mult Times
;;^UTILITY(U,$J,358.3,2936,0)
;;=33289^^21^180^5^^^^1
;;^UTILITY(U,$J,358.3,2936,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2936,1,2,0)
;;=2^33289
;;^UTILITY(U,$J,358.3,2936,1,3,0)
;;=3^Transcath Impl Wireless Pulm Art Sensor
;;^UTILITY(U,$J,358.3,2937,0)
;;=93503^^21^181^26^^^^1
;;^UTILITY(U,$J,358.3,2937,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2937,1,2,0)
;;=2^93503
;;^UTILITY(U,$J,358.3,2937,1,3,0)
;;=3^Swan Ganz Placement
;;^UTILITY(U,$J,358.3,2938,0)
;;=93451^^21^181^25^^^^1
;;^UTILITY(U,$J,358.3,2938,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2938,1,2,0)
;;=2^93451
;;^UTILITY(U,$J,358.3,2938,1,3,0)
;;=3^Rt Hrt Cath incl O2 & Cardiac Outpt
;;^UTILITY(U,$J,358.3,2939,0)
;;=93452^^21^181^14^^^^1
;;^UTILITY(U,$J,358.3,2939,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2939,1,2,0)
;;=2^93452
;;^UTILITY(U,$J,358.3,2939,1,3,0)
;;=3^LHC w/V-Gram, incl S&I
;;^UTILITY(U,$J,358.3,2940,0)
;;=93453^^21^181^20^^^^1
;;^UTILITY(U,$J,358.3,2940,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2940,1,2,0)
;;=2^93453
;;^UTILITY(U,$J,358.3,2940,1,3,0)
;;=3^R&L HC w/V-Gram, incl S&I
;;^UTILITY(U,$J,358.3,2941,0)
;;=93454^^21^181^8^^^^1
;;^UTILITY(U,$J,358.3,2941,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2941,1,2,0)
;;=2^93454
;;^UTILITY(U,$J,358.3,2941,1,3,0)
;;=3^Coronary Angiography, incl inj & S&I
;;^UTILITY(U,$J,358.3,2942,0)
;;=93455^^21^181^4^^^^1
;;^UTILITY(U,$J,358.3,2942,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2942,1,2,0)
;;=2^93455
;;^UTILITY(U,$J,358.3,2942,1,3,0)
;;=3^Cor Angio incl inj & S&I, and Bypass angio
;;^UTILITY(U,$J,358.3,2943,0)
;;=93456^^21^181^5^^^^1
;;^UTILITY(U,$J,358.3,2943,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2943,1,2,0)
;;=2^93456
;;^UTILITY(U,$J,358.3,2943,1,3,0)
;;=3^Cor Angio incl inj & S&I, and R Heart Cath
;;^UTILITY(U,$J,358.3,2944,0)
;;=93457^^21^181^24^^^^1
;;^UTILITY(U,$J,358.3,2944,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2944,1,2,0)
;;=2^93457
;;^UTILITY(U,$J,358.3,2944,1,3,0)
;;=3^Rt Hrt Angio,Bypass Grft,incl inj & S&I
;;^UTILITY(U,$J,358.3,2945,0)
;;=93458^^21^181^6^^^^1
;;^UTILITY(U,$J,358.3,2945,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2945,1,2,0)
;;=2^93458
;;^UTILITY(U,$J,358.3,2945,1,3,0)
;;=3^Cor Angio, LHC, V-Gram, incl inj & S&I
;;^UTILITY(U,$J,358.3,2946,0)
;;=93459^^21^181^15^^^^1
;;^UTILITY(U,$J,358.3,2946,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2946,1,2,0)
;;=2^93459
;;^UTILITY(U,$J,358.3,2946,1,3,0)
;;=3^Lt Hrt Angio,V-Gram,Bypass,incl inj & S&I
;;^UTILITY(U,$J,358.3,2947,0)
;;=93460^^21^181^7^^^^1
;;^UTILITY(U,$J,358.3,2947,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2947,1,2,0)
;;=2^93460
;;^UTILITY(U,$J,358.3,2947,1,3,0)
;;=3^Cor Angio, RHC/LHC, V-Gram, incl inj & S&I
;;^UTILITY(U,$J,358.3,2948,0)
;;=93461^^21^181^21^^^^1
;;^UTILITY(U,$J,358.3,2948,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2948,1,2,0)
;;=2^93461
;;^UTILITY(U,$J,358.3,2948,1,3,0)
;;=3^R&L Hrt Angio,V-Gram,Bypass,incl inj & S&I
;;^UTILITY(U,$J,358.3,2949,0)
;;=93462^^21^181^17^^^^1
;;^UTILITY(U,$J,358.3,2949,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2949,1,2,0)
;;=2^93462
;;^UTILITY(U,$J,358.3,2949,1,3,0)
;;=3^Lt Hrt Cath Trnsptl Puncture
;;^UTILITY(U,$J,358.3,2950,0)
;;=93463^^21^181^18^^^^1
;;^UTILITY(U,$J,358.3,2950,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2950,1,2,0)
;;=2^93463
;;^UTILITY(U,$J,358.3,2950,1,3,0)
;;=3^Pharm agent admin, when performed
;;^UTILITY(U,$J,358.3,2951,0)
;;=93505^^21^181^9^^^^1
;;^UTILITY(U,$J,358.3,2951,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2951,1,2,0)
;;=2^93505
;;^UTILITY(U,$J,358.3,2951,1,3,0)
;;=3^Endomyocardial Biopsy
;;^UTILITY(U,$J,358.3,2952,0)
;;=93464^^21^181^19^^^^1
;;^UTILITY(U,$J,358.3,2952,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2952,1,2,0)
;;=2^93464
;;^UTILITY(U,$J,358.3,2952,1,3,0)
;;=3^Phys Exercise Tst w/Hemodynamic Meas
;;^UTILITY(U,$J,358.3,2953,0)
;;=93564^^21^181^10^^^^1
;;^UTILITY(U,$J,358.3,2953,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2953,1,2,0)
;;=2^93564
;;^UTILITY(U,$J,358.3,2953,1,3,0)
;;=3^Inject Hrt Cong Cath Art/Grft
;;^UTILITY(U,$J,358.3,2954,0)
;;=93568^^21^181^11^^^^1
;;^UTILITY(U,$J,358.3,2954,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2954,1,2,0)
;;=2^93568
;;^UTILITY(U,$J,358.3,2954,1,3,0)
;;=3^Inject Pulm Art Hrt Cath
;;^UTILITY(U,$J,358.3,2955,0)
;;=93566^^21^181^12^^^^1
;;^UTILITY(U,$J,358.3,2955,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2955,1,2,0)
;;=2^93566
;;^UTILITY(U,$J,358.3,2955,1,3,0)
;;=3^Inject R Ventr/Atrial Angio
;;^UTILITY(U,$J,358.3,2956,0)
;;=93567^^21^181^13^^^^1
;;^UTILITY(U,$J,358.3,2956,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2956,1,2,0)
;;=2^93567
;;^UTILITY(U,$J,358.3,2956,1,3,0)
;;=3^Inject Suprvlv Aortography
;;^UTILITY(U,$J,358.3,2957,0)
;;=93580^^21^181^27^^^^1
;;^UTILITY(U,$J,358.3,2957,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2957,1,2,0)
;;=2^93580
;;^UTILITY(U,$J,358.3,2957,1,3,0)
;;=3^Transcath Closure of ASD
;;^UTILITY(U,$J,358.3,2958,0)
;;=76937^^21^181^28^^^^1
;;^UTILITY(U,$J,358.3,2958,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2958,1,2,0)
;;=2^76937
;;^UTILITY(U,$J,358.3,2958,1,3,0)
;;=3^US Vasc Access Sits Vsl Patency Ndl Entry
;;^UTILITY(U,$J,358.3,2959,0)
;;=93593^^21^181^3^^^^1
;;^UTILITY(U,$J,358.3,2959,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2959,1,2,0)
;;=2^93593
;;^UTILITY(U,$J,358.3,2959,1,3,0)
;;=3^Cath Cong Hrt Defect w/ Image,Normal Native
;;^UTILITY(U,$J,358.3,2960,0)
;;=93594^^21^181^2^^^^1
;;^UTILITY(U,$J,358.3,2960,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2960,1,2,0)
;;=2^93594
;;^UTILITY(U,$J,358.3,2960,1,3,0)
;;=3^Cath Cong Hrt Defect w/ Image,Abnormal Native
;;^UTILITY(U,$J,358.3,2961,0)
;;=93595^^21^181^16^^^^1
;;^UTILITY(U,$J,358.3,2961,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2961,1,2,0)
;;=2^93595
;;^UTILITY(U,$J,358.3,2961,1,3,0)
;;=3^Lt Hrt Cath Cong Hrt Defect w/ Image
;;^UTILITY(U,$J,358.3,2962,0)
;;=93596^^21^181^23^^^^1
;;^UTILITY(U,$J,358.3,2962,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2962,1,2,0)
;;=2^93596
;;^UTILITY(U,$J,358.3,2962,1,3,0)
;;=3^R&L Hrt Cath Cong Hrt Defect w/ Image,Normal
;;^UTILITY(U,$J,358.3,2963,0)
;;=93597^^21^181^22^^^^1
;;^UTILITY(U,$J,358.3,2963,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2963,1,2,0)
;;=2^93597
;;^UTILITY(U,$J,358.3,2963,1,3,0)
;;=3^R&L Hrt Cath Cong Hrt Defect w/ Image,Abnormal
;;^UTILITY(U,$J,358.3,2964,0)
;;=93598^^21^181^1^^^^1
;;^UTILITY(U,$J,358.3,2964,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2964,1,2,0)
;;=2^93598
;;^UTILITY(U,$J,358.3,2964,1,3,0)
;;=3^Cardiac Output Measure,Thermodilution or Oth,During Hrt Cath
;;^UTILITY(U,$J,358.3,2965,0)
;;=36100^^21^182^10^^^^1
;;^UTILITY(U,$J,358.3,2965,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2965,1,2,0)
;;=2^36100
;;^UTILITY(U,$J,358.3,2965,1,3,0)
;;=3^Intro Needle Or Cath Carotid Or Vert. Artery
;;^UTILITY(U,$J,358.3,2966,0)
;;=36140^^21^182^11^^^^1
;;^UTILITY(U,$J,358.3,2966,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2966,1,2,0)
;;=2^36140
;;^UTILITY(U,$J,358.3,2966,1,3,0)
;;=3^Intro Needle Or Cath Upper/Lower Ext Artery
;;^UTILITY(U,$J,358.3,2967,0)
;;=36011^^21^182^34^^^^1
;;^UTILITY(U,$J,358.3,2967,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2967,1,2,0)
;;=2^36011
;;^UTILITY(U,$J,358.3,2967,1,3,0)
;;=3^Select Cath 1st Order Ren/Jugular Vein
;;^UTILITY(U,$J,358.3,2968,0)
;;=36245^^21^182^33^^^^1
;;^UTILITY(U,$J,358.3,2968,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2968,1,2,0)
;;=2^36245
;;^UTILITY(U,$J,358.3,2968,1,3,0)
;;=3^Select Cath 1st Order Abd/Pelvic/Le Artery
;;^UTILITY(U,$J,358.3,2969,0)
;;=36246^^21^182^36^^^^1
;;^UTILITY(U,$J,358.3,2969,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2969,1,2,0)
;;=2^36246
;;^UTILITY(U,$J,358.3,2969,1,3,0)
;;=3^Select Cath 2nd Order Abd/Pelvic/Le Artery,Init
;;^UTILITY(U,$J,358.3,2970,0)
;;=36247^^21^182^41^^^^1
;;^UTILITY(U,$J,358.3,2970,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2970,1,2,0)
;;=2^36247
;;^UTILITY(U,$J,358.3,2970,1,3,0)
;;=3^Select Cath 3rd Order Abd/Pelvic/Le Artery,Init
;;^UTILITY(U,$J,358.3,2971,0)
;;=36216^^21^182^38^^^^1
;;^UTILITY(U,$J,358.3,2971,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2971,1,2,0)
;;=2^36216
;;^UTILITY(U,$J,358.3,2971,1,3,0)
;;=3^Select Cath 2nd Order Thor/Ue/Head,Init
;;^UTILITY(U,$J,358.3,2972,0)
;;=36217^^21^182^42^^^^1
;;^UTILITY(U,$J,358.3,2972,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2972,1,2,0)
;;=2^36217
;;^UTILITY(U,$J,358.3,2972,1,3,0)
;;=3^Select Cath 3rd Order Thor/Ue/Head,Init
;;^UTILITY(U,$J,358.3,2973,0)
;;=36248^^21^182^39^^^^1
;;^UTILITY(U,$J,358.3,2973,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2973,1,2,0)
;;=2^36248
;;^UTILITY(U,$J,358.3,2973,1,3,0)
;;=3^Select Cath 2nd/3rd Order Pelvic/Le,Ea Addl
;;^UTILITY(U,$J,358.3,2974,0)
;;=36200^^21^182^9^^^^1
;;^UTILITY(U,$J,358.3,2974,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2974,1,2,0)
;;=2^36200
;;^UTILITY(U,$J,358.3,2974,1,3,0)
;;=3^Intro Cath,Aorta
;;^UTILITY(U,$J,358.3,2975,0)
;;=36005^^21^182^5^^^^1
;;^UTILITY(U,$J,358.3,2975,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2975,1,2,0)
;;=2^36005
;;^UTILITY(U,$J,358.3,2975,1,3,0)
;;=3^Injection Ext Venography
;;^UTILITY(U,$J,358.3,2976,0)
;;=36251^^21^182^32^^^^1
;;^UTILITY(U,$J,358.3,2976,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2976,1,2,0)
;;=2^36251
;;^UTILITY(U,$J,358.3,2976,1,3,0)
;;=3^Select Cath 1st Main Ren&Acc Ren Art
;;^UTILITY(U,$J,358.3,2977,0)
;;=36252^^21^182^31^^^^1
;;^UTILITY(U,$J,358.3,2977,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2977,1,2,0)
;;=2^36252
;;^UTILITY(U,$J,358.3,2977,1,3,0)
;;=3^Select Cath 1st Main Ren&Acc Art Bilat
;;^UTILITY(U,$J,358.3,2978,0)
;;=36254^^21^182^6^^^^1
;;^UTILITY(U,$J,358.3,2978,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2978,1,2,0)
;;=2^36254
;;^UTILITY(U,$J,358.3,2978,1,3,0)
;;=3^Ins Cath Ren Art 2nd+ Bilat
;;^UTILITY(U,$J,358.3,2979,0)
;;=36253^^21^182^7^^^^1
;;^UTILITY(U,$J,358.3,2979,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2979,1,2,0)
;;=2^36253
;;^UTILITY(U,$J,358.3,2979,1,3,0)
;;=3^Ins Cath Ren Art 2nd+ Unilat
;;^UTILITY(U,$J,358.3,2980,0)
;;=37191^^21^182^8^^^^1
;;^UTILITY(U,$J,358.3,2980,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2980,1,2,0)
;;=2^37191
;;^UTILITY(U,$J,358.3,2980,1,3,0)
;;=3^Ins Intravas Vena Cava Filter,Endovas
;;^UTILITY(U,$J,358.3,2981,0)
;;=36222^^21^182^17^^^^1
;;^UTILITY(U,$J,358.3,2981,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2981,1,2,0)
;;=2^36222
;;^UTILITY(U,$J,358.3,2981,1,3,0)
;;=3^Place Cath Carotid/Inom Art
;;^UTILITY(U,$J,358.3,2982,0)
;;=36223^^21^182^16^^^^1
;;^UTILITY(U,$J,358.3,2982,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2982,1,2,0)
;;=2^36223
;;^UTILITY(U,$J,358.3,2982,1,3,0)
;;=3^Place Cath Carotid Inc Extracranial
;;^UTILITY(U,$J,358.3,2983,0)
;;=36224^^21^182^15^^^^1
;;^UTILITY(U,$J,358.3,2983,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,2983,1,2,0)
;;=2^36224
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HIBDEI01E 19787 printed Dec 13, 2024@01:39:42 Page 2
IBDEI01E ; ; 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,2902,1,0)
+2 ;;=^358.31IA^3^2
+3 ;;^UTILITY(U,$J,358.3,2902,1,2,0)
+4 ;;=2^36251
+5 ;;^UTILITY(U,$J,358.3,2902,1,3,0)
+6 ;;=3^Select Cath 1st Main Ren&Access Art
+7 ;;^UTILITY(U,$J,358.3,2903,0)
+8 ;;=36252^^21^178^35^^^^1
+9 ;;^UTILITY(U,$J,358.3,2903,1,0)
+10 ;;=^358.31IA^3^2
+11 ;;^UTILITY(U,$J,358.3,2903,1,2,0)
+12 ;;=2^36252
+13 ;;^UTILITY(U,$J,358.3,2903,1,3,0)
+14 ;;=3^Select Cath 1st Main Ren&Acc Art,Bilat
+15 ;;^UTILITY(U,$J,358.3,2904,0)
+16 ;;=36254^^21^178^42^^^^1
+17 ;;^UTILITY(U,$J,358.3,2904,1,0)
+18 ;;=^358.31IA^3^2
+19 ;;^UTILITY(U,$J,358.3,2904,1,2,0)
+20 ;;=2^36254
+21 ;;^UTILITY(U,$J,358.3,2904,1,3,0)
+22 ;;=3^Superselect Cath Ren Art&Access Art
+23 ;;^UTILITY(U,$J,358.3,2905,0)
+24 ;;=37191^^21^178^22^^^^1
+25 ;;^UTILITY(U,$J,358.3,2905,1,0)
+26 ;;=^358.31IA^3^2
+27 ;;^UTILITY(U,$J,358.3,2905,1,2,0)
+28 ;;=2^37191
+29 ;;^UTILITY(U,$J,358.3,2905,1,3,0)
+30 ;;=3^Insert Intravas Vena Cava Filter,Endovas
+31 ;;^UTILITY(U,$J,358.3,2906,0)
+32 ;;=37619^^21^178^26^^^^1
+33 ;;^UTILITY(U,$J,358.3,2906,1,0)
+34 ;;=^358.31IA^3^2
+35 ;;^UTILITY(U,$J,358.3,2906,1,2,0)
+36 ;;=2^37619
+37 ;;^UTILITY(U,$J,358.3,2906,1,3,0)
+38 ;;=3^Open Inferior Vena Cava Filter Placement
+39 ;;^UTILITY(U,$J,358.3,2907,0)
+40 ;;=75635^^21^178^9^^^^1
+41 ;;^UTILITY(U,$J,358.3,2907,1,0)
+42 ;;=^358.31IA^3^2
+43 ;;^UTILITY(U,$J,358.3,2907,1,2,0)
+44 ;;=2^75635
+45 ;;^UTILITY(U,$J,358.3,2907,1,3,0)
+46 ;;=3^CT Angio Abd Art w/ Contrast
+47 ;;^UTILITY(U,$J,358.3,2908,0)
+48 ;;=76506^^21^178^13^^^^1
+49 ;;^UTILITY(U,$J,358.3,2908,1,0)
+50 ;;=^358.31IA^3^2
+51 ;;^UTILITY(U,$J,358.3,2908,1,2,0)
+52 ;;=2^76506
+53 ;;^UTILITY(U,$J,358.3,2908,1,3,0)
+54 ;;=3^Echoencephalography,Real Time w/ Image Doc
+55 ;;^UTILITY(U,$J,358.3,2909,0)
+56 ;;=76000^^21^178^10^^^^1
+57 ;;^UTILITY(U,$J,358.3,2909,1,0)
+58 ;;=^358.31IA^3^2
+59 ;;^UTILITY(U,$J,358.3,2909,1,2,0)
+60 ;;=2^76000
+61 ;;^UTILITY(U,$J,358.3,2909,1,3,0)
+62 ;;=3^Cardiac Fluoro<1hr
+63 ;;^UTILITY(U,$J,358.3,2910,0)
+64 ;;=37236^^21^178^54^^^^1
+65 ;;^UTILITY(U,$J,358.3,2910,1,0)
+66 ;;=^358.31IA^3^2
+67 ;;^UTILITY(U,$J,358.3,2910,1,2,0)
+68 ;;=2^37236
+69 ;;^UTILITY(U,$J,358.3,2910,1,3,0)
+70 ;;=3^Transcath Plcmt of Intravas Stent,Init Art
+71 ;;^UTILITY(U,$J,358.3,2911,0)
+72 ;;=37237^^21^178^52^^^^1
+73 ;;^UTILITY(U,$J,358.3,2911,1,0)
+74 ;;=^358.31IA^3^2
+75 ;;^UTILITY(U,$J,358.3,2911,1,2,0)
+76 ;;=2^37237
+77 ;;^UTILITY(U,$J,358.3,2911,1,3,0)
+78 ;;=3^Transcath Plcmt Intravas Stnt,Ea Addl Art
+79 ;;^UTILITY(U,$J,358.3,2912,0)
+80 ;;=37238^^21^178^51^^^^1
+81 ;;^UTILITY(U,$J,358.3,2912,1,0)
+82 ;;=^358.31IA^3^2
+83 ;;^UTILITY(U,$J,358.3,2912,1,2,0)
+84 ;;=2^37238
+85 ;;^UTILITY(U,$J,358.3,2912,1,3,0)
+86 ;;=3^Transcath Plcmt Intravas Stent,Init Vein
+87 ;;^UTILITY(U,$J,358.3,2913,0)
+88 ;;=37239^^21^178^53^^^^1
+89 ;;^UTILITY(U,$J,358.3,2913,1,0)
+90 ;;=^358.31IA^3^2
+91 ;;^UTILITY(U,$J,358.3,2913,1,2,0)
+92 ;;=2^37239
+93 ;;^UTILITY(U,$J,358.3,2913,1,3,0)
+94 ;;=3^Transcath Plcmt Intravas Stnt,Ea Addl Vein
+95 ;;^UTILITY(U,$J,358.3,2914,0)
+96 ;;=75894^^21^178^55^^^^1
+97 ;;^UTILITY(U,$J,358.3,2914,1,0)
+98 ;;=^358.31IA^3^2
+99 ;;^UTILITY(U,$J,358.3,2914,1,2,0)
+100 ;;=2^75894
+101 ;;^UTILITY(U,$J,358.3,2914,1,3,0)
+102 ;;=3^Transcath Rpr Iliac Art Aneur,AV,Rad S&I
+103 ;;^UTILITY(U,$J,358.3,2915,0)
+104 ;;=0237T^^21^178^57^^^^1
+105 ;;^UTILITY(U,$J,358.3,2915,1,0)
+106 ;;=^358.31IA^3^2
+107 ;;^UTILITY(U,$J,358.3,2915,1,2,0)
+108 ;;=2^0237T
+109 ;;^UTILITY(U,$J,358.3,2915,1,3,0)
+110 ;;=3^Trluml Perip Athrc Brchiocph
+111 ;;^UTILITY(U,$J,358.3,2916,0)
+112 ;;=0238T^^21^178^58^^^^1
+113 ;;^UTILITY(U,$J,358.3,2916,1,0)
+114 ;;=^358.31IA^3^2
+115 ;;^UTILITY(U,$J,358.3,2916,1,2,0)
+116 ;;=2^0238T
+117 ;;^UTILITY(U,$J,358.3,2916,1,3,0)
+118 ;;=3^Trluml Perip Athrc Iliac Art
+119 ;;^UTILITY(U,$J,358.3,2917,0)
+120 ;;=75820^^21^178^60^^^^1
+121 ;;^UTILITY(U,$J,358.3,2917,1,0)
+122 ;;=^358.31IA^3^2
+123 ;;^UTILITY(U,$J,358.3,2917,1,2,0)
+124 ;;=2^75820
+125 ;;^UTILITY(U,$J,358.3,2917,1,3,0)
+126 ;;=3^Vein X-Ray,Arm/Leg,Unilat
+127 ;;^UTILITY(U,$J,358.3,2918,0)
+128 ;;=75822^^21^178^61^^^^1
+129 ;;^UTILITY(U,$J,358.3,2918,1,0)
+130 ;;=^358.31IA^3^2
+131 ;;^UTILITY(U,$J,358.3,2918,1,2,0)
+132 ;;=2^75822
+133 ;;^UTILITY(U,$J,358.3,2918,1,3,0)
+134 ;;=3^Vein X-Ray,Arms/Legs,Bilat
+135 ;;^UTILITY(U,$J,358.3,2919,0)
+136 ;;=75827^^21^178^63^^^^1
+137 ;;^UTILITY(U,$J,358.3,2919,1,0)
+138 ;;=^358.31IA^3^2
+139 ;;^UTILITY(U,$J,358.3,2919,1,2,0)
+140 ;;=2^75827
+141 ;;^UTILITY(U,$J,358.3,2919,1,3,0)
+142 ;;=3^Vein X-Ray,Chest Superior
+143 ;;^UTILITY(U,$J,358.3,2920,0)
+144 ;;=37252^^21^178^24^^^^1
+145 ;;^UTILITY(U,$J,358.3,2920,1,0)
+146 ;;=^358.31IA^3^2
+147 ;;^UTILITY(U,$J,358.3,2920,1,2,0)
+148 ;;=2^37252
+149 ;;^UTILITY(U,$J,358.3,2920,1,3,0)
+150 ;;=3^Intravas US,Non/Cor Vsl,Diag/Thera Interv,1st Vsl
+151 ;;^UTILITY(U,$J,358.3,2921,0)
+152 ;;=37253^^21^178^25^^^^1
+153 ;;^UTILITY(U,$J,358.3,2921,1,0)
+154 ;;=^358.31IA^3^2
+155 ;;^UTILITY(U,$J,358.3,2921,1,2,0)
+156 ;;=2^37253
+157 ;;^UTILITY(U,$J,358.3,2921,1,3,0)
+158 ;;=3^Intravas US,Non/Cor Vsl,Dx/Ther Interv,Ea Addl Vsl
+159 ;;^UTILITY(U,$J,358.3,2922,0)
+160 ;;=36901^^21^178^8^^^^1
+161 ;;^UTILITY(U,$J,358.3,2922,1,0)
+162 ;;=^358.31IA^3^2
+163 ;;^UTILITY(U,$J,358.3,2922,1,2,0)
+164 ;;=2^36901
+165 ;;^UTILITY(U,$J,358.3,2922,1,3,0)
+166 ;;=3^Arteriovenous Shunt,Incl Rad S&I
+167 ;;^UTILITY(U,$J,358.3,2923,0)
+168 ;;=36222^^21^178^11^^^^1
+169 ;;^UTILITY(U,$J,358.3,2923,1,0)
+170 ;;=^358.31IA^3^2
+171 ;;^UTILITY(U,$J,358.3,2923,1,2,0)
+172 ;;=2^36222
+173 ;;^UTILITY(U,$J,358.3,2923,1,3,0)
+174 ;;=3^Cath Plcmnt Carotid,Extracranial,Unilat,Rad S&L
+175 ;;^UTILITY(U,$J,358.3,2924,0)
+176 ;;=36223^^21^178^12^^^^1
+177 ;;^UTILITY(U,$J,358.3,2924,1,0)
+178 ;;=^358.31IA^3^2
+179 ;;^UTILITY(U,$J,358.3,2924,1,2,0)
+180 ;;=2^36223
+181 ;;^UTILITY(U,$J,358.3,2924,1,3,0)
+182 ;;=3^Cath Plcmnt Carotid,Intracranial,Unilat,Rad S&L
+183 ;;^UTILITY(U,$J,358.3,2925,0)
+184 ;;=37246^^21^178^28^^^^1
+185 ;;^UTILITY(U,$J,358.3,2925,1,0)
+186 ;;=^358.31IA^3^2
+187 ;;^UTILITY(U,$J,358.3,2925,1,2,0)
+188 ;;=2^37246
+189 ;;^UTILITY(U,$J,358.3,2925,1,3,0)
+190 ;;=3^Perc Angioplasty,Intracran,Cor,Pulm,1st Artery
+191 ;;^UTILITY(U,$J,358.3,2926,0)
+192 ;;=37247^^21^178^29^^^^1
+193 ;;^UTILITY(U,$J,358.3,2926,1,0)
+194 ;;=^358.31IA^3^2
+195 ;;^UTILITY(U,$J,358.3,2926,1,2,0)
+196 ;;=2^37247
+197 ;;^UTILITY(U,$J,358.3,2926,1,3,0)
+198 ;;=3^Perc Angioplasty,Intracran,Cor,Pulm,Ea Addl Artery
+199 ;;^UTILITY(U,$J,358.3,2927,0)
+200 ;;=37248^^21^178^30^^^^1
+201 ;;^UTILITY(U,$J,358.3,2927,1,0)
+202 ;;=^358.31IA^3^2
+203 ;;^UTILITY(U,$J,358.3,2927,1,2,0)
+204 ;;=2^37248
+205 ;;^UTILITY(U,$J,358.3,2927,1,3,0)
+206 ;;=3^Perc Angioplasty,Venous,1st Vein
+207 ;;^UTILITY(U,$J,358.3,2928,0)
+208 ;;=37249^^21^178^31^^^^1
+209 ;;^UTILITY(U,$J,358.3,2928,1,0)
+210 ;;=^358.31IA^3^2
+211 ;;^UTILITY(U,$J,358.3,2928,1,2,0)
+212 ;;=2^37249
+213 ;;^UTILITY(U,$J,358.3,2928,1,3,0)
+214 ;;=3^Perc Angioplasty,Venous,Ea Addl Vein
+215 ;;^UTILITY(U,$J,358.3,2929,0)
+216 ;;=0236T^^21^178^56^^^^1
+217 ;;^UTILITY(U,$J,358.3,2929,1,0)
+218 ;;=^358.31IA^3^2
+219 ;;^UTILITY(U,$J,358.3,2929,1,2,0)
+220 ;;=2^0236T
+221 ;;^UTILITY(U,$J,358.3,2929,1,3,0)
+222 ;;=3^Trluml Perip Athrc Abd Aorta
+223 ;;^UTILITY(U,$J,358.3,2930,0)
+224 ;;=75825^^21^178^62^^^^1
+225 ;;^UTILITY(U,$J,358.3,2930,1,0)
+226 ;;=^358.31IA^3^2
+227 ;;^UTILITY(U,$J,358.3,2930,1,2,0)
+228 ;;=2^75825
+229 ;;^UTILITY(U,$J,358.3,2930,1,3,0)
+230 ;;=3^Vein X-Ray,Chest Inferior
+231 ;;^UTILITY(U,$J,358.3,2931,0)
+232 ;;=36005^^21^179^1^^^^1
+233 ;;^UTILITY(U,$J,358.3,2931,1,0)
+234 ;;=^358.31IA^3^2
+235 ;;^UTILITY(U,$J,358.3,2931,1,2,0)
+236 ;;=2^36005
+237 ;;^UTILITY(U,$J,358.3,2931,1,3,0)
+238 ;;=3^Contrast Venography
+239 ;;^UTILITY(U,$J,358.3,2932,0)
+240 ;;=92950^^21^180^1^^^^1
+241 ;;^UTILITY(U,$J,358.3,2932,1,0)
+242 ;;=^358.31IA^3^2
+243 ;;^UTILITY(U,$J,358.3,2932,1,2,0)
+244 ;;=2^92950
+245 ;;^UTILITY(U,$J,358.3,2932,1,3,0)
+246 ;;=3^CPR
+247 ;;^UTILITY(U,$J,358.3,2933,0)
+248 ;;=92970^^21^180^2^^^^1
+249 ;;^UTILITY(U,$J,358.3,2933,1,0)
+250 ;;=^358.31IA^3^2
+251 ;;^UTILITY(U,$J,358.3,2933,1,2,0)
+252 ;;=2^92970
+253 ;;^UTILITY(U,$J,358.3,2933,1,3,0)
+254 ;;=3^Cardio Assist Dev Insert
+255 ;;^UTILITY(U,$J,358.3,2934,0)
+256 ;;=94760^^21^180^3^^^^1
+257 ;;^UTILITY(U,$J,358.3,2934,1,0)
+258 ;;=^358.31IA^3^2
+259 ;;^UTILITY(U,$J,358.3,2934,1,2,0)
+260 ;;=2^94760
+261 ;;^UTILITY(U,$J,358.3,2934,1,3,0)
+262 ;;=3^Measure Blood Oxygen Level,1 Time
+263 ;;^UTILITY(U,$J,358.3,2935,0)
+264 ;;=94761^^21^180^4^^^^1
+265 ;;^UTILITY(U,$J,358.3,2935,1,0)
+266 ;;=^358.31IA^3^2
+267 ;;^UTILITY(U,$J,358.3,2935,1,2,0)
+268 ;;=2^94761
+269 ;;^UTILITY(U,$J,358.3,2935,1,3,0)
+270 ;;=3^Measure Blood Oxygen Level,Mult Times
+271 ;;^UTILITY(U,$J,358.3,2936,0)
+272 ;;=33289^^21^180^5^^^^1
+273 ;;^UTILITY(U,$J,358.3,2936,1,0)
+274 ;;=^358.31IA^3^2
+275 ;;^UTILITY(U,$J,358.3,2936,1,2,0)
+276 ;;=2^33289
+277 ;;^UTILITY(U,$J,358.3,2936,1,3,0)
+278 ;;=3^Transcath Impl Wireless Pulm Art Sensor
+279 ;;^UTILITY(U,$J,358.3,2937,0)
+280 ;;=93503^^21^181^26^^^^1
+281 ;;^UTILITY(U,$J,358.3,2937,1,0)
+282 ;;=^358.31IA^3^2
+283 ;;^UTILITY(U,$J,358.3,2937,1,2,0)
+284 ;;=2^93503
+285 ;;^UTILITY(U,$J,358.3,2937,1,3,0)
+286 ;;=3^Swan Ganz Placement
+287 ;;^UTILITY(U,$J,358.3,2938,0)
+288 ;;=93451^^21^181^25^^^^1
+289 ;;^UTILITY(U,$J,358.3,2938,1,0)
+290 ;;=^358.31IA^3^2
+291 ;;^UTILITY(U,$J,358.3,2938,1,2,0)
+292 ;;=2^93451
+293 ;;^UTILITY(U,$J,358.3,2938,1,3,0)
+294 ;;=3^Rt Hrt Cath incl O2 & Cardiac Outpt
+295 ;;^UTILITY(U,$J,358.3,2939,0)
+296 ;;=93452^^21^181^14^^^^1
+297 ;;^UTILITY(U,$J,358.3,2939,1,0)
+298 ;;=^358.31IA^3^2
+299 ;;^UTILITY(U,$J,358.3,2939,1,2,0)
+300 ;;=2^93452
+301 ;;^UTILITY(U,$J,358.3,2939,1,3,0)
+302 ;;=3^LHC w/V-Gram, incl S&I
+303 ;;^UTILITY(U,$J,358.3,2940,0)
+304 ;;=93453^^21^181^20^^^^1
+305 ;;^UTILITY(U,$J,358.3,2940,1,0)
+306 ;;=^358.31IA^3^2
+307 ;;^UTILITY(U,$J,358.3,2940,1,2,0)
+308 ;;=2^93453
+309 ;;^UTILITY(U,$J,358.3,2940,1,3,0)
+310 ;;=3^R&L HC w/V-Gram, incl S&I
+311 ;;^UTILITY(U,$J,358.3,2941,0)
+312 ;;=93454^^21^181^8^^^^1
+313 ;;^UTILITY(U,$J,358.3,2941,1,0)
+314 ;;=^358.31IA^3^2
+315 ;;^UTILITY(U,$J,358.3,2941,1,2,0)
+316 ;;=2^93454
+317 ;;^UTILITY(U,$J,358.3,2941,1,3,0)
+318 ;;=3^Coronary Angiography, incl inj & S&I
+319 ;;^UTILITY(U,$J,358.3,2942,0)
+320 ;;=93455^^21^181^4^^^^1
+321 ;;^UTILITY(U,$J,358.3,2942,1,0)
+322 ;;=^358.31IA^3^2
+323 ;;^UTILITY(U,$J,358.3,2942,1,2,0)
+324 ;;=2^93455
+325 ;;^UTILITY(U,$J,358.3,2942,1,3,0)
+326 ;;=3^Cor Angio incl inj & S&I, and Bypass angio
+327 ;;^UTILITY(U,$J,358.3,2943,0)
+328 ;;=93456^^21^181^5^^^^1
+329 ;;^UTILITY(U,$J,358.3,2943,1,0)
+330 ;;=^358.31IA^3^2
+331 ;;^UTILITY(U,$J,358.3,2943,1,2,0)
+332 ;;=2^93456
+333 ;;^UTILITY(U,$J,358.3,2943,1,3,0)
+334 ;;=3^Cor Angio incl inj & S&I, and R Heart Cath
+335 ;;^UTILITY(U,$J,358.3,2944,0)
+336 ;;=93457^^21^181^24^^^^1
+337 ;;^UTILITY(U,$J,358.3,2944,1,0)
+338 ;;=^358.31IA^3^2
+339 ;;^UTILITY(U,$J,358.3,2944,1,2,0)
+340 ;;=2^93457
+341 ;;^UTILITY(U,$J,358.3,2944,1,3,0)
+342 ;;=3^Rt Hrt Angio,Bypass Grft,incl inj & S&I
+343 ;;^UTILITY(U,$J,358.3,2945,0)
+344 ;;=93458^^21^181^6^^^^1
+345 ;;^UTILITY(U,$J,358.3,2945,1,0)
+346 ;;=^358.31IA^3^2
+347 ;;^UTILITY(U,$J,358.3,2945,1,2,0)
+348 ;;=2^93458
+349 ;;^UTILITY(U,$J,358.3,2945,1,3,0)
+350 ;;=3^Cor Angio, LHC, V-Gram, incl inj & S&I
+351 ;;^UTILITY(U,$J,358.3,2946,0)
+352 ;;=93459^^21^181^15^^^^1
+353 ;;^UTILITY(U,$J,358.3,2946,1,0)
+354 ;;=^358.31IA^3^2
+355 ;;^UTILITY(U,$J,358.3,2946,1,2,0)
+356 ;;=2^93459
+357 ;;^UTILITY(U,$J,358.3,2946,1,3,0)
+358 ;;=3^Lt Hrt Angio,V-Gram,Bypass,incl inj & S&I
+359 ;;^UTILITY(U,$J,358.3,2947,0)
+360 ;;=93460^^21^181^7^^^^1
+361 ;;^UTILITY(U,$J,358.3,2947,1,0)
+362 ;;=^358.31IA^3^2
+363 ;;^UTILITY(U,$J,358.3,2947,1,2,0)
+364 ;;=2^93460
+365 ;;^UTILITY(U,$J,358.3,2947,1,3,0)
+366 ;;=3^Cor Angio, RHC/LHC, V-Gram, incl inj & S&I
+367 ;;^UTILITY(U,$J,358.3,2948,0)
+368 ;;=93461^^21^181^21^^^^1
+369 ;;^UTILITY(U,$J,358.3,2948,1,0)
+370 ;;=^358.31IA^3^2
+371 ;;^UTILITY(U,$J,358.3,2948,1,2,0)
+372 ;;=2^93461
+373 ;;^UTILITY(U,$J,358.3,2948,1,3,0)
+374 ;;=3^R&L Hrt Angio,V-Gram,Bypass,incl inj & S&I
+375 ;;^UTILITY(U,$J,358.3,2949,0)
+376 ;;=93462^^21^181^17^^^^1
+377 ;;^UTILITY(U,$J,358.3,2949,1,0)
+378 ;;=^358.31IA^3^2
+379 ;;^UTILITY(U,$J,358.3,2949,1,2,0)
+380 ;;=2^93462
+381 ;;^UTILITY(U,$J,358.3,2949,1,3,0)
+382 ;;=3^Lt Hrt Cath Trnsptl Puncture
+383 ;;^UTILITY(U,$J,358.3,2950,0)
+384 ;;=93463^^21^181^18^^^^1
+385 ;;^UTILITY(U,$J,358.3,2950,1,0)
+386 ;;=^358.31IA^3^2
+387 ;;^UTILITY(U,$J,358.3,2950,1,2,0)
+388 ;;=2^93463
+389 ;;^UTILITY(U,$J,358.3,2950,1,3,0)
+390 ;;=3^Pharm agent admin, when performed
+391 ;;^UTILITY(U,$J,358.3,2951,0)
+392 ;;=93505^^21^181^9^^^^1
+393 ;;^UTILITY(U,$J,358.3,2951,1,0)
+394 ;;=^358.31IA^3^2
+395 ;;^UTILITY(U,$J,358.3,2951,1,2,0)
+396 ;;=2^93505
+397 ;;^UTILITY(U,$J,358.3,2951,1,3,0)
+398 ;;=3^Endomyocardial Biopsy
+399 ;;^UTILITY(U,$J,358.3,2952,0)
+400 ;;=93464^^21^181^19^^^^1
+401 ;;^UTILITY(U,$J,358.3,2952,1,0)
+402 ;;=^358.31IA^3^2
+403 ;;^UTILITY(U,$J,358.3,2952,1,2,0)
+404 ;;=2^93464
+405 ;;^UTILITY(U,$J,358.3,2952,1,3,0)
+406 ;;=3^Phys Exercise Tst w/Hemodynamic Meas
+407 ;;^UTILITY(U,$J,358.3,2953,0)
+408 ;;=93564^^21^181^10^^^^1
+409 ;;^UTILITY(U,$J,358.3,2953,1,0)
+410 ;;=^358.31IA^3^2
+411 ;;^UTILITY(U,$J,358.3,2953,1,2,0)
+412 ;;=2^93564
+413 ;;^UTILITY(U,$J,358.3,2953,1,3,0)
+414 ;;=3^Inject Hrt Cong Cath Art/Grft
+415 ;;^UTILITY(U,$J,358.3,2954,0)
+416 ;;=93568^^21^181^11^^^^1
+417 ;;^UTILITY(U,$J,358.3,2954,1,0)
+418 ;;=^358.31IA^3^2
+419 ;;^UTILITY(U,$J,358.3,2954,1,2,0)
+420 ;;=2^93568
+421 ;;^UTILITY(U,$J,358.3,2954,1,3,0)
+422 ;;=3^Inject Pulm Art Hrt Cath
+423 ;;^UTILITY(U,$J,358.3,2955,0)
+424 ;;=93566^^21^181^12^^^^1
+425 ;;^UTILITY(U,$J,358.3,2955,1,0)
+426 ;;=^358.31IA^3^2
+427 ;;^UTILITY(U,$J,358.3,2955,1,2,0)
+428 ;;=2^93566
+429 ;;^UTILITY(U,$J,358.3,2955,1,3,0)
+430 ;;=3^Inject R Ventr/Atrial Angio
+431 ;;^UTILITY(U,$J,358.3,2956,0)
+432 ;;=93567^^21^181^13^^^^1
+433 ;;^UTILITY(U,$J,358.3,2956,1,0)
+434 ;;=^358.31IA^3^2
+435 ;;^UTILITY(U,$J,358.3,2956,1,2,0)
+436 ;;=2^93567
+437 ;;^UTILITY(U,$J,358.3,2956,1,3,0)
+438 ;;=3^Inject Suprvlv Aortography
+439 ;;^UTILITY(U,$J,358.3,2957,0)
+440 ;;=93580^^21^181^27^^^^1
+441 ;;^UTILITY(U,$J,358.3,2957,1,0)
+442 ;;=^358.31IA^3^2
+443 ;;^UTILITY(U,$J,358.3,2957,1,2,0)
+444 ;;=2^93580
+445 ;;^UTILITY(U,$J,358.3,2957,1,3,0)
+446 ;;=3^Transcath Closure of ASD
+447 ;;^UTILITY(U,$J,358.3,2958,0)
+448 ;;=76937^^21^181^28^^^^1
+449 ;;^UTILITY(U,$J,358.3,2958,1,0)
+450 ;;=^358.31IA^3^2
+451 ;;^UTILITY(U,$J,358.3,2958,1,2,0)
+452 ;;=2^76937
+453 ;;^UTILITY(U,$J,358.3,2958,1,3,0)
+454 ;;=3^US Vasc Access Sits Vsl Patency Ndl Entry
+455 ;;^UTILITY(U,$J,358.3,2959,0)
+456 ;;=93593^^21^181^3^^^^1
+457 ;;^UTILITY(U,$J,358.3,2959,1,0)
+458 ;;=^358.31IA^3^2
+459 ;;^UTILITY(U,$J,358.3,2959,1,2,0)
+460 ;;=2^93593
+461 ;;^UTILITY(U,$J,358.3,2959,1,3,0)
+462 ;;=3^Cath Cong Hrt Defect w/ Image,Normal Native
+463 ;;^UTILITY(U,$J,358.3,2960,0)
+464 ;;=93594^^21^181^2^^^^1
+465 ;;^UTILITY(U,$J,358.3,2960,1,0)
+466 ;;=^358.31IA^3^2
+467 ;;^UTILITY(U,$J,358.3,2960,1,2,0)
+468 ;;=2^93594
+469 ;;^UTILITY(U,$J,358.3,2960,1,3,0)
+470 ;;=3^Cath Cong Hrt Defect w/ Image,Abnormal Native
+471 ;;^UTILITY(U,$J,358.3,2961,0)
+472 ;;=93595^^21^181^16^^^^1
+473 ;;^UTILITY(U,$J,358.3,2961,1,0)
+474 ;;=^358.31IA^3^2
+475 ;;^UTILITY(U,$J,358.3,2961,1,2,0)
+476 ;;=2^93595
+477 ;;^UTILITY(U,$J,358.3,2961,1,3,0)
+478 ;;=3^Lt Hrt Cath Cong Hrt Defect w/ Image
+479 ;;^UTILITY(U,$J,358.3,2962,0)
+480 ;;=93596^^21^181^23^^^^1
+481 ;;^UTILITY(U,$J,358.3,2962,1,0)
+482 ;;=^358.31IA^3^2
+483 ;;^UTILITY(U,$J,358.3,2962,1,2,0)
+484 ;;=2^93596
+485 ;;^UTILITY(U,$J,358.3,2962,1,3,0)
+486 ;;=3^R&L Hrt Cath Cong Hrt Defect w/ Image,Normal
+487 ;;^UTILITY(U,$J,358.3,2963,0)
+488 ;;=93597^^21^181^22^^^^1
+489 ;;^UTILITY(U,$J,358.3,2963,1,0)
+490 ;;=^358.31IA^3^2
+491 ;;^UTILITY(U,$J,358.3,2963,1,2,0)
+492 ;;=2^93597
+493 ;;^UTILITY(U,$J,358.3,2963,1,3,0)
+494 ;;=3^R&L Hrt Cath Cong Hrt Defect w/ Image,Abnormal
+495 ;;^UTILITY(U,$J,358.3,2964,0)
+496 ;;=93598^^21^181^1^^^^1
+497 ;;^UTILITY(U,$J,358.3,2964,1,0)
+498 ;;=^358.31IA^3^2
+499 ;;^UTILITY(U,$J,358.3,2964,1,2,0)
+500 ;;=2^93598
+501 ;;^UTILITY(U,$J,358.3,2964,1,3,0)
+502 ;;=3^Cardiac Output Measure,Thermodilution or Oth,During Hrt Cath
+503 ;;^UTILITY(U,$J,358.3,2965,0)
+504 ;;=36100^^21^182^10^^^^1
+505 ;;^UTILITY(U,$J,358.3,2965,1,0)
+506 ;;=^358.31IA^3^2
+507 ;;^UTILITY(U,$J,358.3,2965,1,2,0)
+508 ;;=2^36100
+509 ;;^UTILITY(U,$J,358.3,2965,1,3,0)
+510 ;;=3^Intro Needle Or Cath Carotid Or Vert. Artery
+511 ;;^UTILITY(U,$J,358.3,2966,0)
+512 ;;=36140^^21^182^11^^^^1
+513 ;;^UTILITY(U,$J,358.3,2966,1,0)
+514 ;;=^358.31IA^3^2
+515 ;;^UTILITY(U,$J,358.3,2966,1,2,0)
+516 ;;=2^36140
+517 ;;^UTILITY(U,$J,358.3,2966,1,3,0)
+518 ;;=3^Intro Needle Or Cath Upper/Lower Ext Artery
+519 ;;^UTILITY(U,$J,358.3,2967,0)
+520 ;;=36011^^21^182^34^^^^1
+521 ;;^UTILITY(U,$J,358.3,2967,1,0)
+522 ;;=^358.31IA^3^2
+523 ;;^UTILITY(U,$J,358.3,2967,1,2,0)
+524 ;;=2^36011
+525 ;;^UTILITY(U,$J,358.3,2967,1,3,0)
+526 ;;=3^Select Cath 1st Order Ren/Jugular Vein
+527 ;;^UTILITY(U,$J,358.3,2968,0)
+528 ;;=36245^^21^182^33^^^^1
+529 ;;^UTILITY(U,$J,358.3,2968,1,0)
+530 ;;=^358.31IA^3^2
+531 ;;^UTILITY(U,$J,358.3,2968,1,2,0)
+532 ;;=2^36245
+533 ;;^UTILITY(U,$J,358.3,2968,1,3,0)
+534 ;;=3^Select Cath 1st Order Abd/Pelvic/Le Artery
+535 ;;^UTILITY(U,$J,358.3,2969,0)
+536 ;;=36246^^21^182^36^^^^1
+537 ;;^UTILITY(U,$J,358.3,2969,1,0)
+538 ;;=^358.31IA^3^2
+539 ;;^UTILITY(U,$J,358.3,2969,1,2,0)
+540 ;;=2^36246
+541 ;;^UTILITY(U,$J,358.3,2969,1,3,0)
+542 ;;=3^Select Cath 2nd Order Abd/Pelvic/Le Artery,Init
+543 ;;^UTILITY(U,$J,358.3,2970,0)
+544 ;;=36247^^21^182^41^^^^1
+545 ;;^UTILITY(U,$J,358.3,2970,1,0)
+546 ;;=^358.31IA^3^2
+547 ;;^UTILITY(U,$J,358.3,2970,1,2,0)
+548 ;;=2^36247
+549 ;;^UTILITY(U,$J,358.3,2970,1,3,0)
+550 ;;=3^Select Cath 3rd Order Abd/Pelvic/Le Artery,Init
+551 ;;^UTILITY(U,$J,358.3,2971,0)
+552 ;;=36216^^21^182^38^^^^1
+553 ;;^UTILITY(U,$J,358.3,2971,1,0)
+554 ;;=^358.31IA^3^2
+555 ;;^UTILITY(U,$J,358.3,2971,1,2,0)
+556 ;;=2^36216
+557 ;;^UTILITY(U,$J,358.3,2971,1,3,0)
+558 ;;=3^Select Cath 2nd Order Thor/Ue/Head,Init
+559 ;;^UTILITY(U,$J,358.3,2972,0)
+560 ;;=36217^^21^182^42^^^^1
+561 ;;^UTILITY(U,$J,358.3,2972,1,0)
+562 ;;=^358.31IA^3^2
+563 ;;^UTILITY(U,$J,358.3,2972,1,2,0)
+564 ;;=2^36217
+565 ;;^UTILITY(U,$J,358.3,2972,1,3,0)
+566 ;;=3^Select Cath 3rd Order Thor/Ue/Head,Init
+567 ;;^UTILITY(U,$J,358.3,2973,0)
+568 ;;=36248^^21^182^39^^^^1
+569 ;;^UTILITY(U,$J,358.3,2973,1,0)
+570 ;;=^358.31IA^3^2
+571 ;;^UTILITY(U,$J,358.3,2973,1,2,0)
+572 ;;=2^36248
+573 ;;^UTILITY(U,$J,358.3,2973,1,3,0)
+574 ;;=3^Select Cath 2nd/3rd Order Pelvic/Le,Ea Addl
+575 ;;^UTILITY(U,$J,358.3,2974,0)
+576 ;;=36200^^21^182^9^^^^1
+577 ;;^UTILITY(U,$J,358.3,2974,1,0)
+578 ;;=^358.31IA^3^2
+579 ;;^UTILITY(U,$J,358.3,2974,1,2,0)
+580 ;;=2^36200
+581 ;;^UTILITY(U,$J,358.3,2974,1,3,0)
+582 ;;=3^Intro Cath,Aorta
+583 ;;^UTILITY(U,$J,358.3,2975,0)
+584 ;;=36005^^21^182^5^^^^1
+585 ;;^UTILITY(U,$J,358.3,2975,1,0)
+586 ;;=^358.31IA^3^2
+587 ;;^UTILITY(U,$J,358.3,2975,1,2,0)
+588 ;;=2^36005
+589 ;;^UTILITY(U,$J,358.3,2975,1,3,0)
+590 ;;=3^Injection Ext Venography
+591 ;;^UTILITY(U,$J,358.3,2976,0)
+592 ;;=36251^^21^182^32^^^^1
+593 ;;^UTILITY(U,$J,358.3,2976,1,0)
+594 ;;=^358.31IA^3^2
+595 ;;^UTILITY(U,$J,358.3,2976,1,2,0)
+596 ;;=2^36251
+597 ;;^UTILITY(U,$J,358.3,2976,1,3,0)
+598 ;;=3^Select Cath 1st Main Ren&Acc Ren Art
+599 ;;^UTILITY(U,$J,358.3,2977,0)
+600 ;;=36252^^21^182^31^^^^1
+601 ;;^UTILITY(U,$J,358.3,2977,1,0)
+602 ;;=^358.31IA^3^2
+603 ;;^UTILITY(U,$J,358.3,2977,1,2,0)
+604 ;;=2^36252
+605 ;;^UTILITY(U,$J,358.3,2977,1,3,0)
+606 ;;=3^Select Cath 1st Main Ren&Acc Art Bilat
+607 ;;^UTILITY(U,$J,358.3,2978,0)
+608 ;;=36254^^21^182^6^^^^1
+609 ;;^UTILITY(U,$J,358.3,2978,1,0)
+610 ;;=^358.31IA^3^2
+611 ;;^UTILITY(U,$J,358.3,2978,1,2,0)
+612 ;;=2^36254
+613 ;;^UTILITY(U,$J,358.3,2978,1,3,0)
+614 ;;=3^Ins Cath Ren Art 2nd+ Bilat
+615 ;;^UTILITY(U,$J,358.3,2979,0)
+616 ;;=36253^^21^182^7^^^^1
+617 ;;^UTILITY(U,$J,358.3,2979,1,0)
+618 ;;=^358.31IA^3^2
+619 ;;^UTILITY(U,$J,358.3,2979,1,2,0)
+620 ;;=2^36253
+621 ;;^UTILITY(U,$J,358.3,2979,1,3,0)
+622 ;;=3^Ins Cath Ren Art 2nd+ Unilat
+623 ;;^UTILITY(U,$J,358.3,2980,0)
+624 ;;=37191^^21^182^8^^^^1
+625 ;;^UTILITY(U,$J,358.3,2980,1,0)
+626 ;;=^358.31IA^3^2
+627 ;;^UTILITY(U,$J,358.3,2980,1,2,0)
+628 ;;=2^37191
+629 ;;^UTILITY(U,$J,358.3,2980,1,3,0)
+630 ;;=3^Ins Intravas Vena Cava Filter,Endovas
+631 ;;^UTILITY(U,$J,358.3,2981,0)
+632 ;;=36222^^21^182^17^^^^1
+633 ;;^UTILITY(U,$J,358.3,2981,1,0)
+634 ;;=^358.31IA^3^2
+635 ;;^UTILITY(U,$J,358.3,2981,1,2,0)
+636 ;;=2^36222
+637 ;;^UTILITY(U,$J,358.3,2981,1,3,0)
+638 ;;=3^Place Cath Carotid/Inom Art
+639 ;;^UTILITY(U,$J,358.3,2982,0)
+640 ;;=36223^^21^182^16^^^^1
+641 ;;^UTILITY(U,$J,358.3,2982,1,0)
+642 ;;=^358.31IA^3^2
+643 ;;^UTILITY(U,$J,358.3,2982,1,2,0)
+644 ;;=2^36223
+645 ;;^UTILITY(U,$J,358.3,2982,1,3,0)
+646 ;;=3^Place Cath Carotid Inc Extracranial
+647 ;;^UTILITY(U,$J,358.3,2983,0)
+648 ;;=36224^^21^182^15^^^^1
+649 ;;^UTILITY(U,$J,358.3,2983,1,0)
+650 ;;=^358.31IA^3^2
+651 ;;^UTILITY(U,$J,358.3,2983,1,2,0)
+652 ;;=2^36224