My First BAPI - Format a string use assign character.

来源:互联网 发布:手机水印软件 编辑:程序博客网 时间:2024/06/04 19:52
  
FUNCTION ZZW_GET_SETTING_FORMAT.
*"----------------------------------------------------------------------
*"*"Local interface:
*" IMPORTING
*"     REFERENCE(I_FILE) TYPE C
*"     REFERENCE(I_CHARACTER) TYPE C
*"     REFERENCE(I_LENGTH) TYPE I
*" EXPORTING
*"     REFERENCE(E_FILE) TYPE C
*"----------------------------------------------------------------------
 
DATA: LINT_INDEX TYPE I.
      E_FILE = I_FILE.      "Set output file use intput file to format
    LINT_INDEX = I_LENGTH - STRLEN( I_FILE ).
    IF STRLEN( I_FILE ) < I_LENGTH.
        DO LINT_INDEX TIMES.
            CONCATENATE I_CHARACTER E_FILE INTO E_FILE.
        ENDDO.
    ENDIF.
 
 
ENDFUNCTION.
效果图:
output the result:
原创粉丝点击