BAPI

[Former Member]

Hey can anyone post a sample program to create a customer using BAPIs?.

[Former Member]

hi check this..

BAPI_CUSTOMER_CREATEFROMDATA1

[Former Member]

I've seen that.

I need a sample code to get started with.

Because this is just the start of something big im planning to do

[Former Member]

Hi,

Check this link for sample code,

Regards

Adil

[Former Member]

I want to use this BAPI

BAPI_CUSTOMER_CREATEFROMDATA1

[Former Member]

Hi Dexter,

Try this:

&----

---

*& Report ZBAPINQTEST *

*& *

&----

---

*& *

*& *

&----

---

REPORT ZBAPINQTEST.

data WA_HEADER like BAPISDHEAD occurs 0 with header line.

data:wa_item_in like BAPIITEMIN occurs 0 with header line.

data:ZDATUM like BAPIITEMIN-BILL_DATE.

data:ZITMDATE like BAPIITEMIN-BILL_DATE.

data:WA_PARTNERS like BAPIPARTNR occurs 0 with header line.

data: ZSALESDOCUMENT like BAPIVBELN-VBELN,

ZSOLD_TO_PARTY like BAPISOLDTO,

ZSHIP_TO_PARTY like BAPISHIPTO,

ZBILLING_PARTY like BAPIPAYER.

data:ZRETURN like BAPIRETURN1.

data:ZORDER_ITEMS_OUT like BAPIITEMEX occurs 0 with header line.

data:ORDER_CFGS_REF like BAPICUCFG occurs 0 with header line.

data:ORDER_CFGS_INST like BAPICUINS occurs 0 with header line.

data:ORDER_CFGS_PART_OF like BAPICUPRT occurs 0 with header line.

data:ORDER_CFGS_VALUE like BAPICUVAL occurs 0 with header line.

DATA:S_MESS TYPE STRING.

ZDATUM = '20071212'."SY-DATUM.

ZITMDATE = ZDATUM.

*-HEADER-

WA_HEADER-DOC_TYPE = 'ZIR'.

WA_HEADER-SALES_ORG = '3000'.

WA_HEADER-DISTR_CHAN = '40'.

WA_HEADER-DIVISION = '10'.

WA_HEADER-REQ_DATE_H = ZDATUM.

WA_HEADER-PURCH_DATE = ZDATUM.

WA_HEADER-PRICE_DATE = ZDATUM.

WA_HEADER-CT_VALID_F = '20071212'.

WA_HEADER-CT_VALID_T = '20071226'.

*append WA_HEADER.

*clear WA_HEADER.

*-ITEMS

wa_item_in-ITM_NUMBER = 1.

WA_ITEM_IN-PO_ITM_NO = 1.

WA_ITEM_IN-MATERIAL = 'APACK_SL_V2'.

WA_ITEM_IN-BILL_DATE = ZITMDATE.

WA_ITEM_IN-PLANT = '0010'.

WA_ITEM_IN-TARGET_QTY = 3.

WA_ITEM_IN-TARGET_QU = 'EA'.

WA_ITEM_IN-REQ_QTY = 3000.

WA_ITEM_IN-SALES_UNIT = 'EA'.

WA_ITEM_IN-ITEM_CATEG = 'AFC'.

WA_ITEM_IN-REQ_DATE = ZITMDATE.

WA_ITEM_IN-COND_TYPE = 'ZE01'.

WA_ITEM_IN-COND_VALUE = '235.67'.

WA_ITEM_IN-PURCH_DATE = ZITMDATE.

WA_ITEM_IN-PURCH_NO_S = 'D1200001'.

WA_ITEM_IN-SHORT_TEXT = 'this is a test'.

APPEND WA_ITEM_IN.

CLEAR WA_ITEM_IN.

wa_item_in-ITM_NUMBER = 2.

WA_ITEM_IN-HG_LV_ITEM = 1.

WA_ITEM_IN-PO_ITM_NO = 2.

WA_ITEM_IN-MATERIAL = 'SL-CARP-SHOP'.

WA_ITEM_IN-BILL_DATE = ZITMDATE.

WA_ITEM_IN-PLANT = '0010'.

WA_ITEM_IN-TARGET_QTY = 3.

WA_ITEM_IN-TARGET_QU = 'EA'.

WA_ITEM_IN-REQ_QTY = 3000.

WA_ITEM_IN-SALES_UNIT = 'EA'.

WA_ITEM_IN-ITEM_CATEG = 'ZZFC'.

WA_ITEM_IN-REQ_DATE = ZITMDATE.

WA_ITEM_IN-COND_TYPE = 'ZE01'.

WA_ITEM_IN-COND_VALUE = '500.00'.

WA_ITEM_IN-PURCH_DATE = ZITMDATE.

WA_ITEM_IN-PURCH_NO_S = 'D1200001'.

APPEND WA_ITEM_IN.

order_cfgs_ref-posex = '000001'.

order_cfgs_ref-config_id = '000001'.

order_cfgs_ref-root_id = '000001'.

APPEND order_cfgs_ref.

order_cfgs_value-config_id = '000002'.

order_cfgs_value-inst_id = '000002'.

order_cfgs_value-charc = 'SL-CARP-SHOP'.

order_cfgs_value-value = 'A'.

APPEND order_cfgs_value.

order_cfgs_value-config_id = '000001'.

order_cfgs_value-inst_id = '000001'.

order_cfgs_value-charc = 'M10142_A_SIZE'.

order_cfgs_value-value = '43-23-135'.

APPEND order_cfgs_value.

*Table KNVP

WA_PARTNERS-PARTN_ROLE = 'WE'.

WA_PARTNERS-PARTN_NUMB = '0000000007'.

APPEND WA_PARTNERS.

*******

CALL FUNCTION 'CUXC_INIT'.

CALL FUNCTION 'BAPI_INQUIRY_CREATEFROMDATA'

EXPORTING

ORDER_HEADER_IN = WA_HEADER

IMPORTING

SALESDOCUMENT = ZSALESDOCUMENT

SOLD_TO_PARTY = ZSOLD_TO_PARTY

SHIP_TO_PARTY = ZSHIP_TO_PARTY

BILLING_PARTY = ZBILLING_PARTY

RETURN = ZRETURN

TABLES

ORDER_ITEMS_IN = WA_ITEM_IN

ORDER_PARTNERS = WA_PARTNERS

ORDER_ITEMS_OUT = ZORDER_ITEMS_OUT

ORDER_CFGS_REF = ORDER_CFGS_REF

ORDER_CFGS_INST = ORDER_CFGS_INST

ORDER_CFGS_PART_OF = ORDER_CFGS_PART_OF

ORDER_CFGS_VALUE = ORDER_CFGS_VALUE

EXCEPTIONS

OTHERS = 1.

CONCATENATE ZSALESDOCUMENT ' CREATED' INTO S_MESS .

if Zreturn is initial.

MESSAGE S_MESS TYPE 'S'.

else.

message Zreturn-MESSAGE type 'S'.

endif.

Hope this helps you.

Regards,

Chandra Sekhar

[Former Member]

I think you are creating a sales order