大部分文件选择功能模块(如:GUI_UPLOAD)只支持在前端选择文件。怎样你才能像前端选择一样容易地浏览后端归档系统(比如UNIX系统)呢?请看下文! 代码 REPORT zbrowse_unix. PARAMETER p_file LIKE dxfields-longpath DEFAULT ‘/dataload/’ LOWER CASE. AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_file. PERFORM file_help USING ‘P_FILE’. START-OF-S……
我们一直都在努力坚持原创.......请不要一声不吭,就悄悄拿走。
我原创,你原创,我们的内容世界才会更加精彩!
【所有原创内容版权均属TechTarget,欢迎大家转发分享。但未经授权,严禁任何媒体(平面媒体、网络媒体、自媒体等)以及微信公众号复制、转载、摘编或以其他方式进行使用。】
微信公众号
 
                        TechTarget
官方微博
 
                        TechTarget中国
大部分文件选择功能模块(如:GUI_UPLOAD)只支持在前端选择文件。怎样你才能像前端选择一样容易地浏览后端归档系统(比如UNIX系统)呢?请看下文!
代码
REPORT zbrowse_unix.
PARAMETER p_file LIKE dxfields-longpath DEFAULT '/dataload/' LOWER CASE.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_file. 
  PERFORM file_help USING 'P_FILE'. 
START-OF-SELECTION. 
  WRITE:/ p_file. 
*&--------------------------------------------------------------------* 
*&      Form  file_help 
*&--------------------------------------------------------------------* 
FORM file_help USING value(pin_fn). 
  DATA: lv_scrnfn LIKE dynpread-fieldname, 
        lv_svr    TYPE msxxlist-name. 
* ----------------------------------------------------------------------
*  get the name of the current server. 
    CALL 'C_SAPGPARAM' ID 'NAME' FIELD 'rdisp/myname' 
                       ID 'VALUE' FIELD  lv_svr. 
lv_scrnfn = pin_fn.
  CALL FUNCTION 'F4_DXFILENAME_4_DYNP' 
    EXPORTING 
      dynpfield_filename = lv_scrnfn 
      dyname             = sy-repid 
      dynumb             = sy-dynnr 
      filetype           = 'P' 
      location           = 'A' 
      server             = lv_svr. 
ENDFORM. "file_help
 
                        