获得某个organization unit下面的所有sales org id list

知识共享许可协议

版权声明：署名，允许他人基于本文进行创作，且必须基于与原先许可协议相同的许可协议分发本文 （Creative Commons）

Created by Jerry Wang, last modified on May 15, 2015

执行report，输入sales org id：

输出：

为什么50000738也包含在result list里？

因为它也属于CCNEXT - 50000732

2359也同理：

source code:

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

*& Report  ZTEST_CALL_BADI

*&

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

*&

*&

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

REPORT ZORDER_GET_SALES_ORG_LIST.

PARAMETERS: org TYPE string OBLIGATORY DEFAULT 'O 50000732'.

DATA: lt_search TYPE HRTB_ATTVALUE,

      ls_search LIKE LINE OF lt_search,

      lt_result TYPE HRTB_OBJKEY.

ls_search-attrib = 'DIVISION'.

ls_search-value = '02'.

APPEND ls_search TO lt_search.

ls_search-attrib = 'D_CHANNEL'.

ls_search-value = '01'.

APPEND ls_search TO lt_search.

ls_search-attrib = 'SA_ORG'.

ls_search-value = org.

APPEND ls_search TO lt_search.

CALL FUNCTION 'HR_GENAT_FIND_ATTRIBUTES'

  EXPORTING

    scenario                = 'SALE'

    search_attr             = lt_search

 IMPORTING

   RESULT                  = lt_result

 EXCEPTIONS

   NOTHING_FOUND           = 1

   INVALID_SCENARIO        = 2

   INVALID_ATTRIBUTE       = 3

   INTERNAL_ERROR          = 4

   OTHERS                  = 5

          .

IF sy-subrc <> 0.

 WRITE: / 'attribute search failed: ' , sy-subrc.

 RETURN.

ENDIF.

LOOP AT lt_result ASSIGNING FIELD-SYMBOL(<result>).

   WRITE: / <result>-objid, ' type: ' , <result>-otype.

ENDLOOP.