Загружаем файл с сервера приложений.
DATA: lv_file(100) lv_file_size TYPE i, lv_size TYPE i, lv_xstring TYPE xstring, lt_data TYPE solix_tab, lt_data_tmp TYPE solix_tab, ls_data_tmp LIKE LINE OF lt_data_tmp. lv_file = '/tmp/test-1.xlsx'. OPEN DATASET lv_file FOR INPUT IN BINARY MODE. IF sy-subrc = 0. DO. READ DATASET lv_file INTO lv_xstring. IF sy-subrc = 0. lv_size = xstrlen( lv_xstring ). ADD lv_size TO lv_file_size. REFRESH lt_data_tmp. TRY. CALL METHOD cl_bcs_convert=>xstring_to_xtab EXPORTING iv_xstring = lv_xstring IMPORTING et_xtab = lt_data_tmp. CATCH cx_bcs . ENDTRY. INSERT LINES OF lt_data_tmp INTO TABLE lt_data. ELSE. EXIT. ENDIF. ENDDO. ENDIF. CLOSE DATASET lv_file. " lt_data содержит данные файла
Комментариев нет:
Отправить комментарий