IBDEI05V ; ; 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,14182,1,4,0)
;;=4^Z56.0
;;^UTILITY(U,$J,358.3,14182,2)
;;=^5063107
;;^UTILITY(U,$J,358.3,14183,0)
;;=Z59.01^^53^606^7
;;^UTILITY(U,$J,358.3,14183,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14183,1,3,0)
;;=3^Homelessness,Sheltered
;;^UTILITY(U,$J,358.3,14183,1,4,0)
;;=4^Z59.01
;;^UTILITY(U,$J,358.3,14183,2)
;;=^5161305
;;^UTILITY(U,$J,358.3,14184,0)
;;=Z59.02^^53^606^8
;;^UTILITY(U,$J,358.3,14184,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14184,1,3,0)
;;=3^Homelessness,Unsheltered
;;^UTILITY(U,$J,358.3,14184,1,4,0)
;;=4^Z59.02
;;^UTILITY(U,$J,358.3,14184,2)
;;=^5161306
;;^UTILITY(U,$J,358.3,14185,0)
;;=Z59.00^^53^606^9
;;^UTILITY(U,$J,358.3,14185,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14185,1,3,0)
;;=3^Homelessness,Unspec
;;^UTILITY(U,$J,358.3,14185,1,4,0)
;;=4^Z59.00
;;^UTILITY(U,$J,358.3,14185,2)
;;=^5161304
;;^UTILITY(U,$J,358.3,14186,0)
;;=Z59.41^^53^606^6
;;^UTILITY(U,$J,358.3,14186,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14186,1,3,0)
;;=3^Food Insecurity
;;^UTILITY(U,$J,358.3,14186,1,4,0)
;;=4^Z59.41
;;^UTILITY(U,$J,358.3,14186,2)
;;=^5161307
;;^UTILITY(U,$J,358.3,14187,0)
;;=Z59.5^^53^606^4
;;^UTILITY(U,$J,358.3,14187,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14187,1,3,0)
;;=3^Extreme Poverty
;;^UTILITY(U,$J,358.3,14187,1,4,0)
;;=4^Z59.5
;;^UTILITY(U,$J,358.3,14187,2)
;;=^5063134
;;^UTILITY(U,$J,358.3,14188,0)
;;=Z59.6^^53^606^11
;;^UTILITY(U,$J,358.3,14188,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14188,1,3,0)
;;=3^Low Income
;;^UTILITY(U,$J,358.3,14188,1,4,0)
;;=4^Z59.6
;;^UTILITY(U,$J,358.3,14188,2)
;;=^5063135
;;^UTILITY(U,$J,358.3,14189,0)
;;=Z62.810^^53^606^13
;;^UTILITY(U,$J,358.3,14189,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14189,1,3,0)
;;=3^Personal Hx Physical/Sexual Abuse in Childhood
;;^UTILITY(U,$J,358.3,14189,1,4,0)
;;=4^Z62.810
;;^UTILITY(U,$J,358.3,14189,2)
;;=^5063153
;;^UTILITY(U,$J,358.3,14190,0)
;;=Z62.811^^53^606^14
;;^UTILITY(U,$J,358.3,14190,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14190,1,3,0)
;;=3^Personal Hx Psychological Abuse in Childhood
;;^UTILITY(U,$J,358.3,14190,1,4,0)
;;=4^Z62.811
;;^UTILITY(U,$J,358.3,14190,2)
;;=^5063154
;;^UTILITY(U,$J,358.3,14191,0)
;;=Z62.812^^53^606^12
;;^UTILITY(U,$J,358.3,14191,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14191,1,3,0)
;;=3^Personal Hx Neglect in Childhood
;;^UTILITY(U,$J,358.3,14191,1,4,0)
;;=4^Z62.812
;;^UTILITY(U,$J,358.3,14191,2)
;;=^5063155
;;^UTILITY(U,$J,358.3,14192,0)
;;=Z63.0^^53^606^16
;;^UTILITY(U,$J,358.3,14192,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14192,1,3,0)
;;=3^Problems w/ Spouse/Partner Relationship
;;^UTILITY(U,$J,358.3,14192,1,4,0)
;;=4^Z63.0
;;^UTILITY(U,$J,358.3,14192,2)
;;=^5063164
;;^UTILITY(U,$J,358.3,14193,0)
;;=Z63.1^^53^606^15
;;^UTILITY(U,$J,358.3,14193,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14193,1,3,0)
;;=3^Problems w/ In-Laws
;;^UTILITY(U,$J,358.3,14193,1,4,0)
;;=4^Z63.1
;;^UTILITY(U,$J,358.3,14193,2)
;;=^5063165
;;^UTILITY(U,$J,358.3,14194,0)
;;=Z63.4^^53^606^2
;;^UTILITY(U,$J,358.3,14194,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14194,1,3,0)
;;=3^Bereavement
;;^UTILITY(U,$J,358.3,14194,1,4,0)
;;=4^Z63.4
;;^UTILITY(U,$J,358.3,14194,2)
;;=^5063168
;;^UTILITY(U,$J,358.3,14195,0)
;;=Z63.5^^53^606^5
;;^UTILITY(U,$J,358.3,14195,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14195,1,3,0)
;;=3^Family Disruption by Separation/Divorce
;;^UTILITY(U,$J,358.3,14195,1,4,0)
;;=4^Z63.5
;;^UTILITY(U,$J,358.3,14195,2)
;;=^5063169
;;^UTILITY(U,$J,358.3,14196,0)
;;=Z63.6^^53^606^3
;;^UTILITY(U,$J,358.3,14196,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14196,1,3,0)
;;=3^Dependent Relative Needing Home Care
;;^UTILITY(U,$J,358.3,14196,1,4,0)
;;=4^Z63.6
;;^UTILITY(U,$J,358.3,14196,2)
;;=^5063170
;;^UTILITY(U,$J,358.3,14197,0)
;;=Z63.72^^53^606^1
;;^UTILITY(U,$J,358.3,14197,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14197,1,3,0)
;;=3^Alcoholism/Drug Addiction in Family
;;^UTILITY(U,$J,358.3,14197,1,4,0)
;;=4^Z63.72
;;^UTILITY(U,$J,358.3,14197,2)
;;=^5063172
;;^UTILITY(U,$J,358.3,14198,0)
;;=Z65.3^^53^606^10
;;^UTILITY(U,$J,358.3,14198,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14198,1,3,0)
;;=3^Legal Problems
;;^UTILITY(U,$J,358.3,14198,1,4,0)
;;=4^Z65.3
;;^UTILITY(U,$J,358.3,14198,2)
;;=^5063182
;;^UTILITY(U,$J,358.3,14199,0)
;;=99202^^54^607^1
;;^UTILITY(U,$J,358.3,14199,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,14199,1,1,0)
;;=1^SF MDM or 15-29 min
;;^UTILITY(U,$J,358.3,14199,1,2,0)
;;=2^99202
;;^UTILITY(U,$J,358.3,14200,0)
;;=99203^^54^607^2
;;^UTILITY(U,$J,358.3,14200,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,14200,1,1,0)
;;=1^Low Complex MDM or 30-44 min
;;^UTILITY(U,$J,358.3,14200,1,2,0)
;;=2^99203
;;^UTILITY(U,$J,358.3,14201,0)
;;=99204^^54^607^3
;;^UTILITY(U,$J,358.3,14201,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,14201,1,1,0)
;;=1^Mod Complex MDM or 45-59 min
;;^UTILITY(U,$J,358.3,14201,1,2,0)
;;=2^99204
;;^UTILITY(U,$J,358.3,14202,0)
;;=99205^^54^607^4
;;^UTILITY(U,$J,358.3,14202,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,14202,1,1,0)
;;=1^High Complex MDM or 60-74 min
;;^UTILITY(U,$J,358.3,14202,1,2,0)
;;=2^99205
;;^UTILITY(U,$J,358.3,14203,0)
;;=99211^^54^608^1
;;^UTILITY(U,$J,358.3,14203,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,14203,1,1,0)
;;=1^Brief (no MD seen)
;;^UTILITY(U,$J,358.3,14203,1,2,0)
;;=2^99211
;;^UTILITY(U,$J,358.3,14204,0)
;;=99212^^54^608^2
;;^UTILITY(U,$J,358.3,14204,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,14204,1,1,0)
;;=1^SF MDM or 10-19 min
;;^UTILITY(U,$J,358.3,14204,1,2,0)
;;=2^99212
;;^UTILITY(U,$J,358.3,14205,0)
;;=99213^^54^608^3
;;^UTILITY(U,$J,358.3,14205,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,14205,1,1,0)
;;=1^Low Complex MDM or 20-29 min
;;^UTILITY(U,$J,358.3,14205,1,2,0)
;;=2^99213
;;^UTILITY(U,$J,358.3,14206,0)
;;=99214^^54^608^4
;;^UTILITY(U,$J,358.3,14206,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,14206,1,1,0)
;;=1^Mod Complex MDM or 30-39 min
;;^UTILITY(U,$J,358.3,14206,1,2,0)
;;=2^99214
;;^UTILITY(U,$J,358.3,14207,0)
;;=99215^^54^608^5
;;^UTILITY(U,$J,358.3,14207,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,14207,1,1,0)
;;=1^High Complex MDM or 40-54 min
;;^UTILITY(U,$J,358.3,14207,1,2,0)
;;=2^99215
;;^UTILITY(U,$J,358.3,14208,0)
;;=99241^^54^609^1
;;^UTILITY(U,$J,358.3,14208,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,14208,1,1,0)
;;=1^Problem Focus
;;^UTILITY(U,$J,358.3,14208,1,2,0)
;;=2^99241
;;^UTILITY(U,$J,358.3,14209,0)
;;=99242^^54^609^2
;;^UTILITY(U,$J,358.3,14209,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,14209,1,1,0)
;;=1^Exp Problem Focus
;;^UTILITY(U,$J,358.3,14209,1,2,0)
;;=2^99242
;;^UTILITY(U,$J,358.3,14210,0)
;;=99243^^54^609^3
;;^UTILITY(U,$J,358.3,14210,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,14210,1,1,0)
;;=1^Detailed
;;^UTILITY(U,$J,358.3,14210,1,2,0)
;;=2^99243
;;^UTILITY(U,$J,358.3,14211,0)
;;=99244^^54^609^4
;;^UTILITY(U,$J,358.3,14211,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,14211,1,1,0)
;;=1^Comprehensive,MDM
;;^UTILITY(U,$J,358.3,14211,1,2,0)
;;=2^99244
;;^UTILITY(U,$J,358.3,14212,0)
;;=99245^^54^609^5
;;^UTILITY(U,$J,358.3,14212,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,14212,1,1,0)
;;=1^Comprehensive,HDM
;;^UTILITY(U,$J,358.3,14212,1,2,0)
;;=2^99245
;;^UTILITY(U,$J,358.3,14213,0)
;;=99395^^54^610^1
;;^UTILITY(U,$J,358.3,14213,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,14213,1,1,0)
;;=1^Preventive Med,Est Pt,18-39
;;^UTILITY(U,$J,358.3,14213,1,2,0)
;;=2^99395
;;^UTILITY(U,$J,358.3,14214,0)
;;=99396^^54^610^2
;;^UTILITY(U,$J,358.3,14214,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,14214,1,1,0)
;;=1^Preventive Med,Est Pt,40-64
;;^UTILITY(U,$J,358.3,14214,1,2,0)
;;=2^99396
;;^UTILITY(U,$J,358.3,14215,0)
;;=99397^^54^610^3
;;^UTILITY(U,$J,358.3,14215,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,14215,1,1,0)
;;=1^Preventive Med,Est Pt > 64
;;^UTILITY(U,$J,358.3,14215,1,2,0)
;;=2^99397
;;^UTILITY(U,$J,358.3,14216,0)
;;=99385^^54^611^1
;;^UTILITY(U,$J,358.3,14216,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,14216,1,1,0)
;;=1^Preventive Med,New Pt,18-39
;;^UTILITY(U,$J,358.3,14216,1,2,0)
;;=2^99385
;;^UTILITY(U,$J,358.3,14217,0)
;;=99386^^54^611^2
;;^UTILITY(U,$J,358.3,14217,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,14217,1,1,0)
;;=1^Preventive Med,New Pt,40-64
;;^UTILITY(U,$J,358.3,14217,1,2,0)
;;=2^99386
;;^UTILITY(U,$J,358.3,14218,0)
;;=99387^^54^611^3
;;^UTILITY(U,$J,358.3,14218,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,14218,1,1,0)
;;=1^Preventive Med,New Pt > 64
;;^UTILITY(U,$J,358.3,14218,1,2,0)
;;=2^99387
;;^UTILITY(U,$J,358.3,14219,0)
;;=99495^^54^612^1
;;^UTILITY(U,$J,358.3,14219,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,14219,1,1,0)
;;=1^TCM Svc w/in 14 days of D/C w/ Mod MDM
;;^UTILITY(U,$J,358.3,14219,1,2,0)
;;=2^99495
;;^UTILITY(U,$J,358.3,14220,0)
;;=99496^^54^612^2
;;^UTILITY(U,$J,358.3,14220,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,14220,1,1,0)
;;=1^TCM Svc w/in 7 days of D/C w/ High MDM
;;^UTILITY(U,$J,358.3,14220,1,2,0)
;;=2^99496
;;^UTILITY(U,$J,358.3,14221,0)
;;=90632^^55^613^9^^^^1
;;^UTILITY(U,$J,358.3,14221,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,14221,1,2,0)
;;=2^90632
;;^UTILITY(U,$J,358.3,14221,1,3,0)
;;=3^Hepatitis A Vaccine
;;^UTILITY(U,$J,358.3,14222,0)
;;=90746^^55^613^11^^^^1
;;^UTILITY(U,$J,358.3,14222,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,14222,1,2,0)
;;=2^90746
;;^UTILITY(U,$J,358.3,14222,1,3,0)
;;=3^Hepatitis B Vaccine
;;^UTILITY(U,$J,358.3,14223,0)
;;=90636^^55^613^10^^^^1
;;^UTILITY(U,$J,358.3,14223,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,14223,1,2,0)
;;=2^90636
;;^UTILITY(U,$J,358.3,14223,1,3,0)
;;=3^Hepatitis A&B Vaccine
;;^UTILITY(U,$J,358.3,14224,0)
;;=90707^^55^613^12^^^^1
;;^UTILITY(U,$J,358.3,14224,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,14224,1,2,0)
;;=2^90707
;;^UTILITY(U,$J,358.3,14224,1,3,0)
;;=3^MMR Vaccine
;;^UTILITY(U,$J,358.3,14225,0)
;;=90732^^55^613^17^^^^1
;;^UTILITY(U,$J,358.3,14225,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,14225,1,2,0)
;;=2^90732
;;^UTILITY(U,$J,358.3,14225,1,3,0)
;;=3^Pneumovax (Pneumococcal Vaccine)
;;^UTILITY(U,$J,358.3,14226,0)
;;=90714^^55^613^24^^^^1
;;^UTILITY(U,$J,358.3,14226,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,14226,1,2,0)
;;=2^90714
;;^UTILITY(U,$J,358.3,14226,1,3,0)
;;=3^TD Vaccine
;;^UTILITY(U,$J,358.3,14227,0)
;;=90662^^55^613^4^^^^1
;;^UTILITY(U,$J,358.3,14227,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,14227,1,2,0)
;;=2^90662
;;^UTILITY(U,$J,358.3,14227,1,3,0)
;;=3^Flu Vaccine High Dose Syringe (Fluzone)
;;^UTILITY(U,$J,358.3,14228,0)
;;=90715^^55^613^25^^^^1
;;^UTILITY(U,$J,358.3,14228,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,14228,1,2,0)
;;=2^90715
;;^UTILITY(U,$J,358.3,14228,1,3,0)
;;=3^Tdap Vaccine
;;^UTILITY(U,$J,358.3,14229,0)
;;=90736^^55^613^26^^^^1
;;^UTILITY(U,$J,358.3,14229,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,14229,1,2,0)
;;=2^90736
;;^UTILITY(U,$J,358.3,14229,1,3,0)
;;=3^Zoster (Shingles) Vaccine
;;^UTILITY(U,$J,358.3,14230,0)
;;=90585^^55^613^1^^^^1
;;^UTILITY(U,$J,358.3,14230,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,14230,1,2,0)
;;=2^90585
;;^UTILITY(U,$J,358.3,14230,1,3,0)
;;=3^BCG Vaccine Percut
;;^UTILITY(U,$J,358.3,14231,0)
;;=90649^^55^613^8^^^^1
;;^UTILITY(U,$J,358.3,14231,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,14231,1,2,0)
;;=2^90649
;;^UTILITY(U,$J,358.3,14231,1,3,0)
;;=3^HPV Vaccine
;;^UTILITY(U,$J,358.3,14232,0)
;;=90675^^55^613^21^^^^1
;;^UTILITY(U,$J,358.3,14232,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,14232,1,2,0)
;;=2^90675
;;^UTILITY(U,$J,358.3,14232,1,3,0)
;;=3^Rabies Vaccine
;;^UTILITY(U,$J,358.3,14233,0)
;;=90676^^55^613^22^^^^1
;;^UTILITY(U,$J,358.3,14233,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,14233,1,2,0)
;;=2^90676
;;^UTILITY(U,$J,358.3,14233,1,3,0)
;;=3^Rabies Vaccine ID
;;^UTILITY(U,$J,358.3,14234,0)
;;=90680^^55^613^23^^^^1
;;^UTILITY(U,$J,358.3,14234,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,14234,1,2,0)
;;=2^90680
;;^UTILITY(U,$J,358.3,14234,1,3,0)
;;=3^Rotovirus Vaccine,Oral
;;^UTILITY(U,$J,358.3,14235,0)
;;=90698^^55^613^2^^^^1
;;^UTILITY(U,$J,358.3,14235,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,14235,1,2,0)
;;=2^90698
;;^UTILITY(U,$J,358.3,14235,1,3,0)
;;=3^DTAP-HIB-IP Vaccine
;;^UTILITY(U,$J,358.3,14236,0)
;;=90710^^55^613^13^^^^1
;;^UTILITY(U,$J,358.3,14236,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,14236,1,2,0)
;;=2^90710
;;^UTILITY(U,$J,358.3,14236,1,3,0)
;;=3^MMRV Vaccine
;;^UTILITY(U,$J,358.3,14237,0)
;;=90713^^55^613^18^^^^1
;;^UTILITY(U,$J,358.3,14237,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,14237,1,2,0)
;;=2^90713
;;^UTILITY(U,$J,358.3,14237,1,3,0)
;;=3^Poliovirus IPV Vaccine
;;^UTILITY(U,$J,358.3,14238,0)
;;=90723^^55^613^3^^^^1
;;^UTILITY(U,$J,358.3,14238,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,14238,1,2,0)
;;=2^90723
;;^UTILITY(U,$J,358.3,14238,1,3,0)
;;=3^DTAP-Hep B-IPV Vaccine
;;^UTILITY(U,$J,358.3,14239,0)
;;=90734^^55^613^14^^^^1
;;^UTILITY(U,$J,358.3,14239,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,14239,1,2,0)
;;=2^90734
;;^UTILITY(U,$J,358.3,14239,1,3,0)
;;=3^Meningococcal Vaccine
;;^UTILITY(U,$J,358.3,14240,0)
;;=90688^^55^613^5^^^^1
;;^UTILITY(U,$J,358.3,14240,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,14240,1,2,0)
;;=2^90688
;;^UTILITY(U,$J,358.3,14240,1,3,0)
;;=3^Flu Vaccine Multi Dose Syringe (Flulval)
;;^UTILITY(U,$J,358.3,14241,0)
;;=90686^^55^613^6^^^^1
;;^UTILITY(U,$J,358.3,14241,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,14241,1,2,0)
;;=2^90686
;;^UTILITY(U,$J,358.3,14241,1,3,0)
;;=3^Flu Vaccine Single Dose Syringe (Fluzone/Fluarix)
;;^UTILITY(U,$J,358.3,14242,0)
;;=90670^^55^613^19^^^^1
;;^UTILITY(U,$J,358.3,14242,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,14242,1,2,0)
;;=2^90670
;;^UTILITY(U,$J,358.3,14242,1,3,0)
;;=3^Prevnar 13 (Pneumococcal Vaccine)
;;^UTILITY(U,$J,358.3,14243,0)
;;=90673^^55^613^20^^^^1
;;^UTILITY(U,$J,358.3,14243,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,14243,1,2,0)
;;=2^90673
;;^UTILITY(U,$J,358.3,14243,1,3,0)
;;=3^RIV3 Vaccine,No Preserv
;;^UTILITY(U,$J,358.3,14244,0)
;;=90653^^55^613^7^^^^1
;;^UTILITY(U,$J,358.3,14244,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,14244,1,2,0)
;;=2^90653
;;^UTILITY(U,$J,358.3,14244,1,3,0)
;;=3^Flu Vaccine Single Dose Trivalent IIV3 (Fluad)
;;^UTILITY(U,$J,358.3,14245,0)
;;=90671^^55^613^15^^^^1
;;^UTILITY(U,$J,358.3,14245,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,14245,1,2,0)
;;=2^90671
;;^UTILITY(U,$J,358.3,14245,1,3,0)
;;=3^Pneumococcal Vaccine 15 Val,IM
;;^UTILITY(U,$J,358.3,14246,0)
;;=90677^^55^613^16^^^^1
;;^UTILITY(U,$J,358.3,14246,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,14246,1,2,0)
;;=2^90677
;;^UTILITY(U,$J,358.3,14246,1,3,0)
;;=3^Pneumococcal Vaccine 20 Val,IM
;;^UTILITY(U,$J,358.3,14247,0)
;;=J3301^^55^614^16^^^^1
;;^UTILITY(U,$J,358.3,14247,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,14247,1,2,0)
;;=2^J3301
;;^UTILITY(U,$J,358.3,14247,1,3,0)
;;=3^Kenalog, per 10 mg
;;^UTILITY(U,$J,358.3,14248,0)
;;=J9217^^55^614^18^^^^1
;;^UTILITY(U,$J,358.3,14248,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,14248,1,2,0)
;;=2^J9217
;;^UTILITY(U,$J,358.3,14248,1,3,0)
;;=3^Lupron, per 7.5 mg
;;^UTILITY(U,$J,358.3,14249,0)
;;=J1885^^55^614^28^^^^1
;;^UTILITY(U,$J,358.3,14249,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,14249,1,2,0)
;;=2^J1885
;;^UTILITY(U,$J,358.3,14249,1,3,0)
;;=3^Toradol, per 15mg
;;^UTILITY(U,$J,358.3,14250,0)
;;=J3420^^55^614^29^^^^1
;;^UTILITY(U,$J,358.3,14250,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,14250,1,2,0)
;;=2^J3420
;;^UTILITY(U,$J,358.3,14250,1,3,0)
;;=3^Vitamin B12, per 1000mcg
;;^UTILITY(U,$J,358.3,14251,0)
;;=J2270^^55^614^20^^^^1
;;^UTILITY(U,$J,358.3,14251,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,14251,1,2,0)
;;=2^J2270
;;^UTILITY(U,$J,358.3,14251,1,3,0)
;;=3^Morphine, per 10mg
;;^UTILITY(U,$J,358.3,14252,0)
;;=J2060^^55^614^6^^^^1
;;^UTILITY(U,$J,358.3,14252,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,14252,1,2,0)
;;=2^J2060
;;^UTILITY(U,$J,358.3,14252,1,3,0)
;;=3^Ativan/Lorazepam, 2 mg
;;^UTILITY(U,$J,358.3,14253,0)
;;=J1940^^55^614^17^^^^1
;;^UTILITY(U,$J,358.3,14253,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,14253,1,2,0)
;;=2^J1940
;;^UTILITY(U,$J,358.3,14253,1,3,0)
;;=3^Lasix, per 20 mg
;;^UTILITY(U,$J,358.3,14254,0)
;;=J0515^^55^614^8^^^^1
;;^UTILITY(U,$J,358.3,14254,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,14254,1,2,0)
;;=2^J0515
;;^UTILITY(U,$J,358.3,14254,1,3,0)
;;=3^Benzotropine, per 1mg
;;^UTILITY(U,$J,358.3,14255,0)
;;=J1630^^55^614^12^^^^1
;;^UTILITY(U,$J,358.3,14255,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,14255,1,2,0)
;;=2^J1630
;;^UTILITY(U,$J,358.3,14255,1,3,0)
;;=3^Haldol, 5mg
;;^UTILITY(U,$J,358.3,14256,0)
;;=J1720^^55^614^13^^^^1
;;^UTILITY(U,$J,358.3,14256,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,14256,1,2,0)
;;=2^J1720
;;^UTILITY(U,$J,358.3,14256,1,3,0)
;;=3^Hydrocortisone Sodium Succinate,per 100mg
;;^UTILITY(U,$J,358.3,14257,0)
;;=J0780^^55^614^9^^^^1
;;^UTILITY(U,$J,358.3,14257,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,14257,1,2,0)
;;=2^J0780
;;^UTILITY(U,$J,358.3,14257,1,3,0)
;;=3^Compazine, 10mg
;;^UTILITY(U,$J,358.3,14258,0)
;;=J2930^^55^614^22^^^^1
;;^UTILITY(U,$J,358.3,14258,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,14258,1,2,0)
;;=2^J2930
;;^UTILITY(U,$J,358.3,14258,1,3,0)
;;=3^Solu-Medrol, 125mg
;;^UTILITY(U,$J,358.3,14259,0)
;;=96402^^55^614^4^^^^1
;;^UTILITY(U,$J,358.3,14259,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,14259,1,2,0)
;;=2^96402
;;^UTILITY(U,$J,358.3,14259,1,3,0)
;;=3^Anti-Neplastic,Hormonal,IM
;;^UTILITY(U,$J,358.3,14260,0)
;;=96372^^55^614^27^^^^1
;;^UTILITY(U,$J,358.3,14260,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,14260,1,2,0)
;;=2^96372
;;^UTILITY(U,$J,358.3,14260,1,3,0)
;;=3^Ther/Proph/Diag Inj,SC/IM
;;^UTILITY(U,$J,358.3,14261,0)
;;=96373^^55^614^25^^^^1
;;^UTILITY(U,$J,358.3,14261,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,14261,1,2,0)
;;=2^96373
;;^UTILITY(U,$J,358.3,14261,1,3,0)
;;=3^Ther/Proph/Diag Inj, IA
;;^UTILITY(U,$J,358.3,14262,0)
;;=96374^^55^614^26^^^^1
;;^UTILITY(U,$J,358.3,14262,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,14262,1,2,0)
;;=2^96374
;;^UTILITY(U,$J,358.3,14262,1,3,0)
;;=3^Ther/Proph/Diag Inj, IV Push
;;^UTILITY(U,$J,358.3,14263,0)
;;=96401^^55^614^5^^^^1
;;^UTILITY(U,$J,358.3,14263,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,14263,1,2,0)
;;=2^96401
;;^UTILITY(U,$J,358.3,14263,1,3,0)
;;=3^Anti-Neplastic,Non-Hormonal,IM
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HIBDEI05V 19763 printed Sep 23, 2025@19:18:13 Page 2
IBDEI05V ; ; 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,14182,1,4,0)
+2 ;;=4^Z56.0
+3 ;;^UTILITY(U,$J,358.3,14182,2)
+4 ;;=^5063107
+5 ;;^UTILITY(U,$J,358.3,14183,0)
+6 ;;=Z59.01^^53^606^7
+7 ;;^UTILITY(U,$J,358.3,14183,1,0)
+8 ;;=^358.31IA^4^2
+9 ;;^UTILITY(U,$J,358.3,14183,1,3,0)
+10 ;;=3^Homelessness,Sheltered
+11 ;;^UTILITY(U,$J,358.3,14183,1,4,0)
+12 ;;=4^Z59.01
+13 ;;^UTILITY(U,$J,358.3,14183,2)
+14 ;;=^5161305
+15 ;;^UTILITY(U,$J,358.3,14184,0)
+16 ;;=Z59.02^^53^606^8
+17 ;;^UTILITY(U,$J,358.3,14184,1,0)
+18 ;;=^358.31IA^4^2
+19 ;;^UTILITY(U,$J,358.3,14184,1,3,0)
+20 ;;=3^Homelessness,Unsheltered
+21 ;;^UTILITY(U,$J,358.3,14184,1,4,0)
+22 ;;=4^Z59.02
+23 ;;^UTILITY(U,$J,358.3,14184,2)
+24 ;;=^5161306
+25 ;;^UTILITY(U,$J,358.3,14185,0)
+26 ;;=Z59.00^^53^606^9
+27 ;;^UTILITY(U,$J,358.3,14185,1,0)
+28 ;;=^358.31IA^4^2
+29 ;;^UTILITY(U,$J,358.3,14185,1,3,0)
+30 ;;=3^Homelessness,Unspec
+31 ;;^UTILITY(U,$J,358.3,14185,1,4,0)
+32 ;;=4^Z59.00
+33 ;;^UTILITY(U,$J,358.3,14185,2)
+34 ;;=^5161304
+35 ;;^UTILITY(U,$J,358.3,14186,0)
+36 ;;=Z59.41^^53^606^6
+37 ;;^UTILITY(U,$J,358.3,14186,1,0)
+38 ;;=^358.31IA^4^2
+39 ;;^UTILITY(U,$J,358.3,14186,1,3,0)
+40 ;;=3^Food Insecurity
+41 ;;^UTILITY(U,$J,358.3,14186,1,4,0)
+42 ;;=4^Z59.41
+43 ;;^UTILITY(U,$J,358.3,14186,2)
+44 ;;=^5161307
+45 ;;^UTILITY(U,$J,358.3,14187,0)
+46 ;;=Z59.5^^53^606^4
+47 ;;^UTILITY(U,$J,358.3,14187,1,0)
+48 ;;=^358.31IA^4^2
+49 ;;^UTILITY(U,$J,358.3,14187,1,3,0)
+50 ;;=3^Extreme Poverty
+51 ;;^UTILITY(U,$J,358.3,14187,1,4,0)
+52 ;;=4^Z59.5
+53 ;;^UTILITY(U,$J,358.3,14187,2)
+54 ;;=^5063134
+55 ;;^UTILITY(U,$J,358.3,14188,0)
+56 ;;=Z59.6^^53^606^11
+57 ;;^UTILITY(U,$J,358.3,14188,1,0)
+58 ;;=^358.31IA^4^2
+59 ;;^UTILITY(U,$J,358.3,14188,1,3,0)
+60 ;;=3^Low Income
+61 ;;^UTILITY(U,$J,358.3,14188,1,4,0)
+62 ;;=4^Z59.6
+63 ;;^UTILITY(U,$J,358.3,14188,2)
+64 ;;=^5063135
+65 ;;^UTILITY(U,$J,358.3,14189,0)
+66 ;;=Z62.810^^53^606^13
+67 ;;^UTILITY(U,$J,358.3,14189,1,0)
+68 ;;=^358.31IA^4^2
+69 ;;^UTILITY(U,$J,358.3,14189,1,3,0)
+70 ;;=3^Personal Hx Physical/Sexual Abuse in Childhood
+71 ;;^UTILITY(U,$J,358.3,14189,1,4,0)
+72 ;;=4^Z62.810
+73 ;;^UTILITY(U,$J,358.3,14189,2)
+74 ;;=^5063153
+75 ;;^UTILITY(U,$J,358.3,14190,0)
+76 ;;=Z62.811^^53^606^14
+77 ;;^UTILITY(U,$J,358.3,14190,1,0)
+78 ;;=^358.31IA^4^2
+79 ;;^UTILITY(U,$J,358.3,14190,1,3,0)
+80 ;;=3^Personal Hx Psychological Abuse in Childhood
+81 ;;^UTILITY(U,$J,358.3,14190,1,4,0)
+82 ;;=4^Z62.811
+83 ;;^UTILITY(U,$J,358.3,14190,2)
+84 ;;=^5063154
+85 ;;^UTILITY(U,$J,358.3,14191,0)
+86 ;;=Z62.812^^53^606^12
+87 ;;^UTILITY(U,$J,358.3,14191,1,0)
+88 ;;=^358.31IA^4^2
+89 ;;^UTILITY(U,$J,358.3,14191,1,3,0)
+90 ;;=3^Personal Hx Neglect in Childhood
+91 ;;^UTILITY(U,$J,358.3,14191,1,4,0)
+92 ;;=4^Z62.812
+93 ;;^UTILITY(U,$J,358.3,14191,2)
+94 ;;=^5063155
+95 ;;^UTILITY(U,$J,358.3,14192,0)
+96 ;;=Z63.0^^53^606^16
+97 ;;^UTILITY(U,$J,358.3,14192,1,0)
+98 ;;=^358.31IA^4^2
+99 ;;^UTILITY(U,$J,358.3,14192,1,3,0)
+100 ;;=3^Problems w/ Spouse/Partner Relationship
+101 ;;^UTILITY(U,$J,358.3,14192,1,4,0)
+102 ;;=4^Z63.0
+103 ;;^UTILITY(U,$J,358.3,14192,2)
+104 ;;=^5063164
+105 ;;^UTILITY(U,$J,358.3,14193,0)
+106 ;;=Z63.1^^53^606^15
+107 ;;^UTILITY(U,$J,358.3,14193,1,0)
+108 ;;=^358.31IA^4^2
+109 ;;^UTILITY(U,$J,358.3,14193,1,3,0)
+110 ;;=3^Problems w/ In-Laws
+111 ;;^UTILITY(U,$J,358.3,14193,1,4,0)
+112 ;;=4^Z63.1
+113 ;;^UTILITY(U,$J,358.3,14193,2)
+114 ;;=^5063165
+115 ;;^UTILITY(U,$J,358.3,14194,0)
+116 ;;=Z63.4^^53^606^2
+117 ;;^UTILITY(U,$J,358.3,14194,1,0)
+118 ;;=^358.31IA^4^2
+119 ;;^UTILITY(U,$J,358.3,14194,1,3,0)
+120 ;;=3^Bereavement
+121 ;;^UTILITY(U,$J,358.3,14194,1,4,0)
+122 ;;=4^Z63.4
+123 ;;^UTILITY(U,$J,358.3,14194,2)
+124 ;;=^5063168
+125 ;;^UTILITY(U,$J,358.3,14195,0)
+126 ;;=Z63.5^^53^606^5
+127 ;;^UTILITY(U,$J,358.3,14195,1,0)
+128 ;;=^358.31IA^4^2
+129 ;;^UTILITY(U,$J,358.3,14195,1,3,0)
+130 ;;=3^Family Disruption by Separation/Divorce
+131 ;;^UTILITY(U,$J,358.3,14195,1,4,0)
+132 ;;=4^Z63.5
+133 ;;^UTILITY(U,$J,358.3,14195,2)
+134 ;;=^5063169
+135 ;;^UTILITY(U,$J,358.3,14196,0)
+136 ;;=Z63.6^^53^606^3
+137 ;;^UTILITY(U,$J,358.3,14196,1,0)
+138 ;;=^358.31IA^4^2
+139 ;;^UTILITY(U,$J,358.3,14196,1,3,0)
+140 ;;=3^Dependent Relative Needing Home Care
+141 ;;^UTILITY(U,$J,358.3,14196,1,4,0)
+142 ;;=4^Z63.6
+143 ;;^UTILITY(U,$J,358.3,14196,2)
+144 ;;=^5063170
+145 ;;^UTILITY(U,$J,358.3,14197,0)
+146 ;;=Z63.72^^53^606^1
+147 ;;^UTILITY(U,$J,358.3,14197,1,0)
+148 ;;=^358.31IA^4^2
+149 ;;^UTILITY(U,$J,358.3,14197,1,3,0)
+150 ;;=3^Alcoholism/Drug Addiction in Family
+151 ;;^UTILITY(U,$J,358.3,14197,1,4,0)
+152 ;;=4^Z63.72
+153 ;;^UTILITY(U,$J,358.3,14197,2)
+154 ;;=^5063172
+155 ;;^UTILITY(U,$J,358.3,14198,0)
+156 ;;=Z65.3^^53^606^10
+157 ;;^UTILITY(U,$J,358.3,14198,1,0)
+158 ;;=^358.31IA^4^2
+159 ;;^UTILITY(U,$J,358.3,14198,1,3,0)
+160 ;;=3^Legal Problems
+161 ;;^UTILITY(U,$J,358.3,14198,1,4,0)
+162 ;;=4^Z65.3
+163 ;;^UTILITY(U,$J,358.3,14198,2)
+164 ;;=^5063182
+165 ;;^UTILITY(U,$J,358.3,14199,0)
+166 ;;=99202^^54^607^1
+167 ;;^UTILITY(U,$J,358.3,14199,1,0)
+168 ;;=^358.31IA^2^2
+169 ;;^UTILITY(U,$J,358.3,14199,1,1,0)
+170 ;;=1^SF MDM or 15-29 min
+171 ;;^UTILITY(U,$J,358.3,14199,1,2,0)
+172 ;;=2^99202
+173 ;;^UTILITY(U,$J,358.3,14200,0)
+174 ;;=99203^^54^607^2
+175 ;;^UTILITY(U,$J,358.3,14200,1,0)
+176 ;;=^358.31IA^2^2
+177 ;;^UTILITY(U,$J,358.3,14200,1,1,0)
+178 ;;=1^Low Complex MDM or 30-44 min
+179 ;;^UTILITY(U,$J,358.3,14200,1,2,0)
+180 ;;=2^99203
+181 ;;^UTILITY(U,$J,358.3,14201,0)
+182 ;;=99204^^54^607^3
+183 ;;^UTILITY(U,$J,358.3,14201,1,0)
+184 ;;=^358.31IA^2^2
+185 ;;^UTILITY(U,$J,358.3,14201,1,1,0)
+186 ;;=1^Mod Complex MDM or 45-59 min
+187 ;;^UTILITY(U,$J,358.3,14201,1,2,0)
+188 ;;=2^99204
+189 ;;^UTILITY(U,$J,358.3,14202,0)
+190 ;;=99205^^54^607^4
+191 ;;^UTILITY(U,$J,358.3,14202,1,0)
+192 ;;=^358.31IA^2^2
+193 ;;^UTILITY(U,$J,358.3,14202,1,1,0)
+194 ;;=1^High Complex MDM or 60-74 min
+195 ;;^UTILITY(U,$J,358.3,14202,1,2,0)
+196 ;;=2^99205
+197 ;;^UTILITY(U,$J,358.3,14203,0)
+198 ;;=99211^^54^608^1
+199 ;;^UTILITY(U,$J,358.3,14203,1,0)
+200 ;;=^358.31IA^2^2
+201 ;;^UTILITY(U,$J,358.3,14203,1,1,0)
+202 ;;=1^Brief (no MD seen)
+203 ;;^UTILITY(U,$J,358.3,14203,1,2,0)
+204 ;;=2^99211
+205 ;;^UTILITY(U,$J,358.3,14204,0)
+206 ;;=99212^^54^608^2
+207 ;;^UTILITY(U,$J,358.3,14204,1,0)
+208 ;;=^358.31IA^2^2
+209 ;;^UTILITY(U,$J,358.3,14204,1,1,0)
+210 ;;=1^SF MDM or 10-19 min
+211 ;;^UTILITY(U,$J,358.3,14204,1,2,0)
+212 ;;=2^99212
+213 ;;^UTILITY(U,$J,358.3,14205,0)
+214 ;;=99213^^54^608^3
+215 ;;^UTILITY(U,$J,358.3,14205,1,0)
+216 ;;=^358.31IA^2^2
+217 ;;^UTILITY(U,$J,358.3,14205,1,1,0)
+218 ;;=1^Low Complex MDM or 20-29 min
+219 ;;^UTILITY(U,$J,358.3,14205,1,2,0)
+220 ;;=2^99213
+221 ;;^UTILITY(U,$J,358.3,14206,0)
+222 ;;=99214^^54^608^4
+223 ;;^UTILITY(U,$J,358.3,14206,1,0)
+224 ;;=^358.31IA^2^2
+225 ;;^UTILITY(U,$J,358.3,14206,1,1,0)
+226 ;;=1^Mod Complex MDM or 30-39 min
+227 ;;^UTILITY(U,$J,358.3,14206,1,2,0)
+228 ;;=2^99214
+229 ;;^UTILITY(U,$J,358.3,14207,0)
+230 ;;=99215^^54^608^5
+231 ;;^UTILITY(U,$J,358.3,14207,1,0)
+232 ;;=^358.31IA^2^2
+233 ;;^UTILITY(U,$J,358.3,14207,1,1,0)
+234 ;;=1^High Complex MDM or 40-54 min
+235 ;;^UTILITY(U,$J,358.3,14207,1,2,0)
+236 ;;=2^99215
+237 ;;^UTILITY(U,$J,358.3,14208,0)
+238 ;;=99241^^54^609^1
+239 ;;^UTILITY(U,$J,358.3,14208,1,0)
+240 ;;=^358.31IA^2^2
+241 ;;^UTILITY(U,$J,358.3,14208,1,1,0)
+242 ;;=1^Problem Focus
+243 ;;^UTILITY(U,$J,358.3,14208,1,2,0)
+244 ;;=2^99241
+245 ;;^UTILITY(U,$J,358.3,14209,0)
+246 ;;=99242^^54^609^2
+247 ;;^UTILITY(U,$J,358.3,14209,1,0)
+248 ;;=^358.31IA^2^2
+249 ;;^UTILITY(U,$J,358.3,14209,1,1,0)
+250 ;;=1^Exp Problem Focus
+251 ;;^UTILITY(U,$J,358.3,14209,1,2,0)
+252 ;;=2^99242
+253 ;;^UTILITY(U,$J,358.3,14210,0)
+254 ;;=99243^^54^609^3
+255 ;;^UTILITY(U,$J,358.3,14210,1,0)
+256 ;;=^358.31IA^2^2
+257 ;;^UTILITY(U,$J,358.3,14210,1,1,0)
+258 ;;=1^Detailed
+259 ;;^UTILITY(U,$J,358.3,14210,1,2,0)
+260 ;;=2^99243
+261 ;;^UTILITY(U,$J,358.3,14211,0)
+262 ;;=99244^^54^609^4
+263 ;;^UTILITY(U,$J,358.3,14211,1,0)
+264 ;;=^358.31IA^2^2
+265 ;;^UTILITY(U,$J,358.3,14211,1,1,0)
+266 ;;=1^Comprehensive,MDM
+267 ;;^UTILITY(U,$J,358.3,14211,1,2,0)
+268 ;;=2^99244
+269 ;;^UTILITY(U,$J,358.3,14212,0)
+270 ;;=99245^^54^609^5
+271 ;;^UTILITY(U,$J,358.3,14212,1,0)
+272 ;;=^358.31IA^2^2
+273 ;;^UTILITY(U,$J,358.3,14212,1,1,0)
+274 ;;=1^Comprehensive,HDM
+275 ;;^UTILITY(U,$J,358.3,14212,1,2,0)
+276 ;;=2^99245
+277 ;;^UTILITY(U,$J,358.3,14213,0)
+278 ;;=99395^^54^610^1
+279 ;;^UTILITY(U,$J,358.3,14213,1,0)
+280 ;;=^358.31IA^2^2
+281 ;;^UTILITY(U,$J,358.3,14213,1,1,0)
+282 ;;=1^Preventive Med,Est Pt,18-39
+283 ;;^UTILITY(U,$J,358.3,14213,1,2,0)
+284 ;;=2^99395
+285 ;;^UTILITY(U,$J,358.3,14214,0)
+286 ;;=99396^^54^610^2
+287 ;;^UTILITY(U,$J,358.3,14214,1,0)
+288 ;;=^358.31IA^2^2
+289 ;;^UTILITY(U,$J,358.3,14214,1,1,0)
+290 ;;=1^Preventive Med,Est Pt,40-64
+291 ;;^UTILITY(U,$J,358.3,14214,1,2,0)
+292 ;;=2^99396
+293 ;;^UTILITY(U,$J,358.3,14215,0)
+294 ;;=99397^^54^610^3
+295 ;;^UTILITY(U,$J,358.3,14215,1,0)
+296 ;;=^358.31IA^2^2
+297 ;;^UTILITY(U,$J,358.3,14215,1,1,0)
+298 ;;=1^Preventive Med,Est Pt > 64
+299 ;;^UTILITY(U,$J,358.3,14215,1,2,0)
+300 ;;=2^99397
+301 ;;^UTILITY(U,$J,358.3,14216,0)
+302 ;;=99385^^54^611^1
+303 ;;^UTILITY(U,$J,358.3,14216,1,0)
+304 ;;=^358.31IA^2^2
+305 ;;^UTILITY(U,$J,358.3,14216,1,1,0)
+306 ;;=1^Preventive Med,New Pt,18-39
+307 ;;^UTILITY(U,$J,358.3,14216,1,2,0)
+308 ;;=2^99385
+309 ;;^UTILITY(U,$J,358.3,14217,0)
+310 ;;=99386^^54^611^2
+311 ;;^UTILITY(U,$J,358.3,14217,1,0)
+312 ;;=^358.31IA^2^2
+313 ;;^UTILITY(U,$J,358.3,14217,1,1,0)
+314 ;;=1^Preventive Med,New Pt,40-64
+315 ;;^UTILITY(U,$J,358.3,14217,1,2,0)
+316 ;;=2^99386
+317 ;;^UTILITY(U,$J,358.3,14218,0)
+318 ;;=99387^^54^611^3
+319 ;;^UTILITY(U,$J,358.3,14218,1,0)
+320 ;;=^358.31IA^2^2
+321 ;;^UTILITY(U,$J,358.3,14218,1,1,0)
+322 ;;=1^Preventive Med,New Pt > 64
+323 ;;^UTILITY(U,$J,358.3,14218,1,2,0)
+324 ;;=2^99387
+325 ;;^UTILITY(U,$J,358.3,14219,0)
+326 ;;=99495^^54^612^1
+327 ;;^UTILITY(U,$J,358.3,14219,1,0)
+328 ;;=^358.31IA^2^2
+329 ;;^UTILITY(U,$J,358.3,14219,1,1,0)
+330 ;;=1^TCM Svc w/in 14 days of D/C w/ Mod MDM
+331 ;;^UTILITY(U,$J,358.3,14219,1,2,0)
+332 ;;=2^99495
+333 ;;^UTILITY(U,$J,358.3,14220,0)
+334 ;;=99496^^54^612^2
+335 ;;^UTILITY(U,$J,358.3,14220,1,0)
+336 ;;=^358.31IA^2^2
+337 ;;^UTILITY(U,$J,358.3,14220,1,1,0)
+338 ;;=1^TCM Svc w/in 7 days of D/C w/ High MDM
+339 ;;^UTILITY(U,$J,358.3,14220,1,2,0)
+340 ;;=2^99496
+341 ;;^UTILITY(U,$J,358.3,14221,0)
+342 ;;=90632^^55^613^9^^^^1
+343 ;;^UTILITY(U,$J,358.3,14221,1,0)
+344 ;;=^358.31IA^3^2
+345 ;;^UTILITY(U,$J,358.3,14221,1,2,0)
+346 ;;=2^90632
+347 ;;^UTILITY(U,$J,358.3,14221,1,3,0)
+348 ;;=3^Hepatitis A Vaccine
+349 ;;^UTILITY(U,$J,358.3,14222,0)
+350 ;;=90746^^55^613^11^^^^1
+351 ;;^UTILITY(U,$J,358.3,14222,1,0)
+352 ;;=^358.31IA^3^2
+353 ;;^UTILITY(U,$J,358.3,14222,1,2,0)
+354 ;;=2^90746
+355 ;;^UTILITY(U,$J,358.3,14222,1,3,0)
+356 ;;=3^Hepatitis B Vaccine
+357 ;;^UTILITY(U,$J,358.3,14223,0)
+358 ;;=90636^^55^613^10^^^^1
+359 ;;^UTILITY(U,$J,358.3,14223,1,0)
+360 ;;=^358.31IA^3^2
+361 ;;^UTILITY(U,$J,358.3,14223,1,2,0)
+362 ;;=2^90636
+363 ;;^UTILITY(U,$J,358.3,14223,1,3,0)
+364 ;;=3^Hepatitis A&B Vaccine
+365 ;;^UTILITY(U,$J,358.3,14224,0)
+366 ;;=90707^^55^613^12^^^^1
+367 ;;^UTILITY(U,$J,358.3,14224,1,0)
+368 ;;=^358.31IA^3^2
+369 ;;^UTILITY(U,$J,358.3,14224,1,2,0)
+370 ;;=2^90707
+371 ;;^UTILITY(U,$J,358.3,14224,1,3,0)
+372 ;;=3^MMR Vaccine
+373 ;;^UTILITY(U,$J,358.3,14225,0)
+374 ;;=90732^^55^613^17^^^^1
+375 ;;^UTILITY(U,$J,358.3,14225,1,0)
+376 ;;=^358.31IA^3^2
+377 ;;^UTILITY(U,$J,358.3,14225,1,2,0)
+378 ;;=2^90732
+379 ;;^UTILITY(U,$J,358.3,14225,1,3,0)
+380 ;;=3^Pneumovax (Pneumococcal Vaccine)
+381 ;;^UTILITY(U,$J,358.3,14226,0)
+382 ;;=90714^^55^613^24^^^^1
+383 ;;^UTILITY(U,$J,358.3,14226,1,0)
+384 ;;=^358.31IA^3^2
+385 ;;^UTILITY(U,$J,358.3,14226,1,2,0)
+386 ;;=2^90714
+387 ;;^UTILITY(U,$J,358.3,14226,1,3,0)
+388 ;;=3^TD Vaccine
+389 ;;^UTILITY(U,$J,358.3,14227,0)
+390 ;;=90662^^55^613^4^^^^1
+391 ;;^UTILITY(U,$J,358.3,14227,1,0)
+392 ;;=^358.31IA^3^2
+393 ;;^UTILITY(U,$J,358.3,14227,1,2,0)
+394 ;;=2^90662
+395 ;;^UTILITY(U,$J,358.3,14227,1,3,0)
+396 ;;=3^Flu Vaccine High Dose Syringe (Fluzone)
+397 ;;^UTILITY(U,$J,358.3,14228,0)
+398 ;;=90715^^55^613^25^^^^1
+399 ;;^UTILITY(U,$J,358.3,14228,1,0)
+400 ;;=^358.31IA^3^2
+401 ;;^UTILITY(U,$J,358.3,14228,1,2,0)
+402 ;;=2^90715
+403 ;;^UTILITY(U,$J,358.3,14228,1,3,0)
+404 ;;=3^Tdap Vaccine
+405 ;;^UTILITY(U,$J,358.3,14229,0)
+406 ;;=90736^^55^613^26^^^^1
+407 ;;^UTILITY(U,$J,358.3,14229,1,0)
+408 ;;=^358.31IA^3^2
+409 ;;^UTILITY(U,$J,358.3,14229,1,2,0)
+410 ;;=2^90736
+411 ;;^UTILITY(U,$J,358.3,14229,1,3,0)
+412 ;;=3^Zoster (Shingles) Vaccine
+413 ;;^UTILITY(U,$J,358.3,14230,0)
+414 ;;=90585^^55^613^1^^^^1
+415 ;;^UTILITY(U,$J,358.3,14230,1,0)
+416 ;;=^358.31IA^3^2
+417 ;;^UTILITY(U,$J,358.3,14230,1,2,0)
+418 ;;=2^90585
+419 ;;^UTILITY(U,$J,358.3,14230,1,3,0)
+420 ;;=3^BCG Vaccine Percut
+421 ;;^UTILITY(U,$J,358.3,14231,0)
+422 ;;=90649^^55^613^8^^^^1
+423 ;;^UTILITY(U,$J,358.3,14231,1,0)
+424 ;;=^358.31IA^3^2
+425 ;;^UTILITY(U,$J,358.3,14231,1,2,0)
+426 ;;=2^90649
+427 ;;^UTILITY(U,$J,358.3,14231,1,3,0)
+428 ;;=3^HPV Vaccine
+429 ;;^UTILITY(U,$J,358.3,14232,0)
+430 ;;=90675^^55^613^21^^^^1
+431 ;;^UTILITY(U,$J,358.3,14232,1,0)
+432 ;;=^358.31IA^3^2
+433 ;;^UTILITY(U,$J,358.3,14232,1,2,0)
+434 ;;=2^90675
+435 ;;^UTILITY(U,$J,358.3,14232,1,3,0)
+436 ;;=3^Rabies Vaccine
+437 ;;^UTILITY(U,$J,358.3,14233,0)
+438 ;;=90676^^55^613^22^^^^1
+439 ;;^UTILITY(U,$J,358.3,14233,1,0)
+440 ;;=^358.31IA^3^2
+441 ;;^UTILITY(U,$J,358.3,14233,1,2,0)
+442 ;;=2^90676
+443 ;;^UTILITY(U,$J,358.3,14233,1,3,0)
+444 ;;=3^Rabies Vaccine ID
+445 ;;^UTILITY(U,$J,358.3,14234,0)
+446 ;;=90680^^55^613^23^^^^1
+447 ;;^UTILITY(U,$J,358.3,14234,1,0)
+448 ;;=^358.31IA^3^2
+449 ;;^UTILITY(U,$J,358.3,14234,1,2,0)
+450 ;;=2^90680
+451 ;;^UTILITY(U,$J,358.3,14234,1,3,0)
+452 ;;=3^Rotovirus Vaccine,Oral
+453 ;;^UTILITY(U,$J,358.3,14235,0)
+454 ;;=90698^^55^613^2^^^^1
+455 ;;^UTILITY(U,$J,358.3,14235,1,0)
+456 ;;=^358.31IA^3^2
+457 ;;^UTILITY(U,$J,358.3,14235,1,2,0)
+458 ;;=2^90698
+459 ;;^UTILITY(U,$J,358.3,14235,1,3,0)
+460 ;;=3^DTAP-HIB-IP Vaccine
+461 ;;^UTILITY(U,$J,358.3,14236,0)
+462 ;;=90710^^55^613^13^^^^1
+463 ;;^UTILITY(U,$J,358.3,14236,1,0)
+464 ;;=^358.31IA^3^2
+465 ;;^UTILITY(U,$J,358.3,14236,1,2,0)
+466 ;;=2^90710
+467 ;;^UTILITY(U,$J,358.3,14236,1,3,0)
+468 ;;=3^MMRV Vaccine
+469 ;;^UTILITY(U,$J,358.3,14237,0)
+470 ;;=90713^^55^613^18^^^^1
+471 ;;^UTILITY(U,$J,358.3,14237,1,0)
+472 ;;=^358.31IA^3^2
+473 ;;^UTILITY(U,$J,358.3,14237,1,2,0)
+474 ;;=2^90713
+475 ;;^UTILITY(U,$J,358.3,14237,1,3,0)
+476 ;;=3^Poliovirus IPV Vaccine
+477 ;;^UTILITY(U,$J,358.3,14238,0)
+478 ;;=90723^^55^613^3^^^^1
+479 ;;^UTILITY(U,$J,358.3,14238,1,0)
+480 ;;=^358.31IA^3^2
+481 ;;^UTILITY(U,$J,358.3,14238,1,2,0)
+482 ;;=2^90723
+483 ;;^UTILITY(U,$J,358.3,14238,1,3,0)
+484 ;;=3^DTAP-Hep B-IPV Vaccine
+485 ;;^UTILITY(U,$J,358.3,14239,0)
+486 ;;=90734^^55^613^14^^^^1
+487 ;;^UTILITY(U,$J,358.3,14239,1,0)
+488 ;;=^358.31IA^3^2
+489 ;;^UTILITY(U,$J,358.3,14239,1,2,0)
+490 ;;=2^90734
+491 ;;^UTILITY(U,$J,358.3,14239,1,3,0)
+492 ;;=3^Meningococcal Vaccine
+493 ;;^UTILITY(U,$J,358.3,14240,0)
+494 ;;=90688^^55^613^5^^^^1
+495 ;;^UTILITY(U,$J,358.3,14240,1,0)
+496 ;;=^358.31IA^3^2
+497 ;;^UTILITY(U,$J,358.3,14240,1,2,0)
+498 ;;=2^90688
+499 ;;^UTILITY(U,$J,358.3,14240,1,3,0)
+500 ;;=3^Flu Vaccine Multi Dose Syringe (Flulval)
+501 ;;^UTILITY(U,$J,358.3,14241,0)
+502 ;;=90686^^55^613^6^^^^1
+503 ;;^UTILITY(U,$J,358.3,14241,1,0)
+504 ;;=^358.31IA^3^2
+505 ;;^UTILITY(U,$J,358.3,14241,1,2,0)
+506 ;;=2^90686
+507 ;;^UTILITY(U,$J,358.3,14241,1,3,0)
+508 ;;=3^Flu Vaccine Single Dose Syringe (Fluzone/Fluarix)
+509 ;;^UTILITY(U,$J,358.3,14242,0)
+510 ;;=90670^^55^613^19^^^^1
+511 ;;^UTILITY(U,$J,358.3,14242,1,0)
+512 ;;=^358.31IA^3^2
+513 ;;^UTILITY(U,$J,358.3,14242,1,2,0)
+514 ;;=2^90670
+515 ;;^UTILITY(U,$J,358.3,14242,1,3,0)
+516 ;;=3^Prevnar 13 (Pneumococcal Vaccine)
+517 ;;^UTILITY(U,$J,358.3,14243,0)
+518 ;;=90673^^55^613^20^^^^1
+519 ;;^UTILITY(U,$J,358.3,14243,1,0)
+520 ;;=^358.31IA^3^2
+521 ;;^UTILITY(U,$J,358.3,14243,1,2,0)
+522 ;;=2^90673
+523 ;;^UTILITY(U,$J,358.3,14243,1,3,0)
+524 ;;=3^RIV3 Vaccine,No Preserv
+525 ;;^UTILITY(U,$J,358.3,14244,0)
+526 ;;=90653^^55^613^7^^^^1
+527 ;;^UTILITY(U,$J,358.3,14244,1,0)
+528 ;;=^358.31IA^3^2
+529 ;;^UTILITY(U,$J,358.3,14244,1,2,0)
+530 ;;=2^90653
+531 ;;^UTILITY(U,$J,358.3,14244,1,3,0)
+532 ;;=3^Flu Vaccine Single Dose Trivalent IIV3 (Fluad)
+533 ;;^UTILITY(U,$J,358.3,14245,0)
+534 ;;=90671^^55^613^15^^^^1
+535 ;;^UTILITY(U,$J,358.3,14245,1,0)
+536 ;;=^358.31IA^3^2
+537 ;;^UTILITY(U,$J,358.3,14245,1,2,0)
+538 ;;=2^90671
+539 ;;^UTILITY(U,$J,358.3,14245,1,3,0)
+540 ;;=3^Pneumococcal Vaccine 15 Val,IM
+541 ;;^UTILITY(U,$J,358.3,14246,0)
+542 ;;=90677^^55^613^16^^^^1
+543 ;;^UTILITY(U,$J,358.3,14246,1,0)
+544 ;;=^358.31IA^3^2
+545 ;;^UTILITY(U,$J,358.3,14246,1,2,0)
+546 ;;=2^90677
+547 ;;^UTILITY(U,$J,358.3,14246,1,3,0)
+548 ;;=3^Pneumococcal Vaccine 20 Val,IM
+549 ;;^UTILITY(U,$J,358.3,14247,0)
+550 ;;=J3301^^55^614^16^^^^1
+551 ;;^UTILITY(U,$J,358.3,14247,1,0)
+552 ;;=^358.31IA^3^2
+553 ;;^UTILITY(U,$J,358.3,14247,1,2,0)
+554 ;;=2^J3301
+555 ;;^UTILITY(U,$J,358.3,14247,1,3,0)
+556 ;;=3^Kenalog, per 10 mg
+557 ;;^UTILITY(U,$J,358.3,14248,0)
+558 ;;=J9217^^55^614^18^^^^1
+559 ;;^UTILITY(U,$J,358.3,14248,1,0)
+560 ;;=^358.31IA^3^2
+561 ;;^UTILITY(U,$J,358.3,14248,1,2,0)
+562 ;;=2^J9217
+563 ;;^UTILITY(U,$J,358.3,14248,1,3,0)
+564 ;;=3^Lupron, per 7.5 mg
+565 ;;^UTILITY(U,$J,358.3,14249,0)
+566 ;;=J1885^^55^614^28^^^^1
+567 ;;^UTILITY(U,$J,358.3,14249,1,0)
+568 ;;=^358.31IA^3^2
+569 ;;^UTILITY(U,$J,358.3,14249,1,2,0)
+570 ;;=2^J1885
+571 ;;^UTILITY(U,$J,358.3,14249,1,3,0)
+572 ;;=3^Toradol, per 15mg
+573 ;;^UTILITY(U,$J,358.3,14250,0)
+574 ;;=J3420^^55^614^29^^^^1
+575 ;;^UTILITY(U,$J,358.3,14250,1,0)
+576 ;;=^358.31IA^3^2
+577 ;;^UTILITY(U,$J,358.3,14250,1,2,0)
+578 ;;=2^J3420
+579 ;;^UTILITY(U,$J,358.3,14250,1,3,0)
+580 ;;=3^Vitamin B12, per 1000mcg
+581 ;;^UTILITY(U,$J,358.3,14251,0)
+582 ;;=J2270^^55^614^20^^^^1
+583 ;;^UTILITY(U,$J,358.3,14251,1,0)
+584 ;;=^358.31IA^3^2
+585 ;;^UTILITY(U,$J,358.3,14251,1,2,0)
+586 ;;=2^J2270
+587 ;;^UTILITY(U,$J,358.3,14251,1,3,0)
+588 ;;=3^Morphine, per 10mg
+589 ;;^UTILITY(U,$J,358.3,14252,0)
+590 ;;=J2060^^55^614^6^^^^1
+591 ;;^UTILITY(U,$J,358.3,14252,1,0)
+592 ;;=^358.31IA^3^2
+593 ;;^UTILITY(U,$J,358.3,14252,1,2,0)
+594 ;;=2^J2060
+595 ;;^UTILITY(U,$J,358.3,14252,1,3,0)
+596 ;;=3^Ativan/Lorazepam, 2 mg
+597 ;;^UTILITY(U,$J,358.3,14253,0)
+598 ;;=J1940^^55^614^17^^^^1
+599 ;;^UTILITY(U,$J,358.3,14253,1,0)
+600 ;;=^358.31IA^3^2
+601 ;;^UTILITY(U,$J,358.3,14253,1,2,0)
+602 ;;=2^J1940
+603 ;;^UTILITY(U,$J,358.3,14253,1,3,0)
+604 ;;=3^Lasix, per 20 mg
+605 ;;^UTILITY(U,$J,358.3,14254,0)
+606 ;;=J0515^^55^614^8^^^^1
+607 ;;^UTILITY(U,$J,358.3,14254,1,0)
+608 ;;=^358.31IA^3^2
+609 ;;^UTILITY(U,$J,358.3,14254,1,2,0)
+610 ;;=2^J0515
+611 ;;^UTILITY(U,$J,358.3,14254,1,3,0)
+612 ;;=3^Benzotropine, per 1mg
+613 ;;^UTILITY(U,$J,358.3,14255,0)
+614 ;;=J1630^^55^614^12^^^^1
+615 ;;^UTILITY(U,$J,358.3,14255,1,0)
+616 ;;=^358.31IA^3^2
+617 ;;^UTILITY(U,$J,358.3,14255,1,2,0)
+618 ;;=2^J1630
+619 ;;^UTILITY(U,$J,358.3,14255,1,3,0)
+620 ;;=3^Haldol, 5mg
+621 ;;^UTILITY(U,$J,358.3,14256,0)
+622 ;;=J1720^^55^614^13^^^^1
+623 ;;^UTILITY(U,$J,358.3,14256,1,0)
+624 ;;=^358.31IA^3^2
+625 ;;^UTILITY(U,$J,358.3,14256,1,2,0)
+626 ;;=2^J1720
+627 ;;^UTILITY(U,$J,358.3,14256,1,3,0)
+628 ;;=3^Hydrocortisone Sodium Succinate,per 100mg
+629 ;;^UTILITY(U,$J,358.3,14257,0)
+630 ;;=J0780^^55^614^9^^^^1
+631 ;;^UTILITY(U,$J,358.3,14257,1,0)
+632 ;;=^358.31IA^3^2
+633 ;;^UTILITY(U,$J,358.3,14257,1,2,0)
+634 ;;=2^J0780
+635 ;;^UTILITY(U,$J,358.3,14257,1,3,0)
+636 ;;=3^Compazine, 10mg
+637 ;;^UTILITY(U,$J,358.3,14258,0)
+638 ;;=J2930^^55^614^22^^^^1
+639 ;;^UTILITY(U,$J,358.3,14258,1,0)
+640 ;;=^358.31IA^3^2
+641 ;;^UTILITY(U,$J,358.3,14258,1,2,0)
+642 ;;=2^J2930
+643 ;;^UTILITY(U,$J,358.3,14258,1,3,0)
+644 ;;=3^Solu-Medrol, 125mg
+645 ;;^UTILITY(U,$J,358.3,14259,0)
+646 ;;=96402^^55^614^4^^^^1
+647 ;;^UTILITY(U,$J,358.3,14259,1,0)
+648 ;;=^358.31IA^3^2
+649 ;;^UTILITY(U,$J,358.3,14259,1,2,0)
+650 ;;=2^96402
+651 ;;^UTILITY(U,$J,358.3,14259,1,3,0)
+652 ;;=3^Anti-Neplastic,Hormonal,IM
+653 ;;^UTILITY(U,$J,358.3,14260,0)
+654 ;;=96372^^55^614^27^^^^1
+655 ;;^UTILITY(U,$J,358.3,14260,1,0)
+656 ;;=^358.31IA^3^2
+657 ;;^UTILITY(U,$J,358.3,14260,1,2,0)
+658 ;;=2^96372
+659 ;;^UTILITY(U,$J,358.3,14260,1,3,0)
+660 ;;=3^Ther/Proph/Diag Inj,SC/IM
+661 ;;^UTILITY(U,$J,358.3,14261,0)
+662 ;;=96373^^55^614^25^^^^1
+663 ;;^UTILITY(U,$J,358.3,14261,1,0)
+664 ;;=^358.31IA^3^2
+665 ;;^UTILITY(U,$J,358.3,14261,1,2,0)
+666 ;;=2^96373
+667 ;;^UTILITY(U,$J,358.3,14261,1,3,0)
+668 ;;=3^Ther/Proph/Diag Inj, IA
+669 ;;^UTILITY(U,$J,358.3,14262,0)
+670 ;;=96374^^55^614^26^^^^1
+671 ;;^UTILITY(U,$J,358.3,14262,1,0)
+672 ;;=^358.31IA^3^2
+673 ;;^UTILITY(U,$J,358.3,14262,1,2,0)
+674 ;;=2^96374
+675 ;;^UTILITY(U,$J,358.3,14262,1,3,0)
+676 ;;=3^Ther/Proph/Diag Inj, IV Push
+677 ;;^UTILITY(U,$J,358.3,14263,0)
+678 ;;=96401^^55^614^5^^^^1
+679 ;;^UTILITY(U,$J,358.3,14263,1,0)
+680 ;;=^358.31IA^3^2
+681 ;;^UTILITY(U,$J,358.3,14263,1,2,0)
+682 ;;=2^96401
+683 ;;^UTILITY(U,$J,358.3,14263,1,3,0)
+684 ;;=3^Anti-Neplastic,Non-Hormonal,IM
