BAPI Usage for KE21N

Former Member — Wed, 20 May 2009 04:48:11 GMT

Hello,

I am using the BAPI BAPI_COPAACTUALS_POSTCOSTDATA for reposting Documents in KE21N (CO-PA) Transaction. Now, when I am executing my Test Program in which I've included this BAPI call as well as BAPI_TRANSACTION_COMMIT, I get an error message.

E KEBAPI 1 000000

Can someone please help me with the Usage of this BAPI?

Thanks and Regards,

Venkata Phani Prasad K

Re: BAPI Usage for KE21N

Former Member — Wed, 20 May 2009 06:15:20 GMT

Issue Resolved.

Thanks and Regards,

Venkata Phani Prasad K

Re: BAPI Usage for KE21N

former_member54490 — Mon, 01 Jun 2009 15:47:39 GMT

Dear Konduri Venkata,

I also want to use the BAPI BAPI_COPAACTUALS_POSTCOSTDATA for reposting Documents in KE21N (CO-PA) Transaction. But I don't know how to develop its program and how to use it.

can you tell me more information about BAPI_COPAACTUALS_POSTCOSTDATA for reposting documents in ke21n.

thanks...

Re: BAPI Usage for KE21N

Former Member — Tue, 02 Jun 2009 04:13:33 GMT

Hello,

Here is the Sample Program for Reposting Documents in KE21N.

REPORT ypha_test_ke21n NO STANDARD PAGE HEADING.

DATA: i_dat TYPE STANDARD TABLE OF bapi_copa_data,

wa_dat TYPE bapi_copa_data,

p_recno TYPE rke_record_id VALUE '000001',

i_field TYPE STANDARD TABLE OF bapi_copa_field,

wa_field TYPE bapi_copa_field,

i_return TYPE STANDARD TABLE OF bapiret2,

wa_return TYPE bapiret2.

PARAMETERS: p_erkrs TYPE tkeb-erkrs OBLIGATORY.

START-OF-SELECTION.

REFRESH i_dat.

CLEAR wa_dat.

wa_dat-record_id = p_recno.

wa_dat-fieldname = 'VRGAR'.

wa_dat-value = 'X'.

wa_dat-currency = 'EUR'.

APPEND wa_dat TO i_dat.

p_recno = p_recno + 1.

CLEAR wa_dat.

wa_dat-record_id = p_recno.

wa_dat-fieldname = 'BUDAT'.

wa_dat-value = sy-datum.

wa_dat-currency = 'EUR'.

APPEND wa_dat TO i_dat.

p_recno = p_recno + 1.

CLEAR wa_dat.

wa_dat-record_id = p_recno.

wa_dat-fieldname = 'BUKRS'.

wa_dat-value = '3290'.

wa_dat-currency = 'EUR'.

APPEND wa_dat TO i_dat.

p_recno = p_recno + 1.

CLEAR wa_dat.

wa_dat-record_id = p_recno.

wa_dat-fieldname = 'VKORG'.

wa_dat-value = '3290'.

wa_dat-currency = 'EUR'.

APPEND wa_dat TO i_dat.

CLEAR wa_dat.

wa_dat-record_id = p_recno.

wa_dat-fieldname = 'VTWEG'.

wa_dat-value = '10'.

wa_dat-currency = 'EUR'.

APPEND wa_dat TO i_dat.

CLEAR wa_dat.

wa_dat-record_id = p_recno.

wa_dat-fieldname = 'SPART'.

wa_dat-value = '99'.

wa_dat-currency = 'EUR'.

APPEND wa_dat TO i_dat.

CLEAR wa_dat.

wa_dat-record_id = p_recno.

wa_dat-fieldname = 'WERKS'.

wa_dat-value = 'FR01'.

wa_dat-currency = 'EUR'.

APPEND wa_dat TO i_dat.

CLEAR wa_dat.

wa_dat-record_id = p_recno.

wa_dat-fieldname = 'WW002'.

wa_dat-value = '1101'.

wa_dat-currency = 'EUR'.

APPEND wa_dat TO i_dat.

CLEAR wa_dat.

wa_dat-record_id = p_recno.

wa_dat-fieldname = 'FRWAE'.

wa_dat-value = 'EUR'.

APPEND wa_dat TO i_dat.

CLEAR wa_dat.

wa_dat-record_id = p_recno.

wa_dat-fieldname = 'ABSMG'.

wa_dat-value = '-1'.

wa_dat-currency = 'EUR'.

APPEND wa_dat TO i_dat.

CLEAR wa_dat.

wa_dat-record_id = p_recno.

wa_dat-fieldname = 'ABSMG_ME'.

wa_dat-value = 'CS'.

wa_dat-currency = 'EUR'.

APPEND wa_dat TO i_dat.

REFRESH i_field.

CLEAR: wa_field.
wa_field-fieldname = 'ERKRS'.
APPEND wa_field TO i_field.

CLEAR: wa_field.

wa_field-fieldname = 'VRGAR'.

APPEND wa_field TO i_field.

CLEAR: wa_field.

wa_field-fieldname = 'BUKRS'.

APPEND wa_field TO i_field.

CLEAR: wa_field.

wa_field-fieldname = 'VKORG'.

APPEND wa_field TO i_field.

CLEAR: wa_field.

wa_field-fieldname = 'VTWEG'.

APPEND wa_field TO i_field.

CLEAR: wa_field.

wa_field-fieldname = 'SPART'.

APPEND wa_field TO i_field.

CLEAR: wa_field.

wa_field-fieldname = 'WERKS'.

APPEND wa_field TO i_field.

CLEAR: wa_field.

wa_field-fieldname = 'WW002'.

APPEND wa_field TO i_field.

CLEAR: wa_field.

wa_field-fieldname = 'FRWAE'.

APPEND wa_field TO i_field.

CLEAR: wa_field.

wa_field-fieldname = 'ABSMG'.

APPEND wa_field TO i_field.

CLEAR: wa_field.

wa_field-fieldname = 'ABSMG_ME'.

APPEND wa_field TO i_field.

CLEAR: wa_field.

wa_field-fieldname = 'BUDAT'.

APPEND wa_field TO i_field.

break vprasad.

CALL FUNCTION 'BAPI_COPAACTUALS_POSTCOSTDATA'

EXPORTING

operatingconcern = p_erkrs

testrun = space

TABLES

inputdata = i_dat[]

fieldlist = i_field[]

return = i_return[].

CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'.

CLEAR: wa_return.

LOOP AT i_return INTO wa_return.

WRITE:/ wa_return-type,

wa_return-id,

wa_return-message_v1,

wa_return-message_v2,

wa_return-message_v3,

wa_return-message_v4.

ENDLOOP.

Hope it would be of help.

Thanks and Regards,

Venkata Phani Prasad K

topic BAPI Usage for KE21N in Application Development and Automation Discussions

BAPI Usage for KE21N

Re: BAPI Usage for KE21N

Re: BAPI Usage for KE21N

Re: BAPI Usage for KE21N