ABAP 计算时间差

日期差使用函数SD_DATETIME_DIFFERENCE在计算时，针对时间为00：00：00会直接抛出异常，时间初始值在sap中是00:00:00。

以下为解决办法，如有错误还请联系指出。不胜感激！

  

  DATA: lv_timediff      TYPE t,
        lv_date_b        TYPE d,
        lv_date_s        TYPE d,
        lv_time_b        TYPE t,
        lv_time_s        TYPE t.

  DATA: lv_diff_d        TYPE p, "天数差
        lv_diff_h        TYPE p, "小时数差
        lv_diff_m        TYPE p, "分钟数差
        lv_diff_s        TYPE p, "秒数差
        lv_diff_s_all    TYPE p, "总秒数差
        lv_diff_s_exh    TYPE p. "除去小时秒数的秒数


*--1.计算天数差使用函数'SD_DATETIME_DIFFERENCE'有误（20210507 230000 - 20210507 000000）

  IF iv_date1 = iv_date2.
    lv_diff_d = 0.
    IF iv_time2 > iv_time1.
      lv_time_b  = iv_time2.
      lv_time_s  = iv_time1.
    ELSE.
      lv_time_b  = iv_time1.
      lv_time_s  = iv_time2.
    ENDIF.

  ELSEIF iv_date1 > iv_date2.
    lv_date_b	 = iv_date1.
    lv_date_s  = iv_date2.
    lv_time_b  = iv_time1.
    lv_time_s  = iv_time2.

  ELSEIF iv_date1 < iv_date2.
    lv_date_b  = iv_date2.
    lv_date_s  = iv_date1.
    lv_time_b  = iv_time2.
    lv_time_s  = iv_time1.

  ENDIF.

  lv_timediff = lv_time_b - lv_time_s.
  IF lv_timediff > lv_time_b AND iv_date1 <> iv_date2.
    lv_diff_d = lv_date_b - lv_date_s - 1.

  ELSEIF lv_timediff = lv_time_b AND iv_date1 <> iv_date2.
    lv_diff_d = lv_date_b - lv_date_s .

  ELSEIF lv_timediff < lv_time_b AND iv_date1 <> iv_date2.
    lv_diff_d = lv_date_b - lv_date_s .

  ENDIF.

  lv_diff_s_all = lv_time_b+0(2) * 3600 + lv_time_b+2(2) * 60 + lv_time_b+4(2) -
                  lv_time_s+0(2) * 3600 - lv_time_s+2(2) * 60 - lv_time_s+4(2)  .

  lv_diff_h     = floor( abs( lv_diff_s_all ) / 3600 ).

  lv_diff_s_exh = abs( abs( lv_diff_s_all ) - abs( lv_diff_h * 3600 ) ).

  lv_diff_m     = floor( lv_diff_s_exh / 60 ) .

  lv_diff_s     = abs( lv_diff_s_exh - lv_diff_m * 60 ).

  IF lv_diff_s_all < 0.
    lv_diff_h   = 23 - lv_diff_h.
    lv_diff_m   = 59 - lv_diff_m.
    lv_diff_s   = 60 - lv_diff_s.
  ENDIF.

  ev_time_diff = lv_diff_d  && '天' && lv_diff_h  && '时'  &&
                 lv_diff_m  && '分' && lv_diff_s  && '秒'.

正确计算值可参考网址 时间计算器 - 在线计算时间差 (chazhi.net)。