메뉴 건너뛰기

SAP 한국 커뮤니티

REPORT z17_23

sapjoy 2012.08.01 20:49 조회 수 : 2516

REPORT  z17_23                                 .

 

include <color>.

typesbegin 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( ).

번호 제목 글쓴이 날짜 조회 수
510 REPORT z15_04. sapjoy 2012.08.01 1157
509 REPORT z12_30. sapjoy 2012.07.30 1160
508 PROGRAM z13_03. sapjoy 2012.08.01 1162
507 Report Z15_02 sapjoy 2012.08.01 1164
506 REPORT z05_01. [3] sapjoy 2012.07.30 1170
505 REPORT z15_15. sapjoy 2012.08.01 1170
504 REPORT z15_13. sapjoy 2012.08.01 1181
503 REPORT z15_03. sapjoy 2012.08.01 1182
502 PROGRAM z13_02. sapjoy 2012.08.01 1183
501 REPORT z16_05. sapjoy 2012.08.01 1183
500 REPORT z16_10. sapjoy 2012.08.01 1183
499 REPORT z15_25. [1] sapjoy 2012.08.01 1190
498 report Z12_33 sapjoy 2012.07.30 1193
497 REPORT z15_20. sapjoy 2012.08.01 1196
496 REPORT z12_27. sapjoy 2012.07.30 1208
495 REPORT z15_23. [1] sapjoy 2012.08.01 1216
494 REPORT z15_17. [1] sapjoy 2012.08.01 1219
493 REPORT Z12_22 sapjoy 2012.07.30 1226
492 REPORT z16_04. sapjoy 2012.08.01 1246
491 REPORT z12_06. sapjoy 2012.07.30 1294