An SAP Consultant

REPORT ztest_notepad.
DATA:g_server TYPE c.

PARAMETERS:p_server AS CHECKBOX USER-COMMAND uc1.
PARAMETERS:p_path TYPE  dxfields-longpath.
PARAMETERS:p_file TYPE dxfields-longpath.

AT SELECTION-SCREEN OUTPUT.
CASE p_server.
WHEN 'X'.
CLEAR p_file.
g_server = 'A'.
p_path = '\usr\sap\tmp'.
WHEN space.
CLEAR p_file.
g_server = 'P'.
p_path = 'C:\'.
ENDCASE.

AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_file.

CALL FUNCTION 'F4_DXFILENAME_TOPRECURSION'
EXPORTING
i_location_flag = g_server
i_server        = ' '
i_path          = p_path
filemask        = ' '
fileoperation   = 'R'
IMPORTING
o_path          = p_path.
p_file = p_path.

START-OF-SELECTION.
WRITE p_file.