前面做了查询的UIBB配置,在这边可以直接复用,查询的feeder class也就自动复用了。

1.给查询的feeder class添加接口,继续继承form的接口。

2.挨个实现每个方法,即使是用不到的也点进去激活。

  method IF_FPM_GUIBB_FORM~GET_DATA.
    CS_DATA = gw_table.
  endmethod.
复制代码
  method IF_FPM_GUIBB_FORM~GET_DEFINITION.
    DATA:gt_data TYPE TABLE OF zhsb_order_index.

    eo_field_catalog ?= cl_abap_tabledescr=>describe_by_data( gw_table ).
mo_catalog = eo_field_catalog.

"action 参数是控制UIBB参数映射的EVENT定义。这里可以定义回车事件,下拉事件等 endmethod.
复制代码

3.给search的事件处理方法中添加跳转的事件(给选择单号的事件):

复制代码
  METHOD if_fpm_guibb_search~process_event.
    DATA:lt_where TYPE rsds_where_tab.
    DATA:lt_order TYPE TABLE OF zhsb_order_index,
         ls_order TYPE zhsb_order_index.
    DATA:lc_para TYPE REF TO cl_fpm_parameter.
    DATA:ls_value TYPE string.

    DATA:ls_result TYPE zhsb_order_index.


    IF io_event->mv_event_id = if_fpm_guibb_search=>fpm_execute_search.

      TRY .
          CALL METHOD cl_fpm_guibb_search_conversion=>to_abap_select_where_tab
            EXPORTING
              it_fpm_search_criteria = it_fpm_search_criteria
              iv_table_name          = 'ZHSB_ORDER_INDEX'
              io_field_catalog       = mo_catalog
            IMPORTING
              et_abap_select_table   = lt_where.
        CATCH cx_fpmgb.
      ENDTRY.

      SELECT * FROM zhsb_order_index INTO TABLE lt_order UP TO iv_max_num_results ROWS WHERE (lt_where).
      IF sy-subrc = 0.
        LOOP AT lt_order INTO  ls_order.
          MOVE-CORRESPONDING ls_order TO ls_result.
          APPEND ls_result TO gt_table.
        ENDLOOP.
        ev_result = 'OK'.
      ENDIF.

    ELSEIF io_event->mv_event_id = 'FPM_RESULT_SEL'.
      DATA : lo_event TYPE REF TO       cl_fpm_event,
             lo_fpm   TYPE REF TO       if_fpm.

      READ TABLE gt_table INTO gw_table INDEX 4.
      lo_event ?= cl_fpm_event=>create_by_id( 'FPM_CHANGE_CONTENT_AREA' ).

      lo_event->mo_event_data->set_value(
        EXPORTING
          iv_key   = 'TARGET_CONTENT_AREA'
          iv_value = 'PAGE_2'
      ).
      lo_fpm ?= cl_fpm=>get_instance( ).

      lo_fpm->raise_event( lo_event ).
    ENDIF.
  ENDMETHOD.
复制代码

 

4.打开FPM_WB.新建empty application。

选择包,保存。

5.点击,编辑配置

进入到概览页配置界面:

修改第一页描述,并添加第二页。

6.给page 1分配UIBB配置类型Search.

配置编号选择前一篇中的配置编号,复用。

选择UIBB,点击配置。

修改结果中的单号字段,改为link to action。保存并返回.

这时候可以点击运行,试看一下。

很好,这第一页没问题了,开始加第二页。

7.配置第二页:

添加FORM组件

输入配置号,点击UIBB配置。

点击OK.

填写Feeder class.

 

保存并返回。

8.给PAGE2添加按钮,并指向page 1.

保存,运行。

 

et_action_definition

posted on 2018-12-25 17:29  ricoo  阅读(396)  评论(0编辑  收藏  举报