All messages should be posted in plain text. HTML will be converted to
attachments. The meditech-l web site is MTUsers.com
======================================
Hello Alan/Tia/Gladys,
I am doing something similar (We are Magic 5.5) to check and see if a
Doctor is in a group response dictionary which we built and if so
generate a popup that says "Are you sure you wanted to select Dr. XYZ".
You can use basically the same code as I have, but instead in the macro
check the queries that you are looking for.. Here is what I would
recommend....
First put an attribute similar to this on a CDS to call the program
macro you are going to create below:
IFE=%ADM.PAT.zcus.sal.prov.lookup.macro.M.prov.check(aa)^VAR
This is a Program call. Next go to NPR report writer and create the
program in the ADM.PAT DPM. Create a macro and in the macro you will
need some code something similar to this to check for your queries....
A^URN
[EMAIL PROTECTED](URN,"ggv")^VAR1 VAR1},
[EMAIL PROTECTED](URN,"ggv")^VAR2 VAR2},
you will need to substitute ggv with the name of the query for that
piece of information and you will need multiple of these statements with
different query names and assigning them to different variables (i.e.
^VAR2, ^VAR3, etc) Once you have checked if each query exists and have
the values stored in a variable in the macro do something like this:
@Window.centered(5,90,@Z.color.lookup.select)^#
IF{VAR1 P(LOCN,0,"Preferred Method of Learning"_VAR1:20L)^#},
IF{VAR2 P(LOCN+1^LOCN,0,"Preferred Method of Learning 2"_VAR2:20L)^#},
"Press Enter to Continue"^/.WO,
%Z.w.macro(1,1),
@Window.close("")^#,
@Cursor.on("")^#}
I hope this helps or at least gets you started... Let me know if I can
explain anything further.... Also depending on what kind of queries you
have you might need to look in a different structure other than
"ADM.PAT.clinical.cus.defined.queries".....
Thanks,
Scott LaRosa
>>> "Williams, Gladys" <[EMAIL PROTECTED]> 08/03/06 11:51 AM >>>
All messages should be posted in plain text. HTML will be converted
to
attachments. The meditech-l web site is MTUsers.com
======================================
CONFIDENTIALITY NOTICE:
This e-mail and any files transmitted with it are confidential and may contain
health information protected by law. Any unauthorized use or disclosure is
strictly prohibited. If you are not the intended recipient, please notify the
sender by return email, delete this email, and destroy any copies. Please note
that any views or opinions presented in this e-mail are solely those of the
author and do not necessarily represent those of Southcoast. The recipient
should check this e-mail and any attachments for the presence of viruses.
Southcoast accepts no liability for any damage caused by any virus transmitted
by this e-mail.
_______________________________________________
meditech-l mailing list
[email protected]
http://mtusers.com/mailman/listinfo/meditech-l
