IBDEI07V ; ; 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,19138,0)
;;=Z48.816^^62^765^2
;;^UTILITY(U,$J,358.3,19138,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19138,1,3,0)
;;=3^Aftercare Following Surgery,GU System
;;^UTILITY(U,$J,358.3,19138,1,4,0)
;;=4^Z48.816
;;^UTILITY(U,$J,358.3,19138,2)
;;=^5063053
;;^UTILITY(U,$J,358.3,19139,0)
;;=Z48.3^^62^765^3
;;^UTILITY(U,$J,358.3,19139,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19139,1,3,0)
;;=3^Aftercare Following Surgery,Neoplasm
;;^UTILITY(U,$J,358.3,19139,1,4,0)
;;=4^Z48.3
;;^UTILITY(U,$J,358.3,19139,2)
;;=^5063046
;;^UTILITY(U,$J,358.3,19140,0)
;;=Z48.817^^62^765^4
;;^UTILITY(U,$J,358.3,19140,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19140,1,3,0)
;;=3^Aftercare Following Surgery,Skin
;;^UTILITY(U,$J,358.3,19140,1,4,0)
;;=4^Z48.817
;;^UTILITY(U,$J,358.3,19140,2)
;;=^5063054
;;^UTILITY(U,$J,358.3,19141,0)
;;=Z68.1^^62^765^5
;;^UTILITY(U,$J,358.3,19141,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19141,1,3,0)
;;=3^BMI 19.9 or Less,Adult
;;^UTILITY(U,$J,358.3,19141,1,4,0)
;;=4^Z68.1
;;^UTILITY(U,$J,358.3,19141,2)
;;=^5063198
;;^UTILITY(U,$J,358.3,19142,0)
;;=Z71.82^^62^765^10
;;^UTILITY(U,$J,358.3,19142,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19142,1,3,0)
;;=3^Exercise Counseling
;;^UTILITY(U,$J,358.3,19142,1,4,0)
;;=4^Z71.82
;;^UTILITY(U,$J,358.3,19142,2)
;;=^303466
;;^UTILITY(U,$J,358.3,19143,0)
;;=Z71.83^^62^765^19
;;^UTILITY(U,$J,358.3,19143,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19143,1,3,0)
;;=3^Nonprocreative Genetic Counseling
;;^UTILITY(U,$J,358.3,19143,1,4,0)
;;=4^Z71.83
;;^UTILITY(U,$J,358.3,19143,2)
;;=^5151860
;;^UTILITY(U,$J,358.3,19144,0)
;;=Z87.890^^62^765^31
;;^UTILITY(U,$J,358.3,19144,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19144,1,3,0)
;;=3^Sex Reassignment,Personal Hx
;;^UTILITY(U,$J,358.3,19144,1,4,0)
;;=4^Z87.890
;;^UTILITY(U,$J,358.3,19144,2)
;;=^5063517
;;^UTILITY(U,$J,358.3,19145,0)
;;=F64.0^^62^765^33
;;^UTILITY(U,$J,358.3,19145,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19145,1,3,0)
;;=3^Transsexualism
;;^UTILITY(U,$J,358.3,19145,1,4,0)
;;=4^F64.0
;;^UTILITY(U,$J,358.3,19145,2)
;;=^121404^Z87.890
;;^UTILITY(U,$J,358.3,19146,0)
;;=Z59.00^^62^765^13
;;^UTILITY(U,$J,358.3,19146,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19146,1,3,0)
;;=3^Homelessness,Unspec
;;^UTILITY(U,$J,358.3,19146,1,4,0)
;;=4^Z59.00
;;^UTILITY(U,$J,358.3,19146,2)
;;=^5161304
;;^UTILITY(U,$J,358.3,19147,0)
;;=R45.851^^62^766^3
;;^UTILITY(U,$J,358.3,19147,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19147,1,3,0)
;;=3^Suicidal Ideations
;;^UTILITY(U,$J,358.3,19147,1,4,0)
;;=4^R45.851
;;^UTILITY(U,$J,358.3,19147,2)
;;=^5019474
;;^UTILITY(U,$J,358.3,19148,0)
;;=T14.91XA^^62^766^4
;;^UTILITY(U,$J,358.3,19148,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19148,1,3,0)
;;=3^Suicide Attempt,Initial Encounter
;;^UTILITY(U,$J,358.3,19148,1,4,0)
;;=4^T14.91XA
;;^UTILITY(U,$J,358.3,19148,2)
;;=^5151779
;;^UTILITY(U,$J,358.3,19149,0)
;;=T14.91XD^^62^766^6
;;^UTILITY(U,$J,358.3,19149,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19149,1,3,0)
;;=3^Suicide Attempt,Subsequent Encntr
;;^UTILITY(U,$J,358.3,19149,1,4,0)
;;=4^T14.91XD
;;^UTILITY(U,$J,358.3,19149,2)
;;=^5151780
;;^UTILITY(U,$J,358.3,19150,0)
;;=T14.91XS^^62^766^5
;;^UTILITY(U,$J,358.3,19150,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19150,1,3,0)
;;=3^Suicide Attempt,Sequela
;;^UTILITY(U,$J,358.3,19150,1,4,0)
;;=4^T14.91XS
;;^UTILITY(U,$J,358.3,19150,2)
;;=^5151781
;;^UTILITY(U,$J,358.3,19151,0)
;;=Z91.51^^62^766^2
;;^UTILITY(U,$J,358.3,19151,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19151,1,3,0)
;;=3^Personal Hx of Suicidal Behavior
;;^UTILITY(U,$J,358.3,19151,1,4,0)
;;=4^Z91.51
;;^UTILITY(U,$J,358.3,19151,2)
;;=^5161317
;;^UTILITY(U,$J,358.3,19152,0)
;;=Z91.52^^62^766^1
;;^UTILITY(U,$J,358.3,19152,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,19152,1,3,0)
;;=3^Personal Hx of Non-Suicidal Self-Harm
;;^UTILITY(U,$J,358.3,19152,1,4,0)
;;=4^Z91.52
;;^UTILITY(U,$J,358.3,19152,2)
;;=^5161318
;;^UTILITY(U,$J,358.3,19153,0)
;;=99221^^63^767^1
;;^UTILITY(U,$J,358.3,19153,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,19153,1,1,0)
;;=1^Detailed Hx & Exam,MDM Low Comp
;;^UTILITY(U,$J,358.3,19153,1,2,0)
;;=2^99221
;;^UTILITY(U,$J,358.3,19154,0)
;;=99222^^63^767^2
;;^UTILITY(U,$J,358.3,19154,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,19154,1,1,0)
;;=1^Comp Hx & Exam,MDM Mod Comp
;;^UTILITY(U,$J,358.3,19154,1,2,0)
;;=2^99222
;;^UTILITY(U,$J,358.3,19155,0)
;;=99223^^63^767^3
;;^UTILITY(U,$J,358.3,19155,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,19155,1,1,0)
;;=1^Comp Hx & Exam;MDM High Comp
;;^UTILITY(U,$J,358.3,19155,1,2,0)
;;=2^99223
;;^UTILITY(U,$J,358.3,19156,0)
;;=99218^^63^768^1
;;^UTILITY(U,$J,358.3,19156,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,19156,1,1,0)
;;=1^Detailed;Low Complexity
;;^UTILITY(U,$J,358.3,19156,1,2,0)
;;=2^99218
;;^UTILITY(U,$J,358.3,19157,0)
;;=99219^^63^768^2
;;^UTILITY(U,$J,358.3,19157,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,19157,1,1,0)
;;=1^Comp;Mod Complexity
;;^UTILITY(U,$J,358.3,19157,1,2,0)
;;=2^99219
;;^UTILITY(U,$J,358.3,19158,0)
;;=99220^^63^768^3
;;^UTILITY(U,$J,358.3,19158,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,19158,1,1,0)
;;=1^Comp;High Complexity
;;^UTILITY(U,$J,358.3,19158,1,2,0)
;;=2^99220
;;^UTILITY(U,$J,358.3,19159,0)
;;=99251^^63^769^1
;;^UTILITY(U,$J,358.3,19159,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,19159,1,1,0)
;;=1^Prob Foc Hx & Exam,MDM Straightforward
;;^UTILITY(U,$J,358.3,19159,1,2,0)
;;=2^99251
;;^UTILITY(U,$J,358.3,19160,0)
;;=99252^^63^769^2
;;^UTILITY(U,$J,358.3,19160,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,19160,1,1,0)
;;=1^Exp Prob Foc Hx & Exam,MDM Straightforward
;;^UTILITY(U,$J,358.3,19160,1,2,0)
;;=2^99252
;;^UTILITY(U,$J,358.3,19161,0)
;;=99253^^63^769^3
;;^UTILITY(U,$J,358.3,19161,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,19161,1,1,0)
;;=1^Detailed Hx & Exam,MDM Low Comp
;;^UTILITY(U,$J,358.3,19161,1,2,0)
;;=2^99253
;;^UTILITY(U,$J,358.3,19162,0)
;;=99254^^63^769^4
;;^UTILITY(U,$J,358.3,19162,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,19162,1,1,0)
;;=1^Comp Hx & Exam,MDM Mod Comp
;;^UTILITY(U,$J,358.3,19162,1,2,0)
;;=2^99254
;;^UTILITY(U,$J,358.3,19163,0)
;;=99255^^63^769^5
;;^UTILITY(U,$J,358.3,19163,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,19163,1,1,0)
;;=1^Comp Hx & Exam,MDM Mod Comp
;;^UTILITY(U,$J,358.3,19163,1,2,0)
;;=2^99255
;;^UTILITY(U,$J,358.3,19164,0)
;;=99231^^63^770^1
;;^UTILITY(U,$J,358.3,19164,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,19164,1,1,0)
;;=1^Prob Foc Hx & Exam,MDM Low Comp
;;^UTILITY(U,$J,358.3,19164,1,2,0)
;;=2^99231
;;^UTILITY(U,$J,358.3,19165,0)
;;=99232^^63^770^2
;;^UTILITY(U,$J,358.3,19165,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,19165,1,1,0)
;;=1^Exp Prob Foc Hx & Exam,MDM Mod Comp
;;^UTILITY(U,$J,358.3,19165,1,2,0)
;;=2^99232
;;^UTILITY(U,$J,358.3,19166,0)
;;=99233^^63^770^3
;;^UTILITY(U,$J,358.3,19166,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,19166,1,1,0)
;;=1^Detailed Hx & Exam,MDM High Comp
;;^UTILITY(U,$J,358.3,19166,1,2,0)
;;=2^99233
;;^UTILITY(U,$J,358.3,19167,0)
;;=99238^^63^771^1
;;^UTILITY(U,$J,358.3,19167,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,19167,1,1,0)
;;=1^Discharge Day Mgmt < 30min
;;^UTILITY(U,$J,358.3,19167,1,2,0)
;;=2^99238
;;^UTILITY(U,$J,358.3,19168,0)
;;=99239^^63^771^2
;;^UTILITY(U,$J,358.3,19168,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,19168,1,1,0)
;;=1^Discharge Day Mgmt > 30min
;;^UTILITY(U,$J,358.3,19168,1,2,0)
;;=2^99239
;;^UTILITY(U,$J,358.3,19169,0)
;;=99224^^63^772^1
;;^UTILITY(U,$J,358.3,19169,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,19169,1,1,0)
;;=1^Prob Foc Hx & Exam,MDM Low Comp
;;^UTILITY(U,$J,358.3,19169,1,2,0)
;;=2^99224
;;^UTILITY(U,$J,358.3,19170,0)
;;=99225^^63^772^2
;;^UTILITY(U,$J,358.3,19170,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,19170,1,1,0)
;;=1^Exp Prob Foc Hx & Exam,MDM Mod Comp
;;^UTILITY(U,$J,358.3,19170,1,2,0)
;;=2^99225
;;^UTILITY(U,$J,358.3,19171,0)
;;=99226^^63^772^3
;;^UTILITY(U,$J,358.3,19171,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,19171,1,1,0)
;;=1^Detailed Hx & Exam,MDM High Comp
;;^UTILITY(U,$J,358.3,19171,1,2,0)
;;=2^99226
;;^UTILITY(U,$J,358.3,19172,0)
;;=99217^^63^773^1
;;^UTILITY(U,$J,358.3,19172,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,19172,1,1,0)
;;=1^Observation D/C Day Mgmt
;;^UTILITY(U,$J,358.3,19172,1,2,0)
;;=2^99217
;;^UTILITY(U,$J,358.3,19173,0)
;;=20600^^64^774^3^^^^1
;;^UTILITY(U,$J,358.3,19173,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,19173,1,2,0)
;;=2^Asp/Inj Small Jt/Bursa
;;^UTILITY(U,$J,358.3,19173,1,3,0)
;;=3^20600
;;^UTILITY(U,$J,358.3,19174,0)
;;=20605^^64^774^1^^^^1
;;^UTILITY(U,$J,358.3,19174,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,19174,1,2,0)
;;=2^Asp/Inj Interm Jt(Ac/Wrist/Ankle
;;^UTILITY(U,$J,358.3,19174,1,3,0)
;;=3^20605
;;^UTILITY(U,$J,358.3,19175,0)
;;=20610^^64^774^2^^^^1
;;^UTILITY(U,$J,358.3,19175,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,19175,1,2,0)
;;=2^Asp/Inj Maj Jt (Should/Hip/Knee
;;^UTILITY(U,$J,358.3,19175,1,3,0)
;;=3^20610
;;^UTILITY(U,$J,358.3,19176,0)
;;=20550^^64^774^6^^^^1
;;^UTILITY(U,$J,358.3,19176,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,19176,1,2,0)
;;=2^Inject Tendon/Ligament/Cyst
;;^UTILITY(U,$J,358.3,19176,1,3,0)
;;=3^20550
;;^UTILITY(U,$J,358.3,19177,0)
;;=J1100^^64^774^5^^^^1
;;^UTILITY(U,$J,358.3,19177,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,19177,1,2,0)
;;=2^Dexamethasone Sodium Phos 1 mg
;;^UTILITY(U,$J,358.3,19177,1,3,0)
;;=3^J1100
;;^UTILITY(U,$J,358.3,19178,0)
;;=J0800^^64^774^4^^^^1
;;^UTILITY(U,$J,358.3,19178,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,19178,1,2,0)
;;=2^Corticotropin Inj up to 40 units
;;^UTILITY(U,$J,358.3,19178,1,3,0)
;;=3^J0800
;;^UTILITY(U,$J,358.3,19179,0)
;;=J1040^^64^774^8^^^^1
;;^UTILITY(U,$J,358.3,19179,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,19179,1,2,0)
;;=2^Methylprednisolone 80 Mg Inj
;;^UTILITY(U,$J,358.3,19179,1,3,0)
;;=3^J1040
;;^UTILITY(U,$J,358.3,19180,0)
;;=20552^^64^774^9^^^^1
;;^UTILITY(U,$J,358.3,19180,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,19180,1,2,0)
;;=2^Trigger Point(s) Inj,1-2 Muscles
;;^UTILITY(U,$J,358.3,19180,1,3,0)
;;=3^20552
;;^UTILITY(U,$J,358.3,19181,0)
;;=20553^^64^774^10^^^^1
;;^UTILITY(U,$J,358.3,19181,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,19181,1,2,0)
;;=2^Trigger Point(s) Inj,=/> 3 Muscles
;;^UTILITY(U,$J,358.3,19181,1,3,0)
;;=3^20553
;;^UTILITY(U,$J,358.3,19182,0)
;;=J1030^^64^774^7^^^^1
;;^UTILITY(U,$J,358.3,19182,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,19182,1,2,0)
;;=2^Methylprednisolone 40 mg
;;^UTILITY(U,$J,358.3,19182,1,3,0)
;;=3^J1030
;;^UTILITY(U,$J,358.3,19183,0)
;;=97597^^64^775^2^^^^1
;;^UTILITY(U,$J,358.3,19183,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,19183,1,2,0)
;;=2^Active Wound Care/20 Cm Or <
;;^UTILITY(U,$J,358.3,19183,1,3,0)
;;=3^97597
;;^UTILITY(U,$J,358.3,19184,0)
;;=97598^^64^775^1^^^^1
;;^UTILITY(U,$J,358.3,19184,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,19184,1,2,0)
;;=2^Active Wound Care each adtl 20 Cm
;;^UTILITY(U,$J,358.3,19184,1,3,0)
;;=3^97598
;;^UTILITY(U,$J,358.3,19185,0)
;;=97605^^64^775^7^^^^1
;;^UTILITY(U,$J,358.3,19185,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,19185,1,2,0)
;;=2^Neg Press Wound Tx < 50 Cm
;;^UTILITY(U,$J,358.3,19185,1,3,0)
;;=3^97605
;;^UTILITY(U,$J,358.3,19186,0)
;;=97606^^64^775^8^^^^1
;;^UTILITY(U,$J,358.3,19186,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,19186,1,2,0)
;;=2^Neg Press Wound Tx, > 50 Cm
;;^UTILITY(U,$J,358.3,19186,1,3,0)
;;=3^97606
;;^UTILITY(U,$J,358.3,19187,0)
;;=97602^^64^775^9^^^^1
;;^UTILITY(U,$J,358.3,19187,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,19187,1,2,0)
;;=2^Remove Divit. Tissue w/o Anesth
;;^UTILITY(U,$J,358.3,19187,1,3,0)
;;=3^97602
;;^UTILITY(U,$J,358.3,19188,0)
;;=G0281^^64^775^5^^^^1
;;^UTILITY(U,$J,358.3,19188,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,19188,1,2,0)
;;=2^Electrical Stim,Stg 3/4 Wound Care
;;^UTILITY(U,$J,358.3,19188,1,3,0)
;;=3^G0281
;;^UTILITY(U,$J,358.3,19189,0)
;;=G0283^^64^775^3^^^^1
;;^UTILITY(U,$J,358.3,19189,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,19189,1,2,0)
;;=2^Electrical Stim,Oth than Wnd Care
;;^UTILITY(U,$J,358.3,19189,1,3,0)
;;=3^G0283
;;^UTILITY(U,$J,358.3,19190,0)
;;=G0329^^64^775^6^^^^1
;;^UTILITY(U,$J,358.3,19190,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,19190,1,2,0)
;;=2^Electromagnetic Therapy,Wound Care
;;^UTILITY(U,$J,358.3,19190,1,3,0)
;;=3^G0329
;;^UTILITY(U,$J,358.3,19191,0)
;;=97610^^64^775^10^^^^1
;;^UTILITY(U,$J,358.3,19191,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,19191,1,2,0)
;;=2^US LF Non-Contact Non-Therm,Wnd Assess
;;^UTILITY(U,$J,358.3,19191,1,3,0)
;;=3^97610
;;^UTILITY(U,$J,358.3,19192,0)
;;=G0282^^64^775^4^^^^1
;;^UTILITY(U,$J,358.3,19192,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,19192,1,2,0)
;;=2^Electrical Stim,Stg 1/2 Wound Care
;;^UTILITY(U,$J,358.3,19192,1,3,0)
;;=3^G0282
;;^UTILITY(U,$J,358.3,19193,0)
;;=99070^^64^776^1^^^^1
;;^UTILITY(U,$J,358.3,19193,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,19193,1,2,0)
;;=2^SPECIAL SUPPLIES
;;^UTILITY(U,$J,358.3,19193,1,3,0)
;;=3^99070
;;^UTILITY(U,$J,358.3,19194,0)
;;=97039^^64^776^3^^^^1
;;^UTILITY(U,$J,358.3,19194,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,19194,1,2,0)
;;=2^UNLISTED PT MODALITY
;;^UTILITY(U,$J,358.3,19194,1,3,0)
;;=3^97039
;;^UTILITY(U,$J,358.3,19195,0)
;;=97799^^64^776^2^^^^1
;;^UTILITY(U,$J,358.3,19195,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,19195,1,2,0)
;;=2^UNLISTED PROCEDURE
;;^UTILITY(U,$J,358.3,19195,1,3,0)
;;=3^97799
;;^UTILITY(U,$J,358.3,19196,0)
;;=95860^^64^777^2^^^^1
;;^UTILITY(U,$J,358.3,19196,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,19196,1,2,0)
;;=2^EMG 1 Limb
;;^UTILITY(U,$J,358.3,19196,1,3,0)
;;=3^95860
;;^UTILITY(U,$J,358.3,19197,0)
;;=95863^^64^777^4^^^^1
;;^UTILITY(U,$J,358.3,19197,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,19197,1,2,0)
;;=2^EMG 3 Limbs
;;^UTILITY(U,$J,358.3,19197,1,3,0)
;;=3^95863
;;^UTILITY(U,$J,358.3,19198,0)
;;=95864^^64^777^5^^^^1
;;^UTILITY(U,$J,358.3,19198,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,19198,1,2,0)
;;=2^EMG 4 Limbs
;;^UTILITY(U,$J,358.3,19198,1,3,0)
;;=3^95864
;;^UTILITY(U,$J,358.3,19199,0)
;;=95867^^64^777^6^^^^1
;;^UTILITY(U,$J,358.3,19199,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,19199,1,2,0)
;;=2^EMG Cran Ner Mus-Unilat
;;^UTILITY(U,$J,358.3,19199,1,3,0)
;;=3^95867
;;^UTILITY(U,$J,358.3,19200,0)
;;=95868^^64^777^7^^^^1
;;^UTILITY(U,$J,358.3,19200,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,19200,1,2,0)
;;=2^EMG Head or Neck
;;^UTILITY(U,$J,358.3,19200,1,3,0)
;;=3^95868
;;^UTILITY(U,$J,358.3,19201,0)
;;=95870^^64^777^9^^^^1
;;^UTILITY(U,$J,358.3,19201,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,19201,1,2,0)
;;=2^Needle EMG < 5 Muscles/Ext
;;^UTILITY(U,$J,358.3,19201,1,3,0)
;;=3^95870
;;^UTILITY(U,$J,358.3,19202,0)
;;=95861^^64^777^3^^^^1
;;^UTILITY(U,$J,358.3,19202,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,19202,1,2,0)
;;=2^EMG 2 Limbs
;;^UTILITY(U,$J,358.3,19202,1,3,0)
;;=3^95861
;;^UTILITY(U,$J,358.3,19203,0)
;;=95885^^64^777^10^^^^1
;;^UTILITY(U,$J,358.3,19203,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,19203,1,2,0)
;;=2^Needle EMG < 5 Muscles/Ext,+NCS
;;^UTILITY(U,$J,358.3,19203,1,3,0)
;;=3^95885
;;^UTILITY(U,$J,358.3,19204,0)
;;=95886^^64^777^11^^^^1
;;^UTILITY(U,$J,358.3,19204,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,19204,1,2,0)
;;=2^Needle EMG >/= 5 Muscles/Ext,+NCS
;;^UTILITY(U,$J,358.3,19204,1,3,0)
;;=3^95886
;;^UTILITY(U,$J,358.3,19205,0)
;;=95887^^64^777^12^^^^1
;;^UTILITY(U,$J,358.3,19205,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,19205,1,2,0)
;;=2^Needle EMG CNs or Axial,+NCS
;;^UTILITY(U,$J,358.3,19205,1,3,0)
;;=3^95887
;;^UTILITY(U,$J,358.3,19206,0)
;;=95869^^64^777^13^^^^1
;;^UTILITY(U,$J,358.3,19206,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,19206,1,2,0)
;;=2^Needle EMG Thor Paraspinal
;;^UTILITY(U,$J,358.3,19206,1,3,0)
;;=3^95869
;;^UTILITY(U,$J,358.3,19207,0)
;;=95905^^64^777^8^^^^1
;;^UTILITY(U,$J,358.3,19207,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,19207,1,2,0)
;;=2^Motor/Sens Nerv Conduct-ea limb w/F-wv
;;^UTILITY(U,$J,358.3,19207,1,3,0)
;;=3^95905
;;^UTILITY(U,$J,358.3,19208,0)
;;=95937^^64^777^21^^^^1
;;^UTILITY(U,$J,358.3,19208,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,19208,1,2,0)
;;=2^Neuromuscular Junction Test
;;^UTILITY(U,$J,358.3,19208,1,3,0)
;;=3^95937
;;^UTILITY(U,$J,358.3,19209,0)
;;=95907^^64^777^14^^^^1
;;^UTILITY(U,$J,358.3,19209,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,19209,1,2,0)
;;=2^Nerve conduction studies; 1-2 studies
;;^UTILITY(U,$J,358.3,19209,1,3,0)
;;=3^95907
;;^UTILITY(U,$J,358.3,19210,0)
;;=95908^^64^777^16^^^^1
;;^UTILITY(U,$J,358.3,19210,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,19210,1,2,0)
;;=2^Nerve conduction studies; 3-4 studies
;;^UTILITY(U,$J,358.3,19210,1,3,0)
;;=3^95908
;;^UTILITY(U,$J,358.3,19211,0)
;;=95909^^64^777^17^^^^1
;;^UTILITY(U,$J,358.3,19211,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,19211,1,2,0)
;;=2^Nerve conduction studies; 5-6 studies
;;^UTILITY(U,$J,358.3,19211,1,3,0)
;;=3^95909
;;^UTILITY(U,$J,358.3,19212,0)
;;=95910^^64^777^18^^^^1
;;^UTILITY(U,$J,358.3,19212,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,19212,1,2,0)
;;=2^Nerve conduction studies; 7-8 studies
;;^UTILITY(U,$J,358.3,19212,1,3,0)
;;=3^95910
;;^UTILITY(U,$J,358.3,19213,0)
;;=95911^^64^777^19^^^^1
;;^UTILITY(U,$J,358.3,19213,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,19213,1,2,0)
;;=2^Nerve conduction studies; 9-10 studies
;;^UTILITY(U,$J,358.3,19213,1,3,0)
;;=3^95911
;;^UTILITY(U,$J,358.3,19214,0)
;;=95912^^64^777^15^^^^1
;;^UTILITY(U,$J,358.3,19214,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,19214,1,2,0)
;;=2^Nerve conduction studies; 11-12 studies
;;^UTILITY(U,$J,358.3,19214,1,3,0)
;;=3^95912
;;^UTILITY(U,$J,358.3,19215,0)
;;=95913^^64^777^20^^^^1
;;^UTILITY(U,$J,358.3,19215,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,19215,1,2,0)
;;=2^Nerve conduction studies;13 or > studies
;;^UTILITY(U,$J,358.3,19215,1,3,0)
;;=3^95913
;;^UTILITY(U,$J,358.3,19216,0)
;;=95933^^64^777^1^^^^1
;;^UTILITY(U,$J,358.3,19216,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,19216,1,2,0)
;;=2^Blink Reflex Test
;;^UTILITY(U,$J,358.3,19216,1,3,0)
;;=3^95933
;;^UTILITY(U,$J,358.3,19217,0)
;;=95925^^64^777^23^^^^1
;;^UTILITY(U,$J,358.3,19217,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,19217,1,2,0)
;;=2^Somatosensory Testing
;;^UTILITY(U,$J,358.3,19217,1,3,0)
;;=3^95925
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HIBDEI07V 19761 printed Dec 13, 2024@01:43:22 Page 2
IBDEI07V ; ; 01-AUG-2022
+1 ;;3.0;IB ENCOUNTER FORM IMP/EXP;;AUG 01, 2022
+2 if 'DIFQR(358.3)
QUIT
FOR I=1:2
SET X=$TEXT(Q+I)
if X=""
QUIT
SET Y=$EXTRACT($TEXT(Q+I+1),4,999)
SET X=$EXTRACT(X,4,999)
if $ASCII(Y)=126
SET I=I+1
SET Y=$EXTRACT(Y,2,999)_$EXTRACT($TEXT(Q+I+1),5,999)
if $ASCII(Y)=61
SET Y=$EXTRACT(Y,2,999)
XECUTE NO
IF '$TEST
SET @X=Y
Q QUIT
+1 ;;^UTILITY(U,$J,358.3,19138,0)
+2 ;;=Z48.816^^62^765^2
+3 ;;^UTILITY(U,$J,358.3,19138,1,0)
+4 ;;=^358.31IA^4^2
+5 ;;^UTILITY(U,$J,358.3,19138,1,3,0)
+6 ;;=3^Aftercare Following Surgery,GU System
+7 ;;^UTILITY(U,$J,358.3,19138,1,4,0)
+8 ;;=4^Z48.816
+9 ;;^UTILITY(U,$J,358.3,19138,2)
+10 ;;=^5063053
+11 ;;^UTILITY(U,$J,358.3,19139,0)
+12 ;;=Z48.3^^62^765^3
+13 ;;^UTILITY(U,$J,358.3,19139,1,0)
+14 ;;=^358.31IA^4^2
+15 ;;^UTILITY(U,$J,358.3,19139,1,3,0)
+16 ;;=3^Aftercare Following Surgery,Neoplasm
+17 ;;^UTILITY(U,$J,358.3,19139,1,4,0)
+18 ;;=4^Z48.3
+19 ;;^UTILITY(U,$J,358.3,19139,2)
+20 ;;=^5063046
+21 ;;^UTILITY(U,$J,358.3,19140,0)
+22 ;;=Z48.817^^62^765^4
+23 ;;^UTILITY(U,$J,358.3,19140,1,0)
+24 ;;=^358.31IA^4^2
+25 ;;^UTILITY(U,$J,358.3,19140,1,3,0)
+26 ;;=3^Aftercare Following Surgery,Skin
+27 ;;^UTILITY(U,$J,358.3,19140,1,4,0)
+28 ;;=4^Z48.817
+29 ;;^UTILITY(U,$J,358.3,19140,2)
+30 ;;=^5063054
+31 ;;^UTILITY(U,$J,358.3,19141,0)
+32 ;;=Z68.1^^62^765^5
+33 ;;^UTILITY(U,$J,358.3,19141,1,0)
+34 ;;=^358.31IA^4^2
+35 ;;^UTILITY(U,$J,358.3,19141,1,3,0)
+36 ;;=3^BMI 19.9 or Less,Adult
+37 ;;^UTILITY(U,$J,358.3,19141,1,4,0)
+38 ;;=4^Z68.1
+39 ;;^UTILITY(U,$J,358.3,19141,2)
+40 ;;=^5063198
+41 ;;^UTILITY(U,$J,358.3,19142,0)
+42 ;;=Z71.82^^62^765^10
+43 ;;^UTILITY(U,$J,358.3,19142,1,0)
+44 ;;=^358.31IA^4^2
+45 ;;^UTILITY(U,$J,358.3,19142,1,3,0)
+46 ;;=3^Exercise Counseling
+47 ;;^UTILITY(U,$J,358.3,19142,1,4,0)
+48 ;;=4^Z71.82
+49 ;;^UTILITY(U,$J,358.3,19142,2)
+50 ;;=^303466
+51 ;;^UTILITY(U,$J,358.3,19143,0)
+52 ;;=Z71.83^^62^765^19
+53 ;;^UTILITY(U,$J,358.3,19143,1,0)
+54 ;;=^358.31IA^4^2
+55 ;;^UTILITY(U,$J,358.3,19143,1,3,0)
+56 ;;=3^Nonprocreative Genetic Counseling
+57 ;;^UTILITY(U,$J,358.3,19143,1,4,0)
+58 ;;=4^Z71.83
+59 ;;^UTILITY(U,$J,358.3,19143,2)
+60 ;;=^5151860
+61 ;;^UTILITY(U,$J,358.3,19144,0)
+62 ;;=Z87.890^^62^765^31
+63 ;;^UTILITY(U,$J,358.3,19144,1,0)
+64 ;;=^358.31IA^4^2
+65 ;;^UTILITY(U,$J,358.3,19144,1,3,0)
+66 ;;=3^Sex Reassignment,Personal Hx
+67 ;;^UTILITY(U,$J,358.3,19144,1,4,0)
+68 ;;=4^Z87.890
+69 ;;^UTILITY(U,$J,358.3,19144,2)
+70 ;;=^5063517
+71 ;;^UTILITY(U,$J,358.3,19145,0)
+72 ;;=F64.0^^62^765^33
+73 ;;^UTILITY(U,$J,358.3,19145,1,0)
+74 ;;=^358.31IA^4^2
+75 ;;^UTILITY(U,$J,358.3,19145,1,3,0)
+76 ;;=3^Transsexualism
+77 ;;^UTILITY(U,$J,358.3,19145,1,4,0)
+78 ;;=4^F64.0
+79 ;;^UTILITY(U,$J,358.3,19145,2)
+80 ;;=^121404^Z87.890
+81 ;;^UTILITY(U,$J,358.3,19146,0)
+82 ;;=Z59.00^^62^765^13
+83 ;;^UTILITY(U,$J,358.3,19146,1,0)
+84 ;;=^358.31IA^4^2
+85 ;;^UTILITY(U,$J,358.3,19146,1,3,0)
+86 ;;=3^Homelessness,Unspec
+87 ;;^UTILITY(U,$J,358.3,19146,1,4,0)
+88 ;;=4^Z59.00
+89 ;;^UTILITY(U,$J,358.3,19146,2)
+90 ;;=^5161304
+91 ;;^UTILITY(U,$J,358.3,19147,0)
+92 ;;=R45.851^^62^766^3
+93 ;;^UTILITY(U,$J,358.3,19147,1,0)
+94 ;;=^358.31IA^4^2
+95 ;;^UTILITY(U,$J,358.3,19147,1,3,0)
+96 ;;=3^Suicidal Ideations
+97 ;;^UTILITY(U,$J,358.3,19147,1,4,0)
+98 ;;=4^R45.851
+99 ;;^UTILITY(U,$J,358.3,19147,2)
+100 ;;=^5019474
+101 ;;^UTILITY(U,$J,358.3,19148,0)
+102 ;;=T14.91XA^^62^766^4
+103 ;;^UTILITY(U,$J,358.3,19148,1,0)
+104 ;;=^358.31IA^4^2
+105 ;;^UTILITY(U,$J,358.3,19148,1,3,0)
+106 ;;=3^Suicide Attempt,Initial Encounter
+107 ;;^UTILITY(U,$J,358.3,19148,1,4,0)
+108 ;;=4^T14.91XA
+109 ;;^UTILITY(U,$J,358.3,19148,2)
+110 ;;=^5151779
+111 ;;^UTILITY(U,$J,358.3,19149,0)
+112 ;;=T14.91XD^^62^766^6
+113 ;;^UTILITY(U,$J,358.3,19149,1,0)
+114 ;;=^358.31IA^4^2
+115 ;;^UTILITY(U,$J,358.3,19149,1,3,0)
+116 ;;=3^Suicide Attempt,Subsequent Encntr
+117 ;;^UTILITY(U,$J,358.3,19149,1,4,0)
+118 ;;=4^T14.91XD
+119 ;;^UTILITY(U,$J,358.3,19149,2)
+120 ;;=^5151780
+121 ;;^UTILITY(U,$J,358.3,19150,0)
+122 ;;=T14.91XS^^62^766^5
+123 ;;^UTILITY(U,$J,358.3,19150,1,0)
+124 ;;=^358.31IA^4^2
+125 ;;^UTILITY(U,$J,358.3,19150,1,3,0)
+126 ;;=3^Suicide Attempt,Sequela
+127 ;;^UTILITY(U,$J,358.3,19150,1,4,0)
+128 ;;=4^T14.91XS
+129 ;;^UTILITY(U,$J,358.3,19150,2)
+130 ;;=^5151781
+131 ;;^UTILITY(U,$J,358.3,19151,0)
+132 ;;=Z91.51^^62^766^2
+133 ;;^UTILITY(U,$J,358.3,19151,1,0)
+134 ;;=^358.31IA^4^2
+135 ;;^UTILITY(U,$J,358.3,19151,1,3,0)
+136 ;;=3^Personal Hx of Suicidal Behavior
+137 ;;^UTILITY(U,$J,358.3,19151,1,4,0)
+138 ;;=4^Z91.51
+139 ;;^UTILITY(U,$J,358.3,19151,2)
+140 ;;=^5161317
+141 ;;^UTILITY(U,$J,358.3,19152,0)
+142 ;;=Z91.52^^62^766^1
+143 ;;^UTILITY(U,$J,358.3,19152,1,0)
+144 ;;=^358.31IA^4^2
+145 ;;^UTILITY(U,$J,358.3,19152,1,3,0)
+146 ;;=3^Personal Hx of Non-Suicidal Self-Harm
+147 ;;^UTILITY(U,$J,358.3,19152,1,4,0)
+148 ;;=4^Z91.52
+149 ;;^UTILITY(U,$J,358.3,19152,2)
+150 ;;=^5161318
+151 ;;^UTILITY(U,$J,358.3,19153,0)
+152 ;;=99221^^63^767^1
+153 ;;^UTILITY(U,$J,358.3,19153,1,0)
+154 ;;=^358.31IA^2^2
+155 ;;^UTILITY(U,$J,358.3,19153,1,1,0)
+156 ;;=1^Detailed Hx & Exam,MDM Low Comp
+157 ;;^UTILITY(U,$J,358.3,19153,1,2,0)
+158 ;;=2^99221
+159 ;;^UTILITY(U,$J,358.3,19154,0)
+160 ;;=99222^^63^767^2
+161 ;;^UTILITY(U,$J,358.3,19154,1,0)
+162 ;;=^358.31IA^2^2
+163 ;;^UTILITY(U,$J,358.3,19154,1,1,0)
+164 ;;=1^Comp Hx & Exam,MDM Mod Comp
+165 ;;^UTILITY(U,$J,358.3,19154,1,2,0)
+166 ;;=2^99222
+167 ;;^UTILITY(U,$J,358.3,19155,0)
+168 ;;=99223^^63^767^3
+169 ;;^UTILITY(U,$J,358.3,19155,1,0)
+170 ;;=^358.31IA^2^2
+171 ;;^UTILITY(U,$J,358.3,19155,1,1,0)
+172 ;;=1^Comp Hx & Exam;MDM High Comp
+173 ;;^UTILITY(U,$J,358.3,19155,1,2,0)
+174 ;;=2^99223
+175 ;;^UTILITY(U,$J,358.3,19156,0)
+176 ;;=99218^^63^768^1
+177 ;;^UTILITY(U,$J,358.3,19156,1,0)
+178 ;;=^358.31IA^2^2
+179 ;;^UTILITY(U,$J,358.3,19156,1,1,0)
+180 ;;=1^Detailed;Low Complexity
+181 ;;^UTILITY(U,$J,358.3,19156,1,2,0)
+182 ;;=2^99218
+183 ;;^UTILITY(U,$J,358.3,19157,0)
+184 ;;=99219^^63^768^2
+185 ;;^UTILITY(U,$J,358.3,19157,1,0)
+186 ;;=^358.31IA^2^2
+187 ;;^UTILITY(U,$J,358.3,19157,1,1,0)
+188 ;;=1^Comp;Mod Complexity
+189 ;;^UTILITY(U,$J,358.3,19157,1,2,0)
+190 ;;=2^99219
+191 ;;^UTILITY(U,$J,358.3,19158,0)
+192 ;;=99220^^63^768^3
+193 ;;^UTILITY(U,$J,358.3,19158,1,0)
+194 ;;=^358.31IA^2^2
+195 ;;^UTILITY(U,$J,358.3,19158,1,1,0)
+196 ;;=1^Comp;High Complexity
+197 ;;^UTILITY(U,$J,358.3,19158,1,2,0)
+198 ;;=2^99220
+199 ;;^UTILITY(U,$J,358.3,19159,0)
+200 ;;=99251^^63^769^1
+201 ;;^UTILITY(U,$J,358.3,19159,1,0)
+202 ;;=^358.31IA^2^2
+203 ;;^UTILITY(U,$J,358.3,19159,1,1,0)
+204 ;;=1^Prob Foc Hx & Exam,MDM Straightforward
+205 ;;^UTILITY(U,$J,358.3,19159,1,2,0)
+206 ;;=2^99251
+207 ;;^UTILITY(U,$J,358.3,19160,0)
+208 ;;=99252^^63^769^2
+209 ;;^UTILITY(U,$J,358.3,19160,1,0)
+210 ;;=^358.31IA^2^2
+211 ;;^UTILITY(U,$J,358.3,19160,1,1,0)
+212 ;;=1^Exp Prob Foc Hx & Exam,MDM Straightforward
+213 ;;^UTILITY(U,$J,358.3,19160,1,2,0)
+214 ;;=2^99252
+215 ;;^UTILITY(U,$J,358.3,19161,0)
+216 ;;=99253^^63^769^3
+217 ;;^UTILITY(U,$J,358.3,19161,1,0)
+218 ;;=^358.31IA^2^2
+219 ;;^UTILITY(U,$J,358.3,19161,1,1,0)
+220 ;;=1^Detailed Hx & Exam,MDM Low Comp
+221 ;;^UTILITY(U,$J,358.3,19161,1,2,0)
+222 ;;=2^99253
+223 ;;^UTILITY(U,$J,358.3,19162,0)
+224 ;;=99254^^63^769^4
+225 ;;^UTILITY(U,$J,358.3,19162,1,0)
+226 ;;=^358.31IA^2^2
+227 ;;^UTILITY(U,$J,358.3,19162,1,1,0)
+228 ;;=1^Comp Hx & Exam,MDM Mod Comp
+229 ;;^UTILITY(U,$J,358.3,19162,1,2,0)
+230 ;;=2^99254
+231 ;;^UTILITY(U,$J,358.3,19163,0)
+232 ;;=99255^^63^769^5
+233 ;;^UTILITY(U,$J,358.3,19163,1,0)
+234 ;;=^358.31IA^2^2
+235 ;;^UTILITY(U,$J,358.3,19163,1,1,0)
+236 ;;=1^Comp Hx & Exam,MDM Mod Comp
+237 ;;^UTILITY(U,$J,358.3,19163,1,2,0)
+238 ;;=2^99255
+239 ;;^UTILITY(U,$J,358.3,19164,0)
+240 ;;=99231^^63^770^1
+241 ;;^UTILITY(U,$J,358.3,19164,1,0)
+242 ;;=^358.31IA^2^2
+243 ;;^UTILITY(U,$J,358.3,19164,1,1,0)
+244 ;;=1^Prob Foc Hx & Exam,MDM Low Comp
+245 ;;^UTILITY(U,$J,358.3,19164,1,2,0)
+246 ;;=2^99231
+247 ;;^UTILITY(U,$J,358.3,19165,0)
+248 ;;=99232^^63^770^2
+249 ;;^UTILITY(U,$J,358.3,19165,1,0)
+250 ;;=^358.31IA^2^2
+251 ;;^UTILITY(U,$J,358.3,19165,1,1,0)
+252 ;;=1^Exp Prob Foc Hx & Exam,MDM Mod Comp
+253 ;;^UTILITY(U,$J,358.3,19165,1,2,0)
+254 ;;=2^99232
+255 ;;^UTILITY(U,$J,358.3,19166,0)
+256 ;;=99233^^63^770^3
+257 ;;^UTILITY(U,$J,358.3,19166,1,0)
+258 ;;=^358.31IA^2^2
+259 ;;^UTILITY(U,$J,358.3,19166,1,1,0)
+260 ;;=1^Detailed Hx & Exam,MDM High Comp
+261 ;;^UTILITY(U,$J,358.3,19166,1,2,0)
+262 ;;=2^99233
+263 ;;^UTILITY(U,$J,358.3,19167,0)
+264 ;;=99238^^63^771^1
+265 ;;^UTILITY(U,$J,358.3,19167,1,0)
+266 ;;=^358.31IA^2^2
+267 ;;^UTILITY(U,$J,358.3,19167,1,1,0)
+268 ;;=1^Discharge Day Mgmt < 30min
+269 ;;^UTILITY(U,$J,358.3,19167,1,2,0)
+270 ;;=2^99238
+271 ;;^UTILITY(U,$J,358.3,19168,0)
+272 ;;=99239^^63^771^2
+273 ;;^UTILITY(U,$J,358.3,19168,1,0)
+274 ;;=^358.31IA^2^2
+275 ;;^UTILITY(U,$J,358.3,19168,1,1,0)
+276 ;;=1^Discharge Day Mgmt > 30min
+277 ;;^UTILITY(U,$J,358.3,19168,1,2,0)
+278 ;;=2^99239
+279 ;;^UTILITY(U,$J,358.3,19169,0)
+280 ;;=99224^^63^772^1
+281 ;;^UTILITY(U,$J,358.3,19169,1,0)
+282 ;;=^358.31IA^2^2
+283 ;;^UTILITY(U,$J,358.3,19169,1,1,0)
+284 ;;=1^Prob Foc Hx & Exam,MDM Low Comp
+285 ;;^UTILITY(U,$J,358.3,19169,1,2,0)
+286 ;;=2^99224
+287 ;;^UTILITY(U,$J,358.3,19170,0)
+288 ;;=99225^^63^772^2
+289 ;;^UTILITY(U,$J,358.3,19170,1,0)
+290 ;;=^358.31IA^2^2
+291 ;;^UTILITY(U,$J,358.3,19170,1,1,0)
+292 ;;=1^Exp Prob Foc Hx & Exam,MDM Mod Comp
+293 ;;^UTILITY(U,$J,358.3,19170,1,2,0)
+294 ;;=2^99225
+295 ;;^UTILITY(U,$J,358.3,19171,0)
+296 ;;=99226^^63^772^3
+297 ;;^UTILITY(U,$J,358.3,19171,1,0)
+298 ;;=^358.31IA^2^2
+299 ;;^UTILITY(U,$J,358.3,19171,1,1,0)
+300 ;;=1^Detailed Hx & Exam,MDM High Comp
+301 ;;^UTILITY(U,$J,358.3,19171,1,2,0)
+302 ;;=2^99226
+303 ;;^UTILITY(U,$J,358.3,19172,0)
+304 ;;=99217^^63^773^1
+305 ;;^UTILITY(U,$J,358.3,19172,1,0)
+306 ;;=^358.31IA^2^2
+307 ;;^UTILITY(U,$J,358.3,19172,1,1,0)
+308 ;;=1^Observation D/C Day Mgmt
+309 ;;^UTILITY(U,$J,358.3,19172,1,2,0)
+310 ;;=2^99217
+311 ;;^UTILITY(U,$J,358.3,19173,0)
+312 ;;=20600^^64^774^3^^^^1
+313 ;;^UTILITY(U,$J,358.3,19173,1,0)
+314 ;;=^358.31IA^3^2
+315 ;;^UTILITY(U,$J,358.3,19173,1,2,0)
+316 ;;=2^Asp/Inj Small Jt/Bursa
+317 ;;^UTILITY(U,$J,358.3,19173,1,3,0)
+318 ;;=3^20600
+319 ;;^UTILITY(U,$J,358.3,19174,0)
+320 ;;=20605^^64^774^1^^^^1
+321 ;;^UTILITY(U,$J,358.3,19174,1,0)
+322 ;;=^358.31IA^3^2
+323 ;;^UTILITY(U,$J,358.3,19174,1,2,0)
+324 ;;=2^Asp/Inj Interm Jt(Ac/Wrist/Ankle
+325 ;;^UTILITY(U,$J,358.3,19174,1,3,0)
+326 ;;=3^20605
+327 ;;^UTILITY(U,$J,358.3,19175,0)
+328 ;;=20610^^64^774^2^^^^1
+329 ;;^UTILITY(U,$J,358.3,19175,1,0)
+330 ;;=^358.31IA^3^2
+331 ;;^UTILITY(U,$J,358.3,19175,1,2,0)
+332 ;;=2^Asp/Inj Maj Jt (Should/Hip/Knee
+333 ;;^UTILITY(U,$J,358.3,19175,1,3,0)
+334 ;;=3^20610
+335 ;;^UTILITY(U,$J,358.3,19176,0)
+336 ;;=20550^^64^774^6^^^^1
+337 ;;^UTILITY(U,$J,358.3,19176,1,0)
+338 ;;=^358.31IA^3^2
+339 ;;^UTILITY(U,$J,358.3,19176,1,2,0)
+340 ;;=2^Inject Tendon/Ligament/Cyst
+341 ;;^UTILITY(U,$J,358.3,19176,1,3,0)
+342 ;;=3^20550
+343 ;;^UTILITY(U,$J,358.3,19177,0)
+344 ;;=J1100^^64^774^5^^^^1
+345 ;;^UTILITY(U,$J,358.3,19177,1,0)
+346 ;;=^358.31IA^3^2
+347 ;;^UTILITY(U,$J,358.3,19177,1,2,0)
+348 ;;=2^Dexamethasone Sodium Phos 1 mg
+349 ;;^UTILITY(U,$J,358.3,19177,1,3,0)
+350 ;;=3^J1100
+351 ;;^UTILITY(U,$J,358.3,19178,0)
+352 ;;=J0800^^64^774^4^^^^1
+353 ;;^UTILITY(U,$J,358.3,19178,1,0)
+354 ;;=^358.31IA^3^2
+355 ;;^UTILITY(U,$J,358.3,19178,1,2,0)
+356 ;;=2^Corticotropin Inj up to 40 units
+357 ;;^UTILITY(U,$J,358.3,19178,1,3,0)
+358 ;;=3^J0800
+359 ;;^UTILITY(U,$J,358.3,19179,0)
+360 ;;=J1040^^64^774^8^^^^1
+361 ;;^UTILITY(U,$J,358.3,19179,1,0)
+362 ;;=^358.31IA^3^2
+363 ;;^UTILITY(U,$J,358.3,19179,1,2,0)
+364 ;;=2^Methylprednisolone 80 Mg Inj
+365 ;;^UTILITY(U,$J,358.3,19179,1,3,0)
+366 ;;=3^J1040
+367 ;;^UTILITY(U,$J,358.3,19180,0)
+368 ;;=20552^^64^774^9^^^^1
+369 ;;^UTILITY(U,$J,358.3,19180,1,0)
+370 ;;=^358.31IA^3^2
+371 ;;^UTILITY(U,$J,358.3,19180,1,2,0)
+372 ;;=2^Trigger Point(s) Inj,1-2 Muscles
+373 ;;^UTILITY(U,$J,358.3,19180,1,3,0)
+374 ;;=3^20552
+375 ;;^UTILITY(U,$J,358.3,19181,0)
+376 ;;=20553^^64^774^10^^^^1
+377 ;;^UTILITY(U,$J,358.3,19181,1,0)
+378 ;;=^358.31IA^3^2
+379 ;;^UTILITY(U,$J,358.3,19181,1,2,0)
+380 ;;=2^Trigger Point(s) Inj,=/> 3 Muscles
+381 ;;^UTILITY(U,$J,358.3,19181,1,3,0)
+382 ;;=3^20553
+383 ;;^UTILITY(U,$J,358.3,19182,0)
+384 ;;=J1030^^64^774^7^^^^1
+385 ;;^UTILITY(U,$J,358.3,19182,1,0)
+386 ;;=^358.31IA^3^2
+387 ;;^UTILITY(U,$J,358.3,19182,1,2,0)
+388 ;;=2^Methylprednisolone 40 mg
+389 ;;^UTILITY(U,$J,358.3,19182,1,3,0)
+390 ;;=3^J1030
+391 ;;^UTILITY(U,$J,358.3,19183,0)
+392 ;;=97597^^64^775^2^^^^1
+393 ;;^UTILITY(U,$J,358.3,19183,1,0)
+394 ;;=^358.31IA^3^2
+395 ;;^UTILITY(U,$J,358.3,19183,1,2,0)
+396 ;;=2^Active Wound Care/20 Cm Or <
+397 ;;^UTILITY(U,$J,358.3,19183,1,3,0)
+398 ;;=3^97597
+399 ;;^UTILITY(U,$J,358.3,19184,0)
+400 ;;=97598^^64^775^1^^^^1
+401 ;;^UTILITY(U,$J,358.3,19184,1,0)
+402 ;;=^358.31IA^3^2
+403 ;;^UTILITY(U,$J,358.3,19184,1,2,0)
+404 ;;=2^Active Wound Care each adtl 20 Cm
+405 ;;^UTILITY(U,$J,358.3,19184,1,3,0)
+406 ;;=3^97598
+407 ;;^UTILITY(U,$J,358.3,19185,0)
+408 ;;=97605^^64^775^7^^^^1
+409 ;;^UTILITY(U,$J,358.3,19185,1,0)
+410 ;;=^358.31IA^3^2
+411 ;;^UTILITY(U,$J,358.3,19185,1,2,0)
+412 ;;=2^Neg Press Wound Tx < 50 Cm
+413 ;;^UTILITY(U,$J,358.3,19185,1,3,0)
+414 ;;=3^97605
+415 ;;^UTILITY(U,$J,358.3,19186,0)
+416 ;;=97606^^64^775^8^^^^1
+417 ;;^UTILITY(U,$J,358.3,19186,1,0)
+418 ;;=^358.31IA^3^2
+419 ;;^UTILITY(U,$J,358.3,19186,1,2,0)
+420 ;;=2^Neg Press Wound Tx, > 50 Cm
+421 ;;^UTILITY(U,$J,358.3,19186,1,3,0)
+422 ;;=3^97606
+423 ;;^UTILITY(U,$J,358.3,19187,0)
+424 ;;=97602^^64^775^9^^^^1
+425 ;;^UTILITY(U,$J,358.3,19187,1,0)
+426 ;;=^358.31IA^3^2
+427 ;;^UTILITY(U,$J,358.3,19187,1,2,0)
+428 ;;=2^Remove Divit. Tissue w/o Anesth
+429 ;;^UTILITY(U,$J,358.3,19187,1,3,0)
+430 ;;=3^97602
+431 ;;^UTILITY(U,$J,358.3,19188,0)
+432 ;;=G0281^^64^775^5^^^^1
+433 ;;^UTILITY(U,$J,358.3,19188,1,0)
+434 ;;=^358.31IA^3^2
+435 ;;^UTILITY(U,$J,358.3,19188,1,2,0)
+436 ;;=2^Electrical Stim,Stg 3/4 Wound Care
+437 ;;^UTILITY(U,$J,358.3,19188,1,3,0)
+438 ;;=3^G0281
+439 ;;^UTILITY(U,$J,358.3,19189,0)
+440 ;;=G0283^^64^775^3^^^^1
+441 ;;^UTILITY(U,$J,358.3,19189,1,0)
+442 ;;=^358.31IA^3^2
+443 ;;^UTILITY(U,$J,358.3,19189,1,2,0)
+444 ;;=2^Electrical Stim,Oth than Wnd Care
+445 ;;^UTILITY(U,$J,358.3,19189,1,3,0)
+446 ;;=3^G0283
+447 ;;^UTILITY(U,$J,358.3,19190,0)
+448 ;;=G0329^^64^775^6^^^^1
+449 ;;^UTILITY(U,$J,358.3,19190,1,0)
+450 ;;=^358.31IA^3^2
+451 ;;^UTILITY(U,$J,358.3,19190,1,2,0)
+452 ;;=2^Electromagnetic Therapy,Wound Care
+453 ;;^UTILITY(U,$J,358.3,19190,1,3,0)
+454 ;;=3^G0329
+455 ;;^UTILITY(U,$J,358.3,19191,0)
+456 ;;=97610^^64^775^10^^^^1
+457 ;;^UTILITY(U,$J,358.3,19191,1,0)
+458 ;;=^358.31IA^3^2
+459 ;;^UTILITY(U,$J,358.3,19191,1,2,0)
+460 ;;=2^US LF Non-Contact Non-Therm,Wnd Assess
+461 ;;^UTILITY(U,$J,358.3,19191,1,3,0)
+462 ;;=3^97610
+463 ;;^UTILITY(U,$J,358.3,19192,0)
+464 ;;=G0282^^64^775^4^^^^1
+465 ;;^UTILITY(U,$J,358.3,19192,1,0)
+466 ;;=^358.31IA^3^2
+467 ;;^UTILITY(U,$J,358.3,19192,1,2,0)
+468 ;;=2^Electrical Stim,Stg 1/2 Wound Care
+469 ;;^UTILITY(U,$J,358.3,19192,1,3,0)
+470 ;;=3^G0282
+471 ;;^UTILITY(U,$J,358.3,19193,0)
+472 ;;=99070^^64^776^1^^^^1
+473 ;;^UTILITY(U,$J,358.3,19193,1,0)
+474 ;;=^358.31IA^3^2
+475 ;;^UTILITY(U,$J,358.3,19193,1,2,0)
+476 ;;=2^SPECIAL SUPPLIES
+477 ;;^UTILITY(U,$J,358.3,19193,1,3,0)
+478 ;;=3^99070
+479 ;;^UTILITY(U,$J,358.3,19194,0)
+480 ;;=97039^^64^776^3^^^^1
+481 ;;^UTILITY(U,$J,358.3,19194,1,0)
+482 ;;=^358.31IA^3^2
+483 ;;^UTILITY(U,$J,358.3,19194,1,2,0)
+484 ;;=2^UNLISTED PT MODALITY
+485 ;;^UTILITY(U,$J,358.3,19194,1,3,0)
+486 ;;=3^97039
+487 ;;^UTILITY(U,$J,358.3,19195,0)
+488 ;;=97799^^64^776^2^^^^1
+489 ;;^UTILITY(U,$J,358.3,19195,1,0)
+490 ;;=^358.31IA^3^2
+491 ;;^UTILITY(U,$J,358.3,19195,1,2,0)
+492 ;;=2^UNLISTED PROCEDURE
+493 ;;^UTILITY(U,$J,358.3,19195,1,3,0)
+494 ;;=3^97799
+495 ;;^UTILITY(U,$J,358.3,19196,0)
+496 ;;=95860^^64^777^2^^^^1
+497 ;;^UTILITY(U,$J,358.3,19196,1,0)
+498 ;;=^358.31IA^3^2
+499 ;;^UTILITY(U,$J,358.3,19196,1,2,0)
+500 ;;=2^EMG 1 Limb
+501 ;;^UTILITY(U,$J,358.3,19196,1,3,0)
+502 ;;=3^95860
+503 ;;^UTILITY(U,$J,358.3,19197,0)
+504 ;;=95863^^64^777^4^^^^1
+505 ;;^UTILITY(U,$J,358.3,19197,1,0)
+506 ;;=^358.31IA^3^2
+507 ;;^UTILITY(U,$J,358.3,19197,1,2,0)
+508 ;;=2^EMG 3 Limbs
+509 ;;^UTILITY(U,$J,358.3,19197,1,3,0)
+510 ;;=3^95863
+511 ;;^UTILITY(U,$J,358.3,19198,0)
+512 ;;=95864^^64^777^5^^^^1
+513 ;;^UTILITY(U,$J,358.3,19198,1,0)
+514 ;;=^358.31IA^3^2
+515 ;;^UTILITY(U,$J,358.3,19198,1,2,0)
+516 ;;=2^EMG 4 Limbs
+517 ;;^UTILITY(U,$J,358.3,19198,1,3,0)
+518 ;;=3^95864
+519 ;;^UTILITY(U,$J,358.3,19199,0)
+520 ;;=95867^^64^777^6^^^^1
+521 ;;^UTILITY(U,$J,358.3,19199,1,0)
+522 ;;=^358.31IA^3^2
+523 ;;^UTILITY(U,$J,358.3,19199,1,2,0)
+524 ;;=2^EMG Cran Ner Mus-Unilat
+525 ;;^UTILITY(U,$J,358.3,19199,1,3,0)
+526 ;;=3^95867
+527 ;;^UTILITY(U,$J,358.3,19200,0)
+528 ;;=95868^^64^777^7^^^^1
+529 ;;^UTILITY(U,$J,358.3,19200,1,0)
+530 ;;=^358.31IA^3^2
+531 ;;^UTILITY(U,$J,358.3,19200,1,2,0)
+532 ;;=2^EMG Head or Neck
+533 ;;^UTILITY(U,$J,358.3,19200,1,3,0)
+534 ;;=3^95868
+535 ;;^UTILITY(U,$J,358.3,19201,0)
+536 ;;=95870^^64^777^9^^^^1
+537 ;;^UTILITY(U,$J,358.3,19201,1,0)
+538 ;;=^358.31IA^3^2
+539 ;;^UTILITY(U,$J,358.3,19201,1,2,0)
+540 ;;=2^Needle EMG < 5 Muscles/Ext
+541 ;;^UTILITY(U,$J,358.3,19201,1,3,0)
+542 ;;=3^95870
+543 ;;^UTILITY(U,$J,358.3,19202,0)
+544 ;;=95861^^64^777^3^^^^1
+545 ;;^UTILITY(U,$J,358.3,19202,1,0)
+546 ;;=^358.31IA^3^2
+547 ;;^UTILITY(U,$J,358.3,19202,1,2,0)
+548 ;;=2^EMG 2 Limbs
+549 ;;^UTILITY(U,$J,358.3,19202,1,3,0)
+550 ;;=3^95861
+551 ;;^UTILITY(U,$J,358.3,19203,0)
+552 ;;=95885^^64^777^10^^^^1
+553 ;;^UTILITY(U,$J,358.3,19203,1,0)
+554 ;;=^358.31IA^3^2
+555 ;;^UTILITY(U,$J,358.3,19203,1,2,0)
+556 ;;=2^Needle EMG < 5 Muscles/Ext,+NCS
+557 ;;^UTILITY(U,$J,358.3,19203,1,3,0)
+558 ;;=3^95885
+559 ;;^UTILITY(U,$J,358.3,19204,0)
+560 ;;=95886^^64^777^11^^^^1
+561 ;;^UTILITY(U,$J,358.3,19204,1,0)
+562 ;;=^358.31IA^3^2
+563 ;;^UTILITY(U,$J,358.3,19204,1,2,0)
+564 ;;=2^Needle EMG >/= 5 Muscles/Ext,+NCS
+565 ;;^UTILITY(U,$J,358.3,19204,1,3,0)
+566 ;;=3^95886
+567 ;;^UTILITY(U,$J,358.3,19205,0)
+568 ;;=95887^^64^777^12^^^^1
+569 ;;^UTILITY(U,$J,358.3,19205,1,0)
+570 ;;=^358.31IA^3^2
+571 ;;^UTILITY(U,$J,358.3,19205,1,2,0)
+572 ;;=2^Needle EMG CNs or Axial,+NCS
+573 ;;^UTILITY(U,$J,358.3,19205,1,3,0)
+574 ;;=3^95887
+575 ;;^UTILITY(U,$J,358.3,19206,0)
+576 ;;=95869^^64^777^13^^^^1
+577 ;;^UTILITY(U,$J,358.3,19206,1,0)
+578 ;;=^358.31IA^3^2
+579 ;;^UTILITY(U,$J,358.3,19206,1,2,0)
+580 ;;=2^Needle EMG Thor Paraspinal
+581 ;;^UTILITY(U,$J,358.3,19206,1,3,0)
+582 ;;=3^95869
+583 ;;^UTILITY(U,$J,358.3,19207,0)
+584 ;;=95905^^64^777^8^^^^1
+585 ;;^UTILITY(U,$J,358.3,19207,1,0)
+586 ;;=^358.31IA^3^2
+587 ;;^UTILITY(U,$J,358.3,19207,1,2,0)
+588 ;;=2^Motor/Sens Nerv Conduct-ea limb w/F-wv
+589 ;;^UTILITY(U,$J,358.3,19207,1,3,0)
+590 ;;=3^95905
+591 ;;^UTILITY(U,$J,358.3,19208,0)
+592 ;;=95937^^64^777^21^^^^1
+593 ;;^UTILITY(U,$J,358.3,19208,1,0)
+594 ;;=^358.31IA^3^2
+595 ;;^UTILITY(U,$J,358.3,19208,1,2,0)
+596 ;;=2^Neuromuscular Junction Test
+597 ;;^UTILITY(U,$J,358.3,19208,1,3,0)
+598 ;;=3^95937
+599 ;;^UTILITY(U,$J,358.3,19209,0)
+600 ;;=95907^^64^777^14^^^^1
+601 ;;^UTILITY(U,$J,358.3,19209,1,0)
+602 ;;=^358.31IA^3^2
+603 ;;^UTILITY(U,$J,358.3,19209,1,2,0)
+604 ;;=2^Nerve conduction studies; 1-2 studies
+605 ;;^UTILITY(U,$J,358.3,19209,1,3,0)
+606 ;;=3^95907
+607 ;;^UTILITY(U,$J,358.3,19210,0)
+608 ;;=95908^^64^777^16^^^^1
+609 ;;^UTILITY(U,$J,358.3,19210,1,0)
+610 ;;=^358.31IA^3^2
+611 ;;^UTILITY(U,$J,358.3,19210,1,2,0)
+612 ;;=2^Nerve conduction studies; 3-4 studies
+613 ;;^UTILITY(U,$J,358.3,19210,1,3,0)
+614 ;;=3^95908
+615 ;;^UTILITY(U,$J,358.3,19211,0)
+616 ;;=95909^^64^777^17^^^^1
+617 ;;^UTILITY(U,$J,358.3,19211,1,0)
+618 ;;=^358.31IA^3^2
+619 ;;^UTILITY(U,$J,358.3,19211,1,2,0)
+620 ;;=2^Nerve conduction studies; 5-6 studies
+621 ;;^UTILITY(U,$J,358.3,19211,1,3,0)
+622 ;;=3^95909
+623 ;;^UTILITY(U,$J,358.3,19212,0)
+624 ;;=95910^^64^777^18^^^^1
+625 ;;^UTILITY(U,$J,358.3,19212,1,0)
+626 ;;=^358.31IA^3^2
+627 ;;^UTILITY(U,$J,358.3,19212,1,2,0)
+628 ;;=2^Nerve conduction studies; 7-8 studies
+629 ;;^UTILITY(U,$J,358.3,19212,1,3,0)
+630 ;;=3^95910
+631 ;;^UTILITY(U,$J,358.3,19213,0)
+632 ;;=95911^^64^777^19^^^^1
+633 ;;^UTILITY(U,$J,358.3,19213,1,0)
+634 ;;=^358.31IA^3^2
+635 ;;^UTILITY(U,$J,358.3,19213,1,2,0)
+636 ;;=2^Nerve conduction studies; 9-10 studies
+637 ;;^UTILITY(U,$J,358.3,19213,1,3,0)
+638 ;;=3^95911
+639 ;;^UTILITY(U,$J,358.3,19214,0)
+640 ;;=95912^^64^777^15^^^^1
+641 ;;^UTILITY(U,$J,358.3,19214,1,0)
+642 ;;=^358.31IA^3^2
+643 ;;^UTILITY(U,$J,358.3,19214,1,2,0)
+644 ;;=2^Nerve conduction studies; 11-12 studies
+645 ;;^UTILITY(U,$J,358.3,19214,1,3,0)
+646 ;;=3^95912
+647 ;;^UTILITY(U,$J,358.3,19215,0)
+648 ;;=95913^^64^777^20^^^^1
+649 ;;^UTILITY(U,$J,358.3,19215,1,0)
+650 ;;=^358.31IA^3^2
+651 ;;^UTILITY(U,$J,358.3,19215,1,2,0)
+652 ;;=2^Nerve conduction studies;13 or > studies
+653 ;;^UTILITY(U,$J,358.3,19215,1,3,0)
+654 ;;=3^95913
+655 ;;^UTILITY(U,$J,358.3,19216,0)
+656 ;;=95933^^64^777^1^^^^1
+657 ;;^UTILITY(U,$J,358.3,19216,1,0)
+658 ;;=^358.31IA^3^2
+659 ;;^UTILITY(U,$J,358.3,19216,1,2,0)
+660 ;;=2^Blink Reflex Test
+661 ;;^UTILITY(U,$J,358.3,19216,1,3,0)
+662 ;;=3^95933
+663 ;;^UTILITY(U,$J,358.3,19217,0)
+664 ;;=95925^^64^777^23^^^^1
+665 ;;^UTILITY(U,$J,358.3,19217,1,0)
+666 ;;=^358.31IA^3^2
+667 ;;^UTILITY(U,$J,358.3,19217,1,2,0)
+668 ;;=2^Somatosensory Testing
+669 ;;^UTILITY(U,$J,358.3,19217,1,3,0)
+670 ;;=3^95925