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( ).
댓글 0
번호 | 제목 | 글쓴이 | 날짜 | 조회 수 |
---|---|---|---|---|
629 | REPORT z20_002 [2] | sapjoy | 2007.04.15 | 3092 |
628 | REPORT Z18_002 | sapjoy | 2007.03.05 | 3082 |
627 | REPORT z18_02. | sapjoy | 2012.08.01 | 3078 |
626 | report zsalv_004 | sapjoy | 2010.08.20 | 3076 |
625 | Z02_003 [2] | sapjoy | 2006.12.02 | 3042 |
624 | Z01_018 [2] | sapjoy | 2006.12.02 | 3042 |
623 | doi_create [1] | sapjoy | 2008.12.25 | 3040 |
622 | REPORT Z_DYNAMIC_SCREEN [1] | sapjoy | 2010.10.07 | 3034 |
621 | REPORT Z05_014 | sapjoy | 2008.04.14 | 3010 |
620 | Z01_020 [2] | sapjoy | 2006.12.02 | 3008 |
619 | report zsalv_041 . | sapjoy | 2010.08.20 | 2998 |
618 | REPORT Z15_033 | sapjoy | 2007.02.05 | 2987 |
» | report zsalv_043 . | sapjoy | 2010.08.20 | 2978 |
616 | report zsapdoi_005. | sapjoy | 2008.12.26 | 2978 |
615 | report zsalv_032 . | sapjoy | 2010.08.20 | 2976 |
614 | REPORT Z11_001 | sapjoy | 2006.12.20 | 2976 |
613 | INLUCDE ZXAISU02 | sapjoy | 2008.12.15 | 2961 |
612 | PROGRAM z16_001 | sapjoy | 2007.04.26 | 2952 |
611 | REPORT Z17_028 | sapjoy | 2007.02.26 | 2937 |
610 | REPORT z19_005 [1] | sapjoy | 2007.04.03 | 2927 |