Selecting a directory using object methods

*Selecting a Directory
data: gd_path(500) type c.

parameters: p_path like rlgrap-filename.

at selection-screen on value-request for p_path.

    CALL METHOD cl_gui_frontend_services=>directory_browse
        EXPORTING window_title = 'File Directory'
                        initial_folder = 'C:'
        CHANGING selected_folder = gd_path.

    CALL METHOD cl_gui_cfw=>flush.

    concatenate gd_path '' into p_path.