Article 160233 of comp.os.vms:
On 2 Dec 1996 11:20:05 GMT, "Christian Leue" <c.leue@geonet.de> wrote:

>
>did I miss something while searching the DCL manuals? I am trying
>to find a simple way to calculate elapsed time within a DCL program.
>Is there a simple way to do that on two absolute times? Or do I
>really have to tear apart the strings? Would anyone have a code
>frament in their tool chests?

Here you go.......

Works like a champ in our production environment (about 6 months now).




$! This line gets current time for start of elapsed time process.
$    E_TIME == F$CVTIME("","ABSOLUTE","TIME")
$!
$!
$! Put your code in this section
$!
$!
$!These few lines here finish the elapsed time process
$ C_TIMER = F$CVTIME("","ABSOLUTE","TIME")
$ TOTAL_E_TIME==F$CVTIME("''C_TIMER'-0-''E_TIME'","ABSOLUTE","TIME")
$!
$ WRITE SYS$OUTPUT TOTAL_E_TIME   !Display total elapsed time



