메뉴 건너뛰기

SAP 한국 커뮤니티

report zsalv_032 .

sapjoy 2010.08.20 20:00 조회 수 : 2983

 

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
이 게시물을
수정 삭제 목록
번호 제목 글쓴이 날짜 조회 수
631 report zsalv_042 . sapjoy 2010.08.20 3137
630 REPORT z20_002 [2] sapjoy 2007.04.16 3105
629 REPORT Z18_002 sapjoy 2007.03.06 3091
628 report zsalv_004 sapjoy 2010.08.20 3084
627 Z01_018 [2] sapjoy 2006.12.03 3077
626 Z02_003 [2] sapjoy 2006.12.03 3070
625 doi_create [1] sapjoy 2008.12.26 3060
624 REPORT Z_DYNAMIC_SCREEN [1] sapjoy 2010.10.08 3057
623 Z01_020 [2] sapjoy 2006.12.03 3034
622 REPORT Z05_014 sapjoy 2008.04.15 3022
621 report zsalv_041 . sapjoy 2010.08.20 3002
620 REPORT Z11_001 sapjoy 2006.12.20 2996
619 REPORT Z15_033 sapjoy 2007.02.06 2991
618 report zsapdoi_005. sapjoy 2008.12.26 2984
» report zsalv_032 . sapjoy 2010.08.20 2983
616 report zsalv_043 . sapjoy 2010.08.20 2981
615 INLUCDE ZXAISU02 sapjoy 2008.12.16 2965
614 PROGRAM z16_001 sapjoy 2007.04.27 2957
613 REPORT Z17_028 sapjoy 2007.02.26 2946
612 report zsapdoi_004. sapjoy 2008.12.26 2943
쓰기 태그