REPORT z17_17 .
*----------------------------------------------------------------------*
* CLASS lcl_handle_events DEFINITION
*----------------------------------------------------------------------*
CLASS lcl_handle_events DEFINITION.
PUBLIC SECTION.
METHODS:
on_double_click FOR EVENT double_click OF cl_salv_events_table
IMPORTING row column.
ENDCLASS. "lcl_handle_events DEFINITION
*----------------------------------------------------------------------*
* CLASS lcl_handle_events IMPLEMENTATION
*----------------------------------------------------------------------*
CLASS lcl_handle_events IMPLEMENTATION.
METHOD on_double_click.
PERFORM show_cell_info USING row column 'is selected.'.
ENDMETHOD. "on_double_click
ENDCLASS. "lcl_handle_events IMPLEMENTATION
DATA gt_itab TYPE TABLE OF sflight.
DATA gr_table TYPE REF TO cl_salv_table.
DATA gr_event TYPE REF TO lcl_handle_events.
START-OF-SELECTION.
SELECT * FROM sflight INTO CORRESPONDING FIELDS OF TABLE gt_itab
UP TO 25 ROWS.
cl_salv_table=>factory(
IMPORTING
r_salv_table = gr_table
CHANGING
t_table = gt_itab ).
DATA lr_event TYPE REF TO cl_salv_events_table.
lr_event = gr_table->get_event( ).
CREATE OBJECT gr_event.
SET HANDLER gr_event->on_double_click FOR lr_event.
gr_table->display( ).
*&---------------------------------------------------------------------*
*& Form SHOW_CELL_INFO
*&---------------------------------------------------------------------*
FORM show_cell_info USING p_row TYPE i
p_column TYPE lvc_fname
p_text TYPE string.
DATA: l_row TYPE char10.
WRITE p_row TO l_row LEFT-JUSTIFIED.
CONCATENATE l_row 'Line' p_column 'Column' p_text
INTO p_text SEPARATED BY space.
MESSAGE i000(0k) WITH p_text.
댓글 0
번호 | 제목 | 글쓴이 | 날짜 | 조회 수 |
---|---|---|---|---|
651 | REPORT z17_21 . | sapjoy | 2012.08.02 | 2519 |
650 | REPORT z17_20 | sapjoy | 2012.08.02 | 2920 |
649 | REPORT z17_19 | sapjoy | 2012.08.02 | 2458 |
648 | REPORT z17_18 . | sapjoy | 2012.08.02 | 2360 |
» | REPORT z17_17 . | sapjoy | 2012.08.02 | 2218 |
646 | REPORT z17_16 . | sapjoy | 2012.08.02 | 2200 |
645 | REPORT z17_15 . | sapjoy | 2012.08.02 | 2491 |
644 | REPORT z17_14 . | sapjoy | 2012.08.02 | 1724 |
643 | REPORT z17_13 . | sapjoy | 2012.08.02 | 1443 |
642 | REPORT z17_12 . | sapjoy | 2012.08.02 | 973 |
641 | REPORT z17_11 . | sapjoy | 2012.08.02 | 946 |
640 | REPORT z17_10 . | sapjoy | 2012.08.02 | 993 |
639 | REPORT z17_09 . | sapjoy | 2012.08.02 | 970 |
638 | REPORT z17_08 . | sapjoy | 2012.08.02 | 1005 |
637 | REPORT z17_07 . | sapjoy | 2012.08.02 | 1099 |
636 | REPORT z17_06 . | sapjoy | 2012.08.02 | 876 |
635 | REPORT z17_05 . | sapjoy | 2012.08.02 | 1097 |
634 | REPORT z17_04 . | sapjoy | 2012.08.02 | 1039 |
633 | REPORT z17_03. | sapjoy | 2012.08.02 | 925 |
632 | REPORT z17_02 . | sapjoy | 2012.08.02 | 912 |