1. 转换历程
DATA: LV_DATE TYPE SY-DATUM,
LV_C(8).
LV_C = SOURCE_FIELDS-BUDAT.
LV_DATE = LV_C.
IF LV_DATE = 0.
RESULT = '19001231'.
ELSE.
RESULT = SOURCE_FIELDS-BUDAT.
ENDIF.
方法2 引用FM
CALL FUNCTION 'DATE_CHECK_PLAUSIBILITY'
EXPORTING
date = v_date
EXCEPTIONS
plausibility_check_failed = 1
OTHERS = 2.
IF sy-subrc NE 0. "如果返回非0,则日期不合法
.
.
ENDIF.