CL_SALV_TABLE: Clipboard deaktivieren?

Code: Alles auswählen.

REPORT  zztest_noclip.

TYPES: BEGIN OF t_test
     , matnr TYPE mara-matnr
     , maktx TYPE makt-maktx
     , END OF t_test
     , tt_test TYPE STANDARD TABLE OF t_test
     .

DATA: gt_test TYPE tt_test
    , gc_alv TYPE REF TO cl_salv_table
    .

PERFORM fill_data.
PERFORM view_data.

FORM fill_data.
  DATA: ls_test TYPE t_test
      .
  DO 10 TIMES.
    ls_test-matnr = |A-{ sy-index }|.
    ls_test-maktx = |B-{ sy-index }|.
    APPEND ls_test TO gt_test.
  ENDDO.
ENDFORM.

FORM view_data.

  DATA: lc_functions  TYPE REF TO cl_salv_functions_list
    , lc_layout     TYPE REF TO cl_salv_layout
    , lc_cols       TYPE REF TO cl_salv_columns_table
    , lc_coltable   TYPE REF TO cl_salv_column_table
    , lc_event      TYPE REF TO cl_salv_events_table
    , ls_key        TYPE salv_s_layout_key
    , lc_exc        TYPE REF TO cx_salv_error
    , lc_sel        TYPE REF TO cl_salv_selections
    .

  TRY.

      cl_salv_table=>factory(
        IMPORTING r_salv_table = gc_alv
        CHANGING t_table = gt_test ).

      lc_cols = gc_alv->get_columns( ).
      lc_cols->set_optimize( abap_true ).

      lc_functions = gc_alv->get_functions( ).
      lc_functions->set_default( ).
      lc_functions->set_print( abap_false ).

      lc_sel = gc_alv->get_selections( ).
      lc_sel->set_selection_mode( if_salv_c_selection_mode=>none ). " Bringt nichts

      lc_layout = gc_alv->get_layout( ).
      ls_key-report = sy-repid.
      lc_layout->set_key( ls_key ).
      lc_layout->set_save_restriction( if_salv_c_layout=>restrict_user_dependant ).
      lc_layout->set_default( 'X' ).

      gc_alv->display( ).

    CATCH cx_salv_msg cx_salv_not_found cx_salv_data_error INTO lc_exc.
      MESSAGE lc_exc TYPE 'I'
          DISPLAY LIKE 'E'.

  ENDTRY.

ENDFORM.