SAP 补0

来源:互联网 发布:诺基亚5800软件下载 编辑:程序博客网 时间:2024/06/07 02:13

转换例程: ALPHA

函数:

补0: CONVERSION_EXIT_ALPHA_INPUT 

去0: CONVERSION_EXIT_ALPHA_OUTPUT

上面函数有一个局限性,当变量值的首字符为字母时(A、B、C......),补0会没有效果。

针对上面的问题,我们可以用程序去修正(业务需要为这种特殊情况补0时),代码如下:

DATA: lv_num   TYPE n LENGTH 10,      lv_char2 TYPE char10 VALUE 'ABC'."补0SHIFT lv_char2 RIGHT DELETING TRAILING space.OVERLAY lv_char2 WITH lv_num.WRITE: lv_char2."去0SHIFT lv_char2 LEFT DELETING LEADING '0'.WRITE: lv_char2.




0 0
原创粉丝点击