Application Development 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
Showing results for 
Search instead for 
Did you mean: 

Error"No item information transferred into Accounting"in PRELIMINARY_POSTIN

Former Member
0 Kudos

Hi Experts,

Am trying to PARK the gl doc by using FM of PRELIMINARY_POSTING_FB01......when I tested it in SE37 with my test data.........its worked fine........but, when I implemented the same into my Z prog. of SE38........its failing, even though am using the same test data!! Am getting the below error!!

italics

No item information transferred into Accounting

Message no. RW002

Diagnosis

The interface into Accounting requires:

Header data

Item data

Currency data

The item data is missing.

System Response

Processing of the data in the Accounting interface is not possible.

Procedure

This is a system error of the application which was called up.

italics

so, let me know that, Where its going wrong? How to fix it?

thanq

8 REPLIES 8

Former Member
0 Kudos

Hard to say what's wrong with your code without seeing your code.

Rob

0 Kudos

* Document Date & Currency
  READ TABLE t_datatab INTO wa_datatab INDEX 1.
  IF sy-subrc EQ 0.
    CONCATENATE wa_datatab-col3+6(4)
                wa_datatab-col3+3(2)
                wa_datatab-col3(2)
        INTO t_bkpf1-bldat.
    t_bkpf1-waers = wa_datatab-col6.
  ENDIF.

* Posting date
  READ TABLE t_datatab INTO wa_datatab INDEX 2.
  IF sy-subrc EQ 0.
    CONCATENATE wa_datatab-col3+6(4)
                wa_datatab-col3+3(2)
                wa_datatab-col3(2)
       INTO t_bkpf1-budat.
  ENDIF.

* user name
  t_bkpf1-usnam = sy-uname.

* Reference
  READ TABLE t_datatab INTO wa_datatab INDEX 3.
  IF sy-subrc EQ 0.
    t_bkpf1-xblnr = wa_datatab-col3.
  ENDIF.

* Document Header Text
  READ TABLE t_datatab INTO wa_datatab INDEX 4.
  IF sy-subrc EQ 0.
    t_bkpf1-bktxt = wa_datatab-col3.
  ENDIF.

* Document Type
  READ TABLE t_datatab INTO wa_datatab INDEX 5.
  IF sy-subrc EQ 0.
    t_bkpf1-blart = wa_datatab-col3.
  ENDIF.

* Company Code (Validate Company Code in the file against the Company
*               Code in the Selection Parameters)
  READ TABLE t_datatab INTO wa_datatab INDEX 7.
  IF sy-subrc EQ 0.
    IF wa_datatab-col3 = p_bukrs.
      t_bkpf1-bukrs = wa_datatab-col3.
    ELSE.
      MESSAGE e000(z1) WITH  text-002 text-003 text-004 text-005.
    ENDIF.
  ENDIF.

* Check mandatory fields*  IF NOT v_chk_rev IS INITIAL.
  IF t_bkpf1-bktxt IS INITIAL OR
     t_bkpf1-xblnr IS INITIAL.
    MESSAGE e000(z1) WITH  text-006.
  ENDIF.

  APPEND t_bkpf1.

ENDFORM.                    " fill_bbkpf1
*header end

*2) V1 items begin
FORM sub_fill_bbseg1.

  CLEAR: wa_datatab, t_bseg1, t_bsec1, t_bset1, t_bsez1.
  REFRESH: t_bseg1, t_bsec1, t_bset1, t_bsez1.

* Delete Header Part from Internal Table
  DELETE t_datatab FROM 1 TO 9.

* Get total no. of Internal Table entries again
  DESCRIBE TABLE t_datatab.

* Delete the last Internal Table line-TOTALS.
  DELETE t_datatab INDEX sy-tfill.

  LOOP AT t_datatab INTO wa_datatab WHERE col2 NE space.
    t_bseg1-buzei = wa_datatab-col1.
    t_bsec1-buzei = wa_datatab-col1.
    t_bset1-buzei = wa_datatab-col1.

    t_bseg1-hkont = wa_datatab-col2.
    PERFORM sub_pad_zeros USING t_bseg1-hkont.

    t_bseg1-mwskz = wa_datatab-col6.

    t_bseg1-kostl = wa_datatab-col7.
    PERFORM sub_pad_zeros USING t_bseg1-kostl.

    t_bseg1-aufnr = wa_datatab-col8.
    PERFORM sub_pad_zeros USING t_bseg1-aufnr.

    t_bseg1-sgtxt = wa_datatab-col9.

    t_bseg1-prctr = wa_datatab-col10.
    PERFORM sub_pad_zeros USING t_bseg1-prctr.

    t_bseg1-bukrs = p_bukrs.
    t_bsec1-bukrs = p_bukrs.
    t_bset1-bukrs = p_bukrs.

    t_bseg1-koart = 'S'.

    IF wa_datatab-col3 NE space AND
       wa_datatab-col4 EQ space.        "debit?
      t_bseg1-wrbtr =   wa_datatab-col3.
      t_bseg1-bschl = '40'.
      t_bseg1-shkzg = 'S'.
    ELSE.
      t_bseg1-wrbtr = ( wa_datatab-col4 * -1 ). "credit?
      t_bseg1-bschl = '50'.
      t_bseg1-shkzg = 'H'.
    ENDIF.

    APPEND t_bseg1.
    APPEND t_bsec1.
    APPEND t_bset1.
    APPEND t_bsez1.

  ENDLOOP.

ENDFORM.                    " fill_bbseg1
*items end

     CALL FUNCTION 'PRELIMINARY_POSTING_FB01'
        EXPORTING
          i_tcode = 'FBV1'
        TABLES
          t_bkpf  = t_bkpf1
          t_bseg  = t_bseg1
          t_bsec  = t_bsec1
          t_bset  = t_bset1
          t_bsez  = t_bsez1.

0 Kudos

How many entries are there in t_bseg1?

Rob

0 Kudos

2 entries, like below

debir - with 700 USD posess cost center + profit center

credit - 700 USD

error is coming from PERFORM AC_PP_WRITE of this FM

thanq

0 Kudos

at the FM of CALL FUNCTION 'AC_DOCUMENT_CREATE' is error throwing here all TABLEs are empty, except BKPF's T_ACCHD.........the item table T_ACCIT is empty?? not sure why??

thanq

thanq Rob, I found that, there r unfortuantely special characters were messed up!! now, its working, thanq.

Edited by: SAP ABAPer on Jan 7, 2009 9:30 PM

0 Kudos

Dear ABAPER,

Please let me know how you solved this issue as I am facing the same while posting using the function module.

Thanks and Regards,

Ninan

Former Member
0 Kudos

bad data