时间差如何计算？

houbao408

DATA utc_end LIKE tzonref-tstamps.
CONCATENATE sy-datum sy-uzeit INTO UTC_end
这样定义utc_end，使用CONCATENATE不会提示你UTC_end的数据类型应该是C/N/D/T/STRING吗？

AriesLei

原帖由 houbao408 于 2010-11-24 08:55 发表
DATA utc_end LIKE tzonref-tstamps.
CONCATENATE sy-datum sy-uzeit INTO UTC_end
这样定义utc_end，使用CONCATENATE不会提示你UTC_end的数据类型应该是C/N/D/T/STRING吗？

不好意思，写的时候只图省事儿了，应该是这样的：
  DATA: start(14) TYPE c,
        end(14) TYPE c,
        utc_start LIKE tzonref-tstamps,
        utc_end LIKE tzonref-tstamps,
        second  LIKE  sretgstruc-second1,
        hours LIKE  sretgstruc-hour1.
      CLEAR: start,utc_start,end,utc_end.
      CONCATENATE wa_mkpf-cpudt wa_mkpf-cputm INTO start.
      MOVE start TO utc_start.
      CONCATENATE sy-datum sy-uzeit INTO end.
      MOVE end TO utc_end.

      CALL FUNCTION 'SRET_TIME_DIFF_GET'
        EXPORTING
          utc_start       = utc_start
          utc_end         = utc_end
        IMPORTING
          second          = second
          hours           = hours.

houbao408

原帖由 AriesLei 于 2010-11-24 10:29 发表

不好意思，写的时候只图省事儿了，应该是这样的：
  DATA: start(14) TYPE c,
        end(14) TYPE c,
        utc_start LIKE tzonref-tstamps,
        utc_end LIKE tzonref-tstamps,
        second  LIKE  sretgstruc-second1,
        hours LIKE  sretgstruc-hour1.
      CLEAR: start,utc_start,end,utc_end.
      CONCATENATE wa_mkpf-cpudt wa_mkpf-cputm INTO start.
      MOVE start TO utc_start.
      CONCATENATE sy-datum sy-uzeit INTO end.
      MOVE end TO utc_end.

      CALL FUNCTION 'SRET_TIME_DIFF_GET'
        EXPORTING
          utc_start       = utc_start
          utc_end         = utc_end
        IMPORTING
          second          = second
          hours           = hours.

非常感谢，学会了！