Problem with POSTING_INTERFACE_DOCUMENT

[Former Member]

Hi everyone,

I'm using the following function modules to transfer data to FB01 :

POSTING_INTERFACE_START

POSTING_INTERFACE_DOCUMENT

POSTING_INTERFACE_END

i'm filling data into T_FTPOST table of POSTING_INTERFACE_DOCUMENT and also provided values for other parameters.

It is also creating the session.

The problem is when i run the session it runs only for first screen of FB01. Its giving error : BATCH SESSION NOT CREATED FOR SCREEN 300.

How to post Doc Currency amount, Sales tax code, payment method, profit center,cost center.........

could anybody help me with this.

Thanks.

[Former Member]

hi every one,

this is how i have written the code

w_ftpost-stype = 'K'.
w_ftpost-count = 001.
w_ftpost-fnam = 'BKPF-BLDAT'.
w_ftpost-fval = '31.07.2009'.
APPEND w_ftpost TO t_ftpost.

w_ftpost-stype = 'K'.
w_ftpost-count = 001.
w_ftpost-fnam = 'BKPF-BLART'.
w_ftpost-fval = 'SA'.
APPEND w_ftpost TO t_ftpost.

w_ftpost-stype = 'K'.
w_ftpost-count = 001.
w_ftpost-fnam = 'BKPF-BUKRS'.
w_ftpost-fval = '2000'.
APPEND w_ftpost TO t_ftpost.

w_ftpost-stype = 'K'.
w_ftpost-count = 001.
w_ftpost-fnam = 'BKPF-BUDAT'.
w_ftpost-fval = '04.08.2009'.
APPEND w_ftpost TO t_ftpost.

w_ftpost-stype = 'K'.
w_ftpost-count = 001.
w_ftpost-fnam = 'BKPF-WAERS'.
w_ftpost-fval = 'GBP'.
APPEND w_ftpost TO t_ftpost.

w_ftpost-stype = 'K'.
w_ftpost-count = 001.
w_ftpost-fnam = 'BKPF-XBLNR'.
w_ftpost-fval = 'Testing'.
APPEND w_ftpost TO t_ftpost.

w_ftpost-stype = 'K'.
w_ftpost-count = 001.
w_ftpost-fnam = 'BKPF-BKTXT'.
w_ftpost-fval = 'Interest Upload'.
APPEND w_ftpost TO t_ftpost.

*w_ftpost-stype = 'K'.
*w_ftpost-count = 002.
*w_ftpost-fnam = 'BKPF-BLDAT'.
*w_ftpost-fval = '31.07.2009'.
*APPEND w_ftpost TO t_ftpost.
*
*w_ftpost-stype = 'K'.
*w_ftpost-count = 002.
*w_ftpost-fnam = 'BKPF-BLART'.
*w_ftpost-fval = 'SA'.
*APPEND w_ftpost TO t_ftpost.
*
*w_ftpost-stype = 'K'.
*w_ftpost-count = 002.
*w_ftpost-fnam = 'BKPF-BUKRS'.
*w_ftpost-fval = '2000'.
*APPEND w_ftpost TO t_ftpost.
*
*w_ftpost-stype = 'K'.
*w_ftpost-count = 002.
*w_ftpost-fnam = 'BKPF-BUDAT'.
*w_ftpost-fval = '04.08.2009'.
*APPEND w_ftpost TO t_ftpost.
*
*w_ftpost-stype = 'K'.
*w_ftpost-count = 002.
*w_ftpost-fnam = 'BKPF-WAERS'.
*w_ftpost-fval = 'GBP'.
*APPEND w_ftpost TO t_ftpost.
*
*w_ftpost-stype = 'K'.
*w_ftpost-count = 002.
*w_ftpost-fnam = 'BKPF-XBLNR'.
*w_ftpost-fval = 'Testing'.
*APPEND w_ftpost TO t_ftpost.
*
*w_ftpost-stype = 'K'.
*w_ftpost-count = 002.
*w_ftpost-fnam = 'BKPF-BKTXT'.
*w_ftpost-fval = 'Interest Upload'.
*APPEND w_ftpost TO t_ftpost.


*---------------ITEM----------------
w_ftpost-stype = 'P'.
w_ftpost-count = 001.
w_ftpost-fnam = 'BSEG-BSCHL'.
w_ftpost-fval = '40'.
APPEND w_ftpost TO t_ftpost.

