IBDEI08G ; ; 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,20438,1,2,0)
;;=2^MENINGOCOCCAL VACCINE SQ
;;^UTILITY(U,$J,358.3,20438,1,3,0)
;;=3^90733
;;^UTILITY(U,$J,358.3,20439,0)
;;=90621^^86^934^19^^^^1
;;^UTILITY(U,$J,358.3,20439,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,20439,1,2,0)
;;=2^MENINGOCOCCAL VACCINE,LIPOPROTEIN IM
;;^UTILITY(U,$J,358.3,20439,1,3,0)
;;=3^90621
;;^UTILITY(U,$J,358.3,20440,0)
;;=90620^^86^934^20^^^^1
;;^UTILITY(U,$J,358.3,20440,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,20440,1,2,0)
;;=2^MENINGOCOCCAL VACCINE,PROTEIN/OUT MEM IM
;;^UTILITY(U,$J,358.3,20440,1,3,0)
;;=3^90620
;;^UTILITY(U,$J,358.3,20441,0)
;;=90713^^86^934^23^^^^1
;;^UTILITY(U,$J,358.3,20441,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,20441,1,2,0)
;;=2^POLIOVIRUS,IPV SC/IM
;;^UTILITY(U,$J,358.3,20441,1,3,0)
;;=3^90713
;;^UTILITY(U,$J,358.3,20442,0)
;;=90715^^86^934^26^^^^1
;;^UTILITY(U,$J,358.3,20442,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,20442,1,2,0)
;;=2^TDAP VACCINE
;;^UTILITY(U,$J,358.3,20442,1,3,0)
;;=3^90715
;;^UTILITY(U,$J,358.3,20443,0)
;;=90691^^86^934^27^^^^1
;;^UTILITY(U,$J,358.3,20443,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,20443,1,2,0)
;;=2^TYPHOID VACCINE IM
;;^UTILITY(U,$J,358.3,20443,1,3,0)
;;=3^90691
;;^UTILITY(U,$J,358.3,20444,0)
;;=90716^^86^934^28^^^^1
;;^UTILITY(U,$J,358.3,20444,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,20444,1,2,0)
;;=2^VARIVAX (CHICKEN POX) VACCINE
;;^UTILITY(U,$J,358.3,20444,1,3,0)
;;=3^90716
;;^UTILITY(U,$J,358.3,20445,0)
;;=96160^^86^935^4^^^^1
;;^UTILITY(U,$J,358.3,20445,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,20445,1,2,0)
;;=2^HLTH RISK ASSESSMENT,PT FOCUSED
;;^UTILITY(U,$J,358.3,20445,1,3,0)
;;=3^96160
;;^UTILITY(U,$J,358.3,20446,0)
;;=96161^^86^935^3^^^^1
;;^UTILITY(U,$J,358.3,20446,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,20446,1,2,0)
;;=2^HLTH RISK ASSESSMENT,CAREGIVR FOCUSED
;;^UTILITY(U,$J,358.3,20446,1,3,0)
;;=3^96161
;;^UTILITY(U,$J,358.3,20447,0)
;;=96110^^86^935^2^^^^1
;;^UTILITY(U,$J,358.3,20447,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,20447,1,2,0)
;;=2^DEVELOPMENTAL SCREEN W/ SCORE
;;^UTILITY(U,$J,358.3,20447,1,3,0)
;;=3^96110
;;^UTILITY(U,$J,358.3,20448,0)
;;=96127^^86^935^1^^^^1
;;^UTILITY(U,$J,358.3,20448,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,20448,1,2,0)
;;=2^BRIEF EMOTIONAL/BEHAV ASSESSMENT
;;^UTILITY(U,$J,358.3,20448,1,3,0)
;;=3^96127
;;^UTILITY(U,$J,358.3,20449,0)
;;=86485^^86^936^1^^^^1
;;^UTILITY(U,$J,358.3,20449,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,20449,1,2,0)
;;=2^CANDIDA
;;^UTILITY(U,$J,358.3,20449,1,3,0)
;;=3^86485
;;^UTILITY(U,$J,358.3,20450,0)
;;=86486^^86^936^4^^^^1
;;^UTILITY(U,$J,358.3,20450,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,20450,1,2,0)
;;=2^MUMPS
;;^UTILITY(U,$J,358.3,20450,1,3,0)
;;=3^86486
;;^UTILITY(U,$J,358.3,20451,0)
;;=86580^^86^936^5^^^^1
;;^UTILITY(U,$J,358.3,20451,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,20451,1,2,0)
;;=2^TB
;;^UTILITY(U,$J,358.3,20451,1,3,0)
;;=3^86580
;;^UTILITY(U,$J,358.3,20452,0)
;;=95024^^86^936^3^^^^1
;;^UTILITY(U,$J,358.3,20452,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,20452,1,2,0)
;;=2^INTRADERMALS (EACH)
;;^UTILITY(U,$J,358.3,20452,1,3,0)
;;=3^95024
;;^UTILITY(U,$J,358.3,20453,0)
;;=86510^^86^936^2^^^^1
;;^UTILITY(U,$J,358.3,20453,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,20453,1,2,0)
;;=2^HISTOPLASMOSIS
;;^UTILITY(U,$J,358.3,20453,1,3,0)
;;=3^86510
;;^UTILITY(U,$J,358.3,20454,0)
;;=99395^^86^937^1^^^^1
;;^UTILITY(U,$J,358.3,20454,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,20454,1,2,0)
;;=2^PREVENTIVE MED,EST PT 18-39
;;^UTILITY(U,$J,358.3,20454,1,3,0)
;;=3^99395
;;^UTILITY(U,$J,358.3,20455,0)
;;=99396^^86^937^2^^^^1
;;^UTILITY(U,$J,358.3,20455,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,20455,1,2,0)
;;=2^PREVENTIVE MED,EST PT 40-64
;;^UTILITY(U,$J,358.3,20455,1,3,0)
;;=3^99396
;;^UTILITY(U,$J,358.3,20456,0)
;;=99397^^86^937^3^^^^1
;;^UTILITY(U,$J,358.3,20456,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,20456,1,2,0)
;;=2^PREVENTIVE MED,EST PT > 64
;;^UTILITY(U,$J,358.3,20456,1,3,0)
;;=3^99397
;;^UTILITY(U,$J,358.3,20457,0)
;;=99385^^86^938^1^^^^1
;;^UTILITY(U,$J,358.3,20457,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,20457,1,2,0)
;;=2^PREVENTIVE MED,NEW PT 18-39
;;^UTILITY(U,$J,358.3,20457,1,3,0)
;;=3^99385
;;^UTILITY(U,$J,358.3,20458,0)
;;=99386^^86^938^2^^^^1
;;^UTILITY(U,$J,358.3,20458,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,20458,1,2,0)
;;=2^PREVENTIVE MED,NEW PT 40-64
;;^UTILITY(U,$J,358.3,20458,1,3,0)
;;=3^99386
;;^UTILITY(U,$J,358.3,20459,0)
;;=99387^^86^938^3^^^^1
;;^UTILITY(U,$J,358.3,20459,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,20459,1,2,0)
;;=2^PREVENTIVE MED,NEW PT > 64
;;^UTILITY(U,$J,358.3,20459,1,3,0)
;;=3^99387
;;^UTILITY(U,$J,358.3,20460,0)
;;=99497^^86^939^1^^^^1
;;^UTILITY(U,$J,358.3,20460,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,20460,1,2,0)
;;=2^ADVANCED CARE PLAN,30 MIN
;;^UTILITY(U,$J,358.3,20460,1,3,0)
;;=3^99497
;;^UTILITY(U,$J,358.3,20461,0)
;;=99498^^86^939^2^^^^1
;;^UTILITY(U,$J,358.3,20461,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,20461,1,2,0)
;;=2^ADVANCED CARE PLAN,EA ADDL 30 MIN
;;^UTILITY(U,$J,358.3,20461,1,3,0)
;;=3^99498
;;^UTILITY(U,$J,358.3,20462,0)
;;=90471^^86^940^1^^^^1
;;^UTILITY(U,$J,358.3,20462,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,20462,1,2,0)
;;=2^IMMUNIZATION ADMIN,1 VACCINE
;;^UTILITY(U,$J,358.3,20462,1,3,0)
;;=3^90471
;;^UTILITY(U,$J,358.3,20463,0)
;;=90472^^86^940^2^^^^1
;;^UTILITY(U,$J,358.3,20463,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,20463,1,2,0)
;;=2^IMMUNIZATION ADMIN,EA ADDL VACCINE
;;^UTILITY(U,$J,358.3,20463,1,3,0)
;;=3^90472
;;^UTILITY(U,$J,358.3,20464,0)
;;=99340^^86^941^2^^^^1
;;^UTILITY(U,$J,358.3,20464,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,20464,1,2,0)
;;=2^PHYS SUPV OF PT IN HOME/DOM/R-HOME,30+ MIN
;;^UTILITY(U,$J,358.3,20464,1,3,0)
;;=3^99340
;;^UTILITY(U,$J,358.3,20465,0)
;;=99375^^86^941^1^^^^1
;;^UTILITY(U,$J,358.3,20465,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,20465,1,2,0)
;;=2^HOME HEALTH CARE SUPERVISION,30 + MIN
;;^UTILITY(U,$J,358.3,20465,1,3,0)
;;=3^99375
;;^UTILITY(U,$J,358.3,20466,0)
;;=94760^^87^942^1^^^^1
;;^UTILITY(U,$J,358.3,20466,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,20466,1,1,0)
;;=1^94760
;;^UTILITY(U,$J,358.3,20466,1,2,0)
;;=2^Noninvasive Ear/Pulse Oximetry
;;^UTILITY(U,$J,358.3,20467,0)
;;=93770^^87^943^1^^^^1
;;^UTILITY(U,$J,358.3,20467,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,20467,1,1,0)
;;=1^93770
;;^UTILITY(U,$J,358.3,20467,1,2,0)
;;=2^Venous Blood Pressure Reading
;;^UTILITY(U,$J,358.3,20468,0)
;;=97535^^87^944^2^^^^1
;;^UTILITY(U,$J,358.3,20468,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,20468,1,1,0)
;;=1^97535
;;^UTILITY(U,$J,358.3,20468,1,2,0)
;;=2^Self-Care Mgmt Train per 15 Min
;;^UTILITY(U,$J,358.3,20469,0)
;;=99509^^87^944^1^^^^1
;;^UTILITY(U,$J,358.3,20469,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,20469,1,1,0)
;;=1^99509
;;^UTILITY(U,$J,358.3,20469,1,2,0)
;;=2^Home Visit-ADL/Personal Care
;;^UTILITY(U,$J,358.3,20470,0)
;;=J3420^^87^945^7^^^^1
;;^UTILITY(U,$J,358.3,20470,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,20470,1,1,0)
;;=1^J3420
;;^UTILITY(U,$J,358.3,20470,1,2,0)
;;=2^Vitamin B12,Up To 1000Mcg
;;^UTILITY(U,$J,358.3,20471,0)
;;=J0885^^87^945^3^^^^1
;;^UTILITY(U,$J,358.3,20471,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,20471,1,1,0)
;;=1^J0885
;;^UTILITY(U,$J,358.3,20471,1,2,0)
;;=2^Epojen, Non-Esrd,1000U
;;^UTILITY(U,$J,358.3,20472,0)
;;=J2680^^87^945^4^^^^1
;;^UTILITY(U,$J,358.3,20472,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,20472,1,1,0)
;;=1^J2680
;;^UTILITY(U,$J,358.3,20472,1,2,0)
;;=2^Fluphenazine Decanoate 25mg
;;^UTILITY(U,$J,358.3,20473,0)
;;=J0881^^87^945^2^^^^1
;;^UTILITY(U,$J,358.3,20473,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,20473,1,1,0)
;;=1^J0881
;;^UTILITY(U,$J,358.3,20473,1,2,0)
;;=2^Darbepoetin Alfa (Non-Esrd) 1Mcg
;;^UTILITY(U,$J,358.3,20474,0)
;;=J0882^^87^945^1^^^^1
;;^UTILITY(U,$J,358.3,20474,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,20474,1,1,0)
;;=1^J0882
;;^UTILITY(U,$J,358.3,20474,1,2,0)
;;=2^Darbepoetin Alfa (Esrd) 1Mcg
;;^UTILITY(U,$J,358.3,20475,0)
;;=J1071^^87^945^5^^^^1
;;^UTILITY(U,$J,358.3,20475,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,20475,1,1,0)
;;=1^J1071
;;^UTILITY(U,$J,358.3,20475,1,2,0)
;;=2^Testosterone Cypionate 1mg
;;^UTILITY(U,$J,358.3,20476,0)
;;=J3121^^87^945^6^^^^1
;;^UTILITY(U,$J,358.3,20476,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,20476,1,1,0)
;;=1^J3121
;;^UTILITY(U,$J,358.3,20476,1,2,0)
;;=2^Testosterone Enanthate 1mg
;;^UTILITY(U,$J,358.3,20477,0)
;;=96372^^87^946^2^^^^1
;;^UTILITY(U,$J,358.3,20477,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,20477,1,1,0)
;;=1^96372
;;^UTILITY(U,$J,358.3,20477,1,2,0)
;;=2^Ther/Proph/Diag Inj,SC/IM
;;^UTILITY(U,$J,358.3,20478,0)
;;=99506^^87^946^1^^^^1
;;^UTILITY(U,$J,358.3,20478,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,20478,1,1,0)
;;=1^99506
;;^UTILITY(U,$J,358.3,20478,1,2,0)
;;=2^Home Visit-IM Injection
;;^UTILITY(U,$J,358.3,20479,0)
;;=90658^^87^947^4^^^^1
;;^UTILITY(U,$J,358.3,20479,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,20479,1,1,0)
;;=1^90658
;;^UTILITY(U,$J,358.3,20479,1,2,0)
;;=2^Flu Vacc Multi Dose Vials (AFLURIA)
;;^UTILITY(U,$J,358.3,20480,0)
;;=90732^^87^947^12^^^^1
;;^UTILITY(U,$J,358.3,20480,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,20480,1,1,0)
;;=1^90732
;;^UTILITY(U,$J,358.3,20480,1,2,0)
;;=2^Pneumovax 23 (Pneumococcal Vaccine)
;;^UTILITY(U,$J,358.3,20481,0)
;;=90656^^87^947^6^^^^1
;;^UTILITY(U,$J,358.3,20481,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,20481,1,1,0)
;;=1^90656
;;^UTILITY(U,$J,358.3,20481,1,2,0)
;;=2^Flu Vacc Sgle Dose Syr (Afluria)
;;^UTILITY(U,$J,358.3,20482,0)
;;=90662^^87^947^3^^^^1
;;^UTILITY(U,$J,358.3,20482,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,20482,1,1,0)
;;=1^90662
;;^UTILITY(U,$J,358.3,20482,1,2,0)
;;=2^Flu Vacc High Dose Syr (Fluzone)
;;^UTILITY(U,$J,358.3,20483,0)
;;=90670^^87^947^13^^^^1
;;^UTILITY(U,$J,358.3,20483,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,20483,1,1,0)
;;=1^90670
;;^UTILITY(U,$J,358.3,20483,1,2,0)
;;=2^Prevnar 13 (Pneumococcal Vaccine)
;;^UTILITY(U,$J,358.3,20484,0)
;;=90625^^87^947^1^^^^1
;;^UTILITY(U,$J,358.3,20484,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,20484,1,1,0)
;;=1^90625
;;^UTILITY(U,$J,358.3,20484,1,2,0)
;;=2^Cholera Vacc,Oral
;;^UTILITY(U,$J,358.3,20485,0)
;;=90620^^87^947^11^^^^1
;;^UTILITY(U,$J,358.3,20485,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,20485,1,1,0)
;;=1^90620
;;^UTILITY(U,$J,358.3,20485,1,2,0)
;;=2^Meningococcal Vacc,Protein/Out Mem IM
;;^UTILITY(U,$J,358.3,20486,0)
;;=90621^^87^947^10^^^^1
;;^UTILITY(U,$J,358.3,20486,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,20486,1,1,0)
;;=1^90621
;;^UTILITY(U,$J,358.3,20486,1,2,0)
;;=2^Meningococcal Vacc,Lipoprotein IM
;;^UTILITY(U,$J,358.3,20487,0)
;;=90697^^87^947^2^^^^1
;;^UTILITY(U,$J,358.3,20487,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,20487,1,1,0)
;;=1^90697
;;^UTILITY(U,$J,358.3,20487,1,2,0)
;;=2^DTAP-IPV-Hib-HebB Vacc IM
;;^UTILITY(U,$J,358.3,20488,0)
;;=90686^^87^947^7^^^^1
;;^UTILITY(U,$J,358.3,20488,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,20488,1,1,0)
;;=1^90686
;;^UTILITY(U,$J,358.3,20488,1,2,0)
;;=2^Flu Vacc Sgle Dose Syr (FLUARIX)
;;^UTILITY(U,$J,358.3,20489,0)
;;=90674^^87^947^9^^^^1
;;^UTILITY(U,$J,358.3,20489,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,20489,1,1,0)
;;=1^90674
;;^UTILITY(U,$J,358.3,20489,1,2,0)
;;=2^Flu Vaccine Lo Dose Syr (Flucelvax)
;;^UTILITY(U,$J,358.3,20490,0)
;;=90682^^87^947^5^^^^1
;;^UTILITY(U,$J,358.3,20490,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,20490,1,1,0)
;;=1^90682
;;^UTILITY(U,$J,358.3,20490,1,2,0)
;;=2^Flu Vacc Sgle Dose (Flublok RIV4)
;;^UTILITY(U,$J,358.3,20491,0)
;;=90750^^87^947^14^^^^1
;;^UTILITY(U,$J,358.3,20491,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,20491,1,1,0)
;;=1^90750
;;^UTILITY(U,$J,358.3,20491,1,2,0)
;;=2^Zoster (Shingles) Vaccine-IM
;;^UTILITY(U,$J,358.3,20492,0)
;;=90736^^87^947^15^^^^1
;;^UTILITY(U,$J,358.3,20492,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,20492,1,1,0)
;;=1^90736
;;^UTILITY(U,$J,358.3,20492,1,2,0)
;;=2^Zoster (Shingles) Vaccine-SQ
;;^UTILITY(U,$J,358.3,20493,0)
;;=90653^^87^947^8^^^^1
;;^UTILITY(U,$J,358.3,20493,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,20493,1,1,0)
;;=1^90653
;;^UTILITY(U,$J,358.3,20493,1,2,0)
;;=2^Flu Vacc Sgle Dose Syr (Fluad allV3)
;;^UTILITY(U,$J,358.3,20494,0)
;;=90471^^87^948^1^^^^1
;;^UTILITY(U,$J,358.3,20494,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,20494,1,1,0)
;;=1^90471
;;^UTILITY(U,$J,358.3,20494,1,2,0)
;;=2^Admin of 1 Immunization
;;^UTILITY(U,$J,358.3,20495,0)
;;=90472^^87^948^2^^^^1
;;^UTILITY(U,$J,358.3,20495,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,20495,1,1,0)
;;=1^90472
;;^UTILITY(U,$J,358.3,20495,1,2,0)
;;=2^Admin of Ea Addl Immunization
;;^UTILITY(U,$J,358.3,20496,0)
;;=94664^^87^949^1^^^^1
;;^UTILITY(U,$J,358.3,20496,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,20496,1,1,0)
;;=1^94664
;;^UTILITY(U,$J,358.3,20496,1,2,0)
;;=2^Evaluate Pt Use of Inhaler
;;^UTILITY(U,$J,358.3,20497,0)
;;=36415^^87^950^2^^^^1
;;^UTILITY(U,$J,358.3,20497,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,20497,1,1,0)
;;=1^36415
;;^UTILITY(U,$J,358.3,20497,1,2,0)
;;=2^Routine Venipuncture
;;^UTILITY(U,$J,358.3,20498,0)
;;=36416^^87^950^1^^^^1
;;^UTILITY(U,$J,358.3,20498,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,20498,1,1,0)
;;=1^36416
;;^UTILITY(U,$J,358.3,20498,1,2,0)
;;=2^Finger/Heel/Ear Stick
;;^UTILITY(U,$J,358.3,20499,0)
;;=90887^^87^951^1^^^^1
;;^UTILITY(U,$J,358.3,20499,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,20499,1,1,0)
;;=1^90887
;;^UTILITY(U,$J,358.3,20499,1,2,0)
;;=2^Consultation w/ Family
;;^UTILITY(U,$J,358.3,20500,0)
;;=99510^^87^951^2^^^^1
;;^UTILITY(U,$J,358.3,20500,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,20500,1,1,0)
;;=1^99510
;;^UTILITY(U,$J,358.3,20500,1,2,0)
;;=2^Home Visit-Ind/Fam/Marriage Couns
;;^UTILITY(U,$J,358.3,20501,0)
;;=97602^^87^952^1^^^^1
;;^UTILITY(U,$J,358.3,20501,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,20501,1,1,0)
;;=1^97602
;;^UTILITY(U,$J,358.3,20501,1,2,0)
;;=2^Wound(S) Care And Instruction
;;^UTILITY(U,$J,358.3,20502,0)
;;=51701^^87^953^1^^^^1
;;^UTILITY(U,$J,358.3,20502,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,20502,1,1,0)
;;=1^51701
;;^UTILITY(U,$J,358.3,20502,1,2,0)
;;=2^Insert Bladder Catheter
;;^UTILITY(U,$J,358.3,20503,0)
;;=51702^^87^953^2^^^^1
;;^UTILITY(U,$J,358.3,20503,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,20503,1,1,0)
;;=1^51702
;;^UTILITY(U,$J,358.3,20503,1,2,0)
;;=2^Insert Foley Catheter
;;^UTILITY(U,$J,358.3,20504,0)
;;=86580^^87^954^1^^^^1
;;^UTILITY(U,$J,358.3,20504,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,20504,1,1,0)
;;=1^86580
;;^UTILITY(U,$J,358.3,20504,1,2,0)
;;=2^TB Intradermal Test
;;^UTILITY(U,$J,358.3,20505,0)
;;=99001^^87^955^1^^^^1
;;^UTILITY(U,$J,358.3,20505,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,20505,1,1,0)
;;=1^99001
;;^UTILITY(U,$J,358.3,20505,1,2,0)
;;=2^Specimen Handling
;;^UTILITY(U,$J,358.3,20506,0)
;;=99366^^87^956^1^^^^1
;;^UTILITY(U,$J,358.3,20506,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,20506,1,1,0)
;;=1^99366
;;^UTILITY(U,$J,358.3,20506,1,2,0)
;;=2^Team Conf w/ Pt By HC Pro,30+ Min
;;^UTILITY(U,$J,358.3,20507,0)
;;=99368^^87^956^2^^^^1
;;^UTILITY(U,$J,358.3,20507,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,20507,1,1,0)
;;=1^99368
;;^UTILITY(U,$J,358.3,20507,1,2,0)
;;=2^Team Conf w/o Pt by Nonphys,30+ Min
;;^UTILITY(U,$J,358.3,20508,0)
;;=99503^^87^957^5^^^^1
;;^UTILITY(U,$J,358.3,20508,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,20508,1,1,0)
;;=1^99503
;;^UTILITY(U,$J,358.3,20508,1,2,0)
;;=2^Home Visit-Respiratory Tx Care
;;^UTILITY(U,$J,358.3,20509,0)
;;=99504^^87^957^4^^^^1
;;^UTILITY(U,$J,358.3,20509,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,20509,1,1,0)
;;=1^99504
;;^UTILITY(U,$J,358.3,20509,1,2,0)
;;=2^Home Visit-Mech Ventilator Care
;;^UTILITY(U,$J,358.3,20510,0)
;;=99507^^87^957^1^^^^1
;;^UTILITY(U,$J,358.3,20510,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,20510,1,1,0)
;;=1^99507
;;^UTILITY(U,$J,358.3,20510,1,2,0)
;;=2^Home Visit-Cath Maintenance
;;^UTILITY(U,$J,358.3,20511,0)
;;=99511^^87^957^2^^^^1
;;^UTILITY(U,$J,358.3,20511,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,20511,1,1,0)
;;=1^99511
;;^UTILITY(U,$J,358.3,20511,1,2,0)
;;=2^Home Visit-Fecal/Enema Mgmt
;;^UTILITY(U,$J,358.3,20512,0)
;;=99505^^87^957^6^^^^1
;;^UTILITY(U,$J,358.3,20512,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,20512,1,1,0)
;;=1^99505
;;^UTILITY(U,$J,358.3,20512,1,2,0)
;;=2^Home Visit-Stoma Care
;;^UTILITY(U,$J,358.3,20513,0)
;;=99512^^87^957^3^^^^1
;;^UTILITY(U,$J,358.3,20513,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,20513,1,1,0)
;;=1^99512
;;^UTILITY(U,$J,358.3,20513,1,2,0)
;;=2^Home Visit-Hemodialysis
;;^UTILITY(U,$J,358.3,20514,0)
;;=99601^^87^958^1^^^^1
;;^UTILITY(U,$J,358.3,20514,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,20514,1,1,0)
;;=1^99601
;;^UTILITY(U,$J,358.3,20514,1,2,0)
;;=2^Home Infsn,Up to 2 hrs
;;^UTILITY(U,$J,358.3,20515,0)
;;=99602^^87^958^2^^^^1
;;^UTILITY(U,$J,358.3,20515,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,20515,1,1,0)
;;=1^99602
;;^UTILITY(U,$J,358.3,20515,1,2,0)
;;=2^Home Infsn,Ea Addl Hr
;;^UTILITY(U,$J,358.3,20516,0)
;;=G0496^^87^959^1^^^^1
;;^UTILITY(U,$J,358.3,20516,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,20516,1,1,0)
;;=1^G0496
;;^UTILITY(U,$J,358.3,20516,1,2,0)
;;=2^HHC ED/TRAIN BY LPN,EA 15 min
;;^UTILITY(U,$J,358.3,20517,0)
;;=G0495^^87^959^2^^^^1
;;^UTILITY(U,$J,358.3,20517,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,20517,1,1,0)
;;=1^G0495
;;^UTILITY(U,$J,358.3,20517,1,2,0)
;;=2^HHC ED/TRAIN BY RN,EA 15 min
;;^UTILITY(U,$J,358.3,20518,0)
;;=G0494^^87^959^3^^^^1
;;^UTILITY(U,$J,358.3,20518,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,20518,1,1,0)
;;=1^G0494
;;^UTILITY(U,$J,358.3,20518,1,2,0)
;;=2^HHC LPN OBS/ASSSESS EA 15 min
;;^UTILITY(U,$J,358.3,20519,0)
;;=G0162^^87^959^4^^^^1
;;^UTILITY(U,$J,358.3,20519,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,20519,1,1,0)
;;=1^G0162
;;^UTILITY(U,$J,358.3,20519,1,2,0)
;;=2^HHC RN E&M PLAN SVS, 15 min
;;^UTILITY(U,$J,358.3,20520,0)
;;=G0493^^87^959^5^^^^1
;;^UTILITY(U,$J,358.3,20520,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,20520,1,1,0)
;;=1^G0493
;;^UTILITY(U,$J,358.3,20520,1,2,0)
;;=2^HHC RN OBS/ASSESS EA 15 min
;;^UTILITY(U,$J,358.3,20521,0)
;;=G0300^^87^959^6^^^^1
;;^UTILITY(U,$J,358.3,20521,1,0)
;;=^358.31IA^2^2
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HIBDEI08G 19762 printed Jan 14, 2021@17:30:56 Page 2
IBDEI08G ; ; 28-OCT-2020
+1 ;;3.0;IB ENCOUNTER FORM IMP/EXP;;OCT 28, 2020
+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,20438,1,2,0)
+2 ;;=2^MENINGOCOCCAL VACCINE SQ
+3 ;;^UTILITY(U,$J,358.3,20438,1,3,0)
+4 ;;=3^90733
+5 ;;^UTILITY(U,$J,358.3,20439,0)
+6 ;;=90621^^86^934^19^^^^1
+7 ;;^UTILITY(U,$J,358.3,20439,1,0)
+8 ;;=^358.31IA^3^2
+9 ;;^UTILITY(U,$J,358.3,20439,1,2,0)
+10 ;;=2^MENINGOCOCCAL VACCINE,LIPOPROTEIN IM
+11 ;;^UTILITY(U,$J,358.3,20439,1,3,0)
+12 ;;=3^90621
+13 ;;^UTILITY(U,$J,358.3,20440,0)
+14 ;;=90620^^86^934^20^^^^1
+15 ;;^UTILITY(U,$J,358.3,20440,1,0)
+16 ;;=^358.31IA^3^2
+17 ;;^UTILITY(U,$J,358.3,20440,1,2,0)
+18 ;;=2^MENINGOCOCCAL VACCINE,PROTEIN/OUT MEM IM
+19 ;;^UTILITY(U,$J,358.3,20440,1,3,0)
+20 ;;=3^90620
+21 ;;^UTILITY(U,$J,358.3,20441,0)
+22 ;;=90713^^86^934^23^^^^1
+23 ;;^UTILITY(U,$J,358.3,20441,1,0)
+24 ;;=^358.31IA^3^2
+25 ;;^UTILITY(U,$J,358.3,20441,1,2,0)
+26 ;;=2^POLIOVIRUS,IPV SC/IM
+27 ;;^UTILITY(U,$J,358.3,20441,1,3,0)
+28 ;;=3^90713
+29 ;;^UTILITY(U,$J,358.3,20442,0)
+30 ;;=90715^^86^934^26^^^^1
+31 ;;^UTILITY(U,$J,358.3,20442,1,0)
+32 ;;=^358.31IA^3^2
+33 ;;^UTILITY(U,$J,358.3,20442,1,2,0)
+34 ;;=2^TDAP VACCINE
+35 ;;^UTILITY(U,$J,358.3,20442,1,3,0)
+36 ;;=3^90715
+37 ;;^UTILITY(U,$J,358.3,20443,0)
+38 ;;=90691^^86^934^27^^^^1
+39 ;;^UTILITY(U,$J,358.3,20443,1,0)
+40 ;;=^358.31IA^3^2
+41 ;;^UTILITY(U,$J,358.3,20443,1,2,0)
+42 ;;=2^TYPHOID VACCINE IM
+43 ;;^UTILITY(U,$J,358.3,20443,1,3,0)
+44 ;;=3^90691
+45 ;;^UTILITY(U,$J,358.3,20444,0)
+46 ;;=90716^^86^934^28^^^^1
+47 ;;^UTILITY(U,$J,358.3,20444,1,0)
+48 ;;=^358.31IA^3^2
+49 ;;^UTILITY(U,$J,358.3,20444,1,2,0)
+50 ;;=2^VARIVAX (CHICKEN POX) VACCINE
+51 ;;^UTILITY(U,$J,358.3,20444,1,3,0)
+52 ;;=3^90716
+53 ;;^UTILITY(U,$J,358.3,20445,0)
+54 ;;=96160^^86^935^4^^^^1
+55 ;;^UTILITY(U,$J,358.3,20445,1,0)
+56 ;;=^358.31IA^3^2
+57 ;;^UTILITY(U,$J,358.3,20445,1,2,0)
+58 ;;=2^HLTH RISK ASSESSMENT,PT FOCUSED
+59 ;;^UTILITY(U,$J,358.3,20445,1,3,0)
+60 ;;=3^96160
+61 ;;^UTILITY(U,$J,358.3,20446,0)
+62 ;;=96161^^86^935^3^^^^1
+63 ;;^UTILITY(U,$J,358.3,20446,1,0)
+64 ;;=^358.31IA^3^2
+65 ;;^UTILITY(U,$J,358.3,20446,1,2,0)
+66 ;;=2^HLTH RISK ASSESSMENT,CAREGIVR FOCUSED
+67 ;;^UTILITY(U,$J,358.3,20446,1,3,0)
+68 ;;=3^96161
+69 ;;^UTILITY(U,$J,358.3,20447,0)
+70 ;;=96110^^86^935^2^^^^1
+71 ;;^UTILITY(U,$J,358.3,20447,1,0)
+72 ;;=^358.31IA^3^2
+73 ;;^UTILITY(U,$J,358.3,20447,1,2,0)
+74 ;;=2^DEVELOPMENTAL SCREEN W/ SCORE
+75 ;;^UTILITY(U,$J,358.3,20447,1,3,0)
+76 ;;=3^96110
+77 ;;^UTILITY(U,$J,358.3,20448,0)
+78 ;;=96127^^86^935^1^^^^1
+79 ;;^UTILITY(U,$J,358.3,20448,1,0)
+80 ;;=^358.31IA^3^2
+81 ;;^UTILITY(U,$J,358.3,20448,1,2,0)
+82 ;;=2^BRIEF EMOTIONAL/BEHAV ASSESSMENT
+83 ;;^UTILITY(U,$J,358.3,20448,1,3,0)
+84 ;;=3^96127
+85 ;;^UTILITY(U,$J,358.3,20449,0)
+86 ;;=86485^^86^936^1^^^^1
+87 ;;^UTILITY(U,$J,358.3,20449,1,0)
+88 ;;=^358.31IA^3^2
+89 ;;^UTILITY(U,$J,358.3,20449,1,2,0)
+90 ;;=2^CANDIDA
+91 ;;^UTILITY(U,$J,358.3,20449,1,3,0)
+92 ;;=3^86485
+93 ;;^UTILITY(U,$J,358.3,20450,0)
+94 ;;=86486^^86^936^4^^^^1
+95 ;;^UTILITY(U,$J,358.3,20450,1,0)
+96 ;;=^358.31IA^3^2
+97 ;;^UTILITY(U,$J,358.3,20450,1,2,0)
+98 ;;=2^MUMPS
+99 ;;^UTILITY(U,$J,358.3,20450,1,3,0)
+100 ;;=3^86486
+101 ;;^UTILITY(U,$J,358.3,20451,0)
+102 ;;=86580^^86^936^5^^^^1
+103 ;;^UTILITY(U,$J,358.3,20451,1,0)
+104 ;;=^358.31IA^3^2
+105 ;;^UTILITY(U,$J,358.3,20451,1,2,0)
+106 ;;=2^TB
+107 ;;^UTILITY(U,$J,358.3,20451,1,3,0)
+108 ;;=3^86580
+109 ;;^UTILITY(U,$J,358.3,20452,0)
+110 ;;=95024^^86^936^3^^^^1
+111 ;;^UTILITY(U,$J,358.3,20452,1,0)
+112 ;;=^358.31IA^3^2
+113 ;;^UTILITY(U,$J,358.3,20452,1,2,0)
+114 ;;=2^INTRADERMALS (EACH)
+115 ;;^UTILITY(U,$J,358.3,20452,1,3,0)
+116 ;;=3^95024
+117 ;;^UTILITY(U,$J,358.3,20453,0)
+118 ;;=86510^^86^936^2^^^^1
+119 ;;^UTILITY(U,$J,358.3,20453,1,0)
+120 ;;=^358.31IA^3^2
+121 ;;^UTILITY(U,$J,358.3,20453,1,2,0)
+122 ;;=2^HISTOPLASMOSIS
+123 ;;^UTILITY(U,$J,358.3,20453,1,3,0)
+124 ;;=3^86510
+125 ;;^UTILITY(U,$J,358.3,20454,0)
+126 ;;=99395^^86^937^1^^^^1
+127 ;;^UTILITY(U,$J,358.3,20454,1,0)
+128 ;;=^358.31IA^3^2
+129 ;;^UTILITY(U,$J,358.3,20454,1,2,0)
+130 ;;=2^PREVENTIVE MED,EST PT 18-39
+131 ;;^UTILITY(U,$J,358.3,20454,1,3,0)
+132 ;;=3^99395
+133 ;;^UTILITY(U,$J,358.3,20455,0)
+134 ;;=99396^^86^937^2^^^^1
+135 ;;^UTILITY(U,$J,358.3,20455,1,0)
+136 ;;=^358.31IA^3^2
+137 ;;^UTILITY(U,$J,358.3,20455,1,2,0)
+138 ;;=2^PREVENTIVE MED,EST PT 40-64
+139 ;;^UTILITY(U,$J,358.3,20455,1,3,0)
+140 ;;=3^99396
+141 ;;^UTILITY(U,$J,358.3,20456,0)
+142 ;;=99397^^86^937^3^^^^1
+143 ;;^UTILITY(U,$J,358.3,20456,1,0)
+144 ;;=^358.31IA^3^2
+145 ;;^UTILITY(U,$J,358.3,20456,1,2,0)
+146 ;;=2^PREVENTIVE MED,EST PT > 64
+147 ;;^UTILITY(U,$J,358.3,20456,1,3,0)
+148 ;;=3^99397
+149 ;;^UTILITY(U,$J,358.3,20457,0)
+150 ;;=99385^^86^938^1^^^^1
+151 ;;^UTILITY(U,$J,358.3,20457,1,0)
+152 ;;=^358.31IA^3^2
+153 ;;^UTILITY(U,$J,358.3,20457,1,2,0)
+154 ;;=2^PREVENTIVE MED,NEW PT 18-39
+155 ;;^UTILITY(U,$J,358.3,20457,1,3,0)
+156 ;;=3^99385
+157 ;;^UTILITY(U,$J,358.3,20458,0)
+158 ;;=99386^^86^938^2^^^^1
+159 ;;^UTILITY(U,$J,358.3,20458,1,0)
+160 ;;=^358.31IA^3^2
+161 ;;^UTILITY(U,$J,358.3,20458,1,2,0)
+162 ;;=2^PREVENTIVE MED,NEW PT 40-64
+163 ;;^UTILITY(U,$J,358.3,20458,1,3,0)
+164 ;;=3^99386
+165 ;;^UTILITY(U,$J,358.3,20459,0)
+166 ;;=99387^^86^938^3^^^^1
+167 ;;^UTILITY(U,$J,358.3,20459,1,0)
+168 ;;=^358.31IA^3^2
+169 ;;^UTILITY(U,$J,358.3,20459,1,2,0)
+170 ;;=2^PREVENTIVE MED,NEW PT > 64
+171 ;;^UTILITY(U,$J,358.3,20459,1,3,0)
+172 ;;=3^99387
+173 ;;^UTILITY(U,$J,358.3,20460,0)
+174 ;;=99497^^86^939^1^^^^1
+175 ;;^UTILITY(U,$J,358.3,20460,1,0)
+176 ;;=^358.31IA^3^2
+177 ;;^UTILITY(U,$J,358.3,20460,1,2,0)
+178 ;;=2^ADVANCED CARE PLAN,30 MIN
+179 ;;^UTILITY(U,$J,358.3,20460,1,3,0)
+180 ;;=3^99497
+181 ;;^UTILITY(U,$J,358.3,20461,0)
+182 ;;=99498^^86^939^2^^^^1
+183 ;;^UTILITY(U,$J,358.3,20461,1,0)
+184 ;;=^358.31IA^3^2
+185 ;;^UTILITY(U,$J,358.3,20461,1,2,0)
+186 ;;=2^ADVANCED CARE PLAN,EA ADDL 30 MIN
+187 ;;^UTILITY(U,$J,358.3,20461,1,3,0)
+188 ;;=3^99498
+189 ;;^UTILITY(U,$J,358.3,20462,0)
+190 ;;=90471^^86^940^1^^^^1
+191 ;;^UTILITY(U,$J,358.3,20462,1,0)
+192 ;;=^358.31IA^3^2
+193 ;;^UTILITY(U,$J,358.3,20462,1,2,0)
+194 ;;=2^IMMUNIZATION ADMIN,1 VACCINE
+195 ;;^UTILITY(U,$J,358.3,20462,1,3,0)
+196 ;;=3^90471
+197 ;;^UTILITY(U,$J,358.3,20463,0)
+198 ;;=90472^^86^940^2^^^^1
+199 ;;^UTILITY(U,$J,358.3,20463,1,0)
+200 ;;=^358.31IA^3^2
+201 ;;^UTILITY(U,$J,358.3,20463,1,2,0)
+202 ;;=2^IMMUNIZATION ADMIN,EA ADDL VACCINE
+203 ;;^UTILITY(U,$J,358.3,20463,1,3,0)
+204 ;;=3^90472
+205 ;;^UTILITY(U,$J,358.3,20464,0)
+206 ;;=99340^^86^941^2^^^^1
+207 ;;^UTILITY(U,$J,358.3,20464,1,0)
+208 ;;=^358.31IA^3^2
+209 ;;^UTILITY(U,$J,358.3,20464,1,2,0)
+210 ;;=2^PHYS SUPV OF PT IN HOME/DOM/R-HOME,30+ MIN
+211 ;;^UTILITY(U,$J,358.3,20464,1,3,0)
+212 ;;=3^99340
+213 ;;^UTILITY(U,$J,358.3,20465,0)
+214 ;;=99375^^86^941^1^^^^1
+215 ;;^UTILITY(U,$J,358.3,20465,1,0)
+216 ;;=^358.31IA^3^2
+217 ;;^UTILITY(U,$J,358.3,20465,1,2,0)
+218 ;;=2^HOME HEALTH CARE SUPERVISION,30 + MIN
+219 ;;^UTILITY(U,$J,358.3,20465,1,3,0)
+220 ;;=3^99375
+221 ;;^UTILITY(U,$J,358.3,20466,0)
+222 ;;=94760^^87^942^1^^^^1
+223 ;;^UTILITY(U,$J,358.3,20466,1,0)
+224 ;;=^358.31IA^2^2
+225 ;;^UTILITY(U,$J,358.3,20466,1,1,0)
+226 ;;=1^94760
+227 ;;^UTILITY(U,$J,358.3,20466,1,2,0)
+228 ;;=2^Noninvasive Ear/Pulse Oximetry
+229 ;;^UTILITY(U,$J,358.3,20467,0)
+230 ;;=93770^^87^943^1^^^^1
+231 ;;^UTILITY(U,$J,358.3,20467,1,0)
+232 ;;=^358.31IA^2^2
+233 ;;^UTILITY(U,$J,358.3,20467,1,1,0)
+234 ;;=1^93770
+235 ;;^UTILITY(U,$J,358.3,20467,1,2,0)
+236 ;;=2^Venous Blood Pressure Reading
+237 ;;^UTILITY(U,$J,358.3,20468,0)
+238 ;;=97535^^87^944^2^^^^1
+239 ;;^UTILITY(U,$J,358.3,20468,1,0)
+240 ;;=^358.31IA^2^2
+241 ;;^UTILITY(U,$J,358.3,20468,1,1,0)
+242 ;;=1^97535
+243 ;;^UTILITY(U,$J,358.3,20468,1,2,0)
+244 ;;=2^Self-Care Mgmt Train per 15 Min
+245 ;;^UTILITY(U,$J,358.3,20469,0)
+246 ;;=99509^^87^944^1^^^^1
+247 ;;^UTILITY(U,$J,358.3,20469,1,0)
+248 ;;=^358.31IA^2^2
+249 ;;^UTILITY(U,$J,358.3,20469,1,1,0)
+250 ;;=1^99509
+251 ;;^UTILITY(U,$J,358.3,20469,1,2,0)
+252 ;;=2^Home Visit-ADL/Personal Care
+253 ;;^UTILITY(U,$J,358.3,20470,0)
+254 ;;=J3420^^87^945^7^^^^1
+255 ;;^UTILITY(U,$J,358.3,20470,1,0)
+256 ;;=^358.31IA^2^2
+257 ;;^UTILITY(U,$J,358.3,20470,1,1,0)
+258 ;;=1^J3420
+259 ;;^UTILITY(U,$J,358.3,20470,1,2,0)
+260 ;;=2^Vitamin B12,Up To 1000Mcg
+261 ;;^UTILITY(U,$J,358.3,20471,0)
+262 ;;=J0885^^87^945^3^^^^1
+263 ;;^UTILITY(U,$J,358.3,20471,1,0)
+264 ;;=^358.31IA^2^2
+265 ;;^UTILITY(U,$J,358.3,20471,1,1,0)
+266 ;;=1^J0885
+267 ;;^UTILITY(U,$J,358.3,20471,1,2,0)
+268 ;;=2^Epojen, Non-Esrd,1000U
+269 ;;^UTILITY(U,$J,358.3,20472,0)
+270 ;;=J2680^^87^945^4^^^^1
+271 ;;^UTILITY(U,$J,358.3,20472,1,0)
+272 ;;=^358.31IA^2^2
+273 ;;^UTILITY(U,$J,358.3,20472,1,1,0)
+274 ;;=1^J2680
+275 ;;^UTILITY(U,$J,358.3,20472,1,2,0)
+276 ;;=2^Fluphenazine Decanoate 25mg
+277 ;;^UTILITY(U,$J,358.3,20473,0)
+278 ;;=J0881^^87^945^2^^^^1
+279 ;;^UTILITY(U,$J,358.3,20473,1,0)
+280 ;;=^358.31IA^2^2
+281 ;;^UTILITY(U,$J,358.3,20473,1,1,0)
+282 ;;=1^J0881
+283 ;;^UTILITY(U,$J,358.3,20473,1,2,0)
+284 ;;=2^Darbepoetin Alfa (Non-Esrd) 1Mcg
+285 ;;^UTILITY(U,$J,358.3,20474,0)
+286 ;;=J0882^^87^945^1^^^^1
+287 ;;^UTILITY(U,$J,358.3,20474,1,0)
+288 ;;=^358.31IA^2^2
+289 ;;^UTILITY(U,$J,358.3,20474,1,1,0)
+290 ;;=1^J0882
+291 ;;^UTILITY(U,$J,358.3,20474,1,2,0)
+292 ;;=2^Darbepoetin Alfa (Esrd) 1Mcg
+293 ;;^UTILITY(U,$J,358.3,20475,0)
+294 ;;=J1071^^87^945^5^^^^1
+295 ;;^UTILITY(U,$J,358.3,20475,1,0)
+296 ;;=^358.31IA^2^2
+297 ;;^UTILITY(U,$J,358.3,20475,1,1,0)
+298 ;;=1^J1071
+299 ;;^UTILITY(U,$J,358.3,20475,1,2,0)
+300 ;;=2^Testosterone Cypionate 1mg
+301 ;;^UTILITY(U,$J,358.3,20476,0)
+302 ;;=J3121^^87^945^6^^^^1
+303 ;;^UTILITY(U,$J,358.3,20476,1,0)
+304 ;;=^358.31IA^2^2
+305 ;;^UTILITY(U,$J,358.3,20476,1,1,0)
+306 ;;=1^J3121
+307 ;;^UTILITY(U,$J,358.3,20476,1,2,0)
+308 ;;=2^Testosterone Enanthate 1mg
+309 ;;^UTILITY(U,$J,358.3,20477,0)
+310 ;;=96372^^87^946^2^^^^1
+311 ;;^UTILITY(U,$J,358.3,20477,1,0)
+312 ;;=^358.31IA^2^2
+313 ;;^UTILITY(U,$J,358.3,20477,1,1,0)
+314 ;;=1^96372
+315 ;;^UTILITY(U,$J,358.3,20477,1,2,0)
+316 ;;=2^Ther/Proph/Diag Inj,SC/IM
+317 ;;^UTILITY(U,$J,358.3,20478,0)
+318 ;;=99506^^87^946^1^^^^1
+319 ;;^UTILITY(U,$J,358.3,20478,1,0)
+320 ;;=^358.31IA^2^2
+321 ;;^UTILITY(U,$J,358.3,20478,1,1,0)
+322 ;;=1^99506
+323 ;;^UTILITY(U,$J,358.3,20478,1,2,0)
+324 ;;=2^Home Visit-IM Injection
+325 ;;^UTILITY(U,$J,358.3,20479,0)
+326 ;;=90658^^87^947^4^^^^1
+327 ;;^UTILITY(U,$J,358.3,20479,1,0)
+328 ;;=^358.31IA^2^2
+329 ;;^UTILITY(U,$J,358.3,20479,1,1,0)
+330 ;;=1^90658
+331 ;;^UTILITY(U,$J,358.3,20479,1,2,0)
+332 ;;=2^Flu Vacc Multi Dose Vials (AFLURIA)
+333 ;;^UTILITY(U,$J,358.3,20480,0)
+334 ;;=90732^^87^947^12^^^^1
+335 ;;^UTILITY(U,$J,358.3,20480,1,0)
+336 ;;=^358.31IA^2^2
+337 ;;^UTILITY(U,$J,358.3,20480,1,1,0)
+338 ;;=1^90732
+339 ;;^UTILITY(U,$J,358.3,20480,1,2,0)
+340 ;;=2^Pneumovax 23 (Pneumococcal Vaccine)
+341 ;;^UTILITY(U,$J,358.3,20481,0)
+342 ;;=90656^^87^947^6^^^^1
+343 ;;^UTILITY(U,$J,358.3,20481,1,0)
+344 ;;=^358.31IA^2^2
+345 ;;^UTILITY(U,$J,358.3,20481,1,1,0)
+346 ;;=1^90656
+347 ;;^UTILITY(U,$J,358.3,20481,1,2,0)
+348 ;;=2^Flu Vacc Sgle Dose Syr (Afluria)
+349 ;;^UTILITY(U,$J,358.3,20482,0)
+350 ;;=90662^^87^947^3^^^^1
+351 ;;^UTILITY(U,$J,358.3,20482,1,0)
+352 ;;=^358.31IA^2^2
+353 ;;^UTILITY(U,$J,358.3,20482,1,1,0)
+354 ;;=1^90662
+355 ;;^UTILITY(U,$J,358.3,20482,1,2,0)
+356 ;;=2^Flu Vacc High Dose Syr (Fluzone)
+357 ;;^UTILITY(U,$J,358.3,20483,0)
+358 ;;=90670^^87^947^13^^^^1
+359 ;;^UTILITY(U,$J,358.3,20483,1,0)
+360 ;;=^358.31IA^2^2
+361 ;;^UTILITY(U,$J,358.3,20483,1,1,0)
+362 ;;=1^90670
+363 ;;^UTILITY(U,$J,358.3,20483,1,2,0)
+364 ;;=2^Prevnar 13 (Pneumococcal Vaccine)
+365 ;;^UTILITY(U,$J,358.3,20484,0)
+366 ;;=90625^^87^947^1^^^^1
+367 ;;^UTILITY(U,$J,358.3,20484,1,0)
+368 ;;=^358.31IA^2^2
+369 ;;^UTILITY(U,$J,358.3,20484,1,1,0)
+370 ;;=1^90625
+371 ;;^UTILITY(U,$J,358.3,20484,1,2,0)
+372 ;;=2^Cholera Vacc,Oral
+373 ;;^UTILITY(U,$J,358.3,20485,0)
+374 ;;=90620^^87^947^11^^^^1
+375 ;;^UTILITY(U,$J,358.3,20485,1,0)
+376 ;;=^358.31IA^2^2
+377 ;;^UTILITY(U,$J,358.3,20485,1,1,0)
+378 ;;=1^90620
+379 ;;^UTILITY(U,$J,358.3,20485,1,2,0)
+380 ;;=2^Meningococcal Vacc,Protein/Out Mem IM
+381 ;;^UTILITY(U,$J,358.3,20486,0)
+382 ;;=90621^^87^947^10^^^^1
+383 ;;^UTILITY(U,$J,358.3,20486,1,0)
+384 ;;=^358.31IA^2^2
+385 ;;^UTILITY(U,$J,358.3,20486,1,1,0)
+386 ;;=1^90621
+387 ;;^UTILITY(U,$J,358.3,20486,1,2,0)
+388 ;;=2^Meningococcal Vacc,Lipoprotein IM
+389 ;;^UTILITY(U,$J,358.3,20487,0)
+390 ;;=90697^^87^947^2^^^^1
+391 ;;^UTILITY(U,$J,358.3,20487,1,0)
+392 ;;=^358.31IA^2^2
+393 ;;^UTILITY(U,$J,358.3,20487,1,1,0)
+394 ;;=1^90697
+395 ;;^UTILITY(U,$J,358.3,20487,1,2,0)
+396 ;;=2^DTAP-IPV-Hib-HebB Vacc IM
+397 ;;^UTILITY(U,$J,358.3,20488,0)
+398 ;;=90686^^87^947^7^^^^1
+399 ;;^UTILITY(U,$J,358.3,20488,1,0)
+400 ;;=^358.31IA^2^2
+401 ;;^UTILITY(U,$J,358.3,20488,1,1,0)
+402 ;;=1^90686
+403 ;;^UTILITY(U,$J,358.3,20488,1,2,0)
+404 ;;=2^Flu Vacc Sgle Dose Syr (FLUARIX)
+405 ;;^UTILITY(U,$J,358.3,20489,0)
+406 ;;=90674^^87^947^9^^^^1
+407 ;;^UTILITY(U,$J,358.3,20489,1,0)
+408 ;;=^358.31IA^2^2
+409 ;;^UTILITY(U,$J,358.3,20489,1,1,0)
+410 ;;=1^90674
+411 ;;^UTILITY(U,$J,358.3,20489,1,2,0)
+412 ;;=2^Flu Vaccine Lo Dose Syr (Flucelvax)
+413 ;;^UTILITY(U,$J,358.3,20490,0)
+414 ;;=90682^^87^947^5^^^^1
+415 ;;^UTILITY(U,$J,358.3,20490,1,0)
+416 ;;=^358.31IA^2^2
+417 ;;^UTILITY(U,$J,358.3,20490,1,1,0)
+418 ;;=1^90682
+419 ;;^UTILITY(U,$J,358.3,20490,1,2,0)
+420 ;;=2^Flu Vacc Sgle Dose (Flublok RIV4)
+421 ;;^UTILITY(U,$J,358.3,20491,0)
+422 ;;=90750^^87^947^14^^^^1
+423 ;;^UTILITY(U,$J,358.3,20491,1,0)
+424 ;;=^358.31IA^2^2
+425 ;;^UTILITY(U,$J,358.3,20491,1,1,0)
+426 ;;=1^90750
+427 ;;^UTILITY(U,$J,358.3,20491,1,2,0)
+428 ;;=2^Zoster (Shingles) Vaccine-IM
+429 ;;^UTILITY(U,$J,358.3,20492,0)
+430 ;;=90736^^87^947^15^^^^1
+431 ;;^UTILITY(U,$J,358.3,20492,1,0)
+432 ;;=^358.31IA^2^2
+433 ;;^UTILITY(U,$J,358.3,20492,1,1,0)
+434 ;;=1^90736
+435 ;;^UTILITY(U,$J,358.3,20492,1,2,0)
+436 ;;=2^Zoster (Shingles) Vaccine-SQ
+437 ;;^UTILITY(U,$J,358.3,20493,0)
+438 ;;=90653^^87^947^8^^^^1
+439 ;;^UTILITY(U,$J,358.3,20493,1,0)
+440 ;;=^358.31IA^2^2
+441 ;;^UTILITY(U,$J,358.3,20493,1,1,0)
+442 ;;=1^90653
+443 ;;^UTILITY(U,$J,358.3,20493,1,2,0)
+444 ;;=2^Flu Vacc Sgle Dose Syr (Fluad allV3)
+445 ;;^UTILITY(U,$J,358.3,20494,0)
+446 ;;=90471^^87^948^1^^^^1
+447 ;;^UTILITY(U,$J,358.3,20494,1,0)
+448 ;;=^358.31IA^2^2
+449 ;;^UTILITY(U,$J,358.3,20494,1,1,0)
+450 ;;=1^90471
+451 ;;^UTILITY(U,$J,358.3,20494,1,2,0)
+452 ;;=2^Admin of 1 Immunization
+453 ;;^UTILITY(U,$J,358.3,20495,0)
+454 ;;=90472^^87^948^2^^^^1
+455 ;;^UTILITY(U,$J,358.3,20495,1,0)
+456 ;;=^358.31IA^2^2
+457 ;;^UTILITY(U,$J,358.3,20495,1,1,0)
+458 ;;=1^90472
+459 ;;^UTILITY(U,$J,358.3,20495,1,2,0)
+460 ;;=2^Admin of Ea Addl Immunization
+461 ;;^UTILITY(U,$J,358.3,20496,0)
+462 ;;=94664^^87^949^1^^^^1
+463 ;;^UTILITY(U,$J,358.3,20496,1,0)
+464 ;;=^358.31IA^2^2
+465 ;;^UTILITY(U,$J,358.3,20496,1,1,0)
+466 ;;=1^94664
+467 ;;^UTILITY(U,$J,358.3,20496,1,2,0)
+468 ;;=2^Evaluate Pt Use of Inhaler
+469 ;;^UTILITY(U,$J,358.3,20497,0)
+470 ;;=36415^^87^950^2^^^^1
+471 ;;^UTILITY(U,$J,358.3,20497,1,0)
+472 ;;=^358.31IA^2^2
+473 ;;^UTILITY(U,$J,358.3,20497,1,1,0)
+474 ;;=1^36415
+475 ;;^UTILITY(U,$J,358.3,20497,1,2,0)
+476 ;;=2^Routine Venipuncture
+477 ;;^UTILITY(U,$J,358.3,20498,0)
+478 ;;=36416^^87^950^1^^^^1
+479 ;;^UTILITY(U,$J,358.3,20498,1,0)
+480 ;;=^358.31IA^2^2
+481 ;;^UTILITY(U,$J,358.3,20498,1,1,0)
+482 ;;=1^36416
+483 ;;^UTILITY(U,$J,358.3,20498,1,2,0)
+484 ;;=2^Finger/Heel/Ear Stick
+485 ;;^UTILITY(U,$J,358.3,20499,0)
+486 ;;=90887^^87^951^1^^^^1
+487 ;;^UTILITY(U,$J,358.3,20499,1,0)
+488 ;;=^358.31IA^2^2
+489 ;;^UTILITY(U,$J,358.3,20499,1,1,0)
+490 ;;=1^90887
+491 ;;^UTILITY(U,$J,358.3,20499,1,2,0)
+492 ;;=2^Consultation w/ Family
+493 ;;^UTILITY(U,$J,358.3,20500,0)
+494 ;;=99510^^87^951^2^^^^1
+495 ;;^UTILITY(U,$J,358.3,20500,1,0)
+496 ;;=^358.31IA^2^2
+497 ;;^UTILITY(U,$J,358.3,20500,1,1,0)
+498 ;;=1^99510
+499 ;;^UTILITY(U,$J,358.3,20500,1,2,0)
+500 ;;=2^Home Visit-Ind/Fam/Marriage Couns
+501 ;;^UTILITY(U,$J,358.3,20501,0)
+502 ;;=97602^^87^952^1^^^^1
+503 ;;^UTILITY(U,$J,358.3,20501,1,0)
+504 ;;=^358.31IA^2^2
+505 ;;^UTILITY(U,$J,358.3,20501,1,1,0)
+506 ;;=1^97602
+507 ;;^UTILITY(U,$J,358.3,20501,1,2,0)
+508 ;;=2^Wound(S) Care And Instruction
+509 ;;^UTILITY(U,$J,358.3,20502,0)
+510 ;;=51701^^87^953^1^^^^1
+511 ;;^UTILITY(U,$J,358.3,20502,1,0)
+512 ;;=^358.31IA^2^2
+513 ;;^UTILITY(U,$J,358.3,20502,1,1,0)
+514 ;;=1^51701
+515 ;;^UTILITY(U,$J,358.3,20502,1,2,0)
+516 ;;=2^Insert Bladder Catheter
+517 ;;^UTILITY(U,$J,358.3,20503,0)
+518 ;;=51702^^87^953^2^^^^1
+519 ;;^UTILITY(U,$J,358.3,20503,1,0)
+520 ;;=^358.31IA^2^2
+521 ;;^UTILITY(U,$J,358.3,20503,1,1,0)
+522 ;;=1^51702
+523 ;;^UTILITY(U,$J,358.3,20503,1,2,0)
+524 ;;=2^Insert Foley Catheter
+525 ;;^UTILITY(U,$J,358.3,20504,0)
+526 ;;=86580^^87^954^1^^^^1
+527 ;;^UTILITY(U,$J,358.3,20504,1,0)
+528 ;;=^358.31IA^2^2
+529 ;;^UTILITY(U,$J,358.3,20504,1,1,0)
+530 ;;=1^86580
+531 ;;^UTILITY(U,$J,358.3,20504,1,2,0)
+532 ;;=2^TB Intradermal Test
+533 ;;^UTILITY(U,$J,358.3,20505,0)
+534 ;;=99001^^87^955^1^^^^1
+535 ;;^UTILITY(U,$J,358.3,20505,1,0)
+536 ;;=^358.31IA^2^2
+537 ;;^UTILITY(U,$J,358.3,20505,1,1,0)
+538 ;;=1^99001
+539 ;;^UTILITY(U,$J,358.3,20505,1,2,0)
+540 ;;=2^Specimen Handling
+541 ;;^UTILITY(U,$J,358.3,20506,0)
+542 ;;=99366^^87^956^1^^^^1
+543 ;;^UTILITY(U,$J,358.3,20506,1,0)
+544 ;;=^358.31IA^2^2
+545 ;;^UTILITY(U,$J,358.3,20506,1,1,0)
+546 ;;=1^99366
+547 ;;^UTILITY(U,$J,358.3,20506,1,2,0)
+548 ;;=2^Team Conf w/ Pt By HC Pro,30+ Min
+549 ;;^UTILITY(U,$J,358.3,20507,0)
+550 ;;=99368^^87^956^2^^^^1
+551 ;;^UTILITY(U,$J,358.3,20507,1,0)
+552 ;;=^358.31IA^2^2
+553 ;;^UTILITY(U,$J,358.3,20507,1,1,0)
+554 ;;=1^99368
+555 ;;^UTILITY(U,$J,358.3,20507,1,2,0)
+556 ;;=2^Team Conf w/o Pt by Nonphys,30+ Min
+557 ;;^UTILITY(U,$J,358.3,20508,0)
+558 ;;=99503^^87^957^5^^^^1
+559 ;;^UTILITY(U,$J,358.3,20508,1,0)
+560 ;;=^358.31IA^2^2
+561 ;;^UTILITY(U,$J,358.3,20508,1,1,0)
+562 ;;=1^99503
+563 ;;^UTILITY(U,$J,358.3,20508,1,2,0)
+564 ;;=2^Home Visit-Respiratory Tx Care
+565 ;;^UTILITY(U,$J,358.3,20509,0)
+566 ;;=99504^^87^957^4^^^^1
+567 ;;^UTILITY(U,$J,358.3,20509,1,0)
+568 ;;=^358.31IA^2^2
+569 ;;^UTILITY(U,$J,358.3,20509,1,1,0)
+570 ;;=1^99504
+571 ;;^UTILITY(U,$J,358.3,20509,1,2,0)
+572 ;;=2^Home Visit-Mech Ventilator Care
+573 ;;^UTILITY(U,$J,358.3,20510,0)
+574 ;;=99507^^87^957^1^^^^1
+575 ;;^UTILITY(U,$J,358.3,20510,1,0)
+576 ;;=^358.31IA^2^2
+577 ;;^UTILITY(U,$J,358.3,20510,1,1,0)
+578 ;;=1^99507
+579 ;;^UTILITY(U,$J,358.3,20510,1,2,0)
+580 ;;=2^Home Visit-Cath Maintenance
+581 ;;^UTILITY(U,$J,358.3,20511,0)
+582 ;;=99511^^87^957^2^^^^1
+583 ;;^UTILITY(U,$J,358.3,20511,1,0)
+584 ;;=^358.31IA^2^2
+585 ;;^UTILITY(U,$J,358.3,20511,1,1,0)
+586 ;;=1^99511
+587 ;;^UTILITY(U,$J,358.3,20511,1,2,0)
+588 ;;=2^Home Visit-Fecal/Enema Mgmt
+589 ;;^UTILITY(U,$J,358.3,20512,0)
+590 ;;=99505^^87^957^6^^^^1
+591 ;;^UTILITY(U,$J,358.3,20512,1,0)
+592 ;;=^358.31IA^2^2
+593 ;;^UTILITY(U,$J,358.3,20512,1,1,0)
+594 ;;=1^99505
+595 ;;^UTILITY(U,$J,358.3,20512,1,2,0)
+596 ;;=2^Home Visit-Stoma Care
+597 ;;^UTILITY(U,$J,358.3,20513,0)
+598 ;;=99512^^87^957^3^^^^1
+599 ;;^UTILITY(U,$J,358.3,20513,1,0)
+600 ;;=^358.31IA^2^2
+601 ;;^UTILITY(U,$J,358.3,20513,1,1,0)
+602 ;;=1^99512
+603 ;;^UTILITY(U,$J,358.3,20513,1,2,0)
+604 ;;=2^Home Visit-Hemodialysis
+605 ;;^UTILITY(U,$J,358.3,20514,0)
+606 ;;=99601^^87^958^1^^^^1
+607 ;;^UTILITY(U,$J,358.3,20514,1,0)
+608 ;;=^358.31IA^2^2
+609 ;;^UTILITY(U,$J,358.3,20514,1,1,0)
+610 ;;=1^99601
+611 ;;^UTILITY(U,$J,358.3,20514,1,2,0)
+612 ;;=2^Home Infsn,Up to 2 hrs
+613 ;;^UTILITY(U,$J,358.3,20515,0)
+614 ;;=99602^^87^958^2^^^^1
+615 ;;^UTILITY(U,$J,358.3,20515,1,0)
+616 ;;=^358.31IA^2^2
+617 ;;^UTILITY(U,$J,358.3,20515,1,1,0)
+618 ;;=1^99602
+619 ;;^UTILITY(U,$J,358.3,20515,1,2,0)
+620 ;;=2^Home Infsn,Ea Addl Hr
+621 ;;^UTILITY(U,$J,358.3,20516,0)
+622 ;;=G0496^^87^959^1^^^^1
+623 ;;^UTILITY(U,$J,358.3,20516,1,0)
+624 ;;=^358.31IA^2^2
+625 ;;^UTILITY(U,$J,358.3,20516,1,1,0)
+626 ;;=1^G0496
+627 ;;^UTILITY(U,$J,358.3,20516,1,2,0)
+628 ;;=2^HHC ED/TRAIN BY LPN,EA 15 min
+629 ;;^UTILITY(U,$J,358.3,20517,0)
+630 ;;=G0495^^87^959^2^^^^1
+631 ;;^UTILITY(U,$J,358.3,20517,1,0)
+632 ;;=^358.31IA^2^2
+633 ;;^UTILITY(U,$J,358.3,20517,1,1,0)
+634 ;;=1^G0495
+635 ;;^UTILITY(U,$J,358.3,20517,1,2,0)
+636 ;;=2^HHC ED/TRAIN BY RN,EA 15 min
+637 ;;^UTILITY(U,$J,358.3,20518,0)
+638 ;;=G0494^^87^959^3^^^^1
+639 ;;^UTILITY(U,$J,358.3,20518,1,0)
+640 ;;=^358.31IA^2^2
+641 ;;^UTILITY(U,$J,358.3,20518,1,1,0)
+642 ;;=1^G0494
+643 ;;^UTILITY(U,$J,358.3,20518,1,2,0)
+644 ;;=2^HHC LPN OBS/ASSSESS EA 15 min
+645 ;;^UTILITY(U,$J,358.3,20519,0)
+646 ;;=G0162^^87^959^4^^^^1
+647 ;;^UTILITY(U,$J,358.3,20519,1,0)
+648 ;;=^358.31IA^2^2
+649 ;;^UTILITY(U,$J,358.3,20519,1,1,0)
+650 ;;=1^G0162
+651 ;;^UTILITY(U,$J,358.3,20519,1,2,0)
+652 ;;=2^HHC RN E&M PLAN SVS, 15 min
+653 ;;^UTILITY(U,$J,358.3,20520,0)
+654 ;;=G0493^^87^959^5^^^^1
+655 ;;^UTILITY(U,$J,358.3,20520,1,0)
+656 ;;=^358.31IA^2^2
+657 ;;^UTILITY(U,$J,358.3,20520,1,1,0)
+658 ;;=1^G0493
+659 ;;^UTILITY(U,$J,358.3,20520,1,2,0)
+660 ;;=2^HHC RN OBS/ASSESS EA 15 min
+661 ;;^UTILITY(U,$J,358.3,20521,0)
+662 ;;=G0300^^87^959^6^^^^1
+663 ;;^UTILITY(U,$J,358.3,20521,1,0)
+664 ;;=^358.31IA^2^2
