Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Routine: IBDEI01I

IBDEI01I.m

Go to the documentation of this file.
IBDEI01I ; ; 01-FEB-2021
 ;;3.0;IB ENCOUNTER FORM IMP/EXP;;FEB 01, 2021
 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,2776,1,3,0)
 ;;=3^Leucovorin Calcium Inj 50mg
 ;;^UTILITY(U,$J,358.3,2777,0)
 ;;=J0610^^27^216^10^^^^1
 ;;^UTILITY(U,$J,358.3,2777,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2777,1,1,0)
 ;;=1^J0610
 ;;^UTILITY(U,$J,358.3,2777,1,3,0)
 ;;=3^Calcium Gluconate Inj 10ml
 ;;^UTILITY(U,$J,358.3,2778,0)
 ;;=J1566^^27^216^23^^^^1
 ;;^UTILITY(U,$J,358.3,2778,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2778,1,1,0)
 ;;=1^J1566
 ;;^UTILITY(U,$J,358.3,2778,1,3,0)
 ;;=3^IVIG Powder 500mg
 ;;^UTILITY(U,$J,358.3,2779,0)
 ;;=J1626^^27^216^22^^^^1
 ;;^UTILITY(U,$J,358.3,2779,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2779,1,1,0)
 ;;=1^J1626
 ;;^UTILITY(U,$J,358.3,2779,1,3,0)
 ;;=3^Granisetron HCL Inj 100mcg
 ;;^UTILITY(U,$J,358.3,2780,0)
 ;;=J1745^^27^216^25^^^^1
 ;;^UTILITY(U,$J,358.3,2780,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2780,1,1,0)
 ;;=1^J1745
 ;;^UTILITY(U,$J,358.3,2780,1,3,0)
 ;;=3^Infliximab Inj 10mg
 ;;^UTILITY(U,$J,358.3,2781,0)
 ;;=J1750^^27^216^29^^^^1
 ;;^UTILITY(U,$J,358.3,2781,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2781,1,1,0)
 ;;=1^J1750
 ;;^UTILITY(U,$J,358.3,2781,1,3,0)
 ;;=3^Iron Dextran Inj 50mg
 ;;^UTILITY(U,$J,358.3,2782,0)
 ;;=J2323^^27^216^41^^^^1
 ;;^UTILITY(U,$J,358.3,2782,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2782,1,1,0)
 ;;=1^J2323
 ;;^UTILITY(U,$J,358.3,2782,1,3,0)
 ;;=3^Natalizumab Inj 1mg
 ;;^UTILITY(U,$J,358.3,2783,0)
 ;;=J2916^^27^216^40^^^^1
 ;;^UTILITY(U,$J,358.3,2783,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2783,1,1,0)
 ;;=1^J2916
 ;;^UTILITY(U,$J,358.3,2783,1,3,0)
 ;;=3^Na Ferr Gluc Cmplx Inj 12.5mg
 ;;^UTILITY(U,$J,358.3,2784,0)
 ;;=J3475^^27^216^34^^^^1
 ;;^UTILITY(U,$J,358.3,2784,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2784,1,1,0)
 ;;=1^J3475
 ;;^UTILITY(U,$J,358.3,2784,1,3,0)
 ;;=3^Magnesium Sulf Inj 500mg
 ;;^UTILITY(U,$J,358.3,2785,0)
 ;;=J7040^^27^216^44^^^^1
 ;;^UTILITY(U,$J,358.3,2785,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2785,1,1,0)
 ;;=1^J7040
 ;;^UTILITY(U,$J,358.3,2785,1,3,0)
 ;;=3^Normal Saline 500ml
 ;;^UTILITY(U,$J,358.3,2786,0)
 ;;=P9041^^27^216^7^^^^1
 ;;^UTILITY(U,$J,358.3,2786,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2786,1,1,0)
 ;;=1^P9041
 ;;^UTILITY(U,$J,358.3,2786,1,3,0)
 ;;=3^Albumin (Human),5%,50ml
 ;;^UTILITY(U,$J,358.3,2787,0)
 ;;=P9045^^27^216^6^^^^1
 ;;^UTILITY(U,$J,358.3,2787,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2787,1,1,0)
 ;;=1^P9045
 ;;^UTILITY(U,$J,358.3,2787,1,3,0)
 ;;=3^Albumin (Human),5%,250ml
 ;;^UTILITY(U,$J,358.3,2788,0)
 ;;=P9046^^27^216^4^^^^1
 ;;^UTILITY(U,$J,358.3,2788,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2788,1,1,0)
 ;;=1^P9046
 ;;^UTILITY(U,$J,358.3,2788,1,3,0)
 ;;=3^Albumin (Human),25%,20ml
 ;;^UTILITY(U,$J,358.3,2789,0)
 ;;=P9047^^27^216^5^^^^1
 ;;^UTILITY(U,$J,358.3,2789,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2789,1,1,0)
 ;;=1^P9047
 ;;^UTILITY(U,$J,358.3,2789,1,3,0)
 ;;=3^Albumin (Human),25%,50ml
 ;;^UTILITY(U,$J,358.3,2790,0)
 ;;=S0028^^27^216^17^^^^1
 ;;^UTILITY(U,$J,358.3,2790,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2790,1,1,0)
 ;;=1^S0028
 ;;^UTILITY(U,$J,358.3,2790,1,3,0)
 ;;=3^Famotidine Inj 20mg
 ;;^UTILITY(U,$J,358.3,2791,0)
 ;;=J1442^^27^216^18^^^^1
 ;;^UTILITY(U,$J,358.3,2791,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2791,1,1,0)
 ;;=1^J1442
 ;;^UTILITY(U,$J,358.3,2791,1,3,0)
 ;;=3^Filgrastim (g-csf) Inj 1mcg
 ;;^UTILITY(U,$J,358.3,2792,0)
 ;;=J7050^^27^216^43^^^^1
 ;;^UTILITY(U,$J,358.3,2792,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2792,1,1,0)
 ;;=1^J7050
 ;;^UTILITY(U,$J,358.3,2792,1,3,0)
 ;;=3^Normal Saline 250ml
 ;;^UTILITY(U,$J,358.3,2793,0)
 ;;=J7030^^27^216^42^^^^1
 ;;^UTILITY(U,$J,358.3,2793,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2793,1,1,0)
 ;;=1^J7030
 ;;^UTILITY(U,$J,358.3,2793,1,3,0)
 ;;=3^Normal Saline 1000ml
 ;;^UTILITY(U,$J,358.3,2794,0)
 ;;=J2405^^27^216^47^^^^1
 ;;^UTILITY(U,$J,358.3,2794,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2794,1,1,0)
 ;;=1^J2405
 ;;^UTILITY(U,$J,358.3,2794,1,3,0)
 ;;=3^Ondansetron HCL Inj 1mg
 ;;^UTILITY(U,$J,358.3,2795,0)
 ;;=J3489^^27^216^55^^^^1
 ;;^UTILITY(U,$J,358.3,2795,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2795,1,1,0)
 ;;=1^J3489
 ;;^UTILITY(U,$J,358.3,2795,1,3,0)
 ;;=3^Zoledronic Acid Inj 1mg
 ;;^UTILITY(U,$J,358.3,2796,0)
 ;;=J1815^^27^216^28^^^^1
 ;;^UTILITY(U,$J,358.3,2796,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2796,1,1,0)
 ;;=1^J1815
 ;;^UTILITY(U,$J,358.3,2796,1,3,0)
 ;;=3^Insulin per 5 units
 ;;^UTILITY(U,$J,358.3,2797,0)
 ;;=J2353^^27^216^45^^^^1
 ;;^UTILITY(U,$J,358.3,2797,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2797,1,1,0)
 ;;=1^J2353
 ;;^UTILITY(U,$J,358.3,2797,1,3,0)
 ;;=3^Octreotide IM 1mg
 ;;^UTILITY(U,$J,358.3,2798,0)
 ;;=J2354^^27^216^46^^^^1
 ;;^UTILITY(U,$J,358.3,2798,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2798,1,1,0)
 ;;=1^J2354
 ;;^UTILITY(U,$J,358.3,2798,1,3,0)
 ;;=3^Octreotide SQ/IV 1mg
 ;;^UTILITY(U,$J,358.3,2799,0)
 ;;=J8540^^27^216^12^^^^1
 ;;^UTILITY(U,$J,358.3,2799,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2799,1,1,0)
 ;;=1^J8540
 ;;^UTILITY(U,$J,358.3,2799,1,3,0)
 ;;=3^Dexamethasone Oral 25mg
 ;;^UTILITY(U,$J,358.3,2800,0)
 ;;=J2274^^27^216^39^^^^1
 ;;^UTILITY(U,$J,358.3,2800,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2800,1,1,0)
 ;;=1^J2274
 ;;^UTILITY(U,$J,358.3,2800,1,3,0)
 ;;=3^Morphine Sulfate Preservative-Free Inj 10mg
 ;;^UTILITY(U,$J,358.3,2801,0)
 ;;=S5010^^27^216^1^^^^1
 ;;^UTILITY(U,$J,358.3,2801,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2801,1,1,0)
 ;;=1^S5010
 ;;^UTILITY(U,$J,358.3,2801,1,3,0)
 ;;=3^5% Dextrose/0.45% NS 1000ml
 ;;^UTILITY(U,$J,358.3,2802,0)
 ;;=J1756^^27^216^30^^^^1
 ;;^UTILITY(U,$J,358.3,2802,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2802,1,1,0)
 ;;=1^J1756
 ;;^UTILITY(U,$J,358.3,2802,1,3,0)
 ;;=3^Iron Sucrose Inj 1mg
 ;;^UTILITY(U,$J,358.3,2803,0)
 ;;=J9042^^27^216^8^^^^1
 ;;^UTILITY(U,$J,358.3,2803,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2803,1,1,0)
 ;;=1^J9042
 ;;^UTILITY(U,$J,358.3,2803,1,3,0)
 ;;=3^Brentuximab Vedotin 1mg
 ;;^UTILITY(U,$J,358.3,2804,0)
 ;;=J9043^^27^216^9^^^^1
 ;;^UTILITY(U,$J,358.3,2804,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2804,1,1,0)
 ;;=1^J9043
 ;;^UTILITY(U,$J,358.3,2804,1,3,0)
 ;;=3^Cabazitaxel 1mg
 ;;^UTILITY(U,$J,358.3,2805,0)
 ;;=J0740^^27^216^11^^^^1
 ;;^UTILITY(U,$J,358.3,2805,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2805,1,1,0)
 ;;=1^J0740
 ;;^UTILITY(U,$J,358.3,2805,1,3,0)
 ;;=3^Cidofovir 375mg
 ;;^UTILITY(U,$J,358.3,2806,0)
 ;;=J1300^^27^216^15^^^^1
 ;;^UTILITY(U,$J,358.3,2806,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2806,1,1,0)
 ;;=1^J1300
 ;;^UTILITY(U,$J,358.3,2806,1,3,0)
 ;;=3^Duratrad 10mg
 ;;^UTILITY(U,$J,358.3,2807,0)
 ;;=J9395^^27^216^19^^^^1
 ;;^UTILITY(U,$J,358.3,2807,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2807,1,1,0)
 ;;=1^J9395
 ;;^UTILITY(U,$J,358.3,2807,1,3,0)
 ;;=3^Fulvestrant 25mg
 ;;^UTILITY(U,$J,358.3,2808,0)
 ;;=J8499^^27^216^53^^^^1
 ;;^UTILITY(U,$J,358.3,2808,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2808,1,1,0)
 ;;=1^J8499
 ;;^UTILITY(U,$J,358.3,2808,1,3,0)
 ;;=3^Tylenol-Oral
 ;;^UTILITY(U,$J,358.3,2809,0)
 ;;=J3590^^27^216^33^^^^1
 ;;^UTILITY(U,$J,358.3,2809,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2809,1,1,0)
 ;;=1^J3590
 ;;^UTILITY(U,$J,358.3,2809,1,3,0)
 ;;=3^Luspatercept
 ;;^UTILITY(U,$J,358.3,2810,0)
 ;;=90471^^27^217^1^^^^1
 ;;^UTILITY(U,$J,358.3,2810,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2810,1,1,0)
 ;;=1^90471
 ;;^UTILITY(U,$J,358.3,2810,1,3,0)
 ;;=3^Immunization Admin,1 Vaccine
 ;;^UTILITY(U,$J,358.3,2811,0)
 ;;=90472^^27^217^2^^^^1
 ;;^UTILITY(U,$J,358.3,2811,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2811,1,1,0)
 ;;=1^90472
 ;;^UTILITY(U,$J,358.3,2811,1,3,0)
 ;;=3^Immunization Admin,Ea Addl Vaccine
 ;;^UTILITY(U,$J,358.3,2812,0)
 ;;=90632^^27^218^6^^^^1
 ;;^UTILITY(U,$J,358.3,2812,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2812,1,1,0)
 ;;=1^90632
 ;;^UTILITY(U,$J,358.3,2812,1,3,0)
 ;;=3^Hepatitis A Vaccine
 ;;^UTILITY(U,$J,358.3,2813,0)
 ;;=90636^^27^218^5^^^^1
 ;;^UTILITY(U,$J,358.3,2813,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2813,1,1,0)
 ;;=1^90636
 ;;^UTILITY(U,$J,358.3,2813,1,3,0)
 ;;=3^Hepatitis A & B Vaccine
 ;;^UTILITY(U,$J,358.3,2814,0)
 ;;=90746^^27^218^7^^^^1
 ;;^UTILITY(U,$J,358.3,2814,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2814,1,1,0)
 ;;=1^90746
 ;;^UTILITY(U,$J,358.3,2814,1,3,0)
 ;;=3^Hepatitis B Vaccine
 ;;^UTILITY(U,$J,358.3,2815,0)
 ;;=90732^^27^218^8^^^^1
 ;;^UTILITY(U,$J,358.3,2815,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2815,1,1,0)
 ;;=1^90732
 ;;^UTILITY(U,$J,358.3,2815,1,3,0)
 ;;=3^Pneumococcal Vaccine
 ;;^UTILITY(U,$J,358.3,2816,0)
 ;;=90723^^27^218^1^^^^1
 ;;^UTILITY(U,$J,358.3,2816,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2816,1,1,0)
 ;;=1^90723
 ;;^UTILITY(U,$J,358.3,2816,1,3,0)
 ;;=3^DTaP-HepB-IPV Vaccine
 ;;^UTILITY(U,$J,358.3,2817,0)
 ;;=90688^^27^218^3^^^^1
 ;;^UTILITY(U,$J,358.3,2817,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2817,1,1,0)
 ;;=1^90688
 ;;^UTILITY(U,$J,358.3,2817,1,3,0)
 ;;=3^Fluzone;Quadrivalent;Multi-Dose Vial
 ;;^UTILITY(U,$J,358.3,2818,0)
 ;;=90686^^27^218^2^^^^1
 ;;^UTILITY(U,$J,358.3,2818,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2818,1,1,0)
 ;;=1^90686
 ;;^UTILITY(U,$J,358.3,2818,1,3,0)
 ;;=3^Fluarix;Quadrivalent;Pre-Filled
 ;;^UTILITY(U,$J,358.3,2819,0)
 ;;=90662^^27^218^4^^^^1
 ;;^UTILITY(U,$J,358.3,2819,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2819,1,1,0)
 ;;=1^90662
 ;;^UTILITY(U,$J,358.3,2819,1,3,0)
 ;;=3^Fluzone;Quadrivalent;Pre-Filled
 ;;^UTILITY(U,$J,358.3,2820,0)
 ;;=99358^^27^219^3^^^^1
 ;;^UTILITY(U,$J,358.3,2820,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2820,1,1,0)
 ;;=1^99358
 ;;^UTILITY(U,$J,358.3,2820,1,3,0)
 ;;=3^Prolong Srv w/o Pt Contact,1st Hr
 ;;^UTILITY(U,$J,358.3,2821,0)
 ;;=99359^^27^219^4^^^^1
 ;;^UTILITY(U,$J,358.3,2821,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2821,1,1,0)
 ;;=1^99359
 ;;^UTILITY(U,$J,358.3,2821,1,3,0)
 ;;=3^Prolong Srv w/o Pt Contact,Ea Addl 30 Min
 ;;^UTILITY(U,$J,358.3,2822,0)
 ;;=99354^^27^219^1^^^^1
 ;;^UTILITY(U,$J,358.3,2822,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2822,1,1,0)
 ;;=1^99354
 ;;^UTILITY(U,$J,358.3,2822,1,3,0)
 ;;=3^Outpt E&M Prolonged Svc,1st Hr
 ;;^UTILITY(U,$J,358.3,2823,0)
 ;;=99355^^27^219^2^^^^1
 ;;^UTILITY(U,$J,358.3,2823,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2823,1,1,0)
 ;;=1^99355
 ;;^UTILITY(U,$J,358.3,2823,1,3,0)
 ;;=3^Outpt E&M Prolonged Svc,Ea Addl 30 Min
 ;;^UTILITY(U,$J,358.3,2824,0)
 ;;=98960^^27^220^1^^^^1
 ;;^UTILITY(U,$J,358.3,2824,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2824,1,1,0)
 ;;=1^98960
 ;;^UTILITY(U,$J,358.3,2824,1,3,0)
 ;;=3^Self-Mgmt Educ/Train,1 Pt
 ;;^UTILITY(U,$J,358.3,2825,0)
 ;;=98961^^27^220^2^^^^1
 ;;^UTILITY(U,$J,358.3,2825,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2825,1,1,0)
 ;;=1^98961
 ;;^UTILITY(U,$J,358.3,2825,1,3,0)
 ;;=3^Self-Mgmt Educ/Train,2-4 Pts
 ;;^UTILITY(U,$J,358.3,2826,0)
 ;;=98962^^27^220^3^^^^1
 ;;^UTILITY(U,$J,358.3,2826,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2826,1,1,0)
 ;;=1^98962
 ;;^UTILITY(U,$J,358.3,2826,1,3,0)
 ;;=3^Self-Mgmt Educ/Train,5-8 Pts
 ;;^UTILITY(U,$J,358.3,2827,0)
 ;;=99202^^28^221^1
 ;;^UTILITY(U,$J,358.3,2827,1,0)
 ;;=^358.31IA^2^2
 ;;^UTILITY(U,$J,358.3,2827,1,1,0)
 ;;=1^SF MDM or 15-29 mins
 ;;^UTILITY(U,$J,358.3,2827,1,2,0)
 ;;=2^99202
 ;;^UTILITY(U,$J,358.3,2828,0)
 ;;=99203^^28^221^2
 ;;^UTILITY(U,$J,358.3,2828,1,0)
 ;;=^358.31IA^2^2
 ;;^UTILITY(U,$J,358.3,2828,1,1,0)
 ;;=1^Low Complex MDM or 30-44 mins
 ;;^UTILITY(U,$J,358.3,2828,1,2,0)
 ;;=2^99203
 ;;^UTILITY(U,$J,358.3,2829,0)
 ;;=99204^^28^221^3
 ;;^UTILITY(U,$J,358.3,2829,1,0)
 ;;=^358.31IA^2^2
 ;;^UTILITY(U,$J,358.3,2829,1,1,0)
 ;;=1^Mod Complex MDM or 45-59 mins
 ;;^UTILITY(U,$J,358.3,2829,1,2,0)
 ;;=2^99204
 ;;^UTILITY(U,$J,358.3,2830,0)
 ;;=99205^^28^221^4
 ;;^UTILITY(U,$J,358.3,2830,1,0)
 ;;=^358.31IA^2^2
 ;;^UTILITY(U,$J,358.3,2830,1,1,0)
 ;;=1^High Complex MDM or 60-74 mins
 ;;^UTILITY(U,$J,358.3,2830,1,2,0)
 ;;=2^99205
 ;;^UTILITY(U,$J,358.3,2831,0)
 ;;=99211^^28^222^1
 ;;^UTILITY(U,$J,358.3,2831,1,0)
 ;;=^358.31IA^2^2
 ;;^UTILITY(U,$J,358.3,2831,1,1,0)
 ;;=1^Brief (no MD seen)
 ;;^UTILITY(U,$J,358.3,2831,1,2,0)
 ;;=2^99211
 ;;^UTILITY(U,$J,358.3,2832,0)
 ;;=99212^^28^222^2
 ;;^UTILITY(U,$J,358.3,2832,1,0)
 ;;=^358.31IA^2^2
 ;;^UTILITY(U,$J,358.3,2832,1,1,0)
 ;;=1^SF MDM or 10-19 mins
 ;;^UTILITY(U,$J,358.3,2832,1,2,0)
 ;;=2^99212
 ;;^UTILITY(U,$J,358.3,2833,0)
 ;;=99213^^28^222^3
 ;;^UTILITY(U,$J,358.3,2833,1,0)
 ;;=^358.31IA^2^2
 ;;^UTILITY(U,$J,358.3,2833,1,1,0)
 ;;=1^Low Complex MDM or 20-29 mins
 ;;^UTILITY(U,$J,358.3,2833,1,2,0)
 ;;=2^99213
 ;;^UTILITY(U,$J,358.3,2834,0)
 ;;=99214^^28^222^4
 ;;^UTILITY(U,$J,358.3,2834,1,0)
 ;;=^358.31IA^2^2
 ;;^UTILITY(U,$J,358.3,2834,1,1,0)
 ;;=1^Mod Complex MDM or 30-39 mins
 ;;^UTILITY(U,$J,358.3,2834,1,2,0)
 ;;=2^99214
 ;;^UTILITY(U,$J,358.3,2835,0)
 ;;=99215^^28^222^5
 ;;^UTILITY(U,$J,358.3,2835,1,0)
 ;;=^358.31IA^2^2
 ;;^UTILITY(U,$J,358.3,2835,1,1,0)
 ;;=1^High Complex MDM or 40-54 mins
 ;;^UTILITY(U,$J,358.3,2835,1,2,0)
 ;;=2^99215
 ;;^UTILITY(U,$J,358.3,2836,0)
 ;;=99241^^28^223^1
 ;;^UTILITY(U,$J,358.3,2836,1,0)
 ;;=^358.31IA^2^2
 ;;^UTILITY(U,$J,358.3,2836,1,1,0)
 ;;=1^Problem Focused
 ;;^UTILITY(U,$J,358.3,2836,1,2,0)
 ;;=2^99241
 ;;^UTILITY(U,$J,358.3,2837,0)
 ;;=99242^^28^223^2
 ;;^UTILITY(U,$J,358.3,2837,1,0)
 ;;=^358.31IA^2^2
 ;;^UTILITY(U,$J,358.3,2837,1,1,0)
 ;;=1^Expanded Problem Focus
 ;;^UTILITY(U,$J,358.3,2837,1,2,0)
 ;;=2^99242
 ;;^UTILITY(U,$J,358.3,2838,0)
 ;;=99243^^28^223^3
 ;;^UTILITY(U,$J,358.3,2838,1,0)
 ;;=^358.31IA^2^2
 ;;^UTILITY(U,$J,358.3,2838,1,1,0)
 ;;=1^Detailed
 ;;^UTILITY(U,$J,358.3,2838,1,2,0)
 ;;=2^99243
 ;;^UTILITY(U,$J,358.3,2839,0)
 ;;=99244^^28^223^4
 ;;^UTILITY(U,$J,358.3,2839,1,0)
 ;;=^358.31IA^2^2
 ;;^UTILITY(U,$J,358.3,2839,1,1,0)
 ;;=1^Comprehensive, Moderate
 ;;^UTILITY(U,$J,358.3,2839,1,2,0)
 ;;=2^99244
 ;;^UTILITY(U,$J,358.3,2840,0)
 ;;=99245^^28^223^5
 ;;^UTILITY(U,$J,358.3,2840,1,0)
 ;;=^358.31IA^2^2
 ;;^UTILITY(U,$J,358.3,2840,1,1,0)
 ;;=1^Comprehensive, High
 ;;^UTILITY(U,$J,358.3,2840,1,2,0)
 ;;=2^99245
 ;;^UTILITY(U,$J,358.3,2841,0)
 ;;=99487^^28^224^1
 ;;^UTILITY(U,$J,358.3,2841,1,0)
 ;;=^358.31IA^2^2
 ;;^UTILITY(U,$J,358.3,2841,1,1,0)
 ;;=1^Complex Chr Care w/o Pt Visit
 ;;^UTILITY(U,$J,358.3,2841,1,2,0)
 ;;=2^99487
 ;;^UTILITY(U,$J,358.3,2842,0)
 ;;=99489^^28^224^2
 ;;^UTILITY(U,$J,358.3,2842,1,0)
 ;;=^358.31IA^2^2
 ;;^UTILITY(U,$J,358.3,2842,1,1,0)
 ;;=1^Comp Chr Care,Ea Addl 30 min
 ;;^UTILITY(U,$J,358.3,2842,1,2,0)
 ;;=2^99489
 ;;^UTILITY(U,$J,358.3,2843,0)
 ;;=D50.9^^29^225^34
 ;;^UTILITY(U,$J,358.3,2843,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,2843,1,3,0)
 ;;=3^Iron deficiency anemia, unspecified
 ;;^UTILITY(U,$J,358.3,2843,1,4,0)
 ;;=4^D50.9
 ;;^UTILITY(U,$J,358.3,2843,2)
 ;;=^5002283
 ;;^UTILITY(U,$J,358.3,2844,0)
 ;;=D51.0^^29^225^44
 ;;^UTILITY(U,$J,358.3,2844,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,2844,1,3,0)
 ;;=3^Vitamin B12 defic anemia due to intrinsic factor deficiency
 ;;^UTILITY(U,$J,358.3,2844,1,4,0)
 ;;=4^D51.0
 ;;^UTILITY(U,$J,358.3,2844,2)
 ;;=^5002284
 ;;^UTILITY(U,$J,358.3,2845,0)
 ;;=D53.8^^29^225^38
 ;;^UTILITY(U,$J,358.3,2845,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,2845,1,3,0)
 ;;=3^Nutritional Anemias NEC
 ;;^UTILITY(U,$J,358.3,2845,1,4,0)
 ;;=4^D53.8
 ;;^UTILITY(U,$J,358.3,2845,2)
 ;;=^5002297
 ;;^UTILITY(U,$J,358.3,2846,0)
 ;;=D52.0^^29^225^20
 ;;^UTILITY(U,$J,358.3,2846,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,2846,1,3,0)
 ;;=3^Dietary folate deficiency anemia
 ;;^UTILITY(U,$J,358.3,2846,1,4,0)
 ;;=4^D52.0
 ;;^UTILITY(U,$J,358.3,2846,2)
 ;;=^5002290
 ;;^UTILITY(U,$J,358.3,2847,0)
 ;;=D52.1^^29^225^22
 ;;^UTILITY(U,$J,358.3,2847,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,2847,1,3,0)
 ;;=3^Drug-induced folate deficiency anemia
 ;;^UTILITY(U,$J,358.3,2847,1,4,0)
 ;;=4^D52.1
 ;;^UTILITY(U,$J,358.3,2847,2)
 ;;=^5002291
 ;;^UTILITY(U,$J,358.3,2848,0)
 ;;=D52.8^^29^225^26
 ;;^UTILITY(U,$J,358.3,2848,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,2848,1,3,0)
 ;;=3^Folate deficiency anemias NEC
 ;;^UTILITY(U,$J,358.3,2848,1,4,0)
 ;;=4^D52.8
 ;;^UTILITY(U,$J,358.3,2848,2)
 ;;=^5002292
 ;;^UTILITY(U,$J,358.3,2849,0)
 ;;=D52.9^^29^225^25
 ;;^UTILITY(U,$J,358.3,2849,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,2849,1,3,0)
 ;;=3^Folate deficiency anemia, unspecified
 ;;^UTILITY(U,$J,358.3,2849,1,4,0)
 ;;=4^D52.9
 ;;^UTILITY(U,$J,358.3,2849,2)
 ;;=^5002293
 ;;^UTILITY(U,$J,358.3,2850,0)
 ;;=D53.1^^29^225^35
 ;;^UTILITY(U,$J,358.3,2850,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,2850,1,3,0)
 ;;=3^Megaloblastic Anemias NEC
 ;;^UTILITY(U,$J,358.3,2850,1,4,0)
 ;;=4^D53.1
 ;;^UTILITY(U,$J,358.3,2850,2)
 ;;=^5002295
 ;;^UTILITY(U,$J,358.3,2851,0)
 ;;=D53.0^^29^225^42
 ;;^UTILITY(U,$J,358.3,2851,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,2851,1,3,0)
 ;;=3^Protein deficiency anemia
 ;;^UTILITY(U,$J,358.3,2851,1,4,0)
 ;;=4^D53.0
 ;;^UTILITY(U,$J,358.3,2851,2)
 ;;=^5002294
 ;;^UTILITY(U,$J,358.3,2852,0)
 ;;=D53.9^^29^225^39
 ;;^UTILITY(U,$J,358.3,2852,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,2852,1,3,0)
 ;;=3^Nutritional anemia, unspecified
 ;;^UTILITY(U,$J,358.3,2852,1,4,0)
 ;;=4^D53.9
 ;;^UTILITY(U,$J,358.3,2852,2)
 ;;=^5002298
 ;;^UTILITY(U,$J,358.3,2853,0)
 ;;=D57.40^^29^225^43
 ;;^UTILITY(U,$J,358.3,2853,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,2853,1,3,0)
 ;;=3^Sickle-cell thalassemia without crisis
 ;;^UTILITY(U,$J,358.3,2853,1,4,0)
 ;;=4^D57.40
 ;;^UTILITY(U,$J,358.3,2853,2)
 ;;=^329908
 ;;^UTILITY(U,$J,358.3,2854,0)
 ;;=D58.0^^29^225^33
 ;;^UTILITY(U,$J,358.3,2854,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,2854,1,3,0)
 ;;=3^Hereditary spherocytosis
 ;;^UTILITY(U,$J,358.3,2854,1,4,0)
 ;;=4^D58.0
 ;;^UTILITY(U,$J,358.3,2854,2)
 ;;=^5002321
 ;;^UTILITY(U,$J,358.3,2855,0)
 ;;=D58.1^^29^225^30
 ;;^UTILITY(U,$J,358.3,2855,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,2855,1,3,0)
 ;;=3^Hereditary elliptocytosis
 ;;^UTILITY(U,$J,358.3,2855,1,4,0)
 ;;=4^D58.1
 ;;^UTILITY(U,$J,358.3,2855,2)
 ;;=^39378
 ;;^UTILITY(U,$J,358.3,2856,0)
 ;;=D55.0^^29^225^5
 ;;^UTILITY(U,$J,358.3,2856,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,2856,1,3,0)
 ;;=3^Anemia due to glucose-6-phosphate dehydrogenase deficiency
 ;;^UTILITY(U,$J,358.3,2856,1,4,0)
 ;;=4^D55.0
 ;;^UTILITY(U,$J,358.3,2856,2)
 ;;=^5002299
 ;;^UTILITY(U,$J,358.3,2857,0)
 ;;=D55.1^^29^225^6
 ;;^UTILITY(U,$J,358.3,2857,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,2857,1,3,0)
 ;;=3^Anemia due to other disorders of glutathione metabolism
 ;;^UTILITY(U,$J,358.3,2857,1,4,0)
 ;;=4^D55.1
 ;;^UTILITY(U,$J,358.3,2857,2)
 ;;=^5002300
 ;;^UTILITY(U,$J,358.3,2858,0)
 ;;=D55.8^^29^225^12
 ;;^UTILITY(U,$J,358.3,2858,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,2858,1,3,0)
 ;;=3^Anemias due to enzyme disorders
 ;;^UTILITY(U,$J,358.3,2858,1,4,0)
 ;;=4^D55.8