Sub main()
MsgBox (BLD)
End Sub
Function BLD() As String
Dim varHour, strBLD As String
varHour = hour(Now)
Select Case varHour
Case Is < 5
strBLD = "Go back to bed"
Case 5 To 11
strBLD = "Breakfast"
Case 11 To 14
strBLD = "Lunch"
Case 15 To 20
strBLD = "Dinner"
End Select
BLD = strBLD
End Function
Good luck!
Tom Choiniere
I.S. - Systems Analyst
Saratoga Hospital
211 Church Street
Saratoga Springs, NY
12866
518-583-5994
From: [email protected] [mailto:[email protected]]
Sent: Wednesday, February 16, 2011 2:13 PM
To: [email protected]
Subject: RE: [talkbws] vb in rules based scripting
I am trying to get my script to use vb to store the time of day as a variable
and depending on what time it is, run a different configuration of the report.
Here are the steps for the script:
Login to MT
Sign into OE
Run the Process Diets routine
Here – look at what hour it is, depending on what the hour is, enter B for
breakfast, L for lunch, or D for dinner.
Choose printer and file.
Sarah Koenigsman
HPMIN Applications Analyst
[email protected]
785.623.5023
________________________________
From: [email protected] [mailto:[email protected]]
Sent: Wednesday, February 16, 2011 12:57 PM
To: [email protected]
Subject: RE: [talkbws] vb in rules based scripting
For what type of tasks?
Vicky L. Moore, BS, MT(ASCP)
Quest Diagnostics | Hospital CPU Interface Specialist, Client Interface
Services| 1777 Montreal Circle | Tucker, GA 30085 USA | phone +1.678.406.1777
-or- +1.866.709.0772 opt1, ext1777 | fax +1.484.676.8628|
[email protected] | www.QuestDiagnostics.com
P Please think about resource conservation before you print this message
________________________________
From: [email protected] [mailto:[email protected]]
Sent: Wednesday, February 16, 2011 1:55 PM
To: [email protected]
Subject: [talkbws] vb in rules based scripting
Hi,
Would someone be willing to share a rules based script (preferably for
Meditech C/S 5.6x) that incorporates visual basic in the script?
Your help would be greatly appreciated!
Sarah Koenigsman
HPMIN Applications Analyst
[email protected]
785.623.5023
--- To post a message to this list, send mail to: [email protected]
You are currently subscribed as: [email protected]
Unsubscribe in the customer center on our website:
http://www.bostonworkstation.com/customer_center/virtual_user_group_talk.aspx
--- To post a message to this list, send mail to: [email protected] You are
currently subscribed as: [email protected] Unsubscribe in the
customer center on our website:
http://www.bostonworkstation.com/customer_center/virtual_user_group_talk.aspx
--- To post a message to this list, send mail to: [email protected] You are
currently subscribed as: [email protected] Unsubscribe in the
customer center on our website:
http://www.bostonworkstation.com/customer_center/virtual_user_group_talk.aspx
------------------------------------------
The contents of this message, together with any attachments, are intended only
for the use of the person(s) to which they are addressed and may contain
confidential and/or privileged information. Further, any medical information
herein is confidential and protected by law. It is unlawful for unauthorized
persons to use, review, copy, disclose, or disseminate confidential medical
information. If you are not the intended recipient, immediately advise the
sender and delete this message and any attachments. Any distribution, or
copying of this message, or any attachment, is prohibited.
This e-mail communication and any attachments may contain
confidential and privileged information for the use of the
designated recipients named above.
If you are not the intended recipient, you are hereby notified
that you have received this communication in error and that
any review, disclosure, dissemination, distribution or copying
of it or its contents is prohibited. If you have received this
communication in error, please notify Saratoga Hospital
immediately by e-mail at [email protected] and
destroy all copies of this communication and any attachments.
--- To post a message to this list, send mail to: [email protected] You are
currently subscribed as: [email protected] Unsubscribe in the
customer center on our website:
http://www.bostonworkstation.com/customer_center/virtual_user_group_talk.aspx
