2008 May 20 5:53 AM
hi guys,
I am stuck with the following assignment!!
I am supposed to store the mandatory fields required to create business partners in an excel sheet and then using idocs i have to create new business partners based on the data in excel sheet.That is import data from excel sheet using idocs into the sap system for creation of business partners.
I am totally stuck.please tell me how to start.
regards
shilpi
2008 May 20 6:12 AM
HI,
Upload the excel sheet data into the internal table . Then fill the idocs with the internal table data send idocs.
EXCEL UPLOADING:
REPORT ZEXCEL_ITAB .
TYPES : BEGIN OF TY_ITAB ,
V1 TYPE C,
V2(10) TYPE C,
V3(10) TYPE C,
V4(10) TYPE C,
END OF TY_ITAB.
DATA : ITAB TYPE TABLE OF TY_ITAB,
WITAB TYPE TY_ITAB.
DATA:JTAB TYPE TABLE OF ALSMEX_TABLINE ,
WJTAB TYPE ALSMEX_TABLINE .
CALL FUNCTION 'ALSM_EXCEL_TO_INTERNAL_TABLE'
EXPORTING
FILENAME = 'D:\Documents and Settings\hzb14v.APAC\Desktop\Book1.xls'
I_BEGIN_COL = 1
I_BEGIN_ROW = 1
I_END_COL = 4
I_END_ROW = 3
TABLES
INTERN = JTAB.
LOOP AT JTAB INTO WJTAB.
CASE WJTAB-COL.
WHEN '0001'.
MOVE: WJTAB-VALUE TO WITAB-V1.
WHEN '0002'.
MOVE: WJTAB-VALUE TO WITAB-V2.
WHEN '0003'.
MOVE: WJTAB-VALUE TO WITAB-V3.
WHEN '0004'.
MOVE: WJTAB-VALUE TO WITAB-V4.
ENDCASE.
AT END OF ROW.
APPEND WITAB TO ITAB.
CLEAR WITAB.
ENDAT.
CLEAR WJTAB.
ENDLOOP.
Link for creating IDOCS:
[http://sapabapnotes.blogspot.com/2008/05/sample-abap-program-for-create-idoc.html]
Reward points if helpful.
Thanks and Regards
HI,
Upload the excel sheet data into the internal table . Then fill the idocs with the internal table data send idocs.
EXCEL UPLOADING:
REPORT ZEXCEL_ITAB .
TYPES : BEGIN OF TY_ITAB ,
V1 TYPE C,
V2(10) TYPE C,
V3(10) TYPE C,
V4(10) TYPE C,
END OF TY_ITAB.
DATA : ITAB TYPE TABLE OF TY_ITAB,
WITAB TYPE TY_ITAB.
DATA:JTAB TYPE TABLE OF ALSMEX_TABLINE ,
WJTAB TYPE ALSMEX_TABLINE .
CALL FUNCTION 'ALSM_EXCEL_TO_INTERNAL_TABLE'
EXPORTING
FILENAME = 'D:\Documents and Settings\hzb14v.APAC\Desktop\Book1.xls'
I_BEGIN_COL = 1
I_BEGIN_ROW = 1
I_END_COL = 4
I_END_ROW = 3
TABLES
INTERN = JTAB.
LOOP AT JTAB INTO WJTAB.
CASE WJTAB-COL.
WHEN '0001'.
MOVE: WJTAB-VALUE TO WITAB-V1.
WHEN '0002'.
MOVE: WJTAB-VALUE TO WITAB-V2.
WHEN '0003'.
MOVE: WJTAB-VALUE TO WITAB-V3.
WHEN '0004'.
MOVE: WJTAB-VALUE TO WITAB-V4.
ENDCASE.
AT END OF ROW.
APPEND WITAB TO ITAB.
CLEAR WITAB.
ENDAT.
CLEAR WJTAB.
ENDLOOP.
Link for creating IDOCS:
[http://sapabapnotes.blogspot.com/2008/05/sample-abap-program-for-create-idoc.html]
Reward points if helpful.
Thanks and Regards
2008 May 20 6:00 AM
Hi,
create an Idoc /check if standard Idoc exists.
create a report program . Do the following in the program :
-upload the excel file into the internal table in the abap program using CL_GUI_FRONTEND_SERVICES=>gui_upload
-after getting the excel data into internal table, use the data to populate the IDOC structure programatically
-Post the IDOC programatically
Regards,
Pls reward points if useful
Shruthi R
2008 May 20 6:12 AM
HI,
Upload the excel sheet data into the internal table . Then fill the idocs with the internal table data send idocs.
EXCEL UPLOADING:
REPORT ZEXCEL_ITAB .
TYPES : BEGIN OF TY_ITAB ,
V1 TYPE C,
V2(10) TYPE C,
V3(10) TYPE C,
V4(10) TYPE C,
END OF TY_ITAB.
DATA : ITAB TYPE TABLE OF TY_ITAB,
WITAB TYPE TY_ITAB.
DATA:JTAB TYPE TABLE OF ALSMEX_TABLINE ,
WJTAB TYPE ALSMEX_TABLINE .
CALL FUNCTION 'ALSM_EXCEL_TO_INTERNAL_TABLE'
EXPORTING
FILENAME = 'D:\Documents and Settings\hzb14v.APAC\Desktop\Book1.xls'
I_BEGIN_COL = 1
I_BEGIN_ROW = 1
I_END_COL = 4
I_END_ROW = 3
TABLES
INTERN = JTAB.
LOOP AT JTAB INTO WJTAB.
CASE WJTAB-COL.
WHEN '0001'.
MOVE: WJTAB-VALUE TO WITAB-V1.
WHEN '0002'.
MOVE: WJTAB-VALUE TO WITAB-V2.
WHEN '0003'.
MOVE: WJTAB-VALUE TO WITAB-V3.
WHEN '0004'.
MOVE: WJTAB-VALUE TO WITAB-V4.
ENDCASE.
AT END OF ROW.
APPEND WITAB TO ITAB.
CLEAR WITAB.
ENDAT.
CLEAR WJTAB.
ENDLOOP.
Link for creating IDOCS:
[http://sapabapnotes.blogspot.com/2008/05/sample-abap-program-for-create-idoc.html]
Reward points if helpful.
Thanks and Regards
| User | Count |
|---|---|
| 3 | |
| 1 | |
| 1 | |
| 1 | |
| 1 | |
| 1 | |
| 1 | |
| 1 | |
| 1 | |
| 1 |