펑션 GUI_UPLOAD 사용시 엑셀파일 업로드 하는 방법방법을 알고 싶습니다.
너무 초보적인 질문이지만 답변 부탁드려요..플~리즈^^
'ALSM_EXCEL_TO_INTERNAL_TABLE 을 사용하니
값이 없는 셀은 인터널테이블에 담을대 없어지더라구요..ㅠ.ㅠ
댓글 8
-
[퐈]박
2008.12.04 15:21
-
예슬짱
2008.12.04 16:11
gt_itab은 파일업로드 양식인가요?
디버깅해보니 파일양식만 맞고 갚이 전혀 들어있지 않습니다 ㅠ.ㅠ
-
[퐈]박
2008.12.04 17:52
gt_itab은 파일업로드 양식입니다.
-
[퐈]박
2008.12.04 17:53
MS Office Excel 2007로 작성된 문서는 위 평션으로는 아직 업로드되지 않습니다.
-
예슬짱
2008.12.04 20:12
Ms Office EXCEL 2003입니다.
글씨가 깨집니다
-
Lynx
2008.12.05 10:52
아래 소스는 2007에서 사용해본 소스입니다.
참고하시고 사용해 보세요...
DATA: gt_xls TYPE STANDARD TABLE OF kcde_intern_struc WITH HEADER LINE.
펑션내부
* 엑셀 8 ROW, 3 COL.
CALL FUNCTION 'KCD_EXCEL_OLE_TO_INT_CONVERT'
EXPORTING
filename = p_file
i_begin_col = 3
i_begin_row = 8
i_end_col = 256
i_end_row = 65536
TABLES
intern = gt_xls
EXCEPTIONS
inconsistent_parameters = 1
upload_ole = 2
OTHERS = 3.
IF sy-subrc <> 0.
MESSAGE i000 WITH 'EXCEL FILE IMPORT 실패!'.
STOP.
ENDIF.
SORT gt_xls BY row col.
LOOP AT gt_xls.
ASSIGN COMPONENT gt_xls-col OF STRUCTURE gt_import TO <fs>.
<fs> = gt_xls-value.
AT END OF row.
APPEND gt_import.
CLEAR: gt_import.
ENDAT.
ENDLOOP. -
예슬짱
2008.12.15 08:50
감사합니다.
-
쿵푸ㅋ
2009.04.21 10:01
감사합니다. ^_^
DATA: lv_filename LIKE filename-fileintern,
* PRS 프리젠테이션 서버,
* APP 어플리케이션 서버
lv_servertyp TYPE truxs_server VALUE 'PRS',
* 'XLS,CSV,TXT,ASC
lv_fileformat TYPE truxs_fileformat VALUE 'XLS',
lv_field_serperator(1) TYPE c.
lv_filename = 파일명.
lv_field_serperator = cl_abap_char_utilities=>horizontal_tab.
CALL FUNCTION 'FILE_READ_AND_CONVERT_SAP_DATA'
EXPORTING
i_filename = lv_filename " LIKE FILENAME-FILEINTERN
i_servertyp = lv_servertyp
i_fileformat = lv_fileformat
i_field_seperator = lv_field_serperator
* I_LINE_HEADER =
* IMPORTING
* E_BIN_FILELENGTH =
TABLES
i_tab_receiver = gt_itab
EXCEPTIONS
file_not_found = 1
close_failed = 2
authorization_failed = 3
open_failed = 4
conversion_failed = 5
OTHERS = 6.
이렇게 해보세요...