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

BAPI_ACC_INVOICE_RECEIPT_POST for vendor invoice posting

Former Member

‎2009 Aug 12 11:17 AM

0 Likes
5,751

Hi ,

I am using BAPI_ACC_INVOICE_RECEIPT_POST for vendor invoice posting, I have made the header , and account paybale table

, can any body give link for the sample code or give me sample code.

Hi ,

I am using BAPI_ACC_INVOICE_RECEIPT_POST for vendor invoice posting, I have made the header , and account paybale table

, can any body give link for the sample code or give me sample code.

Reply
7 REPLIES 7
Read only

Former Member

‎2009 Aug 12 12:12 PM

0 Likes
2,729

Hi amresh

see the following example 


data : GD_DOCUMENTHEADER LIKE BAPIACHE03,
GD_CUSTOMERCPD LIKE BAPIACPA00,
IT_ACCOUNTPAYABLE LIKE BAPIACAP03 OCCURS 0 WITH HEADER LINE,
IT_ACCOUNTGL LIKE BAPIACGL03 OCCURS 0 WITH HEADER LINE,
IT_ACCOUNTTAX LIKE BAPIACTX01 OCCURS 0 WITH HEADER LINE,
IT_CRITERIA LIKE BAPIACKECR OCCURS 0 WITH HEADER LINE,
IT_VALUEFIELD LIKE BAPIACKEVA OCCURS 0 WITH HEADER LINE,
IT_CURRENCYAMOUNT LIKE BAPIACCR01 OCCURS 0 WITH HEADER LINE,
IT_RETURN LIKE BAPIRET2 OCCURS 0 WITH HEADER LINE,
IT_PURCHASEORDER LIKE BAPIACPO00 OCCURS 0 WITH HEADER LINE,
IT_PURCHASEAMOUNT LIKE BAPIACCRPO OCCURS 0 WITH HEADER LINE,
IT_RECEIVERS LIKE BDI_LOGSYS OCCURS 0 WITH HEADER LINE.


CALL FUNCTION 'BAPI_ACC_INVOICE_RECEIPT_POST'
EXPORTING
DOCUMENTHEADER = GD_DOCUMENTHEADER
CUSTOMERCPD = GD_CUSTOMERCPD
* IMPORTING
* OBJ_TYPE =
* OBJ_KEY =
* OBJ_SYS =
TABLES
ACCOUNTPAYABLE = IT_ACCOUNTPAYABLE
ACCOUNTGL = IT_ACCOUNTGL
ACCOUNTTAX = IT_ACCOUNTTAX
CURRENCYAMOUNT = IT_CURRENCYAMOUNT
PURCHASEORDER = IT_PURCHASEORDER
PURCHASEAMOUNT = IT_PURCHASEAMOUNT
RETURN = IT_RETURN
CRITERIA = IT_CRITERIA
VALUEFIELD = IT_VALUEFIELD
* EXTENSION1 = it_EXTENSION1
.

WRITE: / 'Result of post:'.

Read only

Former Member

‎2009 Aug 12 12:26 PM

0 Likes
2,729

also check

Read only

Former Member

‎2009 Aug 12 12:34 PM

0 Likes
2,729

Hi all,

what is the role of ORDERID in BAPIACGL03 (Posting in FI/CO: Invoice Receipt).

Can i have more than one ORDERID for same GL account.

Kindly answer my query.

Read only

Former Member

‎2009 Aug 12 12:39 PM

0 Likes
2,729

see another example 


REPORT zacm_test NO STANDARD PAGE HEADING
                 LINE-COUNT 65
                 LINE-SIZE 132.
 
DATA:
wait          TYPE bapita-wait,
comm_return   TYPE bapiret2,
obj_type      TYPE bapiache02-obj_type,
obj_key       TYPE bapiache02-obj_key,
obj_sys       TYPE bapiache02-obj_sys,
 
accountgl     LIKE STANDARD TABLE OF bapiacgl03,    "Structure
wa_accountgl  LIKE LINE OF accountgl,
 
docheader     TYPE bapiache03,                      "Structure
 
accountpay    TYPE STANDARD TABLE OF bapiacap03,    "Structure
wa_accountpay LIKE LINE OF accountpay,
 
accounttax    TYPE STANDARD TABLE OF bapiactx01,    "Structure
wa_accounttax LIKE LINE OF accounttax,
 
curramount    TYPE STANDARD TABLE OF bapiaccr01,    "Structure
wa_curramount LIKE LINE OF curramount,
 
return        TYPE STANDARD TABLE OF bapiret2,      "Structure
wa_return     LIKE LINE OF return,
 
