Notifications
Clear all
Topic starter
We currently display Pharmacy name {REGPHARMACY ( )} in a pre-visit handout, but would also like to display the corresponding pharmacies address, can this be done?
Posted : August 15, 2012 6:57 am
I had once before created a quicktext that output pharmacy information.
Please send to patient's pharmacy:
{find("Pharmacies","Name","Name",regpharmacy())}
{find("Pharmacies","Address1","Name",regpharmacy())}
{find("Pharmacies","City","Name",regpharmacy())}, {find("Pharmacies","State","Name",regpharmacy())} {find("Pharmacies","Zip","Name",regpharmacy())}
Phone: {find("Pharmacies","primPhone","Name",regpharmacy())}
Fax: {find("Pharmacies","faxPhone","Name",regpharmacy())}
Posted : February 27, 2013 3:31 am
Topic starter
Thank you.
I ended up modifing the meldefs8.txt file, essentially reverse engineering the data symbol:
{REGPHARMACY()}
{
fn REGPHARMACY_ADDRESS(){
local strBuffer=""
local Address1=""
local Address2=""
local City=""
local State=""
local Zip=""
//QUERY PHARMACIES OBJECT **meldefs8.txt**
Address1=find("Pharmacies","Address1","ListName",REGPHARMACY())
Address2=find("Pharmacies","Address2","ListName",REGPHARMACY())
City=find("Pharmacies","City","ListName",REGPHARMACY())
State=find("Pharmacies","State","ListName",REGPHARMACY())
Zip=find("Pharmacies","Zip","ListName",REGPHARMACY())
strBuffer= Address1 + HRET
if (Address2 == "") then else strBuffer=strBuffer + Address2 + HRET endif
strBuffer=strBuffer + City + ", " + State + " " + Zip
return strBuffer
}
REGPHARMACY()+ HRET+ REGPHARMACY_ADDRESS()}
Posted : February 27, 2013 3:34 am
Works great!!! thanks so much for posting. Have you been able to get the pharmacy phone number to display????
Posted : February 27, 2013 5:08 am
Hi,
Why doesnt this work for CPS? Thank you!
Posted : January 16, 2017 5:34 am
