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
번호 | 제목 | 글쓴이 | 날짜 | 조회 수 |
---|---|---|---|---|
649 | <b>ABAP SOURCE는 교재에 사용된 소스들입니다.</b> [1] | sapjoy | 2006.12.02 | 3618 |
648 | REPORT z19_01. | sapjoy | 2012.08.01 | 3529 |
647 | z_exception_test | sapjoy | 2010.10.10 | 3520 |
646 | report zsalv_036 . | sapjoy | 2010.08.20 | 3472 |
645 | REPORT z18_04 . | sapjoy | 2012.08.01 | 3350 |
644 | REPORT ZSMARTFORMS_03. | sapjoy | 2008.11.28 | 3345 |
643 | REPORT z18_05 | sapjoy | 2012.08.01 | 3333 |
642 | Sub DOI_EXCEL_MACRO() | sapjoy | 2008.12.26 | 3312 |
641 | REPORT z18_003 | sapjoy | 2007.03.05 | 3281 |
640 | subroutine pool | sapjoy | 2013.11.15 | 3276 |
639 | REPORT z19_004 | sapjoy | 2007.03.27 | 3230 |
638 | REPORT Z_WHEREUSEDLIST [4] | sapjoy | 2011.03.28 | 3215 |
637 | REPORT ZALVCOLOR | sapjoy | 2010.10.09 | 3212 |
636 | zsalv_edit [1] | sapjoy | 2010.08.20 | 3207 |
635 | REPORT ZSAPTIP_002. | sapjoy | 2009.02.20 | 3206 |
634 | REPORT Z06_001 MESSAGE-ID ZTEST . [1] | sapjoy | 2006.12.05 | 3205 |
633 | REPORT z18_06. | sapjoy | 2012.08.01 | 3153 |
632 | REPORT zsapdoi_001. [2] | sapjoy | 2008.12.20 | 3135 |
631 | report zsalv_042 . | sapjoy | 2010.08.20 | 3132 |
630 | REPORT z18_01. | sapjoy | 2012.08.01 | 3112 |