w_ftpost-stype = 'P'.
w_ftpost-count = 001.
w_ftpost-fnam = 'BSEG-SAKNR'.
w_ftpost-fval = '420000'.
APPEND w_ftpost TO t_ftpost.

w_ftpost-stype = 'P'.
w_ftpost-count = 001.
w_ftpost-fnam = 'BSEG-ANBWA'.
w_ftpost-fval = 'Z01'.
APPEND w_ftpost TO t_ftpost.

w_ftpost-stype = 'P'.
w_ftpost-count = 001.
w_ftpost-fnam = 'BSEG-WRBTR'.
w_ftpost-fval = '1000'.
APPEND w_ftpost TO t_ftpost.

w_ftpost-stype = 'P'.
w_ftpost-count = 001.
w_ftpost-fnam = 'COBL-KOSTL'.
w_ftpost-fval = '12300101'.
APPEND w_ftpost TO t_ftpost.

w_ftpost-stype = 'P'.
w_ftpost-count = 001.
w_ftpost-fnam = 'COBL-PS_POSID'.
w_ftpost-fval = ''.
APPEND w_ftpost TO t_ftpost.

w_ftpost-stype = 'P'.
w_ftpost-count = 001.
w_ftpost-fnam = 'BSEG-SGTXT'.
w_ftpost-fval = 'Testing'.
APPEND w_ftpost TO t_ftpost.

w_ftpost-stype = 'P'.
w_ftpost-count = 001.
w_ftpost-fnam = 'BSEG-ZLSCH'.
w_ftpost-fval = 'I'.
APPEND w_ftpost TO t_ftpost.

w_ftpost-stype = 'P'.
w_ftpost-count = 001.
w_ftpost-fnam = 'BSEG-MWSKZ'.
w_ftpost-fval = 'A0'.
APPEND w_ftpost TO t_ftpost.

w_ftpost-stype = 'P'.
w_ftpost-count = 001.
w_ftpost-fnam = 'KMZEI-PRCTR'.
w_ftpost-fval = ''.
APPEND w_ftpost TO t_ftpost.

*ITEM2
w_ftpost-stype = 'P'.
w_ftpost-count = 001.
w_ftpost-fnam = 'BSEG-BSCHL'.
w_ftpost-fval = '50'.
APPEND w_ftpost TO t_ftpost.

w_ftpost-stype = 'P'.
w_ftpost-count = 001.
w_ftpost-fnam = 'BSEG-SAKNR'.
w_ftpost-fval = '220000'.
APPEND w_ftpost TO t_ftpost.

w_ftpost-stype = 'P'.
w_ftpost-count = 001.
w_ftpost-fnam = 'BSEG-ANBWA'.
w_ftpost-fval = 'Z01'.
APPEND w_ftpost TO t_ftpost.

w_ftpost-stype = 'P'.
w_ftpost-count = 001.
w_ftpost-fnam = 'BSEG-WRBTR'.
w_ftpost-fval = '1000'.
APPEND w_ftpost TO t_ftpost.

w_ftpost-stype = 'P'.
w_ftpost-count = 001.
w_ftpost-fnam = 'COBL-KOSTL'.
w_ftpost-fval = '2100'.
APPEND w_ftpost TO t_ftpost.

w_ftpost-stype = 'P'.
w_ftpost-count = 001.
w_ftpost-fnam = 'COBL-PS_POSID'.
w_ftpost-fval = ''.
APPEND w_ftpost TO t_ftpost.

w_ftpost-stype = 'P'.
w_ftpost-count = 001.
w_ftpost-fnam = 'BSEG-SGTXT'.
w_ftpost-fval = 'Testing'.
APPEND w_ftpost TO t_ftpost.

w_ftpost-stype = 'P'.
w_ftpost-count = 001.
w_ftpost-fnam = 'BSEG-ZLSCH'.
w_ftpost-fval = ''.
APPEND w_ftpost TO t_ftpost.

w_ftpost-stype = 'P'.
w_ftpost-count = 001.
w_ftpost-fnam = 'BSEG-MWSKZ'.
w_ftpost-fval = 'V0'.
APPEND w_ftpost TO t_ftpost.

w_ftpost-stype = 'P'.
w_ftpost-count = 001.
w_ftpost-fnam = 'KMZEI-PRCTR'.
w_ftpost-fval = '20200'.
APPEND w_ftpost TO t_ftpost.

CALL FUNCTION 'POSTING_INTERFACE_START'
  EXPORTING
*   I_CLIENT                 = SY-MANDT
    i_function               = 'B'
   i_group                  = 'FB01'
