REPORT z17_23 .
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( ).
댓글 0
번호 | 제목 | 글쓴이 | 날짜 | 조회 수 |
---|---|---|---|---|
510 | REPORT Z03_010 [2] | sapjoy | 2007.05.14 | 2655 |
509 | REPORT Z03_013 [4] | sapjoy | 2007.05.14 | 2388 |
508 | REPORT Z03_015 | sapjoy | 2007.05.14 | 2131 |
507 | REPORT Z03_016 [1] | sapjoy | 2007.05.14 | 2220 |
506 | TYPE-POOL ztgrp [1] | sapjoy | 2007.05.14 | 2699 |
505 | REPORT Z03_020 | sapjoy | 2007.05.15 | 2166 |
504 | REPORT Z03_021 [5] | sapjoy | 2007.05.15 | 2737 |
503 | REPORT z03_022 [2] | sapjoy | 2007.05.15 | 2111 |
502 | REPORT z03_026 | sapjoy | 2007.05.15 | 2313 |
501 | REPORT z03_029 [1] | sapjoy | 2007.05.15 | 2132 |
500 | REPORT Z03_028 | sapjoy | 2007.05.15 | 2102 |
499 | REPORT Z03_030 | sapjoy | 2007.05.15 | 2166 |
498 | REPORT Z04_001 | sapjoy | 2007.05.16 | 2375 |
497 | REPORT Z04_003 [9] | sapjoy | 2007.05.16 | 2561 |
496 | REPORT Z04_008 [1] | sapjoy | 2007.05.16 | 2150 |
495 | REPORT Z04_021 [4] | sapjoy | 2007.05.16 | 2206 |
494 | REPORT Z04_022 | sapjoy | 2007.05.16 | 2092 |
493 | REPORT Z04_012 [1] | sapjoy | 2007.05.16 | 2064 |
492 | REPORT Z04_011 [1] | sapjoy | 2007.05.16 | 2249 |
491 | REPORT Z04_015 | sapjoy | 2007.05.16 | 2111 |