SAP CRM里找出包含了指定product的IBASE明细

PARAMETERS: id type comm_product-product_id OBLIGATORY DEFAULT 'ZJERRY3'.


DATA: lv_guid TYPE comm_product-product_guid,
      lv_objnr TYPE ibin-objnr,
      lt_ibin TYPE STANDARD TABLE OF ibin.

START-OF-SELECTION.
  SELECT SINGLE product_guid INTO lv_guid FROM comm_product WHERE product_id = id.
  CHECK sy-subrc = 0.

  lv_objnr = cl_ibase_service=>cl_convert_guid_16_22( lv_guid ).
  SELECT * INTO TABLE lt_ibin FROM IBIN WHERE objnr = lv_objnr.

  LOOP AT lt_ibin ASSIGNING FIELD-SYMBOL(<ibin>).
     WRITE: / 'IBASE ID: ', <ibin>-ibase COLOR COL_NEGATIVE,
        'IBASE component ID: ', <ibin>-instance COLOR COL_TOTAL.
  ENDLOOP.

要获取更多Jerry的原创文章，请关注公众号"汪子熙":