IBDEI0CM ; ; 03-MAY-2022
;;3.0;IB ENCOUNTER FORM IMP/EXP;;MAY 03, 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,31657,1,2,0)
;;=2^90746
;;^UTILITY(U,$J,358.3,31657,1,3,0)
;;=3^Hepatitis B Vaccine (3 dose)
;;^UTILITY(U,$J,358.3,31658,0)
;;=90636^^93^1288^5^^^^1
;;^UTILITY(U,$J,358.3,31658,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,31658,1,2,0)
;;=2^90636
;;^UTILITY(U,$J,358.3,31658,1,3,0)
;;=3^Hepatitis A&B Vaccine
;;^UTILITY(U,$J,358.3,31659,0)
;;=90707^^93^1288^7^^^^1
;;^UTILITY(U,$J,358.3,31659,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,31659,1,2,0)
;;=2^90707
;;^UTILITY(U,$J,358.3,31659,1,3,0)
;;=3^MMR Vaccine
;;^UTILITY(U,$J,358.3,31660,0)
;;=90658^^93^1288^2^^^^1
;;^UTILITY(U,$J,358.3,31660,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,31660,1,2,0)
;;=2^90658
;;^UTILITY(U,$J,358.3,31660,1,3,0)
;;=3^Flu Vaccine,IM
;;^UTILITY(U,$J,358.3,31661,0)
;;=90732^^93^1288^9^^^^1
;;^UTILITY(U,$J,358.3,31661,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,31661,1,2,0)
;;=2^90732
;;^UTILITY(U,$J,358.3,31661,1,3,0)
;;=3^Pneumococcal Vaccine
;;^UTILITY(U,$J,358.3,31662,0)
;;=90715^^93^1288^11^^^^1
;;^UTILITY(U,$J,358.3,31662,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,31662,1,2,0)
;;=2^90715
;;^UTILITY(U,$J,358.3,31662,1,3,0)
;;=3^Tdap Vaccine
;;^UTILITY(U,$J,358.3,31663,0)
;;=90736^^93^1288^13^^^^1
;;^UTILITY(U,$J,358.3,31663,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,31663,1,2,0)
;;=2^90736
;;^UTILITY(U,$J,358.3,31663,1,3,0)
;;=3^Zoster (Shingles) Vaccine
;;^UTILITY(U,$J,358.3,31664,0)
;;=86580^^93^1288^8^^^^1
;;^UTILITY(U,$J,358.3,31664,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,31664,1,2,0)
;;=2^86580
;;^UTILITY(U,$J,358.3,31664,1,3,0)
;;=3^PPD Skin Test
;;^UTILITY(U,$J,358.3,31665,0)
;;=96372^^93^1288^12^^^^1
;;^UTILITY(U,$J,358.3,31665,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,31665,1,2,0)
;;=2^96372
;;^UTILITY(U,$J,358.3,31665,1,3,0)
;;=3^Ther/Proph/Diag Inj SC/IM
;;^UTILITY(U,$J,358.3,31666,0)
;;=90714^^93^1288^10^^^^1
;;^UTILITY(U,$J,358.3,31666,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,31666,1,2,0)
;;=2^90714
;;^UTILITY(U,$J,358.3,31666,1,3,0)
;;=3^TD Vaccine
;;^UTILITY(U,$J,358.3,31667,0)
;;=90656^^93^1288^3^^^^1
;;^UTILITY(U,$J,358.3,31667,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,31667,1,2,0)
;;=2^90656
;;^UTILITY(U,$J,358.3,31667,1,3,0)
;;=3^Flu Vaccine,Preservative Free,IM
;;^UTILITY(U,$J,358.3,31668,0)
;;=90662^^93^1288^1^^^^1
;;^UTILITY(U,$J,358.3,31668,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,31668,1,2,0)
;;=2^90662
;;^UTILITY(U,$J,358.3,31668,1,3,0)
;;=3^Flu Vaccine,High Dose,Split Dose
;;^UTILITY(U,$J,358.3,31669,0)
;;=90887^^93^1289^1^^^^1
;;^UTILITY(U,$J,358.3,31669,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,31669,1,2,0)
;;=2^90887
;;^UTILITY(U,$J,358.3,31669,1,3,0)
;;=3^Consultation w/Family
;;^UTILITY(U,$J,358.3,31670,0)
;;=90791^^93^1289^10^^^^1
;;^UTILITY(U,$J,358.3,31670,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,31670,1,2,0)
;;=2^90791
;;^UTILITY(U,$J,358.3,31670,1,3,0)
;;=3^Psych Diagnostic Interview
;;^UTILITY(U,$J,358.3,31671,0)
;;=90846^^93^1289^3^^^^1
;;^UTILITY(U,$J,358.3,31671,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,31671,1,2,0)
;;=2^90846
;;^UTILITY(U,$J,358.3,31671,1,3,0)
;;=3^Family Psytx w/o Patient,50 min
;;^UTILITY(U,$J,358.3,31672,0)
;;=99401^^93^1289^6^^^^1
;;^UTILITY(U,$J,358.3,31672,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,31672,1,2,0)
;;=2^99401
;;^UTILITY(U,$J,358.3,31672,1,3,0)
;;=3^Preventive Counseling, IND 15Min
;;^UTILITY(U,$J,358.3,31673,0)
;;=99402^^93^1289^7^^^^1
;;^UTILITY(U,$J,358.3,31673,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,31673,1,2,0)
;;=2^99402
;;^UTILITY(U,$J,358.3,31673,1,3,0)
;;=3^Preventive Counseling, IND 30Min
;;^UTILITY(U,$J,358.3,31674,0)
;;=99403^^93^1289^8^^^^1
;;^UTILITY(U,$J,358.3,31674,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,31674,1,2,0)
;;=2^99403
;;^UTILITY(U,$J,358.3,31674,1,3,0)
;;=3^Preventive Counseling, IND 45Min
;;^UTILITY(U,$J,358.3,31675,0)
;;=99404^^93^1289^9^^^^1
;;^UTILITY(U,$J,358.3,31675,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,31675,1,2,0)
;;=2^99404
;;^UTILITY(U,$J,358.3,31675,1,3,0)
;;=3^Preventive Counseling, IND 60Min
;;^UTILITY(U,$J,358.3,31676,0)
;;=99411^^93^1289^4^^^^1
;;^UTILITY(U,$J,358.3,31676,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,31676,1,2,0)
;;=2^99411
;;^UTILITY(U,$J,358.3,31676,1,3,0)
;;=3^Preventive Counseling, Group 30Min
;;^UTILITY(U,$J,358.3,31677,0)
;;=99412^^93^1289^5^^^^1
;;^UTILITY(U,$J,358.3,31677,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,31677,1,2,0)
;;=2^99412
;;^UTILITY(U,$J,358.3,31677,1,3,0)
;;=3^Preventive Counseling, Group 60Min
;;^UTILITY(U,$J,358.3,31678,0)
;;=99366^^93^1289^11^^^^1
;;^UTILITY(U,$J,358.3,31678,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,31678,1,2,0)
;;=2^99366
;;^UTILITY(U,$J,358.3,31678,1,3,0)
;;=3^Team Conf w/ Pat by HC Pro 30Min
;;^UTILITY(U,$J,358.3,31679,0)
;;=99367^^93^1289^13^^^^1
;;^UTILITY(U,$J,358.3,31679,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,31679,1,2,0)
;;=2^99367
;;^UTILITY(U,$J,358.3,31679,1,3,0)
;;=3^Team Conf w/o Pat by Phys 30Min
;;^UTILITY(U,$J,358.3,31680,0)
;;=99368^^93^1289^12^^^^1
;;^UTILITY(U,$J,358.3,31680,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,31680,1,2,0)
;;=2^99368
;;^UTILITY(U,$J,358.3,31680,1,3,0)
;;=3^Team Conf w/o Pat by HC Pro 30Min
;;^UTILITY(U,$J,358.3,31681,0)
;;=90847^^93^1289^2^^^^1
;;^UTILITY(U,$J,358.3,31681,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,31681,1,2,0)
;;=2^90847
;;^UTILITY(U,$J,358.3,31681,1,3,0)
;;=3^Family Psytx w/ Patient,50 min
;;^UTILITY(U,$J,358.3,31682,0)
;;=99078^^93^1290^1^^^^1
;;^UTILITY(U,$J,358.3,31682,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,31682,1,2,0)
;;=2^99078
;;^UTILITY(U,$J,358.3,31682,1,3,0)
;;=3^Group Health Education
;;^UTILITY(U,$J,358.3,31683,0)
;;=98960^^93^1290^2^^^^1
;;^UTILITY(U,$J,358.3,31683,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,31683,1,2,0)
;;=2^98960
;;^UTILITY(U,$J,358.3,31683,1,3,0)
;;=3^Self-Mgmt Educ/Train,1 Pt,Ea 30Min
;;^UTILITY(U,$J,358.3,31684,0)
;;=98961^^93^1290^3^^^^1
;;^UTILITY(U,$J,358.3,31684,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,31684,1,2,0)
;;=2^98961
;;^UTILITY(U,$J,358.3,31684,1,3,0)
;;=3^Self-Mgmt Educ/Train,2-4 Pt,Ea 30Min
;;^UTILITY(U,$J,358.3,31685,0)
;;=98962^^93^1290^4^^^^1
;;^UTILITY(U,$J,358.3,31685,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,31685,1,2,0)
;;=2^98962
;;^UTILITY(U,$J,358.3,31685,1,3,0)
;;=3^Self-Mgmt Educ/Train,5-8 Pt,Ea 30Min
;;^UTILITY(U,$J,358.3,31686,0)
;;=97535^^93^1291^1^^^^1
;;^UTILITY(U,$J,358.3,31686,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,31686,1,2,0)
;;=2^97535
;;^UTILITY(U,$J,358.3,31686,1,3,0)
;;=3^ADLS Training Ea 15Min
;;^UTILITY(U,$J,358.3,31687,0)
;;=96105^^93^1291^2^^^^1
;;^UTILITY(U,$J,358.3,31687,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,31687,1,2,0)
;;=2^96105
;;^UTILITY(U,$J,358.3,31687,1,3,0)
;;=3^Aphasia Assessment w/ Interp & Rpt,Per Hr
;;^UTILITY(U,$J,358.3,31688,0)
;;=90901^^93^1291^7^^^^1
;;^UTILITY(U,$J,358.3,31688,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,31688,1,2,0)
;;=2^90901
;;^UTILITY(U,$J,358.3,31688,1,3,0)
;;=3^Biofeedback Training Any Method
;;^UTILITY(U,$J,358.3,31689,0)
;;=97750^^93^1291^10^^^^1
;;^UTILITY(U,$J,358.3,31689,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,31689,1,2,0)
;;=2^97750
;;^UTILITY(U,$J,358.3,31689,1,3,0)
;;=3^Extremity Performance Testing Ea 15Min
;;^UTILITY(U,$J,358.3,31690,0)
;;=97165^^93^1291^12^^^^1
;;^UTILITY(U,$J,358.3,31690,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,31690,1,2,0)
;;=2^97165
;;^UTILITY(U,$J,358.3,31690,1,3,0)
;;=3^OT Evaluation,Low Complexity
;;^UTILITY(U,$J,358.3,31691,0)
;;=97166^^93^1291^13^^^^1
;;^UTILITY(U,$J,358.3,31691,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,31691,1,2,0)
;;=2^97166
;;^UTILITY(U,$J,358.3,31691,1,3,0)
;;=3^OT Evaluation,Moderate Complexity
;;^UTILITY(U,$J,358.3,31692,0)
;;=97167^^93^1291^11^^^^1
;;^UTILITY(U,$J,358.3,31692,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,31692,1,2,0)
;;=2^97167
;;^UTILITY(U,$J,358.3,31692,1,3,0)
;;=3^OT Evaluation,High Complexity
;;^UTILITY(U,$J,358.3,31693,0)
;;=97168^^93^1291^14^^^^1
;;^UTILITY(U,$J,358.3,31693,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,31693,1,2,0)
;;=2^97168
;;^UTILITY(U,$J,358.3,31693,1,3,0)
;;=3^OT Re-Evaluation
;;^UTILITY(U,$J,358.3,31694,0)
;;=97161^^93^1291^16^^^^1
;;^UTILITY(U,$J,358.3,31694,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,31694,1,2,0)
;;=2^97161
;;^UTILITY(U,$J,358.3,31694,1,3,0)
;;=3^PT Evaluation,Low Complexity
;;^UTILITY(U,$J,358.3,31695,0)
;;=97162^^93^1291^17^^^^1
;;^UTILITY(U,$J,358.3,31695,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,31695,1,2,0)
;;=2^97162
;;^UTILITY(U,$J,358.3,31695,1,3,0)
;;=3^PT Evaluation,Moderate Complexity
;;^UTILITY(U,$J,358.3,31696,0)
;;=97163^^93^1291^15^^^^1
;;^UTILITY(U,$J,358.3,31696,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,31696,1,2,0)
;;=2^97163
;;^UTILITY(U,$J,358.3,31696,1,3,0)
;;=3^PT Evaluation,High Complexity
;;^UTILITY(U,$J,358.3,31697,0)
;;=97164^^93^1291^18^^^^1
;;^UTILITY(U,$J,358.3,31697,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,31697,1,2,0)
;;=2^97164
;;^UTILITY(U,$J,358.3,31697,1,3,0)
;;=3^PT Re-Evaluation
;;^UTILITY(U,$J,358.3,31698,0)
;;=96112^^93^1291^8^^^^1
;;^UTILITY(U,$J,358.3,31698,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,31698,1,2,0)
;;=2^96112
;;^UTILITY(U,$J,358.3,31698,1,3,0)
;;=3^Developmental Testing w/ Int & Rpt,1st Hr
;;^UTILITY(U,$J,358.3,31699,0)
;;=96113^^93^1291^9^^^^1
;;^UTILITY(U,$J,358.3,31699,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,31699,1,2,0)
;;=2^96113
;;^UTILITY(U,$J,358.3,31699,1,3,0)
;;=3^Developmental Testing w/ Int & Rpt,Ea Addl 30 min
;;^UTILITY(U,$J,358.3,31700,0)
;;=97172^^93^1291^6^^^^1
;;^UTILITY(U,$J,358.3,31700,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,31700,1,2,0)
;;=2^97172
;;^UTILITY(U,$J,358.3,31700,1,3,0)
;;=3^Athletic Trn Re-Eval Plan,Ea 20 min
;;^UTILITY(U,$J,358.3,31701,0)
;;=97171^^93^1291^3^^^^1
;;^UTILITY(U,$J,358.3,31701,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,31701,1,2,0)
;;=2^97171
;;^UTILITY(U,$J,358.3,31701,1,3,0)
;;=3^Athletic Trn Eval,High Cmplx,45 min
;;^UTILITY(U,$J,358.3,31702,0)
;;=97170^^93^1291^5^^^^1
;;^UTILITY(U,$J,358.3,31702,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,31702,1,2,0)
;;=2^97170
;;^UTILITY(U,$J,358.3,31702,1,3,0)
;;=3^Athletic Trn Eval,Mod Cmplx,30 min
;;^UTILITY(U,$J,358.3,31703,0)
;;=97169^^93^1291^4^^^^1
;;^UTILITY(U,$J,358.3,31703,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,31703,1,2,0)
;;=2^97169
;;^UTILITY(U,$J,358.3,31703,1,3,0)
;;=3^Athletic Trn Eval,Low Cmplx,15 min
;;^UTILITY(U,$J,358.3,31704,0)
;;=90471^^93^1292^1^^^^1
;;^UTILITY(U,$J,358.3,31704,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,31704,1,2,0)
;;=2^90471
;;^UTILITY(U,$J,358.3,31704,1,3,0)
;;=3^Immunization Admin,Single
;;^UTILITY(U,$J,358.3,31705,0)
;;=90472^^93^1292^2^^^^1
;;^UTILITY(U,$J,358.3,31705,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,31705,1,2,0)
;;=2^90472
;;^UTILITY(U,$J,358.3,31705,1,3,0)
;;=3^Immunization Admin,Ea Addl
;;^UTILITY(U,$J,358.3,31706,0)
;;=97034^^93^1293^1^^^^1
;;^UTILITY(U,$J,358.3,31706,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,31706,1,2,0)
;;=2^97034
;;^UTILITY(U,$J,358.3,31706,1,3,0)
;;=3^Contrast Baths Ea 15Min
;;^UTILITY(U,$J,358.3,31707,0)
;;=97014^^93^1293^2^^^^1
;;^UTILITY(U,$J,358.3,31707,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,31707,1,2,0)
;;=2^97014
;;^UTILITY(U,$J,358.3,31707,1,3,0)
;;=3^Electrical Stimulation
;;^UTILITY(U,$J,358.3,31708,0)
;;=97116^^93^1293^3^^^^1
;;^UTILITY(U,$J,358.3,31708,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,31708,1,2,0)
;;=2^97116
;;^UTILITY(U,$J,358.3,31708,1,3,0)
;;=3^Gait Training
;;^UTILITY(U,$J,358.3,31709,0)
;;=97010^^93^1293^4^^^^1
;;^UTILITY(U,$J,358.3,31709,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,31709,1,2,0)
;;=2^97010
;;^UTILITY(U,$J,358.3,31709,1,3,0)
;;=3^Hot/Cold Therapies
;;^UTILITY(U,$J,358.3,31710,0)
;;=97033^^93^1293^5^^^^1
;;^UTILITY(U,$J,358.3,31710,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,31710,1,2,0)
;;=2^97033
;;^UTILITY(U,$J,358.3,31710,1,3,0)
;;=3^Iontophoresis Ea 15Min
;;^UTILITY(U,$J,358.3,31711,0)
;;=97530^^93^1293^6^^^^1
;;^UTILITY(U,$J,358.3,31711,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,31711,1,2,0)
;;=2^97530
;;^UTILITY(U,$J,358.3,31711,1,3,0)
;;=3^Kinetic Therapy Ea 15Min
;;^UTILITY(U,$J,358.3,31712,0)
;;=97140^^93^1293^7^^^^1
;;^UTILITY(U,$J,358.3,31712,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,31712,1,2,0)
;;=2^97140
;;^UTILITY(U,$J,358.3,31712,1,3,0)
;;=3^Manipulation/Mobilization Ea 15Min
;;^UTILITY(U,$J,358.3,31713,0)
;;=97112^^93^1293^8^^^^1
;;^UTILITY(U,$J,358.3,31713,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,31713,1,2,0)
;;=2^97112
;;^UTILITY(U,$J,358.3,31713,1,3,0)
;;=3^Neuromuscular Re-Ed
;;^UTILITY(U,$J,358.3,31714,0)
;;=97039^^93^1293^12^^^^1
;;^UTILITY(U,$J,358.3,31714,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,31714,1,2,0)
;;=2^97039
;;^UTILITY(U,$J,358.3,31714,1,3,0)
;;=3^Unlisted PT Modality
;;^UTILITY(U,$J,358.3,31715,0)
;;=97124^^93^1293^10^^^^1
;;^UTILITY(U,$J,358.3,31715,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,31715,1,2,0)
;;=2^97124
;;^UTILITY(U,$J,358.3,31715,1,3,0)
;;=3^Therapeutic Massage
;;^UTILITY(U,$J,358.3,31716,0)
;;=97110^^93^1293^9^^^^1
;;^UTILITY(U,$J,358.3,31716,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,31716,1,2,0)
;;=2^97110
;;^UTILITY(U,$J,358.3,31716,1,3,0)
;;=3^Therapeutic Ex/Record/Flex,1 or More Areas
;;^UTILITY(U,$J,358.3,31717,0)
;;=97035^^93^1293^11^^^^1
;;^UTILITY(U,$J,358.3,31717,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,31717,1,2,0)
;;=2^97035
;;^UTILITY(U,$J,358.3,31717,1,3,0)
;;=3^Ultrasound Ea 15Min
;;^UTILITY(U,$J,358.3,31718,0)
;;=20552^^93^1294^6^^^^1
;;^UTILITY(U,$J,358.3,31718,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,31718,1,2,0)
;;=2^20552
;;^UTILITY(U,$J,358.3,31718,1,3,0)
;;=3^Trigger Point Inj,1-2 Muscles
;;^UTILITY(U,$J,358.3,31719,0)
;;=20553^^93^1294^7^^^^1
;;^UTILITY(U,$J,358.3,31719,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,31719,1,2,0)
;;=2^20553
;;^UTILITY(U,$J,358.3,31719,1,3,0)
;;=3^Trigger Point Inj,3 or More Muscles
;;^UTILITY(U,$J,358.3,31720,0)
;;=64405^^93^1294^5^^^^1
;;^UTILITY(U,$J,358.3,31720,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,31720,1,2,0)
;;=2^64405
;;^UTILITY(U,$J,358.3,31720,1,3,0)
;;=3^Nerve Block,Occipital
;;^UTILITY(U,$J,358.3,31721,0)
;;=64615^^93^1294^4^^^^1
;;^UTILITY(U,$J,358.3,31721,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,31721,1,2,0)
;;=2^64615
;;^UTILITY(U,$J,358.3,31721,1,3,0)
;;=3^Chemodenervation Muscle for Migraine
;;^UTILITY(U,$J,358.3,31722,0)
;;=J0585^^93^1294^2^^^^1
;;^UTILITY(U,$J,358.3,31722,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,31722,1,2,0)
;;=2^J0585
;;^UTILITY(U,$J,358.3,31722,1,3,0)
;;=3^Botulinum Toxin A,per unit
;;^UTILITY(U,$J,358.3,31723,0)
;;=J0587^^93^1294^3^^^^1
;;^UTILITY(U,$J,358.3,31723,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,31723,1,2,0)
;;=2^J0587
;;^UTILITY(U,$J,358.3,31723,1,3,0)
;;=3^Botulinum Toxin B,100 units
;;^UTILITY(U,$J,358.3,31724,0)
;;=J0586^^93^1294^1^^^^1
;;^UTILITY(U,$J,358.3,31724,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,31724,1,2,0)
;;=2^J0586
;;^UTILITY(U,$J,358.3,31724,1,3,0)
;;=3^Botulinum Toxin A,5 units
;;^UTILITY(U,$J,358.3,31725,0)
;;=99415^^93^1295^1^^^^1
;;^UTILITY(U,$J,358.3,31725,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,31725,1,2,0)
;;=2^99415
;;^UTILITY(U,$J,358.3,31725,1,3,0)
;;=3^Prolonged Clin Staff Svcs,1st hr
;;^UTILITY(U,$J,358.3,31726,0)
;;=99416^^93^1295^2^^^^1
;;^UTILITY(U,$J,358.3,31726,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,31726,1,2,0)
;;=2^99416
;;^UTILITY(U,$J,358.3,31726,1,3,0)
;;=3^Prolonged Clin Staff Svcs,Ea Addl 30 min
;;^UTILITY(U,$J,358.3,31727,0)
;;=99484^^93^1296^1^^^^1
;;^UTILITY(U,$J,358.3,31727,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,31727,1,2,0)
;;=2^99484
;;^UTILITY(U,$J,358.3,31727,1,3,0)
;;=3^Care Mgmt Svc Bhvl Hlth Cond,20+ min
;;^UTILITY(U,$J,358.3,31728,0)
;;=99483^^93^1297^1^^^^1
;;^UTILITY(U,$J,358.3,31728,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,31728,1,2,0)
;;=2^99483
;;^UTILITY(U,$J,358.3,31728,1,3,0)
;;=3^Assess/Care Plan,Cog Imp Pt,Historian Present
;;^UTILITY(U,$J,358.3,31729,0)
;;=99492^^93^1298^1^^^^1
;;^UTILITY(U,$J,358.3,31729,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,31729,1,2,0)
;;=2^99492
;;^UTILITY(U,$J,358.3,31729,1,3,0)
;;=3^Init Psych Collab Care Mgmt,1st 70 min
;;^UTILITY(U,$J,358.3,31730,0)
;;=99493^^93^1298^2^^^^1
;;^UTILITY(U,$J,358.3,31730,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,31730,1,2,0)
;;=2^99493
;;^UTILITY(U,$J,358.3,31730,1,3,0)
;;=3^Subseq Psych Collab Care Mgmt,1st 60 min
;;^UTILITY(U,$J,358.3,31731,0)
;;=99494^^93^1298^3^^^^1
;;^UTILITY(U,$J,358.3,31731,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,31731,1,2,0)
;;=2^99494
;;^UTILITY(U,$J,358.3,31731,1,3,0)
;;=3^Init/Subseq Psych Collab Care Mgmt,Ea Addl 30 min
;;^UTILITY(U,$J,358.3,31732,0)
;;=97129^^93^1299^1^^^^1
;;^UTILITY(U,$J,358.3,31732,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,31732,1,2,0)
;;=2^97129
;;^UTILITY(U,$J,358.3,31732,1,3,0)
;;=3^Therapeutic Intrvn,Cog Func,1st 15 min
;;^UTILITY(U,$J,358.3,31733,0)
;;=97130^^93^1299^2^^^^1
;;^UTILITY(U,$J,358.3,31733,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,31733,1,2,0)
;;=2^97130
;;^UTILITY(U,$J,358.3,31733,1,3,0)
;;=3^Therapeutic Intrvn,Cog Func,Ea Addl 15 min
;;^UTILITY(U,$J,358.3,31734,0)
;;=Z87.81^^94^1300^2
;;^UTILITY(U,$J,358.3,31734,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,31734,1,3,0)
;;=3^Personal history of (healed) traumatic fracture
;;^UTILITY(U,$J,358.3,31734,1,4,0)
;;=4^Z87.81
;;^UTILITY(U,$J,358.3,31734,2)
;;=^5063513
;;^UTILITY(U,$J,358.3,31735,0)
;;=Z87.828^^94^1300^3
;;^UTILITY(U,$J,358.3,31735,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,31735,1,3,0)
;;=3^Personal history of oth (healed) physical injury and trauma
;;^UTILITY(U,$J,358.3,31735,1,4,0)
;;=4^Z87.828
;;^UTILITY(U,$J,358.3,31735,2)
;;=^5063516
;;^UTILITY(U,$J,358.3,31736,0)
;;=S06.9X9S^^94^1300^1
;;^UTILITY(U,$J,358.3,31736,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,31736,1,3,0)
;;=3^Intracranial injury w LOC of unsp duration unspec, sequela
;;^UTILITY(U,$J,358.3,31736,1,4,0)
;;=4^S06.9X9S
;;^UTILITY(U,$J,358.3,31736,2)
;;=^5021235
;;^UTILITY(U,$J,358.3,31737,0)
;;=Z13.850^^94^1300^4
;;^UTILITY(U,$J,358.3,31737,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,31737,1,3,0)
;;=3^TBI Screening,Rpt Once per Injury Event
;;^UTILITY(U,$J,358.3,31737,1,4,0)
;;=4^Z13.850
;;^UTILITY(U,$J,358.3,31737,2)
;;=^5062717
;;^UTILITY(U,$J,358.3,31738,0)
;;=F43.21^^94^1301^2
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HIBDEI0CM 19770 printed Sep 23, 2025@19:22:02 Page 2
IBDEI0CM ; ; 03-MAY-2022
+1 ;;3.0;IB ENCOUNTER FORM IMP/EXP;;MAY 03, 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,31657,1,2,0)
+2 ;;=2^90746
+3 ;;^UTILITY(U,$J,358.3,31657,1,3,0)
+4 ;;=3^Hepatitis B Vaccine (3 dose)
+5 ;;^UTILITY(U,$J,358.3,31658,0)
+6 ;;=90636^^93^1288^5^^^^1
+7 ;;^UTILITY(U,$J,358.3,31658,1,0)
+8 ;;=^358.31IA^3^2
+9 ;;^UTILITY(U,$J,358.3,31658,1,2,0)
+10 ;;=2^90636
+11 ;;^UTILITY(U,$J,358.3,31658,1,3,0)
+12 ;;=3^Hepatitis A&B Vaccine
+13 ;;^UTILITY(U,$J,358.3,31659,0)
+14 ;;=90707^^93^1288^7^^^^1
+15 ;;^UTILITY(U,$J,358.3,31659,1,0)
+16 ;;=^358.31IA^3^2
+17 ;;^UTILITY(U,$J,358.3,31659,1,2,0)
+18 ;;=2^90707
+19 ;;^UTILITY(U,$J,358.3,31659,1,3,0)
+20 ;;=3^MMR Vaccine
+21 ;;^UTILITY(U,$J,358.3,31660,0)
+22 ;;=90658^^93^1288^2^^^^1
+23 ;;^UTILITY(U,$J,358.3,31660,1,0)
+24 ;;=^358.31IA^3^2
+25 ;;^UTILITY(U,$J,358.3,31660,1,2,0)
+26 ;;=2^90658
+27 ;;^UTILITY(U,$J,358.3,31660,1,3,0)
+28 ;;=3^Flu Vaccine,IM
+29 ;;^UTILITY(U,$J,358.3,31661,0)
+30 ;;=90732^^93^1288^9^^^^1
+31 ;;^UTILITY(U,$J,358.3,31661,1,0)
+32 ;;=^358.31IA^3^2
+33 ;;^UTILITY(U,$J,358.3,31661,1,2,0)
+34 ;;=2^90732
+35 ;;^UTILITY(U,$J,358.3,31661,1,3,0)
+36 ;;=3^Pneumococcal Vaccine
+37 ;;^UTILITY(U,$J,358.3,31662,0)
+38 ;;=90715^^93^1288^11^^^^1
+39 ;;^UTILITY(U,$J,358.3,31662,1,0)
+40 ;;=^358.31IA^3^2
+41 ;;^UTILITY(U,$J,358.3,31662,1,2,0)
+42 ;;=2^90715
+43 ;;^UTILITY(U,$J,358.3,31662,1,3,0)
+44 ;;=3^Tdap Vaccine
+45 ;;^UTILITY(U,$J,358.3,31663,0)
+46 ;;=90736^^93^1288^13^^^^1
+47 ;;^UTILITY(U,$J,358.3,31663,1,0)
+48 ;;=^358.31IA^3^2
+49 ;;^UTILITY(U,$J,358.3,31663,1,2,0)
+50 ;;=2^90736
+51 ;;^UTILITY(U,$J,358.3,31663,1,3,0)
+52 ;;=3^Zoster (Shingles) Vaccine
+53 ;;^UTILITY(U,$J,358.3,31664,0)
+54 ;;=86580^^93^1288^8^^^^1
+55 ;;^UTILITY(U,$J,358.3,31664,1,0)
+56 ;;=^358.31IA^3^2
+57 ;;^UTILITY(U,$J,358.3,31664,1,2,0)
+58 ;;=2^86580
+59 ;;^UTILITY(U,$J,358.3,31664,1,3,0)
+60 ;;=3^PPD Skin Test
+61 ;;^UTILITY(U,$J,358.3,31665,0)
+62 ;;=96372^^93^1288^12^^^^1
+63 ;;^UTILITY(U,$J,358.3,31665,1,0)
+64 ;;=^358.31IA^3^2
+65 ;;^UTILITY(U,$J,358.3,31665,1,2,0)
+66 ;;=2^96372
+67 ;;^UTILITY(U,$J,358.3,31665,1,3,0)
+68 ;;=3^Ther/Proph/Diag Inj SC/IM
+69 ;;^UTILITY(U,$J,358.3,31666,0)
+70 ;;=90714^^93^1288^10^^^^1
+71 ;;^UTILITY(U,$J,358.3,31666,1,0)
+72 ;;=^358.31IA^3^2
+73 ;;^UTILITY(U,$J,358.3,31666,1,2,0)
+74 ;;=2^90714
+75 ;;^UTILITY(U,$J,358.3,31666,1,3,0)
+76 ;;=3^TD Vaccine
+77 ;;^UTILITY(U,$J,358.3,31667,0)
+78 ;;=90656^^93^1288^3^^^^1
+79 ;;^UTILITY(U,$J,358.3,31667,1,0)
+80 ;;=^358.31IA^3^2
+81 ;;^UTILITY(U,$J,358.3,31667,1,2,0)
+82 ;;=2^90656
+83 ;;^UTILITY(U,$J,358.3,31667,1,3,0)
+84 ;;=3^Flu Vaccine,Preservative Free,IM
+85 ;;^UTILITY(U,$J,358.3,31668,0)
+86 ;;=90662^^93^1288^1^^^^1
+87 ;;^UTILITY(U,$J,358.3,31668,1,0)
+88 ;;=^358.31IA^3^2
+89 ;;^UTILITY(U,$J,358.3,31668,1,2,0)
+90 ;;=2^90662
+91 ;;^UTILITY(U,$J,358.3,31668,1,3,0)
+92 ;;=3^Flu Vaccine,High Dose,Split Dose
+93 ;;^UTILITY(U,$J,358.3,31669,0)
+94 ;;=90887^^93^1289^1^^^^1
+95 ;;^UTILITY(U,$J,358.3,31669,1,0)
+96 ;;=^358.31IA^3^2
+97 ;;^UTILITY(U,$J,358.3,31669,1,2,0)
+98 ;;=2^90887
+99 ;;^UTILITY(U,$J,358.3,31669,1,3,0)
+100 ;;=3^Consultation w/Family
+101 ;;^UTILITY(U,$J,358.3,31670,0)
+102 ;;=90791^^93^1289^10^^^^1
+103 ;;^UTILITY(U,$J,358.3,31670,1,0)
+104 ;;=^358.31IA^3^2
+105 ;;^UTILITY(U,$J,358.3,31670,1,2,0)
+106 ;;=2^90791
+107 ;;^UTILITY(U,$J,358.3,31670,1,3,0)
+108 ;;=3^Psych Diagnostic Interview
+109 ;;^UTILITY(U,$J,358.3,31671,0)
+110 ;;=90846^^93^1289^3^^^^1
+111 ;;^UTILITY(U,$J,358.3,31671,1,0)
+112 ;;=^358.31IA^3^2
+113 ;;^UTILITY(U,$J,358.3,31671,1,2,0)
+114 ;;=2^90846
+115 ;;^UTILITY(U,$J,358.3,31671,1,3,0)
+116 ;;=3^Family Psytx w/o Patient,50 min
+117 ;;^UTILITY(U,$J,358.3,31672,0)
+118 ;;=99401^^93^1289^6^^^^1
+119 ;;^UTILITY(U,$J,358.3,31672,1,0)
+120 ;;=^358.31IA^3^2
+121 ;;^UTILITY(U,$J,358.3,31672,1,2,0)
+122 ;;=2^99401
+123 ;;^UTILITY(U,$J,358.3,31672,1,3,0)
+124 ;;=3^Preventive Counseling, IND 15Min
+125 ;;^UTILITY(U,$J,358.3,31673,0)
+126 ;;=99402^^93^1289^7^^^^1
+127 ;;^UTILITY(U,$J,358.3,31673,1,0)
+128 ;;=^358.31IA^3^2
+129 ;;^UTILITY(U,$J,358.3,31673,1,2,0)
+130 ;;=2^99402
+131 ;;^UTILITY(U,$J,358.3,31673,1,3,0)
+132 ;;=3^Preventive Counseling, IND 30Min
+133 ;;^UTILITY(U,$J,358.3,31674,0)
+134 ;;=99403^^93^1289^8^^^^1
+135 ;;^UTILITY(U,$J,358.3,31674,1,0)
+136 ;;=^358.31IA^3^2
+137 ;;^UTILITY(U,$J,358.3,31674,1,2,0)
+138 ;;=2^99403
+139 ;;^UTILITY(U,$J,358.3,31674,1,3,0)
+140 ;;=3^Preventive Counseling, IND 45Min
+141 ;;^UTILITY(U,$J,358.3,31675,0)
+142 ;;=99404^^93^1289^9^^^^1
+143 ;;^UTILITY(U,$J,358.3,31675,1,0)
+144 ;;=^358.31IA^3^2
+145 ;;^UTILITY(U,$J,358.3,31675,1,2,0)
+146 ;;=2^99404
+147 ;;^UTILITY(U,$J,358.3,31675,1,3,0)
+148 ;;=3^Preventive Counseling, IND 60Min
+149 ;;^UTILITY(U,$J,358.3,31676,0)
+150 ;;=99411^^93^1289^4^^^^1
+151 ;;^UTILITY(U,$J,358.3,31676,1,0)
+152 ;;=^358.31IA^3^2
+153 ;;^UTILITY(U,$J,358.3,31676,1,2,0)
+154 ;;=2^99411
+155 ;;^UTILITY(U,$J,358.3,31676,1,3,0)
+156 ;;=3^Preventive Counseling, Group 30Min
+157 ;;^UTILITY(U,$J,358.3,31677,0)
+158 ;;=99412^^93^1289^5^^^^1
+159 ;;^UTILITY(U,$J,358.3,31677,1,0)
+160 ;;=^358.31IA^3^2
+161 ;;^UTILITY(U,$J,358.3,31677,1,2,0)
+162 ;;=2^99412
+163 ;;^UTILITY(U,$J,358.3,31677,1,3,0)
+164 ;;=3^Preventive Counseling, Group 60Min
+165 ;;^UTILITY(U,$J,358.3,31678,0)
+166 ;;=99366^^93^1289^11^^^^1
+167 ;;^UTILITY(U,$J,358.3,31678,1,0)
+168 ;;=^358.31IA^3^2
+169 ;;^UTILITY(U,$J,358.3,31678,1,2,0)
+170 ;;=2^99366
+171 ;;^UTILITY(U,$J,358.3,31678,1,3,0)
+172 ;;=3^Team Conf w/ Pat by HC Pro 30Min
+173 ;;^UTILITY(U,$J,358.3,31679,0)
+174 ;;=99367^^93^1289^13^^^^1
+175 ;;^UTILITY(U,$J,358.3,31679,1,0)
+176 ;;=^358.31IA^3^2
+177 ;;^UTILITY(U,$J,358.3,31679,1,2,0)
+178 ;;=2^99367
+179 ;;^UTILITY(U,$J,358.3,31679,1,3,0)
+180 ;;=3^Team Conf w/o Pat by Phys 30Min
+181 ;;^UTILITY(U,$J,358.3,31680,0)
+182 ;;=99368^^93^1289^12^^^^1
+183 ;;^UTILITY(U,$J,358.3,31680,1,0)
+184 ;;=^358.31IA^3^2
+185 ;;^UTILITY(U,$J,358.3,31680,1,2,0)
+186 ;;=2^99368
+187 ;;^UTILITY(U,$J,358.3,31680,1,3,0)
+188 ;;=3^Team Conf w/o Pat by HC Pro 30Min
+189 ;;^UTILITY(U,$J,358.3,31681,0)
+190 ;;=90847^^93^1289^2^^^^1
+191 ;;^UTILITY(U,$J,358.3,31681,1,0)
+192 ;;=^358.31IA^3^2
+193 ;;^UTILITY(U,$J,358.3,31681,1,2,0)
+194 ;;=2^90847
+195 ;;^UTILITY(U,$J,358.3,31681,1,3,0)
+196 ;;=3^Family Psytx w/ Patient,50 min
+197 ;;^UTILITY(U,$J,358.3,31682,0)
+198 ;;=99078^^93^1290^1^^^^1
+199 ;;^UTILITY(U,$J,358.3,31682,1,0)
+200 ;;=^358.31IA^3^2
+201 ;;^UTILITY(U,$J,358.3,31682,1,2,0)
+202 ;;=2^99078
+203 ;;^UTILITY(U,$J,358.3,31682,1,3,0)
+204 ;;=3^Group Health Education
+205 ;;^UTILITY(U,$J,358.3,31683,0)
+206 ;;=98960^^93^1290^2^^^^1
+207 ;;^UTILITY(U,$J,358.3,31683,1,0)
+208 ;;=^358.31IA^3^2
+209 ;;^UTILITY(U,$J,358.3,31683,1,2,0)
+210 ;;=2^98960
+211 ;;^UTILITY(U,$J,358.3,31683,1,3,0)
+212 ;;=3^Self-Mgmt Educ/Train,1 Pt,Ea 30Min
+213 ;;^UTILITY(U,$J,358.3,31684,0)
+214 ;;=98961^^93^1290^3^^^^1
+215 ;;^UTILITY(U,$J,358.3,31684,1,0)
+216 ;;=^358.31IA^3^2
+217 ;;^UTILITY(U,$J,358.3,31684,1,2,0)
+218 ;;=2^98961
+219 ;;^UTILITY(U,$J,358.3,31684,1,3,0)
+220 ;;=3^Self-Mgmt Educ/Train,2-4 Pt,Ea 30Min
+221 ;;^UTILITY(U,$J,358.3,31685,0)
+222 ;;=98962^^93^1290^4^^^^1
+223 ;;^UTILITY(U,$J,358.3,31685,1,0)
+224 ;;=^358.31IA^3^2
+225 ;;^UTILITY(U,$J,358.3,31685,1,2,0)
+226 ;;=2^98962
+227 ;;^UTILITY(U,$J,358.3,31685,1,3,0)
+228 ;;=3^Self-Mgmt Educ/Train,5-8 Pt,Ea 30Min
+229 ;;^UTILITY(U,$J,358.3,31686,0)
+230 ;;=97535^^93^1291^1^^^^1
+231 ;;^UTILITY(U,$J,358.3,31686,1,0)
+232 ;;=^358.31IA^3^2
+233 ;;^UTILITY(U,$J,358.3,31686,1,2,0)
+234 ;;=2^97535
+235 ;;^UTILITY(U,$J,358.3,31686,1,3,0)
+236 ;;=3^ADLS Training Ea 15Min
+237 ;;^UTILITY(U,$J,358.3,31687,0)
+238 ;;=96105^^93^1291^2^^^^1
+239 ;;^UTILITY(U,$J,358.3,31687,1,0)
+240 ;;=^358.31IA^3^2
+241 ;;^UTILITY(U,$J,358.3,31687,1,2,0)
+242 ;;=2^96105
+243 ;;^UTILITY(U,$J,358.3,31687,1,3,0)
+244 ;;=3^Aphasia Assessment w/ Interp & Rpt,Per Hr
+245 ;;^UTILITY(U,$J,358.3,31688,0)
+246 ;;=90901^^93^1291^7^^^^1
+247 ;;^UTILITY(U,$J,358.3,31688,1,0)
+248 ;;=^358.31IA^3^2
+249 ;;^UTILITY(U,$J,358.3,31688,1,2,0)
+250 ;;=2^90901
+251 ;;^UTILITY(U,$J,358.3,31688,1,3,0)
+252 ;;=3^Biofeedback Training Any Method
+253 ;;^UTILITY(U,$J,358.3,31689,0)
+254 ;;=97750^^93^1291^10^^^^1
+255 ;;^UTILITY(U,$J,358.3,31689,1,0)
+256 ;;=^358.31IA^3^2
+257 ;;^UTILITY(U,$J,358.3,31689,1,2,0)
+258 ;;=2^97750
+259 ;;^UTILITY(U,$J,358.3,31689,1,3,0)
+260 ;;=3^Extremity Performance Testing Ea 15Min
+261 ;;^UTILITY(U,$J,358.3,31690,0)
+262 ;;=97165^^93^1291^12^^^^1
+263 ;;^UTILITY(U,$J,358.3,31690,1,0)
+264 ;;=^358.31IA^3^2
+265 ;;^UTILITY(U,$J,358.3,31690,1,2,0)
+266 ;;=2^97165
+267 ;;^UTILITY(U,$J,358.3,31690,1,3,0)
+268 ;;=3^OT Evaluation,Low Complexity
+269 ;;^UTILITY(U,$J,358.3,31691,0)
+270 ;;=97166^^93^1291^13^^^^1
+271 ;;^UTILITY(U,$J,358.3,31691,1,0)
+272 ;;=^358.31IA^3^2
+273 ;;^UTILITY(U,$J,358.3,31691,1,2,0)
+274 ;;=2^97166
+275 ;;^UTILITY(U,$J,358.3,31691,1,3,0)
+276 ;;=3^OT Evaluation,Moderate Complexity
+277 ;;^UTILITY(U,$J,358.3,31692,0)
+278 ;;=97167^^93^1291^11^^^^1
+279 ;;^UTILITY(U,$J,358.3,31692,1,0)
+280 ;;=^358.31IA^3^2
+281 ;;^UTILITY(U,$J,358.3,31692,1,2,0)
+282 ;;=2^97167
+283 ;;^UTILITY(U,$J,358.3,31692,1,3,0)
+284 ;;=3^OT Evaluation,High Complexity
+285 ;;^UTILITY(U,$J,358.3,31693,0)
+286 ;;=97168^^93^1291^14^^^^1
+287 ;;^UTILITY(U,$J,358.3,31693,1,0)
+288 ;;=^358.31IA^3^2
+289 ;;^UTILITY(U,$J,358.3,31693,1,2,0)
+290 ;;=2^97168
+291 ;;^UTILITY(U,$J,358.3,31693,1,3,0)
+292 ;;=3^OT Re-Evaluation
+293 ;;^UTILITY(U,$J,358.3,31694,0)
+294 ;;=97161^^93^1291^16^^^^1
+295 ;;^UTILITY(U,$J,358.3,31694,1,0)
+296 ;;=^358.31IA^3^2
+297 ;;^UTILITY(U,$J,358.3,31694,1,2,0)
+298 ;;=2^97161
+299 ;;^UTILITY(U,$J,358.3,31694,1,3,0)
+300 ;;=3^PT Evaluation,Low Complexity
+301 ;;^UTILITY(U,$J,358.3,31695,0)
+302 ;;=97162^^93^1291^17^^^^1
+303 ;;^UTILITY(U,$J,358.3,31695,1,0)
+304 ;;=^358.31IA^3^2
+305 ;;^UTILITY(U,$J,358.3,31695,1,2,0)
+306 ;;=2^97162
+307 ;;^UTILITY(U,$J,358.3,31695,1,3,0)
+308 ;;=3^PT Evaluation,Moderate Complexity
+309 ;;^UTILITY(U,$J,358.3,31696,0)
+310 ;;=97163^^93^1291^15^^^^1
+311 ;;^UTILITY(U,$J,358.3,31696,1,0)
+312 ;;=^358.31IA^3^2
+313 ;;^UTILITY(U,$J,358.3,31696,1,2,0)
+314 ;;=2^97163
+315 ;;^UTILITY(U,$J,358.3,31696,1,3,0)
+316 ;;=3^PT Evaluation,High Complexity
+317 ;;^UTILITY(U,$J,358.3,31697,0)
+318 ;;=97164^^93^1291^18^^^^1
+319 ;;^UTILITY(U,$J,358.3,31697,1,0)
+320 ;;=^358.31IA^3^2
+321 ;;^UTILITY(U,$J,358.3,31697,1,2,0)
+322 ;;=2^97164
+323 ;;^UTILITY(U,$J,358.3,31697,1,3,0)
+324 ;;=3^PT Re-Evaluation
+325 ;;^UTILITY(U,$J,358.3,31698,0)
+326 ;;=96112^^93^1291^8^^^^1
+327 ;;^UTILITY(U,$J,358.3,31698,1,0)
+328 ;;=^358.31IA^3^2
+329 ;;^UTILITY(U,$J,358.3,31698,1,2,0)
+330 ;;=2^96112
+331 ;;^UTILITY(U,$J,358.3,31698,1,3,0)
+332 ;;=3^Developmental Testing w/ Int & Rpt,1st Hr
+333 ;;^UTILITY(U,$J,358.3,31699,0)
+334 ;;=96113^^93^1291^9^^^^1
+335 ;;^UTILITY(U,$J,358.3,31699,1,0)
+336 ;;=^358.31IA^3^2
+337 ;;^UTILITY(U,$J,358.3,31699,1,2,0)
+338 ;;=2^96113
+339 ;;^UTILITY(U,$J,358.3,31699,1,3,0)
+340 ;;=3^Developmental Testing w/ Int & Rpt,Ea Addl 30 min
+341 ;;^UTILITY(U,$J,358.3,31700,0)
+342 ;;=97172^^93^1291^6^^^^1
+343 ;;^UTILITY(U,$J,358.3,31700,1,0)
+344 ;;=^358.31IA^3^2
+345 ;;^UTILITY(U,$J,358.3,31700,1,2,0)
+346 ;;=2^97172
+347 ;;^UTILITY(U,$J,358.3,31700,1,3,0)
+348 ;;=3^Athletic Trn Re-Eval Plan,Ea 20 min
+349 ;;^UTILITY(U,$J,358.3,31701,0)
+350 ;;=97171^^93^1291^3^^^^1
+351 ;;^UTILITY(U,$J,358.3,31701,1,0)
+352 ;;=^358.31IA^3^2
+353 ;;^UTILITY(U,$J,358.3,31701,1,2,0)
+354 ;;=2^97171
+355 ;;^UTILITY(U,$J,358.3,31701,1,3,0)
+356 ;;=3^Athletic Trn Eval,High Cmplx,45 min
+357 ;;^UTILITY(U,$J,358.3,31702,0)
+358 ;;=97170^^93^1291^5^^^^1
+359 ;;^UTILITY(U,$J,358.3,31702,1,0)
+360 ;;=^358.31IA^3^2
+361 ;;^UTILITY(U,$J,358.3,31702,1,2,0)
+362 ;;=2^97170
+363 ;;^UTILITY(U,$J,358.3,31702,1,3,0)
+364 ;;=3^Athletic Trn Eval,Mod Cmplx,30 min
+365 ;;^UTILITY(U,$J,358.3,31703,0)
+366 ;;=97169^^93^1291^4^^^^1
+367 ;;^UTILITY(U,$J,358.3,31703,1,0)
+368 ;;=^358.31IA^3^2
+369 ;;^UTILITY(U,$J,358.3,31703,1,2,0)
+370 ;;=2^97169
+371 ;;^UTILITY(U,$J,358.3,31703,1,3,0)
+372 ;;=3^Athletic Trn Eval,Low Cmplx,15 min
+373 ;;^UTILITY(U,$J,358.3,31704,0)
+374 ;;=90471^^93^1292^1^^^^1
+375 ;;^UTILITY(U,$J,358.3,31704,1,0)
+376 ;;=^358.31IA^3^2
+377 ;;^UTILITY(U,$J,358.3,31704,1,2,0)
+378 ;;=2^90471
+379 ;;^UTILITY(U,$J,358.3,31704,1,3,0)
+380 ;;=3^Immunization Admin,Single
+381 ;;^UTILITY(U,$J,358.3,31705,0)
+382 ;;=90472^^93^1292^2^^^^1
+383 ;;^UTILITY(U,$J,358.3,31705,1,0)
+384 ;;=^358.31IA^3^2
+385 ;;^UTILITY(U,$J,358.3,31705,1,2,0)
+386 ;;=2^90472
+387 ;;^UTILITY(U,$J,358.3,31705,1,3,0)
+388 ;;=3^Immunization Admin,Ea Addl
+389 ;;^UTILITY(U,$J,358.3,31706,0)
+390 ;;=97034^^93^1293^1^^^^1
+391 ;;^UTILITY(U,$J,358.3,31706,1,0)
+392 ;;=^358.31IA^3^2
+393 ;;^UTILITY(U,$J,358.3,31706,1,2,0)
+394 ;;=2^97034
+395 ;;^UTILITY(U,$J,358.3,31706,1,3,0)
+396 ;;=3^Contrast Baths Ea 15Min
+397 ;;^UTILITY(U,$J,358.3,31707,0)
+398 ;;=97014^^93^1293^2^^^^1
+399 ;;^UTILITY(U,$J,358.3,31707,1,0)
+400 ;;=^358.31IA^3^2
+401 ;;^UTILITY(U,$J,358.3,31707,1,2,0)
+402 ;;=2^97014
+403 ;;^UTILITY(U,$J,358.3,31707,1,3,0)
+404 ;;=3^Electrical Stimulation
+405 ;;^UTILITY(U,$J,358.3,31708,0)
+406 ;;=97116^^93^1293^3^^^^1
+407 ;;^UTILITY(U,$J,358.3,31708,1,0)
+408 ;;=^358.31IA^3^2
+409 ;;^UTILITY(U,$J,358.3,31708,1,2,0)
+410 ;;=2^97116
+411 ;;^UTILITY(U,$J,358.3,31708,1,3,0)
+412 ;;=3^Gait Training
+413 ;;^UTILITY(U,$J,358.3,31709,0)
+414 ;;=97010^^93^1293^4^^^^1
+415 ;;^UTILITY(U,$J,358.3,31709,1,0)
+416 ;;=^358.31IA^3^2
+417 ;;^UTILITY(U,$J,358.3,31709,1,2,0)
+418 ;;=2^97010
+419 ;;^UTILITY(U,$J,358.3,31709,1,3,0)
+420 ;;=3^Hot/Cold Therapies
+421 ;;^UTILITY(U,$J,358.3,31710,0)
+422 ;;=97033^^93^1293^5^^^^1
+423 ;;^UTILITY(U,$J,358.3,31710,1,0)
+424 ;;=^358.31IA^3^2
+425 ;;^UTILITY(U,$J,358.3,31710,1,2,0)
+426 ;;=2^97033
+427 ;;^UTILITY(U,$J,358.3,31710,1,3,0)
+428 ;;=3^Iontophoresis Ea 15Min
+429 ;;^UTILITY(U,$J,358.3,31711,0)
+430 ;;=97530^^93^1293^6^^^^1
+431 ;;^UTILITY(U,$J,358.3,31711,1,0)
+432 ;;=^358.31IA^3^2
+433 ;;^UTILITY(U,$J,358.3,31711,1,2,0)
+434 ;;=2^97530
+435 ;;^UTILITY(U,$J,358.3,31711,1,3,0)
+436 ;;=3^Kinetic Therapy Ea 15Min
+437 ;;^UTILITY(U,$J,358.3,31712,0)
+438 ;;=97140^^93^1293^7^^^^1
+439 ;;^UTILITY(U,$J,358.3,31712,1,0)
+440 ;;=^358.31IA^3^2
+441 ;;^UTILITY(U,$J,358.3,31712,1,2,0)
+442 ;;=2^97140
+443 ;;^UTILITY(U,$J,358.3,31712,1,3,0)
+444 ;;=3^Manipulation/Mobilization Ea 15Min
+445 ;;^UTILITY(U,$J,358.3,31713,0)
+446 ;;=97112^^93^1293^8^^^^1
+447 ;;^UTILITY(U,$J,358.3,31713,1,0)
+448 ;;=^358.31IA^3^2
+449 ;;^UTILITY(U,$J,358.3,31713,1,2,0)
+450 ;;=2^97112
+451 ;;^UTILITY(U,$J,358.3,31713,1,3,0)
+452 ;;=3^Neuromuscular Re-Ed
+453 ;;^UTILITY(U,$J,358.3,31714,0)
+454 ;;=97039^^93^1293^12^^^^1
+455 ;;^UTILITY(U,$J,358.3,31714,1,0)
+456 ;;=^358.31IA^3^2
+457 ;;^UTILITY(U,$J,358.3,31714,1,2,0)
+458 ;;=2^97039
+459 ;;^UTILITY(U,$J,358.3,31714,1,3,0)
+460 ;;=3^Unlisted PT Modality
+461 ;;^UTILITY(U,$J,358.3,31715,0)
+462 ;;=97124^^93^1293^10^^^^1
+463 ;;^UTILITY(U,$J,358.3,31715,1,0)
+464 ;;=^358.31IA^3^2
+465 ;;^UTILITY(U,$J,358.3,31715,1,2,0)
+466 ;;=2^97124
+467 ;;^UTILITY(U,$J,358.3,31715,1,3,0)
+468 ;;=3^Therapeutic Massage
+469 ;;^UTILITY(U,$J,358.3,31716,0)
+470 ;;=97110^^93^1293^9^^^^1
+471 ;;^UTILITY(U,$J,358.3,31716,1,0)
+472 ;;=^358.31IA^3^2
+473 ;;^UTILITY(U,$J,358.3,31716,1,2,0)
+474 ;;=2^97110
+475 ;;^UTILITY(U,$J,358.3,31716,1,3,0)
+476 ;;=3^Therapeutic Ex/Record/Flex,1 or More Areas
+477 ;;^UTILITY(U,$J,358.3,31717,0)
+478 ;;=97035^^93^1293^11^^^^1
+479 ;;^UTILITY(U,$J,358.3,31717,1,0)
+480 ;;=^358.31IA^3^2
+481 ;;^UTILITY(U,$J,358.3,31717,1,2,0)
+482 ;;=2^97035
+483 ;;^UTILITY(U,$J,358.3,31717,1,3,0)
+484 ;;=3^Ultrasound Ea 15Min
+485 ;;^UTILITY(U,$J,358.3,31718,0)
+486 ;;=20552^^93^1294^6^^^^1
+487 ;;^UTILITY(U,$J,358.3,31718,1,0)
+488 ;;=^358.31IA^3^2
+489 ;;^UTILITY(U,$J,358.3,31718,1,2,0)
+490 ;;=2^20552
+491 ;;^UTILITY(U,$J,358.3,31718,1,3,0)
+492 ;;=3^Trigger Point Inj,1-2 Muscles
+493 ;;^UTILITY(U,$J,358.3,31719,0)
+494 ;;=20553^^93^1294^7^^^^1
+495 ;;^UTILITY(U,$J,358.3,31719,1,0)
+496 ;;=^358.31IA^3^2
+497 ;;^UTILITY(U,$J,358.3,31719,1,2,0)
+498 ;;=2^20553
+499 ;;^UTILITY(U,$J,358.3,31719,1,3,0)
+500 ;;=3^Trigger Point Inj,3 or More Muscles
+501 ;;^UTILITY(U,$J,358.3,31720,0)
+502 ;;=64405^^93^1294^5^^^^1
+503 ;;^UTILITY(U,$J,358.3,31720,1,0)
+504 ;;=^358.31IA^3^2
+505 ;;^UTILITY(U,$J,358.3,31720,1,2,0)
+506 ;;=2^64405
+507 ;;^UTILITY(U,$J,358.3,31720,1,3,0)
+508 ;;=3^Nerve Block,Occipital
+509 ;;^UTILITY(U,$J,358.3,31721,0)
+510 ;;=64615^^93^1294^4^^^^1
+511 ;;^UTILITY(U,$J,358.3,31721,1,0)
+512 ;;=^358.31IA^3^2
+513 ;;^UTILITY(U,$J,358.3,31721,1,2,0)
+514 ;;=2^64615
+515 ;;^UTILITY(U,$J,358.3,31721,1,3,0)
+516 ;;=3^Chemodenervation Muscle for Migraine
+517 ;;^UTILITY(U,$J,358.3,31722,0)
+518 ;;=J0585^^93^1294^2^^^^1
+519 ;;^UTILITY(U,$J,358.3,31722,1,0)
+520 ;;=^358.31IA^3^2
+521 ;;^UTILITY(U,$J,358.3,31722,1,2,0)
+522 ;;=2^J0585
+523 ;;^UTILITY(U,$J,358.3,31722,1,3,0)
+524 ;;=3^Botulinum Toxin A,per unit
+525 ;;^UTILITY(U,$J,358.3,31723,0)
+526 ;;=J0587^^93^1294^3^^^^1
+527 ;;^UTILITY(U,$J,358.3,31723,1,0)
+528 ;;=^358.31IA^3^2
+529 ;;^UTILITY(U,$J,358.3,31723,1,2,0)
+530 ;;=2^J0587
+531 ;;^UTILITY(U,$J,358.3,31723,1,3,0)
+532 ;;=3^Botulinum Toxin B,100 units
+533 ;;^UTILITY(U,$J,358.3,31724,0)
+534 ;;=J0586^^93^1294^1^^^^1
+535 ;;^UTILITY(U,$J,358.3,31724,1,0)
+536 ;;=^358.31IA^3^2
+537 ;;^UTILITY(U,$J,358.3,31724,1,2,0)
+538 ;;=2^J0586
+539 ;;^UTILITY(U,$J,358.3,31724,1,3,0)
+540 ;;=3^Botulinum Toxin A,5 units
+541 ;;^UTILITY(U,$J,358.3,31725,0)
+542 ;;=99415^^93^1295^1^^^^1
+543 ;;^UTILITY(U,$J,358.3,31725,1,0)
+544 ;;=^358.31IA^3^2
+545 ;;^UTILITY(U,$J,358.3,31725,1,2,0)
+546 ;;=2^99415
+547 ;;^UTILITY(U,$J,358.3,31725,1,3,0)
+548 ;;=3^Prolonged Clin Staff Svcs,1st hr
+549 ;;^UTILITY(U,$J,358.3,31726,0)
+550 ;;=99416^^93^1295^2^^^^1
+551 ;;^UTILITY(U,$J,358.3,31726,1,0)
+552 ;;=^358.31IA^3^2
+553 ;;^UTILITY(U,$J,358.3,31726,1,2,0)
+554 ;;=2^99416
+555 ;;^UTILITY(U,$J,358.3,31726,1,3,0)
+556 ;;=3^Prolonged Clin Staff Svcs,Ea Addl 30 min
+557 ;;^UTILITY(U,$J,358.3,31727,0)
+558 ;;=99484^^93^1296^1^^^^1
+559 ;;^UTILITY(U,$J,358.3,31727,1,0)
+560 ;;=^358.31IA^3^2
+561 ;;^UTILITY(U,$J,358.3,31727,1,2,0)
+562 ;;=2^99484
+563 ;;^UTILITY(U,$J,358.3,31727,1,3,0)
+564 ;;=3^Care Mgmt Svc Bhvl Hlth Cond,20+ min
+565 ;;^UTILITY(U,$J,358.3,31728,0)
+566 ;;=99483^^93^1297^1^^^^1
+567 ;;^UTILITY(U,$J,358.3,31728,1,0)
+568 ;;=^358.31IA^3^2
+569 ;;^UTILITY(U,$J,358.3,31728,1,2,0)
+570 ;;=2^99483
+571 ;;^UTILITY(U,$J,358.3,31728,1,3,0)
+572 ;;=3^Assess/Care Plan,Cog Imp Pt,Historian Present
+573 ;;^UTILITY(U,$J,358.3,31729,0)
+574 ;;=99492^^93^1298^1^^^^1
+575 ;;^UTILITY(U,$J,358.3,31729,1,0)
+576 ;;=^358.31IA^3^2
+577 ;;^UTILITY(U,$J,358.3,31729,1,2,0)
+578 ;;=2^99492
+579 ;;^UTILITY(U,$J,358.3,31729,1,3,0)
+580 ;;=3^Init Psych Collab Care Mgmt,1st 70 min
+581 ;;^UTILITY(U,$J,358.3,31730,0)
+582 ;;=99493^^93^1298^2^^^^1
+583 ;;^UTILITY(U,$J,358.3,31730,1,0)
+584 ;;=^358.31IA^3^2
+585 ;;^UTILITY(U,$J,358.3,31730,1,2,0)
+586 ;;=2^99493
+587 ;;^UTILITY(U,$J,358.3,31730,1,3,0)
+588 ;;=3^Subseq Psych Collab Care Mgmt,1st 60 min
+589 ;;^UTILITY(U,$J,358.3,31731,0)
+590 ;;=99494^^93^1298^3^^^^1
+591 ;;^UTILITY(U,$J,358.3,31731,1,0)
+592 ;;=^358.31IA^3^2
+593 ;;^UTILITY(U,$J,358.3,31731,1,2,0)
+594 ;;=2^99494
+595 ;;^UTILITY(U,$J,358.3,31731,1,3,0)
+596 ;;=3^Init/Subseq Psych Collab Care Mgmt,Ea Addl 30 min
+597 ;;^UTILITY(U,$J,358.3,31732,0)
+598 ;;=97129^^93^1299^1^^^^1
+599 ;;^UTILITY(U,$J,358.3,31732,1,0)
+600 ;;=^358.31IA^3^2
+601 ;;^UTILITY(U,$J,358.3,31732,1,2,0)
+602 ;;=2^97129
+603 ;;^UTILITY(U,$J,358.3,31732,1,3,0)
+604 ;;=3^Therapeutic Intrvn,Cog Func,1st 15 min
+605 ;;^UTILITY(U,$J,358.3,31733,0)
+606 ;;=97130^^93^1299^2^^^^1
+607 ;;^UTILITY(U,$J,358.3,31733,1,0)
+608 ;;=^358.31IA^3^2
+609 ;;^UTILITY(U,$J,358.3,31733,1,2,0)
+610 ;;=2^97130
+611 ;;^UTILITY(U,$J,358.3,31733,1,3,0)
+612 ;;=3^Therapeutic Intrvn,Cog Func,Ea Addl 15 min
+613 ;;^UTILITY(U,$J,358.3,31734,0)
+614 ;;=Z87.81^^94^1300^2
+615 ;;^UTILITY(U,$J,358.3,31734,1,0)
+616 ;;=^358.31IA^4^2
+617 ;;^UTILITY(U,$J,358.3,31734,1,3,0)
+618 ;;=3^Personal history of (healed) traumatic fracture
+619 ;;^UTILITY(U,$J,358.3,31734,1,4,0)
+620 ;;=4^Z87.81
+621 ;;^UTILITY(U,$J,358.3,31734,2)
+622 ;;=^5063513
+623 ;;^UTILITY(U,$J,358.3,31735,0)
+624 ;;=Z87.828^^94^1300^3
+625 ;;^UTILITY(U,$J,358.3,31735,1,0)
+626 ;;=^358.31IA^4^2
+627 ;;^UTILITY(U,$J,358.3,31735,1,3,0)
+628 ;;=3^Personal history of oth (healed) physical injury and trauma
+629 ;;^UTILITY(U,$J,358.3,31735,1,4,0)
+630 ;;=4^Z87.828
+631 ;;^UTILITY(U,$J,358.3,31735,2)
+632 ;;=^5063516
+633 ;;^UTILITY(U,$J,358.3,31736,0)
+634 ;;=S06.9X9S^^94^1300^1
+635 ;;^UTILITY(U,$J,358.3,31736,1,0)
+636 ;;=^358.31IA^4^2
+637 ;;^UTILITY(U,$J,358.3,31736,1,3,0)
+638 ;;=3^Intracranial injury w LOC of unsp duration unspec, sequela
+639 ;;^UTILITY(U,$J,358.3,31736,1,4,0)
+640 ;;=4^S06.9X9S
+641 ;;^UTILITY(U,$J,358.3,31736,2)
+642 ;;=^5021235
+643 ;;^UTILITY(U,$J,358.3,31737,0)
+644 ;;=Z13.850^^94^1300^4
+645 ;;^UTILITY(U,$J,358.3,31737,1,0)
+646 ;;=^358.31IA^4^2
+647 ;;^UTILITY(U,$J,358.3,31737,1,3,0)
+648 ;;=3^TBI Screening,Rpt Once per Injury Event
+649 ;;^UTILITY(U,$J,358.3,31737,1,4,0)
+650 ;;=4^Z13.850
+651 ;;^UTILITY(U,$J,358.3,31737,2)
+652 ;;=^5062717
+653 ;;^UTILITY(U,$J,358.3,31738,0)
+654 ;;=F43.21^^94^1301^2
