Created by Jerry Wang on Sep 17, 2014

CRM系統有如下hierarchy的IBASE:

?

?

?

?

使用下列report 打印所有的component:

?

?

*&---------------------------------------------------------------------*

*& Report ?ZIBASE_READ_STRUCTURE

*&

*&---------------------------------------------------------------------*

*&

*&

*&---------------------------------------------------------------------*

REPORT zibase_read_structure.

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

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,

? 'Object ID: ', ls_comp_detail-object_id COLOR COL_GROUP.

? WRITE: / 'Component guid: ' , ls_comp_detail-guid_comp COLOR COL_KEY,

? ?'component guidc: ' , ls_comp_detail-guid_compc COLOR COL_HEADING.

ENDLOOP.

?

?

總結

以上是生活随笔為你收集整理的IBASE category 01 component hierarchy的全部內容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯，歡迎將生活随笔推薦給好友。