ABAP 字符串转日期函数

最新推荐文章于 2024-12-29 15:42:41 发布

转载最新推荐文章于 2024-12-29 15:42:41 发布 · 2.8k 阅读

文章标签：

#ABAP 字符串转日期函数

本文介绍了如何将字符串类型的日期转换为内部日期表示，并处理无效输入情况。

DATA: v_date TYPE sy-datum.

PARAMETERS: p_dates TYPE string.

INITIALIZATION.
  p_dates = 'a0080313'.    "Le type DATUM est de type caractere, il accepte tout et donc n'importe quoi


START-OF-SELECTION.
  CALL FUNCTION 'CONVERT_DATE_TO_INTERNAL'
    EXPORTING
      date_external            = p_dates
    IMPORTING
      date_internal            = v_date
    EXCEPTIONS
      date_external_is_invalid = 1
      OTHERS                   = 2.
  IF sy-subrc <> 0.
    MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
            WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
  ELSE.
    WRITE: / v_date.
  ENDIF.