METHOD init_message_area .
 
 * API Window Controller
   DATA: lr_api_window TYPE REF TO if_wd_window_controller.
 * Message area
   DATA: lr_wd_message_area TYPE REF TO if_wd_message_area.
 * Get the API
   lr_api_window ?= wd_this->wd_get_api( ).
 * Get the Message Area
   lr_wd_message_area = lr_api_window->get_message_area( ).
 * Configure the message are
   CALL METHOD lr_wd_message_area->set_display_attributes
     EXPORTING
       i_show_only_current = abap_false "Show message protocol
       i_msg_lines_visible = '-1'
       i_use_toggle_area   = abap_true "Show old design
       i_for_all_instances = abap_false.
 
 ENDMETHOD.