REPORT zmaster_upload.
TYPE-POOLS truxs.
SELECTION-SCREEN: BEGIN OF BLOCK a WITH FRAME TITLE text-001.
PARAMETER: p_table LIKE dd02l-tabname,
p_file LIKE rlgrap-filename. " DEFAULT 'c:tempzcvaa.csv'.
SELECTION-SCREEN: END OF BLOCK a.
DATA: it_tab TYPE REF TO data.
DATA: gt_table TYPE REF TO cl_salv_table.
CREATE DATA it_tab TYPE TABLE OF (p_table).
FIELD-SYMBOLS: <fs_tab> TYPE STANDARD TABLE.
ASSIGN it_tab->* TO <fs_tab>.
DATA: it_type TYPE truxs_t_text_data.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_file.
CALL FUNCTION 'F4_FILENAME'
EXPORTING
field_name = 'P_FILE'
IMPORTING
file_name = p_file.
START-OF-SELECTION.
* uploading the data in the file into internal table
CALL FUNCTION 'TEXT_CONVERT_XLS_TO_SAP'
EXPORTING
* I_FIELD_SEPERATOR =
* I_LINE_HEADER = 'X'
i_tab_raw_data = it_type
i_filename = p_file
TABLES
i_tab_converted_data = <fs_tab>
EXCEPTIONS
conversion_failed = 1
OTHERS = 2.
IF sy-subrc NE 0.
MESSAGE ID sy-msgid
TYPE sy-msgty
NUMBER sy-msgno
WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.
END-OF-SELECTION.
MODIFY (p_table) FROM TABLE <fs_tab>.
DESCRIBE TABLE <fs_tab> LINES DATA(dcr).
WRITE: dcr, 'lines got updated in table', p_table.
TYPE-POOLS truxs.
SELECTION-SCREEN: BEGIN OF BLOCK a WITH FRAME TITLE text-001.
PARAMETER: p_table LIKE dd02l-tabname,
p_file LIKE rlgrap-filename. " DEFAULT 'c:tempzcvaa.csv'.
SELECTION-SCREEN: END OF BLOCK a.
DATA: it_tab TYPE REF TO data.
DATA: gt_table TYPE REF TO cl_salv_table.
CREATE DATA it_tab TYPE TABLE OF (p_table).
FIELD-SYMBOLS: <fs_tab> TYPE STANDARD TABLE.
ASSIGN it_tab->* TO <fs_tab>.
DATA: it_type TYPE truxs_t_text_data.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_file.
CALL FUNCTION 'F4_FILENAME'
EXPORTING
field_name = 'P_FILE'
IMPORTING
file_name = p_file.
START-OF-SELECTION.
* uploading the data in the file into internal table
CALL FUNCTION 'TEXT_CONVERT_XLS_TO_SAP'
EXPORTING
* I_FIELD_SEPERATOR =
* I_LINE_HEADER = 'X'
i_tab_raw_data = it_type
i_filename = p_file
TABLES
i_tab_converted_data = <fs_tab>
EXCEPTIONS
conversion_failed = 1
OTHERS = 2.
IF sy-subrc NE 0.
MESSAGE ID sy-msgid
TYPE sy-msgty
NUMBER sy-msgno
WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.
END-OF-SELECTION.
MODIFY (p_table) FROM TABLE <fs_tab>.
DESCRIBE TABLE <fs_tab> LINES DATA(dcr).
WRITE: dcr, 'lines got updated in table', p_table.
번호 | 제목 | 글쓴이 | 날짜 | 조회 수 |
---|---|---|---|---|
64 | Web Dynpro를 아세요? - III [6] | 이선구 | 2007.03.06 | 5546 |
63 | Web Dynpro를 아세요? - II [9] | 이선구 | 2007.03.06 | 5378 |
62 | Web Dynpro를 아세요? - I [8] | 이선구 | 2007.03.06 | 5357 |
61 | About SAP Query [9] | 나침반친구 | 2007.03.05 | 3767 |
60 | About QuickView [10] | 나침반친구 | 2007.03.05 | 10065 |
59 | Unicode관련 소스입니다. [6] | 선별 | 2007.03.05 | 5360 |
58 | SQL 비교 [5] | sapjoy | 2007.03.05 | 5860 |
57 | Performance & Tunning [3] | sapjoy | 2007.03.05 | 7584 |
56 | ABAP 메뉴얼모음(영어) [4] | sapjoy | 2007.03.05 | 5224 |
55 | ABAP Program Tips v3 [9] | 소주와 막걸리 | 2007.03.03 | 5500 |
54 | lsmw [10] | 문준연 | 2007.03.03 | 6515 |
53 | An Easy Reference for ALV Grid Control [14] | 김현 | 2007.03.03 | 3919 |
52 | CATT 메뉴얼.. [22] | UKS | 2007.03.02 | 5469 |
51 | NEW ABAP EDITOR [9] | sapjoy | 2007.03.02 | 5559 |
50 | ALE [7] | sapjoy | 2007.03.02 | 4991 |
49 | 개발에 자주 쓰이는 TCODE(트랜잭션) [17] | sapjoy | 2007.03.02 | 11225 |
48 | ABAP/4 FAQ [8] | 재미있게 | 2007.03.01 | 10014 |
47 | Best Practices for performance-tunning.pdf [6] | 변상윤 | 2007.02.28 | 3996 |
46 | SAP Business one(SBO) [8] | sapjoy | 2007.02.28 | 4247 |
45 | SAP GUI 즐겨찾기 메뉴얼 [8] | 고수이고싶다. | 2007.02.28 | 10365 |
좋은 자료 감사합니다!