All messages should be posted in plain text. HTML will be converted to
attachments. The meditech-l web site is MTUsers.com
======================================
Note.. this is Magic example code.
The trick is to know the patient's admissions urn, if you have
identified 1 patient with a selection on @patient, it will be in
/["aa"], use this as the A argument to %PHA.MAR.allergies
If you are running a report for multiple patients, have a PAGE sort
defined for the field @patient.
The value of the sorts will be in /VT[n] where n = the number of the
patient sort in the field list.
Here is a sample from a report in NUR.PC.WORK that sorted by patient
with a page break as the third sort, and went via a fragment to PHA to
run the PHA.MAR.allergies program:
Enter/Edit Macro Logic:
NUR.PC.WORK.zcus.is.med.recon.discharge.M.pag
/VT[3]^/R.FRAG.ARG1,
DO{>/MV["AL",SORT]^SORT ""^/MV["AL",SORT]},
"PHA"_._(@.db#"1.")^DB,
%Z.rw.fragment("PHA.PAT.zcus.is.med.recon.fr.R",DB),
DO{+/R.FRAG.VAL["AL",SORT]^SORT 1,
/R.FRAG.VAL["AL",SORT,1]^/MV["AL",SORT,/FLD["xx.allergies"]]}
Important note: Notice that I am looping and nilling the /MV array.
That is because when you print an MV in a Page region, it is NOT nilled
after printing. Therefore, I would carry the allergies of one patient
into the next patient if I did not clean up each page.
You could be more efficient by only going to PHA as each patient
changed, and making the clean-up smarter, but this report was typically
just 1 page per patient so that was not worth the extra programming
work.
Joe Cocuzzo
Vice President
NPR Services
Iatric Systems, Inc.
Phone/Fax: (978) 805-4115
Email: [EMAIL PROTECTED]
Web: www.iatric.com
-----Original Message-----
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of
[EMAIL PROTECTED]
Sent: Wednesday, June 14, 2006 9:14 AM
To: [EMAIL PROTECTED]
Subject: [MEDITECH-L] Pharmacy Allergies in Header Region of a Report
All messages should be posted in plain text. HTML will be converted to
attachments. The meditech-l web site is MTUsers.com
======================================
Hi All:
I have been working on a report but I have hit a stumbling block with
pulling the Pharmacy Allergies in a header. I am using the method
detailed in Meditech KB 6539 where you use a footnote/standard program
(%PHA.MAR.allergies(A,B,C,D,E,F)). I have attempted to update the
footnote to pull on the HP line but I am not getting my allergies to
print.
Has anyone been able to accomplish pulling the Pharmacy allergies in a
header? If so, would you please share your knowledge with me?
Thanks in advance,
Cheri
Cheri Adams
Sr. Clinical Systems Analyst
Upper Chesapeake Health
501 South Union Avenue
Havre de Grace, MD 21078
[EMAIL PROTECTED] (for e-mail with attachments) [EMAIL PROTECTED]
voice: 443-843-5514
pager: 410-588-0232
_______________________________________________
meditech-l mailing list
[email protected]
http://mtusers.com/mailman/listinfo/meditech-l
_______________________________________________
meditech-l mailing list
[email protected]
http://mtusers.com/mailman/listinfo/meditech-l
