BAPI_PR_CREATE---BOX replace issue

[Former Member]

Hi ,

i am posting PR . But issue is need to redetermine the components of product.

System is pulling existing BOM .

i am trying below logic , but it is not working to replace BOX with new components added in program.

Ls_header-PR_TYPE =  GC_NB.

Ls_header-AUTO_SOURCE = gc_x.

Ls_headerX-PR_TYPE =  gc_x.

Ls_headerX-AUTO_SOURCE = gc_x.

*Ls_ITEM-pREQ_ITEM = '00010'.

Ls_ITEM-MATERIAL = gs_psdata-HEAD_MATNR.

*Ls_ITEM-NEW_BOM_EXPLOSION = ' ' .

Ls_ITEM-PLANT = gs_psdata-werks.

Ls_ITEM-PUR_GROUP = 'A01'.

Ls_ITEM-QUANTITY = gs_psdata-QUANTITY.

Ls_ITEM-ITEM_CAT = gc_l.

Ls_ITEM-ACCTASSCAT = gc_q.

APPEND ls_item to lt_item.

CLEAR ls_item.

*Ls_ITEMx-pREQ_ITEM = '00010'.

Ls_ITEMx-MATERIAL = GC_X.

*Ls_ITEMX-NEW_BOM_EXPLOSION = GC_X.

Ls_ITEMx-PLANT = GC_X.

Ls_ITEMX-PUR_GROUP = GC_X.

Ls_ITEMx-QUANTITY = GC_X.

Ls_ITEMx-ITEM_CAT = GC_X.

Ls_ITEMx-ACCTASSCAT = GC_X.

APPEND ls_itemx to lt_itemx.

CLEAR ls_itemx.

*Ls_acct-PREQ_ITEM = '00010'.

Ls_acct-SERIAL_NO = '01'.

Ls_acct-COSTCENTER = gs_psdata-kostl.

Ls_acct-WBS_ELEMENT =  gs_psdata-wbs_element.

append ls_acct to lt_acct.

Ls_acctx-SERIAL_NO = '01'.

Ls_acctx-COSTCENTER = GC_X.

Ls_acctX-WBS_ELEMENT = GC_X.

append ls_acctx to lt_acctx.

LS_COMP-MATERIAL =  gs_psdata-COMP_MATNR.

LS_COMP-PLANT = gs_psdata-werks.

LS_COMP-CHANGE_ID = 'I'. "gc_value_r.

LS_COMP-ENTRY_QUANTITY =  gs_psdata-QUANTITY.

APPEND LS_COMP TO LT_COMP.

CLEAR LS_COMP.

*LS_COMPx-PREQ_ITEM = '00010'.

LS_COMPX-MATERIAL = GC_X.

LS_COMPx-PLANT = gc_x.

LS_COMPX-CHANGE_ID = GC_X.

LS_COMPX-ENTRY_QUANTITY = GC_X.

APPEND LS_COMPX TO LT_COMPX.

CLEAR LS_COMPX.

call function 'BAPI_PR_CREATE'

    EXPORTING

      PRHEADER                     = Ls_header

      PRHEADERX                    = Ls_headerX

*     TESTRUN                      =

    IMPORTING

      NUMBER                       = gv_preqno

     tables

      RETURN                       = gt_bapiret

       pritem                       = lt_item

      PRITEMX                      = lt_itemX

      PRACCOUNT                    = lt_acct

      PRACCOUNTX                   = lt_acctX

      PRCOMPONENTS                 = LT_COMP

      PRCOMPONENTSX                = LT_COMPX 

Regards

Ramakrshnaiah Y

[Former Member]

Hi Experts,

Any body have clue and worked on above requirement. Please send me sample code if you have.

Need to replace BOM with new components passing to BAPI.

Regards

Ramakrishnaiah Y

BAPI_PR_CREAT- Adding new components