获取平均时间 - ABAP

Question

Is there a way in ABAP to get the mean of a time set?

eg: An event occurred at the following times

• 08:30
• 08:45
• 09:00

If you take the mean time the event occurred from the above data set, it;s 08:45. Is there a way to calculate this in ABAP?

Answer 1

The methods I used was to convert the time to Unix format. This mean that I could get the average by normal division.

Following is the FM used to convert to Unix time;

    CALL METHOD CL_PCO_UTILITY=>CONVERT_ABAP_TIMESTAMP_TO_JAVA(
      EXPORTING
        IV_DATE      = LD_IV_DATE
        "IV_MSEC      = LD_IV_MSEC
        IV_TIME      = LD_IV_TIME
      IMPORTING
        EV_TIMESTAMP = IN_UNIX_2 ).

Input: Date and Time Output: DateTime in Unix format

Then just add the average to 19700101 date.

Can be done with the following FM;

  CALL FUNCTION 'TIMESTAMP_DURATION_ADD' "
    EXPORTING
      TIMESTAMP_IN  = 19700101000000            " timestamp     UTC Time Stamp in Short Form (YYYYMMDDhhmmss)
      TIMEZONE      = 'UTC'                     " timezone      Time Zone
      UNIT          = 'S'                       " t006-msehi    Unit of measurement
      DURATION      = IN_RUN_AVG
    IMPORTING
      TIMESTAMP_OUT = IN_AVG_FINAL              " timestamp     UTC Time Stamp in Short Form (YYYYMMDDhhmmss)
    .  "  TIMESTAMP_DURATION_ADD

This method can be used since the Unix time is time count in seconds from 1970/01/01

Answer 2

do this:

data: lv_clock type sy-uzeit, lv_type type sy-uzeit.

Get time. lv_time = sy-uzeit.

your code...

get time. lv_clock = sy-uzeit.

lv_clock = lv_clock - lv_time.

write: / lv_clock.

Or, you can use the function 'TIMESTAMP_DURATION_ADD'