IT干货网

ABAP-TXT文件上传

wyy 2022年03月09日 SAP 145 0
at selection-screen on value-request for pc_file. 
  call function 'WS_FILENAME_GET' 
    exporting 
      def_filename '*.TXT' 
      def_path     'D:\' 
      mode         = 'O' 
      title        = 'UPLOAD' 
    importing 
      filename     = pc_file 
    exceptions 
      inv_winsys       = 1 
      no_batch         = 2 
      selection_cancel = 3 
      selection_error  = 4 
      others           = 5. 
  case sy-subrc. 
    when 0. 
    when others. 
      exit. 
  endcase.  
 
Start-of-selection.  
 
data:filename type string. 
     filename = pc_file. 
 
 call function 'GUI_UPLOAD' 
   exporting 
     filename            = filename 
     has_field_separator = 'X' 
   tables 
     data_tab            = tab 
   exceptions 
     file_open_error     = 1. 

评论关闭
IT干货网

微信公众号号:IT虾米 (左侧二维码扫一扫)欢迎添加!

ABAP-消息发布