SAP 04-CONTAINER 使用DOCKING停靠容器示例＜转载＞ cl_gui_docking_container

原文链接：https://blog.csdn.net/qq_30797051/article/details/123816228
1. 代码
停靠容器不需要创建任何CONTAINER；可用于简单的数据实时查询

DATA: lo_dock TYPE REF TO cl_gui_docking_container.
DATA: lo_grid TYPE REF TO cl_gui_alv_grid.

PARAMETERS p_carrid TYPE spfli-carrid DEFAULT 'AA'.

AT SELECTION-SCREEN OUTPUT.
  SELECT *
    FROM spfli
    WHERE carrid = @p_carrid
    INTO TABLE @DATA(lt_spfli)
    UP TO 30 ROWS.

    CREATE OBJECT lo_dock
      EXPORTING
        side      = cl_gui_docking_container=>dock_at_right       "DOCKING停靠位置
        extension = 900                                           "DOCKING宽度
        repid     = sy-repid
        dynnr     = sy-dynnr.

  IF lo_grid IS INITIAL.
    CREATE OBJECT lo_grid
      EXPORTING
        i_parent          = lo_dock      "获取lo_dock到lo_grid
      EXCEPTIONS
        error_cntl_create = 1
        error_cntl_init   = 2
        error_cntl_link   = 3
        error_dp_create   = 4.
  ENDIF.

  CALL METHOD lo_grid->set_table_for_first_display
    EXPORTING
      i_structure_name              = 'SPFLI'
    CHANGING
      it_outtab                     = lt_spfli
    EXCEPTIONS
      invalid_parameter_combination = 1
      program_error                 = 2
      too_many_lines                = 3
      OTHERS                        = 4.

2. 显示效果