CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
EXPORTING
* I_INTERFACE_CHECK = ' '
* I_BYPASSING_BUFFER = ' '
* I_BUFFER_ACTIVE = ' '
* I_CALLBACK_PROGRAM = ' '
* I_CALLBACK_PF_STATUS_SET = ' '
* I_CALLBACK_USER_COMMAND = ' '
* I_CALLBACK_TOP_OF_PAGE = ' '
* I_CALLBACK_HTML_TOP_OF_PAGE = ' '
* I_CALLBACK_HTML_END_OF_LIST = ' '
* I_STRUCTURE_NAME =
* I_BACKGROUND_ID = ' '
* I_GRID_TITLE =
* I_GRID_SETTINGS =
* IS_LAYOUT =
* IT_FIELDCAT =
* IT_EXCLUDING =
* IT_SPECIAL_GROUPS =
* IT_SORT =
* IT_FILTER =
* IS_SEL_HIDE =
* I_DEFAULT = 'X'
* I_SAVE = ' '
* IS_VARIANT =
* IT_EVENTS =
* IT_EVENT_EXIT =
* IS_PRINT =
* IS_REPREP_ID =
* I_SCREEN_START_COLUMN = 0
* I_SCREEN_START_LINE = 0
* I_SCREEN_END_COLUMN = 0
* I_SCREEN_END_LINE = 0
* I_HTML_HEIGHT_TOP = 0
* I_HTML_HEIGHT_END = 0
* IT_ALV_GRAPHICS =
* IT_HYPERLINK =
* IT_ADD_FIELDCAT =
* IT_EXCEPT_QINFO =
* IR_SALV_FULLSCREEN_ADAPTER =
IMPORTING
E_EXIT_CAUSED_BY_CALLER =
* ES_EXIT_CAUSED_BY_USER =
TABLES
t_outtab =
* EXCEPTIONS
* PROGRAM_ERROR = 1
* OTHERS = 2
.
IF sy-subrc <> 0.
* Implement suitable error handling here
ENDIF.
TYPES: BEGIN OF fm_sign,
funcname TYPE tfdir-funcname,
parameter TYPE fupararef-parameter,
paramtype TYPE fupararef-paramtype,
structure TYPE fupararef-structure,
optional TYPE fupararef-optional,
END OF fm_sign.
CONSTANTS: c_prefix TYPE c LENGTH 4 VALUE 'SAPL'.
DATA: lt_signature TYPE STANDARD TABLE OF fm_sign,
fng_name TYPE char40,
msg TYPE REF TO cx_salv_msg,
alv TYPE REF TO cl_salv_table,
layout_settings TYPE REF TO cl_salv_layout,
layout_key TYPE salv_s_layout_key,
columns TYPE REF TO cl_salv_columns_table,
functions TYPE REF TO cl_salv_functions_list.
INCLUDE zfmsignature_top.
START-OF-SELECTION.
PARAMETERS FnGrp TYPE char30.
END-OF-SELECTION.
CONCATENATE c_prefix FnGrp INTO fng_name.
SELECT tfdir~funcname fupararef~parameter fupararef~paramtype fupararef~structure fupararef~optional
INTO CORRESPONDING FIELDS OF TABLE lt_signature
FROM fupararef AS fupararef INNER JOIN tfdir AS tfdir ON fupararef~funcname EQ tfdir~funcname
WHERE tfdir~pname EQ fng_name AND tfdir~funcname NOT LIKE 'TABLE%'.
TRY.
cl_salv_table=>factory(
IMPORTING
r_salv_table = alv
CHANGING
t_table = lt_signature ).
layout_settings = alv->get_layout( ).
layout_key-report = sy-repid.
layout_settings->set_key( layout_key ).
layout_settings->set_save_restriction( if_salv_c_layout=>restrict_none ).
columns = alv->get_columns( ).
columns->set_optimize( ).
functions = alv->get_functions( ).
functions->set_all( ).
CATCH cx_salv_msg INTO msg.
ENDTRY.
alv->display( ).
You must be a registered user to add a comment. If you've already registered, sign in. Otherwise, register and sign in.
User | Count |
---|---|
4 | |
3 | |
3 | |
2 | |
2 | |
2 | |
2 | |
1 | |
1 |