SAP SRM Display RFx Response Navigation Service

Posted: 2015-03-13/Under: SRM/By: thinkmaniac

SRM Display RFx Response Navigation Service

개발 프로그램에서 Standard Detail 화면을 링크 걸어야 할 때 아래와 같이 소스를 추가한다.

단, Portal 에서만 작동한다.

Portal 이 아닌 경우 URL (External Window) 방식을 사용하여야 한다.

operation 은 Portal 컨텐트관리 > 포탈컨텐트 에서 확인한다.

오류시 필요에 따라 Role(Employee Self-Service)에 해당 iView 를 추가하여야 한다.

COMPONENTCONTROLLER

Attribute

MO_NAVI_SERV RefTo /SAPSRM/IF_CH_WD_NAVI_SERV

Method

WDDOINIT

DATA: l_cmp_api TYPE REF TO if_wd_component.

l_cmp_api = wd_this->wd_get_api( ).

CREATE OBJECT wd_this->mo_navi_serv TYPE (‘/SAPSRM/CL_CH_WD_NAVI_SERV’)
EXPORTING
io_api_componentcontroller = l_cmp_api.

VIEW

ACTION

DATA : ls_data TYPE wd_this->element_partner.
context_element->get_static_attributes( IMPORTING static_attributes = ls_data ).

  DATA: lo_navigate_service   TYPE REF TO  /sapsrm/if_ch_wd_navi_serv,
        ls_obn_components     TYPE /sapsrm/s_wd_ui_obn,
        lx_pdo_error          TYPE REF TO /sapsrm/cx_pdo_error,
        lv_operation          TYPE string,
        bus_parameter_table   TYPE wdy_key_value_table,
        bus_parameter_struc   TYPE wdy_key_value,
        lv_bo_type            TYPE crmt_subobject_category_db,
        lv_guid               TYPE bbp_guid .

  lv_bo_type = /sapsrm/if_pdo_obj_types_c=>gc_pdo_quotation.
  bus_parameter_struc–key = ‘sapsrm_botype’.                “#EC NOTEXT
  bus_parameter_struc–value = lv_bo_type.
  INSERT bus_parameter_struc INTO TABLE bus_parameter_table.

  lv_guid = ls_data–quot_guid.
  bus_parameter_struc–key = ‘sapsrm_boid’.                  “#EC NOTEXT
  bus_parameter_struc–value = lv_guid.
  INSERT bus_parameter_struc INTO TABLE bus_parameter_table.

  ls_obn_components–object_type = /sapsrm/if_feeder_constants=>c_obn_qte.
  lv_operation = ‘display_rfx_resp’.
  ls_obn_components–operation   = lv_operation.
  ls_obn_components–business_parameters = bus_parameter_table.
  ls_obn_components–obn_system  = ‘SAP_SRM’.

  TRY.
      CALL METHOD wd_comp_controller->mo_navi_serv->launch_target
        EXPORTING
          iv_target_type    = /sapsrm/if_ch_wd_navi_serv_c=>gc_target_type–obn
          is_obn_components = ls_obn_components.
    CATCH /sapsrm/cx_pdo_error_gen INTO lx_pdo_error.

ENDTRY.