*&---------------------------------------------------------------------*
*& Report Z99_123
*&---------------------------------------------------------------------*
*&
*&---------------------------------------------------------------------*
REPORT Z99_123.

DATA LV_TIMEZONE TYPE TIMEZONE.
CALL FUNCTION 'GET_SYSTEM_TIMEZONE'
  IMPORTING
    TIMEZONE = LV_TIMEZONE.

SELECT SINGLE
   FLDATE
  ,ORDER_DATE
  ,DATS_IS_VALID( FLDATE ) AS VALID
  ,DATS_DAYS_BETWEEN( FLDATE, ORDER_DATE ) AS DAYS_BETWEEN
  ,DATS_ADD_DAYS( FLDATE, 30 ) AS ADD_DAYS
  ,DATS_ADD_MONTHS( FLDATE,-10 ) AS ADD_MONTH
  ,TSTMP_CURRENT_UTCTIMESTAMP( ) AS UTC

  ,TSTMP_TO_DATS(
                  TSTMP    = TSTMP_CURRENT_UTCTIMESTAMP( ),
                  TZONE    = @LV_TIMEZONE,
                  ON_ERROR = @SQL_TSTMP_TO_DATS=>SET_TO_NULL ) AS DATS

 ,TSTMP_TO_TIMS(
                 TSTMP    = TSTMP_CURRENT_UTCTIMESTAMP( ),
                 TZONE    = @LV_TIMEZONE,
                 ON_ERROR = @SQL_TSTMP_TO_TIMS=>SET_TO_NULL ) AS TIMS

 ,DATS_TIMS_TO_TSTMP(
                  DATE     = @SY-DATUM,
                  TIME     = @SY-UZEIT,
                  TZONE    = @LV_TIMEZONE,
                  ON_ERROR = @SQL_DATS_TIMS_TO_TSTMP=>SET_TO_NULL ) AS DATS_TIMS

  FROM SBOOK
  INTO @DATA(LT_DATA).

CL_DEMO_OUTPUT=>DISPLAY( LT_DATA ).