05-23-2007 11:39 AM
How can one color particular rows of an ALV grid display?
Consider :
loop at a_tab( some internal table).
Populate i_tab ( Internal Table for ALV) -
Row must be yellow in color
loop at x_tab ( some other table).
populate i_tab. --- Background color
end loop.
end loop.
how can we make sure that the data being populated in the 1st statement gets printed in yellow??
05-23-2007 1:23 PM
Hi,
Color codes are
constructed as follows:
<i>Cxyz
x:Colornumbers
y:1/0:inverseon/off
z:1/0:intensifiedon/off</i>
<i>Color numbers are:
x color intended for
1 gray-blue headers
2 light gray list bodies
3 yellow totals
4 blue-green key columns
5 green positive threshold value
6 red negative threshold value
7 orange Control levels</i>
The key setting made via the field key of the field catalog
overrides this setting. So if you want this color to be colored
different than the key color, you should set the key field to space
while generating the field catalog. However, then there may be some side
effects on column orders. You can set the column order as you want at the
frontend. But if this is not suitable for you, then unset all key
settings and do all coloring and ordering as you want. Be careful that the
function module generating the field catalog will always set the key
properties of key fields.
<b>Coloring an Entire Row</b>
Coloring a row is a bit (really a bit) more complicated. To enable row
coloring, you should add an additional field to your list data table.
It should be of character type and length at least 4. This field will
contain the color code for the row. Sample Declaration of our list data
table gt_list.
<b><i>DATA BEGIN OF gt_list OCCURS 0 .
INCLUDE STRUCTURE SFLIGHT .
DATA rowcolor(4) TYPE c .
DATA END OF gt_list .</i></b>
As you guess, you should fill the color code to this field. Its format
will be explained below But how will ALV Grid know that you have loaded
the color data for the row to this field. So, you make it know this by
passing the name of the field containing color codes to the field
INFO_FNAME of the layout structure.
<i><b>ps_layout-info_fname = <field_name_containing_color_codes>.
e.g. ROWCOLOR</b></i>
You can fill that field anytime during execution. But, of course, due
to the flow logic of screens, it will be reflected to your list display
as soon as an ALV refresh occurs.
You can color an entire row as described in the next section. However,
this method is less time consuming.
Hope this helps.
reward if helpful.
Regards,
Sipra
05-23-2007 11:42 AM
Hi
See this
1. add one more field to ur final internal table say COLOR(4)
2. in layout wa_layout-style_fname = 'COLOR'. " if its grid
wa_layout-style_fieldname = 'COLOR'. "if its list
3. read table itab index 3.
itab-color = 'C410'.
modify itab index 3
4. see program SHOWCOLO for all color codes
1. Add a field of data type CHAR(3) to the internal output table.
2. Enter the color code in the appropriate field of the row to be colored in the internal
output table:
Code: 'Cxy'
C = Color (all codes begin with 'C')
x = color number ('1' - '9')
y = highlight ('0' = off, '1' = on)
3. Assign the internal output table color code field name to the IS_LAYOUT importing
structure IS_LAYOUT-INFO_FIELDNAME field and pass this structure in the ALV call
interface.
To enable row coloring, you should add an additional field to your list data table. It should be of character type and length at least 4. This field will contain the color code for the row. So, lets modify declaration of our list data table gt_list.
you should fill the color code to this field. Its format will be the same as explained before at section C.6.3. But how will ALV Grid know that you have loaded the color data for the row to this field. So, you make it know this by passing the name of the field containing color codes to the field INFO_FNAME of the layout structure.
e.g.
ps_layout-info_fname = <field_name_containing_color_codes>. e.g. ROWCOLOR
You can fill that field anytime during execution. But, of course, due to the flow logic of screens, it will be reflected to your list display as soon as an ALV refresh occurs.
You can color an entire row as described in the next section. However, this method is less time consuming.
Coloring Individual Cells
This is the last point about coloring procedures for the ALV Grid. The procedure is similar to coloring an entire row. However, since an individual cell can be addressed with two parameters we will need something more. What is meant by more is a table type structure to be included into the structure of the list data table. It seems strange, because including it will make our list data structure deep. But anyhow ALV Grid control handles this.
The structure that should be included must be of type LVC_T_SCOL. If you want to color the entire row, this inner table should contain only one row with field fname is set to space, some color value at field col, 0 or 1 at fields int (intensified) and inv (inverse).
If you want to color individual cells, then for each cell column, append a line to this inner table which also contains the column name at field fname. It is obvious that you can color an entire column by filling this inner table with a row for that column for each row in the list data table.
Reward points if useful
Regards
Anji
05-23-2007 11:43 AM
Hai,
Example on ALV with line color
http://www.geocities.com/mpioud/Z_ALV_LINE_COLOR.html
Example on ALV with cell color
http://www.geocities.com/mpioud/Z_ALV_CELL_COLOR.html
http://www.sapdevelopment.co.uk/reporting/alv/alvgrid_color.htm
Regards,
Padmam.
05-23-2007 11:50 AM
Check out the code below..
REPORT zsharad_test1.
TABLES: ekko.
TYPE-POOLS: slis. "ALV Declarations
*Data Declaration
*----
TYPES: BEGIN OF t_ekko,
ebeln TYPE ekpo-ebeln,
ebelp TYPE ekpo-ebelp,
statu TYPE ekpo-statu,
aedat TYPE ekpo-aedat,
matnr TYPE ekpo-matnr,
menge TYPE ekpo-menge,
meins TYPE ekpo-meins,
netpr TYPE ekpo-netpr,
peinh TYPE ekpo-peinh,
line_color(4) TYPE c, "Used to store row color attributes
END OF t_ekko.
DATA: it_ekko TYPE STANDARD TABLE OF t_ekko INITIAL SIZE 0,
wa_ekko TYPE t_ekko.
*ALV data declarations
DATA: fieldcatalog TYPE slis_t_fieldcat_alv WITH HEADER LINE,
gd_tab_group TYPE slis_t_sp_group_alv,
gd_layout TYPE slis_layout_alv,
gd_repid LIKE sy-repid.
************************************************************************
*Start-of-selection.
START-OF-SELECTION.
PERFORM data_retrieval.
PERFORM build_fieldcatalog.
PERFORM build_layout.
PERFORM display_alv_report.
&----
*& Form BUILD_FIELDCATALOG
&----
Build Fieldcatalog for ALV Report
----
FORM build_fieldcatalog.
There are a number of ways to create a fieldcat.
For the purpose of this example i will build the fieldcatalog manualy
by populating the internal table fields individually and then
appending the rows. This method can be the most time consuming but can
also allow you more control of the final product.
Beware though, you need to ensure that all fields required are
populated. When using some of functionality available via ALV, such as
total. You may need to provide more information than if you were
simply displaying the result
I.e. Field type may be required in-order for
the 'TOTAL' function to work.
fieldcatalog-fieldname = 'EBELN'.
fieldcatalog-seltext_m = 'Purchase Order'.
fieldcatalog-col_pos = 0.
fieldcatalog-outputlen = 10.
fieldcatalog-emphasize = 'X'.
fieldcatalog-key = 'X'.
fieldcatalog-do_sum = 'X'.
fieldcatalog-no_zero = 'X'.
APPEND fieldcatalog TO fieldcatalog.
CLEAR fieldcatalog.
fieldcatalog-fieldname = 'EBELP'.
fieldcatalog-seltext_m = 'PO Item'.
fieldcatalog-col_pos = 1.
APPEND fieldcatalog TO fieldcatalog.
CLEAR fieldcatalog.
fieldcatalog-fieldname = 'STATU'.
fieldcatalog-seltext_m = 'Status'.
fieldcatalog-col_pos = 2.
APPEND fieldcatalog TO fieldcatalog.
CLEAR fieldcatalog.
fieldcatalog-fieldname = 'AEDAT'.
fieldcatalog-seltext_m = 'Item change date'.
fieldcatalog-col_pos = 3.
APPEND fieldcatalog TO fieldcatalog.
CLEAR fieldcatalog.
fieldcatalog-fieldname = 'MATNR'.
fieldcatalog-seltext_m = 'Material Number'.
fieldcatalog-col_pos = 4.
APPEND fieldcatalog TO fieldcatalog.
CLEAR fieldcatalog.
fieldcatalog-fieldname = 'MENGE'.
fieldcatalog-seltext_m = 'PO quantity'.
fieldcatalog-col_pos = 5.
APPEND fieldcatalog TO fieldcatalog.
CLEAR fieldcatalog.
fieldcatalog-fieldname = 'MEINS'.
fieldcatalog-seltext_m = 'Order Unit'.
fieldcatalog-col_pos = 6.
APPEND fieldcatalog TO fieldcatalog.
CLEAR fieldcatalog.
fieldcatalog-fieldname = 'NETPR'.
fieldcatalog-seltext_m = 'Net Price'.
fieldcatalog-col_pos = 7.
fieldcatalog-outputlen = 15.
fieldcatalog-datatype = 'CURR'.
APPEND fieldcatalog TO fieldcatalog.
CLEAR fieldcatalog.
fieldcatalog-fieldname = 'PEINH'.
fieldcatalog-seltext_m = 'Price Unit'.
fieldcatalog-col_pos = 8.
APPEND fieldcatalog TO fieldcatalog.
CLEAR fieldcatalog.
ENDFORM. " BUILD_FIELDCATALOG
&----
*& Form BUILD_LAYOUT
&----
Build layout for ALV grid report
----
FORM build_layout.
gd_layout-no_input = 'X'.
gd_layout-colwidth_optimize = 'X'.
gd_layout-totals_text = 'Totals'(201).
Set layout field for row attributes(i.e. color)
gd_layout-info_fieldname = 'LINE_COLOR'.
gd_layout-totals_only = 'X'.
gd_layout-f2code = 'DISP'. "Sets fcode for when double
"click(press f2)
gd_layout-zebra = 'X'.
gd_layout-group_change_edit = 'X'.
gd_layout-header_text = 'helllllo'.
ENDFORM. " BUILD_LAYOUT
&----
*& Form DISPLAY_ALV_REPORT
&----
Display report using ALV grid
----
FORM display_alv_report.
gd_repid = sy-repid.
CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'
EXPORTING
i_callback_program = gd_repid
i_callback_top_of_page = 'TOP-OF-PAGE' "see FORM
i_callback_user_command = 'USER_COMMAND'
i_grid_title = outtext
is_layout = gd_layout
it_fieldcat = fieldcatalog[]
it_special_groups = gd_tabgroup
IT_EVENTS = GT_XEVENTS
i_save = 'X'
is_variant = z_template
TABLES
t_outtab = it_ekko
EXCEPTIONS
program_error = 1
OTHERS = 2.
IF sy-subrc <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
ENDFORM. " DISPLAY_ALV_REPORT
&----
*& Form DATA_RETRIEVAL
&----
Retrieve data form EKPO table and populate itab it_ekko
----
FORM data_retrieval.
DATA: ld_color(1) TYPE c.
SELECT ebeln ebelp statu aedat matnr menge meins netpr peinh
UP TO 10 ROWS
FROM ekpo
INTO TABLE it_ekko.
*Populate field with color attributes
LOOP AT it_ekko INTO wa_ekko.
Populate color variable with colour properties
Char 1 = C (This is a color property)
Char 2 = 3 (Color codes: 1 - 7)
Char 3 = Intensified on/off ( 1 or 0 )
Char 4 = Inverse display on/off ( 1 or 0 )
i.e. wa_ekko-line_color = 'C410'
ld_color = ld_color + 1.
Only 7 colours so need to reset color value
IF ld_color = 8.
ld_color = 1.
ENDIF.
CONCATENATE 'C' ld_color '10' INTO wa_ekko-line_color.
wa_ekko-line_color = 'C410'.
MODIFY it_ekko FROM wa_ekko.
ENDLOOP.
ENDFORM. " DATA_RETRIEVAL
REWARD IF USEFUL
CHEERS,
Sharadendu
05-23-2007 12:36 PM
05-23-2007 12:40 PM
05-23-2007 1:19 PM
hi,,
try this...
data: wg_gs_layout TYPE slis_layout_alv.
LOOP AT t_final INTO wa_final.
IF wa_final-total < 0.
wa_final-rowcolor = 'C601'.
MODIFY t_final FROM wa_final TRANSPORTING rowcolor.
ENDIF.
ENDLOOP.
wg_gs_layout-info_fieldname = 'ROWCOLOR'.
row color is one of the field name with char4 in your final itable
in this case it will display with diff color
when ever total field in final internal table < 0
u can change the if condition according to your requirements ok.
regards
Murugan.B
05-23-2007 1:23 PM
Hi,
Color codes are
constructed as follows:
<i>Cxyz
x:Colornumbers
y:1/0:inverseon/off
z:1/0:intensifiedon/off</i>
<i>Color numbers are:
x color intended for
1 gray-blue headers
2 light gray list bodies
3 yellow totals
4 blue-green key columns
5 green positive threshold value
6 red negative threshold value
7 orange Control levels</i>
The key setting made via the field key of the field catalog
overrides this setting. So if you want this color to be colored
different than the key color, you should set the key field to space
while generating the field catalog. However, then there may be some side
effects on column orders. You can set the column order as you want at the
frontend. But if this is not suitable for you, then unset all key
settings and do all coloring and ordering as you want. Be careful that the
function module generating the field catalog will always set the key
properties of key fields.
<b>Coloring an Entire Row</b>
Coloring a row is a bit (really a bit) more complicated. To enable row
coloring, you should add an additional field to your list data table.
It should be of character type and length at least 4. This field will
contain the color code for the row. Sample Declaration of our list data
table gt_list.
<b><i>DATA BEGIN OF gt_list OCCURS 0 .
INCLUDE STRUCTURE SFLIGHT .
DATA rowcolor(4) TYPE c .
DATA END OF gt_list .</i></b>
As you guess, you should fill the color code to this field. Its format
will be explained below But how will ALV Grid know that you have loaded
the color data for the row to this field. So, you make it know this by
passing the name of the field containing color codes to the field
INFO_FNAME of the layout structure.
<i><b>ps_layout-info_fname = <field_name_containing_color_codes>.
e.g. ROWCOLOR</b></i>
You can fill that field anytime during execution. But, of course, due
to the flow logic of screens, it will be reflected to your list display
as soon as an ALV refresh occurs.
You can color an entire row as described in the next section. However,
this method is less time consuming.
Hope this helps.
reward if helpful.
Regards,
Sipra
05-24-2007 11:08 AM