使用'VRM_SET_VALUES'函数在selection屏幕上建一个Combobox控件示例

report z.
type-pools: vrm.
data: it_val type vrm_values,
      w_line like line of it_val.
parameters p_bukrs like t001-bukrs as listbox
           visible length 25 obligatory.

initialization.
  select bukrs butxt from t001 into (w_line-key, w_line-text).
    append w_line to it_val.
    check p_bukrs is initial.
    p_bukrs = w_line-key.
  endselect.

at selection-screen output.
  call function 'VRM_SET_VALUES'
       exporting
            id     = 'P_BUKRS'
            values = it_val.

end-of-selection.
  write: / 'Company Code:', p_bukrs.
增补,屏幕列表(启明星提供)

REPORT YAOWEI_TEST_LIST .
DATA: OK_CODE LIKE SY-UCOMM.
*下拉列表相关定义
TYPE-POOLS VRM. "下拉列表使用的类型定义
DATA: SC_LIST TYPE vrm_id. "使用列表的字段名
DATA:it_list TYPE vrm_values. "使用列表的清单内容
DATA: wa_