* Docking Control Container
DATA g_container       TYPE REF TO cl_gui_docking_container.

* References to the main ALV grid control and container:
DATA g_alv_grid        TYPE REF TO cl_gui_alv_grid.

* Main container
  CREATE OBJECT g_container
   EXPORTING
    repid                       = sy-repid
    dynnr                       = '0100'
    extension                   = 2048
   EXCEPTIONS
    cntl_error                  = 1
    cntl_system_error           = 2
    create_error                = 3
    lifetime_error              = 4
    lifetime_dynpro_dynpro_link = 5
    OTHERS                      = 6.

* Check errors
  IF sy-subrc NE 0.
    PERFORM _check_sys_mess.
  ENDIF.

  CHECK sy-subrc EQ 0.


* Link ALV Grid
  CREATE OBJECT g_alv_grid
    EXPORTING
     i_parent = g_container.

* Check errors
  IF sy-subrc NE 0.
    PERFORM _check_sys_mess.
  ENDIF.

*&---------------------------------------------------------------------*
*&      Form  check_sys_mess
*&---------------------------------------------------------------------*
*       text
*----------------------------------------------------------------------*
*  -->  p1        text
*  <--  p2        text
*----------------------------------------------------------------------*
FORM _check_sys_mess .


  IF NOT sy-msgid IS INITIAL  AND
     NOT sy-msgty IS INITIAL.


*   Application log hasn't been created yet.
    IF gt_log_handle IS INITIAL.
      IF sy-msgty CA 'AX'.
        sy-msgty = 'E'.
      ENDIF.


      MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
        WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.


    ELSE.

      MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
         WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4
*        Not to show
         INTO _g_mes_dummy.
*        Add message to Application Log
      PERFORM append_log USING gt_log_handle.
    ENDIF.


    CLEAR:  sy-msgid
          , sy-msgty
          , sy-msgno
          , sy-msgv1
          , sy-msgv2
          , sy-msgv3
          , sy-msgv4
          .

  ENDIF.
ENDFORM.                    " _check_sys_mess