• 博客园logo
  • 会员
  • 周边
  • 新闻
  • 博问
  • 闪存
  • 众包
  • 赞助商
  • Chat2DB
    • 搜索
      所有博客
    • 搜索
      当前博客
  • 写随笔 我的博客 短消息 简洁模式
    用户头像
    我的博客 我的园子 账号设置 会员中心 简洁模式 ... 退出登录
    注册 登录
^ω^SAp傻X^o^
博客园    首页    新随笔    联系   管理    订阅  订阅
WDA INIT DROP DOWN
DIAOMETHOD init_drop .
  DATA: lt_value_set TYPE TABLE OF wdy_key_value,
        ls_value_set TYPE wdy_key_value.
  DATA:lr_node_info TYPE REF TO if_wd_context_node_info.
  DATA:gt_dd07t TYPE TABLE OF dd07t,
       gw_dd07t LIKE LINE OF gt_dd07t.

  SELECT * INTO TABLE gt_dd07t FROM dd07t WHERE domname = 'ZQRSTATUS' AND ddlanguage = sy-langu.
  LOOP AT gt_dd07t INTO gw_dd07t.
    ls_value_set-key = gw_dd07t-domvalue_l.
    ls_value_set-value = gw_dd07t-ddtext.
    APPEND ls_value_set TO lt_value_set.
  ENDLOOP.


  lr_node_info = wd_context->get_node_info( ).
  lr_node_info = lr_node_info->get_child_node( `SO_SEARCH` ).
  lr_node_info->set_attribute_value_set(
          name = `ZZCON_TYPE`
          value_set = lt_value_set ).

ENDMETHOD.

 

2.调用配置:

WD_COMP_CONTROLLER->SET_CONFIG( 'ZSRV_MX2_ZSV1_NEW' ).
method SET_CONFIG .
  DATA lo_api_controller TYPE REF TO if_wd_controller.
  DATA lo_pers_manager   TYPE REF TO if_wd_personalization.
  DATA: ls_config TYPE wdy_config_key.

  MOVE iv_config_id TO ls_config-config_id.
  ls_config-config_type  = '00'.
* get personalization manager
  lo_api_controller = wd_this->wd_get_api( ).
  lo_pers_manager = lo_api_controller->get_personalization_manager( ).
  CALL METHOD lo_pers_manager->load_config_by_key
    EXPORTING
      config_key = ls_config.
endmethod.

IV_CONFIG_ID import type any

^_^很多人都把资料锁进了note里,以后还怎么百度呢^_^
posted on 2018-12-17 14:36  ^ω^SAP傻X^o^  阅读(187)  评论(0)    收藏  举报
刷新页面返回顶部
博客园  ©  2004-2025
浙公网安备 33010602011771号 浙ICP备2021040463号-3