Issue with posting G/L using the BAPI " BAPI_ACC_DOCUMENT_POST"

Question

Hi all,
I am trying to create a G/L document using the BAPI "BAPI_ACC_DOCUMENT_POST". The Bapi is returning me a success message, but i am not able to see the document in BKPF/BSEG.
Can somebody please let me know if there is any customization that needs to be done to get the document number reflected in the corresponding tables after i execute this BAPI.
Here is the part of the code that i am using to fill the header structure:
  docheader-obj_type = 'REACI'.
    docheader-obj_key = 'TEST'.
    docheader-obj_sys = 'ECSCLNT010'.
    docheader-bus_act = 'RFBU'.
    docheader-username = sy-uname.
    docheader-header_txt = 'HDR TEXT'.
    docheader-comp_code = 'SC01'.
    docheader-doc_date = sy-datum.
    docheader-pstng_date = sy-datum.
    CASE wa_input_tmp-batch_type .
      WHEN '0'.
        docheader-doc_type = 'SA'.
      WHEN '1'.
        docheader-doc_type = 'RA'.
    ENDCASE.
Any help is much appreciated.
Thanks in Advance,
Suresh

Answer 1

See the below code :
I have tested program in my system :
*&---HEADER DECLARATION
DATA: HEADER TYPE BAPIACHE09.                " HEADER DATA
             INTERNAL TABLE DECLARATION
*&----G/L ACCOUNT ITEM
DATA: ACCOUNTGL TYPE STANDARD TABLE OF BAPIACGL09.
*&---CURRENCY ITEMS
DATA: CURRENCY_AMOUNT TYPE STANDARD TABLE OF BAPIACCR09.
*&----RETURN PARAMETER
DATA: RETURN  TYPE STANDARD TABLE OF BAPIRET2 with header line.
                     WORK-AREA DECLARATION
*&----WORKAREA FOR G/L ACCOUNT ITEM
DATA: WA_ACCOUNTGL TYPE BAPIACGL09.
*&---WORKAREA FOR CURRENCY ITEMS
DATA: WA_CURRENCY_AMOUNT TYPE BAPIACCR09.
                    INITIALIZATION
HEADER-HEADER_TXT  = 'TEST HEADER'.
HEADER-USERNAME    = 'DEVELOPER'.
HEADER-COMP_CODE   = '0002'.
HEADER-FISC_YEAR   = '2007'.
HEADER-DOC_DATE    = '20070502'.
HEADER-PSTNG_DATE  = '20070502'.
HEADER-TRANS_DATE  = '20070502'.
HEADER-DOC_TYPE    = 'SA'.
HEADER-BUS_ACT     = 'RFBU'.
WA_ACCOUNTGL-ITEMNO_ACC  = '0000000010'.
WA_ACCOUNTGL-GL_ACCOUNT = '0000113020'.
WA_ACCOUNTGL-ITEM_TEXT  = 'SO_DOC'.
WA_ACCOUNTGL-DE_CRE_IND = 'S'.
APPEND WA_ACCOUNTGL TO ACCOUNTGL.
CLEAR WA_ACCOUNTGL.
WA_ACCOUNTGL-ITEMNO_ACC  = '0000000020'.
WA_ACCOUNTGL-GL_ACCOUNT = '0000113020'.
WA_ACCOUNTGL-ITEM_TEXT  = 'SO_DOC'.
WA_ACCOUNTGL-DE_CRE_IND = 'H'.
APPEND WA_ACCOUNTGL TO ACCOUNTGL.
CLEAR WA_ACCOUNTGL.
WA_CURRENCY_AMOUNT-ITEMNO_ACC = '0000000010'.
WA_CURRENCY_AMOUNT-AMT_DOCCUR = '500'.
WA_CURRENCY_AMOUNT-CURRENCY   = 'INR'.
APPEND WA_CURRENCY_AMOUNT TO CURRENCY_AMOUNT.
CLEAR WA_CURRENCY_AMOUNT.
WA_CURRENCY_AMOUNT-ITEMNO_ACC = '0000000020'.
WA_CURRENCY_AMOUNT-AMT_DOCCUR = '-500'.
WA_CURRENCY_AMOUNT-CURRENCY   = 'INR'.
APPEND WA_CURRENCY_AMOUNT TO CURRENCY_AMOUNT.
CLEAR WA_CURRENCY_AMOUNT.
                START-OF-SELECTION
START-OF-SELECTION.
CALL FUNCTION 'BAPI_ACC_DOCUMENT_POST'
  EXPORTING
    documentheader          = HEADER
  CUSTOMERCPD             =
  CONTRACTHEADER          =
IMPORTING
  OBJ_TYPE                =
  OBJ_KEY                 =
  OBJ_SYS                 =
  tables
   ACCOUNTGL               =   ACCOUNTGL
  ACCOUNTRECEIVABLE       =
  ACCOUNTPAYABLE          =
  ACCOUNTTAX              =
    currencyamount          = CURRENCY_AMOUNT
  CRITERIA                =
  VALUEFIELD              =
  EXTENSION1              =
    return                  = RETURN
  PAYMENTCARD             =
  CONTRACTITEM            =
  EXTENSION2              =
  REALESTATE              =
IF return-type NA 'EA'.
call function 'BAPI_TRANSACTION_COMMIT'
EXPORTING
   WAIT          = 'X'.
IMPORTING
  RETURN        = RETURN.
  write:/ return-message.
else.
  write:/ return-message.
ENDIF.
Reward Points if it is helpful
Thanks
Seshu