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

IBDEI0A9.m

Go to the documentation of this file.
IBDEI0A9 ; ; 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,25095,0)
 ;;=R51.9^^74^992^40
 ;;^UTILITY(U,$J,358.3,25095,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,25095,1,3,0)
 ;;=3^Headache,Unspecified
 ;;^UTILITY(U,$J,358.3,25095,1,4,0)
 ;;=4^R51.9
 ;;^UTILITY(U,$J,358.3,25095,2)
 ;;=^5159306
 ;;^UTILITY(U,$J,358.3,25096,0)
 ;;=R05.9^^74^992^23
 ;;^UTILITY(U,$J,358.3,25096,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,25096,1,3,0)
 ;;=3^Cough,Unspec
 ;;^UTILITY(U,$J,358.3,25096,1,4,0)
 ;;=4^R05.9
 ;;^UTILITY(U,$J,358.3,25096,2)
 ;;=^5161232
 ;;^UTILITY(U,$J,358.3,25097,0)
 ;;=R45.851^^74^993^3
 ;;^UTILITY(U,$J,358.3,25097,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,25097,1,3,0)
 ;;=3^Suicidal Ideations
 ;;^UTILITY(U,$J,358.3,25097,1,4,0)
 ;;=4^R45.851
 ;;^UTILITY(U,$J,358.3,25097,2)
 ;;=^5019474
 ;;^UTILITY(U,$J,358.3,25098,0)
 ;;=T14.91XA^^74^993^4
 ;;^UTILITY(U,$J,358.3,25098,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,25098,1,3,0)
 ;;=3^Suicide Attempt,Initial Encntr
 ;;^UTILITY(U,$J,358.3,25098,1,4,0)
 ;;=4^T14.91XA
 ;;^UTILITY(U,$J,358.3,25098,2)
 ;;=^5151779
 ;;^UTILITY(U,$J,358.3,25099,0)
 ;;=T14.91XD^^74^993^6
 ;;^UTILITY(U,$J,358.3,25099,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,25099,1,3,0)
 ;;=3^Suicide Attempt,Subsequent Encntr
 ;;^UTILITY(U,$J,358.3,25099,1,4,0)
 ;;=4^T14.91XD
 ;;^UTILITY(U,$J,358.3,25099,2)
 ;;=^5151780
 ;;^UTILITY(U,$J,358.3,25100,0)
 ;;=T14.91XS^^74^993^5
 ;;^UTILITY(U,$J,358.3,25100,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,25100,1,3,0)
 ;;=3^Suicide Attempt,Sequela
 ;;^UTILITY(U,$J,358.3,25100,1,4,0)
 ;;=4^T14.91XS
 ;;^UTILITY(U,$J,358.3,25100,2)
 ;;=^5151781
 ;;^UTILITY(U,$J,358.3,25101,0)
 ;;=Z91.52^^74^993^1
 ;;^UTILITY(U,$J,358.3,25101,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,25101,1,3,0)
 ;;=3^Personal Hx of Non-Suicidal Self-Harm
 ;;^UTILITY(U,$J,358.3,25101,1,4,0)
 ;;=4^Z91.52
 ;;^UTILITY(U,$J,358.3,25101,2)
 ;;=^5161318
 ;;^UTILITY(U,$J,358.3,25102,0)
 ;;=Z91.51^^74^993^2
 ;;^UTILITY(U,$J,358.3,25102,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,25102,1,3,0)
 ;;=3^Personal Hx of Suicidal Behavior     
 ;;^UTILITY(U,$J,358.3,25102,1,4,0)
 ;;=4^Z91.51
 ;;^UTILITY(U,$J,358.3,25102,2)
 ;;=^5161317
 ;;^UTILITY(U,$J,358.3,25103,0)
 ;;=90471^^75^994^1^^^^1
 ;;^UTILITY(U,$J,358.3,25103,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,25103,1,2,0)
 ;;=2^90471
 ;;^UTILITY(U,$J,358.3,25103,1,3,0)
 ;;=3^Immunization Admin (use w/ Vaccs)
 ;;^UTILITY(U,$J,358.3,25104,0)
 ;;=90472^^75^994^2^^^^1
 ;;^UTILITY(U,$J,358.3,25104,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,25104,1,2,0)
 ;;=2^90472
 ;;^UTILITY(U,$J,358.3,25104,1,3,0)
 ;;=3^Immunization Admin, ea add
 ;;^UTILITY(U,$J,358.3,25105,0)
 ;;=90632^^75^994^7^^^^1
 ;;^UTILITY(U,$J,358.3,25105,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,25105,1,2,0)
 ;;=2^90632
 ;;^UTILITY(U,$J,358.3,25105,1,3,0)
 ;;=3^Hepatitis A Vaccine
 ;;^UTILITY(U,$J,358.3,25106,0)
 ;;=90746^^75^994^9^^^^1
 ;;^UTILITY(U,$J,358.3,25106,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,25106,1,2,0)
 ;;=2^90746
 ;;^UTILITY(U,$J,358.3,25106,1,3,0)
 ;;=3^Hepatitis B Vaccine (3 Doses)
 ;;^UTILITY(U,$J,358.3,25107,0)
 ;;=90636^^75^994^8^^^^1
 ;;^UTILITY(U,$J,358.3,25107,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,25107,1,2,0)
 ;;=2^90636
 ;;^UTILITY(U,$J,358.3,25107,1,3,0)
 ;;=3^Hepatitis A&B Vaccine
 ;;^UTILITY(U,$J,358.3,25108,0)
 ;;=90707^^75^994^10^^^^1
 ;;^UTILITY(U,$J,358.3,25108,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,25108,1,2,0)
 ;;=2^90707
 ;;^UTILITY(U,$J,358.3,25108,1,3,0)
 ;;=3^MMR Virus
 ;;^UTILITY(U,$J,358.3,25109,0)
 ;;=90658^^75^994^4^^^^1
 ;;^UTILITY(U,$J,358.3,25109,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,25109,1,2,0)
 ;;=2^90658
 ;;^UTILITY(U,$J,358.3,25109,1,3,0)
 ;;=3^Flu Vaccine IM (Flulaval)
 ;;^UTILITY(U,$J,358.3,25110,0)
 ;;=90732^^75^994^11^^^^1
 ;;^UTILITY(U,$J,358.3,25110,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,25110,1,2,0)
 ;;=2^90732
 ;;^UTILITY(U,$J,358.3,25110,1,3,0)
 ;;=3^Pneumovax 23 (Pneumococcal Vaccine)
 ;;^UTILITY(U,$J,358.3,25111,0)
 ;;=90715^^75^994^14^^^^1
 ;;^UTILITY(U,$J,358.3,25111,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,25111,1,2,0)
 ;;=2^90715
 ;;^UTILITY(U,$J,358.3,25111,1,3,0)
 ;;=3^TDaP Vaccine
 ;;^UTILITY(U,$J,358.3,25112,0)
 ;;=90736^^75^994^15^^^^1
 ;;^UTILITY(U,$J,358.3,25112,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,25112,1,2,0)
 ;;=2^90736
 ;;^UTILITY(U,$J,358.3,25112,1,3,0)
 ;;=3^Zoster (Shingles) Vaccine
 ;;^UTILITY(U,$J,358.3,25113,0)
 ;;=90714^^75^994^13^^^^1
 ;;^UTILITY(U,$J,358.3,25113,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,25113,1,2,0)
 ;;=2^90714
 ;;^UTILITY(U,$J,358.3,25113,1,3,0)
 ;;=3^TD Vaccine
 ;;^UTILITY(U,$J,358.3,25114,0)
 ;;=90656^^75^994^5^^^^1
 ;;^UTILITY(U,$J,358.3,25114,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,25114,1,2,0)
 ;;=2^90656
 ;;^UTILITY(U,$J,358.3,25114,1,3,0)
 ;;=3^Flu Vaccine Single Dose Syringe (Afluria)
 ;;^UTILITY(U,$J,358.3,25115,0)
 ;;=90662^^75^994^3^^^^1
 ;;^UTILITY(U,$J,358.3,25115,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,25115,1,2,0)
 ;;=2^90662
 ;;^UTILITY(U,$J,358.3,25115,1,3,0)
 ;;=3^Flu Vaccine High Dose Syringe (Fluzone)
 ;;^UTILITY(U,$J,358.3,25116,0)
 ;;=90670^^75^994^12^^^^1
 ;;^UTILITY(U,$J,358.3,25116,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,25116,1,2,0)
 ;;=2^90670
 ;;^UTILITY(U,$J,358.3,25116,1,3,0)
 ;;=3^Prevnar 13 (Pneumococcal Vaccine)
 ;;^UTILITY(U,$J,358.3,25117,0)
 ;;=90686^^75^994^6^^^^1
 ;;^UTILITY(U,$J,358.3,25117,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,25117,1,2,0)
 ;;=2^90686
 ;;^UTILITY(U,$J,358.3,25117,1,3,0)
 ;;=3^Flu Vaccine Single Dose Syringe (Fluarix)
 ;;^UTILITY(U,$J,358.3,25118,0)
 ;;=96372^^75^995^1^^^^1
 ;;^UTILITY(U,$J,358.3,25118,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,25118,1,2,0)
 ;;=2^96372
 ;;^UTILITY(U,$J,358.3,25118,1,3,0)
 ;;=3^Ther/Proph/Dx Inj SQ/IM
 ;;^UTILITY(U,$J,358.3,25119,0)
 ;;=20600^^75^995^2^^^^1
 ;;^UTILITY(U,$J,358.3,25119,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,25119,1,2,0)
 ;;=2^20600
 ;;^UTILITY(U,$J,358.3,25119,1,3,0)
 ;;=3^Drain/Inject Small Joint/Bursa w/o US
 ;;^UTILITY(U,$J,358.3,25120,0)
 ;;=20605^^75^995^4^^^^1
 ;;^UTILITY(U,$J,358.3,25120,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,25120,1,2,0)
 ;;=2^20605
 ;;^UTILITY(U,$J,358.3,25120,1,3,0)
 ;;=3^Drain/Inject Interm Joint/Bursa w/o US
 ;;^UTILITY(U,$J,358.3,25121,0)
 ;;=20610^^75^995^6^^^^1
 ;;^UTILITY(U,$J,358.3,25121,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,25121,1,2,0)
 ;;=2^20610
 ;;^UTILITY(U,$J,358.3,25121,1,3,0)
 ;;=3^Drain/Inject Major Joint/Bursa w/o US
 ;;^UTILITY(U,$J,358.3,25122,0)
 ;;=20604^^75^995^3^^^^1
 ;;^UTILITY(U,$J,358.3,25122,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,25122,1,2,0)
 ;;=2^20604
 ;;^UTILITY(U,$J,358.3,25122,1,3,0)
 ;;=3^Drain/Inject Small Joint/Bursa w/ US
 ;;^UTILITY(U,$J,358.3,25123,0)
 ;;=20606^^75^995^5^^^^1
 ;;^UTILITY(U,$J,358.3,25123,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,25123,1,2,0)
 ;;=2^20606
 ;;^UTILITY(U,$J,358.3,25123,1,3,0)
 ;;=3^Drain/Inject Interm Joint/Bursa w/ US
 ;;^UTILITY(U,$J,358.3,25124,0)
 ;;=20611^^75^995^7^^^^1
 ;;^UTILITY(U,$J,358.3,25124,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,25124,1,2,0)
 ;;=2^20611
 ;;^UTILITY(U,$J,358.3,25124,1,3,0)
 ;;=3^Drain/Inject Major Joint/Bursa w/ US
 ;;^UTILITY(U,$J,358.3,25125,0)
 ;;=99078^^75^996^2^^^^1
 ;;^UTILITY(U,$J,358.3,25125,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,25125,1,2,0)
 ;;=2^99078
 ;;^UTILITY(U,$J,358.3,25125,1,3,0)
 ;;=3^Group Health Education
 ;;^UTILITY(U,$J,358.3,25126,0)
 ;;=98960^^75^996^3^^^^1
 ;;^UTILITY(U,$J,358.3,25126,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,25126,1,2,0)
 ;;=2^98960
 ;;^UTILITY(U,$J,358.3,25126,1,3,0)
 ;;=3^Self-Mgmt Educ/Train 1 Pt
 ;;^UTILITY(U,$J,358.3,25127,0)
 ;;=98961^^75^996^4^^^^1
 ;;^UTILITY(U,$J,358.3,25127,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,25127,1,2,0)
 ;;=2^98961
 ;;^UTILITY(U,$J,358.3,25127,1,3,0)
 ;;=3^Self-Mgmt Educ/Train 2-4 Pt
 ;;^UTILITY(U,$J,358.3,25128,0)
 ;;=98962^^75^996^5^^^^1
 ;;^UTILITY(U,$J,358.3,25128,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,25128,1,2,0)
 ;;=2^98962
 ;;^UTILITY(U,$J,358.3,25128,1,3,0)
 ;;=3^Self-Mgmt Educ/Train 5-8 Pt
 ;;^UTILITY(U,$J,358.3,25129,0)
 ;;=90887^^75^997^1^^^^1
 ;;^UTILITY(U,$J,358.3,25129,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,25129,1,2,0)
 ;;=2^90887
 ;;^UTILITY(U,$J,358.3,25129,1,3,0)
 ;;=3^CONSULTATION WITH FAMILY
 ;;^UTILITY(U,$J,358.3,25130,0)
 ;;=90846^^75^997^2^^^^1
 ;;^UTILITY(U,$J,358.3,25130,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,25130,1,2,0)
 ;;=2^90846
 ;;^UTILITY(U,$J,358.3,25130,1,3,0)
 ;;=3^FAMILY PSYTX W/O PATIENT
 ;;^UTILITY(U,$J,358.3,25131,0)
 ;;=99401^^75^997^3^^^^1
 ;;^UTILITY(U,$J,358.3,25131,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,25131,1,2,0)
 ;;=2^99401
 ;;^UTILITY(U,$J,358.3,25131,1,3,0)
 ;;=3^Preventive Counseling, IND (15 Mins)
 ;;^UTILITY(U,$J,358.3,25132,0)
 ;;=99402^^75^997^4^^^^1
 ;;^UTILITY(U,$J,358.3,25132,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,25132,1,2,0)
 ;;=2^99402
 ;;^UTILITY(U,$J,358.3,25132,1,3,0)
 ;;=3^Preventive Counseling, IND (30 Mins)
 ;;^UTILITY(U,$J,358.3,25133,0)
 ;;=99403^^75^997^5^^^^1
 ;;^UTILITY(U,$J,358.3,25133,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,25133,1,2,0)
 ;;=2^99403
 ;;^UTILITY(U,$J,358.3,25133,1,3,0)
 ;;=3^Preventive Counseling, IND (45 Mins)
 ;;^UTILITY(U,$J,358.3,25134,0)
 ;;=99404^^75^997^6^^^^1
 ;;^UTILITY(U,$J,358.3,25134,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,25134,1,2,0)
 ;;=2^99404
 ;;^UTILITY(U,$J,358.3,25134,1,3,0)
 ;;=3^Preventive Counseling, IND (60 Mins)
 ;;^UTILITY(U,$J,358.3,25135,0)
 ;;=99411^^75^997^7^^^^1
 ;;^UTILITY(U,$J,358.3,25135,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,25135,1,2,0)
 ;;=2^99411
 ;;^UTILITY(U,$J,358.3,25135,1,3,0)
 ;;=3^Preventive Counseling, Group (30 Mins)
 ;;^UTILITY(U,$J,358.3,25136,0)
 ;;=99412^^75^997^8^^^^1
 ;;^UTILITY(U,$J,358.3,25136,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,25136,1,2,0)
 ;;=2^99412
 ;;^UTILITY(U,$J,358.3,25136,1,3,0)
 ;;=3^Preventive Counseling, Group (60 Mins)
 ;;^UTILITY(U,$J,358.3,25137,0)
 ;;=99366^^75^997^9^^^^1
 ;;^UTILITY(U,$J,358.3,25137,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,25137,1,2,0)
 ;;=2^99366
 ;;^UTILITY(U,$J,358.3,25137,1,3,0)
 ;;=3^Team Conf w/ Pat by HC Pro (30 Mins)
 ;;^UTILITY(U,$J,358.3,25138,0)
 ;;=99367^^75^997^10^^^^1
 ;;^UTILITY(U,$J,358.3,25138,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,25138,1,2,0)
 ;;=2^99367
 ;;^UTILITY(U,$J,358.3,25138,1,3,0)
 ;;=3^Team Conf w/o Pat by Phys (30 Mins)
 ;;^UTILITY(U,$J,358.3,25139,0)
 ;;=99368^^75^997^11^^^^1
 ;;^UTILITY(U,$J,358.3,25139,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,25139,1,2,0)
 ;;=2^99368
 ;;^UTILITY(U,$J,358.3,25139,1,3,0)
 ;;=3^Team Conf w/o Pat by HC Prof (30 Mins)
 ;;^UTILITY(U,$J,358.3,25140,0)
 ;;=97535^^75^998^1^^^^1
 ;;^UTILITY(U,$J,358.3,25140,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,25140,1,2,0)
 ;;=2^97535
 ;;^UTILITY(U,$J,358.3,25140,1,3,0)
 ;;=3^ADLS Training,Ea 15min
 ;;^UTILITY(U,$J,358.3,25141,0)
 ;;=96105^^75^998^2^^^^1
 ;;^UTILITY(U,$J,358.3,25141,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,25141,1,2,0)
 ;;=2^96105
 ;;^UTILITY(U,$J,358.3,25141,1,3,0)
 ;;=3^Aphasia Assessment,Per Hr
 ;;^UTILITY(U,$J,358.3,25142,0)
 ;;=90901^^75^998^3^^^^1
 ;;^UTILITY(U,$J,358.3,25142,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,25142,1,2,0)
 ;;=2^90901
 ;;^UTILITY(U,$J,358.3,25142,1,3,0)
 ;;=3^Biofeedback training any method
 ;;^UTILITY(U,$J,358.3,25143,0)
 ;;=97750^^75^998^6^^^^1
 ;;^UTILITY(U,$J,358.3,25143,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,25143,1,2,0)
 ;;=2^97750
 ;;^UTILITY(U,$J,358.3,25143,1,3,0)
 ;;=3^Extrem Perf Testing,Ea 15min
 ;;^UTILITY(U,$J,358.3,25144,0)
 ;;=97161^^75^998^12^^^^1
 ;;^UTILITY(U,$J,358.3,25144,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,25144,1,2,0)
 ;;=2^97161
 ;;^UTILITY(U,$J,358.3,25144,1,3,0)
 ;;=3^PT Evaluation,Low Complexity
 ;;^UTILITY(U,$J,358.3,25145,0)
 ;;=97162^^75^998^13^^^^1
 ;;^UTILITY(U,$J,358.3,25145,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,25145,1,2,0)
 ;;=2^97162
 ;;^UTILITY(U,$J,358.3,25145,1,3,0)
 ;;=3^PT Evaluation,Moderate Complexity
 ;;^UTILITY(U,$J,358.3,25146,0)
 ;;=97163^^75^998^11^^^^1
 ;;^UTILITY(U,$J,358.3,25146,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,25146,1,2,0)
 ;;=2^97163
 ;;^UTILITY(U,$J,358.3,25146,1,3,0)
 ;;=3^PT Evaluation,High Complexity
 ;;^UTILITY(U,$J,358.3,25147,0)
 ;;=97164^^75^998^14^^^^1
 ;;^UTILITY(U,$J,358.3,25147,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,25147,1,2,0)
 ;;=2^97164
 ;;^UTILITY(U,$J,358.3,25147,1,3,0)
 ;;=3^PT Re-Evaluation
 ;;^UTILITY(U,$J,358.3,25148,0)
 ;;=97165^^75^998^8^^^^1
 ;;^UTILITY(U,$J,358.3,25148,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,25148,1,2,0)
 ;;=2^97165
 ;;^UTILITY(U,$J,358.3,25148,1,3,0)
 ;;=3^OT Evaluation,Low Complexity
 ;;^UTILITY(U,$J,358.3,25149,0)
 ;;=97166^^75^998^9^^^^1
 ;;^UTILITY(U,$J,358.3,25149,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,25149,1,2,0)
 ;;=2^97166
 ;;^UTILITY(U,$J,358.3,25149,1,3,0)
 ;;=3^OT Evaluation,Moderate Complexity
 ;;^UTILITY(U,$J,358.3,25150,0)
 ;;=97167^^75^998^7^^^^1
 ;;^UTILITY(U,$J,358.3,25150,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,25150,1,2,0)
 ;;=2^97167
 ;;^UTILITY(U,$J,358.3,25150,1,3,0)
 ;;=3^OT Evaluation,High Complexity
 ;;^UTILITY(U,$J,358.3,25151,0)
 ;;=97168^^75^998^10^^^^1
 ;;^UTILITY(U,$J,358.3,25151,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,25151,1,2,0)
 ;;=2^97168
 ;;^UTILITY(U,$J,358.3,25151,1,3,0)
 ;;=3^OT Re-Evaluation
 ;;^UTILITY(U,$J,358.3,25152,0)
 ;;=96112^^75^998^4^^^^1
 ;;^UTILITY(U,$J,358.3,25152,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,25152,1,2,0)
 ;;=2^96112
 ;;^UTILITY(U,$J,358.3,25152,1,3,0)
 ;;=3^Developmental Test Admin,1st Hr
 ;;^UTILITY(U,$J,358.3,25153,0)
 ;;=96113^^75^998^5^^^^1
 ;;^UTILITY(U,$J,358.3,25153,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,25153,1,2,0)
 ;;=2^96113
 ;;^UTILITY(U,$J,358.3,25153,1,3,0)
 ;;=3^Developmental Test Admin,Ea Addl 30 min
 ;;^UTILITY(U,$J,358.3,25154,0)
 ;;=64479^^75^999^6^^^^1
 ;;^UTILITY(U,$J,358.3,25154,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,25154,1,2,0)
 ;;=2^64479
 ;;^UTILITY(U,$J,358.3,25154,1,3,0)
 ;;=3^INJ Epidural, foramen, C/T
 ;;^UTILITY(U,$J,358.3,25155,0)
 ;;=64480^^75^999^8^^^^1
 ;;^UTILITY(U,$J,358.3,25155,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,25155,1,2,0)
 ;;=2^64480
 ;;^UTILITY(U,$J,358.3,25155,1,3,0)
 ;;=3^INJ Epidural,C/T Ea Addl Level
 ;;^UTILITY(U,$J,358.3,25156,0)
 ;;=64483^^75^999^7^^^^1
 ;;^UTILITY(U,$J,358.3,25156,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,25156,1,2,0)
 ;;=2^64483
 ;;^UTILITY(U,$J,358.3,25156,1,3,0)
 ;;=3^INJ Epidural, foramen, L/S
 ;;^UTILITY(U,$J,358.3,25157,0)
 ;;=64484^^75^999^5^^^^1
 ;;^UTILITY(U,$J,358.3,25157,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,25157,1,2,0)
 ;;=2^64484
 ;;^UTILITY(U,$J,358.3,25157,1,3,0)
 ;;=3^INJ Epidural, L/S Ea Addl Level
 ;;^UTILITY(U,$J,358.3,25158,0)
 ;;=64633^^75^999^1^^^^1
 ;;^UTILITY(U,$J,358.3,25158,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,25158,1,2,0)
 ;;=2^64633
 ;;^UTILITY(U,$J,358.3,25158,1,3,0)
 ;;=3^DESTR PARAVERT Nerve C/T, single
 ;;^UTILITY(U,$J,358.3,25159,0)
 ;;=64634^^75^999^4^^^^1
 ;;^UTILITY(U,$J,358.3,25159,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,25159,1,2,0)
 ;;=2^64634
 ;;^UTILITY(U,$J,358.3,25159,1,3,0)
 ;;=3^Destr PN C/T,Ea Addl Level
 ;;^UTILITY(U,$J,358.3,25160,0)
 ;;=64635^^75^999^2^^^^1
 ;;^UTILITY(U,$J,358.3,25160,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,25160,1,2,0)
 ;;=2^64635
 ;;^UTILITY(U,$J,358.3,25160,1,3,0)
 ;;=3^DESTR PARAVERT Nerve L/S, single
 ;;^UTILITY(U,$J,358.3,25161,0)
 ;;=64636^^75^999^3^^^^1
 ;;^UTILITY(U,$J,358.3,25161,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,25161,1,2,0)
 ;;=2^64636
 ;;^UTILITY(U,$J,358.3,25161,1,3,0)
 ;;=3^DESTR PN L/S, Ea Addl Level
 ;;^UTILITY(U,$J,358.3,25162,0)
 ;;=64490^^75^999^11^^^^1
 ;;^UTILITY(U,$J,358.3,25162,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,25162,1,2,0)
 ;;=2^64490
 ;;^UTILITY(U,$J,358.3,25162,1,3,0)
 ;;=3^INJ PARAVERT Joint C/T, Single
 ;;^UTILITY(U,$J,358.3,25163,0)
 ;;=64491^^75^999^13^^^^1
 ;;^UTILITY(U,$J,358.3,25163,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,25163,1,2,0)
 ;;=2^64491
 ;;^UTILITY(U,$J,358.3,25163,1,3,0)
 ;;=3^INJ PV Joint C/T, second level
 ;;^UTILITY(U,$J,358.3,25164,0)
 ;;=64492^^75^999^14^^^^1
 ;;^UTILITY(U,$J,358.3,25164,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,25164,1,2,0)
 ;;=2^64492
 ;;^UTILITY(U,$J,358.3,25164,1,3,0)
 ;;=3^INJ PV Joint C/T, third or more
 ;;^UTILITY(U,$J,358.3,25165,0)
 ;;=64493^^75^999^12^^^^1
 ;;^UTILITY(U,$J,358.3,25165,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,25165,1,2,0)
 ;;=2^64493
 ;;^UTILITY(U,$J,358.3,25165,1,3,0)
 ;;=3^INJ PARAVERT Joint L/S, Single
 ;;^UTILITY(U,$J,358.3,25166,0)
 ;;=64494^^75^999^15^^^^1
 ;;^UTILITY(U,$J,358.3,25166,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,25166,1,2,0)
 ;;=2^64494
 ;;^UTILITY(U,$J,358.3,25166,1,3,0)
 ;;=3^INJ PV Joint L/S, second level
 ;;^UTILITY(U,$J,358.3,25167,0)
 ;;=64495^^75^999^16^^^^1
 ;;^UTILITY(U,$J,358.3,25167,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,25167,1,2,0)
 ;;=2^64495
 ;;^UTILITY(U,$J,358.3,25167,1,3,0)
 ;;=3^INJ PV Joint L/S, third or more
 ;;^UTILITY(U,$J,358.3,25168,0)
 ;;=62320^^75^999^9^^^^1
 ;;^UTILITY(U,$J,358.3,25168,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,25168,1,2,0)
 ;;=2^62320
 ;;^UTILITY(U,$J,358.3,25168,1,3,0)
 ;;=3^INJ Epidural/Subarachnoid,C/T
 ;;^UTILITY(U,$J,358.3,25169,0)
 ;;=62322^^75^999^10^^^^1
 ;;^UTILITY(U,$J,358.3,25169,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,25169,1,2,0)
 ;;=2^62322
 ;;^UTILITY(U,$J,358.3,25169,1,3,0)
 ;;=3^INJ Epidural/Subarachnoid,L/S
 ;;^UTILITY(U,$J,358.3,25170,0)
 ;;=A6196^^75^1000^1^^^^1
 ;;^UTILITY(U,$J,358.3,25170,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,25170,1,2,0)
 ;;=2^A6196
 ;;^UTILITY(U,$J,358.3,25170,1,3,0)
 ;;=3^Alginate dressing,16 sq IN or < EA
 ;;^UTILITY(U,$J,358.3,25171,0)
 ;;=A6222^^75^1000^3^^^^1
 ;;^UTILITY(U,$J,358.3,25171,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,25171,1,2,0)
 ;;=2^A6222
 ;;^UTILITY(U,$J,358.3,25171,1,3,0)
 ;;=3^Gauze, 16 sq IN or <, saline
 ;;^UTILITY(U,$J,358.3,25172,0)
 ;;=A6234^^75^1000^4^^^^1
 ;;^UTILITY(U,$J,358.3,25172,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,25172,1,2,0)
 ;;=2^A6234
 ;;^UTILITY(U,$J,358.3,25172,1,3,0)
 ;;=3^Hydrocolid drg 16<=IN w/o bdr
 ;;^UTILITY(U,$J,358.3,25173,0)
 ;;=A6242^^75^1000^5^^^^1
 ;;^UTILITY(U,$J,358.3,25173,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,25173,1,2,0)
 ;;=2^A6242
 ;;^UTILITY(U,$J,358.3,25173,1,3,0)
 ;;=3^Hydrogel drg <=IN w/o bdr
 ;;^UTILITY(U,$J,358.3,25174,0)
 ;;=A6216^^75^1000^6^^^^1
 ;;^UTILITY(U,$J,358.3,25174,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,25174,1,2,0)
 ;;=2^A6216
 ;;^UTILITY(U,$J,358.3,25174,1,3,0)
 ;;=3^Non-Sterile Gauze <=16 Sq IN
 ;;^UTILITY(U,$J,358.3,25175,0)
 ;;=A6250^^75^1000^8^^^^1
 ;;^UTILITY(U,$J,358.3,25175,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,25175,1,2,0)
 ;;=2^A6250