赛跑网-选择屏幕制作之下拉列表

SAPOK_ABAP · 发表于 2012-5-1 16:01:26

下列代码展示了如何制作下列列表的详细步骤。
效果如下图

游客，如果您要查看本帖隐藏内容请回复

源代码如下：
REPORT  ztest002.
PARAMETERS p_lang(20) AS LISTBOX VISIBLE LENGTH 20.
***定义下拉列表使用到的类型池。类似于ALV报表时的slis
TYPE-POOLS vrm.
***事件块
AT SELECTION-SCREEN OUTPUT.
***定义内表带表头
  DATA values TYPE vrm_values WITH HEADER LINE.
***内表赋值
  values-key = 'LIST1'. "key的值为p_lang所接受到的值
  values-text = '列表1'."text为对应的文本描述
  APPEND values.
  values-key = 'LIST2'.values-text = '列表2'.
  APPEND values.
***调用函数实现下拉列表

游客，如果您要查看本帖隐藏内容请回复

  IF sy-subrc <> 0.
MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
         WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
  ENDIF.

火车飞侠 · 发表于 2012-5-2 15:57:48

顶一下，看看

xingfan234 · 发表于 2012-5-10 19:35:56

老师写得很好。。。。

semokim · 发表于 2012-5-13 09:25:26

赛跑网-选择屏幕制作之下拉列表

thp20000 · 发表于 2012-5-19 17:01:34

之前在开发过程中的确不会下拉列表，没去实现。现在可以好好看看

abapnewbie · 发表于 2012-6-21 16:04:59

THANKSFOR SHARING

无言草 · 发表于 2012-6-25 14:38:48

这个很重要。。。

thp20000 · 发表于 2012-7-9 19:33:51

今天开发的一个报表用到了,再回头看一次

yangjinping1234 · 发表于 2012-7-10 20:27:53

布拉德与朔太郎 · 发表于 2012-9-20 20:01:43

这个真不会！

		自动登录	找回密码
密码			注册

赛跑网-选择屏幕制作之下拉列表

本帖子中包含更多资源

最近访客

浏览过的版块