f4_directory

in src/zgoog_i_bqtr_gen_repl_obj_im2.prog.abap [0:0]


  METHOD f4_directory.
    cl_gui_frontend_services=>directory_browse(
      EXPORTING
        window_title         = 'Select directory to save template to'
*       initial_folder       =                  " Start Browsing Here
      CHANGING
        selected_folder      = cv_file
      EXCEPTIONS
        cntl_error           = 1                " Control error
        error_no_gui         = 2                " No GUI available
        not_supported_by_gui = 3                " GUI does not support this
        OTHERS               = 4
    ).
    IF sy-subrc <> 0.
      MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
        WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
    ENDIF.