ABAP代码:下拉列表框

ABAP代码:下拉列表框

TYPE-POOLS: VRM.

DATA: NAME TYPE VRM_ID,
      LIST TYPE VRM_VALUES,
      VALUE LIKE LINE OF LIST.


PARAMETERS S_ID(3) TYPE C DEFAULT ''
                  AS LISTBOX VISIBLE LENGTH 35.


INITIALIZATION.

AT SELECTION-SCREEN ON VALUE-REQUEST FOR S_ID.
  PERFORM SELECT_S_ID_FOR_LIST.


FORM SELECT_S_ID_FOR_LIST.

  NAME = 'S_ID'.
  VALUE-KEY = 'A01'.
  VALUE-TEXT = '类型A01'.
  APPEND VALUE TO LIST.

  VALUE-KEY = 'A02'.
  VALUE-TEXT = '类型A02'.
  APPEND VALUE TO LIST.

..........

  CALL FUNCTION 'VRM_SET_VALUES'
       EXPORTING
            ID     = NAME
            VALUES = LIST.

ENDFORM.                    " SELECT_S_ID_FOR_LIST
 

补充说明:
1.下拉框中的选项可以入示例那样固定,也可从表中获取后用循环动态添加,这不是什么问题
2.目前没有找到一个方法捕获下拉框中值变化这一事件,从而,无法做到当下拉框的值变化时,
    其他控件里的值相应发生变化。

本文来自CSDN博客,转载请标明出处:http://blog.csdn.net/xiaoysh/archive/2007/07/18/1696958.aspx

评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值