IBDEI0BB ; ; 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,27756,1,3,0)
;;=3^Unvaccinated for COVID-19
;;^UTILITY(U,$J,358.3,27756,1,4,0)
;;=4^Z28.310
;;^UTILITY(U,$J,358.3,27756,2)
;;=^5161576
;;^UTILITY(U,$J,358.3,27757,0)
;;=Z28.311^^91^1160^1
;;^UTILITY(U,$J,358.3,27757,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27757,1,3,0)
;;=3^Partially Vaccinated for COVID-19
;;^UTILITY(U,$J,358.3,27757,1,4,0)
;;=4^Z28.311
;;^UTILITY(U,$J,358.3,27757,2)
;;=^5161577
;;^UTILITY(U,$J,358.3,27758,0)
;;=Z28.39^^91^1160^2
;;^UTILITY(U,$J,358.3,27758,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27758,1,3,0)
;;=3^Underimmunization Status,Other
;;^UTILITY(U,$J,358.3,27758,1,4,0)
;;=4^Z28.39
;;^UTILITY(U,$J,358.3,27758,2)
;;=^5161578
;;^UTILITY(U,$J,358.3,27759,0)
;;=R45.851^^91^1161^3
;;^UTILITY(U,$J,358.3,27759,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27759,1,3,0)
;;=3^Suicidal Ideations
;;^UTILITY(U,$J,358.3,27759,1,4,0)
;;=4^R45.851
;;^UTILITY(U,$J,358.3,27759,2)
;;=^5019474
;;^UTILITY(U,$J,358.3,27760,0)
;;=T14.91XA^^91^1161^4
;;^UTILITY(U,$J,358.3,27760,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27760,1,3,0)
;;=3^Suicide Attempt,Initial Encntr
;;^UTILITY(U,$J,358.3,27760,1,4,0)
;;=4^T14.91XA
;;^UTILITY(U,$J,358.3,27760,2)
;;=^5151779
;;^UTILITY(U,$J,358.3,27761,0)
;;=T14.91XD^^91^1161^6
;;^UTILITY(U,$J,358.3,27761,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27761,1,3,0)
;;=3^Suicide Attempt,Subsequent Encntr
;;^UTILITY(U,$J,358.3,27761,1,4,0)
;;=4^T14.91XD
;;^UTILITY(U,$J,358.3,27761,2)
;;=^5151780
;;^UTILITY(U,$J,358.3,27762,0)
;;=T14.91XS^^91^1161^5
;;^UTILITY(U,$J,358.3,27762,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27762,1,3,0)
;;=3^Suicide Attempt,Sequela
;;^UTILITY(U,$J,358.3,27762,1,4,0)
;;=4^T14.91XS
;;^UTILITY(U,$J,358.3,27762,2)
;;=^5151781
;;^UTILITY(U,$J,358.3,27763,0)
;;=Z91.52^^91^1161^1
;;^UTILITY(U,$J,358.3,27763,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27763,1,3,0)
;;=3^Personal Hx of Non-Suicidal Self-Harm
;;^UTILITY(U,$J,358.3,27763,1,4,0)
;;=4^Z91.52
;;^UTILITY(U,$J,358.3,27763,2)
;;=^5161318
;;^UTILITY(U,$J,358.3,27764,0)
;;=Z91.51^^91^1161^2
;;^UTILITY(U,$J,358.3,27764,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27764,1,3,0)
;;=3^Personal Hx of Suicidal Behavior
;;^UTILITY(U,$J,358.3,27764,1,4,0)
;;=4^Z91.51
;;^UTILITY(U,$J,358.3,27764,2)
;;=^5161317
;;^UTILITY(U,$J,358.3,27765,0)
;;=90785^^92^1162^68^^^^1
;;^UTILITY(U,$J,358.3,27765,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27765,1,2,0)
;;=2^Psytx Complex Interactive
;;^UTILITY(U,$J,358.3,27765,1,4,0)
;;=4^90785
;;^UTILITY(U,$J,358.3,27766,0)
;;=90791^^92^1162^60^^^^1
;;^UTILITY(U,$J,358.3,27766,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27766,1,2,0)
;;=2^Psych Diagnostic Evaluation
;;^UTILITY(U,$J,358.3,27766,1,4,0)
;;=4^90791
;;^UTILITY(U,$J,358.3,27767,0)
;;=90792^^92^1162^59^^^^1
;;^UTILITY(U,$J,358.3,27767,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27767,1,2,0)
;;=2^Psych Diag Eval w/ Med Svcs
;;^UTILITY(U,$J,358.3,27767,1,4,0)
;;=4^90792
;;^UTILITY(U,$J,358.3,27768,0)
;;=90832^^92^1162^74^^^^1
;;^UTILITY(U,$J,358.3,27768,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27768,1,2,0)
;;=2^Psytx w/ Pt,30 min
;;^UTILITY(U,$J,358.3,27768,1,4,0)
;;=4^90832
;;^UTILITY(U,$J,358.3,27769,0)
;;=90833^^92^1162^71^^^^1
;;^UTILITY(U,$J,358.3,27769,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27769,1,2,0)
;;=2^Psytx w/ Pt w/ E&M,30 min
;;^UTILITY(U,$J,358.3,27769,1,4,0)
;;=4^90833
;;^UTILITY(U,$J,358.3,27770,0)
;;=90834^^92^1162^75^^^^1
;;^UTILITY(U,$J,358.3,27770,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27770,1,2,0)
;;=2^Psytx w/ Pt,45 min
;;^UTILITY(U,$J,358.3,27770,1,4,0)
;;=4^90834
;;^UTILITY(U,$J,358.3,27771,0)
;;=90836^^92^1162^72^^^^1
;;^UTILITY(U,$J,358.3,27771,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27771,1,2,0)
;;=2^Psytx w/ Pt w/ E&M,45 min
;;^UTILITY(U,$J,358.3,27771,1,4,0)
;;=4^90836
;;^UTILITY(U,$J,358.3,27772,0)
;;=90837^^92^1162^76^^^^1
;;^UTILITY(U,$J,358.3,27772,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27772,1,2,0)
;;=2^Psytx w/ Pt,60 min
;;^UTILITY(U,$J,358.3,27772,1,4,0)
;;=4^90837
;;^UTILITY(U,$J,358.3,27773,0)
;;=90838^^92^1162^73^^^^1
;;^UTILITY(U,$J,358.3,27773,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27773,1,2,0)
;;=2^Psytx w/ Pt w/ E&M,60 min
;;^UTILITY(U,$J,358.3,27773,1,4,0)
;;=4^90838
;;^UTILITY(U,$J,358.3,27774,0)
;;=90839^^92^1162^69^^^^1
;;^UTILITY(U,$J,358.3,27774,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27774,1,2,0)
;;=2^Psytx Crisis,1st 60 min
;;^UTILITY(U,$J,358.3,27774,1,4,0)
;;=4^90839
;;^UTILITY(U,$J,358.3,27775,0)
;;=90840^^92^1162^70^^^^1
;;^UTILITY(U,$J,358.3,27775,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27775,1,2,0)
;;=2^Psytx Crisis,Ea Addl 30 min
;;^UTILITY(U,$J,358.3,27775,1,4,0)
;;=4^90840
;;^UTILITY(U,$J,358.3,27776,0)
;;=90845^^92^1162^67^^^^1
;;^UTILITY(U,$J,358.3,27776,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27776,1,2,0)
;;=2^Psychoanalysis
;;^UTILITY(U,$J,358.3,27776,1,4,0)
;;=4^90845
;;^UTILITY(U,$J,358.3,27777,0)
;;=90846^^92^1162^28^^^^1
;;^UTILITY(U,$J,358.3,27777,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27777,1,2,0)
;;=2^Family Psytx w/o Pt,50 min
;;^UTILITY(U,$J,358.3,27777,1,4,0)
;;=4^90846
;;^UTILITY(U,$J,358.3,27778,0)
;;=90847^^92^1162^27^^^^1
;;^UTILITY(U,$J,358.3,27778,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27778,1,2,0)
;;=2^Family Psytx w/ Pt,50 min
;;^UTILITY(U,$J,358.3,27778,1,4,0)
;;=4^90847
;;^UTILITY(U,$J,358.3,27779,0)
;;=90853^^92^1162^29^^^^1
;;^UTILITY(U,$J,358.3,27779,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27779,1,2,0)
;;=2^Group Psychotherapy
;;^UTILITY(U,$J,358.3,27779,1,4,0)
;;=4^90853
;;^UTILITY(U,$J,358.3,27780,0)
;;=92507^^92^1162^81^^^^1
;;^UTILITY(U,$J,358.3,27780,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27780,1,2,0)
;;=2^Speech/Hearing Therapy,Ind
;;^UTILITY(U,$J,358.3,27780,1,4,0)
;;=4^92507
;;^UTILITY(U,$J,358.3,27781,0)
;;=92508^^92^1162^80^^^^1
;;^UTILITY(U,$J,358.3,27781,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27781,1,2,0)
;;=2^Speech/Hearing Therapy,Grp
;;^UTILITY(U,$J,358.3,27781,1,4,0)
;;=4^92508
;;^UTILITY(U,$J,358.3,27782,0)
;;=92521^^92^1162^26^^^^1
;;^UTILITY(U,$J,358.3,27782,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27782,1,2,0)
;;=2^Eval of Speech Fluency
;;^UTILITY(U,$J,358.3,27782,1,4,0)
;;=4^92521
;;^UTILITY(U,$J,358.3,27783,0)
;;=92522^^92^1162^25^^^^1
;;^UTILITY(U,$J,358.3,27783,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27783,1,2,0)
;;=2^Eval Speech Production
;;^UTILITY(U,$J,358.3,27783,1,4,0)
;;=4^92522
;;^UTILITY(U,$J,358.3,27784,0)
;;=92523^^92^1162^79^^^^1
;;^UTILITY(U,$J,358.3,27784,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27784,1,2,0)
;;=2^Speech Sound Lang Comprehen
;;^UTILITY(U,$J,358.3,27784,1,4,0)
;;=4^92523
;;^UTILITY(U,$J,358.3,27785,0)
;;=92524^^92^1162^10^^^^1
;;^UTILITY(U,$J,358.3,27785,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27785,1,2,0)
;;=2^Behav Qual Analys Voice
;;^UTILITY(U,$J,358.3,27785,1,4,0)
;;=4^92524
;;^UTILITY(U,$J,358.3,27786,0)
;;=96116^^92^1162^48^^^^1
;;^UTILITY(U,$J,358.3,27786,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27786,1,2,0)
;;=2^Nubhvl XM Phys/QHP,1st Hr
;;^UTILITY(U,$J,358.3,27786,1,4,0)
;;=4^96116
;;^UTILITY(U,$J,358.3,27787,0)
;;=96121^^92^1162^49^^^^1
;;^UTILITY(U,$J,358.3,27787,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27787,1,2,0)
;;=2^Nubhvl XM Phys/QHP,Ea Addl Hr
;;^UTILITY(U,$J,358.3,27787,1,4,0)
;;=4^96121
;;^UTILITY(U,$J,358.3,27788,0)
;;=96127^^92^1162^15^^^^1
;;^UTILITY(U,$J,358.3,27788,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27788,1,2,0)
;;=2^Brief Emotional/Behav Assmt
;;^UTILITY(U,$J,358.3,27788,1,4,0)
;;=4^96127
;;^UTILITY(U,$J,358.3,27789,0)
;;=96130^^92^1162^61^^^^1
;;^UTILITY(U,$J,358.3,27789,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27789,1,2,0)
;;=2^Psych Tst Eval Phys/QHP,1st Hr
;;^UTILITY(U,$J,358.3,27789,1,4,0)
;;=4^96130
;;^UTILITY(U,$J,358.3,27790,0)
;;=96131^^92^1162^62^^^^1
;;^UTILITY(U,$J,358.3,27790,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27790,1,2,0)
;;=2^Psych Tst Eval Phys/QHP,Ea Addl Hr
;;^UTILITY(U,$J,358.3,27790,1,4,0)
;;=4^96131
;;^UTILITY(U,$J,358.3,27791,0)
;;=96132^^92^1162^46^^^^1
;;^UTILITY(U,$J,358.3,27791,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27791,1,2,0)
;;=2^Nrpsych Tst Eval Phys/QHP,1st Hr
;;^UTILITY(U,$J,358.3,27791,1,4,0)
;;=4^96132
;;^UTILITY(U,$J,358.3,27792,0)
;;=96133^^92^1162^47^^^^1
;;^UTILITY(U,$J,358.3,27792,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27792,1,2,0)
;;=2^Nrpsych Tst Eval Phys/QHP,Ea Addl Hr
;;^UTILITY(U,$J,358.3,27792,1,4,0)
;;=4^96133
;;^UTILITY(U,$J,358.3,27793,0)
;;=96136^^92^1162^63^^^^1
;;^UTILITY(U,$J,358.3,27793,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27793,1,2,0)
;;=2^Psych/Nrpsych Tst Eval Phys/QHP,1st Hr
;;^UTILITY(U,$J,358.3,27793,1,4,0)
;;=4^96136
;;^UTILITY(U,$J,358.3,27794,0)
;;=96137^^92^1162^64^^^^1
;;^UTILITY(U,$J,358.3,27794,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27794,1,2,0)
;;=2^Psych/Nrpsych Tst Eval Phys/QHP,Ea Addl Hr
;;^UTILITY(U,$J,358.3,27794,1,4,0)
;;=4^96137
;;^UTILITY(U,$J,358.3,27795,0)
;;=96138^^92^1162^65^^^^1
;;^UTILITY(U,$J,358.3,27795,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27795,1,2,0)
;;=2^Psych/Nrpsych Tst by Tech,1st 30 min
;;^UTILITY(U,$J,358.3,27795,1,4,0)
;;=4^96138
;;^UTILITY(U,$J,358.3,27796,0)
;;=96139^^92^1162^66^^^^1
;;^UTILITY(U,$J,358.3,27796,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27796,1,2,0)
;;=2^Psych/Nrpsych Tst by Tech,Ea Addl 30 min
;;^UTILITY(U,$J,358.3,27796,1,4,0)
;;=4^96139
;;^UTILITY(U,$J,358.3,27797,0)
;;=96156^^92^1162^31^^^^1
;;^UTILITY(U,$J,358.3,27797,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27797,1,2,0)
;;=2^Hlth Bhv Assmt/Re-Assmt
;;^UTILITY(U,$J,358.3,27797,1,4,0)
;;=4^96156
;;^UTILITY(U,$J,358.3,27798,0)
;;=96158^^92^1162^36^^^^1
;;^UTILITY(U,$J,358.3,27798,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27798,1,2,0)
;;=2^Hlth Bhv Intvn,Ind,1st 30 min
;;^UTILITY(U,$J,358.3,27798,1,4,0)
;;=4^96158
;;^UTILITY(U,$J,358.3,27799,0)
;;=96159^^92^1162^37^^^^1
;;^UTILITY(U,$J,358.3,27799,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27799,1,2,0)
;;=2^Hlth Bhv Intvn,Ind,Ea Addl 30 min
;;^UTILITY(U,$J,358.3,27799,1,4,0)
;;=4^96159
;;^UTILITY(U,$J,358.3,27800,0)
;;=96160^^92^1162^77^^^^1
;;^UTILITY(U,$J,358.3,27800,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27800,1,2,0)
;;=2^Pt Focused Hlth Risk Assmt
;;^UTILITY(U,$J,358.3,27800,1,4,0)
;;=4^96160
;;^UTILITY(U,$J,358.3,27801,0)
;;=96161^^92^1162^16^^^^1
;;^UTILITY(U,$J,358.3,27801,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27801,1,2,0)
;;=2^Caregiver Hlth Risk Assmt
;;^UTILITY(U,$J,358.3,27801,1,4,0)
;;=4^96161
;;^UTILITY(U,$J,358.3,27802,0)
;;=96164^^92^1162^34^^^^1
;;^UTILITY(U,$J,358.3,27802,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27802,1,2,0)
;;=2^Hlth Bhv Intvn,Grp,1st 30 min
;;^UTILITY(U,$J,358.3,27802,1,4,0)
;;=4^96164
;;^UTILITY(U,$J,358.3,27803,0)
;;=96165^^92^1162^35^^^^1
;;^UTILITY(U,$J,358.3,27803,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27803,1,2,0)
;;=2^Hlth Bhv Intvn,Grp,Ea Addl 30 min
;;^UTILITY(U,$J,358.3,27803,1,4,0)
;;=4^96165
;;^UTILITY(U,$J,358.3,27804,0)
;;=96167^^92^1162^32^^^^1
;;^UTILITY(U,$J,358.3,27804,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27804,1,2,0)
;;=2^Hlth Bhv Intvn,Fam,1st 30 min
;;^UTILITY(U,$J,358.3,27804,1,4,0)
;;=4^96167
;;^UTILITY(U,$J,358.3,27805,0)
;;=96168^^92^1162^33^^^^1
;;^UTILITY(U,$J,358.3,27805,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27805,1,2,0)
;;=2^Hlth Bhv Intvn,Fam,Ea Addl 30 min
;;^UTILITY(U,$J,358.3,27805,1,4,0)
;;=4^96168
;;^UTILITY(U,$J,358.3,27806,0)
;;=97535^^92^1162^78^^^^1
;;^UTILITY(U,$J,358.3,27806,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27806,1,2,0)
;;=2^Self Care Mgmt Training
;;^UTILITY(U,$J,358.3,27806,1,4,0)
;;=4^97535
;;^UTILITY(U,$J,358.3,27807,0)
;;=97802^^92^1162^42^^^^1
;;^UTILITY(U,$J,358.3,27807,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27807,1,2,0)
;;=2^Med Nutr,Ind,Init Intvn,Ea 15 min
;;^UTILITY(U,$J,358.3,27807,1,4,0)
;;=4^97802
;;^UTILITY(U,$J,358.3,27808,0)
;;=97803^^92^1162^43^^^^1
;;^UTILITY(U,$J,358.3,27808,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27808,1,2,0)
;;=2^Med Nutr,Ind,Re-Assmt/Intrvn,Ea 15 min
;;^UTILITY(U,$J,358.3,27808,1,4,0)
;;=4^97803
;;^UTILITY(U,$J,358.3,27809,0)
;;=97804^^92^1162^45^^^^1
;;^UTILITY(U,$J,358.3,27809,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27809,1,2,0)
;;=2^Medical Nutrition Grp,Ea 30 min
;;^UTILITY(U,$J,358.3,27809,1,4,0)
;;=4^97804
;;^UTILITY(U,$J,358.3,27810,0)
;;=99354^^92^1162^55^^^^1
;;^UTILITY(U,$J,358.3,27810,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27810,1,2,0)
;;=2^Prolong Outpt E&M Svc,1st hr
;;^UTILITY(U,$J,358.3,27810,1,4,0)
;;=4^99354
;;^UTILITY(U,$J,358.3,27811,0)
;;=99355^^92^1162^56^^^^1
;;^UTILITY(U,$J,358.3,27811,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27811,1,2,0)
;;=2^Prolong Outpt E&M Svc,Ea Addl 30 min
;;^UTILITY(U,$J,358.3,27811,1,4,0)
;;=4^99355
;;^UTILITY(U,$J,358.3,27812,0)
;;=99356^^92^1162^53^^^^1
;;^UTILITY(U,$J,358.3,27812,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27812,1,2,0)
;;=2^Prolong Inpt E&M Svc,1st hr
;;^UTILITY(U,$J,358.3,27812,1,4,0)
;;=4^99356
;;^UTILITY(U,$J,358.3,27813,0)
;;=99357^^92^1162^54^^^^1
;;^UTILITY(U,$J,358.3,27813,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27813,1,2,0)
;;=2^Prolong Inpt E&M Svc,Ea Addl 30 min
;;^UTILITY(U,$J,358.3,27813,1,4,0)
;;=4^99357
;;^UTILITY(U,$J,358.3,27814,0)
;;=99406^^92^1162^11^^^^1
;;^UTILITY(U,$J,358.3,27814,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27814,1,2,0)
;;=2^Behv Change,Smoking,3-10 min
;;^UTILITY(U,$J,358.3,27814,1,4,0)
;;=4^99406
;;^UTILITY(U,$J,358.3,27815,0)
;;=99407^^92^1162^12^^^^1
;;^UTILITY(U,$J,358.3,27815,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27815,1,2,0)
;;=2^Behv Change,Smoking,10+ min
;;^UTILITY(U,$J,358.3,27815,1,4,0)
;;=4^99407
;;^UTILITY(U,$J,358.3,27816,0)
;;=99497^^92^1162^1^^^^1
;;^UTILITY(U,$J,358.3,27816,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27816,1,2,0)
;;=2^Advncd Care Plan,1st 30 min
;;^UTILITY(U,$J,358.3,27816,1,4,0)
;;=4^99497
;;^UTILITY(U,$J,358.3,27817,0)
;;=99498^^92^1162^2^^^^1
;;^UTILITY(U,$J,358.3,27817,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27817,1,2,0)
;;=2^Advncd Care Plan,Ea Addl 30 min
;;^UTILITY(U,$J,358.3,27817,1,4,0)
;;=4^99498
;;^UTILITY(U,$J,358.3,27818,0)
;;=G0108^^92^1162^19^^^^1
;;^UTILITY(U,$J,358.3,27818,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27818,1,2,0)
;;=2^Diab Mgmt Trning,Ind,Ea 30 min
;;^UTILITY(U,$J,358.3,27818,1,4,0)
;;=4^G0108
;;^UTILITY(U,$J,358.3,27819,0)
;;=G0109^^92^1162^18^^^^1
;;^UTILITY(U,$J,358.3,27819,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27819,1,2,0)
;;=2^Diab Mgmt Trning,Grp,Ea 30 min
;;^UTILITY(U,$J,358.3,27819,1,4,0)
;;=4^G0109
;;^UTILITY(U,$J,358.3,27820,0)
;;=G0270^^92^1162^44^^^^1
;;^UTILITY(U,$J,358.3,27820,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27820,1,2,0)
;;=2^Med Nutr,Re-Assmt New Dx,Ea 15 min
;;^UTILITY(U,$J,358.3,27820,1,4,0)
;;=4^G0270
;;^UTILITY(U,$J,358.3,27821,0)
;;=G0296^^92^1162^82^^^^1
;;^UTILITY(U,$J,358.3,27821,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27821,1,2,0)
;;=2^Visit to Determ LDCT Elig
;;^UTILITY(U,$J,358.3,27821,1,4,0)
;;=4^G0296
;;^UTILITY(U,$J,358.3,27822,0)
;;=G0396^^92^1162^3^^^^1
;;^UTILITY(U,$J,358.3,27822,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27822,1,2,0)
;;=2^Alcohol/Subs Intvn,15-30 min
;;^UTILITY(U,$J,358.3,27822,1,4,0)
;;=4^G0396
;;^UTILITY(U,$J,358.3,27823,0)
;;=G0397^^92^1162^4^^^^1
;;^UTILITY(U,$J,358.3,27823,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27823,1,2,0)
;;=2^Alcohol/Subs Intvn,30+ min
;;^UTILITY(U,$J,358.3,27823,1,4,0)
;;=4^G0397
;;^UTILITY(U,$J,358.3,27824,0)
;;=G0406^^92^1162^38^^^^1
;;^UTILITY(U,$J,358.3,27824,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27824,1,2,0)
;;=2^Inpt F/U up to 15 min
;;^UTILITY(U,$J,358.3,27824,1,4,0)
;;=4^G0406
;;^UTILITY(U,$J,358.3,27825,0)
;;=G0407^^92^1162^39^^^^1
;;^UTILITY(U,$J,358.3,27825,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27825,1,2,0)
;;=2^Inpt F/U up to 25 min
;;^UTILITY(U,$J,358.3,27825,1,4,0)
;;=4^G0407
;;^UTILITY(U,$J,358.3,27826,0)
;;=G0408^^92^1162^40^^^^1
;;^UTILITY(U,$J,358.3,27826,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27826,1,2,0)
;;=2^Inpt F/U up to 35 min
;;^UTILITY(U,$J,358.3,27826,1,4,0)
;;=4^G0408
;;^UTILITY(U,$J,358.3,27827,0)
;;=G0425^^92^1162^24^^^^1
;;^UTILITY(U,$J,358.3,27827,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27827,1,2,0)
;;=2^Educ Svc for CKD,Ind,per hr
;;^UTILITY(U,$J,358.3,27827,1,4,0)
;;=4^G0425
;;^UTILITY(U,$J,358.3,27828,0)
;;=G0426^^92^1162^23^^^^1
;;^UTILITY(U,$J,358.3,27828,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27828,1,2,0)
;;=2^Educ Svc for CKD,Grp,per hr
;;^UTILITY(U,$J,358.3,27828,1,4,0)
;;=4^G0426
;;^UTILITY(U,$J,358.3,27829,0)
;;=G0425^^92^1162^20^^^^1
;;^UTILITY(U,$J,358.3,27829,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27829,1,2,0)
;;=2^ED Tele-Consult,30 min
;;^UTILITY(U,$J,358.3,27829,1,4,0)
;;=4^G0425
;;^UTILITY(U,$J,358.3,27830,0)
;;=G0426^^92^1162^21^^^^1
;;^UTILITY(U,$J,358.3,27830,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27830,1,2,0)
;;=2^ED Tele-Consult,50 min
;;^UTILITY(U,$J,358.3,27830,1,4,0)
;;=4^G0426
;;^UTILITY(U,$J,358.3,27831,0)
;;=G0427^^92^1162^22^^^^1
;;^UTILITY(U,$J,358.3,27831,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27831,1,2,0)
;;=2^ED Tele-Consult,70 min
;;^UTILITY(U,$J,358.3,27831,1,4,0)
;;=4^G0427
;;^UTILITY(U,$J,358.3,27832,0)
;;=G0438^^92^1162^8^^^^1
;;^UTILITY(U,$J,358.3,27832,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27832,1,2,0)
;;=2^Annual Wellness Visit w/ PPPS,Init Visit
;;^UTILITY(U,$J,358.3,27832,1,4,0)
;;=4^G0438
;;^UTILITY(U,$J,358.3,27833,0)
;;=G0439^^92^1162^9^^^^1
;;^UTILITY(U,$J,358.3,27833,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27833,1,2,0)
;;=2^Annual Wellness Visit w/ PPPS,Subq Visit
;;^UTILITY(U,$J,358.3,27833,1,4,0)
;;=4^G0439
;;^UTILITY(U,$J,358.3,27834,0)
;;=G0442^^92^1162^5^^^^1
;;^UTILITY(U,$J,358.3,27834,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27834,1,2,0)
;;=2^Annual Alcohol Screen,15 min
;;^UTILITY(U,$J,358.3,27834,1,4,0)
;;=4^G0442
;;^UTILITY(U,$J,358.3,27835,0)
;;=G0443^^92^1162^14^^^^1
;;^UTILITY(U,$J,358.3,27835,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27835,1,2,0)
;;=2^Brief Alcohol Misuse Counsel,15 min
;;^UTILITY(U,$J,358.3,27835,1,4,0)
;;=4^G0443
;;^UTILITY(U,$J,358.3,27836,0)
;;=G0444^^92^1162^6^^^^1
;;^UTILITY(U,$J,358.3,27836,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,27836,1,2,0)
;;=2^Annual Depression Screen,15 min
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HIBDEI0BB 19780 printed Apr 09, 2024@20:52:46 Page 2
IBDEI0BB ; ; 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,27756,1,3,0)
+2 ;;=3^Unvaccinated for COVID-19
+3 ;;^UTILITY(U,$J,358.3,27756,1,4,0)
+4 ;;=4^Z28.310
+5 ;;^UTILITY(U,$J,358.3,27756,2)
+6 ;;=^5161576
+7 ;;^UTILITY(U,$J,358.3,27757,0)
+8 ;;=Z28.311^^91^1160^1
+9 ;;^UTILITY(U,$J,358.3,27757,1,0)
+10 ;;=^358.31IA^4^2
+11 ;;^UTILITY(U,$J,358.3,27757,1,3,0)
+12 ;;=3^Partially Vaccinated for COVID-19
+13 ;;^UTILITY(U,$J,358.3,27757,1,4,0)
+14 ;;=4^Z28.311
+15 ;;^UTILITY(U,$J,358.3,27757,2)
+16 ;;=^5161577
+17 ;;^UTILITY(U,$J,358.3,27758,0)
+18 ;;=Z28.39^^91^1160^2
+19 ;;^UTILITY(U,$J,358.3,27758,1,0)
+20 ;;=^358.31IA^4^2
+21 ;;^UTILITY(U,$J,358.3,27758,1,3,0)
+22 ;;=3^Underimmunization Status,Other
+23 ;;^UTILITY(U,$J,358.3,27758,1,4,0)
+24 ;;=4^Z28.39
+25 ;;^UTILITY(U,$J,358.3,27758,2)
+26 ;;=^5161578
+27 ;;^UTILITY(U,$J,358.3,27759,0)
+28 ;;=R45.851^^91^1161^3
+29 ;;^UTILITY(U,$J,358.3,27759,1,0)
+30 ;;=^358.31IA^4^2
+31 ;;^UTILITY(U,$J,358.3,27759,1,3,0)
+32 ;;=3^Suicidal Ideations
+33 ;;^UTILITY(U,$J,358.3,27759,1,4,0)
+34 ;;=4^R45.851
+35 ;;^UTILITY(U,$J,358.3,27759,2)
+36 ;;=^5019474
+37 ;;^UTILITY(U,$J,358.3,27760,0)
+38 ;;=T14.91XA^^91^1161^4
+39 ;;^UTILITY(U,$J,358.3,27760,1,0)
+40 ;;=^358.31IA^4^2
+41 ;;^UTILITY(U,$J,358.3,27760,1,3,0)
+42 ;;=3^Suicide Attempt,Initial Encntr
+43 ;;^UTILITY(U,$J,358.3,27760,1,4,0)
+44 ;;=4^T14.91XA
+45 ;;^UTILITY(U,$J,358.3,27760,2)
+46 ;;=^5151779
+47 ;;^UTILITY(U,$J,358.3,27761,0)
+48 ;;=T14.91XD^^91^1161^6
+49 ;;^UTILITY(U,$J,358.3,27761,1,0)
+50 ;;=^358.31IA^4^2
+51 ;;^UTILITY(U,$J,358.3,27761,1,3,0)
+52 ;;=3^Suicide Attempt,Subsequent Encntr
+53 ;;^UTILITY(U,$J,358.3,27761,1,4,0)
+54 ;;=4^T14.91XD
+55 ;;^UTILITY(U,$J,358.3,27761,2)
+56 ;;=^5151780
+57 ;;^UTILITY(U,$J,358.3,27762,0)
+58 ;;=T14.91XS^^91^1161^5
+59 ;;^UTILITY(U,$J,358.3,27762,1,0)
+60 ;;=^358.31IA^4^2
+61 ;;^UTILITY(U,$J,358.3,27762,1,3,0)
+62 ;;=3^Suicide Attempt,Sequela
+63 ;;^UTILITY(U,$J,358.3,27762,1,4,0)
+64 ;;=4^T14.91XS
+65 ;;^UTILITY(U,$J,358.3,27762,2)
+66 ;;=^5151781
+67 ;;^UTILITY(U,$J,358.3,27763,0)
+68 ;;=Z91.52^^91^1161^1
+69 ;;^UTILITY(U,$J,358.3,27763,1,0)
+70 ;;=^358.31IA^4^2
+71 ;;^UTILITY(U,$J,358.3,27763,1,3,0)
+72 ;;=3^Personal Hx of Non-Suicidal Self-Harm
+73 ;;^UTILITY(U,$J,358.3,27763,1,4,0)
+74 ;;=4^Z91.52
+75 ;;^UTILITY(U,$J,358.3,27763,2)
+76 ;;=^5161318
+77 ;;^UTILITY(U,$J,358.3,27764,0)
+78 ;;=Z91.51^^91^1161^2
+79 ;;^UTILITY(U,$J,358.3,27764,1,0)
+80 ;;=^358.31IA^4^2
+81 ;;^UTILITY(U,$J,358.3,27764,1,3,0)
+82 ;;=3^Personal Hx of Suicidal Behavior
+83 ;;^UTILITY(U,$J,358.3,27764,1,4,0)
+84 ;;=4^Z91.51
+85 ;;^UTILITY(U,$J,358.3,27764,2)
+86 ;;=^5161317
+87 ;;^UTILITY(U,$J,358.3,27765,0)
+88 ;;=90785^^92^1162^68^^^^1
+89 ;;^UTILITY(U,$J,358.3,27765,1,0)
+90 ;;=^358.31IA^4^2
+91 ;;^UTILITY(U,$J,358.3,27765,1,2,0)
+92 ;;=2^Psytx Complex Interactive
+93 ;;^UTILITY(U,$J,358.3,27765,1,4,0)
+94 ;;=4^90785
+95 ;;^UTILITY(U,$J,358.3,27766,0)
+96 ;;=90791^^92^1162^60^^^^1
+97 ;;^UTILITY(U,$J,358.3,27766,1,0)
+98 ;;=^358.31IA^4^2
+99 ;;^UTILITY(U,$J,358.3,27766,1,2,0)
+100 ;;=2^Psych Diagnostic Evaluation
+101 ;;^UTILITY(U,$J,358.3,27766,1,4,0)
+102 ;;=4^90791
+103 ;;^UTILITY(U,$J,358.3,27767,0)
+104 ;;=90792^^92^1162^59^^^^1
+105 ;;^UTILITY(U,$J,358.3,27767,1,0)
+106 ;;=^358.31IA^4^2
+107 ;;^UTILITY(U,$J,358.3,27767,1,2,0)
+108 ;;=2^Psych Diag Eval w/ Med Svcs
+109 ;;^UTILITY(U,$J,358.3,27767,1,4,0)
+110 ;;=4^90792
+111 ;;^UTILITY(U,$J,358.3,27768,0)
+112 ;;=90832^^92^1162^74^^^^1
+113 ;;^UTILITY(U,$J,358.3,27768,1,0)
+114 ;;=^358.31IA^4^2
+115 ;;^UTILITY(U,$J,358.3,27768,1,2,0)
+116 ;;=2^Psytx w/ Pt,30 min
+117 ;;^UTILITY(U,$J,358.3,27768,1,4,0)
+118 ;;=4^90832
+119 ;;^UTILITY(U,$J,358.3,27769,0)
+120 ;;=90833^^92^1162^71^^^^1
+121 ;;^UTILITY(U,$J,358.3,27769,1,0)
+122 ;;=^358.31IA^4^2
+123 ;;^UTILITY(U,$J,358.3,27769,1,2,0)
+124 ;;=2^Psytx w/ Pt w/ E&M,30 min
+125 ;;^UTILITY(U,$J,358.3,27769,1,4,0)
+126 ;;=4^90833
+127 ;;^UTILITY(U,$J,358.3,27770,0)
+128 ;;=90834^^92^1162^75^^^^1
+129 ;;^UTILITY(U,$J,358.3,27770,1,0)
+130 ;;=^358.31IA^4^2
+131 ;;^UTILITY(U,$J,358.3,27770,1,2,0)
+132 ;;=2^Psytx w/ Pt,45 min
+133 ;;^UTILITY(U,$J,358.3,27770,1,4,0)
+134 ;;=4^90834
+135 ;;^UTILITY(U,$J,358.3,27771,0)
+136 ;;=90836^^92^1162^72^^^^1
+137 ;;^UTILITY(U,$J,358.3,27771,1,0)
+138 ;;=^358.31IA^4^2
+139 ;;^UTILITY(U,$J,358.3,27771,1,2,0)
+140 ;;=2^Psytx w/ Pt w/ E&M,45 min
+141 ;;^UTILITY(U,$J,358.3,27771,1,4,0)
+142 ;;=4^90836
+143 ;;^UTILITY(U,$J,358.3,27772,0)
+144 ;;=90837^^92^1162^76^^^^1
+145 ;;^UTILITY(U,$J,358.3,27772,1,0)
+146 ;;=^358.31IA^4^2
+147 ;;^UTILITY(U,$J,358.3,27772,1,2,0)
+148 ;;=2^Psytx w/ Pt,60 min
+149 ;;^UTILITY(U,$J,358.3,27772,1,4,0)
+150 ;;=4^90837
+151 ;;^UTILITY(U,$J,358.3,27773,0)
+152 ;;=90838^^92^1162^73^^^^1
+153 ;;^UTILITY(U,$J,358.3,27773,1,0)
+154 ;;=^358.31IA^4^2
+155 ;;^UTILITY(U,$J,358.3,27773,1,2,0)
+156 ;;=2^Psytx w/ Pt w/ E&M,60 min
+157 ;;^UTILITY(U,$J,358.3,27773,1,4,0)
+158 ;;=4^90838
+159 ;;^UTILITY(U,$J,358.3,27774,0)
+160 ;;=90839^^92^1162^69^^^^1
+161 ;;^UTILITY(U,$J,358.3,27774,1,0)
+162 ;;=^358.31IA^4^2
+163 ;;^UTILITY(U,$J,358.3,27774,1,2,0)
+164 ;;=2^Psytx Crisis,1st 60 min
+165 ;;^UTILITY(U,$J,358.3,27774,1,4,0)
+166 ;;=4^90839
+167 ;;^UTILITY(U,$J,358.3,27775,0)
+168 ;;=90840^^92^1162^70^^^^1
+169 ;;^UTILITY(U,$J,358.3,27775,1,0)
+170 ;;=^358.31IA^4^2
+171 ;;^UTILITY(U,$J,358.3,27775,1,2,0)
+172 ;;=2^Psytx Crisis,Ea Addl 30 min
+173 ;;^UTILITY(U,$J,358.3,27775,1,4,0)
+174 ;;=4^90840
+175 ;;^UTILITY(U,$J,358.3,27776,0)
+176 ;;=90845^^92^1162^67^^^^1
+177 ;;^UTILITY(U,$J,358.3,27776,1,0)
+178 ;;=^358.31IA^4^2
+179 ;;^UTILITY(U,$J,358.3,27776,1,2,0)
+180 ;;=2^Psychoanalysis
+181 ;;^UTILITY(U,$J,358.3,27776,1,4,0)
+182 ;;=4^90845
+183 ;;^UTILITY(U,$J,358.3,27777,0)
+184 ;;=90846^^92^1162^28^^^^1
+185 ;;^UTILITY(U,$J,358.3,27777,1,0)
+186 ;;=^358.31IA^4^2
+187 ;;^UTILITY(U,$J,358.3,27777,1,2,0)
+188 ;;=2^Family Psytx w/o Pt,50 min
+189 ;;^UTILITY(U,$J,358.3,27777,1,4,0)
+190 ;;=4^90846
+191 ;;^UTILITY(U,$J,358.3,27778,0)
+192 ;;=90847^^92^1162^27^^^^1
+193 ;;^UTILITY(U,$J,358.3,27778,1,0)
+194 ;;=^358.31IA^4^2
+195 ;;^UTILITY(U,$J,358.3,27778,1,2,0)
+196 ;;=2^Family Psytx w/ Pt,50 min
+197 ;;^UTILITY(U,$J,358.3,27778,1,4,0)
+198 ;;=4^90847
+199 ;;^UTILITY(U,$J,358.3,27779,0)
+200 ;;=90853^^92^1162^29^^^^1
+201 ;;^UTILITY(U,$J,358.3,27779,1,0)
+202 ;;=^358.31IA^4^2
+203 ;;^UTILITY(U,$J,358.3,27779,1,2,0)
+204 ;;=2^Group Psychotherapy
+205 ;;^UTILITY(U,$J,358.3,27779,1,4,0)
+206 ;;=4^90853
+207 ;;^UTILITY(U,$J,358.3,27780,0)
+208 ;;=92507^^92^1162^81^^^^1
+209 ;;^UTILITY(U,$J,358.3,27780,1,0)
+210 ;;=^358.31IA^4^2
+211 ;;^UTILITY(U,$J,358.3,27780,1,2,0)
+212 ;;=2^Speech/Hearing Therapy,Ind
+213 ;;^UTILITY(U,$J,358.3,27780,1,4,0)
+214 ;;=4^92507
+215 ;;^UTILITY(U,$J,358.3,27781,0)
+216 ;;=92508^^92^1162^80^^^^1
+217 ;;^UTILITY(U,$J,358.3,27781,1,0)
+218 ;;=^358.31IA^4^2
+219 ;;^UTILITY(U,$J,358.3,27781,1,2,0)
+220 ;;=2^Speech/Hearing Therapy,Grp
+221 ;;^UTILITY(U,$J,358.3,27781,1,4,0)
+222 ;;=4^92508
+223 ;;^UTILITY(U,$J,358.3,27782,0)
+224 ;;=92521^^92^1162^26^^^^1
+225 ;;^UTILITY(U,$J,358.3,27782,1,0)
+226 ;;=^358.31IA^4^2
+227 ;;^UTILITY(U,$J,358.3,27782,1,2,0)
+228 ;;=2^Eval of Speech Fluency
+229 ;;^UTILITY(U,$J,358.3,27782,1,4,0)
+230 ;;=4^92521
+231 ;;^UTILITY(U,$J,358.3,27783,0)
+232 ;;=92522^^92^1162^25^^^^1
+233 ;;^UTILITY(U,$J,358.3,27783,1,0)
+234 ;;=^358.31IA^4^2
+235 ;;^UTILITY(U,$J,358.3,27783,1,2,0)
+236 ;;=2^Eval Speech Production
+237 ;;^UTILITY(U,$J,358.3,27783,1,4,0)
+238 ;;=4^92522
+239 ;;^UTILITY(U,$J,358.3,27784,0)
+240 ;;=92523^^92^1162^79^^^^1
+241 ;;^UTILITY(U,$J,358.3,27784,1,0)
+242 ;;=^358.31IA^4^2
+243 ;;^UTILITY(U,$J,358.3,27784,1,2,0)
+244 ;;=2^Speech Sound Lang Comprehen
+245 ;;^UTILITY(U,$J,358.3,27784,1,4,0)
+246 ;;=4^92523
+247 ;;^UTILITY(U,$J,358.3,27785,0)
+248 ;;=92524^^92^1162^10^^^^1
+249 ;;^UTILITY(U,$J,358.3,27785,1,0)
+250 ;;=^358.31IA^4^2
+251 ;;^UTILITY(U,$J,358.3,27785,1,2,0)
+252 ;;=2^Behav Qual Analys Voice
+253 ;;^UTILITY(U,$J,358.3,27785,1,4,0)
+254 ;;=4^92524
+255 ;;^UTILITY(U,$J,358.3,27786,0)
+256 ;;=96116^^92^1162^48^^^^1
+257 ;;^UTILITY(U,$J,358.3,27786,1,0)
+258 ;;=^358.31IA^4^2
+259 ;;^UTILITY(U,$J,358.3,27786,1,2,0)
+260 ;;=2^Nubhvl XM Phys/QHP,1st Hr
+261 ;;^UTILITY(U,$J,358.3,27786,1,4,0)
+262 ;;=4^96116
+263 ;;^UTILITY(U,$J,358.3,27787,0)
+264 ;;=96121^^92^1162^49^^^^1
+265 ;;^UTILITY(U,$J,358.3,27787,1,0)
+266 ;;=^358.31IA^4^2
+267 ;;^UTILITY(U,$J,358.3,27787,1,2,0)
+268 ;;=2^Nubhvl XM Phys/QHP,Ea Addl Hr
+269 ;;^UTILITY(U,$J,358.3,27787,1,4,0)
+270 ;;=4^96121
+271 ;;^UTILITY(U,$J,358.3,27788,0)
+272 ;;=96127^^92^1162^15^^^^1
+273 ;;^UTILITY(U,$J,358.3,27788,1,0)
+274 ;;=^358.31IA^4^2
+275 ;;^UTILITY(U,$J,358.3,27788,1,2,0)
+276 ;;=2^Brief Emotional/Behav Assmt
+277 ;;^UTILITY(U,$J,358.3,27788,1,4,0)
+278 ;;=4^96127
+279 ;;^UTILITY(U,$J,358.3,27789,0)
+280 ;;=96130^^92^1162^61^^^^1
+281 ;;^UTILITY(U,$J,358.3,27789,1,0)
+282 ;;=^358.31IA^4^2
+283 ;;^UTILITY(U,$J,358.3,27789,1,2,0)
+284 ;;=2^Psych Tst Eval Phys/QHP,1st Hr
+285 ;;^UTILITY(U,$J,358.3,27789,1,4,0)
+286 ;;=4^96130
+287 ;;^UTILITY(U,$J,358.3,27790,0)
+288 ;;=96131^^92^1162^62^^^^1
+289 ;;^UTILITY(U,$J,358.3,27790,1,0)
+290 ;;=^358.31IA^4^2
+291 ;;^UTILITY(U,$J,358.3,27790,1,2,0)
+292 ;;=2^Psych Tst Eval Phys/QHP,Ea Addl Hr
+293 ;;^UTILITY(U,$J,358.3,27790,1,4,0)
+294 ;;=4^96131
+295 ;;^UTILITY(U,$J,358.3,27791,0)
+296 ;;=96132^^92^1162^46^^^^1
+297 ;;^UTILITY(U,$J,358.3,27791,1,0)
+298 ;;=^358.31IA^4^2
+299 ;;^UTILITY(U,$J,358.3,27791,1,2,0)
+300 ;;=2^Nrpsych Tst Eval Phys/QHP,1st Hr
+301 ;;^UTILITY(U,$J,358.3,27791,1,4,0)
+302 ;;=4^96132
+303 ;;^UTILITY(U,$J,358.3,27792,0)
+304 ;;=96133^^92^1162^47^^^^1
+305 ;;^UTILITY(U,$J,358.3,27792,1,0)
+306 ;;=^358.31IA^4^2
+307 ;;^UTILITY(U,$J,358.3,27792,1,2,0)
+308 ;;=2^Nrpsych Tst Eval Phys/QHP,Ea Addl Hr
+309 ;;^UTILITY(U,$J,358.3,27792,1,4,0)
+310 ;;=4^96133
+311 ;;^UTILITY(U,$J,358.3,27793,0)
+312 ;;=96136^^92^1162^63^^^^1
+313 ;;^UTILITY(U,$J,358.3,27793,1,0)
+314 ;;=^358.31IA^4^2
+315 ;;^UTILITY(U,$J,358.3,27793,1,2,0)
+316 ;;=2^Psych/Nrpsych Tst Eval Phys/QHP,1st Hr
+317 ;;^UTILITY(U,$J,358.3,27793,1,4,0)
+318 ;;=4^96136
+319 ;;^UTILITY(U,$J,358.3,27794,0)
+320 ;;=96137^^92^1162^64^^^^1
+321 ;;^UTILITY(U,$J,358.3,27794,1,0)
+322 ;;=^358.31IA^4^2
+323 ;;^UTILITY(U,$J,358.3,27794,1,2,0)
+324 ;;=2^Psych/Nrpsych Tst Eval Phys/QHP,Ea Addl Hr
+325 ;;^UTILITY(U,$J,358.3,27794,1,4,0)
+326 ;;=4^96137
+327 ;;^UTILITY(U,$J,358.3,27795,0)
+328 ;;=96138^^92^1162^65^^^^1
+329 ;;^UTILITY(U,$J,358.3,27795,1,0)
+330 ;;=^358.31IA^4^2
+331 ;;^UTILITY(U,$J,358.3,27795,1,2,0)
+332 ;;=2^Psych/Nrpsych Tst by Tech,1st 30 min
+333 ;;^UTILITY(U,$J,358.3,27795,1,4,0)
+334 ;;=4^96138
+335 ;;^UTILITY(U,$J,358.3,27796,0)
+336 ;;=96139^^92^1162^66^^^^1
+337 ;;^UTILITY(U,$J,358.3,27796,1,0)
+338 ;;=^358.31IA^4^2
+339 ;;^UTILITY(U,$J,358.3,27796,1,2,0)
+340 ;;=2^Psych/Nrpsych Tst by Tech,Ea Addl 30 min
+341 ;;^UTILITY(U,$J,358.3,27796,1,4,0)
+342 ;;=4^96139
+343 ;;^UTILITY(U,$J,358.3,27797,0)
+344 ;;=96156^^92^1162^31^^^^1
+345 ;;^UTILITY(U,$J,358.3,27797,1,0)
+346 ;;=^358.31IA^4^2
+347 ;;^UTILITY(U,$J,358.3,27797,1,2,0)
+348 ;;=2^Hlth Bhv Assmt/Re-Assmt
+349 ;;^UTILITY(U,$J,358.3,27797,1,4,0)
+350 ;;=4^96156
+351 ;;^UTILITY(U,$J,358.3,27798,0)
+352 ;;=96158^^92^1162^36^^^^1
+353 ;;^UTILITY(U,$J,358.3,27798,1,0)
+354 ;;=^358.31IA^4^2
+355 ;;^UTILITY(U,$J,358.3,27798,1,2,0)
+356 ;;=2^Hlth Bhv Intvn,Ind,1st 30 min
+357 ;;^UTILITY(U,$J,358.3,27798,1,4,0)
+358 ;;=4^96158
+359 ;;^UTILITY(U,$J,358.3,27799,0)
+360 ;;=96159^^92^1162^37^^^^1
+361 ;;^UTILITY(U,$J,358.3,27799,1,0)
+362 ;;=^358.31IA^4^2
+363 ;;^UTILITY(U,$J,358.3,27799,1,2,0)
+364 ;;=2^Hlth Bhv Intvn,Ind,Ea Addl 30 min
+365 ;;^UTILITY(U,$J,358.3,27799,1,4,0)
+366 ;;=4^96159
+367 ;;^UTILITY(U,$J,358.3,27800,0)
+368 ;;=96160^^92^1162^77^^^^1
+369 ;;^UTILITY(U,$J,358.3,27800,1,0)
+370 ;;=^358.31IA^4^2
+371 ;;^UTILITY(U,$J,358.3,27800,1,2,0)
+372 ;;=2^Pt Focused Hlth Risk Assmt
+373 ;;^UTILITY(U,$J,358.3,27800,1,4,0)
+374 ;;=4^96160
+375 ;;^UTILITY(U,$J,358.3,27801,0)
+376 ;;=96161^^92^1162^16^^^^1
+377 ;;^UTILITY(U,$J,358.3,27801,1,0)
+378 ;;=^358.31IA^4^2
+379 ;;^UTILITY(U,$J,358.3,27801,1,2,0)
+380 ;;=2^Caregiver Hlth Risk Assmt
+381 ;;^UTILITY(U,$J,358.3,27801,1,4,0)
+382 ;;=4^96161
+383 ;;^UTILITY(U,$J,358.3,27802,0)
+384 ;;=96164^^92^1162^34^^^^1
+385 ;;^UTILITY(U,$J,358.3,27802,1,0)
+386 ;;=^358.31IA^4^2
+387 ;;^UTILITY(U,$J,358.3,27802,1,2,0)
+388 ;;=2^Hlth Bhv Intvn,Grp,1st 30 min
+389 ;;^UTILITY(U,$J,358.3,27802,1,4,0)
+390 ;;=4^96164
+391 ;;^UTILITY(U,$J,358.3,27803,0)
+392 ;;=96165^^92^1162^35^^^^1
+393 ;;^UTILITY(U,$J,358.3,27803,1,0)
+394 ;;=^358.31IA^4^2
+395 ;;^UTILITY(U,$J,358.3,27803,1,2,0)
+396 ;;=2^Hlth Bhv Intvn,Grp,Ea Addl 30 min
+397 ;;^UTILITY(U,$J,358.3,27803,1,4,0)
+398 ;;=4^96165
+399 ;;^UTILITY(U,$J,358.3,27804,0)
+400 ;;=96167^^92^1162^32^^^^1
+401 ;;^UTILITY(U,$J,358.3,27804,1,0)
+402 ;;=^358.31IA^4^2
+403 ;;^UTILITY(U,$J,358.3,27804,1,2,0)
+404 ;;=2^Hlth Bhv Intvn,Fam,1st 30 min
+405 ;;^UTILITY(U,$J,358.3,27804,1,4,0)
+406 ;;=4^96167
+407 ;;^UTILITY(U,$J,358.3,27805,0)
+408 ;;=96168^^92^1162^33^^^^1
+409 ;;^UTILITY(U,$J,358.3,27805,1,0)
+410 ;;=^358.31IA^4^2
+411 ;;^UTILITY(U,$J,358.3,27805,1,2,0)
+412 ;;=2^Hlth Bhv Intvn,Fam,Ea Addl 30 min
+413 ;;^UTILITY(U,$J,358.3,27805,1,4,0)
+414 ;;=4^96168
+415 ;;^UTILITY(U,$J,358.3,27806,0)
+416 ;;=97535^^92^1162^78^^^^1
+417 ;;^UTILITY(U,$J,358.3,27806,1,0)
+418 ;;=^358.31IA^4^2
+419 ;;^UTILITY(U,$J,358.3,27806,1,2,0)
+420 ;;=2^Self Care Mgmt Training
+421 ;;^UTILITY(U,$J,358.3,27806,1,4,0)
+422 ;;=4^97535
+423 ;;^UTILITY(U,$J,358.3,27807,0)
+424 ;;=97802^^92^1162^42^^^^1
+425 ;;^UTILITY(U,$J,358.3,27807,1,0)
+426 ;;=^358.31IA^4^2
+427 ;;^UTILITY(U,$J,358.3,27807,1,2,0)
+428 ;;=2^Med Nutr,Ind,Init Intvn,Ea 15 min
+429 ;;^UTILITY(U,$J,358.3,27807,1,4,0)
+430 ;;=4^97802
+431 ;;^UTILITY(U,$J,358.3,27808,0)
+432 ;;=97803^^92^1162^43^^^^1
+433 ;;^UTILITY(U,$J,358.3,27808,1,0)
+434 ;;=^358.31IA^4^2
+435 ;;^UTILITY(U,$J,358.3,27808,1,2,0)
+436 ;;=2^Med Nutr,Ind,Re-Assmt/Intrvn,Ea 15 min
+437 ;;^UTILITY(U,$J,358.3,27808,1,4,0)
+438 ;;=4^97803
+439 ;;^UTILITY(U,$J,358.3,27809,0)
+440 ;;=97804^^92^1162^45^^^^1
+441 ;;^UTILITY(U,$J,358.3,27809,1,0)
+442 ;;=^358.31IA^4^2
+443 ;;^UTILITY(U,$J,358.3,27809,1,2,0)
+444 ;;=2^Medical Nutrition Grp,Ea 30 min
+445 ;;^UTILITY(U,$J,358.3,27809,1,4,0)
+446 ;;=4^97804
+447 ;;^UTILITY(U,$J,358.3,27810,0)
+448 ;;=99354^^92^1162^55^^^^1
+449 ;;^UTILITY(U,$J,358.3,27810,1,0)
+450 ;;=^358.31IA^4^2
+451 ;;^UTILITY(U,$J,358.3,27810,1,2,0)
+452 ;;=2^Prolong Outpt E&M Svc,1st hr
+453 ;;^UTILITY(U,$J,358.3,27810,1,4,0)
+454 ;;=4^99354
+455 ;;^UTILITY(U,$J,358.3,27811,0)
+456 ;;=99355^^92^1162^56^^^^1
+457 ;;^UTILITY(U,$J,358.3,27811,1,0)
+458 ;;=^358.31IA^4^2
+459 ;;^UTILITY(U,$J,358.3,27811,1,2,0)
+460 ;;=2^Prolong Outpt E&M Svc,Ea Addl 30 min
+461 ;;^UTILITY(U,$J,358.3,27811,1,4,0)
+462 ;;=4^99355
+463 ;;^UTILITY(U,$J,358.3,27812,0)
+464 ;;=99356^^92^1162^53^^^^1
+465 ;;^UTILITY(U,$J,358.3,27812,1,0)
+466 ;;=^358.31IA^4^2
+467 ;;^UTILITY(U,$J,358.3,27812,1,2,0)
+468 ;;=2^Prolong Inpt E&M Svc,1st hr
+469 ;;^UTILITY(U,$J,358.3,27812,1,4,0)
+470 ;;=4^99356
+471 ;;^UTILITY(U,$J,358.3,27813,0)
+472 ;;=99357^^92^1162^54^^^^1
+473 ;;^UTILITY(U,$J,358.3,27813,1,0)
+474 ;;=^358.31IA^4^2
+475 ;;^UTILITY(U,$J,358.3,27813,1,2,0)
+476 ;;=2^Prolong Inpt E&M Svc,Ea Addl 30 min
+477 ;;^UTILITY(U,$J,358.3,27813,1,4,0)
+478 ;;=4^99357
+479 ;;^UTILITY(U,$J,358.3,27814,0)
+480 ;;=99406^^92^1162^11^^^^1
+481 ;;^UTILITY(U,$J,358.3,27814,1,0)
+482 ;;=^358.31IA^4^2
+483 ;;^UTILITY(U,$J,358.3,27814,1,2,0)
+484 ;;=2^Behv Change,Smoking,3-10 min
+485 ;;^UTILITY(U,$J,358.3,27814,1,4,0)
+486 ;;=4^99406
+487 ;;^UTILITY(U,$J,358.3,27815,0)
+488 ;;=99407^^92^1162^12^^^^1
+489 ;;^UTILITY(U,$J,358.3,27815,1,0)
+490 ;;=^358.31IA^4^2
+491 ;;^UTILITY(U,$J,358.3,27815,1,2,0)
+492 ;;=2^Behv Change,Smoking,10+ min
+493 ;;^UTILITY(U,$J,358.3,27815,1,4,0)
+494 ;;=4^99407
+495 ;;^UTILITY(U,$J,358.3,27816,0)
+496 ;;=99497^^92^1162^1^^^^1
+497 ;;^UTILITY(U,$J,358.3,27816,1,0)
+498 ;;=^358.31IA^4^2
+499 ;;^UTILITY(U,$J,358.3,27816,1,2,0)
+500 ;;=2^Advncd Care Plan,1st 30 min
+501 ;;^UTILITY(U,$J,358.3,27816,1,4,0)
+502 ;;=4^99497
+503 ;;^UTILITY(U,$J,358.3,27817,0)
+504 ;;=99498^^92^1162^2^^^^1
+505 ;;^UTILITY(U,$J,358.3,27817,1,0)
+506 ;;=^358.31IA^4^2
+507 ;;^UTILITY(U,$J,358.3,27817,1,2,0)
+508 ;;=2^Advncd Care Plan,Ea Addl 30 min
+509 ;;^UTILITY(U,$J,358.3,27817,1,4,0)
+510 ;;=4^99498
+511 ;;^UTILITY(U,$J,358.3,27818,0)
+512 ;;=G0108^^92^1162^19^^^^1
+513 ;;^UTILITY(U,$J,358.3,27818,1,0)
+514 ;;=^358.31IA^4^2
+515 ;;^UTILITY(U,$J,358.3,27818,1,2,0)
+516 ;;=2^Diab Mgmt Trning,Ind,Ea 30 min
+517 ;;^UTILITY(U,$J,358.3,27818,1,4,0)
+518 ;;=4^G0108
+519 ;;^UTILITY(U,$J,358.3,27819,0)
+520 ;;=G0109^^92^1162^18^^^^1
+521 ;;^UTILITY(U,$J,358.3,27819,1,0)
+522 ;;=^358.31IA^4^2
+523 ;;^UTILITY(U,$J,358.3,27819,1,2,0)
+524 ;;=2^Diab Mgmt Trning,Grp,Ea 30 min
+525 ;;^UTILITY(U,$J,358.3,27819,1,4,0)
+526 ;;=4^G0109
+527 ;;^UTILITY(U,$J,358.3,27820,0)
+528 ;;=G0270^^92^1162^44^^^^1
+529 ;;^UTILITY(U,$J,358.3,27820,1,0)
+530 ;;=^358.31IA^4^2
+531 ;;^UTILITY(U,$J,358.3,27820,1,2,0)
+532 ;;=2^Med Nutr,Re-Assmt New Dx,Ea 15 min
+533 ;;^UTILITY(U,$J,358.3,27820,1,4,0)
+534 ;;=4^G0270
+535 ;;^UTILITY(U,$J,358.3,27821,0)
+536 ;;=G0296^^92^1162^82^^^^1
+537 ;;^UTILITY(U,$J,358.3,27821,1,0)
+538 ;;=^358.31IA^4^2
+539 ;;^UTILITY(U,$J,358.3,27821,1,2,0)
+540 ;;=2^Visit to Determ LDCT Elig
+541 ;;^UTILITY(U,$J,358.3,27821,1,4,0)
+542 ;;=4^G0296
+543 ;;^UTILITY(U,$J,358.3,27822,0)
+544 ;;=G0396^^92^1162^3^^^^1
+545 ;;^UTILITY(U,$J,358.3,27822,1,0)
+546 ;;=^358.31IA^4^2
+547 ;;^UTILITY(U,$J,358.3,27822,1,2,0)
+548 ;;=2^Alcohol/Subs Intvn,15-30 min
+549 ;;^UTILITY(U,$J,358.3,27822,1,4,0)
+550 ;;=4^G0396
+551 ;;^UTILITY(U,$J,358.3,27823,0)
+552 ;;=G0397^^92^1162^4^^^^1
+553 ;;^UTILITY(U,$J,358.3,27823,1,0)
+554 ;;=^358.31IA^4^2
+555 ;;^UTILITY(U,$J,358.3,27823,1,2,0)
+556 ;;=2^Alcohol/Subs Intvn,30+ min
+557 ;;^UTILITY(U,$J,358.3,27823,1,4,0)
+558 ;;=4^G0397
+559 ;;^UTILITY(U,$J,358.3,27824,0)
+560 ;;=G0406^^92^1162^38^^^^1
+561 ;;^UTILITY(U,$J,358.3,27824,1,0)
+562 ;;=^358.31IA^4^2
+563 ;;^UTILITY(U,$J,358.3,27824,1,2,0)
+564 ;;=2^Inpt F/U up to 15 min
+565 ;;^UTILITY(U,$J,358.3,27824,1,4,0)
+566 ;;=4^G0406
+567 ;;^UTILITY(U,$J,358.3,27825,0)
+568 ;;=G0407^^92^1162^39^^^^1
+569 ;;^UTILITY(U,$J,358.3,27825,1,0)
+570 ;;=^358.31IA^4^2
+571 ;;^UTILITY(U,$J,358.3,27825,1,2,0)
+572 ;;=2^Inpt F/U up to 25 min
+573 ;;^UTILITY(U,$J,358.3,27825,1,4,0)
+574 ;;=4^G0407
+575 ;;^UTILITY(U,$J,358.3,27826,0)
+576 ;;=G0408^^92^1162^40^^^^1
+577 ;;^UTILITY(U,$J,358.3,27826,1,0)
+578 ;;=^358.31IA^4^2
+579 ;;^UTILITY(U,$J,358.3,27826,1,2,0)
+580 ;;=2^Inpt F/U up to 35 min
+581 ;;^UTILITY(U,$J,358.3,27826,1,4,0)
+582 ;;=4^G0408
+583 ;;^UTILITY(U,$J,358.3,27827,0)
+584 ;;=G0425^^92^1162^24^^^^1
+585 ;;^UTILITY(U,$J,358.3,27827,1,0)
+586 ;;=^358.31IA^4^2
+587 ;;^UTILITY(U,$J,358.3,27827,1,2,0)
+588 ;;=2^Educ Svc for CKD,Ind,per hr
+589 ;;^UTILITY(U,$J,358.3,27827,1,4,0)
+590 ;;=4^G0425
+591 ;;^UTILITY(U,$J,358.3,27828,0)
+592 ;;=G0426^^92^1162^23^^^^1
+593 ;;^UTILITY(U,$J,358.3,27828,1,0)
+594 ;;=^358.31IA^4^2
+595 ;;^UTILITY(U,$J,358.3,27828,1,2,0)
+596 ;;=2^Educ Svc for CKD,Grp,per hr
+597 ;;^UTILITY(U,$J,358.3,27828,1,4,0)
+598 ;;=4^G0426
+599 ;;^UTILITY(U,$J,358.3,27829,0)
+600 ;;=G0425^^92^1162^20^^^^1
+601 ;;^UTILITY(U,$J,358.3,27829,1,0)
+602 ;;=^358.31IA^4^2
+603 ;;^UTILITY(U,$J,358.3,27829,1,2,0)
+604 ;;=2^ED Tele-Consult,30 min
+605 ;;^UTILITY(U,$J,358.3,27829,1,4,0)
+606 ;;=4^G0425
+607 ;;^UTILITY(U,$J,358.3,27830,0)
+608 ;;=G0426^^92^1162^21^^^^1
+609 ;;^UTILITY(U,$J,358.3,27830,1,0)
+610 ;;=^358.31IA^4^2
+611 ;;^UTILITY(U,$J,358.3,27830,1,2,0)
+612 ;;=2^ED Tele-Consult,50 min
+613 ;;^UTILITY(U,$J,358.3,27830,1,4,0)
+614 ;;=4^G0426
+615 ;;^UTILITY(U,$J,358.3,27831,0)
+616 ;;=G0427^^92^1162^22^^^^1
+617 ;;^UTILITY(U,$J,358.3,27831,1,0)
+618 ;;=^358.31IA^4^2
+619 ;;^UTILITY(U,$J,358.3,27831,1,2,0)
+620 ;;=2^ED Tele-Consult,70 min
+621 ;;^UTILITY(U,$J,358.3,27831,1,4,0)
+622 ;;=4^G0427
+623 ;;^UTILITY(U,$J,358.3,27832,0)
+624 ;;=G0438^^92^1162^8^^^^1
+625 ;;^UTILITY(U,$J,358.3,27832,1,0)
+626 ;;=^358.31IA^4^2
+627 ;;^UTILITY(U,$J,358.3,27832,1,2,0)
+628 ;;=2^Annual Wellness Visit w/ PPPS,Init Visit
+629 ;;^UTILITY(U,$J,358.3,27832,1,4,0)
+630 ;;=4^G0438
+631 ;;^UTILITY(U,$J,358.3,27833,0)
+632 ;;=G0439^^92^1162^9^^^^1
+633 ;;^UTILITY(U,$J,358.3,27833,1,0)
+634 ;;=^358.31IA^4^2
+635 ;;^UTILITY(U,$J,358.3,27833,1,2,0)
+636 ;;=2^Annual Wellness Visit w/ PPPS,Subq Visit
+637 ;;^UTILITY(U,$J,358.3,27833,1,4,0)
+638 ;;=4^G0439
+639 ;;^UTILITY(U,$J,358.3,27834,0)
+640 ;;=G0442^^92^1162^5^^^^1
+641 ;;^UTILITY(U,$J,358.3,27834,1,0)
+642 ;;=^358.31IA^4^2
+643 ;;^UTILITY(U,$J,358.3,27834,1,2,0)
+644 ;;=2^Annual Alcohol Screen,15 min
+645 ;;^UTILITY(U,$J,358.3,27834,1,4,0)
+646 ;;=4^G0442
+647 ;;^UTILITY(U,$J,358.3,27835,0)
+648 ;;=G0443^^92^1162^14^^^^1
+649 ;;^UTILITY(U,$J,358.3,27835,1,0)
+650 ;;=^358.31IA^4^2
+651 ;;^UTILITY(U,$J,358.3,27835,1,2,0)
+652 ;;=2^Brief Alcohol Misuse Counsel,15 min
+653 ;;^UTILITY(U,$J,358.3,27835,1,4,0)
+654 ;;=4^G0443
+655 ;;^UTILITY(U,$J,358.3,27836,0)
+656 ;;=G0444^^92^1162^6^^^^1
+657 ;;^UTILITY(U,$J,358.3,27836,1,0)
+658 ;;=^358.31IA^4^2
+659 ;;^UTILITY(U,$J,358.3,27836,1,2,0)
+660 ;;=2^Annual Depression Screen,15 min
