CONVERT_DATE

通过 Function Module 将外部日期转换为内部日期
所属 Function Group : SCON
所属 Package : SZP

DATA:date_input TYPE c LENGTH 10 VALUE ’2009-1-16′,
      date_output TYPE sy-datum.
CALL FUNCTION ‘CONVERT_DATE_INPUT’
EXPORTING
    input                     = date_input
    plausibility_check        = ‘X’
IMPORTING
    output                    = date_output "output前是否检查数据合理性
EXCEPTIONS
    plausibility_check_failed = 1
    wrong_format_in_input     = 2
    OTHERS                    = 3.
IF sy-subrc <> 0.
MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
          WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.
WRITE:’date_input:’,date_input,’date_output:’,date_output.

结果：date_input: 2009-1-16 date_output: 2009-01-16
————
注意：
1、在R3 4.71 使用时会提示：函数模块 CONVERT_DATE_INPUT 已过时 – 无法使用
2、如果外部日期包含除当前用户日期分割符以外的非数字字符，则报错 WRONG_FORMAT_IN_INPUT ，相关源代码：
*—START
DATE_CHAR-SEP = DATE_SEP.
IF INPUT CN DATE_CHAR.
    MESSAGE S012 WITH DATE_SEP RAISING WRONG_FORMAT_IN_INPUT.
ENDIF.
*—END
3、无法处理长度大于10或小于5的外部日期，相关源代码：
*—START
LENGTH = STRLEN( INPUT ).
IF LENGTH GT 10
OR LENGTH LT 5.
    MESSAGE S001 WITH DATE_MASK RAISING WRONG_FORMAT_IN_INPUT.
ENDIF.
*—END
4、如果外部日期不包含日期分隔符，且外部日期长度不等于6位或8位时，报错 WRONG_FORMAT_IN_INPUT
*—START
IF INPUT CS DATE_SEP.
    SW_SEP = ‘X’.
ELSE.
    SW_SEP = SPACE.
    IF LENGTH NE 6                    " Jahr auffuellen
    AND LENGTH NE 8.
      MESSAGE S001 WITH DATE_MASK RAISING WRONG_FORMAT_IN_INPUT.
    ENDIF.
ENDIF.
*—END

CONVERT_DATE_INPUT相关推荐

CONVERT_DATE_WITH_THRESHOLD
通过 Function Module 将外部日期转换为内部日期之二所属 Function Group : SCON 所属 Package : SZP DATA:date_input TYPE c L ...
讓我老火的CONVERSION_EXIT_INVDT_INPUT
最近發生了一件令我相當老火(貌似重慶人很喜歡用這個詞)的事情:同一個報表因為不同的帳號執行,最後結果不一樣(這裡不涉及權限相關的內容),更怪異的是唯獨只有一個帳號不一樣,其他都沒問題.從這一情況來 ...
UI里面excel数据上传并解析的例子（CSV格式）
可以参考系统的例子 CRM_THTMLB_COMP/FileUploadTag . 下面的是一个简单的CSV格式示例. METHOD eh_onuploadfile.DATA lv_flag TYPE ...

CONVERT_DATE_INPUT

CONVERT_DATE_INPUT相关推荐

最新文章

热门文章