Example of coloring single cells in ALV grid<\/p>\n
REPORT z_alv_demo_08.\r\nTYPES: BEGIN OF ty_data.\r\n INCLUDE STRUCTURE sflight.\r\nTYPES: cell_table TYPE lvc_t_scol, \" 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 <fs_cellcolor> type lvc_s_scol.\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* Color whole row in case no seats are booked\r\n IF <fs_data>-seatsocc = 0 AND\r\n <fs_data>-seatsocc_b = 0 AND\r\n <fs_data>-seatsocc_f = 0.\r\n APPEND INITIAL LINE TO <fs_data>-cell_table ASSIGNING <fs_cellcolor>.\r\n <fs_cellcolor>-color-col = 6.\r\n <fs_cellcolor>-color-int = 1.\r\n <fs_cellcolor>-nokeycol = 'X'.\r\n endif.\r\n\r\n* Color only columns where the travel class is full\r\n IF <fs_data>-seatsocc = <fs_data>-seatsmax.\r\n APPEND INITIAL LINE TO <fs_data>-cell_table ASSIGNING <fs_cellcolor>.\r\n <fs_cellcolor>-color-col = 6.\r\n <fs_cellcolor>-color-int = 1.\r\n <fs_cellcolor>-fname = 'SEATSOCC'.\r\n <fs_cellcolor>-nokeycol = 'X'.\r\n\r\n APPEND INITIAL LINE TO <fs_data>-cell_table ASSIGNING <fs_cellcolor>.\r\n <fs_cellcolor>-color-col = 6.\r\n <fs_cellcolor>-color-int = 1.\r\n <fs_cellcolor>-fname = 'SEATSMAX'.\r\n <fs_cellcolor>-nokeycol = 'X'.\r\n endif.\r\n\r\n if <fs_data>-seatsocc_b = <fs_data>-seatsmax_b.\r\n APPEND INITIAL LINE TO <fs_data>-cell_table ASSIGNING <fs_cellcolor>.\r\n <fs_cellcolor>-color-col = 6.\r\n <fs_cellcolor>-color-int = 1.\r\n <fs_cellcolor>-fname = 'SEATSOCC_B'.\r\n <fs_cellcolor>-nokeycol = 'X'.\r\n\r\n APPEND INITIAL LINE TO <fs_data>-cell_table ASSIGNING <fs_cellcolor>.\r\n <fs_cellcolor>-color-col = 6.\r\n <fs_cellcolor>-color-int = 1.\r\n <fs_cellcolor>-fname = 'SEATSMAX_B'.\r\n <fs_cellcolor>-nokeycol = 'X'.\r\n endif.\r\n\r\n if <fs_data>-seatsocc_f = <fs_data>-seatsmax_f.\r\n APPEND INITIAL LINE TO <fs_data>-cell_table ASSIGNING <fs_cellcolor>.\r\n <fs_cellcolor>-color-col = 6.\r\n <fs_cellcolor>-color-int = 1.\r\n <fs_cellcolor>-fname = 'SEATSOCC_F'.\r\n <fs_cellcolor>-nokeycol = 'X'.\r\n\r\n APPEND INITIAL LINE TO <fs_data>-cell_table ASSIGNING <fs_cellcolor>.\r\n <fs_cellcolor>-color-col = 6.\r\n <fs_cellcolor>-color-int = 1.\r\n <fs_cellcolor>-fname = 'SEATSMAX_F'.\r\n <fs_cellcolor>-nokeycol = 'X'.\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 gs_layout-ctab_fname = 'CELL_TABLE'.\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 single cells in ALV grid<\/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":true,"_jetpack_newsletter_tier_id":0,"_jetpack_memberships_contains_paywalled_content":false,"_jetpack_memberships_contains_paid_content":false,"footnotes":"","jetpack_publicize_message":"ALV tutorial 08 - coloring cells http:\/\/wp.me\/p3nYbe-8j","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,447,120,17],"class_list":["post-515","post","type-post","status-publish","format-standard","hentry","category-abap","category-alv-tutorial","category-development","tag-abap","tag-alv","tag-coloring-cells","tag-sap"],"jetpack_publicize_connections":[],"jetpack_featured_media_url":"","jetpack_sharing_enabled":true,"jetpack_shortlink":"https:\/\/wp.me\/p3nYbe-8j","jetpack-related-posts":[],"_links":{"self":[{"href":"https:\/\/oprsteny.cz\/index.php?rest_route=\/wp\/v2\/posts\/515","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=515"}],"version-history":[{"count":7,"href":"https:\/\/oprsteny.cz\/index.php?rest_route=\/wp\/v2\/posts\/515\/revisions"}],"predecessor-version":[{"id":1561,"href":"https:\/\/oprsteny.cz\/index.php?rest_route=\/wp\/v2\/posts\/515\/revisions\/1561"}],"wp:attachment":[{"href":"https:\/\/oprsteny.cz\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=515"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/oprsteny.cz\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=515"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/oprsteny.cz\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=515"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}