메뉴 건너뛰기

SAP 한국 커뮤니티

report zsalv_043 .

sapjoy 2010.08.20 20:01 조회 수 : 2981

 

report  zsalv_043                                 .

include <color>.

types: begin of g_type_itab.
include type sflight.
types : t_color     type lvc_t_scol,
end of g_type_itab.

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

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


field-symbols: <ls_outtab> type g_type_itab.

data :  lt_color     type lvc_t_scol,
        ls_color     type lvc_s_scol.

clear lt_color.
clear ls_color.


loop at gt_itab assigning <ls_outtab>.
  clear : ls_color, lt_color.
  if <ls_outtab>-seatsocc >= 90.
    ls_color-fname     = 'SEATSOCC'.
    ls_color-color-col = col_negative.
    ls_color-color-int = 0.
    ls_color-color-inv = 0.
    append ls_color to lt_color.      
  elseif <ls_outtab>-seatsocc >= 50.
    ls_color-fname     = 'SEATSOCC'.
    ls_color-color-col = col_normal.
    ls_color-color-int = 0.
    ls_color-color-inv = 0.
    append ls_color to lt_color.       
  else.
    ls_color-fname     = 'SEATSOCC'.
    ls_color-color-col = col_positive.
    ls_color-color-int = 0.
    ls_color-color-inv = 0.
    append ls_color to lt_color.         
  endif.

    <ls_outtab>-t_color = lt_color.
  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_color_column( 'T_COLOR' ).


  gr_table->display( ).
이 게시물을
수정 삭제 목록
번호 제목 글쓴이 날짜 조회 수
631 REPORT Z09_005 sapjoy 2006.12.18 2523
630 REPORT Z09_006 [1] sapjoy 2006.12.18 2851
629 DBZF1SSEL sapjoy 2006.12.20 2871
628 REPORT Z09_010 sapjoy 2006.12.20 2540
627 PUT_SPFLI PUT_SFLIGHT PUT_SBOOK sapjoy 2006.12.20 2624
626 REPORT Z11_001 sapjoy 2006.12.20 2996
625 REPORT z11_004 . sapjoy 2006.12.22 2468
624 REPORT Z11_005 sapjoy 2006.12.22 2280
623 REPORT Z11_008 sapjoy 2006.12.23 2503
622 REPORT Z11_010 sapjoy 2006.12.23 2368
621 module f4_drum_S101 input. sapjoy 2006.12.27 2552
620 MODULE f4_drum_s101 INPUT. 2 sapjoy 2006.12.27 2385
619 REPORT z12_002 sapjoy 2006.12.28 2637
618 REPORT Z13_002 sapjoy 2007.01.03 2315
617 REPORT Z12_004 sapjoy 2007.01.03 2264
616 FORM set_field_catalogs_grid USING lt_fieldcat TYPE lvc_t_fcat. sapjoy 2007.01.04 2881
615 REPORT Z13_003 sapjoy 2007.01.06 2445
614 REPORT Z13_001 sapjoy 2007.01.08 2371
613 REPORT Z13_012 sapjoy 2007.01.09 2291
612 REPORT Z13_013 sapjoy 2007.01.09 2647
쓰기 태그