CONVERSION_EXIT_ALPHA_INPUT 加前導0 和去掉 前導0

功能：
給輸入的數字編號新增前置 0，以便讓查詢程式正確處理。多數用在財務科目的查詢，對於各種憑證編號和物料號，如果查詢無法獲得所需結果，也可以考慮嘗試用此函式進行轉換。

輸 入引數：
INPUT：不限制型別，必須輸入。原始編號。
輸出引數：
OUTPUT：日期型別。計算出的結果。

測試 結果：
如果 INPUT 輸入為純數字（就是隻有 0～9 之間的字元），結果就是前置很多 0 的數字。
如果 INPUT 輸入不為純數字（就是包含 0～9 之外的字元），結果就跟輸入值一樣。

疑問：
在把值返回給程式中的資料欄位時，會自動根據欄位 長度剔除前置的 0，這是如何做到的。

ABAP 加 前導0  &&&  去掉 前導0 的  Function Module.   !!! 經常會用到 ~~~

只要呼叫這兩個 PERFORM. <XXXXX> 欄位就會自動更改~

PERFORM. add_zero CHANGING .  ” ++ 加前導 0

PERFORM. dele_zero CHANGING <XXXXX>.  ” -- 去掉前導 0

*&---------------------------------------------------------------------*
*&      Form  ADD_ZERO
*&---------------------------------------------------------------------*
*       text
*----------------------------------------------------------------------*
FORM. add_zero  CHANGING p_in.

  CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'
    EXPORTING
      input  = p_in
    IMPORTING
      utput = p_in.

ENDFORM.                    " ADD_ZERO
*&---------------------------------------------------------------------*
*&      Form  DELE_ZERO
*&---------------------------------------------------------------------*
*       text
*----------------------------------------------------------------------*
FORM. dele_zero  CHANGING p_out.

  CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
    EXPORTING
      input  = p_out
    IMPORTING
      utput = p_out.

ENDFORM.                    " DELE_ZERO

來自 “ ITPUB部落格 ” ，連結：http://blog.itpub.net/16794144/viewspace-671132/，如需轉載，請註明出處，否則將追究法律責任。