浏览后端归档系统的捷径

日期: 2009-09-08 作者:William Lawlor翻译:Eric 来源: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-S……

我们一直都在努力坚持原创.......请不要一声不吭,就悄悄拿走。

我原创,你原创,我们的内容世界才会更加精彩!

【所有原创内容版权均属TechTarget,欢迎大家转发分享。但未经授权,严禁任何媒体(平面媒体、网络媒体、自媒体等)以及微信公众号复制、转载、摘编或以其他方式进行使用。】

微信公众号

TechTarget微信公众号二维码

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