On 9/14/06, Chris Davis <[EMAIL PROTECTED]> wrote:
Make sure the invoice table index is currently set to in_codeThen Scan Select invoice If seek(lncustcode,"invoice") Do while ln_code=lncustcode Do some code Skip Enddo Endif Select sometable endscan -----Original Message----- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of [EMAIL PROTECTED] Sent: 14 September 2006 14:59 To: [EMAIL PROTECTED] Subject: Using a seek instead of a locate How can I duplicate the following code using the seek command: SCAN SELECT Invoice LOCATE FOR in_code = lnCustCode DO WHILE FOUND() do some code CONTINUE ENDDO SELECT sometable ENDSCAN
Personally i would replace the " Do while l" with a "SCAN WHILE" A+ jml _______________________________________________ Post Messages to: [email protected] Subscription Maintenance: http://leafe.com/mailman/listinfo/profox OT-free version of this list: http://leafe.com/mailman/listinfo/profoxtech ** All postings, unless explicitly stated otherwise, are the opinions of the author, and do not constitute legal or medical advice. This statement is added to the messages for those lawyers who are too stupid to see the obvious.
