ведущие нули

Удаление ведущих нулей

  1. data a(9) value '000012345'.
  2. SHIFT a LEFT DELETING LEADING '0'.
  3. write:/ a.

На выходе получим : 12345

Добавление ведущих нулей

Привожу пример кода в котором используется функциональный модуль (CONVERSION_EXIT_ALPHA_INPUT) для добавления ведущих нулей

  1.  
  2. zmatnr type MATNR.
  3.  
  4. zmatnr = '123'.
  5. CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'
  6. EXPORTING
  7. INPUT = zmatnr
  8. IMPORTING
  9. OUTPUT = zmatnr. "На выходе получим 000000000000000123
Подписка на ведущие нули