SAP 金额等负号提前问题

一般我们在alv上展示的金额如果是负数，默认是这样显示的：

在有的开发中，客户可能要求负号提前，实现这样的效果：

为了实现这样的效果，这里给大家介绍三种方法，第一和第二种是来自网上常见的方法。
第一种：使用函数CLOI_PUT_SIGN_IN_FRONT

REPORT  ZGY_TEST.
TABLES : BSEG.
DATA : E_DMBTR TYPE STRING.
E_DMBTR = '100-'.
CALL FUNCTION 'CLOI_PUT_SIGN_IN_FRONT'
  CHANGING
    VALUE         = E_DMBTR.
WRITE : E_DMBTR.

这个的局限是只能用字符类型进行操作，这样就不是金额这样的数字类型了，对于对齐等也都和金额类型不同，同时会导致千分位符号丢失。
用write to语句把负数取绝对值，然后把数字型写入字符型可以保留千位符，再判断正负数，在输出的时候添上负号。

Form asset_front_minus changing value1.
   value2 = abs( value1 ).
   write value2 to string1.
   condense string1.
   if value1 < 0.
       write: '-', string1 LEFT-JUSTIFIED NO-GAP NO-ZERO.
   else.
       write: string1 LEFT-JUSTIFIED NO-GAP NO-ZERO.
   endif.
endform.

第二种：
这种方法手动添加千分位符号，以下是来自网上的实现方法：
手动把字符型加千位符的，取整，判断长度，除3以后循环mask”_,”格式，分割，再处理头3位。

FORM NUMTOSTR USING VALUE(ZNUM) CHANGING VALUE(ZSTR).
    DATA : ZCLEN TYPE I,
           N TYPE I,
           ZCSTR(20)  TYPE C,
           ZCSTR2(20) TYPE C,
           ZCTEMP(3)  TYPE C,
           ZFLAG(1)   TYPE C VALUE '.',
           ZFLAG2     TYPE I VALUE 0,
           ZCDEC(20)  TYPE C. "记录小数部分
    ZSTR = ''.
    CHECK ZNUM <> 0.
    IF ZNUM <= -1000.
        ZFLAG2 = 1.
        ZNUM = ABS( ZNUM ).
    ENDIF.
    IF ZNUM >= 1000.
        ZCSTR = ZNUM.
        * 压缩字符串，去除前面的空格。 
        CONDENSE ZCSTR NO-GAPS.
        * 分离整数与小数，好单独处理整数。 
        SPLIT ZCSTR AT ZFLAG INTO ZCSTR ZCDEC.
        ZCLEN = STRLEN( ZCSTR ).
        * 在循环中从右面在每三位的前面加上一个逗号。 
        WHILE ZCLEN > 3.
            N = ZCLEN - 3.
            ZCTEMP = ZCSTR+N(3).
            IF NOT ZCSTR2 IS INITIAL.
                CONCATENATE ZCTEMP ZCSTR2 INTO
                                ZCSTR2 SEPARATED BY ','.
            ELSE.
                ZCSTR2 = ZCTEMP.
            ENDIF.
                ZCLEN = ZCLEN - 3.
        ENDWHILE.
        * 将不剩下的不足三位数加到前面 
        CONCATENATE ZCSTR+0(ZCLEN) ZCSTR2 
                        INTO ZCSTR2 SEPARATED BY ','.
        IF ZFLAG2 = 1.
            CONCATENATE '-' ZCSTR2 INTO ZCSTR2.
        ENDIF.
        CLEAR ZCSTR.
        * 将处理过的整数与小数连接起来。 
        CONCATENATE ZCSTR2 ZCDEC INTO 
                            ZCSTR SEPARATED BY ZFLAG.
        * 将值返回 
        ZSTR = ZCSTR.
    ELSE.
        ZSTR = ZNUM.
    ENDIF.
ENDFORM.

第三种：
这种方法相对于前两种方法的优点是，一.类型还是金额等数字类型，负号实现前置；二.几乎不用写很多代码，且可以保留千分位;三.适用于多个这样的字段修改需求。
实现步骤如下：
1.SE37，按下图命名规范创建FUNCTION,

输入函数组和描述，然后输入import和export参数，如图


添加代码：

保存，激活。
最后，在对应的alv设置fieldcat时针对设置金额等数字类型的字段添加代码：固定写成’ZXXX’形式。

WE_FIELDCAT-EDIT_MASK = '==Z001'.