IBDEI08Q ; ; 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,21329,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21329,1,2,0)
;;=2^90697
;;^UTILITY(U,$J,358.3,21329,1,3,0)
;;=3^DTAP-IPV-HIB-HEPB VACCINE IM
;;^UTILITY(U,$J,358.3,21330,0)
;;=90625^^69^889^2^^^^1
;;^UTILITY(U,$J,358.3,21330,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21330,1,2,0)
;;=2^90625
;;^UTILITY(U,$J,358.3,21330,1,3,0)
;;=3^CHOLERA VACCINE,ORAL
;;^UTILITY(U,$J,358.3,21331,0)
;;=90620^^69^889^25^^^^1
;;^UTILITY(U,$J,358.3,21331,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21331,1,2,0)
;;=2^90620
;;^UTILITY(U,$J,358.3,21331,1,3,0)
;;=3^MENINGOCOCCAL VACCINE,PROTEIN/OUT MEM IM
;;^UTILITY(U,$J,358.3,21332,0)
;;=90621^^69^889^24^^^^1
;;^UTILITY(U,$J,358.3,21332,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21332,1,2,0)
;;=2^90621
;;^UTILITY(U,$J,358.3,21332,1,3,0)
;;=3^MENINGOCOCCAL VACCINE,LIPOPROTEIN IM
;;^UTILITY(U,$J,358.3,21333,0)
;;=90686^^69^889^7^^^^1
;;^UTILITY(U,$J,358.3,21333,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21333,1,2,0)
;;=2^90686
;;^UTILITY(U,$J,358.3,21333,1,3,0)
;;=3^FLU VACC SGLE DOSE SYR (AFLURIA IIV4)
;;^UTILITY(U,$J,358.3,21334,0)
;;=90674^^69^889^11^^^^1
;;^UTILITY(U,$J,358.3,21334,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21334,1,2,0)
;;=2^90674
;;^UTILITY(U,$J,358.3,21334,1,3,0)
;;=3^FLU VACCINE LOW DOSE SYR (FLUCELVAX CCIIV4)
;;^UTILITY(U,$J,358.3,21335,0)
;;=90672^^69^889^10^^^^1
;;^UTILITY(U,$J,358.3,21335,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21335,1,2,0)
;;=2^90672
;;^UTILITY(U,$J,358.3,21335,1,3,0)
;;=3^FLU VACCINE INTRANASAL,QUADRIVALENT,LIVE
;;^UTILITY(U,$J,358.3,21336,0)
;;=90688^^69^889^12^^^^1
;;^UTILITY(U,$J,358.3,21336,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21336,1,2,0)
;;=2^90688
;;^UTILITY(U,$J,358.3,21336,1,3,0)
;;=3^FLU VACCINE MULTI DOSE SYR (FLULAVAL)
;;^UTILITY(U,$J,358.3,21337,0)
;;=90682^^69^889^14^^^^1
;;^UTILITY(U,$J,358.3,21337,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21337,1,2,0)
;;=2^90682
;;^UTILITY(U,$J,358.3,21337,1,3,0)
;;=3^FLUBLOK (RIV4)
;;^UTILITY(U,$J,358.3,21338,0)
;;=90653^^69^889^13^^^^1
;;^UTILITY(U,$J,358.3,21338,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21338,1,2,0)
;;=2^90653
;;^UTILITY(U,$J,358.3,21338,1,3,0)
;;=3^FLU VACCINE SINGLE DOSE SYR (FLUAD)
;;^UTILITY(U,$J,358.3,21339,0)
;;=90671^^69^889^28^^^^1
;;^UTILITY(U,$J,358.3,21339,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21339,1,2,0)
;;=2^90671
;;^UTILITY(U,$J,358.3,21339,1,3,0)
;;=3^PNEUMOCOCCAL VACCINE 15 VAL (PCV15)
;;^UTILITY(U,$J,358.3,21340,0)
;;=90677^^69^889^29^^^^1
;;^UTILITY(U,$J,358.3,21340,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21340,1,2,0)
;;=2^90677
;;^UTILITY(U,$J,358.3,21340,1,3,0)
;;=3^PNEUMOCOCCAL VACCINE 20 VAL (PCV20)
;;^UTILITY(U,$J,358.3,21341,0)
;;=99452^^69^890^1^^^^1
;;^UTILITY(U,$J,358.3,21341,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21341,1,2,0)
;;=2^99452
;;^UTILITY(U,$J,358.3,21341,1,3,0)
;;=3^E-CONSULT RESULTS/DISCUSSION WITH PATIENT
;;^UTILITY(U,$J,358.3,21342,0)
;;=Q0243^^69^891^3^^^^1
;;^UTILITY(U,$J,358.3,21342,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21342,1,2,0)
;;=2^Q0243
;;^UTILITY(U,$J,358.3,21342,1,3,0)
;;=3^CASIRIVIMAB & IMDEVIMAB 2400MG
;;^UTILITY(U,$J,358.3,21343,0)
;;=M0243^^69^891^4^^^^1
;;^UTILITY(U,$J,358.3,21343,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21343,1,2,0)
;;=2^M0243
;;^UTILITY(U,$J,358.3,21343,1,3,0)
;;=3^CASIRIVIMAB & IMDEVIMAB INFUSION
;;^UTILITY(U,$J,358.3,21344,0)
;;=M0245^^69^891^1^^^^1
;;^UTILITY(U,$J,358.3,21344,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21344,1,2,0)
;;=2^M0245
;;^UTILITY(U,$J,358.3,21344,1,3,0)
;;=3^BAMLANIVIMAB INFUSION W/ POST ADMIN MONITORING
;;^UTILITY(U,$J,358.3,21345,0)
;;=Q0245^^69^891^2^^^^1
;;^UTILITY(U,$J,358.3,21345,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21345,1,2,0)
;;=2^Q0245
;;^UTILITY(U,$J,358.3,21345,1,3,0)
;;=3^BAMLANIVIVAB 700MG
;;^UTILITY(U,$J,358.3,21346,0)
;;=99424^^69^892^1^^^^1
;;^UTILITY(U,$J,358.3,21346,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21346,1,2,0)
;;=2^99424
;;^UTILITY(U,$J,358.3,21346,1,3,0)
;;=3^PRIN CARE MGMT,PHYS,1ST 30 MIN,PER CLNDR MNTH
;;^UTILITY(U,$J,358.3,21347,0)
;;=99425^^69^892^2^^^^1
;;^UTILITY(U,$J,358.3,21347,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21347,1,2,0)
;;=2^99425
;;^UTILITY(U,$J,358.3,21347,1,3,0)
;;=3^PRIN CARE MGMT,PHYS,EA ADDL 30 MIN,PER CLNDR MNTH
;;^UTILITY(U,$J,358.3,21348,0)
;;=99426^^69^892^3^^^^1
;;^UTILITY(U,$J,358.3,21348,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21348,1,2,0)
;;=2^99426
;;^UTILITY(U,$J,358.3,21348,1,3,0)
;;=3^PRIN CARE MGMT,STAFF,1ST 30 MIN,PER CLNDR MNTH
;;^UTILITY(U,$J,358.3,21349,0)
;;=99427^^69^892^4^^^^1
;;^UTILITY(U,$J,358.3,21349,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,21349,1,2,0)
;;=2^99427
;;^UTILITY(U,$J,358.3,21349,1,3,0)
;;=3^PRIN CARE MGMT,STAFF,EA ADDL 30 MIN,PER CLNDR MNTH
;;^UTILITY(U,$J,358.3,21350,0)
;;=99202^^70^893^1
;;^UTILITY(U,$J,358.3,21350,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,21350,1,1,0)
;;=1^SF MDM or 15-29 mins
;;^UTILITY(U,$J,358.3,21350,1,2,0)
;;=2^99202
;;^UTILITY(U,$J,358.3,21351,0)
;;=99203^^70^893^2
;;^UTILITY(U,$J,358.3,21351,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,21351,1,1,0)
;;=1^Low Complex MDM or 30-44 mins
;;^UTILITY(U,$J,358.3,21351,1,2,0)
;;=2^99203
;;^UTILITY(U,$J,358.3,21352,0)
;;=99204^^70^893^3
;;^UTILITY(U,$J,358.3,21352,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,21352,1,1,0)
;;=1^Mod Complex MDM or 45-59 mins
;;^UTILITY(U,$J,358.3,21352,1,2,0)
;;=2^99204
;;^UTILITY(U,$J,358.3,21353,0)
;;=99205^^70^893^4
;;^UTILITY(U,$J,358.3,21353,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,21353,1,1,0)
;;=1^High Complex MDM or 60-74 mins
;;^UTILITY(U,$J,358.3,21353,1,2,0)
;;=2^99205
;;^UTILITY(U,$J,358.3,21354,0)
;;=99211^^70^894^1
;;^UTILITY(U,$J,358.3,21354,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,21354,1,1,0)
;;=1^Brief (no MD seen)
;;^UTILITY(U,$J,358.3,21354,1,2,0)
;;=2^99211
;;^UTILITY(U,$J,358.3,21355,0)
;;=99212^^70^894^2
;;^UTILITY(U,$J,358.3,21355,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,21355,1,1,0)
;;=1^SF MDM or 10-19 mins
;;^UTILITY(U,$J,358.3,21355,1,2,0)
;;=2^99212
;;^UTILITY(U,$J,358.3,21356,0)
;;=99213^^70^894^3
;;^UTILITY(U,$J,358.3,21356,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,21356,1,1,0)
;;=1^Low Complex MDM or 20-29 mins
;;^UTILITY(U,$J,358.3,21356,1,2,0)
;;=2^99213
;;^UTILITY(U,$J,358.3,21356,3,0)
;;=^357.33
;;^UTILITY(U,$J,358.3,21357,0)
;;=99214^^70^894^4
;;^UTILITY(U,$J,358.3,21357,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,21357,1,1,0)
;;=1^Mod Complex MDM or 30-39 mins
;;^UTILITY(U,$J,358.3,21357,1,2,0)
;;=2^99214
;;^UTILITY(U,$J,358.3,21358,0)
;;=99215^^70^894^5
;;^UTILITY(U,$J,358.3,21358,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,21358,1,1,0)
;;=1^High Complex MDM or 40-54 mins
;;^UTILITY(U,$J,358.3,21358,1,2,0)
;;=2^99215
;;^UTILITY(U,$J,358.3,21359,0)
;;=99241^^70^895^1
;;^UTILITY(U,$J,358.3,21359,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,21359,1,1,0)
;;=1^Problem Focused
;;^UTILITY(U,$J,358.3,21359,1,2,0)
;;=2^99241
;;^UTILITY(U,$J,358.3,21360,0)
;;=99242^^70^895^2
;;^UTILITY(U,$J,358.3,21360,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,21360,1,1,0)
;;=1^Exp Problem Focused
;;^UTILITY(U,$J,358.3,21360,1,2,0)
;;=2^99242
;;^UTILITY(U,$J,358.3,21361,0)
;;=99243^^70^895^3
;;^UTILITY(U,$J,358.3,21361,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,21361,1,1,0)
;;=1^Detailed
;;^UTILITY(U,$J,358.3,21361,1,2,0)
;;=2^99243
;;^UTILITY(U,$J,358.3,21362,0)
;;=99244^^70^895^4
;;^UTILITY(U,$J,358.3,21362,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,21362,1,1,0)
;;=1^Comprehensive,Moderate MDM
;;^UTILITY(U,$J,358.3,21362,1,2,0)
;;=2^99244
;;^UTILITY(U,$J,358.3,21363,0)
;;=99245^^70^895^5
;;^UTILITY(U,$J,358.3,21363,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,21363,1,1,0)
;;=1^Comprehensive,High MDM
;;^UTILITY(U,$J,358.3,21363,1,2,0)
;;=2^99245
;;^UTILITY(U,$J,358.3,21364,0)
;;=99395^^70^896^1
;;^UTILITY(U,$J,358.3,21364,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,21364,1,1,0)
;;=1^Preventive Med,Est Pt,18-39
;;^UTILITY(U,$J,358.3,21364,1,2,0)
;;=2^99395
;;^UTILITY(U,$J,358.3,21365,0)
;;=99396^^70^896^2
;;^UTILITY(U,$J,358.3,21365,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,21365,1,1,0)
;;=1^Preventive Med,Est Pt,40-64
;;^UTILITY(U,$J,358.3,21365,1,2,0)
;;=2^99396
;;^UTILITY(U,$J,358.3,21366,0)
;;=99397^^70^896^3
;;^UTILITY(U,$J,358.3,21366,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,21366,1,1,0)
;;=1^Preventive Med,Est Pt > 64
;;^UTILITY(U,$J,358.3,21366,1,2,0)
;;=2^99397
;;^UTILITY(U,$J,358.3,21367,0)
;;=99385^^70^897^1
;;^UTILITY(U,$J,358.3,21367,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,21367,1,1,0)
;;=1^Preventive Med,New Pt,18-39
;;^UTILITY(U,$J,358.3,21367,1,2,0)
;;=2^99385
;;^UTILITY(U,$J,358.3,21368,0)
;;=99386^^70^897^2
;;^UTILITY(U,$J,358.3,21368,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,21368,1,1,0)
;;=1^Preventive Med,New Pt,40-64
;;^UTILITY(U,$J,358.3,21368,1,2,0)
;;=2^99386
;;^UTILITY(U,$J,358.3,21369,0)
;;=99387^^70^897^3
;;^UTILITY(U,$J,358.3,21369,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,21369,1,1,0)
;;=1^Preventive Med,New Pt > 64
;;^UTILITY(U,$J,358.3,21369,1,2,0)
;;=2^99387
;;^UTILITY(U,$J,358.3,21370,0)
;;=99495^^70^898^1
;;^UTILITY(U,$J,358.3,21370,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,21370,1,1,0)
;;=1^TCM Svc w/in 14 days of D/C w/ Mod MDM
;;^UTILITY(U,$J,358.3,21370,1,2,0)
;;=2^99495
;;^UTILITY(U,$J,358.3,21371,0)
;;=99496^^70^898^2
;;^UTILITY(U,$J,358.3,21371,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,21371,1,1,0)
;;=1^TCM Svc w/in 7 days of D/C w/ High MDM
;;^UTILITY(U,$J,358.3,21371,1,2,0)
;;=2^99496
;;^UTILITY(U,$J,358.3,21371,3,0)
;;=^357.33
;;^UTILITY(U,$J,358.3,21372,0)
;;=B18.2^^71^899^40
;;^UTILITY(U,$J,358.3,21372,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,21372,1,3,0)
;;=3^Hepatitis C,Chr
;;^UTILITY(U,$J,358.3,21372,1,4,0)
;;=4^B18.2
;;^UTILITY(U,$J,358.3,21372,2)
;;=^5000548
;;^UTILITY(U,$J,358.3,21373,0)
;;=E11.9^^71^899^25
;;^UTILITY(U,$J,358.3,21373,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,21373,1,3,0)
;;=3^Diabetes Type 2
;;^UTILITY(U,$J,358.3,21373,1,4,0)
;;=4^E11.9
;;^UTILITY(U,$J,358.3,21373,2)
;;=^5002666
;;^UTILITY(U,$J,358.3,21374,0)
;;=E11.40^^71^899^23
;;^UTILITY(U,$J,358.3,21374,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,21374,1,3,0)
;;=3^DM Type 2 w/ Neuropathy
;;^UTILITY(U,$J,358.3,21374,1,4,0)
;;=4^E11.40
;;^UTILITY(U,$J,358.3,21374,2)
;;=^5002644
;;^UTILITY(U,$J,358.3,21375,0)
;;=E78.2^^71^899^41
;;^UTILITY(U,$J,358.3,21375,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,21375,1,3,0)
;;=3^Hyperlipidemia,Mixed
;;^UTILITY(U,$J,358.3,21375,1,4,0)
;;=4^E78.2
;;^UTILITY(U,$J,358.3,21375,2)
;;=^78424
;;^UTILITY(U,$J,358.3,21376,0)
;;=E78.5^^71^899^42
;;^UTILITY(U,$J,358.3,21376,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,21376,1,3,0)
;;=3^Hyperlipidemia,Unspec
;;^UTILITY(U,$J,358.3,21376,1,4,0)
;;=4^E78.5
;;^UTILITY(U,$J,358.3,21376,2)
;;=^5002969
;;^UTILITY(U,$J,358.3,21377,0)
;;=E66.3^^71^899^59
;;^UTILITY(U,$J,358.3,21377,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,21377,1,3,0)
;;=3^Overweight
;;^UTILITY(U,$J,358.3,21377,1,4,0)
;;=4^E66.3
;;^UTILITY(U,$J,358.3,21377,2)
;;=^5002830
;;^UTILITY(U,$J,358.3,21378,0)
;;=F17.200^^71^899^52
;;^UTILITY(U,$J,358.3,21378,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,21378,1,3,0)
;;=3^Nicotine Dependence,Unspec
;;^UTILITY(U,$J,358.3,21378,1,4,0)
;;=4^F17.200
;;^UTILITY(U,$J,358.3,21378,2)
;;=^5003360
;;^UTILITY(U,$J,358.3,21379,0)
;;=G43.909^^71^899^50
;;^UTILITY(U,$J,358.3,21379,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,21379,1,3,0)
;;=3^Migraine,Unspec
;;^UTILITY(U,$J,358.3,21379,1,4,0)
;;=4^G43.909
;;^UTILITY(U,$J,358.3,21379,2)
;;=^5003909
;;^UTILITY(U,$J,358.3,21380,0)
;;=H91.93^^71^899^36
;;^UTILITY(U,$J,358.3,21380,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,21380,1,3,0)
;;=3^Hearing Loss,Bilateral
;;^UTILITY(U,$J,358.3,21380,1,4,0)
;;=4^H91.93
;;^UTILITY(U,$J,358.3,21380,2)
;;=^5006944
;;^UTILITY(U,$J,358.3,21381,0)
;;=I10.^^71^899^43
;;^UTILITY(U,$J,358.3,21381,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,21381,1,3,0)
;;=3^Hypertension
;;^UTILITY(U,$J,358.3,21381,1,4,0)
;;=4^I10.
;;^UTILITY(U,$J,358.3,21381,2)
;;=^5007062
;;^UTILITY(U,$J,358.3,21382,0)
;;=I50.9^^71^899^19
;;^UTILITY(U,$J,358.3,21382,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,21382,1,3,0)
;;=3^Congestive Heart Failure,Unspec
;;^UTILITY(U,$J,358.3,21382,1,4,0)
;;=4^I50.9
;;^UTILITY(U,$J,358.3,21382,2)
;;=^5007251
;;^UTILITY(U,$J,358.3,21383,0)
;;=I67.89^^71^899^18
;;^UTILITY(U,$J,358.3,21383,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,21383,1,3,0)
;;=3^Cerebrovascular Disease,Oth
;;^UTILITY(U,$J,358.3,21383,1,4,0)
;;=4^I67.89
;;^UTILITY(U,$J,358.3,21383,2)
;;=^5007388
;;^UTILITY(U,$J,358.3,21384,0)
;;=J45.909^^71^899^4
;;^UTILITY(U,$J,358.3,21384,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,21384,1,3,0)
;;=3^Asthma,Unspec,Uncomplicated
;;^UTILITY(U,$J,358.3,21384,1,4,0)
;;=4^J45.909
;;^UTILITY(U,$J,358.3,21384,2)
;;=^5008256
;;^UTILITY(U,$J,358.3,21385,0)
;;=J44.9^^71^899^16
;;^UTILITY(U,$J,358.3,21385,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,21385,1,3,0)
;;=3^COPD,Unspec
;;^UTILITY(U,$J,358.3,21385,1,4,0)
;;=4^J44.9
;;^UTILITY(U,$J,358.3,21385,2)
;;=^5008241
;;^UTILITY(U,$J,358.3,21386,0)
;;=K21.9^^71^899^31
;;^UTILITY(U,$J,358.3,21386,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,21386,1,3,0)
;;=3^GERD w/o Esophagitis
;;^UTILITY(U,$J,358.3,21386,1,4,0)
;;=4^K21.9
;;^UTILITY(U,$J,358.3,21386,2)
;;=^5008505
;;^UTILITY(U,$J,358.3,21387,0)
;;=N40.1^^71^899^29
;;^UTILITY(U,$J,358.3,21387,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,21387,1,3,0)
;;=3^Enlarged Prostate w/ LUTS
;;^UTILITY(U,$J,358.3,21387,1,4,0)
;;=4^N40.1
;;^UTILITY(U,$J,358.3,21387,2)
;;=^5015690
;;^UTILITY(U,$J,358.3,21388,0)
;;=L03.818^^71^899^17
;;^UTILITY(U,$J,358.3,21388,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,21388,1,3,0)
;;=3^Cellulitis,Oth Sites
;;^UTILITY(U,$J,358.3,21388,1,4,0)
;;=4^L03.818
;;^UTILITY(U,$J,358.3,21388,2)
;;=^5009064
;;^UTILITY(U,$J,358.3,21389,0)
;;=G47.33^^71^899^77
;;^UTILITY(U,$J,358.3,21389,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,21389,1,3,0)
;;=3^Sleep Apnea,Obstructive
;;^UTILITY(U,$J,358.3,21389,1,4,0)
;;=4^G47.33
;;^UTILITY(U,$J,358.3,21389,2)
;;=^332763
;;^UTILITY(U,$J,358.3,21390,0)
;;=R73.01^^71^899^46
;;^UTILITY(U,$J,358.3,21390,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,21390,1,3,0)
;;=3^Impaired Fasting Glucose
;;^UTILITY(U,$J,358.3,21390,1,4,0)
;;=4^R73.01
;;^UTILITY(U,$J,358.3,21390,2)
;;=^5019561
;;^UTILITY(U,$J,358.3,21391,0)
;;=R74.8^^71^899^1
;;^UTILITY(U,$J,358.3,21391,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,21391,1,3,0)
;;=3^Abnormal Levels of Serum Enzymes
;;^UTILITY(U,$J,358.3,21391,1,4,0)
;;=4^R74.8
;;^UTILITY(U,$J,358.3,21391,2)
;;=^5019566
;;^UTILITY(U,$J,358.3,21392,0)
;;=R03.0^^71^899^27
;;^UTILITY(U,$J,358.3,21392,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,21392,1,3,0)
;;=3^Elevated BP Reading w/o Diagnosis of HTN
;;^UTILITY(U,$J,358.3,21392,1,4,0)
;;=4^R03.0
;;^UTILITY(U,$J,358.3,21392,2)
;;=^5019171
;;^UTILITY(U,$J,358.3,21393,0)
;;=Z91.19^^71^899^53
;;^UTILITY(U,$J,358.3,21393,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,21393,1,3,0)
;;=3^Noncompliance w/ Medical Treatment/Regimen
;;^UTILITY(U,$J,358.3,21393,1,4,0)
;;=4^Z91.19
;;^UTILITY(U,$J,358.3,21393,2)
;;=^5063618
;;^UTILITY(U,$J,358.3,21394,0)
;;=E66.01^^71^899^54
;;^UTILITY(U,$J,358.3,21394,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,21394,1,3,0)
;;=3^Obesity,Morbid
;;^UTILITY(U,$J,358.3,21394,1,4,0)
;;=4^E66.01
;;^UTILITY(U,$J,358.3,21394,2)
;;=^5002826
;;^UTILITY(U,$J,358.3,21395,0)
;;=F43.11^^71^899^61
;;^UTILITY(U,$J,358.3,21395,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,21395,1,3,0)
;;=3^PTSD,Acute
;;^UTILITY(U,$J,358.3,21395,1,4,0)
;;=4^F43.11
;;^UTILITY(U,$J,358.3,21395,2)
;;=^5003571
;;^UTILITY(U,$J,358.3,21396,0)
;;=F43.12^^71^899^62
;;^UTILITY(U,$J,358.3,21396,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,21396,1,3,0)
;;=3^PTSD,Chronic
;;^UTILITY(U,$J,358.3,21396,1,4,0)
;;=4^F43.12
;;^UTILITY(U,$J,358.3,21396,2)
;;=^5003572
;;^UTILITY(U,$J,358.3,21397,0)
;;=I25.119^^71^899^5
;;^UTILITY(U,$J,358.3,21397,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,21397,1,3,0)
;;=3^Athscl Hrt Dis of Native Cor Art w/ Ang Pctrs,Unspec
;;^UTILITY(U,$J,358.3,21397,1,4,0)
;;=4^I25.119
;;^UTILITY(U,$J,358.3,21397,2)
;;=^5007111
;;^UTILITY(U,$J,358.3,21398,0)
;;=I25.10^^71^899^6
;;^UTILITY(U,$J,358.3,21398,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,21398,1,3,0)
;;=3^Athscl Hrt Dis of Native Cor Art w/o Ang Pctrs
;;^UTILITY(U,$J,358.3,21398,1,4,0)
;;=4^I25.10
;;^UTILITY(U,$J,358.3,21398,2)
;;=^5007107
;;^UTILITY(U,$J,358.3,21399,0)
;;=F17.219^^71^899^51
;;^UTILITY(U,$J,358.3,21399,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,21399,1,3,0)
;;=3^Nicotine Dependence,Cigarettes
;;^UTILITY(U,$J,358.3,21399,1,4,0)
;;=4^F17.219
;;^UTILITY(U,$J,358.3,21399,2)
;;=^5003369
;;^UTILITY(U,$J,358.3,21400,0)
;;=Z51.5^^71^899^64
;;^UTILITY(U,$J,358.3,21400,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,21400,1,3,0)
;;=3^Palliative Care Encounter
;;^UTILITY(U,$J,358.3,21400,1,4,0)
;;=4^Z51.5
;;^UTILITY(U,$J,358.3,21400,2)
;;=^5063063
;;^UTILITY(U,$J,358.3,21401,0)
;;=Z23.^^71^899^28
;;^UTILITY(U,$J,358.3,21401,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,21401,1,3,0)
;;=3^Encounter for Immunization(s)
;;^UTILITY(U,$J,358.3,21401,1,4,0)
;;=4^Z23.
;;^UTILITY(U,$J,358.3,21401,2)
;;=^5062795
;;^UTILITY(U,$J,358.3,21402,0)
;;=E11.65^^71^899^20
;;^UTILITY(U,$J,358.3,21402,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,21402,1,3,0)
;;=3^DM Type 2 Uncontrolled w/ Hyperglycemia
;;^UTILITY(U,$J,358.3,21402,1,4,0)
;;=4^E11.65
;;^UTILITY(U,$J,358.3,21402,2)
;;=^5002663
;;^UTILITY(U,$J,358.3,21403,0)
;;=E11.649^^71^899^21
;;^UTILITY(U,$J,358.3,21403,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,21403,1,3,0)
;;=3^DM Type 2 Uncontrolled w/ Hypoglycemia w/o Coma
;;^UTILITY(U,$J,358.3,21403,1,4,0)
;;=4^E11.649
;;^UTILITY(U,$J,358.3,21403,2)
;;=^5002662
;;^UTILITY(U,$J,358.3,21404,0)
;;=I16.0^^71^899^44
;;^UTILITY(U,$J,358.3,21404,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,21404,1,3,0)
;;=3^Hypertensive Urgency
;;^UTILITY(U,$J,358.3,21404,1,4,0)
;;=4^I16.0
;;^UTILITY(U,$J,358.3,21404,2)
;;=^8133013
;;^UTILITY(U,$J,358.3,21405,0)
;;=H54.8^^71^899^47
;;^UTILITY(U,$J,358.3,21405,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,21405,1,3,0)
;;=3^Legal Blindness,USA Definition
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HIBDEI08Q 19805 printed Sep 23, 2025@19:19:50 Page 2
IBDEI08Q ; ; 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,21329,1,0)
+2 ;;=^358.31IA^3^2
+3 ;;^UTILITY(U,$J,358.3,21329,1,2,0)
+4 ;;=2^90697
+5 ;;^UTILITY(U,$J,358.3,21329,1,3,0)
+6 ;;=3^DTAP-IPV-HIB-HEPB VACCINE IM
+7 ;;^UTILITY(U,$J,358.3,21330,0)
+8 ;;=90625^^69^889^2^^^^1
+9 ;;^UTILITY(U,$J,358.3,21330,1,0)
+10 ;;=^358.31IA^3^2
+11 ;;^UTILITY(U,$J,358.3,21330,1,2,0)
+12 ;;=2^90625
+13 ;;^UTILITY(U,$J,358.3,21330,1,3,0)
+14 ;;=3^CHOLERA VACCINE,ORAL
+15 ;;^UTILITY(U,$J,358.3,21331,0)
+16 ;;=90620^^69^889^25^^^^1
+17 ;;^UTILITY(U,$J,358.3,21331,1,0)
+18 ;;=^358.31IA^3^2
+19 ;;^UTILITY(U,$J,358.3,21331,1,2,0)
+20 ;;=2^90620
+21 ;;^UTILITY(U,$J,358.3,21331,1,3,0)
+22 ;;=3^MENINGOCOCCAL VACCINE,PROTEIN/OUT MEM IM
+23 ;;^UTILITY(U,$J,358.3,21332,0)
+24 ;;=90621^^69^889^24^^^^1
+25 ;;^UTILITY(U,$J,358.3,21332,1,0)
+26 ;;=^358.31IA^3^2
+27 ;;^UTILITY(U,$J,358.3,21332,1,2,0)
+28 ;;=2^90621
+29 ;;^UTILITY(U,$J,358.3,21332,1,3,0)
+30 ;;=3^MENINGOCOCCAL VACCINE,LIPOPROTEIN IM
+31 ;;^UTILITY(U,$J,358.3,21333,0)
+32 ;;=90686^^69^889^7^^^^1
+33 ;;^UTILITY(U,$J,358.3,21333,1,0)
+34 ;;=^358.31IA^3^2
+35 ;;^UTILITY(U,$J,358.3,21333,1,2,0)
+36 ;;=2^90686
+37 ;;^UTILITY(U,$J,358.3,21333,1,3,0)
+38 ;;=3^FLU VACC SGLE DOSE SYR (AFLURIA IIV4)
+39 ;;^UTILITY(U,$J,358.3,21334,0)
+40 ;;=90674^^69^889^11^^^^1
+41 ;;^UTILITY(U,$J,358.3,21334,1,0)
+42 ;;=^358.31IA^3^2
+43 ;;^UTILITY(U,$J,358.3,21334,1,2,0)
+44 ;;=2^90674
+45 ;;^UTILITY(U,$J,358.3,21334,1,3,0)
+46 ;;=3^FLU VACCINE LOW DOSE SYR (FLUCELVAX CCIIV4)
+47 ;;^UTILITY(U,$J,358.3,21335,0)
+48 ;;=90672^^69^889^10^^^^1
+49 ;;^UTILITY(U,$J,358.3,21335,1,0)
+50 ;;=^358.31IA^3^2
+51 ;;^UTILITY(U,$J,358.3,21335,1,2,0)
+52 ;;=2^90672
+53 ;;^UTILITY(U,$J,358.3,21335,1,3,0)
+54 ;;=3^FLU VACCINE INTRANASAL,QUADRIVALENT,LIVE
+55 ;;^UTILITY(U,$J,358.3,21336,0)
+56 ;;=90688^^69^889^12^^^^1
+57 ;;^UTILITY(U,$J,358.3,21336,1,0)
+58 ;;=^358.31IA^3^2
+59 ;;^UTILITY(U,$J,358.3,21336,1,2,0)
+60 ;;=2^90688
+61 ;;^UTILITY(U,$J,358.3,21336,1,3,0)
+62 ;;=3^FLU VACCINE MULTI DOSE SYR (FLULAVAL)
+63 ;;^UTILITY(U,$J,358.3,21337,0)
+64 ;;=90682^^69^889^14^^^^1
+65 ;;^UTILITY(U,$J,358.3,21337,1,0)
+66 ;;=^358.31IA^3^2
+67 ;;^UTILITY(U,$J,358.3,21337,1,2,0)
+68 ;;=2^90682
+69 ;;^UTILITY(U,$J,358.3,21337,1,3,0)
+70 ;;=3^FLUBLOK (RIV4)
+71 ;;^UTILITY(U,$J,358.3,21338,0)
+72 ;;=90653^^69^889^13^^^^1
+73 ;;^UTILITY(U,$J,358.3,21338,1,0)
+74 ;;=^358.31IA^3^2
+75 ;;^UTILITY(U,$J,358.3,21338,1,2,0)
+76 ;;=2^90653
+77 ;;^UTILITY(U,$J,358.3,21338,1,3,0)
+78 ;;=3^FLU VACCINE SINGLE DOSE SYR (FLUAD)
+79 ;;^UTILITY(U,$J,358.3,21339,0)
+80 ;;=90671^^69^889^28^^^^1
+81 ;;^UTILITY(U,$J,358.3,21339,1,0)
+82 ;;=^358.31IA^3^2
+83 ;;^UTILITY(U,$J,358.3,21339,1,2,0)
+84 ;;=2^90671
+85 ;;^UTILITY(U,$J,358.3,21339,1,3,0)
+86 ;;=3^PNEUMOCOCCAL VACCINE 15 VAL (PCV15)
+87 ;;^UTILITY(U,$J,358.3,21340,0)
+88 ;;=90677^^69^889^29^^^^1
+89 ;;^UTILITY(U,$J,358.3,21340,1,0)
+90 ;;=^358.31IA^3^2
+91 ;;^UTILITY(U,$J,358.3,21340,1,2,0)
+92 ;;=2^90677
+93 ;;^UTILITY(U,$J,358.3,21340,1,3,0)
+94 ;;=3^PNEUMOCOCCAL VACCINE 20 VAL (PCV20)
+95 ;;^UTILITY(U,$J,358.3,21341,0)
+96 ;;=99452^^69^890^1^^^^1
+97 ;;^UTILITY(U,$J,358.3,21341,1,0)
+98 ;;=^358.31IA^3^2
+99 ;;^UTILITY(U,$J,358.3,21341,1,2,0)
+100 ;;=2^99452
+101 ;;^UTILITY(U,$J,358.3,21341,1,3,0)
+102 ;;=3^E-CONSULT RESULTS/DISCUSSION WITH PATIENT
+103 ;;^UTILITY(U,$J,358.3,21342,0)
+104 ;;=Q0243^^69^891^3^^^^1
+105 ;;^UTILITY(U,$J,358.3,21342,1,0)
+106 ;;=^358.31IA^3^2
+107 ;;^UTILITY(U,$J,358.3,21342,1,2,0)
+108 ;;=2^Q0243
+109 ;;^UTILITY(U,$J,358.3,21342,1,3,0)
+110 ;;=3^CASIRIVIMAB & IMDEVIMAB 2400MG
+111 ;;^UTILITY(U,$J,358.3,21343,0)
+112 ;;=M0243^^69^891^4^^^^1
+113 ;;^UTILITY(U,$J,358.3,21343,1,0)
+114 ;;=^358.31IA^3^2
+115 ;;^UTILITY(U,$J,358.3,21343,1,2,0)
+116 ;;=2^M0243
+117 ;;^UTILITY(U,$J,358.3,21343,1,3,0)
+118 ;;=3^CASIRIVIMAB & IMDEVIMAB INFUSION
+119 ;;^UTILITY(U,$J,358.3,21344,0)
+120 ;;=M0245^^69^891^1^^^^1
+121 ;;^UTILITY(U,$J,358.3,21344,1,0)
+122 ;;=^358.31IA^3^2
+123 ;;^UTILITY(U,$J,358.3,21344,1,2,0)
+124 ;;=2^M0245
+125 ;;^UTILITY(U,$J,358.3,21344,1,3,0)
+126 ;;=3^BAMLANIVIMAB INFUSION W/ POST ADMIN MONITORING
+127 ;;^UTILITY(U,$J,358.3,21345,0)
+128 ;;=Q0245^^69^891^2^^^^1
+129 ;;^UTILITY(U,$J,358.3,21345,1,0)
+130 ;;=^358.31IA^3^2
+131 ;;^UTILITY(U,$J,358.3,21345,1,2,0)
+132 ;;=2^Q0245
+133 ;;^UTILITY(U,$J,358.3,21345,1,3,0)
+134 ;;=3^BAMLANIVIVAB 700MG
+135 ;;^UTILITY(U,$J,358.3,21346,0)
+136 ;;=99424^^69^892^1^^^^1
+137 ;;^UTILITY(U,$J,358.3,21346,1,0)
+138 ;;=^358.31IA^3^2
+139 ;;^UTILITY(U,$J,358.3,21346,1,2,0)
+140 ;;=2^99424
+141 ;;^UTILITY(U,$J,358.3,21346,1,3,0)
+142 ;;=3^PRIN CARE MGMT,PHYS,1ST 30 MIN,PER CLNDR MNTH
+143 ;;^UTILITY(U,$J,358.3,21347,0)
+144 ;;=99425^^69^892^2^^^^1
+145 ;;^UTILITY(U,$J,358.3,21347,1,0)
+146 ;;=^358.31IA^3^2
+147 ;;^UTILITY(U,$J,358.3,21347,1,2,0)
+148 ;;=2^99425
+149 ;;^UTILITY(U,$J,358.3,21347,1,3,0)
+150 ;;=3^PRIN CARE MGMT,PHYS,EA ADDL 30 MIN,PER CLNDR MNTH
+151 ;;^UTILITY(U,$J,358.3,21348,0)
+152 ;;=99426^^69^892^3^^^^1
+153 ;;^UTILITY(U,$J,358.3,21348,1,0)
+154 ;;=^358.31IA^3^2
+155 ;;^UTILITY(U,$J,358.3,21348,1,2,0)
+156 ;;=2^99426
+157 ;;^UTILITY(U,$J,358.3,21348,1,3,0)
+158 ;;=3^PRIN CARE MGMT,STAFF,1ST 30 MIN,PER CLNDR MNTH
+159 ;;^UTILITY(U,$J,358.3,21349,0)
+160 ;;=99427^^69^892^4^^^^1
+161 ;;^UTILITY(U,$J,358.3,21349,1,0)
+162 ;;=^358.31IA^3^2
+163 ;;^UTILITY(U,$J,358.3,21349,1,2,0)
+164 ;;=2^99427
+165 ;;^UTILITY(U,$J,358.3,21349,1,3,0)
+166 ;;=3^PRIN CARE MGMT,STAFF,EA ADDL 30 MIN,PER CLNDR MNTH
+167 ;;^UTILITY(U,$J,358.3,21350,0)
+168 ;;=99202^^70^893^1
+169 ;;^UTILITY(U,$J,358.3,21350,1,0)
+170 ;;=^358.31IA^2^2
+171 ;;^UTILITY(U,$J,358.3,21350,1,1,0)
+172 ;;=1^SF MDM or 15-29 mins
+173 ;;^UTILITY(U,$J,358.3,21350,1,2,0)
+174 ;;=2^99202
+175 ;;^UTILITY(U,$J,358.3,21351,0)
+176 ;;=99203^^70^893^2
+177 ;;^UTILITY(U,$J,358.3,21351,1,0)
+178 ;;=^358.31IA^2^2
+179 ;;^UTILITY(U,$J,358.3,21351,1,1,0)
+180 ;;=1^Low Complex MDM or 30-44 mins
+181 ;;^UTILITY(U,$J,358.3,21351,1,2,0)
+182 ;;=2^99203
+183 ;;^UTILITY(U,$J,358.3,21352,0)
+184 ;;=99204^^70^893^3
+185 ;;^UTILITY(U,$J,358.3,21352,1,0)
+186 ;;=^358.31IA^2^2
+187 ;;^UTILITY(U,$J,358.3,21352,1,1,0)
+188 ;;=1^Mod Complex MDM or 45-59 mins
+189 ;;^UTILITY(U,$J,358.3,21352,1,2,0)
+190 ;;=2^99204
+191 ;;^UTILITY(U,$J,358.3,21353,0)
+192 ;;=99205^^70^893^4
+193 ;;^UTILITY(U,$J,358.3,21353,1,0)
+194 ;;=^358.31IA^2^2
+195 ;;^UTILITY(U,$J,358.3,21353,1,1,0)
+196 ;;=1^High Complex MDM or 60-74 mins
+197 ;;^UTILITY(U,$J,358.3,21353,1,2,0)
+198 ;;=2^99205
+199 ;;^UTILITY(U,$J,358.3,21354,0)
+200 ;;=99211^^70^894^1
+201 ;;^UTILITY(U,$J,358.3,21354,1,0)
+202 ;;=^358.31IA^2^2
+203 ;;^UTILITY(U,$J,358.3,21354,1,1,0)
+204 ;;=1^Brief (no MD seen)
+205 ;;^UTILITY(U,$J,358.3,21354,1,2,0)
+206 ;;=2^99211
+207 ;;^UTILITY(U,$J,358.3,21355,0)
+208 ;;=99212^^70^894^2
+209 ;;^UTILITY(U,$J,358.3,21355,1,0)
+210 ;;=^358.31IA^2^2
+211 ;;^UTILITY(U,$J,358.3,21355,1,1,0)
+212 ;;=1^SF MDM or 10-19 mins
+213 ;;^UTILITY(U,$J,358.3,21355,1,2,0)
+214 ;;=2^99212
+215 ;;^UTILITY(U,$J,358.3,21356,0)
+216 ;;=99213^^70^894^3
+217 ;;^UTILITY(U,$J,358.3,21356,1,0)
+218 ;;=^358.31IA^2^2
+219 ;;^UTILITY(U,$J,358.3,21356,1,1,0)
+220 ;;=1^Low Complex MDM or 20-29 mins
+221 ;;^UTILITY(U,$J,358.3,21356,1,2,0)
+222 ;;=2^99213
+223 ;;^UTILITY(U,$J,358.3,21356,3,0)
+224 ;;=^357.33
+225 ;;^UTILITY(U,$J,358.3,21357,0)
+226 ;;=99214^^70^894^4
+227 ;;^UTILITY(U,$J,358.3,21357,1,0)
+228 ;;=^358.31IA^2^2
+229 ;;^UTILITY(U,$J,358.3,21357,1,1,0)
+230 ;;=1^Mod Complex MDM or 30-39 mins
+231 ;;^UTILITY(U,$J,358.3,21357,1,2,0)
+232 ;;=2^99214
+233 ;;^UTILITY(U,$J,358.3,21358,0)
+234 ;;=99215^^70^894^5
+235 ;;^UTILITY(U,$J,358.3,21358,1,0)
+236 ;;=^358.31IA^2^2
+237 ;;^UTILITY(U,$J,358.3,21358,1,1,0)
+238 ;;=1^High Complex MDM or 40-54 mins
+239 ;;^UTILITY(U,$J,358.3,21358,1,2,0)
+240 ;;=2^99215
+241 ;;^UTILITY(U,$J,358.3,21359,0)
+242 ;;=99241^^70^895^1
+243 ;;^UTILITY(U,$J,358.3,21359,1,0)
+244 ;;=^358.31IA^2^2
+245 ;;^UTILITY(U,$J,358.3,21359,1,1,0)
+246 ;;=1^Problem Focused
+247 ;;^UTILITY(U,$J,358.3,21359,1,2,0)
+248 ;;=2^99241
+249 ;;^UTILITY(U,$J,358.3,21360,0)
+250 ;;=99242^^70^895^2
+251 ;;^UTILITY(U,$J,358.3,21360,1,0)
+252 ;;=^358.31IA^2^2
+253 ;;^UTILITY(U,$J,358.3,21360,1,1,0)
+254 ;;=1^Exp Problem Focused
+255 ;;^UTILITY(U,$J,358.3,21360,1,2,0)
+256 ;;=2^99242
+257 ;;^UTILITY(U,$J,358.3,21361,0)
+258 ;;=99243^^70^895^3
+259 ;;^UTILITY(U,$J,358.3,21361,1,0)
+260 ;;=^358.31IA^2^2
+261 ;;^UTILITY(U,$J,358.3,21361,1,1,0)
+262 ;;=1^Detailed
+263 ;;^UTILITY(U,$J,358.3,21361,1,2,0)
+264 ;;=2^99243
+265 ;;^UTILITY(U,$J,358.3,21362,0)
+266 ;;=99244^^70^895^4
+267 ;;^UTILITY(U,$J,358.3,21362,1,0)
+268 ;;=^358.31IA^2^2
+269 ;;^UTILITY(U,$J,358.3,21362,1,1,0)
+270 ;;=1^Comprehensive,Moderate MDM
+271 ;;^UTILITY(U,$J,358.3,21362,1,2,0)
+272 ;;=2^99244
+273 ;;^UTILITY(U,$J,358.3,21363,0)
+274 ;;=99245^^70^895^5
+275 ;;^UTILITY(U,$J,358.3,21363,1,0)
+276 ;;=^358.31IA^2^2
+277 ;;^UTILITY(U,$J,358.3,21363,1,1,0)
+278 ;;=1^Comprehensive,High MDM
+279 ;;^UTILITY(U,$J,358.3,21363,1,2,0)
+280 ;;=2^99245
+281 ;;^UTILITY(U,$J,358.3,21364,0)
+282 ;;=99395^^70^896^1
+283 ;;^UTILITY(U,$J,358.3,21364,1,0)
+284 ;;=^358.31IA^2^2
+285 ;;^UTILITY(U,$J,358.3,21364,1,1,0)
+286 ;;=1^Preventive Med,Est Pt,18-39
+287 ;;^UTILITY(U,$J,358.3,21364,1,2,0)
+288 ;;=2^99395
+289 ;;^UTILITY(U,$J,358.3,21365,0)
+290 ;;=99396^^70^896^2
+291 ;;^UTILITY(U,$J,358.3,21365,1,0)
+292 ;;=^358.31IA^2^2
+293 ;;^UTILITY(U,$J,358.3,21365,1,1,0)
+294 ;;=1^Preventive Med,Est Pt,40-64
+295 ;;^UTILITY(U,$J,358.3,21365,1,2,0)
+296 ;;=2^99396
+297 ;;^UTILITY(U,$J,358.3,21366,0)
+298 ;;=99397^^70^896^3
+299 ;;^UTILITY(U,$J,358.3,21366,1,0)
+300 ;;=^358.31IA^2^2
+301 ;;^UTILITY(U,$J,358.3,21366,1,1,0)
+302 ;;=1^Preventive Med,Est Pt > 64
+303 ;;^UTILITY(U,$J,358.3,21366,1,2,0)
+304 ;;=2^99397
+305 ;;^UTILITY(U,$J,358.3,21367,0)
+306 ;;=99385^^70^897^1
+307 ;;^UTILITY(U,$J,358.3,21367,1,0)
+308 ;;=^358.31IA^2^2
+309 ;;^UTILITY(U,$J,358.3,21367,1,1,0)
+310 ;;=1^Preventive Med,New Pt,18-39
+311 ;;^UTILITY(U,$J,358.3,21367,1,2,0)
+312 ;;=2^99385
+313 ;;^UTILITY(U,$J,358.3,21368,0)
+314 ;;=99386^^70^897^2
+315 ;;^UTILITY(U,$J,358.3,21368,1,0)
+316 ;;=^358.31IA^2^2
+317 ;;^UTILITY(U,$J,358.3,21368,1,1,0)
+318 ;;=1^Preventive Med,New Pt,40-64
+319 ;;^UTILITY(U,$J,358.3,21368,1,2,0)
+320 ;;=2^99386
+321 ;;^UTILITY(U,$J,358.3,21369,0)
+322 ;;=99387^^70^897^3
+323 ;;^UTILITY(U,$J,358.3,21369,1,0)
+324 ;;=^358.31IA^2^2
+325 ;;^UTILITY(U,$J,358.3,21369,1,1,0)
+326 ;;=1^Preventive Med,New Pt > 64
+327 ;;^UTILITY(U,$J,358.3,21369,1,2,0)
+328 ;;=2^99387
+329 ;;^UTILITY(U,$J,358.3,21370,0)
+330 ;;=99495^^70^898^1
+331 ;;^UTILITY(U,$J,358.3,21370,1,0)
+332 ;;=^358.31IA^2^2
+333 ;;^UTILITY(U,$J,358.3,21370,1,1,0)
+334 ;;=1^TCM Svc w/in 14 days of D/C w/ Mod MDM
+335 ;;^UTILITY(U,$J,358.3,21370,1,2,0)
+336 ;;=2^99495
+337 ;;^UTILITY(U,$J,358.3,21371,0)
+338 ;;=99496^^70^898^2
+339 ;;^UTILITY(U,$J,358.3,21371,1,0)
+340 ;;=^358.31IA^2^2
+341 ;;^UTILITY(U,$J,358.3,21371,1,1,0)
+342 ;;=1^TCM Svc w/in 7 days of D/C w/ High MDM
+343 ;;^UTILITY(U,$J,358.3,21371,1,2,0)
+344 ;;=2^99496
+345 ;;^UTILITY(U,$J,358.3,21371,3,0)
+346 ;;=^357.33
+347 ;;^UTILITY(U,$J,358.3,21372,0)
+348 ;;=B18.2^^71^899^40
+349 ;;^UTILITY(U,$J,358.3,21372,1,0)
+350 ;;=^358.31IA^4^2
+351 ;;^UTILITY(U,$J,358.3,21372,1,3,0)
+352 ;;=3^Hepatitis C,Chr
+353 ;;^UTILITY(U,$J,358.3,21372,1,4,0)
+354 ;;=4^B18.2
+355 ;;^UTILITY(U,$J,358.3,21372,2)
+356 ;;=^5000548
+357 ;;^UTILITY(U,$J,358.3,21373,0)
+358 ;;=E11.9^^71^899^25
+359 ;;^UTILITY(U,$J,358.3,21373,1,0)
+360 ;;=^358.31IA^4^2
+361 ;;^UTILITY(U,$J,358.3,21373,1,3,0)
+362 ;;=3^Diabetes Type 2
+363 ;;^UTILITY(U,$J,358.3,21373,1,4,0)
+364 ;;=4^E11.9
+365 ;;^UTILITY(U,$J,358.3,21373,2)
+366 ;;=^5002666
+367 ;;^UTILITY(U,$J,358.3,21374,0)
+368 ;;=E11.40^^71^899^23
+369 ;;^UTILITY(U,$J,358.3,21374,1,0)
+370 ;;=^358.31IA^4^2
+371 ;;^UTILITY(U,$J,358.3,21374,1,3,0)
+372 ;;=3^DM Type 2 w/ Neuropathy
+373 ;;^UTILITY(U,$J,358.3,21374,1,4,0)
+374 ;;=4^E11.40
+375 ;;^UTILITY(U,$J,358.3,21374,2)
+376 ;;=^5002644
+377 ;;^UTILITY(U,$J,358.3,21375,0)
+378 ;;=E78.2^^71^899^41
+379 ;;^UTILITY(U,$J,358.3,21375,1,0)
+380 ;;=^358.31IA^4^2
+381 ;;^UTILITY(U,$J,358.3,21375,1,3,0)
+382 ;;=3^Hyperlipidemia,Mixed
+383 ;;^UTILITY(U,$J,358.3,21375,1,4,0)
+384 ;;=4^E78.2
+385 ;;^UTILITY(U,$J,358.3,21375,2)
+386 ;;=^78424
+387 ;;^UTILITY(U,$J,358.3,21376,0)
+388 ;;=E78.5^^71^899^42
+389 ;;^UTILITY(U,$J,358.3,21376,1,0)
+390 ;;=^358.31IA^4^2
+391 ;;^UTILITY(U,$J,358.3,21376,1,3,0)
+392 ;;=3^Hyperlipidemia,Unspec
+393 ;;^UTILITY(U,$J,358.3,21376,1,4,0)
+394 ;;=4^E78.5
+395 ;;^UTILITY(U,$J,358.3,21376,2)
+396 ;;=^5002969
+397 ;;^UTILITY(U,$J,358.3,21377,0)
+398 ;;=E66.3^^71^899^59
+399 ;;^UTILITY(U,$J,358.3,21377,1,0)
+400 ;;=^358.31IA^4^2
+401 ;;^UTILITY(U,$J,358.3,21377,1,3,0)
+402 ;;=3^Overweight
+403 ;;^UTILITY(U,$J,358.3,21377,1,4,0)
+404 ;;=4^E66.3
+405 ;;^UTILITY(U,$J,358.3,21377,2)
+406 ;;=^5002830
+407 ;;^UTILITY(U,$J,358.3,21378,0)
+408 ;;=F17.200^^71^899^52
+409 ;;^UTILITY(U,$J,358.3,21378,1,0)
+410 ;;=^358.31IA^4^2
+411 ;;^UTILITY(U,$J,358.3,21378,1,3,0)
+412 ;;=3^Nicotine Dependence,Unspec
+413 ;;^UTILITY(U,$J,358.3,21378,1,4,0)
+414 ;;=4^F17.200
+415 ;;^UTILITY(U,$J,358.3,21378,2)
+416 ;;=^5003360
+417 ;;^UTILITY(U,$J,358.3,21379,0)
+418 ;;=G43.909^^71^899^50
+419 ;;^UTILITY(U,$J,358.3,21379,1,0)
+420 ;;=^358.31IA^4^2
+421 ;;^UTILITY(U,$J,358.3,21379,1,3,0)
+422 ;;=3^Migraine,Unspec
+423 ;;^UTILITY(U,$J,358.3,21379,1,4,0)
+424 ;;=4^G43.909
+425 ;;^UTILITY(U,$J,358.3,21379,2)
+426 ;;=^5003909
+427 ;;^UTILITY(U,$J,358.3,21380,0)
+428 ;;=H91.93^^71^899^36
+429 ;;^UTILITY(U,$J,358.3,21380,1,0)
+430 ;;=^358.31IA^4^2
+431 ;;^UTILITY(U,$J,358.3,21380,1,3,0)
+432 ;;=3^Hearing Loss,Bilateral
+433 ;;^UTILITY(U,$J,358.3,21380,1,4,0)
+434 ;;=4^H91.93
+435 ;;^UTILITY(U,$J,358.3,21380,2)
+436 ;;=^5006944
+437 ;;^UTILITY(U,$J,358.3,21381,0)
+438 ;;=I10.^^71^899^43
+439 ;;^UTILITY(U,$J,358.3,21381,1,0)
+440 ;;=^358.31IA^4^2
+441 ;;^UTILITY(U,$J,358.3,21381,1,3,0)
+442 ;;=3^Hypertension
+443 ;;^UTILITY(U,$J,358.3,21381,1,4,0)
+444 ;;=4^I10.
+445 ;;^UTILITY(U,$J,358.3,21381,2)
+446 ;;=^5007062
+447 ;;^UTILITY(U,$J,358.3,21382,0)
+448 ;;=I50.9^^71^899^19
+449 ;;^UTILITY(U,$J,358.3,21382,1,0)
+450 ;;=^358.31IA^4^2
+451 ;;^UTILITY(U,$J,358.3,21382,1,3,0)
+452 ;;=3^Congestive Heart Failure,Unspec
+453 ;;^UTILITY(U,$J,358.3,21382,1,4,0)
+454 ;;=4^I50.9
+455 ;;^UTILITY(U,$J,358.3,21382,2)
+456 ;;=^5007251
+457 ;;^UTILITY(U,$J,358.3,21383,0)
+458 ;;=I67.89^^71^899^18
+459 ;;^UTILITY(U,$J,358.3,21383,1,0)
+460 ;;=^358.31IA^4^2
+461 ;;^UTILITY(U,$J,358.3,21383,1,3,0)
+462 ;;=3^Cerebrovascular Disease,Oth
+463 ;;^UTILITY(U,$J,358.3,21383,1,4,0)
+464 ;;=4^I67.89
+465 ;;^UTILITY(U,$J,358.3,21383,2)
+466 ;;=^5007388
+467 ;;^UTILITY(U,$J,358.3,21384,0)
+468 ;;=J45.909^^71^899^4
+469 ;;^UTILITY(U,$J,358.3,21384,1,0)
+470 ;;=^358.31IA^4^2
+471 ;;^UTILITY(U,$J,358.3,21384,1,3,0)
+472 ;;=3^Asthma,Unspec,Uncomplicated
+473 ;;^UTILITY(U,$J,358.3,21384,1,4,0)
+474 ;;=4^J45.909
+475 ;;^UTILITY(U,$J,358.3,21384,2)
+476 ;;=^5008256
+477 ;;^UTILITY(U,$J,358.3,21385,0)
+478 ;;=J44.9^^71^899^16
+479 ;;^UTILITY(U,$J,358.3,21385,1,0)
+480 ;;=^358.31IA^4^2
+481 ;;^UTILITY(U,$J,358.3,21385,1,3,0)
+482 ;;=3^COPD,Unspec
+483 ;;^UTILITY(U,$J,358.3,21385,1,4,0)
+484 ;;=4^J44.9
+485 ;;^UTILITY(U,$J,358.3,21385,2)
+486 ;;=^5008241
+487 ;;^UTILITY(U,$J,358.3,21386,0)
+488 ;;=K21.9^^71^899^31
+489 ;;^UTILITY(U,$J,358.3,21386,1,0)
+490 ;;=^358.31IA^4^2
+491 ;;^UTILITY(U,$J,358.3,21386,1,3,0)
+492 ;;=3^GERD w/o Esophagitis
+493 ;;^UTILITY(U,$J,358.3,21386,1,4,0)
+494 ;;=4^K21.9
+495 ;;^UTILITY(U,$J,358.3,21386,2)
+496 ;;=^5008505
+497 ;;^UTILITY(U,$J,358.3,21387,0)
+498 ;;=N40.1^^71^899^29
+499 ;;^UTILITY(U,$J,358.3,21387,1,0)
+500 ;;=^358.31IA^4^2
+501 ;;^UTILITY(U,$J,358.3,21387,1,3,0)
+502 ;;=3^Enlarged Prostate w/ LUTS
+503 ;;^UTILITY(U,$J,358.3,21387,1,4,0)
+504 ;;=4^N40.1
+505 ;;^UTILITY(U,$J,358.3,21387,2)
+506 ;;=^5015690
+507 ;;^UTILITY(U,$J,358.3,21388,0)
+508 ;;=L03.818^^71^899^17
+509 ;;^UTILITY(U,$J,358.3,21388,1,0)
+510 ;;=^358.31IA^4^2
+511 ;;^UTILITY(U,$J,358.3,21388,1,3,0)
+512 ;;=3^Cellulitis,Oth Sites
+513 ;;^UTILITY(U,$J,358.3,21388,1,4,0)
+514 ;;=4^L03.818
+515 ;;^UTILITY(U,$J,358.3,21388,2)
+516 ;;=^5009064
+517 ;;^UTILITY(U,$J,358.3,21389,0)
+518 ;;=G47.33^^71^899^77
+519 ;;^UTILITY(U,$J,358.3,21389,1,0)
+520 ;;=^358.31IA^4^2
+521 ;;^UTILITY(U,$J,358.3,21389,1,3,0)
+522 ;;=3^Sleep Apnea,Obstructive
+523 ;;^UTILITY(U,$J,358.3,21389,1,4,0)
+524 ;;=4^G47.33
+525 ;;^UTILITY(U,$J,358.3,21389,2)
+526 ;;=^332763
+527 ;;^UTILITY(U,$J,358.3,21390,0)
+528 ;;=R73.01^^71^899^46
+529 ;;^UTILITY(U,$J,358.3,21390,1,0)
+530 ;;=^358.31IA^4^2
+531 ;;^UTILITY(U,$J,358.3,21390,1,3,0)
+532 ;;=3^Impaired Fasting Glucose
+533 ;;^UTILITY(U,$J,358.3,21390,1,4,0)
+534 ;;=4^R73.01
+535 ;;^UTILITY(U,$J,358.3,21390,2)
+536 ;;=^5019561
+537 ;;^UTILITY(U,$J,358.3,21391,0)
+538 ;;=R74.8^^71^899^1
+539 ;;^UTILITY(U,$J,358.3,21391,1,0)
+540 ;;=^358.31IA^4^2
+541 ;;^UTILITY(U,$J,358.3,21391,1,3,0)
+542 ;;=3^Abnormal Levels of Serum Enzymes
+543 ;;^UTILITY(U,$J,358.3,21391,1,4,0)
+544 ;;=4^R74.8
+545 ;;^UTILITY(U,$J,358.3,21391,2)
+546 ;;=^5019566
+547 ;;^UTILITY(U,$J,358.3,21392,0)
+548 ;;=R03.0^^71^899^27
+549 ;;^UTILITY(U,$J,358.3,21392,1,0)
+550 ;;=^358.31IA^4^2
+551 ;;^UTILITY(U,$J,358.3,21392,1,3,0)
+552 ;;=3^Elevated BP Reading w/o Diagnosis of HTN
+553 ;;^UTILITY(U,$J,358.3,21392,1,4,0)
+554 ;;=4^R03.0
+555 ;;^UTILITY(U,$J,358.3,21392,2)
+556 ;;=^5019171
+557 ;;^UTILITY(U,$J,358.3,21393,0)
+558 ;;=Z91.19^^71^899^53
+559 ;;^UTILITY(U,$J,358.3,21393,1,0)
+560 ;;=^358.31IA^4^2
+561 ;;^UTILITY(U,$J,358.3,21393,1,3,0)
+562 ;;=3^Noncompliance w/ Medical Treatment/Regimen
+563 ;;^UTILITY(U,$J,358.3,21393,1,4,0)
+564 ;;=4^Z91.19
+565 ;;^UTILITY(U,$J,358.3,21393,2)
+566 ;;=^5063618
+567 ;;^UTILITY(U,$J,358.3,21394,0)
+568 ;;=E66.01^^71^899^54
+569 ;;^UTILITY(U,$J,358.3,21394,1,0)
+570 ;;=^358.31IA^4^2
+571 ;;^UTILITY(U,$J,358.3,21394,1,3,0)
+572 ;;=3^Obesity,Morbid
+573 ;;^UTILITY(U,$J,358.3,21394,1,4,0)
+574 ;;=4^E66.01
+575 ;;^UTILITY(U,$J,358.3,21394,2)
+576 ;;=^5002826
+577 ;;^UTILITY(U,$J,358.3,21395,0)
+578 ;;=F43.11^^71^899^61
+579 ;;^UTILITY(U,$J,358.3,21395,1,0)
+580 ;;=^358.31IA^4^2
+581 ;;^UTILITY(U,$J,358.3,21395,1,3,0)
+582 ;;=3^PTSD,Acute
+583 ;;^UTILITY(U,$J,358.3,21395,1,4,0)
+584 ;;=4^F43.11
+585 ;;^UTILITY(U,$J,358.3,21395,2)
+586 ;;=^5003571
+587 ;;^UTILITY(U,$J,358.3,21396,0)
+588 ;;=F43.12^^71^899^62
+589 ;;^UTILITY(U,$J,358.3,21396,1,0)
+590 ;;=^358.31IA^4^2
+591 ;;^UTILITY(U,$J,358.3,21396,1,3,0)
+592 ;;=3^PTSD,Chronic
+593 ;;^UTILITY(U,$J,358.3,21396,1,4,0)
+594 ;;=4^F43.12
+595 ;;^UTILITY(U,$J,358.3,21396,2)
+596 ;;=^5003572
+597 ;;^UTILITY(U,$J,358.3,21397,0)
+598 ;;=I25.119^^71^899^5
+599 ;;^UTILITY(U,$J,358.3,21397,1,0)
+600 ;;=^358.31IA^4^2
+601 ;;^UTILITY(U,$J,358.3,21397,1,3,0)
+602 ;;=3^Athscl Hrt Dis of Native Cor Art w/ Ang Pctrs,Unspec
+603 ;;^UTILITY(U,$J,358.3,21397,1,4,0)
+604 ;;=4^I25.119
+605 ;;^UTILITY(U,$J,358.3,21397,2)
+606 ;;=^5007111
+607 ;;^UTILITY(U,$J,358.3,21398,0)
+608 ;;=I25.10^^71^899^6
+609 ;;^UTILITY(U,$J,358.3,21398,1,0)
+610 ;;=^358.31IA^4^2
+611 ;;^UTILITY(U,$J,358.3,21398,1,3,0)
+612 ;;=3^Athscl Hrt Dis of Native Cor Art w/o Ang Pctrs
+613 ;;^UTILITY(U,$J,358.3,21398,1,4,0)
+614 ;;=4^I25.10
+615 ;;^UTILITY(U,$J,358.3,21398,2)
+616 ;;=^5007107
+617 ;;^UTILITY(U,$J,358.3,21399,0)
+618 ;;=F17.219^^71^899^51
+619 ;;^UTILITY(U,$J,358.3,21399,1,0)
+620 ;;=^358.31IA^4^2
+621 ;;^UTILITY(U,$J,358.3,21399,1,3,0)
+622 ;;=3^Nicotine Dependence,Cigarettes
+623 ;;^UTILITY(U,$J,358.3,21399,1,4,0)
+624 ;;=4^F17.219
+625 ;;^UTILITY(U,$J,358.3,21399,2)
+626 ;;=^5003369
+627 ;;^UTILITY(U,$J,358.3,21400,0)
+628 ;;=Z51.5^^71^899^64
+629 ;;^UTILITY(U,$J,358.3,21400,1,0)
+630 ;;=^358.31IA^4^2
+631 ;;^UTILITY(U,$J,358.3,21400,1,3,0)
+632 ;;=3^Palliative Care Encounter
+633 ;;^UTILITY(U,$J,358.3,21400,1,4,0)
+634 ;;=4^Z51.5
+635 ;;^UTILITY(U,$J,358.3,21400,2)
+636 ;;=^5063063
+637 ;;^UTILITY(U,$J,358.3,21401,0)
+638 ;;=Z23.^^71^899^28
+639 ;;^UTILITY(U,$J,358.3,21401,1,0)
+640 ;;=^358.31IA^4^2
+641 ;;^UTILITY(U,$J,358.3,21401,1,3,0)
+642 ;;=3^Encounter for Immunization(s)
+643 ;;^UTILITY(U,$J,358.3,21401,1,4,0)
+644 ;;=4^Z23.
+645 ;;^UTILITY(U,$J,358.3,21401,2)
+646 ;;=^5062795
+647 ;;^UTILITY(U,$J,358.3,21402,0)
+648 ;;=E11.65^^71^899^20
+649 ;;^UTILITY(U,$J,358.3,21402,1,0)
+650 ;;=^358.31IA^4^2
+651 ;;^UTILITY(U,$J,358.3,21402,1,3,0)
+652 ;;=3^DM Type 2 Uncontrolled w/ Hyperglycemia
+653 ;;^UTILITY(U,$J,358.3,21402,1,4,0)
+654 ;;=4^E11.65
+655 ;;^UTILITY(U,$J,358.3,21402,2)
+656 ;;=^5002663
+657 ;;^UTILITY(U,$J,358.3,21403,0)
+658 ;;=E11.649^^71^899^21
+659 ;;^UTILITY(U,$J,358.3,21403,1,0)
+660 ;;=^358.31IA^4^2
+661 ;;^UTILITY(U,$J,358.3,21403,1,3,0)
+662 ;;=3^DM Type 2 Uncontrolled w/ Hypoglycemia w/o Coma
+663 ;;^UTILITY(U,$J,358.3,21403,1,4,0)
+664 ;;=4^E11.649
+665 ;;^UTILITY(U,$J,358.3,21403,2)
+666 ;;=^5002662
+667 ;;^UTILITY(U,$J,358.3,21404,0)
+668 ;;=I16.0^^71^899^44
+669 ;;^UTILITY(U,$J,358.3,21404,1,0)
+670 ;;=^358.31IA^4^2
+671 ;;^UTILITY(U,$J,358.3,21404,1,3,0)
+672 ;;=3^Hypertensive Urgency
+673 ;;^UTILITY(U,$J,358.3,21404,1,4,0)
+674 ;;=4^I16.0
+675 ;;^UTILITY(U,$J,358.3,21404,2)
+676 ;;=^8133013
+677 ;;^UTILITY(U,$J,358.3,21405,0)
+678 ;;=H54.8^^71^899^47
+679 ;;^UTILITY(U,$J,358.3,21405,1,0)
+680 ;;=^358.31IA^4^2
+681 ;;^UTILITY(U,$J,358.3,21405,1,3,0)
+682 ;;=3^Legal Blindness,USA Definition
