如有转载请注明出处:http://blog.csdn.net/donkey2004112103/archive/2009/05/23/4210686.aspx
SAP负号的显示都是在数字的后面如23-这样来表示负数,和我们的习惯都不一样。如何让负数显示的时候负号在最前了?个人想到了一个简单的方法,不知道有没有更简单的。就是用字符显示数据,然后循环右移负号将其靠前显示。但是注意如果是p类型的赋值给c类型,后面会有'.000'。c类型还会有空格存在,所以要注意清楚空格和后缀0.示例代码如下:
*数量
l_amount = wa_qtrk-erfmg.
*负号左移消除0
SHIFT l_amount up to '-' left CIRCULAR .
SHIFT l_amount RIGHT DELETING TRAILING '.0'.
condense l_amount.
首先要让负号显示在最前,这里用的是左移直到出现负号,如果没有负号的话是不会移动的。去除掉末尾的0让其整数显示,然后在去除空格,这样就可以实现负号前移了。
系统也有标准函数来完成这个功能,CLOI_PUT_SIGN_IN_FRONT。
实现代码也十分好懂,如下:
SEARCH VALUE FOR '-'.
IF SY-SUBRC = 0 AND SY-FDPOS <> 0.
SPLIT VALUE AT '-' INTO VALUE TEXT1.
CONDENSE VALUE.
CONCATENATE '-' VALUE INTO VALUE.
ELSE.
CONDENSE VALUE.
ENDIF.
找到’-‘号然后在换个顺序。写的还是不错。