Error in BAPI_SALESORDER_CHANGE -- Enter The Profit Center

Question

Hi All,
Am Creating Sales Order using BDC and getting Sales order number and uploading it's  Item text using
BAPI_SALESORDER_CHANGE , But am getting error as please enter profit center for last record in Bapireturn and text is not getting updated.
Everything is correctly uploaded with material number and profit center for sales order,
while uploading it's item details text error occurs for last record as
please enter profit center .Remaining Sales order text is getting uploaded ..
May i know why this occurs and how to solve it ...

Answer 1

Hi Santhosh
Have Pasted my Code here for your reference ..
\FORM createtext_bapi.
DATA: t_posnr LIKE vbap-posnr occurs 0 with header line.
data: begin of t_posnr occurs 0 ,
      vbeln like vbap-vbeln,
      matnr like vbap-matnr,
      posnr like vbap-posnr,
      end of t_posnr.
DATA: ORD_TEXT LIKE BAPISDTEXT OCCURS 0 WITH HEADER LINE.
DATA : TEXT(125) TYPE C.
DATA: SOHEADER LIKE BAPISDH1.
DATA: SOHEADERX LIKE BAPISDH1X .
DATA: SORETURN  type table of bapiret2 with header line.
DATA: I_ITEM LIKE BAPISDITM OCCURS 0 WITH HEADER LINE.
DATA: I_ITEMX LIKE BAPISDITMX OCCURS 0 WITH HEADER LINE.
  DATA:w_item(6) value '000000'.
  DATA:w_item1(6) value '000010'.
  loop at  itab1.
  clear w_item.
   loop at it_sord where salesorder = itab1-salesorder.
      w_item = w_item + w_item1.
      unpack w_item to w_item.
*****HEADER
  SOHEADERX-UPDATEFLAG = 'U'.
****LINE ITEM
I_ITEM-ITM_NUMBER = w_item.
APPEND I_ITEM.
I_ITEMX-ITM_NUMBER = w_item.
I_ITEMX-UPDATEFLAG = 'U'.
APPEND I_ITEMX.
****LINE ITEM TEXT
ORD_TEXT-DOC_NUMBER = it_sord-salesorder.
ORD_TEXT-ITM_NUMBER = w_item.
ORD_TEXT-TEXT_ID    = '0001'.  " IN SO MATERIAL SALES TEXT
ORD_TEXT-LANGU      = 'EN'.
ORD_TEXT-FUNCTION = '004'.
CLEAR : TEXT.
       concatenate  s_date  it_sord-s_date into ORD_TEXT-TEXT_LINE."
       append ORD_TEXT.
     clear ORD_TEXT.
     concatenate  s_time  it_sord-s_time into ORD_TEXT-TEXT_LINE."
      append ORD_TEXT.
     clear ORD_TEXT.
     concatenate  e_date  it_sord-e_date into ORD_TEXT-TEXT_LINE."
      append ORD_TEXT.
     clear ORD_TEXT.
     concatenate  e_time  it_sord-e_time into ORD_TEXT-TEXT_LINE."
      append ORD_TEXT.
     clear ORD_TEXT.
     concatenate  pickup  it_sord-pickup into ORD_TEXT-TEXT_LINE."
      append ORD_TEXT.
     clear ORD_TEXT.
    concatenate  despt  it_sord-despt into ORD_TEXT-TEXT_LINE."
      append ORD_TEXT.
     clear ORD_TEXT.
*APPEND ORD_TEXT.
             CALL FUNCTION 'BAPI_SALESORDER_CHANGE'
               EXPORTING
                 salesdocument               = it_sord-salesorder
                 ORDER_HEADER_IN             = SOHEADER
                 order_header_inx            = SOHEADERX
               tables
                 return                      = SORETURN
                ORDER_ITEM_IN               = I_ITEM
                ORDER_ITEM_INX              = I_ITEMX
                ORDER_TEXT                  = ORD_tEXT.
CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'
    EXPORTING
      WAIT = 'X'.
   refresh ORD_TEXT.
READ TABLE SORETURN WITH KEY TYPE = 'E'.
IF SY-SUBRC = 0.
WRITE:/1 ' SO TEXT CHANGE  NOT UPDATED',
           itab1-salesorder, SORETURN-MESSAGE. "SORETURN-row ,
*SORETURN-number,
*SORETURN-MESSAGE_V1.
ELSE.
WRITE: ' SO TEXT CHANGE    UPDATED'.
ENDIF.
refresh:ORD_tEXT.
endloop.
endloop.
ENDFORM.                    " createtext_bapi