Community
Application Development and Automation Discussions
Join the discussions or start your own on all things application development, including tools and APIs, programming models, and keeping your skills sharp.
cancel
Turn on suggestions
Auto-suggest helps you quickly narrow down your search results by suggesting possible matches as you type.
Showing results for 
Search instead for 
Did you mean: 
Read only

posting_interface_document

SG141
Active Participant

‎2007 Aug 21 9:35 PM

0 Likes
552

can i get example of sample program with this fm.

3 REPLIES 3
Read only

SG141
Active Participant

‎2007 Aug 21 9:46 PM

0 Likes
448

can i also get a sample program of bapi_acc_document_post

Read only

Former Member
In response to SG141

‎2007 Aug 21 10:01 PM

0 Likes
448

WA_RETURN LIKE BAPIRET2.

DATA:

WA_CURRENCY TYPE BAPIACCR09,

WA_CUSTOMER TYPE bapiacar09,

WA_RETURN2 TYPE BAPIRET2,

WA_RETURN3 TYPE BAPIRET2,

WA_ACCOUNTGL TYPE BAPIACGL09.

START-OF-SELECTION.

WA_DOCUMENTHEADER-OBJ_TYPE = 'IDOC'.

CONCATENATE SY-SYSID 'CLNT' SY-MANDT INTO WA_DOCUMENTHEADER-OBJ_SYS.

WA_DOCUMENTHEADER-OBJ_KEY = '$'.

WA_DOCUMENTHEADER-USERNAME = SY-UNAME.

WA_DOCUMENTHEADER-COMP_CODE = 'GOVP'.

WA_DOCUMENTHEADER-BUS_ACT = 'RFBU'.

WA_DOCUMENTHEADER-HEADER_TXT = 'BAPI TEST'.

WA_DOCUMENTHEADER-FISC_YEAR = '2007'.

WA_DOCUMENTHEADER-DOC_DATE = SY-DATUM.

WA_DOCUMENTHEADER-PSTNG_DATE = SY-DATUM.

WA_DOCUMENTHEADER-FIS_PERIOD = ' '.

WA_DOCUMENTHEADER-DOC_TYPE = 'DR'.

WA_DOCUMENTHEADER-ref_doc_no = '1234512345'.

*--One time customer data

Data : wa_onetimecust type BAPIACPA09.

wa_onetimecust-NAME = 'Mr'.

wa_onetimecust-NAME_2 = 'OneTimeCustomer'.

wa_onetimecust-CITY = 'Bangalore'.

wa_onetimecust-COUNTRY = 'India'.

*---end:One time customer data

WA_CUSTOMER-itemno_acc = '1'.

CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'

EXPORTING

input = '100000'

IMPORTING

output = WA_CUSTOMER-CUSTOMER.

WA_CUSTOMER-comp_code = 'GOVP'.

APPEND WA_CUSTOMER TO it_bapiacar09.

CLEAR: WA_ACCOUNTGL.

WA_ACCOUNTGL-ITEMNO_ACC = 2.

CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'

EXPORTING

input = '6100.2600'

IMPORTING

output = WA_ACCOUNTGL-gl_account.

WA_ACCOUNTGL-COMP_CODE = 'GOVP'.

WA_ACCOUNTGL-ITEM_TEXT = 'TO CUSTOMER' .

WA_ACCOUNTGL-COSTCENTER = 'DUMMY'.

APPEND WA_ACCOUNTGL TO IT_ACCOUNTGL.

CLEAR: WA_ACCOUNTGL.

CLEAR: WA_CURRENCY.

CLEAR: WA_CURRENCY.

WA_CURRENCY-ITEMNO_ACC = 1.

WA_CURRENCY-CURR_TYPE = '00'.

WA_CURRENCY-CURRENCY = 'USD'.

WA_CURRENCY-AMT_DOCCUR = 10.

APPEND WA_CURRENCY TO IT_CURRENCY.

CLEAR: WA_CURRENCY.

WA_CURRENCY-ITEMNO_ACC = 2.

WA_CURRENCY-CURR_TYPE = '00'.

WA_CURRENCY-CURRENCY = 'USD'.

WA_CURRENCY-AMT_DOCCUR = -10.

APPEND WA_CURRENCY TO IT_CURRENCY.

  • --------------------------------------------------------

  • Post

  • --------------------------------------------------------

CALL FUNCTION 'BAPI_ACC_DOCUMENT_POST'

EXPORTING

DOCUMENTHEADER = WA_DOCUMENTHEADER

CUSTOMERCPD = wa_onetimecust

IMPORTING

OBJ_TYPE = OBJ_TYPE

OBJ_KEY = OBJ_KEY

OBJ_SYS = OBJ_SYS

TABLES

ACCOUNTGL = IT_ACCOUNTGL

accountreceivable = it_bapiacar09

