Greetings,
I don't have Meditech in front of me so I can't put together a fully working
example (was hoping to see some else send it!)
I believe you can just type in a number to pick someone from the list and
the "numbers" repeat from lookup page to page- i.e. 1-20, 1-20, 1-20 till
you see "End of List" - what I don't remember is happens if you were to
type a number that wasn't there- for example on the last page there were 3
people listed and you typed in a 4. This would be the easiest approach to
use - look for what happens here as opposed to searching for end of list.
What you need to do is keep a running count of the last patient number till
it reaches 21. Once it hits 21, you reset it back to 1 and then add 1 to a
page count.
The page count tells you how many page downs to send so it skips past the
last n pages.
Here's a pseudo Rules script showing how I'd handle the above with the info
I think I have J
Step- Set Counter
Always
F("patnum")=0
F("PageCount")=0
Step Get to Patient Lookup
Step Eval Counter - this resets the count to 1 if it goes above 20
Condition - F("PatNum")<21 -Goto Lookup Patient
Condition F("PatNum")=21 - Goto Lookup Patient
Action -- this resets the PatNum back to 1
and adds 1 to the page count
F("PatNum")=1
F("PageCount")=f("PageCount")+1
Step Lookup Patient
Condition for the lookup field . key "{F9}"
Prompt "Select" - Goto - Do stuff (this is
the lookup screen prompt I think.)
Pagedowns f("PageCount") - Sends pagedowns
if needed
Enter f("PatNum")
F("PatNum")=F("PatNum")+1 - here add
Condition for "not a good number?"- Goto No
More Patients
Step Do Stuff
.Whatever you do with a patient. When done Goto Eval
Counter.
Add this sub routine in VBA editor.
'This sends n number of pagedowns to the Meditech screen
Sub PageDowns (myCount as integer)
For i=1 to mycount
Key "{PGDN}"
Stable .2
Next i
End sub
Thom C. Blackwell
Product Manager
Boston Software Systems
(866) 653-5105 ex 807
<http://www.bossoft.com/> www.bossoft.com
<http://www.bostonworkstation.com/customer_center/special_events.aspx> Sign
up for my weekly webinar!
LEGAL NOTICE Unless expressly stated otherwise, this message is confidential
and may be privileged. It is intended for the addressee(s) only. Access to
this E-mail by anyone else is unauthorized. If you are not an addressee, any
disclosure or copying of the contents of this E-mail or any action taken (or
not taken) in reliance on it is unauthorized and may be unlawful. If you are
not an addressee, please inform the sender immediately, then delete this
message and empty from your trash.
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Joyce Beck
Sent: Monday, March 17, 2008 2:52 PM
To: [email protected]
Subject: RE: [Talk] Script from Meditech look-up
Yes, we do have this product; we could use it to update the one field in the
dictionary, but I don't think it will work for the look-up to choose patient
names.
Thanks, Joyce.
Joyce Beck, Meditech Application Support Analyst
Douglas County Hospital
111 17th Avenue East
Alexandria, MN 56308
Phone: 320-762-6483
Confidentiality Notice:
This e-mail message is intended only for the named recipient(s) above and is
covered by the Electronic Communications Privacy Act, 18 U.S.C. Section
2510-2521. This e-mail is confidential and may contain information that is
privileged, or exempt from disclosure under applicable law. If you have
received this message in error, please immediately notify the sender by
return e-mail and delete this e-mail message from your computer. Thank You.
_____
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of TIMOTHY B. FRANCE
Sent: Monday, March 17, 2008 1:48 PM
To: [email protected]
Subject: RE: [Talk] Script from Meditech look-up
Have you taken a look at the Unison
<http://www.bostonworkstation.com/workflow_automation/unison.aspx> product.
It is a great tool for updating and/or synchronizing Meditech dictionaries.
Tim
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Joyce Beck
Sent: Monday, March 17, 2008 11:41 AM
To: [email protected]
Subject: [Talk] Script from Meditech look-up
I'm sure this has been done often by other facilities, but I have not had to
do it yet.
I would like to edit all the entries in a Meditech dictionary and would like
the script to loop through the Meditech look-up list (instead of an Excel
spreadsheet, for example).
Another script I would like to write would loop through the Meditech look-up
entries for patient names.
So, I need to do a F9, Look-Up, in Meditech and choose #1, then do the
script stuff, then go back and do the look-up and choose #2, then do stuff,
etc.; until the last entry in the last look-up list. Does anyone have an
example of this procedure-to script off the Meditech look-up entries-rather
than writing an NPR report to do this?
Thank you for the help. -Joyce.
Joyce Beck, Meditech Application Support Analyst
Douglas County Hospital
111 17th Avenue East
Alexandria, MN 56308
Phone: 320-762-6483
Confidentiality Notice:
This e-mail message is intended only for the named recipient(s) above and is
covered by the Electronic Communications Privacy Act, 18 U.S.C. Section
2510-2521. This e-mail is confidential and may contain information that is
privileged, or exempt from disclosure under applicable law. If you have
received this message in error, please immediately notify the sender by
return e-mail and delete this e-mail message from your computer. Thank You.
_____
CONFIDENTIALITY NOTICE: This message and any included attachments are from
Salinas Valley Memorial Healthcare System and are intended only for the
addressee. The information contained in this message is confidential and may
constitute inside or non-public information under international, federal, or
state securities laws. Unauthorized forwarding, printing, copying,
distribution, or use of such information is strictly prohibited and may be
unlawful. If you are not the addressee, please promptly delete this message
and notify the sender of the delivery error by e-mail or you may call
Salinas Valley Memorial Healthcare System's Privacy Officer in Salinas,
California, U.S.A. at (+1) (831) 755-0751.
