FORM sign_in_front USING value1 CHANGING value3.
*个人偷懒,参考网上,不知道是否有误,先提交使用
*备注value1定义为货币类型长度31,value3定义为char31 . alv输出为value3
DATA : VALUE2 TYPE P DECIMALS 2.
DATA : STRING1 TYPE CHAR31.
VALUE2 = ABS( VALUE1 ).
WRITE VALUE2 TO STRING1.
CONDENSE STRING1.
IF VALUE1 < 0.
* WRITE:/ '处理后输出样式:', '-', STRING1 LEFT-JUSTIFIED NO-GAP NO-ZERO .
* WRITE:/ '-', STRING1 LEFT-JUSTIFIED NO-GAP NO-ZERO TO VALUE3.
CONCATENATE '-' STRING1 INTO VALUE3 .
ENDIF.
ENDFORM. " SIGN_IN_FRONT