IBASE hierarchy structure and related API

69 阅读1分钟
# Created by Jerry Wang, last modified on Apr 11, 2014IBASE 13835包含了一个first level component: clipboard1  component ID为13836: clipboard2  component 13836又包含了一个level 2 的component 13837: clipboard3  可以通过下面的report 用API来读取一个IBASE的hierarchy structure.输入IBASE ID: clipboard4  输入: clipboard5  也可以在GENIL_BOL_BROWSER里通过Relation FirstLevelComponent 拿到level1的component 13836,  clipboard6  再用SubLevelComponent拿到level2 component 13837: clipboard7  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.