extension1    TYPE STANDARD TABLE OF bapiextc,      "Structure
wa_extension1 LIKE LINE OF extension1.
 
 
START-OF-SELECTION.
 
  PERFORM build_header_rec.
  PERFORM build_bapi_parameters1.
  PERFORM build_bapi_parameters2.
  PERFORM build_bapi_parameters3.
  PERFORM build_bapi_parameters4.
  PERFORM update_gl.
 
 
*&---------------------------------------------------------------------*
*&      Form  build_header_rec
*&---------------------------------------------------------------------*
FORM build_header_rec.
*build header data for bapi
  CALL FUNCTION 'OWN_LOGICAL_SYSTEM_GET'
    IMPORTING
      own_logical_system = docheader-obj_sys.
 
  docheader-obj_type   = 'BKPFF'.
  docheader-obj_key    = 'test1'.
  docheader-username     = sy-uname.
  docheader-comp_code    = '0050'.      " Company Code
  docheader-fisc_year    = '2006'.      " Fiscal Year
  docheader-doc_date     = '12012006'.  " Document Date
  docheader-pstng_date   = '12012006'.  " Posting Date
  docheader-trans_date   = '12012006'.  " Translation Date
  docheader-fis_period   = '12'.        " Fiscal Period
  docheader-doc_type     = 'KQ'.        " Document Type
  docheader-ref_doc_no   = 'T&S'.       " Reference
ENDFORM.                    " build_header_rec

Read only

Former Member

‎2009 Aug 12 12:40 PM

0 Likes
2,729

continue......


*&---------------------------------------------------------------------*
*&      Form  build_bapi_parameters1
*&---------------------------------------------------------------------*
*       text
*----------------------------------------------------------------------*
FORM build_bapi_parameters1.
 
*Build Accounts Payable data for BAPI
  wa_accountpay-itemno_acc = 1.                 " Line Item Number
  wa_accountpay-vendor_no  = 'TSA01004'.        " Vendor Number
  wa_accountpay-gl_account = '0000290430'.      " GL Account Number
  wa_accountpay-pmnttrms   = 'NT00'.            " Payment Terms
  wa_accountpay-bline_date = '12012006'.        " Bline Date
  wa_accountpay-pmtmthsupl = '06'.              " Payment Method Supplement
  wa_accountpay-pymt_meth  = 'S'.               " Payment Method
  wa_accountpay-item_text  = '*T&S Withdrawal'. " Text
  wa_accountpay-w_tax_code = '**'.              " Tax Code
  APPEND wa_accountpay TO accountpay.
  CLEAR wa_accountpay.
 
*Build account GL data for BAPI
  wa_accountgl-itemno_acc   = 1.             " Line Item Number
  wa_accountgl-gl_account   = '0000290430'.  " GL Account Number
  wa_accountgl-comp_code    = '0050'.        " Company Code
  wa_accountgl-pstng_date   = '12012006'.    " Posting Date
  wa_accountgl-doc_type     = 'KQ'.          " Document Type
  wa_accountgl-fisc_year    = '2006'.        " Fiscal Year
  wa_accountgl-fis_period   = '12'.          " Fiscal Period
  wa_accountgl-item_text    = ''.            " Item Text
  APPEND wa_accountgl TO accountgl.
  CLEAR wa_accountgl.
 
*Build currency data for BAPI
  wa_curramount-itemno_acc   = 1.             " Line Item Number
  wa_curramount-curr_type    = '00'.          " Currency Type
  wa_curramount-currency     = 'USD'.          " Currency Key
  wa_curramount-currency_iso = 'USD'.         " ISO Code
  wa_curramount-amt_doccur   = '-3750.00'.     " Amount
  wa_curramount-amt_base     = '5000.00'.     " Base Amount
  APPEND wa_curramount TO curramount.
  CLEAR wa_curramount.
 
ENDFORM.                    " build_bapi_parameters

Edited by: krupa jani on Aug 12, 2009 1:43 PM

Edited by: krupa jani on Aug 12, 2009 1:43 PM

Read only

Former Member

‎2009 Aug 12 12:44 PM

0 Likes
2,729

continue....


FORM build_bapi_parameters2.
 *Build account GL data for BAPI
  wa_accountgl-itemno_acc   = 2.             " Line Item Number
  wa_accountgl-gl_account   = '0000720300'.  " GL Account Number
  wa_accountgl-comp_code    = '0050'.        " Company Code
  wa_accountgl-pstng_date   = '12012006'.    " Posting Date
  wa_accountgl-doc_type     = 'KQ'.          " Document Type
  wa_accountgl-fisc_year    = '2006'.        " Fiscal Year
  wa_accountgl-fis_period   = '12'.          " Fiscal Period
  wa_accountgl-item_text    = ''.            " Item Text
  APPEND wa_accountgl TO accountgl.
  CLEAR wa_accountgl.
