PDA

Ver la Versión Completa : Bapi_po_change --> WBS Element


makarthy
05/10/10, 09:00:40
Hola a todos,

estamos intentando añadir líneas de un pedido de compra con la bapi.

Nos muestra el error:

KI 235 : La cta 60000000 requiere una imputación relevante para la contabilidad de costes.

Importante: El pep lo tenemos informado.

Os paso el código para ver si os ayuda

* POHEADER
i_hdr-PO_NUMBER = ld_ebeln.
i_hdrx-PO_NUMBER = 'X'.
append i_hdr.
append i_hdrx.

* POCOND
POCOND-ITM_NUMBER = t_temp-po_item.
POCONDX-ITM_NUMBER = t_temp-po_item.
POCOND-COND_TYPE = t_temp-COND_TYPE.
POCONDX-COND_TYPE = 'X'.
POCOND-COND_VALUE = t_temp-COND_VALUE.
POCONDX-COND_VALUE = 'X'.
POCOND-CURRENCY = t_temp-CURRENCY.
POCONDX-CURRENCY = 'X'.
POCOND-COND_P_UNT = t_temp-COND_P_UNT.
POCONDX-COND_P_UNT = 'X'.
append pocond.
append pocondx.

* POITEM
POITEM-po_item = t_temp-po_item.
POITEMX-po_item = t_temp-po_item.
POITEMX-po_itemx = 'X'.
POITEM-PLANT = ld_werks.
POITEMX-PLANT = 'X'.
POITEM-MATERIAL = t_temp-MATERIAL.
POITEMX-MATERIAL = 'X'.
POITEM-QUANTITY = t_temp-QUANTITY.
POITEMX-QUANTITY = 'X'.
POITEM-PO_UNIT = t_temp-PO_UNIT.
POITEMX-PO_UNIT = 'X'.
POITEM-NET_PRICE = t_temp-COND_VALUE.
POITEMX-NET_PRICE = 'X'.
POITEM-ACCTASSCAT = t_temp-ACCTASSCAT.
POITEMX-ACCTASSCAT = 'X'.
append poitem.
append poitemx.

* POSCHEDULE
POCHDL-PO_ITEM = t_temp-po_item.
POCHDLX-PO_ITEM = t_temp-po_item.
POCHDLX-PO_ITEMX = 'X'.
POCHDL-QUANTITY = t_temp-quantity.
POCHDLX-QUANTITY = 'X'.
POCHDL-DELIVERY_DATE = t_temp-DELIVERY_DATE.
POCHDLX-DELIVERY_DATE = 'X'.
append POCHDL.
append POCHDLX.

* Parameter: POACCOUNT

POACOUNT-PO_ITEM = t_temp-po_item.
POACOUNTX-PO_ITEM = t_temp-po_item.
POACOUNTX-PO_ITEMX = 'X'.
POACOUNT-SERIAL_NO = '02'.
POACOUNTX-SERIAL_NO = '02'.
POACOUNT-QUANTITY = t_temp-quantity.
POACOUNTX-QUANTITY = 'X'.
* POACOUNT-GL_ACCOUNT = t_temp-GL_ACCOUNT.
* POACOUNTX-GL_ACCOUNT = 'X'.
* POACOUNT-CO_AREA = t_temp-CO_AREA.
* POACOUNTX-CO_AREA = 'X'.
POACOUNT-WBS_ELEMENT = t_temp-WBS_ELEMENT.
POACOUNTX-WBS_ELEMENT = 'X'.
* POACOUNT-FUNC_AREA = t_temp-FUNC_AREA.
* POACOUNTX-FUNC_AREA = 'X'.
* POACOUNT-FUNC_AREA_LONG = t_temp-FUNC_AREA.
append POACOUNT.
append POACOUNTX.


endloop.
* Para añadir items
* i_hdrx-updateflag = 'U'.

CALL FUNCTION 'BAPI_PO_CHANGE'
EXPORTING
PURCHASEORDER = ld_ebeln
POHEADER = i_hdr
POHEADERX = i_hdrx
NO_PRICE_FROM_PO = 'X'
TABLES
return = lt_return
POITEM = POITEM
POITEMX = POITEMX
POACCOUNT = POACOUNT
POACCOUNTX = POACOUNTX
POSCHEDULE = POCHDL
POSCHEDULEX = POCHDLX
POCOND = POCOND
POCONDX = POCONDX.

Muchas gracias