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.
번호 | 제목 | 글쓴이 | 날짜 | 조회 수 |
---|---|---|---|---|
204 | Dynamic Selection(LDB) 관련 자료입니다. [9] | 우헤헤 | 2012.11.20 | 12235 |
203 | abap 자료 [13] | 철죽1 | 2012.11.20 | 12248 |
202 | class-based exceptions 예제. | 철죽1 | 2012.09.02 | 12263 |
201 | SAP에서의 QR Code 프린팅절차 [19] | 양키 | 2012.11.16 | 12347 |
200 | abap tip [5] | 민상애비 | 2012.11.14 | 12388 |
199 | instance vs static 예 [1] | 철죽1 | 2012.09.02 | 12617 |
198 | sap 튜닝 자료입니다. [44] | iop890mm | 2012.10.09 | 12663 |
197 | 파일 첨부 - 한개씩 말고 다중으로 가능? [1] | 연오랑 | 2012.10.23 | 12696 |
196 | LSMW,CATT [8] | 민상애비 | 2012.11.14 | 12812 |
195 | dynamic SQL in SAP [13] | 엠엠공유 | 2011.08.10 | 12871 |
194 | sap tree 에 관한 자료 - [pdf . 영어] [14] | Jenny | 2011.08.04 | 12876 |
193 | create object 예. [1] | 철죽1 | 2012.09.02 | 12900 |
192 | ABAP [Dictionary] Search Help Coding [13] | 문바이 | 2012.04.02 | 12925 |
191 | SAP ICON 정리 [14] | paran | 2012.11.15 | 13012 |
190 | Technical Guide-ABAP Tuning 기초 [5] | 민상애비 | 2012.11.14 | 13078 |
189 | ABAP TRIAL 설치 영문문서 [8] | 열공아밥 | 2010.07.14 | 13082 |
188 | lock 예 [5] | 철죽1 | 2012.09.02 | 13216 |
187 | bdc프로그램개발 [33] | 절감 | 2014.01.06 | 13371 |
186 | ABAP으로구현한 네트웍오목 [8] | 메탈광 | 2007.02.09 | 13392 |
185 | 마이너스 세금 계산서 전표 생성 [4] | tommy | 2010.10.13 | 13393 |
좋은 자료 감사합니다!