report z_test7.data:gv_fname like rlgrap-filename," filename       gv_filename type string.data:begin of gt_sflight_down_header occurs 0,carrid(20),fldate(20),cityfrom(20),cityto(20),fltime(20),price(20),currency(20),end of gt_sflight_down_header.*define the download internal tabledata:begin of gt_sflight_down occurs 0, "存放表体数据carrid like sflight-carrid,fldate like sflight-fldate,cityfrom like spfli-cityfrom,cityto like spfli-cityto,fltime like spfli-fltime,price like sflight-price,currency like sflight-currency,end of gt_sflight_down.perform download."下面是要call的function:*&---------------------------------------------------------------------**&      Form  download*&---------------------------------------------------------------------**       text*----------------------------------------------------------------------*form download .  clear gt_sflight_down_header[]. "必须要清空，否则会出现数据重复下载的情况  clear gt_sflight_down[].*set the data header  gt_sflight_down_header-carrid = 'companyid'.  gt_sflight_down_header-fldate = 'flightdate'.  gt_sflight_down_header-cityfrom = 'origin'.  gt_sflight_down_header-cityto = 'destination'.  gt_sflight_down_header-fltime = 'flighttime'.  gt_sflight_down_header-price = 'cost'.  gt_sflight_down_header-currency = 'currency'.  append gt_sflight_down_header.*set the main download data*      loop at gt_sflight.**        gt_sflight_down-carrid = gt_sflight-carrid.**        gt_sflight_down-fldate = gt_sflight-fldate.**        gt_sflight_down-cityfrom = gt_sflight-cityfrom.**        gt_sflight_down-cityto = gt_sflight-cityto.**        gt_sflight_down-fltime = gt_sflight-fltime.**        gt_sflight_down-price = gt_sflight-price.**        gt_sflight_down-currency = gt_sflight-currency.**        append gt_sflight_down.**      endloop.  gt_sflight_down-carrid = 1.  gt_sflight_down-fldate = 2.  gt_sflight_down-cityfrom = 3.  gt_sflight_down-cityto = 3.  gt_sflight_down-fltime = 3.  gt_sflight_down-price = 3.  gt_sflight_down-currency = 3.  append gt_sflight_down.  call function 'WS_FILENAME_GET'    exporting      mask             = ',*.xls,*.xlsx.'      mode             = 'S'      title            = 'choose the location'    importing      filename         = gv_fname    exceptions      inv_winsys       = 1      no_batch         = 2      selection_cancel = 3      selection_error  = 4      others           = 5.  if sy-subrc <> 0.* MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO*         WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.  endif.  concatenate gv_fname '.xls' into gv_filename. "给返回的文件路径加上后缀名  call function 'GUI_DOWNLOAD' "第一次调用,先下载表头数据    exporting      filename                = gv_filename      filetype                = 'ASC'      write_field_separator   = 'X'    tables      data_tab                = gt_sflight_down_header[]    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      others                  = 22.*download the main data  call function 'GUI_DOWNLOAD' "第二次调用,下载表体数据    exporting      filename                = gv_filename      filetype                =  'ASC'      write_field_separator   = 'X'      append                  =  'X' "指定下载模式为附加    tables      data_tab                = gt_sflight_down[]    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      others                  = 22.  if sy-subrc = 0.    message i012(zeduc132_m).  endif.endform.                    "" download