PARAMETERS:
p_file TYPE dxfields-longpath.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_file.
CALL FUNCTION 'F4_DXFILENAME_TOPRECURSION'
EXPORTING
i_location_flag = 'A' " P - Presentation server
i_server = ' '
i_path = ''
IMPORTING
o_path = p_file
EXCEPTIONS
communication_failure = 1
system_failure = 2
rfc_error = 3.