CURRENCYAMOUNT = IT_CURRENCY

RETURN = IT_RETURN.

LOOP AT IT_RETURN INTO WA_RETURN.

WRITE : /1 WA_RETURN-MESSAGE.

ENDLOOP.

CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'

EXPORTING

WAIT = 'X'

IMPORTING

RETURN = WA_RETURN3.

Read only

SG141
Active Participant
In response to SG141

‎2007 Aug 21 10:08 PM

0 Likes
448

[code]DATA:

WA_CURRENCY TYPE BAPIACCR09,

WA_CUSTOMER TYPE bapiacar09,

WA_RETURN2 TYPE BAPIRET2,

WA_RETURN3 TYPE BAPIRET2,

WA_ACCOUNTGL TYPE BAPIACGL09.

START-OF-SELECTION.

WA_DOCUMENTHEADER-OBJ_TYPE = 'IDOC'.

CONCATENATE SY-SYSID 'CLNT' SY-MANDT INTO WA_DOCUMENTHEADER-OBJ_SYS.

WA_DOCUMENTHEADER-OBJ_KEY = '$'.

WA_DOCUMENTHEADER-USERNAME = SY-UNAME.

WA_DOCUMENTHEADER-COMP_CODE = 'GOVP'.

WA_DOCUMENTHEADER-BUS_ACT = 'RFBU'.

WA_DOCUMENTHEADER-HEADER_TXT = 'BAPI TEST'.

WA_DOCUMENTHEADER-FISC_YEAR = '2007'.

WA_DOCUMENTHEADER-DOC_DATE = SY-DATUM.

WA_DOCUMENTHEADER-PSTNG_DATE = SY-DATUM.

WA_DOCUMENTHEADER-FIS_PERIOD = ' '.

WA_DOCUMENTHEADER-DOC_TYPE = 'DR'.

WA_DOCUMENTHEADER-ref_doc_no = '1234512345'.

*--One time customer data

Data : wa_onetimecust type BAPIACPA09.

wa_onetimecust-NAME = 'Mr'.

wa_onetimecust-NAME_2 = 'OneTimeCustomer'.

wa_onetimecust-CITY = 'Bangalore'.

wa_onetimecust-COUNTRY = 'India'.

*---end:One time customer data

WA_CUSTOMER-itemno_acc = '1'.

CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'

EXPORTING

input = '100000'

IMPORTING

output = WA_CUSTOMER-CUSTOMER.

WA_CUSTOMER-comp_code = 'GOVP'.

APPEND WA_CUSTOMER TO it_bapiacar09.

CLEAR: WA_ACCOUNTGL.

WA_ACCOUNTGL-ITEMNO_ACC = 2.

CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'

EXPORTING

input = '6100.2600'

IMPORTING

output = WA_ACCOUNTGL-gl_account.

WA_ACCOUNTGL-COMP_CODE = 'GOVP'.

WA_ACCOUNTGL-ITEM_TEXT = 'TO CUSTOMER' .

WA_ACCOUNTGL-COSTCENTER = 'DUMMY'.

APPEND WA_ACCOUNTGL TO IT_ACCOUNTGL.

CLEAR: WA_ACCOUNTGL.

CLEAR: WA_CURRENCY.

CLEAR: WA_CURRENCY.

WA_CURRENCY-ITEMNO_ACC = 1.

WA_CURRENCY-CURR_TYPE = '00'.

WA_CURRENCY-CURRENCY = 'USD'.

WA_CURRENCY-AMT_DOCCUR = 10.

APPEND WA_CURRENCY TO IT_CURRENCY.

CLEAR: WA_CURRENCY.

WA_CURRENCY-ITEMNO_ACC = 2.

WA_CURRENCY-CURR_TYPE = '00'.

WA_CURRENCY-CURRENCY = 'USD'.

WA_CURRENCY-AMT_DOCCUR = -10.

APPEND WA_CURRENCY TO IT_CURRENCY.

  • --------------------------------------------------------

  • Post

  • --------------------------------------------------------

CALL FUNCTION 'BAPI_ACC_DOCUMENT_POST'

EXPORTING

DOCUMENTHEADER = WA_DOCUMENTHEADER

CUSTOMERCPD = wa_onetimecust

IMPORTING

OBJ_TYPE = OBJ_TYPE

OBJ_KEY = OBJ_KEY

OBJ_SYS = OBJ_SYS

TABLES

ACCOUNTGL = IT_ACCOUNTGL

accountreceivable = it_bapiacar09

CURRENCYAMOUNT = IT_CURRENCY

RETURN = IT_RETURN.

LOOP AT IT_RETURN INTO WA_RETURN.

WRITE : /1 WA_RETURN-MESSAGE.

ENDLOOP.

CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'

EXPORTING

WAIT = 'X'

IMPORTING

RETURN = WA_RETURN3. [/code]