添加和去除前导零

"加前导零
DEFINE add_pre_zero.
  call function 'CONVERSION_EXIT_ALPHA_INPUT'
    exporting
      input        = &1
    importing
      output       = &2
    exceptions
      length_error 1
      others       2.
  if sy-subrc <> 0.
    message id sy-msgid type sy-msgty number sy-msgno
    with sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
  endif.
END-OF-DEFINITION.

"去前导零
DEFINE delete_pre_zero.
  call function 'CONVERSION_EXIT_ALPHA_OUTPUT'
    exporting
      input        = &1
    importing
      output       = &2
    exceptions
      length_error 1
      others       2.
  if sy-subrc <> 0.
    message id sy-msgid type sy-msgty number sy-msgno
    with sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
  endif.
END-OF-DEFINITION.

posted @ 2017-09-26 15:16  独吊东南枝  阅读(546)  评论(0编辑  收藏  举报