IBDEI01U ; ; 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,4070,0)
;;=L89.622^^29^240^285
;;^UTILITY(U,$J,358.3,4070,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,4070,1,3,0)
;;=3^Pressure Ulcer,Left Heel,Stage 2
;;^UTILITY(U,$J,358.3,4070,1,4,0)
;;=4^L89.622
;;^UTILITY(U,$J,358.3,4070,2)
;;=^5009437
;;^UTILITY(U,$J,358.3,4071,0)
;;=L89.623^^29^240^286
;;^UTILITY(U,$J,358.3,4071,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,4071,1,3,0)
;;=3^Pressure Ulcer,Left Heel,Stage 3
;;^UTILITY(U,$J,358.3,4071,1,4,0)
;;=4^L89.623
;;^UTILITY(U,$J,358.3,4071,2)
;;=^5009438
;;^UTILITY(U,$J,358.3,4072,0)
;;=L89.624^^29^240^287
;;^UTILITY(U,$J,358.3,4072,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,4072,1,3,0)
;;=3^Pressure Ulcer,Left Heel,Stage 4
;;^UTILITY(U,$J,358.3,4072,1,4,0)
;;=4^L89.624
;;^UTILITY(U,$J,358.3,4072,2)
;;=^5009439
;;^UTILITY(U,$J,358.3,4073,0)
;;=L89.626^^29^240^305
;;^UTILITY(U,$J,358.3,4073,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,4073,1,3,0)
;;=3^Pressure-Induced Deep Tissue Damage,Left Heel
;;^UTILITY(U,$J,358.3,4073,1,4,0)
;;=4^L89.626
;;^UTILITY(U,$J,358.3,4073,2)
;;=^5158097
;;^UTILITY(U,$J,358.3,4074,0)
;;=R45.851^^29^241^3
;;^UTILITY(U,$J,358.3,4074,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,4074,1,3,0)
;;=3^Suicidal Ideations
;;^UTILITY(U,$J,358.3,4074,1,4,0)
;;=4^R45.851
;;^UTILITY(U,$J,358.3,4074,2)
;;=^5019474
;;^UTILITY(U,$J,358.3,4075,0)
;;=T14.91XA^^29^241^4
;;^UTILITY(U,$J,358.3,4075,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,4075,1,3,0)
;;=3^Suicide Attempt,Initial Encntr
;;^UTILITY(U,$J,358.3,4075,1,4,0)
;;=4^T14.91XA
;;^UTILITY(U,$J,358.3,4075,2)
;;=^5151779
;;^UTILITY(U,$J,358.3,4076,0)
;;=T14.91XD^^29^241^6
;;^UTILITY(U,$J,358.3,4076,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,4076,1,3,0)
;;=3^Suicide Attempt,Subsequent Encntr
;;^UTILITY(U,$J,358.3,4076,1,4,0)
;;=4^T14.91XD
;;^UTILITY(U,$J,358.3,4076,2)
;;=^5151780
;;^UTILITY(U,$J,358.3,4077,0)
;;=T14.91XS^^29^241^5
;;^UTILITY(U,$J,358.3,4077,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,4077,1,3,0)
;;=3^Suicide Attempt,Sequela
;;^UTILITY(U,$J,358.3,4077,1,4,0)
;;=4^T14.91XS
;;^UTILITY(U,$J,358.3,4077,2)
;;=^5151781
;;^UTILITY(U,$J,358.3,4078,0)
;;=Z91.51^^29^241^2
;;^UTILITY(U,$J,358.3,4078,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,4078,1,3,0)
;;=3^Personal Hx of Suicidal Behavior
;;^UTILITY(U,$J,358.3,4078,1,4,0)
;;=4^Z91.51
;;^UTILITY(U,$J,358.3,4078,2)
;;=^5161317
;;^UTILITY(U,$J,358.3,4079,0)
;;=Z91.52^^29^241^1
;;^UTILITY(U,$J,358.3,4079,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,4079,1,3,0)
;;=3^Personal Hx of Non-Suicidal Self-Harm
;;^UTILITY(U,$J,358.3,4079,1,4,0)
;;=4^Z91.52
;;^UTILITY(U,$J,358.3,4079,2)
;;=^5161318
;;^UTILITY(U,$J,358.3,4080,0)
;;=Z56.0^^29^242^17
;;^UTILITY(U,$J,358.3,4080,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,4080,1,3,0)
;;=3^Unemployment,Unspec
;;^UTILITY(U,$J,358.3,4080,1,4,0)
;;=4^Z56.0
;;^UTILITY(U,$J,358.3,4080,2)
;;=^5063107
;;^UTILITY(U,$J,358.3,4081,0)
;;=Z59.01^^29^242^7
;;^UTILITY(U,$J,358.3,4081,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,4081,1,3,0)
;;=3^Homelessness,Sheltered
;;^UTILITY(U,$J,358.3,4081,1,4,0)
;;=4^Z59.01
;;^UTILITY(U,$J,358.3,4081,2)
;;=^5161305
;;^UTILITY(U,$J,358.3,4082,0)
;;=Z59.02^^29^242^8
;;^UTILITY(U,$J,358.3,4082,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,4082,1,3,0)
;;=3^Homelessness,Unsheltered
;;^UTILITY(U,$J,358.3,4082,1,4,0)
;;=4^Z59.02
;;^UTILITY(U,$J,358.3,4082,2)
;;=^5161306
;;^UTILITY(U,$J,358.3,4083,0)
;;=Z59.00^^29^242^9
;;^UTILITY(U,$J,358.3,4083,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,4083,1,3,0)
;;=3^Homelessness,Unspec
;;^UTILITY(U,$J,358.3,4083,1,4,0)
;;=4^Z59.00
;;^UTILITY(U,$J,358.3,4083,2)
;;=^5161304
;;^UTILITY(U,$J,358.3,4084,0)
;;=Z59.41^^29^242^6
;;^UTILITY(U,$J,358.3,4084,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,4084,1,3,0)
;;=3^Food Insecurity
;;^UTILITY(U,$J,358.3,4084,1,4,0)
;;=4^Z59.41
;;^UTILITY(U,$J,358.3,4084,2)
;;=^5161307
;;^UTILITY(U,$J,358.3,4085,0)
;;=Z59.5^^29^242^4
;;^UTILITY(U,$J,358.3,4085,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,4085,1,3,0)
;;=3^Extreme Poverty
;;^UTILITY(U,$J,358.3,4085,1,4,0)
;;=4^Z59.5
;;^UTILITY(U,$J,358.3,4085,2)
;;=^5063134
;;^UTILITY(U,$J,358.3,4086,0)
;;=Z59.6^^29^242^11
;;^UTILITY(U,$J,358.3,4086,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,4086,1,3,0)
;;=3^Low Income
;;^UTILITY(U,$J,358.3,4086,1,4,0)
;;=4^Z59.6
;;^UTILITY(U,$J,358.3,4086,2)
;;=^5063135
;;^UTILITY(U,$J,358.3,4087,0)
;;=Z62.810^^29^242^13
;;^UTILITY(U,$J,358.3,4087,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,4087,1,3,0)
;;=3^Personal Hx Physical/Sexual Abuse in Childhood
;;^UTILITY(U,$J,358.3,4087,1,4,0)
;;=4^Z62.810
;;^UTILITY(U,$J,358.3,4087,2)
;;=^5063153
;;^UTILITY(U,$J,358.3,4088,0)
;;=Z62.811^^29^242^14
;;^UTILITY(U,$J,358.3,4088,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,4088,1,3,0)
;;=3^Personal Hx Psychological Abuse in Childhood
;;^UTILITY(U,$J,358.3,4088,1,4,0)
;;=4^Z62.811
;;^UTILITY(U,$J,358.3,4088,2)
;;=^5063154
;;^UTILITY(U,$J,358.3,4089,0)
;;=Z62.812^^29^242^12
;;^UTILITY(U,$J,358.3,4089,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,4089,1,3,0)
;;=3^Personal Hx Neglect in Childhood
;;^UTILITY(U,$J,358.3,4089,1,4,0)
;;=4^Z62.812
;;^UTILITY(U,$J,358.3,4089,2)
;;=^5063155
;;^UTILITY(U,$J,358.3,4090,0)
;;=Z63.0^^29^242^16
;;^UTILITY(U,$J,358.3,4090,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,4090,1,3,0)
;;=3^Problems w/ Spouse/Partner Relationship
;;^UTILITY(U,$J,358.3,4090,1,4,0)
;;=4^Z63.0
;;^UTILITY(U,$J,358.3,4090,2)
;;=^5063164
;;^UTILITY(U,$J,358.3,4091,0)
;;=Z63.1^^29^242^15
;;^UTILITY(U,$J,358.3,4091,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,4091,1,3,0)
;;=3^Problems w/ In-Laws
;;^UTILITY(U,$J,358.3,4091,1,4,0)
;;=4^Z63.1
;;^UTILITY(U,$J,358.3,4091,2)
;;=^5063165
;;^UTILITY(U,$J,358.3,4092,0)
;;=Z63.4^^29^242^2
;;^UTILITY(U,$J,358.3,4092,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,4092,1,3,0)
;;=3^Bereavement
;;^UTILITY(U,$J,358.3,4092,1,4,0)
;;=4^Z63.4
;;^UTILITY(U,$J,358.3,4092,2)
;;=^5063168
;;^UTILITY(U,$J,358.3,4093,0)
;;=Z63.5^^29^242^5
;;^UTILITY(U,$J,358.3,4093,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,4093,1,3,0)
;;=3^Family Disruption by Separation/Divorce
;;^UTILITY(U,$J,358.3,4093,1,4,0)
;;=4^Z63.5
;;^UTILITY(U,$J,358.3,4093,2)
;;=^5063169
;;^UTILITY(U,$J,358.3,4094,0)
;;=Z63.6^^29^242^3
;;^UTILITY(U,$J,358.3,4094,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,4094,1,3,0)
;;=3^Dependent Relative Needing Home Care
;;^UTILITY(U,$J,358.3,4094,1,4,0)
;;=4^Z63.6
;;^UTILITY(U,$J,358.3,4094,2)
;;=^5063170
;;^UTILITY(U,$J,358.3,4095,0)
;;=Z63.72^^29^242^1
;;^UTILITY(U,$J,358.3,4095,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,4095,1,3,0)
;;=3^Alcoholism/Drug Addiction in Family
;;^UTILITY(U,$J,358.3,4095,1,4,0)
;;=4^Z63.72
;;^UTILITY(U,$J,358.3,4095,2)
;;=^5063172
;;^UTILITY(U,$J,358.3,4096,0)
;;=Z65.3^^29^242^10
;;^UTILITY(U,$J,358.3,4096,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,4096,1,3,0)
;;=3^Legal Problems
;;^UTILITY(U,$J,358.3,4096,1,4,0)
;;=4^Z65.3
;;^UTILITY(U,$J,358.3,4096,2)
;;=^5063182
;;^UTILITY(U,$J,358.3,4097,0)
;;=90471^^30^243^1^^^^1
;;^UTILITY(U,$J,358.3,4097,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,4097,1,2,0)
;;=2^90471
;;^UTILITY(U,$J,358.3,4097,1,3,0)
;;=3^1 Immunization Administration (Use w/ Vacs Below)
;;^UTILITY(U,$J,358.3,4098,0)
;;=90472^^30^243^2^^^^1
;;^UTILITY(U,$J,358.3,4098,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,4098,1,2,0)
;;=2^90472
;;^UTILITY(U,$J,358.3,4098,1,3,0)
;;=3^2 or more Immunization Administration (use w/ Vacs below)
;;^UTILITY(U,$J,358.3,4099,0)
;;=90732^^30^243^7^^^^1
;;^UTILITY(U,$J,358.3,4099,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,4099,1,2,0)
;;=2^90732
;;^UTILITY(U,$J,358.3,4099,1,3,0)
;;=3^Pneumovax 23 (Pneumococcal Vaccine)
;;^UTILITY(U,$J,358.3,4100,0)
;;=90714^^30^243^10^^^^1
;;^UTILITY(U,$J,358.3,4100,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,4100,1,2,0)
;;=2^90714
;;^UTILITY(U,$J,358.3,4100,1,3,0)
;;=3^Td Vaccine
;;^UTILITY(U,$J,358.3,4101,0)
;;=90715^^30^243^11^^^^1
;;^UTILITY(U,$J,358.3,4101,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,4101,1,2,0)
;;=2^90715
;;^UTILITY(U,$J,358.3,4101,1,3,0)
;;=3^Tdap Vaccine
;;^UTILITY(U,$J,358.3,4102,0)
;;=90662^^30^243^3^^^^1
;;^UTILITY(U,$J,358.3,4102,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,4102,1,2,0)
;;=2^90662
;;^UTILITY(U,$J,358.3,4102,1,3,0)
;;=3^Flu Vaccine High Dose Syringe (Fluzone)
;;^UTILITY(U,$J,358.3,4103,0)
;;=90675^^30^243^9^^^^1
;;^UTILITY(U,$J,358.3,4103,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,4103,1,2,0)
;;=2^90675
;;^UTILITY(U,$J,358.3,4103,1,3,0)
;;=3^Rabies
;;^UTILITY(U,$J,358.3,4104,0)
;;=90670^^30^243^8^^^^1
;;^UTILITY(U,$J,358.3,4104,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,4104,1,2,0)
;;=2^90670
;;^UTILITY(U,$J,358.3,4104,1,3,0)
;;=3^Prevnar 13 (Pneumococcal Vaccine)
;;^UTILITY(U,$J,358.3,4105,0)
;;=90688^^30^243^4^^^^1
;;^UTILITY(U,$J,358.3,4105,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,4105,1,2,0)
;;=2^90688
;;^UTILITY(U,$J,358.3,4105,1,3,0)
;;=3^Flu Vaccine Multidose (Flulaval)
;;^UTILITY(U,$J,358.3,4106,0)
;;=90686^^30^243^5^^^^1
;;^UTILITY(U,$J,358.3,4106,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,4106,1,2,0)
;;=2^90686
;;^UTILITY(U,$J,358.3,4106,1,3,0)
;;=3^Flu Vaccine,Sngl Dose (Afluria)
;;^UTILITY(U,$J,358.3,4107,0)
;;=90653^^30^243^6^^^^1
;;^UTILITY(U,$J,358.3,4107,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,4107,1,2,0)
;;=2^90653
;;^UTILITY(U,$J,358.3,4107,1,3,0)
;;=3^Flu Vaccine,Sngl Dose (Fluad)
;;^UTILITY(U,$J,358.3,4108,0)
;;=J3301^^30^244^27^^^^1
;;^UTILITY(U,$J,358.3,4108,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,4108,1,2,0)
;;=2^J3301
;;^UTILITY(U,$J,358.3,4108,1,3,0)
;;=3^Kenalog per 10mg
;;^UTILITY(U,$J,358.3,4109,0)
;;=J1885^^30^244^43^^^^1
;;^UTILITY(U,$J,358.3,4109,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,4109,1,2,0)
;;=2^J1885
;;^UTILITY(U,$J,358.3,4109,1,3,0)
;;=3^Toradol per 15mg
;;^UTILITY(U,$J,358.3,4110,0)
;;=J2270^^30^244^35^^^^1
;;^UTILITY(U,$J,358.3,4110,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,4110,1,2,0)
;;=2^J2270
;;^UTILITY(U,$J,358.3,4110,1,3,0)
;;=3^Morphine Sulfate per 10mg
;;^UTILITY(U,$J,358.3,4111,0)
;;=J1940^^30^244^28^^^^1
;;^UTILITY(U,$J,358.3,4111,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,4111,1,2,0)
;;=2^J1940
;;^UTILITY(U,$J,358.3,4111,1,3,0)
;;=3^Lasix per 20mg
;;^UTILITY(U,$J,358.3,4112,0)
;;=J1630^^30^244^20^^^^1
;;^UTILITY(U,$J,358.3,4112,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,4112,1,2,0)
;;=2^J1630
;;^UTILITY(U,$J,358.3,4112,1,3,0)
;;=3^Haldol up to 5mg
;;^UTILITY(U,$J,358.3,4113,0)
;;=J1720^^30^244^23^^^^1
;;^UTILITY(U,$J,358.3,4113,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,4113,1,2,0)
;;=2^J1720
;;^UTILITY(U,$J,358.3,4113,1,3,0)
;;=3^Hydrocortisone Sodium Succinate per 100mg
;;^UTILITY(U,$J,358.3,4114,0)
;;=J0780^^30^244^13^^^^1
;;^UTILITY(U,$J,358.3,4114,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,4114,1,2,0)
;;=2^J0780
;;^UTILITY(U,$J,358.3,4114,1,3,0)
;;=3^Compazine 10mg
;;^UTILITY(U,$J,358.3,4115,0)
;;=J2930^^30^244^41^^^^1
;;^UTILITY(U,$J,358.3,4115,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,4115,1,2,0)
;;=2^J2930
;;^UTILITY(U,$J,358.3,4115,1,3,0)
;;=3^Solu-Medrol 125mg
;;^UTILITY(U,$J,358.3,4116,0)
;;=J3030^^30^244^25^^^^1
;;^UTILITY(U,$J,358.3,4116,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,4116,1,2,0)
;;=2^J3030
;;^UTILITY(U,$J,358.3,4116,1,3,0)
;;=3^Imitrex 6mg
;;^UTILITY(U,$J,358.3,4117,0)
;;=J2550^^30^244^39^^^^1
;;^UTILITY(U,$J,358.3,4117,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,4117,1,2,0)
;;=2^J2550
;;^UTILITY(U,$J,358.3,4117,1,3,0)
;;=3^Phenergan up to 50mg
;;^UTILITY(U,$J,358.3,4118,0)
;;=J0461^^30^244^7^^^^1
;;^UTILITY(U,$J,358.3,4118,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,4118,1,2,0)
;;=2^J0461
;;^UTILITY(U,$J,358.3,4118,1,3,0)
;;=3^Atropine Sulfate 0.01mg
;;^UTILITY(U,$J,358.3,4119,0)
;;=J2060^^30^244^6^^^^1
;;^UTILITY(U,$J,358.3,4119,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,4119,1,2,0)
;;=2^J2060
;;^UTILITY(U,$J,358.3,4119,1,3,0)
;;=3^Ativan/Lorazepam 2mg
;;^UTILITY(U,$J,358.3,4120,0)
;;=J7042^^30^244^1^^^^1
;;^UTILITY(U,$J,358.3,4120,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,4120,1,2,0)
;;=2^J7042
;;^UTILITY(U,$J,358.3,4120,1,3,0)
;;=3^5% Dextrose/NS (500ml=1Unit)
;;^UTILITY(U,$J,358.3,4121,0)
;;=J7060^^30^244^2^^^^1
;;^UTILITY(U,$J,358.3,4121,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,4121,1,2,0)
;;=2^J7060
;;^UTILITY(U,$J,358.3,4121,1,3,0)
;;=3^5% Dextrose/Water (500ml=1Unit)
;;^UTILITY(U,$J,358.3,4122,0)
;;=J0171^^30^244^4^^^^1
;;^UTILITY(U,$J,358.3,4122,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,4122,1,2,0)
;;=2^J0171
;;^UTILITY(U,$J,358.3,4122,1,3,0)
;;=3^Adrenalin,Epinephrine 0.1 mg
;;^UTILITY(U,$J,358.3,4123,0)
;;=J0282^^30^244^5^^^^1
;;^UTILITY(U,$J,358.3,4123,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,4123,1,2,0)
;;=2^J0282
;;^UTILITY(U,$J,358.3,4123,1,3,0)
;;=3^Amiodarone HCL 30mg
;;^UTILITY(U,$J,358.3,4124,0)
;;=J0456^^30^244^8^^^^1
;;^UTILITY(U,$J,358.3,4124,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,4124,1,2,0)
;;=2^J0456
;;^UTILITY(U,$J,358.3,4124,1,3,0)
;;=3^Azithromycine (Zithromax) 500mg
;;^UTILITY(U,$J,358.3,4125,0)
;;=J0690^^30^244^9^^^^1
;;^UTILITY(U,$J,358.3,4125,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,4125,1,2,0)
;;=2^J0690
;;^UTILITY(U,$J,358.3,4125,1,3,0)
;;=3^Cefazoline Sodium (Ancef) 500mg
;;^UTILITY(U,$J,358.3,4126,0)
;;=J0744^^30^244^10^^^^1
;;^UTILITY(U,$J,358.3,4126,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,4126,1,2,0)
;;=2^J0744
;;^UTILITY(U,$J,358.3,4126,1,3,0)
;;=3^Ciprofloxacin IV Infusion 200mg
;;^UTILITY(U,$J,358.3,4127,0)
;;=J0735^^30^244^11^^^^1
;;^UTILITY(U,$J,358.3,4127,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,4127,1,2,0)
;;=2^J0735
;;^UTILITY(U,$J,358.3,4127,1,3,0)
;;=3^Clonidine HCL 1mg
;;^UTILITY(U,$J,358.3,4128,0)
;;=J3360^^30^244^15^^^^1
;;^UTILITY(U,$J,358.3,4128,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,4128,1,2,0)
;;=2^J3360
;;^UTILITY(U,$J,358.3,4128,1,3,0)
;;=3^Diazepam up to 5mg
;;^UTILITY(U,$J,358.3,4129,0)
;;=J1160^^30^244^16^^^^1
;;^UTILITY(U,$J,358.3,4129,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,4129,1,2,0)
;;=2^J1160
;;^UTILITY(U,$J,358.3,4129,1,3,0)
;;=3^Digoxin up to 0.5mg
;;^UTILITY(U,$J,358.3,4130,0)
;;=J1020^^30^244^32^^^^1
;;^UTILITY(U,$J,358.3,4130,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,4130,1,2,0)
;;=2^J1020
;;^UTILITY(U,$J,358.3,4130,1,3,0)
;;=3^Methylpredinsolone Acetate 20mg
;;^UTILITY(U,$J,358.3,4131,0)
;;=J1030^^30^244^33^^^^1
;;^UTILITY(U,$J,358.3,4131,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,4131,1,2,0)
;;=2^J1030
;;^UTILITY(U,$J,358.3,4131,1,3,0)
;;=3^Methylpredinsolone Acetate 40mg
;;^UTILITY(U,$J,358.3,4132,0)
;;=J2765^^30^244^34^^^^1
;;^UTILITY(U,$J,358.3,4132,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,4132,1,2,0)
;;=2^J2765
;;^UTILITY(U,$J,358.3,4132,1,3,0)
;;=3^Metoclopramide HCL up to 10mg
;;^UTILITY(U,$J,358.3,4133,0)
;;=J2310^^30^244^36^^^^1
;;^UTILITY(U,$J,358.3,4133,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,4133,1,2,0)
;;=2^J2310
;;^UTILITY(U,$J,358.3,4133,1,3,0)
;;=3^Naloxone HCL per 1mg
;;^UTILITY(U,$J,358.3,4134,0)
;;=J7050^^30^244^37^^^^1
;;^UTILITY(U,$J,358.3,4134,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,4134,1,2,0)
;;=2^J7050
;;^UTILITY(U,$J,358.3,4134,1,3,0)
;;=3^Normal Saline Solution 250cc
;;^UTILITY(U,$J,358.3,4135,0)
;;=J2405^^30^244^38^^^^1
;;^UTILITY(U,$J,358.3,4135,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,4135,1,2,0)
;;=2^J2405
;;^UTILITY(U,$J,358.3,4135,1,3,0)
;;=3^Ondansetron HCL per 1mg
;;^UTILITY(U,$J,358.3,4136,0)
;;=J3480^^30^244^40^^^^1
;;^UTILITY(U,$J,358.3,4136,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,4136,1,2,0)
;;=2^J3480
;;^UTILITY(U,$J,358.3,4136,1,3,0)
;;=3^Potassium Chloride per 2mEq
;;^UTILITY(U,$J,358.3,4137,0)
;;=J3430^^30^244^44^^^^1
;;^UTILITY(U,$J,358.3,4137,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,4137,1,2,0)
;;=2^J3430
;;^UTILITY(U,$J,358.3,4137,1,3,0)
;;=3^Vitamin K per 1mg
;;^UTILITY(U,$J,358.3,4138,0)
;;=J0153^^30^244^3^^^^1
;;^UTILITY(U,$J,358.3,4138,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,4138,1,2,0)
;;=2^J0153
;;^UTILITY(U,$J,358.3,4138,1,3,0)
;;=3^Adenosine 1mg
;;^UTILITY(U,$J,358.3,4139,0)
;;=J3121^^30^244^42^^^^1
;;^UTILITY(U,$J,358.3,4139,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,4139,1,2,0)
;;=2^J3121
;;^UTILITY(U,$J,358.3,4139,1,3,0)
;;=3^Testosterone Enanthate 1mg
;;^UTILITY(U,$J,358.3,4140,0)
;;=J1165^^30^244^14^^^^1
;;^UTILITY(U,$J,358.3,4140,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,4140,1,2,0)
;;=2^J1165
;;^UTILITY(U,$J,358.3,4140,1,3,0)
;;=3^Dialantin 50mg
;;^UTILITY(U,$J,358.3,4141,0)
;;=J1200^^30^244^17^^^^1
;;^UTILITY(U,$J,358.3,4141,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,4141,1,2,0)
;;=2^J1200
;;^UTILITY(U,$J,358.3,4141,1,3,0)
;;=3^Diphenhydramine HCL,up to 50mg
;;^UTILITY(U,$J,358.3,4142,0)
;;=J1650^^30^244^18^^^^1
;;^UTILITY(U,$J,358.3,4142,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,4142,1,2,0)
;;=2^J1650
;;^UTILITY(U,$J,358.3,4142,1,3,0)
;;=3^Enoxaprin Sodium 10mg
;;^UTILITY(U,$J,358.3,4143,0)
;;=J1327^^30^244^19^^^^1
;;^UTILITY(U,$J,358.3,4143,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,4143,1,2,0)
;;=2^J1327
;;^UTILITY(U,$J,358.3,4143,1,3,0)
;;=3^Eptifibatide 5mg
;;^UTILITY(U,$J,358.3,4144,0)
;;=J1642^^30^244^22^^^^1
;;^UTILITY(U,$J,358.3,4144,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,4144,1,2,0)
;;=2^J1642
;;^UTILITY(U,$J,358.3,4144,1,3,0)
;;=3^Heparin Sodium per 10U
;;^UTILITY(U,$J,358.3,4145,0)
;;=J1644^^30^244^21^^^^1
;;^UTILITY(U,$J,358.3,4145,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,4145,1,2,0)
;;=2^J1644
;;^UTILITY(U,$J,358.3,4145,1,3,0)
;;=3^Heparin Sodium per 1000U
;;^UTILITY(U,$J,358.3,4146,0)
;;=J3410^^30^244^24^^^^1
;;^UTILITY(U,$J,358.3,4146,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,4146,1,2,0)
;;=2^J3410
;;^UTILITY(U,$J,358.3,4146,1,3,0)
;;=3^Hydroxyzine HCL,up to 25mg
;;^UTILITY(U,$J,358.3,4147,0)
;;=J1815^^30^244^26^^^^1
;;^UTILITY(U,$J,358.3,4147,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,4147,1,2,0)
;;=2^J1815
;;^UTILITY(U,$J,358.3,4147,1,3,0)
;;=3^Insulin 5U
;;^UTILITY(U,$J,358.3,4148,0)
;;=J1956^^30^244^29^^^^1
;;^UTILITY(U,$J,358.3,4148,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,4148,1,2,0)
;;=2^J1956
;;^UTILITY(U,$J,358.3,4148,1,3,0)
;;=3^Levofloxacin 250mg
;;^UTILITY(U,$J,358.3,4149,0)
;;=J1050^^30^244^30^^^^1
;;^UTILITY(U,$J,358.3,4149,1,0)
;;=^358.31IA^3^2
;;^UTILITY(U,$J,358.3,4149,1,2,0)
;;=2^J1050
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HIBDEI01U 19757 printed Dec 13, 2024@01:39:57 Page 2
IBDEI01U ; ; 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,4070,0)
+2 ;;=L89.622^^29^240^285
+3 ;;^UTILITY(U,$J,358.3,4070,1,0)
+4 ;;=^358.31IA^4^2
+5 ;;^UTILITY(U,$J,358.3,4070,1,3,0)
+6 ;;=3^Pressure Ulcer,Left Heel,Stage 2
+7 ;;^UTILITY(U,$J,358.3,4070,1,4,0)
+8 ;;=4^L89.622
+9 ;;^UTILITY(U,$J,358.3,4070,2)
+10 ;;=^5009437
+11 ;;^UTILITY(U,$J,358.3,4071,0)
+12 ;;=L89.623^^29^240^286
+13 ;;^UTILITY(U,$J,358.3,4071,1,0)
+14 ;;=^358.31IA^4^2
+15 ;;^UTILITY(U,$J,358.3,4071,1,3,0)
+16 ;;=3^Pressure Ulcer,Left Heel,Stage 3
+17 ;;^UTILITY(U,$J,358.3,4071,1,4,0)
+18 ;;=4^L89.623
+19 ;;^UTILITY(U,$J,358.3,4071,2)
+20 ;;=^5009438
+21 ;;^UTILITY(U,$J,358.3,4072,0)
+22 ;;=L89.624^^29^240^287
+23 ;;^UTILITY(U,$J,358.3,4072,1,0)
+24 ;;=^358.31IA^4^2
+25 ;;^UTILITY(U,$J,358.3,4072,1,3,0)
+26 ;;=3^Pressure Ulcer,Left Heel,Stage 4
+27 ;;^UTILITY(U,$J,358.3,4072,1,4,0)
+28 ;;=4^L89.624
+29 ;;^UTILITY(U,$J,358.3,4072,2)
+30 ;;=^5009439
+31 ;;^UTILITY(U,$J,358.3,4073,0)
+32 ;;=L89.626^^29^240^305
+33 ;;^UTILITY(U,$J,358.3,4073,1,0)
+34 ;;=^358.31IA^4^2
+35 ;;^UTILITY(U,$J,358.3,4073,1,3,0)
+36 ;;=3^Pressure-Induced Deep Tissue Damage,Left Heel
+37 ;;^UTILITY(U,$J,358.3,4073,1,4,0)
+38 ;;=4^L89.626
+39 ;;^UTILITY(U,$J,358.3,4073,2)
+40 ;;=^5158097
+41 ;;^UTILITY(U,$J,358.3,4074,0)
+42 ;;=R45.851^^29^241^3
+43 ;;^UTILITY(U,$J,358.3,4074,1,0)
+44 ;;=^358.31IA^4^2
+45 ;;^UTILITY(U,$J,358.3,4074,1,3,0)
+46 ;;=3^Suicidal Ideations
+47 ;;^UTILITY(U,$J,358.3,4074,1,4,0)
+48 ;;=4^R45.851
+49 ;;^UTILITY(U,$J,358.3,4074,2)
+50 ;;=^5019474
+51 ;;^UTILITY(U,$J,358.3,4075,0)
+52 ;;=T14.91XA^^29^241^4
+53 ;;^UTILITY(U,$J,358.3,4075,1,0)
+54 ;;=^358.31IA^4^2
+55 ;;^UTILITY(U,$J,358.3,4075,1,3,0)
+56 ;;=3^Suicide Attempt,Initial Encntr
+57 ;;^UTILITY(U,$J,358.3,4075,1,4,0)
+58 ;;=4^T14.91XA
+59 ;;^UTILITY(U,$J,358.3,4075,2)
+60 ;;=^5151779
+61 ;;^UTILITY(U,$J,358.3,4076,0)
+62 ;;=T14.91XD^^29^241^6
+63 ;;^UTILITY(U,$J,358.3,4076,1,0)
+64 ;;=^358.31IA^4^2
+65 ;;^UTILITY(U,$J,358.3,4076,1,3,0)
+66 ;;=3^Suicide Attempt,Subsequent Encntr
+67 ;;^UTILITY(U,$J,358.3,4076,1,4,0)
+68 ;;=4^T14.91XD
+69 ;;^UTILITY(U,$J,358.3,4076,2)
+70 ;;=^5151780
+71 ;;^UTILITY(U,$J,358.3,4077,0)
+72 ;;=T14.91XS^^29^241^5
+73 ;;^UTILITY(U,$J,358.3,4077,1,0)
+74 ;;=^358.31IA^4^2
+75 ;;^UTILITY(U,$J,358.3,4077,1,3,0)
+76 ;;=3^Suicide Attempt,Sequela
+77 ;;^UTILITY(U,$J,358.3,4077,1,4,0)
+78 ;;=4^T14.91XS
+79 ;;^UTILITY(U,$J,358.3,4077,2)
+80 ;;=^5151781
+81 ;;^UTILITY(U,$J,358.3,4078,0)
+82 ;;=Z91.51^^29^241^2
+83 ;;^UTILITY(U,$J,358.3,4078,1,0)
+84 ;;=^358.31IA^4^2
+85 ;;^UTILITY(U,$J,358.3,4078,1,3,0)
+86 ;;=3^Personal Hx of Suicidal Behavior
+87 ;;^UTILITY(U,$J,358.3,4078,1,4,0)
+88 ;;=4^Z91.51
+89 ;;^UTILITY(U,$J,358.3,4078,2)
+90 ;;=^5161317
+91 ;;^UTILITY(U,$J,358.3,4079,0)
+92 ;;=Z91.52^^29^241^1
+93 ;;^UTILITY(U,$J,358.3,4079,1,0)
+94 ;;=^358.31IA^4^2
+95 ;;^UTILITY(U,$J,358.3,4079,1,3,0)
+96 ;;=3^Personal Hx of Non-Suicidal Self-Harm
+97 ;;^UTILITY(U,$J,358.3,4079,1,4,0)
+98 ;;=4^Z91.52
+99 ;;^UTILITY(U,$J,358.3,4079,2)
+100 ;;=^5161318
+101 ;;^UTILITY(U,$J,358.3,4080,0)
+102 ;;=Z56.0^^29^242^17
+103 ;;^UTILITY(U,$J,358.3,4080,1,0)
+104 ;;=^358.31IA^4^2
+105 ;;^UTILITY(U,$J,358.3,4080,1,3,0)
+106 ;;=3^Unemployment,Unspec
+107 ;;^UTILITY(U,$J,358.3,4080,1,4,0)
+108 ;;=4^Z56.0
+109 ;;^UTILITY(U,$J,358.3,4080,2)
+110 ;;=^5063107
+111 ;;^UTILITY(U,$J,358.3,4081,0)
+112 ;;=Z59.01^^29^242^7
+113 ;;^UTILITY(U,$J,358.3,4081,1,0)
+114 ;;=^358.31IA^4^2
+115 ;;^UTILITY(U,$J,358.3,4081,1,3,0)
+116 ;;=3^Homelessness,Sheltered
+117 ;;^UTILITY(U,$J,358.3,4081,1,4,0)
+118 ;;=4^Z59.01
+119 ;;^UTILITY(U,$J,358.3,4081,2)
+120 ;;=^5161305
+121 ;;^UTILITY(U,$J,358.3,4082,0)
+122 ;;=Z59.02^^29^242^8
+123 ;;^UTILITY(U,$J,358.3,4082,1,0)
+124 ;;=^358.31IA^4^2
+125 ;;^UTILITY(U,$J,358.3,4082,1,3,0)
+126 ;;=3^Homelessness,Unsheltered
+127 ;;^UTILITY(U,$J,358.3,4082,1,4,0)
+128 ;;=4^Z59.02
+129 ;;^UTILITY(U,$J,358.3,4082,2)
+130 ;;=^5161306
+131 ;;^UTILITY(U,$J,358.3,4083,0)
+132 ;;=Z59.00^^29^242^9
+133 ;;^UTILITY(U,$J,358.3,4083,1,0)
+134 ;;=^358.31IA^4^2
+135 ;;^UTILITY(U,$J,358.3,4083,1,3,0)
+136 ;;=3^Homelessness,Unspec
+137 ;;^UTILITY(U,$J,358.3,4083,1,4,0)
+138 ;;=4^Z59.00
+139 ;;^UTILITY(U,$J,358.3,4083,2)
+140 ;;=^5161304
+141 ;;^UTILITY(U,$J,358.3,4084,0)
+142 ;;=Z59.41^^29^242^6
+143 ;;^UTILITY(U,$J,358.3,4084,1,0)
+144 ;;=^358.31IA^4^2
+145 ;;^UTILITY(U,$J,358.3,4084,1,3,0)
+146 ;;=3^Food Insecurity
+147 ;;^UTILITY(U,$J,358.3,4084,1,4,0)
+148 ;;=4^Z59.41
+149 ;;^UTILITY(U,$J,358.3,4084,2)
+150 ;;=^5161307
+151 ;;^UTILITY(U,$J,358.3,4085,0)
+152 ;;=Z59.5^^29^242^4
+153 ;;^UTILITY(U,$J,358.3,4085,1,0)
+154 ;;=^358.31IA^4^2
+155 ;;^UTILITY(U,$J,358.3,4085,1,3,0)
+156 ;;=3^Extreme Poverty
+157 ;;^UTILITY(U,$J,358.3,4085,1,4,0)
+158 ;;=4^Z59.5
+159 ;;^UTILITY(U,$J,358.3,4085,2)
+160 ;;=^5063134
+161 ;;^UTILITY(U,$J,358.3,4086,0)
+162 ;;=Z59.6^^29^242^11
+163 ;;^UTILITY(U,$J,358.3,4086,1,0)
+164 ;;=^358.31IA^4^2
+165 ;;^UTILITY(U,$J,358.3,4086,1,3,0)
+166 ;;=3^Low Income
+167 ;;^UTILITY(U,$J,358.3,4086,1,4,0)
+168 ;;=4^Z59.6
+169 ;;^UTILITY(U,$J,358.3,4086,2)
+170 ;;=^5063135
+171 ;;^UTILITY(U,$J,358.3,4087,0)
+172 ;;=Z62.810^^29^242^13
+173 ;;^UTILITY(U,$J,358.3,4087,1,0)
+174 ;;=^358.31IA^4^2
+175 ;;^UTILITY(U,$J,358.3,4087,1,3,0)
+176 ;;=3^Personal Hx Physical/Sexual Abuse in Childhood
+177 ;;^UTILITY(U,$J,358.3,4087,1,4,0)
+178 ;;=4^Z62.810
+179 ;;^UTILITY(U,$J,358.3,4087,2)
+180 ;;=^5063153
+181 ;;^UTILITY(U,$J,358.3,4088,0)
+182 ;;=Z62.811^^29^242^14
+183 ;;^UTILITY(U,$J,358.3,4088,1,0)
+184 ;;=^358.31IA^4^2
+185 ;;^UTILITY(U,$J,358.3,4088,1,3,0)
+186 ;;=3^Personal Hx Psychological Abuse in Childhood
+187 ;;^UTILITY(U,$J,358.3,4088,1,4,0)
+188 ;;=4^Z62.811
+189 ;;^UTILITY(U,$J,358.3,4088,2)
+190 ;;=^5063154
+191 ;;^UTILITY(U,$J,358.3,4089,0)
+192 ;;=Z62.812^^29^242^12
+193 ;;^UTILITY(U,$J,358.3,4089,1,0)
+194 ;;=^358.31IA^4^2
+195 ;;^UTILITY(U,$J,358.3,4089,1,3,0)
+196 ;;=3^Personal Hx Neglect in Childhood
+197 ;;^UTILITY(U,$J,358.3,4089,1,4,0)
+198 ;;=4^Z62.812
+199 ;;^UTILITY(U,$J,358.3,4089,2)
+200 ;;=^5063155
+201 ;;^UTILITY(U,$J,358.3,4090,0)
+202 ;;=Z63.0^^29^242^16
+203 ;;^UTILITY(U,$J,358.3,4090,1,0)
+204 ;;=^358.31IA^4^2
+205 ;;^UTILITY(U,$J,358.3,4090,1,3,0)
+206 ;;=3^Problems w/ Spouse/Partner Relationship
+207 ;;^UTILITY(U,$J,358.3,4090,1,4,0)
+208 ;;=4^Z63.0
+209 ;;^UTILITY(U,$J,358.3,4090,2)
+210 ;;=^5063164
+211 ;;^UTILITY(U,$J,358.3,4091,0)
+212 ;;=Z63.1^^29^242^15
+213 ;;^UTILITY(U,$J,358.3,4091,1,0)
+214 ;;=^358.31IA^4^2
+215 ;;^UTILITY(U,$J,358.3,4091,1,3,0)
+216 ;;=3^Problems w/ In-Laws
+217 ;;^UTILITY(U,$J,358.3,4091,1,4,0)
+218 ;;=4^Z63.1
+219 ;;^UTILITY(U,$J,358.3,4091,2)
+220 ;;=^5063165
+221 ;;^UTILITY(U,$J,358.3,4092,0)
+222 ;;=Z63.4^^29^242^2
+223 ;;^UTILITY(U,$J,358.3,4092,1,0)
+224 ;;=^358.31IA^4^2
+225 ;;^UTILITY(U,$J,358.3,4092,1,3,0)
+226 ;;=3^Bereavement
+227 ;;^UTILITY(U,$J,358.3,4092,1,4,0)
+228 ;;=4^Z63.4
+229 ;;^UTILITY(U,$J,358.3,4092,2)
+230 ;;=^5063168
+231 ;;^UTILITY(U,$J,358.3,4093,0)
+232 ;;=Z63.5^^29^242^5
+233 ;;^UTILITY(U,$J,358.3,4093,1,0)
+234 ;;=^358.31IA^4^2
+235 ;;^UTILITY(U,$J,358.3,4093,1,3,0)
+236 ;;=3^Family Disruption by Separation/Divorce
+237 ;;^UTILITY(U,$J,358.3,4093,1,4,0)
+238 ;;=4^Z63.5
+239 ;;^UTILITY(U,$J,358.3,4093,2)
+240 ;;=^5063169
+241 ;;^UTILITY(U,$J,358.3,4094,0)
+242 ;;=Z63.6^^29^242^3
+243 ;;^UTILITY(U,$J,358.3,4094,1,0)
+244 ;;=^358.31IA^4^2
+245 ;;^UTILITY(U,$J,358.3,4094,1,3,0)
+246 ;;=3^Dependent Relative Needing Home Care
+247 ;;^UTILITY(U,$J,358.3,4094,1,4,0)
+248 ;;=4^Z63.6
+249 ;;^UTILITY(U,$J,358.3,4094,2)
+250 ;;=^5063170
+251 ;;^UTILITY(U,$J,358.3,4095,0)
+252 ;;=Z63.72^^29^242^1
+253 ;;^UTILITY(U,$J,358.3,4095,1,0)
+254 ;;=^358.31IA^4^2
+255 ;;^UTILITY(U,$J,358.3,4095,1,3,0)
+256 ;;=3^Alcoholism/Drug Addiction in Family
+257 ;;^UTILITY(U,$J,358.3,4095,1,4,0)
+258 ;;=4^Z63.72
+259 ;;^UTILITY(U,$J,358.3,4095,2)
+260 ;;=^5063172
+261 ;;^UTILITY(U,$J,358.3,4096,0)
+262 ;;=Z65.3^^29^242^10
+263 ;;^UTILITY(U,$J,358.3,4096,1,0)
+264 ;;=^358.31IA^4^2
+265 ;;^UTILITY(U,$J,358.3,4096,1,3,0)
+266 ;;=3^Legal Problems
+267 ;;^UTILITY(U,$J,358.3,4096,1,4,0)
+268 ;;=4^Z65.3
+269 ;;^UTILITY(U,$J,358.3,4096,2)
+270 ;;=^5063182
+271 ;;^UTILITY(U,$J,358.3,4097,0)
+272 ;;=90471^^30^243^1^^^^1
+273 ;;^UTILITY(U,$J,358.3,4097,1,0)
+274 ;;=^358.31IA^3^2
+275 ;;^UTILITY(U,$J,358.3,4097,1,2,0)
+276 ;;=2^90471
+277 ;;^UTILITY(U,$J,358.3,4097,1,3,0)
+278 ;;=3^1 Immunization Administration (Use w/ Vacs Below)
+279 ;;^UTILITY(U,$J,358.3,4098,0)
+280 ;;=90472^^30^243^2^^^^1
+281 ;;^UTILITY(U,$J,358.3,4098,1,0)
+282 ;;=^358.31IA^3^2
+283 ;;^UTILITY(U,$J,358.3,4098,1,2,0)
+284 ;;=2^90472
+285 ;;^UTILITY(U,$J,358.3,4098,1,3,0)
+286 ;;=3^2 or more Immunization Administration (use w/ Vacs below)
+287 ;;^UTILITY(U,$J,358.3,4099,0)
+288 ;;=90732^^30^243^7^^^^1
+289 ;;^UTILITY(U,$J,358.3,4099,1,0)
+290 ;;=^358.31IA^3^2
+291 ;;^UTILITY(U,$J,358.3,4099,1,2,0)
+292 ;;=2^90732
+293 ;;^UTILITY(U,$J,358.3,4099,1,3,0)
+294 ;;=3^Pneumovax 23 (Pneumococcal Vaccine)
+295 ;;^UTILITY(U,$J,358.3,4100,0)
+296 ;;=90714^^30^243^10^^^^1
+297 ;;^UTILITY(U,$J,358.3,4100,1,0)
+298 ;;=^358.31IA^3^2
+299 ;;^UTILITY(U,$J,358.3,4100,1,2,0)
+300 ;;=2^90714
+301 ;;^UTILITY(U,$J,358.3,4100,1,3,0)
+302 ;;=3^Td Vaccine
+303 ;;^UTILITY(U,$J,358.3,4101,0)
+304 ;;=90715^^30^243^11^^^^1
+305 ;;^UTILITY(U,$J,358.3,4101,1,0)
+306 ;;=^358.31IA^3^2
+307 ;;^UTILITY(U,$J,358.3,4101,1,2,0)
+308 ;;=2^90715
+309 ;;^UTILITY(U,$J,358.3,4101,1,3,0)
+310 ;;=3^Tdap Vaccine
+311 ;;^UTILITY(U,$J,358.3,4102,0)
+312 ;;=90662^^30^243^3^^^^1
+313 ;;^UTILITY(U,$J,358.3,4102,1,0)
+314 ;;=^358.31IA^3^2
+315 ;;^UTILITY(U,$J,358.3,4102,1,2,0)
+316 ;;=2^90662
+317 ;;^UTILITY(U,$J,358.3,4102,1,3,0)
+318 ;;=3^Flu Vaccine High Dose Syringe (Fluzone)
+319 ;;^UTILITY(U,$J,358.3,4103,0)
+320 ;;=90675^^30^243^9^^^^1
+321 ;;^UTILITY(U,$J,358.3,4103,1,0)
+322 ;;=^358.31IA^3^2
+323 ;;^UTILITY(U,$J,358.3,4103,1,2,0)
+324 ;;=2^90675
+325 ;;^UTILITY(U,$J,358.3,4103,1,3,0)
+326 ;;=3^Rabies
+327 ;;^UTILITY(U,$J,358.3,4104,0)
+328 ;;=90670^^30^243^8^^^^1
+329 ;;^UTILITY(U,$J,358.3,4104,1,0)
+330 ;;=^358.31IA^3^2
+331 ;;^UTILITY(U,$J,358.3,4104,1,2,0)
+332 ;;=2^90670
+333 ;;^UTILITY(U,$J,358.3,4104,1,3,0)
+334 ;;=3^Prevnar 13 (Pneumococcal Vaccine)
+335 ;;^UTILITY(U,$J,358.3,4105,0)
+336 ;;=90688^^30^243^4^^^^1
+337 ;;^UTILITY(U,$J,358.3,4105,1,0)
+338 ;;=^358.31IA^3^2
+339 ;;^UTILITY(U,$J,358.3,4105,1,2,0)
+340 ;;=2^90688
+341 ;;^UTILITY(U,$J,358.3,4105,1,3,0)
+342 ;;=3^Flu Vaccine Multidose (Flulaval)
+343 ;;^UTILITY(U,$J,358.3,4106,0)
+344 ;;=90686^^30^243^5^^^^1
+345 ;;^UTILITY(U,$J,358.3,4106,1,0)
+346 ;;=^358.31IA^3^2
+347 ;;^UTILITY(U,$J,358.3,4106,1,2,0)
+348 ;;=2^90686
+349 ;;^UTILITY(U,$J,358.3,4106,1,3,0)
+350 ;;=3^Flu Vaccine,Sngl Dose (Afluria)
+351 ;;^UTILITY(U,$J,358.3,4107,0)
+352 ;;=90653^^30^243^6^^^^1
+353 ;;^UTILITY(U,$J,358.3,4107,1,0)
+354 ;;=^358.31IA^3^2
+355 ;;^UTILITY(U,$J,358.3,4107,1,2,0)
+356 ;;=2^90653
+357 ;;^UTILITY(U,$J,358.3,4107,1,3,0)
+358 ;;=3^Flu Vaccine,Sngl Dose (Fluad)
+359 ;;^UTILITY(U,$J,358.3,4108,0)
+360 ;;=J3301^^30^244^27^^^^1
+361 ;;^UTILITY(U,$J,358.3,4108,1,0)
+362 ;;=^358.31IA^3^2
+363 ;;^UTILITY(U,$J,358.3,4108,1,2,0)
+364 ;;=2^J3301
+365 ;;^UTILITY(U,$J,358.3,4108,1,3,0)
+366 ;;=3^Kenalog per 10mg
+367 ;;^UTILITY(U,$J,358.3,4109,0)
+368 ;;=J1885^^30^244^43^^^^1
+369 ;;^UTILITY(U,$J,358.3,4109,1,0)
+370 ;;=^358.31IA^3^2
+371 ;;^UTILITY(U,$J,358.3,4109,1,2,0)
+372 ;;=2^J1885
+373 ;;^UTILITY(U,$J,358.3,4109,1,3,0)
+374 ;;=3^Toradol per 15mg
+375 ;;^UTILITY(U,$J,358.3,4110,0)
+376 ;;=J2270^^30^244^35^^^^1
+377 ;;^UTILITY(U,$J,358.3,4110,1,0)
+378 ;;=^358.31IA^3^2
+379 ;;^UTILITY(U,$J,358.3,4110,1,2,0)
+380 ;;=2^J2270
+381 ;;^UTILITY(U,$J,358.3,4110,1,3,0)
+382 ;;=3^Morphine Sulfate per 10mg
+383 ;;^UTILITY(U,$J,358.3,4111,0)
+384 ;;=J1940^^30^244^28^^^^1
+385 ;;^UTILITY(U,$J,358.3,4111,1,0)
+386 ;;=^358.31IA^3^2
+387 ;;^UTILITY(U,$J,358.3,4111,1,2,0)
+388 ;;=2^J1940
+389 ;;^UTILITY(U,$J,358.3,4111,1,3,0)
+390 ;;=3^Lasix per 20mg
+391 ;;^UTILITY(U,$J,358.3,4112,0)
+392 ;;=J1630^^30^244^20^^^^1
+393 ;;^UTILITY(U,$J,358.3,4112,1,0)
+394 ;;=^358.31IA^3^2
+395 ;;^UTILITY(U,$J,358.3,4112,1,2,0)
+396 ;;=2^J1630
+397 ;;^UTILITY(U,$J,358.3,4112,1,3,0)
+398 ;;=3^Haldol up to 5mg
+399 ;;^UTILITY(U,$J,358.3,4113,0)
+400 ;;=J1720^^30^244^23^^^^1
+401 ;;^UTILITY(U,$J,358.3,4113,1,0)
+402 ;;=^358.31IA^3^2
+403 ;;^UTILITY(U,$J,358.3,4113,1,2,0)
+404 ;;=2^J1720
+405 ;;^UTILITY(U,$J,358.3,4113,1,3,0)
+406 ;;=3^Hydrocortisone Sodium Succinate per 100mg
+407 ;;^UTILITY(U,$J,358.3,4114,0)
+408 ;;=J0780^^30^244^13^^^^1
+409 ;;^UTILITY(U,$J,358.3,4114,1,0)
+410 ;;=^358.31IA^3^2
+411 ;;^UTILITY(U,$J,358.3,4114,1,2,0)
+412 ;;=2^J0780
+413 ;;^UTILITY(U,$J,358.3,4114,1,3,0)
+414 ;;=3^Compazine 10mg
+415 ;;^UTILITY(U,$J,358.3,4115,0)
+416 ;;=J2930^^30^244^41^^^^1
+417 ;;^UTILITY(U,$J,358.3,4115,1,0)
+418 ;;=^358.31IA^3^2
+419 ;;^UTILITY(U,$J,358.3,4115,1,2,0)
+420 ;;=2^J2930
+421 ;;^UTILITY(U,$J,358.3,4115,1,3,0)
+422 ;;=3^Solu-Medrol 125mg
+423 ;;^UTILITY(U,$J,358.3,4116,0)
+424 ;;=J3030^^30^244^25^^^^1
+425 ;;^UTILITY(U,$J,358.3,4116,1,0)
+426 ;;=^358.31IA^3^2
+427 ;;^UTILITY(U,$J,358.3,4116,1,2,0)
+428 ;;=2^J3030
+429 ;;^UTILITY(U,$J,358.3,4116,1,3,0)
+430 ;;=3^Imitrex 6mg
+431 ;;^UTILITY(U,$J,358.3,4117,0)
+432 ;;=J2550^^30^244^39^^^^1
+433 ;;^UTILITY(U,$J,358.3,4117,1,0)
+434 ;;=^358.31IA^3^2
+435 ;;^UTILITY(U,$J,358.3,4117,1,2,0)
+436 ;;=2^J2550
+437 ;;^UTILITY(U,$J,358.3,4117,1,3,0)
+438 ;;=3^Phenergan up to 50mg
+439 ;;^UTILITY(U,$J,358.3,4118,0)
+440 ;;=J0461^^30^244^7^^^^1
+441 ;;^UTILITY(U,$J,358.3,4118,1,0)
+442 ;;=^358.31IA^3^2
+443 ;;^UTILITY(U,$J,358.3,4118,1,2,0)
+444 ;;=2^J0461
+445 ;;^UTILITY(U,$J,358.3,4118,1,3,0)
+446 ;;=3^Atropine Sulfate 0.01mg
+447 ;;^UTILITY(U,$J,358.3,4119,0)
+448 ;;=J2060^^30^244^6^^^^1
+449 ;;^UTILITY(U,$J,358.3,4119,1,0)
+450 ;;=^358.31IA^3^2
+451 ;;^UTILITY(U,$J,358.3,4119,1,2,0)
+452 ;;=2^J2060
+453 ;;^UTILITY(U,$J,358.3,4119,1,3,0)
+454 ;;=3^Ativan/Lorazepam 2mg
+455 ;;^UTILITY(U,$J,358.3,4120,0)
+456 ;;=J7042^^30^244^1^^^^1
+457 ;;^UTILITY(U,$J,358.3,4120,1,0)
+458 ;;=^358.31IA^3^2
+459 ;;^UTILITY(U,$J,358.3,4120,1,2,0)
+460 ;;=2^J7042
+461 ;;^UTILITY(U,$J,358.3,4120,1,3,0)
+462 ;;=3^5% Dextrose/NS (500ml=1Unit)
+463 ;;^UTILITY(U,$J,358.3,4121,0)
+464 ;;=J7060^^30^244^2^^^^1
+465 ;;^UTILITY(U,$J,358.3,4121,1,0)
+466 ;;=^358.31IA^3^2
+467 ;;^UTILITY(U,$J,358.3,4121,1,2,0)
+468 ;;=2^J7060
+469 ;;^UTILITY(U,$J,358.3,4121,1,3,0)
+470 ;;=3^5% Dextrose/Water (500ml=1Unit)
+471 ;;^UTILITY(U,$J,358.3,4122,0)
+472 ;;=J0171^^30^244^4^^^^1
+473 ;;^UTILITY(U,$J,358.3,4122,1,0)
+474 ;;=^358.31IA^3^2
+475 ;;^UTILITY(U,$J,358.3,4122,1,2,0)
+476 ;;=2^J0171
+477 ;;^UTILITY(U,$J,358.3,4122,1,3,0)
+478 ;;=3^Adrenalin,Epinephrine 0.1 mg
+479 ;;^UTILITY(U,$J,358.3,4123,0)
+480 ;;=J0282^^30^244^5^^^^1
+481 ;;^UTILITY(U,$J,358.3,4123,1,0)
+482 ;;=^358.31IA^3^2
+483 ;;^UTILITY(U,$J,358.3,4123,1,2,0)
+484 ;;=2^J0282
+485 ;;^UTILITY(U,$J,358.3,4123,1,3,0)
+486 ;;=3^Amiodarone HCL 30mg
+487 ;;^UTILITY(U,$J,358.3,4124,0)
+488 ;;=J0456^^30^244^8^^^^1
+489 ;;^UTILITY(U,$J,358.3,4124,1,0)
+490 ;;=^358.31IA^3^2
+491 ;;^UTILITY(U,$J,358.3,4124,1,2,0)
+492 ;;=2^J0456
+493 ;;^UTILITY(U,$J,358.3,4124,1,3,0)
+494 ;;=3^Azithromycine (Zithromax) 500mg
+495 ;;^UTILITY(U,$J,358.3,4125,0)
+496 ;;=J0690^^30^244^9^^^^1
+497 ;;^UTILITY(U,$J,358.3,4125,1,0)
+498 ;;=^358.31IA^3^2
+499 ;;^UTILITY(U,$J,358.3,4125,1,2,0)
+500 ;;=2^J0690
+501 ;;^UTILITY(U,$J,358.3,4125,1,3,0)
+502 ;;=3^Cefazoline Sodium (Ancef) 500mg
+503 ;;^UTILITY(U,$J,358.3,4126,0)
+504 ;;=J0744^^30^244^10^^^^1
+505 ;;^UTILITY(U,$J,358.3,4126,1,0)
+506 ;;=^358.31IA^3^2
+507 ;;^UTILITY(U,$J,358.3,4126,1,2,0)
+508 ;;=2^J0744
+509 ;;^UTILITY(U,$J,358.3,4126,1,3,0)
+510 ;;=3^Ciprofloxacin IV Infusion 200mg
+511 ;;^UTILITY(U,$J,358.3,4127,0)
+512 ;;=J0735^^30^244^11^^^^1
+513 ;;^UTILITY(U,$J,358.3,4127,1,0)
+514 ;;=^358.31IA^3^2
+515 ;;^UTILITY(U,$J,358.3,4127,1,2,0)
+516 ;;=2^J0735
+517 ;;^UTILITY(U,$J,358.3,4127,1,3,0)
+518 ;;=3^Clonidine HCL 1mg
+519 ;;^UTILITY(U,$J,358.3,4128,0)
+520 ;;=J3360^^30^244^15^^^^1
+521 ;;^UTILITY(U,$J,358.3,4128,1,0)
+522 ;;=^358.31IA^3^2
+523 ;;^UTILITY(U,$J,358.3,4128,1,2,0)
+524 ;;=2^J3360
+525 ;;^UTILITY(U,$J,358.3,4128,1,3,0)
+526 ;;=3^Diazepam up to 5mg
+527 ;;^UTILITY(U,$J,358.3,4129,0)
+528 ;;=J1160^^30^244^16^^^^1
+529 ;;^UTILITY(U,$J,358.3,4129,1,0)
+530 ;;=^358.31IA^3^2
+531 ;;^UTILITY(U,$J,358.3,4129,1,2,0)
+532 ;;=2^J1160
+533 ;;^UTILITY(U,$J,358.3,4129,1,3,0)
+534 ;;=3^Digoxin up to 0.5mg
+535 ;;^UTILITY(U,$J,358.3,4130,0)
+536 ;;=J1020^^30^244^32^^^^1
+537 ;;^UTILITY(U,$J,358.3,4130,1,0)
+538 ;;=^358.31IA^3^2
+539 ;;^UTILITY(U,$J,358.3,4130,1,2,0)
+540 ;;=2^J1020
+541 ;;^UTILITY(U,$J,358.3,4130,1,3,0)
+542 ;;=3^Methylpredinsolone Acetate 20mg
+543 ;;^UTILITY(U,$J,358.3,4131,0)
+544 ;;=J1030^^30^244^33^^^^1
+545 ;;^UTILITY(U,$J,358.3,4131,1,0)
+546 ;;=^358.31IA^3^2
+547 ;;^UTILITY(U,$J,358.3,4131,1,2,0)
+548 ;;=2^J1030
+549 ;;^UTILITY(U,$J,358.3,4131,1,3,0)
+550 ;;=3^Methylpredinsolone Acetate 40mg
+551 ;;^UTILITY(U,$J,358.3,4132,0)
+552 ;;=J2765^^30^244^34^^^^1
+553 ;;^UTILITY(U,$J,358.3,4132,1,0)
+554 ;;=^358.31IA^3^2
+555 ;;^UTILITY(U,$J,358.3,4132,1,2,0)
+556 ;;=2^J2765
+557 ;;^UTILITY(U,$J,358.3,4132,1,3,0)
+558 ;;=3^Metoclopramide HCL up to 10mg
+559 ;;^UTILITY(U,$J,358.3,4133,0)
+560 ;;=J2310^^30^244^36^^^^1
+561 ;;^UTILITY(U,$J,358.3,4133,1,0)
+562 ;;=^358.31IA^3^2
+563 ;;^UTILITY(U,$J,358.3,4133,1,2,0)
+564 ;;=2^J2310
+565 ;;^UTILITY(U,$J,358.3,4133,1,3,0)
+566 ;;=3^Naloxone HCL per 1mg
+567 ;;^UTILITY(U,$J,358.3,4134,0)
+568 ;;=J7050^^30^244^37^^^^1
+569 ;;^UTILITY(U,$J,358.3,4134,1,0)
+570 ;;=^358.31IA^3^2
+571 ;;^UTILITY(U,$J,358.3,4134,1,2,0)
+572 ;;=2^J7050
+573 ;;^UTILITY(U,$J,358.3,4134,1,3,0)
+574 ;;=3^Normal Saline Solution 250cc
+575 ;;^UTILITY(U,$J,358.3,4135,0)
+576 ;;=J2405^^30^244^38^^^^1
+577 ;;^UTILITY(U,$J,358.3,4135,1,0)
+578 ;;=^358.31IA^3^2
+579 ;;^UTILITY(U,$J,358.3,4135,1,2,0)
+580 ;;=2^J2405
+581 ;;^UTILITY(U,$J,358.3,4135,1,3,0)
+582 ;;=3^Ondansetron HCL per 1mg
+583 ;;^UTILITY(U,$J,358.3,4136,0)
+584 ;;=J3480^^30^244^40^^^^1
+585 ;;^UTILITY(U,$J,358.3,4136,1,0)
+586 ;;=^358.31IA^3^2
+587 ;;^UTILITY(U,$J,358.3,4136,1,2,0)
+588 ;;=2^J3480
+589 ;;^UTILITY(U,$J,358.3,4136,1,3,0)
+590 ;;=3^Potassium Chloride per 2mEq
+591 ;;^UTILITY(U,$J,358.3,4137,0)
+592 ;;=J3430^^30^244^44^^^^1
+593 ;;^UTILITY(U,$J,358.3,4137,1,0)
+594 ;;=^358.31IA^3^2
+595 ;;^UTILITY(U,$J,358.3,4137,1,2,0)
+596 ;;=2^J3430
+597 ;;^UTILITY(U,$J,358.3,4137,1,3,0)
+598 ;;=3^Vitamin K per 1mg
+599 ;;^UTILITY(U,$J,358.3,4138,0)
+600 ;;=J0153^^30^244^3^^^^1
+601 ;;^UTILITY(U,$J,358.3,4138,1,0)
+602 ;;=^358.31IA^3^2
+603 ;;^UTILITY(U,$J,358.3,4138,1,2,0)
+604 ;;=2^J0153
+605 ;;^UTILITY(U,$J,358.3,4138,1,3,0)
+606 ;;=3^Adenosine 1mg
+607 ;;^UTILITY(U,$J,358.3,4139,0)
+608 ;;=J3121^^30^244^42^^^^1
+609 ;;^UTILITY(U,$J,358.3,4139,1,0)
+610 ;;=^358.31IA^3^2
+611 ;;^UTILITY(U,$J,358.3,4139,1,2,0)
+612 ;;=2^J3121
+613 ;;^UTILITY(U,$J,358.3,4139,1,3,0)
+614 ;;=3^Testosterone Enanthate 1mg
+615 ;;^UTILITY(U,$J,358.3,4140,0)
+616 ;;=J1165^^30^244^14^^^^1
+617 ;;^UTILITY(U,$J,358.3,4140,1,0)
+618 ;;=^358.31IA^3^2
+619 ;;^UTILITY(U,$J,358.3,4140,1,2,0)
+620 ;;=2^J1165
+621 ;;^UTILITY(U,$J,358.3,4140,1,3,0)
+622 ;;=3^Dialantin 50mg
+623 ;;^UTILITY(U,$J,358.3,4141,0)
+624 ;;=J1200^^30^244^17^^^^1
+625 ;;^UTILITY(U,$J,358.3,4141,1,0)
+626 ;;=^358.31IA^3^2
+627 ;;^UTILITY(U,$J,358.3,4141,1,2,0)
+628 ;;=2^J1200
+629 ;;^UTILITY(U,$J,358.3,4141,1,3,0)
+630 ;;=3^Diphenhydramine HCL,up to 50mg
+631 ;;^UTILITY(U,$J,358.3,4142,0)
+632 ;;=J1650^^30^244^18^^^^1
+633 ;;^UTILITY(U,$J,358.3,4142,1,0)
+634 ;;=^358.31IA^3^2
+635 ;;^UTILITY(U,$J,358.3,4142,1,2,0)
+636 ;;=2^J1650
+637 ;;^UTILITY(U,$J,358.3,4142,1,3,0)
+638 ;;=3^Enoxaprin Sodium 10mg
+639 ;;^UTILITY(U,$J,358.3,4143,0)
+640 ;;=J1327^^30^244^19^^^^1
+641 ;;^UTILITY(U,$J,358.3,4143,1,0)
+642 ;;=^358.31IA^3^2
+643 ;;^UTILITY(U,$J,358.3,4143,1,2,0)
+644 ;;=2^J1327
+645 ;;^UTILITY(U,$J,358.3,4143,1,3,0)
+646 ;;=3^Eptifibatide 5mg
+647 ;;^UTILITY(U,$J,358.3,4144,0)
+648 ;;=J1642^^30^244^22^^^^1
+649 ;;^UTILITY(U,$J,358.3,4144,1,0)
+650 ;;=^358.31IA^3^2
+651 ;;^UTILITY(U,$J,358.3,4144,1,2,0)
+652 ;;=2^J1642
+653 ;;^UTILITY(U,$J,358.3,4144,1,3,0)
+654 ;;=3^Heparin Sodium per 10U
+655 ;;^UTILITY(U,$J,358.3,4145,0)
+656 ;;=J1644^^30^244^21^^^^1
+657 ;;^UTILITY(U,$J,358.3,4145,1,0)
+658 ;;=^358.31IA^3^2
+659 ;;^UTILITY(U,$J,358.3,4145,1,2,0)
+660 ;;=2^J1644
+661 ;;^UTILITY(U,$J,358.3,4145,1,3,0)
+662 ;;=3^Heparin Sodium per 1000U
+663 ;;^UTILITY(U,$J,358.3,4146,0)
+664 ;;=J3410^^30^244^24^^^^1
+665 ;;^UTILITY(U,$J,358.3,4146,1,0)
+666 ;;=^358.31IA^3^2
+667 ;;^UTILITY(U,$J,358.3,4146,1,2,0)
+668 ;;=2^J3410
+669 ;;^UTILITY(U,$J,358.3,4146,1,3,0)
+670 ;;=3^Hydroxyzine HCL,up to 25mg
+671 ;;^UTILITY(U,$J,358.3,4147,0)
+672 ;;=J1815^^30^244^26^^^^1
+673 ;;^UTILITY(U,$J,358.3,4147,1,0)
+674 ;;=^358.31IA^3^2
+675 ;;^UTILITY(U,$J,358.3,4147,1,2,0)
+676 ;;=2^J1815
+677 ;;^UTILITY(U,$J,358.3,4147,1,3,0)
+678 ;;=3^Insulin 5U
+679 ;;^UTILITY(U,$J,358.3,4148,0)
+680 ;;=J1956^^30^244^29^^^^1
+681 ;;^UTILITY(U,$J,358.3,4148,1,0)
+682 ;;=^358.31IA^3^2
+683 ;;^UTILITY(U,$J,358.3,4148,1,2,0)
+684 ;;=2^J1956
+685 ;;^UTILITY(U,$J,358.3,4148,1,3,0)
+686 ;;=3^Levofloxacin 250mg
+687 ;;^UTILITY(U,$J,358.3,4149,0)
+688 ;;=J1050^^30^244^30^^^^1
+689 ;;^UTILITY(U,$J,358.3,4149,1,0)
+690 ;;=^358.31IA^3^2
+691 ;;^UTILITY(U,$J,358.3,4149,1,2,0)
+692 ;;=2^J1050