*   I_HOLDDATE               = ' '
*   I_KEEP                   = ' '
*   I_MODE                   = 'N'
*   I_UPDATE                 = 'S'
   i_user                   = sy-uname
*   I_XBDCC                  = ' '
 EXCEPTIONS
   client_incorrect         = 1
   function_invalid         = 2
   group_name_missing       = 3
   mode_invalid             = 4
   update_invalid           = 5
   OTHERS                   = 6
          .
IF sy-subrc <> 0.
  MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
          WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.

CALL FUNCTION 'POSTING_INTERFACE_DOCUMENT'
  EXPORTING
    i_tcode                        = 'FB01'
*   i_sgfunct                      = ''
*   I_NO_AUTH                      = ' '
 IMPORTING
   e_msgid                        = e_msgid
   e_msgno                        = e_msgno
   e_msgty                        = e_msgty
   e_msgv1                        = e_msgv1
   e_msgv2                        = e_msgv2
   e_msgv3                        = e_msgv3
   e_msgv4                        = e_msgv4
   e_subrc                        = e_subrc
  TABLES
    t_blntab                       = t_blntab
    t_ftpost                       = t_ftpost
    t_fttax                        = t_fttax
 EXCEPTIONS
   account_missing                = 1
   company_code_missing           = 2
   posting_key_invalid            = 3
   posting_key_missing            = 4
   record_type_invalid            = 5
   transaction_code_invalid       = 6
   amount_format_error            = 7
   too_many_line_items            = 8
   company_code_invalid           = 9
   screen_not_found               = 10
   no_authorization               = 11
   OTHERS                         = 12
          .
IF sy-subrc <> 0.
  MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
          WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.

CALL FUNCTION 'POSTING_INTERFACE_END'
* EXPORTING
*   I_BDCIMMED                    = ' '
*   I_BDCSTRTDT                   = NO_DATE
*   I_BDCSTRTTM                   = NO_TIME
* EXCEPTIONS
*   SESSION_NOT_PROCESSABLE       = 1
*   OTHERS                        = 2
          .
IF sy-subrc <> 0.
  MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
          WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.

Edited by: tom123 on Aug 4, 2009 7:28 PM

Edited by: tom123 on Aug 4, 2009 7:31 PM

[Former Member]

hi every one,

this is how i have written the code

w_ftpost-stype = 'K'.
w_ftpost-count = 001.
w_ftpost-fnam = 'BKPF-BLDAT'.
w_ftpost-fval = '31.07.2009'.
APPEND w_ftpost TO t_ftpost.

w_ftpost-stype = 'K'.
w_ftpost-count = 001.
w_ftpost-fnam = 'BKPF-BLART'.
w_ftpost-fval = 'SA'.
APPEND w_ftpost TO t_ftpost.

w_ftpost-stype = 'K'.
w_ftpost-count = 001.
w_ftpost-fnam = 'BKPF-BUKRS'.
w_ftpost-fval = '2000'.
APPEND w_ftpost TO t_ftpost.

w_ftpost-stype = 'K'.
w_ftpost-count = 001.
w_ftpost-fnam = 'BKPF-BUDAT'.
w_ftpost-fval = '04.08.2009'.
APPEND w_ftpost TO t_ftpost.

w_ftpost-stype = 'K'.
w_ftpost-count = 001.
w_ftpost-fnam = 'BKPF-WAERS'.
w_ftpost-fval = 'GBP'.
APPEND w_ftpost TO t_ftpost.

w_ftpost-stype = 'K'.
w_ftpost-count = 001.
w_ftpost-fnam = 'BKPF-XBLNR'.
w_ftpost-fval = 'Testing'.
APPEND w_ftpost TO t_ftpost.

w_ftpost-stype = 'K'.
w_ftpost-count = 001.
w_ftpost-fnam = 'BKPF-BKTXT'.
w_ftpost-fval = 'Interest Upload'.
APPEND w_ftpost TO t_ftpost.

