ASSET_NUMBER_CONVERT - такое себе формирование ключа ОС

[Uukrul]

ASSET_NUMBER_CONVERT - такое себе формирование ключа ОС. В общем полезно если надо сформировать например ключ для компонента TREE, по факту формирует строку вида: <Код БЕ>space<№ ОС>тире<Суб№ ОС>. При этом номер и субномер ОС будут выровнены слева нулями при цифровом диапазоне. Код простой:

Код Виділити Розширити


function asset_number_convert.
*"----------------------------------------------------------------------
*"*"Lokale Schnittstelle:
*"       IMPORTING
*"             VALUE(I_BUKRS) LIKE  ANLA-BUKRS
*"             VALUE(I_ANLN1) LIKE  ANLA-ANLN1
*"             VALUE(I_ANLN2) LIKE  ANLA-ANLN2
*"       EXPORTING
*"             VALUE(E_ASSET)
*"----------------------------------------------------------------------
  data: ld_sep value '-'.

  get parameter id 'AGL'  field ld_sep.
  if sy-subrc <> 0   or
     ld_sep is initial.
     ld_sep = '-'.
  endif.

  call function 'CONVERSION_EXIT_ALPHA_OUTPUT'
       exporting    input   = i_anln1
       importing    output  = i_anln1.
  call function 'CONVERSION_EXIT_ALPHA_OUTPUT'
       exporting    input   = i_anln2
       importing    output  = i_anln2.

  concatenate i_anln1 i_anln2 into e_asset separated by ld_sep.
  concatenate i_bukrs e_asset into e_asset separated by space.

endfunction.

А ну да разделитель номера и субномера ОС задается из параметра "AGL". что конечно чуток делает использование модуля стремным. Мало ли, что там пользователь себе заведет в этом параметре.