Actually I think it is a brilliant thing to do. Here's why, that's what I do.
No but really as programmers we often get into trouble when we make
assumptions. By clearing a field before keying data into it you make sure you
only have what you want in the field. I consider it similar to initializing a
variable.
Bill Palmer
Financial Coordinator, Information Sys
Mid-Columbia Medical Center
The Dalles, OR 97058
541-296-7417
>>> [EMAIL PROTECTED] 05/24/05 09:24AM >>>
Chris,
I don't see the problem, with what you have, but a way to get around it may be
to Key "{F10}" before each time you enter the "N" to clear the field.
I know this is not a brilliant thing to do, but it will have your script keep
moving.
Roy Hayward
Catalyst Application Support
Global Healthcare Exchange
3322 West End Avenue
Suite 1000
Nashville, TN 37203
615-279-2752 direct
931-670-0867 home
615-525-6746 cell
[EMAIL PROTECTED]
-----Original Message-----
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] Behalf Of chris white
Sent: Monday, May 23, 2005 1:49 PM
To: [email protected]
Subject: [Talk] Entry not define errors
OK all, I'm at a loss. Is it me, or am I just missing something?
The following subscript is part of a larger script that I wrote and has been
running without issue for sometime. But, for the last few weeks, I have had
issues where when processing an Account within Meditech BAR and keying CC
(Collections, E/E Comments). The next field is the Comment field on the Enter
/ Edit Comments Meditech window. I want to key an "N" every time, but for
whatever reason it periodically drags one of the "C"s along with it. Which of
course gives me an "Entry is not defined" error window. What am I missing
here?
Any suggestions would be appreciated. I'm Meditech CS v5.4
Thanks
Sub EnterComments(pComment As String)
Do
Stable 0.4
PauseLoop "@7,7", Trim(D("1")) & "~"
If At("@27,93") Then
Activate "Process an Account"
Key "CC"
End If
PauseLoop "@6,15", "N~"
PauseLoop "@6,45", "{tab}" 'add for 5.4 Meditech release
PauseLoop "@8,15", "{tab}"
Loop Until At("@9,28")
Key pComment
Enter strDate
Pause "@9,28"
Key "{f12}"
Pause "[EMAIL PROTECTED],1"
Key "Y"
Pause "[EMAIL PROTECTED],1"
Key "o"
Pause "@27,93"
Key "{esc}"
Pause "[EMAIL PROTECTED],1"
Key "Y"
Pause "@7,7"
D("Status") = "Done"
End Sub
______________________________
Christopher C. White
Interface Analyst III
Newberry County Memorial Hospital
(803) 405-1052
