Multi-level BOM explosion using CS_BOM_EXPL_MAT_V2

Question

Hi All,
I would like to know, if anyone has used the function module 'CS_BOM_EXPL_MAT_V2' to prepare a report to read multi-level BOM just like CS12. If anyone has, can you please let me know how we can read the individual materials in the BOM from this FM.
Hope my question is clear, await inputs.
Vivek

Answer 1

Hi vivek,
We use this code to restrict the BOM line item for particular movements. C if that can help u out.
CALL FUNCTION 'CS_BOM_EXPL_KND_V1'
    EXPORTING
      capid                       = ''
      datuv                       = sy-datum
      emeng                       = 1
     mehrs                       = 'X'
      mtnrv                       = i_mseg-matnr
      stlal                       = '1'
      stlan                       = '1'
      stpst                       = 0
      svwvo                       = 'X'
      werks                       = i_mseg-werks
      vbeln                       = aufk-kdauf
      vbpos                       = aufk-kdpos
        VERID                       = ' '
      vrsvo                       = 'X'
      IMPORTING
        TOPMAT                      =
        DSTST                       =
     TABLES
       stb                         = ZStb
        MATCAT                      =
    EXCEPTIONS
      alt_not_found               = 1
      call_invalid                = 2
      material_not_found          = 3
      missing_authorization       = 4
      no_bom_found                = 5
      no_plant_data               = 6
      no_suitable_bom_found       = 7
      conversion_error            = 8
      OTHERS                      = 9
  IF sy-subrc <> 0.
      MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
              WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
  ENDIF.
  SORT zstb BY mtart.
  LOOP AT zstb.
    IF zstb-mtart = 'Material type ' OR zstb-mtart = 'Material type ' .
    ELSE.
      DELETE zstb .
    ENDIF.
  ENDLOOP.
  CLEAR: v_menge, v_matnr, v_bwart, vv_menge, vvv_menge, zstb.
  LOOP AT zstb.
    SELECT menge matnr bwart
    INTO   (v_menge,v_matnr,v_bwart)
    FROM   aufm
    WHERE  aufnr = i_mseg-aufnr
    AND    werks = i_mseg-werks
    AND    matnr = zstb-idnrk
    AND    ( bwart = '261' OR bwart = '262' ).
          and    meins = 'FT2'.
     LOOP AT zstb.
      SELECT SINGLE matnr INTO vv_matnr FROM mara  WHERE  matnr = v_matnr
                                   AND mtart = zstb-mtart.
      IF sy-subrc = 0.
        CASE v_bwart.
          WHEN '261' .
            vv_menge = vv_menge + v_menge.
          WHEN '262' .
            vvv_menge = vvv_menge + v_menge.
        ENDCASE.
      ENDIF.
         ENDLOOP.
    ENDSELECT.
    CLEAR vf_menge.
    vf_menge = vv_menge - vvv_menge.
    CLEAR vv_menge.
    CLEAR vvv_menge.
Regards,
Vishal