Re: accept ... from time



The following is what the current Micro Focus LRM states (and I believe this is
what the ANSI/ISO Standards do - and have always - required)

"TIME is composed of the data elements: hours, minutes, seconds and hundredths
of a second. TIME is based on elapsed time after midnight on a 24-hour clock
basis - thus, 2:41 P.M. would be expressed as 14410000. TIME, when accessed by a
COBOL program behaves as if it had been described in a COBOL program as an
unsigned elementary numeric integer data item eight digits in length. The
minimum value of TIME is 00000000; the maximum value of TIME is 23595999. If the
hardware does not have the facility to provide fractional parts of TIME, the
value is converted to the closest decimal approximation. "

In other words, you can only get HUNDREDTHS of a second using ACCEPT FROM TIME.

***
On the OTHER HAND,
If you are running in an IBM mainframe environment with LE (or in an
environment with "LE-emulation" such as that provided by Micro Focus in some of
their products), you can look at the CEELOCT "callable service" to get
thousandths of a second. See
http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/CEEA3170/2.2.5.48

For details. (Other vendors may have similar non-Standard services).

--
Bill Klein
wmklein <at> ix.netcom.com
<michael.bierenfeld@xxxxxx> wrote in message
news:1169554701.175132.59070@xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
Hello,

I want to measure the execution time of a sql statement. Can I get the
time in milliseconds to be displayed.

I have

accept START-TIME from time

EXEC SQL SELECT ... something

accept END-TIME from time

DISPLAY "EXECUTION lasted from" START-TIME
DISPLAY " till " END-TIME

START-TIME and END-TIME is pic x(8) this is hh24:mm:ss. But I need
fractions of seconds. How can I do this. Target System is Microfocus
and AIX.

Kind Regards

Michael



.