天天看点

【CRM】01- WEB UI 下拉列表

应用场景: 自定义 WEB UI 程序下拉列表

【CRM】01- WEB UI 下拉列表

首先F2找到页面对应的“组件及视图”.实现其对应视图,上下文节点里面的get v方法。

【CRM】01- WEB UI 下拉列表

具体代码如下图:

METHOD get_v_bu.
  DATA  l_i_ddlb     TYPE bsp_wd_dropdown_table.
  DATA  l_wa_ddlb    LIKE LINE OF l_i_ddlb.
  DATA  l_o_ddlb     TYPE REF TO cl_crm_uiu_ddlb.
  DATA: l_i_bu       TYPE STANDARD TABLE OF /sc1/t_bu,
        l_wa_bu      TYPE /sc1/t_bu.


*&---step 1、 创建视图字段属性的下拉列表对象
  CREATE OBJECT l_o_ddlb
    EXPORTING
      iv_source_type = 'T'.


*&---step 2、从配置表取下拉列表取值
  SELECT * FROM /sc1/t_bu INTO TABLE l_i_bu.


  CLEAR: l_wa_ddlb.
  l_wa_ddlb-key   = ''.
  l_wa_ddlb-value = ''.
  APPEND l_wa_ddlb TO l_i_ddlb."空行可选

  LOOP AT l_i_bu INTO l_wa_bu.
    CLEAR: l_wa_ddlb.
    l_wa_ddlb-key   = l_wa_bu-bucode.
    l_wa_ddlb-value = l_wa_bu-butxt.
    APPEND l_wa_ddlb TO l_i_ddlb.
  ENDLOOP.


*&---step 4、设置下拉列表,并让该方法返回
  l_o_ddlb->set_selection_table( it_selection_table = l_i_ddlb ).
  rv_valuehelp_descriptor = l_o_ddlb.

ENDMETHOD.