Manage Learn to apply best practices and optimize your operations.

Another Process Timing Method

Another way of checking how long it takes a process to run. Output is to the
status bar but it could easily be directed to a msgbox.
Place this code where you want to start timing from
Dim begintime As New NotesDateTime("")
Dim endtime As New NotesDateTime("")
Dim diff As Long
Call Begintime.SetNow

Place this code at the end of your process
Call endtime.SetNow
diff = endtime.TimeDifference(begintime)
Print " Elapsed time (hh:mm:ss) : "Format(Timenumber(0,0,diff),"h:mm:ss")

Dig Deeper on LotusScript

Start the conversation

Send me notifications when other members comment.

Please create a username to comment.




  • iSeries tutorials's tutorials provide in-depth information on the iSeries. Our iSeries tutorials address areas you need to know about...

  • V6R1 upgrade planning checklist

    When upgrading to V6R1, make sure your software will be supported, your programs will function and the correct PTFs have been ...

  • Connecting multiple iSeries systems through DDM

    Working with databases over multiple iSeries systems can be simple when remotely connecting logical partitions with distributed ...