ABAP-日期内外码转换函数 

 1 DATA:lv_date TYPE sy-datum,
 2      lv_out  TYPE char10.
 3 
 4 lv_date = sy-datum .
 5 
 6 CALL FUNCTION 'CONVERT_DATE_TO_EXTERNAL'
 7   EXPORTING
 8     date_internal            = lv_date
 9   IMPORTING
10     date_external            = lv_out
11   EXCEPTIONS
12     date_internal_is_invalid = 1
13     OTHERS                   = 2.
14 
15 CALL FUNCTION 'CONVERT_DATE_TO_INTERNAL'
16   EXPORTING
17     date_external            = lv_out
18 *   ACCEPT_INITIAL_DATE      =
19   IMPORTING
20     date_internal            = lv_date
21   EXCEPTIONS
22     date_external_is_invalid = 1
23     OTHERS                   = 2.
posted @ 2023-07-01 14:23  TigerMan  阅读(176)  评论(0)  编辑  收藏  举报