sap中负号提前代码

sap中负号提前代码

以下是做好的FUNCTION。

FUNCTION CONVERSION_EXIT_Z0002_OUTPUT.
*"----------------------------------------------------------------------
*"*"Local interface:
*" IMPORTING
*"      REFERENCE(INPUT)
*" EXPORTING

*"     REFERENCE(OUTPUT)
*"----------------------------------------------------------------------
DATA:
 OUTPUT1(12)   TYPE C,
         OUTDATUM   TYPE INT4.

IF INPUT <> SPACE.
      OUTDATUM = INPUT.
    if input > 0.
         move OUTDATUM TO OUTPUT .
    else.
        OUTDATUM = OUTDATUM * ( -1 ).
        move OUTDATUM TO OUTPUT1 .
         CONCATENATE '-' output1 into output.
       CONDENSE output NO-GAPS .

    endif.
ELSE.
    OUTPUT = SPACE.
ENDIF.
ENDFUNCTION.

posted @ 2011-09-18 01:38  VerySky  阅读(1711)  评论(0)    收藏  举报