Month: June 2023

Situation: Sometimes, we need to upload/ download customer config table to other system. Now this is the sample ABAP code . FIELD-SYMBOLS: <fs_tab_fil> TYPE STANDARD TABLE, <fs_tab_db>  TYPE STANDARD TABLE. PARAMETERS upload  RADIOBUTTON GROUP g1 . PARAMETERS download  RADIOBUTTON GROUP g1 . PARAMETERS filepath TYPE string. PARAMETERS table TYPE string LOWER CASE. DATA: answer     TYPE char1, litab_tb   TYPE REF TO data, litab_tb2  TYPE REF TO data, lc_tab_fst TYPE char1. CREATE DATA litab_tb TYPE STANDARD TABLE OF (table) WITH NON-UNIQUE DEFAULT KEY. CREATE DATA litab_tb2 TYPE STANDARD TABLE OF (table) WITH NON-UNIQUE DEFAULT KEY. ASSIGN litab_tb->* TO <fs_tab_fil>. ASSIGN litab_tb2->* TO <fs_tab_db>. AT SELECTION-SCREEN ON VALUE-REQUEST FOR filepath. DATA gt_tab TYPE STANDARD TABLE OF file_table . DATA li TYPE i. CALL METHOD cl_gui_frontend_services=>file_open_dialog CHANGING file_table = gt_tab rc         = li. IF sy–subrc <> 0. MESSAGE ‘open file path error.’ TYPE  ‘E’. ELSE. READ TABLE gt_tab INTO filepath INDEX 1. ENDIF. AT SELECTION-SCREEN. IF filepath IS INITIAL. SET CURSOR FIELD ‘FILEPATH’. MESSAGE ‘please input the required FILEPATH’ TYPE ‘E’. ENDIF. IF table IS INITIAL.