REPORT zsmw0010.
*&---------------------------------------------------------------------*
*& Include
*&---------------------------------------------------------------------*
INCLUDE officeintegrationinclude.
*">> Data Define
DATA: i TYPE i VALUE 2.
CONSTANTS: l_object_id(250) TYPE c VALUE 'ZTEST',
l_dest TYPE rlgrap-filename VALUE 'C:TEST.XLS'.
*">> Internal table
DATA: lt_data_table LIKE w3mime OCCURS 0 WITH HEADER LINE.
DATA: BEGIN OF it_tab OCCURS 0.
DATA: kunnr LIKE kna1-kunnr,
lifnr LIKE lfa1-lifnr,
bukrs LIKE bkpf-bukrs,
telno(20) TYPE c.
DATA: END OF it_tab.
*">> STRUCTURES
DATA : ls_key LIKE wwwdatatab.
*&---------------------------------------------------------------------*
*& Object
*&---------------------------------------------------------------------*
DATA : excel TYPE ole2_object,
books TYPE ole2_object,
book TYPE ole2_object,
sheet TYPE ole2_object,
cell TYPE ole2_object.
*&---------------------------------------------------------------------*
*& Start-of-selection
*&---------------------------------------------------------------------*
START-OF-SELECTION.
*">> 임의 데이터
it_tab-kunnr = '00000A1000'.
it_tab-lifnr = '00000B1000'.
it_tab-bukrs = 'A000'.
it_tab-telno = '010-3333-3333'.
APPEND it_tab.
it_tab-kunnr = '00000C1000'.
it_tab-lifnr = '00000D1000'.
it_tab-bukrs = 'B000'.
it_tab-telno = '011-3333-3333'.
APPEND it_tab.
*">> Data Check
CALL FUNCTION 'SAP_OI_LOAD_MIME_DATA'
EXPORTING
object_id = l_object_id
TABLES
data_table = lt_data_table
EXCEPTIONS
object_not_found = 1
internal_error = 2
OTHERS = 3.
IF sy-subrc <> 0.
MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.
ls_key-relid = 'MI'. "// IMPORT
ls_key-objid = l_object_id.
CALL FUNCTION 'DOWNLOAD_WEB_OBJECT'
EXPORTING
key = ls_key
destination = l_dest. " 저장위치
CREATE OBJECT EXCEL 'EXCEL.APPLICATION'.
SET PROPERTY OF EXCEL 'VISIBLE' = 1.
댓글 0
번호 | 제목 | 글쓴이 | 날짜 | 조회 수 |
---|---|---|---|---|
671 | <b>easy abap 소스 전체 파일 입니다. [188] | sapjoy | 2008.05.01 | 10138 |
670 | REPORT z18_033 [47] | sapjoy | 2008.10.13 | 9032 |
669 | REPORT Z15_003 [49] | sapjoy | 2008.04.15 | 7499 |
668 | report zunicode_027. [4] | sapjoy | 2008.11.21 | 6279 |
667 | REPORT Z20_01. | sapjoy | 2012.08.01 | 5090 |
666 | REPORT z18_03. | sapjoy | 2012.08.01 | 4592 |
665 | Z01_012 [9] | sapjoy | 2006.12.02 | 4569 |
664 | Z_EXPORT_GRAPHIC_FROM_SE78 [1] | sapjoy | 2011.03.28 | 4444 |
663 | report zsapdoi_002. | sapjoy | 2008.12.26 | 4405 |
» | REPORT zsmw0010 | sapjoy | 2010.10.11 | 4313 |
661 | REPORT z18_028 | sapjoy | 2007.04.09 | 4281 |
660 | report zsalv_045 . | sapjoy | 2010.08.20 | 4264 |
659 | Dynamic Table Maintenance [1] | sapjoy | 2006.12.04 | 4100 |
658 | REPORT ZTABLE_UTIL | sapjoy | 2010.10.09 | 4011 |
657 | REPORT Z19_02. | sapjoy | 2012.08.01 | 3948 |
656 | report zsaptip_009 [1] | sapjoy | 2010.12.10 | 3852 |
655 | INCLUDE ZXF04U01 | sapjoy | 2008.12.15 | 3697 |
654 | REPORT ZTEST_ABAPTPDF | sapjoy | 2010.10.09 | 3693 |
653 | REPORT Z_3DGRAPH. [1] | sapjoy | 2010.10.17 | 3664 |
652 | REPORT zfalv_011. | sapjoy | 2011.02.16 | 3625 |