Changing Font style in ALV

来源:互联网 发布:淘宝有哪些直通车 编辑:程序博客网 时间:2024/06/06 09:27
使用REUSE_ALV_GRID_DISPLAY_LVC设置显示的字体
 
Example:

REPORT ZLM_TEST_008.

Include for all style values
INCLUDE 《CL_ALV_CONTROL》.


DATAI_FLIGHT TYPE STANDARD TABLE OF SFLIGHT.
DATAI_FIELDS TYPE LVC_T_FCAT.

FIELD-SYMBOLS《WA_FIELDS》 TYPE LVC_S_FCAT.

Select data
SELECT FROM SFLIGHT
  INTO TABLE I_FLIGHT
  UP TO 100 ROWS.

CHECK SY-SUBRC 0.

Get field catalog
CALL FUNCTION 'LVC_FIELDCATALOG_MERGE'
  EXPORTING
    I_STRUCTURE_NAME       'SFLIGHT'
  CHANGING
    CT_FIELDCAT            I_FIELDS
  EXCEPTIONS
    INCONSISTENT_INTERFACE 1
    PROGRAM_ERROR          2
    OTHERS                 3.

IF SY-SUBRC 0.
  Changing the style of field catalog
  LOOP AT I_FIELDS ASSIGNING《WA_FIELDS》.
    IF SY-TABIX 4.
      《WA_FIELDS》-STYLE   ALV_STYLE_FONT_ITALIC.
    ELSE.
      《WA_FIELDS》-STYLE   ALV_STYLE_FONT_BOLD.
    ENDIF.
  ENDLOOP.
ENDIF.

Calling the FM to display ALV report
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY_LVC'
  EXPORTING
    I_STRUCTURE_NAME 'SFLIGHT'
   I_GRID_TITLE     'Style demo'(001)
    IT_FIELDCAT_LVC  I_FIELDS
  TABLES
    T_OUTTAB         I_FLIGHT
  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.

注:因为单尖括号会被html解析,所以使用书名号《》代替

Changing <wbr>Font <wbr>style <wbr>in <wbr>ALV

至于具体的style:
Changing <wbr>Font <wbr>style <wbr>in <wbr>ALV

0 0
原创粉丝点击