PARAMETERS:p_name(2) AS LISTBOX VISIBLE LENGTH 12.
DATA: lv_name TYPE vrm_id,
lt_list TYPE vrm_values,
ls_list LIKE LINE OF lt_list.
* 设置下载按钮图标和文本
sscrfields-functxt_01 = '@49@ ' && '模板下载'.
* 初始化下拉框
lv_name = 'P_NAME'.
ls_list-key = '01A'.
ls_list-text = '张三'.
APPEND ls_list TO lt_list.
ls_list-key = '02A'.
ls_list-text = '李四'.
APPEND ls_list TO lt_list.
CALL FUNCTION 'VRM_SET_VALUES'
EXPORTING
id = lv_name
values = lt_list.