메뉴 건너뛰기

SAP 한국 커뮤니티

report zsalv_040 .

sapjoy 2010.08.20 11:01 조회 수 : 2608

 

report  zsalv_040                                 .

typesbegin of g_type_itab.
include type sflight.
types:   exception   type char1,
end of g_type_itab.

data gt_itab    type table of g_type_itab.
data gs_itab    type g_type_itab.
data gr_table   type ref to cl_salv_table.

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

loop at gt_itab into gs_itab.
    if gs_itab-seatsocc >= 90.
      gs_itab-exception = '1'.
    elseif gs_itab-seatsocc >= 50.
      gs_itab-exception = '2'.
      else.
      gs_itab-exception = '3'.
    endif.

    modify gt_itab from gs_itab.
endloop.

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

data: lr_columns type ref to cl_salv_columns_table,
      lr_column  type ref to cl_salv_column_table.

lr_columns = gr_table->get_columns( ).
lr_columns->set_exception_column( 'EXCEPTION' ).

lr_column ?= lr_columns->get_column( 'EXCEPTION' ).
lr_column->set_short_text( 'MY EXCEPT' ).

data: lr_functional_settings type ref to cl_salv_functional_settings.

lr_functional_settings = gr_table->get_functional_settings( ).

data: lr_tooltips type ref to cl_salv_tooltips.

lr_tooltips = lr_functional_settings->get_tooltips( ).

lr_tooltips->add_tooltip(
  type       = cl_salv_tooltip=>c_type_exception
  value      = '1').

lr_tooltips->add_tooltip(
  type       = cl_salv_tooltip=>c_type_exception
  value      = '2').

lr_tooltips->add_tooltip(
  type       = cl_salv_tooltip=>c_type_exception
  value      = '3').

gr_table->display( ).
번호 제목 글쓴이 날짜 조회 수
569 REPORT Z03_010 [2] sapjoy 2007.05.14 2655
568 REPORT Z05_013 [3] sapjoy 2008.04.14 2653
567 REPORT ZRTTS_01 . sapjoy 2009.12.24 2651
566 REPORT z16_002 sapjoy 2008.08.07 2648
565 REPORT ZDYNAMIC_ITAB_12. sapjoy 2009.02.16 2643
564 REPORT Z15_001 [2] sapjoy 2008.04.15 2643
563 REPORT z18_038 [2] sapjoy 2008.04.21 2635
562 report zunicode_032. sapjoy 2008.11.21 2634
561 REPORT Z13_013 sapjoy 2007.01.08 2634
560 REPORT Z07_026 [3] sapjoy 2006.12.08 2632
559 REPORT z18_036 sapjoy 2007.03.13 2631
558 REPORT z12_002 sapjoy 2006.12.28 2629
557 FIELD_EXIT_GSBER_I sapjoy 2008.12.16 2625
556 REPORT z15_014 sapjoy 2007.01.26 2625
555 PUT_SPFLI PUT_SFLIGHT PUT_SBOOK sapjoy 2006.12.19 2614
554 REPORT Z05_008 [2] sapjoy 2007.05.27 2611
553 report zunicode_022. sapjoy 2008.11.21 2610
552 REPORT Z07_017 sapjoy 2006.12.08 2609
» report zsalv_040 . sapjoy 2010.08.20 2608
550 REPORT Z03_018 [3] sapjoy 2006.12.02 2605