*Build currency data for BAPI
  wa_curramount-itemno_acc   = 2.             " Line Item Number
  wa_curramount-curr_type    = '00'.          " Currency Type
  wa_curramount-currency     = 'USD'.          " Currency Key
  wa_curramount-currency_iso = 'USD'.         " ISO Code
  wa_curramount-amt_doccur   = '5000.00'.     " Amount
  wa_curramount-amt_base     = ''.            " Base Amount
  APPEND wa_curramount TO curramount.
  CLEAR wa_curramount.
 ENDFORM.                    " build_bapi_parameters
 FORM build_bapi_parameters3.
 *Build account GL data for BAPI
  wa_accountgl-itemno_acc   = 3.             " Line Item Number
  wa_accountgl-gl_account   = '0000256166'.  " GL Account Number
  wa_accountgl-comp_code    = '0050'.        " Company Code
  wa_accountgl-pstng_date   = '12012006'.    " Posting Date
  wa_accountgl-doc_type     = 'KQ'.          " Document Type
  wa_accountgl-fisc_year    = '2006'.        " Fiscal Year
  wa_accountgl-fis_period   = '12'.          " Fiscal Period
  wa_accountgl-item_text    = ''.            " Item Text
  APPEND wa_accountgl TO accountgl.
  CLEAR wa_accountgl.
 *Build currency data for BAPI
  wa_curramount-itemno_acc   = 3.             " Line Item Number
  wa_curramount-curr_type    = '00'.          " Currency Type
  wa_curramount-currency     = 'USD'.          " Currency Key
  wa_curramount-currency_iso = 'USD'.         " ISO Code
  wa_curramount-amt_doccur   = '-1000.00'.     " Amount
  wa_curramount-amt_base     = ''.            " Base Amount
  APPEND wa_curramount TO curramount.
  CLEAR wa_curramount.
 ENDFORM.               " build_bapi_parameters

Edited by: krupa jani on Aug 12, 2009 1:45 PM

Read only

Former Member

‎2009 Aug 12 12:46 PM

0 Likes
2,729

continue......


FORM build_bapi_parameters4.
*Build account GL data for BAPI
  wa_accountgl-itemno_acc   = 4.             " Line Item Number
  wa_accountgl-gl_account   = '0000256167'.  " GL Account Number
  wa_accountgl-comp_code    = '0050'.        " Company Code
  wa_accountgl-pstng_date   = '12012006'.    " Posting Date
  wa_accountgl-doc_type     = 'KQ'.          " Document Type
  wa_accountgl-fisc_year    = '2006'.        " Fiscal Year
  wa_accountgl-fis_period   = '12'.          " Fiscal Period
  wa_accountgl-item_text    = ''.            " Item Text
  APPEND wa_accountgl TO accountgl.
  CLEAR wa_accountgl.
 *Build currency data for BAPI
  wa_curramount-itemno_acc   = 4.             " Line Item Number
  wa_curramount-curr_type    = '00'.          " Currency Type
  wa_curramount-currency     = 'USD'.          " Currency Key
  wa_curramount-currency_iso = 'USD'.         " ISO Code
  wa_curramount-amt_doccur   = '-250.00'.     " Amount
  wa_curramount-amt_base     = ''.            " Base Amount
  APPEND wa_curramount TO curramount.
  CLEAR wa_curramount.
 ENDFORM.                    " build_bapi_parameters
 FORM update_gl.
  CALL FUNCTION 'BAPI_ACC_INVOICE_RECEIPT_POST'
    EXPORTING
      documentheader = docheader
    IMPORTING
      obj_type       = obj_type
      obj_key        = obj_key
      obj_sys        = obj_sys
    TABLES
      accountpayable = accountpay
      accountgl      = accountgl
      accounttax     = accounttax
      currencyamount = curramount
      return         = return
      extension1     = extension1.
   LOOP AT return INTO wa_return.
    WRITE: / 'Return Type: ', wa_return-type.
    WRITE: / 'Return ID: ', wa_return-id.
    WRITE: / 'Return #: ', wa_return-number.
    WRITE: / 'Message 1: ', wa_return-message.
    WRITE: / 'Message 2: ', wa_return-message_v1.
    WRITE: / 'Message 3: ', wa_return-message_v2.
    WRITE: / 'Parameter: ', wa_return-parameter.
    WRITE: / 'Row: ', wa_return-row.
    WRITE: / 'Field: ', wa_return-field.
    WRITE: / 'System: ', wa_return-system.
    SKIP.
    ULINE.
    SKIP.
  ENDLOOP.
ENDFORM.                    " update_gl
 END-OF-SELECTION.