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

IBDEI01E.m

Go to the documentation of this file.
IBDEI01E ; ; 28-OCT-2020
 ;;3.0;IB ENCOUNTER FORM IMP/EXP;;OCT 28, 2020
 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,2643,1,4,0)
 ;;=4^Z09.
 ;;^UTILITY(U,$J,358.3,2643,2)
 ;;=^5062668
 ;;^UTILITY(U,$J,358.3,2644,0)
 ;;=Z08.^^27^190^3
 ;;^UTILITY(U,$J,358.3,2644,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,2644,1,3,0)
 ;;=3^F/U Exam after Trtmt for Malig Neop
 ;;^UTILITY(U,$J,358.3,2644,1,4,0)
 ;;=4^Z08.
 ;;^UTILITY(U,$J,358.3,2644,2)
 ;;=^5062667
 ;;^UTILITY(U,$J,358.3,2645,0)
 ;;=Z86.15^^27^190^5
 ;;^UTILITY(U,$J,358.3,2645,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,2645,1,3,0)
 ;;=3^Personal Hx of Latent Tuberculosis Infection
 ;;^UTILITY(U,$J,358.3,2645,1,4,0)
 ;;=4^Z86.15
 ;;^UTILITY(U,$J,358.3,2645,2)
 ;;=^5158331
 ;;^UTILITY(U,$J,358.3,2646,0)
 ;;=Z20.828^^27^190^1
 ;;^UTILITY(U,$J,358.3,2646,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,2646,1,3,0)
 ;;=3^Contact w/ & Exposure to Oth Viral Communicable Diseases
 ;;^UTILITY(U,$J,358.3,2646,1,4,0)
 ;;=4^Z20.828
 ;;^UTILITY(U,$J,358.3,2646,2)
 ;;=^5062774
 ;;^UTILITY(U,$J,358.3,2647,0)
 ;;=Z03.818^^27^190^4
 ;;^UTILITY(U,$J,358.3,2647,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,2647,1,3,0)
 ;;=3^Obs for Susp Expsr to Oth Biolog Agents Ruled Out
 ;;^UTILITY(U,$J,358.3,2647,1,4,0)
 ;;=4^Z03.818
 ;;^UTILITY(U,$J,358.3,2647,2)
 ;;=^5062655
 ;;^UTILITY(U,$J,358.3,2648,0)
 ;;=Z23.^^27^191^1
 ;;^UTILITY(U,$J,358.3,2648,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,2648,1,3,0)
 ;;=3^Encounter for immunization(s)
 ;;^UTILITY(U,$J,358.3,2648,1,4,0)
 ;;=4^Z23.
 ;;^UTILITY(U,$J,358.3,2648,2)
 ;;=^5062795
 ;;^UTILITY(U,$J,358.3,2649,0)
 ;;=Z71.89^^27^192^1
 ;;^UTILITY(U,$J,358.3,2649,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,2649,1,3,0)
 ;;=3^Counseling,Oth Specified
 ;;^UTILITY(U,$J,358.3,2649,1,4,0)
 ;;=4^Z71.89
 ;;^UTILITY(U,$J,358.3,2649,2)
 ;;=^5063253
 ;;^UTILITY(U,$J,358.3,2650,0)
 ;;=Y93.B1^^27^193^2
 ;;^UTILITY(U,$J,358.3,2650,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,2650,1,3,0)
 ;;=3^Activity Exercise Machines Primarily Muscle Conditioning
 ;;^UTILITY(U,$J,358.3,2650,1,4,0)
 ;;=4^Y93.B1
 ;;^UTILITY(U,$J,358.3,2650,2)
 ;;=^5062552
 ;;^UTILITY(U,$J,358.3,2651,0)
 ;;=Y93.A1^^27^193^1
 ;;^UTILITY(U,$J,358.3,2651,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,2651,1,3,0)
 ;;=3^Activity Exercise Machines Primarily Cardiovasc Conditioning
 ;;^UTILITY(U,$J,358.3,2651,1,4,0)
 ;;=4^Y93.A1
 ;;^UTILITY(U,$J,358.3,2651,2)
 ;;=^5062545
 ;;^UTILITY(U,$J,358.3,2652,0)
 ;;=Z91.5^^27^194^1
 ;;^UTILITY(U,$J,358.3,2652,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,2652,1,3,0)
 ;;=3^Personal Hx of Suicide Attempt(s)
 ;;^UTILITY(U,$J,358.3,2652,1,4,0)
 ;;=4^Z91.5
 ;;^UTILITY(U,$J,358.3,2652,2)
 ;;=^5063624
 ;;^UTILITY(U,$J,358.3,2653,0)
 ;;=R45.851^^27^194^2
 ;;^UTILITY(U,$J,358.3,2653,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,2653,1,3,0)
 ;;=3^Suicidal Ideations
 ;;^UTILITY(U,$J,358.3,2653,1,4,0)
 ;;=4^R45.851
 ;;^UTILITY(U,$J,358.3,2653,2)
 ;;=^5019474
 ;;^UTILITY(U,$J,358.3,2654,0)
 ;;=T14.91XA^^27^194^3
 ;;^UTILITY(U,$J,358.3,2654,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,2654,1,3,0)
 ;;=3^Suicide Attempt,Initial Encntr
 ;;^UTILITY(U,$J,358.3,2654,1,4,0)
 ;;=4^T14.91XA
 ;;^UTILITY(U,$J,358.3,2654,2)
 ;;=^5151779
 ;;^UTILITY(U,$J,358.3,2655,0)
 ;;=T14.91XD^^27^194^4
 ;;^UTILITY(U,$J,358.3,2655,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,2655,1,3,0)
 ;;=3^Suicide Attempt,Subsequent Encntr
 ;;^UTILITY(U,$J,358.3,2655,1,4,0)
 ;;=4^T14.91XD
 ;;^UTILITY(U,$J,358.3,2655,2)
 ;;=^5151780
 ;;^UTILITY(U,$J,358.3,2656,0)
 ;;=T14.91XS^^27^194^5
 ;;^UTILITY(U,$J,358.3,2656,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,2656,1,3,0)
 ;;=3^Suicide Attempt,Sequela
 ;;^UTILITY(U,$J,358.3,2656,1,4,0)
 ;;=4^T14.91XS
 ;;^UTILITY(U,$J,358.3,2656,2)
 ;;=^5151781
 ;;^UTILITY(U,$J,358.3,2657,0)
 ;;=99211^^28^195^1
 ;;^UTILITY(U,$J,358.3,2657,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2657,1,2,0)
 ;;=2^99211
 ;;^UTILITY(U,$J,358.3,2657,1,3,0)
 ;;=3^RN/LPN Visit
 ;;^UTILITY(U,$J,358.3,2658,0)
 ;;=99212^^28^195^2
 ;;^UTILITY(U,$J,358.3,2658,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2658,1,2,0)
 ;;=2^99212
 ;;^UTILITY(U,$J,358.3,2658,1,3,0)
 ;;=3^Problem Focused
 ;;^UTILITY(U,$J,358.3,2659,0)
 ;;=99213^^28^195^3
 ;;^UTILITY(U,$J,358.3,2659,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2659,1,2,0)
 ;;=2^99213
 ;;^UTILITY(U,$J,358.3,2659,1,3,0)
 ;;=3^Exp Prob Focused
 ;;^UTILITY(U,$J,358.3,2660,0)
 ;;=99214^^28^195^4
 ;;^UTILITY(U,$J,358.3,2660,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2660,1,2,0)
 ;;=2^99214
 ;;^UTILITY(U,$J,358.3,2660,1,3,0)
 ;;=3^Detailed
 ;;^UTILITY(U,$J,358.3,2661,0)
 ;;=99215^^28^195^5
 ;;^UTILITY(U,$J,358.3,2661,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2661,1,2,0)
 ;;=2^99215
 ;;^UTILITY(U,$J,358.3,2661,1,3,0)
 ;;=3^Comprehensive
 ;;^UTILITY(U,$J,358.3,2662,0)
 ;;=99241^^28^196^1
 ;;^UTILITY(U,$J,358.3,2662,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2662,1,2,0)
 ;;=2^99241
 ;;^UTILITY(U,$J,358.3,2662,1,3,0)
 ;;=3^Prob Focused
 ;;^UTILITY(U,$J,358.3,2663,0)
 ;;=99242^^28^196^2
 ;;^UTILITY(U,$J,358.3,2663,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2663,1,2,0)
 ;;=2^99242
 ;;^UTILITY(U,$J,358.3,2663,1,3,0)
 ;;=3^Exp Problem Focused
 ;;^UTILITY(U,$J,358.3,2664,0)
 ;;=99243^^28^196^3
 ;;^UTILITY(U,$J,358.3,2664,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2664,1,2,0)
 ;;=2^99243
 ;;^UTILITY(U,$J,358.3,2664,1,3,0)
 ;;=3^Detailed
 ;;^UTILITY(U,$J,358.3,2665,0)
 ;;=99244^^28^196^4
 ;;^UTILITY(U,$J,358.3,2665,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2665,1,2,0)
 ;;=2^99244
 ;;^UTILITY(U,$J,358.3,2665,1,3,0)
 ;;=3^Comprehensive, Mod Cmplx
 ;;^UTILITY(U,$J,358.3,2666,0)
 ;;=99245^^28^196^5
 ;;^UTILITY(U,$J,358.3,2666,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2666,1,2,0)
 ;;=2^99245
 ;;^UTILITY(U,$J,358.3,2666,1,3,0)
 ;;=3^Comprehensive, High Cmplx
 ;;^UTILITY(U,$J,358.3,2667,0)
 ;;=99201^^28^197^1
 ;;^UTILITY(U,$J,358.3,2667,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2667,1,2,0)
 ;;=2^99201
 ;;^UTILITY(U,$J,358.3,2667,1,3,0)
 ;;=3^Prob Focused
 ;;^UTILITY(U,$J,358.3,2668,0)
 ;;=99202^^28^197^2
 ;;^UTILITY(U,$J,358.3,2668,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2668,1,2,0)
 ;;=2^99202
 ;;^UTILITY(U,$J,358.3,2668,1,3,0)
 ;;=3^Expanded Prob Focus
 ;;^UTILITY(U,$J,358.3,2669,0)
 ;;=99203^^28^197^3
 ;;^UTILITY(U,$J,358.3,2669,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2669,1,2,0)
 ;;=2^99203
 ;;^UTILITY(U,$J,358.3,2669,1,3,0)
 ;;=3^Detailed
 ;;^UTILITY(U,$J,358.3,2670,0)
 ;;=99204^^28^197^4
 ;;^UTILITY(U,$J,358.3,2670,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2670,1,2,0)
 ;;=2^99204
 ;;^UTILITY(U,$J,358.3,2670,1,3,0)
 ;;=3^Comprehensive, Moderate
 ;;^UTILITY(U,$J,358.3,2671,0)
 ;;=99205^^28^197^5
 ;;^UTILITY(U,$J,358.3,2671,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2671,1,2,0)
 ;;=2^99205
 ;;^UTILITY(U,$J,358.3,2671,1,3,0)
 ;;=3^Comprehensive, High Complx
 ;;^UTILITY(U,$J,358.3,2672,0)
 ;;=92532^^29^198^21
 ;;^UTILITY(U,$J,358.3,2672,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2672,1,2,0)
 ;;=2^92532
 ;;^UTILITY(U,$J,358.3,2672,1,3,0)
 ;;=3^Positional Nystagmus Study
 ;;^UTILITY(U,$J,358.3,2673,0)
 ;;=95857^^29^198^26
 ;;^UTILITY(U,$J,358.3,2673,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2673,1,2,0)
 ;;=2^95857
 ;;^UTILITY(U,$J,358.3,2673,1,3,0)
 ;;=3^Tensilon Test
 ;;^UTILITY(U,$J,358.3,2674,0)
 ;;=64612^^29^198^5^^^^1
 ;;^UTILITY(U,$J,358.3,2674,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2674,1,2,0)
 ;;=2^64612
 ;;^UTILITY(U,$J,358.3,2674,1,3,0)
 ;;=3^Chemodenervation Face Muscle,Unilateral
 ;;^UTILITY(U,$J,358.3,2675,0)
 ;;=J0585^^29^198^4^^^^1
 ;;^UTILITY(U,$J,358.3,2675,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2675,1,2,0)
 ;;=2^J0585
 ;;^UTILITY(U,$J,358.3,2675,1,3,0)
 ;;=3^Chemodenervation Botox A,1 unit
 ;;^UTILITY(U,$J,358.3,2676,0)
 ;;=20552^^29^198^28^^^^1
 ;;^UTILITY(U,$J,358.3,2676,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2676,1,2,0)
 ;;=2^20552
 ;;^UTILITY(U,$J,358.3,2676,1,3,0)
 ;;=3^Trigger Point, 1 or 2 muscles
 ;;^UTILITY(U,$J,358.3,2677,0)
 ;;=20553^^29^198^29^^^^1
 ;;^UTILITY(U,$J,358.3,2677,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2677,1,2,0)
 ;;=2^20553
 ;;^UTILITY(U,$J,358.3,2677,1,3,0)
 ;;=3^Trigger Point, 3 or more muscles
 ;;^UTILITY(U,$J,358.3,2678,0)
 ;;=20612^^29^198^16^^^^1
 ;;^UTILITY(U,$J,358.3,2678,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2678,1,2,0)
 ;;=2^20612
 ;;^UTILITY(U,$J,358.3,2678,1,3,0)
 ;;=3^Ganglion Cyst Aspriation/Injection
 ;;^UTILITY(U,$J,358.3,2679,0)
 ;;=64450^^29^198^18^^^^1
 ;;^UTILITY(U,$J,358.3,2679,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2679,1,2,0)
 ;;=2^64450
 ;;^UTILITY(U,$J,358.3,2679,1,3,0)
 ;;=3^Nerve Block, peripheral nerve
 ;;^UTILITY(U,$J,358.3,2680,0)
 ;;=95990^^29^198^23^^^^1
 ;;^UTILITY(U,$J,358.3,2680,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2680,1,2,0)
 ;;=2^95990
 ;;^UTILITY(U,$J,358.3,2680,1,3,0)
 ;;=3^Refill Spinal Implant Pump by RN
 ;;^UTILITY(U,$J,358.3,2681,0)
 ;;=96402^^29^198^17^^^^1
 ;;^UTILITY(U,$J,358.3,2681,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2681,1,2,0)
 ;;=2^96402
 ;;^UTILITY(U,$J,358.3,2681,1,3,0)
 ;;=3^Injec,IM,anti-neplastic horm
 ;;^UTILITY(U,$J,358.3,2682,0)
 ;;=96372^^29^198^27^^^^1
 ;;^UTILITY(U,$J,358.3,2682,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2682,1,2,0)
 ;;=2^96372
 ;;^UTILITY(U,$J,358.3,2682,1,3,0)
 ;;=3^Ther/Proph/Diag Inj, SC/IM
 ;;^UTILITY(U,$J,358.3,2683,0)
 ;;=64616^^29^198^8^^^^1
 ;;^UTILITY(U,$J,358.3,2683,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2683,1,2,0)
 ;;=2^64616
 ;;^UTILITY(U,$J,358.3,2683,1,3,0)
 ;;=3^Chemodenervation Neck Muscle,Unilateral            
 ;;^UTILITY(U,$J,358.3,2684,0)
 ;;=64642^^29^198^3^^^^1
 ;;^UTILITY(U,$J,358.3,2684,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2684,1,2,0)
 ;;=2^64642
 ;;^UTILITY(U,$J,358.3,2684,1,3,0)
 ;;=3^Chemodenervation 1 Ext/1-4 Muscles
 ;;^UTILITY(U,$J,358.3,2685,0)
 ;;=64643^^29^198^11^^^^1
 ;;^UTILITY(U,$J,358.3,2685,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2685,1,2,0)
 ;;=2^64643
 ;;^UTILITY(U,$J,358.3,2685,1,3,0)
 ;;=3^Chemodenervation,Ea Addl Ext,1-4 Muscle 
 ;;^UTILITY(U,$J,358.3,2686,0)
 ;;=64644^^29^198^2^^^^1
 ;;^UTILITY(U,$J,358.3,2686,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2686,1,2,0)
 ;;=2^64644
 ;;^UTILITY(U,$J,358.3,2686,1,3,0)
 ;;=3^Chemodenervation 1 Ext 5 or > Muscles
 ;;^UTILITY(U,$J,358.3,2687,0)
 ;;=64645^^29^198^12^^^^1
 ;;^UTILITY(U,$J,358.3,2687,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2687,1,2,0)
 ;;=2^64645
 ;;^UTILITY(U,$J,358.3,2687,1,3,0)
 ;;=3^Chemodenervation,Ea Addl Ext,5 or > Mu
 ;;^UTILITY(U,$J,358.3,2688,0)
 ;;=64646^^29^198^9^^^^1
 ;;^UTILITY(U,$J,358.3,2688,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2688,1,2,0)
 ;;=2^64646
 ;;^UTILITY(U,$J,358.3,2688,1,3,0)
 ;;=3^Chemodenervation Trunk,1-5 Muscles
 ;;^UTILITY(U,$J,358.3,2689,0)
 ;;=64647^^29^198^10^^^^1
 ;;^UTILITY(U,$J,358.3,2689,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2689,1,2,0)
 ;;=2^64647
 ;;^UTILITY(U,$J,358.3,2689,1,3,0)
 ;;=3^Chemodenervation Trunk,6 or > Muscles   
 ;;^UTILITY(U,$J,358.3,2690,0)
 ;;=64615^^29^198^7^^^^1
 ;;^UTILITY(U,$J,358.3,2690,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2690,1,2,0)
 ;;=2^64615
 ;;^UTILITY(U,$J,358.3,2690,1,3,0)
 ;;=3^Chemodenervation Muscle for Migraine,Bilateral
 ;;^UTILITY(U,$J,358.3,2691,0)
 ;;=64617^^29^198^6^^^^1
 ;;^UTILITY(U,$J,358.3,2691,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2691,1,2,0)
 ;;=2^64617
 ;;^UTILITY(U,$J,358.3,2691,1,3,0)
 ;;=3^Chemodenervation Muscle Larynx,Unilateral
 ;;^UTILITY(U,$J,358.3,2692,0)
 ;;=62270^^29^198^24^^^^1
 ;;^UTILITY(U,$J,358.3,2692,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2692,1,2,0)
 ;;=2^62270
 ;;^UTILITY(U,$J,358.3,2692,1,3,0)
 ;;=3^Spinal Fluid Tap-Diagnostic 
 ;;^UTILITY(U,$J,358.3,2693,0)
 ;;=62272^^29^198^13^^^^1
 ;;^UTILITY(U,$J,358.3,2693,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2693,1,2,0)
 ;;=2^62272
 ;;^UTILITY(U,$J,358.3,2693,1,3,0)
 ;;=3^Drain Cerebro Spinal Fluid
 ;;^UTILITY(U,$J,358.3,2694,0)
 ;;=64400^^29^198^20^^^^1
 ;;^UTILITY(U,$J,358.3,2694,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2694,1,2,0)
 ;;=2^64400
 ;;^UTILITY(U,$J,358.3,2694,1,3,0)
 ;;=3^Nerve Block,Trigeminal
 ;;^UTILITY(U,$J,358.3,2695,0)
 ;;=78645^^29^198^1^^^^1
 ;;^UTILITY(U,$J,358.3,2695,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2695,1,2,0)
 ;;=2^78645
 ;;^UTILITY(U,$J,358.3,2695,1,3,0)
 ;;=3^CSF Shunt Evaluation
 ;;^UTILITY(U,$J,358.3,2696,0)
 ;;=86580^^29^198^25^^^^1
 ;;^UTILITY(U,$J,358.3,2696,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2696,1,2,0)
 ;;=2^86580
 ;;^UTILITY(U,$J,358.3,2696,1,3,0)
 ;;=3^TB Intradermal Test
 ;;^UTILITY(U,$J,358.3,2697,0)
 ;;=64405^^29^198^19^^^^1
 ;;^UTILITY(U,$J,358.3,2697,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2697,1,2,0)
 ;;=2^64405
 ;;^UTILITY(U,$J,358.3,2697,1,3,0)
 ;;=3^Nerve Block,Occipital
 ;;^UTILITY(U,$J,358.3,2698,0)
 ;;=95991^^29^198^22^^^^1
 ;;^UTILITY(U,$J,358.3,2698,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2698,1,2,0)
 ;;=2^95991
 ;;^UTILITY(U,$J,358.3,2698,1,3,0)
 ;;=3^Refill Spinal Implant Pump by MD/NP/PA
 ;;^UTILITY(U,$J,358.3,2699,0)
 ;;=97014^^29^198^14^^^^1
 ;;^UTILITY(U,$J,358.3,2699,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2699,1,2,0)
 ;;=2^97014
 ;;^UTILITY(U,$J,358.3,2699,1,3,0)
 ;;=3^Electric Stimulation Therapy,Unattended
 ;;^UTILITY(U,$J,358.3,2700,0)
 ;;=97032^^29^198^15^^^^1
 ;;^UTILITY(U,$J,358.3,2700,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2700,1,2,0)
 ;;=2^97032
 ;;^UTILITY(U,$J,358.3,2700,1,3,0)
 ;;=3^Electrical Stimulation,Manual,Ea 15 min
 ;;^UTILITY(U,$J,358.3,2701,0)
 ;;=95816^^29^199^14^^^^1
 ;;^UTILITY(U,$J,358.3,2701,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2701,1,2,0)
 ;;=2^95816
 ;;^UTILITY(U,$J,358.3,2701,1,3,0)
 ;;=3^EEG,Awake and Drowsy
 ;;^UTILITY(U,$J,358.3,2702,0)
 ;;=95819^^29^199^13^^^^1
 ;;^UTILITY(U,$J,358.3,2702,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2702,1,2,0)
 ;;=2^95819
 ;;^UTILITY(U,$J,358.3,2702,1,3,0)
 ;;=3^EEG,Awake and Asleep
 ;;^UTILITY(U,$J,358.3,2703,0)
 ;;=95822^^29^199^16^^^^1
 ;;^UTILITY(U,$J,358.3,2703,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2703,1,2,0)
 ;;=2^95822
 ;;^UTILITY(U,$J,358.3,2703,1,3,0)
 ;;=3^EEG,Sleep or Coma only
 ;;^UTILITY(U,$J,358.3,2704,0)
 ;;=95812^^29^199^1^^^^1
 ;;^UTILITY(U,$J,358.3,2704,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2704,1,2,0)
 ;;=2^95812
 ;;^UTILITY(U,$J,358.3,2704,1,3,0)
 ;;=3^EEG 41-60 min
 ;;^UTILITY(U,$J,358.3,2705,0)
 ;;=95813^^29^199^2^^^^1
 ;;^UTILITY(U,$J,358.3,2705,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2705,1,2,0)
 ;;=2^95813
 ;;^UTILITY(U,$J,358.3,2705,1,3,0)
 ;;=3^EEG > 1 hr
 ;;^UTILITY(U,$J,358.3,2706,0)
 ;;=95957^^29^199^15^^^^1
 ;;^UTILITY(U,$J,358.3,2706,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2706,1,2,0)
 ;;=2^95957
 ;;^UTILITY(U,$J,358.3,2706,1,3,0)
 ;;=3^EEG,Digital Analysis
 ;;^UTILITY(U,$J,358.3,2707,0)
 ;;=95717^^29^199^6^^^^1
 ;;^UTILITY(U,$J,358.3,2707,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2707,1,2,0)
 ;;=2^95717
 ;;^UTILITY(U,$J,358.3,2707,1,3,0)
 ;;=3^EEG Recording 2-12 Hrs w/o Video
 ;;^UTILITY(U,$J,358.3,2708,0)
 ;;=95718^^29^199^5^^^^1
 ;;^UTILITY(U,$J,358.3,2708,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2708,1,2,0)
 ;;=2^95718
 ;;^UTILITY(U,$J,358.3,2708,1,3,0)
 ;;=3^EEG Recording 2-12 Hrs w/ Video
 ;;^UTILITY(U,$J,358.3,2709,0)
 ;;=95719^^29^199^4^^^^1
 ;;^UTILITY(U,$J,358.3,2709,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2709,1,2,0)
 ;;=2^95719
 ;;^UTILITY(U,$J,358.3,2709,1,3,0)
 ;;=3^EEG Recording 13-26 Hrs w/o Video
 ;;^UTILITY(U,$J,358.3,2710,0)
 ;;=95720^^29^199^3^^^^1
 ;;^UTILITY(U,$J,358.3,2710,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2710,1,2,0)
 ;;=2^95720
 ;;^UTILITY(U,$J,358.3,2710,1,3,0)
 ;;=3^EEG Recording 13-26 Hrs w/ Video
 ;;^UTILITY(U,$J,358.3,2711,0)
 ;;=95721^^29^199^8^^^^1
 ;;^UTILITY(U,$J,358.3,2711,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2711,1,2,0)
 ;;=2^95721
 ;;^UTILITY(U,$J,358.3,2711,1,3,0)
 ;;=3^EEG Recording 36-60 Hrs w/o Video
 ;;^UTILITY(U,$J,358.3,2712,0)
 ;;=95722^^29^199^7^^^^1
 ;;^UTILITY(U,$J,358.3,2712,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2712,1,2,0)
 ;;=2^95722
 ;;^UTILITY(U,$J,358.3,2712,1,3,0)
 ;;=3^EEG Recording 36-60 Hrs w/ Video
 ;;^UTILITY(U,$J,358.3,2713,0)
 ;;=95723^^29^199^10^^^^1
 ;;^UTILITY(U,$J,358.3,2713,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2713,1,2,0)
 ;;=2^95723
 ;;^UTILITY(U,$J,358.3,2713,1,3,0)
 ;;=3^EEG Recording 61-84 Hrs w/o Video
 ;;^UTILITY(U,$J,358.3,2714,0)
 ;;=95724^^29^199^9^^^^1
 ;;^UTILITY(U,$J,358.3,2714,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2714,1,2,0)
 ;;=2^95724
 ;;^UTILITY(U,$J,358.3,2714,1,3,0)
 ;;=3^EEG Recording 61-84 Hrs w/ Video
 ;;^UTILITY(U,$J,358.3,2715,0)
 ;;=95725^^29^199^12^^^^1
 ;;^UTILITY(U,$J,358.3,2715,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2715,1,2,0)
 ;;=2^95725
 ;;^UTILITY(U,$J,358.3,2715,1,3,0)
 ;;=3^EEG Recording > 84 Hrs w/o Video
 ;;^UTILITY(U,$J,358.3,2716,0)
 ;;=95726^^29^199^11^^^^1
 ;;^UTILITY(U,$J,358.3,2716,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2716,1,2,0)
 ;;=2^95726
 ;;^UTILITY(U,$J,358.3,2716,1,3,0)
 ;;=3^EEG Recording > 84 Hrs w/ Video
 ;;^UTILITY(U,$J,358.3,2717,0)
 ;;=95806^^29^200^9^^^^1
 ;;^UTILITY(U,$J,358.3,2717,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2717,1,2,0)
 ;;=2^95806
 ;;^UTILITY(U,$J,358.3,2717,1,3,0)
 ;;=3^Sleep Study/Unattended
 ;;^UTILITY(U,$J,358.3,2718,0)
 ;;=95807^^29^200^8^^^^1
 ;;^UTILITY(U,$J,358.3,2718,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2718,1,2,0)
 ;;=2^95807
 ;;^UTILITY(U,$J,358.3,2718,1,3,0)
 ;;=3^Sleep Study in Hosp/Clinic
 ;;^UTILITY(U,$J,358.3,2719,0)
 ;;=95805^^29^200^3^^^^1
 ;;^UTILITY(U,$J,358.3,2719,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2719,1,2,0)
 ;;=2^95805
 ;;^UTILITY(U,$J,358.3,2719,1,3,0)
 ;;=3^Multiple Sleep Latency Test
 ;;^UTILITY(U,$J,358.3,2720,0)
 ;;=95808^^29^200^4^^^^1
 ;;^UTILITY(U,$J,358.3,2720,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2720,1,2,0)
 ;;=2^95808
 ;;^UTILITY(U,$J,358.3,2720,1,3,0)
 ;;=3^Polysomnography,1-3
 ;;^UTILITY(U,$J,358.3,2721,0)
 ;;=G8839^^29^200^7^^^^1
 ;;^UTILITY(U,$J,358.3,2721,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2721,1,2,0)
 ;;=2^G8839
 ;;^UTILITY(U,$J,358.3,2721,1,3,0)
 ;;=3^Sleep Apnea Assess
 ;;^UTILITY(U,$J,358.3,2722,0)
 ;;=92585^^29^200^2^^^^1
 ;;^UTILITY(U,$J,358.3,2722,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2722,1,2,0)
 ;;=2^92585
 ;;^UTILITY(U,$J,358.3,2722,1,3,0)
 ;;=3^Auditor Evoke Potent,Comprehensive
 ;;^UTILITY(U,$J,358.3,2723,0)
 ;;=95803^^29^200^1^^^^1
 ;;^UTILITY(U,$J,358.3,2723,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2723,1,2,0)
 ;;=2^95803
 ;;^UTILITY(U,$J,358.3,2723,1,3,0)
 ;;=3^Actigraphy Testing (72hrs/14 consecutive days)
 ;;^UTILITY(U,$J,358.3,2724,0)
 ;;=95810^^29^200^5^^^^1
 ;;^UTILITY(U,$J,358.3,2724,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,2724,1,2,0)
 ;;=2^95810
 ;;^UTILITY(U,$J,358.3,2724,1,3,0)
 ;;=3^Polysomnography w/ 4+ Parameters         
 ;;^UTILITY(U,$J,358.3,2725,0)
 ;;=95811^^29^200^6^^^^1