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

IBDEI01W.m

Go to the documentation of this file.
IBDEI01W ; ; 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,4232,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4232,1,2,0)
 ;;=2^64450
 ;;^UTILITY(U,$J,358.3,4232,1,3,0)
 ;;=3^Peripheral Nerve Block
 ;;^UTILITY(U,$J,358.3,4233,0)
 ;;=12001^^30^250^2^^^^1
 ;;^UTILITY(U,$J,358.3,4233,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4233,1,2,0)
 ;;=2^12001
 ;;^UTILITY(U,$J,358.3,4233,1,3,0)
 ;;=3^Simp < 2.5cm Extrem/Scalp/Trnk/Neck/Ext Genit
 ;;^UTILITY(U,$J,358.3,4234,0)
 ;;=12002^^30^250^3^^^^1
 ;;^UTILITY(U,$J,358.3,4234,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4234,1,2,0)
 ;;=2^12002
 ;;^UTILITY(U,$J,358.3,4234,1,3,0)
 ;;=3^Simp 2.6-7.5cm Extrem/Scalp/Trnk/Neck/Ext Genit
 ;;^UTILITY(U,$J,358.3,4235,0)
 ;;=12004^^30^250^4^^^^1
 ;;^UTILITY(U,$J,358.3,4235,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4235,1,2,0)
 ;;=2^12004
 ;;^UTILITY(U,$J,358.3,4235,1,3,0)
 ;;=3^Simp 7.6-12.5cm Extrem/Scalp/Trnk/Neck/Ext Genit
 ;;^UTILITY(U,$J,358.3,4236,0)
 ;;=12011^^30^250^5^^^^1
 ;;^UTILITY(U,$J,358.3,4236,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4236,1,2,0)
 ;;=2^12011
 ;;^UTILITY(U,$J,358.3,4236,1,3,0)
 ;;=3^Simp < 2.5cm Face/Ears/Eyelids/Lips/Muc Memb
 ;;^UTILITY(U,$J,358.3,4237,0)
 ;;=12013^^30^250^6^^^^1
 ;;^UTILITY(U,$J,358.3,4237,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4237,1,2,0)
 ;;=2^12013
 ;;^UTILITY(U,$J,358.3,4237,1,3,0)
 ;;=3^Simp 2.6-5.1cm Face/Ears/Eyelids/Lips/Muc Memb
 ;;^UTILITY(U,$J,358.3,4238,0)
 ;;=12014^^30^250^7^^^^1
 ;;^UTILITY(U,$J,358.3,4238,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4238,1,2,0)
 ;;=2^12014
 ;;^UTILITY(U,$J,358.3,4238,1,3,0)
 ;;=3^Simp 5.1-7.5cm Face/Ears/Eyelids/Lips/Muc Memb
 ;;^UTILITY(U,$J,358.3,4239,0)
 ;;=12041^^30^250^8^^^^1
 ;;^UTILITY(U,$J,358.3,4239,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4239,1,2,0)
 ;;=2^12041
 ;;^UTILITY(U,$J,358.3,4239,1,3,0)
 ;;=3^Intermd < 2.5cm Hands/Feet/Neck/Ext Genit
 ;;^UTILITY(U,$J,358.3,4240,0)
 ;;=12042^^30^250^9^^^^1
 ;;^UTILITY(U,$J,358.3,4240,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4240,1,2,0)
 ;;=2^12042
 ;;^UTILITY(U,$J,358.3,4240,1,3,0)
 ;;=3^Intermd 2.6-7.5cm Hands/Feet/Neck/Ext Genit
 ;;^UTILITY(U,$J,358.3,4241,0)
 ;;=12044^^30^250^10^^^^1
 ;;^UTILITY(U,$J,358.3,4241,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4241,1,2,0)
 ;;=2^12044
 ;;^UTILITY(U,$J,358.3,4241,1,3,0)
 ;;=3^Intermd 7.6-12.5cm Hands/Feet/Neck/Ext Genit
 ;;^UTILITY(U,$J,358.3,4242,0)
 ;;=12031^^30^250^11^^^^1
 ;;^UTILITY(U,$J,358.3,4242,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4242,1,2,0)
 ;;=2^12031
 ;;^UTILITY(U,$J,358.3,4242,1,3,0)
 ;;=3^Intermd < 2.5cm Extrem/Scalp/Trunk
 ;;^UTILITY(U,$J,358.3,4243,0)
 ;;=12032^^30^250^12^^^^1
 ;;^UTILITY(U,$J,358.3,4243,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4243,1,2,0)
 ;;=2^12032
 ;;^UTILITY(U,$J,358.3,4243,1,3,0)
 ;;=3^Intermd 2.6-7.5cm Extrem/Scalp/Trunk
 ;;^UTILITY(U,$J,358.3,4244,0)
 ;;=12034^^30^250^13^^^^1
 ;;^UTILITY(U,$J,358.3,4244,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4244,1,2,0)
 ;;=2^12034
 ;;^UTILITY(U,$J,358.3,4244,1,3,0)
 ;;=3^Intermd 7.6-12.5cm Extrem/Scalp/Trunk
 ;;^UTILITY(U,$J,358.3,4245,0)
 ;;=16000^^30^251^12^^^^1
 ;;^UTILITY(U,$J,358.3,4245,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4245,1,2,0)
 ;;=2^16000
 ;;^UTILITY(U,$J,358.3,4245,1,3,0)
 ;;=3^1st Degree Burn Treatment
 ;;^UTILITY(U,$J,358.3,4246,0)
 ;;=16020^^30^251^13^^^^1
 ;;^UTILITY(U,$J,358.3,4246,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4246,1,2,0)
 ;;=2^16020
 ;;^UTILITY(U,$J,358.3,4246,1,3,0)
 ;;=3^Partial Thickness Dress/Debride < 5%
 ;;^UTILITY(U,$J,358.3,4247,0)
 ;;=16025^^30^251^14^^^^1
 ;;^UTILITY(U,$J,358.3,4247,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4247,1,2,0)
 ;;=2^16025
 ;;^UTILITY(U,$J,358.3,4247,1,3,0)
 ;;=3^Partial Thickness Dress/Debride 5-10%
 ;;^UTILITY(U,$J,358.3,4248,0)
 ;;=16030^^30^251^15^^^^1
 ;;^UTILITY(U,$J,358.3,4248,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4248,1,2,0)
 ;;=2^16030
 ;;^UTILITY(U,$J,358.3,4248,1,3,0)
 ;;=3^Partial Thickness Dress/Debride > 10%
 ;;^UTILITY(U,$J,358.3,4249,0)
 ;;=64450^^30^251^1^^^^1
 ;;^UTILITY(U,$J,358.3,4249,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4249,1,2,0)
 ;;=2^64450
 ;;^UTILITY(U,$J,358.3,4249,1,3,0)
 ;;=3^Peripheral Nerve Block
 ;;^UTILITY(U,$J,358.3,4250,0)
 ;;=97602^^30^251^2^^^^1
 ;;^UTILITY(U,$J,358.3,4250,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4250,1,2,0)
 ;;=2^97602
 ;;^UTILITY(U,$J,358.3,4250,1,3,0)
 ;;=3^Wound Care,Non-Selective Debridement
 ;;^UTILITY(U,$J,358.3,4251,0)
 ;;=10060^^30^251^3^^^^1
 ;;^UTILITY(U,$J,358.3,4251,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4251,1,2,0)
 ;;=2^10060
 ;;^UTILITY(U,$J,358.3,4251,1,3,0)
 ;;=3^Abscess I&D,Simp/Single
 ;;^UTILITY(U,$J,358.3,4252,0)
 ;;=10061^^30^251^4^^^^1
 ;;^UTILITY(U,$J,358.3,4252,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4252,1,2,0)
 ;;=2^10061
 ;;^UTILITY(U,$J,358.3,4252,1,3,0)
 ;;=3^Abscess I&D,Complex/Multiple
 ;;^UTILITY(U,$J,358.3,4253,0)
 ;;=26010^^30^251^5^^^^1
 ;;^UTILITY(U,$J,358.3,4253,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4253,1,2,0)
 ;;=2^26010
 ;;^UTILITY(U,$J,358.3,4253,1,3,0)
 ;;=3^Finger Abscess,Drainage,Simple
 ;;^UTILITY(U,$J,358.3,4254,0)
 ;;=11740^^30^251^7^^^^1
 ;;^UTILITY(U,$J,358.3,4254,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4254,1,2,0)
 ;;=2^11740
 ;;^UTILITY(U,$J,358.3,4254,1,3,0)
 ;;=3^Subungual Hematoma Drainage
 ;;^UTILITY(U,$J,358.3,4255,0)
 ;;=46320^^30^251^8^^^^1
 ;;^UTILITY(U,$J,358.3,4255,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4255,1,2,0)
 ;;=2^46320
 ;;^UTILITY(U,$J,358.3,4255,1,3,0)
 ;;=3^Hemorrhoid Excision,Thrombosed,External
 ;;^UTILITY(U,$J,358.3,4256,0)
 ;;=46050^^30^251^9^^^^1
 ;;^UTILITY(U,$J,358.3,4256,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4256,1,2,0)
 ;;=2^46050
 ;;^UTILITY(U,$J,358.3,4256,1,3,0)
 ;;=3^Perianal Abscess I&D
 ;;^UTILITY(U,$J,358.3,4257,0)
 ;;=56420^^30^251^10^^^^1
 ;;^UTILITY(U,$J,358.3,4257,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4257,1,2,0)
 ;;=2^56420
 ;;^UTILITY(U,$J,358.3,4257,1,3,0)
 ;;=3^Bartholin's Cyst I&D
 ;;^UTILITY(U,$J,358.3,4258,0)
 ;;=56405^^30^251^11^^^^1
 ;;^UTILITY(U,$J,358.3,4258,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4258,1,2,0)
 ;;=2^56405
 ;;^UTILITY(U,$J,358.3,4258,1,3,0)
 ;;=3^Vulva/Perineal Abscess I&D
 ;;^UTILITY(U,$J,358.3,4259,0)
 ;;=10120^^30^251^6^^^^1
 ;;^UTILITY(U,$J,358.3,4259,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4259,1,2,0)
 ;;=2^10120
 ;;^UTILITY(U,$J,358.3,4259,1,3,0)
 ;;=3^Foreign Body Removal,Subq,Simple
 ;;^UTILITY(U,$J,358.3,4260,0)
 ;;=10021^^30^251^16^^^^1
 ;;^UTILITY(U,$J,358.3,4260,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4260,1,2,0)
 ;;=2^10021
 ;;^UTILITY(U,$J,358.3,4260,1,3,0)
 ;;=3^FNA w/o Imaging Guidance,1st Lesion
 ;;^UTILITY(U,$J,358.3,4261,0)
 ;;=10004^^30^251^17^^^^1
 ;;^UTILITY(U,$J,358.3,4261,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4261,1,2,0)
 ;;=2^10004
 ;;^UTILITY(U,$J,358.3,4261,1,3,0)
 ;;=3^FNA w/o Imaging Guidance,Ea Addl Lesion
 ;;^UTILITY(U,$J,358.3,4262,0)
 ;;=11765^^30^251^18^^^^1
 ;;^UTILITY(U,$J,358.3,4262,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4262,1,2,0)
 ;;=2^11765
 ;;^UTILITY(U,$J,358.3,4262,1,3,0)
 ;;=3^Wedge Excision of Nail for Ingrown Nail
 ;;^UTILITY(U,$J,358.3,4263,0)
 ;;=90792^^30^252^1^^^^1
 ;;^UTILITY(U,$J,358.3,4263,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4263,1,2,0)
 ;;=2^90792
 ;;^UTILITY(U,$J,358.3,4263,1,3,0)
 ;;=3^Psychiatric Diagnostic Eval w/ Med Eval
 ;;^UTILITY(U,$J,358.3,4264,0)
 ;;=90839^^30^252^2^^^^1
 ;;^UTILITY(U,$J,358.3,4264,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4264,1,2,0)
 ;;=2^90839
 ;;^UTILITY(U,$J,358.3,4264,1,3,0)
 ;;=3^Psychotherapy for Crisis;1st hr
 ;;^UTILITY(U,$J,358.3,4265,0)
 ;;=90840^^30^252^3^^^^1
 ;;^UTILITY(U,$J,358.3,4265,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4265,1,2,0)
 ;;=2^90840
 ;;^UTILITY(U,$J,358.3,4265,1,3,0)
 ;;=3^Psychotherapy for Crisis;Ea Addl 30min
 ;;^UTILITY(U,$J,358.3,4266,0)
 ;;=90885^^30^252^4^^^^1
 ;;^UTILITY(U,$J,358.3,4266,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4266,1,2,0)
 ;;=2^90885
 ;;^UTILITY(U,$J,358.3,4266,1,3,0)
 ;;=3^Psych Eval of Records for Diagnostic Purposes
 ;;^UTILITY(U,$J,358.3,4267,0)
 ;;=36415^^30^253^20^^^^1
 ;;^UTILITY(U,$J,358.3,4267,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4267,1,2,0)
 ;;=2^36415
 ;;^UTILITY(U,$J,358.3,4267,1,3,0)
 ;;=3^Venous Blood Draw
 ;;^UTILITY(U,$J,358.3,4268,0)
 ;;=36000^^30^253^4^^^^1
 ;;^UTILITY(U,$J,358.3,4268,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4268,1,2,0)
 ;;=2^36000
 ;;^UTILITY(U,$J,358.3,4268,1,3,0)
 ;;=3^IV Insertion,Vein
 ;;^UTILITY(U,$J,358.3,4269,0)
 ;;=94760^^30^253^14^^^^1
 ;;^UTILITY(U,$J,358.3,4269,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4269,1,2,0)
 ;;=2^94760
 ;;^UTILITY(U,$J,358.3,4269,1,3,0)
 ;;=3^Pulse Oximetry
 ;;^UTILITY(U,$J,358.3,4270,0)
 ;;=94640^^30^253^11^^^^1
 ;;^UTILITY(U,$J,358.3,4270,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4270,1,2,0)
 ;;=2^94640
 ;;^UTILITY(U,$J,358.3,4270,1,3,0)
 ;;=3^Nebulizer Treatment
 ;;^UTILITY(U,$J,358.3,4271,0)
 ;;=94010^^30^253^13^^^^1
 ;;^UTILITY(U,$J,358.3,4271,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4271,1,2,0)
 ;;=2^94010
 ;;^UTILITY(U,$J,358.3,4271,1,3,0)
 ;;=3^Peak Flow Spirometry
 ;;^UTILITY(U,$J,358.3,4272,0)
 ;;=82948^^30^253^3^^^^1
 ;;^UTILITY(U,$J,358.3,4272,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4272,1,2,0)
 ;;=2^82948
 ;;^UTILITY(U,$J,358.3,4272,1,3,0)
 ;;=3^Glucose Finger Stick
 ;;^UTILITY(U,$J,358.3,4273,0)
 ;;=51798^^30^253^1^^^^1
 ;;^UTILITY(U,$J,358.3,4273,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4273,1,2,0)
 ;;=2^51798
 ;;^UTILITY(U,$J,358.3,4273,1,3,0)
 ;;=3^Bladder Scan PVR
 ;;^UTILITY(U,$J,358.3,4274,0)
 ;;=51702^^30^253^9^^^^1
 ;;^UTILITY(U,$J,358.3,4274,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4274,1,2,0)
 ;;=2^51702
 ;;^UTILITY(U,$J,358.3,4274,1,3,0)
 ;;=3^Insert Foley Catheter
 ;;^UTILITY(U,$J,358.3,4275,0)
 ;;=51701^^30^253^10^^^^1
 ;;^UTILITY(U,$J,358.3,4275,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4275,1,2,0)
 ;;=2^51701
 ;;^UTILITY(U,$J,358.3,4275,1,3,0)
 ;;=3^Insert Non-Indwelling Catheter
 ;;^UTILITY(U,$J,358.3,4276,0)
 ;;=81002^^30^253^17^^^^1
 ;;^UTILITY(U,$J,358.3,4276,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4276,1,2,0)
 ;;=2^81002
 ;;^UTILITY(U,$J,358.3,4276,1,3,0)
 ;;=3^UA Dipstick
 ;;^UTILITY(U,$J,358.3,4277,0)
 ;;=36430^^30^253^16^^^^1
 ;;^UTILITY(U,$J,358.3,4277,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4277,1,2,0)
 ;;=2^36430
 ;;^UTILITY(U,$J,358.3,4277,1,3,0)
 ;;=3^Transfusion,Blood/Blood Components
 ;;^UTILITY(U,$J,358.3,4278,0)
 ;;=81025^^30^253^19^^^^1
 ;;^UTILITY(U,$J,358.3,4278,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4278,1,2,0)
 ;;=2^81025
 ;;^UTILITY(U,$J,358.3,4278,1,3,0)
 ;;=3^Urine Pregnancy Test
 ;;^UTILITY(U,$J,358.3,4279,0)
 ;;=86580^^30^253^15^^^^1
 ;;^UTILITY(U,$J,358.3,4279,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4279,1,2,0)
 ;;=2^86580
 ;;^UTILITY(U,$J,358.3,4279,1,3,0)
 ;;=3^TB Skin Test
 ;;^UTILITY(U,$J,358.3,4280,0)
 ;;=T1001^^30^253^12^^^^1
 ;;^UTILITY(U,$J,358.3,4280,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4280,1,2,0)
 ;;=2^T1001
 ;;^UTILITY(U,$J,358.3,4280,1,3,0)
 ;;=3^Nursing Assessment (Pt left before seeing MD)
 ;;^UTILITY(U,$J,358.3,4281,0)
 ;;=81015^^30^253^18^^^^1
 ;;^UTILITY(U,$J,358.3,4281,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4281,1,2,0)
 ;;=2^81015
 ;;^UTILITY(U,$J,358.3,4281,1,3,0)
 ;;=3^UA Microscope in ED
 ;;^UTILITY(U,$J,358.3,4282,0)
 ;;=93005^^30^253^2^^^^1
 ;;^UTILITY(U,$J,358.3,4282,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4282,1,2,0)
 ;;=2^93005
 ;;^UTILITY(U,$J,358.3,4282,1,3,0)
 ;;=3^EKG,12 Leads +,Tracing Only
 ;;^UTILITY(U,$J,358.3,4283,0)
 ;;=96365^^30^253^5^^^^1
 ;;^UTILITY(U,$J,358.3,4283,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4283,1,2,0)
 ;;=2^96365
 ;;^UTILITY(U,$J,358.3,4283,1,3,0)
 ;;=3^Infusion,IV,Up to 1 hr
 ;;^UTILITY(U,$J,358.3,4284,0)
 ;;=96374^^30^253^6^^^^1
 ;;^UTILITY(U,$J,358.3,4284,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4284,1,2,0)
 ;;=2^96374
 ;;^UTILITY(U,$J,358.3,4284,1,3,0)
 ;;=3^Inj,IV Push
 ;;^UTILITY(U,$J,358.3,4285,0)
 ;;=96375^^30^253^7^^^^1
 ;;^UTILITY(U,$J,358.3,4285,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4285,1,2,0)
 ;;=2^96375
 ;;^UTILITY(U,$J,358.3,4285,1,3,0)
 ;;=3^Inj,IV Push,Ea Addl
 ;;^UTILITY(U,$J,358.3,4286,0)
 ;;=96372^^30^253^8^^^^1
 ;;^UTILITY(U,$J,358.3,4286,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4286,1,2,0)
 ;;=2^96372
 ;;^UTILITY(U,$J,358.3,4286,1,3,0)
 ;;=3^Inj,SC/IM
 ;;^UTILITY(U,$J,358.3,4287,0)
 ;;=96360^^30^254^1^^^^1
 ;;^UTILITY(U,$J,358.3,4287,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4287,1,2,0)
 ;;=2^96360
 ;;^UTILITY(U,$J,358.3,4287,1,3,0)
 ;;=3^Hydration,IV,1st Hr
 ;;^UTILITY(U,$J,358.3,4288,0)
 ;;=96361^^30^254^2^^^^1
 ;;^UTILITY(U,$J,358.3,4288,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4288,1,2,0)
 ;;=2^96361
 ;;^UTILITY(U,$J,358.3,4288,1,3,0)
 ;;=3^Hydration,IV,Ea Addl Hr
 ;;^UTILITY(U,$J,358.3,4289,0)
 ;;=96366^^30^254^4^^^^1
 ;;^UTILITY(U,$J,358.3,4289,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4289,1,2,0)
 ;;=2^96366
 ;;^UTILITY(U,$J,358.3,4289,1,3,0)
 ;;=3^Infusion,IV,Ea Addl Hr
 ;;^UTILITY(U,$J,358.3,4290,0)
 ;;=96365^^30^254^3^^^^1
 ;;^UTILITY(U,$J,358.3,4290,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4290,1,2,0)
 ;;=2^96365
 ;;^UTILITY(U,$J,358.3,4290,1,3,0)
 ;;=3^Infusion,IV,Up to 1 Hr
 ;;^UTILITY(U,$J,358.3,4291,0)
 ;;=96374^^30^254^6^^^^1
 ;;^UTILITY(U,$J,358.3,4291,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4291,1,2,0)
 ;;=2^96374
 ;;^UTILITY(U,$J,358.3,4291,1,3,0)
 ;;=3^Inj,IV Push
 ;;^UTILITY(U,$J,358.3,4292,0)
 ;;=96375^^30^254^7^^^^1
 ;;^UTILITY(U,$J,358.3,4292,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4292,1,2,0)
 ;;=2^96375
 ;;^UTILITY(U,$J,358.3,4292,1,3,0)
 ;;=3^Inj,IV Push Ea Addl
 ;;^UTILITY(U,$J,358.3,4293,0)
 ;;=96372^^30^254^8^^^^1
 ;;^UTILITY(U,$J,358.3,4293,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4293,1,2,0)
 ;;=2^96372
 ;;^UTILITY(U,$J,358.3,4293,1,3,0)
 ;;=3^Inj,SC/IM
 ;;^UTILITY(U,$J,358.3,4294,0)
 ;;=96367^^30^254^5^^^^1
 ;;^UTILITY(U,$J,358.3,4294,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4294,1,2,0)
 ;;=2^96367
 ;;^UTILITY(U,$J,358.3,4294,1,3,0)
 ;;=3^Infusion,IV,Addl Seq Infus New Med/Sub,Up to 1 hr
 ;;^UTILITY(U,$J,358.3,4295,0)
 ;;=99217^^30^255^1^^^^1
 ;;^UTILITY(U,$J,358.3,4295,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4295,1,2,0)
 ;;=2^99217
 ;;^UTILITY(U,$J,358.3,4295,1,3,0)
 ;;=3^Observation Care Discharge
 ;;^UTILITY(U,$J,358.3,4296,0)
 ;;=99292^^30^255^2^^^^1
 ;;^UTILITY(U,$J,358.3,4296,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4296,1,2,0)
 ;;=2^99292
 ;;^UTILITY(U,$J,358.3,4296,1,3,0)
 ;;=3^Critical Care,Ea Addl 30 min
 ;;^UTILITY(U,$J,358.3,4297,0)
 ;;=0011A^^30^256^1^^^^1
 ;;^UTILITY(U,$J,358.3,4297,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4297,1,2,0)
 ;;=2^0011A
 ;;^UTILITY(U,$J,358.3,4297,1,3,0)
 ;;=3^Admin COVID-19 Vaccine (Moderna),1st Dose
 ;;^UTILITY(U,$J,358.3,4298,0)
 ;;=0012A^^30^256^2^^^^1
 ;;^UTILITY(U,$J,358.3,4298,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4298,1,2,0)
 ;;=2^0012A
 ;;^UTILITY(U,$J,358.3,4298,1,3,0)
 ;;=3^Admin COVID-19 Vaccine (Moderna),2nd Dose
 ;;^UTILITY(U,$J,358.3,4299,0)
 ;;=0001A^^30^256^3^^^^1
 ;;^UTILITY(U,$J,358.3,4299,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4299,1,2,0)
 ;;=2^0001A
 ;;^UTILITY(U,$J,358.3,4299,1,3,0)
 ;;=3^Admin COVID-19 Vaccine (Pfizer),1st Dose 
 ;;^UTILITY(U,$J,358.3,4300,0)
 ;;=0002A^^30^256^4^^^^1
 ;;^UTILITY(U,$J,358.3,4300,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4300,1,2,0)
 ;;=2^0002A
 ;;^UTILITY(U,$J,358.3,4300,1,3,0)
 ;;=3^Admin COVID-19 Vaccine (Pfizer),2nd Dose 
 ;;^UTILITY(U,$J,358.3,4301,0)
 ;;=Q0243^^30^256^7^^^^1
 ;;^UTILITY(U,$J,358.3,4301,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4301,1,2,0)
 ;;=2^Q0243
 ;;^UTILITY(U,$J,358.3,4301,1,3,0)
 ;;=3^Casirivimab & Imdevimab 2400mg           
 ;;^UTILITY(U,$J,358.3,4302,0)
 ;;=M0243^^30^256^8^^^^1
 ;;^UTILITY(U,$J,358.3,4302,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4302,1,2,0)
 ;;=2^M0243
 ;;^UTILITY(U,$J,358.3,4302,1,3,0)
 ;;=3^Casirivimab & Imdevimab Infusion         
 ;;^UTILITY(U,$J,358.3,4303,0)
 ;;=91300^^30^256^9^^^^1
 ;;^UTILITY(U,$J,358.3,4303,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4303,1,2,0)
 ;;=2^91300
 ;;^UTILITY(U,$J,358.3,4303,1,3,0)
 ;;=3^SARSCOV2 Vaccine 0.3ml (Pfizer)          
 ;;^UTILITY(U,$J,358.3,4304,0)
 ;;=91301^^30^256^10^^^^1
 ;;^UTILITY(U,$J,358.3,4304,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4304,1,2,0)
 ;;=2^91301
 ;;^UTILITY(U,$J,358.3,4304,1,3,0)
 ;;=3^SARSCOV2 Vaccine 0.5ml (Moderna)         
 ;;^UTILITY(U,$J,358.3,4305,0)
 ;;=M0245^^30^256^5^^^^1
 ;;^UTILITY(U,$J,358.3,4305,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4305,1,2,0)
 ;;=2^M0245
 ;;^UTILITY(U,$J,358.3,4305,1,3,0)
 ;;=3^Bamlanivimab Infusion w/ Post Admin Monitoring
 ;;^UTILITY(U,$J,358.3,4306,0)
 ;;=Q0245^^30^256^6^^^^1
 ;;^UTILITY(U,$J,358.3,4306,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4306,1,2,0)
 ;;=2^Q0245
 ;;^UTILITY(U,$J,358.3,4306,1,3,0)
 ;;=3^Bamlanivivab 700mg
 ;;^UTILITY(U,$J,358.3,4307,0)
 ;;=87337^^30^256^11^^^^1
 ;;^UTILITY(U,$J,358.3,4307,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4307,1,2,0)
 ;;=2^87337
 ;;^UTILITY(U,$J,358.3,4307,1,3,0)
 ;;=3^IADNA SARS COV2 & INF A&b &RSV Multi Ampr Probe TQ
 ;;^UTILITY(U,$J,358.3,4308,0)
 ;;=U0002^^30^256^12^^^^1
 ;;^UTILITY(U,$J,358.3,4308,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4308,1,2,0)
 ;;=2^U0002
 ;;^UTILITY(U,$J,358.3,4308,1,3,0)
 ;;=3^COVID-19 Lab Test,Non-CDC
 ;;^UTILITY(U,$J,358.3,4309,0)
 ;;=H0033^^30^257^2^^^^1
 ;;^UTILITY(U,$J,358.3,4309,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4309,1,2,0)
 ;;=2^H0033
 ;;^UTILITY(U,$J,358.3,4309,1,3,0)
 ;;=3^Oral Med Admin,Direct Observation
 ;;^UTILITY(U,$J,358.3,4310,0)
 ;;=2010F^^30^257^3^^^^1
 ;;^UTILITY(U,$J,358.3,4310,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4310,1,2,0)
 ;;=2^2010F
 ;;^UTILITY(U,$J,358.3,4310,1,3,0)
 ;;=3^Vital Signs Recorded
 ;;^UTILITY(U,$J,358.3,4311,0)
 ;;=3319F^^30^257^1^^^^1
 ;;^UTILITY(U,$J,358.3,4311,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4311,1,2,0)
 ;;=2^3319F
 ;;^UTILITY(U,$J,358.3,4311,1,3,0)
 ;;=3^1 Dx Img Order: Chest XRay,CT,US,MRI
 ;;^UTILITY(U,$J,358.3,4312,0)
 ;;=81001^^30^258^4^^^^1
 ;;^UTILITY(U,$J,358.3,4312,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4312,1,2,0)
 ;;=2^81001
 ;;^UTILITY(U,$J,358.3,4312,1,3,0)
 ;;=3^UA Auto w/ Microscopy
 ;;^UTILITY(U,$J,358.3,4313,0)
 ;;=80305^^30^258^3^^^^1
 ;;^UTILITY(U,$J,358.3,4313,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4313,1,2,0)
 ;;=2^80305
 ;;^UTILITY(U,$J,358.3,4313,1,3,0)
 ;;=3^Drug Test Prsmv Read,Direct Optical Obs
 ;;^UTILITY(U,$J,358.3,4314,0)
 ;;=80048^^30^258^2^^^^1
 ;;^UTILITY(U,$J,358.3,4314,1,0)
 ;;=^358.31IA^3^2
 ;;^UTILITY(U,$J,358.3,4314,1,2,0)
 ;;=2^80048
 ;;^UTILITY(U,$J,358.3,4314,1,3,0)
 ;;=3^Chem 7 (CMP)
 ;;^UTILITY(U,$J,358.3,4315,0)
 ;;=85025^^30^258^1^^^^1
 ;;^UTILITY(U,$J,358.3,4315,1,0)
 ;;=^358.31IA^3^2