Download specific output fields to excel

Question

Hi All,
We have a report program that downloads an excel file having about 60 output fields. The program has no ALV output.
Everytime we do not require these 60 fields to be shown in output excel. we need specific output fields in excel and those specific fields could be dynamic.
Is there any way to download specific output fields in excel as we do in ALV variant.
In alv,  we can achieve this through a layout variant in selection screen and download the alv output in excel. But we dont require alv to download excel from there.
Thanks,
Srilakshmi.

Answer 1

Hi
Something like this:
DATA: BEGIN OF t_layout OCCURS 0,
        mark      TYPE c,
        fieldname LIKE dd03l-fieldname,
      END  OF t_layout.
TYPE-POOLS slis.
DATA: gt_fieldcat TYPE  slis_t_fieldcat_alv WITH HEADER LINE.
DATA: lt_report TYPE sy-repid.
DO 60 TIMES.
  t_layout-fieldname = 'Field'.
  MOVE sy-index TO t_layout-fieldname+6.
  APPEND t_layout.
ENDDO.
lt_report = sy-repid.
CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE'
  EXPORTING
    i_program_name     = lt_report
    i_internal_tabname = 'T_LAYOUT'
    i_inclname         = lt_report
  CHANGING
    ct_fieldcat        = gt_fieldcat[].
CALL FUNCTION 'REUSE_ALV_POPUP_TO_SELECT'
  EXPORTING
    i_title              = 'Field List'
    i_zebra              = 'X'
    i_checkbox_fieldname = 'MARK'
    i_tabname            = 'T_LAYOUT'
    it_fieldcat          = gt_fieldcat[]
  TABLES
    t_outtab             = t_layout.
LOOP AT t_layout WHERE mark = 'X'.
  WRITE: / t_layout-fieldname.
ENDLOOP.
Max