Try
using At(""). This should reset the condition for
you.
Billy Helmandollar, Systems Analyst
Bluefield Regional Medical Center
500 Cherry Street
Bluefield, WV 24701
(304)
327-1168
[EMAIL PROTECTED]
Hello everyone, me again. Still working
with this external file and have this little snag.
It
cycles through the records pretty well until it comes across two items that
meet this
criteria: If At("Not
found. New? Y") Then
For some reason the script does not acknowledge the
second time it sees this and just goes
to
the Else statement. How to I reset the script after the first
ocurrence of this condition?
Actually, do I need to reset
it?
Thanks,
Scott
If LOF(F) < Len(Rec) Then
Stop ' no source
file
Do While Not
EOF(F)
DoEvents
BeginCycle:
Line
Input #F, InputRecord
If
Len(InputRecord) > 10
Then ' skip blank
lines
Proc = Trim(Mid(InputRecord, 1,
10))
Amt = Trim(Mid(InputRecord, 12,
10))
Enter
Proc
Wait
0.5
If At("Not found. New? Y")
Then
Wait
0.5
Key
"{F10}"
Wait
0.5
Enter
""
Key
"{F10}"
Wait
0.5
GoTo
BeginCycle
Else
CONFIDENTIALITY NOTICE: 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.
********************************** Note
******************************************
The information contained in this message may be
privileged and confidential and protected from disclosure. If the reader of
this message is not the intended recipient or an employee or agent responsible
for delivering this message to the intended recipient, you are hereby notified
that any dissemination, distribution or copying of this communication is
strictly prohibited. If you have received this communication in error, please
notify the Sender immediately by replying to the message and deleting it from
your computer.
Thank You
Bluefield Regional Medical
Center
