Background color output

Question

Hello experts
i have several internal tables which i need to convert into files in background mode
this is fine
however, i also need some of the rows in the file to be <b>colored </b>with a particular color
any idea by which i can achieve this ?
the files would be too large to convert into PDFs

Answer 1

Hi,
I am sending the sample report for colour cell report.
REPORT  YMS_COLOURALV NO STANDARD PAGE HEADING.
TYPE-POOLS: SLIS, ICON.
DATA: FIELDCAT TYPE SLIS_T_FIELDCAT_ALV.
DATA: BEGIN OF IMARA OCCURS 0,
          LIGHT(4) TYPE C,
          MATNR TYPE MARA-MATNR,
          MTART TYPE MARA-MTART,
          MAKTX TYPE MAKT-MAKTX,
          COLOR_LINE(4) TYPE C,
          TCOLOR TYPE SLIS_T_SPECIALCOL_ALV,  "cell
      END OF IMARA.
DATA: XCOLOR TYPE SLIS_SPECIALCOL_ALV.
START-OF-SELECTION.
  PERFORM GET_DATA.
  PERFORM WRITE_REPORT.
Get_Data
FORM GET_DATA.
  WRITE ICON_GREEN_LIGHT AS ICON TO IMARA-LIGHT.
      IMARA-MATNR = 'ABC'.
      IMARA-MTART = 'ZCFG'.
      IMARA-MAKTX = 'This is description for ABC'.
  APPEND IMARA.
  WRITE ICON_YELLOW_LIGHT AS ICON TO IMARA-LIGHT.
      IMARA-MATNR = 'DEF'.
      IMARA-MTART = 'ZCFG'.
      IMARA-MAKTX = 'This is description for DEF'.
  APPEND IMARA.
  WRITE ICON_RED_LIGHT AS ICON TO IMARA-LIGHT.
      IMARA-MATNR = 'GHI'.
      IMARA-MTART = 'ZCFG'.
      IMARA-MAKTX = 'This is description for GHI'.
  APPEND IMARA.
  LOOP AT IMARA.
    IF SY-TABIX = 1.
      IMARA-COLOR_LINE = 'C410'.     " color line
    ENDIF.
    IF SY-TABIX = 2.                "  color CELL
      CLEAR XCOLOR.
      XCOLOR-FIELDNAME = 'MTART'.
      XCOLOR-COLOR-COL = '3'.
      XCOLOR-COLOR-INT = '1'.       " Intensified on/off
      XCOLOR-COLOR-INV = '0'.
      APPEND XCOLOR TO IMARA-TCOLOR.
    ENDIF.
    MODIFY IMARA.
  ENDLOOP.
ENDFORM.                    "get_data
WRITE_REPORT
FORM WRITE_REPORT.
  DATA: LAYOUT TYPE  SLIS_LAYOUT_ALV.
  LAYOUT-COLTAB_FIELDNAME = 'TCOLOR'.
  LAYOUT-INFO_FIELDNAME = 'COLOR_LINE'.
  PERFORM BUILD_FIELD_CATALOG.
CALL ABAP LIST VIEWER (ALV)
  CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
    EXPORTING
      IS_LAYOUT   = LAYOUT
      IT_FIELDCAT = FIELDCAT
    TABLES
      T_OUTTAB    = IMARA.
ENDFORM.                    "write_report
BUILD_FIELD_CATALOG
FORM BUILD_FIELD_CATALOG.
  DATA: FC_TMP TYPE SLIS_T_FIELDCAT_ALV WITH HEADER LINE.
  CLEAR: FIELDCAT. REFRESH: FIELDCAT.
  CLEAR: FC_TMP.
  FC_TMP-REPTEXT_DDIC    = 'Status'.
  FC_TMP-FIELDNAME  = 'LIGHT'.
  FC_TMP-TABNAME   = 'IMARA'.
  FC_TMP-OUTPUTLEN  = '4'.
  FC_TMP-ICON       = 'X'.
  APPEND FC_TMP TO FIELDCAT.
  CLEAR: FC_TMP.
  FC_TMP-REPTEXT_DDIC    = 'Material Number'.
  FC_TMP-FIELDNAME  = 'MATNR'.
  FC_TMP-TABNAME   = 'IMARA'.
  FC_TMP-OUTPUTLEN  = '18'.
  APPEND FC_TMP TO FIELDCAT.
  CLEAR: FC_TMP.
  FC_TMP-REPTEXT_DDIC    = 'Material Type'.
  FC_TMP-FIELDNAME  = 'MTART'.
  FC_TMP-TABNAME   = 'IMARA'.
  FC_TMP-OUTPUTLEN  = '10'.
  APPEND FC_TMP TO FIELDCAT.
  CLEAR: FC_TMP.
  FC_TMP-REPTEXT_DDIC    = 'Material'.
  FC_TMP-FIELDNAME  = 'MAKTX'.
  FC_TMP-TABNAME   = 'IMARA'.
  FC_TMP-OUTPUTLEN  = '40'.
  FC_TMP-EMPHASIZE = 'C610'.   " color column
  APPEND FC_TMP TO FIELDCAT.
ENDFORM.                    "build_field_catalog
Thanks,
Shankar