Hi John,
To search a list, I use logic similar to the following:
Enter PtName
Do
C = C + 1
Stable 0.1
If At("Patient not found") Then
Err.Raise seTimeOut
End If
If At("No eligible") Then
Err.Raise seTimeOut
End If
If C > 50 Then Err.Raise seTimeOut
Loop Until At("PATIENT LOOKUP BY NAME")
For r = 5 To 24
ScrName = View(ROW:=r, COL:=5, Length:=25)
ScrLoc = View(ROW:=r, COL:=62, Length:=12)
SCRT1 = View(ROW:=r, COL:=44, Length:=6)
ScrNo = View(ROW:=r, COL:=2, Length:=2)
ScrName = StrLeft(Trim$(ScrName), ",")
ScrRoom = StrLeft(Trim$(ScrLoc), "-")
ScrBed = StrRight(Trim$(ScrLoc), "-")
HOLDNAME = StrLeft(ptName), ",")
If Trim$(ScrNo) <> "" And SCRT1 = "ADM IN" And ScrName =
HOLDNAME and ScrBed = PtBed and ScrRoom = PtRoom
Then
Enter Trim$(ScrNo)
Exit Sub
End If
If Trim(ScrName) = "" Then Exit For
Next r
For your situation, you most likely want to read different fields such
as Date of Birth, Sex, etc and compare on that but it's the same
concept.
Hope this helps,
Sara
Sara McNeil
Boston Software Systems
www.bostonworkstation.com
The Essential Tool for Healthcare Integration
Toll Free:866 653 5105
Direct:508 653 5105
-----Original Message-----
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of John Hayman
Sent: Thursday, December 18, 2003 3:38 PM
To: [EMAIL PROTECTED]
Subject: RE: [Talk] Real-Time Scripting
I would like more information regarding picking patients from a list in
OE. Also is there a way to do some sort of "sounds like" comparison for
patient names? For example if the patient name I have is SMITH,CARRIE
would there be a way to pick out SMITH,KERRY from a list in OE where I
did a lookup for all patients with the last name SMITH? I guess this
would be more of a VB function, but could someone point me in the right
direction? I'm developing a transcription interface and would like to
incorporate this functionality for instances where a MR# or Account# are
not available.
Thanks,
John
-----Original Message-----
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] Behalf Of Rich McNeil
Sent: Thursday, December 18, 2003 2:27 PM
To: [EMAIL PROTECTED]
Subject: RE: [Talk] Real-Time Scripting
We've done similar things before to move patients between HIS systems.
It involved scripting that every few minutes (or more or less
frequently) would:
1. Run a report in the first system (LSS) of the patients registered
in LSS since the last report was run.
2. Parse the report and appropriately register the patients in the
second system (Meditech).
There are issues as to preventing double registrations, picking
physicians from a list, preventing duplicate medical record numbers and
ensuring 7x24 operation which we can elaborate on if you wish.
Rich McNeil
Boston Software Systems
866 653 5105
www.bostonworkstation.com
-----Original Message-----
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Green, Ben
Sent: Thursday, December 18, 2003 2:46 PM
To: [EMAIL PROTECTED]
Subject: [Talk] Real-Time Scripting
Got any advice?
We currently run a daily batch script in client server that
downloads appointments from our LSS database and then creates a pov
short
registration in our Meditech system. We do this so that our physicians
in
our offices can use the hospital's Dictaphone system for dictation and
transcriptionists can transcribe and attach the report to the reg
account
number so that it appears in EMR. And it works great!
Our Medical Records Department has implemented Dictaphone's EWS
system for hospital docs. This is a voice recognition dictating system
that
allows the doc to dictate, edit and esign immediately. This is
apparently
working well within the hospital setting because these patients are
registered prior to being seen so the account number always exists at
the
point of dictation and it can flow directly to EMR. If for some reason
the
account number does not exist at the time of the dictation, then the
note
becomes a "temp" report and has to be manually merged which really
defeats
the purpose. But that rarely happens and MR feels that it works great,
too!
Medical records would now like to implement this EWS system in
our
physician offices which will require a real-time transfer of appointment
data from LSS to create a registration in Meditech to attach the
dictation
to. Our current daily batch process would cause the notes to become
dreaded
"temp" reports so it is not a solution.
The issues I see for trying to do a real-time script are rather
extensive. So, does it make sense to attempt to create a BWS solution
for
this or see if LSS and MT can create a background interface to do the
job?
Is anyone out there using BWS for any similar scenarios that are close
to
'real-time'?
Thanks.
Ben Green
Augusta Medical Center
(540)-332-5548
[EMAIL PROTECTED]
