*******************************************

 

*Structure declaration for header - fieldnames
TYPES : BEGIN OF TY_HEADER,
          FIELDNAME(100) TYPE C,
        END OF TY_HEADER.

*Internal table and workarea declaration for header
DATA : IT_EXCEL_HEADER TYPE STANDARD TABLE OF TY_HEADER INITIAL SIZE 0,
       WA_EXCEL_HEADER TYPE TY_HEADER.

********************************************

 

 WA_EXCEL_HEADER-FIELDNAME =  'Sold-to-party name'.
  APPEND WA_EXCEL_HEADER TO IT_EXCEL_HEADER.

********************************************

 

  CALL METHOD CL_GUI_FRONTEND_SERVICES=>GUI_DOWNLOAD
      EXPORTING
*      bin_filesize              =
        FILENAME                  = P_PATH
        FILETYPE                  = 'DBF'
*      append                    = SPACE
*        WRITE_FIELD_SEPARATOR     = '#'
*        HEADER                    = '00'
*      trunc_trailing_blanks     = SPACE
*        WRITE_LF                  = 'X'
*        COL_SELECT                = 'X'
*        COL_SELECT_MASK           = '#'
*        DAT_MODE                  = 'X'
        CONFIRM_OVERWRITE         = 'X'
*      no_auth_check             = SPACE
*      codepage                  = SPACE
*      ignore_cerr               = ABAP_TRUE
*      replacement               = '#'
*      write_bom                 = SPACE
*        TRUNC_TRAILING_BLANKS_EOL = 'X'
*      wk1_n_format              = SPACE
*      wk1_n_size                = SPACE
*      wk1_t_format              = SPACE
*      wk1_t_size                = SPACE
*      show_transfer_status      = 'X'
        FIELDNAMES                = IT_EXCEL_HEADER
*      write_lf_after_last_line  = 'X'
*    IMPORTING
*      filelength                =
      CHANGING
        DATA_TAB                  = GT_DOWNLOAD
      EXCEPTIONS
        FILE_WRITE_ERROR          = 1
        NO_BATCH                  = 2
        GUI_REFUSE_FILETRANSFER   = 3
        INVALID_TYPE              = 4
        NO_AUTHORITY              = 5
        UNKNOWN_ERROR             = 6
        HEADER_NOT_ALLOWED        = 7
        SEPARATOR_NOT_ALLOWED     = 8
        FILESIZE_NOT_ALLOWED      = 9
        HEADER_TOO_LONG           = 10
        DP_ERROR_CREATE           = 11
        DP_ERROR_SEND             = 12
        DP_ERROR_WRITE            = 13
        UNKNOWN_DP_ERROR          = 14
        ACCESS_DENIED             = 15
        DP_OUT_OF_MEMORY          = 16
        DISK_FULL                 = 17
        DP_TIMEOUT                = 18
        FILE_NOT_FOUND            = 19
        DATAPROVIDER_EXCEPTION    = 20
        CONTROL_FLUSH_ERROR       = 21
        NOT_SUPPORTED_BY_GUI      = 22
        ERROR_NO_GUI              = 23
        OTHERS                    = 24.

  IF SY-SUBRC <> 0.
    MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
               WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
  ENDIF.