ABAP 日期时间格式化后增加空格-代码

最新推荐文章于 2024-12-25 11:09:09 发布

qq_qiyin

最新推荐文章于 2024-12-25 11:09:09 发布

阅读量287

点赞数 8

CC 4.0 BY-SA版权

文章标签： sap function

本文链接：https://blog.csdn.net/qyshaka/article/details/142213491

*&---------------------------------------------------------------------*
*& Report Y01
*&---------------------------------------------------------------------*
*&
*&---------------------------------------------------------------------*
REPORT y01.
DATA: im_data TYPE dats,
      im_time TYPE TIMS,
      lv_p type string,
      date    TYPE sy-datlo.
DATA: date_xml TYPE char10,
      time_xml TYPE string.
im_data = '20240913'.
CALL METHOD cl_abap_datfm=>conv_date_int_to_ext
  EXPORTING
    im_datint   = im_data
    im_datfmdes = '6'
  IMPORTING
    ex_datext   = date_xml.
*                 ex_datfmused =
im_time = '202409'.
call method cl_abap_timefm=>conv_time_int_to_ext
                exporting
                  time_int            = im_time
*                 without_seconds     = ABAP_FALSE
                  format_according_to = cl_abap_timefm=>iso
                importing
                  time_ext            = time_xml.

*lv_p = date_xml && ' ' .
*lv_p = lv_p && time_xml.
CONCATENATE date_xml time_xml INTO lv_p SEPARATED BY ' '.
"DATA(lv_timestamp_iso) = |{ lv_p TIMESTAMP = ISO }|.
WRITE /: date_xml.
WRITE /:  time_xml.
WRITE /:  lv_p.
*WRITE /:  lv_timestamp_iso.