Example of coloring whole rows in ALV<\/p>\n
REPORT z_alv_demo_07.\r\nTYPES: BEGIN OF ty_data.\r\n INCLUDE STRUCTURE sflight.\r\nTYPES: row_color(4) TYPE c, \" field to hold the row color\r\n END OF ty_data.\r\n\r\nDATA: gt_data TYPE TABLE OF ty_data,\r\n g_grid TYPE REF TO cl_gui_alv_grid,\r\n gs_layout TYPE lvc_s_layo,\r\n gt_fieldcat TYPE lvc_t_fcat.\r\n\r\nCONSTANTS:\r\n c_max_rows TYPE i VALUE 100.\r\n\r\nCALL SCREEN 100.\r\n\r\n*&---------------------------------------------------------------------*\r\n*& Form read_data\r\n*&---------------------------------------------------------------------*\r\n* text\r\n*----------------------------------------------------------------------*\r\nFORM read_data.\r\n FIELD-SYMBOLS:\r\n <fs_data> TYPE ty_data.\r\n\r\n SELECT * INTO CORRESPONDING FIELDS OF TABLE gt_data\r\n FROM sflight\r\n UP TO c_max_rows ROWS.\r\n\r\n LOOP AT gt_data ASSIGNING <fs_data>.\r\n IF <fs_data>-seatsocc = <fs_data>-seatsmax OR\r\n <fs_data>-seatsocc_b = <fs_data>-seatsmax_b OR\r\n <fs_data>-seatsocc_f = <fs_data>-seatsmax_f.\r\n \" Some class is full\r\n* Colour code : *\r\n* Colour is a 4-char field where : *\r\n* - 1st char = C (color property) *\r\n* - 2nd char = color code (from 0 to 7) *\r\n* 0 = background color *\r\n* 1 = blue *\r\n* 2 = gray *\r\n* 3 = yellow *\r\n* 4 = blue\/gray *\r\n* 5 = green *\r\n* 6 = red *\r\n* 7 = orange *\r\n* - 3rd char = intensified (0=off, 1=on) *\r\n* - 4th char = inverse display (0=off, 1=on) *\r\n* i.e. 'C310'\r\n\r\n <fs_data>-row_color = 'C310'. \" Yellow - some travel class is full\r\n ENDIF.\r\n ENDLOOP.\r\nENDFORM. \"read_data\r\n\r\n*&---------------------------------------------------------------------*\r\n*& Form display_grid\r\n*&---------------------------------------------------------------------*\r\n* text\r\n*----------------------------------------------------------------------*\r\nFORM display_grid.\r\n PERFORM get_layout.\r\n* PERFORM get_fieldcat.\r\n\r\n CREATE OBJECT g_grid\r\n EXPORTING\r\n i_parent = cl_gui_container=>default_screen.\r\n\r\n CALL METHOD g_grid->set_table_for_first_display\r\n EXPORTING\r\n i_structure_name = 'SFLIGHT'\r\n is_layout = gs_layout\r\n CHANGING\r\n it_outtab = gt_data\r\n* it_fieldcatalog = gt_fieldcat\r\n EXCEPTIONS\r\n invalid_parameter_combination = 1\r\n program_error = 2\r\n too_many_lines = 3\r\n OTHERS = 4.\r\n IF sy-subrc <> 0.\r\n MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno\r\n WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.\r\n ENDIF.\r\nENDFORM. \"display_grid\r\n*&---------------------------------------------------------------------*\r\n*& Module STATUS_0100 OUTPUT\r\n*&---------------------------------------------------------------------*\r\n* text\r\n*----------------------------------------------------------------------*\r\nMODULE status_0100 OUTPUT.\r\n SET PF-STATUS 'MAIN'.\r\n SET TITLEBAR 'ALV_EXAMPLES'.\r\nENDMODULE. \" STATUS_0100 OUTPUT\r\n*&---------------------------------------------------------------------*\r\n*& Module DISPLAY_GRID OUTPUT\r\n*&---------------------------------------------------------------------*\r\n* text\r\n*----------------------------------------------------------------------*\r\nMODULE display_grid OUTPUT.\r\n PERFORM read_data.\r\n PERFORM display_grid.\r\nENDMODULE. \" DISPLAY_GRID OUTPUT\r\n*&---------------------------------------------------------------------*\r\n*& Module USER_COMMAND_0100 INPUT\r\n*&---------------------------------------------------------------------*\r\n* text\r\n*----------------------------------------------------------------------*\r\nMODULE user_command_0100 INPUT.\r\n* to react on oi_custom_events:\r\n CALL METHOD cl_gui_cfw=>dispatch.\r\n CASE sy-ucomm.\r\n WHEN 'BACK' OR\r\n 'EXIT' OR\r\n 'CANCEL'.\r\n LEAVE PROGRAM.\r\n WHEN OTHERS.\r\n* do nothing\r\n ENDCASE.\r\nENDMODULE. \" USER_COMMAND_0100 INPUT\r\n*&---------------------------------------------------------------------*\r\n*& Form GET_LAYOUT\r\n*&---------------------------------------------------------------------*\r\n* text\r\n*----------------------------------------------------------------------*\r\n* --> p1 text\r\n* p1 text\r\n* TYPE lvc_s_fcat.\r\n\r\n CALL FUNCTION 'LVC_FIELDCATALOG_MERGE'\r\n EXPORTING\r\n i_structure_name = 'SFLIGHT'\r\n CHANGING\r\n ct_fieldcat = gt_fieldcat\r\n EXCEPTIONS\r\n inconsistent_interface = 1\r\n program_error = 2\r\n OTHERS = 3.\r\n CHECK sy-subrc = 0.\r\nENDFORM. \" GET_FIELDCAT<\/pre>\n","protected":false},"excerpt":{"rendered":"Example of coloring whole rows in ALV<\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"jetpack_post_was_ever_published":false,"_jetpack_newsletter_access":"","_jetpack_dont_email_post_to_subs":false,"_jetpack_newsletter_tier_id":0,"_jetpack_memberships_contains_paywalled_content":false,"_jetpack_memberships_contains_paid_content":false,"footnotes":"","jetpack_publicize_message":"ALV tutorial 07 - coloring rows http:\/\/wp.me\/p3nYbe-8g","jetpack_publicize_feature_enabled":true,"jetpack_social_post_already_shared":true,"jetpack_social_options":{"image_generator_settings":{"template":"highway","default_image_id":0,"font":"","enabled":false},"version":2}},"categories":[16,136,9],"tags":[446,129,128,130,17],"class_list":["post-512","post","type-post","status-publish","format-standard","hentry","category-abap","category-alv-tutorial","category-development","tag-abap","tag-cells","tag-color","tag-row-color","tag-sap"],"jetpack_publicize_connections":[],"jetpack_featured_media_url":"","jetpack_sharing_enabled":true,"jetpack_shortlink":"https:\/\/wp.me\/p3nYbe-8g","jetpack-related-posts":[],"_links":{"self":[{"href":"https:\/\/oprsteny.cz\/index.php?rest_route=\/wp\/v2\/posts\/512","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/oprsteny.cz\/index.php?rest_route=\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/oprsteny.cz\/index.php?rest_route=\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/oprsteny.cz\/index.php?rest_route=\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/oprsteny.cz\/index.php?rest_route=%2Fwp%2Fv2%2Fcomments&post=512"}],"version-history":[{"count":8,"href":"https:\/\/oprsteny.cz\/index.php?rest_route=\/wp\/v2\/posts\/512\/revisions"}],"predecessor-version":[{"id":563,"href":"https:\/\/oprsteny.cz\/index.php?rest_route=\/wp\/v2\/posts\/512\/revisions\/563"}],"wp:attachment":[{"href":"https:\/\/oprsteny.cz\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=512"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/oprsteny.cz\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=512"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/oprsteny.cz\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=512"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}