Sap Programında Satıra Renk Verme


Oluşturduğumuz rapor veya programda bazı satırların kullanıcı tarafında dikkat çekmesi için farklı renkte olması gerekir. Bu kullanıcı için büyük kolaylık sağlayabilir.




Satır renklendirme işlemi için ilk önce slis_layout_alv tanımlanır.

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, gt_events type slis_t_event,
gd_prntparams type slis_print_alv.

satır rengı
Daha sonra oluşturduğumuz layout

umuza renk verme kodlarını tanımlıyoruz.

gd_layout-info_fieldname = ’COLOR’.

’COLOR’ kullanacağımız structure mizada tanımlamamız gerekir. <——


*&———————————————————————*
*& Form SATIRA RENK VERME
*&———————————————————————*

form build_layout.
gd_layout-no_input = ’X’.
gd_layout-colwidth_optimize = ’X’.
gd_layout-totals_text = ’Totals’(201).
gd_layout-info_fieldname = ’COLOR’. <————————–
* gd_layout-totals_only = ’X’.
* gd_layout-f2code = ’DISP’. ”
* gd_layout-zebra = ’X’.
* gd_layout-group_change_edit = ’X’.
* gd_layout-header_text = ’başlık’.
endform. ”
* SATIRA RENK VERME
*———————————————————————-*





Daha sonra renk vereceğimiz alanları belirleyeceğimiz bir form oluşturuyoruz.

form data_retrieval.
data: ld_color(1) type c.

LOOP AT ITAB INTO WA.

IF WA-WERKS = ’2000′.
ld_color = 6.
concatenate ’C' ld_color ’00′ into WA-COLOR.

ENDIF.

modify ITAB from WA.
endloop.
endform. ”





Bu kod WA-WERKS alanındaki değerleri inceler ve 2000 olan satırların rengini kırmızı(C600) yapar.