获取文件名称的两个函数

来源：互联网发布：始祖鸟淘宝高仿店编辑：程序博客网时间：2024/04/29 06:30

获取文件名称的两个函数

FORM f4_filename changing c_file.

CALL FUNCTION 'KD_GET_FILENAME_ON_F4'

EXPORTING

mask ='*.XLS'

static = 'X'

CHANGING

file_name = c_file.

ENDFORM. " F4_FILENAME

或

*&---------------------------------------------------------------------*

*& Form zfrom_get_filename

*&---------------------------------------------------------------------*

* text 获取文件名称

*----------------------------------------------------------------------*

FORM zfrom_get_filename CHANGINGfilename.

"选择文件

CALL FUNCTION 'WS_FILENAME_GET'

EXPORTING

def_filename = ' '

def_path = ' '

mask ='*.*,*.*. '

mode ='O'

title = 'ChooseInpute file '

IMPORTING

filename = filename

EXCEPTIONS

inv_winsys = 1

no_batch = 2

selection_cancel = 3

selection_error = 4

OTHERS = 5.

CASE sy-subrc.

WHEN 0.

WHEN 3.

RETURN.

WHEN OTHERS.

MESSAGE '文件打开失败' TYPE 'I'.

RETURN.

ENDCASE.

ENDFORM.

使用的时候用

at selection-screen on value-request for p_file.

perform zfrom_get_filename changingp_file.

at selection-screen on p_file.

或者

at selection-screen on value-request for p_file.

perform f4_filename changing p_file.

at selection-screen on p_file.

都行，也可以用F4直接打开，主要是用在

at selection-screen on value-request for p_file.

perform zfrom_get_filename changingp_file.

at selection-screen on p_file.

这个位置就行

另外下载的时候，也可以用这两个去确定地址

0 0