BAPI_MATERIAL_MAINTAINDATA_RT ---Article with purchasing view

Question

Hi,
I am using BAPI_MATERIAL_MAINTAINDATA_RT  to create Article. I am able to create article using Basic view, Log. DC view etc.
There is no purchasing view in HEADDATA. Also  fields like Purchase organization, net price etc are not present in any structure.How to create an Article  with purchasing view using this BAPI.
Please help me in this regard.
Regards,
Kiran.

Answer 1

Hi,
I had the same problem with this bapi. To activate the purchasing view
I used WRF_MATERIAL_MAINTAINDATA_RT to create the materials.
You must put attention how works the mm41 and fill the segments in this
that you need.
*& Report  ZTEST_BAPI_EXTENDEDUPDATE
REPORT  ztest_bapi_extendedupdate.
DATA: headdata TYPE bapie1mathead.
DATA: return TYPE STANDARD TABLE OF bapireturn1.
DATA: lwareturn TYPE bapireturn1.
DATA: organizational_level TYPE wrfscreenvalues.
DATA: clientdata  TYPE STANDARD TABLE OF bapie1marart WITH HEADER LINE.
DATA: clientdatax TYPE STANDARD TABLE OF bapie1marartx WITH HEADER LINE.
DATA: addnlclientdata TYPE STANDARD TABLE OF bapie1maw1rt  WITH HEADER LINE.
DATA: addnlclientdatax  TYPE STANDARD TABLE OF bapie1maw1rtx WITH HEADER LINE.
DATA: unitsofmeasure  TYPE STANDARD TABLE OF bapie1marmrt  WITH HEADER LINE.
DATA: unitsofmeasurex TYPE STANDARD TABLE OF bapie1marmrtx WITH HEADER LINE.
DATA: salesdata  TYPE STANDARD TABLE OF bapie1mvkert WITH HEADER LINE.
DATA: salesdatax  TYPE STANDARD TABLE OF bapie1mvkertx WITH HEADER LINE.
DATA: inforecordgeneral  TYPE STANDARD TABLE OF bapieina WITH HEADER LINE.
DATA: inforecordpurchorg  TYPE STANDARD TABLE OF wrfbapieine WITH HEADER LINE.
headdata-material = '000000000000400121'.
headdata-matl_type = 'ZMES'.
headdata-matl_group = '101210501'.
headdata-matl_cat = '00'.
headdata-ref_matl = '000000000000448590'.
headdata-basic_view = 'X'.
headdata-list_view  = 'X'.
headdata-sales_view = 'X'.
headdata-logdc_view = 'X'.
headdata-pos_view = 'X'.
organizational_level-material = headdata-material.
organizational_level-matl_type = headdata-matl_type.
organizational_level-matl_group = headdata-matl_group.
organizational_level-matl_cat = headdata-matl_cat.
organizational_level-ref_matl = headdata-ref_matl.
organizational_level-purch_org = 'SPC1'.
organizational_level-vendor = '20400353'.
organizational_level-info_type = '0'.
*organizational_level-plant = ''.
*  Llena clientdata
clientdata-material  = headdata-material.
clientdata-base_uom  = 'ST'.
APPEND clientdata.
clientdatax-material  = headdata-material.
clientdatax-base_uom  = 'X'.
APPEND clientdatax.
addnlclientdata-material    = headdata-material.
addnlclientdata-sales_unit  = ''.
addnlclientdata-li_proc_st  = 'B1'.
addnlclientdata-li_proc_dc  = 'B1'.
addnlclientdata-list_st_fr  = sy-datum.
addnlclientdata-list_st_to  = '99991231'.
addnlclientdata-list_dc_fr  = sy-datum.
addnlclientdata-list_dc_to  = '99991231'.
addnlclientdata-sell_st_fr  = sy-datum.
addnlclientdata-sell_st_to  = '99991231'.
addnlclientdata-sell_dc_fr  = sy-datum.
addnlclientdata-sell_dc_to  = '99991231'.
APPEND addnlclientdata.
addnlclientdatax-material    = headdata-material.
addnlclientdatax-sales_unit  = 'X'.
addnlclientdatax-li_proc_st  = 'X'.
addnlclientdatax-li_proc_dc  = 'X'.
addnlclientdatax-list_st_fr  = 'X'.
addnlclientdatax-list_st_to  = 'X'.
addnlclientdatax-list_dc_fr  = 'X'.
addnlclientdatax-list_dc_to  = 'X'.
addnlclientdatax-sell_st_fr  = 'X'.
addnlclientdatax-sell_st_to  = 'X'.
addnlclientdatax-sell_dc_fr  = 'X'.
addnlclientdatax-sell_dc_to  = 'X'.
APPEND addnlclientdatax.
unitsofmeasure-material   = headdata-material.
unitsofmeasure-alt_unit   = 'ST'.
unitsofmeasure-ean_upc    = '7702111342224'.
APPEND unitsofmeasure.
unitsofmeasurex-material   = headdata-material.
unitsofmeasurex-alt_unit   = 'X'.
unitsofmeasurex-ean_upc    = 'X'.
APPEND unitsofmeasurex.
"inforecordgeneral-info_rec ='5300002556'.
inforecordgeneral-material = headdata-material.
inforecordgeneral-mat_grp = headdata-matl_group.
inforecordgeneral-vendor = organizational_level-vendor.
inforecordgeneral-po_unit = 'ST'.
*inforecordgeneral-base_uom = clientdata-base_uom.
APPEND inforecordgeneral.
inforecordpurchorg-material = headdata-material.
inforecordpurchorg-vendor = organizational_level-vendor.
"inforecordpurchorg-info_rec = '5300002556'.
inforecordpurchorg-purch_org = organizational_level-purch_org.
inforecordpurchorg-info_type = '0'.
inforecordpurchorg-pur_group = 'GC1'.
inforecordpurchorg-currency = 'MXN'.
APPEND inforecordpurchorg.
BREAK-POINT.
CALL FUNCTION 'WRF_MATERIAL_MAINTAINDATA_RT'
  EXPORTING
    headdata             = headdata
    organizational_level = organizational_level
    badi_callmode        = '99'
  TABLES
    return               = return[]
    clientdata           = clientdata[]
    clientdatax          = clientdatax[]
    addnlclientdata      = addnlclientdata[]
    addnlclientdatax     = addnlclientdatax[]
    unitsofmeasure       = unitsofmeasure[]
    unitsofmeasurex      = unitsofmeasurex[]
*    plantdata             = plantdata[]
*    plantdatax            = plantdatax[]
*    salesdata             = salesdata[]
*    salesdatax            = salesdatax[]
    inforecord_general    = inforecordgeneral
    inforecord_purchorg   = inforecordpurchorg
BREAK-POINT.
READ TABLE return INTO lwareturn WITH KEY type = 'E'.
IF sy-subrc NE 0.
  CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'
    EXPORTING
      wait = 'X'.
ENDIF.