Since you have the 2 pieces of code wouldn't the best approach be to benchmark 
it on the system which is going to run it.

Or am I just getting old remembering when we needed to benchmark...........

-----Original Message-----
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] Behalf Of
[EMAIL PROTECTED]
Sent: 13 December 2004 15:33
To: [EMAIL PROTECTED]
Subject: [U2] LOOP or GOTO on READNEXT


I've seen 2 ways to read a client key, change the length to 6 digits, then
write it back out, delete the old one and move on:

EXAMPLE 1 of 2:
!(FIXEMPNO) - Fix the employee number length
      open '','CUSTEMP' to CF else stopm 'Not'
      select CF
10:   readnext K else stop
      read REC from CF,K then
         NK = fmt(K,"R%6")
         write REC on CF,NK
         delete CF,K
      end
      go 10
   end

EXAMPLE 2 of 2:
!(FIXEMPNO) - Fix the employee number length
      DONE = 0
      open '','CUSTEMP' to CF else stopm 'Not'
      select CF
      loop
         readnext K else DONE = 1
      read REC from CF,K then
         NK = fmt(K,"R%6")
         write REC on CF,NK
         delete CF,K
      end
      repeat
   end

My intent is not to start a religious discussion about GO or GOTOs because
I see that method all over the place and regardless of why, who or
whatever, my question is, which is faster. (I prefer using loop..repeat
syntax, FWIW).

-- 
Karl L. Pearson
Director of IT,
ATS Industrial Supply
Direct: 801-978-4429
Toll-free: 800-789-9300 1,29
Fax: 801-972-3888
http://www.atsindustrial.com
[EMAIL PROTECTED]
-------
u2-users mailing list
[EMAIL PROTECTED]
To unsubscribe please visit http://listserver.u2ug.org/

______________________________________________________________________
This email has been scanned by the MessageLabs Email Security System.
For more information please visit http://www.messagelabs.com/email 
______________________________________________________________________

______________________________________________________________________
This email has been scanned by the MessageLabs Email Security System.
For more information please visit http://www.messagelabs.com/email 
______________________________________________________________________
-------
u2-users mailing list
[EMAIL PROTECTED]
To unsubscribe please visit http://listserver.u2ug.org/

Reply via email to