" 消息处理
CALL METHOD zmcl_common=>report_messages
EXPORTING
it_messages = lt_message
io_api_controller = wd_this->wd_get_api( ).
下面的函数
输入:
IT_MESSAGES TYPE BBPT_PDS_MESSAGES 采购凭证方法的错误消息
IO_API_CONTROLLER TYPE REF TO IF_WD_CONTROLLER Web Dynpro: Controller Interface
METHOD report_messages.
DATA : ls_messages TYPE bbp_pds_messages,
lo_msg_manager TYPE REF TO if_wd_message_manager,
lv_index TYPE i.
CHECK io_api_controller IS BOUND.
CALL METHOD io_api_controller->get_message_manager
RECEIVING
message_manager = lo_msg_manager.
CHECK lo_msg_manager IS BOUND.
CLEAR lv_index.
LOOP AT it_messages INTO ls_messages.
ADD 1 TO lv_index.
CALL METHOD lo_msg_manager->report_t100_message
EXPORTING
msgid = ls_messages-msgid
msgno = ls_messages-msgno
msgty = ls_messages-msgty
p1 = ls_messages-msgv1
p2 = ls_messages-msgv2
p3 = ls_messages-msgv3
p4 = ls_messages-msgv4
msg_index = lv_index.
ENDLOOP.
ENDMETHOD.
单条消息处理:
输入:
IV_TEXT Importing CSEQUENCE
METHOD show_error_message .
"提示失败消息
* get message manager
DATA lo_api_controller TYPE REF TO if_wd_controller.
DATA lo_message_manager TYPE REF TO if_wd_message_manager.
lo_api_controller ?= wd_this->wd_get_api( ).
CALL METHOD lo_api_controller->get_message_manager
RECEIVING
message_manager = lo_message_manager.
* report message
CALL METHOD lo_message_manager->report_error_message
EXPORTING
message_text = iv_text
* params =
* msg_user_data =
* is_permanent = ABAP_FALSE
* scope_permanent_msg = CO_MSG_SCOPE_CONTROLLER
* view =
* show_as_popup =
* controller_permanent_msg =
* msg_index =
* cancel_navigation =
* enable_message_navigation =
* receiving
* message_id =
.
ENDMETHOD.
输入:
IV_TEXT Importing CSEQUENCE
METHOD show_success_message .
"提示成功消息
* get message manager
DATA lo_api_controller TYPE REF TO if_wd_controller.
DATA lo_message_manager TYPE REF TO if_wd_message_manager.
lo_api_controller ?= wd_this->wd_get_api( ).
CALL METHOD lo_api_controller->get_message_manager
RECEIVING
message_manager = lo_message_manager.
* report message
CALL METHOD lo_message_manager->report_success
EXPORTING
message_text = iv_text
* params =
* msg_user_data =
* is_permanent = ABAP_FALSE
* scope_permanent_msg = CO_MSG_SCOPE_CONTROLLER
* view =
* show_as_popup =
* controller_permanent_msg =
* msg_index =
* cancel_navigation =
* enable_message_navigation =
* receiving
* message_id =
.
ENDMETHOD.