POPUP ALV
Patlayan pencerede ALV GRID gösterimi
CALL FUNCTION `ZPP_POPUP_ALV`
EXPORTING
I_TITLE = LV_BASLIK
TABLES
it_alv = gt_musteri_sips
.
FUNCTION ZPP_POPUP_ALV.
*"----------------------------------------------------------------------
*"*"Local Interface:
*" IMPORTING
*" REFERENCE(I_START_COLUMN) TYPE I DEFAULT 25
*" REFERENCE(I_START_LINE) TYPE I DEFAULT 6
*" REFERENCE(I_END_COLUMN) TYPE I DEFAULT 100
*" REFERENCE(I_END_LINE) TYPE I DEFAULT 10
*" REFERENCE(I_TITLE) TYPE STRING DEFAULT ``
*" REFERENCE(I_POPUP) TYPE C DEFAULT ` `
*" TABLES
*" IT_ALV TYPE STANDARD TABLE
*"----------------------------------------------------------------------
DATA go_alv TYPE REF TO cl_salv_table.
data: gr_display type ref to cl_salv_display_settings.
data: lv_title type LVC_TITLE.
TRY.
cl_salv_table=>factory(
IMPORTING
r_salv_table = go_alv
CHANGING
t_table = it_alv[] ).
CATCH cx_salv_msg.
ENDTRY.
DATA: lr_functions TYPE REF TO cl_salv_functions_list.
DATA: gr_columns TYPE REF TO CL_SALV_COLUMNS_TABLE.
lr_functions = go_alv->get_functions( ).
lr_functions->set_all( `X` ).
lv_title = I_TITLE.
gr_display = go_alv->get_display_settings( ).
gr_display->set_list_header( VALUE = lv_title ).
gr_columns = go_alv->get_columns( ).
gr_columns->set_optimize( `X` ).
IF go_alv IS BOUND.
IF i_popup = `X`.
go_alv->set_screen_popup(
start_column = i_start_column
end_column = i_end_column
start_line = i_start_line
end_line = i_end_line ).
ENDIF.
go_alv->display( ).
ENDIF.
ENDFUNCTION.