博客
关于我
强烈建议你试试无所不能的chatGPT,快点击我
webdynpro的select_option示例
阅读量:6227 次
发布时间:2019-06-21

本文共 2345 字,大约阅读时间需要 7 分钟。

需求,输入航线代码和航线编号区间,查询记录存在表中显示,并不是alv显示

1、使用组件WDR_SELECT_OPTIONS.

2.在组件控制器中加入以下组件

3、在视图属性中也添加该组件

4、创建节点

5、控件设计

6、窗口下的视图中嵌套这个视图

7、设计视图初始化方法WDDOINIT

method WDDOINIT .DATA lo_cmp_usage TYPE REF TO if_wd_component_usage.  lo_cmp_usage = wd_this->wd_cpuse_select_options( ).  IF lo_cmp_usage->has_active_component( ) IS INITIAL.    lo_cmp_usage->create_component( ).  ELSE.    EXIT.  ENDIF.*---选择屏幕的引用  DATA lo_interfacecontroller TYPE REF TO iwci_wdr_select_options .  lo_interfacecontroller =   wd_this->wd_cpifc_select_options( ).  "修改SELECT_OPTIONS  wd_this->m_handler = lo_interfacecontroller->init_selection_screen(   ).*---设置全局信息  CALL METHOD wd_this->m_handler->set_global_options    EXPORTING      i_display_btn_cancel  = abap_false      i_display_btn_check   = abap_false      i_display_btn_reset   = abap_false      i_display_btn_execute = abap_false.  DATA: lr_field TYPE REF TO data.  DEFINE mcr_sel.    free lr_field.    lr_field = wd_this->m_handler->create_range_table( &1 ).    wd_this->m_handler->add_selection_field(      i_id = &1                                "字段参考类型      i_description = &2                       "描述      it_result = lr_field      i_read_only = &3 ).  END-OF-DEFINITION.  mcr_sel 'S_CARR_ID' '航线代码' abap_false.  mcr_sel 'S_CONN_ID' '航班编号' abap_false.endmethod.

8、设计按钮SEARCH事件方法

method ONACTIONSEARCH .*获取SELECT OPTIONS  FIELD-SYMBOLS: 
TYPE ANY TABLE,
TYPE ANY TABLE. DATA lv_CARRID TYPE S_CARR_ID . "屏幕上输入的 DATA lv_CONNID TYPE S_CONN_ID . "屏幕上输入的 DATA:lo_data TYPE REF TO data. FREE lo_data. lo_data = wd_this->m_handler->get_range_table_of_sel_field( 'S_CARR_ID' ). ASSIGN lo_data->* TO
. FREE lo_data. lo_data = wd_this->m_handler->get_range_table_of_sel_field( 'S_CONN_ID' ). ASSIGN lo_data->* TO
.*数据绑定 DATA lo_nd_sflight TYPE REF TO if_wd_context_node. DATA lo_el_sflight TYPE REF TO if_wd_context_element. DATA lt_sflight TYPE wd_this->Elements_sflight. lo_nd_sflight = wd_context->get_child_node( name = wd_this->wdctx_sflight ). SELECT * INTO TABLE lt_sflight from sflight WHERE CARRID in
AND CONNID in
. lo_nd_sflight->BIND_TABLE( NEW_ITEMS = lt_sflight ).endmethod.

9、效果展示

 

 

转载于:https://www.cnblogs.com/caizjian/p/3769937.html

你可能感兴趣的文章
【leetcode】Permutations
查看>>
全世界最详细的一步一步搭建RAC步骤(二)---配置ASM+裸设备【weber出品】
查看>>
LeetCode算法题-Longest Uncommon Subsequence I(Java实现)
查看>>
译文:《Grouped》各章小结
查看>>
数据库设计心得
查看>>
【洛谷 P4342】[IOI1998]Polygon(DP)
查看>>
流程管理软件(BPM)功能简介
查看>>
0408 汉堡包
查看>>
记一次服务器被勒索!
查看>>
docker jenkins安装(一)
查看>>
linux安装软件的几种方法
查看>>
HTML5系列:HTML5表单
查看>>
团队编程项目作业2-爬虫豆瓣top250项目代码设计规范
查看>>
Oracle觸發器調用procedure寄信
查看>>
练习-为网页添加icon图标;为网页添加关键字/作者;超链接;input的type属性有哪些常用属性值-form表单...
查看>>
实验一
查看>>
单页数据多iOS预加载的方法
查看>>
acm计划(更新于2014.11.9)
查看>>
hdu3364 高斯消元1(开关控制灯,异或解的个数)
查看>>
Python网络编程1:套接字
查看>>