메뉴 건너뛰기

SAP 한국 커뮤니티

report zsalv_032 .

sapjoy 2010.08.20 11:00 조회 수 : 2976

 

report  zsalv_032                                 .

*----------------------------------------------------------------------*
*       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 '더블 클릭하였습니다.'.
  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.
data gr_functions  type ref to cl_salv_functions_list.
data gr_function   type ref to cl_salv_functions.

start-of-selection.

  select * from sflight into table gt_itab
  up to 25 rows.

  cl_salv_table=>factory(
    importing
      r_salv_table = gr_table
    changing
      t_table      = gt_itab ).

data : l_name type salv_de_function,
       l_icon type string,
       l_text type string,
       l_tooltip type string,
       l_pos      type salv_de_function_pos.

l_name = 'REF'.
l_icon = 'ICON_REFRESH'.
l_text = 'REF'.
l_tooltip = '1'.
l_pos = if_salv_c_function_position=>right_of_salv_functions .

gr_functions = gr_table->get_functions( ).
gr_functions->set_default( ).
*gr_function ?= gr_functions->GET_FUNCTIONS( ).
call method gr_functions->add_function
  exporting
    name     = l_name
    icon     = l_icon
    text     = l_text
    tooltip  = l_tooltip
    position = l_pos     .

  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 '번째 라인의' p_column '컬럼을' p_text
  into p_text separated by space.

  message i000(0k) with p_text.

endform.                    " show_cell_info
번호 제목 글쓴이 날짜 조회 수
629 REPORT z20_002 [2] sapjoy 2007.04.15 3092
628 REPORT Z18_002 sapjoy 2007.03.05 3082
627 REPORT z18_02. sapjoy 2012.08.01 3078
626 report zsalv_004 sapjoy 2010.08.20 3076
625 Z02_003 [2] sapjoy 2006.12.02 3042
624 Z01_018 [2] sapjoy 2006.12.02 3042
623 doi_create [1] sapjoy 2008.12.25 3040
622 REPORT Z_DYNAMIC_SCREEN [1] sapjoy 2010.10.07 3034
621 REPORT Z05_014 sapjoy 2008.04.14 3010
620 Z01_020 [2] sapjoy 2006.12.02 3008
619 report zsalv_041 . sapjoy 2010.08.20 2998
618 REPORT Z15_033 sapjoy 2007.02.05 2987
617 report zsalv_043 . sapjoy 2010.08.20 2978
616 report zsapdoi_005. sapjoy 2008.12.26 2978
» report zsalv_032 . sapjoy 2010.08.20 2976
614 REPORT Z11_001 sapjoy 2006.12.20 2976
613 INLUCDE ZXAISU02 sapjoy 2008.12.15 2961
612 PROGRAM z16_001 sapjoy 2007.04.26 2952
611 REPORT Z17_028 sapjoy 2007.02.26 2937
610 REPORT z19_005 [1] sapjoy 2007.04.03 2927