Application Development and Automation Discussions
Join the discussions or start your own on all things application development, including tools and APIs, programming models, and keeping your skills sharp.
cancel
Showing results for 
Search instead for 
Did you mean: 
Read only

Need a File Parameter with Browse Functionality in ABAP

sreeramkumar_madisetty
Active Contributor
0 Likes
3,290

Hi

I Need a File Parameter with Browse Functionality in ABAP.

Can anyone help me with logic.

Regards,

Sree

1 ACCEPTED SOLUTION
Read only

Former Member
0 Likes
1,304

Check below code:

PARAMETERS: p_file TYPE localfile.

DATA: l_path TYPE string,
      l_fpath TYPE string,
      l_fname TYPE string.

AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_file.

  CALL METHOD cl_gui_frontend_services=>file_save_dialog
    EXPORTING
      window_title         = 'Save to...'
      default_extension    = '.txt'
      initial_directory    = 'C:\'
    CHANGING
      filename             = l_fname
      path                 = l_path
      fullpath             = l_fpath
    EXCEPTIONS
      cntl_error           = 1
      error_no_gui         = 2
      not_supported_by_gui = 3
      OTHERS               = 4.
  IF sy-subrc EQ 0.
    MOVE l_fpath TO p_file.
  ENDIF.

Hi

I Need a File Parameter with Browse Functionality in ABAP.

Can anyone help me with logic.

Regards,

Sree

3 REPLIES 3
Read only

Former Member
0 Likes
1,304

Hi,

If you have a report and parameter for file on presentation server on selection screen and need a F4 help for that do the following:



parameter: p_file TYPE IBIPPARMS-PATH.

at selection-screen on value-request for p_file.

call function 'F4_FILENAME'
importing
 FILE_NAME = p_file.

Cheers.

Read only

Former Member
0 Likes
1,305

Check below code:

PARAMETERS: p_file TYPE localfile.

DATA: l_path TYPE string,
      l_fpath TYPE string,
      l_fname TYPE string.

AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_file.

  CALL METHOD cl_gui_frontend_services=>file_save_dialog
    EXPORTING
      window_title         = 'Save to...'
      default_extension    = '.txt'
      initial_directory    = 'C:\'
    CHANGING
      filename             = l_fname
      path                 = l_path
      fullpath             = l_fpath
    EXCEPTIONS
      cntl_error           = 1
      error_no_gui         = 2
      not_supported_by_gui = 3
      OTHERS               = 4.
  IF sy-subrc EQ 0.
    MOVE l_fpath TO p_file.
  ENDIF.

Read only

Former Member
0 Likes
1,304

Hi,

AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_fname1.

CALL FUNCTION 'F4_DXFILENAME_TOPRECURSION'

EXPORTING

i_location_flag = 'A'

i_server = ' '

i_path = k_search_dir

filemask = k_fnh_mask

fileoperation = 'R'

IMPORTING

o_path = file_path

EXCEPTIONS

rfc_error = 1

OTHERS = 2.

IF sy-subrc EQ 0.

p_fname1 = file_path.

ENDIF.

For Application server file Pass 'A' To I_LOCATION_FLAG.

For Presentation server file Pass 'P' To I_LOCATION_FLAG.