Re: [Talk] Processing ext. txt file (Out of the office)

[Steve Rop]

I am out of the office August 11 and 12, 2003


**** Automated Reply*****

>>> "[EMAIL PROTECTED]" 08/11/03 11:30 >>>

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.