scalar是时间，怎么做减法

写程序计算时间：
sca time1=c(current_time)
。。。。
program
。。。。。
。。。。

sca time2=c(current_time)

scalar list
－－－－－－－－－
结果显示
.     scalar list
     time2 = 02:43:39
     time1 = 02:37:20
－－－－－－－－－－－－－
问题用什么命令算出两者的差异，sca diff=time2-time1好像不对

. sca time1=c(current_time)

.
. forval x=1/10 {
  2. qui webuse nlswork,clear
  3. }

.
. sca time2=c(current_time)

.
. sca h1=real(substr(time1,1,2))

. sca h2=real(substr(time2,1,2))

. sca m1=real(substr(time1,4,2))

. sca m2=real(substr(time2,4,2))

. sca s1=real(substr(time1,7,2))

. sca s2=real(substr(time2,7,2))

.
. sca diff=(h2-h1)*60*60+(m2-m1)*60+(s2-s1) //unit is second

.
. sca drop h1 h2 m1 m2  s1 s2

. sca list
      diff =         11
     time2 = 15:44:50
     time1 = 15:44:39

.

！！！！

大白菜2012 发表于 2012-11-5 02:58
. sca time1=c(current_time)

.

我现在这个程序时间超过24小时，估计一下应该要跑两天左右，

问题：sca time2=c(current_time)
只显示到小时，怎么把哪一天也显示出来?

c(current_date)

问题用什么命令算出两者的差异，sca diff=time2-time1好像不对

di (clock(time2, "hms")-clock(time1, "hms"))/1000