*w_ftpost-stype = 'K'.
*w_ftpost-count = 002.
*w_ftpost-fnam = 'BKPF-BLDAT'.
*w_ftpost-fval = '31.07.2009'.
*APPEND w_ftpost TO t_ftpost.
*
*w_ftpost-stype = 'K'.
*w_ftpost-count = 002.
*w_ftpost-fnam = 'BKPF-BLART'.
*w_ftpost-fval = 'SA'.
*APPEND w_ftpost TO t_ftpost.
*
*w_ftpost-stype = 'K'.
*w_ftpost-count = 002.
*w_ftpost-fnam = 'BKPF-BUKRS'.
*w_ftpost-fval = '2000'.
*APPEND w_ftpost TO t_ftpost.
*
*w_ftpost-stype = 'K'.
*w_ftpost-count = 002.
*w_ftpost-fnam = 'BKPF-BUDAT'.
*w_ftpost-fval = '04.08.2009'.
*APPEND w_ftpost TO t_ftpost.
*
*w_ftpost-stype = 'K'.
*w_ftpost-count = 002.
*w_ftpost-fnam = 'BKPF-WAERS'.
*w_ftpost-fval = 'GBP'.
*APPEND w_ftpost TO t_ftpost.
*
*w_ftpost-stype = 'K'.
*w_ftpost-count = 002.
*w_ftpost-fnam = 'BKPF-XBLNR'.
*w_ftpost-fval = 'Testing'.
*APPEND w_ftpost TO t_ftpost.
*
*w_ftpost-stype = 'K'.
*w_ftpost-count = 002.
*w_ftpost-fnam = 'BKPF-BKTXT'.
*w_ftpost-fval = 'Interest Upload'.
*APPEND w_ftpost TO t_ftpost.


*---------------ITEM----------------
w_ftpost-stype = 'P'.
w_ftpost-count = 001.
w_ftpost-fnam = 'BSEG-BSCHL'.
w_ftpost-fval = '40'.
APPEND w_ftpost TO t_ftpost.

w_ftpost-stype = 'P'.
w_ftpost-count = 001.
w_ftpost-fnam = 'BSEG-SAKNR'.
w_ftpost-fval = '420000'.
APPEND w_ftpost TO t_ftpost.

w_ftpost-stype = 'P'.
w_ftpost-count = 001.
w_ftpost-fnam = 'BSEG-ANBWA'.
w_ftpost-fval = 'Z01'.
APPEND w_ftpost TO t_ftpost.

w_ftpost-stype = 'P'.
w_ftpost-count = 001.
w_ftpost-fnam = 'BSEG-WRBTR'.
w_ftpost-fval = '1000'.
APPEND w_ftpost TO t_ftpost.

w_ftpost-stype = 'P'.
w_ftpost-count = 001.
w_ftpost-fnam = 'COBL-KOSTL'.
w_ftpost-fval = '12300101'.
APPEND w_ftpost TO t_ftpost.

w_ftpost-stype = 'P'.
w_ftpost-count = 001.
w_ftpost-fnam = 'COBL-PS_POSID'.
w_ftpost-fval = ''.
APPEND w_ftpost TO t_ftpost.

w_ftpost-stype = 'P'.
w_ftpost-count = 001.
w_ftpost-fnam = 'BSEG-SGTXT'.
w_ftpost-fval = 'Testing'.
APPEND w_ftpost TO t_ftpost.

w_ftpost-stype = 'P'.
w_ftpost-count = 001.
w_ftpost-fnam = 'BSEG-ZLSCH'.
w_ftpost-fval = 'I'.
APPEND w_ftpost TO t_ftpost.

w_ftpost-stype = 'P'.
w_ftpost-count = 001.
w_ftpost-fnam = 'BSEG-MWSKZ'.
w_ftpost-fval = 'A0'.
APPEND w_ftpost TO t_ftpost.

w_ftpost-stype = 'P'.
w_ftpost-count = 001.
w_ftpost-fnam = 'KMZEI-PRCTR'.
w_ftpost-fval = ''.
APPEND w_ftpost TO t_ftpost.

*ITEM2
w_ftpost-stype = 'P'.
w_ftpost-count = 001.
w_ftpost-fnam = 'BSEG-BSCHL'.
w_ftpost-fval = '50'.
APPEND w_ftpost TO t_ftpost.

w_ftpost-stype = 'P'.
w_ftpost-count = 001.
w_ftpost-fnam = 'BSEG-SAKNR'.
w_ftpost-fval = '220000'.
APPEND w_ftpost TO t_ftpost.

w_ftpost-stype = 'P'.
w_ftpost-count = 001.
w_ftpost-fnam = 'BSEG-ANBWA'.
w_ftpost-fval = 'Z01'.
APPEND w_ftpost TO t_ftpost.

w_ftpost-stype = 'P'.
w_ftpost-count = 001.
w_ftpost-fnam = 'BSEG-WRBTR'.
w_ftpost-fval = '1000'.
APPEND w_ftpost TO t_ftpost.

