RE: [Talk] Processing ext. txt file

[Rich McNeil]

I hope I’m not being repetitious, but I never pass up an opportunity to describe this odd feature of At().    We’ve designed At() to be False on the second time in a row because a spinning in Loops can be so fast that often that there’s a chance of double keying.  If double keying is your script’s desired behavior, then put an At “” in the Loop.     Scott, you sort of have a loop with the BeginCycle:…Goto BeginCycle, so anywhere in there would be OK.   Rich McNeil Boston Software Systems 866 653 5105 www.bostonworkstation.com   -----Original Message----- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of White,Scott A Sent: Monday, August 11, 2003 11:49 AM To: '[EMAIL PROTECTED]' Subject: RE: [Talk] Processing ext. txt file   HI, Where would you place the At("") ?     -----Original Message----- From: Helmandollar,Billy [mailto:[EMAIL PROTECTED] Sent: Monday, August 11, 2003 11:42 AM To: '[EMAIL PROTECTED]' Subject: RE: [Talk] Processing ext. txt file 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] -----Original Message----- From: White,Scott A [mailto:[EMAIL PROTECTED] Sent: Monday, August 11, 2003 11:30 AM To: '[EMAIL PROTECTED]' Subject: [Talk] Processing ext. txt file 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 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.