Sapforum.Biz

Инструменты => ABAP - Инструментальные средства => Тема начата: polkon от Февраль 27, 2013, 09:53:44 am

Название: кнопка в toolbar
Отправлено: polkon от Февраль 27, 2013, 09:53:44 am

Хочу добавить кнопку в алв, реализованный методом REUSE_ALV_GRID_DISPLAY, подскажите как мне это сделать? мой метод убирает существующие уже в алв кнопки, а они мне нужны тоже. Существует ли другой способ или как реализовать этот?

Код: You are not allowed to view links. Register or Login

REPORT  zvenkat_notepad.
" Fieldcatalog creation manually

DATA: BEGIN OF i_mard OCCURS 0,
        matnr TYPE mard-matnr,
        werks TYPE mard-werks,
      END OF i_mard.
TYPE-POOLS:slis.
DATA:i_fieldcat TYPE slis_t_fieldcat_alv,
     w_fieldcat LIKE LINE OF i_fieldcat.

w_fieldcat-fieldname = 'MATNR'.
w_fieldcat-tabname = 'I_MARD'.
w_fieldcat-seltext_m = 'Material No'.
APPEND w_fieldcat TO i_fieldcat.
CLEAR w_fieldcat.
w_fieldcat-fieldname = 'WERKS'.
w_fieldcat-tabname = 'I_MARD'.
w_fieldcat-seltext_m = 'Plant'.
APPEND w_fieldcat TO i_fieldcat.
CLEAR w_fieldcat.

SELECT matnr werks FROM mard INTO CORRESPONDING FIELDS OF TABLE i_mard UP TO 100 ROWS.
DATA:l_program TYPE sy-repid VALUE sy-repid.
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
  EXPORTING
    i_callback_program = l_program
    it_fieldcat        = i_fieldcat
*     I_CALLBACK_PF_STATUS_SET       = 'MYSTATUS'
  TABLES
    t_outtab           = i_mard.
IF sy-subrc <> 0.
  MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
          WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.

*FORM SET_MYSTATUS USING RT_EXTAB TYPE SLIS_T_EXTAB.
*  SET PF-STATUS 'MYSTATUS'.
*ENDFORM.


Название: Re: кнопка в toolbar
Отправлено: Uukrul от Февраль 27, 2013, 01:35:05 pm

Ну зачем же вы удалили PF-Status сделайте свой статус с кнопками как в стандартном ALV и добавьте свои кнопки к нему и будет вам счастье.

Название: Re: кнопка в toolbar
Отправлено: polkon от Февраль 27, 2013, 05:18:40 pm

Спасибо! Счастье есть)