안녕하세요 현재 ABAP을 막 접한 학생인데요
다름이 아니라 BOOK1.XLSX 이 파일에 있는 데이터를
SE16에서 제가 만든 테이블에 집어놓고 싶은데..
얼핏 듣기로는 CALL FUNCTION 사용하라고 들은것 같은대 도통 감을 못 잡겠네요..
좀 자세히 아시는 분 있으시면 부탁드립니다. ㅠㅠ
댓글 4
-
버미!
2010.12.28 07:17
수고스럽지만 검색을 해보시면 많이 나올거 같은데요... -
TONY
2010.12.28 10:23
찾아봐서 어느정도 시도해 보시고 막히는 부분을 물어보시는 것이 실력이 늡니다.
-
오늘도 역시
2010.12.28 19:45
먼저 파일을 가져오시거염 그 다음 업로드 해주세염.
*&---------------------------------------------------------------------*
*& Form GET_FILE
*&---------------------------------------------------------------------*
* text
*----------------------------------------------------------------------*
* -->P_P_FILE text
*----------------------------------------------------------------------*
form get_file using pv_file.
* OPEN LOCAL FILE...
call function 'WS_FILENAME_GET'
exporting
mask = ',*.*,*.*.'
mode = 'O'
title = 'Select Open File'
importing
filename = pv_file
exceptions
inv_winsys = 1
no_batch = 2
selection_cancel = 3
selection_error = 4
others = 5.
endform. " GET_FILE
*&---------------------------------------------------------------------*
*& Form EXCEL_FILE_UPLOAD
*&---------------------------------------------------------------------*
* 1. local file(.TXT, .XLS) 을 읽어서 internal table에 저장
* 2. Header가 존재하면 안됨
*----------------------------------------------------------------------*
* --> p_table_name 저장할 내부테이블 명
* --> p_cnt Upload 레코드 건수
*----------------------------------------------------------------------*
form excel_file_upload tables pt_data
using pv_fname
pv_table_name
pv_head.
types ly_truxs_t_text_data(4096) type c occurs 0.
data: lv_table_name(20),
lt_data type ly_truxs_t_text_data.
field-symbols <lf_fs> type standard table.
* Internal Table Assign
concatenate pv_table_name '[]' into lv_table_name.
assign (lv_table_name) to <lf_fs>.
translate pv_fname to upper case.
call function 'TEXT_CONVERT_XLS_TO_SAP'
exporting
* I_FIELD_SEPERATOR =
i_line_header = pv_head
i_tab_raw_data = lt_data
i_filename = pv_fname
tables
i_tab_converted_data = <lf_fs>
exceptions
conversion_failed = 1
others = 2.
if sy-subrc <> 0.
message id sy-msgid type sy-msgty number sy-msgno
with sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
endif.
describe table <lf_fs> lines sy-dbcnt.
endform. " EXCEL_FILE_UPLOAD -
worbs0909
2010.12.29 07:53
감사합니다. ^^
