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.
번호 | 제목 | 글쓴이 | 날짜 | 조회 수 |
---|---|---|---|---|
84 | ABAP_Reporting_-_BDC_Recording [8] | sapjoy | 2007.03.12 | 5468 |
83 | Screen_Painter_and_Menu_Painter [2] | sapjoy | 2007.03.12 | 5533 |
82 | SAP 아이콘 모음 [3] | sapjoy | 2007.03.11 | 5700 |
81 | ABAP HELP [1] | sapjoy | 2007.03.11 | 7965 |
80 | bapis_for_DMS [8] | sapjoy | 2007.03.11 | 3915 |
79 | MAINTENANCE_뷰에_기능_추가하기 [4] | sapjoy | 2007.03.11 | 5316 |
78 | OOP관련 PDF파일 [9] | 하얀콩 | 2007.03.09 | 5867 |
77 | SAP 간단한 정리 및 BC 자주묻는 질문(8page) [2] | sapjoy | 2007.03.09 | 3664 |
76 | SAP SCREEN MANUAL(2PAGE) [1] | sapjoy | 2007.03.08 | 4655 |
75 | sap Frequently_Used_Buttons [1] | sapjoy | 2007.03.08 | 3192 |
74 | SAP_Customizing [2] | sapjoy | 2007.03.08 | 4454 |
73 | check table [3] | 초고속늑대 | 2007.03.07 | 5928 |
72 | foreign key [7] | 초고속늑대 | 2007.03.07 | 6157 |
71 | ABAP CODE INSPECTOR [3] | 고수이고싶다. | 2007.03.07 | 5204 |
70 | 티코드 정리 [7] | bd | 2007.03.07 | 4629 |
69 | ERP Overview 자료 [7] | michael | 2007.03.06 | 3607 |
68 | Upload Report프로그램 예제 [4] | 이선구 | 2007.03.06 | 6066 |
67 | Web Dynpro를 아세요? -VI [5] | 이선구 | 2007.03.06 | 4543 |
66 | Web Dynpro를 아세요? - V [7] | 이선구 | 2007.03.06 | 5403 |
65 | Web Dynpro를 아세요? - IV [7] | 이선구 | 2007.03.06 | 5125 |
좋은 자료 감사합니다!