屏幕下拉框

DATA: lv_name TYPE vrm_id,
      lt_list TYPE vrm_values,
      lw_value LIKE LINE OF lt_list.

PARAMETERS:s_zterm like ekko-zterm AS LISTBOX VISIBLE LENGTH 6.


INITIALIZATION."（没加就没显示）

lw_value-key = '1'.
  lw_value-text = '0001'.

  APPEND lw_value TO lt_list.
  lw_value-key = '2'.
  lw_value-text = '0002'.

  APPEND lw_value TO lt_list.

  CALL FUNCTION 'VRM_SET_VALUES'     "调用函数填充内容
    EXPORTING
      id     = 'S_ZTERM'
      values = lt_list.