Hello All,
I am having a flat file which contains data for creating sales order. But I am unable to create sales order using BAPI.
Here first I have created a demo program after wards I will conver it to final program.
Following is my demo source code. Kindly let me know what I am missing.
Regards,
Dilip
data : iBAPISDHEAD like BAPISDHEAD occurs 10 with header line,
iBAPIITEMIN like BAPIITEMIN occurs 10 with header line,"Item data input
iBAPIPARTNR like BAPIPARTNR occurs 10 with header line."partners
iBAPISDHEAD-DOC_NUMBER = '1'.
iBAPISDHEAD-doc_type = 'BV'.
iBAPISDHEAD-SALES_ORG = '1000'.
iBAPISDHEAD-DISTR_CHAN = '10'.
iBAPISDHEAD-DIVISION = '10'.
append iBAPISDHEAD.
*clear iBAPISDHEAD.
*****Item details
iBAPIITEMIN-ITM_NUMBER = '10'.
iBAPIITEMIN-MATERIAL = 'SMB_FERT04'.
append iBAPIITEMIN.
*clear iBAPIITEMIN.
End Item details
*****Partner functions
iBAPIPARTNR-PARTN_ROLE = 'AA'.
iBAPIPARTNR-PARTN_NUMB = '1'.
iBAPIPARTNR-ITM_NUMBER = '10'.
append iBAPIPARTNR.
*clear iBAPIPARTNR.
*****end partner functions
***NEW ADDITION
data : iBAPI_VBELN like BAPIVBELN-VBELN.
data : iBAPISOLDTO like BAPISOLDTO occurs 10 with header line."SOLD TO PARTY
data : iBAPISHIPTO like BAPISHIPTO occurs 10 with header line."SHIP TO PARTY
***pass data to BAPISOLDTO
iBAPISOLDTO-SOLD_TO = '1'.
iBAPISOLDTO-NAME = 'Test customer1'.
append iBAPISOLDTO.
***end pass data to BAPISOLDTO
***pass data to iBAPISHIPTO
iBAPISHIPTO-SHIP_TO = '1'.
iBAPISHIPTO-NAME = 'Test customer1'.
append iBAPISHIPTO.
***end pass data to BAPISOLDTO
***end addition
CALL FUNCTION 'BAPI_SALESORDER_CREATEFROMDAT1'
EXPORTING
ORDER_HEADER_IN = iBAPISDHEAD
WITHOUT_COMMIT = 'X'
CONVERT_PARVW_AUART = 'X'
IMPORTING
SALESDOCUMENT = iBAPI_VBELN
SOLD_TO_PARTY = iBAPISOLDTO
SHIP_TO_PARTY = iBAPISHIPTO
BILLING_PARTY = '1'
RETURN =
TABLES
ORDER_ITEMS_IN = iBAPIITEMIN
ORDER_PARTNERS = iBAPIPARTNR
ORDER_ITEMS_OUT =
ORDER_CFGS_REF =
ORDER_CFGS_INST =
ORDER_CFGS_PART_OF =
ORDER_CFGS_VALUE =
ORDER_CCARD =
ORDER_CFGS_BLOB =
ORDER_SCHEDULE_EX =
.
CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'
EXPORTING
WAIT = 'X'
IMPORTING
RETURN =
.