w_ftpost-stype = 'P'.
w_ftpost-count = 001.
w_ftpost-fnam = 'COBL-KOSTL'.
w_ftpost-fval = '2100'.
APPEND w_ftpost TO t_ftpost.

w_ftpost-stype = 'P'.
w_ftpost-count = 001.
w_ftpost-fnam = 'COBL-PS_POSID'.
w_ftpost-fval = ''.
APPEND w_ftpost TO t_ftpost.

w_ftpost-stype = 'P'.
w_ftpost-count = 001.
w_ftpost-fnam = 'BSEG-SGTXT'.
w_ftpost-fval = 'Testing'.
APPEND w_ftpost TO t_ftpost.

w_ftpost-stype = 'P'.
w_ftpost-count = 001.
w_ftpost-fnam = 'BSEG-ZLSCH'.
w_ftpost-fval = ''.
APPEND w_ftpost TO t_ftpost.

w_ftpost-stype = 'P'.
w_ftpost-count = 001.
w_ftpost-fnam = 'BSEG-MWSKZ'.
w_ftpost-fval = 'V0'.
APPEND w_ftpost TO t_ftpost.

w_ftpost-stype = 'P'.
w_ftpost-count = 001.
w_ftpost-fnam = 'KMZEI-PRCTR'.
w_ftpost-fval = '20200'.
APPEND w_ftpost TO t_ftpost.

CALL FUNCTION 'POSTING_INTERFACE_START'
  EXPORTING
*   I_CLIENT                 = SY-MANDT
    i_function               = 'B'
   i_group                  = 'FB01'
*   I_HOLDDATE               = ' '
*   I_KEEP                   = ' '
*   I_MODE                   = 'N'
*   I_UPDATE                 = 'S'
   i_user                   = sy-uname
*   I_XBDCC                  = ' '
 EXCEPTIONS
   client_incorrect         = 1
   function_invalid         = 2
   group_name_missing       = 3
   mode_invalid             = 4
   update_invalid           = 5
   OTHERS                   = 6
          .
IF sy-subrc <> 0.
  MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
          WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.

CALL FUNCTION 'POSTING_INTERFACE_DOCUMENT'
  EXPORTING
    i_tcode                        = 'FB01'
*   i_sgfunct                      = ''
*   I_NO_AUTH                      = ' '
 IMPORTING
   e_msgid                        = e_msgid
   e_msgno                        = e_msgno
   e_msgty                        = e_msgty
   e_msgv1                        = e_msgv1
   e_msgv2                        = e_msgv2
   e_msgv3                        = e_msgv3
   e_msgv4                        = e_msgv4
   e_subrc                        = e_subrc
  TABLES
    t_blntab                       = t_blntab
    t_ftpost                       = t_ftpost
    t_fttax                        = t_fttax
 EXCEPTIONS
   account_missing                = 1
   company_code_missing           = 2
   posting_key_invalid            = 3
   posting_key_missing            = 4
   record_type_invalid            = 5
   transaction_code_invalid       = 6
   amount_format_error            = 7
   too_many_line_items            = 8
   company_code_invalid           = 9
   screen_not_found               = 10
   no_authorization               = 11
   OTHERS                         = 12
          .
IF sy-subrc <> 0.
  MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
          WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.

CALL FUNCTION 'POSTING_INTERFACE_END'
* EXPORTING
*   I_BDCIMMED                    = ' '
*   I_BDCSTRTDT                   = NO_DATE
*   I_BDCSTRTTM                   = NO_TIME
* EXCEPTIONS
*   SESSION_NOT_PROCESSABLE       = 1
*   OTHERS                        = 2
          .
IF sy-subrc <> 0.
  MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
          WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.

Edited by: tom123 on Aug 4, 2009 7:28 PM

Edited by: tom123 on Aug 4, 2009 7:31 PM

[Former Member]

w_ftpost-count for second item should be 002...

also are u creating 2 documents?? as ur using 002 as count for 'interest upload'... how will the system knw which item is for which document... also i am not sure if u can create 2 headers at a time..

check program RFBIBL02 for the FNAMs, there are spaces after the field names that u need to have eq.

'BKPF-BLDAT '. instead of 'BKPF-BLDAT'.

Regards,

Bikash

[Former Member]

why don't you use BAPI * "BAPI_ACC_DOCUMENT_POST" *

[Former Member]

Hi Poorna,

Could you provide the code for BAPI_ACC_DOC_POST if you had it

Thanks,

Tom.

[Emre_tr]

check this sample report ; ACC_BAPI_TEST_DOCUMENT