abap时间戳获取

燚㵘䲜

已于 2023-07-14 10:46:11 修改

阅读量413

点赞数

分类专栏： 10.Abap 文章标签： abap时间戳获取

于 2023-03-15 09:59:01 首次发布

本文链接：https://blog.csdn.net/cly_apple/article/details/129545966

版权

10.Abap 专栏收录该内容

53 篇文章 3 订阅

订阅专栏


*&---------------------------------------------------------------------*
*& Report  Y_STAMPL
*&
*&---------------------------------------------------------------------*
*&
*& 时间戳
*&---------------------------------------------------------------------*
 
REPORT Y_STAMPL.
 
START-OF-SELECTION.
 
  DATA: LV_DT1 TYPE STRING.
  DATA: LV_DT2 TYPE STRING.
 
  PERFORM FRM_DATE_CONVERT_AA CHANGING LV_DT1.
  PERFORM FRM_DATE_CONVERT_BB CHANGING LV_DT2.
 
  WRITE: / LV_DT1.
  WRITE: / LV_DT2.
 
*&---------------------------------------------------------------------*
*&      Form  FRM_DATE_CONVERT_AA
*&---------------------------------------------------------------------*
*       text
*----------------------------------------------------------------------*
FORM FRM_DATE_CONVERT_AA CHANGING CV_DATE.
  DATA: LV_TTL   TYPE TIMESTAMPL.
  DATA: LV_TMS   TYPE CHAR50.
 
  GET TIME STAMP FIELD LV_TTL .
  WRITE LV_TTL TO LV_TMS USING EDIT MASK '______________._______' TIME ZONE 'UTC+8 '.
  CV_DATE = LV_TMS.
 
ENDFORM.                    "FRM_DATE_CONVERT_AA
*&---------------------------------------------------------------------*
*&      Form  FRM_DATE_CONVERT_BB
*&---------------------------------------------------------------------*
*       text
*----------------------------------------------------------------------*
FORM FRM_DATE_CONVERT_BB  CHANGING CV_DATE.
  DATA: LV_TTL   TYPE TIMESTAMPL.
  DATA: LV_TMS   TYPE CHAR22.
  GET TIME STAMP FIELD LV_TTL.
  LV_TMS  = LV_TTL.
  CONVERT TIME STAMP LV_TTL TIME ZONE 'UTC+8 ' INTO TIME LV_TMS+8(6).
  CV_DATE = LV_TMS.
ENDFORM.                    " FRM_DATE_CONVERT_BB