메뉴 건너뛰기

SAP 한국 커뮤니티

report zsalv_035 .

sapjoy 2010.08.20 20:00 조회 수 : 2505

 

report  zsalv_035                                 .

data gt_itab       type table of sflight.
data gr_table      type ref to cl_salv_table.
data gr_functions  type ref to cl_salv_functions_list.
data gr_container  type ref to cl_gui_custom_container.
data ok_code type syucomm.

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

call screen 100.
*&---------------------------------------------------------------------*
*&      Module  0100_PBO  OUTPUT
*&---------------------------------------------------------------------*
*       text
*----------------------------------------------------------------------*
module 0100_pbo output.

  set pf-status '0100'.
  if gr_container is not bound.
*1. 컨테이너 생성
    create object gr_container
      exporting
        container_name = 'CONTAINER'.

*2. ALV 테이블 및 데이터 전달
    cl_salv_table=>factory(
      exporting
        r_container    = gr_container
        container_name = 'CONTAINER'
      importing
        r_salv_table   = gr_table
      changing
        t_table        = gt_itab ).


*3. ALV 기본 기능 버튼 설정
    gr_functions = gr_table->get_functions( ).
*    gr_functions->set_default( ).
    gr_functions->set_all( abap_true ).


    include <icon>.
    data : l_icon type string.

    l_icon = icon_refresh.

    gr_functions->add_function(
        name     = 'REFRESH'
        icon     = l_icon
        text     = 'REFRESH'
        tooltip  = 'REFRESH'
        position = if_salv_c_function_position=>right_of_salv_functions
        ).



*4. ALV 호출
    gr_table->display( ).
  endif.

endmodule.                 " 0100_PBO  OUTPUT
*&---------------------------------------------------------------------*
*&      Module  0100_PAI  INPUT
*&---------------------------------------------------------------------*
*       text
*----------------------------------------------------------------------*
module 0100_pai input.

  case ok_code.
    when 'BACK' or 'EXIT' or 'CANC'.
      set screen 0.
      leave screen.
  endcase.

endmodule.                 " 0100_PAI  INPUT
번호 제목 글쓴이 날짜 조회 수
391 report zsaptip_009 [1] sapjoy 2010.12.10 3852
390 REPORT Z_3DGRAPH. [1] sapjoy 2010.10.18 3666
389 REPORT zsmw0010 sapjoy 2010.10.12 4315
388 z_exception_test sapjoy 2010.10.11 3521
387 REPORT zmacro_01. sapjoy 2010.10.10 2582
386 REPORT ZTEST_ABAPTPDF sapjoy 2010.10.10 3693
385 REPORT ZALVCOLOR sapjoy 2010.10.10 3212
384 REPORT ZTABLE_UTIL sapjoy 2010.10.10 4012
383 REPORT Z_DYNAMIC_SCREEN [1] sapjoy 2010.10.08 3035
382 report zsalv_045 . sapjoy 2010.08.20 4264
381 report zsalv_043 . sapjoy 2010.08.20 2978
380 report zsalv_042 . sapjoy 2010.08.20 3135
379 report zsalv_041 . sapjoy 2010.08.20 2998
378 report zsalv_040 . sapjoy 2010.08.20 2608
377 report zsalv_036 . sapjoy 2010.08.20 3473
» report zsalv_035 . sapjoy 2010.08.20 2505
375 report zsalv_032 . sapjoy 2010.08.20 2976
374 report zsalv_031 . sapjoy 2010.08.20 2427
373 report zsalv_030 . sapjoy 2010.08.20 2331
372 report zsalv_023 . sapjoy 2010.08.20 2347