Refresh Message Area to repopulate the new messages

Question

HI All,
I am populating messages in WDmodify, wDdoinit and other methods of a ZWDcomponent in message area with errors, warnings and success messages.
I used below method
lo_message_manager->report_error_message(
    message_text              = l_msg ).
The main problem.
It is populating duplicate messages how to check do the message exist.
Any method to clear the existing message in the message area (not messages)
I used CLEAR_MESSAGES of IF_WD_MESSAGE_MANAGER . It is clearing all the messages in the instance. I need to clear the existing messages in message area and repopulate new messages into message area.
I tried to use some logic but it is not working when we some methods are called like modify it is becoming complicated logic.
Any suggestions are welcomed.
Thanks
Gopal

Answer 1

Hi,
You can use IS_EMPTY method. If there are messages, then it will be initial. Otherwise, it will have X.
** get message manager
DATA lo_api_controller     TYPE REF TO if_wd_controller.
DATA lo_message_manager    TYPE REF TO if_wd_message_manager.
data lv_bool type abap_bool.
data lt_messages type if_wd_message_manager=>ty_t_messages.
lo_api_controller ?= wd_this->wd_get_api( ).
CALL METHOD lo_api_controller->get_message_manager
  RECEIVING
    message_manager = lo_message_manager
    .DATA lv_message            TYPE string.
DATA lv_message_type       TYPE i.
lv_message_type = if_wd_message_manager=>co_type_standard.
* report message
CALL METHOD lo_message_manager->report_success
  EXPORTING
    message_text              =  'Success'.
* report message
CALL METHOD lo_message_manager->is_empty
  RECEIVING
    empty  = lv_bool
if lv_bool eq 'X'.
endif,
If you comment report_sucess method, you will find the difference.