× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.



Annnnd you couldn't figure out the tabs?

d h1              s               t      
d s1              s             10i 0 inz
d w1              s             10i 0 inz
 /free                                   
  h1 = %time();                          
  for s1 = 1 to 100000000;               
  w1 += 1;                               
  endfor;                                
  s1 = %diff(h1:%time():*seconds);       
  dsply ('Seconds: ' +%char(s1));        
  *inlr = *on;                           
  return;                                
 /end-free                               
 

------------------------------

date: Wed, 16 Nov 2005 17:34:30 +0100
from: "Barton, Mike" <Mike.Barton@xxxxxxxxxxxxx>
subject: RE: elapsed time

as an aside to all this, if you cut & paste the lines of 
code in directly into seu, it causes the editor to crash 
(on V5R2).... 

Mike

d h1 s t 
d s1 s 10i 0 inz
d w1 s 10i 0 inz
/free 
h1 = %time(); 
for s1 = 1 to 100000000; 
w1 += 1; 
endfor; 
s1 = %diff(h1:%time():*seconds); 
dsply ('Seconds: ' +%char(s1)); 
*inlr = *on; 
return; 
/end-free 



--





------------------------------


As an Amazon Associate we earn from qualifying purchases.

This thread ...


Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.