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
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HIBDEI01W 19764 printed Dec 13, 2024@01:39:59 Page 2
IBDEI01W ; ; 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,4232,1,0)
+2 ;;=^358.31IA^3^2
+3 ;;^UTILITY(U,$J,358.3,4232,1,2,0)
+4 ;;=2^64450
+5 ;;^UTILITY(U,$J,358.3,4232,1,3,0)
+6 ;;=3^Peripheral Nerve Block
+7 ;;^UTILITY(U,$J,358.3,4233,0)
+8 ;;=12001^^30^250^2^^^^1
+9 ;;^UTILITY(U,$J,358.3,4233,1,0)
+10 ;;=^358.31IA^3^2
+11 ;;^UTILITY(U,$J,358.3,4233,1,2,0)
+12 ;;=2^12001
+13 ;;^UTILITY(U,$J,358.3,4233,1,3,0)
+14 ;;=3^Simp < 2.5cm Extrem/Scalp/Trnk/Neck/Ext Genit
+15 ;;^UTILITY(U,$J,358.3,4234,0)
+16 ;;=12002^^30^250^3^^^^1
+17 ;;^UTILITY(U,$J,358.3,4234,1,0)
+18 ;;=^358.31IA^3^2
+19 ;;^UTILITY(U,$J,358.3,4234,1,2,0)
+20 ;;=2^12002
+21 ;;^UTILITY(U,$J,358.3,4234,1,3,0)
+22 ;;=3^Simp 2.6-7.5cm Extrem/Scalp/Trnk/Neck/Ext Genit
+23 ;;^UTILITY(U,$J,358.3,4235,0)
+24 ;;=12004^^30^250^4^^^^1
+25 ;;^UTILITY(U,$J,358.3,4235,1,0)
+26 ;;=^358.31IA^3^2
+27 ;;^UTILITY(U,$J,358.3,4235,1,2,0)
+28 ;;=2^12004
+29 ;;^UTILITY(U,$J,358.3,4235,1,3,0)
+30 ;;=3^Simp 7.6-12.5cm Extrem/Scalp/Trnk/Neck/Ext Genit
+31 ;;^UTILITY(U,$J,358.3,4236,0)
+32 ;;=12011^^30^250^5^^^^1
+33 ;;^UTILITY(U,$J,358.3,4236,1,0)
+34 ;;=^358.31IA^3^2
+35 ;;^UTILITY(U,$J,358.3,4236,1,2,0)
+36 ;;=2^12011
+37 ;;^UTILITY(U,$J,358.3,4236,1,3,0)
+38 ;;=3^Simp < 2.5cm Face/Ears/Eyelids/Lips/Muc Memb
+39 ;;^UTILITY(U,$J,358.3,4237,0)
+40 ;;=12013^^30^250^6^^^^1
+41 ;;^UTILITY(U,$J,358.3,4237,1,0)
+42 ;;=^358.31IA^3^2
+43 ;;^UTILITY(U,$J,358.3,4237,1,2,0)
+44 ;;=2^12013
+45 ;;^UTILITY(U,$J,358.3,4237,1,3,0)
+46 ;;=3^Simp 2.6-5.1cm Face/Ears/Eyelids/Lips/Muc Memb
+47 ;;^UTILITY(U,$J,358.3,4238,0)
+48 ;;=12014^^30^250^7^^^^1
+49 ;;^UTILITY(U,$J,358.3,4238,1,0)
+50 ;;=^358.31IA^3^2
+51 ;;^UTILITY(U,$J,358.3,4238,1,2,0)
+52 ;;=2^12014
+53 ;;^UTILITY(U,$J,358.3,4238,1,3,0)
+54 ;;=3^Simp 5.1-7.5cm Face/Ears/Eyelids/Lips/Muc Memb
+55 ;;^UTILITY(U,$J,358.3,4239,0)
+56 ;;=12041^^30^250^8^^^^1
+57 ;;^UTILITY(U,$J,358.3,4239,1,0)
+58 ;;=^358.31IA^3^2
+59 ;;^UTILITY(U,$J,358.3,4239,1,2,0)
+60 ;;=2^12041
+61 ;;^UTILITY(U,$J,358.3,4239,1,3,0)
+62 ;;=3^Intermd < 2.5cm Hands/Feet/Neck/Ext Genit
+63 ;;^UTILITY(U,$J,358.3,4240,0)
+64 ;;=12042^^30^250^9^^^^1
+65 ;;^UTILITY(U,$J,358.3,4240,1,0)
+66 ;;=^358.31IA^3^2
+67 ;;^UTILITY(U,$J,358.3,4240,1,2,0)
+68 ;;=2^12042
+69 ;;^UTILITY(U,$J,358.3,4240,1,3,0)
+70 ;;=3^Intermd 2.6-7.5cm Hands/Feet/Neck/Ext Genit
+71 ;;^UTILITY(U,$J,358.3,4241,0)
+72 ;;=12044^^30^250^10^^^^1
+73 ;;^UTILITY(U,$J,358.3,4241,1,0)
+74 ;;=^358.31IA^3^2
+75 ;;^UTILITY(U,$J,358.3,4241,1,2,0)
+76 ;;=2^12044
+77 ;;^UTILITY(U,$J,358.3,4241,1,3,0)
+78 ;;=3^Intermd 7.6-12.5cm Hands/Feet/Neck/Ext Genit
+79 ;;^UTILITY(U,$J,358.3,4242,0)
+80 ;;=12031^^30^250^11^^^^1
+81 ;;^UTILITY(U,$J,358.3,4242,1,0)
+82 ;;=^358.31IA^3^2
+83 ;;^UTILITY(U,$J,358.3,4242,1,2,0)
+84 ;;=2^12031
+85 ;;^UTILITY(U,$J,358.3,4242,1,3,0)
+86 ;;=3^Intermd < 2.5cm Extrem/Scalp/Trunk
+87 ;;^UTILITY(U,$J,358.3,4243,0)
+88 ;;=12032^^30^250^12^^^^1
+89 ;;^UTILITY(U,$J,358.3,4243,1,0)
+90 ;;=^358.31IA^3^2
+91 ;;^UTILITY(U,$J,358.3,4243,1,2,0)
+92 ;;=2^12032
+93 ;;^UTILITY(U,$J,358.3,4243,1,3,0)
+94 ;;=3^Intermd 2.6-7.5cm Extrem/Scalp/Trunk
+95 ;;^UTILITY(U,$J,358.3,4244,0)
+96 ;;=12034^^30^250^13^^^^1
+97 ;;^UTILITY(U,$J,358.3,4244,1,0)
+98 ;;=^358.31IA^3^2
+99 ;;^UTILITY(U,$J,358.3,4244,1,2,0)
+100 ;;=2^12034
+101 ;;^UTILITY(U,$J,358.3,4244,1,3,0)
+102 ;;=3^Intermd 7.6-12.5cm Extrem/Scalp/Trunk
+103 ;;^UTILITY(U,$J,358.3,4245,0)
+104 ;;=16000^^30^251^12^^^^1
+105 ;;^UTILITY(U,$J,358.3,4245,1,0)
+106 ;;=^358.31IA^3^2
+107 ;;^UTILITY(U,$J,358.3,4245,1,2,0)
+108 ;;=2^16000
+109 ;;^UTILITY(U,$J,358.3,4245,1,3,0)
+110 ;;=3^1st Degree Burn Treatment
+111 ;;^UTILITY(U,$J,358.3,4246,0)
+112 ;;=16020^^30^251^13^^^^1
+113 ;;^UTILITY(U,$J,358.3,4246,1,0)
+114 ;;=^358.31IA^3^2
+115 ;;^UTILITY(U,$J,358.3,4246,1,2,0)
+116 ;;=2^16020
+117 ;;^UTILITY(U,$J,358.3,4246,1,3,0)
+118 ;;=3^Partial Thickness Dress/Debride < 5%
+119 ;;^UTILITY(U,$J,358.3,4247,0)
+120 ;;=16025^^30^251^14^^^^1
+121 ;;^UTILITY(U,$J,358.3,4247,1,0)
+122 ;;=^358.31IA^3^2
+123 ;;^UTILITY(U,$J,358.3,4247,1,2,0)
+124 ;;=2^16025
+125 ;;^UTILITY(U,$J,358.3,4247,1,3,0)
+126 ;;=3^Partial Thickness Dress/Debride 5-10%
+127 ;;^UTILITY(U,$J,358.3,4248,0)
+128 ;;=16030^^30^251^15^^^^1
+129 ;;^UTILITY(U,$J,358.3,4248,1,0)
+130 ;;=^358.31IA^3^2
+131 ;;^UTILITY(U,$J,358.3,4248,1,2,0)
+132 ;;=2^16030
+133 ;;^UTILITY(U,$J,358.3,4248,1,3,0)
+134 ;;=3^Partial Thickness Dress/Debride > 10%
+135 ;;^UTILITY(U,$J,358.3,4249,0)
+136 ;;=64450^^30^251^1^^^^1
+137 ;;^UTILITY(U,$J,358.3,4249,1,0)
+138 ;;=^358.31IA^3^2
+139 ;;^UTILITY(U,$J,358.3,4249,1,2,0)
+140 ;;=2^64450
+141 ;;^UTILITY(U,$J,358.3,4249,1,3,0)
+142 ;;=3^Peripheral Nerve Block
+143 ;;^UTILITY(U,$J,358.3,4250,0)
+144 ;;=97602^^30^251^2^^^^1
+145 ;;^UTILITY(U,$J,358.3,4250,1,0)
+146 ;;=^358.31IA^3^2
+147 ;;^UTILITY(U,$J,358.3,4250,1,2,0)
+148 ;;=2^97602
+149 ;;^UTILITY(U,$J,358.3,4250,1,3,0)
+150 ;;=3^Wound Care,Non-Selective Debridement
+151 ;;^UTILITY(U,$J,358.3,4251,0)
+152 ;;=10060^^30^251^3^^^^1
+153 ;;^UTILITY(U,$J,358.3,4251,1,0)
+154 ;;=^358.31IA^3^2
+155 ;;^UTILITY(U,$J,358.3,4251,1,2,0)
+156 ;;=2^10060
+157 ;;^UTILITY(U,$J,358.3,4251,1,3,0)
+158 ;;=3^Abscess I&D,Simp/Single
+159 ;;^UTILITY(U,$J,358.3,4252,0)
+160 ;;=10061^^30^251^4^^^^1
+161 ;;^UTILITY(U,$J,358.3,4252,1,0)
+162 ;;=^358.31IA^3^2
+163 ;;^UTILITY(U,$J,358.3,4252,1,2,0)
+164 ;;=2^10061
+165 ;;^UTILITY(U,$J,358.3,4252,1,3,0)
+166 ;;=3^Abscess I&D,Complex/Multiple
+167 ;;^UTILITY(U,$J,358.3,4253,0)
+168 ;;=26010^^30^251^5^^^^1
+169 ;;^UTILITY(U,$J,358.3,4253,1,0)
+170 ;;=^358.31IA^3^2
+171 ;;^UTILITY(U,$J,358.3,4253,1,2,0)
+172 ;;=2^26010
+173 ;;^UTILITY(U,$J,358.3,4253,1,3,0)
+174 ;;=3^Finger Abscess,Drainage,Simple
+175 ;;^UTILITY(U,$J,358.3,4254,0)
+176 ;;=11740^^30^251^7^^^^1
+177 ;;^UTILITY(U,$J,358.3,4254,1,0)
+178 ;;=^358.31IA^3^2
+179 ;;^UTILITY(U,$J,358.3,4254,1,2,0)
+180 ;;=2^11740
+181 ;;^UTILITY(U,$J,358.3,4254,1,3,0)
+182 ;;=3^Subungual Hematoma Drainage
+183 ;;^UTILITY(U,$J,358.3,4255,0)
+184 ;;=46320^^30^251^8^^^^1
+185 ;;^UTILITY(U,$J,358.3,4255,1,0)
+186 ;;=^358.31IA^3^2
+187 ;;^UTILITY(U,$J,358.3,4255,1,2,0)
+188 ;;=2^46320
+189 ;;^UTILITY(U,$J,358.3,4255,1,3,0)
+190 ;;=3^Hemorrhoid Excision,Thrombosed,External
+191 ;;^UTILITY(U,$J,358.3,4256,0)
+192 ;;=46050^^30^251^9^^^^1
+193 ;;^UTILITY(U,$J,358.3,4256,1,0)
+194 ;;=^358.31IA^3^2
+195 ;;^UTILITY(U,$J,358.3,4256,1,2,0)
+196 ;;=2^46050
+197 ;;^UTILITY(U,$J,358.3,4256,1,3,0)
+198 ;;=3^Perianal Abscess I&D
+199 ;;^UTILITY(U,$J,358.3,4257,0)
+200 ;;=56420^^30^251^10^^^^1
+201 ;;^UTILITY(U,$J,358.3,4257,1,0)
+202 ;;=^358.31IA^3^2
+203 ;;^UTILITY(U,$J,358.3,4257,1,2,0)
+204 ;;=2^56420
+205 ;;^UTILITY(U,$J,358.3,4257,1,3,0)
+206 ;;=3^Bartholin's Cyst I&D
+207 ;;^UTILITY(U,$J,358.3,4258,0)
+208 ;;=56405^^30^251^11^^^^1
+209 ;;^UTILITY(U,$J,358.3,4258,1,0)
+210 ;;=^358.31IA^3^2
+211 ;;^UTILITY(U,$J,358.3,4258,1,2,0)
+212 ;;=2^56405
+213 ;;^UTILITY(U,$J,358.3,4258,1,3,0)
+214 ;;=3^Vulva/Perineal Abscess I&D
+215 ;;^UTILITY(U,$J,358.3,4259,0)
+216 ;;=10120^^30^251^6^^^^1
+217 ;;^UTILITY(U,$J,358.3,4259,1,0)
+218 ;;=^358.31IA^3^2
+219 ;;^UTILITY(U,$J,358.3,4259,1,2,0)
+220 ;;=2^10120
+221 ;;^UTILITY(U,$J,358.3,4259,1,3,0)
+222 ;;=3^Foreign Body Removal,Subq,Simple
+223 ;;^UTILITY(U,$J,358.3,4260,0)
+224 ;;=10021^^30^251^16^^^^1
+225 ;;^UTILITY(U,$J,358.3,4260,1,0)
+226 ;;=^358.31IA^3^2
+227 ;;^UTILITY(U,$J,358.3,4260,1,2,0)
+228 ;;=2^10021
+229 ;;^UTILITY(U,$J,358.3,4260,1,3,0)
+230 ;;=3^FNA w/o Imaging Guidance,1st Lesion
+231 ;;^UTILITY(U,$J,358.3,4261,0)
+232 ;;=10004^^30^251^17^^^^1
+233 ;;^UTILITY(U,$J,358.3,4261,1,0)
+234 ;;=^358.31IA^3^2
+235 ;;^UTILITY(U,$J,358.3,4261,1,2,0)
+236 ;;=2^10004
+237 ;;^UTILITY(U,$J,358.3,4261,1,3,0)
+238 ;;=3^FNA w/o Imaging Guidance,Ea Addl Lesion
+239 ;;^UTILITY(U,$J,358.3,4262,0)
+240 ;;=11765^^30^251^18^^^^1
+241 ;;^UTILITY(U,$J,358.3,4262,1,0)
+242 ;;=^358.31IA^3^2
+243 ;;^UTILITY(U,$J,358.3,4262,1,2,0)
+244 ;;=2^11765
+245 ;;^UTILITY(U,$J,358.3,4262,1,3,0)
+246 ;;=3^Wedge Excision of Nail for Ingrown Nail
+247 ;;^UTILITY(U,$J,358.3,4263,0)
+248 ;;=90792^^30^252^1^^^^1
+249 ;;^UTILITY(U,$J,358.3,4263,1,0)
+250 ;;=^358.31IA^3^2
+251 ;;^UTILITY(U,$J,358.3,4263,1,2,0)
+252 ;;=2^90792
+253 ;;^UTILITY(U,$J,358.3,4263,1,3,0)
+254 ;;=3^Psychiatric Diagnostic Eval w/ Med Eval
+255 ;;^UTILITY(U,$J,358.3,4264,0)
+256 ;;=90839^^30^252^2^^^^1
+257 ;;^UTILITY(U,$J,358.3,4264,1,0)
+258 ;;=^358.31IA^3^2
+259 ;;^UTILITY(U,$J,358.3,4264,1,2,0)
+260 ;;=2^90839
+261 ;;^UTILITY(U,$J,358.3,4264,1,3,0)
+262 ;;=3^Psychotherapy for Crisis;1st hr
+263 ;;^UTILITY(U,$J,358.3,4265,0)
+264 ;;=90840^^30^252^3^^^^1
+265 ;;^UTILITY(U,$J,358.3,4265,1,0)
+266 ;;=^358.31IA^3^2
+267 ;;^UTILITY(U,$J,358.3,4265,1,2,0)
+268 ;;=2^90840
+269 ;;^UTILITY(U,$J,358.3,4265,1,3,0)
+270 ;;=3^Psychotherapy for Crisis;Ea Addl 30min
+271 ;;^UTILITY(U,$J,358.3,4266,0)
+272 ;;=90885^^30^252^4^^^^1
+273 ;;^UTILITY(U,$J,358.3,4266,1,0)
+274 ;;=^358.31IA^3^2
+275 ;;^UTILITY(U,$J,358.3,4266,1,2,0)
+276 ;;=2^90885
+277 ;;^UTILITY(U,$J,358.3,4266,1,3,0)
+278 ;;=3^Psych Eval of Records for Diagnostic Purposes
+279 ;;^UTILITY(U,$J,358.3,4267,0)
+280 ;;=36415^^30^253^20^^^^1
+281 ;;^UTILITY(U,$J,358.3,4267,1,0)
+282 ;;=^358.31IA^3^2
+283 ;;^UTILITY(U,$J,358.3,4267,1,2,0)
+284 ;;=2^36415
+285 ;;^UTILITY(U,$J,358.3,4267,1,3,0)
+286 ;;=3^Venous Blood Draw
+287 ;;^UTILITY(U,$J,358.3,4268,0)
+288 ;;=36000^^30^253^4^^^^1
+289 ;;^UTILITY(U,$J,358.3,4268,1,0)
+290 ;;=^358.31IA^3^2
+291 ;;^UTILITY(U,$J,358.3,4268,1,2,0)
+292 ;;=2^36000
+293 ;;^UTILITY(U,$J,358.3,4268,1,3,0)
+294 ;;=3^IV Insertion,Vein
+295 ;;^UTILITY(U,$J,358.3,4269,0)
+296 ;;=94760^^30^253^14^^^^1
+297 ;;^UTILITY(U,$J,358.3,4269,1,0)
+298 ;;=^358.31IA^3^2
+299 ;;^UTILITY(U,$J,358.3,4269,1,2,0)
+300 ;;=2^94760
+301 ;;^UTILITY(U,$J,358.3,4269,1,3,0)
+302 ;;=3^Pulse Oximetry
+303 ;;^UTILITY(U,$J,358.3,4270,0)
+304 ;;=94640^^30^253^11^^^^1
+305 ;;^UTILITY(U,$J,358.3,4270,1,0)
+306 ;;=^358.31IA^3^2
+307 ;;^UTILITY(U,$J,358.3,4270,1,2,0)
+308 ;;=2^94640
+309 ;;^UTILITY(U,$J,358.3,4270,1,3,0)
+310 ;;=3^Nebulizer Treatment
+311 ;;^UTILITY(U,$J,358.3,4271,0)
+312 ;;=94010^^30^253^13^^^^1
+313 ;;^UTILITY(U,$J,358.3,4271,1,0)
+314 ;;=^358.31IA^3^2
+315 ;;^UTILITY(U,$J,358.3,4271,1,2,0)
+316 ;;=2^94010
+317 ;;^UTILITY(U,$J,358.3,4271,1,3,0)
+318 ;;=3^Peak Flow Spirometry
+319 ;;^UTILITY(U,$J,358.3,4272,0)
+320 ;;=82948^^30^253^3^^^^1
+321 ;;^UTILITY(U,$J,358.3,4272,1,0)
+322 ;;=^358.31IA^3^2
+323 ;;^UTILITY(U,$J,358.3,4272,1,2,0)
+324 ;;=2^82948
+325 ;;^UTILITY(U,$J,358.3,4272,1,3,0)
+326 ;;=3^Glucose Finger Stick
+327 ;;^UTILITY(U,$J,358.3,4273,0)
+328 ;;=51798^^30^253^1^^^^1
+329 ;;^UTILITY(U,$J,358.3,4273,1,0)
+330 ;;=^358.31IA^3^2
+331 ;;^UTILITY(U,$J,358.3,4273,1,2,0)
+332 ;;=2^51798
+333 ;;^UTILITY(U,$J,358.3,4273,1,3,0)
+334 ;;=3^Bladder Scan PVR
+335 ;;^UTILITY(U,$J,358.3,4274,0)
+336 ;;=51702^^30^253^9^^^^1
+337 ;;^UTILITY(U,$J,358.3,4274,1,0)
+338 ;;=^358.31IA^3^2
+339 ;;^UTILITY(U,$J,358.3,4274,1,2,0)
+340 ;;=2^51702
+341 ;;^UTILITY(U,$J,358.3,4274,1,3,0)
+342 ;;=3^Insert Foley Catheter
+343 ;;^UTILITY(U,$J,358.3,4275,0)
+344 ;;=51701^^30^253^10^^^^1
+345 ;;^UTILITY(U,$J,358.3,4275,1,0)
+346 ;;=^358.31IA^3^2
+347 ;;^UTILITY(U,$J,358.3,4275,1,2,0)
+348 ;;=2^51701
+349 ;;^UTILITY(U,$J,358.3,4275,1,3,0)
+350 ;;=3^Insert Non-Indwelling Catheter
+351 ;;^UTILITY(U,$J,358.3,4276,0)
+352 ;;=81002^^30^253^17^^^^1
+353 ;;^UTILITY(U,$J,358.3,4276,1,0)
+354 ;;=^358.31IA^3^2
+355 ;;^UTILITY(U,$J,358.3,4276,1,2,0)
+356 ;;=2^81002
+357 ;;^UTILITY(U,$J,358.3,4276,1,3,0)
+358 ;;=3^UA Dipstick
+359 ;;^UTILITY(U,$J,358.3,4277,0)
+360 ;;=36430^^30^253^16^^^^1
+361 ;;^UTILITY(U,$J,358.3,4277,1,0)
+362 ;;=^358.31IA^3^2
+363 ;;^UTILITY(U,$J,358.3,4277,1,2,0)
+364 ;;=2^36430
+365 ;;^UTILITY(U,$J,358.3,4277,1,3,0)
+366 ;;=3^Transfusion,Blood/Blood Components
+367 ;;^UTILITY(U,$J,358.3,4278,0)
+368 ;;=81025^^30^253^19^^^^1
+369 ;;^UTILITY(U,$J,358.3,4278,1,0)
+370 ;;=^358.31IA^3^2
+371 ;;^UTILITY(U,$J,358.3,4278,1,2,0)
+372 ;;=2^81025
+373 ;;^UTILITY(U,$J,358.3,4278,1,3,0)
+374 ;;=3^Urine Pregnancy Test
+375 ;;^UTILITY(U,$J,358.3,4279,0)
+376 ;;=86580^^30^253^15^^^^1
+377 ;;^UTILITY(U,$J,358.3,4279,1,0)
+378 ;;=^358.31IA^3^2
+379 ;;^UTILITY(U,$J,358.3,4279,1,2,0)
+380 ;;=2^86580
+381 ;;^UTILITY(U,$J,358.3,4279,1,3,0)
+382 ;;=3^TB Skin Test
+383 ;;^UTILITY(U,$J,358.3,4280,0)
+384 ;;=T1001^^30^253^12^^^^1
+385 ;;^UTILITY(U,$J,358.3,4280,1,0)
+386 ;;=^358.31IA^3^2
+387 ;;^UTILITY(U,$J,358.3,4280,1,2,0)
+388 ;;=2^T1001
+389 ;;^UTILITY(U,$J,358.3,4280,1,3,0)
+390 ;;=3^Nursing Assessment (Pt left before seeing MD)
+391 ;;^UTILITY(U,$J,358.3,4281,0)
+392 ;;=81015^^30^253^18^^^^1
+393 ;;^UTILITY(U,$J,358.3,4281,1,0)
+394 ;;=^358.31IA^3^2
+395 ;;^UTILITY(U,$J,358.3,4281,1,2,0)
+396 ;;=2^81015
+397 ;;^UTILITY(U,$J,358.3,4281,1,3,0)
+398 ;;=3^UA Microscope in ED
+399 ;;^UTILITY(U,$J,358.3,4282,0)
+400 ;;=93005^^30^253^2^^^^1
+401 ;;^UTILITY(U,$J,358.3,4282,1,0)
+402 ;;=^358.31IA^3^2
+403 ;;^UTILITY(U,$J,358.3,4282,1,2,0)
+404 ;;=2^93005
+405 ;;^UTILITY(U,$J,358.3,4282,1,3,0)
+406 ;;=3^EKG,12 Leads +,Tracing Only
+407 ;;^UTILITY(U,$J,358.3,4283,0)
+408 ;;=96365^^30^253^5^^^^1
+409 ;;^UTILITY(U,$J,358.3,4283,1,0)
+410 ;;=^358.31IA^3^2
+411 ;;^UTILITY(U,$J,358.3,4283,1,2,0)
+412 ;;=2^96365
+413 ;;^UTILITY(U,$J,358.3,4283,1,3,0)
+414 ;;=3^Infusion,IV,Up to 1 hr
+415 ;;^UTILITY(U,$J,358.3,4284,0)
+416 ;;=96374^^30^253^6^^^^1
+417 ;;^UTILITY(U,$J,358.3,4284,1,0)
+418 ;;=^358.31IA^3^2
+419 ;;^UTILITY(U,$J,358.3,4284,1,2,0)
+420 ;;=2^96374
+421 ;;^UTILITY(U,$J,358.3,4284,1,3,0)
+422 ;;=3^Inj,IV Push
+423 ;;^UTILITY(U,$J,358.3,4285,0)
+424 ;;=96375^^30^253^7^^^^1
+425 ;;^UTILITY(U,$J,358.3,4285,1,0)
+426 ;;=^358.31IA^3^2
+427 ;;^UTILITY(U,$J,358.3,4285,1,2,0)
+428 ;;=2^96375
+429 ;;^UTILITY(U,$J,358.3,4285,1,3,0)
+430 ;;=3^Inj,IV Push,Ea Addl
+431 ;;^UTILITY(U,$J,358.3,4286,0)
+432 ;;=96372^^30^253^8^^^^1
+433 ;;^UTILITY(U,$J,358.3,4286,1,0)
+434 ;;=^358.31IA^3^2
+435 ;;^UTILITY(U,$J,358.3,4286,1,2,0)
+436 ;;=2^96372
+437 ;;^UTILITY(U,$J,358.3,4286,1,3,0)
+438 ;;=3^Inj,SC/IM
+439 ;;^UTILITY(U,$J,358.3,4287,0)
+440 ;;=96360^^30^254^1^^^^1
+441 ;;^UTILITY(U,$J,358.3,4287,1,0)
+442 ;;=^358.31IA^3^2
+443 ;;^UTILITY(U,$J,358.3,4287,1,2,0)
+444 ;;=2^96360
+445 ;;^UTILITY(U,$J,358.3,4287,1,3,0)
+446 ;;=3^Hydration,IV,1st Hr
+447 ;;^UTILITY(U,$J,358.3,4288,0)
+448 ;;=96361^^30^254^2^^^^1
+449 ;;^UTILITY(U,$J,358.3,4288,1,0)
+450 ;;=^358.31IA^3^2
+451 ;;^UTILITY(U,$J,358.3,4288,1,2,0)
+452 ;;=2^96361
+453 ;;^UTILITY(U,$J,358.3,4288,1,3,0)
+454 ;;=3^Hydration,IV,Ea Addl Hr
+455 ;;^UTILITY(U,$J,358.3,4289,0)
+456 ;;=96366^^30^254^4^^^^1
+457 ;;^UTILITY(U,$J,358.3,4289,1,0)
+458 ;;=^358.31IA^3^2
+459 ;;^UTILITY(U,$J,358.3,4289,1,2,0)
+460 ;;=2^96366
+461 ;;^UTILITY(U,$J,358.3,4289,1,3,0)
+462 ;;=3^Infusion,IV,Ea Addl Hr
+463 ;;^UTILITY(U,$J,358.3,4290,0)
+464 ;;=96365^^30^254^3^^^^1
+465 ;;^UTILITY(U,$J,358.3,4290,1,0)
+466 ;;=^358.31IA^3^2
+467 ;;^UTILITY(U,$J,358.3,4290,1,2,0)
+468 ;;=2^96365
+469 ;;^UTILITY(U,$J,358.3,4290,1,3,0)
+470 ;;=3^Infusion,IV,Up to 1 Hr
+471 ;;^UTILITY(U,$J,358.3,4291,0)
+472 ;;=96374^^30^254^6^^^^1
+473 ;;^UTILITY(U,$J,358.3,4291,1,0)
+474 ;;=^358.31IA^3^2
+475 ;;^UTILITY(U,$J,358.3,4291,1,2,0)
+476 ;;=2^96374
+477 ;;^UTILITY(U,$J,358.3,4291,1,3,0)
+478 ;;=3^Inj,IV Push
+479 ;;^UTILITY(U,$J,358.3,4292,0)
+480 ;;=96375^^30^254^7^^^^1
+481 ;;^UTILITY(U,$J,358.3,4292,1,0)
+482 ;;=^358.31IA^3^2
+483 ;;^UTILITY(U,$J,358.3,4292,1,2,0)
+484 ;;=2^96375
+485 ;;^UTILITY(U,$J,358.3,4292,1,3,0)
+486 ;;=3^Inj,IV Push Ea Addl
+487 ;;^UTILITY(U,$J,358.3,4293,0)
+488 ;;=96372^^30^254^8^^^^1
+489 ;;^UTILITY(U,$J,358.3,4293,1,0)
+490 ;;=^358.31IA^3^2
+491 ;;^UTILITY(U,$J,358.3,4293,1,2,0)
+492 ;;=2^96372
+493 ;;^UTILITY(U,$J,358.3,4293,1,3,0)
+494 ;;=3^Inj,SC/IM
+495 ;;^UTILITY(U,$J,358.3,4294,0)
+496 ;;=96367^^30^254^5^^^^1
+497 ;;^UTILITY(U,$J,358.3,4294,1,0)
+498 ;;=^358.31IA^3^2
+499 ;;^UTILITY(U,$J,358.3,4294,1,2,0)
+500 ;;=2^96367
+501 ;;^UTILITY(U,$J,358.3,4294,1,3,0)
+502 ;;=3^Infusion,IV,Addl Seq Infus New Med/Sub,Up to 1 hr
+503 ;;^UTILITY(U,$J,358.3,4295,0)
+504 ;;=99217^^30^255^1^^^^1
+505 ;;^UTILITY(U,$J,358.3,4295,1,0)
+506 ;;=^358.31IA^3^2
+507 ;;^UTILITY(U,$J,358.3,4295,1,2,0)
+508 ;;=2^99217
+509 ;;^UTILITY(U,$J,358.3,4295,1,3,0)
+510 ;;=3^Observation Care Discharge
+511 ;;^UTILITY(U,$J,358.3,4296,0)
+512 ;;=99292^^30^255^2^^^^1
+513 ;;^UTILITY(U,$J,358.3,4296,1,0)
+514 ;;=^358.31IA^3^2
+515 ;;^UTILITY(U,$J,358.3,4296,1,2,0)
+516 ;;=2^99292
+517 ;;^UTILITY(U,$J,358.3,4296,1,3,0)
+518 ;;=3^Critical Care,Ea Addl 30 min
+519 ;;^UTILITY(U,$J,358.3,4297,0)
+520 ;;=0011A^^30^256^1^^^^1
+521 ;;^UTILITY(U,$J,358.3,4297,1,0)
+522 ;;=^358.31IA^3^2
+523 ;;^UTILITY(U,$J,358.3,4297,1,2,0)
+524 ;;=2^0011A
+525 ;;^UTILITY(U,$J,358.3,4297,1,3,0)
+526 ;;=3^Admin COVID-19 Vaccine (Moderna),1st Dose
+527 ;;^UTILITY(U,$J,358.3,4298,0)
+528 ;;=0012A^^30^256^2^^^^1
+529 ;;^UTILITY(U,$J,358.3,4298,1,0)
+530 ;;=^358.31IA^3^2
+531 ;;^UTILITY(U,$J,358.3,4298,1,2,0)
+532 ;;=2^0012A
+533 ;;^UTILITY(U,$J,358.3,4298,1,3,0)
+534 ;;=3^Admin COVID-19 Vaccine (Moderna),2nd Dose
+535 ;;^UTILITY(U,$J,358.3,4299,0)
+536 ;;=0001A^^30^256^3^^^^1
+537 ;;^UTILITY(U,$J,358.3,4299,1,0)
+538 ;;=^358.31IA^3^2
+539 ;;^UTILITY(U,$J,358.3,4299,1,2,0)
+540 ;;=2^0001A
+541 ;;^UTILITY(U,$J,358.3,4299,1,3,0)
+542 ;;=3^Admin COVID-19 Vaccine (Pfizer),1st Dose
+543 ;;^UTILITY(U,$J,358.3,4300,0)
+544 ;;=0002A^^30^256^4^^^^1
+545 ;;^UTILITY(U,$J,358.3,4300,1,0)
+546 ;;=^358.31IA^3^2
+547 ;;^UTILITY(U,$J,358.3,4300,1,2,0)
+548 ;;=2^0002A
+549 ;;^UTILITY(U,$J,358.3,4300,1,3,0)
+550 ;;=3^Admin COVID-19 Vaccine (Pfizer),2nd Dose
+551 ;;^UTILITY(U,$J,358.3,4301,0)
+552 ;;=Q0243^^30^256^7^^^^1
+553 ;;^UTILITY(U,$J,358.3,4301,1,0)
+554 ;;=^358.31IA^3^2
+555 ;;^UTILITY(U,$J,358.3,4301,1,2,0)
+556 ;;=2^Q0243
+557 ;;^UTILITY(U,$J,358.3,4301,1,3,0)
+558 ;;=3^Casirivimab & Imdevimab 2400mg
+559 ;;^UTILITY(U,$J,358.3,4302,0)
+560 ;;=M0243^^30^256^8^^^^1
+561 ;;^UTILITY(U,$J,358.3,4302,1,0)
+562 ;;=^358.31IA^3^2
+563 ;;^UTILITY(U,$J,358.3,4302,1,2,0)
+564 ;;=2^M0243
+565 ;;^UTILITY(U,$J,358.3,4302,1,3,0)
+566 ;;=3^Casirivimab & Imdevimab Infusion
+567 ;;^UTILITY(U,$J,358.3,4303,0)
+568 ;;=91300^^30^256^9^^^^1
+569 ;;^UTILITY(U,$J,358.3,4303,1,0)
+570 ;;=^358.31IA^3^2
+571 ;;^UTILITY(U,$J,358.3,4303,1,2,0)
+572 ;;=2^91300
+573 ;;^UTILITY(U,$J,358.3,4303,1,3,0)
+574 ;;=3^SARSCOV2 Vaccine 0.3ml (Pfizer)
+575 ;;^UTILITY(U,$J,358.3,4304,0)
+576 ;;=91301^^30^256^10^^^^1
+577 ;;^UTILITY(U,$J,358.3,4304,1,0)
+578 ;;=^358.31IA^3^2
+579 ;;^UTILITY(U,$J,358.3,4304,1,2,0)
+580 ;;=2^91301
+581 ;;^UTILITY(U,$J,358.3,4304,1,3,0)
+582 ;;=3^SARSCOV2 Vaccine 0.5ml (Moderna)
+583 ;;^UTILITY(U,$J,358.3,4305,0)
+584 ;;=M0245^^30^256^5^^^^1
+585 ;;^UTILITY(U,$J,358.3,4305,1,0)
+586 ;;=^358.31IA^3^2
+587 ;;^UTILITY(U,$J,358.3,4305,1,2,0)
+588 ;;=2^M0245
+589 ;;^UTILITY(U,$J,358.3,4305,1,3,0)
+590 ;;=3^Bamlanivimab Infusion w/ Post Admin Monitoring
+591 ;;^UTILITY(U,$J,358.3,4306,0)
+592 ;;=Q0245^^30^256^6^^^^1
+593 ;;^UTILITY(U,$J,358.3,4306,1,0)
+594 ;;=^358.31IA^3^2
+595 ;;^UTILITY(U,$J,358.3,4306,1,2,0)
+596 ;;=2^Q0245
+597 ;;^UTILITY(U,$J,358.3,4306,1,3,0)
+598 ;;=3^Bamlanivivab 700mg
+599 ;;^UTILITY(U,$J,358.3,4307,0)
+600 ;;=87337^^30^256^11^^^^1
+601 ;;^UTILITY(U,$J,358.3,4307,1,0)
+602 ;;=^358.31IA^3^2
+603 ;;^UTILITY(U,$J,358.3,4307,1,2,0)
+604 ;;=2^87337
+605 ;;^UTILITY(U,$J,358.3,4307,1,3,0)
+606 ;;=3^IADNA SARS COV2 & INF A&b &RSV Multi Ampr Probe TQ
+607 ;;^UTILITY(U,$J,358.3,4308,0)
+608 ;;=U0002^^30^256^12^^^^1
+609 ;;^UTILITY(U,$J,358.3,4308,1,0)
+610 ;;=^358.31IA^3^2
+611 ;;^UTILITY(U,$J,358.3,4308,1,2,0)
+612 ;;=2^U0002
+613 ;;^UTILITY(U,$J,358.3,4308,1,3,0)
+614 ;;=3^COVID-19 Lab Test,Non-CDC
+615 ;;^UTILITY(U,$J,358.3,4309,0)
+616 ;;=H0033^^30^257^2^^^^1
+617 ;;^UTILITY(U,$J,358.3,4309,1,0)
+618 ;;=^358.31IA^3^2
+619 ;;^UTILITY(U,$J,358.3,4309,1,2,0)
+620 ;;=2^H0033
+621 ;;^UTILITY(U,$J,358.3,4309,1,3,0)
+622 ;;=3^Oral Med Admin,Direct Observation
+623 ;;^UTILITY(U,$J,358.3,4310,0)
+624 ;;=2010F^^30^257^3^^^^1
+625 ;;^UTILITY(U,$J,358.3,4310,1,0)
+626 ;;=^358.31IA^3^2
+627 ;;^UTILITY(U,$J,358.3,4310,1,2,0)
+628 ;;=2^2010F
+629 ;;^UTILITY(U,$J,358.3,4310,1,3,0)
+630 ;;=3^Vital Signs Recorded
+631 ;;^UTILITY(U,$J,358.3,4311,0)
+632 ;;=3319F^^30^257^1^^^^1
+633 ;;^UTILITY(U,$J,358.3,4311,1,0)
+634 ;;=^358.31IA^3^2
+635 ;;^UTILITY(U,$J,358.3,4311,1,2,0)
+636 ;;=2^3319F
+637 ;;^UTILITY(U,$J,358.3,4311,1,3,0)
+638 ;;=3^1 Dx Img Order: Chest XRay,CT,US,MRI
+639 ;;^UTILITY(U,$J,358.3,4312,0)
+640 ;;=81001^^30^258^4^^^^1
+641 ;;^UTILITY(U,$J,358.3,4312,1,0)
+642 ;;=^358.31IA^3^2
+643 ;;^UTILITY(U,$J,358.3,4312,1,2,0)
+644 ;;=2^81001
+645 ;;^UTILITY(U,$J,358.3,4312,1,3,0)
+646 ;;=3^UA Auto w/ Microscopy
+647 ;;^UTILITY(U,$J,358.3,4313,0)
+648 ;;=80305^^30^258^3^^^^1
+649 ;;^UTILITY(U,$J,358.3,4313,1,0)
+650 ;;=^358.31IA^3^2
+651 ;;^UTILITY(U,$J,358.3,4313,1,2,0)
+652 ;;=2^80305
+653 ;;^UTILITY(U,$J,358.3,4313,1,3,0)
+654 ;;=3^Drug Test Prsmv Read,Direct Optical Obs
+655 ;;^UTILITY(U,$J,358.3,4314,0)
+656 ;;=80048^^30^258^2^^^^1
+657 ;;^UTILITY(U,$J,358.3,4314,1,0)
+658 ;;=^358.31IA^3^2
+659 ;;^UTILITY(U,$J,358.3,4314,1,2,0)
+660 ;;=2^80048
+661 ;;^UTILITY(U,$J,358.3,4314,1,3,0)
+662 ;;=3^Chem 7 (CMP)
+663 ;;^UTILITY(U,$J,358.3,4315,0)
+664 ;;=85025^^30^258^1^^^^1
+665 ;;^UTILITY(U,$J,358.3,4315,1,0)
+666 ;;=^358.31IA^3^2
