ABAP 去空格和前导零

ABAP 去前导零
### 完整示例代码
```abap
REPORT ZREMOVE_LEADING_ZEROS.

DATA: lv_str   TYPE string,
      lv_num   TYPE i VALUE 000123,
      lv_matnr TYPE matnr VALUE '0000001234'.

" 方法1：SHIFT 语句
lv_str = '000987'.
SHIFT lv_str LEFT DELETING LEADING '0'.
IF lv_str IS INITIAL.
  lv_str = '0'.
ENDIF.
WRITE: / '方法1结果:', lv_str. " 输出: 987

" 方法2：正则表达式
lv_str = '0000456'.
REPLACE ALL OCCURRENCES OF REGEX '^0+' IN lv_str WITH ''.
IF lv_str IS INITIAL.
  lv_str = '0'.
ENDIF.
WRITE: / '方法2结果:', lv_str. " 输出: 456

" 方法3：数值转字符串
lv_str = |{ lv_num }|.
WRITE: / '方法3结果:', lv_str. " 输出: 123

" 方法4：转换函数（处理物料号）
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input  = lv_matnr
  IMPORTING
    output = lv_matnr.
WRITE: / '方法4结果:', lv_matnr. " 输出: 1234
```

如 原物料号为25位，有很多前置零，现在要改为18位，不足部分添加前置0

DATA: L_MATERIAL TYPE  /BI0/OIMATERIAL.
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input  = SOURCE_FIELDS-ARTNR " 输入（带前导零的字符串）
  IMPORTING
    output = L_MATERIAL.      " 输出（去零后的字符串）


CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'
  EXPORTING
    input  = L_MATERIAL " 输入（无前导零的字符串）
  IMPORTING
    output = RESULT.      " 输出（带零后的字符串）