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

IBDEI08A.m

Go to the documentation of this file. 
  1. IBDEI08A ; ; 01-AUG-2022
  1.  ;;3.0;IB ENCOUNTER FORM IMP/EXP;;AUG 01, 2022
  1.  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
  1. Q Q
  1.  ;;^UTILITY(U,$J,358.3,20190,1,2,0)
  1.  ;;=2^Xeomin (Incobotulinumtoxin A) 1 Unit
  1.  ;;^UTILITY(U,$J,358.3,20190,1,3,0)
  1.  ;;=3^J0588
  1.  ;;^UTILITY(U,$J,358.3,20191,0)
  1.  ;;=J1030^^67^822^7^^^^1
  1.  ;;^UTILITY(U,$J,358.3,20191,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,20191,1,2,0)
  1.  ;;=2^Methylprednisolone 40mg
  1.  ;;^UTILITY(U,$J,358.3,20191,1,3,0)
  1.  ;;=3^J1030
  1.  ;;^UTILITY(U,$J,358.3,20192,0)
  1.  ;;=97597^^67^823^2^^^^1
  1.  ;;^UTILITY(U,$J,358.3,20192,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,20192,1,2,0)
  1.  ;;=2^Active Wound Care/20 Cm Or <
  1.  ;;^UTILITY(U,$J,358.3,20192,1,3,0)
  1.  ;;=3^97597
  1.  ;;^UTILITY(U,$J,358.3,20193,0)
  1.  ;;=97598^^67^823^1^^^^1
  1.  ;;^UTILITY(U,$J,358.3,20193,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,20193,1,2,0)
  1.  ;;=2^Active Wound Care each adtl 20 Cm
  1.  ;;^UTILITY(U,$J,358.3,20193,1,3,0)
  1.  ;;=3^97598
  1.  ;;^UTILITY(U,$J,358.3,20194,0)
  1.  ;;=97605^^67^823^7^^^^1
  1.  ;;^UTILITY(U,$J,358.3,20194,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,20194,1,2,0)
  1.  ;;=2^Neg Press Wound Tx < 50 Cm
  1.  ;;^UTILITY(U,$J,358.3,20194,1,3,0)
  1.  ;;=3^97605
  1.  ;;^UTILITY(U,$J,358.3,20195,0)
  1.  ;;=97606^^67^823^8^^^^1
  1.  ;;^UTILITY(U,$J,358.3,20195,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,20195,1,2,0)
  1.  ;;=2^Neg Press Wound Tx, > 50 Cm
  1.  ;;^UTILITY(U,$J,358.3,20195,1,3,0)
  1.  ;;=3^97606
  1.  ;;^UTILITY(U,$J,358.3,20196,0)
  1.  ;;=97602^^67^823^9^^^^1
  1.  ;;^UTILITY(U,$J,358.3,20196,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,20196,1,2,0)
  1.  ;;=2^Remove Divit. Tissue w/o Anesth
  1.  ;;^UTILITY(U,$J,358.3,20196,1,3,0)
  1.  ;;=3^97602
  1.  ;;^UTILITY(U,$J,358.3,20197,0)
  1.  ;;=G0281^^67^823^5^^^^1
  1.  ;;^UTILITY(U,$J,358.3,20197,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,20197,1,2,0)
  1.  ;;=2^Electrical Stim,Stg 3/4 Wnd Care
  1.  ;;^UTILITY(U,$J,358.3,20197,1,3,0)
  1.  ;;=3^G0281
  1.  ;;^UTILITY(U,$J,358.3,20198,0)
  1.  ;;=G0283^^67^823^3^^^^1
  1.  ;;^UTILITY(U,$J,358.3,20198,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,20198,1,2,0)
  1.  ;;=2^Electrical Stim,Oth than Wnd Care
  1.  ;;^UTILITY(U,$J,358.3,20198,1,3,0)
  1.  ;;=3^G0283
  1.  ;;^UTILITY(U,$J,358.3,20199,0)
  1.  ;;=G0329^^67^823^6^^^^1
  1.  ;;^UTILITY(U,$J,358.3,20199,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,20199,1,2,0)
  1.  ;;=2^Electromagnetic Therapy,Wound Care
  1.  ;;^UTILITY(U,$J,358.3,20199,1,3,0)
  1.  ;;=3^G0329
  1.  ;;^UTILITY(U,$J,358.3,20200,0)
  1.  ;;=97610^^67^823^10^^^^1
  1.  ;;^UTILITY(U,$J,358.3,20200,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,20200,1,2,0)
  1.  ;;=2^US LF Non-Contact Non-Therm,Wnd Assess
  1.  ;;^UTILITY(U,$J,358.3,20200,1,3,0)
  1.  ;;=3^97610
  1.  ;;^UTILITY(U,$J,358.3,20201,0)
  1.  ;;=G0282^^67^823^4^^^^1
  1.  ;;^UTILITY(U,$J,358.3,20201,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,20201,1,2,0)
  1.  ;;=2^Electrical Stim,Stg 1/2 Wnd Care
  1.  ;;^UTILITY(U,$J,358.3,20201,1,3,0)
  1.  ;;=3^G0282
  1.  ;;^UTILITY(U,$J,358.3,20202,0)
  1.  ;;=99070^^67^824^1^^^^1
  1.  ;;^UTILITY(U,$J,358.3,20202,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,20202,1,2,0)
  1.  ;;=2^SPECIAL SUPPLIES
  1.  ;;^UTILITY(U,$J,358.3,20202,1,3,0)
  1.  ;;=3^99070
  1.  ;;^UTILITY(U,$J,358.3,20203,0)
  1.  ;;=97039^^67^824^3^^^^1
  1.  ;;^UTILITY(U,$J,358.3,20203,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,20203,1,2,0)
  1.  ;;=2^UNLISTED PT MODALITY
  1.  ;;^UTILITY(U,$J,358.3,20203,1,3,0)
  1.  ;;=3^97039
  1.  ;;^UTILITY(U,$J,358.3,20204,0)
  1.  ;;=97799^^67^824^2^^^^1
  1.  ;;^UTILITY(U,$J,358.3,20204,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,20204,1,2,0)
  1.  ;;=2^UNLISTED PROCEDURE
  1.  ;;^UTILITY(U,$J,358.3,20204,1,3,0)
  1.  ;;=3^97799
  1.  ;;^UTILITY(U,$J,358.3,20205,0)
  1.  ;;=95860^^67^825^2^^^^1
  1.  ;;^UTILITY(U,$J,358.3,20205,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,20205,1,2,0)
  1.  ;;=2^EMG 1 Limb
  1.  ;;^UTILITY(U,$J,358.3,20205,1,3,0)
  1.  ;;=3^95860
  1.  ;;^UTILITY(U,$J,358.3,20206,0)
  1.  ;;=95863^^67^825^4^^^^1
  1.  ;;^UTILITY(U,$J,358.3,20206,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,20206,1,2,0)
  1.  ;;=2^EMG 3 Limbs
  1.  ;;^UTILITY(U,$J,358.3,20206,1,3,0)
  1.  ;;=3^95863
  1.  ;;^UTILITY(U,$J,358.3,20207,0)
  1.  ;;=95864^^67^825^5^^^^1
  1.  ;;^UTILITY(U,$J,358.3,20207,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,20207,1,2,0)
  1.  ;;=2^EMG 4 Limbs
  1.  ;;^UTILITY(U,$J,358.3,20207,1,3,0)
  1.  ;;=3^95864
  1.  ;;^UTILITY(U,$J,358.3,20208,0)
  1.  ;;=95867^^67^825^6^^^^1
  1.  ;;^UTILITY(U,$J,358.3,20208,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,20208,1,2,0)
  1.  ;;=2^EMG Cran Ner Mus-Unilat
  1.  ;;^UTILITY(U,$J,358.3,20208,1,3,0)
  1.  ;;=3^95867
  1.  ;;^UTILITY(U,$J,358.3,20209,0)
  1.  ;;=95868^^67^825^7^^^^1
  1.  ;;^UTILITY(U,$J,358.3,20209,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,20209,1,2,0)
  1.  ;;=2^EMG Head or Neck
  1.  ;;^UTILITY(U,$J,358.3,20209,1,3,0)
  1.  ;;=3^95868
  1.  ;;^UTILITY(U,$J,358.3,20210,0)
  1.  ;;=95870^^67^825^9^^^^1
  1.  ;;^UTILITY(U,$J,358.3,20210,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,20210,1,2,0)
  1.  ;;=2^Needle EMG < 5 Muscles/Ext
  1.  ;;^UTILITY(U,$J,358.3,20210,1,3,0)
  1.  ;;=3^95870
  1.  ;;^UTILITY(U,$J,358.3,20211,0)
  1.  ;;=95861^^67^825^3^^^^1
  1.  ;;^UTILITY(U,$J,358.3,20211,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,20211,1,2,0)
  1.  ;;=2^EMG 2 Limbs
  1.  ;;^UTILITY(U,$J,358.3,20211,1,3,0)
  1.  ;;=3^95861
  1.  ;;^UTILITY(U,$J,358.3,20212,0)
  1.  ;;=95885^^67^825^10^^^^1
  1.  ;;^UTILITY(U,$J,358.3,20212,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,20212,1,2,0)
  1.  ;;=2^Needle EMG < 5 Muscles/Ext,+NCS
  1.  ;;^UTILITY(U,$J,358.3,20212,1,3,0)
  1.  ;;=3^95885
  1.  ;;^UTILITY(U,$J,358.3,20213,0)
  1.  ;;=95886^^67^825^11^^^^1
  1.  ;;^UTILITY(U,$J,358.3,20213,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,20213,1,2,0)
  1.  ;;=2^Needle EMG >/= 5 Muscles/Ext,+NCS
  1.  ;;^UTILITY(U,$J,358.3,20213,1,3,0)
  1.  ;;=3^95886
  1.  ;;^UTILITY(U,$J,358.3,20214,0)
  1.  ;;=95887^^67^825^12^^^^1
  1.  ;;^UTILITY(U,$J,358.3,20214,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,20214,1,2,0)
  1.  ;;=2^Needle EMG CNs or Axial,+NCS
  1.  ;;^UTILITY(U,$J,358.3,20214,1,3,0)
  1.  ;;=3^95887
  1.  ;;^UTILITY(U,$J,358.3,20215,0)
  1.  ;;=95869^^67^825^13^^^^1
  1.  ;;^UTILITY(U,$J,358.3,20215,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,20215,1,2,0)
  1.  ;;=2^Needle EMS Thor Paraspinal
  1.  ;;^UTILITY(U,$J,358.3,20215,1,3,0)
  1.  ;;=3^95869
  1.  ;;^UTILITY(U,$J,358.3,20216,0)
  1.  ;;=95905^^67^825^8^^^^1
  1.  ;;^UTILITY(U,$J,358.3,20216,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,20216,1,2,0)
  1.  ;;=2^Motor/Sens Nerv Conduct-ea limb w/F-wv
  1.  ;;^UTILITY(U,$J,358.3,20216,1,3,0)
  1.  ;;=3^95905
  1.  ;;^UTILITY(U,$J,358.3,20217,0)
  1.  ;;=95937^^67^825^21^^^^1
  1.  ;;^UTILITY(U,$J,358.3,20217,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,20217,1,2,0)
  1.  ;;=2^Neuromuscular Junction Test
  1.  ;;^UTILITY(U,$J,358.3,20217,1,3,0)
  1.  ;;=3^95937
  1.  ;;^UTILITY(U,$J,358.3,20218,0)
  1.  ;;=95907^^67^825^14^^^^1
  1.  ;;^UTILITY(U,$J,358.3,20218,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,20218,1,2,0)
  1.  ;;=2^Nerve conduction studies; 1-2 studies
  1.  ;;^UTILITY(U,$J,358.3,20218,1,3,0)
  1.  ;;=3^95907
  1.  ;;^UTILITY(U,$J,358.3,20219,0)
  1.  ;;=95908^^67^825^16^^^^1
  1.  ;;^UTILITY(U,$J,358.3,20219,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,20219,1,2,0)
  1.  ;;=2^Nerve conduction studies; 3-4 studies
  1.  ;;^UTILITY(U,$J,358.3,20219,1,3,0)
  1.  ;;=3^95908
  1.  ;;^UTILITY(U,$J,358.3,20220,0)
  1.  ;;=95909^^67^825^17^^^^1
  1.  ;;^UTILITY(U,$J,358.3,20220,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,20220,1,2,0)
  1.  ;;=2^Nerve conduction studies; 5-6 studies
  1.  ;;^UTILITY(U,$J,358.3,20220,1,3,0)
  1.  ;;=3^95909
  1.  ;;^UTILITY(U,$J,358.3,20221,0)
  1.  ;;=95910^^67^825^18^^^^1
  1.  ;;^UTILITY(U,$J,358.3,20221,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,20221,1,2,0)
  1.  ;;=2^Nerve conduction studies; 7-8 studies
  1.  ;;^UTILITY(U,$J,358.3,20221,1,3,0)
  1.  ;;=3^95910
  1.  ;;^UTILITY(U,$J,358.3,20222,0)
  1.  ;;=95911^^67^825^19^^^^1
  1.  ;;^UTILITY(U,$J,358.3,20222,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,20222,1,2,0)
  1.  ;;=2^Nerve conduction studies; 9-10 studies
  1.  ;;^UTILITY(U,$J,358.3,20222,1,3,0)
  1.  ;;=3^95911
  1.  ;;^UTILITY(U,$J,358.3,20223,0)
  1.  ;;=95912^^67^825^15^^^^1
  1.  ;;^UTILITY(U,$J,358.3,20223,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,20223,1,2,0)
  1.  ;;=2^Nerve conduction studies; 11-12 studies
  1.  ;;^UTILITY(U,$J,358.3,20223,1,3,0)
  1.  ;;=3^95912
  1.  ;;^UTILITY(U,$J,358.3,20224,0)
  1.  ;;=95913^^67^825^20^^^^1
  1.  ;;^UTILITY(U,$J,358.3,20224,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,20224,1,2,0)
  1.  ;;=2^Nerve conduction studies;13 or > studies
  1.  ;;^UTILITY(U,$J,358.3,20224,1,3,0)
  1.  ;;=3^95913
  1.  ;;^UTILITY(U,$J,358.3,20225,0)
  1.  ;;=95933^^67^825^1^^^^1
  1.  ;;^UTILITY(U,$J,358.3,20225,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,20225,1,2,0)
  1.  ;;=2^Blink Reflex Test
  1.  ;;^UTILITY(U,$J,358.3,20225,1,3,0)
  1.  ;;=3^95933
  1.  ;;^UTILITY(U,$J,358.3,20226,0)
  1.  ;;=95925^^67^825^25^^^^1
  1.  ;;^UTILITY(U,$J,358.3,20226,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,20226,1,2,0)
  1.  ;;=2^Somatosensory Testing
  1.  ;;^UTILITY(U,$J,358.3,20226,1,3,0)
  1.  ;;=3^95925
  1.  ;;^UTILITY(U,$J,358.3,20227,0)
  1.  ;;=97161^^67^825^22^^^^1
  1.  ;;^UTILITY(U,$J,358.3,20227,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,20227,1,2,0)
  1.  ;;=2^PT Evaluation,Low Complex,20 min
  1.  ;;^UTILITY(U,$J,358.3,20227,1,3,0)
  1.  ;;=3^97161
  1.  ;;^UTILITY(U,$J,358.3,20228,0)
  1.  ;;=97162^^67^825^23^^^^1
  1.  ;;^UTILITY(U,$J,358.3,20228,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,20228,1,2,0)
  1.  ;;=2^PT Evaluation,Mod Complex,30 min
  1.  ;;^UTILITY(U,$J,358.3,20228,1,3,0)
  1.  ;;=3^97162
  1.  ;;^UTILITY(U,$J,358.3,20229,0)
  1.  ;;=97163^^67^825^23^^^^1
  1.  ;;^UTILITY(U,$J,358.3,20229,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,20229,1,2,0)
  1.  ;;=2^PT Evaluation,High Complex,45 min
  1.  ;;^UTILITY(U,$J,358.3,20229,1,3,0)
  1.  ;;=3^97163
  1.  ;;^UTILITY(U,$J,358.3,20230,0)
  1.  ;;=99366^^67^826^1^^^^1
  1.  ;;^UTILITY(U,$J,358.3,20230,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,20230,1,2,0)
  1.  ;;=2^Interdisc Team Conf Non-Phys w/ Pt/Fam>29min
  1.  ;;^UTILITY(U,$J,358.3,20230,1,3,0)
  1.  ;;=3^99366
  1.  ;;^UTILITY(U,$J,358.3,20231,0)
  1.  ;;=99368^^67^826^2^^^^1
  1.  ;;^UTILITY(U,$J,358.3,20231,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,20231,1,2,0)
  1.  ;;=2^Interdisc Team Conf Non-Phys w/o Pt/Fam>29min
  1.  ;;^UTILITY(U,$J,358.3,20231,1,3,0)
  1.  ;;=3^99368
  1.  ;;^UTILITY(U,$J,358.3,20232,0)
  1.  ;;=99367^^67^826^3^^^^1
  1.  ;;^UTILITY(U,$J,358.3,20232,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,20232,1,2,0)
  1.  ;;=2^Interdisc Team Conf Phys w/o Pt/Fam>29min
  1.  ;;^UTILITY(U,$J,358.3,20232,1,3,0)
  1.  ;;=3^99367
  1.  ;;^UTILITY(U,$J,358.3,20233,0)
  1.  ;;=97810^^67^827^3^^^^1
  1.  ;;^UTILITY(U,$J,358.3,20233,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,20233,1,2,0)
  1.  ;;=2^Acupuncture w/o Stimul 15 Min
  1.  ;;^UTILITY(U,$J,358.3,20233,1,3,0)
  1.  ;;=3^97810
  1.  ;;^UTILITY(U,$J,358.3,20234,0)
  1.  ;;=97811^^67^827^4^^^^1
  1.  ;;^UTILITY(U,$J,358.3,20234,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,20234,1,2,0)
  1.  ;;=2^Acupuncture w/o Stimul,Ea Addl 15 Min
  1.  ;;^UTILITY(U,$J,358.3,20234,1,3,0)
  1.  ;;=3^97811
  1.  ;;^UTILITY(U,$J,358.3,20235,0)
  1.  ;;=97813^^67^827^1^^^^1
  1.  ;;^UTILITY(U,$J,358.3,20235,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,20235,1,2,0)
  1.  ;;=2^Acupuncture w/ Stimul 15 Min
  1.  ;;^UTILITY(U,$J,358.3,20235,1,3,0)
  1.  ;;=3^97813
  1.  ;;^UTILITY(U,$J,358.3,20236,0)
  1.  ;;=97814^^67^827^2^^^^1
  1.  ;;^UTILITY(U,$J,358.3,20236,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,20236,1,2,0)
  1.  ;;=2^Acupuncture w/ Stimul,Ea Addl 15 Min
  1.  ;;^UTILITY(U,$J,358.3,20236,1,3,0)
  1.  ;;=3^97814
  1.  ;;^UTILITY(U,$J,358.3,20237,0)
  1.  ;;=64615^^67^828^5^^^^1
  1.  ;;^UTILITY(U,$J,358.3,20237,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,20237,1,2,0)
  1.  ;;=2^Chemodenerv Musc Migraine
  1.  ;;^UTILITY(U,$J,358.3,20237,1,3,0)
  1.  ;;=3^64615
  1.  ;;^UTILITY(U,$J,358.3,20238,0)
  1.  ;;=64616^^67^828^6^^^^1
  1.  ;;^UTILITY(U,$J,358.3,20238,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,20238,1,2,0)
  1.  ;;=2^Chemodenerv Musc Neck Dyston
  1.  ;;^UTILITY(U,$J,358.3,20238,1,3,0)
  1.  ;;=3^64616
  1.  ;;^UTILITY(U,$J,358.3,20239,0)
  1.  ;;=64642^^67^828^1^^^^1
  1.  ;;^UTILITY(U,$J,358.3,20239,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,20239,1,2,0)
  1.  ;;=2^Chemodenerv 1 Extremity 1-4
  1.  ;;^UTILITY(U,$J,358.3,20239,1,3,0)
  1.  ;;=3^64642
  1.  ;;^UTILITY(U,$J,358.3,20240,0)
  1.  ;;=64643^^67^828^2^^^^1
  1.  ;;^UTILITY(U,$J,358.3,20240,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,20240,1,2,0)
  1.  ;;=2^Chemodenerv 1 Extremity 1-4 Ea
  1.  ;;^UTILITY(U,$J,358.3,20240,1,3,0)
  1.  ;;=3^64643
  1.  ;;^UTILITY(U,$J,358.3,20241,0)
  1.  ;;=64644^^67^828^3^^^^1
  1.  ;;^UTILITY(U,$J,358.3,20241,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,20241,1,2,0)
  1.  ;;=2^Chemodenerv 1 Extremity 5/> Mus
  1.  ;;^UTILITY(U,$J,358.3,20241,1,3,0)
  1.  ;;=3^64644
  1.  ;;^UTILITY(U,$J,358.3,20242,0)
  1.  ;;=64645^^67^828^4^^^^1
  1.  ;;^UTILITY(U,$J,358.3,20242,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,20242,1,2,0)
  1.  ;;=2^Chemodenerv 1 Extremity 5/> Ea
  1.  ;;^UTILITY(U,$J,358.3,20242,1,3,0)
  1.  ;;=3^64645
  1.  ;;^UTILITY(U,$J,358.3,20243,0)
  1.  ;;=64646^^67^828^7^^^^1
  1.  ;;^UTILITY(U,$J,358.3,20243,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,20243,1,2,0)
  1.  ;;=2^Chemodenerv Trunk Musc 1-5
  1.  ;;^UTILITY(U,$J,358.3,20243,1,3,0)
  1.  ;;=3^64646
  1.  ;;^UTILITY(U,$J,358.3,20244,0)
  1.  ;;=64647^^67^828^8^^^^1
  1.  ;;^UTILITY(U,$J,358.3,20244,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,20244,1,2,0)
  1.  ;;=2^Chemodenerv Trunk Musc 6/>
  1.  ;;^UTILITY(U,$J,358.3,20244,1,3,0)
  1.  ;;=3^64647
  1.  ;;^UTILITY(U,$J,358.3,20245,0)
  1.  ;;=J0585^^67^828^9^^^^1
  1.  ;;^UTILITY(U,$J,358.3,20245,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,20245,1,2,0)
  1.  ;;=2^OnabotulinumtoxinA 1 Unit
  1.  ;;^UTILITY(U,$J,358.3,20245,1,3,0)
  1.  ;;=3^J0585
  1.  ;;^UTILITY(U,$J,358.3,20246,0)
  1.  ;;=J0587^^67^828^10^^^^1
  1.  ;;^UTILITY(U,$J,358.3,20246,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,20246,1,2,0)
  1.  ;;=2^RimabotulinumtoxinB 100 Units
  1.  ;;^UTILITY(U,$J,358.3,20246,1,3,0)
  1.  ;;=3^J0587
  1.  ;;^UTILITY(U,$J,358.3,20247,0)
  1.  ;;=98925^^67^829^1^^^^1
  1.  ;;^UTILITY(U,$J,358.3,20247,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,20247,1,2,0)
  1.  ;;=2^OMT,1-2 Body Regions
  1.  ;;^UTILITY(U,$J,358.3,20247,1,3,0)
  1.  ;;=3^98925
  1.  ;;^UTILITY(U,$J,358.3,20248,0)
  1.  ;;=98926^^67^829^2^^^^1
  1.  ;;^UTILITY(U,$J,358.3,20248,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,20248,1,2,0)
  1.  ;;=2^OMT,3-4 Body Regions
  1.  ;;^UTILITY(U,$J,358.3,20248,1,3,0)
  1.  ;;=3^98926
  1.  ;;^UTILITY(U,$J,358.3,20249,0)
  1.  ;;=98927^^67^829^3^^^^1
  1.  ;;^UTILITY(U,$J,358.3,20249,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,20249,1,2,0)
  1.  ;;=2^OMT,5-6 Body Regions
  1.  ;;^UTILITY(U,$J,358.3,20249,1,3,0)
  1.  ;;=3^98927
  1.  ;;^UTILITY(U,$J,358.3,20250,0)
  1.  ;;=98928^^67^829^4^^^^1
  1.  ;;^UTILITY(U,$J,358.3,20250,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,20250,1,2,0)
  1.  ;;=2^OMT,7-8 Body Regions
  1.  ;;^UTILITY(U,$J,358.3,20250,1,3,0)
  1.  ;;=3^98928
  1.  ;;^UTILITY(U,$J,358.3,20251,0)
  1.  ;;=98929^^67^829^5^^^^1
  1.  ;;^UTILITY(U,$J,358.3,20251,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,20251,1,2,0)
  1.  ;;=2^OMT,9-10 Body Regions
  1.  ;;^UTILITY(U,$J,358.3,20251,1,3,0)
  1.  ;;=3^98929
  1.  ;;^UTILITY(U,$J,358.3,20252,0)
  1.  ;;=96116^^67^830^1^^^^1
  1.  ;;^UTILITY(U,$J,358.3,20252,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,20252,1,2,0)
  1.  ;;=2^Neurobehavioral Status Exam,per hour
  1.  ;;^UTILITY(U,$J,358.3,20252,1,3,0)
  1.  ;;=3^96116
  1.  ;;^UTILITY(U,$J,358.3,20253,0)
  1.  ;;=97763^^67^830^2^^^^1
  1.  ;;^UTILITY(U,$J,358.3,20253,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,20253,1,2,0)
  1.  ;;=2^Orthotic/Prosth F/U Mgmt/Trng,Ea 15 min
  1.  ;;^UTILITY(U,$J,358.3,20253,1,3,0)
  1.  ;;=3^97763
  1.  ;;^UTILITY(U,$J,358.3,20254,0)
  1.  ;;=62367^^67^831^2^^^^1
  1.  ;;^UTILITY(U,$J,358.3,20254,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,20254,1,2,0)
  1.  ;;=2^Pump Analysis Only
  1.  ;;^UTILITY(U,$J,358.3,20254,1,3,0)
  1.  ;;=3^62367
  1.  ;;^UTILITY(U,$J,358.3,20255,0)
  1.  ;;=62368^^67^831^4^^^^1
  1.  ;;^UTILITY(U,$J,358.3,20255,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,20255,1,2,0)
  1.  ;;=2^Pump Reprogram
  1.  ;;^UTILITY(U,$J,358.3,20255,1,3,0)
  1.  ;;=3^62368
  1.  ;;^UTILITY(U,$J,358.3,20256,0)
  1.  ;;=62370^^67^831^3^^^^1
  1.  ;;^UTILITY(U,$J,358.3,20256,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,20256,1,2,0)
  1.  ;;=2^Pump Analysis Reprogram Refill
  1.  ;;^UTILITY(U,$J,358.3,20256,1,3,0)
  1.  ;;=3^62370
  1.  ;;^UTILITY(U,$J,358.3,20257,0)
  1.  ;;=61070^^67^831^1^^^^1
  1.  ;;^UTILITY(U,$J,358.3,20257,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,20257,1,2,0)
  1.  ;;=2^Aspiration/Inj of Catheter Pump Tubing
  1.  ;;^UTILITY(U,$J,358.3,20257,1,3,0)
  1.  ;;=3^61070
  1.  ;;^UTILITY(U,$J,358.3,20258,0)
  1.  ;;=75809^^67^831^5^^^^1
  1.  ;;^UTILITY(U,$J,358.3,20258,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,20258,1,2,0)
  1.  ;;=2^Shuntogram,Supervision & Intrptn
  1.  ;;^UTILITY(U,$J,358.3,20258,1,3,0)
  1.  ;;=3^75809
  1.  ;;^UTILITY(U,$J,358.3,20259,0)
  1.  ;;=95873^^67^832^2^^^^1
  1.  ;;^UTILITY(U,$J,358.3,20259,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,20259,1,2,0)
  1.  ;;=2^Stim Guidance
  1.  ;;^UTILITY(U,$J,358.3,20259,1,3,0)
  1.  ;;=3^95873
  1.  ;;^UTILITY(U,$J,358.3,20260,0)
  1.  ;;=95874^^67^832^1^^^^1
  1.  ;;^UTILITY(U,$J,358.3,20260,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,20260,1,2,0)
  1.  ;;=2^Needle Guidance
  1.  ;;^UTILITY(U,$J,358.3,20260,1,3,0)
  1.  ;;=3^95874
  1.  ;;^UTILITY(U,$J,358.3,20261,0)
  1.  ;;=20526^^67^833^1^^^^1
  1.  ;;^UTILITY(U,$J,358.3,20261,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,20261,1,2,0)
  1.  ;;=2^Therapeutic Injection
  1.  ;;^UTILITY(U,$J,358.3,20261,1,3,0)
  1.  ;;=3^20526
  1.  ;;^UTILITY(U,$J,358.3,20262,0)
  1.  ;;=20604^^67^834^1^^^^1
  1.  ;;^UTILITY(U,$J,358.3,20262,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,20262,1,2,0)
  1.  ;;=2^Joint Injection w/ US-Small
  1.  ;;^UTILITY(U,$J,358.3,20262,1,3,0)
  1.  ;;=3^20604
  1.  ;;^UTILITY(U,$J,358.3,20263,0)
  1.  ;;=20606^^67^834^2^^^^1
  1.  ;;^UTILITY(U,$J,358.3,20263,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,20263,1,2,0)
  1.  ;;=2^Joint Injection w/ US-Intermediate
  1.  ;;^UTILITY(U,$J,358.3,20263,1,3,0)
  1.  ;;=3^20606
  1.  ;;^UTILITY(U,$J,358.3,20264,0)
  1.  ;;=20611^^67^834^3^^^^1
  1.  ;;^UTILITY(U,$J,358.3,20264,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,20264,1,2,0)
  1.  ;;=2^Joint Injection w/ US-Major
  1.  ;;^UTILITY(U,$J,358.3,20264,1,3,0)
  1.  ;;=3^20611
  1.  ;;^UTILITY(U,$J,358.3,20265,0)
  1.  ;;=20552^^67^835^1^^^^1
  1.  ;;^UTILITY(U,$J,358.3,20265,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,20265,1,2,0)
  1.  ;;=2^Inject 1-2 Muscles
  1.  ;;^UTILITY(U,$J,358.3,20265,1,3,0)
  1.  ;;=3^20552
  1.  ;;^UTILITY(U,$J,358.3,20266,0)
  1.  ;;=20553^^67^835^2^^^^1
  1.  ;;^UTILITY(U,$J,358.3,20266,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,20266,1,2,0)
  1.  ;;=2^Inject 3 or More Muscles
  1.  ;;^UTILITY(U,$J,358.3,20266,1,3,0)
  1.  ;;=3^20553
  1.  ;;^UTILITY(U,$J,358.3,20267,0)
  1.  ;;=76881^^67^836^2^^^^1
  1.  ;;^UTILITY(U,$J,358.3,20267,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,20267,1,2,0)
  1.  ;;=2^US Guided w/ Image
  1.  ;;^UTILITY(U,$J,358.3,20267,1,3,0)
  1.  ;;=3^76881
  1.  ;;^UTILITY(U,$J,358.3,20268,0)
  1.  ;;=76882^^67^836^1^^^^1
  1.  ;;^UTILITY(U,$J,358.3,20268,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,20268,1,2,0)
  1.  ;;=2^Completed US Guided w/ Image
  1.  ;;^UTILITY(U,$J,358.3,20268,1,3,0)
  1.  ;;=3^76882
  1.  ;;^UTILITY(U,$J,358.3,20269,0)
  1.  ;;=76942^^67^836^3^^^^1
  1.  ;;^UTILITY(U,$J,358.3,20269,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,20269,1,2,0)
  1.  ;;=2^US Guided w/o Image
  1.  ;;^UTILITY(U,$J,358.3,20269,1,3,0)
  1.  ;;=3^76942
  1.  ;;^UTILITY(U,$J,358.3,20270,0)
  1.  ;;=97112^^67^837^1^^^^1
  1.  ;;^UTILITY(U,$J,358.3,20270,1,0)
  1.  ;;=^358.31IA^3^2
  1.  ;;^UTILITY(U,$J,358.3,20270,1,2,0)
  1.  ;;=2^Neuromuscular Re-Education
  1.  ;;^UTILITY(U,$J,358.3,20270,1,3,0)
  1.  ;;=3^97112
  1.  ;;^UTILITY(U,$J,358.3,20271,0)
  1.  ;;=S06.0X1A^^68^838^1
  1.  ;;^UTILITY(U,$J,358.3,20271,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,20271,1,3,0)
  1.  ;;=3^Concussion w LOC of 30 minutes or less, init
  1.  ;;^UTILITY(U,$J,358.3,20271,1,4,0)
  1.  ;;=4^S06.0X1A
  1.  ;;^UTILITY(U,$J,358.3,20271,2)
  1.  ;;=^5020669
  1.  ;;^UTILITY(U,$J,358.3,20272,0)
  1.  ;;=S06.0X9A^^68^838^2
  1.  ;;^UTILITY(U,$J,358.3,20272,1,0)
  1.  ;;=^358.31IA^4^2
  1.  ;;^UTILITY(U,$J,358.3,20272,1,3,0)
  1.  ;;=3^Concussion w LOC of unsp duration, init
  1.  ;;^UTILITY(U,$J,358.3,20272,1,4,0)
  1.  ;;=4^S06.0X9A