Fonction SAP CAD_DISPLAY_BOM_WITH_SUB_ITEMS - CAD: display BOM with sub-items (in background)

Paramètre Reférence Type Long. Valeur par déf. Facultatif Description
I_BOM_ALTERNATIVE RC29L-STLAL C 2 SPACE X Alternative BOM
I_BOM_TYPE RC29L-STLAN C 1 SPACE X BOM category
I_CHANGE_NUMBER RC29L-AENNR C 12 SPACE X Change number
I_DISPLAY_FLAG DRAW-LOEDK C 1 'X' X Flag: Display or read data and change
I_MATERIAL MGV_RFC_MATNR C 18 Material Number
I_PLANT RC29L-WERKS C 4 SPACE X Plant
I_REVISION_LEVEL RC29L-REVLV C 2 SPACE X Revision level
I_VALID_FROM BICSK-DATUV C 10 X Valid from

Paramètre Reférence Type Long. Description
E_BOM_HEADER CAD_BICSK u 610 BOM header data
E_MESSAGE MESSAGE-MSGTX C 200 Message
E_MESSAGE_LEN CAD_RETURN-MESSAGE_LEN C 4 Length of message
E_RETURN CAD_RETURN-VALUE C 10 Return value

Paramètre Reférence Long. Facultatif Description
BOM_ITEM CAD_BOM_ITEM 604 BOM items
BOM_SUB_ITEM CSSUBITEM 85 BOM sub-items
DMS_CLASS_DATA CLS_CHARAC 99 Currently not in use
SAP_FIELD_DATA RFCDMSDATA 330 Currently not in use

Functionality
Read BOM with sub-items.
When you set the indicator I_DISPLAY_FLAG with a blank, the BOMis read for change.

  • The BOM is also locked aggainst other changes at the same time.

  • After this the function module CAD_CHANGE_BOM_WITH_SUB_ITEMS is called
    • in order to send the changed BOM data to the SAP System.
    • If you set the I_DISPLAY_FLAG indicator to 'X' the BOM is not locked.
      • The item data and sub-item data are returned in internal tables.

      Example
      ...
      DATA: BOM_HEADER LIKE BICSK,
      BOM_ITEM LIKE CSRFCITEM OCCURS 0 WITH HEADER LINE,
      BOM_SUB_ITEM LIKE CSSUBITEM OCCURS 0 WITH HEADER LINE,
      DMS_CLASS_DATA LIKE CLS_CHARAC OCCURS 0 WITH HEADER LINE,
      SAP_FIELD_DATA LIKE RFCDMSDATA OCCURS 0 WITH HEADER LINE,
      E_RETURN LIKE CAD_RETURN-VALUE,
      E_MESSAGE LIKE MESSAGE-MSGTX,
      E_MESSAGE_LEN LIKE CAD_RETURN-MESSAGE_LEN,
      I_DATE LIKE BICSK-DATUV.
      CLEAR: BOM_HEADER, BOM_ITEM, BOM_SUB_ITEM.
      REFRESH: BOM_ITEM, BOM_SUB_ITEM.
      CALL FUNCTION 'CAD_DISPLAY_BOM_WITH_SUB_ITEMS'
      EXPORTING
      I_MATERIAL = 'AH10'
      I_PLANT = ' '
      I_BOM_ALTERNATIVE = '01'
      I_BOM_TYPE = '1'
      * I_VALID_FROM = ' '
      I_REVISION_LEVEL = ' '
      I_DISPLAY_FLAG = 'X'
      IMPORTING
      E_RETURN = E_RETURN
      E_MESSAGE = E_MESSAGE
      E_MESSAGE_LEN = E_MESSAGE_LEN
      E_BOM_HEADER = BOM_HEADER
      TABLES
      BOM_ITEM = BOM_ITEM
      BOM_SUB_ITEM = BOM_SUB_ITEM
      DMS_CLASS_DATA = DMS_CLASS_DATA
      SAP_FIELD_DATA = SAP_FIELD_DATA
      EXCEPTIONS
      OTHERS = 1.
      IF E_RETURN ne 0.
      WRITE: E_MESSAGE.
      EXIT.
      ENDIF.
      ...

      Description
      Table with BOM items
      When a BOM item has the attribute UPSKZ set to "X" you can transfersub-items from the table BOM_SUB_ITEMS for this item
      The table has the set-up structure CSRFCITEM.