打印product所assign的product category和hierarchy的小工具

Created by Jerry Wang on Aug 15, 2014 Go to start of metadata
输入product ID之后打印product 所assign的category和hierarchy信息：

REPORT PROD_LIST_ASSIGNED_CATEGORY.
PARAMETERS: id type comm_product-product_id OBLIGATORY DEFAULT 'ZJERRY3'.
DATA: ls_prod TYPE comm_product,
      lt_cat TYPE STANDARD TABLE OF comm_prprdcatr,
      lt_hie TYPE STANDARD TABLE OF comm_hierarchy.
START-OF-SELECTION.
  SELECT SINGLE * INTO ls_prod FROM comm_product WHERE product_id = id.
  CHECK sy-subrc = 0.
  SELECT * INTO TABLE lt_cat FROM comm_prprdcatr WHERE product_guid = ls_prod-product_guid.
  SELECT * INTO TABLE lt_hie FROM comm_hierarchy FOR ALL ENTRIES IN lt_cat WHERE
     HIERARCHY_GUID = lt_cat-hierarchy_guid.
  LOOP AT lt_cat ASSIGNING FIELD-SYMBOL(<cat>).
     READ TABLE lt_hie ASSIGNING FIELD-SYMBOL(<hie>) WITH KEY hierarchy_guid = <cat>-hierarchy_guid.
     WRITE: / 'Category ID: ', <cat>-category_id COLOR COL_NEGATIVE,
      'Hierarchy ID: ', <hie>-hierarchy_id COLOR COL_TOTAL.
  ENDLOOP.