WDA-5-VIEW视图切换
Posted ricoo
tags:
篇首语:本文由小常识网(cha138.com)小编为大家整理,主要介绍了WDA-5-VIEW视图切换相关的知识,希望对你有一定的参考价值。
这一部分介绍同一窗口下不同视图之间的链接跳转。
前提:完成上一步骤MAIN视图ALV显示。
1.效果展示
点击ALV物料下划线链接,页面跳转到物料明细页面。
2.实现过程
基于上一步骤在MAIN页面显示ALV物料信息,通过ALV物料下划链接跳转到物料明细页面。
物料明细页面主要有两部分:基本信息、工厂物料明细。
这两部分信息需要增加两个节点(ZSMM_DETAIL-基本信息 ZSMM_ITEM-工厂物料明细)、一个ALV组件(工厂物料明细)。
2.1Context增加节点
2.1.1进入Componentcontroller组件控制页,增加节点ZSMM_DETAIL(基本信息),记录数据有且只有一条,则Cardinality=1..1 Selection=0..1
增加节点ZSMM_ITEM(工厂物料明细),记录数据可能有多条,则Cardinality = 0..n selection = 0..1
2.1.2进入视图VIEW-MAIN同上新增节点
2.2增加ALV组件
进入Componentcontroller增加ALV组件ALV_DETAIL,如下图所示:
窗口WINDOWS增加ALV组件
2.3新增视图MATERIAL_DETAIL
属性页增加组件ALV_DETAIL,显示工厂物料明细。
布局页面如下:基本信息数据绑定的是节点ZSMM_DETAIL
Context节点设置(同2.1部分的操作)
Attributes属性页
Actions动作事件页
Methods方法页
2.4VIEW视图之间跳转
设置VIEW视图MAIN、MATERIAL_DETAIL之间的跳转:MAIN视图通过ALV下划链接跳转到MATERIAL_DETAIL视图,MATERIAL_DETAIL视图返回按钮触发后返回到MAIN视图
2.4.1设置MAIN视图:Inbound Plugs/Outbound Plugs
FROM_DETAIL来自MATERIAL_DETAIL视图的事件
TO_DETAIL输出参数到MATERIAL_DETAIL视图,当前参数为空。
2.4.2设置MATERIAL_DETAIL视图:Inbound Plugs/Outbound Plugs
2.5窗口WINDOWS嵌套视图
在一个窗口中实现视图之间的跳转。
2.6代码部分
2.6.1视图MAIN方法METHODS:ON_LINK
视图MAIN中ALV行项目物料MATNR下划线链接触发事件ON_LINK
代码部分:
method on_link . "定义 data: lo_nd_detail type ref to if_wd_context_node, "节点 lo_el_detail type ref to if_wd_context_element, "元素 ls_detail type wd_this->element_zsmm_detail. "结构 **Main获取ALV选择行记录 data: lo_nd_alv type ref to if_wd_context_node, "节点 lt_alv type wd_this->elements_zsmm_material, "表体 ls_alv type wd_this->element_zsmm_material. "结构 "获取节点 lo_nd_alv = wd_context->get_child_node( name = wd_this->wdctx_zsmm_material ). "获取内表 lo_nd_alv->get_static_attributes_table( importing table = lt_alv ). "获取行记录 if lt_alv[] is not initial. read table lt_alv index r_param->index into ls_alv. endif. **Material_detail基本信息 "获取节点 context-zsmm_material lo_nd_detail = wd_context->get_child_node( name = wd_this->wdctx_zsmm_detail ). "获取结构记录 ls_detail = ls_alv. "获取节点元素清单 lo_el_detail = lo_nd_detail->get_element( ). "节点元素中的属性赋值 lo_el_detail->set_static_attributes( static_attributes = ls_detail ). **Material_detail物料明细 data: lo_nd_item type ref to if_wd_context_node, "节点 lo_el_item type ref to if_wd_context_element, "元素 lt_item type wd_this->elements_zsmm_item, "表体 ls_item type wd_this->element_zsmm_item. "结构 "获取节点zsmm_item lo_nd_item = wd_context->get_child_node( name = wd_this->wdctx_zsmm_item ). select * into corresponding fields of table lt_item from marc where matnr = ls_alv-matnr. "Data binding 节点ZSMM_ITEM绑定数据IT_ITEM lo_nd_item->bind_table( new_items = lt_item "数据表 set_initial_elements = abap_true "abap_true原始记录清空并新增记录 ). "跳转到MATERIAL_DETAIL物料明细视图 wd_this->fire_to_detail_plg( ). endmethod.
备注:fire_to_detail_plg( )是在MAIN视图中设置Outbound Plugs-to_detail生成的跳转方法。
2.6.2视图MATERIAL_DETAIL方法:ONACTIONBT_BACK
视图MATERIAL_DETAIL中按钮ONACTIONBT_BACK触发事件,返回MAIN视图
代码部分:
method ONACTIONBT_BACK . "返回MAIN视图 wd_this->fire_to_main_plg( ). endmethod.
备注:fire_to_main_plg( )是在MATERIAL_DETAIL视图中Outbound Plugs-TO_MAIN生成的跳转方法。
2.6.3初始化ALV组件:ALV_ITEM
在视图MATERIAL_DETAIL中增加了ALV组件,显示工厂物料明细。需对ALV进行初始化。
进入Componentcontroller界面METHODS方法:INIT_ALV_DETAIL
代码部分:
method INIT_ALV_DETAIL . data: lo_nd_item type ref to if_wd_context_node, lo_cmp_alv type ref to if_wd_component_usage, lo_cmpif_alv type ref to iwci_salv_wd_table, lo_config type ref to cl_salv_wd_config_table. * alv component usage lo_cmp_alv = wd_this->wd_cpuse_alv_detail( ). "Properties->component use if lo_cmp_alv->has_active_component( ) is initial. lo_cmp_alv->create_component( ). endif. * set data node lo_nd_item = wd_context->get_child_node( name = wd_this->wdctx_zsmm_item ). "context-node lo_cmpif_alv = wd_this->wd_cpifc_alv_detail( ). "Properties->component use lo_cmpif_alv->set_data( lo_nd_item ). * configure alv lo_config = lo_cmpif_alv->get_model( ). * table settings lo_config->if_salv_wd_table_settings~set_fixed_table_layout( value = abap_true ). lo_config->if_salv_wd_table_settings~set_visible_row_count( 5 ). lo_config->if_salv_wd_table_settings~set_width( ‘100%‘ ). lo_config->if_salv_wd_table_settings~set_footer_visible( if_salv_wd_c_table_settings=>footer_visible_on_demand ). lo_config->if_salv_wd_table_settings~set_scrollable_col_count( 3 ). lo_config->if_salv_wd_table_settings~set_read_only( abap_false ). lo_config->if_salv_wd_table_settings~set_data_check( if_salv_wd_c_table_settings=>data_check_on_cell_event ). lo_config->if_salv_wd_std_functions~set_view_list_allowed( abap_false ). lo_config->if_salv_wd_std_functions~set_pdf_allowed( abap_false ). lo_config->if_salv_wd_std_functions~set_edit_check_available( abap_false ). lo_config->if_salv_wd_std_functions~set_edit_insert_row_allowed( abap_false ). lo_config->if_salv_wd_std_functions~set_edit_append_row_allowed( abap_false ). lo_config->if_salv_wd_std_functions~set_edit_delete_row_allowed( abap_false ). * table toolbar * data: * lo_fun_add type ref to cl_salv_wd_function, * lo_btn_add type ref to cl_salv_wd_fe_button, * lo_fun_chg type ref to cl_salv_wd_function, * lo_btn_chg type ref to cl_salv_wd_fe_button, * lo_fun_del type ref to cl_salv_wd_function, * lo_btn_del type ref to cl_salv_wd_fe_button, * lo_fun_save type ref to cl_salv_wd_function, * lo_btn_save type ref to cl_salv_wd_fe_button. * * lo_fun_add = lo_config->if_salv_wd_function_settings~create_function( ‘BT_ADD‘ ). * create object lo_btn_add. * lo_btn_add->set_text( wd_assist->get_text( key = ‘B01‘ ) ). * lo_btn_add->set_image_source( value = ‘~Icon/AddRow‘ ). * lo_fun_add->set_editor( lo_btn_add ). * * lo_fun_chg = lo_config->if_salv_wd_function_settings~create_function( ‘BT_CHG‘ ). * create object lo_btn_chg. * lo_btn_chg->set_text( wd_assist->get_text( key = ‘B02‘ ) ). * lo_btn_chg->set_image_source( value = ‘~Icon/EditChangedItem‘ ). * lo_fun_chg->set_editor( lo_btn_chg ). * * lo_fun_del = lo_config->if_salv_wd_function_settings~create_function( ‘BT_DEL‘ ). * create object lo_btn_del. * lo_btn_del->set_text( wd_assist->get_text( key = ‘B03‘ ) ). * lo_btn_del->set_image_source( value = ‘~Icon/DeletedItem‘ ). * lo_fun_del->set_editor( lo_btn_del ). * * lo_fun_save = lo_config->if_salv_wd_function_settings~create_function( ‘BT_SAVE‘ ). * create object lo_btn_save. * lo_btn_save->set_text( wd_assist->get_text( key = ‘B04‘ ) ). * lo_btn_save->set_image_source( value = ‘~Icon/Save‘ ). * lo_fun_save->set_editor( lo_btn_save ). * table columns and column header data: lt_columns type salv_wd_t_column_ref, ls_column type salv_wd_s_column_ref, lo_column type ref to cl_salv_wd_column, lo_header type ref to cl_salv_wd_column_header, lo_dropdown_by_key type ref to cl_salv_wd_uie_dropdown_by_key, lo_input_field type ref to cl_salv_wd_uie_input_field, lo_text_view type ref to cl_salv_wd_uie_text_view, lo_checkbox type ref to cl_salv_wd_uie_checkbox, lr_link type ref to cl_salv_wd_uie_link_to_action, lv_field_name type string, lv_length type i. lt_columns = lo_config->if_salv_wd_column_settings~get_columns( ). loop at lt_columns into ls_column. lo_column = ls_column-r_column. lo_header = lo_column->get_header( ). lo_header->set_ddic_binding_field( if_salv_wd_c_column_settings=>ddic_bind_none ). case ls_column-id. when ‘MATNR‘. "lo_column->set_width( value = ‘18‘ ). lo_header->set_text( value = wd_assist->get_text( key = ‘A01‘ ) ). create object lo_input_field exporting value_fieldname = ls_column-id. lo_input_field->set_read_only_fieldname( value = ‘FG_READ‘ ). lo_column->set_cell_editor( lo_input_field ). when ‘WERKS‘. "lo_column->set_width( value = ‘4‘ ). lo_header->set_text( value = wd_assist->get_text( key = ‘A10‘ ) ). create object lo_input_field exporting value_fieldname = ls_column-id. lo_input_field->set_read_only_fieldname( value = ‘FG_READ‘ ). lo_column->set_cell_editor( lo_input_field ). when ‘EKGRP‘. "lo_column->set_width( value = ‘3‘ ). lo_header->set_text( value = wd_assist->get_text( key = ‘A11‘ ) ). create object lo_input_field exporting value_fieldname = ls_column-id. lo_input_field->set_read_only_fieldname( value = ‘FG_READ‘ ). lo_column->set_cell_editor( lo_input_field ). when others. lo_column->set_visible( value = cl_wd_uielement=>e_visible-blank ). endcase. endloop. endmethod.
上述操作基本完成。
2.7测试
3.关注点
ALV组件:组件尽量不要重复使用,多视图容易冲突。
Context节点:节点元素属性根据用途区分不同的业务场景。
关系:
Windows->view->container->select_options/Table->Component use
Windows->view->Inbound/Outbound Plugs
语法关注:
lo_nd_detail type ref to if_wd_context_node, "节点 lo_el_detail type ref to if_wd_context_element, "元素 lt_detail type wd_this->element_zsmm_detail. "内表 ls_detail type wd_this->element_zsmm_detail. "结构 "获取节点ZSMM_DETAIL lo_nd_detail = wd_context->get_child_node( name = wd_this->wdctx_zsmm_detail ). "获取节点内表数据 lo_nd_alv->get_static_attributes_table( importing table = lt_detail ). "获取行记录 read table lt_detail index r_param->index into ls_detail "获取节点元素 lo_el_detail = lo_nd_detail->get_element( ). "节点元素属性赋值 lo_el_detail->set_static_attributes( static_attributes = ls_detail ). "节点数据绑定 lo_nd_detail->bind_table( new_items = lt_detail set_initial_elements = abap_true ).
!-- SPAN>
以上是关于WDA-5-VIEW视图切换的主要内容,如果未能解决你的问题,请参考以下文章