2015 May 07 1:11 PM
Dear ABAPer
My requirement is to create customer BAPI for this I have use BAPI_CUSTOMER_CREATEFROMDATA1 but I have received error like I am changing customer
error : - No reference customer exists for sales area 1011 06 00
So required help
2015 May 07 1:19 PM
2015 May 07 1:29 PM
2015 May 07 1:43 PM
you can check this example code:
| Data: copyref | LIKE bapikna102. |
| copyref-salesorg | = '0010'. | |
| copyref-distr_chan | = '01'. | |
| copyref-division | = '02'. | |
| copyref-ref_custmr | = '0000200121'. |
CALL FUNCTION 'BAPI_CUSTOMER_CREATEFROMDATA1'
| EXPORTING | ||
| pi_personaldata | = perdata | |
| pi_opt_personaldata = peropt | ||
| pi_copyreference | = copyref | |
| IMPORTING | ||
| customerno | = custnno | |
| return | = return_list. |
2015 May 08 6:59 AM
where i am doing wrong
"_____________________________________________________________
*&---------------------------------------------------------------------*
*& Report ZTEST_LAST
*&
*&---------------------------------------------------------------------*
*&
*&
*&---------------------------------------------------------------------*
report ztest_customer.
data : cpd like bapikna101_1 occurs 0 with header line,
ocpd like bapikna105 occurs 0 with header line,
ccd like bapikna106 occurs 0 with header line,
occd like bapikna105 occurs 0 with header line,
acm like bapikna107 occurs 0 with header line,
rd like bapikna102 occurs 0 with header line,
uccd like bapikna108 occurs 0 with header line.
data : return like bapireturn1 occurs 0 with header line.
data : begin of it_error occurs 0,
err_msg(73) type c, "TO RETREIVE ERROR MESSAGES
end of it_error.
data : begin of it_success occurs 0,
customerno like bapikna103-customer ,
srno(4),
end of it_success.
data : customerno like bapikna103-customer.
data: tot_rec type i, "Total Records
gd_update type i, "Main Table Increement Counter
gd_lines type i, "Success Table increement Counter
w_textout like t100-text. "VARIABLE TO GET ERRORLOG
selection-screen begin of block b1 with frame title text-001.
parameters:p_file type rlgrap-filename.
selection-screen end of block b1.
"________________________________________________
" Customer Personal Data
cpd-title_p = 'Company'.
cpd-firstname = 'Sri Raghavendra Stationary & Gen. Store'.
cpd-lastname = '13-2, Main Road,Toopran-502334,Dist: Medak (A.P.)'.
cpd-middlename = '.'.
cpd-secondname = '.'.
*cpd-date_birth =
cpd-city = 'TOOPRAN'.
*cpd-district =
cpd-postl_cod1 = '502334'.
*cpd-postl_cod2 =
*cpd-po_box =
*cpd-po_box_cit =
cpd-street = ' '.
*cpd-house_no =
*cpd-building =
*cpd-floor =
*cpd-room_no =
cpd-country = 'IN'.
*cpd-countryiso =
cpd-region = 'AP'.
cpd-tel1_numbr = '9490867337'.
*cpd-tel1_ext =
*cpd-fax_number =
*cpd-fax_extens =
cpd-e_mail = 'dheeraj.late1@gmail.com'.
cpd-langu_p =
cpd-langup_iso =
cpd-currency = 'INR'.
*cpd-currency_iso =
*cpd-currency_iso =
*cpd-title_key =
*cpd-only_change_comaddress =
append cpd.
"_____________________ " Optional Customer Personal Data
*ocpd-TRANSPZONE =
ocpd-control_account = '20402010'.
"ocpd-PMNTTRMS =
ocpd-ship_cond = '01'.
ocpd-delyg_plnt = '1108'.
ocpd-part_dlv = '9'.
*ocpd-C_CTR_AREA =
*ocpd-TAXJURCODE =
append ocpd.
acm-consumer_flag = 'X'.
append acm.
"______________________Reference Data
rd-salesorg = '1011'.
rd-distr_chan = '06' .
rd-division = '00'.
rd-ref_custmr = '142645' .
append rd.
"__________________"update_credit_control_data
uccd-x_flag = 'X'.
append uccd.
"_________________________________
call function 'BAPI_CUSTOMER_CREATEFROMDATA1'
exporting
pi_personaldata = cpd
pi_opt_personaldata = ocpd
pi_companydata = ccd
pi_opt_companydata = occd
pi_consumeren = acm
pi_copyreference = rd
pi_credit_control_flag = uccd
importing
customerno = customerno
return = return
.
**loop at RETURN.
*
* loop at RETURN.
* READ TABLE return.
write : return-message.
*ENDLOOP.
** ENDLOOP.