ABAP中加上前导零、去除前导零的function module

xushichang

已于 2022-09-05 17:19:47 修改

阅读量4.1k

点赞数

分类专栏： SAP_ABAP 文章标签： function module input output

于 2012-10-10 11:25:24 首次发布

本文链接：https://blog.csdn.net/xushichang/article/details/8055609

版权

SAP_ABAP 专栏收录该内容

3 篇文章 0 订阅

订阅专栏

ABAP中加上前导零、去除前导零的function module 针对字符串值多是数字

PERFORM add_zero CHANGING p_in.
PERFORM del_zero CHANGING p_out.

*加上p_in的前导零

FORM add_zero CHANGING p_in.

CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'
    EXPORTING
      input = p_in
    IMPORTING
      utput = p_in.

ENDFORM.

*去除p_out的前导零

FORM del_zero CHANGING p_out.

CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
    EXPORTING
      input = p_out
    IMPORTING
     output = p_out.

ENDFORM.

或：

SHIFT s_lifnr LEFT DELETING LEADING '0'.

740 版本后的写法

"增加前导0
DATA: ls_matnr TYPE matnr VALUE '15000042'.
DATA(ls_in_matnr) = |{ ls_matnr ALPHA = IN }|.
WRITE: ls_in_matnr.  "示例结果：000000000015000042

"删除前导0
DATA: gs_matnr TYPE matnr VALUE '000000000015000042'.
DATA(gs_out_matnr) = |{ gs_matnr ALPHA = OUT }|.
WRITE:/ gs_out_matnr.  "示例结果：15000042