Created by Jerry Wang, last modified on Apr 11, 2014

IBASE 13835包含了一个first level component:

component ID为13836:

component 13836又包含了一个level 2 的component 13837:

可以通过下面的report 用API来读取一个IBASE的hierarchy structure.输入IBASE ID:

输入:

也可以在GENIL_BOL_BROWSER里通过Relation FirstLevelComponent 拿到level1的component 13836，

再用SubLevelComponent拿到level2 component 13837:

PARAMETERS: id TYPE ibib-ibase OBLIGATORY DEFAULT '13835'.

DATA: ls_header      TYPE ibap_head1,
      lt_struc_tab   TYPE ibap_struc1_tab,
      ls_line        LIKE LINE OF lt_struc_tab,
      ls_comp        TYPE ibap_dat1,
      ls_comp_detail TYPE ibap_comp2.

ls_header-ibase = id.
CALL FUNCTION 'CRM_IBASE_GET_DETAIL'
  EXPORTING
    i_ibase_head      = ls_header
  IMPORTING
    e_struc_ibase_tab = lt_struc_tab
  EXCEPTIONS
    not_specified     = 1
    doesnt_exist      = 2
    no_authority      = 3.

CHECK sy-subrc = 0.

LOOP AT lt_struc_tab INTO ls_line.
  WRITE: / 'Component ID: ' , ls_line-instance COLOR COL_NEGATIVE.
  ls_comp-ibase = id.
  ls_comp-instance = ls_line-instance.
  CALL FUNCTION 'CRM_IBASE_COMP_GET_DETAIL'
    EXPORTING
      i_comp        = ls_comp
    IMPORTING
      e_comp_det    = ls_comp_detail
    EXCEPTIONS
      not_specified = 1
      doesnt_exist  = 2
      no_authority  = 3.

WRITE: / 'Component Description:' , ls_comp_detail-descr COLOR COL_POSITIVE.

ENDLOOP.